home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 May / PCW596.iso / polskie / insert / rachmist / druk.arj / PEWPOJAZ.APP (.txt) < prev    next >
MS Visual FoxPro App  |  1996-01-21  |  37KB  |  517 lines
  1. kursorek
  2. PREDRUK
  3. LICZNIK
  4. MODULY
  5. OFFSET
  6. KURSOREK
  7. PRINTER_FEDIALOG
  8. NA_EKRAN
  9. PRINT_ERR
  10. P_PAPER
  11. NEW_PAGE
  12. GETSTOP
  13. P_RESET
  14. pdwzorn
  15. pdwzor
  16. ewreman
  17. ewpprzej
  18. ewprach
  19. ewspvat
  20. ewspnaz
  21. ewzakvat
  22. ewzakdet
  23. katup
  24. ewsrtr
  25. RODZAJ
  26. PTOWAR_1
  27. _PTOWAR1
  28. PINNE_1
  29. _PINNE1
  30. MULTI1_1
  31. WZAKUP_1
  32. _WZAKUP1
  33. WKOSZTY_1
  34. _WKOSZTY1
  35. WREKLAMA_1_WREKLAMA1E9
  36. WWYPLATA_1_WWYPLATA1E10
  37. WINNE_1
  38. _WINNE1
  39. MULTI_1
  40. A1INNE_1
  41. _INNE1
  42. PINNE1
  43. WPODATEK_1_WPODATEK1WPRZEROB_1_WPRZEROB1WNATURA_1
  44. _WNATURA1
  45. WSPRZET_1
  46. _WSPRZET1
  47. WARTOSC_1
  48. ZUS_S_1
  49. FUND_S_1
  50. WYN_S_1
  51. DIF_S_1
  52. ZUS_K_1
  53. FUND_K_1
  54. WYN_K_1
  55. NET22_1
  56. VAT22_1
  57. NET12_1
  58. VAT12_1
  59. NET7_1
  60. VAT7_1
  61. NET0_1
  62. NETZW_1
  63. PODATEK_1
  64. BRUTTO_1
  65. NETINW1_1
  66. NETINW2_1
  67. VATINW2_1
  68. NETINW3_1
  69. VATINW3_1
  70. NETINNE1_1NETINNE2_1VATINNE2_1NETINNE3_1VATINNE3_1PRZYCHOD_1ZAKUPY_1
  71. KOSZTY_1
  72. WYDATKI_1
  73. DOCHOD_1
  74. KWOTAODP11RATAODP11
  75. KWOTAODP21RATAODP21
  76. kursorek
  77. bilans
  78. umowa
  79. dowolny
  80. ESCSTAT
  81. DIALOG
  82. KURSOREK
  83. IOPEN
  84. ALIASB
  85. DOWOLNY
  86. PRINT_ERR
  87. ESCON
  88. TAKNIE
  89. GETSTOP
  90. _mies
  91. ODMIANA
  92. NAZWA
  93. IOPEN
  94. _MIES
  95. SYSPATH
  96. podmioty
  97. podmioty
  98. m.nazwa=podmioty.&pole
  99. KTORY
  100. NAZWA
  101. OTWARTE
  102. PODMIOTY
  103. PODMPATH
  104. SYMBOL
  105. WaitWin
  106. errors
  107. errors
  108. komunikF
  109. ONOFF
  110. CZEKAC
  111. KOMUNIK1
  112. KOMUNIK2
  113. KOMUNIK3
  114. MIOTY
  115. ILOSC
  116. IOPEN
  117. WOLNY
  118. WAITWIN
  119. ERRORS
  120. SYSPATH
  121. ERRCODE
  122. MESSAGE
  123. NA_EKRAN
  124. PYTANIE
  125. NA_EKRAN
  126. WYSUW
  127. DIALOG
  128. TAKNIE
  129. GETSTOP
  130. PRINTER_FE
  131. FAKTURY KORYGUJ
  132. RACHUNKI KORYGUJ
  133. FAKTURY VAT
  134. RACHUNKI UPROSZCZONE
  135. ERMES
  136. ERLIN
  137. ERLINNO
  138. ERDZIEN
  139. ERRHAND
  140. FEGETSTOP
  141. P32P028
  142. P32P033
  143. P32P038
  144. P32P043
  145. P32P046
  146. P32P049
  147. P32P052
  148. FEP32P055
  149. P32P058
  150. P32P063
  151. P32P068
  152. P32P072
  153. P32P077
  154. P32P029
  155. P32P034
  156. P32P039
  157. P32P059
  158. P32P064
  159. P32P069
  160. P32P073
  161. FEP32P078
  162. P32P032
  163. P32P037
  164. P32P042
  165. P32P045
  166. P32P048
  167. P32P051
  168. P32P054
  169. FEP32P057
  170. P32P062
  171. P32P067
  172. P32P071
  173. P32P076
  174. P32P081
  175. P32P086
  176. P32P089
  177. P32P094
  178. P32P099
  179. P32P090
  180. P32P095
  181. P32P100
  182. P32P116
  183. P32P120
  184. P32P122
  185. P32P028
  186. P32P029
  187. P32P033
  188. P32P034
  189. P32P038
  190. P32P039
  191. P32P043
  192. FEP32P046
  193. P32P049
  194. P32P052
  195. P32P055
  196. P32P058
  197. P32P059
  198. P32P063
  199. P32P064
  200. P32P068
  201. P32P069
  202. P32P072
  203. P32P073
  204. P32P077
  205. P32P078
  206. P32P086
  207. P32P089
  208. P32P090
  209. P32P094
  210. P32P095
  211. P32P099
  212. P32P100
  213. FEGETSTOP
  214. ESCOUT
  215. GET_MIES
  216. DANE_FIRMY
  217. DIALOG
  218. PRINTER_FE
  219. WYSUW
  220. NEW_PAGE
  221. PODTYTUL
  222. MY_ERRH
  223. SUM_85
  224. SUM_86
  225. SUM_88
  226. SUM_107
  227. SUM_108
  228. SUM_128
  229. SUM_DOCH
  230. SUM_DZIE
  231. m.xloc = m.xloc
  232. errors
  233. \<Nie
  234. \<Tak
  235. ECODE1
  236. DEFAULTANSY0
  237. OLDALIAS
  238. Dodaj
  239. Skok SYSPATH
  240. SERRWIN
  241. pERRCODE
  242. ..ERRORS
  243. ...MESSAGE
  244. errors
  245. komunikF
  246. QUEST
  247. KOMUNIK1
  248. KOMUNIK2
  249. TKOMUNIK3
  250. ILOSC
  251. IOPEN
  252. \<SYSPATH
  253. INFOTOM
  254. FOTOM
  255. ERRORS
  256. ERRCODE
  257. MESSAGE
  258. CZYTAK
  259. Brak dostepu do danych w sieci...
  260. UWAGA !!!
  261. Aby wykonaF
  262.  operacj
  263.  potrzeba wi
  264. cej pami
  265. ci operacyjnej.
  266. 80286
  267. W tym celu naleF
  268. y zmieni
  269.  komputer
  270. na 80386 (lub lepszy) z 4 MB pamiF
  271. W tym celu naleF
  272. y dokupi
  273. pamiF
  274. ci RAM lub inaczej skonfigurowa
  275.  komupter.
  276. UWAGA !!!
  277. NastapiF
  278. d systemowy.
  279. Uruchom program ADMIN i wykonaj operacjF
  280. PIERWSZA POMOC
  281. li pomimo u
  282. ycia opcji PIERWSZA POMOC 
  283.  powtarza
  284. to skontaktuj siF
  285.  z InsERT'em.
  286. Koniecznie TERAZ ZAPISZ:
  287. - operacje, ktF
  288. re wykonywa
  289.  przed wyst
  290. pieniem awarii;
  291. - poniF
  292. sze 6 linii ekranu:
  293. 2. FF
  294. 4. FF
  295. ERMES
  296. ERLIN
  297. ERLINNO
  298. ERDZIEN
  299. PRINT_ERR
  300. NOTICE
  301. ERRWIN
  302. SYSPATH
  303. ER_LIN
  304. ER_NO
  305. ER_MES
  306. ER_LIN1
  307. PR_NAME
  308. ER_DATE
  309. RACHVER
  310. CLEAR
  311. m.xloc = m.xloc
  312. errors
  313. \<Nie
  314. \<Tak
  315. ECODE1
  316. DEFAULTANSY0
  317. OLDALIAS
  318. SYSPATH
  319. SERRWIN
  320. ERRCODE
  321. ERRORS
  322. MESSAGE
  323. CURSORz
  324. errors
  325.  WciF
  326. nij dowolny klawisz ...
  327. ECodeF
  328. SET CURSOR &curstat
  329. ECODE1
  330. ECODE2
  331. ECODE3
  332. OLDALIAS
  333. ILOSC
  334. CURSTAT
  335. SYSPATH
  336. ERRWIN
  337. ERRORS
  338. ERRCODE
  339. MESSAGE
  340. LOCALENV7
  341. ksiega.fky2    
  342. ksiega
  343. MY_QUIT
  344. MAINMENU
  345. KSIEGA
  346. OBJTYPE
  347. OBJCODE
  348. HEIGHT
  349. WIDTH
  350. STYLE
  351. PICTURE
  352. ORDER
  353. UNIQUE
  354. COMMENT
  355. ENVIRON
  356. BOXCHAR
  357. FILLCHAR
  358. FLOAT
  359. STRETCH
  360. NOREPEAT
  361. RESETRPT
  362. PAGEBREAK
  363. RESETPAGE
  364. SWAPHEADER
  365. SWAPFOOTER
  366. EJECTBEFOR
  367. EJECTAFTER
  368. PLAIN
  369. SUMMARY
  370. ADDALIAS
  371. OFFSET
  372. TOPMARGIN
  373. BOTMARGIN
  374. TOTALTYPE
  375. RESETTOTAL
  376.   1 0                             97130                                         F                        F      FFFFT  0  0  0     21                                                                                                                                 9 1                             18                                                                                                9 4                              2                                                                                                9 7                              2                                                                                                8 0                  16  19   1  1120                                           C                    FFF 0                   0 0  5 0                  18  15   3  1  1                                                                F                            5 0                  19   9  57  1  8                                                                F                            8 0                  20   9  65  1  3        21                                 N                    FFF 0                   0 0  8 0                  22  18   7  1 40                                           C                    FFF 0                   0 0  5 0                  24  12   2  1  3                                                                F                            8 0                  25   7  50  1 30                                           C                    FFF 0                   0 0  5 0                  28  15  26  1  1                                                                F                            7 7                      11   0  1122                                          =
  377.                     F                            7 7                      14   0  1122                                          =
  378.                     F                            7 7                      16   0  1122                                          =
  379.                     F                            7 7                      20   0  1122                                          =
  380.                     F                            7 7                      11   0 10  1                                          |
  381.                     F                            7 7                      11  88 10  1                                          |
  382.                     F                            8 0                  29  18   1  1  5        30                                 N                    FFF 0                   0 0  7 7                      11   6 10  1                                          |
  383.                     F                            7 7                      11  47 10  1                                          |
  384.                     F                            8 0                  31   0   0  1  1                                       34  C                    FFF 0                   0 0  8 0                  44   0   1  1 80                                           C                    FFF 0                   0 0  8 0                  46   3   1  1 25                                           C                    FFF 0                   0 0  8 0                  49   1   1  1 50                                           C                    FFF 0                   0 0  8 0                  56   2   1  1 40                                           C                    FFF 0                   0 0  5 0                  60   5  48  1 35                                                                F                            5 0                  62  12  19  1 10                                                                F                            5 0                  63  12  66  1  5                                                                F                            5 0                  64  15  69  1  1                                                                F                            8 0                  65  18  48  1 40                                           C                    FFF 0                   0 0  8 0                  67  18  89  1 20                                           C                    FFF 0                   0 0  7 7                      11 109 10  1                                          |
  385.                     F                            5 0                  68  12  97  1  5                                                                F                            5 0                  69  13  93  1 13                                                                F                            8 0                  70  18 110  1 11                                           C                    FFF 0                   0 0  7 7                      11 121 10  1                                          |
  386.                     F                            5 0                  72  12 111  1  9                                                                F                            5 0                  73  15  98  1  1                                                                F                            5 0                  74  15 115  1  1                                                                F                            5 0                  75   7  48  1  1                                                                F                           18          76        77                                            T                     78                                  1 0
  387. 8iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),120))
  388. "Strona: "
  389. _pageno + m.offset
  390. ALLTRIM(kursorek.wlasciciel)
  391. "Lp."
  392. >alltrim(get_mies(2,m.miesnr))+" "+ alltrim(str(m.roknr))+" r."
  393. Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ")
  394. 4Wywo
  395. anie funkcji new_page(.t.)
  396.   (kt
  397. ra wtedy wy
  398. wietla komunikat "W
  399.     kartk
  400.  ..itd." oraz wysuwa stron
  401. tylko w sytuacji, gdy:
  402. - drukarka przyjmuje pojedy
  403. cze kartki
  404. - dana strona nie jest stron
  405.  pierwsz
  406.    aktualnego raportu
  407. - raport nie jest wykonywany w trybie predruk (czyli tylko do pami
  408. dane_firmy(m.firmnr,'nazwa')
  409. Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ')
  410. dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ')
  411. odane_firmy(m.firmnr,'kod') +  iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ')
  412. %"E W I D E N C J A   P O J A Z D 
  413. ciciel"
  414. "Marka"
  415. ALLTRIM(kursorek.wlasciciel)
  416. ALLTRIM(kursorek.nr_rej)
  417. "Numer"
  418. "rejestracyjny"
  419. 7IIF( kursorek.pojemn == 1, "do 900 cm", "pow. 900 cm" )
  420. "Pojemno
  421.     m.beg_num
  422. OBJTYPE
  423. OBJCODE
  424. HEIGHT
  425. WIDTH
  426. STYLE
  427. PICTURE
  428. ORDER
  429. UNIQUE
  430. COMMENT
  431. ENVIRON
  432. BOXCHAR
  433. FILLCHAR
  434. FLOAT
  435. STRETCH
  436. NOREPEAT
  437. RESETRPT
  438. PAGEBREAK
  439. RESETPAGE
  440. SWAPHEADER
  441. SWAPFOOTER
  442. EJECTBEFOR
  443. EJECTAFTER
  444. PLAIN
  445. SUMMARY
  446. ADDALIAS
  447. OFFSET
  448. TOPMARGIN
  449. BOTMARGIN
  450. TOTALTYPE
  451. RESETTOTAL
  452.   1 0                             97130                                         F                        F      FFFFT  0  0  0     21                                                                                                                                 9 1                             18                                                                                                9 4                              2                                                                                                9 7                              2                                                                                                8 0                  16  19   1  1120                                           C                    FFF 0                   0 0  5 0                  18  15   3  1  1                                                                F                            5 0                  19   9  57  1  8                                                                F                            8 0                  20   9  65  1  3        21                                 N                    FFF 0                   0 0  8 0                  22  18   7  1 40                                           C                    FFF 0                   0 0  5 0                  24  12   2  1  3                                                                F                            8 0                  25   7  50  1 30                                           C                    FFF 0                   0 0  5 0                  28  15  26  1  1                                                                F                            8 0                  29  18   1  1  5        30                                 N                    FFF 0                   0 0  8 0                  31   0   0  1  1                                       34  C                    FFF 0                   0 0  8 0                  44   0   1  1 80                                           C                    FFF 0                   0 0  8 0                  46   3   1  1 25                                           C                    FFF 0                   0 0  8 0                  49   1   1  1 50                                           C                    FFF 0                   0 0  8 0                  56   2   1  1 40                                           C                    FFF 0                   0 0  5 0                  60   5  48  1 35                                                                F                            5 0                  62  12  19  1 10                                                                F                            5 0                  63  12  66  1  5                                                                F                            5 0                  64  15  69  1  1                                                                F                            8 0                  65  18  48  1 40                                           C                    FFF 0                   0 0  8 0                  67  18  89  1 20                                           C                    FFF 0                   0 0  5 0                  68  12  97  1  5                                                                F                            5 0                  69  13  93  1 13                                                                F                            8 0                  70  18 110  1 11                                           C                    FFF 0                   0 0  5 0                  72  12 111  1  9                                                                F                            5 0                  73  15  98  1  1                                                                F                            5 0                  74  15 115  1  1                                                                F                            5 0                  75   7  48  1  1                                                                F                            7 4                      11   0 10  7                                          
  453.                     F                            7 4                      11   6 10 42                                          
  454.                     F                            7 4                      11  47 10 42                                          
  455.                     F                            7 4                      11  88 10 22                                          
  456.                     F                            7 4                      11 109 10 13                                          
  457.                     F                            7 4                      14   0  3122                                          
  458.                     F                            5 0                  76  14 109  1  1                                                                F                            5 0                  77  14 121  1  1                                                                F                            5 0                  78  16 109  1  1                                                                F                            5 0                  79  16 121  1  1                                                                F                            5 0                  80  14  88  1  1                                                                F                            5 0                  81  16  88  1  1                                                                F                            5 0                  82  14  47  1  1                                                                F                            5 0                  83  16  47  1  1                                                                F                            5 0                  84  14   6  1  1                                                                F                            5 0                  85  16   6  1  1                                                                F                            5 0                  86  14   0  1  1                                                                F                            5 0                  87  16   0  1  1                                                                F                            5 0                  88  11 109  1  1                                                                F                            5 0                  89  20 109  1  1                                                                F                            5 0                  90  11  88  1  1                                                                F                            5 0                  91  20  88  1  1                                                                F                            5 0                  92  11  47  1  1                                                                F                            5 0                  93  20  47  1  1                                                                F                            5 0                  94  11   6  1  1                                                                F                            5 0                  95  20   6  1  1                                                                F                           10 1                      28  26                                                                                                  18          96        97                                            T                     98                                  1 0
  459. 8iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),120))
  460. "Strona: "
  461. _pageno + m.offset
  462. ALLTRIM(kursorek.wlasciciel)
  463. "Lp."
  464. >alltrim(get_mies(2,m.miesnr))+" "+ alltrim(str(m.roknr))+" r."
  465. Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ")
  466. 4Wywo
  467. anie funkcji new_page(.t.)
  468.   (kt
  469. ra wtedy wy
  470. wietla komunikat "W
  471.     kartk
  472.  ..itd." oraz wysuwa stron
  473. tylko w sytuacji, gdy:
  474. - drukarka przyjmuje pojedy
  475. cze kartki
  476. - dana strona nie jest stron
  477.  pierwsz
  478.    aktualnego raportu
  479. - raport nie jest wykonywany w trybie predruk (czyli tylko do pami
  480. dane_firmy(m.firmnr,'nazwa')
  481. Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ')
  482. dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ')
  483. odane_firmy(m.firmnr,'kod') +  iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ')
  484. %"E W I D E N C J A   P O J A Z D 
  485. ciciel"
  486. "Marka"
  487. ALLTRIM(kursorek.wlasciciel)
  488. ALLTRIM(kursorek.nr_rej)
  489. "Numer"
  490. "rejestracyjny"
  491. 7IIF( kursorek.pojemn == 1, "do 900 cm", "pow. 900 cm" )
  492. "Pojemno
  493.     m.beg_num..\DRUK\WYDRUK.PRG
  494. C:\KSIEGA\SYSTEM\
  495. ..\DRUK\SKIP.PRG
  496. ..\DRUK\DRUKUTIL.PRG
  497. ..\COMMON\TAKNIE.PRG
  498. ..\COMMON\PYTANIE.PRG
  499. ..\COMMON\ERRHAND.PRG
  500. ..\COMMON\CZYTAK.PRG
  501. ..\COMMON\NOTICE.PRG
  502. ..\COMMON\CLEAR.PRG
  503. C:\KSIEGA\DRUKPOJ\
  504. WYDRUK.FXP
  505. SKIP.FXP
  506. DRUKUTIL.FXP
  507. TAKNIE.FXP
  508. PYTANIE.FXP
  509. ERRHAND.FXP
  510. CZYTAK.FXP
  511. NOTICE.FXP
  512. CLEAR.FXP
  513. DWPOJAZD.FRX
  514. DWPOJAZD.FRT
  515. NWPOJAZD.FRX
  516. NWPOJAZD.FRT
  517.