ahl(iMOD612LX m_param m6_fzar m6_zam m6_mzd c6_rd Prob r dat ... .12.31 mod6_lib Lednov ty dovolen RIIS 6.1 hledej1 in mod612d proc_prep Aktual akt_rd mod92f m6_zam.prijmeni m6_zam.prijmeni m6_zam.jmeno m6_zam.jmeno druh_pomer druh_pomer m6_fzar.str m6_fzar.str m6_zam.evid_stav m6_zam.evid_stav Zap.roky ' '+str(roky_zapoc,4) roky_zapoc Zap.dny ' '+str(dny_zapoc,4) dny_zapoc ' '+str(rd_zakl,5,2) rd_zakl ' '+str(rd_zakl_n,5,2) rd_zakl_n D-min ' '+str(rd_minrok,5,2) rd_minrok ' '+str(rd_krac,5,2) rd_krac ' '+str(rd_narok,6,2) rd_narok ' '+str(rd_cerpani,6,2) rd_cerpani D-propl ' '+str(rd_propl,6,2) rd_propl W_DOTAZ (iM_PARAM eW_ROK druhPAM_ROK hoM6_FZAR uhOSC M6_ZAM zM6_MZD C6_RD no(iDRUH_POMERRD_ZAKL_N RD_NAROK rRD_MINROK RD_ZAKL ahRD_KRAC RD_CERPANIRD_PROPL _RD_VYPOC nROKY_ZAPOCDNY_ZAPOC OBR92F ERMOD_SYS POCET i)="POCETC tr(W_ROK_ZAP W_DNY_ZAP W_DAT1 zapDAT_NAST =W_DAT2 hl(DAT_VYST yZAPOC_DNYCMOD6_LIB PROCENTA ID_ORG n(iPOLEX zapoRAMECEK = NAZEVT l(iRIIS kl'RTOP o(i)=RBOT str(rCLEFT 5,2)CRIGHT i)=FREEZE f id_orF2 = i+1 ahl(i)=F6 kl-n'F9 jmeno(F9PRG '+F10 d_zaklF10_JM F10PRG )="DETAIL DET_JM ENTER PROCX ) ='ZAHL jmJMENO "' 'HODN _minI MOD_PSV "rOBSAH ULOZ_RD et aktu ... ST_ZAZ (iPREP druhPOCET hoPOCETC uhRD_MINROK RD_NAROK zRD_ZAKL RD_CERPANIRD_PROPL RRD_KRAC RD_VYPOC rPROCENTA W_DOTAZ colora set color to &color (iCOLOR druh} POCET (iPOCETC roky na dovolenou? (a/N) pis n na dovolenou ... (iC6_RD ruhPOCET hoPOCETC uhM6_MZD zDRUH_POMERRD_NAROK IRD_MINROK RD_ZAKL RD_ZAKL_N RD_KRAC RD_CERPANIRD_PROPL IRD_VYPOC IDAT_AKT _AKTUAL nMM_AUTOR CPROCENTA OBR61 (iOPRAVA 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 set color to w+/w &barvau C6_RD (iM_RD_NAROKRD_NAROK hM_RD_MINR RD_MINROK M_RD_ZAKL RD_ZAKL zM_RD_ZAKLNRD_ZAKL_N M_RD_KRAC RD_KRAC M_RD_CERP RD_CERPANIM_RD_PROPLRD_PROPL IM_RD_VYPOCRD_VYPOC _CISELNIK POCET ERDOP1 )=DOP2 i)="COUNT tr(ZAKAZNIK ZMENA POMOC T_NAST hl(SL _VYST C_DNYCBARVAS BARVAR BARVAZ n(iBARVAU apoBARVAN = BARVAH l(iBARVAD kl'BARVA (i)=BARVA1 r(rBARVA2 ,2)PORADI i)=KONEC id_orX hl(i)=U kl-n'T jmeno(Q '+A d_zaklZMENY &barva &barva1 Aktualizace, F &barva2 kladn kladn rok-n no z min. roku m roce Proplacen dovolen vodu absence statek dovolen celkem aktu WTEXT (iM6_ZAM ROKPRIJMENI hJMENO &barvau 99.99 99.99 99.99 99.99 99.99 99.99 99.99 99.99 M_RD_ZAKL M_RD_ZAKLNM_RD_MINR M_RD_CERP M_RD_PROPLM_RD_KRAC M_RD_NAROKM_RD_VYPOC &barvau @ 11,53 &vloz m_rd_zakl pict '99.99' @ 12,53 &vloz m_rd_zakln pict '99.99' @ 13,53 &vloz m_rd_minr pict '99.99' @ 14,53 &vloz m_rd_cerp pict '99.99' @ 15,53 &vloz m_rd_propl pict '99.99' @ 16,53 &vloz m_rd_krac pict '99.99' @ 17,53 &vloz m_rd_narok pict '99.99' P_ZOB AKLNQ RD_MINR M_RD_NAROKM_RD_ZAKL M_RD_MINR M_RD_KRAC C6_RD YPOCRD_CERPANIRD_PROPL PROC1 IZMENA do proc&y do zmen&y with 'get' do zmen&y with 'say' it pr ci beze zm n? (a/N) KONEC AKLNA RD_MINR RD_NAROKDOL _ZAKL _MINR _KRAC YPOCR _CERPANIZ _CERPANIPOCET ROPLPOMOC _VYPOCPROC1 _MENU1 nZMENA ZMENA C6_RD AKLNRD_ZAKL M_RD_ZAKL RD_MINROK M_RD_MINR RD_ZAKL_N M_RD_ZAKLNRD_KRAC NIM_RD_KRAC RD_CERPANIM_RD_CERP RD_PROPL IM_RD_PROPLRD_NAROK IM_RD_NAROKKONEC _W_DOTAZ nMOD612LX PROC_PREP HLASKA PROCENTA ULOZ_RD AKT_RD ****( OPRAVA ****` PORADI PROC1 *****k ZMEN1 dure ZMENY X:\OBEC\09\ MOD92F.FXP X:\OBEC\09\MOD92F.PRG