shpa3api.bas

三汇CTI示例程序源码

Attribute VB_Name = "Shpa3api"

'enum{
Public Const ANALOG_CH = 0
Public Const INTER_CH = 1
Public Const USER_CH = 2
Public Const REC_CH = 3
Public Const SS1_CH = 4
Public Const FAX_CH = 5
'} As  Long

'//pending reason
'enum{
Public Const ANALOGOUT_NO_DIALTONE = 0
Public Const ANALOGOUT_BUSYTONE = 1
Public Const ANALOGOUT_ECHO_NOVOICE = 2
Public Const ANALOGOUT_NOANSWER = 3
Public Const ANALOGOUT_TALKING_REMOTE_HANGUPED = 4

Public Const SS1IN_WAIT_SET_KB = 10
Public Const SS1IN_BWD_KB5 = 11
Public Const SS1IN_TALKING_REMOTE_HANGUPED = 12         '// 自动呼入时检测到主叫用户先挂机


Public Const SS1OUT_TALKING_REMOTE_HANGUPED = 20        '// 自动呼出进入通话后检测到被叫用户先挂机
Public Const SS1OUT_NOANSWER = 21                   '// 等待被叫用户摘机超时
Public Const SS1OUT_NOBWDACK = 22                   '// 等待占用应答信号超时
Public Const SS1OUT_DIALING_BWD_HANGUP = 23             '// 收到后向拆线信号
Public Const SS1OUT_BWD_A5 = 24                         '// 收到A=5（空号）信号
Public Const SS1OUT_BWD_KB5 = 25                        '// 收到KB=5（空号）信号
Public Const SS1OUT_BWD_KB2 = 26                        '// 用户“市忙”
Public Const SS1OUT_BWD_KB3 = 27                        '// 用户”长忙“
Public Const SS1OUT_BWD_A4 = 28                         '// 机键拥塞
Public Const SS1OUT_BWD_KB4 = 29                        '// 收到KB=4（机键拥塞）信号
Public Const SS1OUT_TIMEOUT_BWD_A = 30                  '// 等候接收后向A组信号超时
Public Const SS1OUT_TIMEOUT_BWD_A_STOP = 31             '// 等候后向A组信号停发超时
Public Const SS1OUT_TIMEOUT_BWD_KB = 32                 '// 接收后向KB信号超时
Public Const SS1OUT_TIMEOUT_BWD_KB_STOP = 33            '// 等候被叫方停发后向KB信号超时
Public Const SS1OUT_TIMEOUT_CALLERID_BWD_A1 = 34        '// 收到未定义的后向A组信号
Public Const SS1OUT_TIMEOUT_CALLERID_BWD_A1_STOP = 35 '// 发送CALLERID时等候后向A组信号停发超时
Public Const SS1OUT_UNDEFINED_CALLERID_BWD_A = 36   '// 发送主叫号码时收到未定义的后向A组信号
Public Const SS1OUT_UNDEFINED_BWD_A = 37                '// 收到未定义的后向A组信号
Public Const SS1OUT_UNDEFINED_BWD_KB = 38            '// 收到未定义的KB信号
'} As  Long


'enum{
Public Const S_CALL_STANDBY = 0
Public Const S_CALL_PICKUPED = 1
Public Const S_CALL_RINGING = 2
Public Const S_CALL_TALKING = 3
Public Const S_CALL_ANALOG_WAITDIALTONE = 4
Public Const S_CALL_ANALOG_TXPHONUM = 5
Public Const S_CALL_ANALOG_WAITDIALRESULT = 6
Public Const S_CALL_PENDING = 7
Public Const S_CALL_OFFLINE = 8

Public Const S_CALL_WAIT_REMOTE_PICKUP = 9
Public Const S_CALL_ANALOG_CLEAR = 10

Public Const S_CALL_SS1_BLOCK = 20
Public Const S_CALL_SS1_SAYIDLE = 21

Public Const S_CALL_SS1IN_WAIT_PHONUM = 30
Public Const S_CALL_SS1IN_WAIT_FWDSTOP = 31
Public Const S_CALL_SS1IN_WAIT_CALLERID = 32
Public Const S_CALL_SS1IN_WAIT_KD = 33
Public Const S_CALL_SS1IN_WAIT_KDSTOP = 34

Public Const S_CALL_SS1OUT_WAITBWDACK = 40
Public Const S_CALL_SS1OUT_TXPHONENUM = 41
Public Const S_CALL_SS1OUT_WAIT_PHONUM = 42
Public Const S_CALL_SS1OUT_TXCALLERID = 43
Public Const S_CALL_SS1OUT_WAIT_KB = 44
Public Const S_DTRC_ACTIVE = 128
'} As  Long

'enum{
Public Const DIAL_STANDBY = 0
Public Const DIAL_DIALING = 1
Public Const DIAL_ECHOTONE = 2
Public Const DIAL_NO_DIALTONE = 3
Public Const DIAL_BUSYTONE = 4
Public Const DIAL_ECHO_NOVOICE = 5
Public Const DIAL_NOVOICE = 6
Public Const DIAL_VOICE = 7
Public Const DIAL_VOICEF1 = 8
Public Const DIAL_VOICEF2 = 9
Public Const DIAL_NOANSWER = 10
Public Const DIAL_FAILURE = 11
Public Const DIAL_INVALID_PHONUM = 12
'} As  Long

