Please correct me if any omission or error
From the Inventory Management-> journals-> Item Counting> Counting can enter the inventory:
Lines can create a new inventory record, click into the inventory:
Need to be aware that disk Points: changes in the respective fields, will be updated in real time.
Basically every field modified method of the corresponding field in the data source will triggerto update disk Points:
The inventory part by class: InventMov_Jour_Loss_SumUp, control, it is a subclass ofinventmov_journal InventMovement subclass inventmov_journal.
InventMov_Jour_Loss_SumUp use: InventQty dateOnHandPhysical (InventDim _inventDim) disc calculatorspoints,
Which in turn calls a static method of InventSumDatePhysicalDim:
server static InventQty onHandQty (
TransDate _transDate
ItemId _itemId
InventDim _inventDim
InventDimParm _inventDimParm
)
To calculate the static method to invoke class: InventSumDatePhysicalDim this class inherits fromInventSumDatePhysical, which is responsible for the combined dimension to query the amount of materials.
Declare a the class inventmov_journal statement:
InventJournalTrans inventJournalTrans;
When entering the inventory row will operate the inventJournalTrans
First of all:
When you create a new inventory record is triggered to calculate the plate number of points, then used inventDim inventDim InventMovement declared InventMovement:
InventDim inventdim (InventDim _inventDim = inventDim)
{
;
inventDim = _inventDim;
if (! inventDim)
inventDim = InventDim :: find (this.inventDimId ());
return inventDim;
}
To get inventDim! inventDim will call table: find inventDim:
static public InventDim find (InventDimId inventDimId, boolean _forupdate = false)
{
InventDim inventDim;
;
if (inventDimId)
{
if (_forupdate)
inventDim.selectForUpdate (_forupdate);
select firstonly inventDim
index hint DimIdIdx
where inventDim.InventDimId The == inventDimId;
}
return inventDim;
}
In this way, you will know:
InventQty dateOnHandPhysical (InventDim _inventDim)
The parameters from there, you get your new a new definition inventdim, you add two records record the actual modify this inventdim.
Then:
InventQty dateOnHandPhysical (InventDim _inventDim)
{
InventDimParm _inventDimParm;
;
/ / Lower sentence based on previous inventDim construct a _InventDimParm of
_inventDimParm.initFromInventDim (_inventDim);
_inventDimParm = InventDimParm :: orParms (_inventDimParm, InventJournalTable :: journalId2inventDimParm (inventJournalTrans.JournalId));
return InventSumDatePhysicalDim :: onHandQty (inventJournalTrans.TransDate, inventJournalTrans.ItemId, _inventDim, _inventDimParm);
}
This code: InventJournalTable :: journalId2inventDimParm:
static InventDimParm journalId2inventDimParm (InventJournalId inventJournalId)
{
InventDimParm inventDimParm;
;
InventDimFixedClass :: inventDimFixed2InventDimParm (InventJournalTable :: find (inventJournalId). InventDimFixed, inventDimParm);
return inventDimParm;
}
The based of the field InventDimFixed inventJournalTable to construct a inventDimParm.
This field is derived from this:
When you create a new record will pop up:
InventDimFixed is an integer of 0 to 255, on eight dimensions, respectively, corresponding to 8bits in a byte, if the dimension is selected, this bit is:
|
Color |
Size |
Config |
Serial |
Pallet |
Location |
Batch |
warehouse |
|
128 |
64 |
32 |
16 |
8 |
4 |
2 |
1 |
InventJournalTable the call InventDimFixedClass class to initial this field, the core of the code is:
InventDimFixed inventDimFixed ()
{
InventDimFixed inventDimFixed;
;
# InventDimDevelop
if (inventDimParm.inventLocationIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # INVENTLOCATIONID_IDX);
if (inventDimParm.inventBatchIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # BATCH_IDX);
if (inventDimParm.WMSLocationIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # LOCATION_IDX);
if (inventDimParm.WMSPalletIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # PALLET_IDX);
if (inventDimParm.inventSerialIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # SERIALID_IDX);
if (inventDimParm.configIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # CONFIGID_IDX);
if (inventDimParm.inventSizeIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # INVENTSIZEID_IDX);
if (inventDimParm.inventColorIdFlag) inventDimFixed = InventDimFixedClass :: setField (inventDimFixed, # INVENTCOLORID_IDX);
return inventDimFixed;
}
View the class declaration you can see:
public class InventDimFixedClass
{
InventDimParm inventDimParm;
# DEFINE.INVENTLOCATIONID_IDX (0)
# DEFINE.BATCH_IDX ??(1)
# DEFINE.LOCATION_IDX (2)
# DEFINE.PALLET_IDX (3)
# DEFINE.SERIALID_IDX (4)
# DEFINE.CONFIGID_IDX (5)
# DEFINE.INVENTSIZEID_IDX (6)
# DEFINE.INVENTCOLORID_IDX (7)
/ / Indexes 0 .. 15 reserved for the SYS layer
/ / Indexes 16 .. 30 reserved for distributors, vars and customers
# INVENTDIMDEVELOP
}
SetField performed:
static InventDimFixed setField (InventDimFixed inventDimFixed, Integer idx)
{
;
inventDimFixed = InventDimFixed | (1 << idx);
return inventDimFixed;
}
That is, with the 1-bit or a result.
Continue to look at the code:
InventQty dateOnHandPhysical (InventDim _inventDim)
{
InventDimParm _inventDimParm;
;
/ / Lower sentence based on previous inventDim construct a _InventDimParm of
_inventDimParm.initFromInventDim (_inventDim);
_inventDimParm = InventDimParm :: orParms (_inventDimParm, InventJournalTable :: journalId2inventDimParm (inventJournalTrans.JournalId));
return InventSumDatePhysicalDim :: onHandQty (inventJournalTrans.TransDate, inventJournalTrans.ItemId, _inventDim, _inventDimParm);
}
Two inventDimParm by bit or get a inventDimParm of, and then use the Enter dates onHandQty starta dimension materials knot stock:
server static InventQty onHandQty (
TransDate _transDate
ItemId _itemId
InventDim _inventDim
InventDimParm _inventDimParm
)
{
InventSumDatePhysicalDim inventSumDatePhysicalDim = InventSumDatePhysicalDim :: newParameters (_transDate, _itemId, _inventDim, _inventDimParm);
;
the return inventSumDatePhysicalDim.postedQty () +
inventSumDatePhysicalDim.receivedQty () -
inventSumDatePhysicalDim.deductedQty () -
inventSumDatePhysicalDim.pickedQty () +
inventSumDatePhysicalDim.registeredQty ();
}
To construct a class InventSumDatePhysicalDim to calculate balances.
Final first InventSumDatePhysicalDim selectInventTransPicked selectInventTransPostingFinancial selectInventTransPostingPhysical selectInventTransRegistered
These four methods will be combined with the two macro statements to query the transaction records the various date is greater than the selected dates, stock from the InventSum table query to the current node, then the middle of the current date and query date the number of transactions according to the actual access to addition and subtraction, the The Query Date junction stock.
These two macros: # InventDimSelect,
# InventDimExistsJoin:
exists join tableId from% 2
where (% 2.InventDimId == 1) &&
(% 2.ConfigId ==% 3.ConfigId | |!% 4.ConfigIdFlag of) &&
(% 2.InventSizeId ==% 3.InventSizeId | |!% 4.InventSizeIdFlag of) &&
(% 2.InventColorId ==% 3.InventColorId | |!% 4.InventColorIdFlag of) &&
(% 2.InventLocationId ==% 3.InventLocationId | |!% 4.InventLocationIdFlag of) &&
(% 2.InventBatchId ==% 3.InventBatchId | |!% 4.InventBatchIdFlag of) &&
(% 2.WMSLocationId ==% 3.WMSLocationId | |!% 4.WMSLocationIdFlag of) &&
(% 2.WMSPalletId ==% 3.WMSPalletId | |!% 4.WMSPalletIdFlag of) &&
(% 2.InventSerialId ==% 3.InventSerialId | |!% 4.InventSerialIdFlag of)
# InventDimDevelop
This macro realized: If you choose a certain dimension, then it must be with you to your dimensions to match the dimension table in the database to find the corresponding data if you do not choose this dimension, this dimension all match.
Finally, we talk about how to use it:
An example:
If you want to query material B-Pack1 dimensions: Warehouse: GW, SIZE: 5, Color: red 4/22/2008junction stock
Can do:
InventDim inventDim;
InventDimParm _inventDimParm;
Date _date;
ItemId itemId;
;
inventDim.inventColorId = "red";
inventDim.inventSizeId = 5;
inventDim.inventLocationId = "gw";
_inventDimParm.initFromInventDim (_inventDim);
_date = 22/4/2008;
itemId = "b-pack1";
return InventSumDatePhysicalDim :: onHandQty (_date, iItemId, inventDim, _inventDimParm);