Code: Alles auswählen.
ABAP-Laufzeitfehler CALL_FUNCTION_CONFLICT_TYPE
aufgetreten am 18.12.2007 um 18:01:04
?
004210 INTO gd_importdatei.
004220 CONDENSE gd_importdatei no-gaps.
004230 break-point.
004240 * Datei einlesen
004250 CALL FUNCTION 'GUI_UPLOAD'
004260 EXPORTING
004270 * filename = 'c:\temp\account_TAR.txt'
004280 filename = gd_importdatei
004290 filetype = 'ASC'
004300 TABLES
> data_tab = gt_import.
004320 IF sy-subrc <> 0.
004330 * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
004340 * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
004350 ENDIF.
004360
004370 DESCRIBE TABLE gt_import LINES ld_cnt_read.
004380 CLEAR ld_cnt_put.
004390 * Splitten und in Tabelle schreiben
004400 LOOP AT gt_import INTO gw_import.
004410 * Wenn letztes Zeichen ein Pipe, dann löschen
004420 ld_pos = strlen( gw_import-buffer ).
004430 ld_pos = ld_pos - 1.
004440 * ld_txt = gw_import-buffer+ld_pos.
004450 if gw_import-buffer+ld_pos = gd_trennz.
004460 gw_import-buffer+ld_pos = ' '.
004470 ENDIF.
004480 SPLIT gw_import AT gd_trennz
004490 INTO gs_i_account-caperpin
4500 gs_i_account-varee_id
4501
Code: Alles auswählen.
DATA: BEGIN OF gt_import OCCURS 1,
buffer(1024) TYPE c,
END OF gt_import.
DATA gw_import LIKE gt_import.
DATA gd_importdatei LIKE rlgrap-filename.
CLEAR gd_importdatei.
CONCATENATE p_pfad
p_facc
INTO gd_importdatei.
CONDENSE gd_importdatei no-gaps.
* Datei einlesen
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
* filename = 'c:\temp\account_TAR.txt'
filename = gd_importdatei
filetype = 'ASC'
TABLES
data_tab = gt_import.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.