m6_mzd m6_kal_h m6_zam m_cis1 x_cis1 m_dat x_dat hledej1 in mod612d mod69e mod69e1 ehled odpracovan doby, obdob RIIS 6.9 druh_pomer druh_pomer m6_zam.prijmeni m6_zam.prijmeni no m6_zam.jmeno m6_zam.jmeno DD MF str(m6_kal_h.dny_mf,5,2) m6_kal_h.dny_mf H MF str(m6_kal_h.hod_mf,6,2) m6_kal_h.hod_mf DD odp str(m6_kal_h.dny_odp,6,2) m6_kal_h.dny_odp H odp. str(m6_kal_h.hod_odp,6,2) m6_kal_h.hod_odp DD nem ' '+str(m6_kal_h.dny_nem,5,2) m6_kal_h.dny_nem str(m6_kal_h.dny_rd,5,2) m6_kal_h.dny_rd str(m6_kal_h.hod_rd,6,2) m6_kal_h.hod_rd DD PSV ' '+str(m6_kal_h.dny_psv,5,2) m6_kal_h.dny_psv H PSV str(m6_kal_h.hod_psv,6,2) m6_kal_h.hod_psv DD ref ' '+str(m6_kal_h.dny_ref,5,2) m6_kal_h.dny_ref H ref str(m6_kal_h.hod_ref,6,2) m6_kal_h.hod_ref DD STV ' '+str(m6_kal_h.dny_stv,5,2) m6_kal_h.dny_stv H STV str(m6_kal_h.hod_stv,6,2) m6_kal_h.hod_stv DD ozbr. ' '+str(m6_kal_h.dny_ozbr,5,2) m6_kal_h.dny_ozbr DD cest ' '+str(m6_kal_h.dny_pcest,5,2) m6_kal_h.dny_pcest H cest str(m6_kal_h.hod_pcest,6,2) m6_kal_h.hod_pcest DD nahr.j. ' '+str(m6_kal_h.dny_naho,5,2) m6_kal_h.dny_naho H nahr.j. ' '+str(m6_kal_h.hod_naho,6,2) m6_kal_h.hod_naho DD NP str(m6_kal_h.dny_np,5,2) m6_kal_h.dny_np H NP str(m6_kal_h.hod_np,6,2) m6_kal_h.hod_np DD abs ' '+str(m6_kal_h.dny_abs,5,2) m6_kal_h.dny_abs H abs str(m6_kal_h.hod_abs,6,2) m6_kal_h.hod_abs DD zap. ' '+str(m6_kal_h.dny_zapoc,5,2) m6_kal_h.dny_zapoc DD MPP ' '+str(m6_kal_h.dny_mpp,5,2) m6_kal_h.dny_mpp DD kal ' '+str(m6_kal_h.dny_kal,5,2) m6_kal_h.dny_kal DD prac ' '+str(m6_kal_h.dny_p,5,2) m6_kal_h.dny_p DD PS str(m6_kal_h.dny_s,5,2) m6_kal_h.dny_s DD NS str(m6_kal_h.dny_n,5,2) m6_kal_h.dny_n DD 67 str(m6_kal_h.dny_,5,2) m6_kal_h.dny_ Dat.akt. tran(m6_kal_h.dat_akt,'@E') m6_kal_h.dat_akt Autor m6_kal_h.autor m6_kal_h.autor Aktual m6_kal_h.aktual m6_kal_h.aktual M6_MZD al_OSC _mpp" M6_KAL_H 1M6_ZAM )='M_CIS1 jmX_CIS1 ' 'M_DAT _kalX_DAT kal,DRUH_POMERPOLEX lFREEZE al"F1 i = i+F2 ahl(i)=F3 prac' o(i)="'F5 str(m6_F6 h.dny_pF7 hodF8 ="m6_kaF9 dny_p" F9PRG i+1PROCX i)='ENTER jmeDETAIL tr(DET_JM .dnRAMECEK NAZEVT "m6W_MM_C ny_W_RR_C = RIIS ahl(iNADPIS i)="sPRAVA al_hHOR n,5,2)DOL dn(i)=ZAHL l_h.dJMENO iHODN D 67MOD_PSV i)OBSAH RIIS 7.37 mod6_lib al_M6_KAL_H M6_MZD )='DRUH_POMERGEN_KALZ 'W_KON_MES MOD6_LIB ZMEN_KAL Osobn slo nen vypln Druh pracovn ho pom ru nen uveden mod6_lib set color to b/w set color to bg/n set color to w+/bg set color to b/bg,w+/rb set color to w+/b set color to w/n &barvau W_OSC al_W_DRUH_POMHLASKA 1M6_KAL_H MGEN_KALZ 'DRUH_POMERW_ZAC_MES MOD6_LIB RZMENA MERANSI al"WD_MF = i+DNY_MF i)=WH_MF HOD_MF ="'WD_ODP m6_DNY_ODP _pWH_ODP hodHOD_ODP kaWD_NEM DNY_NEM +1WD_RD i)='DNY_RD jmeWH_RD tr(HOD_RD .dnWD_PSV DNY_PSV m6WH_PSV ny_HOD_PSV = WD_REF l(iDNY_REF WH_REF ="sHOD_REF _hWD_STV ,2)DNY_STV )=WH_STV h.dHOD_STV iWD_OZBR ahDNY_OZBR 7WD_PCEST )DNY_PCEST WH_PCEST ,HOD_PCEST WD_NAHO _hDNY_NAHO WH_NAHO zaHOD_NAHO tWD_NP jmeDNY_NP ranWH_NP _h.dHOD_NP @E'WD_ABS (i)DNY_ABS _hWH_ABS HOD_ABS W_AKTUAL 'AKTUAL jmeW_DAT_AKT DAT_AKT utW_AUTOR (iAUTOR 6_kaJMENO_C WJMENO_C 1RADEK_C =SLOUPEC_C ) = CISELNIK hodDOL = "m6POCET aktuDOP1 do DOP2 rePOR zahl,COUNT obsZAKAZNIK rPOMOC ****Y ********RAD ******SL *******POC ******KONTROLA *BARVAS proBARVAR od6BARVAZ setBARVAU o bBARVAN 2 sBARVAH 7.BARVA savKS toMENU ePORADI l_hKONEC m6_mI c+m6_mX druh_pomR f !fouZ doU n_kalz wT m6_mzd.Q , m6_mzdA uh_pomerZMENY &barva Aktualizace kalend m6_zam / PP= dny hodiny et kalend ch dn et pracovn ch dn et placen ch sv Mimo pracovn fond pracovn doby Odpracovan doba celkem Nemoc a o dovolen Refundace mzdy Studijn volno ba v ozbrojen ch sil Pracovn cesta hrady mzdy Neplacen Absence Aktualizace W_MM_C al_W_RR_C POMM6_ZAM MW_OSC MPRIJMENI 'JMENO MERW_DRUH_POM{ &barvau 99.99 999.99 99.99 999.99 99.99 99.99 999.99 99.99 999.99 99.99 999.99 99.99 999.99 99.99 99.99 999.99 99.99 999.99 99.99 999.99 99.99 999.99 M6_KAL_H _DNY_KAL OMDNY_P 1DNY_S MDNY_MPP MWD_MF 'WH_MF MERWD_ODP POMWH_ODP RWD_NEM MERWD_RD al"WH_RD = i+WD_PSV i)=WH_PSV WD_REF ="'WH_REF m6_WD_STV _pWH_STV hodWD_OZBR kaWD_PCEST WH_PCEST 1WD_NAHO ='WH_NAHO meWD_NP tr(WH_NP .dnWD_ABS WH_ABS m6ZMENA ny_W_AKTUAL MM_AUTOR iW_DAT_AKT &barvau @ 10,65 &vloz wd_mf pict '99.99' function '@Z' @ 10,72 &vloz wh_mf pict '999.99' function '@Z' @ 11,65 &vloz wd_odp pict '99.99' function '@Z' @ 11,72 &vloz wh_odp pict '999.99' function '@Z' @ 12,65 &vloz wd_nem pict '99.99' function '@Z' @ 13,65 &vloz wd_rd pict '99.99' function '@Z' @ 13,72 &vloz wh_rd pict '999.99' function '@Z' @ 14,65 &vloz wd_psv pict '99.99' function '@Z' @ 14,72 &vloz wh_psv pict '999.99' function '@Z' @ 15,65 &vloz wd_ref pict '99.99' function '@Z' @ 15,72 &vloz wh_ref pict '999.99' function '@Z' @ 16,65 &vloz wd_stv pict '99.99' function '@Z' @ 16,72 &vloz wh_stv pict '999.99' function '@Z' @ 17,65 &vloz wd_ozbr pict '99.99' function '@Z' @ 18,65 &vloz wd_pcest pict '99.99' function '@Z' @ 18,72 &vloz wh_pcest pict '999.99' function '@Z' @ 19,65 &vloz wd_naho pict '99.99' function '@Z' @ 19,72 &vloz wh_naho pict '999.99' function '@Z' @ 20,65 &vloz wd_np pict '99.99' function '@Z' @ 20,72 &vloz wh_np pict '999.99' function '@Z' @ 21,65 &vloz wd_abs pict '99.99' function '@Z' @ 21,72 &vloz wh_abs pict '999.99' function '@Z' Y_KAL OMWH_MF 1WD_MF MM6_MZD MDENNI_UVAZWH_ODP VAZWD_ODP POMWH_RD UVAZWD_RD MERWH_PSV VAZWD_PSV i+WH_REF VAZWD_REF WH_STV VAZWD_STV m6_WH_PCEST ZWD_PCEST dWH_NAHO AZWD_NAHO ZMENA UVAZW_AKTUAL 'MM_AUTOR eW_DAT_AKT DAT_AKT do proc&y do zmen&y with 'get' do zmen&y with 'say' it pr ci beze zm n? (a/N) KONEC Y_KAL I_UVAZHOR UVAZZ i+POCET VAZZMENA VAZK_UDAJU 6_OK_C ZULOZ M6_KAL_H _ZMENA MDNY_MF 1WD_MF MHOD_MF MWH_MF UVAZDNY_ODP AZWD_ODP POMHOD_ODP AZWH_ODP MERDNY_NEM AZWD_NEM i+DNY_RD VAZWD_RD HOD_RD VAZWH_RD 6_DNY_PSV ZWD_PSV dHOD_PSV AZWH_PSV DNY_REF AZWD_REF 'HOD_REF eWH_REF DNY_STV dnWD_STV HOD_STV m6WH_STV ny_DNY_OZBR WD_OZBR iDNY_PCEST WD_PCEST HOD_PCEST WH_PCEST )DNY_NAHO =WD_NAHO .dHOD_NAHO iWH_NAHO ahDNY_NP 7WD_NP )HOD_NP WH_NP ,DNY_ABS WD_ABS _hHOD_ABS WH_ABS zaDAT_AKT tAKTUAL jmeMM_AUTOR colora set color to &color _COLOR - - ^End,Esc Pohyb Konec colora SET COLOR TO &col CMESS MMOD69E1 ZMEN_KAL PORADI PROC1 ZMEN1 r(m6_ ZMENY stv,6 K_UDAJU hod_st HLASKA 'DD oz9= no(i)= J:\RIIS\OBEC\06\ MOD69E.FXP J:\RIIS\OBEC\06\MOD69E.PRG