Versions Compared

Key

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

Use this event to

Excerpt
Set custom values On "Locate Item" for <LookupResponse>-elements derived from Bin Content.



Sample request

<request name="Lookup" created="2019-08-14T10:39:46+02:00" xmlns="http://schemas.microsoft.com/Dynamics/Mobile/2007/04/Documents/Request">
     <requestData name="Lookup">
          <Location>SILVER</Location>
          <ItemNumber>1928-S</ItemNumber>
          <LookupType>LocateItem</LookupType>
     </requestData>
</request>

Template

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS Lookup", 'OnLookupOnLocateItem_OnAfterSetFromBinContent''', true, true)]
    procedure OnLookupOnLocateItem_OnAfterSetFromBinContent(_BinContent: Record "Bin Content"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
    begin
    end;


Example

    [EventSubscriber(ObjectType::CodeunitCodeunit::"MOB WMS LookupMOB WMS Lookup", 'OnLookupOnLocateItem_OnAfterSetFromBinContent''', true true, true true)]
    procedure OnLookupOnLocateItem MyOnLookupOnLocateItem_OnAfterSetFromBinContent(_BinContent: Record "Bin ContentBin Content"; var _LookupResponseElement: Record "MOB NS WhseInquery ElementMOB NS WhseInquery Element")
    begin
     with        with _LookupResponseElement do begin
          Set            Set_DisplayLine1('Set from OnLocateItemOnAfterSetFromBinContentSet from OnLocateItemOnAfterSetFromBinContent');
          SetValue            SetValue('WarehouseClassCode''OnLocateItemOnAfterSetFromBinContent Custom Tag for Warehouse Class Code OnLocateItemOnAfterSetFromBinContent Custom Tag for Warehouse Class Code ' + _BinContent."Warehouse Class CodeWarehouse Class Code");
     end        end;
    end;


Version History

VersionChanges
MOB5.00Introduced

...