Hi,
Please use the following job to export project category data.
static void ProjectCategory(Args _args)
{
CategoryTable categoryTable;
ProjCategory projCategory;
ProjPosting projPosting;
DimensionAttributeValueCombination dimensionComb;
SysExcelApplication excel;
SysExcelWorkbooks workbooks;
SysExcelWorkbook workbook;
SysExcelWorksheets worksheets;
SysExcelWorksheet worksheet;
SysExcelCells cells;
SysExcelCell cell;
int row;
excel = SysExcelApplication::construct();
workbooks = excel.workbooks();
workbook = workbooks.add();
worksheets = workbook.worksheets();
worksheet = worksheets.itemFromNum(1);
cells = worksheet.cells();
cells.range('A:A').numberFormat('@');
excel = SysExcelApplication::construct();
workbooks = excel.workbooks();
workbook = workbooks.add();
worksheets = workbook.worksheets();
worksheet = worksheets.itemFromNum(1);
cells = worksheet.cells();
cells.range('A:A').numberFormat('@');
row++;
cell = cells.item(row, 1);
cell.value("CategoryId");
cell = cells.item(row, 2);
cell.value("CategoryName");
cell = cells.item(row, 3);
cell.value("Category group");
cell = cells.item(row, 4);
cell.value("Cost Account");
while select categoryTable
join projCategory
where categoryTable.CategoryId == projCategory.CategoryId
join projPosting
where projPosting.ProjFundingSource == 0
&& projPosting.ProjAccountType == ProjAccountType::CostAccount
&& projPosting.ProjCode == TableGroupAll::All
&& projPosting.ProjRelation == ""
&& projPosting.CategoryCode == TableGroupAll::Table
&& projPosting.ProjCategoryRelation == categoryTable.CategoryId
join dimensionComb
where dimensionComb.RecId == projPosting.LedgerDimension
{
cell = cells.item(row + 1, 1);
cell.value(categoryTable.CategoryId); // CategoryId
cell = cells.item(row + 1, 2);
cell.value(categoryTable.CategoryName); // CategoryName
cell = cells.item(row + 1, 3);
cell.value(projCategory.CategoryGroupId); // Category group
cell = cells.item(row + 1, 4);
cell.value(dimensionComb.DisplayValue); // Cost Account
row++;
}
excel.visible(true);
}
Thanks,
Chaitanya Golla
