project QadFinancials > class BFRWChart > method CheckEntityUsedInCube
Description
Check if entity is used in cube
Parameters
iiChartID | input | integer | |
iiCompanyId | input | integer | |
olIsUsedInCube | output | logical | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
unused
program code (program1/bfrwchart.p)
/* ====================================================================================== *
* Method : CheckEntityUsedInCube *
* Description : Check if entity is used in cube *
* ====================================================================================== */
MAIN_BLOCK:
do on error undo, throw:
assign olIsUsedInCube = no.
<Q-91 run FRWCubeCyByChartAndCompany (first) (Read) (NoCache)
(input iiChartID, (ChartID)
input iiCompanyId, (CompanyId)
output dataset tqFRWCubeCyByChartAndCompany) in BFRWCube>
find first tqFRWCubeCyByChartAndCompany no-error.
if available tqFRWCubeCyByChartAndCompany then assign olIsUsedInCube = yes.
end. /* MAIN_BLOCK */