[Control("MenuFunctionButton")]
class PostButton
{
public void clicked()
{
DT_Licenseship_dk licenseShip = element.args().record();
Args args = new Args();
args.record(licenseShip);
args.parm(licenseShip.LicensePlateId);
new MenuFunction(menuItemDisplayStr(DT_LiscencePlateShipMnu_dk), MenuItemType::Action).run(args);
}
}
[Control("MenuFunctionButton")]
class PostButton
{
/// <summary>
///
/// </summary>
public void clicked()
{ DT_Licenseship_dk Licenseship;
InventTable inventTable;
InventSum inventSum;
InventDim inventDim;
InventTransferTable inventTransferTable;
InventTransferLine inventTransferLine;
Licenseship = element.args().record();
Args args = new Args();
str parameterString;
;
args.record( Licenseship);
args.parm(Licenseship.LicensePlateId);
//FormDataSource DT_Licenseship_dk = sender.formRun().dataSource(1);
//args.caller(Licenseship);
Licenseship = DT_Licenseship_dk_ds.cursor();
select * from inventTable
join inventSum where inventSum.ItemId == inventTable.ItemId
join inventDim where inventDim.inventDimId == inventSum.InventDimId
join dT_Licenseship_dk where dT_Licenseship_dk.LicensePlateId == inventDim.LicensePlateId
join inventTransferTable where inventTransferTable.TransferId == dT_Licenseship_dk.TransferId
join inventTransferLine where inventTransferLine.ItemId == inventTable.ItemId
&& inventsum.AVAILPHYSICAL > 0;
new MenuFunction(menuItemDisplayStr(DT_LiscencePlateShipMnu_dk), MenuItemType::Action).run(args);
}
}
public void insert(NoYes _dropEstimated = NoYes::No)
{
InventTable inventTable;
InventSum inventSum;
InventDim inventDim;
DT_Licenseship_dk dT_Licenseship_dk;
InventTransferTable inventTransferTable;
InventTransferLine inventTransferLine;
while select * from inventTable
join inventSum where inventSum.ItemId == inventTable.ItemId
join inventDim where inventDim.inventDimId == inventSum.InventDimId
join dT_Licenseship_dk where dT_Licenseship_dk.LicensePlateId == inventDim.LicensePlateId
join inventTransferTable where inventTransferTable.TransferId == dT_Licenseship_dk.TransferId
join inventTransferLine where inventTransferLine.ItemId == inventTable.ItemId
&& inventsum.AVAILPHYSICAL > 0
{
inventTransferLine.ItemId = inventTable.ItemId;
inventTransferLine.insert();
}
}
André Arnaud de Cal...
291,979
Super User 2025 Season 1
Martin Dráb
230,848
Most Valuable Professional
nmaenpaa
101,156