mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-07 15:46:55 +01:00
13 lines
No EOL
399 B
AL
13 lines
No EOL
399 B
AL
codeunit 50100 "Rental Company Open"
|
|
{
|
|
[EventSubscriber(ObjectType::Codeunit, Codeunit::"System Initialization", OnAfterCompanyOpen, '', false, false)]
|
|
local procedure InitializeRentalSetup()
|
|
var
|
|
RentalSetup: Record "Rental Setup";
|
|
begin
|
|
if not RentalSetup.Get() then begin
|
|
RentalSetup.Init();
|
|
RentalSetup.Insert(true);
|
|
end;
|
|
end;
|
|
} |