Skip to end of metadata
Go to start of metadata

You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 7 Current »

Use this event to

Populate new line when adding to an Item Journal (location without "Directed Put-away and Pick")

See also: OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateWhseJnlLine


Template

    // [Template]
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateItemJnlLine''', true, true)]
    local procedure OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _ItemJnlLine: Record "Item Journal Line")
    begin
    end;

Example

    // [Example] 
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnAddCountLine_OnAfterCreateItemJnlLine''', true, true)]
    local procedure MyOnPostAdhocRegistrationOnAddCountLine_OnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; var _ItemJnlLine: Record "Item 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');

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


More examples

There are no items with the selected labels at this time.


Version History

Version

Changes

MOB5.17Introduced
  • No labels