project BLF > class BGenericReportAdapter > method getTableMetaSchema

Description

Return the description of a table in the report resultset of the report that was last run with method openReport.


Parameters


icComponentNameinputcharacterName of the business component.
icReportNameinputcharacterName of the report.
icTableNameinputcharacterName of the table whose metaschema is requested.
ohTableoutputhandleTable handle, empty table for the requested table name.
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


BLF
method TGenericReportAdapter.CreateSession


program code (program1/bgenericreportadapter.p)

/* Retrieve the correct tDatasetInfo record */
FIND FIRST tDatasetInfo WHERE tDatasetInfo.tcComponentName = icComponentName
                          AND tDatasetInfo.tcReportName = icReportName
                          AND tDatasetInfo.tcTableName = icTableName NO-LOCK NO-ERROR.
IF NOT AVAILABLE tDatasetInfo THEN
DO:
    <M-1 run SetMessage
          (input  #T-3'There was no dataset record found for the specified component, report and table':150(5123)T-3# (icMessage), 
           input  '' (icArguments), 
           input  '' (icFieldName), 
           input  '' (icFieldValue), 
           input  'E' (icType), 
           input  2 (iiSeverity), 
           input  '' (icRowid), 
           input  'BLF-109':U (icFcMsgNumber), 
           input  #T-2'The specified component, report, table combination is not available':100(5122)T-2# (icFcExplanation), 
           input  '' (icFcIdentification), 
           input  '' (icFcContext), 
           output oiReturnStatus (oiReturnStatus)) in BGenericReportAdapter>
        
    oiReturnStatus = -1.
    RETURN.
END.

/* Prepare the output table */                         
CREATE TEMP-TABLE ohTable in widget-pool "non-persistent".
ohTable:CLEAR().
ohTable:CREATE-LIKE(tDatasetInfo.thDatasetRef:GET-BUFFER-HANDLE(icTableName):TABLE-HANDLE).
ohTable:TEMP-TABLE-PREPARE(icTableName).