📄 83.sc

📁 IVR的开发工具包,对于想进入IVR行业淘金的人有很大的用处哈
💻 SC
📖 第 1 页 / 共 2 页
字号:
上一页 12
	[ STRCAT SR28,"," ]
	[ STRCAT SR28,"0" ] //SERVICEID(int)
	[ STRCAT SR28,"," ]
	[ STRCAT SR28,"1" ] //ANSWERTYPE(int)
	[ STRCAT SR28,"," ]
	[ STRCAT SR28,"3" ] //PRIORITY(int)
	[ STRCAT SR28,"," ]
	[ STRCAT SR28,"0" ] //STATUS(int)
	[ STRCAT SR28,")" ]
	[ ExecSQL SR28 ]
		Passed  -> DO_SEND_OK
		Failed  -> DO_SEND_FAIL
		TimeOut -> DO_SEND_FAIL

:DO_SEND_OK
	[Assign IR1,1]
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "..\GLOBAL\SEND_INPUT_MOBILE_NUM_SUCC.vox"]
		StopPlayBack -> stExit
		DialTerminate -> stExit
		Failed -> stExit
:DO_SEND_FAIL
	[Assign IR1,0]
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "..\GLOBAL\SEND_INPUT_MOBILE_NUM_FAIL.vox"]
		StopPlayBack -> stExit
		DialTerminate -> stExit
		Failed -> stExit
:ERR_VOICE
	[Assign IR1,-1]
	->stExit

:stExit
	[RETURN IR1]
}

//=========================================================================================================================== Mobile Download Start
/********************************************************
2006-9-14
Huanglw@staff.chinabyte.com (023-86583088)
********************************************************/

PRO_MobileDownload
{
:stWait
	[Assign IR0,0]
	-> MENU
:MENU
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "sound\MobileDownload\menu168.vox"]
		StopPlayBack -> MENU_GETKEY
		DialTerminate -> MENU_GETKEY
		Bargein -> MENU_GETKEY
		Failed -> MENU_GETKEY
:MENU_GETKEY
	[DIGIT 5]
		StopDigits('1') -> MENU_1
		StopDigits('2') -> MENU_2
		StopDigits('3') -> MENU_3
		StopDigits -> MENU
		Timeout -> MENU

:MENU_1
	[CALLFUNC &PRO_MobileDownload_RingModule]
		Returned -> MENU
:MENU_2
	[CALLFUNC &PRO_MobileDownload_GalleryModule]
		Returned -> MENU
:MENU_3
	[CALLFUNC &PRO_MobileDownload_CustomRingModule]
		Returned -> MENU
:stExit
	[RETURN 0]
}

PRO_MobileDownload_RingModule
{
:stWait
	[ASSIGN IR1,0]
	->MENU
:MENU
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "sound\MobileDownload\ls168.vox"]
		StopPlayBack -> MENU_GETKEY
		DialTerminate -> MENU_GETKEY
		Bargein -> MENU_GETKEY
		Failed -> MENU_GETKEY
:MENU_GETKEY
	[DIGIT 5]
		StopDigits('*') -> stExit
		StopDigits('#') -> MENU
		StopDigits -> MENU_RLT
		Timeout -> MENU
:MENU_RLT
	[STOI SR0]
	[ASSIGN IR5,IR0]
	->LOAD_INIT
:LOAD_INIT
	[SwitchDBA 204]
		Passed -> LOAD_FILENAME
		Failed -> stExit
:LOAD_FILENAME
	[ASSIGN SR10,"SELECT TOP 1 RID,RESID FROM PRO_MOBILEDOWNLOAD_lIST WHERE TYPE='RING' AND NUMBER="]
	[ITOS IR5]
	[STRCAT SR10,SR0]
	[ExecSQL SR10 ]
		Passed  -> LOAD_FILENAME_RLT
		Failed  -> MENU
		TimeOut -> MENU
:LOAD_FILENAME_RLT
	[ASSIGN SR16,FD0]
	[ASSIGN SR17,FD1]
	->PLAY_DO

