Chip 1999 June

home *** CD-ROM | disk | FTP | other *** search

/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 07 / S754.FXP (.txt) < prev next >

Wrap

MS Visual FoxPro App | 1999-04-15 | 131KB | 3,468 lines

british archivf m4_adr RIIS 7.5 a7_lidod cis_fak a7_fadod cis_fak Archiv likvidace dodavatelsk ch faktur m7_lidod cis_fak m7_fadod cis_fak ehled likvidace dodavatelsk ch faktur RIIS 7.6 a7_liodb cis_fak a7_faodb cis_fak Archiv likvidace odb ratelsk ch faktur m7_liodb cis_fak m7_faodb cis_fak ehled likvidace odb ratelsk ch faktur m7_tup skupina m4_organ Zadejte slo faktury : |........... Funkce nab_o c_soucet s. faktury likvid.cis_fak likvid.cis_fak likvid.rad_fak likvid.rad_fak likvid.kl_fak+' ' likvid.kl_fak likvid.kl_dan+' ' likvid.kl_dan Sklad likvid.sklad+' ' likvid.sklad likvid.stred likvid.stred stka/K str(likvid.kcs,12,2) likvid.kcs klad dan str(likvid.kcs_dan,12,2) likvid.kcs_dan % DPH str(likvid.proc_dph,5,2) likvid.proc_dph stka DPH str(likvid.dan,12,2) likvid.dan likvid.zak likvid.zak faktura.mat_c_zu faktura.mat_c_zu tran(likvid.dat_uct,'@E') (likvid.dat_uct ) Dat.akt. tran(likvid.dat_akt,'@E') (likvid.dat_akt ) Autor likvid.autor likvid.autor Var.symbol faktura.vars_s faktura.vars_s Druh f. faktura.druh_f+' ' faktura.druh_f Dat.p tran(faktura.dat_odes,'@E') (faktura.dat_odes ) Druh f. faktura.druh_fo+' ' faktura.druh_fo Dat.vyst. tran(faktura.dat_odes,'@E') (faktura.dat_odes ) Dat.zdan tran(faktura.dat_pri,'@E') (faktura.dat_pri ) zev organizace m4_organ.nazev_org m4_organ.nazev_org m4_organ.ico m4_organ.ico m4_organ.zavod m4_organ.zavod Poznamka faktura.pozn faktura.pozn BRITISH ARCHIV POLEX PROCX CLEFT CRIGHT RDFREEZE ORDER RORDHOR PRAVA NADPIS JMENO OFFHODN ASLIPSOUC TITLE TITLECOLORPOC0 LECOLORF9 FFF0PRG F1PRG F4_JM F4PRG NTISKPRG F7_JM F7PRG F9PRG F9KEY EF9KEY1 EF10_JM F10PRG RAMECEK *RIIS ANAZEVT KLICO BKLNAZ SPACEBAR TR_HL1 TR_HL2 TTR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 *DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN M4_ADR M_DRUH A7_LIDOD CIS_FAK ?LIKVID ORA7_FADOD FAKTURA *M7_LIDOD M7_FADOD A7_LIODB A7_FAODB M7_LIODB FM7_FAODB M7_TUP SKUPINA M4_ORGAN QRIIS QNAZEVT MOD_PSV ehled: podle sla faktury podle kl e fakturace podle kl e dan podle st edisek rem v Celkov ty za kl Celkov ty za st ediska Celkov ty za druh faktury et sou tu v K Konec cis_fak cis_fak ehled podle sla faktury Zadejte slo faktury, |...........|. cis_fak kl_fak kl_fak+stred ehled podle kl e fakturace a st ediska fakturace,st edisko,faktura: |..|...|...........|. kl_fak kl_dan kl_dan+stred ehled podle kl e dan a st ediska edisko,faktura: |..|...|...........|. kl_dan stred stred+kl_fak ehled podle st ediska a kl e fakturace edisko, kl fakt.,faktura: |...|..|...........|. stred cis_fak cis_fak ehled podle sla faktury Zadejte slo faktury: |...........|. FILTERz AND Zadejte intervaly Od faktury: Do faktury: Konec(A\N): cis_fak and ' cis_fak Stop - d lku podm nky ji nelze zv Prob r faktur ... SELECT * FROM likvid INTO DBF f_pom WHERE &podm ORDER BY cis_fak cis_fak KONEC VOL11 CIS_FAK KLICO PS_RETURN TITLE RDF9KEY F9KEY1 ORDCMASTERORDKL_FAK KL_DAN ORDSTRED RORDPP RORDVETARECNO ORDFILT1 FILT2 ASLIFILT COLOR_ODF IHLASKA FFMESS LRAD_FAK FC_STRED C_KLD C_KLF ORPREHRADY LIKVID FFZPETRECNO SUMAKLICE SUMASTRED SUMADRUHF C_SOUCET soubor ! RIIS 7.5 ty za kl e fakturace i dan Zadejte kl prava dat ... FILTERz AND likvid likvid c_SOUC2 copy to c_sql for &filt c_sql c_sql c_SOUC2 c_souc2.klic+' ' c_souc2.klic c_souc2.ucet_1 c_souc2.ucet_1 c_souc2.ucet_2 c_souc2.ucet_2 stka celkem ' '+str(c_souc2.kcs,12,2) c_souc2.kcs klad dan str(c_souc2.kcs_dan,12,2) c_souc2.kcs_dan Da (DPH) str(c_souc2.dan,12,2) c_souc2.dan Celkem: 999999999.99 999999999.99 999999999.99 VETARECNO HLASKA POLEX PROCX CLEFT RDCRIGHT FREEZE ORDORDER RORDHOR ORDLEVA RORDPRAVA RORDNADPIS ORDJMENO ASLISOUC PSOUC TITLE OLORTITLECOLORPOC0 HRADY FFF10 RECNO F0PRG F1PRG F4_JM NF4PRG TISKPRG F7_JM F7PRG F9PRG EF9KEY EF9KEY1 F10_JM F10PRG *RAMECEK ARIIS NAZEVT BKLICO KLNAZ SPACEBAR TR_HL1 TTR_HL2 TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 *TR_HL9 DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN QRIIS QNAZEVT ORMESS ORFILT1 FILT2 *FILT UCET_1 UCET_2 KL_FAK KCS_DAN LIKVID KL_DAN C_SOUC2 C_SQL M7_TUP Q_KCS LORQ_KCS_DAN Q_DAN MOD_PSV ZPETRECNO soubor ! RIIS 7.5 ty za st ediska a kl e fakturace i dan stred Zadejte st edisko, kl |...|.. prava dat ... FILTERz AND likvid likvid c_SOUC2 copy to c_sql for &filt c_sql c_sql c_SOUC2 c_souc2.stred c_souc2.stred c_souc2.klic+' ' c_souc2.klic c_souc2.ucet_1 c_souc2.ucet_1 c_souc2.ucet_2 c_souc2.ucet_2 stka celkem ' '+str(c_souc2.kcs,12,2) c_souc2.kcs klad dan str(c_souc2.kcs_dan,12,2) c_souc2.kcs_dan Da (DPH) str(c_souc2.dan,12,2) c_souc2.dan Celkem: 999999999.99 999999999.99 999999999.99 VETARECNO HLASKA POLEX PROCX CLEFT RDCRIGHT FREEZE ORDORDER RORDHOR ORDLEVA RORDPRAVA RORDNADPIS ORDJMENO ASLISOUC PSOUC TITLE OLORTITLECOLORPOC0 HRADY FFF10 RECNO F0PRG F1PRG F4_JM NF4PRG TISKPRG F7_JM F7PRG F9PRG EF9KEY EF9KEY1 F10_JM F10PRG *RAMECEK ARIIS NAZEVT BKLICO KLNAZ SPACEBAR TR_HL1 TTR_HL2 TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 *TR_HL9 DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN QRIIS QNAZEVT ORMESS ORFILT1 FILT2 *FILT STRED UCET_1 UCET_2 KL_FAK FKLIC KCS_DAN LIKVID KL_DAN C_SOUC2 C_SQL M7_TUP LORQ_KCS Q_KCS_DAN Q_DAN HELP1 MOD_PSV ZPETRECNO soubor ! RIIS 7.5 ty za druh faktury a kl e fakturace i dan Zadejte drh fakt., kl prava dat ... FILTERz AND likvid faktura likvid faktura c_SOUC2 likvid faktura likvid faktura c_SOUC2 copy to c_sql for &filt c_sql faktura c_sql faktura c_SOUC2 c_sql faktura c_sql faktura c_SOUC2 Dr.F. c_souc2.druh+' ' c_souc2.druh c_souc2.klic+' ' c_souc2.klic c_souc2.ucet_1 c_souc2.ucet_1 c_souc2.ucet_2 c_souc2.ucet_2 stka celkem ' '+str(c_souc2.kcs,12,2) c_souc2.kcs klad dan str(c_souc2.kcs_dan,12,2) c_souc2.kcs_dan Da (DPH) str(c_souc2.dan,12,2) c_souc2.dan Celkem: 999999999.99 999999999.99 999999999.99 VETARECNO HLASKA POLEX PROCX CLEFT RDCRIGHT FREEZE ORDORDER RORDHOR ORDLEVA RORDPRAVA RORDNADPIS ORDJMENO ASLISOUC PSOUC TITLE OLORTITLECOLORPOC0 HRADY FFF10 RECNO F0PRG F1PRG F4_JM NF4PRG TISKPRG F7_JM F7PRG F9PRG EF9KEY EF9KEY1 F10_JM F10PRG *RAMECEK ARIIS NAZEVT BKLICO KLNAZ SPACEBAR TR_HL1 TTR_HL2 TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 *TR_HL9 DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN QRIIS QNAZEVT ORMESS ORFILT1 FILT2 *FILT M_DRUH FAKTURA DRUH_F FUCET_1 UCET_2 LIKVID KL_FAK KCS_DAN CIS_FAK KL_DAN ORC_SOUC2 DRUH_FO C_SQL M7_TUP Q_KCS Q_KCS_DAN Q_DAN HELP1 MOD_PSV ZPETRECNO FILTERz AND colorz double Celkov Celkov ty - v Esc,^End stka/K : K kl.dan : K DPH: K sum all kcs, kcs_dan, dan to _souc, _zap, _dan for &filt RIIS 7.5 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 SCRQ1 MOD_SYS FILT1 FILT2 VETARECNO M_COL RDMOD_WIN ORDKCS_DAN RDDAN _SOUC ORD_ZAP RORD_DAN RORDPOM ORDZPETRECNO cis_fak Funkce Funkce4 ehled likvidace faktur - v ehled podle faktury s. faktury f_pom.cis_fak f_pom.cis_fak f_pom.rad_fak f_pom.rad_fak f_pom.kl_fak+' ' f_pom.kl_fak f_pom.kl_dan+' ' f_pom.kl_dan f_pom.stred f_pom.stred f_pom.sklad f_pom.sklad stka K str(f_pom.kcs,12,2) f_pom.kcs klad Dan str(f_pom.kcs_dan,12,2) f_pom.kcs_dan % DPH str(f_pom.proc_dph,5,2) f_pom.proc_dph Da str(f_pom.Dan,12,2) f_pom.dan Dat.zdan.pl. tran(faktura.dat_pri,'@E')+' ' (faktura.dat_pri ) Druh f. faktura.druh_f+' ' faktura.druh_f Druh f. faktura.druh_fo+' ' faktura.druh_fo faktura.ico faktura.ico faktura.zav faktura.zav POLEX PROCX CLEFT CRIGHT FREEZE ORDER RDHOR ORDLEVA RDPRAVA NADPIS ORDZAHL RORDJMENO RORDHODN ORDPSOUC TITLE ASLITITLECOLORPOC0 OLORF1 LECOLORF2 ORF0PRG FFF1PRG F4_JM F4PRG TISKPRG F7_JM NF7PRG F9PRG F9KEY F9KEY1 F10_JM EF10PRG ERAMECEK NAZEVT *KLICO AKLNAZ SPACEBAR BTR_HL1 TR_HL2 TR_HL3 TR_HL4 TTR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 DET_JM ENTER *DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN F_POM CIS_FAK FAKTURA ORQRIIS OLORI ?M_DRUH ORMOD_PSV ehled: Podle faktury Podle kl e faktury Podle kl e dan Podle st ediska et celkem Konec ehled podle sla faktury Zadejte slo faktury, |...........|.. cis_fak cis_fak cis_fak ehled podle kl e faktury a st ediska faktury,st edisko,faktura: |..|...|...........|.. c_klf kl_fak+stred c_klf ehled podle kl e dan a st ediska edisko,faktura: |..|...|...........|.. c_kld kl_dan+stred c_kld ehled podle st edisek a kl e faktury edisko, kl faktury,faktura: |...|..|...........|.. c_stred stred+kl_fak c_stred KONEC VOL11 TITLE TR_HL1 F9KEY F9KEY1 RDCIS_FAK KLICO ORDPS_RETURN CMASTERORDC_KLF ORDC_KLD ORDC_STRED RDC_SOUCET c_oznac Nebyly vybr znamy Opravdu p epsat vybran znamy? (a/n) c_oznac, c_oznac c_oznac.dbf HLASKA OBRP1 MOD_SYS M7_LIDOD DAT_UCT RDRUSIT NTRGPZAZ DC_OZNAC TERORD british archivf m4_adr a7_hodod cis_fak a7_fadod cis_fak Archiv dodavatelsk ch hodnotov RIIS 7.5 m7_hodod cis_fak m7_fadod cis_fak ehled dodavatelsk ch hodnotov RIIS 7.5 a7_hoodb cis_fak a7_faodb cis_fak Archiv odb ratelsk ch hodnotov RIIS 7.6 m7_hoodb cis_fak m7_faodb cis_fak ehled odb ratelsk ch hodnotov RIIS 7.6 m4_organ Zadejte slo faktury : |........... SumHodn with nazevt Detail detail s. faktury hodnot.cis_fak hodnot.cis_fak hodnot.druh_h+' ' hodnot.druh_h h/vys tran(hodnot.dat_v_z,'@E') (hodnot.dat_v_z ) tran(faktura.dat_uct,'@E') (faktura.dat_uct ) hodnot.mena+' ' hodnot.mena stka/m str(hodnot.cast_men,12,2) hodnot.cast_men Kurz str(hodnot.kurz,14,7) hodnot.kurz stka v K str(hodnot.cast,12,2) hodnot.cast Doklad hodnot.cis_f_zal hodnot.cis_f_zal Var.symbol faktura.vars_s faktura.vars_s zev organizace m4_organ.nazev_org m4_organ.nazev_org m4_organ.ico m4_organ.ico m4_organ.zavod+' ' m4_organ.zavod BRITISH ARCHIV POLEX PROCX CLEFT CRIGHT RDFREEZE ORDER TERORDLEVA ORDPRAVA ORDNADPIS RDZAHL DJMENO ASLIPSOUC OLORTITLE TITLECOLORPOC0 COLORF0 FFF0PRG F1PRG F4_JM F4PRG NTISKPRG F7_JM F7PRG F9PRG F9KEY EF9KEY1 EF10_JM F10PRG RAMECEK *RIIS ANAZEVT KLICO BKLNAZ SPACEBAR TR_HL1 TR_HL2 TTR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 *DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN M4_ADR M_DRUH A7_HODOD RCIS_FAK ORHODNOT ?A7_FADOD RFAKTURA M7_HODOD *M7_FADOD A7_HOODB A7_FAODB M7_HOODB M7_FAODB FM4_ORGAN MOD_PSV british archivf m4_organ a7_pedod cis_fak a7_fadod cis_fak Archiv dodavatelsk ch penaliza ch faktur RIIS 7.5 m7_pedod cis_fak m7_fadod cis_fak ehled dodavatelsk ch penaliza ch faktur RIIS 7.5 a7_peodb cis_fak a7_faodb cis_fak Archiv odb ratelsk ch penaliza ch faktur RIIS 7.6 m7_peodb cis_fak m7_faodb cis_fak ehled odb ratelsk ch penaliza ch faktur RIIS 7.6 Zadejte slo faktury : |........... s. faktury penal.cis_fak penal.cis_fak s.pen.fak. penal.cis_pfak penal.cis_pfak % pen. str(penal.proc_pen,6,2) penal.proc_pen Dny pen. ' '+str(penal.dny_pen,5) penal.dny_pen kl.pen./K str(penal.zak_pen,12,2) penal.zak_pen stka pen. str(penal.kcs_pen,12,2) penal.kcs_pen Dat.akt. tran(penal.dat_akt,'@E') (penal.dat_akt ) Dat.spl. tran(penal.dat_spl,'@E') (penal.dat_spl ) tran(penal.dat_uhr,'@E') (penal.dat_uhr ) Druh pen penal.dr_pen+' ' penal.dr_pen Var.symbol faktura.vars_s faktura.vars_s zev organizace m4_organ.nazev_org m4_organ.nazev_org m4_organ.ico m4_organ.ico m4_organ.zavod+' ' m4_organ.zavod m4_organ.stat_dod+' ' m4_organ.stat_dod BRITISH ARCHIV POLEX PROCX CLEFT CRIGHT RDFREEZE ORDER TERORDLEVA ORDPRAVA ORDNADPIS RDZAHL DJMENO ASLIPSOUC OLORTITLE TITLECOLORPOC0 COLORF0 FFF0PRG F1PRG F4_JM F4PRG NTISKPRG F7_JM F7PRG F9PRG F9KEY EF9KEY1 EF10_JM F10PRG RAMECEK *RIIS ANAZEVT KLICO BKLNAZ SPACEBAR TR_HL1 TR_HL2 TTR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 *DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN M4_ORGAN M_DRUH A7_PEDOD RCIS_FAK ORPENAL ?A7_FADOD RFAKTURA M7_PEDOD *M7_FADOD A7_PEODB A7_FAODB M7_PEODB M7_FAODB MOD_PSV RIIS 7.5 m7_fadod cis_fak m7_faodb cis_fak m4_organ m7_lidod cis_fak m7_ucto m7_liodb cis_fak r dle data zdaniteln ho pln r dle data za Konec _od = ctod("01/&_pd/&_pda") _do = ctod("01/&_pd/&_pda") Zadejte datum zdaniteln ho pln od: do: Prob r faktur ... m7_fadod m7_lidod m7_faodb m7_liodb soubor ! V faktur ch jsou organizace bez vypln ho DI r dle data zdaniteln ho pln _od = ctod("01/&_pd/&_pda") _do = ctod("01/&_pd/&_pda") Zadejte datum za od: do: Prob r faktur ... m7_fadod m7_lidod m7_faodb m7_liodb soubor ! V faktur ch jsou organizace bez vypln ho DI r dle data za M7_FADOD CIS_FAK M7_FAODB M4_ORGAN M7_LIDOD M7_UCTO C7_UCTO RDM7_LIODB KONEC DVOL11 TERORDM ORD_PD ORD_PDA RDDMY DPLAT_OBDOBROK P_DAT1 SLI_OD OLORI DOBMOD_SYS ORMESS IDICP FKCS_DAN LKCS_DAN_D DAN_D KCS_DAN_O DAN_O FC1_P KL_DAN DAT_PRI HLASKA TITL_1 PREHLEDZ PS_RETURN DAT_UCT Bilance DPH - p ehled kumula ch hodnot za DI soucetDPH DetFakDPH Detail RIIS 7.5 c_p.dicp c_p.dicp DOD: Z kl.Dan ' '+str(c_p.kcs_dan_d,12,2) c_p.kcs_dan_d Da str(c_p.dan_d,10,2) c_p.dan_d ODB: Z kl.Dan ' '+str(c_p.kcs_dan_o,12,2) c_p.kcs_dan_o Da str(c_p.dan_o,10,2) c_p.dan_o zev organizace m4_organ.nazev_org m4_organ.nazev_org c_p.ico c_p.ico c_p.zav c_p.zav m4_organ.stat_dod+' ' m4_organ.stat_dod POLEX PROCX CLEFT CRIGHT FREEZE ORDER RDHOR DLEVA PRAVA RORDNADPIS ORDZAHL ORDJMENO RDHODN DSOUC OBDOBPSOUC TITLE SLITITLECOLORPOC0 DOBF1 _DAN_D DAN_O F0PRG FF1PRG F4_JM F4PRG TISKPRG F7_JM F7PRG F9PRG F9KEY F9KEY1 F10_JM F10PRG RAMECEK NAZEVT *KLICO AKLNAZ SPACEBAR BTR_HL1 TR_HL2 TR_HL3 TR_HL4 TTR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 DET_JM ENTER *DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN TITL_1 MOD_PSV c7_w+ Bilance DPH - detail faktur pro DI RIIS 7.5 Faktura c7_w.cis_fak c7_w.cis_fak DOD: Z kl.Dan ' '+str(c7_w.kcs_dan_d,12,2) c7_w.kcs_dan_d Da str(c7_w.dan_d,10,2) c7_w.dan_d ODB: Z kl.Dan ' '+str(c7_w.kcs_dan_o,12,2) c7_w.kcs_dan_o Da str(c7_w.dan_o,10,2) c7_w.dan_o zev organizace m4_organ.nazev_org m4_organ.nazev_org c7_w.ico c7_w.ico c7_w.zav c7_w.zav RDM4_ORGAN POLEX DPROCX RORDRBOT ORDCLEFT ORDCRIGHT RDFREEZE DORDER BDOBHOR SLILEVA COLORPRAVA NADPIS DOBZAHL ORJMENO IHODN FSOUC LPSOUC TITLE TITLECOLORPOC0 F0PRG F1PRG F4_JM F4PRG TISKPRG F7_JM *F7PRG AF9PRG F9KEY BF9KEY1 F10_JM F10PRG RAMECEK TRIIS NAZEVT KLICO KLNAZ SPACEBAR TR_HL1 TR_HL2 *TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 DET_JM ENTER DETAIL DETPRG RPS_LINE ORPS_RETURN PS_ZAZN PEDOD MOD_PSV Celkov Esc,^End Dodavatelsk Odb ratelsk Rozd kl.dan _SOUCE VETARECNO RDKCS_DAN_D DAN_D DKCS_DAN_O DAN_O RORDZPETRECNO colora MCOLOR COLORz HCOLOR RIIS 7.5 british m_param inlist (m7_hodod.druh_h,'1', '3', '4', '5', '6', '7', 'K', 'D') inlist (m7_hodod.druh_h,'1', '4', '5', '6', '7', 'K', 'D') m4_adr m7_fadod cis_fak m7_hodod cis_fak m7_ucto m4_organ Saldo dodavatelsk ch faktur RIIS 7.5 Zadejte slo faktury : |........... Tisk1Dod Detail detailDod echny fakt., inkasa,z lohy,dobrop., penal. Bez pen. a z l.faktur, ozna jako zlikvid. Bez penaliza ch a z lohov ch faktur Bez z lohov ch faktur Bez penaliza ch faktur Konec Nezaplacen zapl. dod. faktury Nezapl. a st.zapl. dod.faktury bez pen. a z l.,zlikvid. Nezapl. a st.zapl. dod. faktury bez pen. a z l.faktur Nezapl. a st.zapl. dod.faktury bez z lohov ch faktur Nezapl. a st.zapl. dod.faktury bez penaliz. faktur W_KONEC BRITISH M_PARAM NFADO POLE7 VYBER W_PODM RDPMESTO PNAZEV DPULICE MNAVRAT RDPOLEX PROCX ORDRTOP RDRBOT DCLEFT BDOBCRIGHT FREEZE SLIORDER OLORHOR DOBLEVA ORPRAVA INADPIS FZAHL LJMENO COLORPSOUC TITLE TITLECOLORPOC0 F0PRG F1PRG F4_JM *F4PRG ATISKPRG F7_JM BF7PRG F9PRG F9KEY F9KEY1 TF10_JM F10PRG RAMECEK NAZEVT KLICO KLNAZ *SPACEBAR TR_HL1 TR_HL2 TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 TR_HL9 DET_JM RENTER ORDETAIL DETPRG RPS_LINE PS_RETURN PS_ZAZN M4_ADR M7_FADOD CIS_FAK FM7_HODOD M7_UCTO M4_ORGAN POM_PREH p_dat = ctod("01/&_pd/&_pda") Zadejte datum hrady: SELECT m7_hodod.cis_fak, m7_hodod.cis_f_zal, m7_hodod.druh_h, m7_hodod.cast, m7_hodod.dat_v_z, SUM ((-1) * m7_hodod.cast) AS castka_c FROM m7_hodod WHERE m7_hodod.dat_v_z BETWEEN p_dat AND p_datum AND &w_podm ORDER by 1 GROUP by 1 INTO DBF c7_ho Datum hrady: F s. faktury m7_fadod.cis_fak m7_fadod.cis_fak Var.symbol m7_fadod.vars_s m7_fadod.vars_s Dodavatel m4_organ.nazev_org m4_organ.nazev_org m4_adr.mesto m4_adr.mesto Dr.fak m7_fadod.druh_f+' ' m7_fadod.druh_f m7_fadod.znak_f m7_fadod.znak_f m7_fadod.mat_c_zu m7_fadod.Mat_c_zu Dat.spl. tran(m7_fadod.dat_spl,'@E') (m7_fadod.dat_spl ) stka fakt. str(m7_fadod.cast_cel,12,2) m7_fadod.cast_cel Zapl.celk str(m7_fadod.zap_cel,12,2) m7_fadod.zap_cel Rozd str((m7_fadod.cast_cel - m7_fadod.zap_cel),12,2) (m7_fadod.cast_cel - m7_fadod.zap_cel) Zap.v d.obdob ' '+str(c7_ho.castka_c,12,2) c7_ho.castka_c Konst.sym. m7_fadod.kons_s m7_fadod.kons_s Spec.sym. m7_fadod.spec_s m7_fadod.spec_s Zdan.pl. tran(m7_fadod.dat_pri,'@E') (m7_fadod.dat_pri ) Dat.p tran(m7_fadod.dat_odes,'@E')+' ' (m7_fadod.dat_odes ) Dat.UCT. tran(m7_fadod.dat_uct,'@E') (m7_fadod.dat_uct ) M7_UCTO PLAT_OBDOBROK P_DAT1 P_DAT RDP_DATUM DMNAVRAT OBZADANI RDCIS_FAK M7_FADOD DDAT_PRI DMAT_C_ZU BZNAK_F C7_HO LIICO OLORZAV M4_ORGAN BM4_ADR RTITLE IZAHL FPOLEX LJMENO OLORMOD_PSV british m_param inlist (m7_hodod.druh_h,'1', '3', '4', '5', '6', '7', 'K', 'D') inlist (m7_hodod.druh_h,'1', '4', '5', '6', '7', 'K', 'D') m4_organ m7_fadod cis_fak m7_hodod cis_fak m7_ucto m4_adr Saldo dodavatelsk ch faktur RIIS 7.5 Zadejte slo faktury : |........... Funkce vybrady with 'D' Detail detailDod p_dat = ctod("01/&_pd/&_pda") Zadejte datum zdan.pln SELECT m7_hodod.cis_fak, m7_hodod.cis_f_zal, m7_hodod.druh_h, m7_hodod.cast, m7_hodod.dat_v_z, SUM ((-1) * m7_hodod.cast) AS castka_c FROM m7_hodod WHERE m7_hodod.dat_v_z <= p_datum AND &w_podm ORDER by 1 GROUP by 1 INTO DBF c7_ho Datum zdaniteln ho pln s. faktury m7_fadod.cis_fak m7_fadod.cis_fak Var.symbol m7_fadod.vars_s m7_fadod.vars_s Dodavatel m4_organ.nazev_org m4_organ.nazev_org Dr.fak m7_fadod.druh_f+' ' m7_fadod.druh_f m7_fadod.znak_f m7_fadod.znak_f m7_fadod.mat_c_zu m7_fadod.Mat_c_zu Dat.spl. tran(m7_fadod.dat_spl,'@E') (m7_fadod.dat_spl ) stka fakt. str(m7_fadod.cast_cel,12,2) m7_fadod.cast_cel Zap.do F ' '+str(c7_ho.castka_c,13,2) c7_ho.castka_c Nezaplaceno str(m7_fadod.cast_cel-c7_ho.castka_c,12,2) m7_fadod.cast_cel-c7_ho.castka_c Posl.dat.zapl. ' '+ tran(m7_fadod.dat_zap,'@E')+' ' (m7_fadod.dat_zap ) Konst.sym. m7_fadod.kons_s m7_fadod.kons_s Spec.sym. m7_fadod.spec_s m7_fadod.spec_s Zdan.pl. tran(m7_fadod.dat_pri,'@E') (m7_fadod.dat_pri ) Dat.p tran(m7_fadod.dat_odes,'@E')+' ' (m7_fadod.dat_odes ) Dat.UCT. tran(m7_fadod.dat_uct,'@E') (m7_fadod.dat_uct ) m4_organ.stat_dod+' ' m4_organ.stat_dod BRITISH PMESTO PNAZEV PULICE POLEX BDOBPROCX RDCLEFT CRIGHT DFREEZE OBORDER RDHOR DLEVA DPRAVA DNADPIS BZAHL JMENO LIHODN OLORSOUC PSOUC BTITLE RTITLECOLORPOC0 OLORF4 LECOLORF9 F0PRG F1PRG F4_JM F4PRG TISKPRG F7_JM F7PRG F9PRG F9KEY F9KEY1 F10_JM *F10PRG ARAMECEK BNAZEVT KLICO KLNAZ SPACEBAR TTR_HL1 TR_HL2 TR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 *TR_HL8 TR_HL9 DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN M_PARAM VYBER RPOLE7 ORW_PODM M4_ORGAN M7_FADOD CIS_FAK M7_HODOD M7_UCTO M4_ADR F_PDA PLAT_OBDOBROK P_DAT1 P_DAT P_DATUM MNAVRAT OBZADANI DAT_PRI RC7_HO MOD_PSV FILTERz AND colorz double Celkov Celkov ty - v Esc,^End Celkem za p ehled: K Z toho zaplaceno : K nezaplaceno : K Zap.v dan.obdob : K sum all cast_cel, zap_cel, c7_ho.castka_c to souc, zap, cast for &filt RIIS 7.5 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 SCRQ1 MOD_SYS FILT1 FILT2 BDOBAREC VETARECNO M_COL RDMOD_WIN CAST_CEL DZAP_CEL OBC7_HO RDCASTKA_C DCAST ZPETRECNO FILTERz AND colorz double Celkov Celkov ty - v Esc,^End Celkem za p ehled: K Z toho zaplaceno : K nezaplaceno : K Zap.do konce obd.: K sum all cast_cel, zap_cel, c7_ho.castka_c to souc, zap, cast for &filt RIIS 7.5 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 SCRQ1 MOD_SYS FILT1 FILT2 BDOBAREC VETARECNO M_COL RDMOD_WIN CAST_CEL DZAP_CEL OBC7_HO RDCASTKA_C DCAST ZPETRECNO FILTERz AND colorz double Celkov Celkov ty - v Esc,^End Celkem za p ehled: K Z toho zaplaceno : K nezaplaceno : K Zap.v dan.obdob : K sum all cast_cel, zap_cel, c7_ho.castka_c to souc, zap, cast for &filt RIIS 7.5 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 999,999,999,999.99 SCRQ1 MOD_SYS FILT1 FILT2 BDOBAREC VETARECNO M_COL RDMOD_WIN CAST_CEL DZAP_CEL OBC7_HO RDCASTKA_C DCAST ZPETRECNO znam neexistuje ... c7_hodod znam neexistuje ... Saldo dodavatelsk ch faktur Hodnotov daje pro fakturu RIIS 7.5 Zadejte slo dokladu: |........... c7_hodod s.dokladu c7_hodod.cis_f_zal c7_hodod.cis_f_zal c7_hodod.druh_h+' ' c7_hodod.druh_h h/vys tran(c7_hodod.dat_v_z,'@E') (c7_hodod.dat_v_z ) c7_hodod.mena+' ' c7_hodod.mena stka/m str(c7_hodod.cast_men,12,2) c7_hodod.cast_men Kurz str(c7_hodod.kurz,14,7) c7_hodod.kurz str(c7_hodod.cast,12,2) c7_hodod.cast QQFAK VETARECNO CIS_FAK OBMESS M7_HODOD DRUH_H DM7_FADOD DHLASKA OBZPETRECNO C7_HODOD DAT_V_Z DP_DAT DP_DATUM DPS_LINE POLEX PROCX OLORRBOT CLEFT BCRIGHT RFREEZE LORORDER PRAVA OLORNADPIS JMENO OLORHODN PSOUC TITLE TITLECOLORPOC0 AF0PRG BF1PRG F4_JM F4PRG TISKPRG TF7_JM F7PRG F9PRG F9KEY F9KEY1 F10_JM F10PRG *RAMECEK NAZEVT KLICO KLNAZ SPACEBAR TR_HL1 TR_HL2 TR_HL3 TR_HL4 TR_HL5 RTR_HL6 ORTR_HL7 TR_HL8 RTR_HL9 DET_JM ENTER DETAIL DETPRG PS_RETURN PS_ZAZN FCIS_F_ZAL MOD_PSV Tisk sestavy Prohl sestavy Konec Prob prava tisku ... british FILTERz AND m7_fadod m7_hodod c7_p1 m7_fadod c7_p1 c7_p2 copy to c_sql for &filt c_sql m7_hodod c7_p1 c_sql c7_p1 c7_p2 sum all m7_fadod.cast_cel, m7_fadod.zap_cel, c7_ho.castka_c to cast_c, zap_cel_c, cast_obd for &filt c7_p2 p_kody p_name Epson LX-810 mod_lib Prob tisk ... Prob tisk do souboru ... set device to file &m_txt set printer to &m_txt1 - (^) ipky,(^)Home,(^)End,PgUp,PgDn - Esc Pohyb Konec Prohl sestavy saldokonta modi comm &m_txt1 noedit window w FILT1 FILT2 CAST_C OBZAP_CEL_C CAST_OBD DM_TXT M_TXT1 DOB101 OBVOL5 VETARECNO BRITISH DM7_FADOD DM7_HODOD CIS_F_ZAL DRUH_H RDAT_V_Z P_DAT BP_DATUM RCIS_FAK RC7_P1 FC7_P2 LCAST_CEL ZAP_CEL C7_HO OLORCASTKA_C ROZDIL C_SQL M4_ORGAN M4_ADR P_BOLDON RP_BOLDOFF P_DBST_ON P_DBST_OFFP_LETRQUALP_DRAFT P_SUBOFF P_SUPERON P_SUPEROFFP_10CPI *P_COMPRESSP_COMP_OFFP_12CPI BP_SUBON P_SETUP P_8LPI P_6LPI TP_NEWPAGE P_RESET P_KODY P_NAME W_TISKARNABOLD_ON NABOLD_OFF *DOUBLE NDOUBLE ST_OFFDRAFT QUALSUB_OFF SUPER_ON SUPER_OFF HUSTE_ON FHUSTE_OFF FFELITE RMALE ORRESET SETUP RR8LPI R6LPI PRESSNEWPAGE FFW_TISK NASTAV_PRNMOD_LIB ZPETRECNO RIIS 7.5 Saldo dodavatelsk ch faktur Saldo odb ratelsk ch faktur Datum mus t vypln Prob ... _DRQTXT P_DAT P_DATUM OBMNAVRAT HLASKA RIIS 7.6 british m_param inlist (m7_hoodb.druh_h,'1', '3', '4', '5', '6', '7', 'K', 'D') inlist (m7_hoodb.druh_h,'1', '4', '5', '6', '7', 'K', 'D') m4_adr m7_faodb cis_fak m7_hoodb cis_fak m7_ucto m4_organ RIIS 7.6 Zadejte slo faktury : |........... suma1 Tisk2 Detail detail2 echny fakt., inkasa,z lohy,dobrop., penal. Bez pen. a z l.faktur, ozna jako zlikvid. Bez penaliza ch a z lohov ch faktur Bez z lohov ch faktur Bez penaliza ch faktur Konec Nezaplacen zapl. odb. faktury Nezapl. a st.zapl. odb.faktury bez pen. a z l.,zlikvid. Nezapl. a st.zapl. odb. faktury bez pen. a z l.faktur Nezapl. a st.zapl. odb.faktury bez z lohov ch faktur Nezapl. a st.zapl. odb.faktury bez penaliz. faktur BRITISH PMESTO PNAZEV PULICE OBPOLEX PROCX DRBOT CLEFT DCRIGHT OBFREEZE ORDER RECNO DLEVA DPRAVA NADPIS JMENO RHODN BPSOUC RTITLE RTITLECOLORPOC0 T_CEL OLORF3 TKA_C F0PRG RF1PRG F4_JM F4PRG _OFFTISKPRG ALF7_JM F7PRG F9PRG F9KEY ROFFF9KEY1 *F10_JM ESSF10PRG OFFRAMECEK BRIIS NAZEVT KLICO KLNAZ TSPACEBAR TR_HL1 TR_HL2 TR_HL3 TR_HL4 RNATR_HL5 NATR_HL6 *TR_HL7 TR_HL8 TR_HL9 OFFDET_JM UALENTER DETAIL DETPRG PS_LINE FPS_RETURN PS_ZAZN FFW_KONEC RM_PARAM ORNFAOD POLE7 RVYBER W_PODM M4_ADR PRESSM7_FAODB FCIS_FAK M7_HOODB NM7_UCTO M4_ORGAN POM1_PREH p_dat = ctod("01/&_pd/&_pda") Zadejte datum hrady: SELECT m7_hoodb.cis_fak, m7_hoodb.cis_f_zal, m7_hoodb.druh_h, m7_hoodb.cast, m7_hoodb.dat_v_z, SUM (m7_hoodb.cast) AS castka_c FROM m7_hoodb WHERE m7_hoodb.dat_v_z BETWEEN p_dat AND p_datum and &w_podm ORDER by 1 GROUP by 1 INTO DBF c7_ho Saldo odb ratelsk ch faktur Datum hrady: F s. faktury m7_faodb.cis_fak m7_faodb.cis_fak Var.symbol m7_faodb.vars_s m7_faodb.vars_s ratel m4_organ.nazev_org m4_organ.nazev_org m4_adr.mesto m4_adr.mesto Dr.fak m7_faodb.druh_fo+' ' m7_faodb.druh_fo m7_faodb.znak_f+' ' m7_faodb.znak_f m7_faodb.mat_c_zu m7_faodb.Mat_c_zu Dat.spl. tran(m7_faodb.dat_spl,'@E') (m7_faodb.dat_spl ) stka fakt. str(m7_faodb.cast_cel,12,2) m7_faodb.cast_cel Zapl.celk str(m7_faodb.zap_cel,12,2) m7_faodb.zap_cel Rozd str((m7_faodb.cast_cel - m7_faodb.zap_cel),12,2) (m7_faodb.cast_cel - m7_faodb.zap_cel) Zap.v d.obdob ' '+str(c7_ho.castka_c,12,2) c7_ho.castka_c Konst.sym. m7_faodb.kons_s m7_faodb.kons_s Spec.symb. m7_faodb.spec_s m7_faodb.spec_s Zdan.pl. tran(m7_faodb.dat_pri,'@E') (m7_faodb.dat_pri ) Dat.vyst. tran(m7_faodb.dat_odes,'@E')+' ' (m7_faodb.dat_odes ) Dat.UCT. tran(m7_faodb.dat_uct,'@E') (m7_faodb.dat_uct ) M7_UCTO PLAT_OBDOBROK P_DAT1 P_DAT DP_DATUM DMNAVRAT OBZADANI CIS_FAK M7_FAODB DDAT_PRI DMAT_C_ZU ZNAK_F C7_HO M4_ORGAN BM4_ADR RNAZEVT RTITLE OLORZAHL LPOLEX JMENO OLORMOD_PSV british m_param inlist (m7_hoodb.druh_h,'1', '3', '4', '5', '6', '7', 'K', 'D') inlist (m7_hoodb.druh_h,'1', '4', '5', '6', '7', 'K', 'D') m4_organ m7_faodb cis_fak m7_hoodb cis_fak m7_ucto m4_adr Saldo odb ratelsk ch faktur RIIS 7.6 Zadejte slo faktury : |........... Funkce vybrady with 'O' Detail detail2 p_dat = ctod("01/&_pd/&_pda") Zadejte datum zdan.pln SELECT m7_hoodb.cis_fak, m7_hoodb.cis_f_zal, m7_hoodb.druh_h, m7_hoodb.cast, m7_hoodb.dat_v_z, SUM (m7_hoodb.cast) AS castka_c FROM m7_hoodb WHERE m7_hoodb.dat_v_z <= p_datum and &w_podm ORDER by 1 GROUP by 1 INTO DBF c7_ho Datum zdaniteln ho pln s. faktury m7_faodb.cis_fak m7_faodb.cis_fak Var.symbol m7_faodb.vars_s m7_faodb.vars_s ratel m4_organ.nazev_org m4_organ.nazev_org Dr.fak m7_faodb.druh_fo+' ' m7_faodb.druh_fo m7_faodb.znak_f+' ' m7_faodb.znak_f m7_faodb.mat_c_zu m7_faodb.Mat_c_zu Dat.spl. tran(m7_faodb.dat_spl,'@E') (m7_faodb.dat_spl ) stka fakt. str(m7_faodb.cast_cel,12,2) m7_faodb.cast_cel Zap.do F ' '+str(c7_ho.castka_c,13,2) c7_ho.castka_c Nezaplaceno str(m7_faodb.cast_cel-c7_ho.castka_c,12,2) m7_faodb.cast_cel-c7_ho.castka_c Posl.dat.zapl. ' '+ tran(m7_faodb.dat_zap,'@E')+' ' (m7_faodb.dat_zap ) Konst.sym. m7_faodb.kons_s m7_faodb.kons_s Spec.symb. m7_faodb.spec_s m7_faodb.spec_s Zdan.pl. tran(m7_faodb.dat_pri,'@E') (m7_faodb.dat_pri ) Dat.vyst. tran(m7_faodb.dat_odes,'@E')+' ' (m7_faodb.dat_odes ) Dat.UCT. tran(m7_faodb.dat_uct,'@E') (m7_faodb.dat_uct ) m4_organ.stat_dod+' ' m4_organ.stat_dod BRITISH PMESTO PNAZEV PULICE POLEX BDOBPROCX DCLEFT CRIGHT DFREEZE OBORDER DPRAVA DNADPIS JMENO RSOUC PSOUC BTITLE RTITLECOLORPOC0 OLORF0 OLORF4 F0PRG F1PRG RF4_JM F4PRG TISKPRG FFF7_JM ALF7PRG F9PRG F9KEY F9KEY1 OFFF10_JM *F10PRG ESSRAMECEK FFRIIS BNAZEVT KLICO KLNAZ SPACEBAR TTR_HL1 TR_HL2 TR_HL3 TR_HL4 TR_HL5 RNATR_HL6 NATR_HL7 *TR_HL8 TR_HL9 DET_JM OFFENTER UALDETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN M_PARAM FFVYBER RPOLE7 ORW_PODM M4_ORGAN M7_FAODB CIS_FAK M7_HOODB SM7_UCTO FM4_ADR N_PDA PLAT_OBDOBROK P_DAT1 P_DAT P_DATUM MNAVRAT OBZADANI DAT_PRI RC7_HO MOD_PSV znam hodnotov neexistuje ... c7_hoodb+ znam hodnotov neexistuje ... c7_hoodb Saldo odb ratelsk ch faktur Hodnotov daje pro fakturu RIIS 7.6 Zadejte slo dokladu : |........... s.dokladu c7_hoodb.cis_f_zal c7_hoodb.cis_f_zal c7_hoodb.druh_h+' ' c7_hoodb.druh_h h/vys tran(c7_hoodb.dat_v_z,'@E') (c7_hoodb.dat_v_z ) c7_hoodb.mena+' ' c7_hoodb.mena stka/m str(c7_hoodb.cast_men,12,2) c7_hoodb.cast_men Kurz str(c7_hoodb.kurz,14,7) c7_hoodb.kurz str(c7_hoodb.cast,12,2) c7_hoodb.cast QQFAK VETARECNO CIS_FAK OBM7_HOODB DRUH_H M7_FAODB HLASKA DZPETRECNO C7_HOODB DAT_V_Z P_DAT P_DATUM DCIS_F_ZAL PS_LINE POLEX PROCX RRBOT CLEFT BCRIGHT RFREEZE LORORDER OLORHOR PRAVA OLORNADPIS JMENO PSOUC TITLE TITLECOLORPOC0 OFFF9 ESSF0PRG FFF1ON BF1PRG F4_JM F4PRG TISKPRG TF7_JM F7PRG F9PRG F9KEY F9KEY1 RNAF10_JM NAF10PRG *RAMECEK NAZEVT OFFKLICO UALKLNAZ SPACEBAR TR_HL1 TR_HL2 TR_HL3 TR_HL4 FFTR_HL5 RTR_HL6 ORTR_HL7 TR_HL8 RTR_HL9 DET_JM ENTER DETAIL SDETPRG FPS_RETURN PS_ZAZN MOD_PSV Tisk sestavy Prohl sestavy Konec Prob prava tisku ... british FILTERz AND m7_faodb m7_hoodb c7_p1 m7_faodb c7_p1 c7_p2 copy to c_sql for &filt c_sql m7_hoodb c7_p1 c_sql c7_p1 c7_p2 sum all m7_faodb.cast_cel, m7_faodb.zap_cel, c7_ho.castka_c to cast_c, zap_cel_c, cast_obd for &filt c7_p2 p_kody p_name Epson LX-810 mod_lib Prob tisk ... Prob tisk do souboru ... set device to file &m_txt set printer to &m_txt1 - (^) ipky,(^)Home,(^)End,PgUp,PgDn - Esc Pohyb Konec Prohl sestavy saldokonta modi comm &m_txt1 noedit window w FILT1 FILT2 CAST_C OBZAP_CEL_C CAST_OBD DM_TXT M_TXT1 DOB101 VETARECNO BRITISH DM7_FAODB M7_HOODB CIS_F_ZAL DRUH_H RDAT_V_Z P_DAT BP_DATUM RCIS_FAK RC7_P1 RC7_P2 LCAST_CEL ZAP_CEL C7_HO OLORCASTKA_C ROZDIL C_SQL M4_ADR M4_ORGAN P_BOLDON RP_BOLDOFF P_DBST_ON P_DBST_OFFP_LETRQUALP_DRAFT P_SUBOFF P_SUPERON P_SUPEROFFP_10CPI *P_COMPRESSP_COMP_OFFP_12CPI BP_SUBON P_SETUP P_8LPI P_6LPI TP_NEWPAGE P_RESET P_KODY P_NAME W_TISKARNABOLD_ON NABOLD_OFF *DOUBLE NDOUBLE ST_OFFDRAFT QUALSUB_OFF SUPER_ON SUPER_OFF HUSTE_ON FHUSTE_OFF FFELITE RMALE ORRESET SETUP RR8LPI R6LPI PRESSNEWPAGE FFW_TISK NASTAV_PRNMOD_LIB ZPETRECNO RIIS 7.5 british m4_organ m7_faodb cis_fak m7_liodb cis_fak m7_fadod cis_fak m7_lidod cis_fak m7_ucto m7_tup skupina r dle data zdaniteln ho pln r dle data za r dle faktur Konec _od = ctod("01/&_pd/&_pda") _do = ctod("01/&_pd/&_pda") Zadejte datum zdaniteln ho pln od: do: Prob r faktur ... f_pom c_pom _od = ctod("01/&_pd/&_pda") _do = ctod("01/&_pd/&_pda") Zadejte datum za od: do: Prob r faktur ... f_pom c_pom POLEX PROCX OBCLEFT CRIGHT FREEZE DORDER PRAVA NADPIS DJMENO PSOUC TITLE RTITLECOLORPOC0 T_CEL OLORF9 TKA_C F0PRG F1PRG F4_JM F4PRG TISKPRG RF7_JM F7PRG F9PRG _OFFF9KEY QUALF9KEY1 F10_JM F10PRG RAMECEK FFRIIS *NAZEVT ESSKLICO _OFFKLNAZ BSPACEBAR TR_HL1 TR_HL2 TR_HL3 TTR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 RNATR_HL9 NADET_JM *ENTER DETAIL DETPRG OFFPS_LINE ALPS_RETURN PS_ZAZN BRITISH M4_ORGAN E_OFF FFM7_FAODB RCIS_FAK ORC_FA M7_LIODB RC_LI M7_FADOD M7_LIDOD M7_UCTO SSC7_UCTO FFM7_TUP SKUPINA RNKONEC VOL11 PLAT_OBDOBROK OBP_DAT1 DOBMOD_SYS DAT_ODES VARS_S F_POM DAT_PRI KL_DAN KCS_DAN RAD_FAK C_POM ?P_ZAZ PREHLEDX DAT_UCT OBPREHFA Prob prava dat ... C_ozn Zadejte slo faktury: |........... ehled podle sla faktury ehled DPH dodavatel ehled DPH odb ratel RIIS 7.5 s. faktury c_fa.cis_fak c_fa.cis_fak Var. symbol c_fa.vars_s c_fa.vars_s Celkem K str(c_fa.cast_cel,12,2) c_fa.cast_cel Zaplaceno str(c_fa.zap_cel,12,2) c_fa.zap_cel Z str(c_fa.zal_cel,12,2) c_fa.zal_cel Da str(c_fa.dan_cel,12,2) c_fa.dan_cel Dat.spl. tran(c_fa.dat_spl,'@E') (c_fa.dat_spl ) c_fa.ico c_fa.ico c_fa.zav c_fa.zav m4_organ.dicp m4_organ.dicp zev organizace substr(m4_organ.nazev_org,1,25) substr(m4_organ.nazev_org,1,25) c_fa.ucet_dod c_fa.ucet_dod c_fa.znak_f+' ' c_fa.znak_f c_fa.mat_c_zu c_fa.Mat_c_zu Dat.zap. tran(c_fa.dat_zap,'@E') (c_fa.dat_zap ) Zdan.pln tran(c_fa.dat_pri,'@E') (c_fa.dat_pri ) Celkem m str(c_fa.cast_men,12,2) c_fa.cast_men Zaplac. m str(c_fa.zap_men,12,2) c_fa.zap_men c_fa.mena+' ' c_fa.mena Kurz str(c_fa.kurz,14,7) c_fa.kurz Konst.sym. c_fa.kons_s+' ' c_fa.kons_s Dat.odes tran(c_fa.dat_odes,'@E') (c_fa.dat_odes ) c_fa.stav_fa+' ' c_fa.stav_fa Dat.Sm tran(c_fa.dat_smir,'@E') (c_fa.dat_smir ) Dat.UCT. tran(c_fa.dat_uct,'@E') (c_fa.dat_uct ) Autor c_fa.autor c_fa.autor c_fa.zapoc+' ' c_fa.zapoc str(c_fa.zal_vypl,12,2) c_fa.zal_vypl kazech str(c_fa.pr_cel,12,2) c_fa.pr_cel Dr.fak c_fa.druh_f+' ' c_fa.druh_f Dr.fak c_fa.druh_fo+' ' c_fa.druh_fo m4_organ.stat_dod+' ' m4_organ.stat_dod POLEX PROCX OBCLEFT CRIGHT FREEZE DORDER PRAVA NADPIS DJMENO PSOUC TITLE RTITLECOLORPOC0 T_CEL OLORF9 TKA_C F0PRG F1PRG F4_JM F4PRG TISKPRG RF7_JM F7PRG F9PRG _OFFF9KEY QUALF9KEY1 F10_JM F10PRG RAMECEK FFRIIS *NAZEVT ESSKLICO _OFFKLNAZ BSPACEBAR TR_HL1 TR_HL2 TR_HL3 TTR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 RNATR_HL9 NADET_JM *ENTER DETAIL DETPRG OFFPS_LINE ALPS_RETURN PS_ZAZN PAR_POLE FAKCE FAODB RC_FA RM4_ORGAN MOD_PSV c_oznac Nebyly vybr ny (vysv ceny) znamy Prob prava dat ... c7_fa c7_fa c_oznac, c7_fa c7_fa f_pom c_pom Neexistuje znam ! c_oznac.dbf c_oznac.dbf ZAZNAM VETARECNO HLASKA ZPETRECNO C7_FA DCIS_FAK VARS_S F_POM KL_DAN DKCS_DAN RAD_FAK C_POM C_OZNAC NTRGPZAZ ORPS_RETURN PREHLEDX british ehled DPH dodavatel ehled DPH odb ratel kl_dan Zadejte kl.dan , fakturu, |..|...........|. Prepis1 det_suma ehled dle kl e dan RIIS 7.5 f_pom.kl_dan+' ' f_pom.kl_dan s. faktury f_pom.cis_fak f_pom.cis_fak f_pom.rad_fak f_pom.rad_fak f_pom.kl_fak+' ' f_pom.kl_fak str(f_pom.kcs,12,2) f_pom.kcs kl.Dan str(f_pom.kcs_dan,12,2) f_pom.kcs_dan Da str(f_pom.Dan,12,2) f_pom.dan Dat.zdan.pl. tran(c_fa.dat_pri,'@E')+' ' (c_fa.dat_pri ) f_pom.ico f_pom.ico c_fa.zav c_fa.zav c_fa.mat_c_zu c_fa.Mat_c_zu f_pom.stred f_pom.stred f_pom.zak f_pom.zak ' '+tran(f_pom.dat_uct,'@E') (f_pom.dat_uct ) f_pom.sklad f_pom.sklad Dat.akt. tran(f_pom.dat_akt, '@e') f_pom.dat_akt % DPH str(f_pom.proc_dph,5,2) f_pom.proc_dph Autor f_pom.autor f_pom.autor Var.symbol f_pom.vars_s f_pom.vars_s m4_organ.dicp m4_organ.dicp zev organizace m4_organ.nazev_org m4_organ.nazev_org m4_organ.stat_dod+' ' m4_organ.stat_dod POLEX PROCX CLEFT CRIGHT FREEZE DORDER PRAVA NADPIS DJMENO PSOUC TITLE RTITLECOLORPOC0 HLEDX RETURN T_CEL OLORF9 TKA_C F0PRG F1PRG F4_JM F4PRG TISKPRG RF7_JM F7PRG F9PRG _OFFF9KEY QUALF9KEY1 F10_JM F10PRG RAMECEK FFRIIS *NAZEVT ESSKLICO _OFFKLNAZ BSPACEBAR TR_HL1 TR_HL2 TR_HL3 TTR_HL4 TR_HL5 TR_HL6 TR_HL7 TR_HL8 RNATR_HL9 NADET_JM *ENTER DETAIL DETPRG OFFPS_LINE ALPS_RETURN PS_ZAZN BRITISH FF_POM FAODB RMOD_PSV c_oznac Nebyly vybr znamy Opravdu p epsat vybran znamy? (a/n) c_oznac, c_oznac c_oznac.dbf HLASKA OBRP1 MOD_SYS DAT_UCT DRUSIT NTRGPZAZ DC_OZNAC soubor ! Prob ... ehled DPH dodavatel ehled DPH odb ratel RIIS 7.5 Celkov ty za kl e dan Zadejte kl FILTERz AND f_pom c_souc copy to c_sql for &filt c_sql c_souc c_souc.klic+' ' c_souc.klic c_souc.ucet_1 c_souc.ucet_1 c_souc.ucet_2 c_souc.ucet_2 stka celkem ' '+str(c_souc.kcs,12,2) c_souc.kcs klad dan str(c_souc.kcs_dan,12,2) c_souc.kcs_dan Da (DPH) str(c_souc.dan,12,2) c_souc.dan Celkem: 999999999.99 999999999.99 999999999.99 VETARECNO HLASKA POLEX PROCX DRBOT CLEFT DCRIGHT FREEZE ORDER DLEVA PRAVA NADPIS JMENO RHODN COLORSOUC PSOUC RTITLE TITLECOLORPOC0 T_CEL OLORF3 TKA_C F0PRG RF1PRG F4_JM F4PRG _OFFTISKPRG ALF7_JM F7PRG F9PRG F9KEY FFF9KEY1 *F10_JM ESSF10PRG OFFRAMECEK BRIIS NAZEVT KLICO KLNAZ TSPACEBAR TR_HL1 TR_HL2 TR_HL3 TR_HL4 RNATR_HL5 NATR_HL6 *TR_HL7 TR_HL8 TR_HL9 OFFDET_JM ALENTER DETAIL DETPRG PS_LINE FPS_RETURN PS_ZAZN FFAKCE ORFILT1 FILT2 RFILT UCET_1 UCET_2 KL_DAN SSKLIC FFKCS KCS_DAN RNDAN F_POM C_SOUC C_SQL M7_TUP Q_KCS Q_KCS_DAN Q_DAN RMOD_PSV ZPETRECNO Vyhled Konec - Esc Vyhled Konec - Esc filterz relationz et sou tu v K Konec FILTERz AND and Zadejte intervaly Od faktury: Do faktury: Konec(A\N): cis_fak and ' cis_fak Stop - d lku podm nky ji nelze zv Prob r faktur ... select * from m7_faodb into dbf c7_fa where &podm order by cis_fak select * from m7_fadod into dbf c7_fa where &podm order by cis_fak set filter to &M_filt set relation to &m_rel M_DRUH KONEC VOL11 ALIAS M_FILT M_REL DAREC VETARECNO ZPETRECNO SUMA11 FILT1 FILT2 DFILT RHLASKA LORMESS PODM1 RCIS_FAK ZOBRRADY german RIIS 7.5 Zadejte slo faktury : |........... suma11 Detail detailDod Saldo odb ratelsk ch faktur - v Saldo dodavatelsk ch faktur - v s. faktury c7_fa.cis_fak c7_fa.cis_fak Var.symbol c7_fa.vars_s c7_fa.vars_s Dodavatel m4_organ.nazev_org m4_organ.nazev_org m4_adr.mesto m4_adr.mesto Dr.fak c7_fa.druh_fo+' ' c7_fa.druh_fo c7_fa.druh_f+' ' c7_fa.druh_f c7_fa.znak_f c7_fa.znak_f Dat.spl. tran(c7_fa.dat_spl,'@E') (c7_fa.dat_spl ) stka fakt. str(c7_fa.cast_cel,12,2) c7_fa.cast_cel Zap.do F ' '+str(c7_ho.castka_c,13,2) c7_ho.castka_c Posl.dat.zapl. ' '+ tran(c7_fa.dat_zap,'@E')+' ' (c7_fa.dat_zap ) Konst.sym. c7_fa.kons_s c7_fa.kons_s Spec.sym. c7_fa.spec_s c7_fa.spec_s Zdan.pl. tran(c7_fa.dat_pri,'@E') (c7_fa.dat_pri ) Dat.p tran(c7_fa.dat_odes,'@E')+' ' (c7_fa.dat_odes ) GERMAN RAD_POM TR_HL1 POLEX PROCX CLEFT DCRIGHT FREEZE ORDER PRAVA DNADPIS JMENO RPSOUC LORTITLE TITLECOLORPOC0 RRADY T_CEL OLORF6 TKA_C F0PRG F1PRG F4_JM RF4PRG TISKPRG F7_JM _OFFF7PRG ALF9PRG F9KEY F9KEY1 F10_JM FFF10PRG *RAMECEK SSRIIS OFFNAZEVT BKLICO KLNAZ SPACEBAR TR_HL2 TTR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 RNATR_HL8 NATR_HL9 *DET_JM ENTER DETAIL OFFDETPRG ALPS_LINE PS_RETURN PS_ZAZN CIS_FAK FC7_HO FFM4_ADR ORM4_ORGAN M_DRUH P_DATUM MOD_PSV C7_FA prava dat ... RIIS 9.2 ty za druh hodnoty ty za druh hodnoty Zadejte druh hodnoty: FILTERz AND HODNOT sum_Hod copy to c_sql for &filt c_sql sum_Hod ty za druh hodnoty - v ' '+sum_Hod.Druh_H sum_Hod.Druh_H stka v K str(sum_Hod.Castka,22,2) sum_Hod.Castka Vyhled Konec - Esc,^End Celkem: 99999999999999.99 POM_TEXT S_CASTKA POLEX PROCX CLEFT DCRIGHT FREEZE ORDER PRAVA DNADPIS JMENO RTITLE LORTITLECOLORPOC0 COLORF0 RRADY T_CEL OLORF7 TKA_C F0PRG F1PRG F4_JM F4PRG RTISKPRG F7_JM F7PRG _OFFF9PRG ALF9KEY F9KEY1 F10_JM F10PRG FFRAMECEK *RIIS SSNAZEVT OFFKLICO BKLNAZ SPACEBAR TR_HL1 TR_HL2 TTR_HL3 TR_HL4 TR_HL5 TR_HL6 TR_HL7 RNATR_HL8 NATR_HL9 *DET_JM ENTER DETAIL OFFDETPRG ALPS_LINE PS_RETURN PS_ZAZN FFILT1 FILT2 FFFILT RDRUH_H ORCAST CASTKA RHODNOT SUM_HOD C_SQL FFMOD_PSV NAB_O SUMAKLICE SUMASTRED SUMADRUHF C_SOUCET PREHRADY FUNKCE4 PREPIS1 BILDPH PREHLEDZ DETFAKDPH SOUCETDPH HLASKA PREHDOD POM_PREH PREH1DOD SUMA1 SUMA11 DETAILDOD TISK1DOD ZADANI PREHODB POM1_PREH PREH1ODB DETAIL2 TISK2 PREHDPH PREHFA C_OZN PREHLEDX PREPIS1 DET_SUMA HELP1 VETARECNO ZPETRECNO VYBRADY ZOBRRADY SUMHODN P:\IN\SK\O\07\ S754.FXP P:\IN\SK\O\07\S754.PRG