home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD62IE.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-05-06
|
7KB
|
144 lines
MOD62IEX
m6_srazk
u6_mzdy
m6_zam
m4_organ
m6_srazu
cis_spuc
if !file('&f_adr\data\z6_vypl.dbf')
use &f_adr\data\z6_vypl order prijmeni
evodn
kazy - Z6_VYPL.DBF
RIIS 6.2
hledej1
Tvorba
generuj
Detail
mod62fd
mod62ie
Zadejte p
prijmeni
prijmeni
str(cisprac,5)
cisprac
skup_prac
skup_prac
ucet1
ucet1
ucet2
ucet2
stka p.
str(castkap,10)
castkap
str(castka,10)
castka
str(pu,2)
M6_SRAZK
mU6_MZDY
M6_ZAM
suM4_ORGAN
et,1,lM6_SRAZU
CIS_SPUC
=GENERUJ
6_POLEX
cet,RAMECEK
NAZEVT
RIIS
se m6RTOP
.zp_pRBOT
CLEFT
seleCRIGHT
azuFREEZE
sF1
m6_srazF2
s_spuc
loF4
at('/'F6
srazu.uF7
F9
f lomr>F9PRG
F10
uc1 = F10_JM
.ucF10PRG
DETAIL
d =DET_JM
m6_ENTER
cet,PROCX
F9KEY
elsZ6_VYPL
ZAHL
= JMENO
k.ucHODN
I
od =MOD_PSV
colorz
Vyhled
Zadejte p
stnance
prijmeni
stnanec nebyl nalezen
MCOLOR
mKLIC
CPODMV
suCPODMS
aPRIJMENI
lCSNC
HLASKA
POCET
POCETC
if file('&f_adr\data\z6_vypl.dbf')
use &f_adr\data\z6_vypl order prijmeni excl
use &f_adr\data\z6_vypl order prijmeni
create dbf &f_adr\data\z6_vypl (cisprac n(5), skup_prac C(1), str c(4), ucet1 c(20), ucet2 c(20), ks c(10), castkap n(10), castka n(10), prijmeni c(20), kod c(4), pu n(2))
Tvorba souboru Z6_VYPL.DBF ...
H 998
m6_srazk,
z6_vypl
H 850
m6_srazk,
z6_vypl
Z6_VYPL
mPRIJMENI
W_KC1
uW_KC2
lMOD_SYS
=POC_CHYB
_M6_ZAM
et,POCET
POCETC
M6_SRAZK
pDR_SRAZ
POZAST_SR
M4_ORGAN
sZAVOD
zU6_MZDY
oUCET
'W_UC1
zu.uW_KOD
ZP_PLATS
>M6_SRAZU
CIS_SPUC
LOMR
.ucSPEC_S
W_UC2
d =VAR_S
_CISPRAC
t,SKUP_PRAC
elsUCET1
UCET2
k.ucCASTKAP
CASTKA
d =KOD
JMENO
TITUL
otTYP_ORG
VYSE_SRAZ
PROCENTA
kMOD62IEX
HLEDEJ1
PROCENTA
GENERUJ
X:\OBEC\06\
MOD62IE.FXP
X:\OBEC\06\MOD62IE.PRG