home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 May / PCW596.iso / polskie / insert / rachmist / system.arj / EWWYPOS.APP (.txt) < prev    next >
MS Visual FoxPro App  |  1996-02-14  |  28KB  |  480 lines
  1. ewwypos.spr
  2.  WyposaF
  3. enie 
  4. ewwypos
  5. ewwypos.spr with 1
  6. ewwypos.spr with 2
  7. Nie ma danych o wyposaF
  8. eniu 
  9. nazwa:R:25:H = ' Nazwa ', datanab:R:10 : H = 'Nabyto', cenazak:R:13:H ='Cena', datalikw:R:10:H = 'Likwidacja' 
  10. nazwa
  11.  WyposaF
  12. enie 
  13. ewwypos
  14. kaswypos
  15. ewwypos.spr with 2
  16. Nie ma danych o wyposaF
  17. eniu 
  18. nazwa:R:25:H = ' Nazwa ', datanab:R:10 : H = 'Nabyto', cenazak:R:13:H ='Cena', datalikw:R:10:H = 'Likwidacja' 
  19. nazwa
  20.  WyposaF
  21. enie 
  22. ewwypos
  23. ewwypos.spr with 0
  24. ewwypos.spr with 1
  25. druk.app with m.mainpath+m.podm+m.ewwypos,'ewwypos'
  26. ewwypos.spr with 2
  27. kaswypos
  28. cenazak
  29. nazwa:25:H = ' Nazwa ', datanab:10 : H = 'Nabyto', cenazak:P='99,999,999,999.99':13:H ='Cena', datalikw:R:10:H = 'Likwidacja' 
  30. nazwa
  31. druk.app
  32. ewwypos
  33. CR\GETRIBBON
  34. MMON\MAEWWYPOS
  35. LANS\LSTARTLIS
  36. .MAINPATH
  37. RPODM
  38. LISTA
  39. WDRUK
  40. LANS\ZCLEARRIB
  41. R\GETMIESIACE
  42. .MBLOKADA
  43. ANOTICE
  44. IDKSIEGI
  45. LTAKNIE
  46. .KASWYPOS
  47. .RL )
  48. _curobj=objnum(m.exiterr)
  49. _curobj=objnum(m.exitok)
  50. ewwypos
  51.  WyposaF
  52. enie 
  53. TALKz
  54. COMPATIBLEz
  55. m.nazwa
  56. m.datanab
  57. m.pozksiegi
  58. m.cenazak
  59. m.datalikw
  60. m.przylikw
  61. m.exitok
  62. m.exiterr
  63. _r7v0m21xj
  64. Zakup wyposazenia
  65. Zakup juF
  66.  w ksi
  67. _r7v0m21xj
  68. Przyczyna likwidacji:
  69. Nazwa               :
  70. Data nabycia        :
  71. Cena zakupu         :
  72. Data likwidacji     :
  73. Pozycja w ksiF
  74. dze   :
  75. @K 9999
  76. @K 99,999,999,999.99
  77. @*HN Zapisz
  78. @*HT Zaniechaj
  79. _r7v0m21xj
  80. IOPEN
  81. TMIES
  82. TYTWS
  83. RIBBON
  84. MAINPATH
  85. EWWYPOS
  86. CURRAREA
  87. TALKSTAT
  88. COMPSTAT
  89. __OBJS
  90. __NUMOBJ
  91. _R7V0M21XJDATANAB
  92. MIESNR
  93. IDKSIEGI
  94. POZKSIEGI
  95. CENAZAK
  96. NUMPOCZ
  97. GETNUMP
  98. FINDNUM
  99. NAZWA
  100. 21XJ_R7V0M22D6_R7V0M22EZDATALIKW
  101. PRZYLIKW
  102. EXITOK
  103. _R7V0M22I2EXITERR
  104. Musisz wpisaF
  105.  numer pozycji
  106. POZKSIEGI
  107. m.datanab
  108. m.datalikw
  109. SIEGI
  110. IDKSIEGI
  111. SETRIB
  112. RIBBON
  113. CENAZAK
  114. Musisz wpisaF
  115.  numer pozycji
  116. ewwypos
  117. ewwypos
  118. IDKSIEGI
  119. POZKSIEGI
  120. SIEGI
  121. IDENT
  122. _R7V0M22D6
  123. _R7V0M22EZ
  124. _R7V0M22I2
  125. exactz
  126. _lowzorzec
  127. _lolistabr
  128. _lowzorzec
  129. TYTUL
  130. DLWZORCA
  131. MYILOSC
  132. ALIAS
  133. TOMENTER
  134. TOMPODGLADINFO
  135. CZYBLOK
  136. POMOC
  137. POLA1
  138. INDEX1
  139. POLA2
  140. INDEX2
  141. POLA3
  142. INDEX3
  143. POLA4
  144. INDEX4
  145. POLA5
  146. INDEX5
  147. NUMER
  148. IOPEN
  149. EXACT
  150. WIERSZE
  151. _LOWZORZEC_LOLISTABRSETRIB
  152. ZECPROPRZEGLASTARTPRO
  153. CLEARRIB
  154. {DNARROW}
  155. {UPARROW}
  156. {TAB}
  157.  Koniec danych 
  158.  PoczF
  159. tek danych 
  160.  Koniec danych 
  161.  PoczF
  162. tek danych 
  163.  Zapis jest zablokowany 
  164. DO &tomenter
  165. DO &tompodglad
  166. STRING
  167. MYQUIT
  168. WIERSZE
  169. _LOWZORZECDLWZORCA
  170. LOKATA
  171. MYSZR
  172. MYSZC
  173. GLADTCOL
  174. TOMENTER
  175. CZYBLOK
  176. BLOKADA
  177. MYILOSC
  178. PROPRZEGLATOMPODGLADSETRIB
  179. POMOC
  180. NUMER
  181. PROWYKAZ
  182. POLA1
  183. INDEX1
  184. POLA2
  185. INDEX2
  186. ZECPOLA3
  187. INDEX3
  188. INDEX4
  189. POLA5
  190. INDEX5
  191. LADMYILOSC
  192. SET ORDER TO &kolejnosc
  193. _olistast
  194. BROWSE NOWAIT WINDOW _olistast     IN WINDOW _lolistabr TITLE "Dane" COLOR SCHEM 10     FIELDS &pola    
  195. {INS}
  196. KOLEJNOSC
  197. _OLISTAST
  198. ZECTCOL
  199. STARTPRO
  200. PROPRZEGLA
  201. PROWYKAZ
  202. exactz
  203.  Razem 
  204. _lowzorzec
  205. _olistabr
  206. _losumy
  207. TYTUL
  208. DLWZORCA
  209. MYILOSC
  210. ALIAS
  211. TOMPLUS
  212. TOMENTER
  213. TOMDRUK
  214. TOMPODGLADTOMMINUS
  215. TOMBLOKUJ
  216. TOMANULUJ
  217. POMOC
  218. SUMGDZIE
  219. SUMILE
  220. SUMWYR
  221. POLA1
  222. INDEX1
  223. POLA2
  224. INDEX2
  225. POLA3
  226. INDEX3
  227. POLA4
  228. INDEX4
  229. POLA5
  230. INDEX5
  231. NUMER
  232. IOPEN
  233. EXACT
  234. _LOSUMY
  235. _LOWZORZEC_OLISTABR
  236. SETRIB
  237. ZECREFRSUMY
  238. PRZEGLAD
  239. CLEARRIB
  240. {DNARROW}
  241. {UPARROW}
  242. {TAB}
  243.  Koniec danych 
  244.  PoczF
  245. tek danych 
  246.  Koniec danych 
  247.  PoczF
  248. tek danych 
  249.  MiesiF
  250. c jest zablokowany 
  251.  Zapis jest zablokowany 
  252. Nie moF
  253. esz poprawia
  254. DO &tomenter
  255. DO &tomenter
  256.  MiesiF
  257. c jest zablokowany 
  258.  Zapis jest zablokowany 
  259. Nie moF
  260. esz usuwa
  261. DO &tomminus
  262. do &tomminus
  263.  MiesiF
  264. c jest zablokowany 
  265. Nie moF
  266. esz dodawa
  267. DO &tomplus    
  268. do &tomplus    
  269. DO &tomdruk
  270. DO &tomblokuj
  271. DO &tomanuluj            
  272. DO &tompodglad
  273. STRING
  274. LOKATA
  275. WIERSZE
  276. MYQUIT
  277. MYSZR
  278. MYSZC
  279. SUMILE
  280. DLWZORCA
  281. DGLADTROW
  282. TOMENTER
  283. TOMBLOKUJ
  284. BLOKUJ
  285. BLOKADA
  286. REFRSUMY
  287. SETRIB
  288. POMOC
  289. _LOWZORZECTOMMINUS
  290. BLOKUJ
  291. TOMPLUS
  292. BLOKUJ
  293. MYILOSC
  294. ECPRZEGLAD
  295. TOMDRUK
  296. TOMANULUJ
  297. TOMPODGLAD
  298. NUMER
  299. WYKAZ
  300. POLA1
  301. INDEX1
  302. POLA2
  303. INDEX2
  304. POLA3
  305. INDEX3
  306. INDEX4
  307. POLA5
  308. INDEX5
  309. MYILOSC
  310. SET ORDER TO &kolejnosc
  311. BROWSE NOWAIT WINDOW _dlabrow     IN WINDOW _olistabr TITLE "Dane" COLOR SCHEM 10     FIELDS &pola    
  312. {INS}
  313. KOLEJNOSC
  314. _DLABROW
  315. SUM ALL &sumwyr TO ARRAY sumy FOR not poprawka and typ <> 50
  316. SUM ALL &sumwyr TO ARRAY sumy 
  317. Razem
  318. 99,999,999,999.99 
  319. LEJNOSC
  320. ILREC
  321. SUMWYR
  322. SUMILE
  323. TOMANULUJ
  324. _LOSUMY
  325. SUMGDZIE
  326. PRZEGLAD
  327. WYKAZ
  328. REFRSUMY
  329. DZIEN
  330. MIESIAC
  331. FULLYEAR
  332. @ srows()-1, 0 say replicate(" ", scols()-1 ) COLOR &col
  333. RIBBON
  334. SETRIB
  335. CLEARRIB
  336. CURSORz
  337. errors
  338.  WciF
  339. nij dowolny klawisz ...
  340. ECodeF
  341. SET CURSOR &curstat
  342. ECODE1
  343. ECODE2
  344. ECODE3
  345. OLDALIAS
  346. ILOSC
  347. CURSTAT
  348. SYSPATH
  349. ERRWIN
  350. ERRORS
  351. ERRCODE
  352. MESSAGE
  353. m.xloc = m.xloc
  354. errors
  355. \<Nie
  356. \<Tak
  357. ECODE1
  358. DEFAULTANSY0
  359. OLDALIAS
  360. SYSPATH
  361. SERRWIN
  362. ERRCODE
  363. ERRORS
  364. MESSAGE
  365. MONTH
  366. ROKNR
  367. MIESNR
  368. RETVAL
  369. IDENT
  370. @ wrows()-1, 0 say padr(m.text, wcols()-1," " ) COLOR &col
  371. cursorz
  372. _curobj = objnum( &getname )
  373. show get &getname
  374. &KeyEsc
  375. _curobj = objnum(&nextobj)
  376. &KeyF10
  377. _curobj = objnum(&prevobj)
  378. pointz
  379. @y0,x0 say guma color &GetColor    
  380. @y0,x0 say NewLook(PrzedKropka, ZaKropka) color &GetColor
  381. @y0,x0 say guma color &GetColor
  382. @y0,x0 say NewLook(PrzedKropka, ZaKropka) color &GetColor
  383. set cursor &Kursor
  384. ERDBEFOREPOINSTARTVALUEWITHMINUS
  385. WITHULAMEKCOLORSCHEMPREVOBJ
  386. NEXTOBJ
  387. __OBJS
  388. EBEFPOINTOLKEYESC
  389. ER_KEYF10
  390. ACHKURSOR
  391. SELECTCOLOGETCOLOR
  392. MFIRSTSHOT
  393. MOUSEQUIT
  394. FULLWIDTH
  395. ZAKROPKA
  396. KJESTKROPKAPRZEDKROPKMINUS
  397. ALUEOLDPK
  398. ALUEOLDMINUS
  399. KOLDZK
  400. _NEWLOOK
  401. KONIEC
  402.  _ UPDATEFULLMOUSEX
  403.  _ MOUSEY
  404. LLWIDTH
  405. __NUMOBJ
  406. _GETNAME
  407. _ BLAD
  408. ROPKA
  409. 999,999,999,999c
  410. pointz
  411. PRZED
  412. ERDWORKSTR
  413. INUPDATEFULLMINUS
  414. JESTKROPKAFULLWIDTH
  415. MINUS
  416. ERBEFOREPOINBEFPOINTOLWITHMINUS
  417. NEWLOOK
  418. UPDATEFULL
  419. miesiace
  420. IOPEN
  421. RETVAL
  422. MIESIACE
  423. MAINPATH
  424. MIESIAC
  425. FULLYEAR
  426. NUMCIAG
  427. NUMPOCZ
  428. ESN ?
  429. bi_work
  430. bi_work
  431. IDKSIEGI
  432. POZKSIEGI
  433. DATANAB
  434. RETVAL
  435. SCIEZ
  436. ANUMPOCZ
  437. ISFILE
  438. GETNUMP
  439. ROKNR
  440. MIESNR
  441. MAINPATH
  442. ATWODIG
  443. BI_WORK
  444. SIEGI
  445. EWWYPOS
  446. @L 99c
  447. ..\EWWYPOS\EWWYPOS.PRG
  448. C:\KSIEGA\SYSTEM\
  449. ..\EWWYPOS\EWWYPOS.SPR
  450. ..\COMMON\STARTLIS.PRG
  451. ..\COMMON\LISTA.PRG
  452. ..\COMMON\MAKEDATA.PRG
  453. ..\COMMON\CLEARRIB.PRG
  454. ..\COMMON\NOTICE.PRG
  455. ..\COMMON\TAKNIE.PRG
  456. ..\COMMON\MAXDAY.PRG
  457. ..\COMMON\IDENT.PRG
  458. ..\COMMON\SETRIB.PRG
  459. ..\COMMON\FULLYEAR.PRG
  460. ..\COMMON\GF.PRG
  461. ..\COMMON\GETNUMP.PRG
  462. ..\COMMON\FINDNUM.PRG
  463. ..\COMMON\TWODIG.PRG
  464. EWWYPOS.FXP
  465. EWWYPOS.SPX
  466. STARTLIS.FXP
  467. LISTA.FXP
  468. MAKEDATA.FXP
  469. CLEARRIB.FXP
  470. NOTICE.FXP
  471. TAKNIE.FXP
  472. MAXDAY.FXP
  473. IDENT.FXP
  474. SETRIB.FXP
  475. FULLYEAR.FXP
  476. GF.FXP
  477. GETNUMP.FXP
  478. FINDNUM.FXP
  479. TWODIG.FXP
  480.