Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

Use this event to

Excerpt

Populate item journal line when posting adjust quantity without Location."Directed Put-away and Pick".


This event is triggered when always unless:

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


See also: OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLine


Template

    // [Template]
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLineOnAfterCreateItemJnlLine''', true, true)]
    local procedure OnPostAdhocRegistrationOnAdjustQuantity OnOnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLineOnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; _ReservationEntry: Record "Reservation Entry"; var _WhseJnlLineItemJnlLineRecord "Warehouse Journal LineItem Journal Line")
    begin
    end;

Example

    // [Example] 
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Adhoc Registr.", 'OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLineOnAfterCreateItemJnlLine''', true, true)]
    local procedure MyOnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateWhseJnlLineOnAfterCreateItemJnlLine(var _RequestValues: Record "MOB NS Request Element"; _ReservationEntry: Record "Reservation Entry"; var _WhseJnlLineItemJnlLineRecord "Warehouse Journal LineItem 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');

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


Filter by label (Content by label)
showLabelsfalse
showSpacefalse
sorttitle
titleMore examples
excerptTypesimple
cqllabel = "bc" and label = "example" and label = "OnPostAdhocRegistrationOnAdjustQuantity_OnAfterCreateItemJnlLine"

...