Sockets api does not report error status

void MySocketEngine::InitSockets()
{
// Need to use two sockets - one to listen for
   // an incoming connection.
TInt err;    
iSession.Connect();
err = iListen.Open(iSession, KAfInet,
                           KSockStream, KUndefinedProtocol);

User::LeaveIfError(err);
   

// The second (blank) socket is required to
   // build the connection & transfer data.
   err = iSocket.Open(iSession);

   User::LeaveIfError(err);

 // Bind the listening socket to the required
         // port.
         TInetAddr anyAddrOnPort(KInetAddrAny, 80);
         iListen.Bind(anyAddrOnPort);


}

void MySocketEngine::StartEngineL(void)
{
 // Listen for incoming connections...
         iListen.Listen(1);
         iListen.Accept(iSocket, iStatus);
         SetActive();

}

TBuf8<1024> MySocketEngine::ShowBufferContent()
{
return iBuffer;
}

void MySocketEngine::RunL(void)
{
     if (iStatus==KErrNone)
     {
IssueRead(iBuffer);
  }
 
}

void MySocketEngine::IssueRead(TDes8& rcv_buffer)
{
   // Initiate a new read from socket into iBuffer
   __ASSERT_ALWAYS(!IsActive(), User::Panic(KPanicSocketsEngineRead, ESocketsBadState));
   iSocket.RecvOneOrMore(rcv_buffer,0,iStatus,iLen);

// Analyses the data
HBufC* txt = HBufC::NewL(1024);
txt->Des().Copy(rcv_buffer);
iDataReceiver->AnalyseMessage(txt->Des());
SetActive();
}