RIIS 7.5
ehled dodavatelsk
ch faktur dle typu organizace
m_param
m7_ucto
m7_fadod
cis_fak
a7_fadod
cis_fak
m4_organ
echny fakt., inkasa,z
lohy,dobrop., penal. 
 Bez penaliza
ch a z
lohov
ch faktur 
 Bez z
lohov
ch faktur 
 Bez penaliza
ch faktur 
 Konec 
ehled dodavatelsk
ch faktur dle typu organizace 
p_dat = ctod("01/&_pd/&_pda")
   Zadejte datum p
a7_fadod
m7_fadod
fadod
AK_PDA
AKVOL
W_KONEC
M_PARAM
W_PODNIK
DFIRMA
NABFA
POLE7
M7_UCTO
M7_FADOD
DCIS_FAK
DA7_FADOD
M4_ORGAN
INEOFFVOQL
FFPLAT_OBDOBROK
RP_DAT1
P_DAT
_OFFP_DATUM
BMNAVRAT
OBZADANI
P_RESORT
FDAT_ODES
DAT_PRI
FFADOD
ZNAK_F
RESORT
NAZEV_ORG
PRNVLASTPREH
 soubor ! 
pr_tisk
Detail
Detail
Funkce
Funkcea
Typ organizace+n
Obdob
 od F
s754e
RIIS 7.5
Typ org.
m4_organ.resort+'     '
m4_organ.resort
s. faktury
fadod.cis_fak
fadod.cis_fak
Var. symbol
fadod.vars_s
fadod.vars_s
   Celkem K
str(fadod.cast_cel,12,2)
fadod.cast_cel
   Zaplaceno
str(fadod.zap_cel,12,2)
fadod.zap_cel
      Z
str(fadod.zal_cel,12,2)
fadod.zal_cel
         Da
str(fadod.dan_cel,12,2)
fadod.dan_cel
Celkem bez dan
'   '+str((fadod.cast_cel-fadod.dan_cel),12,2)
(fadod.cast_cel-fadod.dan_cel)
Dat.spl.
tran(fadod.dat_spl,'@E')
(fadod.dat_spl   )
Dat.vyst.
tran(fadod.dat_vyst,'@E')
(fadod.dat_vyst  )
fadod.ico
fadod.ico
fadod.zav
fadod.zav
m4_organ.dicp
m4_organ.dicp
zev organizace
substr(m4_organ.nazev_org,1,25)
substr(m4_organ.nazev_org,1,25)
fadod.ucet_dod
fadod.ucet_dod
fadod.znak_f+'  '
fadod.znak_f
fadod.mat_c_zu
fadod.Mat_c_zu
Dat.zap.
tran(fadod.dat_zap,'@E')
(fadod.dat_zap   )
Zdan.pln
tran(fadod.dat_pri,'@E')
(fadod.dat_pri    )
 Celkem m
str(fadod.cast_men,12,2)
fadod.cast_men
Zaplac. m
str(fadod.zap_men,12,2)
fadod.zap_men
loha m
str(fadod.zal_men,12,2)
fadod.zal_men
fadod.mena+' '
fadod.mena
          Kurz
str(fadod.kurz,14,7)
fadod.kurz
Konst.sym.
fadod.kons_s+'     '
fadod.kons_s
Dat.p
tran(fadod.dat_odes,'@E')
(fadod.dat_odes  )
fadod.stav_fa+'   '
fadod.stav_fa
Dat.Sm
tran(fadod.dat_smir,'@E')
(fadod.dat_smir  )
Dat.UCT.
tran(fadod.dat_uct,'@E')
(fadod.dat_uct  )
Autor
fadod.autor
fadod.autor
fadod.zapoc+'   '
fadod.zapoc
str(fadod.zal_vypl,12,2)
fadod.zal_vypl
kazech
str(fadod.pr_cel,12,2)
fadod.pr_cel
Dr.fak
fadod.druh_f+'     '
fadod.druh_f
.obj.
fadod.cis_obj
fadod.cis_obj
Dod.list
fadod.dod_l
fadod.dod_l
Dat.arb.
tran(fadod.dat_arb,'@E')
fadod.dat_arb
fadod.pozn
fadod.pozn
m4_organ.stat_dod+' '
m4_organ.stat_dod
FADOD
HLASKA
POLEX
AKPROCX
AKRTOP
CLEFT
CRIGHT
DFREEZE
ORDER
DPRAVA
DNADPIS
JMENO
EOFFHODN
PSOUC
TITLE
FFTITLECOLORPOC0
_OFFF2
ESORT
_ODES
FF0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
PRNF9PRG
F9KEY
F9KEY1
OBF10_JM
*F10PRG
RAMECEK
*RIIS
ANAZEVT
KLICO
OBKLNAZ
SPACEBAR
TR_HL1
TTR_HL2
TTR_HL3
 TR_HL4
