Method: GetCurrentCall


Function:

 

Get the current call of the current line.

     

Parameters:

 

None

     

Description:

 

GetCurrent call is used to get the current call.

Possible return values are list below:

CALL_ORIGINAL=0

CALL_CONSULTAION=1

CALL_CONFERENCE=2

This method make sense when the a consultaion transfer is made. Before StartTransfer is called, GetCurrentCall return 0; After StartTransfer called, it return 1; After CompleteTransfer called and the conference call created, Connected event will be invoked, and GetCurrentCall will return 2.

     

Dependencies:

 

None

     

Events Raised:

 

None

     

Relevances:

 

StartTransfer, CancelTransfer, BlindTransfer, Hold, Unhold,SwapHold

Sample Code In Visual Basic:

'The following example show how to transfer a number and use of relevant events and functions including:

Functions:CompleteTransfer, CancelTransfer

Events: Connected, Busy, VoicePromptDetected, WaitConnectionTimeout

Sub cmdTransfer_click()

  va.StartTransfer "6230396","!"

 

End Sub

 

Sub va_Connected(LineIndex as Long, Style as Long)

If va.GetCurrentCall=1 Then

   va.CompleteTransfer COMPLETE_TRANSFER_MODE_CONFERENCE, "!,3"

   MsgBox "Consultation call connected while transfering.Transfer completed. "

ElseIf va.GetCurrentCall=0 Then

   MsgBox "Connected after dialing an outbound call."

End If

End Sub

 

Sub va_Busy(LineIndex as Long)

If va.GetCurrentCall=1 Then

  va.CancelTransfer "!,1"

   MsgBox "Busy signal detected while transfering. Consultation call cancelled."

ElseIf va.GetCurrentCall=0 Then

   MsgBox "Busy signal detected while dialing an OutBound call. "

End If

End Sub

 

Sub va_WaitConnectionTimeout(LineIndex as Long)

If va.GetCurrentCall=1 Then

   va.CancelTransfer "!,1"

   MsgBox "Timeout while transfering. Consultation call cancelled."

ElseIf va.GetCurrentCall=0 Then

   MsgBox "Timeout while dialing an OutBound call. "

End If

End Sub

 

Sub va_VoicePromptDetected(LineIndex as Long)

If va.GetCurrentCall=1 Then

   va.CancelTransfer "!,1"

   MsgBox "Voice Prompt detected while transfering. Consultation call cancelled."

ElseIf va.GetCurrentCall=0 Then

   MsgBox "Voice Prompt detected while dialing an OutBound call. "

End If

End Sub