home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
04
/
S411.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1999-04-15
|
41KB
|
825 lines
m_param
m5_plan
m1_ident
ident
m1_plan
x1_plan
m1_zas
x1_zas
m1_um
ident
v4_sklad
x4_sklad
m4_dodm
ident
m5_dnp
zakazka
v1_str
x1_str
RIIS 5.1
Zadejte z
sobovac
skupinu :
@!XXXX
r dat ...
m5_plan
c5_plan
m5_plan
c5_plan
m5_plan
c5_plan
m5_plan
c5_plan
zakazka
c5_plan
termin
Nebyla nalezena
M_PARAM
ozW_DIL_KOOPDILNA_KOOPM5_PLAN
& M1_IDENT
lIDENT
l=0 M1_PLAN
X1_PLAN
c M1_ZAS
X1_ZAS
M1_UM
pocV4_SKLAD
X4_SKLAD
*M4_DODM
**M5_DNP
ZAKAZKA
etV1_STR
o bX1_STR
ANSI
&& W_ZS
MOD_SYS
seW_MODUL
o TER_UV
TYP_OBJ
&&STAV
rameC5_PLAN
ndKMD
azTERMIN
rCPOL
' HLASKA
S411X
Operativn
ZAJISTENOST
Kontrola uvoln
ch zak
hledov
Operativn
kupu ZS
ZAJISTENOST
Kontrola uvoln
ch zak
hledov
kupu ZS
RIIS 5.1
f9prg
Detail
detail
zmen_prg
Zadejte
slo zak
zky:
trans(c5_plan->ter_uv,'@E')
c5_plan->ter_uv
c5_plan->zakazka+' '
c5_plan->zakazka
' '+a.stav+' '
a.stav
a.rz+' '
trans(a.ter_ov,'@E')
a.ter_ov
ka
a.ident
a.ident
zev polo
m1_ident.nazev
m1_ident.nazev
m1_ident.typ
m1_ident.typ
K dod
str(a.mno_pl-a.mno_ov-a.mno_zm,12,3)
a.mno_pl-a.mno_ov-a.mno_zm
Pl.mno
str(a.mno_pl,12,3)
a.mno_pl
Dod
str(a.mno_ov,12,3)
a.mno_ov
Vadn
str(a.mno_zm,12,3)
a.mno_zm
m5_dnp.ico
m5_dnp.ico
m5_dnp.zavod
m5_dnp.zavod
Mater.obj.
m5_dnp.mat_obj
m5_dnp.mat_obj
str(m5_dnp.por_obj,3)
m5_dnp.por_obj
Skl.
' '+a.sklad
a.sklad
a.kmd
a.kmd
a.poznamka
a.poznamka
Uvoln
tran(a.dat_u,'@E')
a.dat_u
POLEX
ozOBSAHX
OOPRAMECEK
OPW_ZS
& W_MODUL
lNAZEVT
=0 RIIS
RTOP
c RBOT
CLEFT
CRIGHT
pocFREEZE
SKLAD
o bF7
F9
&& F9PRG
seF10_JM
o F10PRG
DETAIL
&&DET_JM
ameENTER
ndPROCX
azF9KEY
rZAHL
' JMENO
HODN
enovI
au='MOD_PSV
COLORa
Vyhled
prob
podle jednoho z kl
Vyhled
Zadejte term
n zah
slo zak
zky :
. . #
9999999999
. .
set color to &_col
. .
termin
zka s t
mto term
nem zah
neexistuje
zakazka
zka neexistuje
RIIS 4.1
set color to &_col
ozSTZAZ
OOPW_CISLO
OPW_TERMIN
RKEY
lPS_RETURN
TERMIN
CPODMV
c CPODMS
HLASKA
pocZAKAZKA
m5_akt
ident
m_kal
datum
m4_organ
m4_pobj
objed
znam n
zky nen
stupn
RIIS 5.1
Aktualizace
zky:
modify command
m_kal
datum
PS_RETURN
OBR_ZM
OOPM5_AKT
OPIDENT
M_KAL
lDATUM
M4_ORGAN
c M4_POBJ
OBJED
M5_PLAN
ocTXT
HLASKA
C5_PLAN
**JMENO_C
WJMENO_C
tRADEK_C
bSLOUPEC_C
&& ANSI
W_POLE
seNOVY_Z
o INDIK
ZAKAZKA
&&OPRAVA2
M5_DNP,
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
W_POLE
M5_DNP
OOPM4_ORGAN
ZAVOD
lM4_POBJ
MAT_OBJ
POR_OBJ
c ZRUS
W_ZMEN
ENO_C
UPEC_C
&& Q10
seQ12
o Q13
Q14
&&Q15
meQ16
ndQ17
azQ18
' Q20
Q21
enovQ22
au='Q23
tCISELNIK
DOL
eny udPOCET
rvanDOP1
colorDOP2
/b' POR
COUNT
dpisZAKAZNIK
bPOMOC
yt -Y
barRAD
set coSL
to w/n'POC
BARVAS
barBARVAR
bBARVAZ
et BARVAU
w+BARVAN
BARVAH
& bBARVAD
vicBARVA
***KS
***M5_PLAN
**MENU
baBARVA1
BARVA2
---PORADI
---KONEC
----I
------X
--------R
selectU
_plan
a=barvasQ
-------A
--------ZMENY
----5
&barva1
kladn
daje o n
&barva2
n dod
n zah
novan
dodan
vadn
k dod
zev organizace
Objedn
Potvrzeno
WTEXT
-
- ^PgDn
- ^Home
- F10
- ^End,Esc
Pohyb
Konec
99999999.999
99999999.999
99999999.999
99999999.999
W_POLE
M1_IDENT
PNAZEV
PM4_ORGAN
M5_PLAN
lNAZEV_ORG
M4_POBJ
DATUM_PD
DATUM_PO
@ 4,32 &vloz w_pole(1) picture '@!X'
ka neexistuje
MNTUXYZ
Nedovolen
typ polo
@ 6,19 &vloz w_pole(6) picture '@!X'
Chybn
stav zak
zky (povoleno P,S,U)
Chybn
stav zak
zky (povoleno S,U)
Chybn
stav zak
zky (povoleno U)
@ 7,19 &vloz w_pole(2) picture '@E'
n dod
v pl
novac
m kalend
@ 8,19 &vloz w_pole(3) picture '@E'
n zah
v pl
novac
m kalend
@ 9,19 &vloz w_pole(25) picture '@!X'
@ 6,66 &vloz w_pole(12) picture '99999999.999'
novan
nulov
nebo men
odveden
99999999.999
@ 13,2 &vloz w_pole(26) picture '@!X'
@ 13,16 &vloz w_pole(27) picture '@!X'
_IDENT
PM1_IDENT
W_POLE
lNAZEV
HLASKA
KOD_POL
M5_PLAN
M4_DODM
**ICO
ZAVOD
bM_KAL
& M1_PLAN
sePOC_DNU
o PR_DOBA
PRIP_CAS
&VYR_DOBA
eDOD_DOBA
dDATUM
M4_ORGAN
vNAZEV_ORG
tW_ZMEN
Dodavatel
polo
Organizace
Konec
nazev
&barvau
90000001
M5_DNP,
it pr
ci beze zm
n? (a/N)
KONEC
NOVY_Z
PPOCET
IDENT
ocW_POLE
_DODM
bHOR
_PLAN
C_DNU
o PROC1
OBR1
&ZMEN1
_DOBA
dOBR_UD
azBARVA1
rBARVAR
' BARVA2
BARVAD
vPORADI
VOLBA
tM4_DODM
ZOBR_DOD
M4_ORGAN
dNAZEV
nZOBR_ORG
M5_PLAN
K_UDAJU
isOK_C
bZAKAZKA
-POM_ZAK
arC5_PLAN
coW_MODUL
n'STAV
bZRUS
t ZRUS_ZAK
M5_DNP
bZAVOD
cM4_POBJ
**MAT_OBJ
**POR_OBJ
**W_ZMEN
baPOM
Chybn
stav zak
zky (povolen
hodnoty P,S,U)
Chybn
stav zak
zky (povolen
hodnoty S,U)
Nelze m
nit stav uvoln
Chybn
vypln
novan
uvedeno I
O dodavatele polo
Organizace neexistuje
aktualizace zak
zky ...
NOVY_Z
POCET
IDENT
W_POLE
ocOK_C
W_ZMEN
**HLASKA
bM5_PLAN
& M4_ORGAN
PRIDEJ_Z
eL_OBR
o MOD_SYS
MESS
&AKT_ZAK
eZAPIS_AKT
Z_OBR
MOD_SYS
PM5_PLAN
PC5_PLAN
ZAPIS_AKT
W_POLE
N_OBR
MOD_SYS
PM1_IDENT
PW_POLE
M1_PLAN
M1_ZAS
ZS_KMD
SKL_HLAVNISKL_HL_UM
PROC_ZMET
C5_PLAN
TER_UV
M5_PLAN
**M5_DNP
tZAVOD
bIDENT
ZAKAZKA
& ZAPIS_AKT
eNOVY_Z
select &sel
W_POLOZKA
W_HODNOTA
PM1_ZAS
ALOKACE
M1_UM
SKL_HLAVNISKL_HL_UM
m5_akt
select &sel
W_IDENT
DNOTA
M1_IDENT
IDENT
M5_AKT
IDENT
_HLAVNIDUVOD
C5_PLAN
TER_UV
W_POLE
PM5_PLAN
M5_DNP
ZAVOD
VNIIDENT
ZAKAZKA
ident
Polozka F
neexistuje
set order to &w_order
Polozka FF
nema vyplneny zasobovaci udaje
Polozka FF
nema vyplnen hlavni sklad
Hlavni sklad polozky FF
schazi v souboru skladu
Zaznam o zasobach polozky FF
neni pristupny
Zaznam o umisteni zasob polozky FF
neni pristupny
INDIK
X_IDENT
M1_IDENT
PW_ORDER
IDENT
NIHLASKA
M1_ZAS
SKL_HLAVNIV4_SKLAD
W_DRUH
NIDRUH_SKL
M1_UM
**SKL_HL_UM
SKLAD
tUM_SKL
VNITYP_UM
colora
set color to &color
COLOR
OBR_HL
colora
set color to &color
COLOR
ehled pl
nu polo
Konec
mod53b
C5_PLAN
ZOBR_PLAN
M1_IDENT
IDENT
NIMOD53B
detailn
znamy o um
neexistuj
set color to &barva
PLMEZ
PMEZ
_IDENT
ZAZNAM
NITXT
HLASKA
W_IDENT
NIIDENT
NIRAD
STREC
**BARVA
SAYUM_A
polo
Z
Alokace
Celkem:
ZZZZZZZZ.ZZZ
99999999.999
ZZZZZZZZ.ZZZ
99999999.999
Konec
Pohyb
- Esc
- Home,End,PgUp,PgDn
M1_ZAS
ZASOBA
PALOKACE
set color to &barx
ZZZZZZZZ.ZZZ
99999999.999
ZZZZZZZZ.ZZZ
99999999.999
SKLAD
PUM_SKL
TYP_UM
ZASOBA
ALOKACE
detailn
znamy neexistuj
set color to &barva
w+/bg
w+/bg
w+/bg
zka nen
schv
ani uvoln
Byla vystavena objedn
vka, nelze m
nit dodavatele
Zadejte n
zev nebo I
O organizace
nazev
PLMEZ
PMEZ
M4_ORGAN
HLASKA
M5_PLAN
NIRAM5
HELP5
NIRAD
STREC
**BARVA
SAYRAD5
NIW_POLE
& M5_DNP
ZAKAZKA
eIDENT
o ZAVOD
W_ZMEN
&STZAZ
eKLIC
NAZEV
azW_CESTINA
ehled o r g a n i z a c
zev organizace
set color to &barx
NAZEV_ORG
ZAVOD
CISLO_INT
Konec
Pohyb
Enter
- Esc
- Home,End,PgUp,PgDn,
- Vyhled
r dodavatele
detailn
znamy neexistuj
set color to &barva
w+/bg
zka nen
schv
ani uvoln
Byla vystavena objedn
vka, nelze m
nit dodavatele
set color to &barva
w+/bg
set color to &barva
w+/bg
w+/bg
w+/bg
PMEZ
SLO_INT
POLOVINA
IZAZNAM
M4_DODM
W_POLE
NITXT
HLASKA
NIM5_PLAN
**HLAVA_P
HELP6
NISTREC
BARVA
& IDENT
SAYRAD_A
eSAYRAD_B
M5_DNP
&ZAKAZKA
ZAVOD
azW_ZMEN
W_REC
Informace o dodavatel
ch polo
zev organizace
POLOVINA
set color to &barx
ZAVOD
PRIOR
set color to &barx
POLOVINA
M4_ORGAN
M4_DODM
O_INT
ZAVOD
INAZEV_ORG
Konec
Enter
Pohyb
- Esc
,Home,End,PgUp,PgDn
nazev
detailn
znamy neexistuj
ident
set color to &barva
w+/bg
w+/bg
w+/bg
ident
ident
Vyhled
Zadejte n
zev polo
ident
PMEZ
M1_IDENT
IDENT
INAZEV
HLASKA
NIIDENT
C5_KOMP
_KOMP
RAM11
**HELP11
tSTREC
NIBARVA
SAYRAD11
M5_PLAN
eSTAV
IDENT_KO
eZMENA
CZMENA
azLOCK_ZAS
INDIK
ALOK_ZAS
MNO_VYS
vKLIC
ehled p o l o
e k
zev polo
Identifikace
Jakost
set color to &barx
NAZEV
IDENT
KOD_POL
ROZM_CSN
IJAK_CSN
Konec
Pohyb
Enter
-Home,End,PgUp,PgDn,
-Vyhled
r polo
POCET
POCETC
S411X
jme
F9PRG
apove
ZMEN_PRG
OPRAVA2
PORADI
ahuje
PROC1
edury
ZMEN1
ZMENY
K_UDAJU
len(E
ZRUS_ZAK
PRIDEJ_Z
ALOK_ZAS
ZAPIS_AKT
AKT_ZAK
LOCK_ZAS
HLASKA
zmen_p
DETAIL
&& gY
ZOBR_UM
ev >[
detaiK_
SAYUM_A
ZOBR_ORG
SAYRAD5
HELP5
ZOBR_DOD
ni vse:{
HLAVA_P
SAYRAD_A
SAYRAD_B
HELP6
li --F
ZOBR_POL
RAM11
ublic
SAYRAD11
HELP11
(pol@
PROCENTA
P:\IN\SK\O\04\
S411.FXP
P:\IN\SK\O\04\S411.PRG