|
装配中同一零件有多个,如何框选时只选择其中一个?因为我想通过框选读取每个零件的属性并写出到指定的文本文件做BOM表,但当有多个零件时就会多次写出同一零件的属性到文本文件,想不到如何解决,请大侠们帮忙,谢谢了。。0 |3 _3 z* L, F) c+ P% n- U9 r
代码如下:
% q+ e$ }% v2 Y1 iL200:
% |, }7 N) v$ @0 |' F1 c MASK/63 * o8 m' t4 a( n4 s5 ?9 v0 w
IDENT/'请选择组件',comp,cnt,n,resp, j9 _! E! W+ U9 C) q1 b0 u
JUMP/L200:,END:,,resp " G/ y8 P7 w) z. u4 t4 D
L300:
0 s4 P+ c) N& L$ x7 A4 s; P cpname=&NAME(comp(i)) 3 x" H5 n" r4 U9 L
PARTOP/SET,work,cpname 1 T5 c) O: n! D' g# l
ATT=&ATTVL(PART,'零件名称',IFERR,END:,5)
# f- Y+ Y3 j* b" ?. E% j- G ATT1=&ATTVL(PART,'数 量',IFERR,END:,5)0 Y+ p& r+ S. C8 E% X) @
ATT2=&ATTVL(PART,'材 料',IFERR,END:,5) F; y" f3 y5 V# N6 ?
ATT3=&ATTVL(PART,'热 处 理',IFERR,END:,5)
I, {. W2 i4 A& l5 p" v ATT4=&ATTVL(PART,'比 例',IFERR,END:,5): ~; n5 O# w- ?9 ~% m
ATT5=&ATTVL(PART,'版 本',IFERR,END:,5)! y2 }. S! ?2 R) {" V
ATT6=&ATTVL(PART,'制 图',IFERR,END:,5)
5 y. c7 D/ F- b) W; b8 W1 ^+ | TT=ATT+' '+ATT1+' '+ATT2+' '+ATT3+' '+ATT4+' '+ATT5+' '+ATT6
. q( S6 |& o" @; ]# S WRITE/1,TT $$ 写入字符串
4 W8 R. n& o6 ^/ t% P' L% w2 C7 n; ] i=i+1
* u! O% s5 P6 c4 B; A& |6 ` IF/i>n,JUMP/L400: : A/ v$ |: N% ^! c$ ?
JUMP/L300: 2 C1 Z' O6 O9 p
|
|