如何设置UG不同的几何体生成程序报警

3079872616

请教各位大佬，如何设置UG不同的几何体生成程序时可以报警提醒

逗号v

3079872616 发表于 2024-3-21 10:25
大佬，怎么让一个组里面的不同坐标报警，不是一个程序里的不同坐标报警

首先再程序开始的时候加入定制命令

    global mom_oper_geom tp inr tpi mom_tool_name tn tni  dhcf dhcfa dhcfb
    if {[info exists tp]} {
    for {set i 0} {$i < $inr} {incr i} {
    set tpi [lindex $tp $i]
    if {$mom_oper_geom==$tpi} {
set dhcf "温馨提示！出现多个几何体！\n\n$tpi\n\n"
  return
     }
    }
    } else {set inr 0}
    lappend tp $mom_oper_geom
    if { [info exists dhcf] } { lappend  dhcfa  $dhcf }
    incr inr



然后在程序结束的时候加入定制命令
global dhcfb dhcfa
if { [info exists dhcfa] } {
set dhcfb [lsort -unique $dhcfa]
foreach i $dhcfb {
MOM_output_to_listing_device "**************************************************************"
    MOM_output_to_listing_device " $i "
MOM_output_to_listing_device "**************************************************************"
     MOM_display_message  " $i "
}
}

落叶满园秋

逗号v 发表于 2024-3-25 15:30
首先再程序开始的时候加入定制命令

    global mom_oper_geom tp inr tpi mom_tool_name tn tni  dhcf ...

你好。请问具体怎么添加，可以告知一下吗。感谢。

tombai691019

tombai691019 发表于 2024-3-26 09:52
你的是哪个版本，我的可以用的经过测试的，你是不是哪里没有做对？要么你放的位置不对，不会用而异。看一 ...

代码做一些改动，低版本与高版本都可以用，只报警一次。

tombai691019

黄如宇 发表于 2024-3-26 09:38
毛用没有！放哪里都不行

你的是哪个版本，我的可以用的经过测试的，你是不是哪里没有做对？要么你放的位置不对，不会用而异。看一下我的后处理输出的测试点，只在第一个工序有，后面工序不输出，检测一次而异。命令格式一样，在高版本做的后处理是可以用的（NX2306),低版本试了一下，命令不报错但不执行，可能要改一下判断。

黄如宇

tombai691019 发表于 2024-3-26 09:00
你的代码是不错的，只是用了for循环要把所有的工序都比较完，所以要点很多次，其实在你的代码基础上略做 ...

毛用没有！放哪里都不行

tombai691019

逗号v 发表于 2024-3-25 17:05
用这个命令 MOM_output_to_listing_device 输出在信息窗口就不用多次点确认了

你的代码是不错的，只是用了for循环要把所有的工序都比较完，所以要点很多次，其实在你的代码基础上略做改动，让循环检测到一次输出报警，继续循环不满足条件不输出报警，放在后处理程序开始处就可以了，一定要放在开始处，原理不说了。有兴趣的朋友可以试试，在高版本中已测试是可以的（发现在高版本可用，低版本暂不可用）。                                                                    global mom_operation_name_list mom_mcsname_attach_opr bj
       foreach op $mom_operation_name_list {
           lappend mcs_list $mom_mcsname_attach_opr($op)
           }
          set mcs_list_count [llength $mcs_list]
          set bj 1
       for {set i 1} {$i <= [expr $mcs_list_count - 1]} {incr i} {      
         if {![string match [lindex $mcs_list 0] [lindex $mcs_list $i]] && $bj == 1} {
         set msg [MOM_display_message 程序中包含多个坐标系，基于坐标系名称检测！请检查！ 警告 W 确定 取消]      
          }
          incr bj
    }  

逗号v

Bridge_︻︻︻︻ 发表于 2024-3-23 09:37
这个我在用，缺点是我如果是在做多轴产品，一个组里一把刀在不同的坐标系开粗，每个工序都会报警，最好只 ...

用这个命令 MOM_output_to_listing_device 输出在信息窗口就不用多次点确认了

Bridge_︻︻︻︻

逗号v 发表于 2024-3-21 09:28
global mom_operation_name_list mom_mcsname_attach_opr
foreach op $mom_operation_name_list {
     ...

这个我在用，缺点是我如果是在做多轴产品，一个组里一把刀在不同的坐标系开粗，每个工序都会报警，最好只报一次就行

shaojie_

逗号v 发表于 2024-3-21 09:28
global mom_operation_name_list mom_mcsname_attach_opr
foreach op $mom_operation_name_list {
     ...

大佬这个一直提示 要不停的点才行 有办法让识别到程序名称 或者只提示一次吗？