home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
05
/
MOD59J.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-03-31
|
14KB
|
347 lines
century
RIIS 5.9
m5_hspar
FFFFF$
FFFFF$
Zadejte v
Obdob
/ /
/ /
mod59f
Prob
prava dat ...
m1_ident
ident
m12_tz
oz_zme
m12_tk
oz_kval
m12_zkd
zprava
m5_hsvyr
hlaseni
m5_hsvyr
p_vady
m5_hsvyr
m12_zkd
m5_hsvyr
m12_zkd
smeny
TRIDNIK
MNOKON
MNOOV
c_vyr
c_vyr.
c_vyr.
c_vyr.
replace &w_nazp1 with (&w_nazp1 + vady.mnoz_kon), &w_nazp2 with (&w_nazp2 + vady.mno_ov), &w_nazp3 with (&w_nazp3 + vady.mno_ov/vady.mnoz_kon*100)
replace all mnokon&kk with pom_mnozk
mod59f
Nebyla vybr
data.
|....
Sumace
sumace
tridniky
Detail
sledky sm
n dle t
vad od
sledky sm
n dle t
jak. od
RIIS 5.9
mod59j
tridnik+' '
tridnik
Mn. kon.-F
,12,3)
Mn. zm.-F
Mn. vyh.-F
,12,3)
% zm.-F
% vyh-F
,7,2)
Mn. kon.-celk
,13,3)
Mn. zm.-celk
,13,3)
% zmetk
% vyhov.
' '+str((
)*100,7,2)
zev t
m12_tz.text
m12_tz.text
m12_tk.text
m12_tk.text
SET_CENT
SET_NEAR
oOBR1
M5_HSPAR
DEN_DO
W_MOD
W_MDO
W_DATOD
qoDEN_OD
W_DATDO
W_DATOPR
W_NDOD
W_NDDO
MOD_SYS
MOD59F
M1_IDENT
IDENT
M12_TZ
OZ_ZME
M12_TK
OZ_KVAL
M12_ZKD
ZPRAVA
mdiM5_HSVYR
HLASENI
SMENA
sMNOZ_KON
WHMOT_JEDN
P_VADY
QSTAT
KONTROLA
MNO_OV
TRIDNIK
(VADY
SMENY
W_MAXSME
W_SKUSME
W_NSME
pW_TAB
W_NAZSME
W_POS
C_VYR
W_NAZP1
&pW_NAZP2
>W_NAZP3
\ePOM_MNOZK
_MNOZK
HLASKA
POLEX
&ptPROCX
/U RTOP
modCLEFT
KOCRIGHT
FREEZE
ORDER
W_ADRLEVA
PRAVA
NADPIS
JMENO
WSOUC
W_PSOUC
PODTITLE
W_CSTITLECOLORPOC0
OD_LIF0
F0PRG
qF1PRG
F4_JM
F4PRG
TISKPRG
F7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
F10PRG
RAMECEK
NAZEVT
KLICO
KLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
TR_HL4
TR_HL5
TR_HL6
TR_HL7
TR_HL8
TR_HL9
DET_JM
ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
POM_JM1
POM_JM2
MOD_PSV
colorz
sz(pom)= sz(pom)+mnoov&pomsk
sumaov=sumaov+mnoov&pomsk
sk(pom)= sk(pom)+mnokon&pomsk
sumak=sumak+mnokon&pomsk
double
Celkov
Esc,^End
RIIS 12.3
na Mn. kontr. Mn. zmetk
% zmetk
na Mn. kontr. Mn. vyhov. % vyhov.
Celkem:
99,999,999.999
99,999,999.999
9,999.99
999,999,999.999
999,999,999.999
9,999.99
SCRQ1
MOD_SYS
oC_VYR
VETARECNO
M_COL
qoSUMAK
SUMAOV
ATOPR
POCET
W_POS
W_NSME
POMSK
K_RAD
MOD_WIN
QSTAT
ZPETRECNO
mod59f
Prob
prava dat ...
m5_hsvyr
m12_zkd
c1_hsvyr
m5_hsvyr
m12_zkd
c1_hsvyr
mod59f
Nebyla vybr
data.
Nezkontr.
prehl_nzk
sum_zpr
Detail
sledky sm
n dle t
vad od
sledky sm
n dle t
jak. od
RIIS 5.9
mod59j
. zpr
zprava
zprava
hlaseni
hlaseni
Linka
linka
linka
Ident
ident
ident
Hmotnost
str(hmot_jedn,10,3)
hmot_jedn
str(radek,3)
radek
char+' '
Mno
str(mno_ov,12,3)
mno_ov
Uzn. k zapl.
str(mno_uz,12,3)
mno_uz
m1_ident.nazev
m1_ident.nazev
PS_LINE
oMOD_SYS
MOD59F
W_TRIDNIK
C_VYR
TRIDNIK
qoQSTAT
M5_HSVYR
HLASENI
IDENT
LINKA
HMOT_JEDN
M12_ZKD
C1_HSVYR
W_DATOD
W_DATDO
ZPRAVA
KONTROLA
M12_TZ
M12_TK
M1_IDENT
HLASKA
POLEX
sPROCX
WRTOP
CLEFT
CRIGHT
FREEZE
ORDER
PRAVA
NADPIS
JMENO
pHODN
PSOUC
TITLE
TITLECOLORPOC0
_MNOZK
_MNOZK
&ptF7
/U F9
modF0PRG
KOF1ON
F1PRG
F4_JM
F4PRG
TISKPRG
DRF7_JM
F7PRG
F9PRG
F9KEY
F9KEY1
F10_JM
WF10PRG
W_RAMECEK
ODRIIS
W_CSNAZEVT
LORKLICO
D_LIKLNAZ
SPACEBAR
TR_HL1
TR_HL2
TR_HL3
ATR_HL4
TR_HL5
ATR_HL6
TR_HL7
TR_HL8
TR_HL9
qDET_JM
ENTER
DETAIL
DETPRG
PS_RETURN
PS_ZAZN
W_NDOD
W_NDDO
MOD_PSV
MOD59J
SUMACE
VETARECNO
ZPETRECNO
TRIDNIKY
J:\RIIS\OBEC\05\
MOD59J.FXP
J:\RIIS\OBEC\05\MOD59J.PRG