Versions Compared

Key

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


Use this event to

Excerpt

Populate values in OrderList displayed at the mobile device (derived from Purchase Header from purchase order with no associated warehouse document).

...

If your code is not specific for Purchase Header consider using the OnGetPickOrders_OnAfterSetFromAnyHeader event.

Template

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS PickMOB WMS Pick", 'OnGetPickOrders_OnAfterSetFromPurchaseReturnHeader''', true true, true true)]
    local procedure OnGetPickOrders_OnAfterSetFromPurchaseReturnHeader(_PurchReturnHeader: Record "Purchase HeaderPurchase Header"; var _BaseOrderElement: Record "MOB Ns BaseDataModel ElementMOB Ns BaseDataModel Element")
    begin
    end;


Example 1

        // [Example] : Change Displayline1
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Pick", 'OnGetPickOrders_OnAfterSetFromPurchaseReturnHeader''', true, true)]
    local procedure OnGetPickOrders My01OnGetPickOrders_OnAfterSetFromPurchaseReturnHeader(_PurchReturnHeader: Record "Purchase Header"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
        with _BaseOrderElement do begin
            Set_BaseOrderElement.Set_DisplayLine1('Set from OnPickOnAfterSetFromPurchaseReturnHeader');
            Set        _BaseOrderElement.Set_HeaderValue1(_PurchReturnHeader."Assigned User ID");
        end;
    end;

Example 2

    // [Example: Sort by custom tag]
    // Remove My2_ from name when copying to Jira
    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Pick", 'OnGetPickOrders_OnAfterSetFromPurchaseReturnHeader''', true, true)]
    local procedure My2_OnGetPickOrders My02OnGetPickOrders_OnAfterSetFromPurchaseReturnHeader(_PurchReturnHeader: Record "Purchase Header"; var _BaseOrderElement: Record "MOB Ns BaseDataModel Element")
    begin
        with _BaseOrderElement do begin
            SetValue_BaseOrderElement.SetValue('AssignedUserID''Assigned to: ' + _WhseActHeaderPurchReturnHeader."Assigned User ID");
            Set        _BaseOrderElement.Set_Sorting1(CopyStr(_BaseOrderElement.GetValue('AssignedUserID')1, MaxStrLen("Sorting1 (internal)")));
        end;
    end;


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


Version History

VersionChanges
MOB5.00Introduced

...