proc ConfigIsisNetworkGroupNgpfHlt { portConfigParams } { upvar $portConfigParams params puts "\nConfigIsisNetworkGroupNgpfHlt: Configuring Network Group ..." foreach {properties values} [array get params *] { set property [lindex [split $properties ,] end] append paramList "$property $values " } set network_group_status [eval ::ixiangpf::emulation_isis_network_group_config $paramList] if {[keylget network_group_status status] != "1"} { puts "\nError ConfigIsisNetworkGroupNgpfHlt: $network_group_status\n" return 1 } return $network_group_status }