home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 June
/
Chip_1999-06_cd.bin
/
tema
/
SoWa
/
OBEC.EXE
/
01
/
MOD17B1S.FXP
(
.txt
)
< prev
next >
Wrap
MS Visual FoxPro App
|
1998-01-20
|
33KB
|
822 lines
V
et postupov
kalkulace v
robku
RIIS 1.7
m_param
KLOBOUKYF
m1_ident
ident
MM_vykresf
kresu :
Datum platnosti:
kresu :
colorz
ka neexistuje!
mod_proc
inlist (kod_pol, 'F','P', 'S','A', 'B', 'C','R','V', 'I', 'O', 'J', 'K','G')
m1_kusov
vykres
FPSABCRVIOJKG
Na tuto polo
ku nelze po
tat kalkulaci.
et prov
st pro:
999999
set color to b/w
set color to w/w
COLORa
Pro zadan
et kus
Pro aktu
kusy d
Pro re
ie kmenov
Pro re
len operac
Konec
&barvax
colora
Zadejte po
et kus
vky:
999999
Po
et kus
vky:
999999
set color to &_color
&barvam
&barvax
colora
Zadejte po
et kus
vky:
999999
Po
et kus
vky:
999999
set color to &_color
&barvax
&barvam
&barvax
&barvax
&barvam
&barvax
&barvax
&barvam
&barvax
&barvax
Po
et kus
vky:
999999
&barvax
COLORa
Prob
rozklad sou
sti.
set color to &savecolo
c1_ch
c1_kalk
c_postk
m1_plan
x1_plan
zakladni\m1_normy
operace
v1_str
x1_str
v4_sklad
x4_sklad
m1_kalk
x1_kalk
m1_zas
x1_zas
NASTAVIT d
lnu kooperace
KONZULTUJTE se SoWOU
dilKoop=0
m1_ceur.dbf2
m1_ceur
c1_pom
c1_pom
m1_ident
c2_pom
c2_pom
teno celkem:
CDEHLY
*******CIS
dure maW_HMOTNOSTW_PL_REZ
W_CENA_KG
W_CENA_REZW_MATERIALW_SPOTREBAW_UVN_ODL
VZOREC
tDRUH_REZ
vykreFRS
selecFRV
alias)FRO
returnFRZ
t m1_iM_VYKRES
NAKLADY
w_KSDAV
radNAKLTYP
ctMDILKOOP
sMDRUHKOOP
NEBERODL
.ANSI
M_PARAM
erMKUSY
'CHYPOLE1
AM pDILNA_KOOPPODNIK
matM1_IDENT
vIDENT
s_NASEL
.alW_DATUM
eMM_VYKRES
_IDENT
MCOLOR
ha_M_OBRQ
_hmHLASKA
W_IDENT
s_W_MJ
th 'VW_NAZEV
ajZOBR_POL
tMOD_PROC
aM1_KUSOV
VYKRES
DATUM_OD
aDATUM_DO
rNAZEV
selectKOD_POL
sM_KUS
DR_KSD
. fDR_DIL
BARVAX
rr BARVAM
SAVECOLO
pro M
u', ;
_COLOR
MOD_SYS
atC1_CH
kPOPIS
radaSPATNE
ectKLIC_POL
C1_KALK
TYP_NAKL
wPL_OD
g = PL_DO
hileDAT_AK
andMATER
_radKOOP
if hmPRIP
_hmotKUSOV
d hmKUSY_D
motVR
SR
ena_kg ZR
exit
dif OPN
NMPRIP
a_kNMKUSOV
dPRIPCEL
wKUSY_STRUKOP_V
h hmoC_POSTK
UROVEN
VYROBEK
OPER
matNAZEV_OP
w_radaPOZ
selectKUSY_ROZP
eturn
pC1_S
mC1_K
* w_OPERVST
mM1_PLAN
poX1_PLAN
seZAKLADNI
OPERACE
usV1_STR
+ X1_STR
.opV4_SKLAD
X4_SKLAD
M1_KALK
erX1_KALK
pM1_ZAS
hybX1_ZAS
e vPIS_ERR
KALK2
'nuM1_CEUR
(mRADA
+ m1_ROZKLADNEWC1_POM
1_kUROV
VYROBKY
seDISTINCT
C2_POM
entPOCETC2
POCET2
foT_PRERUS
POCET1
inM_NAZEV
PRIDROZPISPOLE
Identifikace nem
strukturu
kalk.
NEEXISTUJE
ROZPIS
***M1_KUSOV
pM_VYKRES
aPIS_ERR
STM1_KALK
C1_K
NAZEV_OP
ZVYKRES
IALDRUH
TREBATYP_NAKL
tKUSOV
KUSY_D
kreVR
selecSR
alias)OR
returnOPM
t m1_iUVN
MATER
wKOOP
radOP_V
ctC1_S
sIDENT
MDRUHKOOP
M1_IDENT
C_VYKRESU
KOD_POL
HYMATERIAL
ZNAM pl
novac
kalk.vzorec = 1
Kalk.vzorec nen
1,2,3,4
kalk.vzorec = 1
***M_VYKRES
pVZOREC
aM1_PLAN
STPIS_ERR
KOD_KALK
M1_KUSOV
ZMATER1
LMATER2
EBAMATER3
Kalk.vzorec 2 nelze pou
materi
ZNAM pl
novac
materi
ch je hmotnost=0
materi
ZNAM hmotnost
pro
cena mater.
Chybn
rozsah hmotnost
pro
cena mater.
V postupu chyb
operace vstupu
oper.(m
NEEXISTUJE
ALIAS
***KALK2
pPIS_ERR
aM_VYKRES
TM1_IDENT
W_RADA
ZM1_PLAN
LW_HMOTNOSTVAHA_MJ
M1_CEUR
TW_CENA_KG
HM_OD
kreHM_DO
NOSTCEN_KG
P_MAT
M1_KUSOV
SPOTREBA
iC1_K
IDENT
wOP_V
dNAZEV_OP
tVYKRES
sKUSY_ROZP
KUSY_STRUKPOR
DRUH
TYP_NAKL
pMATER
KOOPC1_S
Kalk.vzorec 3 nelze pou
materi
ZNAM pl
materi
daj.je plocha
ezu=0
materi
ch je hmotnost=0
materi
kalkulace 1. odlitku
cena materi
ZNAM hmotn.pro
cena materi
Chybn
rozsah hmotn.pro
cena mater.
V postupu chyb
operace vstupu
oper.(m
NEEXISTUJE
ALIAS
***W_IDENT
pM_VYKRES
aKALK2
TPIS_ERR
M1_IDENT
W_RADA
ZRADA
LM1_PLAN
STW_PL_REZ
PLOCHA_R
TM1_KUSOV
W_SPOTREBAW_UVN_ODL
W_HMOTNOSTIDENT
C_VYKRESU
KOD_POL
iSPOTREBA
AM1_KALK
N_ODL
VAHA_MJ
STM1_CEUR
W_CENA_REZHM_OD
RUKHM_DO
NOSTCEN_REZ
EZW_MATERIALW_KOOP
EBAP_MAT
_REZC1_K
IALOP_V
NAZEV_OP
sVYKRES
.alKUSY_ROZP
KUSY_STRUKPOR
ha_TYP_NAKL
mMATER
PORKERTF
ZNAM kalkulac
- typ KU
cena mater. bude = 0
V postupu chyb
operace vstupu
oper.(m
NEEXISTUJE
CVRATSMES
M1_KUSOV
pKOD_KOMP
aPODNIK
TM1_IDENT
IDENT
KOD_POL
ZM_MATER
M_KOOP
STM_PRIP
M_KUSOV
TM_VR
TREBAM_ZR
TNOSTM_OPM
M_OPN
M_UVN
iM_KUSY_D
wC_VYKRESU
PROPMAT
TCTAVENINA
_Q_DRUH
ZM1_KALK
UKPIS_ERR
STMATER
EZKOOP
IALPRIP
EBAKUSOV
EZKUSY_D
IALVR
.alOR
TRUKOPN
ha_M1_ZAS
mP_ZR
_SKL_HLAVNIV4_SKLAD
tNSTR
aV1_STR
REZIE_ZAS
KOEPROPMATM_KUS
rSPOTREBA
TC1_K
sNAZEV_OP
VYKRES
. fKUSY_ROZP
KUSY_STRUKPOR
oTYP_NAKL
C1_S
ZNAM pl
novac
hodnoty re
KLOBOUKYF
ZNAM st
edisek
lensk
ZNAM kalkulac
- typ KU
vky=Ks d
v.fin
KL. spec.-nevypln
n postup
mzda+re
ie cel
rozp.
ZNAM postupu
mzda+re
.za cel
postup
ZNAM st
edisek
lny operace
KLOBOUKYF
M1_PLAN
M_VYKRES
pPIS_ERR
aP_KMD
TZS_KMD
PODNIK
ZMKOOPKMD
MDILKOOP
TV1_STR
TREBAKRO
TNOSTKOPN
REZIE_VYR
REZIE_SPR
REZIE_ZAS
REZIE_ODB
TDR_KSD
ZVYKRES
UKPKSDAV
T_KSDAV
EZXXX
IALM1_KALK
AKUSY_D
EZKUSY_STRUKC1_KALK
UKM1_IDENT
s_POSTUP
lC_POSTUP
M1_NORMY
KC1_K
VYROBEK
a_KUSY_ROZP
STRUKTYP_NAKL
_OP_V
VNISOPM
jSOPN
E_ZAS
SMZDA
PMATSMZDAP
rSMZDAK
TSUVN
SKOOP
sSTBC
. fSMZDAPCEL
POSTUP
RUKMKOOP
DR_DIL
atPOPN
radaMDRUHKOOP
KOOPERACE
_MZDAP
M_KUS
wKCSBC
g = _MZDAPCEL
_MZDAK
andKCSAC
_rad_OPMP
f hm_OPMK
mot_OPM
hm_MZDC
mot_OPN
_RS
_kg _RV
if NAZEV_OP
KUSOV
a_kVR
Y_STRUKUVN
h hmoMATER
NMPRIP
NMKUSOV
PRIPCEL
atOPER
zobr_det
Detail
tisk_pos
Postupov
kalkulace v
robku: F
pro
mod17b1s
RIIS 1.7
Postupov
kalkulace v
robku:
RIIS 1.7
Kumulovan
klady
zev :
VN :
Kus.:
OPM :
Mat.:
Mat2:
OPN :
SR :
VR :
ZR :
OR :
Kumulovan
klady pro FF
Kumulovan
klady
Identifikace
c1_k.vykres
c1_k.vykres
c1_k.op_v
c1_k.op_v
m1_ident.kod_pol
m1_ident.kod_pol
zev polo
m1_ident.nazev
m1_ident.nazev
zev oper.
c1_k.nazev_op
c1_k.nazev_op
c1_k.dop
c1_k.dop
str(c1_k.uvn,12,2)
c1_k.uvn
Mzda-p
str(c1_k.prip,10,2)
c1_k.prip
Mzda-kusov
str(c1_k.kusov,11,2)
c1_k.kusov
OPM
str(c1_k.opm,10,2)
c1_k.opm
Materi
str(c1_k.mater,10,2)
c1_k.mater
Materi
str(c1_k.koop,11,2)
c1_k.koop
OPN
str(c1_k.opn,10,2)
c1_k.opn
Spr.re
str(c1_k.sr,10,2)
c1_k.sr
str(c1_k.vr,10,2)
c1_k.vr
str(c1_k.zr,10,2)
c1_k.zr
Odb.re
str(c1_k.or,10,2)
c1_k.or
POLEX
YKRES
OPKMD
LKOOP
TENTER
DETAIL
EBADET_JM
F10_JM
OSTF10PRG
F4PRG
NAZEVT
M_VYKRES
MKUSY
M_KUS
NADPIS
TLEVA
PRAVA
UKDOL
TFREEZE
EZPROCX
IALC1_K
AVYKR
EZVYKRES
RUKMATER
UK_MATER
sKOOP
l_KOOP
K_PRIP
KUSOV
a__KUSOV
STRUK_VR
VNI_SR
E_ZAS
PMAT_UVN
T_OPN
s_OPM
PRIPCEL
f_PRIPCEL
MM_VYKRES
RAMECEK
oM1_IDENT
NAZEV
TITLE
TR_HL1
atZAHL
kOBSAH
radaJMENO
MOD_PSV
mod17b1s
RIIS 1.7
Nenalezen
vazby p
tu post. kalkulace
Popis chyby
c1_ch.popis
c1_ch.popis
.polo
c1_ch.klic_pol+' '
c1_ch.klic_pol
bude
c1_ch.spatne
c1_ch.spatne
C1_CH
POLEX
OPKMD
LKOOP
ENTER
EBADETAIL
DET_JM
OSTF10_JM
F10PRG
NADPIS
PRAVA
TPROCX
RAMECEK
ZRIIS
UKNAZEVT
TZAHL
EZOBSAH
IALJMENO
AHODN
RUKORDER
UKMOD_PSV
Detail v
kresu:
VN :
Mzda p
Mzda kusov
OPM :
Materi
l :
Materi
l 2 :
OPN :
SR :
VR :
ZR :
OR :
Nmin.p
Nmin.kusov.:
pC1_K
aVYKRES
TM1_IDENT
NAZEV
ZPRIPCEL
KUSOV
MATER
TKOOP
EBASR
OSTZR
NMPRIP
NMKUSOV
colora
HCOLOR
pOBRH
colora
MCOLOR
c1_ch
POPIS_POL
CO_ZLE
pIDENTIF
aC1_CH
TPOPIS
SPATNE
KLIC_POL
pozice<
PROPMAT
CTAVENINA
M1_KUSOV
aPOZICE
TC1_S
MKUSY
UROVEN
ZVYKRES
KUSY_ROZP
KUSY_STRUKDRUH
TIDENT
M_KUS
EBASTUPEN
RUKPPOC
OSTRX
M1_IDENT
NEBERODL
KOD_POL
KUSYS
RUKCV
C_VYKRESU
KOEPROPMATSPOTREBA
EZVYROBEK
ALPORADI
_STRUKMDRUHKOOP
soubor !
Tisk post. kalkulac
Tisk p
ehledu
Konec
mod_psv
p_kody
p_name
Epson LX-810
datez
german
Prob
tisk sestavy...
mod17b1
set date to &_dat
HLASKA
VENINA
KUSOV
aW_TISK
TTISK
MOD_PSV
W_POLE
ZMM_VYKRES
M1_IDENT
P_NAZEV
NAZEV
TC1_K
MODTESTT
ALCRT
RUKSOUBOR
OSTP_KODY
P_NAME
W_TISKARNABOLD_ON
NAP_BOLDON
BOLD_OFF
P_BOLDOFF
NLQ_ON
P_LETRQUALNLQ_OFF
ATP_DRAFT
TSUB_OFF
EZP_SUBOFF
LSUPER_ON
TP_SUPERON
SUPER_OFF
P_SUPEROFFHUSTE_ON
KP_10CPI
lP_COMPRESSHUSTE_OFF
P_COMP_OFFPICA_ON
a_ELITE_ON
P_12CPI
UKMALE
_P_SUBON
NIRES
jP_SETUP
t_DAT
aGERMAN
QQ_NAZ
MATNAZEVT
rMOD17B1
TMOD17B1S
PRIDROZPIS
MATERIAL
MATER2
MATER3
b,
MATER1
ROZPIS
POLE1
dr_diJ^
ZOBR_DET
HLASKA
Kh
PIS_ERR
9,4Rj
ROZKLADNEW
TISK_POS
X:\OBEC\01\
MOD17B1S.FXP
X:\OBEC\01\MOD17B1S.PRG