Avaya Writing Technician Interface Scripts Manuel d'utilisateur télécharger pdf (Page 104)

Writing Technician Interface Scripts

A-32 117382-A Rev. A

:FI_SAMP_MATCH:

on error :FI_NEXT_TRY:

if ${s1instid_[$i]} != ${s2instid_[$j]} then; goto :FI_NEXT_TRY:

if $j = $jlow then; \

if $jlow < $s2instid_0 then; \

let jlow = $jlow + 1

let delta_rxfrms = ${s2rxfrms_[$j]} - ${s1rxfrms_[$i]}

if $delta_rxfrms < 0 then; goto :FI_NEXT_TRY:

let delta_txfrms = ${s2txfrms_[$j]} - ${s1txfrms_[$i]}

if $delta_txfrms < 0 then; goto :FI_NEXT_TRY:

let delta_rxlors = ${s2rxlors_[$j]} - ${s1rxlors_[$i]}

if $delta_rxlors < 0 then; goto :FI_NEXT_TRY:

let delta_txlors = ${s2txlors_[$j]} - ${s1txlors_[$i]}

if $delta_txlors < 0 then; goto :FI_NEXT_TRY:

let matches = $matches + 1

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

gosub :GETCCTNAME:

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

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

printf “%-8.8s ” “$cctname”

printf “%10u %10u %10u %10u\n” $delta_rxfrms $delta_txfrms \

$delta_rxlors $delta_txlors

cutenv -c9-15 name2 “$cctname”

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

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

:FI_NEXT_TRY:

let j = $j + 1

if $j <= $s2instid_0 then; goto :FI_SAMP_MATCH:

let i = $i + 1

if $i <= $s1instid_0 then; \

let j = $jlow; \

goto :FI_SAMP_MATCH:

let i = $table_size

goto :FOOTER_AND_END:

:FI_SAMP_HELP:

cutenv -c $invalch ugly_ “$3”

echo “Inappropriate character '$ugly_1' in parameter;”

echo “ only digits allowed.”

echo

goto :FI_HELP_SHOW:

1 2 ... 99 100 101 102 103 104 105 106 107 108 109 ... 115 116

Pas de commentaire

Avaya Writing Technician Interface Scripts Manuel d'utilisateur Page 104