RIIS 4.2
Funkce
Qfunkce
Detail
Det_obj
S422C
 Zadejte objedn
vku : 
m4_obj
objed
m4_pobj
objed
m4_pobjd
objed
m4_pobjt
objed
 e h l e d   objedn
a4_obj
objed
a4_pobj
objed
a4_pobjd
objed
a4_pobjt
objed
 e h l e d   archivu  objedn
m4_organ
m5_plan
zakazka
m1_ident
ident
Objedn
m4_obj.mat_obj
m4_obj.mat_obj
zev organizace
m4_obj.nazev_org
m4_obj.nazev_org
m4_obj.ico
m4_obj.ico
m4_obj.zavod+'  '
m4_obj.zavod
m4_obj.stav+'   '
m4_obj.stav
Dat.vys.
trans(m4_obj.datum_v,'@E')
m4_obj.datum_v
slo KS
m4_obj.cislo_ks
m4_obj.cislo_ks
Datum KS
trans(m4_obj.datum_ks,'@E')
m4_obj.datum_ks
Dat.odesl.
trans(m4_obj.datum_o,'@E')+'  '
m4_obj.datum_o
Ulice
m4_obj.ulice
m4_obj.ulice
m4_obj.mesto
m4_obj.mesto
m4_obj.psc
m4_obj.psc
Dod.lh
m4_obj.dod_lhuta
m4_obj.dod_lhuta
sob dopravy
m4_obj.zpus_dopr
m4_obj.zpus_dopr
sto ur
m4_obj.misto_ur
m4_obj.misto_ur
Stanice ur
m4_obj.csd
m4_obj.csd_okrsek
Okrsek 
m4_obj.csd_okrsek
m4_obj.csd_okrsek
izuje
m4_obj.vyrizuje
m4_obj.vyrizuje
Dopravn
 dispozice (1)
LEFT(m4_obj.dop_disp,50)
m4_obj.dop_disp
Dopravn
 dispozice (2)
RIGHT(m4_obj.dop_disp,50)
m4_obj.dop_disp
Intern
 pozn