:PLAY_DO
	[Assign SR20,"SOUND-INFO\MobileDownload\"]
	[StrCat SR20,SR17]
	[StrCat SR20,".vox"]
	[ClearDTMF]
	[SetDTMF "1230#*"]
	[PlayFile SR20]
		StopPlayBack -> PLAY_DO_GETKEY
		DialTerminate -> PLAY_DO_GETKEY
		Bargein -> PLAY_DO_GETKEY
		Failed -> PLAY_NEXT
:PLAY_DO_GETKEY
	[DIGIT 5]
		StopDigits('1') -> PLAY_NEXT
		StopDigits('2') -> PLAY_DO
		StopDigits('3') -> PLAY_PREV
		StopDigits('0') -> PLAY_DOWNLOAD
		StopDigits('#') -> PLAY_SEND
		StopDigits('*') -> BACK_TO_MENU
		StopDigits -> PLAY_NEXT
		Timeout -> PLAY_NEXT
:PLAY_PREV
	[Dec IR5]
	[Less IR5,1]
		Passed -> PLAY_PREV_RESET
		Failed -> LOAD_FILENAME
:PLAY_NEXT
	[Add IR5,1]
	[Great IR5,10]
		Passed -> PLAY_NEXT_RESET
		Failed -> LOAD_FILENAME	
:PLAY_NEXT_RESET
	[Assign IR5,1]
	->LOAD_FILENAME
:PLAY_PREV_RESET
	[Assign IR5,10]
	->LOAD_FILENAME
:PLAY_SEND
	[Assign SR10,SR20]
	[CALLFUNC &SEND_VOICE]
		Returned -> LOAD_INIT
:PLAY_DOWNLOAD
	[CALLFUNC &PRO_MobileDownload_Download]
		Returned -> LOAD_INIT

:ERR_VOICE
	[ Assign IR1,-1]
	->stExit
:BACK_TO_MENU
	[ Assign IR1,0]
	->stExit
:BACK_TO_UP
	[ Assign IR1,1]
	->stExit
:stExit
	[RETURN IR1]
}

PRO_MobileDownload_GalleryModule
{
:stWait
	[ASSIGN IR1,0]
	->MENU
:MENU
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "sound\MobileDownload\tst168.vox"]
		StopPlayBack -> MENU_GETKEY
		DialTerminate -> MENU_GETKEY
		Bargein -> MENU_GETKEY
		Failed -> MENU_GETKEY
:MENU_GETKEY
	[DIGIT 5]
		StopDigits('*') -> stExit
		StopDigits('#') -> MENU
		StopDigits -> MENU_RLT
		Timeout -> MENU
:MENU_RLT
	[STOI SR0]
	[ASSIGN IR5,IR0]
	->LOAD_INIT
:LOAD_INIT
	[SwitchDBA 204]
		Passed -> LOAD_FILENAME
		Failed -> stExit
:LOAD_FILENAME
	[ASSIGN SR10,"SELECT TOP 1 RID,RESID FROM PRO_MOBILEDOWNLOAD_lIST WHERE TYPE='PIC' AND NUMBER="]
	[ITOS IR5]
	[STRCAT SR10,SR0]
	[ExecSQL SR10 ]
		Passed  -> LOAD_FILENAME_RLT
		Failed  -> MENU
		TimeOut -> MENU
:LOAD_FILENAME_RLT
	[ASSIGN SR16,FD0]
	[ASSIGN SR17,FD1]
	->PLAY_DO

