home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
MOD_EI1.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-05-04
|
17KB
|
491 lines
\PRENOS
SOUBOR
CESTA
_obrF_ADR
d, cPRESUN
enos dat ze sl
rny ...
m1_ident
material
C1_OBR.DBF
odlitky
C1_PLAN.DBF
m1_plan
x1_plan
append from &cesta\c1_plan
C1_KALK.DBF
m1_kalk
x1_kalk
append from &cesta\c1_kalk
C1_POZID.DBF
m1_pozid
x1_pozid
append from &cesta\c1_pozid
C1_IDENT.DBF
append from &cesta\c1_ident
S1_PROP.DBF
copy file &cesta\s1_prop.dbf to &f_adr\data\s1_prop.dbf
S1_PROP.CDX
copy file &cesta\s1_prop.cdx to &f_adr\data\s1_prop.cdx
S1_OPER.DBF
copy file &cesta\s1_oper.dbf to &f_adr\data\s1_oper.dbf
S1_OPER.CDX
copy file &cesta\s1_oper.cdx to &f_adr\data\s1_oper.cdx
S1_VJADR.DBF
copy file &cesta\s1_vjadr.dbf to &f_adr\data\s1_vjadr.dbf
S1_VJADR.CDX
copy file &cesta\s1_vjadr.cdx to &f_adr\data\s1_vjadr.cdx
S1_ODL.DBF
copy file &cesta\s1_odl.dbf to &f_adr\data\s1_odl.dbf
S1_ODL.CDX
copy file &cesta\s1_odl.cdx to &f_adr\data\s1_odl.cdx
S1_JADRN.DBF
copy file &cesta\s1_jadrn.dbf to &f_adr\data\s1_jadrn.dbf
S1_JADRN.CDX
copy file &cesta\s1_jadrn.cdx to &f_adr\data\s1_jadrn.cdx
S1_CSN.DBF
copy file &cesta\s1_csn.dbf to &f_adr\data\s1_csn.dbf
S1_CSN.CDX
copy file &cesta\s1_csn.cdx to &f_adr\data\s1_csn.cdx
S1_VYKON.DBF
copy file &cesta\s1_vykon.dbf to &f_adr\data\s1_vykon.dbf
!del &cesta\*.dbf
!del &cesta\*.idx
!del &cesta\*.cdx
POCET
_obrPOCETC
, cM1_IDENT
tMATERIAL
SOUBOR
ZAPIS
na_nOBRATY
r->PROCENTA
eODLITKY
M1_PLAN
X1_PLAN
1_IDENT
M1_KALK
oX1_KALK
M1_POZID
pX1_POZID
eKOD_POL
POCET
POCETC
obrPOC
colora
set color to &color
COLOR
obrOBR
SOUBOR
use &cesta\c1_obr
index on ident+kod_ob to &cesta\xc1_obr
use &cesta\c1_obr index &cesta\xc1_obr
m_param
m1_obr
ident
m1_plan
x1_plan
m1_kalk
x1_kalk
m1_cen
x1_cen
m1_zas
x1_zas
m1_um
ident
m4_organ
v1_str
x1_str
v4_sklad
x4_sklad
m_dat
x_dat
m_cis1
x_cis1
m4_chyby
ident
m4_chyby
ident
PRENOS PROVEDEN
Ve sl
nelze prov
t inventuru
Nepovolen
d obratu
EXIST
OK
obrOK_C
, cPOC_CHYB
tPOM_CENA
M_PARAM
W_POLE1
_nPOLE1
r->W_POLE4
ePOLE4
W_KOEF_VN
KOEF_VN
1_M1_OBR
IDENT
oM1_PLAN
X1_PLAN
pM1_KALK
eX1_KALK
M1_CEN
aX1_CEN
wiM1_ZAS
)-1X1_ZAS
wiM1_UM
M4_ORGAN
rt intV1_STR
k (X1_STR
p_nV4_SKLAD
dX4_SKLAD
_M_DAT
r, uX_DAT
M_CIS1
X_CIS1
s (M4_CHYBY
eC1_OBR
tM1_IDENT
,KOD_OB
,POPIS_OBR
SROVNANI
lKONTROLA
PRIJEM
lacVYDEJ
witREZ_VYDEJ
TRANSPORT
CHYBA
EXIST
M1_OBR
obrC1_OBR
, cIDENT
tKOD_OB
PLAN_MNOZ
IDENT_ZAK
IDENT_VYS
SKUT_MNOZ
VYDAL_SKL
VYD_UM_SKLTYP_UM_V
LPRIJAL_SKLPRI_UM_SKLTYP_UM_P
pZAVOD
ePOPIS_OBR
STRED_OBR
DOKL_CIS
NAKLAD
1JMENO
Chybn
slo polo
ka neexistuje v souboru polo
Nepovolen
d obratu
KOD_OB
c1_obr->kod_ob
d obratu neexistuje v
m1_um
znam
o um
polo
ky nen
stupn
m1_zas
znam
ch polo
ky nen
stupn
m1_plan
MNTUXYZ
FPSABC
znam pl
novac
polo
ky nen
stupn
Pro tuto polo
ku nebyla nalezena platn
cena
C1_OBR
obrIDENT
, cCHYBA
tKOD_OB
M1_IDENT
JMENO_C
WJMENO_C
MOD_C2
M1_UM
SKLVYDAL_SKL
VYD_UM_SKLTYP_UM_V
LSKLAD
LUM_SKL
pTYP_UM
eM1_ZAS
LSKL_HLAVNISKL_HL_UM
SKLKOD_POL
iM1_PLAN
TV_ZAK
KOD_KALK
tHR_DEN
k (ZZ
p_nW_POLE4
dM1_KALK
_PL_OD
uTYP_NAKL
POM_CENA
slo p
jemky
organizace mus
t uvedena
Organizace neexistuje v souboru organizac
Nevypln
skute
Nedostate
soba na um
Nedostate
soba v organizaci
Chybn
naveden
cena polo
ky (obratu)
m1_kalk
znam n
kladov
polo
ky nen
stupn
C1_OBR
DOKL_CIS
rCHYBA
, cIDENT
tKOD_OB
M4_ORGAN
ZAVOD
SKUT_MNOZ
M1_UM
ZASOBA
M1_ZAS
W_ZASOBA
NAKLAD
LM1_PLAN
LW_NAKLAD
pM1_KALK
ePL_OD
LTYP_NAKL
IDAT_AK
CENA_NOV
LVYP_PR
iPRIJEM
DATUM_PRIJZAPIS_OBR
m1_obr
TVRDE PRECENENI
m1_cen
m1_kalk
m1_obr
TVRDE PRECENENI
M1_ZAS
C1_OBR
rIDENT
, cZASOBA
tW_ZASOBA
SKUT_MNOZ
M1_OBR
TERMIN_OB
KOD_OB
PLAN_MNOZ
VYDAL_SKL
VYD_UM_SKLTYP_UM_V
POPIS_OBR
NAKLAD
LJMENO
pM1_UM
SKLAD
LUM_SKL
ITYP_UM
W_NAKLAD
LCENA_NOV
iM1_CEN
DATUM
RIJCAS
S_OBR
CEN_PUV
(CEN_PR
p_nMNOZ_PR
dCEN_PRU
_C_PRIJ
uKL_ZAZ
DOKL_CIS
M1_KALK
(UVN
ePL_OD
tPL_DO
,DAT_AK
,TYP_NAKL
KUSY_D
lMATER
M1_PLAN
cMM_AUTOR
m1_obr
m1_obr
TVRDE PRECENENI
m1_obr
VEDLEJSI NAKL.
m1_kalk
m1_cen
M1_OBR
IDENT
rTERMIN_OB
KOD_OB
tPLAN_MNOZ
SKUT_MNOZ
VYDAL_SKL
VYD_UM_SKLTYP_UM_V
POPIS_OBR
L_SKL
ZAVOD
_SKLDOKL_CIS
IDENT_ZAK
IDENT_VYS
NAKLAD
pJMENO
C1_OBR
LM1_ZAS
ZASOBA
CENA_NOV
LM1_UM
SKLAD
UM_SKL
RIJTYP_UM
W_KOEF_VN
CENA_NOV2
M1_KALK
_NOV2
PL_OD
uPL_DO
DAT_AK
TYP_NAKL
(KUSY_D
eMATER
tM1_PLAN
M1_CEN
DATUM
lCEN_PUV
CEN_PR
cMNOZ_PR
CEN_PRU
LC_PRIJ
KL_ZAZ
at_W_NAKLAD
tW_ZASOBA
Hodnota skute
ho mno
nesm
t nulov
MNTUXYZ
edisko mus
t uvedeno
MNTUXYZ
edisko neexistuje v souboru st
edisek
zka mus
t uvedena
Nedostate
soba na um
m1_obr
C1_OBR
SKUT_MNOZ
CHYBA
IDENT
tKOD_OB
STRED_OBR
M1_IDENT
KOD_POL
KLW_POLE1
V1_STR
IDENT_ZAK
W_POLE4
KLM1_UM
ZASOBA
VYDEJ
M1_ZAS
DATUM_VYD
PLAN_MNOZ
IDENT_VYS
VADNE_MNOZVYDAL_SKL
VYD_UM_SKLTYP_UM_V
RIJZAVOD
POPIS_OBR
DOKL_CIS
DATUM_UCT
POM_CENA
JMENO
Hodnota skute
ho mno
Sklad mus
t uveden
Sklad neexistuje
Nelze p
esunout na jin
materi
nebo expedi
sklad
Nedostate
soba na um
m1_um
znam
o um
polo
ky (SKLAD2) nen
stupn
m1_obr
C1_OBR
SKUT_MNOZ
CHYBA
IDENT
tKOD_OB
PRIJAL_SKLV4_SKLAD
DRUH_SKL
LM1_UM
ZASOBA
PRI_UM_SKLTYP_UM_P
LSKLAD
UM_SKL
TYP_UM
VYDAL_SKL
VYD_UM_SKLTYP_UM_V
PRESUN
PLAN_MNOZ
IDENT_ZAK
IDENT_VYS
LZAVOD
RIJPOPIS_OBR
STRED_OBR
DOKL_CIS
DATUM_UCT
POM_CENA
JMENO
m4_chyby
W_IDENT
W_KOD
W_POLE
W_TEXT
tPOC_CHYB
PRESUN
PROCENTA
HLASKA
ZAPIS
OBRATY
1_pr%
SROVNANI
KONTROLA
PRIJEM
ocenj
VYP_PR
ZAPIS_OBR
VYDEJ
copw/
TRANSPORT
CHYBA
to &
Z:\SKUH\
MOD_EI1.FXP
Z:\SKUH\MOD_EI1.PRG