Skip to main content

Code to get Sales and purchase Quantity and amount date and item wise in MSD Axapta

To  get Sales and purchase Quantity and amount date wise in Axapta you can try following code in Fetch method of customized Report to get the same.

 Query q;  
 QueryRun qr;  
 QueryBuildDatasource qbds;  
 QueryBuildRange qbr;  
 InventTable inventtab;  
 CustInvoiceTrans _custInvoiceTrans;  
 vendInvoiceTrans _vendInvoiceTrans  
 ;  
 q = this.Query();  
 qbds = q.addDataSource(tablenum(InventTable));  
 qr = new QueryRun(q);  
 while(qr.next())  
 {  
 inventtable = qr.get(tableNum(InventTable));  
 select sum(Qty),sum(LineAmount) from _vendInvoiceTrans where _vendInvoiceTrans.ItemId==_ItemId &&_vendInvoiceTrans.InvoiceDate >= fromDate &&_vendInvoiceTrans.InvoiceDate <= ToDate;  
 _PurchQty=_vendInvoiceTrans.Qty;  
 _PurchAmount=_vendInvoiceTrans.LineAmount;  
 select sum(Qty),sum(LineAmount) from _CustInvoiceTrans where _CustInvoiceTrans.ItemId==_ItemId &&_CustInvoiceTrans.InvoiceDate >= fromDate &&_CustInvoiceTrans.InvoiceDate <= ToDate;  
 _SalesQty=_CustInvoiceTrans.Qty;  
 _SalesAmount=_CustInvoiceTrans.LineAmount;  
 }  
If you are getting any error then you need to declare required variables for the same. This code can work in Ax 3,4 and 2009 version but you can get idea for Ax 2012 also to implement the same in any form or modules.


Popular posts from this blog

strScan and Find a first occurrence of a string in a string using x++

strScan (Find a first occurrence of a string in a string) info("int strScan(str _text1,str _text2,int _position,int _number)"); info("Searches a text string for the occurrence of another string."); info("_text1 - The text string to search."); info("_text2 - The string to find."); info("_position - The position at which the search should start."); info("_number - The number of characters that should be searched."); info(int2str(strScan("ABCDEFGHIJ","DE",1,10)));

Get record from table on the basis of field id in Microsoft dynamics axapta x++

How to Get record from table on the basis of field id in dynamics axapta x++. just try following code in job to understand better way. emplTable emplTable; FieldId fieldId; ; fieldId = fieldNum(emplTable, Emplid); select emplTable; info(emplTable.(fieldId)); select emplTable where emplTable.(fieldId) == '1101'; info(emplTable.Name);

Code to get customer Primary Address in Ax 2012

Below Code to get customer Primary Address in Ax 2012. CustTable custTable_P; DirPartyTable dirPartyTable_P; DirPartyLocation dirPartyLocation_P; DirPartyLocationRole dirPartyLocationRole_P; LogisticsLocation logisticsLocation_P; LogisticsLocationRole logisticsLocationRole_P; LogisticsPostalAddress logisticsPostalAddress_P; LogisticsPostalAddress primaryAddress_P; while select custTable_P where custTable_P.AccountNum =='ED_01029' join dirPartyTable_P where dirPartyTable_P.RecId == custTable_P.Party join dirPartyLocation_P where dirPartyLocation_P.Party == custTable_P.Party && dirPartyLocation_P.IsPrimary==NoYes::Yes join dirPartyLocationRole_P where dirPartyLocationRole_P.PartyLocation == dirPartyLocation_P.RecId join logisticsLocationRole_P where logisticsLocationRole_P.RecId == dirPartyLocationRole