StorageExec Class

Example to receive Raw Material inventory for the StorageExec class:

DimResultasaaMES.Result;

dimrowIDasinteger;

dimDTasaaMES.aaDBDateTime;

dimlotNoasaaMES.aaDBString;

dimtestlotNoasString;

testLotNo=me.lotNo;

lotNo=newaaMES.aaDBString(testlotNo);

me.cmdAddInv=false;

Ifme.SessionID> 0then

me.ResultText="Calling Add inventory.";

'aaMES.EnProd.aaStorageExec.AddInv( sessionId, entName, siteName, itemId, itemGradeDesc, itemStatusDesc, addQty, lotNo, subLotNo, addQtyErp, dateIn, expiryDate, woId, operId, seqNo, fromEntName, fromSiteName, spare1, spare2, spare3, spare4, spare5, spare6, goodsReceived, checkGradeStatus, logTransfer, transferComments, rowId );

Result= aaMES.EnProd.aaStorageExec.AddInv(me.sessionId,me.entityName,"",me.itemId,"GoodGrade","GoodState",me.GoodQty,lotNo,Null,Null,Null,DT,Null,Null,Null,Null,Null,Null,Null,Null,Null,Null,Null,Null,Null,Null,Null,rowId);

IfResult.Successthen

me.ResultText="successfully Added Inventory to entity: "+me.EntityName+". And received RowID: "+rowID;

else

me.resultText="Add Inventory Failed: "+result.Exception.Message;

endif;

else

me.ResultText="No Session for Add Inventory";

endif;

System.Object
   FactMES.API.EnProd.StorageExec

Reference

StorageExec Members
FactMES.API.EnProd Namespace