home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / MOD_CHAR.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1996-05-23  |  40KB  |  603 lines
  1. PS_linef
  2. PS_stablef
  3. PS_returnf
  4. RecLevelf
  5. mod_psv
  6. FFFZ^D
  7. colora
  8. C_PSVFF
  9. F1onf
  10. F1prgf
  11. tiskprgf
  12. F4prgf
  13. F4prgf
  14. F7_jmf
  15. F7prgf
  16. F9prgf
  17. F9Keyf
  18. F10_jmf
  19. F10prgf
  20. UNDEF
  21. detailf
  22. det_jmf
  23. Detprgf
  24. enterf
  25. UNDEF
  26. char_sf
  27. char_uf
  28. Podnikf
  29. _Firmaf
  30. NazevTf
  31. riisf
  32. FFZFZ
  33. nMasterOrder
  34. PS_returnf
  35. RTopf
  36. RBotf
  37. CLeftf
  38. CRightf
  39. Freezef
  40. poc0f
  41. Titlef
  42. TitleColorf
  43. SET ORDER TO &cMasterIndex           
  44. SET PROCEDURE TO &cSelfProc
  45. colora
  46. Ramecekf
  47. SET PROCEDURE TO &procX
  48. DO &F1prg
  49. SET PROCEDURE TO &cSelfProc
  50. SET PROCEDURE TO &procX
  51. DO &F9prg
  52. SET PROCEDURE TO &cSelfProc
  53. SET PROCEDURE TO &cTiskProc
  54. DO &f4prg
  55. SET PROCEDURE TO &cSelfProc
  56. SET PROCEDURE TO &procX
  57. DO &Detprg
  58. SET PROCEDURE TO &cSelfProc
  59. SET PROCEDURE TO &procX
  60. DO &F7prg
  61. SET PROCEDURE TO &cSelfProc
  62. SET PROCEDURE TO &procX
  63. DO &F10prg
  64. SET PROCEDURE TO &cSelfProc
  65. SET PROCEDURE TO &procX
  66. DO &CH_S_prg
  67. SET PROCEDURE TO &cSelfProc
  68. SET PROCEDURE TO &procX
  69. DO &CH_U_prg
  70. SET PROCEDURE TO &cSelfProc
  71. SELECT &cMasterSel
  72. SET INDEX TO &cIndexList           
  73. nMasterOrder
  74. SET COLOR TO &Gcol
  75. SET PROCEDURE TO &procX
  76. CSELFPROC
  77. COLDCOLOR
  78. CPS_DBF
  79. NSCRCNT
  80. eNTOPSCR
  81. nNCURSCR
  82.   CTISKPROC
  83. rnNR2
  84. **NC1
  85. **NC2
  86. **NIR1
  87. **NIR2
  88. *NIC1
  89. *NIC2
  90. KARNANICX
  91. uLINTF1
  92. LEXTF1
  93. NALLPZAZ
  94. NSAVEZAZ
  95. NSAVEREC
  96. oNBROWPTR
  97. NDBFPTR
  98.  LSHORTJMP
  99. STAB_I
  100. STAB_J
  101. dSTAB_RCC
  102. ASTAB_TMP
  103. LOA_RCC
  104. kiCNT_RCC
  105. LNEWREF
  106. diLSTABLE
  107. LISLOAD
  108. LNEWLOAD
  109. tLISCOUNT
  110. LNEWCNT
  111. o CPODMV
  112. xteCPODMS
  113. NHEADLEN
  114.  CMASTERINDNJMP
  115. t mNPOS
  116.   NMENUPOS
  117.  GCOL
  118. e nazNREC
  119. ithNEXIT
  120. nazeTISK
  121. estCINDEXLISTNMASTERORDCMASTERSELPS_LINE
  122. wiPS_STABLE
  123. PS_RETURN
  124. RECLEVEL
  125.  F1ON
  126. rF1PRG
  127. d_leF4
  128. tPROCX
  129. F4PRG
  130. TISKPRG
  131. eF7_JM
  132.   * F7PRG
  133. KARNA
  134. AF9PRG
  135. kF9KEY
  136. cF10_JM
  137. RNAF10PRG
  138.  *DETAIL
  139. ectDET_JM
  140.    DETPRG
  141. ddoENTER
  142.  m_CHAR_S
  143. CHAR_U
  144. _dbPODNIK
  145. _FIRMA
  146. NAZEVT
  147. NADPIS
  148. CLEFT
  149. CRIGHT
  150. PRAVA
  151. FREEZE
  152. TITLE
  153. TITLECOLORZAHLAVI
  154. ACACHE
  155. ACACHDIR
  156. POLEX
  157. PADZAHL
  158. MAPINIT
  159. AUTOBUILD
  160. SETCACHE
  161. CLRCACHE
  162. RAMECEK
  163. HLAVA
  164. SETF1
  165. REPOS
  166. REFALL
  167. CNTALL
  168. LITEON
  169. STABILIZE
  170. COUNTER
  171. LITEOFF
  172. SKIPN
  173. CACHEDN
  174. CACHEUP
  175. VYBER
  176. TRIDENI
  177. HLEDEJ
  178. VOLBA
  179. TISKTEST
  180. RCLEAR
  181. CHKPAR
  182. colora
  183. Typ tisk
  184. SET COLOR TO &col
  185.   Nelze tisknout - p
  186.  sestava  
  187.   Prob
  188.  tisk sestavy...  
  189. BRITISH
  190. ELFPROC
  191. ZAHLT1
  192. eADDSPACE
  193. nADDLEN
  194.   RAD
  195. KPROC
  196. rnPISMO
  197. **STRANA
  198. **SCR
  199. **NHEADLEN
  200. *ZAHL
  201. *AMAP
  202. *TYP_TISK
  203. X_OBR
  204. uMESS
  205. BRITISH
  206. TISK_HL
  207. TISK_S
  208. FPROC
  209. PODNIK
  210. eNAZEVT
  211. nPISMO
  212. KPROC
  213. ZAHLT1
  214. @PROW(),PCOL() SAY &jmenot +' '+IIF(i=nHeadLen,"",addspace)
  215. FPROC
  216. EOFMARK
  217. eJMENOT
  218. nPATAL
  219. KPROC
  220. rnNHEADLEN
  221. *JMENO
  222. **AMAP
  223. **ZAHLT1
  224. *STRANA
  225.    a 
  226. .AND.
  227. nebo 
  228. Konec
  229. FFFFF
  230. znamu F
  231. BRITISH
  232. xget = &prom
  233. xGetf
  234.   .  .  #
  235. xGetf
  236. @nRow,nCol GET xGet PICTURE &pictX
  237. xGetf
  238. CToD('F
  239. Stop - d
  240. lku podm
  241. nky ji
  242.  nelze zv
  243. Upper(
  244. nMasterOrder
  245.   Prob
  246. ...  
  247. INDEX ON RECNO() TO &cPs_dbf FOR &cPodmV ADDITIVE
  248. SET ORDER TO &cMasterIndex
  249. INDEX ON &tmp TO &cPs_dbf FOR &cPodmV ADDITIVE
  250.   Prob
  251. ...  
  252. INDEX ON &cPodmS TO &cPs_dbf ADDITIVE
  253.   Prob
  254. ...  
  255. INDEX ON &cPodmS TO &cPs_dbf FOR &cPodmV ADDITIVE
  256. nMasterOrder
  257.  Podm
  258. nce neodpov
  259. znam !  Stiskni cokoliv...  
  260. NOLDVOLBA
  261. NMENUPTR
  262. NMENUPOS
  263. AZAHLLEN
  264. KPROC
  265. ADLEN
  266. *COLDPODMV
  267. *OLDORDER
  268. *NVOLBA
  269. *NROW
  270. ANCOL
  271. uRELACE
  272. PICTX
  273. oXOPER
  274.  AREL
  275. ALOGIC
  276. AOPER
  277. dAZAHL
  278. AAZAHLMAP
  279. NHEADLEN
  280. iCPODMV
  281. diNR2
  282. tHODN
  283. o ZAHL
  284. eFMENU
  285. BRITISH
  286.  NTYP
  287. DANSI
  288.   STOPSEL
  289.  mCPODMS
  290. NMASTERORDMESS
  291.  CMASTERINDREPOS
  292. RORDRCLEAR
  293. azeVRESET
  294. estREFALL
  295. ISTCLRCACHE
  296. DCNTALL
  297.     a
  298. Konec
  299. FFFFF
  300. xProm = &cProm
  301. xPromf
  302. Str(FF
  303. DTOC(FF
  304. Stop - T
  305.  nelze zv
  306. nMasterOrder
  307.   Prob
  308. ...  
  309. INDEX ON RECNO() TO &cPs_dbf FOR &cPodmV ADDITIVE
  310. SET ORDER TO &cMasterIndex
  311. INDEX ON &tmp TO &cPs_dbf FOR &cPodmV ADDITIVE
  312.   Prob
  313. ...  
  314. INDEX ON &cPodmS TO &cPs_dbf ADDITIVE
  315.   Prob
  316. ...  
  317. INDEX ON &cPodmS TO &cPs_dbf FOR &cPodmV ADDITIVE
  318. NOLDVOLBA
  319. NMENUPTR
  320. NMENUPOS
  321. AZAHLLEN
  322. KPROC
  323. ADLEN
  324. *COLDPODMS
  325. PODMV
  326. NVOLBA
  327. *NROW
  328. *NCOL
  329. ACPROM
  330. XPROM
  331. uCTYP
  332. XOPER
  333. ALOGIC
  334. AZAHL
  335.  NHEADLEN
  336. CPODMS
  337. ANIC1
  338. iHODN
  339. diZAHL
  340. FMENU
  341. STOPSEL
  342. tAZAHLDEL
  343. CPODMV
  344. NMASTERORDMESS
  345. CMASTERINDREPOS
  346. ORDREFALL
  347.   CLRCACHE
  348.     a
  349. Konec
  350. colora
  351.  Volba polo
  352. SET COLOR TO &col
  353. NOLDVOLBA
  354. NMENUPTR
  355. NMENUPOS
  356. AZAHLLEN
  357. KPROC
  358. ADLEN
  359. *NVOLBA
  360. *XOPER
  361. ACWHEAD
  362. uCBASE
  363. FREEZSTR
  364. ALOGIC
  365. POLEX
  366. FREEZE
  367. AZAHL
  368. dNIC1
  369. ANIC2
  370. NHEADLEN
  371. iZAHL
  372. iFMENU
  373. MAPINIT
  374. AZAHLDEL
  375. tAUTOBUILD
  376. NVOLBA
  377. NUPTR
  378. NUPOS
  379. HLLEN
  380. eLCLR
  381. KPROC
  382. AZAHLLEN
  383. nNOLDVOLBA
  384. NMENUPTR
  385. NMENUPOS
  386. AZAHL
  387. AZAHLLEN
  388. AZAHL
  389. colora
  390. SET COLOR TO &col
  391. CMESS
  392. NWAIT
  393. HLLEN
  394.   SCR
  395. KPROC
  396. LDVOLBA
  397. NUPTR
  398. NUPOS
  399. colora
  400. SET COLOR TO &col
  401. CMESS
  402. HLLEN
  403.   NIR1
  404. nNIC1
  405. colora
  406. SET COLOR TO &col
  407. CMESS
  408. NWAIT
  409. HLLEN
  410.   COL
  411. NSTARTT
  412. *LISCOUNT
  413. ACOUNTER
  414. INFOCNT
  415. LISCOUNT
  416. NALLPZAZ
  417. SET COLOR TO &TitleColor
  418. TITLE
  419. nNIR2
  420.   NC2
  421. INFOCNT
  422. nZAHLAVI
  423. ZAHLAVI
  424. eNCURSCR
  425.   NC1
  426. NTOPSCR
  427. nLen = LEN( &tmp )
  428. MOD_PS - Proc PadZahl: Polo
  429.  rozm
  430. r okna !
  431. POLEX
  432. eJMENO
  433. nZAHL
  434.   NIC2
  435. MOD_PS - Proc AUTOBUILD: P
  436.  sestava !
  437. CFREVETA
  438. eCFREZAHL
  439. nVETA
  440.  ZAHLAVI
  441. nNTOPSCR
  442. NCURSCR
  443. NHEADLEN
  444. *NSCRCNT
  445. ANICX
  446. JMENO
  447. uFREEZE
  448. NAZEVT
  449. XXXXXXXXX
  450. Vyhled
  451. XXXXXXXXX
  452. XXXXXX
  453. Konec
  454. - F10
  455. - <Enter>
  456. - Esc,^End
  457. EVETA
  458. EZAHL
  459. F7_JM
  460. F10_JM
  461. DETAIL
  462. DET_JM
  463. LTOGGLE
  464. eNIR1
  465. nHELP
  466. LNEWREF
  467. LSTABLE
  468. NDBFPTR
  469. NBROWPTR
  470. RCLEAR
  471. SKIPN
  472. eNIR1
  473. nNBROWPTR
  474.  NDBFPTR
  475. LNEWCNT
  476. LISCOUNT
  477. NALLPZAZ
  478. INFOCNT
  479. BRITISH
  480. aCache(stab_i+1) = PADR( &stab_tmp, nIC2 - nIC1 + 1 )
  481. LNEWREF
  482. STAB_RCC
  483. NDBFPTR
  484. eSTAB_J
  485. nNIR2
  486.  NIR1
  487. STAB_I
  488. nSTAB_TMP
  489. NCURSCR
  490. ACACHDIR
  491. ACACHE
  492. *LSTABLE
  493. ABRITISH
  494. SET ORDER TO &OldOrder
  495. EWREF
  496. AB_RCC
  497. OLDORDER
  498. eCPODMV
  499. nLNEWCNT
  500.  NSAVEZAZ
  501. NALLPZAZ
  502. nCNT_RCC
  503. NSAVEREC
  504. LSHORTJMP
  505. LSTABLE
  506. *LISCOUNT
  507. NBROWPTR
  508. ACACHE
  509. BRITISH
  510. aCache(nBrowPtr) = PADR( &tmp, nIC2 - nIC1 + 1 )
  511. ACACHDIR
  512. NBROWPTR
  513. eBRITISH
  514. nVETA
  515.  NCURSCR
  516. nNIR1
  517. ACACHE
  518. PS_LINE
  519. NHEADLEN
  520. POLEX
  521. SET ORDER TO &cMasterIndex
  522. IndexK = &cIx
  523. IndexKf
  524. COLORa
  525.  Vyhled
  526.   .  .  #
  527. znam neexistuje ! 
  528. SET ORDER TO &OldOrder
  529. znam nen
  530. ru ! 
  531. SET ORDER TO &cMasterIndex
  532. SET ORDER TO &OldOrder
  533. INDEXK
  534. nSCR1
  535. NWIDE
  536. *REC2
  537. ANJMP
  538. uRKEY
  539. NGETCOL
  540. OLDORDER
  541. NMASTERORDF9KEY
  542. AMESSW
  543. NDBFPTR
  544. iSKIPN
  545. iNIR1
  546. NBROWPTR
  547. REFALL
  548. tCLRCACHE
  549. INFOCNT
  550. LITEON
  551. ACACHDIR
  552. nACACHDIR
  553. ACACHE
  554. eACACHDIR
  555. ACACHE
  556. eACACHDIR
  557. eLINTF1
  558. CLEFT
  559. nCRIGHT
  560. *SETF1
  561. OFFLINE
  562.   Tisk
  563. rna nen
  564. ipravena !  
  565. MESSW
  566. TISK_HL
  567. TISK_S
  568. VYBER
  569. TRIDENI
  570. VOLBA
  571. FMENU
  572. AZAHLDEL
  573. STOPSEL
  574. MESSW
  575. INFOCNT
  576. RAMECEK
  577. RCLEAR
  578. ZAHLAVI
  579. PADZAHL
  580. AUTOBUILD
  581. HLAVA
  582. SETF1
  583. REFALL
  584. VRESET
  585. REPOS
  586. CNTALL
  587. STABILIZE
  588. COUNTER
  589. LITEOFF
  590. LITEON
  591. SKIPN
  592. MAPINIT
  593. HLEDEJ
  594. CLRCACHE
  595. SETCACHE
  596. CACHEUP
  597. CACHEDN
  598. CHKPAR
  599. TISKTEST
  600. L:\OBEC\
  601. MOD_CHAR.FXP
  602. L:\OBEC\MOD_CHAR.PRG
  603.