home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
06
/
06268.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-08-13
|
6KB
|
180 lines
06212x
a6_odmj
m6_odmj
m6_zam
a6_zam
c6_odmj
mod6_lib
...
c6_odmj
v odv
RIIS 6.9
06268
Zadejte
slo v
konu :
Detail
fun_det
zakazka
zakazka
poznamka
poznamka
Hodiny
' '+str(hodiny,7,2)
hodiny
K
' '+str(castka,9,2)
castka
Normohodiny
' '+str(nhod,7,2)
am.uceMOD_SYS
tnW_ARCHIV
mA6_ODMJ
_uOSC
) whilM6_ODMJ
=cM6_ZAM
kaA6_ZAM
lecC6_ODMJ
6_ZAKAZKA
inPOZNAMKA
HODINY
sCASTKA
ionNHOD
c intKUSY
seW_UCETNI
STAN_UC
toMOD6_LIB
_ODMJ
olPOCET
+/bgPOCETC
leaUCETNI
@PROCENTA
sPOLEX
-FREEZE
larLEVA
omennPRAVA
rekHOR
nim voDOL
------RAMECEK
poNAZEVT
,RIIS
botNADPIS
crPROCX
reezF1
e zahl,F3
no, hodF4
ivate tF6
, titleF9KEY
ps_lF9
privateDETAIL
3,fDET_JM
f9,ENTER
e f1pJMENO
jm, HODN
f7_jI
g, fMOD_PSV
_jOBSAH
rg, p
zakazka
c6_det
c6_det
xc_rec
ehled d
lensk
ch mezd
Detail odv
konu: F
, pozn
mka:
RIIS 6.2
06268
Zadejte den
' '+str(den,2)
Hodiny
str(hodiny,7,2)
hodiny
Kusy
str(kusy,7)
Doklad
doklad
doklad
operace+' '
operace
iif(eof('m6_zam'), a6_zam.prijmeni,m6_zam.prijmeni)
iif(eof('m6_zam'), a6_zam.prijmeni,m6_zam.prijmeni)
iif(eof('m6_zam'), a6_zam.jmeno,m6_zam.jmeno)
iif(eof('m6_zam'), a6_zam.jmeno,m6_zam.jmeno)
str_prev+' '
str_prev
druh_pomer
druh_pomer
' '+alg
Dat.akt.
tran(dat_akt,'@E')
dat_akt
Autor
autor
autor
Aktual.
aktual
aktual
DET_OBR
ceM6_ODMJ
tnZAKAZKA
mC6_ODMJ
_uOSC
ilM6_ZAM
=cA6_ZAM
kaC6_DET
lecPOZNAMKA
_UCETNI
nW_UCETNI
sXC_REC
ionPS_LINE
ntPOLEX
sePROCX
RTOP
toRBOT
dCLEFT
olCRIGHT
/bgFREEZE
leaORDER
@ZAHL
sJMENO
-HODN
larTITLE
mennTITLECOLORF1
------F3
botF7
crF9
reezF10
prDETAIL
hl,F1PRG
hodF4_JM
te tF4PRG
itleF7_JM
ps_lF7PRG
vateF9KEY
3,fF10_JM
f9,F10PRG
DET_JM
f1pDETPRG
m, RAMECEK
_jNAZEVT
, fRIIS
MOD_PSV
etPS_RETURN
colora
set color to &color
ceCOLOR
POCET
cePOCETC
tnPOC
_u06212x
FUN_DET
ay ps_
PROCENTA
W:\06\
06268.FXP
W:\06\06268.PRG