在移动和TEE或OLET连接的支管时总报错，求高手指教

rico

        小弟最近在编写一个小程序，想实现移动多个管件的功能。如果管件是TEE或OLET，也可以移动与TEE或OLET相连BRANCH的头或尾的位置。但目前遇到了一个问题，就是在移动与TEE或OLET相连BRANCH的头或尾的位置时，程序有时会报错。
      以下是代码：
         var !pipecomponents coll all branch members with(type eq 'TEE' or type eq 'OLET' or type eq 'ELBO' or type eq 'ATTA')  for branch
         do !pipecomponent values !pipecomponents
             if(!type eq 'TEE' or  type eq 'OLET') then
               !branch=cref of $!pipecomonent
               $!branch
               move PH BY N1000 E0 U0
             endif
          enddo
     以上这段程序是用来实现移动与TEE或OLET相连BRANCH的头或尾的位置的，有时可以正常运行，有时候会报错。
     报错提示： !branch=cref of ^^unset
      求高手指教，感激不尽！！！！！！！！！！！！！！！！！！

wanglei19850823

因为你需要移动的内容没有被定义cref这个属性，你看看是不是成功的有cref，不成功的就没有定义cref

rico

wanglei19850823 发表于 2013-9-23 15:16
因为你需要移动的内容没有被定义cref这个属性，你看看是不是成功的有cref，不成功的就没有定义cref

我的想法是，先将管件放入一个数组，然后移动数组中的元素。再通过一个IF语句，判断管件的属性是否是TEE或OLET。如果是的就用 !branch=cref of $!pipecomonent，找出与之连接的支管，然后再通过IF语句判断与TEE或OLET连接的是BRANCH的头还是尾，最后用 move PH BY N1000 E0 U0或 move PT BY N1000 E0 U0移动branch的头或尾的位置。TEE和OLET都是有cref这个属性的，但总是报错………………