2.7 KiB
2.7 KiB
| title | tags | categories | |||
|---|---|---|---|---|---|
| Avoid too many blank lines |
|
|
Description
Avoid too many blank lines.
Example 1
Bad code
var
UserSetup: Record "User Setup";
IsEditable: Boolean;
IsVisible: Boolean;
local procedure Initialize()
begin
IsEditable := false;
IsVisible := false;
UserSetup.Get();
end;
Good code
var
UserSetup: Record "User Setup";
IsEditable: Boolean;
IsVisible: Boolean;
local procedure Initialize()
begin
IsEditable := false;
IsVisible := false;
UserSetup.Get();
end;
Example 2
Bad code
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
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;
}
}
}
}
}
Example 3
Bad code
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
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;
Tips
The AZ AL Dev Tools/AL Code Outline extension adds two new commands to Visual Studio Code to remove empty duplicate lines.
Remove Empty Lines from the Active Editor: removes empty duplicate lines from the current editorRemove Empty Lines from the Active Project: removes empty duplicate lines from the current project