Versions Compared

Key

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


OnLookupOnPackagesToShip_OnAfterSetFromWarehouseShipmentHeader

localprocedure OnLookupOnPackagesToShip_OnAfterSetFromWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
begin
end;


   // Example adding a custom value to the barcode element of the first line in the Pack & Ship list with Shipment/License Plate lines

    [EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS Pack Lookup", 'OnLookupOnPackagesToShip_OnAfterSetFromWarehouseShipmentHeader', '', false, false)]
    local procedure MyProcedure(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
    begin
        _LookupResponseElement.Set_Barcode('1234');  // Hardcoded value to be stored in the barcode tag of the first element in the Packing Screen with License Plates
    end;


OnLookupOnPackagesToShip_OnAfterSetFromLicensePlate

localprocedure OnLookupOnPackagesToShip_OnAfterSetFromLicensePlate(_LicensePlate: Record "MOS License Plate"; var _LookupResponseElement: Record "MOB NS WhseInquery Element")
begin
end;

OnLookupOnPackagesToShip_OnAddStepsToWarehouseShipmentHeader

localprocedure OnLookupOnPackagesToShip_OnAddStepsToWarehouseShipmentHeader(var _LookupResponse: Record "MOB NS WhseInquery Element"; _WhseShipmentHeader: Record "Warehouse Shipment Header"; var _Steps: Record "MOB Steps Element")
begin
end;

OnLookupOnPackagesToShip_OnAfterAddStepToWarehouseShipmentHeader

localprocedure OnLookupOnPackagesToShip_OnAfterAddStepToWarehouseShipmentHeader(_WhseShipmentHeader: Record "Warehouse Shipment Header"; var _Step: Record "MOB Steps Element")
begin
end;

OnLookupOnPackagesToShip_OnAddStepsToLicensePlate

localprocedure OnLookupOnPackagesToShip_OnAddStepsToLicensePlate(var _LookupResponseElement: Record "MOB NS WhseInquery Element"; _LicensePlate: Record "MOS License Plate"; var _Steps: Record "MOB Steps Element")
begin
end;

OnLookupOnPackagesToShip_OnAfterAddStepToLicensePlate

localprocedure OnLookupOnPackagesToShip_OnAfterAddStepToLicensePlate(_LicensePlate: Record "MOS License Plate"; var _Step: Record "MOB Steps Element")
begin
end;

...




[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS LicensePlateContLookup", 'OnLookupOnLicensePlateContent_OnAddSteps', '', false, false)]
localprocedure OnLookupOnLicensePlateContent_OnAfterSetFromLicensePlateContent(OnAddSteps(var _LookupResponseElement: Record"MOB NS WhseInquery Element"; _LicensePlateContent: Record"MOS MOB License Plate Content"; var _LookupResponseElementSteps: Record"MOB NS WhseInquery Steps Element");
begin
end;

...

[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS LicensePlateContLookup", 'OnLookupOnLicensePlateContent_OnAfterAddStep', '', false, false)]
local procedure OnLookupOnLicensePlateContent_

...

OnAfterAddStep(

...

_

...

LicensePlateContent: Record "MOB

...

License Plate Content"; var _

...

Step: Record "MOB Steps Element");
begin
end;

...


[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS LicensePlateContLookup", 'OnLookupOnLicensePlateContent_OnAfterSetFromLicensePlateContent', '', false, false)]
local procedure OnLookupOnLicensePlateContent_OnAfterAddStepOnAfterSetFromLicensePlateContent(_LicensePlateContent: Record "MOS MOB License Plate Content"; var _StepLookupResponseElement: Record "MOB Steps NS WhseInquery Element");
begin
end;