:PLAY_DO
	[Assign SR20,"SOUND-INFO\MobileDownload\"]
	[StrCat SR20,SR17]
	[StrCat SR20,".vox"]
	[ClearDTMF]
	[SetDTMF "12340#*"]
	[PlayFile SR20]
		StopPlayBack -> PLAY_DO_GETKEY
		DialTerminate -> PLAY_DO_GETKEY
		Bargein -> PLAY_DO_GETKEY
		Failed -> PLAY_NEXT
:PLAY_DO_GETKEY
	[DIGIT 5]
		StopDigits('1') -> PLAY_NEXT
		StopDigits('2') -> PLAY_DO
		StopDigits('3') -> PLAY_PREV
		StopDigits('4') -> PLAY_METHOD
		StopDigits('0') -> PLAY_DOWNLOAD
		StopDigits('#') -> PLAY_SEND
		StopDigits('*') -> BACK_TO_MENU
		StopDigits -> PLAY_NEXT
		Timeout -> PLAY_NEXT
:PLAY_PREV
	[Dec IR5]
	[Less IR5,1]
		Passed -> PLAY_PREV_RESET
		Failed -> LOAD_FILENAME
:PLAY_NEXT
	[Add IR5,1]
	[Great IR5,10]
		Passed -> PLAY_NEXT_RESET
		Failed -> LOAD_FILENAME	
:PLAY_NEXT_RESET
	[Assign IR5,1]
	->LOAD_FILENAME
:PLAY_PREV_RESET
	[Assign IR5,10]
	->LOAD_FILENAME
:PLAY_SEND
	[Assign SR10,SR20]
	[CALLFUNC &SEND_VOICE]
		Returned -> LOAD_INIT
:PLAY_DOWNLOAD	
	[CALLFUNC &PRO_MobileDownload_Download]
		Returned -> LOAD_INIT
:PLAY_METHOD
	[ClearDTMF]
	[SetDTMF "0*"]
	[PlayFile "SOUND-INFO\MobileDownload\tpmiji168.vox"]
		StopPlayBack -> PLAY_METHOD_GK
		DialTerminate -> PLAY_METHOD_GK
		Bargein -> PLAY_METHOD_GK
		Failed -> PLAY_DO
:PLAY_METHOD_GK
	[DIGIT 5]
		StopDigits('0') -> PLAY_METHOD_TS
		StopDigits('*') -> PLAY_DO
		StopDigits -> PLAY_METHOD_TS
		Timeout -> PLAY_DO
:PLAY_METHOD_TS
	[ClearDTMF]
	[SetDTMF "0*"]
	[PlayFile "SOUND-INFO\MobileDownload\error168.vox"]
		StopPlayBack -> PLAY_METHOD
		DialTerminate -> PLAY_METHOD
		Bargein -> PLAY_METHOD
		Failed -> PLAY_METHOD
:ERR_VOICE
	[ Assign IR1,-1]
	->stExit
:BACK_TO_MENU
	[ Assign IR1,0]
	->stExit
:BACK_TO_UP
	[ Assign IR1,1]
	->stExit
:stExit
	[RETURN IR1]
}

PRO_MobileDownload_CustomRingModule
{
:stWait
	[ASSIGN IR1,0]
	->MENU
:MENU
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "sound\MobileDownload\tsf.vox"]
		StopPlayBack -> MENU_GETKEY
		DialTerminate -> MENU_GETKEY
		Bargein -> MENU_GETKEY
		Failed -> MENU_GETKEY
:MENU_GETKEY
	[DIGIT 5]
		StopDigits('*') -> stExit
		StopDigits('#') -> MENU
		StopDigits -> MENU_RLT
		Timeout -> MENU_RLT
:MENU_RLT
	[STOI SR0]
	[ASSIGN IR5,1]
	->LOAD_INIT
:LOAD_INIT
	[SwitchDBA 204]
		Passed -> LOAD_FILENAME
		Failed -> stExit
:LOAD_FILENAME
	[ASSIGN SR10,"SELECT TOP 1 RID,RESID FROM PRO_MOBILEDOWNLOAD_lIST WHERE TYPE='CUSTOMRING' AND NUMBER="]
	[ITOS IR5]
	[STRCAT SR10,SR0]
	[ExecSQL SR10 ]
		Passed  -> LOAD_FILENAME_RLT
		Failed  -> MENU
		TimeOut -> MENU
:LOAD_FILENAME_RLT
	[ASSIGN SR16,FD0]
	[ASSIGN SR17,FD1]
	->PLAY_DO

