.InfoMask = InfoMask_ALL
        .CIPMask = CIPMask_FAXG3 + CIPMask_FAXG4 + CIPMask_31KHZAUDIO
        If Me.ShowAllCalls Then .CIPMask = CIPMask_ALL_SERVICES
        
        .CIPMas2 = &H0
        .CallingParty = &H0
        .CallingPartySub = &H0
'где
  Public Const CIPMask_31KHZAUDIO = 2 ^ 4
  Public Const CIPMask_FAXG3 = 2 ^ 17
  Public Const CIPMask_FAXG4 = 2 ^ 18
  Public Const CIPMask_ALL_SERVICES = (2 ^ 29) - 1 - 1

  ''/* CIP masks and CIP values */

  Public Const InfoMask_CAUSE = 2 ^ 0
  Public Const InfoMask_DATETIME = 2 ^ 1
  Public Const InfoMask_DISPLAY = 2 ^ 2
  Public Const InfoMask_USERUSER = 2 ^ 3
  Public Const InfoMask_CALLPROGRESS = 2 ^ 4
  Public Const InfoMask_FACILITY = 2 ^ 5
  Public Const InfoMask_CHARGING = 2 ^ 6
  Public Const InfoMask_CALLEDPARTY = 2 ^ 7
  Public Const InfoMask_CHANNEL = 2 ^ 8
  Public Const InfoMask_EARLYB3CONNECT = 2 ^ 9      ' enabled early B3 connect using D channel
  Public Const InfoMask_ALL = 2 ^ 10 - 1 - 2 ^ 9 - 2 ^ 1 ' everything but early B3 connect and Date/Time(charged)

      message.param.listen_req.m_InfoMask = 0x414; // redirecting numbers, call progress, display info
      message.param.listen_req.m_CIPMask = 0x00010012; //Audio only
      message.param.listen_req.m_CIPMask2 = 0;
      message.AddEmpty(); // Calling party number
      message.AddEmpty(); // Calling party subaddress

Debug.Print Hex(InfoMask_ALL)
1FD
Debug.Print Hex(CIPMask_FAXG3 + CIPMask_FAXG4 + CIPMask_31KHZAUDIO)
60010
Debug.Print Hex(CIPMask_31KHZAUDIO)
10
Debug.Print Hex(CIPMask_FAXG3 + CIPMask_31KHZAUDIO)
20010
Debug.Print Hex(CIPMask_ALL_SERVICES)
1FFFFFFE

