Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Comment: Reverted from v. 2


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)]

OnLookupOnLicensePlateContent_OnAfterSetFromLicensePlateContent

localprocedure OnLookupOnLicensePlateContent_OnAddSteps(var _LookupResponseElement: Record"MOB NS WhseInquery Element"; OnAfterSetFromLicensePlateContent(_LicensePlateContent: Record "MOB MOS License Plate Content"; var _StepsLookupResponseElement: Record "MOB Steps NS WhseInquery Element");
begin
end;

...


OnLookupOnLicensePlateContent_OnAddSteps

localprocedure OnLookupOnLicensePlateContent_

...

OnAddSteps(var _LookupResponseElement: Record "MOB NS WhseInquery Element"; _LicensePlateContent: Record "

...

MOS License Plate Content"; var _

...

Steps: Record "MOB Steps Element")

...


begin
end;
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOB WMS LicensePlateContLookup", 'OnLookupOnLicensePlateContent_OnAfterSetFromLicensePlateContent', '', false, false)]

OnLookupOnLicensePlateContent_OnAfterAddStep

localprocedure OnLookupOnLicensePlateContent_OnAfterSetFromLicensePlateContentOnAfterAddStep(_LicensePlateContent: Record "MOB MOS License Plate Content"; var _LookupResponseElementStep: Record "MOB NS WhseInquery Steps Element");
begin
end;