home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 04 / MOD45D.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1998-10-29  |  35KB  |  705 lines
  1. mod_lib
  2. ehled  v
  3. ech  adres  organizac
  4. RIIS 4.5
  5. mod45d
  6. vol_tisk
  7. Zadejte I
  8. vod, k
  9. |...........|..|.
  10. zobr_akt
  11. m_param
  12. m_cis1
  13. x_cis1
  14. TYP_OSLOV 
  15. c_oslov
  16. TYP_OSLOV 
  17. c_oslov
  18. hodnota
  19. m4_dop_d
  20. m4_organ
  21. m4_uc_o
  22. m4_adr
  23. zavod
  24. zavod
  25. kod_adr+ ' '
  26. kod_adr
  27. zev organizace
  28. nazev_org
  29. nazev_org
  30. zev organizace 2
  31. nazev_org2
  32. nazev_org2
  33. Funkce
  34. funkce
  35. funkce
  36. Ulice
  37. ulice
  38. ulice
  39. mesto
  40. mesto
  41. m4_organ.stat_dod+ ' '
  42. m4_organ.stat_dod
  43. jmeno
  44. jmeno
  45. Typ osl.
  46. '   '+typ_oslov+'   '
  47. typ_oslov
  48. Telefon
  49. telefon
  50. telefon
  51. lnopis
  52. dalnopis
  53. dalnopis
  54. E-mail
  55. e_mail
  56. e_mail
  57. Dopr.dispozice 1
  58. m4_dop_d.dopr_inst1
  59. m4_dop_d.dopr_inst1
  60. Dopr.dispozice 2
  61. m4_dop_d.dopr_inst2
  62. m4_dop_d.dopr_inst2
  63. P_SETUP
  64.   P_RESET
  65. P_6LPI
  66. e vP_8LPI
  67.    P_10CPI
  68. skP_12CPI
  69.   P_16CPI
  70. asP_20CPI
  71. n P_BOLDON
  72. tP_BOLDOFF
  73. P_ULINEON
  74. P_ULINEOFFP_ITALON
  75. tP_ITALOFF
  76. P_SUPERON
  77. P_SUPEROFFP_SUBON
  78.   P_SUBOFF
  79. oP_DBST_ON
  80. P_DBST_OFFP_LETRQUALP_DRAFT
  81. P_COMP_OFFP_WIDT_ON
  82. P_WIDT_OFFP_HEIG_ON
  83. P_HEIG_OFFP_NEWPAGE
  84. P_KODY
  85. .. MOD_LIB
  86. od_sys RAD
  87.   copy SLO
  88. adr foX_ORG1
  89. c.zX_ORG2
  90.   X_OSL
  91. elecX_JM
  92.      X_FCE
  93. _adrX_UL
  94.     sX_ME
  95. ationX_PSC
  96. _oslX_ST
  97. o c_oPOLEX
  98.    FREEZE
  99.    LEVA
  100. consoPRAVA
  101.    HOR
  102. set prDOL
  103.  RAMECEK
  104. p_NAZEVT
  105.    RIIS
  106. p_dbsNADPIS
  107.    PROCX
  108.     F1
  109. bel forF2
  110. r2 to pF3
  111. er nocoF4PRG
  112.    F6
  113.  set coF7
  114.    set F9KEY
  115.  offF9KEY1
  116.   ?F10
  117. st_offDETAIL
  118. DET_JM
  119.  usENTER
  120.     SPACEBAR
  121. rM_PARAM
  122. naPICO
  123.     ICO
  124. elect PZAVOD
  125.   ZAVOD
  126. o toFIRMA
  127.     PODNIK
  128. 4_aM_CIS1
  129.    X_CIS1
  130.   C_OSLOV
  131. olHODNOTA
  132.   TEXT
  133. on = S_RIIS
  134.    M4_DOP_D
  135. vM4_ORGAN
  136.  M4_UC_O
  137. onM4_ADR
  138.    JM
  139.   retJMENO
  140.     UL
  141.  ULICE
  142. w_tiME
  143.  MESTO
  144. do nPS
  145. v_prn iPSC
  146. _lib wTE
  147. w_tisk
  148. TELEFON
  149.  DALNOPIS
  150.     FAX
  151.     zauSTAT
  152.  KOD_ADR
  153.  ZAHL
  154. +HODN
  155.     I
  156.  cleMOD_PSV
  157. 52OBSAH
  158.    @f
  159. C_OZNAC.DBF2
  160. C_OZNAC
  161. ehled 
  162. tek (102x36)mm x 1 
  163. tek (102x36)mm x 2 
  164. lka (114x162)mm 
  165. lka (162x229)mm 
  166. lka (229x324)mm 
  167. lka (109x219)mm 
  168. vodka 
  169. vodka do ciziny 
  170.  pouk
  171.  Adresn
  172. stky 
  173.  Konec 
  174. mod_psv
  175. mod_lib
  176.  Prob
  177.  tisk 
  178.  ... 
  179. c_adr
  180. c_adr
  181. adr1(!9
  182. mod_lib
  183.  Prob
  184.  tisk 
  185.  ... 
  186. c_adr
  187. c_adr
  188. adr2(!9
  189. mod_lib
  190.  Prob
  191.  tisk ob
  192. lky ... 
  193. c_adr
  194. c_adr
  195. c_oznac.dbf
  196. mod_lib
  197.  Prob
  198.  tisk ob
  199. lky ... 
  200. c_adr
  201. c_adr
  202. c_oznac.dbf
  203. mod_lib
  204.  Prob
  205.  tisk ob
  206. lky ... 
  207. c_adr
  208. c_adr
  209. c_oznac.dbf
  210. mod_lib
  211.  Prob
  212.  tisk ob
  213. lky ... 
  214. c_adr
  215. c_adr
  216. c_oznac.dbf
  217. mod_lib
  218.  Prob
  219.  tisk pr
  220. vodky ... 
  221. c_adr
  222. c_adr
  223. mod_lib
  224.  Prob
  225.  tisk pr
  226. vodky ... 
  227. c_adr
  228. c_adr
  229. mod_lib
  230.  Prob
  231.  tisk pouk
  232. zky ... 
  233. c_adr
  234. c_adr
  235. mod_lib
  236.  Prob
  237.  tisk l
  238.  ... 
  239. c_adr
  240. c_adr
  241. adr4(!9
  242. NAB_OBR
  243.   VOLBA
  244.  vMOD_PSV
  245.   W_TISK
  246. skNASTAV_PRNMOD_LIB
  247. asZAU
  248. n MOD_SYS
  249. tC_ADR
  250. C_OZNAC
  251. ZAZNAM
  252. OFFTYP_OSLOV
  253. C_OSLOV
  254. P_RESET
  255. P_DBST_ON
  256.   P_DBST_OFFM4_ADR
  257. X_KON
  258. FFNASTAVENI
  259. NTRGPZAZ
  260. FFPS_RETURN
  261. .. AD3
  262.   AD4
  263. set color to b/w
  264. set color to w+/w
  265. Nebyl vlo
  266. dek !
  267. mod_fun
  268. Jste na prvn
  269. mod_fun
  270. Jste na posledn
  271. mod_fun
  272. set procedure to &procx
  273. do &f9prg
  274. set procedure to &cselfproc
  275. set procedure to &ctiskproc
  276. do &f4prg
  277. set procedure to &cselfproc
  278. mod_psv
  279. BARVA1
  280.   BARVA2
  281. PS_RETURN
  282. PORADI1
  283. skHELP
  284. V_PRNUK
  285. asHMEZ
  286. n DMEZ
  287. tLMEZ
  288. OFFKLIC
  289. M_SCR
  290. RESET
  291. ST_ON
  292. STREC
  293.   TXT
  294. T_OFFHLASKA
  295. MOD_FUN
  296. Z_AKT
  297. F9PRG
  298. HLEDEJ
  299. RETURN
  300. CTISKPROC
  301. CSELFPROC
  302. TRIDENI
  303. OBR_V
  304. VYBER
  305. MOD_PSV
  306. FFNEXIT
  307. W_POLE
  308.   PROC1
  309. &barva2
  310. &barva1
  311. &barva2
  312. O / Z
  313. v   : 
  314. d adresy  : 
  315. Organizace  : 
  316. Organizace2 : 
  317. Funkce      : 
  318. Ulice       : 
  319. sto       : 
  320.          : 
  321. t        : 
  322. Telefon     : 
  323. Typ oslov.: 
  324. Fax         : 
  325. no,tit.: 
  326. lnopis    : 
  327. E-mail    : 
  328. german
  329. GERMAN
  330.   ICO
  331. ZAVOD
  332. KOD_ADR
  333.   NAZEV_ORG
  334. NAZEV_ORG2FUNKCE
  335. asULICE
  336. n MESTO
  337. TELEFON
  338. FFTYP_OSLOV
  339. JMENO
  340. DALNOPIS
  341. E_MAIL
  342. ehled  slev  organizac
  343. RIIS 4.5
  344. mod45d
  345. Zadejte I
  346. |...........|..
  347. m4_organ
  348. m4_osl
  349. zavod
  350. zavod
  351. zev organizace
  352. m4_organ.nazev_org
  353. m4_organ.nazev_org
  354. Kateg.
  355. kategorie
  356. kategorie
  357. Hodnota
  358. hodnota_k+'   '
  359. hodnota_k
  360. Rozh.mno
  361. str(rozh_mnoz,10,2)+'   '
  362. rozh_mnoz
  363. % slevy
  364. str(sleva_proc,7,2)
  365. sleva_proc
  366. poznamka
  367. poznamka
  368. POLEX
  369.   PROCX
  370.   CLEFT
  371. CRIGHT
  372. RG2FREEZE
  373. asORDER
  374. n ZAHL
  375. tJMENO
  376. FFTITLE
  377. TITLECOLORPOC0
  378. NOPIS
  379. T_OFFF3
  380. F0PRG
  381. FFF1ON
  382. F1PRG
  383. F4_JM
  384. F4PRG
  385. TISKPRG
  386.   F7_JM
  387. F7PRG
  388. F9PRG
  389. F9KEY
  390. F9KEY1
  391. F10_JM
  392. FFF10PRG
  393. RAMECEK
  394.   RIIS
  395. _adrNAZEVT
  396.   sKLICO
  397. tionKLNAZ
  398. _oslSPACEBAR
  399. oTR_HL1
  400.    TRHL2
  401.    TRHL3
  402. onsoTRHL4
  403.    TR_HL5
  404.  prTRHL6
  405.  TRHL7
  406. p_TRHL8
  407.    TRHL9
  408. _dbsDET_JM
  409.    ENTER
  410.     DETAIL
  411. forDETPRG
  412. o pPS_LINE
  413. coPS_RETURN
  414. PS_ZAZN
  415.   LEVA
  416.  coPRAVA
  417.   set DOL
  418.  offNADPIS
  419.  ?M4_ORGAN
  420. M4_OSL
  421.  usZAVOD
  422.     I
  423. rMOD_PSV
  424. naOBSAH
  425. ehled  
  426. ch dispozic
  427. ehled podle I
  428. vodu 
  429. RIIS 4.5
  430. mod45d
  431. Zadejte I
  432. vod, k
  433. |...........|..|.
  434. Funkce
  435. Qfunkce
  436. m4_organ
  437. m4_uc_o
  438. zavod
  439. zavod
  440. kod_uctu+' '
  441. kod_uctu
  442. ustav
  443. ustav
  444. zev organizace
  445. m4_organ.nazev_org
  446. m4_organ.nazev_org
  447. Zp.platby
  448. zp_platby+ '        '
  449. zp_platby
  450. Plat.term
  451. str(plat_term,3)+'      '
  452. plat_term
  453. mena+' '
  454. POLEX
  455.   PROCX
  456.   CLEFT
  457. CRIGHT
  458. RG2FREEZE
  459. asORDER
  460. n ZAHL
  461. tJMENO
  462. FFTITLE
  463. TITLECOLORPOC0
  464. NOPIS
  465. T_OFFF3
  466. F0PRG
  467. FFF1ON
  468. F1PRG
  469. F4_JM
  470. F4PRG
  471. TISKPRG
  472.   F7_JM
  473. F7PRG
  474. F9PRG
  475. F9KEY
  476. F9KEY1
  477. F10_JM
  478. FFF10PRG
  479. RAMECEK
  480.   RIIS
  481. _adrNAZEVT
  482.   sKLICO
  483. tionKLNAZ
  484. _oslSPACEBAR
  485. oTR_HL1
  486.    TRHL2
  487.    TRHL3
  488. onsoTRHL4
  489.    TR_HL5
  490.  prTRHL6
  491.  TRHL7
  492. p_TRHL8
  493.    TRHL9
  494. _dbsDET_JM
  495.    ENTER
  496.     DETAIL
  497. forDETPRG
  498. o pPS_LINE
  499. coPS_RETURN
  500. PS_ZAZN
  501.   LEVA
  502.  coPRAVA
  503.   set DOL
  504.  offNADPIS
  505.  ?M4_ORGAN
  506. M4_UC_O
  507. usZAVOD
  508.     I
  509. rMOD_PSV
  510. naOBSAH
  511.     -
  512. ehled:
  513.  podle I
  514. O a z
  515. vodu 
  516.  podle 
  517.  Konec 
  518. ehled podle I
  519. vodu 
  520. Zadejte I
  521. vod,k
  522. |...........|..|.
  523. ehled podle 
  524. Zadejte 
  525. |........................
  526.   KONEC
  527. VOL11
  528.   ICO
  529. KLICO
  530. RG2PS_RETURN
  531. TITLE
  532. n F9KEY
  533. tF9KEY1
  534. CMASTERORDUCET
  535. LASERF
  536. @ prow(),pcol() say p_reset + chr(27)+"&a90P" + p_dbst_on + p_letrqual
  537. LASERF
  538. W_TISKARNARAD
  539. P_RESET
  540.   P_DBST_ON
  541. P_LETRQUALFIRMA
  542. X_ORG1
  543. RNANAZEV_ORG
  544. X_ORG2
  545. NAZEV_ORG2X_OSL
  546. ORG2C_OSLOV
  547.   JMENO
  548. _OFFX_JM
  549. X_FCE
  550. FUNKCE
  551. FFX_UL
  552. ULICE
  553. MESTO
  554. FFX_PSC
  555. P_DBST_OFFP_DRAFT
  556. LASERF
  557. @ prow(),pcol() say p_reset + chr(27)+"&a90P" + p_dbst_on + p_letrqual + p_heig_on
  558. LASERF
  559. W_TISKARNARAD
  560. P_RESET
  561.   P_DBST_ON
  562. P_LETRQUALP_HEIG_ON
  563. FIRMA
  564. RNAX_ORG1
  565. RNANAZEV_ORG
  566. X_ORG2
  567. NAZEV_ORG2X_OSL
  568. ORG2C_OSLOV
  569.   TEXT
  570. _OFFJMENO
  571. X_FCE
  572. FFFUNKCE
  573. ULICE
  574. FFMESTO
  575. X_PSC
  576. T_OFFP_DBST_OFFP_DRAFT
  577. P_HEIG_OFFd
  578. P_RESET
  579. NAP_DBST_ON
  580. P_LETRQUALP_HEIG_ON
  581. P_WIDT_ON
  582. TRQUALFIRMA
  583. X_ORG1
  584. RNANAZEV_ORG
  585. EV_ORG
  586. X_ORG2
  587. NAZEV_ORG2X_OSL
  588. ORG2C_OSLOV
  589.   TEXT
  590. _OFFJMENO
  591. X_FCE
  592. FFFUNKCE
  593. ULICE
  594. FFMESTO
  595. X_PSC
  596. T_OFFP_DBST_OFFP_DRAFT
  597. P_HEIG_OFFP_WIDT_OFFM
  598. LASERF
  599. @ prow(),pcol() say p_reset + chr(27)+"&a90P" + p_dbst_on + p_letrqual
  600. LASERF
  601. W_TISKARNARAD
  602. ST_ON
  603. TRQUALP_RESET
  604. P_DBST_ON
  605. P_LETRQUALFIRMA
  606. X_ORG1
  607. RNANAZEV_ORG
  608. X_ORG2
  609. NAZEV_ORG2X_OSL
  610. ORG2C_OSLOV
  611. G2TEXT
  612.   JMENO
  613. _OFFX_JM
  614. X_FCE
  615. FUNKCE
  616. FFX_UL
  617. ULICE
  618. MESTO
  619. FFX_PSC
  620. P_DBST_OFFP_DRAFT
  621. SKARNAP_RESET
  622. P_DBST_ON
  623. FIRMA
  624. ST_ON
  625. TRQUALME
  626. NAZEV_ORG
  627. JMENO
  628. tULICE
  629. RNAMESTO
  630. P_DBST_OFF
  631. SKARNAP_RESET
  632. P_16CPI
  633. P_DBST_ON
  634. FIRMA
  635. QUALM4_UC_O
  636. NAZEV_ORG
  637. ULICE
  638. _OFFMESTO
  639. ORG2JMENO
  640. P_DBST_OFFP_10CPI
  641. SKARNAP_RESET
  642. P_16CPI
  643. P_DBST_ON
  644. FIRMA
  645. QUALPS
  646. tNAZEV_ORG
  647. ULICE
  648. MESTO
  649. _OFFSTAT
  650. ORG2P_DBST_OFFP_10CPI
  651.  Polo
  652. ky pro tisk adresy: 
  653. zev organizace   
  654. zev organizace2  
  655. Osloven
  656. no     
  657. Funkce    
  658. Ulice     
  659. sto     
  660.        
  661. t      
  662.  Konec: ^End 
  663. zev organizace  
  664. zev organizace2 
  665. Osloven
  666. no     
  667. Funkce    
  668. Ulice     
  669. sto     
  670.        
  671. t      
  672.  Lze zadat pouze: X - ano 
  673. SKARNAMM
  674. X_ORG1
  675. X_ORG2
  676. X_OSL
  677. QUALX_JM
  678. X_FCE
  679. tX_ME
  680. X_PSC
  681. _OFFX_KON
  682. ORG2TXT
  683. OFFHLASKA
  684. FFMOD45D
  685. VOL_TISK
  686. ZOBR_AKT
  687. Z_AKT
  688. _orga
  689. PORADI1
  690. PROC1
  691. co+ z>/
  692. ZOBR_SLEV
  693. ZOBR_UCTU
  694. QFUNKCE
  695. zahl(po
  696. mension
  697. olex)
  698. n hodn(lW
  699. i = 1
  700. i)='ico
  701. NASTAVENI
  702. X:\OBEC\04\
  703. MOD45D.FXP
  704. X:\OBEC\04\MOD45D.PRG
  705.