Import data from Excel file to AX using X++ in AX 2012

Excel 파일을 Import 받아 AX에 구성되어 있는 Standard or Developed Table에 값을 집어 넣는 로직입니다. Delphi나 VB, Powerbuilder 개발을 해 보셨던 분들에겐 익숙한 코딩일 듯 싶습니다.

 

static void ReqAmount(Args _args)
{
    SysExcelApplication application;
    SysExcelWorkbooks workbooks;
    SysExcelWorkbook workbook;
    SysExcelWorksheets worksheets;
    SysExcelWorksheet worksheet;
    SysExcelCells cells;
    COMVariantType type;
    Name name;
    FileName filename;
    ReqAmount reqAmount;
    int row;
    str _reqOrderNo;
    int _reqAmount;
    ;
 
    application = SysExcelApplication::construct();
    workbooks = application.workbooks();
    filename = "D:\\ReqAmount.xlsx";
   
    try
    {
        workbooks.open(filename);
    }
    catch (Exception::Error)
    {
        throw error("File cannot be opened.");
    }
 
    workbook = workbooks.item(1);
    worksheets = workbook.worksheets();
    worksheet = worksheets.itemFromNum(1); //첫번째 Sheet
    cells = worksheet.cells();
    do
    {
        row++;
        _reqOrderNo = any2str(cells.item(row, 1).value().toString());
        _reqAmount = cells.item(row, 2).value().int();

        reqAmount.ReqOrderNo = _reqOrderNo;
        reqAmount.ReqAmount = _reqAmount;
        reqAmount.insert();

        type = cells.item(row+1, 1).value().variantType();
    } while (type != COMVariantType::VT_EMPTY);
   
    application.quit();
}