📄 index.usml

📁 中国移动IVR开发范例
💻 USML
📖 第 1 页 / 共 5 页
字号:
上一页 1 2 3 45
				<Default>
					<IO_Node Name="播报_提示重新输入" ProcessError="false">
						<InputVarNameSet>
							<VarName>m_PV_ErrReEnter</VarName>
						</InputVarNameSet>
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
						<PlayFile FileNameVar="m_PV_ErrReEnter" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
					</IO_Node>
					<ReferceNode Name="RNode35" ToService="false" RefWorkflowName="95001122.违章明细查询_车牌">
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
					</ReferceNode>
				</Default>
			</Branch_Node>
		</Workflow>
		<Workflow Name="95001122.确认编号_车牌">
			<Branch_Node Name="判断查询类型" VarName="m_QueryMode">
				<BranchItem Operator="Equal" ItemExpression="1">
					<IO_Node Name="确认车牌号码" ProcessError="false">
						<InputVarNameSet><VarName>m_CardsInfoExt</VarName><VarName>m_PV_AffirmInfo</VarName><VarName>m_PV_InputCardsIS</VarName></InputVarNameSet><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><PlayFile FileNameVar="m_PV_InputCardsIS" CanBreak="false" PlayCount="1" WaitTimeOnce="5"/>
						<PlayTTS CanBreak="true" PlayCount="1" WaitTimeOnce="5" LanguageTypeVar="m_PronLanguage">
							<VarName>m_CardsInfoExt</VarName>
						</PlayTTS>
						<PlayFile FileNameVar="m_PV_AffirmInfo" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
					</IO_Node>
					<ReferceNode Name="RNode91" ToService="false" RefWorkflowName="95001122.确认编号收键_车牌">
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
					</ReferceNode></BranchItem>
				<BranchItem Operator="Equal" ItemExpression="2">
					<IO_Node Name="确认车牌号码1" ProcessError="false">
						<InputVarNameSet>
							<VarName>m_Num</VarName>
							<VarName>m_PV_AffirmInfo</VarName>
							<VarName>m_PV_InputCardsIS</VarName>
							<VarName>m_PVT_CardsChar</VarName>
							<VarName>m_PVT_CardsCharExt</VarName>
						</InputVarNameSet>
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
						<PlayFile FileNameVar="m_PV_InputCardsIS" CanBreak="false" PlayCount="1" WaitTimeOnce="5"/>
						<PlayFile FileNameVar="m_PVT_CardsChar" CanBreak="false" PlayCount="1" WaitTimeOnce="5"/>
						<PlayFile FileNameVar="m_PVT_CardsCharExt" CanBreak="false" PlayCount="1" WaitTimeOnce="5"/>
						<PlayTTS CanBreak="false" PlayCount="1" WaitTimeOnce="5" LanguageTypeVar="m_PronLanguage">
							<VarName>m_Num</VarName>
						</PlayTTS>
						<PlayFile FileNameVar="m_PV_AffirmInfo" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
					</IO_Node>
					<ReferceNode Name="RNode31" ToService="false" RefWorkflowName="95001122.确认编号收键_车牌">
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
					</ReferceNode>
				</BranchItem>
				<Default/>
			</Branch_Node>
		</Workflow>
		<Workflow Name="95001122.确认编号收键_车牌">
			<IO_Node Name="接收用户选择" ProcessError="true">
				<OutVarNameSet>
					<VarName>m_DTMFBuf</VarName>
					<ResultVarName>m_PrevResult</ResultVarName>
				</OutVarNameSet>
				<GetDTMF DTMFVar="m_DTMFBuf" Count="1" EndFlag="" IsClearDTMFBuffer="false" TimeoutSecond="15" ReturnEndChar="false"/>
			</IO_Node>
			<Branch_Node Name="捕获错误" VarName="m_PrevResult">
				<BranchItem Operator="Equal" ItemExpression="No_Error">
					<Branch_Node Name="判断用户按键" VarName="m_DTMFBuf">
						<Default>
							<ReferceNode Name="RNode33" ToService="false" RefWorkflowName="95001122.违章明细查询_车牌">
								<OutVarNameSet>
									<ResultVarName>m_PrevResult</ResultVarName>
								</OutVarNameSet>
							</ReferceNode>
						</Default>
						<BranchItem Operator="Equal" ItemExpression="1">
							<IO_Node Name="播报_开始查询" ProcessError="false">
								<InputVarNameSet>
									<VarName>m_PV_Waiting</VarName>
									<VarName>m_PV_WaitMassage</VarName>
								</InputVarNameSet>
								<OutVarNameSet>
									<ResultVarName>m_PrevResult</ResultVarName>
								</OutVarNameSet>
								<PlayFile FileNameVar="m_PV_WaitMassage" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
								<PlayFile FileNameVar="m_PV_Waiting" CanBreak="false" PlayCount="0" WaitTimeOnce="5"/>
							</IO_Node>
							<Compute_Node Name="CNode1" Language="VBScript" TimeoutSecond="300" ProcessError="false" SafeMode="false"><InputVarNameSet><VarName>m_CardsInfoExt</VarName></InputVarNameSet><OutVarNameSet><VarName>m_DocID</VarName><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><Content>
