Description
Check if chart has related cube that has data
Parameters
icFRWChartCode | input | character | |
olIsCubeHasData | output | logical | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
unused
program code (program1/bfrwchart.p)
/**************************************************************************/
/* This method will check whether cube has data */
/**************************************************************************/
MainBlock:
do on error undo, throw:
assign olIsCubeHasData = false.
if icFRWChartCode = ? or icFRWChartCode = "":U
then return.
<Q-64 run CubeDimByChartCode (first) (Read) (NoCache)
(input icFRWChartCode, (ChartCode)
input ?, (CompanyId)
output dataset tqCubeDimByChartCode) in BCubeQuery>
find first tqCubeDimByChartCode no-error.
if available tqCubeDimByChartCode
then assign olIsCubeHasData = true.
end. /* do on error undo, throw: */