W_archivf w_volf VYROBA RIIS 5.4 MATERIAL RIIS 4.8 RIIS 2.4 ediska Archiv odv ediska m_param v1_str x1_str edisko neexistuje v souboru st edisek mod_proc Prob prava dat ... termin_ob edisek Archiv odv edisek ediska Archiv odv ediska mod54c Funkce funkce c4_pomq u1_kalk ident m1_kalk x1_kalk m1_plan x1_plan m1_ident ident m1_obr_a u1_obr m1_obr Chybn nastaven prom w_vol a w_archiv MATERIAL xc_obrq xc_obrq EXPEDICE xc_obrq xc_obrq xc_obrq xc_obrq Prob r ceny ... MNTUXYZ FPSABCRVIO xc_obrq< Datum tran(m1_obr.termin_ob,'@E') (m1_obr.termin_ob ) ka m1_obr.ident m1_obr.ident zev polo m1_ident.nazev m1_ident.nazev m1_obr.stred_obr m1_obr.stred_obr Mno str(m1_obr.skut_mnoz,12,3) m1_obr.skut_mnoz VN/1ks str(m1_obr.naklad,12,2) m1_obr.naklad Celkem str(m1_obr.naklad * m1_obr.skut_mnoz,12,2) m1_obr.naklad * m1_obr.skut_mnoz Hmot./1ks str(m1_plan.vaha_mj,10,3) m1_plan.vaha_mj Hmot.celkem str(m1_plan.vaha_mj * m1_obr.skut_mnoz,11,3) m1_plan.vaha_mj * m1_obr.skut_mnoz Sklad m1_obr.vydal_skl+'/'+m1_obr.vyd_um_skl+'/'+m1_obr.typ_um_v m1_obr.vydal_skl zka m1_obr.ident_zak m1_obr.ident_zak Doklad m1_obr.dokl_cis m1_obr.dokl_cis n.mno str(m1_obr.plan_mnoz,12,3) m1_obr.plan_mnoz Rozp.vy m1_obr.ident_vys m1_obr.ident_vys mka m1_obr.popis_obr m1_obr.popis_obr no ' '+m1_obr.jmeno m1_obr.jmeno m1_ident.rada m1_ident.rada W_ARCHIV pW_VOL hodW_MODUL pqW_TYP _sklRIISQ 'ZM_PARAM POLE4 i) =W_PRUMER dV1_STR hX1_STR c4_HLASKA zW_STRED i+ZOBR_STR MOD_PROC 'MOD_SYS ) MESS _pq1.POLEX PROCX = RTOP 1.dokRBOT i =CLEFT ahl(CRIGHT nFREEZE ORDER ) =HOR (c4_pqDOL n_mnozLEVA hoPRAVA = "cNADPIS an_ZAHL i = JMENO hl(iHODN Rozp.SOUC jTITLE = TITLECOLORPOC0 ) = "cF1 1.identF2 i = F3 zahl(iF4 'Pozn 'F7 eno(i) F9 c4_pq1.F10 _obr" F0PRG ) =F1ON q1.poF1PRG F4_JM _psvF4PRG se zTISKPRG o,F7_JM soucF7PRG && F9PRG selF9KEY pomqF9KEY1 F10_JM scrF10PRG obRAMECEK _rRIIS NAZEVT ***KLICO ****KLNAZ ****SPACEBAR TR_HL1 re TR_HL2 ve TR_HL3 o oTR_HL4 zazTR_HL5 TR_HL6 TR_HL7 rpoTR_HL8 strTR_HL9 o cDET_JM useENTER DETAIL opgDETPRG ivePS_LINE arPS_RETURN PS_ZAZN hlID_ORG niW_OBDOBI C4_POMQ ntTERMIN q.tCENA ) +IDENT 'HMOTNOST eU1_KALK q.M1_KALK X1_KALK nM1_PLAN chX1_PLAN niM1_IDENT M1_OBR_A tM1_OBR q.tU1_OBR +TERMIN_OB XC_OBRQ yeKOD_OB mq.TYP_UM_V STRED_OBR POCET dnadPOCETC KOD_POL kPL_OD TYP_NAKL W_NAKLAD 'NAKLAD PROCENTA UVMOD_PSV colora set color to &color pCOLOR hodOBR orderz ehled odv po dnech Detail odv dle kalk.vzorce ty za polo ty za polo ky a st ediska ty za v rob. ty za v ady a st ediska Konec set order to &m_trideni OBRZ1 p_ZAZ hodVOLBA pqM1_OBR sklFILT M_TRIDENI _VETA CELKEM ) =HMOT_CEL dKUS_CEL hVZNIKLSOUBM zOBRZ2 i+MOD_SYS PREHLED 'DETAIL ) SUMACE 1.C4SPOL OUBPS_RETURN Prob prava dat ... c4_pomq pC4_POMQ odM1_OBR pq_VETA sklS_MNOZ S_CELKEM CELKEM S_HMOTNOSTHMOT_CEL dW_IDENT hIDENT SOUBW_TERMIN zTERMIN_OB SKUT_MNOZ M1_KALK 'PL_OD ) TYP_NAKL .W_UVN M1_PLAN okVAHA_MJ STS_UVN hl(REKAP2 - Esc Konec Prob prava dat ... pC2_A odTERMIN_OB IN_OB MATER KUSOV NOSTVR T_CEL SOUBOR ERMIN IN_OB _MNOZ M1_OBR '_VETA ) W1_UVN .W2_UVN BW1_MATER W2_MATER kW1_KOOP STW2_KOOP l(W1_PRIP STW2_PRIP W1_KUSOV =W2_KUSOV qW1_VR mnozW2_VR hoW1_SR = "cW2_SR an_W1_ZR i = W2_ZR hl(iW1_OR ozp.W2_OR jW1_OPM = W2_OPM LORW1_OPN hoW2_OPN "cW_IDENT ntIDENT i = W_TERMIN iS_MNOZ SKUT_MNOZ M1_KALK ) PL_OD 1.TYP_NAKL W_UVN =KUSY_D oDETODV mod_lib mod_lib Prob tisk ... P_SETUP pP_RESET odP_6LPI P_8LPI P_10CPI P_12CPI P_16CPI P_20CPI STP_BOLDON dP_BOLDOFF P_ULINEON P_ULINEOFFP_ITALON P_ITALOFF P_SUPERON P_SUPEROFFP_SUBON .P_SUBOFF BP_DBST_ON P_DBST_OFFP_LETRQUALP_DRAFT l(P_COMP_OFFP_WIDT_ON P_WIDT_OFFP_HEIG_ON P_HEIG_OFFP_NEWPAGE P_KODY "cMOD_LIB n_W_TISK = NASTAV_PRNOBRT p.MESS jSTRANA = RAD1 LORTISK_HL1 oTISK_S1 "cZAZT ech st edisek v detailn kalkulaci Archiv odv ech st edisek v detailn kalkulaci ediska v detailn kalkulaci Archiv odv ediska v detailn kalkulaci Datum Materi Klobouky Kooperace Mat.vl.v. Mzda p Mzda kusov. sob.re Odbyt.re pSTRW odW_ARCHIV NAZEVT W_VOL W_OBDOBI P_10CPI P_SUBON STRIISQ dPODNIK P_SUBOFF NEOFFP_LETRQUALP_BOLDON P_BOLDOFF P_DRAFT FFP_12CPI 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 Celkem 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 99999999999.99 K o n e c s e s t a v y pRAD1 odPOC P_DRAFT P_BOLDOFF P_10CPI P_12CPI dTERMIN_OB MATER EOFFKOOP RQUALPRIP KUSOV ST_OFFOPN TRQUALTISK_HL1 (P_LETRQUALP_BOLDON W2_UVN W2_MATER W2_KOOP FFW2_PRIP W2_KUSOV cW2_VR n_W2_SR = W2_ZR _PRNW2_OR p.W2_OPM jW2_OPN 10CPI ORSTRANA oP_SUPERON P_SUPEROFF ehled odv ehled archivu odv ehled odv ehled archivu odv ehled odv ehled archivu odv Detail Deta__il mod54c Datum tran(c4_pomq.termin,'@E') c4_pomq.termin VN celkem str(C4_pomq.cena,12,2) c4_pomq.cena Hmot.celkem str(C4_pomq.hmotnost,11,3) c4_pomq.hmotnost Celkem: centuryz 99999999999.99 99999999.999 OBRB2 pOBRZ1 odPOLEX PROCX CLEFT CRIGHT STFREEZE dORDER EOFFLEVA RQUALPRAVA NADPIS FFJMENO BSOUC TITLE _OFFTITLECOLORPOC0 ETRQUALF1 OLDON MATER KUSOV n_F10 = F0PRG _PRNF1ON p.F1PRG jF4_JM = F4PRG ORTISKPRG oF7_JM F7PRG ROFFF9PRG i = F9KEY iF9KEY1 F10_JM F10PRG ) RAMECEK 1.RIIS NAZEVT =KLICO oKLNAZ SPACEBAR vTR_HL1 e zTR_HL2 o,TR_HL3 oucTR_HL4 && TR_HL5 selTR_HL6 omqTR_HL7 TR_HL8 scrTR_HL9 obDET_JM _rENTER DETAIL ***DETPRG ***PS_LINE **PS_RETURN PS_ZAZN e ID_ORG ve STRW oW_ARCHIV zW_VOL W_OBDOBI RIISQ trN_1 o cN_2 useCELKEM HMOT_CEL gHELP3 iveMOD_PSV Konec Pohyb -Enter ,PgUp,PgDn c4_pq1+ c4_pq1 termin_ob datez german ehled odv ech st edisek dne ehled odv ech st edisek dne Archiv odv ech st edisek dne Archiv odv ech st edisek dne ehled odv ediska dne ehled odv ediska dne Archiv odv ediska dne Archiv odv ediska dne set date to &_ddd mod54c Funkce funkce Datum tran(c4_pq1.termin_ob,'@E') (c4_pq1.termin_ob ) ka c4_pq1.ident c4_pq1.ident zev polo ky m1_ident.nazev m1_ident.nazev c4_pq1.stred_obr c4_pq1.stred_obr Mno str(c4_pq1.skut_mnoz,12,3) c4_pq1.skut_mnoz VN/1ks str(c4_pq1.naklad,12,2) c4_pq1.naklad Celkem str(c4_pq1.naklad * c4_pq1.skut_mnoz,12,2) c4_pq1.naklad * c4_pq1.skut_mnoz Sklad c4_pq1.vydal_skl+'/'+c4_pq1.vyd_um_skl+'/'+c4_pq1.typ_um_v c4_pq1.vydal_skl zka c4_pq1.ident_zak c4_pq1.ident_zak Doklad c4_pq1.dokl_cis c4_pq1.dokl_cis n.mno str(c4_pq1.plan_mnoz,12,3) c4_pq1.plan_mnoz Rozp. vy c4_pq1.ident_vys c4_pq1.ident_vys mka c4_pq1.popis_obr c4_pq1.popis_obr OBR_DET p_VET odM1_OBR C4_POMQ TERMIN C4_PQ1 TERMIN_OB IDENT STM1_IDENT dPOLEX PROCX EOFFRBOT RQUALCLEFT CRIGHT FREEZE FFORDER _OFFPRAVA OLORNADPIS (ZAHL RQUALJMENO TITLE FFTITLECOLORPOC0 = F2 _PRNF3 = F7 F0PRG ROFFF1ON i = F1PRG iF4_JM F4PRG TISKPRG ) F7_JM 1.F7PRG F9PRG =F9KEY oF9KEY1 F10_JM vF10PRG e zRAMECEK o,RIIS oucNAZEVT && KLICO selKLNAZ omqSPACEBAR TR_HL1 scrTR_HL2 obTR_HL3 _rTR_HL4 TR_HL5 ***TR_HL6 ***TR_HL7 **TR_HL8 TR_HL9 e DET_JM ve ENTER oDETAIL zDETPRG PS_LINE PS_RETURN PS_ZAZN tr_DDD cGERMAN use_DAT gW_ARCHIV eRIISQ MOD_PSV m_dgrpop c_popgr c_popgr Prehled odvadeni vyroby za FF Archiv odvadeni vyroby za FF UVN celkem (Kc) Vsechna strediska UVN celkem (Kc) Stredisko: SoWA UVN (Kc) dgrpop m_dgrdat c_datgr c_datgr c_datgr dgrdat mm_dgr2d !&mmgr 1 6306270498 2 OBRGR p_QZAZ odM_DGRPOP C_POPGR W_ARCHIV NAZGR C4_POMQ TERMIN STSTRW dPODNADPIS POPIS_X FFDRUH RQUALYMIN POPIS_N FFNAZEV PRVNI BTRETI RIISQ _OFFCTVRTY LORDRUHY (POPIS_Y DGRPOP M_DGRDAT C_DATGR NOR_Y PIS_X ORCENA cDGRDAT n_MM_DGR2D MMGR _PRNPTH POCET pPOCETC odPOC colorz pM1COLOR edisek Archiv odv edisek ediska Archiv odv ediska Detail odv mod54c tisk1 c_soucet Ter.obr. tran(c2_a.termin_ob,'@e') c2_a.termin_ob str(c2_a.UVN,14,2) c2_a.uvn Materi str(c2_a.mater,14,2) c2_a.mater Klobouky Kooperace Mat.vl.v. str(c2_a.koop,14,2) c2_a.koop Mzda p str(c2_a.prip,14,2) c2_a.prip Mzda kus. str(c2_a.kusov,14,2) c2_a.kusov V str(c2_a.vr,14,2) c2_a.vr Spr str(c2_a.sr,14,2) c2_a.sr sob.re str(c2_a.zr,14,2) c2_a.zr Odbyt.re str(c2_a.or,14,2) c2_a.or OPM str(c2_a.opm,14,2) c2_a.opm OPN str(c2_a.opn,14,2) c2_a.opn pRIISQ odPOLEX PROCX CLEFT CRIGHT STFREEZE dORDER FFLEVA RQUALPRAVA NADPIS FFJMENO BSOUC TITLE _OFFTITLECOLORPOC0 GRDAT n_F10 F0PRG _PRNF1ON p.F1PRG jF4_JM = F4PRG ORTISKPRG oF7_JM F7PRG ROFFF9PRG i = F9KEY iF9KEY1 F10_JM F10PRG ) RAMECEK 1.RIIS NAZEVT =KLICO oKLNAZ SPACEBAR vTR_HL1 e zTR_HL2 o,TR_HL3 oucTR_HL4 && TR_HL5 selTR_HL6 omqTR_HL7 TR_HL8 scrTR_HL9 obDET_JM _rENTER DETAIL ***DETPRG ***PS_LINE **PS_RETURN PS_ZAZN e STRW e W_ARCHIV oW_VOL zW_OBDOBI PODNIK MOD_PSV double Celkov Esc,^End VN : K Materi l : K Kooperace: K Mzda p p: K Mzda kus.: K ie: K Spr.re ie: K ie: K Odb.re ie: K OPM : K OPN : K 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 SCRQ1 pMOD_WIN odRIISQ W2_UVN W2_MATER W2_KOOP W2_PRIP W2_KUSOV TW2_VR dW2_SR W2_ZR W2_OR FFW2_OPM UALW2_OPN Prob prava dat ... ehled odv polo ehled archivu odv polo ehled odv polo ek st ehled archivu odv polo ek st ident et za polo c4_xx c4_xx ident+str Za polo et za polo ky a st ediska c4_xx c4_xx et za c4_xx c4_xx ident et za ady a st ediska c4_xx c4_xx pVZNIKLSOUBZAKLSUMA POLEX PROCX CLEFT TCRIGHT dFREEZE ORDER FFDOL UALLEVA PRAVA NADPIS FFZAHL JMENO BHODN _OFFTITLE OLORTITLECOLORPOC0 GRDAT _PRNF0PRG p.F1ON jF1PRG = F4_JM ORF4PRG oTISKPRG F7_JM ROFFF7PRG i = F9PRG iF9KEY F9KEY1 F10_JM ) F10PRG 1.RAMECEK =NAZEVT oKLICO KLNAZ vSPACEBAR zTR_HL1 o,TR_HL2 oucTR_HL3 && TR_HL4 selTR_HL5 omqTR_HL6 TR_HL7 scrTR_HL8 obTR_HL9 _rDET_JM ENTER ***DETAIL ***DETPRG **PS_LINE PS_RETURN PS_ZAZN e STRW oW_ARCHIV zW_VOL W_OBDOBI C4SPOL VOLBA trIDENT cC4_XX useREKAP34 gRADA eREKAP56 c4Spol orderz xc_!q index on ident + dtos(termin_ob) to xc_!q for &filt additive c4Spol set order to &m_trideni C4SPOL pKUSY LSOUBCENA IDENT HMOTNOST HMOT_MJ TM1_OBR dFILT M_TRIDENI _VETA FFTERMIN_OB S_MNOZ S_CELKEM FS_KUSY S_HMOTNOSTCELKEM HMOT_CEL FKUS_CEL ORW_IDENT ORW_TERMIN C_STRED STRED_OBR M1_IDENT W_RADA FSKUT_MNOZ M1_KALK cPL_OD n_TYP_NAKL W_UVN p.M1_PLAN jVAHA_MJ STHMOT ORS_UVN oVZNIKLSOUB mod54c Identifikace ident c4_xx.str c4_xx.str zev polo m1_ident.nazev m1_ident.nazev Mno str(c4_xx.kusy,10,3) c4_xx.cena VN celkem str(c4_xx.cena,12,2) c4_xx.cena Hmot.celkem str(c4_xx.hmotnost,13,3) c4_xx.hmotnost Hmotnost/MJ str(c4_xx.hmot_mj,11,3) c4_xx.hmot_mj Celkem: 99999999999.99 99999999999.99 999999999.999 Hmot.celkem: FF OBRZ1 pID_ORG OUBPOLEX RAMECEK TR_HL1 TITLE RIISQ TRTOP dRBOT CLEFT CRIGHT FFFREEZE C4_XX IDENT M1_IDENT FPS_ZAZN KLICO NOSTF1 ERMIN ED_OBR IDENT PROCX FF9KEY cJMENO n_HODN SOUC p.VOLBA jCELKEM STHMOT_CEL RHELPIK oMOD_PSV UBPS_RETURN Konec Pohyb ,PgUp,PgDn VOLBA p1_rada xp1_rada mod54c c4_xx.rada c4_xx.rada p1_rada.nazev p1_rada.nazev VN celkem str(c4_xx.cena,13,2) c4_xx.cena Hmot.celkem str(c4_xx.hmotnost,13,3) c4_xx.hmotnost .celkem str(c4_xx.kusy,13,3) c4_xx.kusy Specifikace p1_rada.specif p1_rada.specif c4_xx.rada c4_xx.rada c4_xx.str c4_xx.str p1_rada.nazev p1_rada.nazev VN celkem str(c4_xx.cena,13,2) c4_xx.cena Hmot.celkem str(c4_xx.hmotnost,13,3) c4_xx.hmotnost .celkem str(c4_xx.kusy,13,3) c4_xx.kusy Specifikace p1_rada.specif p1_rada.specif Celkem : 999999999999.99 999999999999.99 999999999.999 999999999.999 999999999.999 999999999.999 ID_ORG pPOLEX OUBRAMECEK TR_HL1 TITLE RIISQ TRBOT dCLEFT CRIGHT FREEZE FFP1_RADA XP1_RADA C4_XX FPS_ZAZN KLICO NOSTF1 ERMIN ED_OBR IDENT PROCX FZAHL JMENO cHODN n_SOUC VOLBA p.PODNIK jCELKEM STHMOT_CEL RKUS_CEL oHELPIK UBMOD_PSV PS_RETURN MOD54C 24,% HLASKA FUNKCE PREHLED set9! DETAIL TISK1 'SoW TISK_HL1 TISK_S1 toH7 REKAP2 HELP3 o w+/`J DETA__IL if w_a6[ PROCENTA DETODV C_SOUCET SUMACE ZAKLSUMA REKAP34 HELPIK REKAP56 W:\05\ MOD54C.FXP W:\05\MOD54C.PRG