m_DocID=m_CardsInfoExt</Content></Compute_Node><ReferceNode Name="RNode9" ToService="false" RefWorkflowName="调接口.开始"><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet></ReferceNode></BranchItem>
					</Branch_Node>
				</BranchItem>
				<BranchItem Operator="Equal" ItemExpression="TimeOut">
					<ReferceNode Name="RNode40" ToService="false" RefWorkflowName="95001122.违章明细查询_车牌">
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
					</ReferceNode>
				</BranchItem>
				<Default/>
			</Branch_Node>
		</Workflow>
		<Workflow Name="95001122.查询结果_车牌">
			<Branch_Node Name="判断查询结果1" VarName="m_ResultExt">
				<BranchItem Operator="Equal" ItemExpression="SUCCESS">
					<Compute_Node Name="数据初始化11" Language="VBScript" TimeoutSecond="300" ProcessError="false" SafeMode="false">
						<OutVarNameSet><VarName>m_RecordCurPostion</VarName><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><Content>
m_RecordCurPostion = 0  
showmsg"m_RecordCurPostion="&amp;m_RecordCurPostion</Content></Compute_Node><Branch_Node Name="BNode1" VarName="m_QueryMode"><BranchItem Operator="Equal" ItemExpression="1"><ReferceNode Name="RNode32" ToService="false" RefWorkflowName="修改.快速查询"><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet></ReferceNode></BranchItem><BranchItem Operator="Equal" ItemExpression="2"><IO_Node Name="IONode111" ProcessError="false"><InputVarNameSet><VarName>m_PV_1</VarName><VarName>m_PV_3</VarName><VarName>m_RecordCount</VarName></InputVarNameSet><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><PlayFile FileNameVar="m_PV_1" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/><PlayTTS CanBreak="true" PlayCount="1" WaitTimeOnce="5" LanguageTypeVar="m_PronLanguage"><VarName>m_RecordCount</VarName></PlayTTS><PlayFile FileNameVar="m_PV_3" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/></IO_Node><ReferceNode Name="RNode13" ToService="false" RefWorkflowName="95001122.查询结果详单_证牌"><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet></ReferceNode></BranchItem><Default/></Branch_Node></BranchItem>
				<BranchItem Operator="Equal" ItemExpression="NULL">
					<IO_Node Name="播报_查询结果" ProcessError="false">
						<InputVarNameSet><VarName>m_PV_RecordNull</VarName></InputVarNameSet><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><PlayFile FileNameVar="m_PV_RecordNull" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
					</IO_Node>
					<ReferceNode Name="RNode38" ToService="false" RefWorkflowName="95001122.违章积分查询_Main">
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
					</ReferceNode>
				</BranchItem>
				<Default>
					<IO_Node Name="播报_系统正忙" ProcessError="false">
						<InputVarNameSet>
							<VarName>m_PV_Fail</VarName>
						</InputVarNameSet>
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
						<PlayFile FileNameVar="m_PV_Fail" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
					</IO_Node>
					<ReferceNode Name="RNode39" ToService="false" RefWorkflowName="95001122.违章积分查询_Main">
						<OutVarNameSet>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
					</ReferceNode>
				</Default>
			</Branch_Node>
		</Workflow>
		<Workflow Name="95001122.判断是否完成_车牌"><Compute_Node Name="判断是否完成" Language="VBScript" TimeoutSecond="300" ProcessError="false" SafeMode="false"><InputVarNameSet><VarName>m_RecordCount</VarName><VarName>m_RecordCurPostion</VarName><VarName>m_RecordString</VarName></InputVarNameSet><OutVarNameSet><VarName>m_fen</VarName><VarName>m_money</VarName><VarName>m_name</VarName><VarName>m_office</VarName><VarName>m_place</VarName><VarName>m_RecordDate</VarName><VarName>m_RecordEndFlag</VarName><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><Content>
Dim vRecord                              
Dim vTemp                      
'判断是否完成
If clng(m_RecordCurPostion) &gt;= clng(m_RecordCount) Then
   m_RecordEndFlag = "TRUE"
Else   
  
   vRecord = Split(m_RecordString,"|")  
   vTemp = Trim(vRecord(clng(m_RecordCurPostion) * 6))  
   m_RecordDate = Left(vTemp, 4) &amp; "-" &amp; Mid(vTemp, 5, 2) &amp; "-" &amp; Mid(vTemp,7,2)
   
   m_name = Trim(vRecord(clng(m_RecordCurPostion) * 6 + 2)) 
   m_place=Trim(vRecord(clng(m_RecordCurPostion) * 6 + 1))
   m_office=Trim(vRecord(clng(m_RecordCurPostion) * 6 + 3))
   m_money= Trim(vRecord(clng(m_RecordCurPostion) * 6 + 4))
   m_fen=Trim(vRecord(clng(m_RecordCurPostion) * 6 + 5))
   m_RecordCurPostion = clng(m_RecordCurPostion) + 1
   m_RecordEndFlag = "FALSE"