m4_obj.pozn
m4_obj.pozn
POLEX
2,3)PROCX
(i)=RTOP
bj.mnRBOT
i=CLEFT
hl(iCRIGHT
chFREEZE
menORDER
tr(cHOR
j.mno_DOL
)="c4PRAVA
no_zNADPIS
i+1ZAHL
(i)='JMENO
[MJ]HODN
no(i)SOUC
c4_poTITLE
st,1TITLECOLORPOC0
4_pobF0
o_st"
[MJ]'
o(i)="sF6
4_pobj.F7
kdo,12,F9
)="c4_F0PRG
o_kdF1ON
i=i+1F1PRG
i)='F4_JM
ad.dF4PRG
menoTISKPRG
s(F7_JM
.datF7PRG
@E')F9PRG
  '"F9KEY
i)='F9KEY1
datF10_JM
iF10PRG
hl(RAMECEK
 pRIIS
jmNAZEVT
traKLICO
obj.KLNAZ
o,'@SPACEBAR
 TR_HL1
(i)TR_HL2
j.dTR_HL3
TR_HL4
zahTR_HL5
na/TR_HL6
jmeTR_HL7
tr(TR_HL8
cenTR_HL9
0,2DET_JM
(i)ENTER
bj.cDETAIL
DETPRG
PS_LINE
'EPS_RETURN
PS_ZAZN
i)= "MM_TYP
deM4_OBJ
hoOBJED
"m1IM4_POBJ
t_M4_POBJD
=M4_POBJT
(A4_OBJ
A4_POBJ
="A4_POBJD
dA4_POBJT
)M4_ORGAN
seM5_PLAN
o ZAKAZKA
2 M1_IDENT
4IDENT
do mM1IDENT
_poMOD_PSV
 i_M_ULICE
_M_MESTO
4_M_STAT
! _M_PSC
azn_M_DALNOPI_M_TELEFON_M_FAX
_M_ICO
est_M_FIRMA
 _M_DISP
_M_USTAV
0_M_UCET
*_M_DICP
**_M_NAZEV
*_M_NAZ_2
D_M_ZAV
PEMAIL
reeMEMAIL
 soubor !
 Detail objedn
vky: F
Stav:
Dat.vyst.:
izuje:
Funkce:
Ulice:
 Kupn
 smlouva 
D.vyst.:
D.odesl.:
 Dopravn
 dispozice 
Dodac
sob dopravy:
Stanice ur
sto ur
Okrsek 
HLASKA
,3)OBRD
(i)=MAT_OBJ
mnSTAV
i=DATUM_V
(iVYRIZUJE
menZAVOD
tr(cJMENO
mno_FUNKCE
NAZEV_ORG
NAZEV_ORG2ULICE
i+1MESTO
i)='PSC
[MJ]STAT
no(i)CISLO_KS
oDATUM_KS
1DATUM_O
ORDOP_DISP
bDOD_LHUTA
ZPUS_DOPR
stMISTO_UR
CSD_OKRSEK
 soubor !
.obj.:F
 objedn
vky     
 Text objedn
vky       
 Tisk objedn
vky       
 Saldokonto odb
ratele 
 Saldokonto dodavatele 
ehled v
ech po
ehl.vybran
ch po
 Konec                 
_M_ulicef
m_param
m4_uc_o
et s k
dem '
' neexistuje!
m4_adr
daje o vlastn
 firm
daje o vlastn
 firm
m4_tobj
objed
a4_tobj
objed
c4_text+
c4_text
m4_obj
objed
m4_pobj
objed
m4_pobjd
objed
a4_obj
objed
a4_pobj
objed
a4_pobjd
objed
m1_ident
ident
s422a
select &_alias
 Saldokonto odb
ratel
 nelze v archivu prohl
et ! 
 Saldokonto dodavatel
 nelze v archivu prohl
et ! 
HLASKA
,3)_AOBR
(i)=PS_LINE
mnW_COBJ
i=MAT_OBJ
(i_ZAZ2
h_AOBRX
menVOL4
tr(cFILT
mno_QPORADI
QTEXTY
MOD_SYS
G2_M_ULICE
1_M_MESTO
'_M_STAT
J]_M_PSC
(i)_M_DALNOPI_M_TELEFON_M_FAX
OR_M_ICO
b_M_FIRMA
_M_DISP
_M_USTAV
t_M_UCET
_M_DICP
EK_M_NAZEV
._M_NAZ_2
,_M_ZAV
hPEMAIL
c4_MEMAIL
_kd_ZAZ
i+1_ALIAS
)='M_PARAM
.dPATH0
menoPT_OBEC
s(ICO
datZAVOD
E')POLE4
 '"M4_UC_O
='M4_OBJ
datVL_KOD_UCTUSTAV
(UCET
 pM4_ADR
UCTMESTO
aNAZEV_ORG
NAZEV_ORG2ULICE
 STAT
i)PSC
j.dDALNOPIS
ITELEFON
ONFAX
na/E_MAIL
jmeM4_ORGAN
NDICP
MM_TYP
2M4_TOBJ
i)OBJED
bj.cA4_TOBJ
C4_TEXT
HLAOBJ
'EM4_POBJ
POROBJ
M4_POBJD
"DETOBJ
deA4_OBJ
hoA4_POBJ
1IA4_POBJD
_M1_IDENT
=IDENT
(TISK_OBJ
S422A
="SALDO_ODB
SALDO_DOD
VSEPOR
.PS_RETURN
c4_pobj+
c4_pobj
 Objedn
vka nem
 Zobrazen
 objedn
vky  F
RIIS 4.2
Zobrazen
 objedn
vky F
Detail
det_por
DetPor
detpor
S422C
 Zadejte po
str(c4_pobj.poradi,3)
c4_pobj.poradi
c4_pobj.ident
c4_pobj.ident
zev polo
c4_pobj.nazev
c4_pobj.nazev
m1Ident.typ
m1Ident.typ
Identifikace
c4_pobj.sek_ident
c4_pobj.sek_ident
K dod
str(c4_pobj.mno_mj,12,3)
c4_pobj.mno_mj
c4_pobj.mj
c4_pobj.mj
Pl.MJ
c4_pobj.plan_mj+'  '
c4_pobj.plan_mj
 Koeficient
str(c4_pobj.koef,11,4)
c4_pobj.koef
K dod
[Pl.MJ]
'   '+str(c4_pobj.mno_plmj,12,3)
c4_pobj.mno_plmj
Potvrzeno[Pl.MJ]
'    '+str(c4_pobj.mno_po,12,3)
c4_pobj.mno_po
  Dod
no[MJ]
str(c4_pobj.mno_ov,12,3)
c4_pobj.mno_ov
 Vadn
ch[MJ]
str(c4_pobj.mno_zm,12,3)
c4_pobj.mno_zm
 Storno[MJ]
str(c4_pobj.mno_st,12,3)
c4_pobj.mno_st
statek[MJ]
str(c4_pobj.mno_kdo,12,3)+'  '
c4_pobj.mno_kdo
Dat.po
ad.dod.
trans(c4_pobj.datum_pd,'@E')+'       '
c4_pobj.datum_pd
Datum potvrz.
trans(c4_pobj.datum_po,'@E')+'      '
c4_pobj.datum_po
Cena/Pl.MJ
str(c4_pobj.cena_plmj,10,2)
c4_pobj.cena_plmj
Extern
 identifikace
m1Ident.ident_odb
m1Ident.ident_odb
m1Ident.rada
m1Ident.rada
RIIS 4.2
,3)MOD_SYS
)=ZAZN
mnPS_LINE
i=CISOBJ
(iMAT_OBJ
hM4_POBJ
enC4_POBJ
(cPORADI
o_XC4_POBJ
IDENT
M1IDENT
G2TXT
1HLASKA
'M4_OBJ
J]PS_RETURN
POLEX
NOPIPROCX
EFONRTOP
ORRBOT
bCLEFT
CRIGHT
FREEZE
tORDER
EKDOL
.LEVA
,PRAVA
hNADPIS
c4_ZAHL
_kdJMENO
i+1HODN
)='SOUC
.dTITLE
menoTITLECOLORPOC0
datF0
E')F1
 '"F2
