
Writing Technician Interface Scripts
A-14
308660-14.00 Rev 00
:FI_STLOOP:
mi/jointfilesconvert/95481/bget -n wfFddiEntry attr $nextid value nextid
if “$nextid” = “END” then; let i = $i + 1; goto :FOOTER_AND_END:
let i = $i + 1
let cctnum = ${value[$Cct]}
gosub :GETCCTNAME:
if “$matchcct” = “” then ; goto :FI_PRNTS:
if -ic “$matchcct” != “$cctname” then ; goto :FI_STAT_NXT:
let match_entries = $match_entries + 1
#
# Sum up total errors for display...
#
:FI_PRNTS:
let tlerrs = ${value[$CrcErrRx]} + ${value[$OverrunRx]} + \
${value[$InvalidFrame]} + ${value[$MacErrRx]}
gosub :MAC_EXTRACT:
let tlerrs = $tlerrs + $mac_sum
let tlerrs = $tlerrs + ${value[$RxOversized]} + ${value[$AbortTx]}
let tlerrs = $tlerrs + ${value[$UnderrunTx]} + \
${value[$ParityErrRx]}
let tlerrs = $tlerrs + ${value[$ParityErrTx]} + ${value[$RingErrRx]}
let tlerrs = $tlerrs + ${value[$RingErrTx]} + \
${value[$SmtRingErrRx]}
let tlerrs = $tlerrs + ${value[$PortOpErr]} + \
${value[$InternOpErr]}
let tlerrs = $tlerrs + ${value[$HostErr]}
#
# Display the line...
#
printf “%4d %4d %-8.8s” ${value[$Slot]} ${value[$Node]} “$cctname”
printf “%10u %10u %10u %10u %10u” ${value[$OctetsRxOk]} \
${value[$FramesRxOk]} ${value[$OctetsTxOk]} \
${value[$FramesTxOk]} $tlerrs
echo
cutenv -c9-15 name2 “$cctname”
if ${name2[0]} = 1 then; \
printf “%4s %4s *%-7.7s\n” “” “” “${name2[1]}”
:FI_STAT_NXT:
let i = $i + 1
goto :FI_STLOOP:
################################################################
#
# Receive Errors screen...
#
################################################################
Commenti su questo manuale