home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 07 / S737B.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1998-08-18  |  12KB  |  333 lines
  1. KONEC
  2. ay cS737BX
  3. s737b
  4. s737bd
  5. ehled  pokladn
  6. RIIS 7.37
  7. m_dat
  8. x_dat
  9. m_cis1
  10. x_cis1
  11. m7_pokl
  12. ident_pok
  13. m7_obrp
  14. cis_dok
  15. p_prist
  16. xp_prist
  17. m7_pokld
  18. ident_pok
  19. Pokladna
  20. ' '+ident_pok+'     '
  21. ident_pok
  22. ' '+pok_rada+'     '
  23. pok_rada
  24. zev pokladn
  25. Doklad
  26. ' '+str(doklad,5)
  27. doklad
  28. Dat.akt.
  29. tran(dat_akt,'@E')
  30. dat_akt
  31. Autor
  32. autor
  33. autor
  34. Aktual.
  35. aktual
  36. aktual
  37. POLEX
  38. ay cFREEZE
  39. T CRTOP
  40. O &coRBOT
  41. CLEFT
  42. ****CRIGHT
  43. ***F1
  44. *******F2
  45. *******F3
  46. *******F4
  47. *******F6
  48. procedPROCX
  49. ENTER
  50. reenDETAIL
  51. doDET_JM
  52. RAMECEK
  53. olNAZEVT
  54. 0,25 NADPIS
  55.  15LEVA
  56.   @ 1PRAVA
  57.  15,HOR
  58. t coloM_DAT
  59. /b,bX_DAT
  60. volbM_CIS1
  61.   @X_CIS1
  62. romM7_POKL
  63. leIDENT_POK
  64. M7_OBRP
  65. 4,CIS_DOK
  66.  'P_PRIST
  67.  XP_PRIST
  68. vM7_POKLD
  69. eZAHL
  70. JMENO
  71. caseI
  72. se vMOD_PSV
  73. mod_psv
  74. P_PRIST
  75.  cPRIHLAS
  76.  CMOD_SYS
  77. coM7_POKLD
  78. OPRAVA
  79. *PS_RETURN
  80. MOD_PSV
  81. RIIS 7.37
  82. imu v
  83. ru nelze prov
  84. t opravy z
  85. imu t
  86.  nelze prov
  87. t opravy z
  88. set color to b/w
  89. set color to bg/n
  90. set color to w+/bg
  91. set color to b/bg,w+/rb
  92. set color to w+/b
  93. set color to w/n
  94. &barvau
  95. CPODMV
  96. IHLAS
  97.  CCPODMS
  98. coAUTOR
  99. MM_AUTOR
  100. *AKTUAL
  101. DAT_AKT
  102. *ZMENA
  103. ****NOVY_Z
  104. ***ANSI
  105. ***W_ID_POK
  106. dIDENT_POK
  107. W_RADA
  108. eenPOK_RADA
  109. oW_DOKLAD
  110. DOKLAD
  111. olW_TEXT
  112. 0,25 W_AKTUAL
  113. 5W_DAT_AKT
  114. W_AUTOR
  115. 5,JMENO_C
  116. WJMENO_C
  117. oRADEK_C
  118. ,bSLOUPEC_C
  119.   @P_ZOB
  120. romQ1
  121. NT_POK
  122. PRIST
  123. POKLD
  124. caseQ11
  125. se vQ12
  126.   CISELNIK
  127. do zobPOCET
  128. in mDOP1
  129. c witDOP2
  130.   if sCOUNT
  131. w_idZAKAZNIK
  132.  POMOC
  133. na =Y
  134.      RAD
  135.   exit
  136. therwiKONTROLA
  137.  BARVAS
  138.    BARVAR
  139.   BARVAZ
  140. resBARVAU
  141. eenBARVAN
  142. BARVAH
  143. rBARVA
  144. *!**KS
  145. ***M7_POKLD
  146. *MENU
  147. *PORADI
  148. ***KONEC
  149. ****X
  150. proceR
  151. nap_hoZ
  152. rameteU
  153. p_zob
  154. _zob='w_A
  155.   ZMENY
  156. &barva
  157.  Aktualizace pokladn
  158. Pokladna 
  159. zev pokladny
  160. Pokladn
  161. zev pokladn
  162. Posledn
  163. slo dokladu
  164. Aktualizoval
  165. Autor
  166. Aktualizace
  167. &barvau
  168. 99999
  169. W_ID_POK
  170. cM7_POKL
  171.  CM7_POKLD
  172. oTEXT
  173. W_RADA
  174. *W_TEXT
  175. W_DOKLAD
  176. *ZMENA
  177. ****W_AKTUAL
  178. *MM_AUTOR
  179. *W_DAT_AKT
  180. W_AUTOR
  181. &barvau
  182. w_id_pok
  183. @ 12,38 &vloz w_id_pok picture '@!X'
  184. w_rada
  185. @ 15,38 &vloz w_rada picture '@!X'  
  186. w_text
  187. @ 16,38 &vloz w_text pict '@X'
  188. _POKL
  189. POKLD
  190. oP_ZOB
  191. W_ID_POK
  192. OKLAD
  193. ****ZMENA
  194. *W_AKTUAL
  195. *MM_AUTOR
  196. W_DAT_AKT
  197. DAT_AKT
  198. PROC1
  199. do proc&y
  200. do zmen&y with 'get'
  201. do zmen&y with 'say'
  202. Pokladn
  203. adu nelze zru
  204. it, existuje obrat
  205. it pr
  206. ci beze zm
  207. n? (a/N)
  208. KONEC
  209. _POKL
  210. POKLD
  211. ****R
  212. _AUTOR
  213. NAP_HOD
  214. P_ZOB
  215. VOLBA
  216. oM7_OBRP
  217. W_ID_POK
  218. lW_RADA
  219. HLASKA
  220. 25 M7_POKLD
  221. 5NOVY_Z
  222. S737B
  223. 5,IDENT_POK
  224. POK_RADA
  225. oW_DOKLAD
  226. bDOKLAD
  227. W_TEXT
  228.   @TEXT
  229. romW_AKTUAL
  230. eAKTUAL
  231. W_DAT_AKT
  232. DAT_AKT
  233.  'W_AUTOR
  234.  AUTOR
  235. vPROC1
  236. casePOCET
  237. se vQ
  238.   K_UDAJU
  239.  OK_C
  240.  ULOZ
  241. o zobZMENA
  242. n mMM_AUTOR
  243. Identifikace pokladny mus
  244. t vypln
  245. Identifikace pokladn
  246. ady doklad
  247. t vypln
  248. Pokladn
  249. ada doklad
  250.  existuje, duplicita
  251. Pokladn
  252. ada doklad
  253.  existuje, duplicita
  254. zev pokladn
  255. ady doklad
  256. t uveden
  257. cW_ID_POK
  258. CHLASKA
  259. W_RADA
  260. ***ST_ZAZ
  261. *NOVY_Z
  262. *IDENT_POK
  263. POK_RADA
  264. W_TEXT
  265. oM7_POKLD
  266. M7_POKLD
  267. cZMENA
  268. CIDENT_POK
  269. W_ID_POK
  270. POK_RADA
  271. *W_RADA
  272. *W_TEXT
  273. ***DAT_AKT
  274. *AKTUAL
  275. *MM_AUTOR
  276. colora
  277. set color to &color
  278. cCOLOR
  279. T_POK
  280.       - 
  281.                  - ^PgDn
  282.                  - ^Home
  283.        - F10
  284.       - ^End,Esc
  285. Pohyb
  286. Funkce
  287. Konec
  288. colora
  289. SET COLOR TO &col
  290. CMESS
  291. ehled pokladen 
  292.  Konec 
  293. mod_proc
  294. cVOLBA
  295. CST_ID
  296. W_ID_POK
  297. ZOBR_POKL
  298. MOD_PROC
  299. ZMENA
  300. *PROC1
  301. w_id_pok
  302. mod_proc
  303. Pro toto pole neexistuje pomocn
  304. ehled hodnot
  305. P_ZOB
  306. cST_ID
  307. CW_ID_POK
  308. ZOBR_POKL
  309. MOD_PROC
  310. ZMENA
  311. HLASKA
  312. *S737BX
  313. HomeP
  314. S737BD
  315. OPRAVA
  316. PORADI
  317. PROC1
  318. troly
  319. ZMEN1
  320. ZMENY
  321. t m7_
  322. K_UDAJU
  323. k+w_ra
  324. HLASKA
  325.       
  326. a withx&
  327. VOLBA
  328. aduh'
  329. NAP_HOD
  330. X:\OBEC\07\
  331. S737B.FXP
  332. X:\OBEC\07\S737B.PRG
  333.