Skip to main content

select All Records Dynamically in axapta

This is sample code to select All Records Dynamically in axapta

 static void selectAllRecordsRuntimeArgs _args)  
 {  
 firstTable firstTable;  
 DictField dictField;  
 DictTable dictTable;  
 int field;  
 int fieldId;  
 int records;  
 str header, line;  
 ;  
 // Create a new object of type DictTable based on the firstTable  
 dictTable = new DictTable(tablenum(firstTable));  
 // Loop through the fields on the table.  
 // For each field, store the field-label in the header variable.  
 for (field=1; field <= dictTable.fieldCnt(); field++)  
 { fieldId = dictTable.fieldCnt2Id(field);  
  dictField = new DictField(tablenum(firstTable), fieldId);  
 header += strfmt("%1, ", dictField.label()); }  
 info(strupr(header)); // strupr changes the string to UPPERCASE // Loop through all the records in the firstTable while select firstTable  
 { line = "";  
  // For each record in the firstTable, loop through all the //fields // and store the value of the field for this record in the //line variable.  
  for (field=1; field <= dictTable.fieldCnt(); field++)  
 { fieldId = dictTable.fieldCnt2Id(field); dictField = new DictField(firstTable.TableId, fieldId);  
  // Instead of referencing to the fieldname, I reference to  
 //field ID // to get the fields value.  
 line += strfmt("%1, ", firstTable.(fieldId));  
  } info(line);  
 records++;  
 }  
 info(strfmt("%1 records were selected", records));  
 }   

Popular posts from this blog

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...

Code to get Invoice settlement data for customer in ax 2012

This is simple Code to get Invoice settlement amount data for customer payment in ax 2012. This data is after posting of data. select sum(SettleAmountCur) from custSettlement where custSettlement.TransRecId == custtrans.RecId If you want get settlement amount before posting than you can refer spectrans table.The table SpecTrans contains all the transactions marked for settlement for payment journal. while select spectrans join custtransopen join custtrans where spectrans.SpecCompany == ledgerjournaltrans.DataAreaId && spectrans.SpecTableId == ledgerjournaltrans.TableId && spectrans.SpecRecId == ledgerjournaltrans.RecId && spectrans.RefCompany == custtranssopen.DataAreaId && spectrans.RefTableId == custtranssopen.TableId && spectrans.RefRecId == custtranssopen.RecId && custtransopen.RefRecId == custtrans.RecId && custtransopen.AccountNum == custtrans.AccountNum { info...

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)));