I'm trying to modify my vxml script to hybrid tcl+vxml
Could somebody help me?
if the call is fax then return phone number 4463
if where is no input then return phone number 4450
if the user enter the correct phone number then return collected number.
My have very superficial knowledge of vxml.
#----------------------------------------------------------------------------------------
# Procedure act_VxmlDialog1
# In this proc¿dure, a VXML document is invoked and the VXML dialog prompts
# the user to enter an phone number or wait for an operator. User input is passed back
# to the TCL script.
#
proc act_VxmlDialog1 { } {
global baseURI
# the base URL is the location of this TCL script
set vxmlDialog1 {
<vxml version="2.0">
<form id="main">
<block>
<prompt>
<audio src="flash:hello.au"/>
</prompt>
<goto next="#getdst"/>
</block>
</form>
<form id="getdst">
<var name="dest" expr="'4465'"/>
<block>
<prompt>
<audio src="flash:menu.au"/>
</prompt>
</block>
<property name="timeout" value="7s"/>
<catch event="com.cisco.fax.cng"> <log>*** Fax ***</log><goto next="#fax"/></catch>
<catch event="noinput"> <log>*** No Input ***</log><goto next="#operator"/></catch>
<catch event="nomatch"> <log>*** No Match ***</log> <goto next="#out"/></catch>
<field name="ext" type="digits?length=4">
<grammar type="application/grammar+regex">[34][0-9][0-9][0-9]</grammar>
<filled><assign name="dest" expr="ext"/></filled>
</field>
<filled> <exit namelist="dest"/> </filled>
</form>
<form id="operator">
<filled>
<assign name="dest" expr="'4450'"/>
</filled>
</form>
<form id="fax">
<filled>
<assign name="dest" expr="'4463'"/>
</filled>
</form>
<form id="out">
<block>
<prompt>
<audio src="flash:out.au"/>
</prompt>
<goto next="#getdst"/>
</block>
</form>
</vxml>
}
leg setupack leg_incoming
leg proceeding leg_incoming
leg connect leg_incoming
leg vxmldialog leg_incoming -u $baseURI -v $vxmlDialog1
}
