[EventSubscriber(ObjectType::Table, Database::Job, OnBeforeUpdateJobTaskDimension, '', false, false)]
local procedure Job_OnBeforeUpdateJobTaskDimension(var Job: Record Job; FieldNumber: Integer; ShortcutDimCode: Code[20]; var IsHandled: Boolean);
var
JobTask: Record "Job Task";
begin
IsHandled := true;
JobTask.SetRange("Job No.", Job."No.");
if JobTask.FindSet(true) then
repeat
case FieldNumber of
1:
JobTask.Validate("Global Dimension 1 Code", ShortcutDimCode);
2:
JobTask.Validate("Global Dimension 2 Code", ShortcutDimCode);
end;
JobTask.Modify();
until JobTask.Next() = 0;
end;
Stay up to date on forum activity by subscribing. You can also customize your in-app and email Notification settings across all subscriptions.
André Arnaud de Cal... 290,252 Super User 2024 Season 2
Martin Dráb 228,089 Super User 2024 Season 2
nmaenpaa 101,148