Module Dfwinrpt.pkg

****************************************************************************// // $File name : DFWINRPT.PKG // $File title : Report_Object for Windows // Notice : Copyright (c) ADB-UTVECKLING AB 1997 // $Author : Janne Wassberg // $System : WinPrint // Created : 96-02-09 @ 16.27.20 // $Last Rev : 96-07-09 @ 12.57.00 // // $Description // // // $Rev History // 12/15/96 JJT - Modifications to adhere to VDF printing framework // Now named WinReport. // 96-02-09 File header created // // ****************************************************************************// ****************************************************************************// // $Module type: CLASS // $Module name: WinReport // $Author : Janne Wassberg // Created : 96-02-09 @ 16.28.13 // // Description This is a sub class of Report_Object written by JT. // // // $Rev History // 97-01-15 JW - Fixed a bug in Starting_Main_Report.A ";" was missing // 96-12-17 JJT - Changed to WinReport for VDF // 96-02-09 Module header created // // ****************************************************************************// Report_DS BasicReport WinReport

Dfwinrpt.pkg (view source)
• import declarations
  • Dfrpt.pkg (view source)
    WinReport RO Class for VDF //JT
  • Df_print.pkg (view source)
    WinPrint object/DLL support.
  • Dfrepky.pkg (view source)
    Key interrupt process (cancel, continue, preview) //JT
• WinReport : BasicReport
  JT
  • Construct_Object()
    Inherited from BasicReport
    • DateToday
    • DateRptToday
    • RptTotal : Array
    • IntegerAutoOutput_State
      JT If true, report is output upon completion. Either preview or printer depending on output_device_mode
    • IntegerPrint_Columns
      JT When a new page is created (DFNew_Page) and the number of columns is not passed, this is used.
    • IntegerAutoNew_Page_State
      JT This determines if a DFNew_Page should be executed when the report starts. In some rare cases, you would not want this to occur until a subheader
    • IntegerPrivate.Output_Device_Mode
      JT Output device (print or preview). Normally this is delegated to the report view.
  • Add_SubTotal(Integer iCounter Number nData)
    *** JT - Note that RptTotal_1-10 and Add_RptTotal an *** clr_rpttotal have been removed. *** JT - All subtotal commands have been modified so that they *** use the outer main report. This makes it easier to keep *** track of these numbers
    • NumbernValue
    • IntegeriObj
  • Clr_SubTotal(Integer iCounter)
  • Clr_AllSubTotals()
  • NumberSum_SubTotal(Integer iTotal)
    • NumbernRetVal
  • NumberSubTotal(Integer iTotal)
    JT Return sub-total and clear accumulator
    • NumbernRetVal
  • DFNew_Page(Integer Cols)
    Note: Cols is optional. If no argument is passed it will use the object's property Print_Columns (0 by default)
    • IntegerPageNumber
    • IntegerColumns
  • Ending_Main_Report()
    Inherited from BasicReport
  • IntegerReport_Interrupt()
    Inherited from BasicReport
    JT This uses a popup object which allows the user to cancel the report continue, or, preview current report (At which point they can still cancel or continue).
    • IntegeriRetVal
    • IntegeriObj
  • Initialize_WinPrint()
    JT Does a Winprint appropriate initialize 1. Clear the DC 2. Zero DF Counters
  • integerStarting_Main_Report()
    Inherited from BasicReport
    JT Augmented to clear subtotals before starting and do a first page
    • IntegerrVal
  • Close_Output_Device()
    Inherited from BasicReport
    JT Cancel RO behavior - there is no device to close
  • Initialize_Output_Device()
    Inherited from BasicReport
    JT Cancel RO Behavior
  • DFPrint()
    JT Ask WinPrint to print the report to printer
  • DFPrintDoc()
    DL on 1997-02-10 17:17:
  • DFPreview()
    JT Ask WinPrint to preview the report
  • DFPrintSetup()
    JT Ask WinPrint to pop up the priner setup dialog
  • IntegerOutput_Device_Mode()
    • IntegerId
    • StringDevMode
  • Set(Integer DevMode)
    Inherited from BasicReport
  • PrintReport()
    JT Print report to appropriate device (printer, preview) based on output_device_mode SF 21/8 97 - Switched order of Else If/Else
    • IntegerMode
  • ShowRuler()
    displays a metric ruler in .5 increments. This can be sent to make it easy to see how fields and labels should be moved for alignment.
    • Integeri
    • Numbern

References (1):

Field References (0):