hledej1 Funkce zob_fun A r ch v polo RIIS 1.1 mod11b a1_plan ident a1_zas ident a1_kalk ident a1_kalks ident a1_pozid ident m_dat x_dat m_cis1 x_cis1 a1_ident material DUP-CIZI ident MATERIAL material VYROBA soucasti FPSABC EXPEDICE ident SLEVARNA1 ident MNTUXYZOJKG SLEVARNA2 odlitky SLEVARNA3 odlitky ident ka a->ident a->ident zev polo ky a->nazev a->nazev ' '+a->kod_pol a->kod_pol a->mj a->mj Jakostn norma a->jak_csn a->jak_csn norma a->rozm_csn a->rozm_csn ' '+m1_plan->zz m1_plan->zz Hl. sklad m1_zas->skl_hlavni+'/'+m1_zas->skl_hl_um m1_zas->skl_hlavni Cena str(m1_plan->naklad,11,2) m1_plan->naklad Z str(m1_zas->zasoba,12,3) m1_zas->zasoba m1_plan->zs_kmd m1_plan->zs_kmd ' '+m1_plan->klas_zas m1_plan->klas_zas tran(m1_zas->datum_prij,'@E') (b->datum_prij) tran(m1_zas->datum_vyd,'@E') (b->datum_vyd ) P.invent. tran(m1_zas->datum_inv,'@E') (b->datum_inv ) Sekund. kli a->sek_ident a->sek_ident Aktual. tran(datum,'@E') (a.datum ) Autor autor autor PS_RETURN POLEX i) =PROCX 1_zaRTOP hlavnRBOT m1_zaCLEFT l_umCRIGHT dn(FREEZE as.ORDER vni"ZAHL = i+JMENO HODN i)=' TITLE VN'TITLECOLORF1 "str(mF2 an.naklF3 1,2)" odn(i)=F6 plan.naF7 iF9 F10 zahl(DETAIL F1PRG o(i)F4_JM an.zF4PRG F7_JM ="m1F7PRG s_kmF9KEY i = F10_JM F10PRG i)=DET_JM dobDETPRG menRAMECEK (mNAZEVT r_dRIIS hodn(i)F5 F9PRG iNADPIS -----PRAVA ----HOR ------DOL ------A1_PLAN IDENT PM1_PLAN LAA1_ZAS OLOM1_ZAS ---A1_KALK --M1_KALK --A1_KALKS -M1_KALKS -A1_POZID lM1_POZID M_DAT w_X_DAT = suM_CIS1 e4,X_CIS1 A1_IDENT 3MATERIAL dM1_IDENT nW_MODUL **KOD_POL **SOUCASTI *ODLITKY **M_ORD1 **MOD_PSV colorz Vyhled Zadejte rozpisku nebo n zev rozpisky ident soucasti nazev nazev 'ident' ident Rozpiska nebyla nalezena 'ident' ident MCOLOR i) =M1_IDENT IDENT nKLIC m1_zaM_ORD1 _umNAZEV dn(W_CESTINA vni"UPPERCS i+HLASKA A1_ZAZNAM VOLBA M1_IDENT aPS_RETURN Polo ka: F sobovac daje novac daje kladov daje Dopl text Konec mod_proc mod_proc mod_proc Typ text TYP_TX typ_p M1_IDENT aIDENT m1_zaPS_LINE umZOBR_ZAS (MOD_PROC ZOBR_PL i"ZOBR_NAKL TYP_P JMENO_C ' WJMENO_C 'MOD_C2 LORRADEK_C (mSLOUPEC_C MOD_C1 ZOBR_TXT Konec Pohyb - Esc - Home,End,PgUp,PgDn Konec Pohyb - Esc ,Home,End,PgUp,PgDn detailn znamy neexistuj set color to &barva aLMEZ m1_zaR _LINE umZAZNAM (M1_POZID W_KLIC "M1_IDENT IDENT TYP_P LORHLASKA (mPS_LINE HELP1 an.naSTREC iBARVA TYP_TX hl(SAY_TXT Dopl texty polo ky - typ textu dek Text WTEXT4 TYP_P set color to &barx RAD_TX aTEXT_TX colora set color to &color COLOR XT_TX m1_za colorz datez german m_dgrpop c_PopGr c_PopGr N kladov daje FF Casovy prubeh nakladovych udaju - typ nakladu Plati od RIIS 1.1 SoWA UVN/Kc dgrpop m_dgrdat c_DatGr c_DatGr c_DatGr dgrdat mm_dgr2d !&mmgr 1 6306270498 2 set color to &m_color set date to &M_dat OBRGR M_COLOR M_DAT aGERMAN _QZAZ 1_zaM_DGRPOP mC_POPGR (WTEXT3 W_KLIC "PODNADPIS PNAKL ' POPIS_X 'DRUH LORYMIN (mYMAX POPIS_N NAZEV =PRVNI .naTRETI iCTVRTY DRUHY hl(POPIS_Y DGRPOP (i)M_DGRDAT zC_DATGR M1_KALK m1IDENT kmTYP_NAKL NOR_Y PIS_X )=PL_OD obUVN enDGRDAT (mMM_DGR2D dMMGR odn(i)MOD41D HLEDEJ1 ZOB_FUN VOLBA HELP1 HELP2 ZOBR_TXT SAY_TXT HLASKA L:\OBEC\04\ MOD41D.FXP L:\OBEC\04\MOD41D.PRG