1 to OPRAVA1 23W_POLE m1_ident ident m1_zas x1_zas m1_kalk x1_kalk m1_plan x1_plan m1_pozid x1_pozid m_dat x_dat m_cis1 x_cis1 v4_sklad x4_sklad v1_str x1_str RIIS 4.1 Aktualizace skladov polo MATERIAL mod_proc inlist(kod_pol,'M','N','T','U','X','Y','Z') VYROBA mod_proc inlist(kod_pol,'F','P','S','A','B','C','R','V','I','O') EXPEDICE mod_proc MATERIAL VYROBA EXPEDICE Chybn nastaven prom w_modul MATERIAL MNTUXYZ ka existuje, k d polo ky = VYROBA FPSABCRVI ka existuje, k d polo ky = znam znam vrat Konec Nastala chyba vyhledavani. Opravdu zru it tento z znam? (a/N) m1_um ident modify command W_AKT to JMENO_C 23WJMENO_C nRADEK_C ,1SLOUPEC_C 23,42ANSI M1_IDENT yIDENT sM1_ZAS toX1_ZAS 23,M1_KALK EsX1_KALK 18M1_PLAN meX1_PLAN ,PM1_POZID X1_POZID 'M_DAT nX_DAT 3,63M_CIS1 X_CIS1 V4_SKLAD !X4_SKLAD *V1_STR ***X1_STR ***W_POLE *NOVY_Z ***CISLOP ***M_SCR eduW_NAZEV seW_MJ r to W_MODUL 0 ZOBR_POL 4MOD_PROC KOD_POL @23,1KOD_KALK TV_ZAK hr(HR_DEN +chZZ @ 2TXT HLASKA OPRAVA2 say ' ZRUSIT nd,KONTR_RUS w+/POM 3,1 sM1_UM m1_obr ident Pro tuto polo ku existuj skladov obraty - nelze zru Pro tuto polo ku existuje nenulov soba - nelze zru m1_kusov inverze Tato polo ka vstupuje do rozpisky F - nelze zru M1_OBR to IDENT 23CISLOP ,1HLASKA M1_IDENT 2M1_ZAS ZASOBA yM1_KUSOV sINVERZE toZRUSIT znam o polo ce nen stupn 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 &barva &barvau M1_IDENT 3HLASKA nW_POLE IDENT KUSOV 18Q10 meQ11 ,PQ12 3,63Q16 ***Q21 ***Q22 ***CISELNIK eduDOL sePOCET to DOP1 0 DOP2 COUNT oZAKAZNIK 1POMOC hr(RAD +chSL @ 2POC BARVAS BARVAR 3BARVAZ ' BARVAU nd,BARVAN BARVAH w+/BARVAD sBARVA aMENU dBARVA1 3,6BARVA2 onePORADI etuKONEC ****I ******X ********R ******Z ******U ********T ZMENY M_MAZANI &barva1 kladn daje polo &barva2 Se.id: Ex.id: SKP : Akt. : - Autor: Post.: WTEXT W_POLE @ 4,9 &vloz w_pole(4) pict '@X' @ 4,40 &vloz w_pole(3) pict '!' @ 4,48 &vloz w_pole(5) pict '!!!' @ 5,9 &vloz w_pole(9) pict '@X' @ 6,9 &vloz w_pole(13) pict '@X' @ 7,9 &vloz w_pole(17) pict '@X' @ 5,36 &vloz w_pole(11) pict '@X' @ 6,36 &vloz w_pole(12) pict '@X' @ 7,36 &vloz w_pole(8) pict '@X' @ 6,60 &vloz w_pole(7) pict '@X' @ 6,75 &vloz w_pole(16) pict '@X' @ 7,60 &vloz w_pole(6) pict '@!X' 3W_POLE nMM_AUTOR do proc&y do zmen&y with 'get' FoxProFl do zmen&y with 'say' prostredi mod41a_1 sobovac daje novac daje kladov daje Dopl text Konec Typ n TYP_NAKL pnakl MNTUXYZ Pro materi l je mo no nav t pouze typ 'KU' Klobouky Typ textu: TYP_TX typ_p prostredi &barvau it pr ci beze zm n? (a/N) KONEC _AUTOR KUSOV ,OBR1 meK_UDAJU ,POK_C DOPLN_ZZ nPROSTREDI BARVA1 BARVAR BARVA2 !BARVAD *PORADI ***PROC1 ***VOLBA *OBR2 ***PROCX *M1_IDENT uMOD41A1 eMOD41A2 o PNAKL 0 JMENO_C 4WJMENO_C MOD_C2 oRADEK_C 1SLOUPEC_C MOD_C1 hr(W_POLE +chTXT @ 2HLASKA PODNIK MOD41A31 3MOD41A32 TYP_P nd,MOD41A4 TREDI POCET sPOM NOVY_Z aM1_PLAN dCISLOP ,6M1_ZAS oneM1_KALK tuIDENT **M1_POZID *ZAPIS_AKT MNTUXYZ FPSABCOJKG M1_PLAN W_POLE 3M1_IDENT KOD_POL w_pole(3) MNTUXYZ MATERIAL Lze nav t pouze k d polo ky M,N,T,U,X,Y,Z. FPSABCRVI VYROBA Lze nav t pouze k d polo ky F,P,S,A,B,C,R,V,I. MJ w_pole(5) JMENO_C WJMENO_C 3MOD_C2 nOK_C 1RADEK_C SLOUPEC_C MOD_C1 KUSOV sW_POLE toW_MODUL EsHLASKA colora set color to &color COLOR M5_AKT.DBF2 M5_AKT ident m5_akt ident m5_akt select &sel X_IDENT X_DS nM5_AKT 1IDENT ZAVRI DUVOD nazev MNTUXYZ detailn znamy neexistuj material set color to &barva w+/bg w+/bg w+/bg material Vyhled Zadejte n zev nebo identifikaci polo nazev material material HMEZ 3DMEZ nLMEZ 1PMEZ M1_IDENT NAZEV KOD_POL sHLASKA toMATERIAL ,M1_OBR 18RAM6 HELP6 ,PRAD STREC 'BARVA nSAYRAD6 CISLOP IDENT !STZAZ *KLIC ***W_CESTINA *UPPERCS ehled p o l o e k zev polo Identifikace Jakost set color to &barx BARX 3NAZEV nIDENT KOD_POL ROZM_CSN JAK_CSN Konec Pohyb Enter -Home,End,PgUp,PgDn, -Vyhled r polo - - F10 - ^End,Esc Pohyb Konec - OPRAVA1 KONTR_RUS OPRAVA2 PORADI PROC1 atecnF ZMEN1 y pro ZMENY ----d DOPLN_ZZ K_UDAJU HLASKA ZAPIS_AKT ZOBR_POL ------ SAYRAD6 HELP6 ----- MOD42? W:\04\ MOD41A_1.FXP W:\04\MOD41A_1.PRG