Da Ballz 发表于 2022-7-5 18:49:36

按对单个rev块排序

嘿,伙计们,
 
我有一些旧图形,其中修订信息位于单独的块中,我想使用lisp将这些块的属性值写入具有自己属性的新标题栏。
 
讨论中的遗留块名为REVOLD。给定图形中有多达十几个副本,每个副本具有以下标记的不同属性值:
 
X(修订号)
XX/XX/XX(日期)
XXX(完成人)
X(修订说明)
XX(与工单相关的编号)
 
我知道,这太可怕了。我需要将所有REVOLD实例的属性值映射到以下标题栏(取决于图形中的标题栏,也可以假设新标题栏已经在旧图形中,因为我将在此之前运行该脚本):
 
图纸第1页
图纸第2页
图纸第3页
 
新标题栏的属性包括:
 
第1版
日期1
附录1
描述1
DCR1
 
第2版
日期2
附录2
描述2
DCR2
 
此模式最多重复6次(但我只关心整个问题的前4次)
 
为了简单起见,我只关心最后四个(或四个最新的)版本。如果还有更多,我就把它们丢掉。
 
属性一一映射。例如:REV1=X;日期1=XX/XX/XX等。
 
我需要将REVOLD属性按日期顺序排列,以便最早的4个REVOLD实例成为REV1,下一个实例为REV2,依此类推。
 
我希望这是有道理的,我会根据需要澄清更多。

pBe 发表于 2022-7-5 18:58:05

问题:
如果有4个修订,那么有4个重新修订块吗?
排序后,将值传递到新标题栏[已插入]上的新修订框
传递值后,是否删除重新折叠块?
REVOLD块上的标记名是什么?
日期的格式是什么?年月日还是年月日?
 
 
思想:
如果修订版本处于垂直位置,则无需按日期排序。话虽如此,“前四名中最早的一个”是指从底部向上的前四名?
“我只关心最后四个(或四个最新的)版本。”
 
 
IMO通过绘图样本更容易描述问题。[删除所有机密信息/甚至删除前后显示类似条件的图纸]

Da Ballz 发表于 2022-7-5 18:58:41

答案:
 
1.可能有4个以上的修订,但新标题栏中的空间有限。
图纸Sheet_1可容纳6个修订
图纸2可容纳4个
图纸3可容纳4个
 
2、正确
 
3.我在最初的帖子中指定了REVOLD属性标记名。这就是所有那些可怕的X的意义所在。
 
4、变更日期格式为年月日;新标题栏的日期格式为DD-MMM-YY(例如:2015年12月29日)
 
思考答案:
 
对翻转块堆叠在一起。最上面的是最新版本。你说得对,我自相矛盾。我需要的是最新的4次修订,或者就日期而言,最新的4次修订。
 
我会擦洗图纸,并附上尽快我可以。。。说得好。

Da Ballz 发表于 2022-7-5 19:04:58

pBe公司
 
这就是我在数百张图纸上试图解决的问题。
 
我需要用lisp将REVOLD块的所有属性值映射到新的标题块。否则,我基本上只能一个接一个地手工修改,考虑到有数百张图纸,这将花费很长时间。

BIGAL 发表于 2022-7-5 19:09:25

几个问题和一些答案。
 
每个dwg只有一张布局图吗?
 
我可能会根据其长度制作一个信息列表,确定最后4个或更少等,然后更新新块。
 
这不是现成的,但它是可行的,只是需要一些时间。其他人介入!

Da Ballz 发表于 2022-7-5 19:11:30

谢谢你。
 
是的,在图纸空间的默认布局1选项卡上,每个图形只有一个标题栏。
 
我认为列表可能很容易工作,因为虽然标记名不同,但旧属性与新属性完全对应。因此属性值应该干净地传递。我只是不确定如何按正确的顺序映射它们。我最初是按日期考虑的。您可以在图形中看到,最旧的版本位于底部,并且它们相互堆叠。

pBe 发表于 2022-7-5 19:19:08

 
在您的样图上,将REVOLD中的修订版5、6和7添加到4之后?或者完全删除4个?
记得之前和之后吗?
 
在将数据从旧数据传输到新数据后,还要更新REV标签,对吗?

Da Ballz 发表于 2022-7-5 19:20:06

pBe,是的,您会按照第4版以上的顺序添加这些修订。但我只展示了Rev 4作为新标题栏修订的示例。
 
实际上,新标题栏将为空白,您将开始在REV1、DESC1等处插入第一个修订版,然后按顺序添加其余内容,直到新标题栏修订已满或所有修订版都已转移。是的,更新版本标签以匹配最新(最高)版本。

pBe 发表于 2022-7-5 19:26:45

所以它通常是空白的?如果标题栏上已有值,是否需要在程序上添加选项?如果修订框已满,请将其“撞倒”?这种情况多久发生一次?
 
现在不要放弃,你就快到了。

pBe 发表于 2022-7-5 19:29:55

这就是我目前所拥有的。如果你现在发布回复会比以后更好。[今天我有时间消磨时间,接下来。。
 
条件:
1布局选项卡1标题栏
 
我在之前的帖子中提到了关于修订框中现有值的选项。。。。
 
希望这有帮助
UpdateRevisionBox。LSP
页: [1] 2
查看完整版本: 按对单个rev块排序