后处理如何开头添加这些东西

#输出日期
global mom_date
#输出程序组名1
global mom_group_name
#输出程序组名2
global mom_oper_program
#输出部件名
global mom_output_file_basename
#输出部件保持目录
global mom_part_name
#输出操作工序名
global mom_operation_name
set a [clock format [clock seconds] -format "%Y/%m/%d"]
set b [clock format [clock seconds] -format "%H:%M:%S"]
set c [clock format [clock seconds] -format "%A"]
if {$c == "Monday"} {set c 1}
if {$c == "Tuesday"} {set c 2}
if {$c == "Wednesday"} {set c 3}
if {$c == "Thursday"} {set c 4}
if {$c == "Friday"} {set c 5}
if {$c == "Saturday"} {set c 6}
if {$c == "Sunday"} {set c 7}
MOM_output_literal "(DATE: $a $b WEEK$c)"
MOM_output_literal "(PART: $mom_output_file_basename)"
MOM_output_literal "(NC-F: $mom_oper_program)"