BTR_HL5
TR_HL6
TR_HL7
*TR_HL8
?TR_HL9
*DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
RP_DAT
RP_DATUM
KOBRZ
RNADP
MOD_PSV
 Celk. sou
ty za typ organizace 
 Celk. sou
ty za organizace 
 Suma za sestavu 
 Konec 
KONEC
VOL11
AKSOUCTYP
SOUCORG
 soubor ! 
 Prob
 ... 
FILTERz
 Celkov
et za typ organizace 
 Obdob
 Celkov
et za typ organizace - v
 Celkov
et za typ organizace - v
 Celkov
et za typ organizace - v
 Celkov
et za typ organizace - v
 AND 
fadod
copy to c_sql for &filt
c_sql
ehled dodavatelsk
ch faktur dle typu organizace 
Zadejte typ organizace:
s754e
RIIS 7.5
Typ org.
p_resort+'     '
p_resort
    Celkem K
str(fado.cast_cel,13,2)
fado.cast_cel
 Zaplaceno K
str(fado.zap_cel,13,2)
fado.zap_cel
    Z
loha K
str(fado.zal_cel,13,2)
fado.zal_cel
    Rozd
str((fado.cast_cel - fado.zap_cel),13,2)
fado.cast_cel - fado.zap_cel
          DPH
str(fado.dan_cel,13,2)
fado.dan_cel
Celkem bez dan
'  '+str((fado.cast_cel-fado.dan_cel),13,2)
(fado.cast_cel-fado.dan_cel)
HLASKA
AKPOLEX
AKPROCX
CLEFT
DCRIGHT
FREEZE
ORDER
DLEVA
DPRAVA
NADPIS
EOFFJMENO
PSOUC
FFTITLE
OLORTITLECOLORPOC0
_OFFF1
ESORT
_ODES
F0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
PRNF7PRG
F9PRG
F9KEY
OBF9KEY1
*F10_JM
F10PRG
*RAMECEK
ARIIS
NAZEVT
OBKLICO
KLNAZ
SPACEBAR
TTR_HL1
TTR_HL2
 TR_HL3
BTR_HL4
TR_HL5
TR_HL6
*TR_HL7
?TR_HL8
*TR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
QQW_AL
RQQW_ZAZ
RVETARECNO
FILT1
RFILT2
?P_DAT
P_DATUM
?FILT
*ANSI
?P_RESORT
ZAL_CEL
CAST_CEL
ZAP_CEL
FDAN_CEL
FADOD
C_SQL
M4_ORGAN
 RESORT
FFOBRZ
LORMOD_PSV
FZPETRECNO
 soubor ! 
 Prob
 ... 
FILTERz
 Celkov
ty za organizace 
 Obdob
 Celkov
ty za organizace - v
 Celkov
ty za organizace - v
 Celkov
ty za organizace - v
 Celkov
ty za organizace - v
 AND 
fadod
copy to c_sql for &filt
c_sql
ehled dodavatelsk
ch faktur dle typu organizace 
Zadejte I
|...........|..
s754e
RIIS 7.5
Typ org.
m4_organ.resort+'     '
m4_organ.resort
zev organizace
m4_organ.nazev_org
m4_organ.nazev_org
    Celkem K
str(fado.cast_cel,13,2)
fado.cast_cel
 Zaplaceno K
