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