proc EnableTrafficItemByName { Name } { foreach trafficItem [ixNet getList [ixNet getRoot]traffic trafficItem] { set trafficItemName [ixNet getAttribute $trafficItem -name] if {[regexp $Name $trafficItemName]} { catch {ixNet setAttribute $trafficItem -enabled True} errMsg if {$errMsg != "::ixNet::OK"} { puts "\nEnableTrafficItemByName Error: $Name : Failed\n:$errMsg\n" return 1 } ixNet commit puts "\nEnableTrafficItemByName: $Name : Done\n" return 0 } } puts "\nEnableTrafficItemByName Error: No such traffic item name: $Name\n" return 1 }