datF4
KOD_UCTF6
UCTF10
aF0PRG
_ORG2F1PRG
 F4_JM
i)F4PRG
j.dTISKPRG
IF7_JM
ONF7PRG
na/F9PRG
jmeF9KEY
NF9KEY1
F10_JM
2F10PRG
i)RAMECEK
.cRIIS
NAZEVT
KLICO
'EKLNAZ
SPACEBAR
TR_HL1
"TR_HL2
deTR_HL3
hoTR_HL4
1ITR_HL5
_TR_HL6
=TR_HL7
(TR_HL8
TR_HL9
="DET_JM
ENTER
DETAIL
.DETPRG
PS_ZAZN
2 MOD_PSV
4A_POLE
 objedn
Identif.:
novac
 MJ :
K dod
 [MJ]    :
K dod
 [Pl.MJ] :
Potvrzeno[Pl.MJ] :
no   [MJ]    :
ch  [MJ]    : 
Storno   [MJ]    : 
statek [MJ]    :
Koeficient   :
Cena/1 PlMJ  :
Datum po
ad.dod
Datum potvrz.v KS :
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
99999999.999
9999999.9999
9999999.99
,3)PORADI
)=CISOBJ
mnIDENT
i=NAZEV
(iSEK_IDENT
enPLAN_MJ
(cMNO_MJ
o_MNO_PLMJ
MNO_PO
MNO_OV
G2MNO_ZM
1MNO_ST
'MNO_KDO
J]KOEF
CENA_PLMJ
DATUM_PD
NDATUM_PO
colora
set color to &Hcolor
,3)HCOLOR
)=HOBR
 Pol.:F
 Detail po
      
 Specifikace po
jem objedn
vky  
 Konec              
