Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Use this event to

Excerpt

Run additional code after a PostAdhocRegistration request has been executed.

Template

...


...

Template

...

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Adhoc Registr.", 'OnAfterPostAdhocRegistrationOnPostAdhocRegistration_OnAfterPost''', true, true)]
    local procedure OnAfterPostAdhocRegistration OnPostAdhocRegistration_OnAfterPost(_MessageId: Guid; _RegistrationType: Textvar _RequestValues: Record "MOB NS Request Element"; var _XmlResponseDoc: XmlDocumentvar _RegistrationTypeTracking: Text)
    begin
    end;

Example

    // [Example] 
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Adhoc Registr.", 'OnAfterPostAdhocRegistrationOnPostAdhocRegistration_OnAfterPost''', true, true)]
    local procedure MyOnAfterPostAdhocRegistration MyOnPostAdhocRegistration_OnAfterPost(_MessageId: Guid; _RegistrationType: Textvar _RequestValues: Record "MOB NS Request Element"; var _XmlResponseDoc: XmlDocumentvar _RegistrationTypeTracking: Text)
    var
        MobSetup: Record "MOB Setup";
        MobWmsToolbox: Codeunit "MOB WMS Toolbox";
    begin
        if _RegistrationType <> MobWmsToolbox."CONST::UnplannedCount"() then
            exit;

        MobSetup.Get();
        if MobSetup."Skip Whse Unpl Count IJ Post" then begin
            // Some code to calculate item journal adjustment using the "Calculate Whse. Adjustment" report
            // ...

            _RegistrationTypeTracking := _RegistrationTypeTracking + ' / Item Journal adjustment calculated';
        end;
    end;


Filter by label (Content by label)
showLabelsfalse
showSpacefalse
sorttitle
titleMore examples
excerptTypesimple
cqllabel = "bc" and label = "example" and label = "adhoc" and label = "onafterpost"

...