mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-05 06:36:55 +01:00
23 lines
No EOL
490 B
AL
23 lines
No EOL
490 B
AL
codeunit 50111 "Job Queue Failure Bad"
|
|
{
|
|
TableNo = "Job Queue Entry";
|
|
|
|
trigger OnRun()
|
|
begin
|
|
if not TryProcessCustomer(Rec."Parameter String") then
|
|
exit;
|
|
end;
|
|
|
|
[TryFunction]
|
|
local procedure TryProcessCustomer(CustomerNo: Code[20])
|
|
var
|
|
Customer: Record Customer;
|
|
begin
|
|
Customer.Get(CustomerNo);
|
|
ProcessCustomer(Customer);
|
|
end;
|
|
|
|
local procedure ProcessCustomer(Customer: Record Customer)
|
|
begin
|
|
end;
|
|
} |