Page Comparison

Use this event to

...

See also: OnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateItemJnlLine

Template

    // [Template]
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnUnplannedCountOnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure OnPostAdhocRegistrationOnUnplannedCount OnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateWhseJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _WhseJnlLine: Record "Warehouse Journal Line")
    begin
    end;

Example

    // [Example] 
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnUnplannedCountOnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure MyOnPostAdhocRegistrationOnUnplannedCount MyOnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateWhseJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _WhseJnlLine: Record "Warehouse Journal Line")
    var
        RegistrationType: Text;
        ItemNo        Bin: Text;
        LocationCode: Text;
        BinCode        
        ToBin: Text;
    begin
        RegistrationType := _RequestValues.GetValue('RegistrationType');
        ItemNo        Bin := _RequestValues.GetValue('ItemBin');
        LocationCode := _RequestValues.GetValue('Location');
        BinCode        
        ToBin := _RequestValues.GetValue('BinToBin');

        _WhseJnlLine.Validate(Description, CopyStr(StrSubstNo('%1 %2 at %3 %4%1 %2 to %3', RegistrationType, ItemNo Bin,  LocationCode, BinCodeToBin), 1, MaxStrLen(_WhseJnlLine.Description)));
    end;

Version History

...