MEZOPRAVNA V MEZOPRAVN s.r.o. Vset n nelze pou w_volf mod_lib m4_organ m1_obr sklad m1_obr ehled p ch doklad za aktu obdob u1_obr sklad u1_obr ehled p ch doklad za minul obdob m1_obr_a sklad m1_obr_a ehled p ch doklad z archivu obrat RIIS 7.5 s759c Zadejte sklad, doklad : |...|...... Funkce nabidka tisk1 SELECT vydal_skl, dokl_cis, kod_ob, ident_vys, ident_zak, termin_ob, ico, zavod, typ_um_v, SUM (naklad * skut_mnoz) AS castka FROM &mm_soubor a WHERE inlist ( left (kod_ob,1),'P','O') and typ_um_v = 'M' ORDER by 1,2 GROUP BY 1,2 INTO DBF c4_pri c4_pri.vydal_skl c4_pri.vydal_skl .Dokl. c4_pri.dokl_cis c4_pri.dokl_cis c4_pri.kod_ob c4_pri.kod_ob stka/K str(round(c4_pri.castka,2),12,3) c4_pri.castka Dod.List c4_pri.ident_vys c4_pri.ident_vys Zak./Obj. ' '+c4_pri.ident_zak c4_pri.ident_zak Ze Dne tran(c4_pri.termin_ob,'@E') c4_pri.termin_ob Dodavatel c4_pri.ico c4_pri.ico c4_pri.zavod+' ' c4_pri.zavod zev organizace m4_organ->nazev_org m4_organ->nazev_org PODNIK HLASKA RPOLEX PROCX CLEFT CRIGHT FREEZE ORDER RECNO ERORDPRAVA DNADPIS JMENO PSOUC RTITLE OLORTITLECOLORPOC0 TRECNO RETURN F0PRG ORDF1ON OLORF1PRG F4_JM F4PRG TISKPRG F7_JM ?F7PRG *F9PRG ?F9KEY F9KEY1 ?F10_JM *F10PRG ?RAMECEK *RIIS ?NAZEVT KLICO KLNAZ KSPACEBAR TR_HL1 YTR_HL2 TR_HL3 TR_HL4 BTR_HL5 BTR_HL6 TR_HL7 *TR_HL8 ?TR_HL9 *DET_JM ENTER DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN 9ANSI W_VOL P_SETUP P_RESET *?P_6LPI *P_8LPI ?P_10CPI *P_12CPI ?P_16CPI ?*P_20CPI ?P_BOLDON P_BOLDOFF P_ULINEON P_ULINEOFFP_ITALON KP_ITALOFF P_SUPERON P_SUPEROFFP_SUBON P_SUBOFF RP_DBST_ON P_DBST_OFFP_LETRQUALP_DRAFT ?P_COMP_OFFP_WIDT_ON P_WIDT_OFFP_HEIG_ON P_HEIG_OFFP_NEWPAGE P_KODY MOD_LIB M4_ORGAN M1_OBR SKLAD *?MM_SOUBOR U1_OBR ?*?M1_OBR_A VYDAL_SKL DOKL_CIS ZAVOD MOD_PSV RIIS 7.5 s759c Zadejte slo polo Detail nabidka et za sklady c4_pri cc_pri et za sklady - v SELECT c4_pri.vydal_skl, c4_pri.typ_um_v, SUM (c4_pri.castka) AS castka2 FROM c4_pri, m4_organ WHERE &filt ORDER by 1 GROUP BY 1 INTO DBF cc_pri cc_pri.vydal_skl cc_pri.vydal_skl stka/K str(round(cc_pri.castka2,2),12,2) cc_pri.castka2 POLEX PROCX RRTOP CLEFT CRIGHT FREEZE ORDER PRAVA NADPIS ORDZAHL DJMENO PSOUC TITLE TITLECOLORPOC0 OLORF0 LECOLORF1 TRECNO ETURN F0PRG DF1ON F1PRG ORDF4_JM OLORF4PRG TISKPRG F7_JM F7PRG F9PRG ?F9KEY *F9KEY1 ?F10_JM F10PRG ?RAMECEK *RIIS ?NAZEVT *KLICO ?KLNAZ SPACEBAR TR_HL1 KTR_HL2 TR_HL3 YTR_HL4 TR_HL5 TR_HL6 BTR_HL7 BTR_HL8 TR_HL9 *DET_JM ?ENTER *DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN CNAZTT 9C4_PRI VYDAL_SKL TYP_UM_V CASTKA *?CASTKA2 *CC_PRI *OBRZ1 ?HELP ?*MOD_PSV Neexistuje znam ty za sklady ty za k dy obratu Konec M_DBF M_REC RFILT CNAZTT NAZEVT HLASKA OBRZ1 VOLBA MOD_SYS SOUCET1 SOUCET2 PS_RETURN Konec - Esc RIIS 7.5 s759c Zadejte slo polo Detail nabidka et za k dy obratu c4_pri c_pri et za k dy obratu - v SELECT c4_pri.vydal_skl, c4_pri.kod_ob, c4_pri.typ_um_v, SUM (c4_pri.castka) AS castka1 FROM c4_pri, m4_organ WHERE &filt ORDER by 1,2 GROUP BY 1,2 INTO DBF c_pri c_pri.vydal_skl c_pri.vydal_skl c_pri.kod_ob c_pri.kod_ob stka/K str(round(c_pri.castka1,2),12,2) c_pri.castka1 POLEX PROCX RRTOP CLEFT CRIGHT FREEZE ORDER PRAVA NADPIS ORDZAHL DJMENO PSOUC TITLE TITLECOLORPOC0 OLORF0 LECOLORF1 TRECNO ETURN F0PRG DF1ON F1PRG ORDF4_JM OLORF4PRG TISKPRG F7_JM F7PRG F9PRG ?F9KEY *F9KEY1 ?F10_JM F10PRG ?RAMECEK *RIIS ?NAZEVT *KLICO ?KLNAZ SPACEBAR TR_HL1 KTR_HL2 TR_HL3 YTR_HL4 TR_HL5 TR_HL6 BTR_HL7 BTR_HL8 TR_HL9 *DET_JM ?ENTER *DETAIL DETPRG PS_LINE PS_RETURN PS_ZAZN CNAZTT 9C4_PRI VYDAL_SKL KOD_OB TYP_UM_V ?CASTKA *CASTKA1 ?C_PRI ?OBRZ1 ?*HELP ?MOD_PSV british SELECT vydal_skl, dokl_cis, kod_ob, ident_vys, ident_zak, termin_ob, ico, zavod, SUM (naklad * skut_mnoz) AS castka FROM &mm_soubor a WHERE inlist ( left (kod_ob,1),'P','O') and typ_um_v = 'M' ORDER by 1,2 GROUP BY 1,2 INTO DBF cx_pri mod_lib Prob tisk ... select &mm_soubor BRITISH CASTKA3 RW_TISK NASTAV_PRNMOD_LIB CX_PRI S759C SOUCET1 NABIDKA SOUCET2 TISK1 P:\IN\SK\O\07\ S759C.FXP P:\IN\SK\O\07\S759C.PRG