static void exportVendDateToExcel (Args _args)
{
VendTable _VendTable;
SysExcelApplication _Application;
SysExcelWorkbooks _Workbooks;
SysExcelWorkbook _Workbook;
SysExcelWorksheets _Worksheets;
SysExcelWorksheet _Worksheet;
SysExcelCells _Cells;
SysExcelCell _Cell;
SysExcelFont _Font;
int row;
_Application = SysExcelApplication::construct();
_Workbooks = _Application.workbooks();
_Workbook = _Workbooks.add();
_Worksheets = _Workbook.worksheets();
_Worksheet = _Worksheets.itemFromNum(1);
_Cells = _Worksheet.cells();
_Cells.range('A:A').numberFormat('@');
_Cell = _Cells.item(1, 1);
_Cell.value("Vend Num");
_Font = _Cell.font();
_Font.bold(true);
_Cell = _Cells.item(1, 2);
_Cell.value("Name");
_Font = _Cell.font();
_Font.bold(true);
row = 1;
while select firstOnly10 _VendTable
{
row++;
_Cell = _Cells.item(row, 1);
_Cell.value(_VendTable.AccountNum);
_Cell = _Cells.item(row, 2);
_Cell.value(_VendTable.name());
}
_Application.visible(true);
}
No comments:
Post a Comment