Detail po
zky neexistuje
MAOBR
,3)M_ZAZ2
)=MAOBRX
mnMVOL4
i=MQIDENT
(iPS_LINE
W_COBJ
enMAT_OBJ
(cIDENT
o_MALIAS
MM_TYP
HLASKA
G2DETNP
1TEXTPOR
'P_IDENT
J]C4_POBJ
ZOBR_PRIJ
PS_RETURN
c4_pobjd+
c4_pobjd
 detail ! 
ehled detailu po
 objedn
vky  
RIIS 4.2
 Detail po
S422C
Dat.po
.dod.
trans(c4_pobjd.datum_pd,'@E')+'    '
c4_pobjd.datum_pd
k.zak.
c4_pobjd.zakazka
c4_pobjd.zakazka
c4_pobjd.cpol+' '
c4_pobjd.cpol
K dod
str(c4_pobjd.mno_mj,12,3)+' '
c4_pobjd.mno_mj
 Dodan
str(c4_pobjd.mno_ov,12,3)
c4_pobjd.mno_ov
statek[MJ]
str(c4_pobjd.mno_mj-c4_pobjd.mno_ov,12,3)
c4_pobjd.mno_mj-c4_pobjd.mno_ov
RIIS 4.2
,3)MOD_SYS
)=ZAZN3
mnPS_LINE
i=CISOBJ
(iMAT_OBJ
CISPOR
enPORADI
(cM4_POBJD
_C4_POBJD
DATUM_PD
XC4_POM1
1HLASKA
'C4_POBJ
]PS_RETURN
POLEX
PROCX
RRBOT
bCLEFT
CRIGHT
FREEZE
tORDER
EKDOL
.LEVA
,PRAVA
hNADPIS
c4_ZAHL
_kdJMENO
i+1HODN
)='SOUC
.dTITLE
menoTITLECOLORPOC0
datF0
E')F1
 '"F2
datF4
KOD_UCTF6
UCTF10
aF0PRG
_ORG2F1PRG
 F4_JM
i)F4PRG
j.dTISKPRG
IF7_JM
ONF7PRG
na/F9PRG
jmeF9KEY
NF9KEY1
F10_JM
2F10PRG
i)RAMECEK
.cRIIS
NAZEVT
KLICO
'EKLNAZ
SPACEBAR
TR_HL1
"TR_HL2
deTR_HL3
hoTR_HL4
1ITR_HL5
_TR_HL6
=TR_HL7
(TR_HL8
TR_HL9
="DET_JM
ENTER
DETAIL
.DETPRG
PS_ZAZN
2 MOD_PSV
c4_pobjt+
c4_pobjt
 objedn
vky nem
 specifikaci ! 
ehled specifikace po
 objedn
RIIS 4.2
ehled specifikace po
 objedn
S422C
c4_pobjt.text_tx
c4_pobjt.text_tx
RIIS 4.2
,3)MOD_SYS
)=ZAZN3
mnPS_LINE
i=CISOBJ
(iMAT_OBJ
CISPOR
enPORADI
(cM4_POBJT
_C4_POBJT
HLASKA
2C4_POBJ
1PS_RETURN
POLEX
]PROCX
CLEFT
RCRIGHT
bFREEZE
ORDER
EKPRAVA
.NADPIS
,ZAHL
hJMENO
c4_HODN
_kdSOUC
i+1TITLE
)='TITLECOLORPOC0
menoF0
LECOLORF1
datF2
E')F3
 '"F4
datF7
KOD_UCTF9
 pF0PRG
UCTF1ON
aF1PRG
F4_JM
ORG2F4PRG
 TISKPRG
