home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 06 / MOD616C.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-01-18  |  6KB  |  172 lines
  1. c6_prnes
  2. m_param
  3. m6_zam
  4. m6_prnes
  5. cis_nes
  6. c6_prnes
  7. RIIS 6.1
  8.  nemocnost, o
  9.  rodiny
  10. Zadejte 
  11. slo neschopenky:
  12. mod616c
  13. .neschop.
  14. ' '+cis_nesch+' '
  15. cis_nesch
  16. Doklad
  17. '  '+str(cis_dokl,4)
  18. cis_dokl
  19. druh_pomer
  20. druh_pomer
  21. m6_zam.prijmeni
  22. m6_zam.prijmeni
  23. m6_zam.jmeno
  24. m6_zam.jmeno
  25. Titul
  26. m6_zam.titul
  27. m6_zam.titul
  28. m6_zam.ucetni
  29. m6_zam.ucetni
  30. Druh DNP
  31. '   '+druh_dnp+'   '
  32. druh_dnp
  33.     Od
  34. tran(dat_zah,'@E')
  35. dat_zah
  36.     Do
  37. tran(dat_ukon,'@E')
  38. dat_ukon
  39. Kal.dny
  40. '   '+str(kalen_dny,4)
  41. kalen_dny
  42. Prac.dny
  43. '    '+str(prac_dny,4)
  44. prac_dny
  45. Plac. OD
  46. tran(dat_pl_od,'@E')
  47. dat_pl_od
  48. Plac. DO
  49. tran(dat_pl_do,'@E')
  50. dat_pl_do
  51. ' '+cis_diag+' '
  52. cis_diag
  53. Diagn
  54. diagnoza
  55. diagnoza
  56. Vyst.nesch.
  57. tran(dat_vyst,'@E')+' '
  58. dat_vyst
  59. '  '+cis_lekar+'  '
  60. cis_lekar
  61. lekar
  62. lekar
  63.  Denn
  64. str(denni_vz,9,2)
  65. denni_vz
  66. Hod.odp.
  67. '   '+str(hod_odp,5,2)
  68. hod_odp
  69. Autor
  70. autor
  71. autor
  72. Aktual.
  73. aktual
  74. aktual
  75. Dat. akt.
  76. tran(dat_akt,'@E')
  77. dat_akt
  78. C6_PRNES
  79. jDRUH_POMERCIS_NESCH
  80. CIS_DOKL
  81. iDRUH_DNP
  82. pDAT_ZAH
  83. DAT_UKON
  84. aKALEN_DNY
  85. PRAC_DNY
  86. iCIS_DIAG
  87. mDIAGNOZA
  88. oDAT_PL_OD
  89. DAT_PL_DO
  90. DAT_VYST
  91. CIS_LEKAR
  92. LEKAR
  93. DENNI_VZ
  94. HOD_ODP
  95. PLACENO
  96. AUTOR
  97. AKTUAL
  98. DAT_AKT
  99. M_PARAM
  100. W_MM_N
  101. r(cPAM_MESIC
  102. W_RR_N
  103. )="PAM_ROK
  104. zPOLE6
  105. 'Os.M6_ZAM
  106. jmM6_PRNES
  107. cCIS_NES
  108. )=MES_UK
  109. i =ROK_UK
  110. (MES_ZA
  111. mROK_ZA
  112. ruPOLEX
  113. PROCX
  114. "druRTOP
  115. zaCLEFT
  116. jCRIGHT
  117. menFREEZE
  118. _zaORDER
  119. eni"HOR
  120. n(i)="DOL
  121. m.prijLEVA
  122. i =PRAVA
  123. ahl(NADPIS
  124. (i) =JMENO
  125. m.jmHODN
  126. hodn(SOUC
  127. _zam.PSOUC
  128. i TITLE
  129. TITLECOLORPOC0
  130. cis_doF0PRG
  131. hodF1ON
  132. cis_dF1PRG
  133. i = F4_JM
  134. hl(iF4PRG
  135. slTISKPRG
  136. (iF7_JM
  137. hoF7PRG
  138. osc"F9PRG
  139. F9KEY
  140. )='PF9KEY1
  141. o(iF10_JM
  142. pomF10PRG
  143. n(iRAMECEK
  144. omRIIS
  145. i = iNAZEVT
  146. (i)KLICO
  147. 'KLNAZ
  148. (i)=SPACEBAR
  149. iTR_HL1
  150. hodTR_HL2
  151. _zaTR_HL3
  152. ni"TR_HL4
  153. TR_HL5
  154. ='JTR_HL6
  155. menTR_HL7
  156. m6_TR_HL8
  157. TR_HL9
  158. ="mDET_JM
  159. enoENTER
  160.  i+1DETAIL
  161. )='DETPRG
  162. jmePS_LINE
  163. _zPS_RETURN
  164. PS_ZAZN
  165. m6PRIOR
  166. tul"I
  167. MOD_PSV
  168. MOD616C
  169. X:\OBEC\06\
  170. MOD616C.FXP
  171. X:\OBEC\06\MOD616C.PRG
  172.