這里有一個dimension 就DDA。下面是查找DDA的例子。
public void lookupToDDA(FormStringControl _formStringControl)
{
LedgerParameters ledgerParameters;
DimensionAttribute dimAttr;
DimensionAttributeDirCategory dimAttributeDirCategory;
DimensionHierarchy dimher;
DimensionHierarchylevel dimherLevel;
LedgerStructure accountStructure;
Query query = new Query();
QueryBuildDataSource qbds;
SysTableLookup sysTableLookup;
String15 dda;
;
dda = 'C_DDA_'+curext(); // no, should get it real ledger-dimensionhierachy -
dimAttr = DimensionAttribute::findByName(dda);
select firstonly DirCategory from dimAttributeDirCategory where dimAttributeDirCategory.DimensionAttribute == dimAttr.RecId;
sysTableLookup = SysTableLookup::newParameters(tableNum(DimensionFinancialTag), _formStringControl);
sysTableLookup.addLookupfield(fieldNum(DimensionFinancialTag, Value));
sysTableLookup.addLookupfield(fieldNum(DimensionFinancialTag, Description));
qbds = query.addDataSource(tableNum(DimensionFinancialTag));
qbds.addRange(fieldNum(DimensionFinancialTag, FinancialTagCategory)).value(queryValue(dimAttributeDirCategory.DirCategory));
//lookup dda that large than from dda value
qbds.addRange(fieldNum(DimensionFinancialTag, Value)).value(strFmt(">%1", dialogFrDDA.value()));
sysTableLookup.parmQuery(query);
sysTableLookup.performFormLookup();
}
