shpa3api.bas

三汇CTI示例程序源码

Public Declare Function SsmChkAutoDial Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetAutoDialFailureReason Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetBlockReason Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetChState Lib "SHP_A3.dll" (ByVal ch As Long) As Long

Public Declare Function SsmSetPlayDest Lib "SHP_A3.dll" (ByVal ch As Long, ByVal nSelDest As Long) As Long
Public Declare Function SsmSetRecBack Lib "SHP_A3.dll" (ByVal ch As Long, ByVal nRecBack As Long) As Long

Public Declare Function SsmSearchIdleCallOutCh Lib "SHP_A3.dll" (ByVal wSearchMode As Integer, ByVal dwPrecedence As Long) As Long
Public Declare Function SsmSetAutoCallDirection Lib "SHP_A3.dll" (ByVal ch As Long, ByVal bEnAutoCall As Long, ByVal nDirection As Long) As Long
Public Declare Function SsmGetAutoCallDirection Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pnDirection As Long) As Long
Public Declare Function SsmAppendPhoNum Lib "SHP_A3.dll" (ByVal ch As Long, ByVal szPhoNum As String) As Long
Public Declare Function SsmGetPendingReason Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetChStateKeepTime Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetPhoNumStr Lib "SHP_A3.dll" (ByVal ch As Long, ByVal pszPhoNum As String) As Long
Public Declare Function SsmGetPhoNumLen Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGet1stPhoNumStr Lib "SHP_A3.dll" (ByVal ch As Long, ByVal pszPhoNum As String) As Long
Public Declare Function SsmGet1stPhoNumLen Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmEnableAutoSendKB Lib "SHP_A3.dll" (ByVal ch As Long, ByVal bEnable As Long) As Long
Public Declare Function SsmGetAutoSendKBFlag Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetKB Lib "SHP_A3.dll" (ByVal ch As Long, ByVal btSigKB As Byte) As Long
Public Declare Function SsmSetKD Lib "SHP_A3.dll" (ByVal ch As Long, ByVal btSigKD As Byte) As Long
Public Declare Function SsmSetKA Lib "SHP_A3.dll" (ByVal ch As Long, ByVal btSigKA As Byte) As Long
Public Declare Function SsmSetTxCallerId Lib "SHP_A3.dll" (ByVal ch As Long, ByVal pszTxCallerId As String) As Long
Public Declare Function SsmGetTxCallerId Lib "SHP_A3.dll" (ByVal ch As Long, ByVal pszTxCallerId As String) As Long
Public Declare Function SsmGetKA Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetKB Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetKD Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmAutoDialEx Lib "SHP_A3.dll" (ByVal ch As Long, ByVal szPhoNum As String, ByVal wParam As Integer) As Long

'//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
'//  Following functions are newly appended by cxg for applications using SS7
'//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Public Declare Function SsmBlockLocalCh Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmUnblockLocalCh Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmQueryLocalChBlockState Lib "SHP_A3.dll" (ByVal ch As Long, ByRef pdwBlockState As Long) As Long
Public Declare Function SsmBlockLocalPCM Lib "SHP_A3.dll" (ByVal nLocalPcmNo As Long) As Long
Public Declare Function SsmUnblockLocalPCM Lib "SHP_A3.dll" (ByVal nLocalPcmNo As Long) As Long
Public Declare Function SsmQueryLocalPCMBlockState Lib "SHP_A3.dll" (ByVal nLocalPcmNo As Long, ByRef pdwBlockState As Long) As Long
Public Declare Function SsmQueryOpBlockRemoteCh Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmBlockRemoteCh Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmUnblockRemoteCh Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetRemoteChBlockStatus Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmBlockRemotePCM Lib "SHP_A3.dll" (ByVal nLocalPcmNo As Long, ByVal dwBlockMode As Long) As Long
Public Declare Function SsmUnblockRemotePCM Lib "SHP_A3.dll" (ByVal nLocalPcmNo As Long, ByVal dwUnblockMode As Long) As Long
Public Declare Function SsmGetRemotePCMBlockStatus Lib "SHP_A3.dll" (ByVal nLocalPcmNo As Long, ByVal dwBlockMode As Long) As Long
Public Declare Function SsmGetWaitAutoDialAnswerTime Lib "SHP_A3.dll" (ByRef pwSeconds As Integer) As Long
Public Declare Function SsmSetWaitAutoDialAnswerTime Lib "SHP_A3.dll" (ByVal wSeconds As Integer) As Long

