home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD612E.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-01-15
|
7KB
|
193 lines
m_param
m6_zam
m6_rod
m6_sazby
c_odp
Prob
r dat ...
mod62c1
c_odp
RIIS 6.1
ehled da
ch pom
stnanc
Zadejte: Osob.
hledej1 in mod612d
Detail
zobr_det
mod612e
m6_zam.prijmeni
m6_zam.prijmeni
no
m6_zam.jmeno
m6_zam.jmeno
m6_zam.ucetni
m6_zam.ucetni
m6_zam.str
m6_zam.str
iif(c_odp.odpocet>0,str(c_odp.odpocet,7,0),space(7))
c_odp.odpocet
ti-odp
iif(c_odp.poc_det_da>0,' '+str(c_odp.poc_det_da,2),space(8))
c_odp.poc_det_da
Prohl
str(pro_m_od,2)+'/'+str(pro_r_od,4)+'-'+str(pro_m_do,2)+'/'+str(pro_r_do,4)
prohlas
Nezd.z
str(une_m_od,2)+'/'+str(une_r_od,4)+'-'+str(une_m_do,2)+'/'+str(une_r_do,4)
upl_nezd
Stud.
str(ust_m_od,2)+'/'+str(ust_r_od,4)+'-'+str(ust_m_do,2)+'/'+str(ust_r_do,4)
upl_stud
str(uci_m_od,2)+'/'+str(uci_r_od,4)+'-'+str(uci_m_do,2)+'/'+str(uci_r_do,4)
upl_cid
str(upi_m_od,2)+'/'+str(upi_r_od,4)+'-'+str(upi_m_do,2)+'/'+str(upi_r_do,4)
upl_pid
str(uzt_m_od,2)+'/'+str(uzt_r_od,4)+'-'+str(uzt_m_do,2)+'/'+str(uzt_r_do,4)
upl_ztpp
Prohl
' '+prohlas+' '
prohlas
Nezd.z
' '+upl_nezd+' '
upl_nezd
Stud.
' '+upl_stud+' '
upl_stud
' '+upl_cid+' '
upl_cid
' '+upl_pid+' '
upl_pid
' '+upl_ztpp+' '
upl_ztpp
Odp.man.
' '+odpoc_man+' '
odpoc_man
Man.ZTPP
' '+man_ztpp+' '
man_ztpp
j.man.-da
' '+str(roc_pri_ma,9,2)
roc_pri_ma
Odp.d
' '+odpoc_duch+' '
odpoc_duch
' '+str(roc_duchod,9,2)
roc_duchod
j.ost.
str(prijem_ost,9,2)
prijem_ost
Sponzor
str(sponzor,9,2)
sponzor
Dat.akt.
tran(dat_akt,'@E')
dat_akt
Autor
autor
autor
Aktual
aktual
aktual
M_PARAM
zaPOLE6
'DatW_ODPDAN
eP609
nM6_ZAM
,'@OSC
hodn(M6_ROD
_akM6_SAZBY
iC_ODP
l(i)ODPOCET
POC_DET_DAOBR_S
hMESS
= "ST_ZAZ
iW_PROHLAS
W_NEZD
ktuW_STUD
no(W_PID
aktuW_CID
dn(iW_ZTPP
tuaW_ODP
o moW_DETI_ODPDAN_ODPOC
MOD62C1
POLEX
ODPPROCX
dataRTOP
*RBOT
*****CLEFT
****CRIGHT
***FREEZE
***ORDER
****HOR
roceduDOL
br_detLEVA
screPRAVA
br_sNADPIS
lorZAHL
JMENO
ay pHODN
setSOUC
to wPSOUC
,0 cTITLE
6,7TITLECOLORPOC0
ith oF0
.f. in F1
re screF3
rom obrF4
return
*******F7
*******F9
*******F10
******F0PRG
****F1ON
proceF1PRG
F4_JM
er tF4PRG
or =TISKPRG
,'F7_JM
seF7PRG
to F9PRG
12,F9KEY
(txtF9KEY1
leaF10_JM
(79F10PRG
)+3RAMECEK
,(RIIS
(txt)NAZEVT
16KLICO
n(txKLNAZ
douSPACEBAR
(TR_HL1
xt)TR_HL2
txtTR_HL3
lorTR_HL4
TR_HL5
**TR_HL6
***TR_HL7
***TR_HL8
***TR_HL9
***DET_JM
***ENTER
DETAIL
DETPRG
PS_LINE
PS_RETURN
PS_ZAZN
MOD_PSV
OBSAH
mod6_lib
OBR_S
PS_LINE
zaZOBR_SOC1
eMOD6_LIB
colora
set color to &color
COLOR
zaZOBR_DET
n jmen
X:\OBEC\06\
MOD612E.FXP
X:\OBEC\06\MOD612E.PRG