home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 06 / MOD68B3.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-01-27  |  16KB  |  444 lines
  1. m2_PSPar
  2. POM_SLH1
  3. SPOM_SLH2
  4. tPOM_SLH3
  5. POM_SLH4
  6. ,POM_SLP1
  7. _POM_SLP2
  8. tPOM_SLP3
  9. POM_SLP4
  10.  POM_SLP5
  11.  POM_SEH1
  12. 9POM_SEH2
  13. mPOM_SEH3
  14. HPOM_SEH4
  15. ,POM_SEP1
  16.  POM_SEP2
  17. cPOM_SEP3
  18. POM_SEP4
  19. @POM_SEP5
  20. pPOM_SL_L
  21.  POM_SL_E
  22. 9POM_SE_L
  23. POM_SE_E
  24.  POM_LE_L
  25.  POM_LE_E
  26. 9POM_OB_L
  27.  POM_OB_E
  28. PPOM_TE_L
  29. 9POM_TE_E
  30. iPOM_RJ_L
  31. mPOM_RJ_E
  32.  POM_LZ_L
  33.  POM_LZ_E
  34.  POM_JUP
  35. 99POM_J2
  36. POM_J3
  37. 6 sPOM_J4
  38. lH4M2_PSPAR
  39. 9SL_H1
  40. dSL_H2
  41.  SL_H3
  42. PSL_H4
  43. 9SL_PROC1
  44. *SL_PROC2
  45. oSL_PROC3
  46. ,SL_PROC4
  47. _SL_PROC5
  48. "SE_H1
  49.  SE_H2
  50. oSE_H3
  51. tSE_H4
  52. *SE_PROC1
  53. (SE_PROC2
  54. SE_PROC3
  55. sSE_PROC4
  56.  SE_PROC5
  57. 9SL_SLEV
  58. eSL_SEJK
  59. 2SE_SLEV
  60. eSE_SEJK
  61.  LE_SLEV
  62. eLE_SEJK
  63. 6OB_SLEV
  64. SOB_SEJK
  65.  TE_SLEV
  66. @TE_SEJK
  67. pRJ_SLEV
  68. pRJ_SEJK
  69. "LZ_SLEV
  70. pLZ_SEJK
  71. 2PROC_JUP
  72. 5PROC_JAK2
  73. PROC_JAK3
  74. POM_NODL
  75. ePROC_JAK4
  76. AKTUAL
  77. set color to b/w
  78. set color to bg/n
  79. set color to w+/bg
  80. set color to b/bg,w+/rb
  81. set color to w+/b
  82. set color to w+/w
  83. set color to w/n
  84. BARVAS
  85. SBARVAR
  86. tBARVAZ
  87. BARVAU
  88. ,BARVAN
  89. _BARVAT
  90. tBARVAH
  91. BARVA
  92. _SLP5
  93. _SEH1
  94. _SEH2
  95. _SEH3
  96. _SEH4
  97. _SEP1
  98. _SEP2
  99. _SEP3
  100. _SEP4
  101. 99Q26
  102. 6 sQ28
  103. lH4Q29
  104. _PROC4
  105. _ZMENA1
  106. "POM_KONTR
  107. POM_KONEC
  108. *POCET1
  109. (BARVANS
  110. sHLAV1
  111.  PROC1
  112. 9ZMENY
  113. &barvau
  114. &barvas
  115. &barvaz
  116. &barvar
  117.  Aktualizace parametr
  118.  pro PS mzdy 
  119.  od K
  120.  do K
  121. do fondu
  122.  Sejkorovny
  123.  od K
  124.  do K
  125. do fondu
  126.  zdroj
  127. Sejkorovna
  128. Lerchovana
  129. obchodn
  130. technick
  131.  jakosti
  132.  lidsk
  133. ch zdroj
  134. Zdroj Sejkorovna
  135. Zdroj sl
  136. Procento zm
  137. ny od 1.jakosti
  138. JUPITER
  139. 2.jakost
  140. 3.jakost
  141. nest. odlitky
  142. SPOM_TEXT
  143. &barvau
  144. &barvas
  145. 999999
  146. 99.99
  147. 999999
  148. 999999
  149. 999999
  150. 99.99
  151. 999999
  152. 999999
  153. 999999
  154. 99.99
  155. 999999
  156. 999999
  157. 999999
  158. 99.99
  159. 999999
  160. 999999
  161. 99.99
  162. 999999
  163. 99.99
  164. 999999
  165. 999999
  166. 999999
  167. 99.99
  168. 999999
  169. 999999
  170. 999999
  171. 99.99
  172. 999999
  173. 999999
  174. 999999
  175. 99.99
  176. 999999
  177. 999999
  178. 99.99
  179. 99.99
  180. 99.99
  181. 99.99
  182. 99.99
  183. 99.99
  184. 99.99
  185. 99.99
  186. 99.99
  187. 99.99
  188. 99.99
  189. 99.99
  190. 99.99
  191. 99.99
  192. 99.99
  193. 999.99
  194. 999.99
  195. 999.99
  196. 999.99
  197. SPOM_SLH1
  198. tPOM_SLP1
  199. POM_SLH2
  200. ,POM_SLP2
  201. _POM_SLH3
  202. tPOM_SLP3
  203. POM_SLH4
  204.  POM_SLP4
  205.  POM_SLP5
  206. 9POM_SEH1
  207. mPOM_SEP1
  208. HPOM_SEH2
  209. ,POM_SEP2
  210.  POM_SEH3
  211. cPOM_SEP3
  212. POM_SEH4
  213. @POM_SEP4
  214. pPOM_SEP5
  215.  POM_SL_E
  216. 9POM_SE_E
  217. POM_LE_E
  218.  POM_OB_E
  219.  POM_TE_E
  220. 9POM_RJ_E
  221.  POM_LZ_E
  222. PPOM_SL_L
  223. 9POM_SE_L
  224. iPOM_LE_L
  225. mPOM_OB_L
  226.  POM_TE_L
  227.  POM_RJ_L
  228.  POM_LZ_L
  229. 9POM_JUP
  230. POM_J2
  231. 6 sPOM_J3
  232. lH4POM_NODL
  233. &barvau
  234. @ 4,27 &vloz pom_SlH1 pict "999999"
  235. @ 4,36 &vloz pom_SlP1 pict "99.99"
  236. @ 5,27 &vloz pom_SlH2   pict "999999"
  237. @ 5,36 &vloz pom_SlP2   pict "99.99"
  238. @ 6,27 &vloz pom_SlH3   pict "999999"
  239. @ 6,36 &vloz pom_SlP3   pict "99.99"
  240. @ 7,27 &vloz pom_SlH4   pict "999999"
  241. @ 7,36 &vloz pom_SlP4   pict "99.99"
  242. @ 8,36 &vloz pom_SlP5   pict "99.99"
  243. @ 4,63 &vloz pom_SeH1   pict "999999"
  244. @ 4,72 &vloz pom_SeP1   pict "99.99"
  245. @ 5,63 &vloz pom_SeH2   pict "999999"
  246. @ 5,72 &vloz pom_SeP2   pict "99.99"
  247. @ 6,63 &vloz pom_SeH3   pict "999999"
  248. @ 6,72 &vloz pom_SeP3   pict "99.99"
  249. @ 7,63 &vloz pom_SeH4   pict "999999"
  250. @ 7,72 &vloz pom_SeP4   pict "99.99"
  251. @ 8,72 &vloz pom_SeP5   pict "99.99"
  252. @11,43 &vloz pom_Sl_E   pict "99.99"
  253. @12,43 &vloz pom_Se_E   pict "99.99"
  254. @13,43 &vloz pom_Le_E   pict "99.99"
  255. @14,43 &vloz pom_Ob_E   pict "99.99"
  256. @15,43 &vloz pom_Te_E   pict "99.99"
  257. @16,43 &vloz pom_RJ_E   pict "99.99"
  258. @17,43 &vloz pom_LZ_E   pict "99.99"
  259. @11,64 &vloz pom_Sl_L   pict "99.99"
  260. @12,64 &vloz pom_Se_L   pict "99.99"
  261. @13,64 &vloz pom_Le_L   pict "99.99"
  262. @14,64 &vloz pom_Ob_L   pict "99.99"
  263. @15,64 &vloz pom_Te_L   pict "99.99"
  264. @16,64 &vloz pom_RJ_L   pict "99.99"
  265. @17,64 &vloz pom_LZ_L   pict "99.99"
  266. @20,40 &vloz pom_Jup    pict "999.99"
  267. @21,40 &vloz pom_J2     pict "999.99"
  268. @22,40 &vloz pom_J3     pict "999.99"
  269. @23,40 &vloz pom_Nodl   pict "999.99"
  270. do Proc&y
  271. Zmena&y = .t.
  272. SPOCET1
  273. _SLP1
  274. _SLH2
  275. _SLP2
  276. _SLH3
  277. _SLP3
  278. _SLH4
  279. _SLP4
  280. _SLP5
  281. _SEH1
  282. 6 sQ34
  283. lH4Q35
  284. if not Zmena&y
  285. Zmena&y = .f.
  286. POM_KONEC
  287. tM2_PSPAR
  288. SL_H1
  289. ,POM_SLH1
  290. _SL_H2
  291. tPOM_SLH2
  292. SL_H3
  293.  POM_SLH3
  294.  SL_H4
  295. 9POM_SLH4
  296. mSL_PROC1
  297. HPOM_SLP1
  298. ,SL_PROC2
  299.  POM_SLP2
  300. cSL_PROC3
  301. POM_SLP3
  302. @SL_PROC4
  303. pPOM_SLP4
  304.  SL_PROC5
  305. 9POM_SLP5
  306. SE_H1
  307.  POM_SEH1
  308.  SE_H2
  309. 9POM_SEH2
  310.  SE_H3
  311. PPOM_SEH3
  312. 9SE_H4
  313. iPOM_SEH4
  314. mSE_PROC1
  315.  POM_SEP1
  316.  SE_PROC2
  317.  POM_SEP2
  318. 9SE_PROC3
  319. POM_SEP3
  320. sSE_PROC4
  321. 4POM_SEP4
  322. 9SE_PROC5
  323. dPOM_SEP5
  324.  SL_SLEV
  325. PPOM_SL_L
  326. 9SL_SEJK
  327. *POM_SL_E
  328. oSE_SLEV
  329. ,POM_SE_L
  330. _SE_SEJK
  331. "POM_SE_E
  332. LE_SLEV
  333. POM_LE_L
  334. tLE_SEJK
  335. *POM_LE_E
  336. (OB_SLEV
  337. POM_OB_L
  338. sOB_SEJK
  339.  POM_OB_E
  340. 9TE_SLEV
  341. ePOM_TE_L
  342. 2TE_SEJK
  343. ePOM_TE_E
  344.  RJ_SLEV
  345. ePOM_RJ_L
  346. 6RJ_SEJK
  347. SPOM_RJ_E
  348.  LZ_SLEV
  349. @POM_LZ_L
  350. pLZ_SEJK
  351. pPOM_LZ_E
  352. "PROC_JUP
  353. pPOM_JUP
  354. 2PROC_JAK2
  355. POM_J2
  356. PROC_JAK3
  357. POM_J3
  358. ePROC_JAK4
  359. POM_NODL
  360. if not Zmena&y
  361. Chybn
  362.  zadan
  363.  hranice od - do pro sl
  364. Chybn
  365.  zadan
  366.  hranice od - do pro Sejkorovnu
  367. et zdroj
  368.  Sejkorovny nen
  369.  100% (F
  370. et zdroj
  371. rny nen
  372.  100% (F
  373. POM_KONTR
  374. M_KONTR
  375. POM_SLH1
  376. POM_SLH2
  377. ,POM_SLH3
  378. _POM_SLH4
  379. tHLASKA
  380. _SLH3
  381.  POM_SEH1
  382. 9POM_SEH2
  383. mPOM_SEH3
  384. HPOM_SEH4
  385.  POM_SL_E
  386. cPOM_SE_E
  387. POM_LE_E
  388. @POM_OB_E
  389. pPOM_TE_E
  390.  POM_RJ_E
  391. 9POM_LZ_E
  392.  POM_SL_L
  393.  POM_SE_L
  394. 9POM_LE_L
  395.  POM_OB_L
  396. PPOM_TE_L
  397. 9POM_RJ_L
  398. iPOM_LZ_L
  399. colora
  400. POM_TXT
  401. MMCOLOR
  402. colora
  403. POM_TXT
  404. POM_OBR
  405. MMCOLOR
  406. &barvau
  407. do Proc&y
  408. do Zmen&y with "get"
  409. do Zmen&y with "say"
  410. if q < pocet&y
  411. q =pocet&y
  412. if not Zmena&y
  413. it pr
  414. ci beze zm
  415. n? (a/N)
  416. POM_KONEC
  417. M_OBR
  418. COLOR
  419. COLOR
  420. _SLH3
  421. M_SEH2
  422. _SEH3
  423. M_SEH4
  424. KONEC
  425. KONTROLA
  426. POM_KONTR
  427. ZAPIS
  428. @AKTUAL
  429. HLAV1
  430. H1, p
  431. PROC1
  432. om_SeO
  433. ZMEN1
  434. ZAPIS
  435. SeP1,
  436. KONTROLA
  437. _SeP4,
  438. HLASKA
  439. ZMENY
  440. , pom
  441. W:\06\
  442. MOD68B3.FXP
  443. W:\06\MOD68B3.PRG
  444.