OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateWhseJnlLine

Use this event to

Populate new count line when adding to a Warehouse Journal (location with "Directed Put-away and Pick")

See also: OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateItemJnlLine

Template

    // [Template]
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure OnOnPostAdhocRegistrationOnAddCountLine_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.", 'OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure MyOnPostAdhocRegistrationOnAddCountLine_OnAfterCreateWhseJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _WhseJnlLine: Record "Warehouse Journal Line")
    var
        RegistrationType: Text;
        ItemNo: Text;
        LocationCode: Text;
        BinCode: Text;
    begin
        RegistrationType := _RequestValues.GetValue('RegistrationType');

        ItemNo := _RequestValues.GetValue('AddCountLineItem');
        LocationCode := _RequestValues.GetValue('Location');
        BinCode := _RequestValues.GetValue('Bin');

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

Version History