<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2800.1400" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2>Hi </FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>I'd like to make TCL and VXML hybrid script&nbsp;to 
work&nbsp;that TCL script controls authorizing and VoiceXML script deals vith 
IVR. I'd like to stop VoiceXML script after client account is out of money. My 
problem is that I can't find a method how to stop VoiceXML dialog when timer 
event occurs.&nbsp;I can see timer event in&nbsp;AS5350 debugging log but it 
doesn't execute&nbsp;anything. I read from Cisco TCL application guide that 
command terminate should&nbsp;be a command to use&nbsp;- but still no 
effect.&nbsp;Has anyone any experience with such kind of 
applications?&nbsp;&nbsp;Or is it impossible to control VXML termination&nbsp;by 
TCL?</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>With Best Regards</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>Riho</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>PS. Some information about how I try to use 
it:</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>proc act_Authorized { } {<BR>......</FONT></DIV>
<DIV><FONT face=Arial size=2>timer start leg_timer $creditTime 
leg_incoming<BR></FONT><FONT face=Arial size=2>leg vxmldialog leg_incoming -u 
flash:/acme1.vxml -p parray<BR>set commandh [infotag get 
last_command_handle]<BR>}</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>proc act_ActiveTimer { } {</FONT></DIV>
<DIV><FONT face=Arial size=2>global commandh</FONT></DIV>
<DIV><FONT face=Arial size=2>&nbsp;command terminate $commandh</FONT></DIV>
<DIV><FONT face=Arial size=2>}</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>.....</FONT></DIV>
<DIV><FONT face=Arial size=2>set 
fsm(AUTHORIZE,ev_authorize_done)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
"act_Authorized&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
CALLACTIVE"</FONT></DIV>
<DIV><FONT face=Arial size=2>set 
fsm(CALLACTIVE,ev_leg_timer)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
"act_ActiveTimer&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; PLAYDISCONNECT"<BR>set 
fsm(PLAYDISCONNECT,ev_setup_done)&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
"act_PlayDisconnect&nbsp; CALLDISCONNECT"</FONT></DIV>
<DIV><FONT face=Arial size=2>.....</DIV>
<DIV><BR></DIV></FONT>
<DIV><FONT face=Arial size=2>Debug log:</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>*Apr 27 08:05:36.387: 
//-1//TCL2:HN14E69330:/tcl_timerObjCmd:<BR>*Apr 27 08:05:36.387: 
tcl_timerObjCmd: timer start leg_timer 10 leg_incoming<BR>*Apr 27 08:05:36.387: 
//-1//TCL2:HN14E69330:/tcl_timerStartObjCmd: start leg_timer 10 
leg_incoming<BR>.....</FONT></DIV>
<DIV><FONT face=Arial size=2>*Apr 27 08:05:46.391: //427//APPL:/AppProcessEvent: 
Event 0x64C61C2C APP_EV_LEG_TIMER[1]:<BR>*Apr 27 08:05:46.391: 
//427//APPL:/AppProcessEvent: LEG[427&nbsp;&nbsp;&nbsp; 
][VXML_HAN][LEG_INCCONNECTED(5)][Cause(0)][DEBUG(0)][UC=1 ]<BR>*Apr 27 
08:05:46.391: //-1//APPL:/AppFreeEvent: Freeing event 0x64C61C2C 
APP_EV_LEG_TIMER[1]<BR></DIV></FONT></BODY></HTML>