home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
09
/
MOD91F.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-03-03
|
47KB
|
1,335 lines
Hodnocen
Hodnocen
RIIS 9.0
p1_rada
xp1_rada
m1_plan
x1_plan
m1_ident
ident
RIIS 9.0
AKTUAL
m1_obr
(aktu
l.obdob
Prob
r obrat
pro odv
, lomy a vratky ...
u1_obr
r.obdob
Prob
r obrat
pro odv
, lomy a vratky ...
m1_obr_a
(archiv.obdob
Prob
r obrat
pro odv
, lomy a vratky ...
m_cis1
KOD_OB
c1Cur
c1Cur
c_obr
Hodnocen
roby - p
ehled obrat
mod91f
funkce
Funkce
stred_obr
stred_obr
' '+druhobr+' '
stred_obr
kod_ob
kod_ob
Identifikace
ident
ident
m1_ident.nazev
m1_ident.nazev
m1_ident.mj
m1_ident.mj
vydal_skl
vydal_skl
' '+str(mesic,2)+' '
str(mesic,2)
str(rok,4)
str(rok,4)
Dat.obr.
tran(termin_ob,'@E')
termin_ob
Cena/MJ
str(naklad,11,2)
naklad
Celk.mno
str(skut_mnoz,12,3)
skut_mnoz
Cena celkem
str(celkem,13,2)
celkem
Hmotnost/MJ
str(Hmot_mj,11,3)
hmot_mj
Hmot. celkem
str (hmot_celk,13,2)
hmot_celk
p1_rada.nazev
p1_rada.nazev
del c_obr.*
del c1Cur.*
CDRUH
W_OBDOBI
=P1_RADA
a/XP1_RADA
(M1_PLAN
r(X1_PLAN
,2M1_IDENT
)IDENT
kladRADA
QRIIS
'M1_OBR
meno(iCOBD
tr(skMESS
z,12,U1_OBR
n(iM1_OBR_A
oW_ODMES
+1W_DOMES
i)W_ODROK
naW_DOROK
jW_ESC
= SEL_DAT
emNCENA
hoHODNOTA
"cKOD
ouHOD_EXT
t.DRUHOBR
(i) M_CIS1
ostS_RIIS
enoC1CUR
trSKUT_MNOZ
NAKLAD
dn(CELKEM
motHMOT_MJ
+1HMOT_CELK
KOD_OB
ot.C_OBR
jDISPLAY_BOALL
(hmot_VAHA_MJ
)"FOR
_MNOZ
DISPLAY_BASTRED_OBR
TERMIN_OB
POLEX
zaPROCX
zeRTOP
jmRBOT
="p1_CLEFT
zev"CRIGHT
)="FREEZE
nazORDER
do mHOR
mohouPRAVA
likeNADPIS
eroZAHL
!dJMENO
c1CurSOUC
PSOUC
****TITLE
****TITLECOLORPOC0
*****F0
PROCF1
E FunkcF2
f emptyF3
ccount F4
do F6
ka withF7
or ! '
eturn
F0PRG
sF1ON
reen F1PRG
koF4_JM
voF4PRG
do wTISKPRG
F7_JM
F7PRG
lor F9PRG
F9KEY
cleaF9KEY1
0,6F10_JM
m,2F10PRG
0,6RAMECEK
RIIS
colorNAZEVT
,b/KLICO
m+1KLNAZ
mpt SPACEBAR
aTR_HL1
ka TR_HL2
adyTR_HL3
m+TR_HL4
mptTR_HL5
t zTR_HL6
skaTR_HL7
m+TR_HL8
mptTR_HL9
t zDET_JM
adyENTER
diskDETAIL
@ mDETPRG
ompPS_LINE
t PS_RETURN
PS_ZAZN
MOD_PSV
soubor !
et za st
ediska a v
et za st
ediska
et za v
ady a st
ediska
et za v
robkov
et za st
ediska a v
robky
et za sklady a v
robky
et za v
robky
Konec
HLASKA
=KONEC
a/VOL11
r(SUMASTRVR
SUMASTRED
SUMAVRSTR
SUMAVYRRADSUMASTRVYRSUMASKLVYRSUMAVYR
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby dle st
RIIS 7.5
mod91f
---- Za st
edisko:
soucty
CCvyr.str
CCvyr.str
CCvyr.rada
CCvyr.rada
CCvyr.nazev_rady
CCvyr.nazev_rady
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
=RADA
a/ODVADKC
(ODVADKG
r(LOMYKC
LOMYKG
VRATKYKC
VRATKYKG
DVYROBAKC
RVYROBAKG
RNAZEV_RADYC_OBR
r(skZAZ
,12,O01
n(iMESS
oFILT1
+1FILT2
i)FILT
naSTRED_OBR
DRUHOBR
CELKEM
emHMOT_CELK
"cCS1
ouC_SQL
t.DBF
P1_RADA
NAZEV
DYHLASKA
oPOLEX
trPROCX
dn(RBOT
motCLEFT
+1CRIGHT
FREEZE
ot.ORDER
LAY_BODOL
(hmot_LEVA
)"PRAVA
NADPIS
_BAZAHL
JMENO
zaSOUC
zePSOUC
jmTITLE
"p1_TITLECOLORPOC0
)="F0
nazF1
do mF2
mohouF6
likeF7
eroF9
!dF10
F0PRG
1CurF1ON
F1PRG
****F4_JM
****F4PRG
OLORTISKPRG
**F7_JM
PROCF7PRG
unkcF9PRG
mptyF9KEY
unt F9KEY1
do F10_JM
ithF10PRG
RAMECEK
NAZEVT
sKLICO
een KLNAZ
koSPACEBAR
oTR_HL1
o wTR_HL2
TR_HL3
TR_HL4
or TR_HL5
TR_HL6
leaTR_HL7
0,6TR_HL8
m,2TR_HL9
0,6DET_JM
ENTER
olorDETAIL
,b/DETPRG
m+1PS_LINE
t PS_RETURN
PS_ZAZN
a QRIIS
adyCOBD
m+CDRUH
mptW_OBDOBI
ORMOD_PSV
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby podle st
edisek
RIIS 7.5
mod91f
soucty
CCvyr.str
CCvyr.str
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
=RADA
a/ODVADKC
(ODVADKG
r(LOMYKC
LOMYKG
VRATKYKC
VRATKYKG
DVYROBAKC
RVYROBAKG
RNAZEV_RADYC_OBR
r(skZAZ
,12,O01
n(iMESS
oFILT1
+1FILT2
i)FILT
naSTRED_OBR
DRUHOBR
CELKEM
emHMOT_CELK
"cCS1
ouC_SQL
t.DBF
HLASKA
POLEX
DYPROCX
oRTOP
trRBOT
CLEFT
dn(CRIGHT
motFREEZE
+1ORDER
ot.DOL
jLEVA
AY_BOPRAVA
mot_NADPIS
)"ZAHL
JMENO
_BAHODN
PSOUC
zaTITLE
zeTITLECOLORPOC0
"p1_F0
LECOLORF1
)="F2
nazF3
do mF4
mohouF9
likeF10
eroF0PRG
!dF1ON
F1PRG
1CurF4_JM
F4PRG
****TISKPRG
**F7_JM
OLORF7PRG
**F9PRG
PROCF9KEY
unkcF9KEY1
ptyF10_JM
nt F10PRG
do RAMECEK
thRIIS
NAZEVT
KLICO
KLNAZ
sSPACEBAR
TR_HL1
koTR_HL2
oTR_HL3
o wTR_HL4
TR_HL5
TR_HL6
or TR_HL7
TR_HL8
leaTR_HL9
0,6DET_JM
m,2ENTER
0,6DETAIL
DETPRG
lorPS_LINE
b/PS_RETURN
PS_ZAZN
t QRIIS
a CDRUH
adyW_OBDOBI
ORMOD_PSV
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby dle v
ad a st
RIIS 7.5
mod91f
--- Za
soucty
CCvyr.rada
CCvyr.rada
CCvyr.str
CCvyr.str
CCvyr.nazev_rady
CCvyr.nazev_rady
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
=RADA
a/ODVADKC
(ODVADKG
r(LOMYKC
LOMYKG
VRATKYKC
VRATKYKG
DVYROBAKC
RVYROBAKG
RNAZEV_RADYC_OBR
r(skZAZ
,12,O01
n(iMESS
oFILT1
+1FILT2
i)FILT
naSTRED_OBR
DRUHOBR
CELKEM
emHMOT_CELK
"cCS1
ouC_SQL
t.DBF
P1_RADA
NAZEV
DYHLASKA
oPOLEX
trPROCX
dn(RBOT
motCLEFT
+1CRIGHT
FREEZE
ot.ORDER
AY_BODOL
mot_LEVA
)"PRAVA
NADPIS
_BAZAHL
JMENO
zaSOUC
zePSOUC
OLORTITLE
"p1_TITLECOLORPOC0
)="F0
nazF1
do mF2
mohouF6
likeF7
eroF9
!dF10
F0PRG
1CurF1ON
F1PRG
****F4_JM
**F4PRG
OLORTISKPRG
**F7_JM
PROCF7PRG
unkcF9PRG
ptyF9KEY
nt F9KEY1
do F10_JM
thF10PRG
RAMECEK
NAZEVT
sKLICO
KLNAZ
koSPACEBAR
oTR_HL1
o wTR_HL2
TR_HL3
TR_HL4
or TR_HL5
TR_HL6
leaTR_HL7
0,6TR_HL8
m,2TR_HL9
0,6DET_JM
ENTER
lorDETAIL
b/DETPRG
PS_LINE
t PS_RETURN
PS_ZAZN
a QRIIS
adyCOBD
+CDRUH
ORW_OBDOBI
ORMOD_PSV
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby dle v
robkov
RIIS 7.5
mod91f
soucty
CCvyr.rada
CCvyr.rada
CCvyr.nazev_rady
CCvyr.nazev_rady
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
=RADA
a/ODVADKC
(ODVADKG
r(LOMYKC
LOMYKG
VRATKYKC
VRATKYKG
DVYROBAKC
RVYROBAKG
RNAZEV_RADYC_OBR
r(skZAZ
,12,O01
n(iMESS
oFILT1
+1FILT2
i)FILT
naSTRED_OBR
DRUHOBR
CELKEM
emHMOT_CELK
"cCS1
ouC_SQL
t.DBF
P1_RADA
NAZEV
DYHLASKA
oPOLEX
trPROCX
dn(RBOT
motCLEFT
+1CRIGHT
FREEZE
ot.ORDER
AY_BODOL
mot_LEVA
)"PRAVA
NADPIS
_BAZAHL
JMENO
zaSOUC
zePSOUC
OLORTITLE
"p1_TITLECOLORPOC0
)="F0
nazF1
do mF2
mohouF6
likeF7
eroF9
!dF10
F0PRG
1CurF1ON
F1PRG
****F4_JM
**F4PRG
OLORTISKPRG
**F7_JM
PROCF7PRG
unkcF9PRG
ptyF9KEY
nt F9KEY1
do F10_JM
thF10PRG
RAMECEK
NAZEVT
sKLICO
KLNAZ
koSPACEBAR
oTR_HL1
o wTR_HL2
TR_HL3
TR_HL4
or TR_HL5
TR_HL6
leaTR_HL7
0,6TR_HL8
m,2TR_HL9
0,6DET_JM
ENTER
lorDETAIL
b/DETPRG
PS_LINE
t PS_RETURN
PS_ZAZN
a QRIIS
adyCOBD
+CDRUH
ORW_OBDOBI
ORMOD_PSV
colora
MCOLOR
prava dat ...
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby dle st
RIIS 7.5
mod91f
---- Za st
edisko:
soucty_m
CCvyr.str
CCvyr.str
Identifikace
CCvyr.ident
CCvyr.ident
CCvyr.nazev
CCvyr.nazev
Mno
str(CCvyr.mnoz,12,3)
CCvyr. mnoz
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
=IDENT
a/ODVADKC
(ODVADKG
r(LOMYKC
LOMYKG
VRATKYKC
VRATKYKG
DVYROBAKC
RVYROBAKG
RNAZEV
RADYMNOZ
r(skC_OBR
,12,ZAZ
n(iO01
oMESS
+1FILT1
i)FILT2
naFILT
STRED_OBR
DRUHOBR
CELKEM
HMOT_CELK
ouSKUT_MNOZ
C_SQL
M1_IDENT
HLASKA
rPOLEX
PROCX
dn(RTOP
motRBOT
+1CLEFT
CRIGHT
ot.FREEZE
jORDER
Y_BOHOR
mot_DOL
)"LEVA
PRAVA
_BANADPIS
JMENO
zaHODN
zeSOUC
OLORPSOUC
"p1_TITLE
OLORTITLECOLORPOC0
nazF0
do mF1
mohouF4
likeF6
eroF7
1CurF0PRG
****F1PRG
**F4_JM
OLORF4PRG
**TISKPRG
OCF7_JM
unkcF7PRG
ptyF9PRG
nt F9KEY
do F9KEY1
thF10_JM
F10PRG
RAMECEK
sNAZEVT
KLICO
koKLNAZ
oSPACEBAR
wTR_HL1
TR_HL2
TR_HL3
or TR_HL4
TR_HL5
leaTR_HL6
0,6TR_HL7
m,2TR_HL8
0,6TR_HL9
DET_JM
lorENTER
b/DETAIL
DETPRG
t PS_LINE
PS_RETURN
PS_ZAZN
dyQRIIS
+COBD
ORCDRUH
zW_OBDOBI
ORMOD_PSV
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby dle skl.a v
RIIS 7.5
mod91f
vydal_skl
---- Za sklad:
soucty_m
CCvyr.vydal_skl
CCvyr.vydal_skl
Identifikace
CCvyr.ident
CCvyr.ident
CCvyr.nazev
CCvyr.nazev
Mno
str(CCvyr.mnoz,12,3)
CCvyr. mnoz
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
VYDAL_SKL
IDENT
ODVADKC
(ODVADKG
r(LOMYKC
LOMYKG
VRATKYKC
VRATKYKG
DVYROBAKC
RVYROBAKG
RNAZEV
RADYMNOZ
r(skSKL
C_OBR
n(iZAZ
+1MESS
i)FILT1
naFILT2
DRUHOBR
CELKEM
HMOT_CELK
ouSKUT_MNOZ
C_SQL
M1_IDENT
HLASKA
rPOLEX
PROCX
dn(RTOP
motRBOT
+1CLEFT
CRIGHT
ot.FREEZE
jORDER
Y_BOHOR
mot_DOL
)"LEVA
PRAVA
_BANADPIS
JMENO
zaHODN
zeSOUC
OLORPSOUC
"p1_TITLE
OLORTITLECOLORPOC0
nazF0
do mF1
mohouF4
likeF6
eroF7
1CurF0PRG
****F1PRG
**F4_JM
OLORF4PRG
**TISKPRG
OCF7_JM
unkcF7PRG
ptyF9PRG
nt F9KEY
do F9KEY1
thF10_JM
F10PRG
RAMECEK
sNAZEVT
KLICO
koKLNAZ
oSPACEBAR
wTR_HL1
TR_HL2
TR_HL3
or TR_HL4
TR_HL5
leaTR_HL6
0,6TR_HL7
m,2TR_HL8
0,6TR_HL9
DET_JM
lorENTER
b/DETAIL
DETPRG
t PS_LINE
PS_RETURN
PS_ZAZN
dyQRIIS
+COBD
ORCDRUH
zW_OBDOBI
ORMOD_PSV
CCvyr
prava dat pro hodnocen
roby ...
FILTERz
AND
c_obr
copy to c_sql for &filt
c_sql
c_sql.dbf
CCvyr
soubor !
Hodnocen
roby dle skl.a v
RIIS 7.5
mod91f
soucty_m
Identifikace
CCvyr.ident
CCvyr.ident
CCvyr.nazev
CCvyr.nazev
Mno
str(CCvyr.mnoz,12,3)
CCvyr. mnoz
V
roba/K
str(CCvyr.vyrobaKC,14,2)
CCvyr.vyrobaKC
V
roba/Kg
str(CCvyr.vyrobaKg,14,2)
CCvyr.vyrobaKg
Odv
str(CCvyr.odvadKC,14,2)
CCvyr.odvadKC
Odv
str(CCvyr.odvadKg,14,2)
CCvyr.odvadKg
Lomy/K
str(CCvyr.lomyKC,14,2)
CCvyr.lomyKC
Lomy/Kg
str(CCvyr.lomyKg,14,2)
CCvyr.lomyKg
Vratky/K
str(CCvyr.vratkyKC,14,2)
CCvyr.vratkyKC
Vratky/Kg
str(CCvyr.vratkyKg,14,2)
CCvyr.vratkyKg
del ccvyr.*
del cs1.*
CCVYR
IDENT
ODVADKC
ODVADKG
(LOMYKC
r(LOMYKG
VRATKYKC
VRATKYKG
VYROBAKC
DVYROBAKG
RNAZEV
RMNOZ
RADYC_OBR
r(skZAZ
n(iMESS
oFILT1
+1FILT2
i)FILT
naDRUHOBR
CELKEM
HMOT_CELK
SKUT_MNOZ
ouC_SQL
M1_IDENT
HLASKA
POLEX
PROCX
rRTOP
dn(CLEFT
motCRIGHT
+1FREEZE
ORDER
ot.HOR
Y_BOLEVA
mot_PRAVA
)"NADPIS
_BAJMENO
zaPSOUC
zeTITLE
OLORTITLECOLORPOC0
OLORF0
LECOLORF1
nazF2
do mF3
mohouF7
likeF9
eroF10
!dF0PRG
1CurF1PRG
F4_JM
****F4PRG
**TISKPRG
ORF7_JM
**F7PRG
OCF9PRG
unkcF9KEY
ptyF9KEY1
nt F10_JM
do F10PRG
thRAMECEK
RIIS
NAZEVT
KLICO
sKLNAZ
SPACEBAR
oTR_HL1
oTR_HL2
wTR_HL3
TR_HL4
TR_HL5
or TR_HL6
TR_HL7
leaTR_HL8
0,6TR_HL9
m,2DET_JM
0,6ENTER
DETAIL
lorDETPRG
b/PS_LINE
PS_RETURN
PS_ZAZN
QRIIS
dyCDRUH
+W_OBDOBI
ORMOD_PSV
Celkov
Esc,^End
roba : K
Kg
: K
Kg
Lomy : K
Kg
Vratky : K
Kg
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
W_SCR
W_REC
VYROBAKC
VYROBAKG
(ODVADKC
r(ODVADKG
LOMYKC
LOMYKG
VRATKYKC
DVRATKYKG
RSUMVYRKC
RSUMVYRKG
YSUMODVKC
kSUMODVKG
SUMLOMKC
iSUMLOMKG
oSUMVRAKC
1SUMVRAKG
Celkov
Esc,^End
roba : K
Kg
: K
Kg
Lomy : K
Kg
Vratky : K
Kg
99 999 999.999
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
999 999 999.99
W_SCR
W_REC
VYROBAKC
VYROBAKG
(ODVADKC
r(ODVADKG
LOMYKC
LOMYKG
VRATKYKC
DVRATKYKG
RMNOZ
RSUMVYRKC
YSUMVYRKG
kSUMODVKC
SUMODVKG
iSUMLOMKC
oSUMLOMKG
1SUMVRAKC
)SUMVRAKG
aSUMMNOZ
m_param
ehled obrat
V obdob
od (mm/rrrr) do (mm/rrrr)
Nespr
zadan
obdob
(obdob
Od: > Do:).
Nespr
zadan
obdob
(chybn
Prob
r obrat
pro odv
, lomy a vratky ...
m1_obr_a
obdobi
m1_obr
W_SCRROK
M_PARAM
W_AKT
TER_UZAV
(W_AKTMES
(W_AKTROK
W_AKTOBD
W_ODMES
W_ODROK
DW_DOMES
RW_DOROK
RW_ESC
YW_ODOBD
kW_DOOBD
HLASKA
iMESS
oM1_OBR_A
1OBDOBI
MESIC
M1_OBR
MOD91F
%
FUNKCE
SUMASTRVR
SUMASTRED
SUMAVRSTR
SUMAVYRRAD
@
DISPLAY_BA
DISPLAY_BO
SUMASTRVYR
SUMASKLVYR
SUMAVYR
SOUCTY
w_do!
SOUCTY_M
SEL_DAT
X:\OBEC\09\
MOD91F.FXP
X:\OBEC\09\MOD91F.PRG