Module cBasicReport.pkg

************************************************************************ $File name : cBasicReport.pkg $File title : cBasicReport support for VDF Notice : $Author(s) : John Tuohy Confidential Trade Secret. Copyright 1987-1999 Data Access Corporation, Miami FL, USA All Rights reserved DataFlex is a registered trademark of Data Access Corporation. $Rev History MG 10/2/98 Changed error_report with additional parameter JT 9/22/97 Added status_params property and support. printer modes moved to their own file JT 7/22/97 Added Status log support (similar to BatchDD). Modified error handling(added display_error_state and onError) JT 6/09/97 Added Allow_Cancel_State for status panel JT ??/??/?? File created for VDF 4.0 ************************************************************************ Creates Character Mode RO class for windows: BasicReport

cBasicReport.pkg (view source)
• import declarations
  • Windows.pkg (view source)
  • cReportDS.pkg (view source)
  • Msgbox.pkg (view source)
  • PtrModes.pkg (view source)
    Define Print_to_xxxx modes
• IntegerSystem_default_pageend
• IntegerSystem_default_pagefeed
• cBasicReport : cReportDS
  • Construct_Object()
    Inherited from cReportDS
    • StringPrivate.Output_Device
    • IntegerStatus_Panel_State
      set this false if you do not want a status panel popping up
    • IntegerAllow_Cancel_State
    • StringStatus_params
    • StringReport_Caption
    • StringReport_Title
    • StringReport_Message
    • IntegerReport_Status_Panel
    • IntegerReport_View_Id
    • IntegerDisplay_Error_State
      Error related properties if set true, errors will be forwarded to the normal VDF error handler causing an error message to popup. We will leave this true for backwards compatibility.
    • IntegerOld_Error_Object_Id
    • integerError_Processing_State
      internal use
    • IntegerError_Check_State
      internal
    • IntegerStatus_Log_State
      Logging
    • IntegerStatus_Log_Id
      If you are going to log information you must create a status log object and set this property to its ID. See Statlog.pkg for more information.
  • StringOutput_Device_Name()
    • IntegerId
    • StringDevName
  • StringOutput_Device()
    • StringDevName
  • Set(string Devname)
    Inherited from cReport
  • Update_Status(string Val)
    • IntegerStatPnl
  • Start_Status()
    • IntegerStatPnl
  • Resume_Status()
    • IntegerStatPnl
  • End_Status()
    • IntegerStatPnl
  • Start_Log()
    ------------------------------------------------------------------------ Status Logging related Messages Send Start_log Send End_Log Send Error_Log_Status Error_Info Error_Mess Send Log_Status StatusString ------------------------------------------------------------------------
  • End_Log()
  • Error_Log_Status(integer ErrNum integer Err_Line string ErrMsg)
  • Log_Status(String Mess)
    • IntegerStatId
  • Initialize_Output_Device()
  • Close_Output_Device()
  • IntegerOnStartingMainReport()
    Inherited from cReport
    • IntegerRetVal
  • Update_Status_Page()
  • OnEndingMainReport()
    Inherited from cReport
    close down the report
  • IntegerReport_Interrupt()
    • IntegerrVal
    • StringMess
  • IntegerTest_KeyPressed()
    Inherited from cReport
    check for report interrupt handler Return True to stop report, false to continue
    • IntegerStatPnl
    • IntegerStopIt
  • Calling_All_Reports(Integer Obj Integer Msg)
    • IntegerCur_Obj
  • Initialize_All_Reports(Integer Obj Integer Msg)
  • Error_Report(integer ErrNum integer Err_Line string ErrMsg)
    All errors are directed to the main report. By Default we shut off the status panel, report the error and notify the interrupt mechanism to ask if the report should be canceled. VERY IMPORTANT! If you augment this and you plan on doing ANY windows IO you should first shut of the status panel.
    • Integerid
  • OnError(integer ErrNum integer Err_Line string ErrMsg)
    Event called by Error_Report. For augmentation. If you are planning on doing any interactive IO and you are using the status panel you must first remove the panel (send End_Status).

References (1):

Field References (0):