home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
05
/
MOD58I.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1997-11-14
|
7KB
|
196 lines
m_param
m5_komp
m5_plan
zakazka
m1_ident
ident
m1_zas
x1_zas
m1_um
sklad
m1_ident
ident
v4_sklad
x4_sklad
m1_plan
x1_plan
RIIS 5.1
Zadejte sklad :
@!XXXX
Sklad neexistuje
r dat ...
M_PARAM
p.W_PODNIK
FIRMA
zM5_KOMP
zM5_PLAN
y'ZAKAZKA
)=M1_IDENT
nIDENT
hodnM1_ZAS
ideX1_ZAS
M1_UM
zSKLAD
'JakPOLOZKY
oV4_SKLAD
eX4_SKLAD
"M1_PLAN
='X1_PLAN
.jANSI
W_SKLAD
ahHLASKA
eMOD_SYS
o(MOD58IX
novan
dej - kumulace
novan
dej pro sklad F
- kumulace
RIIS 5.1
tisk_pl
mod58i
Zadejte term
n zah
m5_komp
m1_zas
m1_plan
c5_komp
m5_komp
m1_zas
m1_plan
c5_komp
zakazka
xc5_komp
Nebyla nalezena
c5_komp.ident_ko
c5_komp.ident_ko
zev polo
m1_ident.nazev
m1_ident.nazev
Jakost
m1_ident.jak_csn
m1_iident.jak_csn
trans(c5_komp.ter_ov,'@E')
c5_komp.ter_ov
str(a.kusy_de,7)
a.kusy_de
a.rozmer
a.rozmer
Mno
str(a.mno_vys,12,3)
a.mno_vys
c5_komp.zakazka
c5_komp.zakazka
c5_komp.cpol
c5_komp.cpol
Rozpiska
m5_komp.ident
m5_komp.ident
zev rozpisky
polozky.nazev
polozky.nazev
Pl.mno
str(m5_plan.mno_pl,12,3)
m5_plan.mno_pl
K v
str(m5_plan.mno_pl-m5_plan.mno_ov-m5_plan.mno_zm,12,3)
m5_plan.mno_pl-m5_plan.mno_ov-m5_plan.mno_zm
trans(m5_plan.ter_ov,'@E')
m5_plan.ter_ov
M5_komp.d1op
m5_komp.d1op
m1_zas.skl_hlavni
m1_zas.skl_hlavni
POLEX
p.RAMECEK
W_SKLAD
zNAZEVT
zRIIS
y'RTOP
)=RBOT
nCLEFT
hodnCRIGHT
ideFREEZE
'JakF3
SKLAD
eF4PRG
.jPROCX
F9KEY
ahM5_KOMP
eZAKAZKA
o(CPOL
(cIDENT
r_TER_OV
IDENT_KO
_oM1_ZAS
=i+SKL_HLAVNIM1_PLAN
"sMNO_VYS
_dKUM_VYDEJ
TV_ZAK
i=C5_KOMP
(iM1_IDENT
M5_PLAN
"POLOZKY
SKL_HL_UM
M1_UM
XC5_KOMP
IHLASKA
MZAHL
jJMENO
="stHODN
_vysI
hoMOD_PSV
p.OBR
POCET
p.POCETC
mod_lib
mod_lib
Prob
tisk ...
mod58i
P_SETUP
p.P_RESET
P_6LPI
zP_8LPI
zP_10CPI
y'P_12CPI
)=P_16CPI
nP_20CPI
dnP_BOLDON
eP_BOLDOFF
P_ULINEON
P_ULINEOFFP_ITALON
oP_ITALOFF
P_SUPERON
P_SUPEROFFP_SUBON
.jP_SUBOFF
P_DBST_ON
P_DBST_OFFP_LETRQUALP_DRAFT
(cP_COMP_OFFP_WIDT_ON
P_WIDT_OFFP_HEIG_ON
P_HEIG_OFFP_NEWPAGE
P_KODY
MOD_LIB
"sZAZT
_dW_TISK
NASTAV_PRNOBRT
i=MESS
(iMOD58I
colora
set color to &color
p.COLOR
colora
set color to &color
p.COLOR
MOD58IX
HLASKA
----6
PROCENTA
TISK_PL
TISK_PL
HLASKA
erialu
X:\OBEC\05\
MOD58I.FXP
X:\OBEC\05\MOD58I.PRG