Hello Guys,
In this post i'm showing how to export data into excel.
In this example i'm exporting all number sequence list in current legal entity .
Example : vend id,custid,paymentjournalnum
Step1 :Copy and Paste the below code in AOT-> Job
Step2: Run the Job
step3: Go to "C" drive and then find the excel sheet Named as "Numseqlist"
static void Numberseq_List(Args _args)
{
SysExcelApplication xlsApplication;
SysExcelWorkBooks xlsWorkBookCollection;
SysExcelWorkBook xlsWorkBook;
SysExcelWorkSheets xlsWorkSheetCollection;
SysExcelWorkSheet xlsWorkSheet;
SysExcelRange xlsRange;
NumberSequenceReference NumberSequenceReference;
NumberSequenceTable NumberSequenceTable;
NumberSequenceDatatype NumberSequenceDatatype;
int row = 1;
str fileName;
CompanyInfo companyInfo;
;
//Filename
fileName = "C:\\Numseqlist.xlsx";
//Initialize Excel instance
xlsApplication = SysExcelApplication::construct();
//Open Excel document
//xlsApplication.visible(true);
//Create Excel WorkBook and WorkSheet
xlsWorkBookCollection = xlsApplication.workbooks();
xlsWorkBook = xlsWorkBookCollection.add();
xlsWorkSheetCollection = xlsWorkBook.worksheets();
xlsWorkSheet = xlsWorkSheetCollection.itemFromNum(1);
//Excel columns captions
xlsWorkSheet.cells().item(row,1).value("NumberSeqId");
xlsWorkSheet.cells().item(row,2).value("Format");
xlsWorkSheet.cells().item(row,3).value("Name");
row++;
//Fill Excel with NumberseqId,Format,Name fields (only 10000 records)
companyInfo.RecId = CompanyInfo::findDataArea(curext(),false).RecId;
while select NumberSequenceReference where NumberSequenceReference.numbersequencescope == companyInfo.RecId
{
select numbersequence from NumberSequenceTable where NumberSequenceTable.recid == NumberSequenceReference .numbersequenceId;
select firstonly1 NumberSequenceDatatype where NumberSequenceDatatype.RecId == NumberSequenceReference.NumberSequenceDatatype;
if(row == 10000)
break;
xlsWorkSheet.cells().item(row,1).value(NumberSequenceTable.NumberSequence);
xlsWorkSheet.cells().item(row,2).value(NumberSequenceTable.Format);
xlsWorkSheet.cells().item(row,3).value(NumberSequenceDatatype.referenceLabelForDisplay());
row++;
}
//Check whether the document already exists
if(WinApi::fileExists(fileName))
WinApi::deleteFile(fileName);
//Save Excel document
xlsWorkbook.saveAs(fileName);
//Open Excel document
xlsApplication.visible(true);
//Close Excel
//xlsApplication.quit();
//xlsApplication.finalize();
}
@Rahul Talasila