'//Ver3.5.26.
'//+++BEGIN+++ Added by xxb for 模拟电话线相对能量算法检测被叫摘机不适用于调用SsmTxDtmf()外拨及二次拨号,2003.3.7
Public Declare Function SsmStartPickupAnalyze Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetPickup Lib "SHP_A3.dll" (ByVal ch As Long) As Long
'//+++END+++ Added by xxb for 模拟电话线相对能量算法检测被叫摘机不适用于调用SsmTxDtmf()外拨及二次拨号,2003.3.7
Public Declare Function SsmGetReleaseReason Lib "SHP_A3.dll" (ByVal ch As Long) As Long

'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@ ADAPTIVE FILTER OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function SsmQueryOpEchoCanceller Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetEchoCanceller Lib "SHP_A3.dll" (ByVal ch As Long, ByVal bRun As Long) As Long
Public Declare Function SsmGetEchoCancellerState Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSetEchoCancellerStudy Lib "SHP_A3.dll" (ByVal ch As Long, ByVal bRun As Long) As Long
Public Declare Function SsmGetEchoCancellerStudyState Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmGetEchoCancellerRatio Lib "SHP_A3.dll" (ByVal ch As Long) As Long
Public Declare Function SsmSaveEchoCancellerPara Lib "SHP_A3.dll" (ByVal ch As Long) As Long
'++
Public Declare Function SsmSetEchoCancelDelaySize Lib "SHP_A3.dll" (ByVal ch As Long, ByVal wSize As Integer) As Long
Public Declare Function SsmGetEchoCancelDelaySize Lib "SHP_A3.dll" (ByVal ch As Long) As Integer

