Data Interfaces

Example: Variable Format (Read)
© SAP AG
REPORT RSFFF01H.
TABLES: SBC420A, SBC420B.
DATA: FLAG.
PARAMETERS
FILE(20) DEFAULT '/tmp/RSFFF01G'
LOWER CASE.
START-OF-SELECTION.
OPEN DATASET FILE FOR INPUT
IN BINARY MODE.
DO.
READ DATASET FILE INTO FLAG.
IF SY-SUBRC NE 0. EXIT. ENDIF.
CASE FLAG.
WHEN 'A'.
READ DATASET FILE INTO SBC420A.
WRITE: / SBC420A-CARRID SBC420A-CONNID,
SBC420A-FLDATE, SBC420A-PLANETYPE.
WHEN 'B'.
READ DATASET FILE INTO SBC420B.
WRITE: / SBC420B-BOOKID, SBC420B-CUSTID,
SBC420B-CUSTYP, SBC420B-CLASS.
ENDCASE.
ENDDO.
END-OF-SELECTION.
CLOSE DATASET FILE.
The above program reads the data records of the file created with the previous program.
The program assumes that an ID (‘A’ or ‘B’) precedes each data record.
The file is opened in binary mode and the records are read in the length of the structure specified.