Fix formatting issues and syntax errors in code
This commit is contained in:
parent
8c58628b85
commit
3353c5184c
6 changed files with 32 additions and 32 deletions
|
|
@ -61,7 +61,7 @@ codeunit 53100 "WLD BlockCustomer Meth"
|
|||
AcknowledgeBlockCustomer(HideDialog)
|
||||
end;
|
||||
|
||||
local procedure DoBlockCustomer(var Cust: Record Customer; IsHandled: Boolean);
|
||||
local procedure DoBlockCustomer(var Cust: Record Customer; IsHandled: Boolean)
|
||||
begin
|
||||
if IsHandled then
|
||||
exit;
|
||||
|
|
@ -93,12 +93,12 @@ codeunit 53100 "WLD BlockCustomer Meth"
|
|||
end;
|
||||
|
||||
[IntegrationEvent(false, false)]
|
||||
local procedure OnBeforeBlockCustomer(var Cust: Record Customer; var IsHandled: Boolean);
|
||||
local procedure OnBeforeBlockCustomer(var Cust: Record Customer; var IsHandled: Boolean)
|
||||
begin
|
||||
end;
|
||||
|
||||
[IntegrationEvent(false, false)]
|
||||
local procedure OnAfterBlockCustomer(var Cust: Record Customer);
|
||||
local procedure OnAfterBlockCustomer(var Cust: Record Customer)
|
||||
begin
|
||||
end;
|
||||
}
|
||||
|
|
@ -181,12 +181,12 @@ codeunit 53100 "WLD BlockCustomer Meth"
|
|||
end;
|
||||
...
|
||||
[IntegrationEvent(false, false)]
|
||||
local procedure OnBeforeBlockCustomer(var Cust: Record Customer; var IsHandled: Boolean);
|
||||
local procedure OnBeforeBlockCustomer(var Cust: Record Customer; var IsHandled: Boolean)
|
||||
begin
|
||||
end;
|
||||
|
||||
[IntegrationEvent(false, false)]
|
||||
local procedure OnAfterBlockCustomer(var Cust: Record Customer);
|
||||
local procedure OnAfterBlockCustomer(var Cust: Record Customer)
|
||||
begin
|
||||
end;
|
||||
}
|
||||
|
|
@ -200,7 +200,7 @@ The relevant part is:
|
|||
```AL
|
||||
codeunit 53100 "WLD BlockCustomer Meth"
|
||||
{
|
||||
internal procedure BlockCustomer(var Cust: Record Customer; HideDialog: Boolean);
|
||||
internal procedure BlockCustomer(var Cust: Record Customer; HideDialog: Boolean)
|
||||
var
|
||||
IsHandled: Boolean;
|
||||
begin
|
||||
|
|
@ -209,7 +209,7 @@ codeunit 53100 "WLD BlockCustomer Meth"
|
|||
...
|
||||
end;
|
||||
|
||||
local procedure DoBlockCustomer(var Cust: Record Customer; IsHandled: Boolean);
|
||||
local procedure DoBlockCustomer(var Cust: Record Customer; IsHandled: Boolean)
|
||||
begin
|
||||
if IsHandled then
|
||||
exit;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue