bcquality/community/knowledge/appsource/do-not-subscribe-to-company-open-events.bad.al
2026-09-07 17:50:59 +02:00

13 lines
No EOL
400 B
AL

codeunit 50100 "Rental Company Open"
{
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Application Management", 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;
}