#!/local/bin/wishnm -f

toplevel $wtop

snmp getbulk $sdsc -l -v {
    .1.3.6.1.4.1.45.1.3.1.7.1.1
    .1.3.6.1.4.1.45.1.3.1.7.1.4
    } v {
    set s [lindex $v 0]
    label $wtop.s$s \
	-text "Slot:[lindex $v 0] [lindex $v 1]" -anchor w
    pack append $wtop $wtop.s$s {top fillx}
}

pack append $wtop \
    [button $wtop.d -text dismiss -command "destroy $wtop"] {top fillx}

