home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 01 / S136P1.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-03-01  |  14KB  |  252 lines
  1.   .  .  #
  2. m1_nthn
  3. x1_nthn
  4. c1_thn1+
  5. c1_thn2+
  6. zakladni\m1_normy
  7. operace
  8. c1_thn2+
  9. c1_thn1
  10. c1_thn2
  11. stare
  12.  n y    T H N
  13. CISLO
  14. POSTUP
  15. >DATUMZ
  16. DATUM_Z
  17. POLEX
  18. OBSAHX
  19. TANSI
  20. OBSAH
  21. JMENO
  22. M1_NTHN
  23. X1_NTHN
  24. DATUMZ1
  25. C1_THN1
  26. DATUMZ2
  27. C1_THN2
  28. ZAKLADNI
  29. OPERACE
  30. NADPIS
  31. PRAVA
  32. NAZEVT
  33. PROHL
  34. pocet=poc&u
  35. zahlavi&u=zahlavi&u+zahl(i)
  36. veta&u=veta&u+jmeno(i)
  37. zahlavi&u=zahlavi&u+chr(179)
  38. veta&u=veta&u+"+chr(179)+"
  39. mez=len(veta&u)+1
  40. i=poc&a
  41. zahlavi&u=zahlavi&u+' '
  42. veta&u=veta&u+"+' '+"
  43. +' '+
  44. Zadny zaznam
  45. @ r+nadpis,leva say pol&cp
  46. @ r+nadpis,leva say pol&cp
  47. @ r+nadpis,leva say pol&cp
  48. nasledujici
  49. Zadny zaznam
  50. zahlavi=zahlavi&y
  51. veta=veta&y
  52. zahlavi=zahlavi&y
  53. veta=veta&y
  54. >ZAHLAVI1
  55. ZAHLAVI2
  56. ZAHLAVI3
  57. ZAHLAVI4
  58. ZAHLAVI5
  59. ZAHLAVIT
  60. ZAHLT1
  61. VETA1
  62. VETA2
  63. VETA3
  64. VETA4
  65. VETA5
  66. VETAT1
  67. TPOCI
  68. POCET
  69. POLEX
  70. JMENO
  71. ZAHLAVI
  72. PROHL
  73. HLASKA
  74. RAMECEK
  75. HLAVI
  76. POL10
  77. POL11
  78. POL12
  79. POL13
  80. POL14
  81. POL15
  82. POL16
  83. PREHLED
  84. PODMV
  85. PODMS
  86. NADPIS
  87. PRAVA
  88. MODTESTT
  89. DATUMZ
  90. DATUMZ2
  91. VOLBA
  92. USCHOVA
  93. MODSCR
  94.  Technologick
  95.  operace 
  96. Volba polo
  97. Pohyb     
  98. Konec
  99. - <Enter>
  100. ,PgUp,PgDn
  101. - Esc,^End
  102. NADPIS
  103. PRAVA
  104. DATUMZ
  105. NADPIS
  106. >PRAVA
  107. ZAHLAVI
  108. @ p+nadpis,leva say  &veta
  109. @ p+nadpis,cara+1 say &a
  110. pol&cp=&veta
  111. PREHLEDV
  112. HLAVI
  113. PRAVA
  114. TUSCHOVA
  115. @ p+nadpis,leva say &veta
  116. pol&cp=&veta
  117. EHLEDV
  118. PRAVA
  119. p_kody
  120. p_name
  121. Epson LX-810
  122. SOUBOR
  123. P_KODY
  124. >P_NAME
  125. W_TISKARNABOLD_ON
  126. NAP_BOLDON
  127. BOLD_OFF
  128. P_BOLDOFF
  129. DBST_ON
  130. P_DBST_ON
  131. DBST_OFF
  132. P_DBST_OFFNLQ_ON
  133. P_LETRQUALNLQ_OFF
  134. TP_DRAFT
  135. P_SUBON
  136. SUB_OFF
  137. P_SUBOFF
  138. SUPER_ON
  139. P_SUPERON
  140. SUPER_OFF
  141. P_SUPEROFFHUSTE_ON
  142. P_10CPI
  143. P_COMPRESSHUSTE_OFF
  144. P_COMP_OFFPICA_ON
  145. ELITE_ON
  146. P_12CPI
  147. RESET
  148. P_SETUP
  149. NCOMP
  150. RESSR8LPI
  151. _OFFP_8LPI
  152. STRANA
  153. TISK_HL
  154. TISK_S
  155. RIIS 1.6
  156. NCOMP
  157. >MALE
  158. SLOUP
  159. ARNAPODNIK
  160. NASUB_OFF
  161. NLQ_ON
  162. BOLD_ON
  163. NAZEVT
  164. NLQ_OFF
  165. BOLD_OFF
  166. ST_OFFPOCS
  167. ZAHLAVIT
  168. LZAHLAVI
  169. DRAFT
  170. ZAHLT1
  171. @cr,s say &vetat
  172. ARNAPOCS
  173. NAVETAT
  174. VETAT1
  175. R8LPI
  176. ZAHLAVIT
  177. NCOMP
  178. _OFFL
  179. STRANA
  180. LMALE
  181. TSUB_OFF
  182. dalsi
  183. konec
  184. Volba polo
  185. --------------------
  186. ..........
  187. +' '+
  188. .................
  189. >ZAHLAVI
  190. ARNALOGIC
  191. XOPER
  192. POLEX
  193. VYBER
  194. _OFFZAHLAVI1
  195. VETA1
  196. LJMENO
  197. Postup  
  198. tran(postup,'99999999')
  199. obs pict '9999999'
  200. postup
  201. oper+' '
  202. obs pict '999'
  203. obs pict '9999'
  204.   Prac
  205. obs pict '999999'
  206. obs pict '99'
  207. str(tbc,4)
  208. nula pict '@z 9999'
  209.    TAC   
  210. IIF(kooperace(dop), str(kooperace,10,4), str(tac,10,4))
  211. nula  pict '@z 99999.999'
  212. IIF(kooperace(dop),kooperace,tac)
  213. zev oper.
  214. nazev_op
  215. obs pict '@!'
  216. nazev_op
  217. NC-PRG
  218. obs pict '@! XXXXXX'
  219. norm+' '
  220. obs pict '999'
  221. edpis
  222. predpis
  223. obs pict '@! XXXXXXX'
  224. predpis
  225. str(kcsbc,10,4)
  226. nula pict '@z 9999999.9999'
  227. kcsbc
  228.     K
  229. str(kcsac,10,4)
  230. nula pict '@z 9999999.9999'
  231. kcsac
  232. -celkem
  233. str(kcsac+kcsbc,10,4)
  234. nula pict '@z 9999999.9999'
  235. (kcsac+kcsbc)
  236. >JMENO
  237. OBSAH
  238. ARNAHODN
  239. >S136P1
  240. PROHL
  241. RAMECEK
  242. ZAHLAVI
  243. PREHLED
  244. PREHLEDV
  245. TISK_HL
  246. TISK_S
  247. VOLBA
  248. HLASKA
  249. X:\OBEC\01\
  250. S136P1.FXP
  251. X:\OBEC\01\S136P1.PRG
  252.