void CAPIConnDDI::InfoInd(_cmsg *CMSG)
{
if(dbg_capiind)
cdebug << "(DDIConn) InfoInd erhalten..." << endl;
_cmsg CMSG1;
if(INFO_IND_PLCI(CMSG)>255)
INFO_RESP(&CMSG1,Appl_Id,CMSG->Messagenumber,INFO_IND_PLCI(CMSG));
if(INFO_IND_INFONUMBER(CMSG)==0x0070)
{
if(dbg_callcontrol)
cdebug << " DDI: Ziffer erhalten..." << endl;
unsigned char *x=INFO_IND_INFOELEMENT(CMSG);
char s[128];
memcpy(s,x+2,(size_t)(x[0]-1));
s[x[0]-1]='\0';
s[x[0]]='\0';
nr+=s;
if(dbg_callcontrol)
cdebug << " DDI: Rufnummer ist jetzt:" << nr << endl;
if(nr.length()>=anzahlnr)
ConnectIt();
}
}
void CAPIConn::Connect(_cmsg *CMSG)
{
if(dbg_capiind)
cdebug << "Connect_Ind" << endl << "Nothing to do -> Ignoring Call..." << endl;
PLCI=CONNECT_IND_PLCI(CMSG);
MsgNr=CMSG->Messagenumber;
Reject=1;
ConnectIt();
}
void CAPIConnDDI::Connect(_cmsg *CMSG)
{
ConnInd=CMSG;
if(dbg_capiind)
cdebug << "Answering DDICall..." << endl;
if(nr.length()>=anzahlnr)
ConnectIt();
}
//---------------------------------------------------------------------------
void __fastcall TFm::SbClick(TObject *Sender)
{
Fm->Err->Text = "";
Fm->Output->Text = "";
Fm->BodyEdt->Text = "";
Fm->Err->Text = "";
//Fm->RspHdrEdt->Text = "";
UnicodeString str = Input->Text;
randomize();
ConnectIt();
}
