home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 03 / MOD37D.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-02-19  |  8KB  |  253 lines
  1.  e h l e d    s t 
  2.  e d i s e k
  3. RIIS 3.7
  4. Prac.
  5. pracov
  6. mod37d
  7.  Zadejte  stredisko: 
  8. v1_str
  9. x1_str
  10. m3_zdr
  11. ident_zdr
  12. m3_szdr
  13. dilna
  14. m3_kozdr
  15. ident_zdr
  16. edisko
  17. '      '+v1_str.nstr
  18. v1_str.nstr
  19. zev st
  20. ediska
  21. '   '+v1_str.nazev_str
  22. v1_str.nazev_str
  23.      POLEX
  24.     RAMECEK
  25.   NAZEVT
  26.    RIIS
  27. fRTOP
  28. .    RBOT
  29.   && CLEFT
  30.  sesCRIGHT
  31. olaFREEZE
  32. rchF1
  33. .t./.f.F2
  34. cet mraF9
  35. ch slouDETAIL
  36. o (DET_JM
  37. = 0ENTER
  38.  konPROCX
  39. e fuF9KEY
  40. 1 = V1_STR
  41.    X1_STR
  42. napM3_ZDR
  43. t./IDENT_ZDR
  44.       M3_SZDR
  45. beDILNA
  46. t./.SZDR
  47.  = .tM3_KOZDR
  48. T_ZDR
  49. /.fJMENO
  50.  .t.HODN
  51.     I
  52. volaMOD_PSV
  53. skOBSAH
  54. .f.)Q    
  55. c2_p+
  56. znam!
  57.  Pracovi
  58.  na st
  59. edisku  
  60. RIIS 3.7
  61. ehled  pracovis
  62. Korekce
  63. korekce
  64. mod37d
  65.  Zadejte: dilna+pracovi
  66.  Pracovi
  67. '     '+pra.ident_zdr
  68. pra.ident_zdr
  69. Skupina
  70. '  '+pra.skupina
  71. pra.skupina
  72. '  '+str(pra.poct,3)
  73. pra.poct
  74. '  '+str(pra.dny,1)
  75. pra.dny
  76. NH sm
  77. '   '+str(pra.nh_smeny,5,2)
  78. pra.nh_smeny
  79. nnost
  80. '   '+str(pra.smennost,5,2)
  81. pra.smennost
  82. str(pra.plneni,6,3)
  83. pra.plneni
  84. Poruchy
  85. ' '+str(pra.poruchy,6,3)
  86. pra.poruchy
  87. zdr.nazev_zdr
  88. zdr.nazev_zdr
  89. Zkratka
  90. ' '+zdr.zkr_zdr
  91. zdr.zkr_zdr
  92.  kap.
  93. ' '+str(pra.d_kapa,9,2)
  94. pra.d_kapa
  95.  kap.
  96. '   '+str(pra.t_kapa,9,2)
  97. pra.t_kapa
  98. RIIS 3.7
  99.      OBR2
  100.     MOD_SYS
  101.   ZAZN
  102.    PS_LINE
  103. fV1_STR
  104.    DIL
  105. && NSTR
  106.  sesSZDR
  107. olaC2_P
  108. rchDILNA
  109. /.f.IDENT_ZDR
  110. T_ZDR
  111. HLASKA
  112. mraPS_RETURN
  113. POLEX
  114. o (PROCX
  115. = 0RTOP
  116.  konRBOT
  117. e fuCLEFT
  118. 1 = CRIGHT
  119.    FREEZE
  120. napORDER
  121. t./ZAHL
  122. JMENO
  123.     HODN
  124. beTITLE
  125. t./.TITLECOLORF1
  126. KOZDR
  127. T_ZDR
  128. /.fF4
  129.  .t.F6
  130.     F7
  131. volaF9
  132. skF10
  133. .f.)DETAIL
  134. .  F1PRG
  135.    &F4_JM
  136. a poF4PRG
  137. (.t.F7_JM
  138. 7 = F7PRG
  139.     F9KEY
  140.  arcF10_JM
  141. av,F10PRG
  142. a DDET_JM
  143. v (DETPRG
  144. f9RAMECEK
  145.   NAZEVT
  146. &  RIIS
  147. avaniENTER
  148. =.t.MOD_PSV
  149. colora
  150. set color to &color
  151.      COLOR
  152.     OBR
  153. c2_k+
  154. znam!
  155.  Korekce kapacit na st
  156. edisku  
  157.   pracovisti  
  158. RIIS 3.7
  159. ehled korekc
  160.  kapacit 
  161. mod37d
  162.  Zadejte: pracoviste+dilna+od 
  163.        Od
  164. ' '+tran(kr.od,'@E')
  165. kr.od
  166.        Do
  167. ' '+tran(kr.do,'@E')
  168. kr.od
  169. '   '+str(kr.poct,3)
  170. kr.poct
  171. '   '+str(kr.dny,1)
  172. kr.dny
  173.  NH sm
  174. '    '+str(kr.nh_smeny,5,2)
  175. kr.nh_smeny
  176. nnost
  177. '    '+str(kr.smennost,5,2)
  178. kr.smennost
  179. ' '+str(kr.plneni,6,3)
  180. kr.plneni
  181.  Poruchy
  182. '  '+str(kr.poruchy,6,3)
  183. kr.poruchy
  184.  Denn
  185.  kapacita
  186. '      '+str(kr.d_kapa,9,2)
  187. kr.d_kapa
  188.  kapacita
  189. '         '+str(kr.t_kapa,9,2)
  190. kr.t_kapa
  191. ' '+substr(kr.duvod,1,50)
  192. kr.duvod
  193. RIIS 3.7
  194.      OBR1
  195.     MOD_SYS
  196.   ZAZN1
  197.    PS_LINE
  198. fPRAC
  199.    IDENT_ZDR
  200.  sesDILNA
  201. olaKOR
  202. rchC2_K
  203. /.f.OD
  204. T_ZDR
  205. HLASKA
  206. mraC2_P
  207. o (PRA
  208. = 0ZDR
  209. T_ZDR
  210. PS_RETURN
  211. POLEX
  212. 1 = PROCX
  213.    RTOP
  214. napRBOT
  215. t./CLEFT
  216. CRIGHT
  217.    FREEZE
  218. beORDER
  219. t./.ZAHL
  220. COLORJMENO
  221.  HODN
  222. TITLE
  223. /.fTITLECOLORF1
  224.     F2
  225. volaF3
  226. .f.)F6
  227. .  F7
  228.    &F9
  229. a poF10
  230. (.t.DETAIL
  231.  = F1PRG
  232.     F4_JM
  233.  arcF4PRG
  234. av,F7_JM
  235. a DF7PRG
  236. v (F9KEY
  237. f9F10_JM
  238.   F10PRG
  239. &  DET_JM
  240. aniDETPRG
  241. RAMECEK
  242. t.NAZEVT
  243.  &RIIS
  244. OBSAHX
  245. &eMOD_PSV
  246. ./MOD37D
  247. PRACOV
  248. HLASKA
  249. KOREKCE
  250. X:\OBEC\03\
  251. MOD37D.FXP
  252. X:\OBEC\03\MOD37D.PRG
  253.