Avaya Writing Technician Interface Scripts Manual do Utilizador descarregar pdf (Página 95)

Sample Scripts

308660-14.00 Rev 00

A-21

on error :FI_SMT_NXT:

if $i > $list_0 then; goto :FOOTER_AND_END:

let cctnum = $(wfFddiEntry.wfFDDICct.${list_[$i]})

gosub :GETCCTNAME:

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

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

let match_entries = $match_entries + 1

:FI_PRNTSMT:

printf “%4d %4d ” $(wfFddiEntry.wfFDDISlot.${list_[$i]}) \

$(wfFddiEntry.wfFDDINode.${list_[$i]})

printf “%-8.8s ” “$cctname”

# Print the connection policy matrix...

let bit = 12

setenv flags “”

setenv bit0x0 “. . . . ”

setenv bit0x1 “. . . R ”

setenv bit0x2 “. . R . ”

setenv bit0x3 “. . R R ”

setenv bit0x4 “. R . . ”

setenv bit0x5 “. R . R ”

setenv bit0x6 “. R R . ”

setenv bit0x7 “. R R R ”

setenv bit0x8 “R . . . ”

setenv bit0x9 “R . . R ”

setenv bit0xA “R . R . ”

setenv bit0xB “R . R R ”

setenv bit0xC “R R . . ”

setenv bit0xD “R R . R ”

setenv bit0xE “R R R . ”

setenv bit0xF “R R R R ”

let policy = $(wfFddiEntry.wfFDDISmtConnectionPolicy.${list_[$i]})

:FI_BIT_LP:

let -h result = ($policy & (0xF << $bit)) >> $bit

setenv flags “${flags}${bit[$result]}”

:FI_NEXT_BIT:

let bit = $bit - 4

if $bit >= 0 then ; goto :FI_BIT_LP:

# Note field size is 32 because flags contains the trailing space.

printf “%32s” “$flags”

let state = $(wfFddiSmtEntry.wfFddiSmtEcmState.${list_[$i]})

if $state = 1 then ; printf “%-8s ” “ByPassed”

if $state = 2 then ; printf “%-8s ” “In”

if $state = 3 then ; printf “%-8s ” “Trace”

1 2 ... 90 91 92 93 94 95 96 97 98 99 100 ... 115 116

Comentários a estes Manuais

Sem comentários

Avaya Writing Technician Interface Scripts Manual do Utilizador Página 95

Comentários a estes Manuais

Manuais e produtos relacionados com Software Avaya Writing Technician Interface Scripts