str(fado.zap_cel,13,2)
fado.zap_cel
    Rozd
str((fado.cast_cel - fado.zap_cel),13,2)
fado.cast_cel - fado.zap_cel
          DPH
str(fado.dan_cel,13,2)
fado.dan_cel
Celkem bez dan
'  '+str((fado.cast_cel-fado.dan_cel),13,2)
(fado.cast_cel-fado.dan_cel)
    Z
loha K
str(fado.zal_cel,13,2)
fado.zal_cel
fado.ico
fado.ico
fado.zav
fado.zav
HLASKA
AKPOLEX
AKPROCX
CLEFT
DCRIGHT
FREEZE
ORDER
DLEVA
DPRAVA
NADPIS
EOFFJMENO
PSOUC
FFTITLE
OLORTITLECOLORPOC0
_OFFF1
ESORT
_ODES
F0PRG
F1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
PRNF7PRG
F9PRG
F9KEY
OBF9KEY1
*F10_JM
F10PRG
*RAMECEK
ARIIS
NAZEVT
OBKLICO
KLNAZ
SPACEBAR
TTR_HL1
TTR_HL2
 TR_HL3
BTR_HL4
TR_HL5
TR_HL6
*TR_HL7
?TR_HL8
*TR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
QQW_AL
RQQW_ZAZ
RVETARECNO
FILT1
RFILT2
?P_DAT
P_DATUM
?FILT
*ANSI
CAST_CEL
ZAP_CEL
FDAN_CEL
ZAL_CEL
FADOD
C_SQL
 M4_ORGAN
RRESORT
FFNAZEV_ORG
LORF8
FOBRZ
LORMOD_PSV
ZPETRECNO
FILTERz
 AND 
colorz
double
 Celkov
 Celkov
ty - v
 Esc,^End 
Celkem za p
ehled:                   K
Z toho zaplaceno:                    K
     nezaplaceno:                    K
             DPH:                    K
loha          :                    K
sum all cast_cel, zap_cel, dan_cel, zal_cel to _souc, _zap, _dan, _zal 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
999,999,999,999.99
SCRQ1
MOD_SYS
FILT1
AKFILT2
AKFILT
VETARECNO
M_COL
DMOD_WIN
CAST_CEL
ZAP_CEL
DAN_CEL
ZAL_CEL
D_SOUC
D_ZAP
EOFFPOM
ZPETRECNO
colora
set color to &color
COLOR
colorz
 Vyhled
NAZEV
Zadejte n
zev organizace:
Zadejte I
O organizace:
NAZEV
znam nebyl nalezen ! 
MCOLOR
CMASTERORDSTZAZ
AKVETARECNO
CPODMV
CPODMS
DW_CESTINA
HLASKA
ZPETRECNO
ordera
mod_lib
 Tisk dle typu organizace 
 Tisk p
ehledu 
 Konec 
mod_lib
 Prob
 tisk  ... 
FILTERz
 AND 
c7_fa
copy to c7_fa for &filt
c7_fa
set order to &st_order    
ST_ORDER
P_SETUP
RDP_RESET
AKP_6LPI
P_8LPI
P_10CPI
P_12CPI
DP_16CPI
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
P_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
MOD_LIB
W_TISK
TISKPREH
INDIK
NASTAV_PRNOBRT
FILT1
PRNFILT2
C7_FA
OBICO
M4_ORGAN
ANAZEV_ORG
NAZEV
OBRESORT
V_ORG
FADOD
RIIS 7.5
 Datum mus
t vypln
 Prob
 ... 
_DRQTXT
RDNADP
AKP_DAT
P_DATUM
MNAVRAT
HLASKA
DMESS
FILTERz
 AND 
ico+zav
mod_psv
FILT1
FILT2
RDKLICO
AKTISK
MOD_PSV
S754E
VLASTPREH
FUNKCEA
SOUCTYP
SOUCORG
HLASKA
HLEDEJ1
VETARECNO
ZPETRECNO
PR_TISK
ZADANI
TISKPREH
P:\IN\SK\O\07\
S754E.FXP
P:\IN\SK\O\07\S754E.PRG