home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 07 / MOD79D.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-01-08  |  31KB  |  779 lines
  1. m7_ucto
  2. m_cis1
  3. x_cis1
  4. m_dat
  5. x_dat
  6. v1_str
  7. x1_str
  8. m4_organ
  9. v4_sklad
  10. x4_sklad
  11. m7_denik
  12. denik
  13. m7_ucet
  14. m7_meny
  15. m7_obru
  16. m7_stav
  17. m7_sstav
  18. m7_pokl
  19. ident_pok
  20. m4_uc_o
  21. m_param
  22. u7_kasa.dbf2
  23. Neexistuje soubor minul
  24. ho obdob
  25. mod_fun
  26. u7_kasa
  27. cis_dok
  28. .stav:F
  29.  Kon.stav:
  30. j.doklad
  31. dej.doklad
  32. m7_kasa
  33. cis_dok
  34. Hotovost dne: F
  35. .stav:
  36.  Kon.stav:
  37. m7_kasa
  38. cis_dok
  39. doklad
  40. Hotovost dne: F
  41. u7_kasa.dbf2
  42. Neexistuje soubor minul
  43. ho obdob
  44. mod_fun
  45. u7_kasa
  46. cis_dok
  47. a7_kasa.dbf2
  48. Neexistuje archivn
  49.  soubor
  50. mod_fun
  51. a7_kasa
  52. cis_dok
  53. set color to b/w
  54. set color to bg/n
  55. set color to w+/w
  56. set color to w+/bg
  57. set color to b/bg,w+/rb
  58. set color to w+/b
  59. set color to w/n
  60. Detail
  61. Detail
  62. ada(3), Doklad(5)
  63. Funkce
  64. Funkce
  65. mod79d
  66. ehled pokladn
  67. ho den
  68. ku - 
  69. ehled pokladn
  70. ho den
  71. ku ke dni: F
  72. ehled pokladn
  73. ho den
  74. ku - 
  75. ehled pokladn
  76. ho den
  77. ku - 
  78. ehled pokladn
  79. ho den
  80. ku - rok 
  81. RIIS 7.5
  82. '   '+denik
  83. denik
  84. .dok.
  85. str(cis_dok,5)+' '
  86. cis_do
  87. ' '+klic
  88. ' '+typ_dok
  89. typ_dok
  90. ' '+mena
  91. str(cast_men,10,2)
  92. cast_men
  93.    Kurz
  94. str(kurz,8,3)
  95.       
  96. str(kc,12,2)
  97. s. faktury
  98. variab
  99. variab
  100. Identifikace
  101. identif
  102. identif
  103. totoz
  104. totoz
  105. substr(text,1,35)
  106. Splatnost
  107. tran(dat_spl,'@E')+' '
  108. dat_spl
  109. .obd.
  110. '    '+str(uc_obd,2)
  111. uc_obd
  112. Dat.akt.
  113. tran(dat_akt,'@E')
  114. dat_akt
  115. '  '+s_uct+' '
  116. s_uct
  117. KONEC
  118. f !eANSI
  119. dentiM7_UCTO
  120. lePPMES
  121. rganPLAT_POK
  122. mPPROK
  123. idenROK_POK
  124. saPMMES
  125.    PMROK
  126. M_CIS1
  127. ,X_CIS1
  128. 4_oM_DAT
  129. zev_X_DAT
  130.  elsV1_STR
  131.    X1_STR
  132. sayM4_ORGAN
  133. anizacV4_SKLAD
  134. dX4_SKLAD
  135. sM7_DENIK
  136. aDENIK
  137. M7_UCET
  138. y UCET
  139. M7_MENY
  140.  'MENA
  141.  :' cM7_OBRU
  142.  M7_STAV
  143. ucM7_SSTAV
  144.  M7_POKL
  145. ayIDENT_POK
  146. M4_UC_O
  147. e M_PARAM
  148. PAR_POLE
  149. 1POLE7
  150. PFIRMA
  151.    FIRMA
  152. uct=UCPOKL
  153.    UC_POKL
  154.  'UZAV
  155. rHLASKA
  156. ---MOD_FUN
  157. --U7_KASA
  158. --CIS_DOK
  159. --M7_KASA
  160. -------PPOC
  161. prSTAV_D
  162. funPPRIJ
  163. ve sPRIJ_D
  164.  obPVYD
  165. konecVYD_D
  166. ol11POCV
  167.  casePOC_VD
  168. ax=POCP
  169. do whPOC_PD
  170. HOT_KC
  171. HOT_DEV
  172. t TR_HL1
  173.  w/TR_HL2
  174.  @ TR_HL3
  175. leaUZAVR
  176. 53DATUM
  177.  @ mTITLE
  178. o m+STAV_M
  179. lePRIJ_M
  180. setVYD_M
  181. to wDOKLAD
  182.  A7_KASA
  183. ,2BARVAS
  184. ' BARVAR
  185. ladBARVAT
  186.    BARVAZ
  187.  prBARVAU
  188. tavBARVAN
  189. y 'BARVAH
  190. @ mPOLEX
  191. rompFREEZE
  192. r dF1
  193.      F2
  194. +5,29 pF3
  195. t ' KonF4
  196.      F5
  197. u to voF6
  198.       F7
  199. eadkey(F8
  200.  .or. rF9
  201. ey()=26F10
  202.       ENTER
  203. DETAIL
  204.   rDET_JM
  205. creF9KEY
  206.  obrF10_JM
  207.    F10PRG
  208.    PS_ZAZN
  209. PROCX
  210. ase OBRZ
  211.   RAMECEK
  212.  tNAZEVT
  213.    RIIS
  214. =.fNADPIS
  215.    LEVA
  216. re scPRAVA
  217. om oHOR
  218.     DOL
  219. e vol1ZAHL
  220.      JMENO
  221. ekapHODN
  222.     I
  223. toreMOD_PSV
  224. mod79a2
  225. mod79a1
  226. f !eMENUD
  227. entiPAR_POLE
  228. ePORADIP1
  229. nMOD79A2
  230. mMOD79A1
  231. nPROCP1
  232.    ZOB_OBR2
  233. german
  234. 99999
  235. DOKLAD    
  236. Druh cenin :
  237. cenina
  238. Druh m
  239. ny  :
  240. et  :F
  241. 999999999.99
  242. 999999.999
  243. 999999999.99
  244. Nenalezena organizace 
  245. Stav   :
  246. Stornov
  247. GERMAN
  248.  !eDENIK
  249. entiCIS_DOK
  250. eTYP_DOK
  251. nM_CIS1
  252. mM7_KASA
  253. nTEXT
  254. saMENA
  255.   M7_MENY
  256. CENINA
  257. ,_MNOZ
  258. zev_STRED
  259. lsSTR
  260.    PAR_POLE
  261. yKURZ
  262. nCAST_MEN
  263. cKLIC
  264. dDAT_SPL
  265. sPRILOH
  266. aIDENTIF
  267. VARIAB
  268. y TOTOZ
  269.  'ZAVOD
  270.  cUCET
  271. M4_UC_O
  272.  USTAV
  273. ucM4_ORGAN
  274.  NAZEV_ORG
  275. S_UCT
  276.  Tisk dokladu 
  277.  Stav pokladny 
  278. r dne 
  279.  Konec 
  280.  Tisk dokladu 
  281.  Konec 
  282. OBRRUC
  283.  !eKONEC
  284. entiVOL11
  285. mTISK
  286. nREKAP_MEN
  287. VYBER_DEN
  288. ipraven
  289.  tisk
  290. mod_fun
  291. british
  292. TTISK
  293.  !eMODTESTT
  294. eHLASKA
  295. nMOD_FUN
  296. mPTEXT
  297. nBRITISH
  298. TDOKLAD
  299. p_kody
  300. p_name
  301. Epson LX-810
  302. par_polef
  303. m_param
  304. Organizace 
  305. pokladn
  306. loh  
  307. doklad 
  308. ze dne
  309. ijato od 
  310. ijato od 
  311. -----------------------------------------------------
  312. *999,999,999
  313. @L 99
  314. ----------------
  315. slovy      
  316. -----------------------------------------------------
  317. el platby
  318. hrada f.
  319. -----------------------------------------------------
  320. _________________________
  321. _________________________
  322. podpis pokladn
  323. Organizace 
  324. dajov
  325. pokladn
  326. loh  
  327. doklad 
  328. ze dne
  329. Vyplaceno /komu/
  330. Vyplaceno /komu/
  331. ------------------------------------------------------
  332. *999,999,999
  333. @L 99
  334. ----------------
  335. slovy      
  336. -----------------------------------------------------
  337. el platby
  338. hrada f.
  339. -----------------------------------------------------
  340. ____________________
  341. ____________________
  342. ____________________
  343.  schv
  344.  podpis p
  345. jemce 
  346. podpis pokladn
  347. SOUBOR
  348.  !eP_KODY
  349. iP_NAME
  350. eW_TISKARNABOLD_ON
  351. NAP_BOLDON
  352. nBOLD_OFF
  353. P_BOLDOFF
  354. DOUBLE
  355. P_DBST_ON
  356. NDOUBLE
  357. _oP_DBST_OFFNLQ
  358. lsP_LETRQUALDRAFT
  359. yP_DRAFT
  360. nSUB_OFF
  361. cP_SUBOFF
  362. dSUPER_ON
  363. sP_SUPERON
  364. SUPER_OFF
  365. P_SUPEROFFHUSTE_ON
  366. P_10CPI
  367.  'P_COMPRESSHUSTE_OFF
  368. P_COMP_OFFPICA
  369. ucELITE
  370.  P_12CPI
  371. P_SUBON
  372. e RESET
  373. P_SETUP
  374. 1R8LPI
  375. P_8LPI
  376.    R6LPI
  377. uct=P_6LPI
  378.    CON
  379.  'NCON
  380. PRESSNEWPAGE
  381. FFP_NEWPAGE
  382. M_PARAM
  383. --PAR_POLE
  384. -POLE7
  385. --VOD
  386. --M7_KASA
  387. prP_KORUNY
  388. nHALER
  389. ve sPTEXT
  390.  obPHALER
  391. cPREVOD
  392. 1M4_ORGAN
  393. eIDENTIF
  394. =ZAVOD
  395. whPPNAZ
  396. NAZEV_ORG
  397. _KASA
  398. t TYP_DOK
  399. w/PFIRMA
  400.  @ PRILOH
  401. eaCIS_DOK
  402. 53DAT_AKT
  403.  mTOTOZ
  404. m+TEXT
  405. eVARIAB
  406. jednosto
  407. estset
  408. sedmset
  409. osmset
  410. dvacet
  411. pades
  412. sedmdes
  413. osmdes
  414. devades
  415. jeden
  416. jeden
  417. sedmn
  418. devaten
  419. deset
  420. nula 
  421.  korun 
  422.  korun 
  423. milionu
  424. jedna
  425. milion
  426. miliony
  427. milionu
  428.  koruna 
  429.  koruny 
  430.  korun 
  431. PTEXT
  432.  !eP_MINCE
  433. iPOCT
  434. NATAB1
  435. NATAB2
  436. nTAB3
  437. ZBYTEK
  438. M7_KASA
  439. _oHALER
  440. m7_kasa
  441. m7_meny
  442. M7_KASA
  443. !eM7_MENY
  444. iMENA
  445. eZOBR
  446. NAREKAP_MEN
  447. zobrf
  448. Detail
  449. Detail
  450. Funkce
  451. Funkce
  452. mod79d
  453.  Stav pokladny dne : F
  454. RIIS 7.9
  455. ' '+m7_meny.mena
  456. m7_meny.mena
  457. Za den: Po
  458. .stav
  459. '      '+str(m7_meny.stav_d,10,2)
  460. m7_meny.stav_d
  461.     P
  462. str(m7_meny.prij_d,10,2)
  463. m7_meny.prij_d
  464.      V
  465. str(m7_meny.vyd_d,10,2)
  466. m7_meny.vyd_d
  467.   Kon.stav
  468. str(m7_meny.zasoba,10,2)
  469. m7_meny.zasoba
  470. j.dokl.
  471. '     '+str(m7_meny.poc_pd,5)
  472. m7_meny.poc_pd
  473. d.dokl.
  474. '    '+str(m7_meny.poc_vd,5)
  475. m7_meny.poc_vd
  476. c: Po
  477. . stav
  478. '         '+str(m7_meny.stav_m,10,2)
  479. m7_meny.stav_m
  480.     P
  481. str(m7_meny.prij_m,10,2)
  482. m7_meny.prij_m
  483.      V
  484. str(m7_meny.vyd_m,10,2)
  485. m7_meny.vyd_m
  486.  Kon. stav
  487. str(m7_meny.zasoba,10,2)
  488. m7_meny.zasoba
  489. j.dokl.
  490. '     '+str(m7_meny.poc_pm,5)
  491. m7_meny.poc_pm
  492. d.dokl.
  493. '    '+str(m7_meny.poc_vm,5)
  494. m7_meny.poc_vm
  495. !ePOLEX
  496. iPROCX
  497. eRTOP
  498. NARBOT
  499. CLEFT
  500. nCRIGHT
  501. FREEZE
  502. ORDER
  503. JMENO
  504. _oHODN
  505. FFTITLE
  506. lsTITLECOLORF1
  507. UBOFF
  508. ER_ON
  509. UPERON
  510. ER_OFF
  511. PEROFFDETAIL
  512. F1PRG
  513.  'F4_JM
  514. RESSF4PRG
  515. F7_JM
  516. _OFFF7PRG
  517. ucF9KEY
  518.  F10_JM
  519. F10PRG
  520. DET_JM
  521. e DETPRG
  522. RAMECEK
  523. 1NAZEVT
  524.    TISKPRG
  525. t=PS_RETURN
  526. M7_MENY
  527.  'MENA
  528. SSZOBR
  529. FFPOC0
  530. OBSAHX
  531. _POLE
  532. --ENTER
  533. --PS_ZAZN
  534. --DATUM
  535. prNADPIS
  536. nLEVA
  537. ve sPRAVA
  538.  obHOR
  539. eMENU3
  540. =MOD_PSV
  541. whM7_KASA
  542.         - F9
  543.         - Esc
  544. edpis 
  545. Konec 
  546.       - 
  547.       - ^End,Esc
  548. Pohyb
  549. Konec 
  550. german
  551.  Zadej den: 
  552. datum
  553. c7_kasa+
  554. c7_kasa
  555. .stav:F
  556.  Kon.stav:
  557. j.doklad
  558. dej.doklad
  559. Detail
  560. Detail
  561. Funkce
  562. Funkce
  563. mod79d
  564. ehled pokladn
  565. ho den
  566. ku ke dni: F
  567. Hotovost dne: F
  568. RIIS 7.5
  569. '   '+ks.denik
  570. ks.denik
  571. s.dokl.
  572. '    '+str(ks.cis_dok,5)
  573. ks.cis_dok
  574. ' '+ks.typ_dok
  575. ks.typ_dok
  576.       P
  577. iif(substr(typ_dok,1,2)#'P',space(12),str(ks.kc,12,2))
  578. iif(substr(typ_dok,1,2)#'P',0,ks.kc)
  579.        V
  580. iif(substr(typ_dok,1,2)='V',str(ks.kc,12,2),space(12))
  581. iif(substr(typ_dok,1,2)='V',ks.kc,0)
  582. ks.str
  583. ks.str
  584. s.faktury 
  585. ks.variab
  586. ks.variab
  587. Identifikace
  588. ks.identif
  589. ks.identif
  590. ks.totoz
  591. ks.totoz
  592. ks.text
  593. ks.text
  594. Splatnost
  595. ' '+tran(ks.dat_spl,'@E')
  596. (ks.dat_spl   )
  597. KONEC1
  598. !eGERMAN
  599. iVYB_DEN
  600. M7_KASA
  601. nDATUM
  602. C7_KASA
  603. DAT_SPL
  604. POLEX
  605. PROCX
  606. _oRTOP
  607. FFRBOT
  608. lsCLEFT
  609. OLORCRIGHT
  610. yFREEZE
  611. nORDER
  612. cZAHL
  613. dJMENO
  614. sHODN
  615. TITLE
  616. TITLECOLORF1
  617. RESSF4
  618. _OFFF7
  619. DETAIL
  620. F1PRG
  621. e F4_JM
  622. F4PRG
  623. 1F7_JM
  624. F7PRG
  625.    F9KEY
  626. t=F10_JM
  627. F10PRG
  628.  'DET_JM
  629. SSDETPRG
  630. FFRAMECEK
  631. NAZEVT
  632. --RIIS
  633. -TISKPRG
  634. --PS_RETURN
  635. M7_MENY
  636. --PRIJC
  637. prVYDC
  638. nPRIJD
  639. ve sVYDD
  640.  obPOCP
  641. cPOCV
  642. 1ANSI
  643. eTYP_DOK
  644. whPPOC
  645. STAV_M
  646. HOT_KC
  647. t HOT_DEV
  648. w/TR_HL1
  649.  @ TR_HL2
  650. eaTR_HL3
  651. 53CIS_DOK
  652.  mDOKLAD
  653. etENTER
  654. wPS_ZAZN
  655.  OBRZ
  656. ,2NADPIS
  657. ' LEVA
  658. ladPRAVA
  659.    HOR
  660.  prDOL
  661. y 'MOD_PSV
  662. u7_obru
  663. denik
  664. u7_obru
  665. c7_obru
  666. RIIS 7.5
  667. c7_obru+
  668. RIIS 7.5
  669. u7_obru
  670. denik
  671. u7_obru
  672. c7_obru
  673. RIIS 7.5
  674. c7_obru+
  675. RIIS 7.5
  676. a7_obru
  677. denik
  678. a7_obru
  679. c7_obru
  680. RIIS 7.5
  681. c7_obru
  682. edpis nebyl nalezen
  683. mod_fun
  684. mod79d
  685. edpis
  686. ident_den+'  '
  687. ident_den
  688. Doklad
  689. str(doklad,6)
  690. doklad
  691. cis_pol
  692. cis_pol
  693. '  '+c7_obru->ucet
  694. c7_obru->ucet
  695. c7_obru.nstr
  696. c7_obru.nstr
  697.             MD 
  698. str(c7_obru->md,15,2)
  699. c7_obru->md
  700.            DAL
  701. str(c7_obru->dal,15,2)
  702. c7_obru->dal
  703. str(c7_obru->cis_g,5)
  704. c7_obru->cis_g
  705. Splatno
  706. dtoc(c7_obru->splatnost)
  707. c7_obru->splatnost
  708. !eW_CG
  709. iM7_KASA
  710. eCIS_G
  711. NAUZAV
  712. MOD_SYS
  713. nU7_OBRU
  714. DENIK
  715. T_SPL
  716. SKUPINA
  717. C7_OBRU
  718. FFM7_OBRU
  719. lsUCT
  720. ORM7_UCTO
  721. yPLAT_OBDOBPLAT_POK
  722. cA7_OBRU
  723. sHLASKA
  724. MOD_FUN
  725. ORMENUPU
  726. POLEX
  727.  'PROCX
  728. RESSRTOP
  729. _OFFCLEFT
  730. ucCRIGHT
  731.  FREEZE
  732. ORDER
  733. e JMENO
  734. 1TITLE
  735. TITLECOLORF1
  736. --F10
  737. -DETAIL
  738. --F1PRG
  739. F4_JM
  740. --F4PRG
  741. prF7_JM
  742. nF7PRG
  743. ve sF9KEY
  744.  obF10_JM
  745. cF10PRG
  746. 1DET_JM
  747. eDETPRG
  748. =RAMECEK
  749. whNAZEVT
  750. TISKPRG
  751. t PS_RETURN
  752.  @ F8
  753. eaNADPIS
  754.  mMOD_PSV
  755. m+OBSAH
  756.       - ^End,Esc
  757. Konec 
  758. MOD79D
  759. k='V%
  760. DETAIL
  761. PROCP1
  762. FUNKCE
  763. b,ii? 
  764. ariab)C$
  765. TDOKLAD
  766. m7_<%
  767. PREVOD
  768. MOD79SP
  769. say$E
  770. REKAP_MEN
  771. MENUD
  772. MENU3
  773. VYBER_DEN
  774. ZOB_OBR2
  775. MENUPU
  776. W:\07\
  777. MOD79D.FXP
  778. W:\07\MOD79D.PRG
  779.