Membaca File Excel pada Dynamics Ax 2009

Pada postingan yang lalu, sebelumnya telah dibahas bagaimana caranya untuk membaca file Excel dengan menggunakan Java.Postingan kali ini menggunakan Ax 2009.
Ax 2009 telah menyediakan kelas-kelas yang bisa digunakan untuk membaca file Excel sama halnya seperti pada Java. Kelas-kelas itu antara lain : SysExcelApplication(untuk mendefinisikan file Excel yang akan dibaca),SysExcelWorksheets(untuk worksheet) dan SysExcelCells(untuk kolom dalam worksheet). Berikut adalah contoh sourcenya.

void clicked()
{
    //modif by Vyor
    sysExcelApplication     app;
    sysExcelWorksheets      workSheet1;
    sysExcelWorksheet       workSheet2;
    sysExcelCells           cells;    
    str                     workbookName;
    str                     worksheetName;
    str                     cellvalue;
    int                     i,j;

    //Get Excel filename
    app             = SysExcelApplication::construct();
    workbookname    = app.getOpenFileName();
    app.workbooks().open(workbookname);
    workSheet1      = app.worksheets();
    worksheetName   = strfmt('%1', "NamaWorkSheet");
    workSheet2      = workSheet1.itemFromName(worksheetname);

    if(!workSheet2)
    {
        warning(strfmt('Worksheet %1 tidak ada di file Excel',worksheetName));
    }
    else
    {
        cells       = workSheet2.cells();
        i = 2;

        cellValue = cells.item(i,1).value().toString();
        while (cellValue != "VT_EMPTY")
        {            
            
            if(cellValue)
            {
                info(strfmt('%1',cells.item(i,3).value().double()));
            }
            
            i++;
            cellValue = cells.item(i,1).value().toString();
        }
        info('Proses Baca Selesai');
    }
    app.quit();
    
}

Semoga Membantu !