MOD42EX v4_skl_z x4_skl_z m1_obr ident c1_obr m1_ident material m1_zas x1_zas m1_um ident v4_sklad x4_sklad m_dat x_dat m_cis1 x_cis1 m_param c1_obr p_kody p_name m1_plan x1_plan M5_AKT.DBF2 m5_akt ident m7_rene.DBF2 m7_rene m5_plan zakazka m5_komp zakazka d e j s k l a d u : RIIS 4.2 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 mod_proc Sklad neexistuje mod_proc Nelze prov dej z jin ho ne materi ho skladu v4_skl_z x4_skl_z Pro zadan sklad nem te opr mod_proc &barvau sklad vrat Konec o V4_SKL_Z X4_SKL_Z ePRIHLAS neW_SKLAD pnSKLAD aM1_OBR IDENT C1_OBR M1_IDENT MATERIAL nM1_ZAS X1_ZAS konM1_UM a doV4_SKLAD aX4_SKLAD -M_DAT ct mX_DAT eek M_CIS1 w_sX_CIS1 um1M_PARAM W_POLE1 esPOLE1 ravnW_POLE4 u POLE4 ifPOM () andTER_UZAV iW_ROK sW_MESIC adP_KODY 1#uP_NAME tyW_TISKARNAM1_PLAN hlX1_PLAN 'M5_AKT koM7_RENE ze M1_UID_ORG mujM5_PLAN SoZAKAZKA =M5_KOMP =P_ZOB endif Q2 * ---Q3 soba neQ4 tuje neQ5 e mensiQ6 vydavaQ7 nozstviQ8 -------Q9 w_skutQ10 0 andQ11 ()) orQ12 ba - ^PgDn - F10 - Esc,^End w_kod_ob mod_proc w_ident mod_proc inlist(kod_pol,'M','N','T','U','X','Y','Z') w_skut_mn mod_proc w_um1 w_um2 mod_proc w_doklad mod_proc w_sklad2 mod_proc w_stred mod_proc w_id_zak m7_rene.DBF2 mod6_lib Pro toto pole neexistuje pomocn ehled hodnot P_ZOB KZOBR_OBV KMOD_PROC W_KOD_OB IZOBR_POL W_IDENT W_NAZEV QUALZOBR_UM ZOBR_OB ZOBR_SKL W_SKLAD2 ZOBR_STR W_STRED ZOBR_RENE W_ID_ZAK FMOD6_LIB HLASKA q&si = pocet q&si = 0 R_OBV KW_KOD_OB W_STRED IW_SKLAD2 W_UM2 W_TYP2 ID_ORG LW_ID_ZAK POCET R_SKL MOD42EX PORADI PROC1 , str ZMEN1 ZMENY doklb! TISKV t_zakG( VOLBA ent_vV, vadne|/ HLASKA K_UDAJU ZAPIS_OBR KONTR_VR KONTR_IS KONTR_TR ZALOZ_ZAS w_sk m1, w_'c ZAPIS_AKT wXe NAP_HOD NASTAV_Q X:\OBEC\04\ MOD42E.FXP X:\OBEC\04\MOD42E.PRG