home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_2 / REP_GEN / RPTGLOB.BAS < prev    next >
Encoding:
BASIC Source File  |  1991-09-25  |  913 b   |  35 lines
  1. Type RptVars_Type
  2.     name As String * 30
  3.     thinbars As Integer
  4.     thickbars As Integer
  5.     page As Integer
  6.     landscape As Integer
  7.     rows As Integer
  8.     cols As Integer
  9.     numcols As Integer
  10.     textcols As Integer
  11.     currentnumcol As Integer
  12.     currenttextcol As Integer
  13.     pages As Integer
  14.     rowsperpage As Integer
  15.     defrowheight As Integer
  16.     headerheight As Integer
  17. End Type
  18. Global Rpt As RptVars_Type
  19.  
  20. Type RptCol_Type
  21.     datatype As String * 1  ' A = text, 9 = numeric
  22.     fmt As String * 30      ' BASIC standard
  23.     bar As Integer
  24.     ptr As Integer          ' pointer to data column
  25.     ctitle As String * 30
  26.     cwidth As Integer
  27.     calign As Integer   ' 0 = left, 1 = ctr, 2 = right
  28. End Type
  29. Global RptCol() As RptCol_Type
  30. Global RptNumData() As Single
  31. Global RptTextData() As String
  32. Global RptSortTop() As Integer
  33. Global RptSortBottom() As Integer
  34.  
  35.