[cisco-voip] Cisco Tcl IVR 2.0: unable to get protocol headers

Dmitry Pryanishnikov dmitry at euinf.net
Tue Jan 22 18:17:35 EST 2008


Hello!

   I'm trying to get H.323 SETUP protocol headers from Tcl IVR 2.0
on Cisco 3640, IOS version is

IOS (tm) 3600 Software (C3640-IS-M), Version 12.3(18), RELEASE SOFTWARE 
(fc3)

According to the "Tcl IVR 2.0 Programming Guide" (e.g., for 12.3(14)T),
it can be done using infotag leg_proto_headers, so I've written the 
following in the ev_setup_indication handler:

proc Setup { } {

     leg setupack   leg_incoming
     leg proceeding leg_incoming
     leg connect    leg_incoming
     set numa [infotag get leg_ani]
     set numb [infotag get leg_dnis]
#
     set value [infotag get leg_type [infotag get leg_incoming]]
     if {$value == "voip"} {
         puts "$value call detected!"
         set value [infotag get leg_proto_headers]
         puts "proto_headers <$value>"
     }

However during the incoming H.323 call my script aborts with the following
error:

Jan 22 12:43:45 cis36 11831: 011571: IVR TCL script failure
Jan 22 12:43:45 cis36 11832:    Result:
Jan 22 12:43:45 cis36 11833:                     getInfo::Unrecognized
 			VAR_TAG: leg_proto_headers
Jan 22 12:43:45 cis36 11834: 011572:    IVR TCL script failure errorInfo:
Jan 22 12:43:45 cis36 11835:                    getInfo::Unrecognized
 			VAR_TAG: leg_proto_headers

I've tried to supply the optional legID parameter, and also to put
[infotag get leg_proto_headers] before "leg setupack" command, but
results were the same ;( What am I missing here?


Sincerely, Dmitry
-- 
nic-hdl: LYNX-RIPE


More information about the cisco-voip mailing list