home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
MOD68H.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1996-12-16
|
10KB
|
220 lines
MOD68HX
Definice mzdov
ho listu
RIIS 6.7
Funkce
prg_fun
prg_akt
mod68h
Zadejte
slo typu mzdy :
m6_mlt
radek
m6_typm
cislo
m6_typ
' '+str(radek,4)
radek
Hodnota
' '+hodnota+' '
hodnota
' '+str(radkovani,1)
radkovani
' '+soucet+' '
soucet
' '+str(del,2)
' '+iif(des>0,str(des,1),' ')
POLEX
RAMECEK
NAZEVT
ARRTOP
CLEFT
CRIGHT
FREEZE
_KOEFF3
RIFF4
TARF6
MKAF9
F10_JM
F10PRG
DETAIL
LORDET_JM
6ENTER
PROCX
RF9KEY
M6_MLT
RADEK
4M6_TYPM
CCISLO
M6_TYP
VJMENO
MOD_PSV
c6_typm+
c6_typm
et nebyl nalezen
ehled z
dku mzdov
ho listu
mod68c
typ_mzdy
typ_mzdy
m6_typ.text
m6_typ.text
PS_LINE
M6_TYPM
M6_MLT
ARCISLO
C6_TYPM
TYP_MZDY
M6_TYP
HLASKA
POLEX
PROCX
KOEFRTOP
RIFRBOT
TARCLEFT
CRIGHT
MKAFREEZE
ORDER
JMENO
LORTITLE
6TITLECOLORF1
DETAIL
VF1PRG
F4_JM
F4PRG
F7_JM
F7PRG
F9KEY
CF10_JM
F10PRG
DET_JM
DETPRG
VRAMECEK
NAZEVT
TISKPRG
PS_RETURN
ENTER
MOD_PSV
OPRAVA
PS_RETURN
W_POLE
RIIS 6.8
imu v
ru nelze prov
t opravy z
imu t
nelze prov
t opravy z
set color to b/w
set color to bg/n
set color to w+/bg
set color to b/bg,w+/rb
set color to w+/b
set color to w/n
&barvau
CPODMV
_RETURN
M_MAZANI
CPODMS
ARANSI
W_POLE
JMENO_C
WJMENO_C
RADEK_C
SLOUPEC_C
KOEFQ1
RIFQ2
TARQ3
MKAQ5
LORQ10
ECOLORQ12
CISELNIK
CPOCET
VCOUNT
ZAKAZNIK
POMOC
SKPRG
ETURN
KONTROLA
BARVAS
BARVAR
BARVAZ
C2BARVAU
BARVAN
BARVAH
BARVA
W_ZMEN
PORADI
STPKONEC
ROSTS
_PROS
OSTSU
AL_PROS
DM_REZ
ZMENY
&barva
Aktualizace definice mzdov
ho listu
s. hodnot
Celkov
lka pole
et desetinn
W_POLE
@ 13,45 &vloz w_pole(1) picture '9999'
@ 14,45 &vloz w_pole(3) picture '@X'
@ 15,45 &vloz w_pole(5) picture '9'
@ 16,45 &vloz w_pole(6) picture '!'
@ 17,45 &vloz w_pole(7) picture '99'
@ 18,45 &vloz w_pole(8) picture '9'
W_POLE
ARW_ZMEN
do proc&y
do zmen&y with 'get'
do zmen&y with 'say'
it pr
ci beze zm
n? (a/N)
KONEC
ARDOL
DEK_C
PEC_C
KOEFQ
RIFPOCET
TARW_ZMEN
MKAK_UDAJU
W_POLE
dku mzdov
ho listu mus
t vypln
Chybn
vypln
Chybn
vypln
s. hodnot
Chybn
vypln
lka polo
W_POLE
HLASKA
colora
set color to &color
COLOR
-
- ^End,Esc
Pohyb
Konec
MOD68HX
PRG_FUN
PRG_AKT
OPRAVA
PORADI
PROC1
ZMEN1
ZMENY
K_UDAJU
HLASKA
G:\OBEC\06\
MOD68H.FXP
G:\OBEC\06\MOD68H.PRG