home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 March / CHIP0303.ISO / exe / quick.exe / data1.cab / Formular_Testversion / kap1.for < prev    next >
Encoding:
Text File  |  2002-11-27  |  10.6 KB  |  267 lines

  1.  
  2.  
  3. @STANDARDSCHRIFT "Arial" "Standard" "10"
  4. @RAND O50 L100 R50 U70
  5. @ABSOFFSET Y13 X168
  6. @METAFILE "kap1.wmf" O0 L0 R191 U291
  7. @IF ( @<EC21.VART>=3 & @ZUORDNUNG = 2 ) @ZA
  8. @BEREICH 1,-201,-201,-202,-202,"Angaben bearbeiten",0x33b1006
  9. @BEREICH 3,-205,-205,-206,-206,"Angaben bearbeiten",0x33b1006
  10. @BEREICH 4,-207,-207,-208,-208,"Angaben bearbeiten",0x33b1008
  11. @BEREICH 6,-211,-211,-212,-212,"Angaben bearbeiten",0x33b1008
  12. @BEREICH 7,-213,-213,-214,-214,"Angaben bearbeiten",0x33b100a
  13. @BEREICH 9,-217,-217,-218,-218,"Angaben bearbeiten",0x33b100a
  14. @BEREICH 10,-219,-219,-220,-220,"Angaben bearbeiten",0x33b1010
  15. @BEREICH 12,-223,-223,-224,-224,"Angaben bearbeiten",0x33b1010
  16. @BEREICH 13,-225,-225,-226,-226,"Angaben bearbeiten",0x33b1013
  17. @BEREICH 15,-229,-229,-230,-230,"Angaben bearbeiten",0x33b1013
  18. @BEREICH 16,-231,-231,-232,-232,"Angaben bearbeiten",0x33b1012
  19. @BEREICH 18,-235,-235,-236,-236,"Angaben bearbeiten",0x33b1012
  20. @BEREICH 19,-237,-237,-238,-238,"Angaben bearbeiten",0x33b1016
  21. @BEREICH 21,-241,-241,-242,-242,"Angaben bearbeiten",0x33b1016
  22. @BEREICH 22,-243,-243,-244,-244,"Angaben bearbeiten",0x33b1018
  23. @BEREICH 24,-247,-247,-248,-248,"Angaben bearbeiten",0x33b1018
  24. @BEREICH 25,-249,-249,-250,-250,"Angaben bearbeiten",0x33b101a
  25. @BEREICH 27,-253,-253,-254,-254,"Angaben bearbeiten",0x33b101a
  26. @BEREICH 28,-255,-255,-256,-256,"Angaben bearbeiten",0x33b101e
  27. @BEREICH 30,-259,-259,-260,-260,"Angaben bearbeiten",0x33b100e
  28. @BEREICH 32,-263,-263,-264,-264,"Angaben bearbeiten",0x33b100e
  29. @BEREICH 33,-265,-265,-266,-266,"Angaben bearbeiten",0x33b102b
  30. @BEREICH 35,-269,-269,-270,-270,"Angaben bearbeiten",0x33b102b
  31. @BEREICH 36,-271,-271,-272,-272,"Angaben bearbeiten",0x33b1028
  32. @BEREICH 37,-273,-273,-274,-274,"Angaben bearbeiten",0x33b100b
  33. @BEREICH 39,-277,-277,-278,-278,"Angaben bearbeiten",0x33b100b
  34. @BEREICH 40,-279,-279,-280,-280,"Angaben bearbeiten",0x33b102d
  35. @BEREICH 42,-283,-283,-284,-284,"Angaben bearbeiten",0x33b102d
  36. @BEREICH 43,-285,-285,-286,-286,"Angaben bearbeiten",0x33b1025
  37. @BEREICH 45,-289,-289,-290,-290,"Angaben bearbeiten",0x33b1025
  38. @ELSE @ZA
  39. @IF (@<EC21.VART>=2) @ZA
  40. @BEREICH 2,-203,-203,-204,-204,"Angaben bearbeiten",0x33b1006
  41. @BEREICH 5,-209,-209,-210,-210,"Angaben bearbeiten",0x33b1008
  42. @BEREICH 8,-215,-215,-216,-216,"Angaben bearbeiten",0x33b100a
  43. @BEREICH 11,-221,-221,-222,-222,"Angaben bearbeiten",0x33b1010
  44. @BEREICH 14,-227,-227,-228,-228,"Angaben bearbeiten",0x33b1013
  45. @BEREICH 17,-233,-233,-234,-234,"Angaben bearbeiten",0x33b1012
  46. @BEREICH 20,-239,-239,-240,-240,"Angaben bearbeiten",0x33b1016
  47. @BEREICH 23,-245,-245,-246,-246,"Angaben bearbeiten",0x33b1018
  48. @BEREICH 26,-251,-251,-252,-252,"Angaben bearbeiten",0x33b101a
  49. @BEREICH 29,-257,-257,-258,-258,"Angaben bearbeiten",0x33b101e
  50. @BEREICH 31,-261,-261,-262,-262,"Angaben bearbeiten",0x33b100e
  51. @BEREICH 34,-267,-267,-268,-268,"Angaben bearbeiten",0x33b102b
  52. @BEREICH 38,-275,-275,-276,-276,"Angaben bearbeiten",0x33b100b
  53. @BEREICH 41,-281,-281,-282,-282,"Angaben bearbeiten",0x33b102d
  54. @BEREICH 44,-287,-287,-288,-288,"Angaben bearbeiten",0x33b1025
  55. @ENDIF @ZA
  56. @BEREICH 1,-201,-201,-202,-202,"Angaben bearbeiten",0x33a1008
  57. @BEREICH 3,-205,-205,-206,-206,"Angaben bearbeiten",0x33a1008
  58. @BEREICH 4,-207,-207,-208,-208,"Angaben bearbeiten",0x33a100a
  59. @BEREICH 6,-211,-211,-212,-212,"Angaben bearbeiten",0x33a100a
  60. @BEREICH 7,-213,-213,-214,-214,"Angaben bearbeiten",0x33a100c
  61. @BEREICH 9,-217,-217,-218,-218,"Angaben bearbeiten",0x33a100c
  62. @BEREICH 10,-219,-219,-220,-220,"Angaben bearbeiten",0x33a1012
  63. @BEREICH 12,-223,-223,-224,-224,"Angaben bearbeiten",0x33a1012
  64. @BEREICH 13,-225,-225,-226,-226,"Angaben bearbeiten",0x33a1013
  65. @BEREICH 15,-229,-229,-230,-230,"Angaben bearbeiten",0x33a1013
  66. @BEREICH 16,-231,-231,-232,-232,"Angaben bearbeiten",0x33a1014
  67. @BEREICH 18,-235,-235,-236,-236,"Angaben bearbeiten",0x33a1014
  68. @BEREICH 19,-237,-237,-238,-238,"Angaben bearbeiten",0x33a1018
  69. @BEREICH 21,-241,-241,-242,-242,"Angaben bearbeiten",0x33a1018
  70. @BEREICH 22,-243,-243,-244,-244,"Angaben bearbeiten",0x33a101a
  71. @BEREICH 24,-247,-247,-248,-248,"Angaben bearbeiten",0x33a101a
  72. @BEREICH 25,-249,-249,-250,-250,"Angaben bearbeiten",0x33a101c
  73. @BEREICH 27,-253,-253,-254,-254,"Angaben bearbeiten",0x33a101c
  74. @BEREICH 28,-255,-255,-256,-256,"Angaben bearbeiten",0x33a1020
  75. @BEREICH 30,-259,-259,-260,-260,"Angaben bearbeiten",0x33a1010
  76. @BEREICH 32,-263,-263,-264,-264,"Angaben bearbeiten",0x33a1010
  77. @BEREICH 33,-265,-265,-266,-266,"Angaben bearbeiten",0x33a102b
  78. @BEREICH 35,-269,-269,-270,-270,"Angaben bearbeiten",0x33a102b
  79. @BEREICH 36,-271,-271,-272,-272,"Angaben bearbeiten",0x33a102a
  80. @BEREICH 37,-273,-273,-274,-274,"Angaben bearbeiten",0x33a1005
  81. @BEREICH 39,-277,-277,-278,-278,"Angaben bearbeiten",0x33a1005
  82. @BEREICH 40,-279,-279,-280,-280,"Angaben bearbeiten",0x33a102d
  83. @BEREICH 42,-283,-283,-284,-284,"Angaben bearbeiten",0x33a102d
  84. @BEREICH 43,-285,-285,-286,-286,"Angaben bearbeiten",0x33a1025
  85. @BEREICH 45,-289,-289,-290,-290,"Angaben bearbeiten",0x33a1025
  86. @ENDIF @ZA
  87. @OHNENULL
  88. @Schrift "Arial" "Fett" "10"
  89. @IF (@<EC13.NAMEGEMEIN>) @ZA
  90. @BEREICH 101,-301,-301,-302,-302,@<EC13.NAMEGEMEIN>,0, +C -s
  91. @ELSE @ZA
  92. @POSVAR @<EC21.NAMEA>", "@<EC21.VORNAMEA> L U M40 X-1 Y-1
  93. @IF (@<EC21.VART>=2) @ZA
  94. @POSVAR @<EC21.NAMEB>", "@<EC21.VORNAMEB> L U M40 X-2 Y-2
  95. @ENDIF  @ZA
  96. @ENDIF @ZA
  97. @IF (@<EC13.STNR_GUE>) @ZA
  98. @POSVAR @<EC13.STNR_GUE> L U X-3 Y-3
  99. @ELSE @ZA
  100. @POSVAR @<EC21.STNR> L U X-3 Y-3
  101. @ENDIF @ZA
  102. @Schrift "Arial" "Standard" "10"
  103. @IF (@<EC13.NAMEGEMEIN>) @ZA
  104. @POSTEXT "X" L U X-6 Y-6
  105. @ELSE @ZA
  106. @POSTEXT "X" L U X-4 Y-4
  107. @ENDIF @ZA
  108. @IF (@<EC21.ANLAGEKSO1>) @ZA
  109. @IF (@<EC21.RE5SPARA>) @ZA
  110. @POSVAR @<EC21.ZINSGUTA> R U X-7 Y-7
  111. @POSVAR @<EC21.ZINSBAUA> R U X-11 Y-11
  112. @POSVAR @<EC21.ZINSFWPA> R U X-15 Y-15
  113. @ENDIF  @ZA
  114. @IF (@<EC21.RE5TAFA>) @ZA
  115. @POSVAR @<EC21.ZINSTAFA> R U X-19 Y-19
  116. @POSVAR @<EC21.ZINSINVZA> R U X-22 Y-22
  117. @POSVAR @<EC21.ZINSSOFOA> R U X-26 Y-26
  118. @ENDIF  @ZA
  119. @IF (@<EC21.RE5SONSTA>) @ZA
  120. @POSVAR @<EC21.ZINSWAGA> R U X-30 Y-30
  121. @POSVAR @<EC21.ZINSLEBA> R U X-34 Y-34
  122. @POSVAR @<EC21.ZINSSTILLA> R U X-38 Y-38
  123. @POSVAR @<EC21.ZINSFAA> R U X-42 Y-42
  124. @POSVAR @<EC21.ZINSKAPFA> R U X-44 Y-44
  125. @ENDIF  @ZA
  126. @IF (@<EC21.VART>=2) @ZA
  127. @IF (@<EC21.EINKUNFTB>) @ZA
  128. @IF (@<EC21.RE5SPARB>) @ZA
  129. @POSVAR @<EC21.ZINSGUTB> R U X-8 Y-8
  130. @POSVAR @<EC21.ZINSBAUB> R U X-12 Y-12
  131. @POSVAR @<EC21.ZINSFWPB> R U X-16 Y-16
  132. @ENDIF  @ZA
  133. @IF (@<EC21.RE5TAFB>) @ZA
  134. @POSVAR @<EC21.ZINSTAFB> R U X-20 Y-20
  135. @POSVAR @<EC21.ZINSINVZB> R U X-23 Y-23
  136. @POSVAR @<EC21.ZINSSOFOB> R U X-27 Y-27
  137. @ENDIF  @ZA
  138. @IF (@<EC21.RE5SONSTB>) @ZA
  139. @POSVAR @<EC21.ZINSWAGB> R U X-31 Y-31
  140. @POSVAR @<EC21.ZINSLEBB> R U X-35 Y-35
  141. @POSVAR @<EC21.ZINSSTILLB> R U X-39 Y-39
  142. @POSVAR @<EC21.ZINSFAB> R U X-43 Y-43
  143. @POSVAR @<EC21.ZINSKAPFB> R U X-45 Y-45
  144. @ENDIF  @ZA
  145. @POSVAR @<EC21.RE5BDRUCK> R U X-47 Y-47
  146. @ENDIF  @ZA
  147. @ENDIF @ZA
  148. @POSVAR @<EC21.ZINSGUT_F,k> R U X-9 Y-9
  149. @POSVAR @<EC21.ZINSGUT_Z> R U X-10 Y-10
  150. @POSVAR @<EC21.ZINSBAU_F,k> R U X-13 Y-13
  151. @POSVAR @<EC21.ZINSBAU_Z,g> R U X-14 Y-14
  152. @POSVAR @<EC21.ZINSFWP_F,k> R U X-17 Y-17
  153. @POSVAR @<EC21.ZINSFWP_Z> R U X-18 Y-18
  154. @POSVAR @<EC21.ZINSTAF_Z> R U X-21 Y-21
  155. @POSVAR @<EC21.ZINSINVZ_F,k> R U X-24 Y-24
  156. @POSVAR @<EC21.ZINSINVZ_Z> R U X-25 Y-25
  157. @POSVAR @<EC21.ZINSSOFO_F,k> R U X-28 Y-28
  158. @POSVAR @<EC21.ZINSSOFO_Z> R U X-29 Y-29
  159. @POSVAR @<EC21.ZINSWAG_F,k> R U X-32 Y-32
  160. @POSVAR @<EC21.ZINSWAG_Z> R U X-33 Y-33
  161. @POSVAR @<EC21.ZINSLEB_F,k> R U X-36 Y-36
  162. @POSVAR @<EC21.ZINSLEB_Z> R U X-37 Y-37
  163. @POSVAR @<EC21.ZINSSTILL_F,k> R U X-40 Y-40
  164. @POSVAR @<EC21.ZINSSTILL_Z> R U X-41 Y-41
  165. @POSVAR @<EC21.RE5ADRUCKA> R U X-46 Y-46
  166. @POSVAR @<EC21.ZINSKZI> R U X-48 Y-48
  167. @POSVAR @<EC21.ZINSABSCHLAG> R U X-49 Y-49
  168.  
  169. @IF (@<EC21.RE5AKTIEA>) @ZA
  170. @IF (@<EC21.RE5AKTAVA>) @ZA
  171. @POSVAR @<EC21.ZINSAAA> R U X-50 Y-50
  172. @ENDIF @ZA
  173. @ENDIF @ZA
  174. @IF (@<EC21.VART>=2) @ZA                    
  175. @IF (@<EC21.RE5AKTIEB>) @ZA
  176. @IF (@<EC21.RE5AKTAVB>) @ZA
  177. @POSVAR @<EC21.ZINSAAB> R U X-51 Y-51
  178. @ENDIF @ZA
  179. @ENDIF @ZA
  180. @ENDIF @ZA
  181. @IF ((@<EC21.RE5AKTIEA> & @<EC21.RE5AKTAVA>) | (@<EC21.RE5AKTIEB> & @<EC21.RE5AKTAVB>)) @ZA
  182. @POSVAR @<EC21.ZINSAA_F,k> R U X-52 Y-52
  183. @POSVAR @<EC21.ZINSAA_Z,g> R U X-53 Y-53
  184. @POSVAR @<EC21.ZINSAA_K> R U X-54 Y-54
  185. @ENDIF @ZA
  186. @IF (@<EC21.RE5INVESTA>) @ZA
  187. @IF (@<EC21.RE5INVAVA>) @ZA
  188. @POSVAR @<EC21.ZINSINVAVA> R U X-55 Y-55
  189. @ENDIF @ZA
  190. @ENDIF @ZA
  191. @IF (@<EC21.VART>=2) @ZA                     
  192. @IF (@<EC21.RE5INVESTB>) @ZA
  193. @IF (@<EC21.RE5INVAVB>) @ZA
  194. @POSVAR @<EC21.ZINSINVAVB> R U X-56 Y-56
  195. @ENDIF @ZA
  196. @ENDIF @ZA
  197. @ENDIF @ZA
  198. @IF ((@<EC21.RE5INVESTA> & @<EC21.RE5INVAVA>) | (@<EC21.RE5INVESTB> & @<EC21.RE5INVAVB>)) @ZA
  199. @POSVAR @<EC21.ZINSINVAV_F,k> R U X-57 Y-57
  200. @POSVAR @<EC21.ZINSINVAV_Z,g> R U X-58 Y-58
  201. @POSVAR @<EC21.ZINSINVAV_K,g> R U X-59 Y-59
  202. @ENDIF @ZA
  203. @IF (@<EC21.RE5AKTIEA>) @ZA
  204. @IF (@<EC21.RE5AKTHEVA>) @ZA
  205. @POSVAR @<EC21.ZINSHALBA> R U X-65 Y-65
  206. @ENDIF @ZA
  207. @ENDIF @ZA
  208. @IF (@<EC21.RE5AKTIEB>) @ZA
  209. @IF (@<EC21.RE5AKTHEVB>) @ZA
  210. @IF (@<EC21.VART>=2) @ZA                     
  211. @POSVAR @<EC21.ZINSHALBB> R U X-66 Y-66
  212. @ENDIF @ZA
  213. @ENDIF @ZA
  214. @ENDIF @ZA
  215. @IF ((@<EC21.RE5AKTIEA> & @<EC21.RE5AKTHEVA>) | (@<EC21.RE5AKTIEB> & @<EC21.RE5AKTHEVB>)) @ZA
  216. @POSVAR @<EC21.ZINSHALBFREI_F,k> R U X-67 Y-67
  217. @POSVAR @<EC21.ZINSHALBKAPEST_Z> R U X-68 Y-68
  218. @ENDIF @ZA
  219. @IF (@<EC21.RE5INVESTA>) @ZA
  220. @IF (@<EC21.RE5HALBEINKA>) @ZA
  221. @POSVAR @<EC21.ZINSINVHEVA> R U X-69 Y-69
  222. @ENDIF @ZA
  223. @ENDIF @ZA
  224. @IF (@<EC21.RE5INVESTB>) @ZA
  225. @IF (@<EC21.RE5HALBEINKB>) @ZA
  226. @IF (@<EC21.VART>=2) @ZA                     
  227. @POSVAR @<EC21.ZINSINVHEVB> R U X-70 Y-70
  228. @ENDIF @ZA
  229. @ENDIF @ZA
  230. @ENDIF @ZA
  231. @IF ((@<EC21.RE5INVESTA> & @<EC21.RE5HALBEINKA>) | (@<EC21.RE5INVESTB> & @<EC21.RE5HALBEINKB>)) @ZA
  232. @POSVAR @<EC21.ZINSINVHEV_F,k> R U X-71 Y-71
  233. @POSVAR @<EC21.ZINSINVHEV_Z> R U X-72 Y-72
  234. @ENDIF @ZA
  235. @IF (@<EC21.RE5AKTIEA>) @ZA
  236. @IF (@<EC21.RE5LEISTA>) @ZA
  237. @IF (@<EC21.RE5AKTAVA>|@<EC21.RE5AKTHEVA>) @ZA
  238. @POSVAR @<EC21.ZINSLEISTA> R U X-73 Y-73
  239. @POSVAR @<EC21.ZINSLEIST_F,k> R U X-75 Y-75
  240. @POSVAR @<EC21.ZINSLEIST_Z> R U X-76 Y-76
  241. @ENDIF @ZA
  242. @ENDIF @ZA
  243. @ENDIF @ZA
  244. @IF (@<EC21.VART>=2) @ZA                     
  245. @IF (@<EC21.RE5AKTIEB>) @ZA
  246. @IF (@<EC21.RE5LEISTB>) @ZA
  247. @IF (@<EC21.RE5AKTAVB>|@<EC21.RE5AKTHEVB>) @ZA
  248. @POSVAR @<EC21.ZINSLEISTB> R U X-74 Y-74
  249. @ENDIF @ZA
  250. @POSVAR @<EC21.ZINSLEIST_F,k> R U X-75 Y-75
  251. @POSVAR @<EC21.ZINSLEIST_Z> R U X-76 Y-76
  252. @ENDIF @ZA
  253. @ENDIF @ZA
  254. @ENDIF @ZA
  255. @POSVAR @<EC21.RE5AVDRUCKA> R U X-60 Y-60
  256. @POSVAR @<EC21.KAPDIVAV,g> R U X-62 Y-62
  257. @POSVAR @<EC21.ZINSGES_K,g> R U X-63 Y-63
  258. @POSVAR @<EC21.VERKST_AB> R U X-64 Y-64
  259. @POSVAR @<EC21.RE5HEVDRUCKA> R U X-77 Y-77
  260. @IF (@<EC21.VART>=2) @ZA
  261. @POSVAR @<EC21.RE5AVDRUCKB> R U X-61 Y-61
  262. @POSVAR @<EC21.RE5HEVDRUCKB> R U X-79 Y-79
  263. @ENDIF @ZA
  264. @POSVAR @<EC21.KAPDIVHEV> R U X-80 Y-80
  265. @ENDIF  @ZA
  266.  
  267.