home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 06 / MOD6_ALG.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-03-24  |  33KB  |  626 lines
  1. FFFZ^D
  2. zakladni\m1_normy.dbf2
  3. m1_normy
  4. m1_normy
  5. operace
  6. h(6) = p_tarif.tarif&w_trida
  7. select &st_sel
  8. W_POSTUP
  9. -W_OPER
  10. ---W_KUSY
  11. ---W_PP
  12. -----ST_SEL
  13. ---W_TRIDA
  14. W_STUPEN
  15. i kalendM1_NORMY
  16.  OPERACE
  17. esPTR
  18. tP_TARIF
  19. FFFZ^D
  20. zakladni\m1_normy.dbf2
  21. m1_normy
  22. m1_normy
  23. operace
  24. select &st_sel
  25. W_POSTUP
  26. -W_OPER
  27. ---W_KUSY
  28. ---W_SAZBA
  29. --W_PP
  30. ---ST_SEL
  31. W_TRIDA
  32. oW_STUPEN
  33. _NORMY
  34.  M1_NORMY
  35. sOPERACE
  36. FFFZ^D
  37. select &st_sel
  38. W_OSC
  39. -W_DRUH_POMW_HODINY
  40. -ST_SEL
  41. --W_CASTKA
  42. CTI_MZD
  43. oM6_MZD
  44. POMID_ORG
  45.  PLAT
  46. FFFZ^D
  47. p_tarif
  48. p_tarif
  49. xp_tarif
  50. w_sazba = p_tarif.tarif&w_trida
  51. select &st_sel
  52. W_HODINY
  53. -W_TRIDA
  54. OMW_STUPEN
  55. -ST_SEL
  56. CASTKA
  57. -P_TARIF
  58. XP_TARIF
  59. oW_SAZBA
  60. FFFZ^D
  61. select &st_sel
  62. W_OSC
  63. -W_DRUH_POMW_HODINY
  64. -W_MES_F
  65. --ST_SEL
  66. -W_KATN
  67. _TARIF
  68. oCTI_MZD
  69. MM6_MZD
  70. POMKATEGORIE
  71. FFFZ^D
  72. select &st_sel
  73. W_OSC
  74. -W_DRUH_POMW_HODINY
  75. -ST_SEL
  76. -CTI_MZD
  77. M6_MZD
  78. POMID_ORG
  79. MCTI_KALH
  80. MM6_KAL_H
  81. MDENNI_UVAZHOD_MF
  82. mOSOB_OHOD
  83. FFFZ^D
  84. select &st_sel
  85. W_OSC
  86. -W_DRUH_POMW_HODINY
  87. -W_MES_F
  88. --ST_SEL
  89. -W_KATN
  90. W_HPOM
  91. MCTI_MZD
  92. MM6_MZD
  93. POMID_ORG
  94. VAZOSOB_OHOD
  95. FFFZ^D
  96. mod62a
  97. select &st_sel
  98. W_OSC
  99. -W_DRUH_POMW_HODINY
  100. -ST_SEL
  101. --W_PRUM_HODW_PRUM_DENW_SAZBA
  102. MVYP_PRUM
  103. NMOD62A
  104. POMM6_SAZBY
  105. DPROC_PRESN
  106. FFFZ^D
  107. mod62a
  108. select &st_sel
  109. W_OSC
  110. -W_DRUH_POMW_HODINY
  111. -ST_SEL
  112. --W_PRUM_HODW_PRUM_DENW_SAZBA
  113. MVYP_PRUM
  114. NMOD62A
  115. POMM6_SAZBY
  116. DPROC_PRESV
  117. FFFZ^D
  118. mod62a
  119. select &st_sel
  120. W_OSC
  121. -W_DRUH_POMW_HODINY
  122. -ST_SEL
  123. --W_PRUM_HODW_PRUM_DENW_SAZBA
  124. MVYP_PRUM
  125. NMOD62A
  126. POMM6_SAZBY
  127. DPROC_SVATE
  128. FFFZ^D
  129. select &st_sel
  130. W_HODINY
  131. -ST_SEL
  132. POMW_SAZBA
  133. --M6_SAZBY
  134. DPRIP_ODP
  135. FFFZ^D
  136. select &st_sel
  137. W_HODINY
  138. -ST_SEL
  139. POMW_SAZBA
  140. --M6_SAZBY
  141. DPRIP_NOC
  142. FFFZ^D
  143. select &st_sel
  144. W_OSC
  145. -W_DRUH_POMW_HODINY
  146. -ST_SEL
  147. --W_SAZBA
  148. IP_NOC
  149. NCTI_MZD
  150. MM6_MZD
  151. POMPRIP_ZPP
  152. NM6_SAZBY
  153. FFFZ^D
  154. select &st_sel
  155. W_HODINY
  156. -W_SAZBA
  157. OMST_SEL
  158. FFFZ^D
  159. mod62a
  160. select &st_sel
  161. W_OSC
  162. -W_DRUH_POMW_HODINY
  163. -ST_SEL
  164. --W_PRUM_HODW_PRUM_DENW_SAZBA
  165. POMVYP_PRUM
  166. NMOD62A
  167. POMM6_SAZBY
  168. DPROC_SONE
  169. FFFZ^D
  170. select &st_sel
  171. W_OSC
  172. -W_DRUH_POMST_SEL
  173. FFFZ^D
  174. select &st_sel
  175. W_OSC
  176. -W_DRUH_POMST_SEL
  177. FFFZ^D
  178. mod62a
  179. select &st_sel
  180. W_OSC
  181. -W_DRUH_POMW_HODINY
  182. -ST_SEL
  183. --W_PRUM_HODW_PRUM_DENH
  184. SAZBA
  185. MVYP_PRUM
  186. NMOD62A
  187. FFFZ^D
  188. select &st_sel
  189. W_OSC
  190. -W_DRUH_POMW_HODINY
  191. -W_MES_F
  192. --ST_SEL
  193. HODW_KATN
  194. SAZBA
  195. MCTI_MZD
  196. NM6_MZD
  197. POMKATEGORIE
  198. DOSOB_OHOD
  199. FFFZ^D
  200. select &st_sel
  201. W_OSC
  202. -W_DRUH_POMW_PROCENTOW_ZAKLAD
  203. -ST_SEL
  204. HODW_PRUM_HODW_PRUM_DENH
  205. I_MZD
  206. NCTI_MZD
  207. OMM6_MZD
  208. FFFZ^D
  209. m6_zam
  210. ordera
  211. m6_zam
  212. m6_prnes
  213. ordera
  214. m6_prnes
  215. m6_sazby
  216. m6_sazby
  217. m6_mzd
  218. m6_mzd
  219. ordera
  220. datum
  221. set order to &ord_kal
  222. set order to &ord_kal
  223. set order to &ord_prnes
  224. select &st_sel
  225. osc2<
  226. set order to &ord_prnes
  227. select &st_sel
  228. W_OSC
  229. -W_DRUH_POMW_DOKLAD
  230. OW_ZAKLAD
  231. -W_OD
  232. HODW_DO
  233. M_HODST_SEL
  234. DENW_PRUM_DENW_PR_DNY
  235. MW_KA_DNY
  236. MW_NN_DNY
  237. OW_CASTKA
  238. aW_D1
  239. w_zacW_D2
  240.    w_ORD_KAL
  241. c_ST_OSC
  242. ST_POMER
  243. mST_ZAH
  244. datZAZ_PRNES
  245. ORD_PRNES
  246. ORD_ZAM
  247. onW_SAZ69
  248. _pW_SAZ50
  249. ukW_KC50
  250. _meW_KC69
  251. d2 W_KON
  252. _mesW_ZAH
  253.    ZAV_PRNES
  254. ZAV_SAZBY
  255. ZAV_MZD
  256. ZAV_ZAM
  257. ba zohleM6_ZAM
  258.  plOSC
  259. chM6_PRNES
  260. eM6_SAZBY
  261. M6_MZD
  262. CTI_MZD
  263. 1 CTI_PRNES
  264. DAT_ZAH
  265. MW_ZAC_MES
  266. DAT_UKON
  267. W_KON_MES
  268. DAT_NAST
  269. DAT_VYST
  270. nM6_KAL
  271. 6DATUM
  272. vyPERIODA
  273. d2NAVAZUJE
  274. nDRUH_POMERDRUH_DNP
  275. RKALEN_DNY
  276. DENNI_UVAZW_UVAZ
  277. ka_TYP_ORG
  278. ZHOD_ODP
  279. FFFZ^D
  280. m6_zam
  281. ordera
  282. m6_zam
  283. m6_prnes
  284. ordera
  285. m6_prnes
  286. m6_sazby
  287. m6_sazby
  288. m6_mzd
  289. m6_mzd
  290. ordera
  291. datum
  292. set order to &ord_kal
  293. set order to &ord_kal
  294. set order to &ord_prnes
  295. select &st_sel
  296. set order to &ord_prnes
  297. select &st_sel
  298. W_OSC
  299. -W_DRUH_POMW_DOKLAD
  300. OW_ZAKLAD
  301. -W_OD
  302. HODW_DO
  303. M_HODST_SEL
  304. DENW_PRUM_DENW_PR_DNY
  305. MW_KA_DNY
  306. MW_NN_DNY
  307. OW_CASTKA
  308. aW_D1
  309. w_zacW_D2
  310.    w_ORD_KAL
  311. c_W_SAZ69
  312. ST_OSC
  313. mST_POMER
  314. tST_ZAH
  315. ZAZ_PRNES
  316. ORD_PRNES
  317. ORD_ZAM
  318. _pW_KON
  319. ukW_ZAH
  320. _meZAV_MZD
  321. 2 ZAV_PRNES
  322. ZAV_SAZBY
  323. ZAV_ZAM
  324. V_SAZBY
  325. M6_ZAM
  326. poM6_PRNES
  327. eM6_SAZBY
  328. M6_MZD
  329. CTI_MZD
  330. eDAT_ZAH
  331. MW_ZAC_MES
  332. DAT_UKON
  333. W_KON_MES
  334. DAT_NAST
  335. DAT_VYST
  336. M6_KAL
  337. DATUM
  338. PERIODA
  339. OSAM_OSOBATYP_ORG
  340. FFFZ^D
  341. m6_sazby
  342. m6_sazby
  343. ordera
  344. datum
  345. set order to &ord_kal
  346. set order to &ord_kal
  347. select &st_sel
  348. select &st_sel
  349. W_ZAKLAD
  350. -W_OD
  351. H_POMW_DO
  352. OST_SEL
  353. -W_PRUM_DENW_PR_DNY
  354. DW_KA_DNY
  355. NW_NN_DNY
  356. NW_CASTKA
  357. MW_KD
  358. OW_PD
  359. ORD_KAL
  360. aW_SAZ69
  361. acST_OSC
  362.  w_ST_POMER
  363. _ST_ZAH
  364. ZAZ_DAVKY
  365. ORD_DAVKY
  366. W_KON
  367. W_ZAH
  368. W_DRUH_POMZAV_MZD
  369. _pZAV_DAVKY
  370. ZAV_SAZBY
  371. V_MZD
  372. 2 M6_SAZBY
  373. W_ZAC_MES
  374. W_KON_MES
  375. M6_ZAM
  376. DAT_NAST
  377. DAT_VYST
  378. oM6_KAL
  379. eDATUM
  380. PERIODA
  381. TYP_ORG
  382. FFFZ^D
  383. mod62a
  384. 333333
  385. select &st_sel
  386. W_OSC
  387. -W_DRUH_POMW_HODINY
  388. OST_SEL
  389. -W_PRUM_HODW_PRUM_DENW_SAZBA
  390. NN_DNY
  391. NVYP_PRUM
  392. NMOD62A
  393. FFFZ^D
  394. select &st_sel
  395. W_OSC
  396. -W_DRUH_POMW_POSTUP
  397. OW_OPER
  398. -W_KUSY
  399. HODW_HODINY
  400. NW_PP
  401. NST_SEL
  402. NW_TRIDA
  403. NW_STUPEN
  404. HODINY
  405. DCTI_MZD
  406. M6_MZD
  407. POMW_SAZBA
  408. aM1_NORMY
  409. _W_NHOD
  410. FFFZ^D
  411. select &st_sel
  412. W_OSC
  413. -W_DRUH_POMW_POSTUP
  414. OW_OPER
  415. -W_KUSY
  416. HODST_SEL
  417. NCTI_MZD
  418. NM6_MZD
  419. POMM1_NORMY
  420. MW_PP
  421. DW_NHOD
  422. PLAT_VAR
  423. aW_TRIDA
  424. cW_STUPEN
  425. _W_SAZBA
  426. FFFZ^D
  427. select &st_sel
  428. W_OSC
  429. -W_DRUH_POMW_HODINY
  430. OST_SEL
  431. HODCTI_MZD
  432. NM6_MZD
  433. POMPLAT_VAR
  434. FFFZ^D
  435. m6_tarif
  436. trida
  437. select &st_sel
  438. W_OSC
  439. -W_DRUH_POMW_HODINY
  440. OST_SEL
  441. HODCTI_MZD
  442. NM6_MZD
  443. POMM6_TARIF
  444. NTRIDA
  445. MTA_TR
  446. MTA_KR
  447. DPOH_TARIF
  448. FFFZ^D
  449. select &st_sel
  450. W_OSC
  451. -W_DRUH_POMW_ZAKAZKA
  452. W_OPER
  453. -W_KUSY
  454. HODW_HODINY
  455. NST_SEL
  456. POMW_TRIDA
  457. NW_STUPEN
  458. MCTI_MZD
  459. DM6_MZD
  460. POMW_SAZBA
  461. MPLAT
  462. TA_TR
  463. aTA_KR
  464. cOPER
  465. _W_NHOD
  466. CASNAKUS
  467. FFFZ^D
  468. mod62a
  469. mod62a
  470. mod62a
  471. mod62a
  472. mod62a
  473. mod62a
  474. mod62a
  475. mod62a
  476. mod62a
  477. 333333
  478. m6_tarif
  479. select &st_sel
  480. W_OSC
  481. -W_DRUH_POMW_ALG
  482. W_TYP_MZDYST_SEL
  483. HODCTI_KALH
  484. NM6_KAL_H
  485. MID_ORG
  486. NW_HODINY
  487. MHOD_ODP
  488. I_MZD
  489. DW_PR_DNY
  490. MDNY_ODP
  491. MCTI_MZD
  492. MM6_MZD
  493. POMW_SAZBA
  494. cPLAT
  495. _W_DM
  496. MW_MES_F
  497. HOD_MF
  498. MW_ZAKLAD
  499. MW_PROCENTOOSOB_OHOD
  500. DENNI_UVAZW_PRUM_HODW_PRUM_DENVYP_PRUM
  501. MOD62A
  502. POMM6_SAZBY
  503. DPROC_PRESNPROC_PRESVPROC_SVATEPRIP_ODP
  504. DPRIP_NOC
  505. oPRIP_ZPP
  506. MPROC_SONE
  507. M6_PRIPL
  508. UH_POMDRUH_POMERDR_PRIP
  509. POZAST_PR
  510. DAT_UKON
  511. W_ZAC_MES
  512. DAT_ZAH
  513. W_KON_MES
  514. W_CASTKA
  515. VYSE_PRIP
  516. M6_DM
  517. _HODTYP_MZDY
  518. 6HOD_PSV
  519. MDNY_PSV
  520. ZSAZBA
  521. ENTOPLAT_VAR
  522. MM6_TARIF
  523. MTA_TR
  524. RTA_KR
  525. POH_TARIF
  526. -M6_SAZBY
  527. MZP_ZAOKRA
  528. ID_ORG
  529. FFFZ^D
  530. select &sel_puv
  531. select &sel_puv
  532. W_OSC
  533. -W_DRUH_POMSEL_PUV
  534. M6_MZD
  535. DYM6_ZAM
  536. POMOSC
  537. NDRUH_POMER}
  538. FFFZ^D
  539. select &sel_puv
  540. select &sel_puv
  541. W_OSC
  542. -W_DRUH_POMSEL_PUV
  543. M6_KAL_H
  544. YM6_ZAM
  545. POMOSC
  546. NDRUH_POMER
  547. FFFZ^D
  548. select &sel_puv
  549. select &sel_puv
  550. W_OSC
  551. -W_DRUH_POMW_DOKLAD
  552. SEL_PUV
  553. YM6_PRNES
  554. MM6_ZAM
  555. POMOSC
  556. _POMERDRUH_POMER     
  557. 333333
  558. 333333
  559. 333333
  560. W_PROC
  561. -W_KOEF
  562. POMALG10
  563. )*h(6%
  564. ALG11
  565. -----+
  566. ALG13
  567. -----
  568. ALG14
  569. ALG16
  570.  h(4)x    
  571. ALG17
  572. 6), h
  573. ALG18
  574.  h(9)*
  575. ALG19
  576. ALG20
  577. str(sz
  578. ALG21
  579. ALG22
  580. with 
  581. ALG23
  582. ruh_p
  583. ALG24
  584.  m6_m
  585. ALG25
  586. azba 
  587. ALG26
  588. ALG27
  589. m1_nos
  590. ALG28
  591. w_pos)
  592. ALG31
  593. ALG36
  594.  righ0
  595. ALG37
  596. w_stu
  597. ALG56
  598. (ptr,
  599. ALG57
  600. w_pp=5.
  601. ALG58
  602. nhod >9
  603. ALG90
  604. round
  605. ALG91
  606. y.tacpA
  607. ALG93
  608.  ) * JD
  609. ALG94
  610. 0, 2 
  611. ALG95
  612. hod =
  613. ALG96
  614. .tbc 
  615. NAST_ALG
  616. ZAOKR
  617. / 60 
  618. CTI_MZD
  619. _nhEb
  620. CTI_KALH
  621. CTI_PRNES
  622. ESPO_KOEF
  623. X:\OBEC\06\
  624. MOD6_ALG.FXP
  625. X:\OBEC\06\MOD6_ALG.PRG
  626.