i)F7_JM
j.dF7PRG
IF9PRG
ONF9KEY
na/F9KEY1
jmeF10_JM
NF10PRG
RAMECEK
2RIIS
i)NAZEVT
.cKLICO
KLNAZ
SPACEBAR
ETR_HL1
TR_HL2
TR_HL3
"TR_HL4
deTR_HL5
hoTR_HL6
1ITR_HL7
_TR_HL8
=TR_HL9
(DET_JM
ENTER
="DETAIL
DETPRG
PS_ZAZN
MOD_PSV
m4_tobj
objed
a4_tobj
objed
c4_tobj+
c4_tobj
 Objedn
vka nem
 naveden text ! 
 Text objedn
vky: F
RIIS 4.2
 Text objedn
vky: F
S422C
c4_tobj.text
c4_tobj.text
RIIS 4.2
,3)MOD_SYS
)=ZAZN
mn_ALIAS
i=PS_LINE
(iCISOBJ
MAT_OBJ
enMM_TYP
(cM4_TOBJ
_OBJED
A4_TOBJ
C4_TOBJ
1HLASKA
PS_RETURN
POLEX
PROCX
RCLEFT
bCRIGHT
FREEZE
ORDER
EKLEVA
.PRAVA
,NADPIS
hZAHL
c4_JMENO
_kdHODN
i+1SOUC
)='TITLE
OLORTITLECOLORPOC0
COLORF0
datF1
E')F2
 '"F3
datF6
KOD_UCTF7
 pF10
UCTF0PRG
aF1ON
F1PRG
ORG2F4_JM
 F4PRG
i)TISKPRG
.dF7_JM
IF7PRG
ONF9PRG
na/F9KEY
jmeF9KEY1
NF10_JM
F10PRG
2RAMECEK
i)RIIS
.cNAZEVT
KLICO
KLNAZ
ESPACEBAR
TR_HL1
TR_HL2
"TR_HL3
deTR_HL4
hoTR_HL5
1ITR_HL6
_TR_HL7
=TR_HL8
(TR_HL9
DET_JM
="ENTER
DETAIL
DETPRG
PS_ZAZN
MOD_PSV
P_IDENT
3)IDENT
)=ZOBR_PRIJ
PS_RETURN
s422c
 E H L E D    P 
 J E M E K  pro polo
ku: F
ehled p
jemek pro polo
ku: F
RIIS 4.2
 Prob
r obrat
 z archivu ... 
m1_obr_a
cu_obr_a
 Prob
r aktu
ch obrat
 ... 
m1_obr
cu_obr
cu_obr_a
 Polo
ka nem
Datum   
tran(termin_ob,'@E')
termin_ob
kod_ob
kod_ob
    Mno
str(skut_mnoz,12,3)
skut_mnoz
Sklad-1    
vydal_skl+'/'+vyd_um_skl+'/'+typ_um_v
vydal_skl
stred_obr
stred_obr
Sklad-2    
prijal_skl+'/'+pri_um_skl+'/'+typ_um_p
prijal_skl
Doklad
dokl_cis
dokl_cis
n. mno
str(plan_mnoz,12,3)
plan_mnoz
 Vadn
str(vadne_mnoz,12,3)
vadne_mnoz
Rozpiska/Dod.l.
ident_vys + '   '
ident_vys
     Z
