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

Writing Technician Interface Scripts

A-22 114089 Rev. A

instenv list_ wfFddiSmtEntry

:FI_SMT_LP:

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

1 2 ... 95 96 97 98 99 100 101 102 103 104 105 ... 121 122

Sem comentários

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