在哪里添加什么代码,可使工件名跟文件名不一致,终止后处理
proc MOM_start_of_program { } {#=============================================================
global mom_logname mom_date is_from
global mom_coolant_status mom_cutcom_status
global mom_clamp_status mom_cycle_status
global mom_spindle_status mom_cutcom_plane pb_start_of_program_flag
global mom_cutcom_adjust_register mom_tool_adjust_register
global mom_tool_length_adjust_register mom_length_comp_register
global mom_flush_register mom_wire_cutcom_adjust_register
global mom_wire_cutcom_status
set pb_start_of_program_flag 0
set mom_coolant_status UNDEFINED
set mom_cutcom_statusUNDEFINED
set mom_clamp_status UNDEFINED
set mom_cycle_status UNDEFINED
set mom_spindle_status UNDEFINED
set mom_cutcom_plane UNDEFINED
set mom_wire_cutcom_statusUNDEFINED
catch {unset mom_cutcom_adjust_register}
catch {unset mom_tool_adjust_register}
catch {unset mom_tool_length_adjust_register}
catch {unset mom_length_comp_register}
catch {unset mom_flush_register}
catch {unset mom_wire_cutcom_adjust_register}
set is_from ""
catch { OPEN_files } ; #open warning and listing files
LIST_FILE_HEADER ; #list header in commentary listing
global mom_sys_post_initialized
if { $mom_sys_post_initialized > 1 } { return }
# Load parameters for alternate output units
PB_load_alternate_unit_settings
rename PB_load_alternate_unit_settings ""
安全获取程序名和工件名（原始值）set raw_prog_name ""
set raw_part_name ""
if { } { set prog_name "UNKNOWN_PROG" }
if { } { set part_name "UNKNOWN_PART" }
标准化名称set prog_name } ] ""]
set part_name } ] ""]
调试输出，确认原始值和标准化后的值MOM_output_literal "(调试：原始程序名 =原始工件名raw_part_name)\n"
MOM_output_literal "(调试：处理后程序名 =工件名part_name)\n"
修改条件判断，比较原始值（如果希望如此）或者保持比较标准化后的值，但确保标准化过程正确if { part\_name] != 0 } { MOM\_output\_literal "(错误：程序名称与工件名称不符！原始程序名：raw_prog_name，原始工件名：$raw_part_name)\n"
MOM_abort "后处理终止：程序名与工件名必须一致"
}
自己加这段没反应
你看看UG爱好者小梁里面可能会有的 你看看UG爱好者小梁 里面可能会有的 有什么意义？
页:
[1]