static void TestDebuggerJobForBrandStockValue(Args _args)
{
TransDate fromdate = mkDate(01,01,2017); //today();
TransDate todate = mkDate(31,01,2017); //today();
TransDate _todate = dateMax();
InventTable InventTable;
EcoResStorageDimensionGroupItem EcoResStorageDimensionGroupItem;
InventDim InventDim;
InventValueReportView InventValueReportView;
Amount amount;
qty qty;
while SELECT crossCompany InventTable
GROUP BY InventTable.ItemType, EcoResStorageDimensionGroupItem.StorageDimensionGroup, InventTable.OGSBrand
where inventTable.ItemType != ItemType::Service
OUTER JOIN EcoResStorageDimensionGroupItem
where InventTable.ItemId == EcoResStorageDimensionGroupItem.ItemId && InventTable.dataAreaId == EcoResStorageDimensionGroupItem.ItemDataAreaId
JOIN SUM(Qty), SUM(Amount) FROM InventValueReportView
where InventTable.ItemId == InventValueReportView.ItemId && InventValueReportView.InventTransPostingType == InventTransPostingType::Financial
&& InventValueReportView.TransDate > todate && InventValueReportView.TransDate <= _todate
JOIN InventDim
where InventValueReportView.InventDimId == InventDim.inventDimId
{
amount += InventValueReportView.Amount * -1;
qty += InventValueReportView.qty * -1;
info(strFmt("%1&%2&%3",InventTable.OGSBrand, InventValueReportView.Amount * -1, InventValueReportView.qty * -1));
}
info(strFmt("Amount %1 -- Qty %2", Amount,Qty));
}
No comments:
Post a Comment