home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
04
/
MOD43B.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-09-21
|
7KB
|
222 lines
v4_skl_z
x4_skl_z
w_volf
e c e n
polo
ky skladu :
RIIS 4.3
mod_proc
v4_sklad
x4_sklad
Sklad neexistuje
mod_proc
VYROBA
EXPEDICE
MATERIAL
Nepovolen
druh skladu
v4_skl_z
x4_skl_z
Pro zadan
sklad nem
te opr
mod_proc
m_param
m1_obr
ident
m1_ident
ident
m1_kalk
x1_kalk
m1_kalks
x1_kalks
m1_um
ident
mod4_lib
RIIS 4.3
Ve sklad
nedo
lo k p
polo
polo
ky s k l a d u :
RIIS 4.3
Zadejte
slo polo
soucetKc
Sumace
Detail
zobr_det
mod43b
ident
ident
um_skl+' '
um_skl
Star
cena
str(st_cena,11,2)
st_cena
celkem
str(round(st_cena*stav,2),11,2)
round(st_cena*stav,2)
Nov
cena
str(no_cena,11,2)
no_cena
celkem
str( round(no_cena*stav,2),11,2)
round(no_cena*stav,2)
rozd
str((no_cena-st_cena)*stav,11,2)
(no_cena-st_cena)*stav
zev polo
m1_ident.nazev
m1_ident.nazev
m1_ident.mj
m1_ident.mj
Datum
tran(datum,'@E')
datum
kod_ob
kod_ob
V4_SKL_Z
X4_SKL_Z
PRIHLAS
M_SKLAD
SKLAD
W_VOL
oZOBR_SKL
mMOD_PROC
V4_SKLAD
X4_SKLAD
_W_TYP_SKL
DRUH_SKL
eHLASKA
ifW_MODUL
lMOD_SYS
'POC_CHYB
eM_PARAM
w_POLE4
= .fW_PRUMER
wW_OCEN_EXPPOLE2
f W_OCEN_VYRPOLE5
str(M1_OBR
,1)IDENT
_vyrOBR
bstr(pM1_IDENT
M1_KALK
usX1_KALK
orKALK
ent aM1_KALKS
eX1_KALKS
KALKS
t orM1_UM
useVYBER_PRECMOD4_LIB
C_PREC
alkPOLEX
uPROCX
alksRTOP
x1_kRBOT
lias CLEFT
elecCRIGHT
m1_FREEZE
idORDER
as uHOR
vyberDOL
with LEVA
d, w_PRAVA
in NADPIS
sZAHL
or toJMENO
1,2 HODN
IIS 4SOUC
lect PSOUC
if wTITLE
TITLECOLORPOC0
r(999F0
99-recnF1
tag idF2
ex on iF4
tag idF6
endif F7
F10
aska wF0PRG
sklF1ON
loF1PRG
nF4_JM
pF4PRG
TISKPRG
F7_JM
centF7PRG
F9PRG
endiF9KEY
elatF9KEY1
denF10_JM
1_iF10PRG
toRAMECEK
E RIIS
ProcNAZEVT
RBKLICO
PKLNAZ
CRigSPACEBAR
,TR_HL1
horTR_HL2
evaTR_HL3
naTR_HL4
VATTR_HL5
jmeTR_HL6
, sTR_HL7
TR_HL8
TitTR_HL9
eCoDET_JM
PENTER
f0,fDETAIL
f4,DETPRG
,f1PS_LINE
fPS_RETURN
PS_ZAZN
tMOD_PSV
colora
set color to &color
_SKL_Z
COLOR
FILTERz
AND
colorz
double
Celkem
Celkem - v
Esc,^End
cena: K
cena: K
l: K
sum all round(st_cena*stav,2), round(no_cena*stav,2), no_cena*stav-st_cena*stav to s_st_cena, s_no_cena, s_rozdil for &filt
RIIS 4.3
999,999,999,999.99
999,999,999,999.99
999,999,999,999.99
SCRQ1
MOD_SYS
FILT1
FILT2
oVETARECNO
M_COL
MOD_WIN
ST_CENA
_STAV
NO_CENA
eS_ST_CENA
S_NO_CENA
S_ROZDIL
w_ZPETRECNO
MOD43B
*sta%
HLASKA
na*s=
SOUCETKC
VETARECNO
ZPETRECNO
Z:\NAST\
MOD43B.FXP
Z:\NAST\MOD43B.PRG