Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

GETTING RUNTIME ERROR IN TEXT_CONVERT_CSV_TO_SAP FUNCTION MODULE

Former Member
0 Likes
427

HI TO ALL SDNERS,

IM TRYING TO INSERT A COMMA SEPERATED FILE INTO AN INTERNAL TABLE BY USING FUNCTION MODULE "TEXT_CONVERT_CSV_TO_SAP",BUT IM GETTING A TYPE CONFLICT AND THE PROGRAM IS DUMPED

TYPES : BEGIN OF TY_CUST,

KUNNR(10),

BUKRS(4),

KTOKD(4),

ANRED(15),

NAME1(35),

SORTL(10),

STRAS(35),

ORT01(10),

PSTLZ(10),

LZONE(10),

LAND1(3),

SPRAS(2),

AKONT(10),

END OF TY_CUST.

TYPES: BEGIN OF TY_ECUST,

KUNNR(10),

ERRORMSG(255),

END OF TY_ECUST.

TYPES: BEGIN OF TY_SCUST,

KUNNR(10),

SUCESSMSG(255),

END OF TY_SCUST.

******************************************************************************

  • INTERNAL TABLE AND WORK AREAS

******************************************************************************

DATA : IT_CUST TYPE STANDARD TABLE OF TY_CUST INITIAL SIZE 0,

RAW_DATA TYPE TABLE OF TY_CUST,

W_RAW_DATA LIKE LINE OF RAW_DATA,

WA_CUST LIKE LINE OF IT_CUST.

DATA: IT_ECUST TYPE TABLE OF TY_ECUST,

WA_ECUST LIKE LINE OF IT_ECUST.

DATA : IT_SCUST TYPE TABLE OF TY_SCUST,

WA_SCUST LIKE LINE OF IT_SCUST.

*********************************************************************************

  • INTERANAL TABLE FOR STORING BDCDATA

********************************************************************************

DATA: BEGIN OF IT_BDCDATA OCCURS 0.

INCLUDE STRUCTURE BDCDATA.

DATA: END OF IT_BDCDATA.

*********************************************************************************

  • INTERNAL TABLE FOR STORING MESSAGES

*********************************************************************************

DATA: BEGIN OF IT_CUSTMSG OCCURS 0.

INCLUDE STRUCTURE BDCMSGCOLL.

DATA: END OF IT_CUSTMSG.

DATA: V_FLAG(1) VALUE '',"FLAG FOR OPENING OF SESSION

V_TLINES TYPE SY-TABIX,"TOTAL NO RECORDS PROCESSED

V_SLINES TYPE SY-TABIX,"TOTAL NO OF SUCESS RECORDS PROCESSED

V_ELINES TYPE SY-TABIX."TOTAL NO OF ERROR RECORDS

********************************************************************************

  • SELECTION SCREEN

********************************************************************************

SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-001.

PARAMETERS : V_FNAME TYPE RLGRAP-FILENAME,

V_SESS TYPE RLGRAP-FILENAME.

SELECTION-SCREEN END OF BLOCK B2.

INITIALIZATION.

V_FNAME = 'C:\Documents and Settings\Administrator\Desktop\2.TXT'.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR V_FNAME.

CALL FUNCTION 'F4_FILENAME'

EXPORTING

PROGRAM_NAME = SYST-CPROG

DYNPRO_NUMBER = SYST-DYNNR

FIELD_NAME = ' '

IMPORTING

FILE_NAME = V_FNAME

.

START-OF-SELECTION.

PERFORM F_UPLOAD USING V_FNAME

CHANGING IT_CUST.

END-OF-SELECTION.

PERFORM F_BDCGENERATE.

&----


*& Form F_UPLOAD

&----


  • text

----


  • -->P_V_FNAME text

  • <--P_IT_CUST text

----


FORM F_UPLOAD USING P_V_FNAME LIKE V_FNAME

CHANGING P_IT_CUST LIKE IT_CUST.

DATA: LV_FILE TYPE STRING.

LV_FILE = P_V_FNAME.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = LV_FILE

TABLES

DATA_TAB = RAW_DATA

.

IF SY-SUBRC = 0.

*DESCRIBE TABLE P_IT_CUST LINES V_TLINES.

*

ENDIF.

CALL FUNCTION 'TEXT_CONVERT_CSV_TO_SAP'

EXPORTING

I_FIELD_SEPERATOR = ';'

  • I_LINE_HEADER =

I_TAB_RAW_DATA = RAW_DATA

I_FILENAME = 'C:\Documents and Settings\Administrator\Desktop\2.TXT'

TABLES

I_TAB_CONVERTED_DATA = P_IT_CUST

EXCEPTIONS

CONVERSION_FAILED = 1

OTHERS = 2

.

IF SY-SUBRC <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDFORM. " F_UPLOAD

1 REPLY 1
Read only

Former Member
0 Likes
335

hai,

Use

raw_data TYPE TRUXS_T_TEXT_DATA

Don't forget to reward if useful....