home *** CD-ROM | disk | FTP | other *** search
/ TestDrive Super Store 2.3 / TESTDRIVE_2.ISO / hdesk / hospital.rpt < prev    next >
Encoding:
Text File  |  1993-01-25  |  2.3 KB  |  217 lines
  1. 'Hospitalization Report
  2. SECTION HEADER
  3. DBFILE HOSPITAL
  4. DBWHERE WHO = #G_Name
  5. DBORDER DATE
  6. PAGEHEADER HOSPITALIZATION - #G_Name
  7. TOP 200
  8. FONT ARIAL
  9. SIZE 24
  10. COLOR BLUE
  11. BOLD
  12. SEPLINE 100
  13. COLOR WHITE
  14. END
  15.  
  16. SECTION LEVEL1
  17.  
  18. DBFIELD HOSPITNAME
  19. LEFT 2000
  20. SIZE 11
  21. LABEL Name of Hospital:
  22. color blue
  23. BOLD
  24. SIZE 11
  25.  
  26. DBFIELD ADDRESS
  27. LEFT 2000
  28. SIZE 11
  29. TOP 300
  30. LABEL Address:
  31. TOP 300
  32. color blue
  33. BOLD
  34. SIZE 11
  35.  
  36. DBFIELD PHONE
  37. LEFT 2000
  38. TOP 600
  39. SIZE 11
  40. LABEL Phone Number:
  41. TOP 600
  42. color blue
  43. BOLD
  44. SIZE 11
  45.  
  46. DBFIELD DRNAME
  47. top 900
  48. LEFT 2000
  49. SIZE 11
  50. LABEL Doctor's Name:
  51. top 900
  52. color blue
  53. BOLD
  54. SIZE 11
  55.  
  56. DBFIELD SYMPNAME
  57. top 1200
  58. LEFT 2000
  59. SIZE 11
  60. label Reason:
  61. top 1200
  62. color blue
  63. BOLD
  64. SIZE 11
  65.  
  66. DBFIELD DIAGNOSIS
  67. TOP 1500
  68. SIZE 11
  69. LEFT 2000
  70. label Diagnosis:
  71. top 1500
  72. color blue
  73. BOLD
  74. SIZE 11
  75.  
  76. DBFIELD TREATMENT
  77. TOP 1800
  78. SIZE 11
  79. LEFT 2000
  80. LABEL Treatment:
  81. COLOR BLUE
  82. BOLD
  83. top 1800
  84. SIZE 11
  85.  
  86. DBFIELD OUTCOME
  87. top 2100
  88. LEFT 2000
  89. SIZE 11
  90. Label Outcome:
  91. COLOR BLUE
  92. BOLD
  93. top 2100
  94. SIZE 11
  95.  
  96. DBFIELD FOLLOWUP
  97. top 2400
  98. SIZE 11
  99. LEFT 2000
  100. label Follow Up Care:
  101. top 2400
  102. COLOR BLUE
  103. BOLD
  104. SIZE 11
  105.  
  106. DBFIELD DATE
  107. TOP 2700
  108. Left 2000
  109. SIZE 11
  110. label Date Admitted:
  111. top 2700
  112. color blue
  113. BOLD
  114. SIZE 11
  115.  
  116. DBFIELD DATEOUT
  117. TOP 3000
  118. Left 2000
  119. SIZE 11
  120. label Date Discharged:
  121. top 3000
  122. color blue
  123. BOLD
  124. SIZE 11
  125.  
  126. FRAME Charges:
  127. top 2700
  128. Left 6000
  129. Width 4000
  130. Height 1000
  131. color blue
  132. SIZE 11
  133. bold
  134.  
  135. DBFIELD INSURPAY
  136. TOP 3000
  137. RIGHT 9720
  138. SIZE 11
  139. LABEL Insurance Payment:
  140. TOP 3000
  141. LEFT 6200
  142. COLOR BLUE
  143. BOLD
  144. SIZE 11
  145.  
  146. DBFIELD POCKETPAY
  147. TOP 3300
  148. RIGHT 9720
  149. SIZE 11
  150. LABEL Out-Of-Pocket:
  151. TOP 3300
  152. LEFT 6200
  153. COLOR BLUE
  154. BOLD
  155. SIZE 11
  156.  
  157. DBFIELD TOTALPAY
  158. TOP 3600
  159. RIGHT 9720
  160. SIZE 11
  161. LABEL Total Charges:
  162. TOP 3600
  163. LEFT 6200
  164. COLOR BLUE
  165. BOLD
  166. SIZE 11
  167.  
  168. SEPLINE 200
  169. COLOR RED
  170. END
  171.  
  172. SECTION TOTALS
  173. TEXT TOTALS
  174. left 0
  175. font ARIAL
  176. color blue
  177. bold
  178. size 18
  179.  
  180. TOTAL INSURPAY
  181. SIZE 11
  182. COLOR GREEN
  183. RIGHT 3780
  184. TOP 100
  185. DBFORMAT ##,###0.00
  186. LABEL Total Paid by Insurer:
  187. size 11
  188. bold
  189. Top 100
  190. color blue
  191.  
  192. TOTAL POCKETPAY
  193. size 11
  194. COLOR RED
  195. RIGHT 3780
  196. DBFORMAT ##,###0.00
  197. TOP 400
  198. LABEL Out-of-Pocket:
  199. size 11
  200. top 400
  201. bold
  202. color blue
  203.  
  204. TOTAL TOTALPAY
  205. SIZE 11
  206. COLOR BLACK
  207. RIGHT 3780
  208. DBFORMAT ##,###0.00
  209. TOP 700
  210. LABEL Total Cost:
  211. size 11
  212. top 700
  213. color blue
  214. bold
  215. END
  216. 
  217.