m_param m6_odmj m6_odmjk m6_dmalg m6_zam m6_fzar m6_alg m6_talg m6_dm m_dat x_dat m_cis1 x_cis1 v1_str x1_str m6_mzd p_tarif xp_tarif m6_kal datum m6_typ m6_sazby m6_evid m6_prum m6_muo v1_str_z jmeno m1_ident ident zakladni\m1_hlava.dbf2 zakladni\m1_hlava postup zakladni\m1_normy.dbf2 zakladni\m1_normy operace m6_tarif.dbf2 m6_tarif trida m7_rene.dbf2 m7_rene M_PARAM --P503 -----POLE5 ----P506 navadW_DILNA_KODILNA_KOOPM6_ODMJ -OSC * --M6_ODMJK -M6_DMALG -------M6_ZAM *M6_FZAR atM6_ALG _paALG w_poleM6_TALG trM6_DM 3,1)M_DAT vadeX_DAT ezisM_CIS1 ledX_CIS1 V1_STR 6 =X1_STR polM6_MZD &&P_TARIF ucXP_TARIF M6_KAL w_DATUM oop M6_TYP kooTYP selecM6_SAZBY 6M6_EVID erM6_PRUM ecM6_MUO m6UZIV ordeV1_STR_Z eJMENO se mM1_IDENT IDENT ZAKLADNI }POSTUP skOPERACE nM6_TARIF TRIDA stupM7_RENE exit enNAVED_KL 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+/w set color to w/n Aktualizace mezd - dle zak RIIS 7.5 Konec PARAM -----Q2 ----Q3 navadQ4 ILNA_KOQ5 NA_KOOPQ _ODMJ -ZMENA1 --ZMENA2 -KONTROLA -KONEC ----HOR atPOCET _paBARVA poleRADEK_C trSLOUPEC_C vadePOMOC ezisY ledRAD 6 =POC polBARVAS &&BARVAR ucBARVAZ BARVAU w_BARVAN op BARVAT kooBARVAH lecW_OSC 6W_DM erW_ALG ecM6_DM m6M6_TYP rdeTYP_MZDY eW_DRUH_POMW_TYP_MZDYW_KOD_GEN W_STR_ZAM W_SKUP skW_STR_OP nW_STR_PREVW_POZNAMKAW_KUSY W_SAZBA W_HODINY nW_CASTKA W_NHOD er W_MES_F ceW_TB W_TA spaceW_DEN W_TRIDA r_W_STUPEN dW_PP with W_DOKLAD wW_POSTUP wW_OPERACE W_PRACOV _W_ZAKAZKA W_CPOL M6_ODMJ opPOCET1 paPOCET2 HLAV1 w_oPROC1 = stHLAV2 ZMENY dif VOL11 OBR1 case x =PS_RETURN &barvau &barvas &barvaz &barvar &barvaz &barvat Kusy pl. Postup &barvau PARAM &barvau &barvas 99999999.999 &barvau PARAM --W_ZAKAZKA M7_RENE --M1_IDENT IDENT OW_POSTUP PC_POSTUP -STRED --MNO_ZAD -M1_HLAVA -NAZEV -M6_ODMJ @ 4,10 &vloz w_zakazka @ 5,10 &vloz w_postup function '@K' --POCET1 IDENT OM7_RENE PW_ZAKAZKA W_STR_OP -STRED _HLAVA -M1_IDENT -IDENT *W_POSTUP tC_POSTUP aM6_ODMJ leM1_NORMY rPROC1 ZMENA1 &barvas &barvau &barvar &barvaz Kusy Doklad Prac. &barvat &barvau &barvas &barvau mod6_alg 999999 999999.99 W_OSC --W_PICT_OSCW_DRUH_POMW_OPERACE ALG10 -MOD6_ALG -W_POSTUP -W_KUSY POSTUP tW_TB aW_SAZBA leW_NHOD rW_TRIDA W_STUPEN eW_CASTKA sW_DEN ledW_DOKLAD W_STR_OP =W_STR_PREVW_PRACOV &barvau @ x,2 &vloz w_osc pict w_pict_osc slo mzdov stnance nem te opr Pro st edisko zam stnance nem te opr @ x,11 &vloz w_druh_pom pict '@!X' @ x,14 &vloz w_operace @ x,18 &vloz w_kusy pict '999999' @ x,26 &vloz w_den pict '99' @ x,29 &vloz w_doklad @ x,44 &vloz w_str_prev --POCET2 --M6_ZAM OSCW_OSC OPERACE UCETNI M6_MUO -MM_AUTOR -HLASKA V1_STR_Z *M6_ODMJ tM1_NORMY aW_POSTUP eW_OPERACE W_PRACOV eW_DEN sPROC2 ledZMENA2 do proc&y do zmen&y with 'get' do zmen&y with 'say' it pr ci beze zm n? (a/N) --HOR OPERACE KONEC STR_Z *POMOC aVOLBA PERACE KONTROLA NTROLA eHLAV1 sPROC1 ledHLAV2 PROC2 =POCET2 REVZAPIS &W_KUSY cW_CASTKA W_DOKLAD _W_TRIDA p W_STUPEN oW_PRACOV cZMENA2 6POCET1 erZMENA1 ecPOM m6_odmj 06201 mod5_lib mod5_lib 06201 06201 ZAPIS --MOD_SYS --ZMENA1 OSCZMENA2 POMM6_FZAR W_OSC W_DRUH_POMW_SKUP -SKUPINA STR_Z *DRUH_POMERALG aTYP_MZDY eKOD_GEN STR_ZAM eSTR_PREV sHODINY ledSAZBA CASTKA =DOKLAD REVZAKAZKA &POSTUP cOPERACE STR_OP _PRACOV p TRIDA oSTUPEN ecNHOD m6KUSY ePOZNAMKA MDAT_AKT DYAUTOR AKTUAL skW_ALG _POMM6_TYP REVM6_ZAM W_STR_PREVW_HODINY nW_SAZBA W_CASTKA W_DOKLAD eW_ZAKAZKA W_POSTUP eW_OPERACE W_STR_OP _W_PRACOV dW_TRIDA h W_STUPEN wW_PP wW_TB _W_NHOD W_KUSY W_DEN opW_POZNAMKAMM_AUTOR ID_ORG oOPER_A stOPER_Z P506 dif P503 STAN_OPER OPER_1 W_CPOL MOD5_LIB sOPER_POSL Z6_ZAK VYPOC_ODMJ zka nen vypln kaz neexistuje kaz je ji ukon Postup neexistuje Postup nem operace stnanec nebyl nalezen Druh mzdy pro tento pracovn r neexistuje stnanec nem pro tento pracovn r vypln ny mzdov Operace neexistuje Nulov kusy Nepovolen hodnota dne edisko operace neexistuje edisko p evodov neexistuje KONTROLA D_SYS W_ZAKAZKA HLASKA _FZAR M7_RENE M6_ODMJ STAV_VP -M1_HLAVA -W_POSTUP M1_NORMY *M6_ZAM RW_OSC aM6_DM eW_DM W_DRUH_POMM6_MZD eW_OPERACE W_KUSY edW_DEN W_STR_OP =V1_STR REVW_STR_PREV~ - - ^PgDn - ^Home - ^End,Esc Pohyb znamu znamu Konec colora set color to &color -COLOR KAZKA colora set color to &color -COLOR colora ehled zak Konec mod6_lib stnanci Mzdov daje Odveden l. mzda Operace postupu ediska Konec mod_proc mod6_lib mod6_lib uvedeno slo postupu mod_proc mod_proc set color to &color_s do proc&y -COLOR_S A_RETURN POMZOBR_RENE W_ZAKAZKA MOD6_LIB ZOBR_ZAM -MOD_PROC -W_OSC ZOBR_MZD1 W_DRUH_POMZOBR_ODMJ W_POSTUP eHLASKA ST_OPER OMW_OPERACE ERACE ZOBR_OPER W_PRACOV =W_TRIDA EVW_STUPEN VW_XX ZOBR_STR M6_ODMJ -ID_ORG MKOOP W_DILNA_KO06204 - ^% NAVED_KL HLAV1 PROC1 Home'! ZMEN1 say ' HLAV2 nd,EsJ PROC2 lor t ZMEN2 22,2 ZMENY ZAPIS 'Vkl KONTROLA say 'RC4 HLASKA say 'K VOLBA KOOPERACE W:\06\ 06204.FXP W:\06\06204.PRG