home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
04
/
MOD41A_1.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-04-02
|
19KB
|
422 lines
1 to OPRAVA1
23W_POLE
m1_ident
ident
m1_zas
x1_zas
m1_kalk
x1_kalk
m1_plan
x1_plan
m1_pozid
x1_pozid
m_dat
x_dat
m_cis1
x_cis1
v4_sklad
x4_sklad
v1_str
x1_str
RIIS 4.1
Aktualizace
skladov
polo
MATERIAL
mod_proc
inlist(kod_pol,'M','N','T','U','X','Y','Z')
VYROBA
mod_proc
inlist(kod_pol,'F','P','S','A','B','C','R','V','I','O')
EXPEDICE
mod_proc
MATERIAL
VYROBA
EXPEDICE
Chybn
nastaven
prom
w_modul
MATERIAL
MNTUXYZ
ka existuje, k
d polo
ky =
VYROBA
FPSABCRVI
ka existuje, k
d polo
ky =
znam
znam
vrat
Konec
Nastala chyba vyhledavani.
Opravdu zru
it tento z
znam? (a/N)
m1_um
ident
modify command
W_AKT
to JMENO_C
23WJMENO_C
nRADEK_C
,1SLOUPEC_C
23,42ANSI
M1_IDENT
yIDENT
sM1_ZAS
toX1_ZAS
23,M1_KALK
EsX1_KALK
18M1_PLAN
meX1_PLAN
,PM1_POZID
X1_POZID
'M_DAT
nX_DAT
3,63M_CIS1
X_CIS1
V4_SKLAD
!X4_SKLAD
*V1_STR
***X1_STR
***W_POLE
*NOVY_Z
***CISLOP
***M_SCR
eduW_NAZEV
seW_MJ
r to W_MODUL
0 ZOBR_POL
4MOD_PROC
KOD_POL
@23,1KOD_KALK
TV_ZAK
hr(HR_DEN
+chZZ
@ 2TXT
HLASKA
OPRAVA2
say ' ZRUSIT
nd,KONTR_RUS
w+/POM
3,1 sM1_UM
m1_obr
ident
Pro tuto polo
ku existuj
skladov
obraty - nelze zru
Pro tuto polo
ku existuje nenulov
soba - nelze zru
m1_kusov
inverze
Tato polo
ka vstupuje do rozpisky F
- nelze zru
M1_OBR
to IDENT
23CISLOP
,1HLASKA
M1_IDENT
2M1_ZAS
ZASOBA
yM1_KUSOV
sINVERZE
toZRUSIT
znam
o polo
ce nen
stupn
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
set color to w+/w
&barva
&barvau
M1_IDENT
3HLASKA
nW_POLE
IDENT
KUSOV
18Q10
meQ11
,PQ12
3,63Q16
***Q21
***Q22
***CISELNIK
eduDOL
sePOCET
to DOP1
0 DOP2
COUNT
oZAKAZNIK
1POMOC
hr(RAD
+chSL
@ 2POC
BARVAS
BARVAR
3BARVAZ
' BARVAU
nd,BARVAN
BARVAH
w+/BARVAD
sBARVA
aMENU
dBARVA1
3,6BARVA2
onePORADI
etuKONEC
****I
******X
********R
******Z
******U
********T
ZMENY
M_MAZANI
&barva1
kladn
daje polo
&barva2
Se.id:
Ex.id:
SKP :
Akt. : -
Autor:
Post.:
WTEXT
W_POLE
@ 4,9 &vloz w_pole(4) pict '@X'
@ 4,40 &vloz w_pole(3) pict '!'
@ 4,48 &vloz w_pole(5) pict '!!!'
@ 5,9 &vloz w_pole(9) pict '@X'
@ 6,9 &vloz w_pole(13) pict '@X'
@ 7,9 &vloz w_pole(17) pict '@X'
@ 5,36 &vloz w_pole(11) pict '@X'
@ 6,36 &vloz w_pole(12) pict '@X'
@ 7,36 &vloz w_pole(8) pict '@X'
@ 6,60 &vloz w_pole(7) pict '@X'
@ 6,75 &vloz w_pole(16) pict '@X'
@ 7,60 &vloz w_pole(6) pict '@!X'
3W_POLE
nMM_AUTOR
do proc&y
do zmen&y with 'get'
FoxProFl
do zmen&y with 'say'
prostredi
mod41a_1
sobovac
daje
novac
daje
kladov
daje
Dopl
text
Konec
Typ n
TYP_NAKL
pnakl
MNTUXYZ
Pro materi
l je mo
no nav
t pouze typ 'KU'
Klobouky
Typ textu:
TYP_TX
typ_p
prostredi
&barvau
it pr
ci beze zm
n? (a/N)
KONEC
_AUTOR
KUSOV
,OBR1
meK_UDAJU
,POK_C
DOPLN_ZZ
nPROSTREDI
BARVA1
BARVAR
BARVA2
!BARVAD
*PORADI
***PROC1
***VOLBA
*OBR2
***PROCX
*M1_IDENT
uMOD41A1
eMOD41A2
o PNAKL
0 JMENO_C
4WJMENO_C
MOD_C2
oRADEK_C
1SLOUPEC_C
MOD_C1
hr(W_POLE
+chTXT
@ 2HLASKA
PODNIK
MOD41A31
3MOD41A32
TYP_P
nd,MOD41A4
TREDI
POCET
sPOM
NOVY_Z
aM1_PLAN
dCISLOP
,6M1_ZAS
oneM1_KALK
tuIDENT
**M1_POZID
*ZAPIS_AKT
MNTUXYZ
FPSABCOJKG
M1_PLAN
W_POLE
3M1_IDENT
KOD_POL
w_pole(3)
MNTUXYZ
MATERIAL
Lze nav
t pouze k
d polo
ky M,N,T,U,X,Y,Z.
FPSABCRVI
VYROBA
Lze nav
t pouze k
d polo
ky F,P,S,A,B,C,R,V,I.
MJ
w_pole(5)
JMENO_C
WJMENO_C
3MOD_C2
nOK_C
1RADEK_C
SLOUPEC_C
MOD_C1
KUSOV
sW_POLE
toW_MODUL
EsHLASKA
colora
set color to &color
COLOR
M5_AKT.DBF2
M5_AKT
ident
m5_akt
ident
m5_akt
select &sel
X_IDENT
X_DS
nM5_AKT
1IDENT
ZAVRI
DUVOD
nazev
MNTUXYZ
detailn
znamy neexistuj
material
set color to &barva
w+/bg
w+/bg
w+/bg
material
Vyhled
Zadejte n
zev nebo identifikaci polo
nazev
material
material
HMEZ
3DMEZ
nLMEZ
1PMEZ
M1_IDENT
NAZEV
KOD_POL
sHLASKA
toMATERIAL
,M1_OBR
18RAM6
HELP6
,PRAD
STREC
'BARVA
nSAYRAD6
CISLOP
IDENT
!STZAZ
*KLIC
***W_CESTINA
*UPPERCS
ehled p o l o
e k
zev polo
Identifikace
Jakost
set color to &barx
BARX
3NAZEV
nIDENT
KOD_POL
ROZM_CSN
JAK_CSN
Konec
Pohyb
Enter
-Home,End,PgUp,PgDn,
-Vyhled
r polo
-
- F10
- ^End,Esc
Pohyb
Konec -
OPRAVA1
KONTR_RUS
OPRAVA2
PORADI
PROC1
atecnF
ZMEN1
y pro
ZMENY
----d
DOPLN_ZZ
K_UDAJU
HLASKA
ZAPIS_AKT
ZOBR_POL
------
SAYRAD6
HELP6
-----
MOD42?
W:\04\
MOD41A_1.FXP
W:\04\MOD41A_1.PRG