SysExcelApplication ExcelApplication;
SysExcelWorkBooks ExcelWorkBooks;
SysExcelWorkBook ExcelWorkBook;
SysExcelWorkSheets ExcelWorkSheets;
SysExcelWorkSheet ExcelWorkSheet;
SysExcelRange ExcelRange;
CustTable custTable;
int row=1;
ExcelApplication = SysExcelApplication ::construct( );
ExcelApplication. visible(true) ;
ExcelWorkBooks = ExcelApplication. workbooks( );
ExcelWorkBook = ExcelWorkBooks. add();
ExcelWorkSheets = ExcelWorkBook. worksheets( );
ExcelWorkSheet = ExcelWorkSheets. itemFromNum( 1);
ExcelWorkSheet. cells().item( row,1).value( 'Account num');
ExcelWorkSheet. cells().item( row,2).value( 'Name');
row++;
while select custTable where custtable.AccountNum like 'c-000*'
{
ExcelWorkSheet. cells().item( row,1).value( custTable. AccountNum) ;
ExcelWorkSheet. cells().item( row,2).value( custTable. Name);
row++;
}
ExcelApplication. finalize( );
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...