home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD617W.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-11-23
|
9KB
|
178 lines
selDELEJ
use ~
RIIS 6.7
Zadejte rok :
Chybn
roku
a6_mzdy
a6_mzd
m6_prnes
cis_nes
Kalend
fond
Neodprac. dny S+N
Nominalni fond
dovolen
iteln
fond
Odprac. dny celkem
I. sm
na
II. sm
na
III. sm
na
Neodpracovane dny
Nemoc,
raz
Paragraf
Pracovn
raz
Absence
Odprac.hodiny celkem
c6_mzdy
Ozn_Rad
Prob
r dat ...
c6_mzdy
fondu pracovn
doby za rok F
RIIS 6.2
mod617w
str(Ozn_Rad,2)
str(Ozn_Rad,2)
Nazev
Nazev
Leden
str(Mes1,10,2)
str(Mes2,10,2)
str(Mes3,10,2)
I. - III.
str(Kvar1,12,2)
Kvar1
Duben
str(Mes4,10,2)
Kv
str(Mes5,10,2)
erven
str(Mes6,10,2)
I. - VI.
str(Kvar2,12,2)
Kvar2
ervenec
str(Mes7,10,2)
Srpen
str(Mes8,10,2)
Z
str(Mes9,10,2)
I. - IX.
str(Kvar3,12,2)
Kvar3
str(Mes10,10,2)
Mes10
Listopad
str(Mes11,10,2)
Mes11
Prosinec
str(Mes12,10,2)
Mes12
I. - XII.
str(Kvar4,12,2)
Kvar4
POM_ROK
elW_RR_N
e HLASKA
exMOD_SYS
oA6_MZDY
taROK
ek
A6_MZD
colOSC
uM6_PRNES
CIS_NES
e SUMMES
C6_MZDY
r OZN_RAD
adNAZEV
cuTYP
MES1
eadkeMES2
or rMES3
()=26MES4
clMES5
MES6
eturnMES7
pom_MES9
MES10
hlaMES11
h 'CMES12
nKVAR1
KVAR2
KVAR3
KVAR4
M_ROK
POCET
sys POCETC
PROCENTA
aID_ORG
ectDRUH_POMERMESIC
ERKATEGORIE
6_VLOZ
oTYP_MZDY
DOKLAD
pDRUH_DNP
mMFOR
POLEX
o FREEZE
SumRAMECEK
) NAZEVT
RTOP
mMes(RBOT
= "NCLEFT
. dnCRIGHT
es( 3,1F2
"NominF3
fond F4
SumMF6
4,13) =F7
dovF9
DETAIL
s( DET_JM
"PoENTER
foPROCX
SF9KEY
6,13ZAHL
dpracJMENO
elkeHODN
SumMMOD_PSV
colora
set color to &color
elCOLOR
pom_Sum = Mes&pom_Mes
repl Mes&pom_Mes with pom_Sum + a6_Mzdy.Hodiny
repl Mes&pom_Mes with pom_Sum + a6_Mzdy.Ka_Dny
POM_RADEK
POM_MES
e POM_CO
exPOM_SUM
C6_MZDY
POM_RADEK
POM_MES
e POM_CO
exSUMMES
A6_MZDY
KA_DNY
HODINY
POCET
POCETC
e POC
DELEJ
VLOZ2
PROCENTA
W:\06\
MOD617W.FXP
W:\06\MOD617W.PRG