...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
| Info | ||
|---|---|---|
| ||
This article was written for a connector used with the separate Pack & Ship Extension (OnPrem or Per-Tenant). Mobile WMS - Implementing a new Shipping Provider Connector |
Use this event to
...
Optional: Synchronize master data for Package Stations from 3rd party Shipping App to Tasklet Pack and Ship Extension.
Description
Package Stations is an optional entity in the "Pack and Ship" setup. The "Pack and Ship" solution has no functionality attached to "Packing Station"s out-of-the box and syncronizing Packing Stations is entirely optional.
...
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOS Pack API", 'OnSynchronizePackingStations', '', true, true)]
local procedure OnSynchronizePackingStations(var _PackingStation: Record "MOS Packing Station")
begin
end;
Example
[EventSubscriber(ObjectType::Codeunit, Codeunit::"MOS Pack API", 'OnSynchronizePackingStations', '', true, true)]
local procedure OnSynchronizePackingStations(var _PackingStation: Record "MOS Packing Station")
var
IdysUserSetup: Record "IDYS User Setup";
begin
IdysUserSetup.Reset();
if IdysUserSetup.FindSet() then
repeat
_PackingStation.SetRange("MOSSHIPIT User Name (External)", IdysUserSetup."User Name (External)");
if _PackingStation.IsEmpty() then begin
_PackingStation.Init();
_PackingStation."No." := ''; // Auto-assigned in OnInsert( ) if blank.
_PackingStation.Description := IdysUserSetup."User Name (External)";
_PackingStation."MOSSHIPIT User Name (External)" := IdysUserSetup."User Name (External)";
_PackingStation.Insert(true);
end;
until IdysUserSetup.Next() = 0;
_PackingStation.Reset(); // Remove any filters
end;
tableextension 62100 "MOSSHIPIT Packing Station" extends "MOS Packing Station"
{
fields
{
field(62100; "MOSSHIPIT User Name (External)"; Text[80])
{
Caption = 'User Name (External)';
DataClassification = ToBeClassified;
}
}
}
...