sequentielles lesen vom Client

Code: Alles auswählen.

REPORT ztest.

TYPES:
  BEGIN OF ty_tab,
    feld  TYPE char90,
  END OF ty_tab.
DATA:
  lt_in        TYPE STANDARD TABLE OF ty_tab,
  ls_in        TYPE                   ty_tab,
  lv_filename  TYPE rlgrap-filename.

lv_filename = 'D:\FileNet Cold\Schatten\Schatten.txt'.

CALL FUNCTION 'WS_UPLOAD'
 EXPORTING
*   CODEPAGE                      = ' '
   filename                      = lv_filename
*   FILETYPE                      = 'ASC'
*   HEADLEN                       = ' '
*   LINE_EXIT                     = ' '
*   TRUNCLEN                      = ' '
   USER_FORM                     = 'EINZEL'
   USER_PROG                     = sy-repid
*   DAT_D_FORMAT                  = ' '
* IMPORTING
*   FILELENGTH                    =
  TABLES
    data_tab                      = lt_in
 EXCEPTIONS
   conversion_error              = 1
   file_open_error               = 2
   file_read_error               = 3
   invalid_type                  = 4
   no_batch                      = 5
   unknown_error                 = 6
   invalid_table_width           = 7
   gui_refuse_filetransfer       = 8
   customer_error                = 9
   no_authority                  = 10
   OTHERS                        = 11
          .
IF sy-subrc <> 0.
ENDIF.

WRITE: 'fertig'.


FORM einzel USING value.

  WRITE: value.

ENDFORM.                    "einzel