Page Comparison

Use this event to

...

    // [Template]
    // [Template] Location is "Bin Mandatory" and posting using ItemJnlLine but creating only WhseEntries when doing a bin-to-bin transfer
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnBulkMove_OnAfterCreateItemJnlLine', '', true, true)]
    local procedure OnPostAdhocRegistrationOnBulkMove_OnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _ItemJnlLine: Record "Item Journal Line")
    begin
    end; 

Example

    // [Example] 
    // [Example] Location is "Bin Mandatory" and posting using ItemJnlLine but creating only WhseEntries when doing a bin-to-bin transfer
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnBulkMove_OnAfterCreateItemJnlLine', '', true, true)]
    local procedure MyOnPostAdhocRegistrationOnBulkMove_OnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _ItemJnlLine: Record "Item Journal Line")
    var
        RegistrationType: Text;
        LocationCode: Text;
        FromBinCode: Text;
        ToBinCode: Text;
    begin
        RegistrationType := _RequestValues.GetValue('RegistrationType');

        LocationCode := _RequestValues.GetValue('Location');
        FromBinCode := _RequestValues.GetValue('FromBin');
        ToBinCode := _RequestValues.GetValue('ToBin');

        _ItemJnlLine.Validate(Description, CopyStr(StrSubstNo('%1 %2 %3 to %4', RegistrationType, LocationCode, FromBinCode, ToBinCode), 1, MaxStrLen(_ItemJnlLine.Description)));
    end;

...