Data Interfaces

Model Solution 1 for Chapter 1: Sequential Files
REPORT RSFFF011 .
* Record for sequential file defined as Dictionary structure or
* include report provided
DATA: BEGIN OF REC.
INCLUDE STRUCTURE SBC420C.
DATA: END OF REC.
* STRUCTURE SBC420C:
* CARRID, CONNID, FLDATE, BOOKID, CUSTOMID.
* Alternative:
* INCLUDE RSFFF01L.
* Create selection screen (manual data input)
PARAMETERS:
FILE(20) DEFAULT '/tmp/BOOKXX' LOWER CASE,
CARRID LIKE SFLIGHT-CARRID DEFAULT 'BA',
CONNID LIKE SFLIGHT-CONNID DEFAULT '0001',
FLDATE LIKE SFLIGHT-FLDATE DEFAULT '19960401',
BOOKID LIKE SBOOK-BOOKID DEFAULT '00000001',
CUSTOMID LIKE SBOOK-CUSTOMID DEFAULT '00000001'.
* Open file for appending in text mode
START-OF-SELECTION.
OPEN DATASET FILE FOR APPENDING IN TEXT MODE.
* Transfer data from selection screen to field string