Page Comparison

Use this event to

...

See also: OnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateWhseJnlLine

...

    // [

Template

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnUnplannedCountOnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateItemJnlLine', '', true, true)]
    local procedure OnPostAdhocRegistrationOnUnplannedCount OnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _ItemJnlLineReservationEntry: Record "Item Journal Line")
    begin
    end;    // [Template]
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnUnplannedCount_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure OnPostAdhocRegistrationOnUnplannedCount_OnAfterCreateWhseJnlLine(var _RequestValuesReservation Entry"; var _ItemJnlLine: Record "MOB NS Request Element"; var _WhseJnlLine: Record "Warehouse Journal LineItem Journal Line")
    begin
    end;

...

     // [

Example

...

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnUnplannedCountOnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateItemJnlLine', '', true, true)]
    local procedure MyOnPostAdhocRegistrationOnUnplannedCount MyOnPostAdhocRegistrationOnUnplannedMove_OnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; _ReservationEntry: Record "Reservation Entry"; var _ItemJnlLine: Record "Item Journal Line")
    var
        RegistrationType: Text;
        ItemNo        Bin: Text;
        LocationCode        ToBin: Text;
        BinCode: Text;
    begin
        RegistrationType := _RequestValues.GetValue('RegistrationType');
        ItemNo        Bin := _RequestValues.GetValue('ItemBin');
        LocationCode        ToBin := _RequestValues.GetValue('LocationToBin');
        BinCode := _RequestValues.GetValue('Bin');

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

Version History

...