Data Interfaces

UPDMODE DEFAULT 'S'.
START-OF-SELECTION.
* File opened for reading and in binary mode
START-OF-SELECTION.
OPEN DATASET FILE FOR INPUT IN BINARY MODE.
* Text-001 E: Start CALL TRANSACTION
WRITE: / TEXT-001, SY-UZEIT.
* Accessing data
DO.
READ DATASET FILE INTO REC.
IF SY-SUBRC NE 0.
EXIT.
ENDIF.
WRITE: / REC-ID USING NO EDIT MASK, REC-NAME, REC-TELEPHONE.
* Subroutine in order to tranfer the data of one transaction to
* the BDC_TAB (screen format)
PERFORM GENERATE_BDC_DATA.
* Transaction called together with data in screen format
CALL TRANSACTION 'TFBA'
USING BDC_TAB
MODE DISMODE
UPDATE UPDMODE.
* MESSAGES INTO MESSTAB.