以法兰克为例:
使用记事本打开ju_uni_post_fanuc.tcl
使用文件查找,找到:proc prog_head
#=================================================================
proc prog_head { } {
#=================================================================
global mom_group_name mom_date mom_tool_name
global prev_spind
global tool_name cut_descr cut_stock cut_depth
set tool_name ""
set cut_descr ""
set cut_stock 1
set cut_depth 0