End If</Content></Compute_Node><Branch_Node Name="是否结束" VarName="m_RecordEndFlag"><BranchItem Operator="Equal" ItemExpression="FLASE"><Compute_Node Name="TTS1" Language="VBScript" TimeoutSecond="300" ProcessError="false" SafeMode="false">
						<InputVarNameSet><VarName>m_ChannelDN</VarName><VarName>m_name</VarName><VarName>m_place</VarName><VarName>m_Tts_Ip</VarName><VarName>m_VoicePathTemp</VarName><VarName>m_office</VarName></InputVarNameSet><OutVarNameSet><VarName>m_Voice_Name1</VarName><VarName>m_Voice_Name2</VarName><VarName>m_Voice_Name3</VarName><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><Content>
Dim oDevice,temp1   ,temp2
m_Voice_Name1=m_VoicePathTemp &amp; m_channelDN&amp;"1" &amp; ".vox" 
m_Voice_Name2=m_VoicePathTemp &amp; m_channelDN &amp; ".vox"
m_Voice_Name3=m_VoicePathTemp &amp; m_channelDN &amp;"3"&amp; ".vox"
Set oDevice = CreateObject("NEWpFlyTTS.NEWciFlyTTS")
temp1 = odevice.txt2voice(m_place,m_Voice_Name1,m_Tts_Ip) 
temp2 = odevice.txt2voice(m_name,m_Voice_Name2,m_Tts_Ip) 
temp3 = odevice.txt2voice(m_office,m_Voice_Name3,m_Tts_Ip)
showmsg "m_Voice_Name1=" &amp; m_Voice_Name1
showmsg "m_Voice_Name2=" &amp; m_Voice_Name2</Content></Compute_Node><IO_Node Name="播报_查询结果1" ProcessError="false">
						<InputVarNameSet><VarName>m_fen</VarName><VarName>m_PV_Yuan</VarName><VarName>m_RecordContent</VarName><VarName>m_RecordDate</VarName><VarName>m_Voice_Name1</VarName><VarName>m_Voice_Name2</VarName><VarName>m_Voice_Name3</VarName><VarName>m_PV_UnitFen</VarName></InputVarNameSet><OutVarNameSet><ResultVarName>m_PrevResult</ResultVarName></OutVarNameSet><PlayTTS CanBreak="true" PlayCount="1" WaitTimeOnce="5" LanguageTypeVar="m_PronLanguage"><VarName>m_RecordDate</VarName></PlayTTS><PlayFile FileNameVar="m_Voice_Name1" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/><PlayFile FileNameVar="m_Voice_Name3" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/><PlayFile FileNameVar="m_Voice_Name2" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/><PlayTTS CanBreak="true" PlayCount="1" WaitTimeOnce="5" LanguageTypeVar="m_PronLanguage"><VarName>m_fen</VarName></PlayTTS><PlayFile FileNameVar="m_PV_Yuan" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/><PlayTTS CanBreak="true" PlayCount="1" WaitTimeOnce="5" LanguageTypeVar="m_PronLanguage"><VarName>m_fen</VarName></PlayTTS><PlayFile FileNameVar="m_PV_UnitFen" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/></IO_Node></BranchItem><BranchItem Operator="Equal" ItemExpression="TRUE"><IO_Node Name="播报_是否重听1" ProcessError="true">
						<InputVarNameSet>
							<VarName>m_PV_ListenAgain</VarName>
						</InputVarNameSet>
						<OutVarNameSet>
							<VarName>m_DTMFBuf</VarName>
							<ResultVarName>m_PrevResult</ResultVarName>
						</OutVarNameSet>
						<PlayFile FileNameVar="m_PV_ListenAgain" CanBreak="true" PlayCount="1" WaitTimeOnce="5"/>
						<GetDTMF DTMFVar="m_DTMFBuf" Count="1" EndFlag="" IsClearDTMFBuffer="false" TimeoutSecond="15" ReturnEndChar="false"/>
					</IO_Node><Branch_Node Name="捕获错误1" VarName="m_PrevResult">
						<BranchItem Operator="Equal" ItemExpression="No_Error">
							<Branch_Node Name="判断用户按键" VarName="m_DTMFBuf">
								<BranchItem Operator="Equal" ItemExpression="1">
									<Compute_Node Name="数据初始化" Language="VBScript" TimeoutSecond="300" ProcessError="false" Sa
上一页 1 2 3 45
💿 文件大小 108 K
👤 上传用户 zhhw254774338
📂 所属分类其他
🏷️ 相关标签

#IVR #中国移动 #范例
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -