Menulis ke file word dengan menggunakan makro File pada Ax

Ini contoh codingnya :

static void writeWord(Args _args)
{
#File
AsciiIO fileOut;
container _fileFilter = ["Document Files","*.doc"];
str fileName;
CustTable custTable;
int i;
;
fileName = WinAPI::getSaveFileName(0,_fileFilter,” “,”Specify Save File Name”, “”, “”);
fileOut = new AsciiIO(fileName,#io_write);

fileOut.write(“No \tCust Account \tStatus Customer \tBlocked”);
while select custTable
{
if(i < 20)
{
i++;
fileOut.write(strfmt(‘%1 \t%2 \t%3 \t%4′,i,custTable.AccountNum,custTable.DI_StatusCustomer,custTable.Blocked));
}
}
WinAPI::shellExecute(fileName);
}

Lagi cape tulis jadi dipahami sendiri aja ya …