OnPostAdhocRegistrationOnUnplannedCount_OnAfterCreateWhseJnlLine

Use this event to

Populate warehouse journal line when posting unplanned move.

This event is triggered when:

• Location is "Directed Put-away and Pick"   AND
• Item Journal Posting has been disabled from MobSetup."Skip Whse. Unpl. Count Item Journal. Post"

You may use "WMS Managment"."OnAfterCreateWhseJnlLine()" to handle Warehouse Journal Lines being created during the posting posting process when:

• Location without "Directed Put-away and Pick"   AND
• Location is "Bin Mandatory"   AND
• Item Journal Posting has not been disabled from MobSetup."Skip Whse. Unpl. Count Item Journal. Post"
  
  

See also: OnPostAdhocRegistrationOnUnplannedCount_OnAfterCreateItemJnlLine

Template

    // [Template]
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnUnplannedCount_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure OnPostAdhocRegistrationOnUnplannedCount_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.", 'OnPostAdhocRegistrationOnUnplannedCount_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure MyOnPostAdhocRegistrationOnUnplannedCount_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('Item');
        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