home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 06 / MOD69D.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1997-01-27  |  22KB  |  501 lines
  1. mod69d
  2. mod69d1
  3. ehled   o d p r a c o v a n 
  4.    d o b y
  5. RIIS 6.9
  6. m6_mzd
  7. m6_kal_h
  8. m6_kal_z
  9. m6_zam
  10. m_cis1
  11. x_cis1
  12. m_dat
  13. x_dat
  14. m6_zam.prijmeni
  15. m6_zam.prijmeni
  16. no     
  17. m6_zam.jmeno
  18. m6_zam.jmeno
  19. DD odp
  20. str(m6_kal_h.dny_odp,6,2)
  21. m6_kal_h.dny_odp
  22. H odp.
  23. str(m6_kal_h.hod_odp,6,2)
  24. m6_kal_h.hod_odp
  25. str(m6_kal_h.dny_rd,5,2)
  26. m6_kal_h.dny_rd
  27. str(m6_kal_h.hod_rd,6,2)
  28. m6_kal_h.hod_rd
  29. DD PSV
  30. ' '+str(m6_kal_h.dny_psv,5,2)
  31. m6_kal_h.dny_psv
  32.  H PSV
  33. str(m6_kal_h.hod_psv,6,2)
  34. m6_kal_h.hod_psv
  35. DD OPV
  36. ' '+str(m6_kal_h.dny_opv,5,2)
  37. m6_kal_h.dny_opv
  38.  H OPV
  39. str(m6_kal_h.hod_opv,6,2)
  40. m6_kal_h.hod_opv
  41. DD STV
  42. ' '+str(m6_kal_h.dny_stv,5,2)
  43. m6_kal_h.dny_stv
  44.  H STV
  45. str(m6_kal_h.hod_stv,6,2)
  46. m6_kal_h.hod_stv
  47. DD nem
  48. ' '+str(m6_kal_h.dny_nem,5,2)
  49. m6_kal_h.dny_nem
  50. DD NV
  51. str(m6_kal_h.dny_nv,5,2)
  52. m6_kal_h.dny_nv
  53.   H NV
  54. str(m6_kal_h.hod_nv,6,2)
  55. m6_kal_h.hod_nv
  56. DD abs
  57. ' '+str(m6_kal_h.dny_abs,5,2)
  58. m6_kal_h.dny_abs
  59.  H abs
  60. str(m6_kal_h.hod_abs,6,2)
  61. m6_kal_h.hod_abs
  62. DD MF
  63. str(m6_kal_h.dny_mf,5,2)
  64. m6_kal_h.dny_mf
  65.   H MF
  66. str(m6_kal_h.hod_mf,6,2)
  67. m6_kal_h.hod_mf
  68. DD zap.
  69. '  '+str(m6_kal_h.dny_zapoc,5,2)
  70. m6_kal_h.dny_zapoc
  71. DD MPP
  72. ' '+str(m6_kal_h.dny_mpp,5,2)
  73. m6_kal_h.dny_mpp
  74. DD kal
  75. ' '+str(m6_kal_h.dny_kal,5,2)
  76. m6_kal_h.dny_kal
  77. DD prac
  78. '  '+str(m6_kal_h.dny_p,5,2)
  79. m6_kal_h.dny_p
  80. DD PS
  81. str(m6_kal_h.dny_s,5,2)
  82. m6_kal_h.dny_s
  83. DD NS
  84. str(m6_kal_h.dny_n,5,2)
  85. m6_kal_h.dny_n
  86. DD 67
  87. str(m6_kal_h.dny_,5,2)
  88. m6_kal_h.dny_
  89. Dat.akt.
  90. tran(m6_kal_h.dat_akt,'@E')
  91. m6_kal_h.dat_akt
  92. Autor
  93. m6_kal_h.autor
  94. m6_kal_h.autor
  95. Aktual
  96. m6_kal_h.aktual
  97. m6_kal_h.aktual
  98. POLEX
  99. _kalFREEZE
  100. i = i+1F2
  101. hl(i)='F3
  102. i)="strF5
  103. kal_h.hF6
  104. f,6,2)"F7
  105. dn(i)="F8
  106. al_h.hoF9
  107. iPROCX
  108. zahENTER
  109. D zaDETAIL
  110. no(DET_JM
  111. +stRAMECEK
  112. h.NAZEVT
  113. c,5RIIS
  114. hodn(NADPIS
  115. al_LEVA
  116. zapocPRAVA
  117.  = iHOR
  118. ahl(i)DOL
  119. M6_MZD
  120. ="'OSC
  121. r(m6_kM6_KAL_H
  122. pM6_KAL_Z
  123. M6_ZAM
  124. M_CIS1
  125. X_CIS1
  126. M_DAT
  127. X_DAT
  128. DRUH_POMERZAHL
  129. JMENO
  130. >MOD_PSV
  131. OBSAH
  132. _kalZAZN
  133. OPRAVA
  134. i+1PS_RETURN
  135. W_POLE
  136. mod6_lib
  137. _kalM6_KAL_H
  138. M6_MZD
  139. ETURN
  140. DRUH_POMERGEN_KALZ
  141. rW_KON_MES
  142. MOD6_LIB
  143. ZMEN_KAL
  144. set color to b/w
  145. set color to bg/n
  146. set color to w+/bg
  147. set color to b/bg,w+/rb
  148. set color to w+/b
  149. set color to w+/w
  150. set color to w/n
  151. A k t u a l i z a c e   kalend
  152. e  zam
  153. stnance
  154. RIIS 7.5
  155. c6_kal_z+
  156. c6_kal_z
  157. _kalZMENA1
  158. ZMENA2
  159. 1KONTROLA
  160. KONEC
  161. OMERP_ZOB
  162. N_MES
  163. POCET
  164. "BARVA
  165. .hoRADEK_C
  166. iSLOUPEC_C
  167. D zaPOMOC
  168. +stRAD
  169. c,5POC
  170. hodn(BARVAS
  171. al_BARVAR
  172. pocBARVAZ
  173. = iBARVAU
  174. (i)BARVAN
  175. BARVAT
  176. ="'BARVAH
  177. 6_kNOVY_ZH
  178. pM6_KAL_H
  179. W_OSC
  180. W_DRUH_POMDRUH_POMERWD_ODP
  181. DNY_ODP
  182. ERWH_ODP
  183. HOD_ODP
  184. WD_RD
  185. DNY_RD
  186. >WH_RD
  187. HOD_RD
  188. WD_PSV
  189. DNY_PSV
  190. WH_PSV
  191. HOD_PSV
  192. WD_OPV
  193. DNY_OPV
  194. WH_OPV
  195. HOD_OPV
  196. WD_STV
  197. DNY_STV
  198. WH_STV
  199. HOD_STV
  200. WD_NEM
  201. DNY_NEM
  202.     WD_NV
  203. DNY_NV
  204. oceWH_NV
  205. p_hoHOD_NV
  206. terWD_ABS
  207. do DNY_ABS
  208.  pWH_ABS
  209. v_aHOD_ABS
  210. xM6_KAL_Z
  211. C6_KAL_Z
  212. RPOCET1
  213. RPOCET2
  214.     HLAV1
  215. PROC1
  216. HLAV2
  217. _KAL_Z
  218. PROC2
  219. ZMENY
  220. PS_RETURN
  221. &barvau
  222. &barvas
  223. &barvaz
  224. &barvar
  225. &barvaz
  226. &barvat
  227.   dny
  228. hodiny
  229. Odpracovan
  230. as celkem
  231. Dovolen
  232. Ost. placen
  233.  volno
  234. Studijn
  235.  volno
  236. Nemoc a o
  237. Neplacen
  238.  volno
  239. Absence
  240. Celkem
  241. &barvau
  242. _kal.
  243. &barvau
  244. &barvas
  245. 99.99
  246. 999.99
  247. 99.99
  248. 999.99
  249. 99.99
  250. 999.99
  251. 99.99
  252. 999.99
  253. 99.99
  254. 999.99
  255. 99.99
  256. 999.99
  257. 999.99
  258. 99.99
  259. 999.99
  260. &barvau
  261. _kalWD_ODP
  262. WH_ODP
  263. 1WD_RD
  264. WH_RD
  265. OMERWD_PSV
  266. rWH_PSV
  267. WD_OPV
  268. WH_OPV
  269. "WD_STV
  270. .hoWH_STV
  271. iWD_NEM
  272. WD_NV
  273. D zaWH_NV
  274. no(WD_ABS
  275. +stWH_ABS
  276. @  5,25 &vloz wd_odp pict '99.99'
  277. @  5,32 &vloz wh_odp pict '999.99'
  278. @  6,25 &vloz wd_rd pict '99.99'
  279. @  6,32 &vloz wh_rd pict '999.99'
  280. @  7,25 &vloz wd_psv pict '99.99'
  281. @  7,32 &vloz wh_psv pict '999.99'
  282. @  8,25 &vloz wd_opv pict '99.99'
  283. @  8,32 &vloz wh_opv pict '999.99'
  284. @  9,25 &vloz wd_stv pict '99.99'
  285. @  9,32 &vloz wh_stv pict '999.99'
  286. @ 10,25 &vloz wd_nem pict '99.99'
  287. @ 11,25 &vloz wd_nv pict '999.99'
  288. @ 11,32 &vloz wh_nv pict '999.99'
  289. @ 12,25 &vloz wd_abs pict '99.99'
  290. @ 12,32 &vloz wh_abs pict '999.99'
  291. _kalQ
  292. POCET1
  293. 1ZMENA1
  294. &barvas
  295. &barvau
  296. &barvar
  297. &barvaz
  298. Datum
  299. Den-Z
  300. Hod.sm
  301. Odpracov
  302. vod absence
  303. &barvat
  304. &barvau
  305. _kalHOR
  306. &barvas
  307. &barvau
  308. 999.99
  309. 999.99
  310. _kalPU
  311. OMERDATUM
  312. rUPPERCS
  313. CDOWCS
  314. PERIODA
  315. "PERIODA_Z
  316. HOD_SMEN
  317. iHOD_ODP
  318. DUV_ABS
  319. &barvau
  320. @ x,18 &vloz perioda_z pict '!X'
  321. @ x,27 &vloz hod_smen pict '999.99' function '@Z'
  322. @ x,39 &vloz hod_odp pict '999.99' function '@Z'
  323. duv_abs
  324. @ x,46 &vloz duv_abs pict '@!X'
  325. 999.99
  326. DUV_ABS   
  327. _kalP_ZOB
  328. DUV_ABS
  329. ERHOD_ODP
  330. rHOD_SMEN
  331. D_ODP
  332. M_CIS1
  333. "C6_KAL_Z
  334. iZMENA2
  335. do proc&y
  336. do zmen&y with 'get'
  337. do zmen&y with 'say'
  338. Nelze zru
  339. it, existuje stav
  340. c6_kal_z
  341. c6_kal_z+
  342. c6_kal_z
  343. it pr
  344. ci beze zm
  345. n? (a/N)
  346. _kalZ
  347. V_ABS
  348. D_ODP
  349. rKONEC
  350. _KAL_Z
  351. POMOC
  352. zaOBR
  353. no(NAP_HOD
  354. stP_ZOB
  355. c,5KONTROLA
  356. (ZAPIS
  357. _C6_KAL_Z
  358. _KAL_Z
  359. iHLAV1
  360. (i)PROC1
  361. HLAV2
  362. ="'PROC2
  363. 6_kPOCET2
  364. pZMENA2
  365. M6_KAL_H
  366. NOVY_Z
  367. POMZMENA1
  368. RNOVY_ZH
  369. W_UCET
  370. ERW_UZAV
  371. W_NAZEV
  372. NAZEV
  373. >W_UCET2
  374. UCET2
  375. W_NAZEV2
  376. NAZEV2
  377. W_PREVOD
  378. PREVOD
  379. W_BIL
  380. M7_STAV
  381. HLASKA
  382. M7_POZUC
  383. POCET1
  384.   Prob
  385.  definice 
  386. tu ...  
  387. c6_kal_z
  388. ZAPIS
  389. _kalMOD_SYS
  390. 1ZMENA1
  391. M6_KAL_H
  392. RUCET
  393. rW_UCET
  394. M7_POZUC
  395. C6_KAL_Z
  396. iW_UZAV
  397. NAZEV
  398. zaW_NAZEV
  399. o(PREVOD
  400. stW_PREVOD
  401. c,5W_BIL
  402. (UCET2
  403. _W_UCET2
  404. cNAZEV2
  405. iW_NAZEV2
  406. )ZMENA2
  407. ="'RAD_TX
  408. KONTROLA
  409. D_SYS
  410.       - 
  411.                  - ^PgDn
  412.                  - ^Home
  413.       - ^End,Esc
  414. Pohyb
  415. znamu
  416. znamu
  417. Konec
  418. colora
  419. set color to &color
  420. lCOLOR
  421. colora
  422. set color to &color
  423. lCOLOR
  424.  text k tomuto 
  425. tu neexistuje
  426. c6_kal_z+
  427. c6_kal_z
  428. lM7_POZUC
  429. M6_KAL_H
  430. 1UCET
  431. HLASKA
  432. RC6_KAL_Z
  433. rPS_LINE
  434. ZOBRAZ_TXT
  435. ehled  dopl
  436. ch text
  437. ehled dopl
  438. ch text
  439. Zadejte: Osob. 
  440. text_tx
  441. text_tx
  442. POLEX
  443. lPROCX
  444. 1RBOT
  445. CLEFT
  446. RCRIGHT
  447. rFREEZE
  448. ORDER
  449. _TXTZAHL
  450. "JMENO
  451. iTITLE
  452. TITLECOLORPS_LINE
  453. REVOD
  454. c,5F4
  455. )DETAIL
  456. F1PRG
  457. ="'F4_JM
  458. kF4PRG
  459. pF7_JM
  460. F7PRG
  461. F9KEY
  462. F10_JM
  463. POMF10PRG
  464. RDET_JM
  465. DETPRG
  466. ERRAMECEK
  467. NAZEVT
  468. M6_KAL_H
  469. >UCET
  470. ENTER
  471. MOD_PSV
  472. PS_RETURN
  473. duv_abs
  474. DUV_ABS
  475. c6_kal_z.duv_abs
  476. Pro toto pole neexistuje pomocn
  477. ehled hodnot
  478. P_ZOB
  479. lMOD_C3
  480. 1ZMENA2
  481. HLASKA
  482. RMOD69D1
  483. OPRAVA
  484. ZMEN_KAL
  485. HLAV1
  486. PROC1
  487. ZMEN1
  488. HLAV2
  489. PROC2
  490. ZMEN2
  491. ZMENY
  492. ZAPIS
  493. KONTROLA
  494. HLASKA
  495. MOD69D3
  496. ZOBRAZ_TXT
  497. NAP_HOD
  498. L:\OBEC\06\
  499. MOD69D.FXP
  500. L:\OBEC\06\MOD69D.PRG
  501.