Unit Capi

Classes

Functions

API_GET_ADDRESSMODE -
API_GET_MANUFACTURER -
API_GET_MESSAGE -
API_GET_SERIAL_NUMBER -
API_GET_VERSION -
API_INSTALLED -
API_MANUFACTURER -
API_PUT_MESSAGE -
API_REGISTER - Common ISDN API (CAPI) functions

Externals
API_RELEASE -
API_SET_SIGNAL -
CapiBufferSizeNeeded - CAPI utility functions

Publics
CapiMessageToString -
CapiMk_Listen_Req -
CapiMk_Manufacturer_Req -

Types

DWord
PCapiMessage
Short
TCapiMessage
TCapiSignalProc
TCapi_Listen_Conf
TCapi_Listen_Req

Constants

cmd_LISTEN
cmd_MANUFACTURER
imCause
imChargingInformation
imDate
imDisplay
imInfoMask_All
imStatusOfCalledParty
imUserUserInformation
semGlobalCall
semServicedEaz_All
simAbServices
simData64kbps
simFaxG4
simGraphicTelService
simMixedMode
simRemoteControl
simServicedSi_All
simTelephony
simTeletex64
simVideophone
simVideotex
simVideotex64kbps
simX21Services
simX25Services
subcmd_CONF
subcmd_IND
subcmd_REQ
subcmd_RESP

Variables


Functions


function API_GET_ADDRESSMODE : Integer;


function API_GET_MANUFACTURER (Identification : PChar) : Integer;


function API_GET_MESSAGE (Appl_Id : Integer; var Msg : PCapiMessage) : Integer;


function API_GET_SERIAL_NUMBER (A : PChar) : Integer;


function API_GET_VERSION (VersionString : PChar) : Integer;


function API_INSTALLED : Integer;


function API_MANUFACTURER (Appl_Id : Integer) : Integer;


function API_PUT_MESSAGE (Appl_Id : Integer; Msg : PCapiMessage) : Integer;


function API_REGISTER (Buffer : Pointer; MaxMessages, MaxConnections, MaxBChanPackets, MaxBChanDataSize : Short) : Integer;

Common ISDN API (CAPI) functions

Externals


function API_RELEASE (Appl_Id : Integer) : Integer;


function API_SET_SIGNAL (Appl_Id : Integer; B : TCapiSignalProc) : Integer;


function CapiBufferSizeNeeded (MaxMessages, MaxConnections, MaxBChanPackets, MaxBChanDataSize : Longint) : Longint;

CAPI utility functions

Publics


function CapiMessageToString (var Msg) : string;


function CapiMk_Listen_Req (Appl_Id : Integer; Controller : Byte; InfoMask : DWord; ServicedEazMask, ServicedSiMask : Word) : TCapi_Listen_Req;


procedure CapiMk_Manufacturer_Req (AAppl_Id : Integer; ASubCommand : Byte; const Elements : array of Byte; var Message);


Types


DWord = Longint

PCapiMessage = ^TCapiMessage

Short = Word

TCapiMessage = record
Length : Word;
APPL_ID : Word;
Command : Byte;
SubCommand : Byte;
MessageNumber : Word;
end;

TCapiSignalProc = procedure

TCapi_Listen_Conf = record
Length : Word;
APPL_ID : Word;
Command : Byte;
SubCommand : Byte;
MessageNumber : Word;
Controller : Byte;
Info : Word;
end;

TCapi_Listen_Req = record
Length : Word;
APPL_ID : Word;
Command : Byte;
SubCommand : Byte;
MessageNumber : Word;
Controller : Byte;
InfoMask : DWord;
ServicedEazMask : Word;
ServicedSiMask : Word;
end;

Constants

cmd_LISTEN = $05

Commands

cmd_MANUFACTURER = $FF

imCause = $00000010

imChargingInformation = $00000001

Info masks

imDate = $00000002

imDisplay = $00000004

imInfoMask_All = $0000003F

imStatusOfCalledParty = $00000020

imUserUserInformation = $00000008

semGlobalCall = $0001

Serviced EAZ mask

semServicedEaz_All = $03FF

simAbServices = $0004

bit 1 Telephony

simData64kbps = $0080

bit 5 Videotex (64 kbit/s) } { bit 6

simFaxG4 = $0010

bit 3 X.21 services

simGraphicTelService = $4000

bit 13 Remote control

simMixedMode = $0400

bit 9 Teletex 64

simRemoteControl = $2000

bit 10 Mixed mode } { bit 11 } { bit 12

simServicedSi_All = $E7BF

bit 15 Videotex (new standard)

simTelephony = $0002

bit 0 Videophone

simTeletex64 = $0200

bit 8 X.25 services

simVideophone = $0001

10 lower bits } { Serviced SI mask

simVideotex = $8000

bit 14 Graphic telephone service

simVideotex64kbps = $0020

bit 4 Fax (Group 4)

simX21Services = $0008

bit 2 a/b services

simX25Services = $0100

bit 7 Data transmission (64 kbit/s)

subcmd_CONF = $01

subcmd_IND = $02

subcmd_REQ = $00

Subcommands

subcmd_RESP = $03


Variables