str(zasoba,11,2)
zasoba
mka       
popis_obr
popis_obr
3)MREC
)=MOBRP
MOD_SYS
POLEX
(iPROCX
enRBOT
(cCLEFT
_CRIGHT
FREEZE
ORDER
PRAVA
NADPIS
JMENO
RHODN
bSOUC
TITLE
TITLECOLORPOC0
c4_F6
_kdF7
i+1F9
)='F10
OLORF0PRG
OLORF1ON
COLORF1PRG
datF4_JM
E')F4PRG
 '"TISKPRG
='F7_JM
datF7PRG
_UCTF9PRG
(F9KEY
 pF9KEY1
UCTF10_JM
aF10PRG
RAMECEK
G2RIIS
 NAZEVT
i)KLICO
.dKLNAZ
ISPACEBAR
NTR_HL1
na/TR_HL2
jmeTR_HL3
NTR_HL4
TR_HL5
2TR_HL6
i)TR_HL7
.cTR_HL8
TR_HL9
DET_JM
EENTER
DETAIL
DETPRG
"PS_LINE
dePS_RETURN
PS_ZAZN
=P_IDENT
(MESS
="M1_OBR_A
CU_OBR_A
KOD_OB
IDENT
IDENT_ZAK
CISOBJ
M1_OBR
CU_OBR
IDENT_VYS
HLASKA
 iMOD_PSV
if ! file ( '&f_adr\data\M7_faodb.dbf' ) 
 Nebylo nalezeno saldokonto odb
ratel
datez
c2_fak
m7_faodb
c2_fak
znam ! 
c2_fak
** Celkem K
RIIS 4.2
RIIS 4.2
ehled odb
ratelsk
ho saldokonta pro I
ratelsk
 saldokonto pro: 
s422c
s.faktury
cis_fak
Fakturov
str(CAST_CEL,12,2)
Zaplaceno celkem
str(ZAP_CEL,12,2) + '    '
 uhradit
str(k_uhrade,13,2)
Dat.odes.
dat_odes + ' '
Dat.p
dat_pri + ' '
Dat.splat.
dat_spl + ' '
HLASKA
3)MALIAS
)=MKL
(iMICO
enMDATE
(cMNAZEV
ZAVOD
2NAZEV_ORG
MOD_SYS
C2_FAK
CIS_FAK
DAT_ODES
CAST_CEL
ZAP_CEL
RK_UHRADE
bDAT_PRI
DAT_SPL
CIS_OBJ
ORM7_FAODB
EKPS_RETURN
POLEX
,PROCX
hRTOP
c4_RBOT
_kdCLEFT
i+1CRIGHT
)='FREEZE
LORORDER
OLORHOR
COLORDOL
datLEVA
E')PRAVA
 '"NADPIS
='ZAHL
datJMENO
_UCTHODN
(SOUC
 pTITLE
UCTTITLECOLORPOC0
CEBAR
na/F9
jmeF10
NF0PRG
2F1PRG
i)F4_JM
.cF4PRG
TISKPRG
F7_JM
EF7PRG
F9PRG
F9KEY
"F9KEY1
deF10_JM
F10PRG
1IRAMECEK
_RIIS
=NAZEVT
(KLICO
KLNAZ
="SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
TR_HL9
DET_JM
 iENTER
DETAIL
4DETPRG
! PS_LINE
znPS_ZAZN
ONMOD_PSV
if ! file ( '&f_adr\data\m7_fadod.dbf' ) 
 Nebylo nalezeno saldokonto dodavatel
datez
c2_fak
m7_fadod
c2_fak
znam ! 
c2_fak
** Celkem K
RIIS 4.2
RIIS 4.2
ehled dodavatelsk
ho saldokonta pro I
 Dodavatelsk
 saldokonto pro: 
s422c
s.faktury
cis_fak
Fakturov
str(CAST_CEL,12,2)
Zaplaceno celkem
str(ZAP_CEL,12,2) + '    '
 uhradit
str(k_uhrade,13,2)
Dat.odes.
dat_odes + ' '
Dat.p
dat_pri + ' '
Dat.splat.
dat_spl + ' '
HLASKA
3)MALIAS
)=MKL
(iMICO
enMDATE
(cDMY
ZAVOD
MNAZEV
2NAZEV_ORG
MOD_SYS
C2_FAK
CIS_FAK
DAT_ODES
CAST_CEL
ZAP_CEL
RK_UHRADE
bDAT_PRI
DAT_SPL
CIS_OBJ
ORM7_FADOD
EKPS_RETURN
POLEX
,PROCX
hRTOP
c4_RBOT
_kdCLEFT
i+1CRIGHT
)='FREEZE
LORORDER
OLORHOR
COLORDOL
datLEVA
E')PRAVA
 '"NADPIS
='ZAHL
datJMENO
_UCTHODN
(SOUC
 pTITLE
UCTTITLECOLORPOC0
CEBAR
na/F9
jmeF10
NF0PRG
2F1PRG
i)F4_JM
.cF4PRG
TISKPRG
F7_JM
EF7PRG
F9PRG
F9KEY
"F9KEY1
deF10_JM
F10PRG
1IRAMECEK
_RIIS
=NAZEVT
(KLICO
KLNAZ
="SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
TR_HL9
DET_JM
 iENTER
DETAIL
4DETPRG
! PS_LINE
znPS_ZAZN
ONMOD_PSV
 Neexistuj
 objedn
vek materi
lu ! 
m4_obj,
Zobrazen
ech objedn
RIIS 4.2
Zobrazen
ech objedn
Qprij
DetPor
detpor
S422C
 Zadejte objedn
vku: 
Objedn
m4_pobj.mat_obj
m4_pobj.mat_obj
str(m4_pobj.poradi,3)
m4_pobj.poradi
m4_pobj.ident
m4_pobj.ident
zev polo
m4_pobj.nazev
m4_pobj.nazev
m1Ident.typ
m1Ident.typ
Identifikace
m4_pobj.sek_ident
m4_pobj.sek_ident
K dod
str(m4_pobj.mno_mj,12,3)
m4_pobj.mno_mj
m4_pobj.mj
m4_pobj.mj
Pl.MJ
m4_pobj.plan_mj+'  '
m4_pobj.plan_mj
 Koeficient
str(m4_pobj.koef,11,4)
m4_pobj.koef
K dod
[Pl.MJ]
'   '+str(m4_pobj.mno_plmj,12,3)
m4_pobj.mno_plmj
Potvrzeno[Pl.MJ]
'    '+str(m4_pobj.mno_po,12,3)
m4_pobj.mno_po
  Dod
no[MJ]
str(m4_pobj.mno_ov,12,3)
m4_pobj.mno_ov
 Vadn
ch[MJ]
str(m4_pobj.mno_zm,12,3)
m4_pobj.mno_zm
 Storno[MJ]
str(m4_pobj.mno_st,12,3)
m4_pobj.mno_st
statek[MJ]
str(m4_pobj.mno_kdo,12,3)+'  '
m4_pobj.mno_kdo
Dat.po
ad.dod.
trans(m4_pobj.datum_pd,'@E')+'       '
m4_pobj.datum_pd
Datum potvrz.
trans(m4_pobj.datum_po,'@E')+'      '
m4_pobj.datum_po
Cena/Pl.MJ
str(m4_pobj.cena_plmj,10,2)
m4_pobj.cena_plmj
Extern
 identifikace
m1Ident.ident_odb
m1Ident.ident_odb
m1Ident.rada
m1Ident.rada
RIIS 4.2
3)MOD_SYS
)=ZAZN
PS_LINE
CISOBJ
(iMAT_OBJ
M4_POBJ
enTXT
(cHLASKA
_M4_OBJ
PS_RETURN
IDENT
2M1IDENT
POLEX
PROCX
CLEFT
RCRIGHT
bFREEZE
ORDER
ORDOL
EKPRAVA
NADPIS
,ZAHL
hJMENO
c4_HODN
_kdSOUC
i+1TITLE
)='TITLECOLORPOC0
OLORF0
COLORF1
datF2
E')F3
 '"F4
datF7
_UCTF9
 pF0PRG
UCTF1ON
COLORF1PRG
F4_JM
G2F4PRG
 TISKPRG
i)F7_JM
.dF7PRG
IF9PRG
NF9KEY
na/F9KEY1
jmeF10_JM
NF10PRG
RAMECEK
2RIIS
i)NAZEVT
.cKLICO
KLNAZ
SPACEBAR
ETR_HL1
TR_HL2
TR_HL3
"TR_HL4
deTR_HL5
TR_HL6
1ITR_HL7
_TR_HL8
=TR_HL9
(DET_JM
ENTER
="DETAIL
DETPRG
PS_ZAZN
MOD_PSV
A_POLE
S422C
_obec%
DET_OBJ
QFUNKCE
QPORADI
   u&
DETPOR
HLASKA
DET_POR
DETNP
 &&X.hB
TEXTPOR
 E-0M
QTEXTY
jednrU
QPRIJ
  use
ZOBR_PRIJ
SALDO_ODB
SALDO_DOD
VSEPOR
_kodj
Z:\RIIS\
S422C.FXP
Z:\RIIS\S422C.PRG