TYPES: BEGIN OF b_char,
line(1024) TYPE x,
END OF b_char.
appl_nam = '/usr/sap/trans/edi/inbox/test/new.DBF'.
DATA: bt_data TYPE b_charOCCURS 0 WITH HEADER LINE..
OPEN DATASET appl_nam FOR INPUT IN BINARY MODE.
IF sy-subrc <> 0.
RAISE file_not_opened.
ELSE.
DO.
CLEAR lt_data-line.
READ DATASET appl_nam INTO bt_data-line.
IF sy-subrc NE 0.
EXIT.
ENDIF.
APPEND bt_data.
ENDDO.
ENDIF.
CLOSE DATASET appl_nam.
CALL FUNCTION 'SCMS_BINARY_TO_STRING'
EXPORTING
input_length = 2048
* FIRST_LINE = 0
* LAST_LINE = 0
* MIMETYPE = ' '
* ENCODING =
IMPORTING
text_buffer = text_buffer
* OUTPUT_LENGTH =
TABLES
binary_tab = bt_data
EXCEPTIONS
failed = 1
OTHERS = 2.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
Вот этот долбанный файл
https://dl.dropbox.com/u/68570116/new.dbfHELP!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!