'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@ CT-BUS OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function SsmListenTo Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmListenToEx Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal nVolume1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmStopListenTo Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmTalkWith Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmTalkWithEx Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal nVlm1 As Long, ByVal ch2 As Long, ByVal nVlm2 As Long) As Long
Public Declare Function SsmStopTalkWith Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Sub PlayListen Lib "SHP_A3.dll" (ByVal dwBId As Long, ByVal ch As Long)
Public Declare Sub PlayListenNew Lib "SHP_A3.dll" (ByVal dwSpeakerCh As Long, ByVal dwMonitorCh As Long)
Public Declare Sub StopListen Lib "SHP_A3.dll" (ByVal dwBId As Long)
Public Declare Sub StopListenNew Lib "SHP_A3.dll" (ByVal dwSpeakerCh As Long)
Public Declare Function SsmLinkFrom Lib "SHP_A3.dll" (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmStopLinkFrom Lib "SHP_A3.dll" (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmLinkFromEx Lib "SHP_A3.dll" (ByVal ch1 As Long, ByVal nVolume1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmLinkFromAllCh Lib "SHP_A3.dll" _
                                            (ByVal ch As Long, _
                                            ByRef nListenerTable As Long, _
                                            ByVal nListenerNum As Long) As Long
Public Declare Function SsmUnLinkFromAllCh Lib "SHP_A3.dll" _
                                            (ByVal ch As Long, _
                                            ByRef nListenerTable As Long, _
                                            ByVal nListenerNum As Long) As Long
Public Declare Function SsmLinkToBus Lib "SHP_A3.dll" _
                            (ByVal ch As Long, ByVal ts As Long) As Long
Public Declare Function SsmUnLinkToBus Lib "SHP_A3.dll" _
                            (ByVal ch As Long, ByVal ts As Long) As Long
Public Declare Function SsmLinkFromBus Lib "SHP_A3.dll" _
                            (ByVal ts As Long, ByVal ch As Long) As Long
Public Declare Function SsmLinkFromBusEx Lib "SHP_A3.dll" _
                            (ByVal ts As Long, ByVal ch As Long, ByVal vlm As Long) As Long
Public Declare Function SsmUnLinkFromBus Lib "SHP_A3.dll" _
                            (ByVal ts As Long, ByVal ch As Long) As Long
Public Declare Function SsmListenToPlay Lib "SHP_A3.dll" _
                            (ByVal ch1 As Long, ByVal vlm1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmUnListenToPlay Lib "SHP_A3.dll" (ByVal ch1 As Long, ByVal ch2 As Long) As Long
Public Declare Function SsmClearChBusLink Lib "SHP_A3.dll" (ByVal nCh As Long) As Long

'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@ CONFERENCE OPERATION  @@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function SsmCreateConfGroup Lib "SHP_A3.dll" _
                                        (ByVal nMaxMember As Long, _
                                         ByVal nMaxSpeaker As Long, _
                                         ByVal nMaxSpeaking As Long, _
                                         ByVal nMaxSilenceTime As Long) As Long
                                        
Public Declare Function SsmFreeConfGroup Lib "SHP_A3.dll" (ByVal nGrpId As Long) As Long

Public Declare Function SsmJoinConfGroup Lib "SHP_A3.dll" _
                                        (ByVal nGrpId As Long, _
                                        ByVal ch As Long, _
                                        ByVal wJoinMode As Integer, _
                                        ByVal nMixerVolume As Long, _
                                        ByVal bCreateAlways As Long, _
                                        ByVal bExitGrpAlways As Long) As Long
                                        
Public Declare Function SsmExitConfGroup Lib "SHP_A3.dll" ( _
                                        ByVal ch As Long, ByVal bFreeGrpAlways As Long) As Long
                                        
Public Declare Function SsmGetConfCfgInfo Lib "SHP_A3.dll" ( _
                                        ByRef pwMaxMember As Integer, _
                                        ByRef pwMaxSpeaker As Integer, _
                                        ByRef pwMaxSpeaking As Integer, _
                                        ByRef pwMaxSilenceTime As Integer) As Long
                                        
Public Declare Function SsmGetTotalConfGroup Lib "SHP_A3.dll" () As Long

Public Declare Function SsmGetConfGrpId Lib "SHP_A3.dll" (ByRef pnGrpId As Long) As Long

Public Declare Function SsmGetConfGrpCfgInfo Lib "SHP_A3.dll" (ByVal nGrpId As Long, _
                                        ByRef pwMaxMember As Integer, _
                                        ByRef pwMaxSpeaker As Integer, _
                                        ByRef pwMaxSpeaking As Integer, _
                                        ByRef pwMaxSilenceTime As Integer) As Long
                                        
Public Declare Function SsmGetConfGrpInfo Lib "SHP_A3.dll" ( _
                                        ByVal nGrpId As Long, _
                                        ByRef pwTotalMember As Integer, _
                                        ByRef pwTotalSpeaker As Integer, _
                                        ByRef pwTotalSpeaking As Integer) As Long
                                        
Public Declare Function SsmGetConfGrpMmbrId Lib "SHP_A3.dll" (ByVal nGrpId As Long, _
                                        ByRef pnMmbrId As Long) As Long
                                        
Public Declare Function SsmGetConfGrpMmbrInfo Lib "SHP_A3.dll" (ByVal nGrpId As Long, _
                                        ByVal nMmbrId As Long, _
                                        ByRef pnAppCh As Long, _
                                        ByRef pwJoinMode As Integer, _
                                        ByRef pwIsSpeaking As Integer, _
                                        ByRef pdwSilenceTime As Long) As Long
                                        
Public Declare Function SsmGetConfChInfo Lib "SHP_A3.dll" (ByVal ch As Long, _
                                        ByRef pnGrpId As Long, _
                                        ByRef pnMmbrId As Long, _
                                        ByRef pwJoinMode As Integer, _
                                        ByRef pwIsSpeaking As Integer, _
                                        ByRef pdwSilenceTime As Long) As Long
Public Declare Function SsmValidateGrpId Lib "SHP_A3.dll" (ByVal nGrpId As Long) As Long
     
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@    DRIVER  Ver. 1.x COMPATIBLE FUNCTIONS     @@@@@@@@@@@@@@@@@@@@@@
'@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
Public Declare Function InitCard Lib "SHP_A3.dll" ( _