MM_jmenof MM_jazykf CC_koopf Prob r kooperuj ch organizac ... m4_organ c4_dodav m4_koop Nebyl nalezen adavek na kooperaci ! c4_dodav c4_dodav Prob r dodavatel materi lu ... m4_organ c4_dodav m5_dnp m5_plan Nebyla nalezena uvoln c4_dodav c4_dodav m4_dodb.dbf m_param m1_ident ident m1_plan x1_plan m5_plan zakazka c4_plan c4_plan m4_obj objed m4_pobj objed m4_pobjd objed m4_pobjt objed m4_tobj objed m_cis1 x_cis1 m_dat x_dat m1_pozid x1_pozid m1_npol ident m4_dodm ident1 m4_txtd ident m4_dodmc ident m4_koop m4_koopo m4_adr daje o vl.firm (adresu ZA,HL,FA) m4_organ daje o vlastn firm zev) ! m4_uc_o et 'FH' vlastn firmy ! m4_dop_d 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 objedn Konec MOD_SYS odMM_JMENO eMM_AUTOR rMM_JAZYK +CC_KOOP av_M_ULICE "_M_MESTO o_M_STAT a _M_PSC i "_M_DALNOPI_M_TELEFON_M_FAX t =_M_ICO ht=_M_FIRMA _M_DISP _M_USTAV _M_UCET _M_DICP _M_NAZEV =_M_NAZ_2 .MM_VYB = 'De_ZAV F10p_NAZ_O _ai_NAZ_O2 ilDDT1 det_DDT2 ybratW_COBJ g= _TT cx='s42T1 dime X1 (polex)Z1 me jmenZOBRAZ d_M_CSD (poQQQ dime _M_ZAV ex)_M_IDENT PEMAIL souP_IDENT iMQDOP ahl(MQCSD && pMQOKR o ozTEXTY vybeANSI o(iVYBPLAN n.MESS hodn(M4_ORGAN i=C4_DODAV iZAVOD ntifNAZEV_ORG DISTINCT _M4_KOOP "MNO_KOOP MNO_PRI idMNO_STO =iMNO_OBJ i)C4QD (i)= 'HLASKA nazM5_DNP M5_PLAN c4MAT_OBJ evPOR_OBJ iZAKAZKA l(CPOL koKONTBLOK M_PARAM lPATH0 hPT_OBEC c4POLE4 'JEVICECEN MEMAIL 'DM1_IDENT IDENT )= "M1_PLAN plX1_PLAN k,C4_PLAN odM4_OBJ _pOBJED _dokHLAOBJ M4_POBJ 'ZPOROBJ jmM4_POBJD _DETOBJ azkM4_POBJT )M4_TOBJ .zM_CIS1 X_CIS1 ahlM_DAT X_DAT i)="M1_POZID oX1_POZID )M1_NPOL .cM4_DODM =iIDENT1 (i)M4_TXTD jmM4_DODMC stM4_KOOPO hM4_ADR c4_NASELADR MESTO zNAZEV_ORG2ULICE = PSC plaDALNOPIS ITELEFON ONFAX 0.0E_MAIL M4_UC_O USTAV sUCET usM4_DOP_D DOPR_INST1DOPR_INST2CSD NST2OKRSEK_CD BARVAS _BARVAR IIBARVAZ subBARVAU 4,3BARVAN ,.TBARVAH ZOBRPLAN bVLOZOBJ poVOL4 enaPl Tvorba objedn vky materi RIIS 4.2 VlozObj Vybrat VyberKOOP VyberObj s422a1 O organizace: c4_dodav.ico c4_dodav.ico c4_dodav.zavod+' ' c4_dodav.zavod zev organizace pro kooperaci zev organizace (dodavatele) materi c4_dodav.nazev_org + ' ' c4_dodav.nazev_org POLEX odPROCX eRTOP rRBOT +CLEFT avCRIGHT "FREEZE oORDER a HOR i "DOL ALNOPILEVA LEFONPRAVA t =NADPIS ht=ZAHL JMENO HODN TITLE TITLECOLORPOC0 = 'DeF2 F10pF3 _aiF4 det_F7 ybratF9 g= F10 F0PRG 's42F1ON dime F1PRG lex)F4_JM jmenF4PRG dTISKPRG poF7_JM ime F7PRG ex)F9PRG F9KEY souF9KEY1 iF10_JM hl(F10PRG & pRAMECEK ozRIIS vybeNAZEVT o(iKLICO n.KLNAZ odn(SPACEBAR nTR_HL1 i=TR_HL2 iTR_HL3 tifTR_HL4 TR_HL5 _TR_HL6 "TR_HL7 TR_HL8 idTR_HL9 =iDET_JM i)ENTER DETAIL = 'DETPRG nazPS_LINE PS_RETURN PS_ZAZN evCC_KOOP iC4_DODAV oMOD_PSV Prob r detailn ... m5_dnp c4_vyb Pro zadanou organizaci ji neexistuj adavky c4_plan RIIS 4.2 adavky na materi l od dodavatele F vod dodavatele: F ehled n ch zak Detail det_ail Vybrat _Vyber s422a1 c4_plan.Ols c4_plan.Ols Materi c4_plan.ident c4_plan.ident zev materi m1_ident.nazev m1_ident.nazev Term.Obj trans(c4_plan.ter_uv,'@E') c4_plan.ter_uv trans(c4_plan.ter_ov,'@E') c4_plan.ter_ov c4_plan.zakazka c4_plan.zakazka c4_plan.cpol c4_plan.cpol ' '+c4_plan.stav+' ' c4_plan.stav c4_plan.rz+' ' c4_plan.rz K objedn str(c4_plan.mno_pl-c4_plan.mno_ov-c4_plan.mno_zm,12,3) c4_plan.mno_pl-c4_plan.mno_ov-c4_plan.mno_zm n.mno ' '+str(c4_plan.mno_pl,12,3) c4_plan.mno_pl P ijato str(c4_plan.mno_ov,12,3) c4_plan.mno_ov Vadn str(c4_plan.mno_zm,12,3) c4_plan.mno_zm Sklad/Um. ' '+c4_plan.sklad+' ' c4_plan.sklad c4_plan.kmd c4_plan.kmd _MAT_SCR dPS_LINE eMESS r_ZAZ +_ICO avICO "_ZAV oZAVOD a _NAZ_O i "NAZEV_ORG ZAKAZKA ONIDENT =CPOL ht=M5_DNP MAT_OBJ POR_OBJ C4_VYB HLASKA LORC4_DODAV .C4_PLAN DeM5_PLAN 0p_POLE aiALL ilOLS det_TER_UV ratM1_IDENT POLEX PROCX 's42RTOP dime RBOT lex)CLEFT jmenCRIGHT dFREEZE poORDER ime HOR ex)DOL LEVA souPRAVA iNADPIS hl(ZAHL & pJMENO ozHODN vybeSOUC o(iTITLE n.TITLECOLORPOC0 tifF3 idF10 =iF0PRG i)F1ON F1PRG = 'F4_JM nazF4PRG TISKPRG F7_JM evF7PRG iF9PRG (F9KEY oF9KEY1 F10_JM lF10PRG hRAMECEK c4RIIS 'NAZEVT KLICO 'DKLNAZ SPACEBAR "TR_HL1 plTR_HL2 k,TR_HL3 odTR_HL4 _pTR_HL5 dokTR_HL6 TR_HL7 'ZTR_HL8 jmTR_HL9 _DET_JM azkENTER )DETAIL .zDETPRG PS_RETURN PS_ZAZN ="MOD_PSV oMM_VYB )ZAPIS Prob r detailn ... m4_koop c4_plan Pro zadanou organizaci ji neexistuj adavky RIIS 4.2 adavky na kooperaci od dodavatele F vod dodavatele: F ehled po adavk na kooperaci Detail det_ailK Vybrat _Vyber s422a1 c4_plan.Ols c4_plan.Ols Identifikace c4_plan.ident c4_plan.ident c4_plan.nazev_koop c4_plan.nazev_koop s.koop. c4_plan.koop c4_plan.koop Dokon trans(c4_plan.dat_dok,'@E') c4_plan.dat_dok c4_plan.zakazka c4_plan.zakazka c4_plan.cpol c4_plan.cpol ' '+c4_plan.stav+' ' c4_plan.stav K objedn str(c4_plan.mno_koop-c4_plan.mno_pri-c4_plan.mno_sto,12,3) c4_plan.mno_koop-c4_plan.mno_pri-c4_plan.mno_sto n.mno ' '+str(c4_plan.mno_koop,12,3) c4_plan.mno_koop P ijato str(c4_plan.mno_pri,12,3) c4_plan.mno_pri P str(c4_plan.mno_pre,12,3) c4_plan.mno_pre Stornov str(c4_plan.mno_sto,12,3) c4_plan.mno_sto ' '+c4_plan.str_pr+' ' c4_plan.str_pr Z oper. ' '+c4_plan.oper_pr+' ' c4_plan.oper_pr ' '+c4_plan.str_od+' ' c4_plan.str_od Do oper. ' '+c4_plan.oper_od+' ' c4_plan.oper_od _MAT_SCR dPS_LINE eMESS r_ZAZ +_ICO avICO "_ZAV oZAVOD a _NAZ_O i "NAZEV_ORG ONM4_KOOP =MNO_KOOP =MNO_PRI MNO_STO C4_PLAN IDENT LORHLASKA .C4_DODAV DAT_DOK ePOLEX 0pPROCX aiRTOP ilRBOT det_CLEFT ratCRIGHT FREEZE ORDER 's42HOR dime DOL lex)LEVA jmenPRAVA dNADPIS poZAHL ime JMENO ex)HODN SOUC souTITLE iTITLECOLORPOC0 & pF0 vybeF2 o(iF3 LECOLORF6 tifF0PRG _F1PRG "F4_JM F4PRG idTISKPRG =iF7_JM i)F7PRG F9PRG = 'F9KEY nazF9KEY1 F10_JM F10PRG evRAMECEK iRIIS (NAZEVT oKLICO KLNAZ lSPACEBAR hTR_HL1 c4TR_HL2 'TR_HL3 TR_HL4 'DTR_HL5 TR_HL6 "TR_HL7 plTR_HL8 k,TR_HL9 odDET_JM _pENTER dokDETAIL DETPRG 'ZPS_RETURN PS_ZAZN zkMOD_PSV )MM_VYB .zZAPISKOOP Materi n.mno ijato: K objedn Sklad/Um.: OBRDET dPS_LINE eC4_PLAN rZAKAZKA avCPOL "IDENT oM1_IDENT NAZEV i "MNO_PL MNO_OV ONMNO_ZM =SKLAD s.kooper. : zka/Po Identifikace: n.mno ijato: Storno : K objedn Z oper. : Do oper.: OBRDET dPS_LINE eC4_PLAN rKOOP avZAKAZKA "CPOL oIDENT M1_IDENT "NAZEV MNO_KOOP NMNO_PRI =MNO_STO =STR_PR OPER_PR STR_OD OPER_OD MM_VYB dC4_PLAN m5_dnp zakazka PorObj / / # PorObj / / # CISRADY dW_COBJ eMOD_SYS rM5_DNP +ZAKAZKA avC4_PLAN oIDENT "TER_UV M1_IDENT NM1_PLAN =_POR =_IDENT MNAZEV NAZEV MIDENT_ODBIDENT_ODB MSEK_IDENTSEK_IDENT MPRIDEJ MCENAPLMJ MIDENT 0pM4_DODM i_ICO il_ZAV det_CENA_PLMJ CIZNAZEV MAT_OBJ PORADI s42DATUM_PD DATUM_PO _IDENT PLAN_MJ dKOEF poMNO_MJ me MNO_PO ex)MNO_PLMJ MNO_OV souMNO_ZM iMNO_ST LORMNO_KDO pROZPISKA zTER_OV _M_IDENT iMOLS POROBJ LORMNO_PL nPRIDAT =ZAPISDALSIHLAVICKA IZACNI CHCESTISK PorObj / / # PorObj / / # CISRADY dW_COBJ eMOD_SYS rC4_PLAN avIDENT oDAT_DOK M1_IDENT "M1_PLAN N_IDENT =MNAZEV =NAZEV MIDENT_ODBIDENT_ODB MSEK_IDENTSEK_IDENT MPRIDEJ NTMCENAPLMJ MIDENT M4_DODM 0p_ZAV iCENA_PLMJ CIZNAZEV _MAT_OBJ PORADI DATUM_PD DATUM_PO _IDENT PLAN_MJ )KOEF MNO_MJ dMNO_PO poMNO_PLMJ MNO_OV ex)MNO_ZM MNO_ST souMNO_KDO iROZPISKA RKOOP NAZEV_KOOP_M_IDENT POROBJ MNO_KOOP RMNO_PRI nMNO_STO =PRIDAT IZAPDALKOOPHLAVICKA PZACNI CHCESTISK dCZAV eMNAZEV rM1_IDENT +NAZEV avMIDENT_ODBIDENT_ODB MSEK_IDENTSEK_IDENT M1_NPOL MM_JAZYK NMIDENT =EX1_IDENT DetObj m4_pobjt m4_pobjt W_COBJ d_POR eC4_PLAN rTER_OV +ZAKAZKA avCPOL DBMNO_PL M5_DNP ENTMAT_OBJ POR_OBJ M4_TXTD NIDENT =_ICO _ODBZAVOD PORADI NTRAD_TX TEXT_TX NTRADEK M1_POZID TYP_TX DetObj m4_koopo m4_pobjt m4_pobjt W_COBJ d_POR eC4_PLAN rDAT_DOK +ZAKAZKA avCPOL DBMNO_KOOP M4_KOOPO TKOOP OBJEDNAVKAMNO_OBJ NMNO_PRI =MNO_STO AKTUAL MM_AUTOR BDAT_AKT DAT_OBJ KAAUTOR M4_TXTD TIDENT pZAVOD iMAT_OBJ PORADI _RAD_TX TEXT_TX RADEK 2M1_POZID TYP_TX &barvau datez british S objedn vkou pracuje n kdo jin znam nen stupn HLAOBJ dMENU1 eBARVA rBARVAU +KONEC avHOR DBDOL _KOOPO DNAVKAZ O_PRI O_STO POCET T_AKT T_OBJ KAMM_POM _DATE TBRITISH ZMENY HLASKA Tisk objedn it objedn vrat Kopie objedn Konec c4_text c4_text+ c4_text naveden text objedn vky, nelze tisknout ! RIIS 4.2 Opravdu zru it objedn vku(a/n): m5_dnp zakazka m5_dnp zakazka Opravdu kop rovat objedn vku ? (a/n): Nebylo zad slo kopie objedn vky ! Toto slo objedn vky ji existuje ! Prob objedn vky ... c_obj+ c_obj c_obj c_obj+ c_obj c_obj c_obj+ c_obj c_obj c_obj+ c_obj c_obj c4_text M_AOBR dVOL4 eM4_TOBJ rW_COBJ +C4_TEXT avMAT_OBJ DBHLASKA MOD_SYS TTISK_OBJ NAVKAZRUS NM5_DNP =ZAKAZKA M4_POBJT POROBJ BDETOBJ PORADI KACPOL POR_OBJ THLAOBJ ZACNI KONEC pCCOBJ1 iCISRADY CISLO _MESS C_OBJ MNO_PO 2MNO_OV MNO_ZM )MNO_ST MNO_KDO dMNO_PLMJ oDATUM_PD DATUM_PO )ROZPISKA souSTAV iCISLO_KS RDATUM_KS DATUM_V OPDATUM_O VYRIZUJE MM_JMENO et s k dem ' ' neexistuje! TYP_OSLOV dy adresy z ka (I ) ZA,HL,FA neexistuj HlaObj / / # / / # HLAOBJ dW_COBJ eDDT1 rDOP_DISP +_FCE vFUNKCE DB_UL ULICE T_MEST MESTO AVKA_STAT NSTAT =_PSC _NAZ_O BNAZEV_ORG _NAZ_O2 KANAZEV_ORG2_JM TMQDOP MQCSD MQOKR pCSD_OKRSEKM4_UC_O _M_ICO __M_ZAV VL_KOD_UCT_M_USTAV USTAV 2_M_UCET )HLASKA VLKODADR TNASELOBJ oNASOBJ M4_ADR )_ICO _ZAV souTYP_OSLOV M_CIS1 RTEXT JMENO OPM4_DOP_D ZAVOD KOD_ADR RDOPR_INST1DOPR_INST2OKRSEK_CD ID_ORG PCMISTUR P_M_PSC _M_MESTO MAT_OBJ STAV idDATUM_V G2CISLO_KS )DATUM_KS DATUM_O 'VYRIZUJE zVL_KOD_ADRDOD_LHUTA ZPUS_DOPR MISTO_UR iJAZYK RSEKMM_JMENO oMM_JAZYK &barvau datez british S objedn vkou pracuje n kdo jin znam nen stupn HLAOBJ dMENU1 eKONEC AVKAT =POCET B_DATE BRITISH KATXT V_ORG2HLASKA a4_obj objed ada mater. objed.: @!R XXXXXX ada neexistuje, nave te cel prvn slo t slo mater.objed.: @!R XXXXXXXXXX slo objedn vky mus t vypln Bylo p ady, zadejte znovu! slo objedn vky mus t numerick Toto slo ji existuje v archivu, najd te posledn ... slo v dan v archivu a za te od n Toto slo ji existuje, opravte ho ! Toto slo ji existuje v archivu, Jestli chcete, ... te posledn slo v dan v archivu a za te od n dA4_OBJ eOBJED rHLAOBJ +W_COBJ vW_RAD DBS422A1 MAT_OBJ T_DELKA KAHLASKA =_CIS W_COBJ1 _KONEC B_KONDEL _CHYBA V_ORG2 RIIS 4.2 - - F6 - F6 - F5 - F2 - F7 Pohyb Dodav. Adresy Dodavatel: F Objedn vka - vod - et - Dodac s.dopravy: sto ur Okrsek Stanice izuje : izuje/linka : Datum vystaven Dopravn dispozice: Intern pozn mka : dZAVOD eID_ORG rDDT1 +DOP_DISP vDDT2 DBMAT_OBJ NAZEV_ORG _M_ICO _M_ZAV KA_M_DICP N_M_UCET =_M_USTAV NAZEV_ORG2JMENO BFUNKCE ULICE KAPSC V_ORG2MESTO TSTAT DOD_LHUTA ZPUS_DOPR CSD_OKRSEKMISTO_UR VYRIZUJE _DATUM_V D_UCT @ 4,33 &vloz nazev_org @ 5,33 &vloz nazev_org2 @ 6,33 &vloz jmeno @ 7,33 &vloz funkce @ 8,33 &vloz ulice @ 9,33 &vloz psc @ 9,40 &vloz mesto @10,33 &vloz stat @12,16 &vloz dod_lhuta @13,16 &vloz zpus_dopr @14,16 &vloz misto_ur @13,54 &vloz csd_okrsek @14,54 &vloz csd @ 16,23 &vloz vyrizuje @ 16,68 &vloz datum_v pict '@E' @ 17,23 &vloz ddt1 @ 18,23 &vloz ddt2 @ 17,23 &vloz ddt1 @ 18,23 &vloz ddt2 @ 19,23 &vloz pozn e_L1L rMM_JMENO +_VYR vVYRIZUJE BDDT1 DOP_DISP british DO PROC&Y DO ZMEN&Y with 'get' DO ZMEN&Y with 'say' Nelze m nit I O, objedn vka nen otev Nelze m nit I O, objedn vka m aktualizovan Nelze ru it po , vznikl z oper. pl c4_!txt+ c4_!txt c4_!txt Nelze vk dat mezi po , vznikl z oper. pl c4_!txt+ c4_!txt c4_!txt Nelze vk dat mezi po , vznikl z oper. pl c4_!txt+ c4_!txt c4_!txt colorz colorz colorz seek &_al..ico + &_al..zavod cursorz set cursor &_cur &barvas &barvas Objedn vka - vod - colorz c4_text c4_text+ c4_text naveden text objedn vky, nelze tisknout ! PorObj DO MENU&y c4_pobj PorObj BRITISH dKONEC _JMENO _DICP _USTAV ZMENA ORG2LK KAVOLBA ORG2AKTUAL RAD_TX HLAOBJ KRSEKHLASKA POROBJ _W_COBJ MNO_PO UCTMNO_OV MNO_ZM 2MNO_ST NSUMC )MAT_OBJ ZMENICO TIDENT oROZPISKA DATUM_PD )DATUM_PO NAZEV souMJ _OSLOV MNO_MJ RPORADI QQPOR PQQKLICT QQMAT_OBJ QQROZP RM4_POBJT 2KVYPLN idUCET_SCR 2M4_UC_O )_M_ICO _M_ZAV 'ZOBR_UCET _M_UCET R_M_USTAV VL_KOD_UCTKOD_UCTU iADR_SCR EKZMENA_ORG M4_ADR ZOBR_ADR lKLICZAK c4ZAVOD 'NAPLN_ADR NAZEV_ORG NAZEV_ORG2JMENO "FUNKCE plULICE k,PSC odMESTO _pSTAT dokDDT1 DOP_DISP ZDDT2 VL_KOD_ADRKOD_ADR zkDETAIL )_CUR .zDET_POR KLICT TEXT4 ="NASTAVPOR TEXT_OBJ )M4_TOBJ .cC4_TEXT C4_POBJ i)A_POLE jmCC_KOOP VYBPLAN stAKTKOOP hWTEXT c4_MOD_SYS TISK_OBJ zNAVRAT4 G2NASTAVHL NAVRAT3 = POCET Identifikace mus t vypln Pokud chcete ukon it nav , zru te pr jednotka mus t vypln Objedn t vypln Cena mus t vypln IDENT rHLASKA +MNO_PLMJ vPLAN_MJ BROZPISKA ID_ORG CENA_PLMJ c4_pobj c4_pobj+ mi objedn vky pracuje n kdo jin , nelze aktualizovat. c4_pobj c4_PObj &barvau QQSEL dC4_POBJ ePOROBJ rW_COBJ +MAT_OBJ vHLASKA PORADI BARVA ABARVAZ NPORADI2 =KONEC ORG2DOL ORG2Z KRSEKPOCET ny - po - ipky,F ,PgDn,PgUp - F2,F3 - F6 - ^PgUp,^PgDn - F4 - ^Home - ^End,Esc - F1 - F7 - F10 Pohyb Bloky Detail it po Tisk objedn. it po Konec it HELP Obchod.specif. Funkce &barva &barvar &barvan &barva zev polo Pl.MJ Identifikace Cena/PLMJ Dat.dod Cena celkem Jak.N: Roz.N: Rozm Jakost.norma: Rozm.norma: Obchodn specifikace: dBARVA eBARVAS rBARVAZ +ID_ORG &barvau 9999999.99 999999999.99 BPORADI IDENT NAZEV PLAN_MJ AMNO_PLMJ NSEK_IDENT CENA_PLMJ DATUM_PD O_PLMJ KLICT MAT_OBJ KAIDENTT RG2_AL TEXTY KRSEKM4_POBJT KTEXT_TX ZOBRJACSN SOUCZOB &barvau @x,5 &vloz ident PICT '@!X' blokacef ka je blokov na, nelze objednat u tohoto dodavatele. insert into m4_pobjt (mat_obj, poradi, rad_tx, text_tx) values (W_cobj, &_alias..poradi, m4_txtd.radek, m4_txtd.text) insert into m4_pobjt (mat_obj, poradi, rad_tx, text_tx) values (W_cobj, &_alias..poradi, m1_pozid.rad_tx, m1_pozid.text_tx) 9999999.99 999999999.99 if empty (&_alias..ident) and ! ( i=36 or i=292 or i=33 or i=289 or i=12 or i=268) . . # . . # r polo Doplnit polo mod_proc mod_proc inlist (kod_pol, 'M','N', 'T','U', 'X', 'Y','Z') &barvau &barvau &barvau . . # . . # @x,18 &vloz nazev function '@!S23' @x,18 &vloz left(nazev,23) @x,42 &vloz plan_MJ pict '@!X' MJ m_planMJ &barvau &barvau @ x,42 &vloz plan_mj pict '@!X' @x,46 &vloz mno_plmj Objedn t vypln 999999999.99 @x,59 &vloz sek_ident pict '@!X' @x+1,18 &vloz cena_plmj pict '9999999.99' 999999999.99 @x+1,30 &vloz datum_pd pict '@E' &barvas Identt = &_alias..ident d_WSCR eROZPISKA rPOCET _PLMJ _ALIAS TUM_PD 2P_IDENT IDENT T_OBJ G2NASTAVHL TZOBRAZ MIDENT M1_IDENT KMNAZEV KNAZEV MIDENT_ODBIDENT_ODB MSEK_IDENTSEK_IDENT CIZNAZEV 2HLAOBJ )ZAVOD W_BLOK TKONTBLOK oM4_DODM _ICO )_ZAV BLOKACE ouHLASKA _M_IDENT M1_PLAN TPLAN_MJ CENA_PLMJ KLICT M4_TXTD 2C4_POBJ M1_POZID PTYP_TX PMNO_PLMJ DATUM_PD DATUM_PO MNO_MJ MNO_PO 2MNO_OV )MNO_ZM MNO_ST 'MNO_KDO W_IDENT D_UCTW_NAZEV iID_ORG EKZOBR_POL MOD_PROC lVOLBA M_PLANMJ JMENO_C 'WJMENO_C RADEK_C SLOUPEC_C "M_DAT plMOD_C2 ,MOD_C1 MKOEF1 pMNKDO dokSOUCZOB MAT_OBJ PORADI OD_ADRIDENTT zkTEXTY .zDOLT M4_POBJT TEXT_TX ZOBRJACSN colorz MCOLO dMJAKCSN eMROZCSN rMROZMER +M1_IDENT vIDENTT BID_ORG JAK_CSN ROZM_CSN C_POSTUP colorz Cena celkem: dMCEN eMCARA rMCOLO +MNO_PLMJ vCENA_PLMJ ID_ORG zev polo Pl.MJ Identifikace Cena/PLMJ Dat.dod Cena celkem 9999999.99 999999999.99 Obchodn specifikace pro po ePORADI rIDENT +NAZEV vPLAN_MJ MNO_PLMJ SEK_IDENT CENA_PLMJ DATUM_PD 2poradi cursorz c4_pobjt+ c4_pobjt c4_pobjt c4_pobjt c4_pobjt Obchodn specifikace pro po keyboard "{Ctrl+End}" w+/bg Bloky C4_POBJT text_tx rad_tx w+/bg,b/bg c4_pobjt set cursor &cCursor LZMENATXT ePOM_OBR rCALIAS +NHOR vNLEVY NPRAVY VYSKOC AOBR_TYP JMENO_C WJMENO_C RADEK_C 2SLOUPEC_C CCURSOR LJEMENU KAIDENT IDENT DENT_ODBKLICV DENTR K_IDENT 2M4_POBJT KLICT )C4_POBJT MAT_OBJ TPORADI oTEXTY M4_TXTD )_ICO _ZAV ouICO ZAVOD RRAD_TX TEXT_TX W_COBJ TRADEK M1_POZID TYP_TX 2TEXTR PCDALSIKLK CDALSIKLT MOD_TXT c4_pobjt POC_Z TEXT_TX rRAD_TX +ZMENA vM4_POBJT W_COBJ MAT_OBJ PORADI AC4_POBJT C4_POBJ OUPEC_C G2PROC2 IDENT Obchodn specifikace - ,PgDn,PgUp - F3 - ^PgUp,^PgDn - ^Home - ^End,Esc,F3 - F1 Pohyb Bloky Konec it HELP c4_pobjd+ c4_pobjd detail ! 9999999.99 999999999.99 ehled detailu po objedn RIIS 4.2 s422a1 Zadejte datum po adovan ho dod Dat.po .dod. trans(c4_pobjd.datum_pd,'@E')+' ' c4_pobjd.datum_pd k.zak. c4_pobjd.zakazka c4_pobjd.zakazka c4_pobjd.cpol+' ' c4_pobjd.cpol . k dod. str(c4_pobjd.mno_mj,12,3) c4_pobjd.mno_mj Sklad.MJ ' '+ m1_ident.mj+ ' ' m1_ident.mj ep.Koef. str(m1_plan.koef,11,4) m1_plan.koef RIIS 4.2 MOD_SYS eZAZN3 rW_COBJ +MAT_OBJ vCISPOR PORADI DETOBJ C4_POBJD DATUM_PD HLASKA C4_POBJ PS_RETURN IDENT M1_IDENT M1_PLAN G2NAZEV PLAN_MJ MNO_PLMJ SEK_IDENT CENA_PLMJ POLEX PROCX T_ODBRBOT CLEFT DENTCRIGHT FREEZE 2ORDER TPRAVA oNADPIS ZAHL )JMENO HODN ouSOUC TITLE RTITLECOLORPOC0 POZID SIKLK F0PRG F1PRG F4_JM F4PRG 2TISKPRG )F7_JM F7PRG 'F9PRG F9KEY F9KEY1 F10_JM UCTF10PRG iRAMECEK EKRIIS NAZEVT KLICO lKLNAZ SPACEBAR TR_HL1 'TR_HL2 TR_HL3 TR_HL4 TR_HL5 "TR_HL6 plTR_HL7 ,TR_HL8 TR_HL9 pDET_JM dokENTER DETAIL DETPRG PS_LINE DRPS_ZAZN )MOD_PSV cursorz c4_text c4_text+ c4_text Druh textu: DRUH_TX wDRUH_TX m4_stobj c4_text Standardn text neexistuje, nelze p hnout! c4_text Text objedn keyboard "{Ctrl+End}" w+/bg Bloky C4_TEXT ,b/bg,,,,w+/rb c4_text set cursor &cCursor LZMENATXT D_SYS ePOM_OBR rCALIAS +NHOR vNLEVY NPRAVY VYSKOC AOBR_TYP JMENO_C WJMENO_C RADEK_C SLOUPEC_C CCURSOR LJEMENU ACDALSIKLK CDALSIKLT KONEC C4_TEXT M4_TOBJ W_COBJ MAT_OBJ WDRUH_TX T_ODBOK_C M_DAT DENTNAVRAT3 NASTAVPOR MOD_C2 MOD_C1 M4_STOBJ THLASKA MOD_TXT m4_tobj _POLE M4_TOBJ eW_COBJ rMAT_OBJ +C4_TEXT vTEXT CC_koopf colorz RIIS 4.2 cursorz m_Param m_Param Tisk: Jen objedn Objedn vky s vnit kopi Jen vnit kopie Konec pom_ODbf Radek r s hlavi Tisk na tisk Zobrazen na obrazovku Soubor pro WINDOWS enos do souboru TXT Tisknout term.dod ?(a/n) set cursor &_cur set color to &Mcolor r s hlavi set cursor &_cur set color to &Mcolor Tisk na tisk Zobrazen na obrazovku Soubor pro WINDOWS enos do souboru TXT set cursor &_cur set color to &Mcolor set cursor &_cur m4_objtx jazyk OBJ.txt OBJ.txt p_kody p_name P_POC_Rf cursorz mod_lib set cursor &cCurs Prob tisk objedn vky ... Prob tisk objedn vky ... set cursor &_cur set color to &Mcolor set device to file &m_txt set printer to &m_txt1 s422a1(!9 repo form s422a1 NOCONSOLE to file &m_txt addi - (^) ipky,(^)Home,(^)End,PgUp,PgDn - Esc Pohyb Konec Prohl objedn modi comm &m_txt.txt noedit window w mod_psv faktura.txt !copy faktura.txt &m_txt >nul HLAVPAPIR e_MSCR vRESET PISMOPK PISMOP SETUP PISMOEK APISMOE HUSTE_OFF NLQ_OFF MCOLOR MDRUHTISKUELITE CC_KOOP POM_VOL POM_ALI POM_POCR POM_TXTR BPOM_INTKO POM_NAD1 TPOM_NADP POM_CENA POM_NAD2 M_PARAM POLE4 POM_ODBF RADEK oTEXT M4_OBJTX UJAZYK uMJAZYK HLAOBJ RMJMENO LORMMPOM MMCEST TMCOL _PATH CES_EXP M_TEXT M_TEXT1 2M_EXIT M_TXT PM_TXT1 P_KODY SKUP_NAME P_POC_R W_TISK 2CCURS )NASTAV_PRNMOD_LIB 'MESS P_BOLDON P_BOLDOFF DOUBLE iP_DBST_ON NDOUBLE P_DBST_OFFNLQ lP_LETRQUALDRAFT P_DRAFT 'SUB_OFF P_SUBOFF SUPER_ON P_SUPERON SUPER_OFF P_SUPEROFFEXP P_WIDT_ON dokP_WIDT_OFFHEIG_ON P_HEIG_ON HEIG_OFF RP_HEIG_OFFHUSTE_ON )P_10CPI .zP_COMPRESSP_COMP_OFFP_12CPI P_SUBON P_RESET )P_SETUP .cR8LPI P_8LPI i)R6LPI jmP_6LPI NEWPAGE FFP_NEWPAGE ELITEK c4_NASTSOUBORNADPIS SL23P G2PREDMET PORADI ID_ORG IDENT INAZEV OBJTX MNOZSTVI TERM_DOD CENA_J sID_ZAKAZ sJAKOST ROZMER 1S422A1 RUHTISKUS2LATWIN UMOD_PSV _EXPPOL E-Mail: VPAPIR SETUP eRESET rHLAVPAPIR MDRUHTISKUDOUBLE _M_NAZEV _M_NAZ_2 _M_TELEFONID_ORG M4_OBJTX TELEFON _M_ULICE N_M_FAX _M_MESTO _M_DALNOPIDALNOPIS _M_PSC OPIMEMAIL PEMAIL NDOUBLE KUDRAFT m4_adr m4_adr m4_adr HLAOBJ MDRUHTISKURD PAPIR HLAVPAPIR M4_OBJTX _M_ICO _M_DICP ONNAZEV_ORG _M_UCET NAZEV_ORG2BANKA _M_USTAV JMENO NOPIFUNKCE HTISKUHEIG_ON OBJEDNAVKAEMP0 TISKUHEIG_OFF ULICE INTKO MESTO TCISLO UMAT_OBJ ID_ORG M4_ADR ZAVOD oDALNOPIS DOD_LHUTA CSD_OKRSEKOKRSEK_CD ZPUS_DOPR _DOPR STANICE_CDMISTO_UR TVYRIZUJE DAT_VYST DATUM_V DOP_DISP DOPR_DISP C4_TEXT PPREDMET c4_tiskp+ c4_tiskt c4_tiskt objed c4_tiskp POROBJ W_COBJ SKUC4_TISKP rMAT_OBJ M4_POBJT C4_TISKT OBJED MNO_PLMJ IDENT M1_IDENT NDEJ_STAT POM_VOL HLAVA _ORG2RD CENA_SOUC CENA_PLMJ PORADI M4_OBJTX POKRAC VKASTRANKUJ UPOM_CENA ID_ORG CENA_CELK KONPOR M4_OBJTX UPORADI rIDENT NAZEV OBJTX MNOZSTVI TERM_DOD pom_ODbf Rozm.N.: pom_ODbf pom_ODbf pom_ODbf c1_Ident pom_ODbf POM_POCR POM_TXTR URADEK rTEXT POM_VOL ZSTVI DOUBLE NPORADI ID_ORG CC_KOOP IDENT G2SEK_IDENT NAZEV M1_IDENT _PLMJ PLAN_MJ MNO_PLMJ ADATUM_PD UCENA_PLMJ QRA_D MJAZYK IDENT_ODB NDOUBLE TM4_OBJTX UID_ZAKAZ JAK_CSN MJAKCSN JAKOST ROZM_CSN MROZMER oROZMER C_POSTUP MM_JAZYK MROZCSN EKCENA_J C4_TISKT C4_TISKP MAT_OBJ CDMM_EX T_RAD TEXT_TX POKRAC STRANKUJ HLAVA C1_IDENT ZASOBA UQ2_0 2Q3_1 )Q2_1 NQ1_1 'Q4_2 _POCR UNDOUBLE MJAZYK rNDOUBLE X_POM M4_OBJTX POKRAC STRANKUJ MDRUHTISKUQQQ rM4_OBJTX OBJEDNAVKACISLO MAT_OBJ a4_obj objed RIIS 4.2 Aktualizace objedn vky materi ada mater. objed.: vod: @!R XXXXXX ada neexistuje, nave te cel prvn slo t slo mater.objed.: @!R XXXXXXXXXX ada neexistuje, nave te cel prvn slo t slo mater.objed.: 000000 @!R XXXXXXXXXX slo objedn vky mus t vypln Bylo p ady, zadejte znovu! slo objedn vky mus t numerick Toto slo ji existuje v archivu, najd te posledn ... slo v dan v archivu a za te od n Toto slo ji existuje v archivu, Jestli chcete, ... te posledn slo v dan v archivu a za te od n PorObj mod_proc _AOBR ISKUW_NASEL rA4_OBJ OBJED AVKAHLAOBJ W_COBJ W_RAD _DELKA S422A1 NMAT_OBJ HLASKA G2_CIS W_COBJ1 _KONEC _KONDEL _CHYBA JAZYK MM_JAZYK AMLOOP UJINYJAZYK ZAVOD TPORADI UKOEF POROBJ M4_ORGAN W_ICO W_ZAV ZOBR_ORG oMOD_PROC HLAVICKA ZACNI CHCESTISK TYP_OSLOV OSLOV ISKUM4_ADR UTYP_OSLOV M_CIS1 JMENO M4_DOP_D ZAVOD KOD_ADR NMQDOP DOPR_INST1DOPR_INST2HLAOBJ G2FUNKCE NAZEV_ORG NAZEV_ORG2ULICE ORG2MESTO DOP_DISP Chyb ty pro vlastn organizaci ! set color to &barva w+/bg w+/bg w+/bg ISKUHMEZ UDMEZ POLOVINA W_ICO W_ZAVOD BARVA STREC NST1MROW INST2M4_UC_O 2_M_ICO _M_ZAV HLASKA RG2HELP22 G2RAM3 ZAVOD SAYRAD3 U_M_USTAV USTAV _M_UCET ehled vlastn organizace Zp.platby Plat.ter. ISKUDMEZ set color to &barx ISKUBARX UKOD_UCTU USTAV ZP_PLATBY PLAT_TERM Konec Pohyb - Esc - Enter ipky,Home,End,PgUp,PgDn cursorz colorz Objed. byla vystavena v jazyku: Vy aktualizujete v jazyku: Chcete zm nit jazyk ? (a/n): Pokud jazyk zm te, zkontrolujte zn ech text set cursor &Mcur ISKUMCUR UMCOLO HLAOBJ JAZYK MM_JAZYK MZMEN MLOOP Nestandardn polo ka, byla dopln colorz ehled polo ek Obchodn specifikace Informace o um Informace o obratech ceny Konec Nelze m nit polo ky z operativn ho pl mod_proc inlist (kod_pol, 'M','N', 'T','U', 'X', 'Y','Z') mod_proc mod_proc ISKUROZPISKA HLASKA JAZYK QQCOLORE MZAZS NW_IDENT Q_COBJ ST1Q_POR NST2M_EXIT 2IDENT MAT_OBJ PORADI RG2JEVICECEN MIDENT W_NAZEV ZOBR_POL AMOD_PROC UZOBRAZ PREHLED_OSZOBR_UM ZOBR_OB TZOBR_CEN c4_pozid+ RIIS 4.2 ka nem dnou obchodn specifikaci c4_pozid vezni s422a1 Dopln zvu - obchod. specif. 'OS' polo ' '+c4_pozid.typ_tx c4_pozid.typ_tx ' '+ str(c4_pozid.rad_tx,3) c4_pozid.rad_tx c4_pozid.text_tx c4_pozid.text_tx RIIS 4.2 MOD_SYS KUM1_POZID UW_IDENT C4_POZID IDENT HLASKA POLEX PROCX NCLEFT CRIGHT ST1FREEZE ST2ORDER RG2PRAVA NADPIS JMENO ASOUC UTITLE TITLECOLORPOC0 ED_OSF0 R_CEN OLORE ORGAN oF0PRG F1ON F1PRG F4_JM F4PRG TISKPRG F7_JM F7PRG CDF9PRG TF9KEY F9KEY1 F10_JM F10PRG RAMECEK NAZEVT PKLICO KLNAZ SPACEBAR UTR_HL1 TR_HL2 TR_HL3 2TR_HL4 )TR_HL5 NTR_HL6 'TR_HL7 TR_HL8 TR_HL9 DET_JM ENTER iDETAIL DETPRG PS_LINE FFPS_RETURN PS_ZAZN MOD_PSV m4_pobjt Q_TYP KUTYP_TX UM4_POBJT Q_COBJ Q_POR MAT_OBJ PORADI C4_POZID RAD_TX TEXT_TX NM_EXIT PS_RETURN c4_dodmc+ c4_dodmc c4_dodmc c4_dodmc kl_pomi cena_plmj Ceny polo pro I d Cena/plmj Rozhod.mno . Pozn kod_cen + ' ' + str (cena_plmj, 10, 2) + str (mno_r,12,3) + ' ' + pozn Zadejte k mod_fun 9999999.99 999999999.99 KL_POMI KUSOUB_OT IDENT M4_DODMC C4_DODMC ZAVOD NKOD_CEN ETURN M4_DODM T2CENA_PLMJ N_CCUR N_LMEZ RG2N_PMEZ N_HMEZ N_DMEZ N_PROM N_HOD AN_POC UN_TEXT N_HLAV LORN_RAD D_OSN_NVYH ZOBR_NAP TMOD_FUN _POMI MNO_PLMJ SOUCZOB pathz colorz te disketu a zm te ENTER ... !&pth\test_d &sach ERROR Disketa nebyla vlo Disketa nebyla vlozena mkdir set default to &sach set default to &drive =adir(f_info,'&m_txt') sta na disket mkdir Prob enos ... !copy &m_txt &plna_ces > nul KUOBEX UW_EXP MMSCR PLNA_CES DRIVE FREESPACE F_INFO NF_SIZE MPOZSPACE _PATH T2MCOL CES_EXP W_CESTINA HLASKA MKDIR MJMENO _oOescrzyaieuuESCRZYAIEUUdtnDTN_ pathz colorz Zadejte jm stupn ho souboru: Zadejte plnou cestu c le exportu: (Pokud adres neexistuje, bude vytvo uje-li podm nky DOSu pro MKDIR.) Cesta nebyla zad Cesta nesm obsahovat mezery ! no nebylo zad M_EXIT KUTMP UW_COBJ MDRUHTISKUM_TXT M_TXT1 N_PATH T2MMPOM MJMENO CES_EXP _MSCR M4_OBJTX HLASKA MMCEST detailn znamy neexistuj c4_adr+ c4_adr Aktualizace objedn vky materi RIIS 4.2 A d r e s y dodavatele vyb_adr s422a1 Zadejte k kod_adr+ ' ' kod_adr Typ osl. ' '+typ_oslov+' ' typ_oslov jmeno jmeno zev organizace nazev_org nazev_org zev organizace 2 nazev_org2 nazev_org2 Funkce funkce funkce Ulice, ulice ulice mesto mesto Telefon telefon telefon lnopis dalnopis dalnopis KUMOD_SYS UZAZNAM W_ICO W_ZAVOD ZAVOD HLASKA SKUPS_RETURN C4_ADR NPOLEX PROCX T2RBOT CLEFT CRIGHT FREEZE ORDER PRAVA ANADPIS UZAHL JMENO LORHODN D_OSSOUC TITLE TTITLECOLORPOC0 _PLMJ F0PRG F1PRG F4_JM CDF4PRG TTISKPRG F7_JM F7PRG F9PRG F9KEY F9KEY1 F10_JM PF10PRG RAMECEK UNAZEVT KLICO KLNAZ 2SPACEBAR )TR_HL1 NTR_HL2 'TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 iTR_HL8 TR_HL9 DET_JM FFENTER DETAIL ALDETPRG PS_LINE 'PS_ZAZN MOD_PSV M4_ADR ZMENA_ORG M4_ADR UC4_ADR ZAVOD KOD_ADR colorz mod_proc TYP_OSLOV dy adresy z ka (I ) ZA,HL,FA neexistuj W_ICO W_ZAVOD UMSCOL CALIAS W_ZAV ZAVOD ZOBR_ORG UMOD_PROC N_ZAV T2_UL _MEST _STAT _NAZ_O _NAZ_O2 MQDOP VLKODADR NASELOBJ ANASOBJ UM4_ADR FUNKCE RULICE D_OSMESTO COLORNAZEV_ORG NAZEV_ORG2TYP_OSLOV M_CIS1 JMENO oM4_DOP_D KOD_ADR DOPR_INST1DOPR_INST2_M_ICO _M_ZAV MQCSD CDMQOKR TOKRSEK_CD HLASKA ID_ORG CMISTUR _M_PSC _M_MESTO HLAOBJ PDOP_DISP 2MISTO_UR CSD_OKRSEKPROC1 filterz colorz m1_Kalk filterz x1_Kalk m1_Kalk x1_Kalk m1_Zas filterz x1_Zas m1_Zas x1_Zas m1_Obr filterz Ident m1_Obr Ident m1_Obr_A filterz Ident m1_Obr_A Ident c1_Ident c1_Ident POM_ALI POM_ORD UPOM_VETA POM_FILT MMCOLOR POM_KALI POM_KORD POM_KVETA POM_KFILT POM_KZAV NPOM_ZALI POM_ZORD POM_ZVETA POM_ZFILT POM_ZZAV POM_OALI POM_OORD POM_OVETA POM_OFILT POM_OZAV POM_AALI POM_AORD APOM_AVETA POM_AFILT POM_AZAV RW_ZAS D_OSW_SPOTR W_ZAS_KC TW_SPOTR_KCW_UVN WQ1_0 ORG2WQ2_0 WQ3_0 WQ4_0 WQ1_1 oWQ2_1 WQ3_1 WQ4_1 NST1WQ1_2 NST2WQ2_2 WQ3_2 WQ4_2 WQ1_3 CDWQ2_3 TWQ3_3 WQ4_3 WQK1_0 WQK2_0 WQK3_0 WQK4_0 WQK1_1 PWQK2_1 2WQK3_1 WQK4_1 SEKWQK1_2 WQK2_2 WQK3_2 2WQK4_2 )WQK1_3 NWQK2_3 'WQK3_3 WQK4_3 M1_KALK X1_KALK M1_ZAS iX1_ZAS M1_OBR IDENT M1_OBR_A C1_IDENT ZASOBA SPOTREBA 'ZAS_KC SPOTR_KC EROFFQ4_0 dokQ3_1 T_OFFQ4_1 RQ3_2 G_OFFQ4_2 )Q1_3 .zQ2_3 PRESSQ3_3 P_OFFQ4_3 QK1_0 QK2_0 QK3_0 )QK4_0 .cQK1_1 QK2_1 i)QK3_1 jmQK4_1 QK1_2 FFQK2_2 QK3_2 c4_QK4_2 UBORQK1_3 QK2_3 G2QK3_3 QK4_3 C4_TISKP KOD_OB CW_HODNOTA SKUT_MNOZ W_HOD_KC NAKLAD MESIC CDEJ_STAV set filter to &pom_Filt POM_ALI POM_ORD UPOM_VETA POM_FILT MMCOLOR colora HCOLOR UOBRH colora MCOLOR US422A1 (i=5% ZOBRPLAN VYBEROBJ VYBERKOOP DET_AIL DET_AILK _VYBER ZAPIS ZAPISKOOP CIZNAZEV ZAPISDALSI ZAPDALKOOP ZACNI xC_ CHCESTISK HLAVICKA NASTAVHL CISRADY Jy MENU1 PROC1 i= ZMEN1 ZMENY e AKTKOOP KVYPLN NASTAVPOR MENU2 CAS PORADI2 PROC2 ZMEN2 ZOBRJACSN SOUCZOB 2poradi TEXT4 NAVRAT4 MENU4 ) and DET_POR TEXT_OBJ NAVRAT3 TISK_OBJ NADPIS SL23P PREDMET HLAVA && de~3 PORADI KONPOR o b/b, @ STRANKUJ VLOZOBJ NAPLN_ADR ZOBR_UCET set co SAYRAD3 HELP22 JINYJAZYK VOLBA and PREHLED_OS VEZNI ('c4p{ ZOBR_CEN EXPPOL NASTSOUBOR ZOBR_ADR VYB_ADR ZMENICO DEJ_STAT DEJ_STAV HLASKA X:\OBEC\04\ S422A1.FXP X:\OBEC\04\S422A1.PRG