m7_ucto u7_obru denik c7_obru m7_obru denik c7_obru c7_obru m7_obru denik c7_obru c7_obru cx7_obr ehled ch obrat - min. obdob ehled ch obrat za obdob RIIS 7.9 Den,dokl.,pol mod79f ident_den ident_den Dokl. str(doklad,5) doklad Pol. cis_pol cis_pol Datum tran(datum,'@E') datum Skl. sklad sklad MD str(md,15,2) Dal str(dal,15,2) Text str(obdobi_mm,2)+' ' obdobi_mm Par.znak par_znak par_znak ned_vyroba ned_vyroba cinnost+' ' cinnost Splat. tran(splatnost,'@E') splatnost str(cis_g,5) cis_g str(rad_tup,2)+' ' rad_tup innosM7_UCTO tUZAV kl, pPLAT_OBDOBPLAT_POK lU7_OBRU ,5DENIK @ M7_OBRU 15C7_OBRU SKUPINA 11OBDOBI_MM IDENT_DEN DOKLAD @ 1CIS_POL ' CX7_OBR 'RAMECEK @ NAZEVT y 'ROK_POK RIIS 13,22NADPIS jeLEVA @PRAVA say HOR @ 12,3POLEX _zakFREEZE piF1 9999999F2 F3 13,34 sF4 _zakl F6 pict F9 99999.9F9KEY @PROCX say KLICO p_zaZAHL t '99SOUC JMENO @ 12HODN v_dI piMOD_PSV 99OBSAH m7_ucto RIIS 7.9 ehled DPH pokladny za obdob : / F mod79f m7_obru c7_zak m7_obru c7_dan m7_vstup c7_ddan c7_zak c7_dan c7_cdan c7_ddan Funkce funkce ehled DPH pokladny za obdob RIIS 7.9. Pok. doklad c7_cdan.par_znak c7_cdan.par_znak ' '+c7_cdan.cinnost c7_cdan.cinnost Proc. str(c7_cdan.dan,5,2) c7_cdan.dan Z klad str(c7_cdan.zakl,13,2) c7_cdan.zakl Da str(c7_cdan.kc_dan,13,2) c7_cdan.kc_dan Splat. tran(c7_cdan.datum,'@E') c7_cdan.datum c7_cdan.nstr c7_cdan.nstr Text. c7_cdan.text c7_cdan.text M7_UCTO osP_RK tROK_POK pP_OB OBDOBPLAT_POK lMOD_SYS ,5POLEX @ POC0 OBI_MM NT_DEN @ 1F6 y 'F10 PROCX 3,22PAR_ZNAK say DAL ZAKL 12,3CIS_POL akCIS_G piM7_OBRU 99SKUPINA UCET ,34 sOBDOBI_MM C7_ZAK ct KC_DAN 9CINNOST @NSTR y SPLATNOST DATUM '99TEXT C7_DAN v_dCIDOK piZAK_DAN 9HODNOTA SKL2 7 sSTR_N DAT_VYST 9IDENT_VS 'OBDOBI @ 1M7_VSTUP C7_DDAN R_ZNAK C7_CDAN F10_JM sF10PRG RAMECEK sNAZEVT om RIIS NADPIS aseLEVA PRAVA on=.HOR sDOL lor toKLICO ZAHL 9 cleSOUC +5,5JMENO @ HODN m+5I MOD_PSV t OBSAH et sou DPH za v ce obdob Konec klad dan Da Celkem 99999999.99 99999999.99 99999999.99 99999999.99 99999999.99 99999999.99 Zadejte obdob KONEC osVOL11 tOBRF BDOBST_ZAZ lDPOBR ,5C7_CDAN @ ZAKL 15KC_DAN CINNOST 11V_ZAKL V_DAN P_ZAKL 1P_DAN ' _KON @ _DO y 'MOD_SYS MOD79H mod79f a7_obru ca7_zak a7_obru ca7_dan a7_vstup ca7_ddan ca7_zak ca7_dan ca7_cdan c7_cdan soucet ehled DPH pokladny za obdob RIIS 7.9. Pok. doklad ca7_cdan.par_znak ca7_cdan.par_znak ' '+ca7_cdan.cinnost ca7_cdan.cinnost Proc. str(ca7_cdan.dan,5,2) ca7_cdan.dan Z klad str(ca7_cdan.zakl,13,2) ca7_cdan.zakl Da str(ca7_cdan.kc_dan,13,2) ca7_cdan.kc_dan Splat. tran(ca7_cdan.datum,'@E') (ca7_cdan.datum ) ca7_cdan.nstr ca7_cdan.nstr str(ca7_cdan.obdobi_mm,2) ca7_cdan.obdobi_mm Text. ca7_cdan.text ca7_cdan.text POLEX osPROCX tRTOP pRBOT BDOBCLEFT lCRIGHT ,5FREEZE @ ORDER 15ZAHL JMENO 11HODN TITLE TITLECOLORF1 y 'F6 ,22F9 @DETAIL ay F1PRG F4_JM 12,3F4PRG akF7_JM piF7PRG 99F9KEY F10_JM 4 sF10PRG DET_JM ct DETPRG 9RAMECEK @NAZEVT y RIIS TISKPRG 99PS_RETURN KLICO v_dF5 9PAR_ZNAK DAL 9ZAKL 'CIS_POL 1A7_OBRU SKUPINA pUCET 9OBDOBI_MM BI_MM CA7_ZAK KC_DAN sCINNOST m NSTR DATUM aseTEXT CA7_DAN sCIDOK toZAK_DAN HODNOTA leSKL2 5,5STR_N @ DAT_VYST 5IDENT_VS OBDOBI t A7_VSTUP CA7_DDAN R_ZNAK CA7_CDAN M7_UCTO PLAT_POK 0C7_CDAN _dROK_POK NADPIS 3 sLEVA dejtePRAVA @DOL 33 saySOUC getI ct 'MOD_PSV OBSAH 4,33p Celkem za p ehled FF CA7_CDAN sZAKL tKC_DAN p_SOUC BDOBM Obraty soucet1 mod79f c7_vstup m7_vstup poklad c7_vstup+ c7_vstup znam! ehled na zak RIIS 7.1 Doklad c7_vstup.cidok c7_vstup.cidok c7_vstup.str_n c7_vstup.str_n c7_vstup.kc+' ' c7_vstup.kc str(c7_vstup.hodnota,15,2) c7_vstup.hodnota c7_vstup.ned_vyroba c7_vstup.ned_vyroba DPH str(c7_vstup.dan,5,2) c7_vstup.dan c7_vstup.det_tup+' ' c7_vstup.det_tup klad dan str(c7_vstup.zak_dan,12,2) c7_vstup.zak_dan c7_vstup.skl1 c7_vstup.skl1 Dat.vyst. tran(c7_vstup.dat_vyst,'@E') (c7_vstup.dat_vyst ) sPOLEX tPROCX pRTOP BDOBRBOT lCLEFT ,5CRIGHT @ FREEZE 15ORDER 11JMENO COLORTITLE ' TITLECOLORF1 y 'F3 ,22F6 ay F10 DETAIL 2,3F1PRG akF4_JM piF4PRG 99F7_JM F7PRG 4 sF9KEY F10_JM ct F10PRG 9DET_JM @DETPRG y RAMECEK NAZEVT 99RIIS TISKPRG PS_RETURN KLICO piCARA 9POC0 W_SK 9ENTER 'C7_VSTUP 1M7_VSTUP POKLAD pSKUPINA 9NED_VYROBATXT HLASKA CIDOK KLIC_TR sNADPIS m LEVA PRAVA aseHOR sI toMOD_PSV OBSAH Celkem za p ehled FF HODNOTA s_SOUC tMOD79F ----% MOD79G FUNKCE MOD79H SOUCET MOD79I oteB, HLASKA SOUCET1 W:\07\ MOD79F.FXP W:\07\MOD79F.PRG