home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 01 / MOD17B2S.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1998-02-06  |  34KB  |  723 lines
  1.             Hromadn
  2. et pl
  3. n. kalkulac
  4.  bez odpadu
  5.               Hromadn
  6. et  pl
  7. ch  kalkulac
  8. RIIS 1.7
  9.  Chcete p
  10. tat n
  11. klad.
  12. daje? 
  13.  Pokud ano,  od tohoto  okam
  14.  budou platit tyto nov
  15.  hodnoty. 
  16.           POZOR !                
  17.  Nejsou zobrazov
  18. ny chyby v
  19.  Pokud byly zm
  20. ny tarif. t
  21.  v postupech, mus
  22. edem pro- 
  23. st hromadn
  24. et tarif
  25.   !  V
  26. et trv
  27.  dlouho  !      
  28.  Ukon
  29. lohu    
  30.  Prov
  31. set color to b/w
  32. set color to w/w
  33.  Na z
  34. tu vznikne sestava
  35.  polo
  36. ek, kter
  37.  kalkulaci   
  38.  o dan
  39.  procento a v
  40. ce odli
  41.  od d
  42.  hodnoty.            
  43.  Zadejte procento, od kter
  44. ho    
  45.  chcete zobrazovat rozd
  46. ly mezi  
  47.  a novou kalkulac
  48. :      
  49. 999.99
  50.  Pro zadan
  51. et kus
  52.  Pro aktu
  53.  kusy d
  54.  Pro re
  55. ie kmenov
  56.  Pro re
  57. len operac
  58.  Konec 
  59. &barvax
  60. colora
  61.  Zadejte po
  62. et kus
  63. vky: 
  64. 999999
  65.      Po
  66. et kus
  67. vky:     
  68. 999999
  69. set color to &_color
  70. &barvam
  71. &barvax
  72. colora
  73.  Zadejte po
  74. et kus
  75. vky: 
  76. 999999
  77.      Po
  78. et kus
  79. vky:     
  80. 999999
  81. set color to &_color
  82. &barvax
  83. &barvam
  84. &barvax
  85. &barvax
  86. &barvam
  87. &barvax
  88. &barvax
  89. &barvam
  90. &barvax
  91. &barvax
  92. &barvax
  93. m_param
  94. KLOBOUKYF
  95. m1_ident
  96. ident
  97. MM_odpadf
  98. m1_kusov
  99. vykres
  100. p1_plkal
  101. m1_plan
  102. x1_plan
  103. zakladni\m1_normy
  104. operace
  105. v1_str
  106. x1_str
  107. v4_sklad
  108. x4_sklad
  109. m1_kalk
  110. x1_kalk
  111. m1_zas
  112. x1_zas
  113. m1_ceur.dbf2
  114. m1_ceur
  115. c1_kalk
  116. soucasti
  117. PORKERTF
  118. m1_ident
  119. FPSABCRVIOJKG
  120. c1_ds
  121. m1_ident
  122. FPSABCRVIOJKG
  123. c1_ds
  124. ident
  125. PORKERTF
  126. colorz
  127. ehled DS 
  128. DS  Po
  129. RIIS 1.7
  130. t od DS:
  131. Datum platnosti:
  132. Tento dispozi
  133.  stupe
  134.  nebyl nalezen!
  135.  Konec Esc 
  136. teno celkem:
  137. et pro DS=   :
  138. et polo
  139. et pro DS=F
  140. RIIS 1.7
  141. i ukon
  142.  nebudou 
  143. daje zalo
  144. eny !
  145. et ? (a/N)  
  146. CDEHLY
  147. create dbf &f_adr\data\p1_chcn (ident c(12), typ_nakl c(2), uvn_stare n(11,2),  uvn_nove n(11,2), rozd_proc n (8,2) )
  148. p1_chcn
  149. create dbf &f_adr\data\p1_chku (ident c(12), typ_nakl c(2), uvn_stare n(11,2),  uvn_nove n(11,2), rozd_proc n (8,2) )
  150. p1_chku
  151. Aktualizace n
  152. chyby
  153. m1_kalk
  154. RIIS 1.7
  155.  Esc 
  156. Vznikla sestava rozd
  157.  say 'A2
  158. et poPOC
  159. @2W_HMOTNOSTW_PL_REZ
  160. W_CENA_KG
  161. W_CENA_REZW_MATERIALW_SPOTREBAW_UVN_ODL
  162. VZOREC
  163. DRUH_REZ
  164. =FKMD
  165.    FRS
  166. olor tFRV
  167.   FRO
  168. 12 sayFRZ
  169. et REC
  170. S=' + M_VYKRES
  171. 'NAKLADY
  172. 0,_KSDAV
  173. NAKLTYP
  174. MDILKOOP
  175. MDRUHKOOP
  176. NEBERODL
  177. _MM_ODPAD
  178. sANSI
  179. 1_ds.ds
  180.    IF inVOL
  181.  MM_VYKRES
  182. DR_KSD
  183. DR_DIL
  184.    W_PROC
  185. or BARVAX
  186.    BARVAM
  187.  1._COLOR
  188.    MOD_SYS
  189.  tPREP_DS
  190.   M_PARAM
  191. 0 POLE1
  192. DILNA_KOOPPODNIK
  193.  toM1_IDENT
  194. bIDENT
  195.     W_DATUM
  196. tM1_KUSOV
  197. rVYKRES
  198.   @P1_PLKAL
  199.  UROVEN
  200. VYROBEK
  201. ouOPER
  202.  KUSY_STRUKKUSY_ROZP
  203. dDRUH
  204. enTYP_NAKL
  205.  MATER
  206. 25 sKOOP
  207. et KUSOV
  208. KUSY_D
  209. @ 1VR
  210.  get t_SR
  211. us pictZR
  212.     OR
  213. et cursUVN
  214.     OPN
  215.   OPM
  216. set cuNMPRIP
  217.  NMKUSOV
  218. toPRIPCEL
  219.  fC1_S
  220.  C1_K
  221. M1_PLAN
  222. X1_PLAN
  223.  rZAKLADNI
  224. hOPERACE
  225. ,fV1_STR
  226. ro,X1_STR
  227. m_vV4_SKLAD
  228. aX4_SKLAD
  229. eM1_KALK
  230.   X1_KALK
  231. klM1_ZAS
  232. lKoX1_ZAS
  233. hKoKALK2
  234.     M1_CEUR
  235. atRADA
  236.      C1_KALK
  237.   PL_OD
  238. PL_DO
  239. NDIFDAT_AK
  240.   S_K
  241. pSOUCASTI
  242. LDIST
  243.    DS
  244.     POC_DS
  245.  KOD_POL
  246. lSTAV
  247. C1_DS
  248. ocetMCOL
  249.    pocetS
  250. ocet2+1
  251.     tedRR
  252. pisuju M_DS
  253. elkHLASKA
  254. DATUM_OD
  255. oDATUM_DO
  256.  MMREC
  257. 2POCET2
  258.  POCETC2
  259. T_PRERUS
  260. =POCET1
  261. cetPOCETC1
  262. *3PRER
  263.  M_NAZEV
  264. NAZEV
  265. VYPOCET
  266. prP1_CHCN
  267. CHYBY
  268. P1_CHKU
  269.  pMW_UVN
  270. tMW_PROC
  271.   NKUSY_D
  272. NAKLAD
  273. ROZD_PROC
  274. ROZDIL
  275. Identifikace: 
  276. JKGFPSABCRV
  277. OMNUXYZ
  278. c1_kp
  279. c1_kp
  280. OMNUXYZ
  281. OMNUXYZ
  282. c1_kalk
  283.   /  /  #
  284. c1_kalk
  285.   /  /  #
  286. c1_kalk
  287.   /  /  #
  288. ROZKLADY
  289. @M1_PLAN
  290.  'M_VYKRES
  291. @2FRS
  292. OTNOSTFRZ
  293. NA_KG
  294. A_REZFOPN
  295. ERIALFKMD
  296. TREBAZS_KMD
  297. V1_STR
  298. REZIE_VYR
  299. REZIE_SPR
  300. REZIE_ZAS
  301. REZIE_ODB
  302. 2 sayOPN
  303. et C1_S
  304. =' + M_NAZEV
  305. ROZPIS
  306. UROVEN
  307. _MATERIAL
  308. sC1_K
  309. s ALL
  310.  IF inPORADI
  311.  C1_KP
  312. TYP_NAKL
  313. NAKLTYP
  314.   VYSTUP
  315. or VYKRES
  316.    UR
  317. sC1_KALK
  318. 1.ZAPIS
  319.   VYROBEK
  320.  tZAPIS1
  321.   DAT_AK
  322.  PL_DO
  323. MM_ODPAD
  324. P_NASEL
  325. oMATER
  326. bKOOP
  327.    PRIPCEL
  328. tKUSOV
  329. rKUSY_D
  330.   @VR
  331. vykres
  332. vyrobek
  333. vyrobek
  334. vykres
  335. PROPMAT
  336. @CTAVENINA
  337. M1_KUSOV
  338. oVYKRES
  339. 2C1_K
  340. TNOSTALL
  341. UROVEN
  342. REZKUSY_ROZP
  343. KUSY_STRUKDRUH
  344. M1_IDENT
  345. IDENT
  346. STUPEN
  347. E_ODB
  348. NEBERODL
  349. yKOD_POL
  350.  KUSYS
  351. ' + CV
  352. KC_VYKRESU
  353. KOEPROPMATMM_ODPAD
  354. VYROBEK
  355. SPOTREBA
  356. s PORADI
  357. _STRUKMDRUHKOOP
  358. @C1_S
  359. VYKRES
  360. oVZOREC
  361. 2M1_PLAN
  362. STKOD_KALK
  363. MATER1
  364. MATER2
  365. REZMATER3
  366. PORKERTF
  367. OMNUXYZ
  368. OMNUXYZ
  369. MNUXYZ
  370. CVRATSMES
  371. M1_IDENT
  372. KOD_POL
  373. oPODNIK
  374. 2M1_KUSOV
  375. TC1_S
  376. VYROBEK
  377. VYKRES
  378. REZKOD_KOMP
  379. M_MATER
  380. M_KOOP
  381. M_PRIP
  382. M_KUSOV
  383. yM_OPM
  384.  M_OPN
  385. ' + M_UVN
  386. KM_KUSY_D
  387. _Q_DRUH
  388. ATDRUH
  389. C1_KALK
  390. KM1_KALK
  391. TMATER
  392. sKOOP
  393. s PRIP
  394. KUSOV
  395. UKKUSY_D
  396. or OPM
  397.    OPN
  398. 1.P_ZR
  399.   M1_ZAS
  400.   SKL_HLAVNIV4_SKLAD
  401. PNSTR
  402. oV1_STR
  403. bREZIE_ZAS
  404. P_MAT
  405. tKUSY_STRUKZAS_REZ
  406.  @C1_K
  407.  UROVEN
  408. UKKUSY_ROZP
  409. _STRUKTYP_NAKL
  410. ALIAS
  411. KALK2
  412. M1_IDENT
  413. oC1_S
  414. 2VYKRES
  415. TW_RADA
  416. M1_PLAN
  417. EZW_HMOTNOSTVAHA_MJ
  418. M1_CEUR
  419. STW_CENA_KG
  420. HM_OD
  421. HM_DO
  422. NOSTCEN_KG
  423. P_MAT
  424. KUSY_STRUKUROVEN
  425.  VYROBEK
  426. + KUSY_ROZP
  427. _STRUKDRUH
  428. ATTYP_NAKL
  429. MATER
  430. ALIAS
  431. W_IDENT
  432. oVYKRES
  433. 2KALK2
  434. TM1_IDENT
  435. W_RADA
  436. EZM1_PLAN
  437. STW_PL_REZ
  438. PLOCHA_R
  439. TM1_KUSOV
  440. W_SPOTREBAW_UVN_ODL
  441. W_HMOTNOSTIDENT
  442. C_VYKRESU
  443. KOD_POL
  444.  SPOTREBA
  445. AM1_KALK
  446. N_ODL
  447. VAHA_MJ
  448. STM1_CEUR
  449. W_CENA_REZHM_OD
  450. KHM_DO
  451. NOSTCEN_REZ
  452. EZW_MATERIALW_KOOP
  453. EBAP_MAT
  454. _REZKUSY_STRUKUROVEN
  455. KVYROBEK
  456. KUSY_ROZP
  457. _STRUKDRUH
  458.    TYP_NAKL
  459. sMATER
  460. KLOBOUKYF
  461. VYKRES
  462. oVZOREC
  463. 2M1_PLAN
  464. TP_KMD
  465. ZS_KMD
  466. KOD_KALK
  467. TPODNIK
  468. MKOOPKMD
  469. TMDILKOOP
  470. V1_STR
  471. OTNOSTKRZ
  472. KRESU
  473.  KOPN
  474. AREZIE_VYR
  475. REZIE_SPR
  476. REZIE_ZAS
  477. REZIE_ODB
  478. A_REZOPN
  479. KDR_KSD
  480. OSTM_VYKRES
  481. ZPKSDAV
  482. IAL_KSDAV
  483. EBAC1_KALK
  484. EZM1_KALK
  485. UKKUSY_D
  486. KKUSY_STRUKM1_IDENT
  487. K_POSTUP
  488. KC_POSTUP
  489.  M1_NORMY
  490. sROZPIS1
  491. .MATER2
  492. RUKMATER3
  493. KLOBOUKYF
  494. TSMZDA
  495. SMZDAP
  496. SMZDAK
  497. ZSUVN
  498. TSKOOP
  499. TSTAC
  500. SMZDAPCEL
  501. POSTUP
  502. _POSTUP
  503. STMKOOP
  504. MKOOPKMD
  505. DR_DIL
  506. AMDILKOOP
  507. E_SPR
  508. V1_STR
  509. A_REZPRS
  510. OSTPOPM
  511. ZKOPM
  512. IALPOPN
  513. EBAKOPN
  514. EZPRO
  515. UKKRO
  516. KPODNIK
  517. RUKREZIE_VYR
  518. REZIE_SPR
  519. sREZIE_ODB
  520. M1_NORMY
  521. KMDRUHKOOP
  522. KOOPERACE
  523. LAVNIKUSY_STRUK_MZDAP
  524. PKCSBC
  525. oPKSDAV
  526. b_MZDAPCEL
  527. _KSDAV
  528. t_MZDAK
  529. RUKKCSAC
  530.  @_OPMP
  531. TRUK_OPMK
  532. UK_OPM
  533. _MZDC
  534. TRUK_OPN
  535. UK_RV
  536. _STRUKTBC
  537.  C1_K
  538. 5 sUROVEN
  539. VYROBEK
  540. t VYKRES
  541. KUSY_ROZP
  542. _STRUKDRUH
  543.  pictPRIP
  544.     KUSOV
  545. cursTYP_NAKL
  546.  KUSY_D
  547. set cuSR
  548. toUVN
  549.  fMATER
  550.  NMPRIP
  551. NMKUSOV
  552. PRIPCEL
  553. OMNUXYZ
  554. 2VYSTUP
  555. TMATER
  556. ZPRIP
  557. TKUSOV
  558. STOPN
  559.  MMATER
  560. E_SPR
  561. C1_KALK
  562. VYKRES
  563. M1_KALK
  564. 2VYSTUP
  565. TMATER
  566. KUSY_STRUKC1_KALK
  567. TKOOP
  568. UKKUSOV
  569. UKUVN
  570. UKOPN
  571. UKOPM
  572. colora
  573. set color to &_color
  574. _COLOR
  575. colorz
  576. et dispozi
  577. ch stup
  578.  rozpisek ...
  579. chodu:
  580. na polo
  581. m1_kusov
  582. vykres
  583. m1_ident
  584. MNTUXYZ
  585. ident
  586. MNTUXYZ
  587. ZMENA
  588. PRUCHOD
  589. ST_ZAZ
  590. oW_KLIC
  591. 2W_DS
  592. TMCOLO
  593. M1_KUSOV
  594. KVYKRES
  595. TM1_IDENT
  596. REC_NUMBERCTBAR
  597. UKDISPLAY_BOKOD_POL
  598. UKDISPLAY_BAIDENT
  599. MBERC_VYKRESU
  600. CTBAR
  601. prava p
  602. P R O C E N T     H O T O V O
  603. 0   10   20   30   40   50
  604. 60   70   80   90  100
  605. CTBAR
  606. m1_kalk
  607. x1_kalk
  608. m1_ident
  609. ident
  610. if ! file ( '&f_adr\data\p1_chcn.dbf' )
  611.  Soubor chyb neexistuje ! 
  612. p1_chcn
  613. rozdil
  614. ly hromad.p
  615. tu pl
  616. n.kalkulac
  617.  bez odpadu
  618. if ! file ( '&f_adr\data\p1_chku.dbf' )
  619.  Soubor chyb neexistuje ! 
  620. p1_chku
  621. rozdil
  622. ly hromadn
  623. tu pl
  624. ch kalkulac
  625.  Soubor rozd
  626.  je pr
  627. RIIS 1.7
  628. Archiv
  629. archiv_nak
  630. mod17b2s
  631. Identifikace
  632. CH.ident
  633. CH.ident
  634. CH.typ_nakl+' '
  635. CH.typ_nakl
  636. m1_ident.nazev
  637. m1_ident.nazev
  638. str(CH.rozd_proc,8,2)
  639. CH.rozd_proc
  640. str(CH.uvn_stare,11,2)
  641. CH.uvn_stare
  642. VN nov
  643. str(CH.uvn_nove,11,2)
  644. CH.uvn_nove
  645. POLEX
  646. PROCX
  647. oRBOT
  648. 2CLEFT
  649. TCRIGHT
  650. FREEZE
  651. ORDER
  652. KZAHL
  653. TJMENO
  654. UMBERTITLE
  655. UKTITLECOLORF1
  656. PLAY_BAF4
  657. MBERF6
  658. YKRESU
  659. UKF10
  660. E_SPR
  661. DETAIL
  662. F1PRG
  663. F4_JM
  664. EZF4PRG
  665. KF7_JM
  666. OSTF7PRG
  667. ZF9KEY
  668. IALF10_JM
  669. EBAF10PRG
  670. EZDET_JM
  671. UKDETPRG
  672. KRAMECEK
  673. UKRIIS
  674. NAZEVT
  675. M1_KALK
  676.  X1_KALK
  677. sM1_IDENT
  678. IDENT
  679. KMM_ODPAD
  680. HLASKA
  681. P1_CHCN
  682. NIROZDIL
  683. RUKCH
  684. PP1_CHKU
  685. DAPCEL
  686. ENTER
  687. tNADPIS
  688. RUKLEVA
  689.  @PRAVA
  690. TRUKHOR
  691. UKDOL
  692. TRUKMOD_PSV
  693. colorz
  694. mod_proc
  695. set color to &_col
  696. PS_LINE
  697. oZOBR_NAKL2IDENT
  698. TTYP_NAKL
  699. MOD_PROC
  700. MOD17B2S
  701. VYPOCET
  702. ROZKLADY
  703. MATERIAL
  704. MATER1
  705. MATER2
  706. MATER3
  707. ROZPIS
  708. aktuLS
  709. ROZPIS1
  710. ZAPIS
  711. ZAPIS1
  712. HLASKA
  713.  @6,Jf
  714. PREP_DS
  715.    rg
  716. DISPLAY_BA
  717. DISPLAY_BO
  718. MOD17B2PS
  719. ARCHIV_NAK
  720. X:\OBEC\01\
  721. MOD17B2S.FXP
  722. X:\OBEC\01\MOD17B2S.PRG
  723.