proc StopTrafficNgpfHlt {} {
    puts "\nStopTrafficNgpfHlt ..."
    set stopTrafficStatus [::ixiangpf::traffic_control -action stop]
    if {[keylget stopTrafficStatus status] != $::SUCCESS} {
	puts "\nError StopTrafficNgpfHlt: $stopTrafficStatus\n"
	return 1
    } 
    after 5000
    return 0
}