home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD62M.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-02-04
|
18KB
|
456 lines
RIIS 6.2
stikaMOD62MX
Mzdov
edisko :
Zadejte st
edisko :
edisko
R e k a p i t u l a c e m e z d
R e k a p i t u l a c e m e z d -
RIIS 6.2
Detail
mod62md
mod62m
Zadejte druh mzdy :
m6_dm
druh_pomer
druh_pomer
zev druhu mzdy
m6_dm.nazev
m6_dm.nazev
str(cnt,5)
righ(tran(castka,'@Z'),11)
castka
Z
righ(tran(zaklad-odpocet,'@Z'),10)
zaklad-odpocet
Z
righ(tran(zaklad,'@Z'),10)
zaklad
Kusy
righ(tran(kusy,'@Z'),14)
Hodiny
righ(tran(hodiny,'@Z'),9)
hodiny
Pr.dny
righ(tran(pr_dny,'@Z'),8)
pr_dny
Kal.dny
righ(tran(ka_dny,'@Z'),8)
ka_dny
Dny kr.
' '+righ(tran(kr_dny,'@Z'),7)
kr_dny
Dny NN
' '+righ(tran(nn_dny,'@Z'),7)
nn_dny
Nhod
righ(tran(nhod,'@Z'),11)
W_UCETNI
aSTRED
doID_ORG
(w_POLEX
'RAMECEK
k1POM_TEXT
rNAZEVT
+RIIS
rRTOP
&&RBOT
CLEFT
ase CRIGHT
aceFREEZE
strF1
space(4F2
d emptyF3
nazF6
'StatisF9
mezd -DETAIL
allDET_JM
ed2ENTER
PROCX
w_meF9KEY
/'+sOBRREK
1,4VYBER_ZAZ
M6_DM
)+'/DM
r(w_rokC6_REKAP
lDRUH_POMERZAHL
strJMENO
e(4)HODN
red2I
4) aMOD_PSV
Dle osobn
Dle mzdov
, os.
Dle M
ediska, os.
Kumulovan
za st
ediska
Konec
do zobr_pop with 'OSC'
do zobr_pop with 'MU_OSC'
do zobr_pop with 'MU_STR'
do zobr_pop with 'STR'
deactivate popup vol_det
ID_ORG
aZOBR_DETDMVOL_DET
TYP_ZOB
aVOL_DET
DMZOBR_KSTR
ZOBR_DETDM
c6_str
R e k a p i t u l a c e m e z d
R e k a p i t u l a c e m e z d -
stka
RIIS 6.2
mod62m
Zadejte osobn
righ(tran(castka,'@Z'),9)
castka
Hodiny
righ(tran(hodiny,'@Z'),6)
hodiny
Pr.dny
righ(tran(pr_dny,'@Z'),6)
pr_dny
Kal.dny
righ(tran(ka_dny,'@Z'),7)
ka_dny
righ(tran(zaklad,'@Z'),9)
zaklad
Odpo
righ(tran(odp_dan,'@Z'),9)
odp_dan
Nhod
righ(tran(nhod,'@Z'),11)
Kusy
righ(tran(kusy,'@Z'),12)
DETMZDY
aMOD_SYS
DMC6_STR
_DETDMCASTKA
k1PR_DNY
rKA_DNY
+HODINY
rZAKLAD
&&ODP_DAN
ase KUSY
aceM6_MZDY
trC6_REKAP
d emptyDRUH_POMERSTR_PREV
RW_STRN
tisSTR_ZAM
-M6_ZAM
d2W_UCETNI
UCETNI
_meSTRED
sPS_LINE
,4POLEX
PROCX
)+'/RTOP
w_rokRBOT
lCLEFT
OMERCRIGHT
strFREEZE
(4)ORDER
red2HOR
4) aDOL
w_LEVA
PRAVA
zevtNADPIS
tikZAHL
- stJMENO
ltriHODN
d)+',SOUC
'+sPSOUC
s1,2TITLE
tr(wTITLECOLORPOC0
w_mesF0
+'/'+stF1
rok2,4)F2
hlavicF3
cF4
stred#sF6
(4) andF7
ed2#spaF9
) and eF10
w_katsF0PRG
F1ON
t='StF1PRG
a meF4_JM
. 'F4PRG
m(stTISKPRG
alF7_JM
tredF7PRG
bd. F9PRG
_mesF9KEY
'+stF9KEY1
,4)F10_JM
(w_F10PRG
'/'RAMECEK
k2RIIS
& hlaNAZEVT
KLICO
streKLNAZ
(4) SPACEBAR
=TR_HL1
anTR_HL2
(w_TR_HL3
TR_HL4
evtTR_HL5
TR_HL6
TR_HL7
TR_HL8
_ TR_HL9
_ _DET_JM
_ ENTER
_ _DETAIL
_ DETPRG
_ _PS_RETURN
PS_ZAZN
_POM_TEXT
M6_DM
_NAZEV
_ _LCNT
MOD_PSV
c6_mzdy
c6_mzdy
c6_mzdy
xc6_mzdy
MU_OSC
xc6_mzdy
MU_STR
xc6_mzdy
MU_STR
MU_OSC
R e k a p i t u l a c e m e z d
R e k a p i t u l a c e m e z d -
stka
RIIS 6.2
mod62m
Zadejte osobn
MU_OSC
MU_STR
m6_zam.ucetni
m6_zam.ucetni
MU_STR
m6_zam.str
m6_zam.str
m6_zam.prijmeni
m6_zam.prijmeni
m6_zam.jmeno
m6_zam.jmeno
righ(tran(castka,'@Z'),9)
castka
rucni_zm
rucni_zm
Hodiny
righ(tran(hodiny,'@Z'),6)
hodiny
Pr.dny
righ(tran(pr_dny,'@Z'),6)
pr_dny
Kal.dny
righ(tran(ka_dny,'@Z'),7)
ka_dny
righ(tran(mes_f,'@Z'),6)
mes_f
righ(tran(zaklad,'@Z'),9)
zaklad
Dluh sr
righ(tran(dluh_sraz,'@Z'),9)
dluh_sraz
righ(tran(poc_deti,'@Z'),5)
poc_deti
Odpo
righ(tran(odp_dan,'@Z'),9)
odp_dan
Datum od
tran(od,'@E')
Datum do
tran(do,'@E')
Dny NN
' '+righ(tran(nn_dny,'@Z'),5)
nn_dny
Sazba
righ(tran(sazba,'@Z'),7)
sazba
zakazka
zakazka
Postup
postup
postup
operace+' '
operace
Pracov
pracov
pracov
Doklad
doklad
doklad
str_op
str_op
str_prev
str_prev
trida
trida
stupen
stupen
' '+pp
Nhod
righ(tran(nhod,'@Z'),11)
Kusy
righ(tran(kusy,'@Z'),12)
Ident. dokladu
ident_dokl
ident_dokl
Dny kr.
' '+righ(tran(kr_dny,'@Z'),5)
kr_dny
' '+righ(tran(rd_zustat,'@Z'),6)
rd_zustat
no
jmeno
jmeno
W_TYP_ZOB
DETMZDY
DMMOD_SYS
M6_MZDY
DMC6_REKAP
rDRUH_POMERC6_MZDY
rSTR_PREV
RW_STRN
STR_ZAM
e M6_ZAM
trW_UCETNI
4UCETNI
ptySTRED
RPOLE_MZDY
XC6_MZDY
PS_LINE
lPOLEX
d2PROCX
_meRBOT
sCLEFT
,4CRIGHT
FREEZE
+'/ORDER
_rokHOR
OMERLEVA
strPRAVA
(4)NADPIS
ed2ZAHL
4) aJMENO
w_HODN
SOUC
zevtPSOUC
tikTITLE
- stTITLECOLORPOC0
d)+',F0
'+sF1
s1,2F2
tr(wF3
LECOLORF4
w_mesF6
+'/'+stF7
rok2,4)F9
hlavicF10
cF0PRG
ed#sF1ON
) andF1PRG
#spaF4_JM
nd eF4PRG
katsTISKPRG
F7_JM
='StF7PRG
a meF9PRG
. 'F9KEY
m(stF9KEY1
alF10_JM
redF10PRG
d. RAMECEK
esRIIS
'+stNAZEVT
,4)KLICO
(w_KLNAZ
'/'SPACEBAR
2TR_HL1
hlaTR_HL2
TR_HL3
treTR_HL4
4) TR_HL5
=TR_HL6
anTR_HL7
(w_TR_HL8
TR_HL9
evtDET_JM
ENTER
DETAIL
DETPRG
_ PS_RETURN
PS_ZAZN
_ POM_TEXT
M6_DM
NAZEV
_ _CNT
CASTKA
MOD_PSV
colora
set color to &color
P_ZOB
COLOR
DMOBR
colora
set color to &color
P_ZOB
COLOR
c6_rekap
m6_zam
m6_mzdy
Prob
r dat ...
VYBER
MOD_SYS
DMC6_REKAP
STR_PREV
_PREV
1DRUH_POMERSKUP_PRAC
rHODINY
RCASTKA
PR_DNY
e KA_DNY
eKR_DNY
trNN_DNY
4NHOD
ptyZAKLAD
RODPOCET
M6_ZAM
MEROSC
d2M6_MZDY
_mePOCET
sPOCETC
,4W_STRN
STR_ZAM
'/W_UCETNI
kUCETNI
lPROCENTA
RSTRED
strODP_DAN
POCET
POCETC
DMPOC
MMOD62MX
MOD62MD
ZOBR_POP
ZOBR_KSTR
ZOBR_DETDM
HLASKA
case
VYBER_ZAZ
PROCENTA
W:\06\
MOD62M.FXP
W:\06\MOD62M.PRG