Avaya Writing Technician Interface Scripts Manuale Utente Scaricare il pdf (Pagina 90)

Writing Technician Interface Scripts

A-18 117382-A Rev. A

setenv nextid “*”

array attr wfFDDICct wfFDDISlot wfFDDINode wfFDDIAbortTx \

wfFDDIUnderrunTx

enum 1 Cct Slot Node AbortTx UnderrunTx

echo

echo “FDDI Module Transmit Errors:”

echo “----------------------------”

echo

printf “%-4.4s %-4.4s %-8.8s %-10.10s %-10.10s\n” \

“ ” “ ” “ ” “ Aborted ” “ Underrun ”

printf “%-4.4s %-4.4s %-8.8s %-10.10s %-10.10s\n” \

“Slot” “Conn” “Circuit” “ Frames ” “ Errors ”

printf “%-4.4s %-4.4s %-8.8s %-10.10s %-10.10s\n” \

“----” “----” “--------” “----------” “----------”

let i = 0

:FI_TxLOOP:

on error :FI_XMIT_NXT:

mi/jointfilesconvert/97390/bget -n wfFddiEntry attr $nextid value nextid

if “$nextid” = “END” then; let i = $i + 1; goto :FOOTER_AND_END:

let cctnum = ${value[$Cct]}

gosub :GETCCTNAME:

if “$matchcct” = “” then ; goto :FI_PRNTT:

if -ic “$matchcct” != “$cctname” then ; goto :FI_XMIT_NXT:

let match_entries = $match_entries + 1

:FI_PRNTT:

printf “%4d %4d %-8.8s %10u %10u\n” ${value[$Slot]} ${value[$Node]} \

“$cctname” ${value[$AbortTx]} ${value[$UnderrunTx]}

cutenv -c9-15 name2 “$cctname”

if ${name2[0]} = 1 then; \

printf “%4s %4s *%-7.7s\n” “” “” “${name2[1]}”

:FI_XMIT_NXT:

let i = $i + 1

goto :FI_TxLOOP:

################################################################

# System Errors screen...

################################################################

1 2 ... 85 86 87 88 89 90 91 92 93 94 95 ... 115 116

Nessun commento

Avaya Writing Technician Interface Scripts Manuale Utente Pagina 90