:PLAY_DO
	[Assign SR20,"SOUND-INFO\MobileDownload\"]
	[StrCat SR20,SR17]
	[StrCat SR20,".vox"]
	[ClearDTMF]
	[SetDTMF "1230#*"]
	[PlayFile SR20]
		StopPlayBack -> PLAY_DO_GETKEY
		DialTerminate -> PLAY_DO_GETKEY
		Bargein -> PLAY_DO_GETKEY
		Failed -> PLAY_NEXT
:PLAY_DO_GETKEY
	[DIGIT 5]
		StopDigits('1') -> PLAY_NEXT
		StopDigits('2') -> PLAY_DO
		StopDigits('3') -> PLAY_PREV
		StopDigits('0') -> PLAY_DOWNLOAD
		StopDigits('#') -> PLAY_SEND
		StopDigits('*') -> BACK_TO_MENU
		StopDigits -> PLAY_NEXT
		Timeout -> PLAY_NEXT
:PLAY_PREV
	[Dec IR5]
	[Less IR5,1]
		Passed -> PLAY_PREV_RESET
		Failed -> LOAD_FILENAME
:PLAY_NEXT
	[Add IR5,1]
	[Great IR5,10]
		Passed -> PLAY_NEXT_RESET
		Failed -> LOAD_FILENAME	
:PLAY_NEXT_RESET
	[Assign IR5,1]
	->LOAD_FILENAME
:PLAY_PREV_RESET
	[Assign IR5,10]
	->LOAD_FILENAME
:PLAY_SEND
	[Assign SR10,SR20]
	[CALLFUNC &SEND_VOICE]
		Returned -> LOAD_INIT
:PLAY_DOWNLOAD
	[CALLFUNC &PRO_MobileDownload_Download]
		Returned -> LOAD_INIT

:ERR_VOICE
	[ Assign IR1,-1]
	->stExit
:BACK_TO_MENU
	[ Assign IR1,0]
	->stExit
:BACK_TO_UP
	[ Assign IR1,1]
	->stExit
:stExit
	[RETURN IR1]
}

PRO_MobileDownload_Download
{
:stWait
	[ASSIGN IR1,0]
	->MENU
:MENU
	[ClearDTMF]
	[SetDTMF "12*"]
	[PlayFile "SOUND\MobileDownload\down.vox"]
		StopPlayBack -> MENU_GETKEY
		DialTerminate -> MENU_GETKEY
		Bargein -> MENU_GETKEY
		Failed -> MENU_GETKEY
:MENU_GETKEY
	[DIGIT 5]
		StopDigits('1') -> DOWNLOAD_SELF
		StopDigits('2') -> DO_INPUT_MOBILE_NUM
		StopDigits('*') -> stExit
		StopDigits -> MENU
		Timeout -> MENU
:DOWNLOAD_SELF
	[ASSIGN SR5,$CALLERID]
	[ASSIGN SR6,@ServNo]
	[ASSIGN SR7,$CALLEDID]
	[ASSIGN SR8,$CALLERID]
	[ASSIGN SR9,SR16]
	->DOWNLOAD_WAIT

:DO_INPUT_MOBILE_NUM
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "SOUND\MobileDownload\phone.vox"]
		StopPlayBack -> DO_INPUT_MOBILE_NUM_GETKEY
		DialTerminate -> DO_INPUT_MOBILE_NUM_GETKEY
		Failed -> stExit
:DO_INPUT_MOBILE_NUM_GETKEY
	[SetDTMF "#"]
	[Input 12,30]
		StopDigits('#') -> DO_INPUT_MOBILE_NUM_RESULT
		StopDigits -> DO_INPUT_MOBILE_NUM_RESULT
		TimeOut -> DO_INPUT_MOBILE_NUM
:DO_INPUT_MOBILE_NUM_RESULT
	[ParseParam SR0,1,"#"]
	[Assign SR2,SR0]	//SR2=受送者手机号
	[StrLen SR2]
	[Equal IR0,11]
		Passed -> DO_INPUT_MOBILE_NUM_READ
		Failed -> DO_INPUT_MOBILE_NUM_RESULT_ERR