LISTEN_REQ (...,Info-Mask = 0xFF250000, CIP-Mask = 0x37000304

      message.param.listen_req.m_InfoMask = 0xff250000; // ???
      message.param.listen_req.m_CIPMask = 0x37000304; //???

LISTEN_REQ (...,Info-Mask = 0x000025FF, CIP-Mask = 0x04030037

      message.param.listen_req.m_InfoMask = 0x000025ff; // ???
      message.param.listen_req.m_CIPMask = 0x04030037; //???

CAPI_DATA_B3, CAPI_REQ  //>>>>шлем кусок файла
CAPI_DATA_B3,CAPI_CONF //<<<<получаем ответ от CAPI что кусок принят
CAPI_DATA_B3, CAPI_REQ  //>>>>шлем кусок файла
CAPI_DATA_B3,CAPI_CONF //<<<<получаем ответ от CAPI что кусок принят
...

   ' data buffers for sending and receiving
    Private Const MAX_SenderBuffers = 8
    Private Const QUEUEOUTLEN = 3
    Private SenderBuffers(MAX_SenderBuffers + 1) As Proto_DataBuffer

    Public Type Proto_DataBuffer          ' buffer for storing data from DataB3Ind and for DataB3Req
       data(MAXBDATALEN) As Byte          ' the buffer
    End Type

        With DataB3Req
...
             ' data infos:
            .DataLen = xmitLen                                      ' data length
 '           .Pointer = VarPtr(SenderBuffers(ConnectionTmp.buf_nr).data)  ' data pointer
            .Pointer = VarPtr(SenderBuffers(ConnectionTmp.buf_nr).data(0))
            .Handle = ConnectionTmp.handle_incrementer              ' data handle, ID
...

m_SenderBuffers[m_buf_nr].data[i]= (WORD)ch;

m_SenderBuffers[m_buf_nr].data[i]= (BYTE)ch;

m_SenderBuffers[m_buf_nr].data[i]= ch;

  for (PINDEX i = 0; i < 2048; ++i)
    m_stream << i << "=" << (int)m_SenderBuffers[m_buf_nr].data[i] << " "; 
  m_stream << "\n";

            str = ""
            For i = 0 To 2047
                str = str & i & "=" & CInt(SenderBuffers(.buf_nr).data(i)) & " "
            Next i
            AddLog str

SenderBuffers(0).data:
0=83 1=102 2=102 3=102 4=1 5=0 6=0 7=0 8=0 9=0 10=28 11=0 12=0 13=0 14=0 15=0
16=0 17=0 18=0 19=0 20=40 21=99 22=41 23=32 24=65 25=86 26=77 27=32 28=254 29=16 30=1
31=0 32=0 33=0 34=192 35=6 36=0 37=0 38=1 39=0 40=0 41=0 42=0 43=0 44=0 45=0
46=3 47=178 48=89 49=1 50=3 51=178 52=89 53=1 54=3 55=178 56=89 57=1 58=3 59=178 60=89
61=1 62=3 63=178 64=89 65=1 66=3
...
2018=54 2019=50 2020=44 2021=192 2022=192 2023=216 2024=7 2025=11 2026=90 2027=216 2028=96
2029=96 2030=238 2031=176 2032=81 2033=192 2034=220 2035=228 2036=97 2037=135 2038=6
2039=34 2040=186 2041=38 2042=204 2043=49 2044=176 2045=142 2046=10 2047=36 
DataB3Req.AppId=0
DataB3Req.Command=†
DataB3Req.DataLen=2048
DataB3Req.Flags=0
DataB3Req.Handle=0
DataB3Req.Length=22
DataB3Req.Message_Number=0
DataB3Req.NCCI=96513
DataB3Req.Pointer=11948661
DataB3Req.SubCommand=Ђ
SenderBuffers(1).data:
0=18 1=152 2=146 3=134 4=105 5=54 6=50 7=44 8=192 9=48 10=189 11=27 12=22 13=180 14=96 15=151
16=195 17=220 18=193 19=14 20=129 21=185 
...

// #if P_64BIT
//       void SetPtr(const void * ptr) { m_Data64 = (PUInt64)ptr; }
// #else
      void SetPtr(const void * ptr) { m_Data = (DWORD)ptr; }
// #endif

    struct Proto_DataBuffer {
      BYTE data[160];
    };

'/*
'/*  Some global variables and fax related constants
'/*

Public Const MAXLOGICALCONNECTION = 2   ' normally 2, for two B channels of a BRI card
Public Const MAXBDATABLOCKS = 7         ' something around 7 is ok
Public Const MAXBDATALEN = 2048         ' packet length, 2048 bytes
Public Const MESSAGEBUFFERSIZE = 1024 + (1024 * MAXLOGICALCONNECTION)
                                        ' size, in bytes, of the message buffer that CAPI should
                                        ' reserve for this OCX

Public Function StartCapi() As Boolean
...
    X = CAPI_REGISTER(MESSAGEBUFFERSIZE, MAXLOGICALCONNECTION, MAXBDATABLOCKS, MAXBDATALEN, AppId)

enum {
    MaxLineCount = 30,
    MaxBlockCount = 2,
    MaxBlockSize = 160
};

  DWORD err = m_capi->REGISTER(MaxLineCount*MaxBlockCount*MaxBlockSize+1024,
                               MaxLineCount, MaxBlockCount, MaxBlockSize, &id);

enum {
    MaxLineCount = 30, //'normally 30, for 30 B channels of a PRI card
    MaxBlockCount = 7, //' something around 7 is ok
    MaxBlockSize = 2048 //' packet length, 2048 bytes
};

MaxBlockSize = 160

struct Proto_DataBuffer {
  BYTE data[160];
};