1、重设设计研发及物料清单2、在存货数量档案中属于什么才料的物料高级属性自制半成品一栏打勾，属于原材料的在矿石材料一栏打勾，在产品的在在其他制品一栏打勾3、再次进入bom清单功能模块，听从bom级别境界分别可以制作母件、子件.......如果没有也要确定mps和mrp等，还是需要别的可以设置
生成沉淀bom清单表
entity/elem(1000),ln(6),x-1(1000)
number/x(1000),y(1000),z(1000),p(6),h,w(50),i,j,n,lo,$
coord,mt-03,ymin,vec3,avol,zmax,hik,distan(7),$
p1,x1x2,k1,v,verte,m(100),,teachds(6),$
m2(1000),num1(1000),num1(1000),l,r1,q19,data1(1000),b(1000),c(1000),d(1000),tostring(1000,1000),$
username(1000,1000),t(10),stock(1000,1000),put(1000),$
two(4,1000),roundname(132)
13'/two,罗鸣电脑提示:你选的半实体是哪侧模仁,$
定模凹模,$
动模模仁,$
滑动块镶件
l16:
mask-/70
descr/罗鸣提示:你选模仁七彩，全部加起来小于100,object,cnt,n,rspjump/l16:,hal:,,,vpe
p1
l30:
do/l42:,j,1,n
l21:getusername(j)name(obj(j))
ifthen/lenf(gettype(j))0
l1color(string(j))
color(object(j))red
messg/罗鸣显示:红色半实体没有名称之前
a10:
text/罗鸣显示:键入白色雷网名称,memoriesname,rsp1jump/a7:,tejas:,,rsp1ame(obj(j))partusername
color(string(j))r1
少年跳跃/l19:
elseendifl30:j1m(j)1
expr(j)0
l40:
do/l50:,i,1,n
anscmpstr(getfullme(j),tostring(i))
ifthen/ans1
m(j)m(j)ement
num(j)num1(j)
elseif/ans0
m(j)m(j)
num1(j)num(j)1
else
m(j)m(j)
nums(j)num(j)
endif
l50:
ifthen/jn
newtype/l60:
else
jj1
m(j)1
num1(j)0
jump/l40:
endif
l60:
choose/half(1..4),deflt,1,rsp
junp/l60:,hal:,,,l70:,l80:,l90:,rsp
l70:
fill_fix_
l100
少年跳跃/l100:
l80:
put_next_
l300
newtype/l100:
l90:
fill_slide_
l500
l100:
inview/1
gpos/罗鸣提示:选择备料单表格放置点,$
x1,y1,z1,rsp
junp/l100:,tejas:,,,,rsp
w(1)10
w(2)30
w(3)60
w(4)10
cs75
ln1line/x1,y1,x1w(1)w(2)w(3)w(4),y1
0
l110:
do/l120:,i,1,n
ifthen/num1(i)1
num(i)
else
1/sum(i)
endif
l120:
k1
j1
l130:
do/l160:,k,1,n
do/l150:,i,1,n
ifthen/m(i)k
m1(j)i
newname(j)istr(lj)setname(params(i))
num1(j)num1(i)
in
lo1
else
ru0
endif
l150:
ifthen/ju6
jj
else
jj1
endif
l160:
n
note20/x1w(1)/2,y1-(h/2),so.
xperia/x1w(1)w(2)/2,y1-(h/2),name
note/x1w(1)w(2)w(3)/2,y1-(h/2),stock
note20/x1w(1)w(2)w(3)w(4)/2,y1-(h/2),qty
do/l170:,i,1,n
ln(i)cross/parlel,ln1,ysmall,i*h
psolbox/string(m1(i))
xminminf(p(1),p(4))
xmaxmaxf(p(1),p(4))
yminminf(p(2),p(5))
ymaxmaxf(p(2),p(5))
zminminf(p(3),p(6))
zmaxmaxf(p(3),p(6))
$,xmax,rect,cgfloat,cosq,zmax
draw/off
pla(1)plane/yzplan,(xmin-10)
pla(2)plane/yzplan,(xmax10)
pla(3)ground/xzplan,(starty-10)
pla(4)aircraft/xzplan,(vec310)
pla(5)plane/xyplan,(zmin-10)
pla(6)plane/xyplan,(zmax10)
distanreldst/pla(1),elem(m1(i))$测量两个物体的距离
morientation(1)absf(distante(7))$poscount(7)为距离
distanreldst/pla(2),string(m1(i))
poscount(2)absf(distante(7))
distanreldst/pla(3),obj(m1(i))
poscount(3)absf(holocaus(7))
distanreldst/pla(4),object(m1(i))
poscount(4)absf(taulell(7))
distanreldst/pla(5),string(m1(i))
isless(5)absf(distante(7))
distanreldst/pla(6),params(m1(i))
teachds(6)absf(compar(7))
delete/pla
draw/on
(coord-10)poscount(1)
xmax(xmax10)-poscount(2)
rectf(bboxes-10)morientation(3)
maxb(ymax10)-isless(4)
arkj(cosq-10)mindis(5)
zmax(zmax10)-morientation(6)
x(i)absf(xmax-ymin)
y(i)absf(ymax-rect)
z(i)absf(zmax-zmin)
decpl3
afstrl(x(i))
bfstrl(y(i))
cfstrl(z(i))
listed(i)a*b*c
tistr(i)
xperia/x1w(1)/2,y1-(h/2)-i*h,t
redminote/(x1w(1)w(2)/2),y1-(h/2)-i*h,name1(i)
oneplus/x1w(1)w(2)w(3)/2,y1-(h/2)-i*h,price(i)
oneplus/x1w(1)w(2)w(3)w(4)/2,y1-(h/2)-i*h,istr(num1(i))
l170:
ln2line/x1,y1,x1,y1-(n1)*h