'// 事件码占用16bytes，采用顺序编码（从0开始编码）。
'// 若采用windows消息机制，windows消息编码：事件码+0x7000(WM_USER)
'enum{
'    //语音识别
    Public Const E_PROC_Recognize = &H0  '//语音识别结束事件

'    //ISDN呼叫
    Public Const E_CHG_ISDNStatus = &H1 '//ISDN底层状态改变事件

'    //ss7
    Public Const E_RCV_Ss7Msu = &H2    ' //SS7 MSU接收通知事件
    Public Const E_CHG_Mtp3State = &H3     '//Mtp3状态改变事件

'    //传真
    Public Const E_CHG_FaxChState = &H4     '//传真通道传真状态改变事件
    Public Const E_CHG_FaxPages = &H5     '//传真接收/发送页结束事件
    Public Const E_PROC_FaxEnd = &H6     '//传真结束事件

'    //PCM线路同步状态
    Public Const E_CHG_PcmLinkStatus = &H7     '//PCM线路同步状态改变事件


'    //录音通道
    Public Const E_CHG_LineVoltage = &H8    ' //录音通道线路电压变化事件


'    //ss1
    Public Const E_RCV_CAS = &H9     '//接收到的CAS值有变化
    Public Const E_RCV_R2 = &HA     '//收到新的R2 值


'    //DTMF接收
    Public Const E_PROC_WaitDTMF = &HB    '//WaitDTMF任务结束事件
    Public Const E_CHG_RcvDTMF = &HC

'    //DTMF发送
    Public Const E_PROC_SendDTMF = &HD     '//发送DTMF任务结束事件


'    //发送闪断
    Public Const E_PROC_SendFlash = &HE     '//发送闪断任务结束事件


'    //放音
    Public Const E_PROC_PlayEnd = &HF     '//放音任务结束
    Public Const E_PROC_PlayFile = &H10    '//文件放音进程指示
    Public Const E_PROC_PlayFileList = &H11    '//文件列表放音进程指示


    Public Const E_PROC_PlayMem = &H12    '//内存放音进程指示

'    //录音
    Public Const E_PROC_RecordEnd = &H13    '//录音任务结束
    Public Const E_PROC_RecordFile = &H14    '//文件录音任务进展指示
    Public Const E_PROC_RecordMem = &H15    '//内存录音任务进展指示


'    //FSK发送
    Public Const E_PROC_SendFSK = &H16    '//发送FSK任务结束事件

'    //FSK接收
    Public Const E_PROC_RcvFSK = &H17    '//RcvFSK任务结束


'    //呼叫控制
    Public Const E_CHG_ChState = &H18    '//通道状态发生变化
    Public Const E_PROC_AutoDial = &H19    '//AutoDial任务有进展
    Public Const E_CHG_RemoteChBlock = &H1A
    Public Const E_CHG_RemotePCMBlock = &H1B
    Public Const E_SYS_ActualPickup = &H1C    '//外线通道实际摘机
    Public Const E_CHG_RingFlag = &H1D    '//铃流电平变化
    Public Const E_CHG_RingCount = &H1E    '//振铃计数变化
    Public Const E_CHG_CIDExBuf = &H1F    '//CID扩展接收缓冲区变化
    Public Const E_CHG_RxPhoNumBuf = &H20    '//被叫号码接收缓冲区变化
    Public Const E_CHG_PolarRvrsCount = &H21   '//外线通道极性反转
    Public Const E_SYS_RemotePickup = &H22    '//模拟电话线相对能量算法检测被叫摘机

'    //座席
    Public Const E_CHG_FlashCount = &H23    '//flash计数发生变化
    Public Const E_CHG_HookState = &H24    '//Hook状态发生变化

'    //信号音检测
    Public Const E_CHG_ToneAnalyze = &H25    '//信号音分析结果变化事件
    Public Const E_OverallEnergy = &H26
    Public Const E_CHG_OvrlEnrgLevel = &H27   '//全频能量标识输出事件
    Public Const E_CHG_BusyTone = &H28    '//忙音计数变化事件
    Public Const E_CHG_BusyToneEx = &H29    '//松散忙音变化
    Public Const E_CHG_VocFxFlag = &H2A    '//单音频信号音电平变化
    Public Const E_CHG_ToneValue = &H2B    '//信号音电平变化
    Public Const E_CHG_RingEchoToneTime = &H2C
    Public Const E_CHG_PeakFrq = &H2D    '//PeakFrq有变化
    Public Const E_SYS_BargeIn = &H3E    '//检测到BargeIn
    Public Const E_SYS_NoSound = &H2F    '//检测到NoSound

'    //定时器
    Public Const E_SYS_TIMEOUT = &H30    '//定时器事件

'    //信令监控
    Public Const E_CHG_SpyState = &H31    '//被监控电路的接续状态通知事件
    Public Const E_CHG_SpyLinkStatus = &H32    '//被监控的PCM链路状态通知事件
'};