Used to find out the calling phone number (the one that calls).
// Procedure used to find the phone number
// in the database of contacts
PROCEDURE FindIdentity(sPhoneNum)
// Format the phone number
sPhoneNum = Right(NoSpace(sPhoneNum), 9)
// Search in the address book
HReadSeekFirst(CONTACT, TelOnNine, sPhoneNum)
SI HFound(CONTACT) = True THEN
STC_NAME = CONTACT.Name
STC_FIRSTNAME = CONTACT.FirstName
STC_COMPANY = CONTACT.Company
STC_TEL = CONTACT.Telephone
ELSE
STC_NAME = "CONTACT NOT FOUND"
STC_FIRSTNAME = "CONTACT NOT FOUND"
STC_COMPANY = "CONTACT NOT FOUND"
STC_TEL = tapiCallerID(nCallID)
END
Syntax
<Result> = tapiCallerID([<Call identifier>])
<Result>: Character string
Calling phone number.
<Call identifier>: Optional integer
Identifier of the call to be handled. This identifier is defined in the WLanguage procedure called by tapiListen. The current call is handled if this parameter is not specified.
Remarks
Required configuration
Telephony functions use TAPI 2.0 technology and/or TAPI 3.1 technology. These technologies can be used on all systems.