
Sample Scripts
114089 Rev. A A-19
:FI_XMIT_NXT:
let i = $i + 1
goto :FI_TxLOOP:
################################################################
#
# System Errors screen...
#
################################################################
:FI_SYSTEM:
if $# < 3 then; goto :FI_Sy1:
let cmdlen = strlen(“$3”)
let i = strindex(“errors”, “$3”)
if $i = 1 then ; if $cmdlen >= 3 then ; goto :FI_Sy1:
goto :FI_HELP:
:FI_Sy1:
#
# check for circuit name to match on...
#
if $# <= 3 then ; goto :FI_SYS_NM:
setenv cmd “$4”
let len = strlen(cmd)
if $len < 3 then ; goto :FI_HELP_SHOW:
let j = strindex(“circuit”, cmd)
if $j != 1 then ; goto :FI_HELP_SHOW:
if $# != 5 then ; goto :FI_HELP_SHOW:
setenv matchcct “$5”
:FI_SYS_NM:
setenv nextflag “”
setenv pattern “”
setenv nextid “*”
array attr wfFDDICct wfFDDISlot wfFDDINode wfFDDIParityErrRx \
wfFDDIParityErrTx
array -a attr wfFDDIRingErrRx wfFDDIRingErrTx wfFDDISmtRingErrRx \
wfFDDIPortOpErr
array -a attr wfFDDIInternOpErr wfFDDIHostErr
enum 1 Cct Slot Node ParityErrRx ParityErrTx i
enum $i RingErrRx RingErrTx SmtRingErrRx PortOpErr InternOpErr
HostErr
echo
echo “FDDI Module System Errors:”
echo “--------------------------”
Comentários a estes Manuais