UG爱好者

标题: 多级序号与所属装配显示；物料号的显示。 [打印本页]
作者: kylincy*    时间: 2016-4-25 18:19
标题: 多级序号与所属装配显示；物料号的显示。
本帖最后由 kylincy 于 2016-4-25 18:33 编辑

由于公司的产品BOM要有“所属装配”一栏，proe又没有相关参数能读取上层组件的图号，在网上搜了好久也没能找到相似的关系式，所以只能借用前辈的代码来改了，我所修改的代码如下：（将下面的代码复制到BOM清单的重复区域内的关系中）
  1. /*多级序号与所属装配显示
  2. if save_idx==pass_num && rpt_index==1
  3.    save_idx=0
  4. endif

  6. if rpt_index>save_idx
  7.    save_idx=rpt_index
  8.    pass_num=0
  9. else
  10.    pass_num=save_idx
  11. endif

  13. if pass_num==0
  14. totalmass=rpt_qty*asm_mbr_mczl /*自定义重量参数

  16. if rpt_index==1
  17.   if exists("asm_mbr_tuhao") /*检查自定义“tuhao”参数
  18.    atuhao=asm_mbr_tuhao /*如果有，将第一层组件的图号提取到"atuhao"中
  19. else
  20.    atuhao="父项无图号" /*如果无，提示父项无图号，以下相同。
  21.   endif
  22.    current_level=rpt_level
  23.    save_2sn=0
  24.    save_3sn=0
  25.    save_4sn=0
  26.    save_5sn=0
  27.    /*加入点
  28. endif

  30. if current_level==rpt_level
  31.     if rpt_level==2
  32.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  33.             btuhao=asm_mbr_tuhao /*将第二层的图号提取到"btuhao"中
  34.          else
  35.             btuhao="父项无图号"
  36.          endif
  37.       futuhao=atuhao /*第二层的父图号等于第一层的图号
  38.       save_2sn=save_2sn+1
  39.    endif
  40.    if rpt_level==3
  41.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  42.             ctuhao=asm_mbr_tuhao /*将第三层的图号提取到"ctuhao"中
  43.          else
  44.             ctuhao="父项无图号"
  45.          endif
  46.       futuhao=btuhao /*第三层的父图号等于第二层的图号
  47.       save_3sn=save_3sn+1
  48.    endif
  49.    if rpt_level==4
  50.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  51.             dtuhao=asm_mbr_tuhao /*将第4层的图号提取到"dtuhao"中
  52.          else
  53.             dtuhao="父项无图号"
  54.          endif
  55.       futuhao=ctuhao /*第4层的父图号等于第3层的图号
  56.       save_4sn=save_4sn+1
  57.    endif
  58.    if rpt_level==5
  59.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  60.             etuhao=asm_mbr_tuhao /*将第5层的图号提取到"etuhao"中
  61.          else
  62.             etuhao="父项无图号"
  63.          endif
  64.       futuhao=dtuhao /*第5层的父图号等于第4层的图号
  65.       save_5sn=save_5sn+1
  66.    endif
  67.    /*加入点
  68. else      
  69.    if rpt_level==2
  70.       save_2sn=save_2sn+1
  71.       /*save_4sn=save_2sn
  72.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  73.             btuhao=asm_mbr_tuhao /*将第二层的图号提取到"btuhao"中
  74.          else
  75.             btuhao="父项无图号"
  76.          endif
  77.       futuhao=atuhao /*第二层的父图号等于第一层的图号
  78.    endif
  79.    if rpt_level==3
  80.       save_3sn=save_3sn+1
  81.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  82.             ctuhao=asm_mbr_tuhao /*将第三层的图号提取到"ctuhao"中
  83.          else
  84.             ctuhao="父项无图号"
  85.          endif
  86.       futuhao=btuhao /*第三层的父图号等于第二层的图号
  87.       if current_level<rpt_level
  88.          save_3sn=1
  89.       endif
  90.       /*save_4sn=save_3sn   
  91.    endif
  92.    if rpt_level==4
  93.       save_4sn=save_4sn+1
  94.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  95.             dtuhao=asm_mbr_tuhao /*将第4层的图号提取到"dtuhao"中
  96.          else
  97.             dtuhao="父项无图号"
  98.          endif
  99.       futuhao=ctuhao /*第4层的父图号等于第3层的图号
  100.       if current_level<rpt_level
  101.          save_4sn=1
  102.       endif
  103.    endif
  104.    if rpt_level==5
  105.       save_5sn=save_5sn+1
  106.          if exists("asm_mbr_tuhao") /*检查“tuhao”参数
  107.             etuhao=asm_mbr_tuhao /*将第5层的图号提取到"etuhao"中
  108.          else
  109.             etuhao="父项无图号"
  110.          endif
  111.       futuhao=dtuhao /*第5层的父图号等于第4层的图号
  112.       if current_level<rpt_level
  113.          save_5sn=1
  114.       endif
  115.    endif
  116.    /*加入点
  117.    current_level=rpt_level
  118. endif


  121. if rpt_level==2
  122.    myidx=itos(save_2sn)
  123. endif
  124. if rpt_level==3
  125.    myidx=itos(save_2sn)+"."+itos(save_3sn)
  126. endif
  127. if rpt_level==4
  128.    myidx=itos(save_2sn)+"."+itos(save_3sn)+"."+itos(save_4sn)
  129. endif
  130. if rpt_level==5
  131.    myidx=itos(save_2sn)+"."+itos(save_3sn)+"."+itos(save_4sn)+"."+itos(save_5sn)
  132. endif
  133. /*加入点
  134. endif

  136. /*显示物料
  137. if exists("asm_mbr_erpfl")==FALSE /*检查自定义“ERPFL”参数
  138. wuliao = asm_mbr_tuhao /*没有，则图号就是物料号，公司将自制件的图号当作物料号，所以自制件不设“ERPFL”参数
  139. else
  140. if asm_mbr_mcwl==" "||asm_mbr_mcwl=="" /*当自定义“mcwl”参数值为空或只有一个空格时
  141. wuliao = "没有物料号"  /*提示没有物料号
  142. else
  143. wuliao = asm_mbr_mcwl  /*有就显示物料号
  144. endif
  145. endif
复制代码
以上是我修改别人的代码，由于我不会编程，所以肯定有很多遗漏或错误的地方，在此只是抛砖引玉，还希望各位能多多指正。
同时也希望能帮助到更多的人。
运行后的：







欢迎光临 UG爱好者 (https://www.ugsnx.com/) Powered by Discuz! X3.2