OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLine

Use this event to

Populate warehouse journal line when posting adjust quantity.

This event is triggered when:

• Location is "Directed Put-away and Pick"   AND
• Item Journal Posting IS been skipped in MobSetup."Skip Whse. Unpl. Count Item Journal. Post"

OR

• Location without "Directed Put-away and Pick"   AND
• Location is "Bin Mandatory"   AND
• Item Journal Posting IS skipped in MobSetup."Skip Whse. Unpl. Count Item Journal. Post"
  
  

See also: OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateItemJnlLine

Template

    // [Template]
    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure OnPostAdhocRegistrationOnAdjustQuantity_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.", 'OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLine', '', true, true)]
    local procedure MyOnPostAdhocRegistrationOnAdjustQuantity_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('ItemNumber');
        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