K o n t r o l a   objedn
RIIS 4.2
Nedod.
Qvyber
Qporadi
s424a
 Zadejte objedn
vku : 
m4_obj
objed
m4_pobj
objed
m4_pobjd
objed
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
MOD_SYS
URANSI
ROCEDZAHL
xtPorJMENO
****HODN
*SOUC
-----KLICO
----PS_LINE
--PS_RETURN
POLEX
PROCX
  PRRTOP
DETAIRBOT
ADI nCLEFT
o prCRIGHT
 --FREEZE
---ORDER
----TITLE
----TITLECOLORF1
screen F3
_SYS WIF6
zaznF7
cno()
t colorF10
@DETAIL
ar F1PRG
@F4_JM
y PSF4PRG
CiF7_JM
mat_F7PRG
sPorF9KEY
poraF10_JM
eleF10PRG
 m4DET_JM
rdeDETPRG
seRAMECEK
+CNAZEVT
OPYRIIS
_pobjTR_HL
 matENTER
poM4_OBJ
= COBJED
isPoM4_POBJ
_pM4_POBJD
M4_ORGAN
  txt M5_PLAN
 ZAKAZKA
y M1_IDENT
fIDENT
askMOD_PSV
colora
set color to &Hcolor
URHCOLOR
CEDHOBR
xtPor
c4_pobj+
c4_pobj
xc4_pobj
 Objedn
vka nem
sele &_sele1
ehled po
 objedn
vky  F
ehled po
 objedn
vky  F
RIIS 4,2
Funkce
funkce1
DetPor
detpor
s424a
 Zadejte po
str(c4_pobj.poradi,3)
c4_pobj.poradi
c4_pobj.ident
c4_pobj.ident
zev polo
c4_pobj.nazev
c4_pobj.nazev
m1_ident.typ
m1_ident.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
statek[MJ]
str(c4_pobj.mno_kdo,12,3)
c4_pobj.mno_kdo
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
no [MJ]
str(c4_pobj.mno_ov,12,3)
c4_pobj.mno_ov
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
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
m1_ident.ident_odb
m1_ident.ident_odb
m1_Ident.rada
m1_Ident.rada
RIIS 4.2
sele &_sele1
_SELE1
UROBR2
CEDMOD_SYS
orZAZN
***PS_LINE
*CISOBJ
---MAT_OBJ
--M4_POBJ
--C4_POBJ
PORADI
XC4_POBJ
RIDENT
ETAIM1_IDENT
rHLASKA
 --PS_RETURN
----JMENO
----HODN
COLORSOUC
sKLICO
een POLEX
PROCX
S WIRTOP
zaznRBOT
CLEFT
olorCRIGHT
@FREEZE
ar ORDER
@TITLE
y PSTITLECOLORF1
mat_F2
sPorF3
poraF4
eleF6
 m4F7
rdeF9
seF10
+CDETAIL
OPYENTER
pobjF1PRG
 matF4_JM
poF4PRG
= CF7_JM
isPoF7PRG
_pF9KEY
F10_JM
)F10PRG
xt DET_JM
 DETPRG
y RAMECEK
fNAZEVT
askTR_HL
15MOD_PSV
 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
999999.9999
9999999.99
URPORADI
CEDCISOBJ
orIDENT
***NAZEV
*SEK_IDENT
--PLAN_MJ
--MNO_MJ
MNO_PLMJ
MNO_PO
RMNO_OV
TAIMNO_ZM
nMNO_ST
rMNO_KDO
--KOEF
CENA_PLMJ
DATUM_PD
-DATUM_PO
r nevydodan
ch po
 objedn
ech po
 objedn
 Zobrazen
 detailu po
 Specifikace po
jem objedn
 Konec 
echna po
 jsou vydod
s422c
URZAZF1
CEDC4_POBJ
_POBJ
**MNO_KDO
*POCZAZ
--HLASKA
--PS_RETURN
DETNP
TEXTPOR
P_IDENT
IDENT
nMM_TYP
rZOBR_PRIJ
S422C
c4_pobjd+
c4_pobjd
xc4_pom1
 detail ! 
ehled detailu po
 objedn
vky  
RIIS 4,2
 Detail po
S424a
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
URMOD_SYS
EDZAZN3
orPS_LINE
**CISOBJ
*MAT_OBJ
CISPOR
--PORADI
--M4_POBJD
C4_POBJD
DATUM_PD
XC4_POM1
nHLASKA
rC4_POBJ
PS_RETURN
JMENO
-HODN
RSOUC
sKLICO
een POLEX
PROCX
S WIRTOP
zaznRBOT
CLEFT
olorCRIGHT
@FREEZE
ar ORDER
@TITLE
y PSTITLECOLORF1
mat_F2
sPorF3
poraF4
eleF6
 m4F7
