159 lines
2.2 KiB
Markdown
159 lines
2.2 KiB
Markdown
---
|
|
title: "Avoid too many blank lines"
|
|
tags: ["AL","Readability"]
|
|
categories: ["Best Practice"]
|
|
---
|
|
|
|
## Description
|
|
|
|
Avoid too many blank lines.
|
|
|
|
## #1 Example
|
|
|
|
### Bad code
|
|
|
|
```al
|
|
var
|
|
UserSetup: Record "User Setup";
|
|
IsEditable: Boolean;
|
|
IsVisible: Boolean;
|
|
|
|
|
|
local procedure Initialize()
|
|
begin
|
|
IsEditable := false;
|
|
IsVisible := false;
|
|
|
|
|
|
UserSetup.Get();
|
|
end;
|
|
```
|
|
|
|
### Good code
|
|
|
|
```al
|
|
var
|
|
UserSetup: Record "User Setup";
|
|
IsEditable: Boolean;
|
|
IsVisible: Boolean;
|
|
|
|
local procedure Initialize()
|
|
begin
|
|
IsEditable := false;
|
|
IsVisible := false;
|
|
|
|
UserSetup.Get();
|
|
end;
|
|
```
|
|
|
|
## #2 Example
|
|
|
|
### Bad code
|
|
|
|
```al
|
|
page 50000 "Blank Lines"
|
|
{
|
|
PageType = List;
|
|
ApplicationArea = All;
|
|
UsageCategory = Administration;
|
|
SourceTable = Customer;
|
|
|
|
|
|
layout
|
|
{
|
|
area(Content)
|
|
{
|
|
repeater(GroupName)
|
|
{
|
|
ShowCaption = false;
|
|
|
|
|
|
field(Name; Rec.Name)
|
|
{
|
|
ApplicationArea = All;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
```
|
|
|
|
### Good code
|
|
|
|
```al
|
|
page 50000 "Blank Lines"
|
|
{
|
|
PageType = List;
|
|
ApplicationArea = All;
|
|
UsageCategory = Administration;
|
|
SourceTable = Customer;
|
|
|
|
layout
|
|
{
|
|
area(Content)
|
|
{
|
|
repeater(GroupName)
|
|
{
|
|
ShowCaption = false;
|
|
|
|
field(Name; Rec.Name)
|
|
{
|
|
ApplicationArea = All;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
```
|
|
|
|
## #3 Example
|
|
|
|
### Bad code
|
|
|
|
```al
|
|
var
|
|
GLSetup: Record "General Ledger Setup";
|
|
GLSetupRead: Boolean;
|
|
|
|
|
|
local procedure GetGLSetup()
|
|
begin
|
|
if not GLSetupRead then
|
|
GLSetup.Get();
|
|
|
|
|
|
GLSetupRead := true;
|
|
|
|
|
|
OnAfterGetGLSetup(GLSetup);
|
|
end;
|
|
|
|
|
|
[IntegrationEvent(false, false)]
|
|
local procedure OnAfterGetGLSetup(var GLSetup: Record "General Ledger Setup")
|
|
begin
|
|
end;
|
|
```
|
|
|
|
### Good code
|
|
|
|
```al
|
|
var
|
|
GLSetup: Record "General Ledger Setup";
|
|
GLSetupRead: Boolean;
|
|
|
|
local procedure GetGLSetup()
|
|
begin
|
|
if not GLSetupRead then
|
|
GLSetup.Get();
|
|
|
|
GLSetupRead := true;
|
|
|
|
OnAfterGetGLSetup(GLSetup);
|
|
end;
|
|
|
|
[IntegrationEvent(false, false)]
|
|
local procedure OnAfterGetGLSetup(var GLSetup: Record "General Ledger Setup")
|
|
begin
|
|
end;
|
|
```
|