set color to b/bg,w+/rb set color to b/bg m_param m7_ucto m_cis1 x_cis1 m_dat x_dat v1_str x1_str v4_sklad x4_sklad m7_tup skupina m7_desk skupina m7_uskup skupina m7_ucet m4_organ m4_uc_o m7_obru denik m7_stav m7_sstav m7_meny m7_pokl ident_pok m7_denik denik m7_kasa cis_dok c7_kasa c7_kasa c7_kasa CIS returnA2 eBARVAU BARVA1 W_POLE M_PARAM PAR_POLE SPOLE7 PFIRMA c7FIRMA iPUC_POKL sUC_POKL rM7_UCTO s_CIS_POK _uM_CIS1 okX_CIS1 eleM_DAT cto X_DAT if cV1_STR 999X1_STR ty(V4_SKLAD X4_SKLAD lM7_TUP pokSKUPINA M7_DESK M7_USKUP aM7_UCET k UCET is_poM4_ORGAN endM4_UC_O seM7_OBRU asDENIK eek M7_STAV nM7_SSTAV kM7_MENY okMENA if fM7_POKL IDENT_POK M7_DENIK M7_KASA mCIS_DOK C7_KASA _kSTR DAT_SPL unTYP_DOK UC_OBD DAT_AKT AUTOR bstrS_UCT a.tyDOKLAD STR_POK PLAT_POK eMM_AUTOR _W_SK2 ijOPRAVA RIIS 7.9 pokladn ho dokladu za Pokladn doklady za &barva1 P_SROZ M7_UCTO rnPLAT_POK eROK_POK QA1 QA2 c7QA7 iQA8 rQA10 s_QA11 _uQA12 okQA13 eleQA14 cto QA15 if cQA16 999QA17 ty(QA18 QA19 lQA20 pokQA21 QA22 QA23 aQA24 k QA25 is_poQA26 eQA27 endQA28 seQA29 asPOCETA ek P_OPR_KC nMENUP kPORADIP1 kKONEC if fPROCP1 ZVOL_DOK KON_AKT KONECA OK_CA DOLA bstrHORA a.tyXA NASTAV ZMENYP eVOL_POK doklad Tisk dokladu Storno dokladu Konec c7_kasa mod79d lo denn rkou, nelze stornovat mod_fun C7_KASA rnP_SROZ eVOLBA DENIK CIS_DOK SDAT_SPL TYP_DOK c7UC_OBD iDAT_AKT sAUTOR rS_UCT s_M7_POKL _uIDENT_POK DOKLAD leM7_UCTO o STR_POK cPLAT_POK 9MM_AUTOR (KONEC PROCP1 lZVOL_DOK kKON_AKT TISK MOD79D aUZAVR k TXT is_poHLASKA eMOD_FUN ndDOK_ZRUS p_rada ident_pok ehled pokladn ada N zev pokl. ady Doklad ' '+ident_pok+' '+text+' '+str(doklad,3) mod_fun Nelze vkl dat nov doklad mod_fun Doklad byl stornov n, nelze aktualizovat mod_fun c7_kasa p_den denik+str(cis_dok,5) ehled doklad ada Doklad Typ stka Kli Stav denik+' '+str(cis_dok,5)+' '+typ_dok+' '+str(kc,12,2)+' '+ klic+' '+iif(s_uct='1','Roz n',iif(s_uct='2','Stornov n','Ne ada,doklad mod_fun c7_kasa c7_obru c7_obru+ c7_obru c7_obru c7_obru c7_obru DENIK CIS_DOK S_DOK M7_POKL IDENT_POK C7_KASA DOKLAD P_RADA N_LMEZ c7N_PMEZ iN_HMEZ sN_DMEZ rN_PROM s_N_HOD _uN_POC N_TEXT leN_HLAV o N_RAD cN_NVYH 9ZOBR_NAP (MOD_FUN P_SROZ kHLASKA M7_KASA S_UCT aW_POLE k P_DEN poP_DENIK eP_CIS_DOK asDAT_SPL k TYP_DOK nUC_OBD kDAT_AKT kAUTOR if fM7_UCTO STR_POK PLAT_POK MM_AUTOR mKONEC M7_OBRU _kUCT W_SK2 unCIS_G C7_OBRU SKUPINA trDAL a.tyP_MD P_DAL P_OPR_KC &sq2 P_SROZ rnUZAVR eS_UCT MENA TYP_DOK c7POCETA N da hodnot F8 - Funkce F10 - ^End,Esc Pohyb - Konec - german &barva1 99999 DOKLAD Druh cenin : cenina Druh m ny : 999999999.99 Nenalezena organizace GERMAN DENIK rnCIS_DOK eTYP_DOK M_CIS1 C7_KASA M7_MENY CENINA c7DEJ_STAV i_MNOZ rSTRED s_STR _uKLIC DAT_SPL lePRILOH o IDENTIF cVARIAB 9TOTOZ (DICP ZAVOD kP_UST M4_ORGAN NAZEV_ORG M7_MENY C7_KASA rnMENA eZASOBA Den : na : Stav : Poklad. Doklad : Typ dokladu: Druh m ny : edisko : stka: Zpracov loh : Text : Osob. slo : nost : P : Var.symbol : vod : / Pen. stav : Organizace : @6,15 &vloz typ_dok pict '@!' DOKLAD DOKLAD p_typ_dok Druh cenin : cenina Druh m ny : @7,15 &vloz mena pict '@!' Cenina neexistuje Nespravn mod_fun @8,15 &vloz str pict '@!' edisko neexistuje! mod_fun c7_obru @9,10 &vloz kc pict '999999999.99' Nevypln mod_fun Stav m ny je v pokladn mod_fun stka neodpov tu kus mod_fun Ceninu nelze nakoupit mod_fun cenina cenina c7_obru @10,10 &vloz klic pict '@!' neexistuje mod_fun c7_obru @11,15 &vloz dat_spl pict '@E' @11,38 &vloz priloh pict '99' @12,15 &vloz text @14,15 &vloz variab pict '@!' m6_zam.dbf2 m6_zam Osobn slo neexistuje mod_fun @15,15 &vloz totoz @16,15 &vloz dicp to organizace je naveden jin mod_fun @17,15 &vloz variab m7_faodb vars_s m7_fadod vars_s m7_fadod cis_fak m7_faodb cis_fak slo faktury neexistuje mod_fun @18,15 &vloz identif @18,30 &vloz zavod @17,53 &vloz ucet @18,53 &vloz p_ust KONT TV_C7 P_TYP_DOK TYP_DOK M_CIS1 C7_KASA iTEXT sJMENO_C WJMENO_C _TYP_C _uOK_C MOD_C2 leRADEK_C o SLOUPEC_C MOD_C1 9VARIAB M7_MENY CENINA kDEJ_STAV NASTAV V_ORG P_POM k TXT poHLASKA eMOD_FUN asPAR_POLE V1_STR nKLIC kC7_OBRU fNSTR mZASOBA P_OPR_KC k_MNOZ STRED unZAZN QA5 M7_DESK W_SK2 trNAZEV tyQA6 QA8 _M6_ZAM ijOSC sa.TOTOZ PRIJMENI JMENO ij_QA10 ijQA11 kasa.DICP P_TYP_ORG _pM7_FAODB _VARS_S _pdFAKT poc_pM7_FADOD IDENTIF ICO zasoZAVOD zasZAV _kasaUCET UCET_DOD sP_UST 7_kaP_DF k,DEJ_FAKTURCIS_FAK QA13 URQA14 AKTURQA15 AKTURQA16 AKTURC7_GENER Organizace nenalezena! mod_fun Nenalezena organizace F et nenalezen! mod_fun et nenalezen M4_ORGAN nC7_KASA eIDENTIF ZAVOD TXT HLASKA MOD_FUN P_TYP_ORG NAZEV_ORG sM4_UC_O P_UST _USTAV _uICO mod_fun P_POM P_TYP_DOK TYP_DOK eP_TYP_ORG KONECA YP_ORG V_ORG lePROCP1 o ZMENP1 NAPOVEDA 9POK_FUN POCETA kROZHODNI MOD_FUN K_UDAJUP OK_CA k P_ZAPIS poZAPIS_D cenina mod_fun POZOR chyba v datech volejte firmu SoWA m7_kasa m7_kasa cenina replace md_&obd1 with md_&obd1-m7_obru.md replace dal_&obd1 with dal_&obd1-m7_obru.dal replace md_&obd1 with md_&obd1-m7_obru.md replace dal_&obd1 with dal_&obd1-m7_obru.dal m7_obru m7_stav.dbf replace md_&obd1 with md_&obd1+c7_obru.md replace dal_&obd1 with dal_&obd1+c7_obru.dal m7_sstav.dbf replace md_&obd1 with md_&obd1+c7_obru.md replace dal_&obd1 with dal_&obd1+c7_obru.dal P_S_UCT C7_OBRU eINDIK LOCK_STAV LOCK_SSTAVNSTR C7_KASA S_UCT M7_OBRU IDENT_DEN DOKLAD sCIS_G AVM7_UCTO _CIS_POK _uM7_KASA DENIK leCIS_DOK o M7_MENY 9TYP_DOK PRIJ_M PRIJ_D kPOC_PM POC_PD ZASOBA VYD_M k VYD_D poPOC_VM ePOC_VD STRED eCENINA asW_POLE HLASKA nMOD_FUN kM7_POKL kW_SK2 fSKUPINA OBDOBI_MM PAR_POLE mM7_STAV M7_SSTAV kM7_DENIK PK_DOKLAD CINNOST SPLATNOST DAT_SPL trPAR_ZNAK P_ZAPIS edisko neexistuje! mod_fun mod_fun Nevypln mod_fun vypln na toto nost Nevypln na organizace mod_fun Nevypln slo faktury mod_fun OK_CA STR PAR_POLE eV1_STR C7_KASA _SSTAVHLASKA MOD_FUN NT_DEN AVTOTOZ _QA10 _uTYP_DOK IDENTIF leQA14 o VARIAB DOKLAD p_typ_dok p_pom ehled cenin ehled m na N kup Prodej St ed Dat. akt. ' '+mena+str(nakup,10,2)+str(prodej,10,2) +str(stred,10,2)+' '+tran(dat_akt,'@E') mod_fun p_str ehled st edisek ed. N zev nstr+' '+nazev_str edisko mod_fun c7_tup c7_tup+ c7_tup c7_tup p_pom det_tup ehled TUP KC N zev ty MD DAL det_tup+' '+m7_desk.kc+' '+m7_desk.nazev+' '+ucet_1+' '+ucet_2 mod_fun m6_zam.dbf2 m6_zam jmeno p_pom ehled zam stnanc ijmen Jm no Os. prijmeni+' '+jmeno+' '+osc hled_zam in mod79a1 mod_fun U tohoto daje nen mod_fun m7_faodb vars_s m7_fadod vars_s p_pom vars_s ehled odb ratelsk ch faktur Vars.sym. Znak Organizace stka vars_s+' '+znak_f+' '+ico+'/'+zav+' '+str(cast_cel,10,2)+' '+ucet_dod ehled dodavatelsk ch faktur Vars.sym. Znak Organizace stka vars_s+' '+znak_f+' '+ico+'/'+zav+' '+str(cast_cel,10,2)+' '+ucet_dod mod_fun nazev p_pom Organizace o Z vod N ico+' '+zavod+' '+nazev_org hled_organ mod_fun Neuvedeno I O mod_fun c4_uc_o c4_uc_o Neexistuje zadny ucet u teto organizace mod_fun p_pom ty pro ICO: vod: stav substr(ustav,1,20)+' '+ucet mod_fun U tohoto daje nen mod_fun M_CIS1 JMENO_C eWJMENO_C TYP_C RADEK_C AVSLOUPEC_C MOD_C1 C7_KASA P_TYP_DOK TYP_DOK YP_DOK _P_POM _uN_LMEZ N_PMEZ leN_HMEZ o N_DMEZ N_PROM 9N_HOD N_POC N_TEXT N_HLAV kN_RAD N_NVYH M7_MENY k ZOBR_NAP oMOD_FUN eMENA DEJ_STAV asP_STR V1_STR kC7_TUP fM7_TUP W_SK2 SKUPINA DET_TUP mM7_DESK KLIC kNAZEV DOKLAD C7_GENER M6_ZAM trJMENO yN_VYB VARIAB eTOTOZ _PRIJMENI .HLASKA QA12 M7_FAODB _VARS_S ijFAKT kasa.M7_FADOD IDENTIF _pZAVOD _pdUCET poc_pUCET_DOD DICP P_UST zasoP_DF asDEJ_FAKTURQA13 QA14 sM4_ORGAN aP_TYP_ORG NAZEV_ORG AKTURM4_UC_O URC4_UC_O URUSTAV Vyhled Zadejte p stnance mod_fun stnanec nebyl nalezen ZAU eW_CESTINA HLASKA AVMOD_FUN c7_obru m7_vstup c7_vstup c7_vstup c7_vstup mod_fun - neni zadefinovan TUP ! mod_fun - neni zadefinovan TUP C7_OBRU P_DOK DOKLAD eC7_KASA W_UC1 W_UC2 AVW_ST1 W_ST2 W_MD1 W_MD2 W_DAL1 W_DAL2 s_OBD M7_UCTO _PLAT_POK uM7_VSTUP C7_VSTUP eSKUPINA DET_TUP STR_N 9HODNOTA DAT_VYST PAR_ZNAK W_SK2 kKLIC DAT_SPL k CIS_DOK oKLICG e_HODNOTA M7_DESK eHLASKA asMOD_FUN W_TEXT n_DENIK kDENIK kNAZEV f_DOK W_POR M7_DENIK M7_TUP VYTVOR_OB NAPLN_COBR c7_obru c7_obru IDENT_DEN DOKLAD eCIS_POL DATUM AVSKLAD OBDOBI_MM PAR_ZNAK sCIS_G RAD_TUP _NED_VYROBASKUPINA SPLATNOST W_UC1 _DENIK 9W_POR W_ST1 C7_VSTUP kW_MD1 W_DAL1 W_TEXT k M7_TUP oW_SK2 ROBADAT_VYST W_UC2 W_ST2 asSKL2 W_MD2 nW_DAL2 edpis Doklady - p ehled Stav pokladny Konec Nelze tovat ciz mod_fun 999999999.99 KON1 VOL11 TYP_DOK AVTXT HLASKA MOD_FUN RUC_UCT ZOBR_OBR ZOBR_DOK sZOBR_POK C7_KASA BAKLIC c7_obru.dbf2 Doklad nen mod_fun c7_obru c7_obru Doklad nen mod_fun mod79a1 edpis ident_den+' ' ident_den Doklad str(doklad,6) doklad ' '+cis_pol cis_pol ' '+c7_obru.ucet c7_obru.ucet ' '+c7_obru.nstr c7_obru.nstr MD str(c7_obru.md,15,2) c7_obru.md DAL str(c7_obru.dal,15,2) c7_obru.dal Obdob ' '+str(c7_obru.obdobi_mm,2) c7_obru.obdobi_mm TYP_DOK eHLASKA MOD_FUN C7_OBRU AVPOLEX PROCX CLEFT CRIGHT sFREEZE ORDER _ZAHL BAJMENO TITLE TITLECOLORF1 VSTUP DETAIL k F1PRG oF4_JM ROBAF4PRG F7_JM F7PRG asF9KEY F10_JM nF10PRG kDET_JM ADETPRG fRAMECEK NAZEVT TISKPRG mPS_RETURN LN_COBRNADPIS MENUP3 MOD_PSV OBSAH - - ^End,Esc Pohyb Konec mod79a1 RIIS 7.9 Stav cenin: Stav pokladny: cenina ' '+m7_meny.mena m7_meny.mena Za den: Po .stav ' '+str(m7_meny.stav_d,10,2) m7_meny.stav_d P str(m7_meny.prij_d,10,2) m7_meny.prij_d V str(m7_meny.vyd_d,10,2) m7_meny.vyd_d Kon.stav str(m7_meny.zasoba,10,2) m7_meny.zasoba j.dokl. ' '+str(m7_meny.poc_pd,5) m7_meny.poc_pd d.dokl. ' '+str(m7_meny.poc_vd,5) m7_meny.poc_vd c: Po . stav ' '+str(m7_meny.stav_m,10,2) m7_meny.stav_m P str(m7_meny.prij_m,10,2) m7_meny.prij_m V str(m7_meny.vyd_m,10,2) m7_meny.vyd_m Kon. stav str(m7_meny.zasoba,10,2) m7_meny.zasoba j.dokl. ' '+str(m7_meny.poc_pm,5) m7_meny.poc_pm d.dokl. ' '+str(m7_meny.poc_vm,5) m7_meny.poc_vm POLEX PROCX eRBOT CLEFT CRIGHT AVFREEZE ORDER JMENO TITLE sTITLECOLORF1 LECOLORF9 DETAIL F1PRG F4_JM kF4PRG F7_JM F7PRG F9KEY k F10_JM oF10PRG OBADET_JM DETPRG RAMECEK asNAZEVT RIIS nTISKPRG kPS_RETURN PS_ZAZN mDATUM TYP_DOK NADPIS OBRM7_MENY C7_KASA CENINA trMENUP3 yMOD_PSV mod79a1 Prehled pokladniho deniku RIIS 7.9 ehled doklad pokladny - aktu obdob ' '+m7_kasa.denik m7_kasa.denik s.dokl. ' '+str(m7_kasa.cis_dok,5) m7_kasa.cis_dok ' '+m7_kasa.klic m7_kasa.klic ' '+m7_kasa.typ_dok m7_kasa.typ_dok ' '+m7_kasa.mena m7_kasa.mena str(m7_kasa.kc,12,2) m7_kasa.kc m7_kasa.str m7_kasa.str s.faktury m7_kasa.variab m7_kasa.variab Identifikace m7_kasa.identif m7_kasa.identif m7_kasa.totoz m7_kasa.totoz m7_kasa.text m7_kasa.text Pen. m7_kasa.p_ust m7_kasa.p_ust m7_kasa.ucet m7_kasa.ucet .obd. ' '+str(m7_kasa.uc_obd,2) m7_kasa.uc_obd Splatnost ' '+tran(m7_kasa.dat_spl,'@E') (m7_kasa.dat_spl ) Dat.aktual. ' '+tran(m7_kasa.dat_akt,'@E') (m7_kasa.dat_akt ) POLEX PROCX eRBOT CLEFT CRIGHT AVFREEZE ORDER JMENO TITLE sTITLECOLORF1 LECOLORF9 DETAIL F1PRG F4_JM kF4PRG F7_JM F7PRG F9KEY k F10_JM oF10PRG OBADET_JM DETPRG RAMECEK asNAZEVT RIIS nTISKPRG kPS_RETURN fM7_KASA ZAZPOK DATUM PS_ZAZN OBRNADPIS PRAVA yMENUP3 MOD_PSV c7_obru M7_UCTO DEN_POK MIDENT_DENM7_DENIK MDOKLAD DOKLAD AVCIS_POL ENDATUM OBDOBI_MM CINNOST PAR_ZNAK sTEXT COLORIDENT_DEN SPLATNOST SKUPINA ORPLAT_POK 9C7_KASA TYP_DOK CIS_DOK PUC_POKL kSTR_POK DAT_SPL W_SK2 k C7_OBRU set color to b/w set color to bg/n set color to w+/w set color to w+/bg set color to b/bg,w+/rb set color to w+/b set color to w/n RIIS 7.1 e t n obraty za &barvah ZMENY T_DENNOVY_Z ZMENA1 ZMENA2 S_POL OBI_MM _ZNAK sPOC_ZAZ ORZOBR_ZAZ RADEK INDIK TNOST ORPOCET 9DOP1 C_POKL KONTROLA oOK_K BANOVY_R OBRAT as_TST ZMENA n_UCET kPMSTR PMTUP fPMSKUP PMDAT W_POLE mPMCASTKA BARVAS BARVAR OBRBARVAT BARVAZ BARVAU BARVAN BARVAH trM7_UCTO yW_ROK ePLAT_POK _OBDC j_OBD ._GENER CIS_G BARVA _C7_OBRU ijUCET a.NAPLN_C7_OW_DENIK IDENT_DEN DEN_POK _W_TEXT _pdC7_KASA _pTEXT M7_DENIK W_DOKLAD oDOKLAD asW_NED_VYR NED_VYROBAW_PAR_ZNAKPAR_ZNAK aW_CINNOST CINNOST W_SPLAT URSPLATNOST M7_UCET URMD_CELK DAL_CELK dMENU1 vydKONEC X R poc_vZ h poc_T 1,poc_vdA th poc_vU POCET1 POCET2 with zasQ6 m7_kasaHLAV1 PROC1 se mHLAV2 typ_PROC2 &barvah &barvau ZMENY T_DENQ3 ENCISELNIK BI_MM POCET1 POOCET2 sMD_CELK ORDAL_CELK BAPOMOC MENU1 BARVA BARVAZ ORKONEC POCET2 HLAV1 oHLAV2 BAPROC1 PROC2 &barvau &barvas &barvaz &barvar &barvar pis na obou stran &barvaz &barvat Doklad: Var.symbol: innost: Splatnost: &barvau &barvas &barvau &barvar &barvaz &barvar pis na obou stran &barvat &barvaz Celkem: &barvat &barvan D A L &barvau &barvau &barvas &barvaz &barvar &barvar &barvaz &barvat Text: Var.symbol: innost: Splatnost: &barvau ZAZ &barvau &barvaz Esc - Konec ^End - Generuj &barvaz stka: edisko: Skupina: TUP: Dat.vyst.: &barvau &barvas 99999 &barvau W_DENIK W_TEXT DENW_DOKLAD W_NED_VYR W_PAR_ZNAKW_CINNOST W_SPLAT &barvat &barvaz &barvas &barvau &barvas &barvau 999999999999.99 999999999999.99 &barvau DENIK DOKLAD CIS_POL _ZNAKMD INNOST SKLAD C7_OBRU sST_ZAZ ORMD_CELK DAL_CELK AM7_UCET NAZEV &barvau &barvas &barvau X_TEXT X_NED_VYR X_PAR_ZNAKX_CINNOST X_SPLAT &barvau 999999999.99 PMCASTKA PMSTR PMSKUP NAKPMTUP PMDAT @ 4,9 &vloz w_denik picture '@!X' mod_fun Chybn identifikace den @ 4,13 &vloz w_text picture '@X' @ 5,10 &vloz w_ned_vyr @ 5,34 &vloz w_par_znak @ 5,55 &vloz w_cinnost @ 5,70 &vloz w_splat picture '@E' CASTKA M7_DENIK KW_DENIK W_TEXT AKTEXT W_DOKLAD DOKLAD HLASKA MOD_FUN _OBRU _CELK PROC1 @ x,8 &vloz ucet picture '@!X' @ x,16 &vloz md @ x,33 &vloz dal @ x,49 &vloz nstr picture 'XXXX' @ x,55 &vloz sklad picture 'XXXX' 999999999999.99 999999999999.99 NASTAV_Q M7_UCET KNAZEV C7_OBRU _OBRU OKLAD CIS_POL S_POL _CELK AST_ZAZ MD_CELK ORDAL_CELK @ 18,10 &vloz x_text @ 19,10 &vloz x_ned_vyr @ 19,34 &vloz x_par_znak @ 19,55 &vloz x_cinnost @ 19,70 &vloz x_splat picture '@E' STAV_Q @m+1,35 &vloz pmcastka picture '999999999.99' mod_fun vypln @m+2,35 &vloz pmstr @m+3,35 &vloz pmskup @m+4,35 &vloz pmtup @m+5,35 &vloz pmdat picture '@E' mod_fun vypln no datum STAV_Q PMCASTKA KHLASKA MOD_FUN OKLAD PMSTR PAR_POLE KONTR_STREQ3 sPMSKUP ORKONTR_SKUPQ4 _CELK APMTUP KONTR_TUP PMDAT do proc&n do zmen&n with 'get' do zmen&n with 'say' mod7_lib 99999 &barvau ehled ehled st edisek ehled sklad Konec mod7_lib mod_proc mod_proc &barvau &barvau &barvau do hlav&n do proc&n do menu&n &barvau if q