Data Interfaces

* the BDC_TAB (screen format), irrespective of whether an SCUSTOM
* record is updated or created
CASE REC-FLAG.
WHEN 'U'.
TCODE = 'TFBA'.
PERFORM GENERATE_BDC_DATA_TFBA.
WHEN 'N'.
TCODE = 'TFBB'.
PERFORM GENERATE_BDC_DATA_TFBB.
WHEN OTHERS.
* Text-003 D: Processing terminated due to incorrect data
WRITE: TEXT-001, REC-FLAG.
EXIT.
ENDCASE.
* Function module for transferring the data of the BDC_TAB to the
queue file
CALL FUNCTION 'BDC_INSERT'
EXPORTING
TABLES
TCODE = TCODE
DYNPROTAB = BDC_TAB.
WRITE: / REC-FLAG, REC-ID USING NO EDIT MASK,
TELEPHONE,
ULINE.
/ REC-NAME UNDER REC-FLAG,
/ REC-POSTCODE UNDER REC-NAME, REC-CITY, REC-
REC-CUSTTYPE, REC-DISCOUNT.