proc ConfigFrameRate {args} {
    set params {}
    set argIndex 0
    while {$argIndex < [llength $args]} {
	set currentArg [lindex $args $argIndex]
	switch -exact -- $currentArg { 
	    -configElementObj {
		set configElementObj [lindex $args [expr $argIndex + 1]]
		incr argIndex 2
	    }
	    -type {
		# percentLineRate, framesPerSecond, bitsPerSecond, interPacketGap
		set type [lindex $args [expr $argIndex + 1]]
		append params " -type $type"
		incr argIndex 2
	    }
	    -rate {
		set rate [lindex $args [expr $argIndex + 1]]
		append params " -rate $rate"
		incr argIndex 2
	    }
	    -interPacketGapUnitsType {
		set interPacketGapUnitsType [lindex $args [expr $argIndex + 1]]
		append params " -interPacketGapUnitsTyhpe $interPacketGapUnitsType"
		incr argIndex 2
	    }
	    -enforceMinimumInterPacketGap {
		set enforceMinimumInterPacketGap [lindex $args [expr $argIndex + 1]]
		append params " -enforceMinimumInterPacketGap $enforceMinimumInterPacketGap"
		incr argIndex 2
	    }
	    -bitRateUnitsType {
		set bitRateUnitsType [lindex $args [expr $argIndex + 1]]
		append params " -bitRateUnitsType $bitRateUnitsType"
		incr argIndex 2
	    }
	    default {
		puts "\nError ConfigFrameRate: No such parameter: $currentArg"
	    }
	}
    }

    puts "\nConfigFrameRate: $params"
    if {[catch {eval ixNet setMultiAttribute $configElementObj/frameRate $params} errMsg]} {
	puts "Error: ConfigFrameRate: $params"
	return 1
    }
    ixNet commit
    return 0
}