Data Interfaces

*&---------------------------------------------------------------*
REPORT RS41505D.
INCLUDE RSEBCASC.
INCLUDE RSCPICDF.
TABLES SPFLI.
DATA BEGIN OF ISPFLI OCCURS 1.
INCLUDE STRUCTURE SPFLI.
DATA END OF ISPFLI.
DATA: RBUFFER(255).
DATA: DUMMY.
DATA: CONVID(8), "Coversation ID
FORM SEND.
DI(4) TYPE X, "Data information
SI(4) TYPE X, "Status information
RL(4) TYPE X, "Receive length
CPIC_RC LIKE SY-SUBRC. "Return code
*----------------------------------------------------------------*
* CPI-C: CM_ACCEPT *
*----------------------------------------------------------------*
COMMUNICATION ACCEPT ID CONVID RETURNCODE CPIC_RC.
IF CPIC_RC NE CM_OK.
EXIT.
ENDIF.