home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD65A.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-01-26
|
33KB
|
804 lines
MOD65AX
P r
m
r y zam
stnanc
RIIS 6.2
tisk_proc
hledej1 in mod612d
Detail
detail
zmen_prum
mod65a
Zadejte osobn
slo :
m_param
m6_fzar
m6_muo
m6_prum
m6_zam
m6_mzd
m6_zam.prijmeni
m6_zam.prijmeni
m6_zam.jmeno
m6_zam.jmeno
m6_zam.evid_stav
m6_zam.evid_stav
druh_pomer
druh_pomer
m6_zam.ucetni
m6_zam.ucetni
PP.hod.
str(m6_mzd.prum_hod,7,2)
m6_mzd.prum_hod
Pr.hod.
str(m6_prum.prum_hod,7,2)
m6_prum.prum_hod
' '+m6_prum.r_zmena_h+' '
m6_prum.r_zmena_h
Autor H
m6_prum.autor_h
m6_prum.autor_h
Aktual.H
tran(m6_prum.datum_h,'@E')
m6_prum.datum_h
P.d. VZ
str(m6_mzd.prum_den,7,2)
m6_mzd.prum_den
Den.VZ
str(m6_prum.prum_den,7,2)
m6_prum.prum_den
' '+iif(m6_prum.pouziti_pr,'A',' ')+' '
m6_prum.pouziti_pr
' '+m6_prum.r_zmena_d+' '
m6_prum.r_zmena_d
Autor D
m6_prum.autor_d
m6_prum.autor_d
Aktual.D
tran(m6_prum.datum_d,'@E')
m6_prum.datum_d
m6_fzar.str
m6_fzar.str
m6_zam.evid_stav
m6_zam.evid_stav
m6_mzd.kategorie+' '
m6_mzd.kategorie
m6_mzd.forma_mzd+' '
m6_mzd.forma_mzd
ID_ORG
POLEX
RAMECEK
yeNAZEVT
_meRIIS
w_q1RTOP
w_RBOT
ear(wCLEFT
CRIGHT
= 4FREEZE
0 =F1
r(w_zacF2
nlist(mF4
(w_zac_F4PRG
8,9)F6
w_q2 =F7
w_r2F9
ear(w_zF9PRG
F10
F10_JM
= yF10PRG
c_mDETAIL
w_qDET_JM
wENTER
ear(PROCX
F9KEY
nlisM_PARAM
_zW_PODNIK
,FIRMA
M6_FZAR
2 = yeM6_MUO
_meUZIV
w_q1M6_PRUM
w_M6_ZAM
r(wM6_MZD
DRUH_POMERZAHL
ERJMENO
_zacHODN
endcI
PS_RETURN
MOD_PSV
Detailn
hodnoty
voj pr
stnance
Mzdov
list
Konec
mod6_lib
mod6_lib
za rok:
Chybn
zadan
mod6_lib
M6_MZD
VOLBA
OBR_P
yeVOLBA1
_mePS_LINE
q1ZOBR_DET
_ZOBR_PRUM
M6_ZAM
= 4DRUH_POMERMOD6_LIB
cZOBR_MZD1
W_ROK
RHLASKA
ac_ZOBR_ML
stnanec nem
uvedeno
slo mzdov
slo mzdov
stnance nem
te opr
stnanec nem
r dosud vypo
Detail hodnot pro v
et pr
kvart
Mzda
Odm
Hodiny
Dny
VZ-soc.
Kal.dny
Leden
Duben
erven
ervenec
Srpen
Listopad
Prosinec
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
Minul
kvart
Mzda
Odm
Hodiny
Dny
VZ-soc.
Kal.dny
Leden
Duben
erven
ervenec
Srpen
Listopad
Prosinec
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
Konec
- Esc
M6_ZAM
UCETNI
ID_ORG
yeHLASKA
_meM6_MUO
q1MM_AUTOR
_M6_MZD
M6_PRUM
4DRUH_POMEROBRP
cPS_LINE
KVARTAL
RMZDA1
c_HODINY1
9)DNY1
=MZDA_ND1
2KAL_DNY1
zMZDA2
HODINY2
= yMZDA_ND2
mKAL_DNY2
qMZDA3
wHODINY3
r(DNY3
MZDA_ND3
sKAL_DNY3
zODM1
colora
set color to &color
COLOR
stnanec nem
uvedeno
slo mzdov
slo mzdov
stnance nem
te opr
daji b
ho kvart
lu pracuje jin
ivatel
daji minul
ho kvart
lu pracuje jin
ivatel
M6_ZAM
UCETNI
ID_ORG
yeHLASKA
_meM6_MUO
q1MM_AUTOR
_M6_MZD
W1_MZD1
W1_HOD1
4W1_DNY1
ERW1_ND1
cW1_KAL1
W1_MZD2
RW1_HOD2
c_W1_DNY2
9)W1_ND2
=W1_KAL2
2W1_MZD3
zW1_HOD3
W1_DNY3
W1_ND3
= yW1_KAL3
mW1_ODMK
qW2_MZD1
wW2_HOD1
r(W2_DNY1
W2_ND1
sW2_KAL1
zW2_MZD2
,W2_HOD2
ERW2_DNY2
W2_ND2
yeW2_KAL2
meW2_MZD3
q1W2_HOD3
w_W2_DNY3
(wW2_ND3
W2_KAL3
ERW2_ODMK
ERW1_VETA
acW2_VETA
dcW1_KVARTALW2_KVARTALS_PRUM_HODS_DENNI_VZW_PRUM_HODW_DENNI_VZZMENA_PRUMZMENA_DET1ZMENA_DET2OBR_PR
ET2PS_LINE
M6_PRUM
t(OSC
,'DRUH_POMERW_ZAC_MES
Q_SOUC
_POMERW_RR_N
)KVARTAL
PRUM_HOD
P_PRUM_HODPRUM_DEN
DP_PRUM_DENMZDA1
NHODINY1
SKDNY1
seMZDA_ND1
oKAL_DNY1
aMZDA2
avHODINY2
*eDNY2
MZDA_ND2
=KAL_DNY2
bMZDA3
iHODINY3
DNY3
MZDA_ND3
KAL_DNY3
returnQ3
*******Q4
*******Q5
*******Q6
*******Q7
*******Q8
proceduQ9
isk_pruQ10
creatQ11
le c6_Q12
(str cQ13
osc c(Q14
druh_pQ15
c(2), Q16
prum_Q17
n(7,2)Q18
m_den2Q19
2), mzQ20
(9,2),Q21
hodQ22
n(9,2)Q23
1 n(6,Q24
zda_ndQ25
,2), kQ26
y1 n(6Q27
Q28
hod1 nQ29
, prumQ30
n(7,2Q31
da0 n(Q32
Q33
ny0 n(Q34
dny0 POCETQ
mzdKONEC
(9,2HOR
l_dny0DOL
KONTROLA
ruh_X
er tag oR
* Z
e inlistT
nth(w_zaQ
es),1,2,A
w_q2Y
w_MENU1
ar(wHLAV1
ZMENY
Aktualizace pr
Hodinov
vym. z
kvart
Mzda
Odm
Hodiny
Dny
VZ-soc.
Kal.dny
Leden
Duben
erven
ervenec
Srpen
Listopad
Prosinec
Minul
kvart
Mzda
Odm
Hodiny
Dny
VZ-soc.
Kal.dny
Leden
Duben
erven
ervenec
Srpen
Listopad
Prosinec
WTEXT
W1_KVARTALW2_VETA
ALW2_KVARTAL
9999.99
9999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
W_PRUM_HODW_DENNI_VZW1_MZD1
ALW1_HOD1
ALW1_DNY1
ALW1_ND1
_W1_KAL1
W1_MZD2
W1_HOD2
4W1_DNY2
ERW1_ND2
cW1_KAL2
W1_MZD3
RW1_HOD3
c_W1_DNY3
9)W1_ND3
=W1_KAL3
2W1_ODMK
zW2_VETA
W2_MZD1
W2_HOD1
yW2_DNY1
mW2_ND1
qW2_KAL1
wW2_MZD2
r(W2_HOD2
W2_DNY2
sW2_ND2
zW2_KAL2
,W2_MZD3
ERW2_HOD3
W2_DNY3
yeW2_ND3
meW2_KAL3
q1W2_ODMK
@ 7,40 &vloz w_prum_hod pict '9999.99'
@ 7,71 &vloz w_denni_vz pict '9999.99'
@ 9,18 &vloz w1_mzd1 pict '999999.99'
@ 9,28 &vloz w1_odmk pict '999999.99'
@ 9,38 &vloz w1_hod1 pict '999999.99'
@ 9,48 &vloz w1_dny1 pict '999999.99'
@ 9,59 &vloz w1_nd1 pict '999999.99'
@ 9,69 &vloz w1_kal1 pict '999999.99'
@ 10,18 &vloz w1_mzd2 pict '999999.99'
@ 10,38 &vloz w1_hod2 pict '999999.99'
@ 10,48 &vloz w1_dny2 pict '999999.99'
@ 10,59 &vloz w1_nd2 pict '999999.99'
@ 10,69 &vloz w1_kal2 pict '999999.99'
@ 11,18 &vloz w1_mzd3 pict '999999.99'
@ 11,38 &vloz w1_hod3 pict '999999.99'
@ 11,48 &vloz w1_dny3 pict '999999.99'
@ 11,59 &vloz w1_nd3 pict '999999.99'
@ 11,69 &vloz w1_kal3 pict '999999.99'
@ 16,18 &vloz w2_mzd1 pict '999999.99'
@ 16,28 &vloz w2_odmk pict '999999.99'
@ 16,38 &vloz w2_hod1 pict '999999.99'
@ 16,48 &vloz w2_dny1 pict '999999.99'
@ 16,59 &vloz w2_nd1 pict '999999.99'
@ 16,69 &vloz w2_kal1 pict '999999.99'
@ 17,18 &vloz w2_mzd2 pict '999999.99'
@ 17,38 &vloz w2_hod2 pict '999999.99'
@ 17,48 &vloz w2_dny2 pict '999999.99'
@ 17,59 &vloz w2_nd2 pict '999999.99'
@ 17,69 &vloz w2_kal2 pict '999999.99'
@ 18,18 &vloz w2_mzd3 pict '999999.99'
@ 18,38 &vloz w2_hod3 pict '999999.99'
@ 18,48 &vloz w2_dny3 pict '999999.99'
@ 18,59 &vloz w2_nd3 pict '999999.99'
@ 18,69 &vloz w2_kal3 pict '999999.99'
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
999999.99
M_HODQ
DENNI_VZQ1
ALZMENA_PRUMQ2
NA_PRUMZMENA_DET1Q4
NA_DET1Q6
NA_DET1Q7
NA_DET1Q8
NA_DET1Q9
NA_DET1Q10
A_DET1Q11
A_DET1Q12
A_DET1Q13
A_DET1Q14
A_DET1Q15
A_DET1Q16
A_DET1Q17
A_DET1Q18
A_DET1Q19
A_DET1PREP_PRUM
ZMENA_DET2Q20
A_DET2Q22
A_DET2Q23
A_DET2Q24
A_DET2Q25
A_DET2Q26
A_DET2Q27
A_DET2Q28
A_DET2Q29
A_DET2Q30
A_DET2Q31
A_DET2Q32
A_DET2Q33
A_DET2Q34
A_DET2W1_MZD1
T2W1_MZD2
ALW1_MZD3
ALW1_ODMK
ODW1_HOD1
VZW1_HOD2
ODW1_HOD3
VZW1_DNY1
UMW1_DNY2
T1W1_DNY3
T2W1_ND1
ET2W1_ND2
W1_ND3
t(W1_KAL1
,'W1_KAL2
ERW1_KAL3
W2_VETA
*W2_MZD1
ERW2_MZD2
)W2_MZD3
W2_ODMK
W2_HOD1
ODW2_HOD2
DW2_HOD3
ENW2_DNY1
NW2_DNY2
SKW2_DNY3
seW2_ND1
oW2_ND2
aW2_ND3
avW2_KAL1
*eW2_KAL2
W2_KAL3
W2_KAL1
ODW2_KAL2
VZW2_KAL3
ALW_DENNI_VZW2_ND1
_VZW2_ND2
RUMW2_ND3
ET1W2_HOD1
W2_HOD2
T1W2_HOD3
T1W_PRUM_HODW2_MZD1
ODW2_MZD2
T1W2_MZD3
T1W2_ODMK
T1PROC1
do Proc&y
do Zmen&y with 'get'
do Zmen&y with 'say'
it pr
ci beze zm
n? (a/N)
KONEC
_KAL2
_KAL3
DENNI_VZDOL
RUMHOR
_HOD2
PRUM_HODOBR1
_MZD3
T1POCETQ
T1ZMENA_PRUMZMENA_DET1ZMENA_DET2POM
DET1KONTROLA
KONTROLA
DZAPIS1
M6_PRUM
DZMENA_DET1W1_VETA
ALMZDA1
I_VZW1_MZD1
VZHODINY1
UMW1_HOD1
T1DNY1
W1_DNY1
T1MZDA_ND1
1W1_ND1
HODKAL_DNY1
DW1_KAL1
T1MZDA2
T1W1_MZD2
T1HODINY2
UMW1_HOD2
T1DNY2
_DET2W1_DNY2
T1MZDA_ND2
1W1_ND2
1KAL_DNY2
1W1_KAL2
T1MZDA3
W1_MZD3
T2HODINY3
W1_HOD3
T2DNY3
_DET2W1_DNY3
T2MZDA_ND3
2W1_ND3
ET2KAL_DNY3
2W1_KAL3
T2ODM1
_DET2W1_ODMK
T2ZMENA_PRUMZMENA_DET2W_PRUM_HODS_PRUM_HODPRUM_HOD
2R_ZMENA_H
DATUM_H
ALAUTOR_H
ALMM_AUTOR
DW_DENNI_VZS_DENNI_VZPRUM_DEN
ZR_ZMENA_D
DATUM_D
T1AUTOR_D
T2W2_VETA
T2W2_MZD1
W2_HOD1
t(W2_DNY1
,'W2_ND1
RW2_KAL1
W2_MZD2
*W2_HOD2
ERW2_DNY2
)W2_ND2
W2_KAL2
W2_MZD3
ODW2_HOD3
DW2_DNY3
ENW2_ND3
NW2_KAL3
KW2_ODMK
Konec
- Esc,^End
mod_lib
Tisk pr
Tisk p
ehledu
Konec
mod_psv
ST_ZAZ
DP_SETUP
T1P_RESET
ALP_6LPI
_VZP_8LPI
VZP_10CPI
UMP_12CPI
T1P_16CPI
P_20CPI
T1P_BOLDON
1P_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
1P_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
T2P_SUBOFF
1P_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
T1P_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
2MOD_LIB
_DNY3
2W_TISK
T2TISK_PRUM
T2MOD_PSV
UMM6_MZD
ET2OSC
HODM6_ZAM
HODDRUH_POMERM6_PRUM
M6_FZAR
c6_prum
mod_lib
Prob
tisk ...
mod_lib
mod65a
mod65a
C6_PRUM
T1OSC
ALDRUH_POMERPRUM_HOD2
PRUM_DEN2
MZDA1
T1HODINY1
T1MZDA_ND1
1KAL_DNY1
PRUM_HOD1
PRUM_DEN1
MZDA0
1HODINY0
MZDA_ND0
FKAL_DNY0
2W_ZAC_MES
T_OFFW_Q1
T1W_Q0
M6_MZD
M6_FZAR
M6_PRUM
ERPRUM_HOD
PRUM_DEN
MZDA2
ERMZDA3
2ODM1
T2MZDA_ND2
MZDA_ND3
2HODINY2
UMHODINY3
T2DNY2
ODDNY3
ODKAL_DNY2
RKAL_DNY3
M6_ZAM
MERW_TISK
ALNASTAV_PRNMOD_LIB
VZOBRT
_VZMESS
ZNASTAV_REPMOD65A
colora
set color to &color
DCOLOR
T1MOD65AX
DETAIL
ZOBR_DET
HLASKA
ZMEN_PRUM
HLAV1
PROC1
ZMEN1
PREP_PRUM
ZMENY
KONTROLA
ZAPIS1
MENU1
TISK_PROC
TISK_PRUM
W:\06\
MOD65A.FXP
W:\06\MOD65A.PRG