rdeF9
seF10
+CDETAIL
OPYENTER
pobjF1PRG
 matF4_JM
poF4PRG
= CF7_JM
isPoF7PRG
_pF9KEY
F10_JM
)F10PRG
xt DET_JM
 DETPRG
y RAMECEK
fNAZEVT
askTR_HL
15MOD_PSV
m4_pobjt
objed
c4_pobjt+
c4_pobjt
 objedn
vky nem
 specifikaci ! 
ehled specifikace po
 objedn
RIIS 4,2
ehled specifikace po
 objedn
S424a
c4_pobjt.text_tx
c4_pobjt.text_tx
RIIS 4.2
URMOD_SYS
EDZAZN3
orPS_LINE
**CISOBJ
*MAT_OBJ
CISPOR
--PORADI
--M4_POBJT
OBJED
C4_POBJT
HLASKA
nC4_POBJ
rPS_RETURN
JMENO
-SOUC
RKLICO
sPOLEX
PROCX
S WIRBOT
zaznCLEFT
CRIGHT
lorFREEZE
@ORDER
ar TITLE
@TITLECOLORF1
LECOLORF2
mat_F3
sPorF4
poraF6
eleF7
 m4F9
rdeF10
seDETAIL
+CENTER
OPYF1PRG
pobjF4_JM
 matF4PRG
poF7_JM
= CF7PRG
isPoF9KEY
_pF10_JM
F10PRG
)DET_JM
xt DETPRG
 RAMECEK
y NAZEVT
fRIIS
TR_HL
MOD_PSV
m4_obj
m4_pobj
c4_obj
xc4_obj
echny objedn
vky jsou vydod
ny ! 
N e v y d o d a n 
  a neuzav
 objedn
RIIS 4.2
N e v y d o d a n 
  a neuzav
 objedn
QPoradi
s424a
 Zadejte objedn
vku : 
Objedn
c4_obj.mat_obj
c4_obj.mat_obj
zev organizace
c4_obj.nazev_org
c4_obj.nazev_org
c4_obj.ico
c4_obj.ico
c4_obj.zavod+'  '
c4_obj.zavod
c4_obj.stav+'   '
c4_obj.stav
Dat.vys.
trans(c4_obj.datum_v,'@E')
c4_obj.datum_v
slo KS
c4_obj.cislo_ks
c4_obj.cislo_ks
Datum KS
trans(c4_obj.datum_ks,'@E')
c4_obj.datum_ks
Dat.odesl.
trans(c4_obj.datum_o,'@E')+'  '
c4_obj.datum_o
Ulice
c4_obj.ulice
c4_obj.ulice
c4_obj.mesto
c4_obj.mesto
c4_obj.psc
c4_obj.psc
Dod.lh
c4_obj.dod_lhuta
c4_obj.dod_lhuta
sob dopravy
c4_obj.zpus_dopr
c4_obj.zpus_dopr
sto ur
c4_obj.misto_ur
c4_obj.misto_ur
Stanice ur
c4_obj.csd
c4_obj.csd_okrsek
Okrsek 
c4_obj.csd_okrsek
c4_obj.csd_okrsek
izuje
c4_obj.vyrizuje
c4_obj.vyrizuje
RIIS 4.2
OBRC1
URMOD_SYS
EDM4_OBJ
orSTAV
**MAT_OBJ
*M4_POBJ
MNO_KDO
--C4_OBJ
--XC4_OBJ
HLASKA
JMENO
nHODN
rSOUC
KLICO
PS_LINE
PS_RETURN
POLEX
RPROCX
sRTOP
CLEFT
S WICRIGHT
aznFREEZE
ORDER
lorTITLE
@TITLECOLORF1
LECOLORF3
LECOLORF4
mat_F6
sPorF7
poraF9
eleF10
 m4DETAIL
rdeENTER
seF1PRG
+CF4_JM
OPYF4PRG
pobjF7_JM
 matF7PRG
poF9KEY
= CF10_JM
sPoF10PRG
_pDET_JM
DETPRG
)RAMECEK
t NAZEVT
 RIIS
y TR_HL
MOD_PSV
skS424A
HLASKA
i)= +
QPORADI
DETPOR
FUNKCE1
4_oA&
DETNP
i=i+/*
TEXTPOR
QVYBER
Z:\RIIS\
S424A.FXP
Z:\RIIS\S424A.PRG