m_param m7_ucto u7_obru denik r7_obru denik m7_obru denik Nebyl vybr znam. k(3),Par. znak(12),Doklad(5) Funkce funkce Zmena Kontrola za faktur RIIS 7.1 ku, par. znaku a dokladu s712b ident_den+" " ident_den rov. znak par_znak par_znak Dokl. str(doklad,5) doklad cis_pol+" " cis_pol MD str(md,18,2) Dal str(dal,18,2) Splatn. tran(splatnost,'@E') splatnost Datum tran(datum,'@E') datum M_PARAM iiW_PODNIK 1FIRMA = .M7_UCTO .t_UZAV .t.U7_OBRU DENIK 'tisOBRU f6 _MES f7 =PLAT_OBDOB_ROK dejteROK eyR7_OBRU W_ROK_VYB M7_OBRU fP_DATUM OBOBDOBI_MM IDENT_DEN PAR_ZNAK .DOKLAD jm=TXT eHLASKA taiPOLEX CPROCX @RTOP )="nsCLEFT i = CRIGHT l(iFREEZE n.'ORDER (i)=HOR (splatDOL '@E')"LEVA (i)="PRAVA NADPIS i)='(JMENO dTITLE TITLECOLORPOC0 F0PRG F1PRG F4_JM dn(iF4PRG pol"TISKPRG +1F7_JM i)='F7PRG jmenF9PRG cet'F9KEY i)="F9KEY1 i F10_JM ahlF10PRG RAMECEK MRIIS eno(iNAZEVT d,1KLICO hodnKLNAZ sSPACEBAR TR_HL1 TR_HL2 =' TR_HL3 TR_HL4 jmTR_HL5 strTR_HL6 2)"TR_HL7 )="TR_HL8 uc(TR_HL9 iDET_JM zahENTER .'DETAIL i)=DETPRG hodPS_LINE r"PS_RETURN PS_ZAZN (i)="trTRID hMOD_PSV filterz relationz Konec FILTERz AND and Zadejte intervaly Od den Do den Konec(A\N): ident_den and ' ident_den Stop - d lku podm nky ji nelze zv Prob r ... select * from u7_obru into dbf c_obru where &podm order by ident_den select * from r7_obru into dbf c_obru where &podm order by ident_den select * from m7_obru into dbf c_obru where &podm order by ident_den set filter to &M_filt set relation to &m_rel M_DRUH iiKONEC 1VOL11 = .OBRF .t.ALIAS M_FILT tisM_REL f6 AREC f7 =VETARECNO ZPETRECNO SOUCET eyFILT1 FILT2 fPODM OB_KON .HLASKA jm=MESS ePODM1 tai_UZAV C_ROK @ZOBRRADY colora iiMCOLOR german Nebyl vybr znam. c_obru Kontrola za faktur RIIS 7.1 tisk_den Zadejte slo den souc1 Detail detailDod s712b ident_den+" " ident_den rov. znak par_znak par_znak Dokl. str(doklad,5) doklad cis_pol+" " cis_pol MD str(md,18,2) Dal str(dal,18,2) Splatn. tran(splatnost,'@E') splatnost Datum tran(datum,'@E') datum GERMAN iiHLASKA 1C_OBRU = .IDENT_DEN PAR_ZNAK .DOKLAD POLEX tisPROCX f6 RTOP f7 =RBOT CLEFT CRIGHT FREEZE eyORDER fLEVA OBPRAVA NADPIS .JMENO jm=HODN eSOUC taiTITLE CTITLECOLORPOC0 i = F2 l(iF3 n.'F4 (i)=F6 (splatF7 '@E')"F9 (i)="F10 F0PRG i)='(F1PRG F4_JM F4PRG dTISKPRG F7_JM OLORF7PRG F9PRG F9KEY F9KEY1 F10_JM F10PRG RAMECEK NAZEVT KLICO KLNAZ SPACEBAR TR_HL1 TR_HL2 n(iTR_HL3 ol"TR_HL4 +1TR_HL5 )='TR_HL6 menTR_HL7 et'TR_HL8 )="TR_HL9 i DET_JM ahlENTER DETAIL MDETPRG o(iPS_LINE ,1PS_RETURN PS_ZAZN MOD_PSV mod_lib mod_lib Prob tisk ... s712b iiP_SETUP 1P_RESET .P_6LPI P_8LPI .P_10CPI P_12CPI isP_16CPI 6 P_20CPI =P_BOLDON P_BOLDOFF P_ULINEON P_ULINEOFFP_ITALON P_ITALOFF P_SUPERON P_SUPEROFFP_SUBON P_SUBOFF P_DBST_ON P_DBST_OFFP_LETRQUALP_DRAFT aiP_COMP_OFFP_WIDT_ON P_WIDT_OFFP_HEIG_ON P_HEIG_OFFP_NEWPAGE P_KODY n.'MOD_LIB )=INDIK platNASTAV_PRNZAZT ="OBRT S712B FILTERz AND colorz double Celkov Celkov ty - v Esc,^End MD : K Dal: K sum all md, dal to s_md, s_dal for &filt RIIS 7.1 999,999,999,999.99 999,999,999,999.99 SCRQ1 iiMOD_SYS 1FILT1 .FILT2 .AREC VETARECNO M_COL 6 MOD_WIN LDOFF S_DAL EOFFPOM ALOFF ZPETRECNO prava dat ... soubor ! ty za den Zadejte den Kontrola za faktur - v RIIS 7.1 s712b Funkce Funkce Detail Detail c_obru c7_obru ident_den+" " ident_den MD str(md,18,2) Dal str(dal,18,2) Celkem: 9999999999.99 9999999999.99 iiO01 1MESS .ZAZ HLASKA .POLEX PROCX 6 RBOT =CLEFT CRIGHT FREEZE ORDER EOFFHOR ALOFF PRAVA ROFFNADPIS JMENO T_OFFSOUC RQUALTITLE aiTITLECOLORPOC0 IDT_OFFF1 EIG_ON EIG_OFFF3 EWPAGE n.'F6 platF9 TAV_PRNF10 ="F0PRG F1PRG '(F4_JM F4PRG TISKPRG dF7_JM F7PRG OLORF9PRG F9KEY F9KEY1 F10_JM F10PRG RAMECEK RIIS NAZEVT KLICO KLNAZ SPACEBAR TR_HL1 TR_HL2 TR_HL3 n(iTR_HL4 ol"TR_HL5 +1TR_HL6 )='TR_HL7 menTR_HL8 et'TR_HL9 )="DET_JM i ENTER ahlDETAIL DETPRG MPS_LINE (iPS_RETURN PS_ZAZN IDENT_DEN NT_DEN C_OBRU jmC7_OBRU trQ_MD Q_DAL uc(HELP zahMOD_PSV Vyhled Konec - Esc colora set color to &color iiCOLOR .S712B FUNKCE ZOBRRADY VETARECNO ZPETRECNO TISK_DEN SOUCET SOUC1 HLASKA Z:\RIIS\ S712B.FXP Z:\RIIS\S712B.PRG