:DO_INPUT_MOBILE_NUM_READ
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "SOUND\MobileDownload\phone_in.vox"]
		StopPlayBack -> DO_INPUT_MOBILE_NUM_READ_NUM
		DialTerminate -> DO_INPUT_MOBILE_NUM_READ_NUM
		Failed -> DO_INPUT_MOBILE_NUM_READ_NUM
:DO_INPUT_MOBILE_NUM_READ_NUM
	[ClrMixer]
	[AddStrToMixer 3,SR2]
	[PlayMixer]
		StopPlayBack -> DO_INPUT_MOBILE_NUM_SURE_NUM
		DialTerminate -> DO_INPUT_MOBILE_NUM_SURE_NUM
:DO_INPUT_MOBILE_NUM_SURE_NUM
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "SOUND\MobileDownload\phone_sure.vox"]
		StopPlayBack -> DO_INPUT_MOBILE_NUM_SURE_NUM_GETKEY
		DialTerminate -> DO_INPUT_MOBILE_NUM_SURE_NUM_GETKEY
		Failed -> stExit
:DO_INPUT_MOBILE_NUM_SURE_NUM_GETKEY
	[SetDTMF "12*"]
	[Digit 9]
		StopDigits('1') -> DOWNLOAD_OTHER
		StopDigits('2') -> DO_INPUT_MOBILE_NUM
		StopDigits('*') -> stExit
		StopDigits -> DO_INPUT_MOBILE_NUM_READ
		TimeOut -> DO_INPUT_MOBILE_NUM_READ
:DO_INPUT_MOBILE_NUM_RESULT_ERR
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "SOUND\MobileDownload\phone_error.vox"]
		StopPlayBack -> DO_INPUT_MOBILE_NUM
		DialTerminate -> DO_INPUT_MOBILE_NUM
		Failed -> DO_INPUT_MOBILE_NUM

:DOWNLOAD_OTHER
	[ASSIGN SR5,$CALLERID]	//sMobile
	[ASSIGN SR6,@ServNo]		//ServNo
	[ASSIGN SR7,$CALLEDID]	//ServLno
	[ASSIGN SR8,SR2]		//rMobile
	[ASSIGN SR9,SR16]		//id
	->DOWNLOAD_WAIT

:DOWNLOAD_WAIT
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "SOUND\MobileDownload\phone_wait.vox"]
		StopPlayBack -> DOWNLOAD_NOW
		DialTerminate -> DOWNLOAD_NOW
		Bargein -> DOWNLOAD_NOW
		Failed -> DOWNLOAD_NOW

:DOWNLOAD_NOW

	[ ASSIGN SR28,"exec PRO_MobileSendTask_add '"]
	[ STRCAT SR28,SR5]
	[ STRCAT SR28,"','"]
	[ STRCAT SR28,SR8]
	[ STRCAT SR28,"',"]
	[ STRCAT SR28,SR9]
	[ STRCAT SR28,",'"]
	[ STRCAT SR28,SR6]
	[ STRCAT SR28,"','"]
	[ STRCAT SR28,SR7]
	[ STRCAT SR28,"'"]
	[ ExecSQL SR28 ]
		Passed  -> DOWNLOAD_SUCC
		Failed  -> stExit
		TimeOut -> stExit
:DOWNLOAD_SUCC
	[ClearDTMF]
	[SetDTMF "?"]
	[PlayFile "SOUND\MobileDownload\phone_ok.vox"]
		StopPlayBack -> stExit
		DialTerminate -> stExit
		Bargein -> stExit
		Failed -> stExit

:stExit
	[RETURN 0]
}
上一页 12
💿 文件大小 3034 K
👤 上传用户 pjamytian
📂 所属分类邮电通讯系统
🏷️ 相关标签

#IVR #开发工具包
⌨️ 快捷键说明

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