home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 May / PCW596.iso / polskie / insert / rachmist / system.arj / OPIS.APP (.txt) < prev    next >
Encoding:
MS Visual FoxPro App  |  1996-01-21  |  17.1 KB  |  333 lines
  1. opisy
  2. opisy
  3. opis.spr
  4.  Opisy zdarzeF
  5.  gospodarczych 
  6. opisy
  7. opisy
  8. opis.spr with 1, m.nr
  9. opis.spr with 2, m.nr
  10. Nie ma F
  11. adnych opis
  12. nazwa:H='Tre'+pl[16]+pl[11]+' opisu'
  13. nazwa
  14.  Opisy zdarzeF
  15.  gospodarczych 
  16. opisy
  17. opisy
  18. kasujopis
  19. opis.spr with 2, m.nr
  20. Nie ma F
  21. adnych zapis
  22. nazwa:H='Tre'+pl[16]+pl[11]+' opisu'
  23. nazwa
  24.  Opisy zdarzeF
  25.  gospodarczych 
  26. opisy
  27. opisy
  28. opis.spr with 0, m.nr
  29. opis.spr with 1, m.nr
  30. opis.spr with 2, m.nr
  31. kasujopis
  32. nazwa:H='Tre'+pl[16]+pl[11]+' opisu'
  33. nazwa
  34. IOPEN
  35. RIBBON
  36. MAINPATH
  37. OPISY
  38. STARTLIS
  39. LISTA
  40. CLEARRIB
  41. TAKNIE
  42. KASUJOPIS
  43. _curobj=objnum(m.exiterr)
  44. _curobj=objnum(m.exitok)
  45. TALKz
  46. COMPATIBLEz
  47. _qz90oj1k7
  48.  Opis zdarzenia 
  49. _qz90oj1k7
  50. @K XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
  51. @*HT Zapisz
  52. @*HT Zaniechaj
  53. _qz90oj1k7
  54. RIBBON
  55. CURRAREA
  56. TALKSTAT
  57. COMPSTAT
  58. _QZ90OJ1K7NAZWA
  59. J1K7EXITOK
  60. _QZ90OJ1TOEXITERR
  61. opisy
  62. NUMER
  63. _QZ90OJ1TO
  64. exactz
  65. _lowzorzec
  66. _lolistabr
  67. _lowzorzec
  68. TYTUL
  69. DLWZORCA
  70. MYILOSC
  71. ALIAS
  72. TOMENTER
  73. TOMPODGLADINFO
  74. CZYBLOK
  75. POMOC
  76. POLA1
  77. INDEX1
  78. POLA2
  79. INDEX2
  80. POLA3
  81. INDEX3
  82. POLA4
  83. INDEX4
  84. POLA5
  85. INDEX5
  86. NUMER
  87. IOPEN
  88. EXACT
  89. WIERSZE
  90. _LOWZORZEC_LOLISTABRSETRIB
  91. ZECPROPRZEGLASTARTPRO
  92. CLEARRIB
  93. {DNARROW}
  94. {UPARROW}
  95. {TAB}
  96.  Koniec danych 
  97.  PoczF
  98. tek danych 
  99.  Koniec danych 
  100.  PoczF
  101. tek danych 
  102.  Zapis jest zablokowany 
  103. DO &tomenter
  104. DO &tompodglad
  105. STRING
  106. MYQUIT
  107. WIERSZE
  108. _LOWZORZECDLWZORCA
  109. LOKATA
  110. MYSZR
  111. MYSZC
  112. GLADTCOL
  113. TOMENTER
  114. CZYBLOK
  115. BLOKADA
  116. MYILOSC
  117. PROPRZEGLATOMPODGLADSETRIB
  118. POMOC
  119. NUMER
  120. PROWYKAZ
  121. POLA1
  122. INDEX1
  123. POLA2
  124. INDEX2
  125. ZECPOLA3
  126. INDEX3
  127. INDEX4
  128. POLA5
  129. INDEX5
  130. LADMYILOSC
  131. SET ORDER TO &kolejnosc
  132. _olistast
  133. BROWSE NOWAIT WINDOW _olistast     IN WINDOW _lolistabr TITLE "Dane" COLOR SCHEM 10     FIELDS &pola    
  134. {INS}
  135. KOLEJNOSC
  136. _OLISTAST
  137. ZECTCOL
  138. STARTPRO
  139. PROPRZEGLA
  140. PROWYKAZ
  141. exactz
  142.  Razem 
  143. _lowzorzec
  144. _olistabr
  145. _losumy
  146. TYTUL
  147. DLWZORCA
  148. MYILOSC
  149. ALIAS
  150. TOMPLUS
  151. TOMENTER
  152. TOMDRUK
  153. TOMPODGLADTOMMINUS
  154. TOMBLOKUJ
  155. TOMANULUJ
  156. POMOC
  157. SUMGDZIE
  158. SUMILE
  159. SUMWYR
  160. POLA1
  161. INDEX1
  162. POLA2
  163. INDEX2
  164. POLA3
  165. INDEX3
  166. POLA4
  167. INDEX4
  168. POLA5
  169. INDEX5
  170. NUMER
  171. IOPEN
  172. EXACT
  173. _LOSUMY
  174. _LOWZORZEC_OLISTABR
  175. SETRIB
  176. ZECREFRSUMY
  177. PRZEGLAD
  178. CLEARRIB
  179. {DNARROW}
  180. {UPARROW}
  181. {TAB}
  182.  Koniec danych 
  183.  PoczF
  184. tek danych 
  185.  Koniec danych 
  186.  PoczF
  187. tek danych 
  188.  MiesiF
  189. c jest zablokowany 
  190.  Zapis jest zablokowany 
  191. Nie moF
  192. esz poprawia
  193. DO &tomenter
  194. DO &tomenter
  195.  MiesiF
  196. c jest zablokowany 
  197.  Zapis jest zablokowany 
  198. Nie moF
  199. esz usuwa
  200. DO &tomminus
  201. do &tomminus
  202.  MiesiF
  203. c jest zablokowany 
  204. Nie moF
  205. esz dodawa
  206. DO &tomplus    
  207. do &tomplus    
  208. DO &tomdruk
  209. DO &tomblokuj
  210. DO &tomanuluj            
  211. DO &tompodglad
  212. STRING
  213. LOKATA
  214. WIERSZE
  215. MYQUIT
  216. MYSZR
  217. MYSZC
  218. SUMILE
  219. DLWZORCA
  220. DGLADTROW
  221. TOMENTER
  222. TOMBLOKUJ
  223. BLOKUJ
  224. BLOKADA
  225. REFRSUMY
  226. SETRIB
  227. POMOC
  228. _LOWZORZECTOMMINUS
  229. BLOKUJ
  230. TOMPLUS
  231. BLOKUJ
  232. MYILOSC
  233. ECPRZEGLAD
  234. TOMDRUK
  235. TOMANULUJ
  236. TOMPODGLAD
  237. NUMER
  238. WYKAZ
  239. POLA1
  240. INDEX1
  241. POLA2
  242. INDEX2
  243. POLA3
  244. INDEX3
  245. INDEX4
  246. POLA5
  247. INDEX5
  248. MYILOSC
  249. SET ORDER TO &kolejnosc
  250. BROWSE NOWAIT WINDOW _dlabrow     IN WINDOW _olistabr TITLE "Dane" COLOR SCHEM 10     FIELDS &pola    
  251. {INS}
  252. KOLEJNOSC
  253. _DLABROW
  254. SUM ALL &sumwyr TO ARRAY sumy FOR not poprawka and typ <> 50
  255. SUM ALL &sumwyr TO ARRAY sumy 
  256. Razem
  257. 99,999,999,999.99 
  258. LEJNOSC
  259. ILREC
  260. SUMWYR
  261. SUMILE
  262. TOMANULUJ
  263. _LOSUMY
  264. SUMGDZIE
  265. PRZEGLAD
  266. WYKAZ
  267. REFRSUMY
  268. @ srows()-1, 0 say replicate(" ", scols()-1 ) COLOR &col
  269. RIBBON
  270. SETRIB
  271. CLEARRIB
  272. m.xloc = m.xloc
  273. errors
  274. \<Nie
  275. \<Tak
  276. ECODE1
  277. DEFAULTANSY0
  278. OLDALIAS
  279. SYSPATH
  280. SERRWIN
  281. ERRCODE
  282. ERRORS
  283. MESSAGE
  284. @ wrows()-1, 0 say padr(m.text, wcols()-1," " ) COLOR &col
  285. WaitWin
  286. Za chwilF
  287.  dalszy ci
  288. g programu.
  289. DrukujF
  290. CierpliwoF
  291. ci. Mo
  292. e to potrwa
  293. ugo...
  294. ONOFF
  295. KOMUNIK
  296. WAITWIN
  297. CURSORz
  298. errors
  299.  WciF
  300. nij dowolny klawisz ...
  301. ECodeF
  302. SET CURSOR &curstat
  303. ECODE1
  304. ECODE2
  305. ECODE3
  306. OLDALIAS
  307. ILOSC
  308. CURSTAT
  309. SYSPATH
  310. ERRWIN
  311. ERRORS
  312. ERRCODE
  313. MESSAGE
  314. ..\OPIS\OPIS.PRG
  315. C:\KSIEGA\SYSTEM\
  316. ..\OPIS\OPIS.SPR
  317. ..\COMMON\STARTLIS.PRG
  318. ..\COMMON\LISTA.PRG
  319. ..\COMMON\CLEARRIB.PRG
  320. ..\COMMON\TAKNIE.PRG
  321. ..\COMMON\SETRIB.PRG
  322. ..\COMMON\CZEKAJ.PRG
  323. ..\COMMON\NOTICE.PRG
  324. OPIS.FXP
  325. OPIS.SPX
  326. STARTLIS.FXP
  327. LISTA.FXP
  328. CLEARRIB.FXP
  329. TAKNIE.FXP
  330. SETRIB.FXP
  331. CZEKAJ.FXP
  332. NOTICE.FXP
  333.