* Traps events for the port communication object >loSock = This.oSock.Object >IF EVENTHANDLER(loSock, THIS) > * ? 'Event handler succeeded' >ELSE > * ? 'Event handler failed' >ENDIF >