ABAP Select data from SAP table CE8GB10 into internal table
Get Example source ABAP code based on a different SAP table
Below is a number of ABAP code snippets to demonstrate how to select data from SAP CE8GB10 table and store it within an internal table, including using the newer @DATA inline declaration methods. It also shows you various ways to process this data using ABAP work area, inline declaration or field symbols including executing all the relevant CONVERSION_EXIT routines specific to CE8GB10. See here for more generic Select statement tips.
Sometimes data within SAP is stored within the database table in a different format to what it is displayed to the user. These input/output conversation FM routines are what translates the data between the two formats.
There is also a full declaration of the CE8GB10 table where each field has a char/string type for you to simply copy and paste. This allows you to use processing that is only available to these field types such as the CONCATENATE statement.
DATA: IT_CE8GB10 TYPE STANDARD TABLE OF CE8GB10,
WA_CE8GB10 TYPE CE8GB10,
GD_STR TYPE STRING.
DATA: lo_typedescr type REF TO cl_abap_typedescr.
DATA: lv_fieldname type fieldname.
FIELD-SYMBOLS: <FIELD> TYPE any.
FIELD-SYMBOLS: <CE8GB10> TYPE CE8GB10.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_CE8GB10.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM CE8GB10
INTO TABLE IT_CE8GB10.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM CE8GB10
* INTO TABLE @DATA(IT_CE8GB102).
*--Further methods of using ABAP code to select data from SAP database tables
*You can also declare the header/work area using the in-line DATA declaration method
READ TABLE IT_CE8GB10 INDEX 1 INTO DATA(WA_CE8GB102).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CE8GB10 ASSIGNING <CE8GB10>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<CE8GB10>-MANDT = 1.
<CE8GB10>-PALEDGER = 1.
<CE8GB10>-VRGAR = 1.
<CE8GB10>-PLIKZ = 1.
<CE8GB10>-VERSI = 1.
ENDLOOP. LOOP AT IT_CE8GB10 INTO WA_CE8GB10. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_CE8GB10-PAOBJNR, sy-vline,
WA_CE8GB10-PASUBNR, sy-vline,
WA_CE8GB10-PAPAOBJNR, sy-vline,
WA_CE8GB10-PAPASUBNR, sy-vline,
WA_CE8GB10-HRKFT, sy-vline,
WA_CE8GB10-KNDNR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CE8GB10 you want to display... WRITE:/ sy-uline. * Aternatively use generic code to Write field values (and NAME) to screen report DO. ASSIGN COMPONENT sy-index OF STRUCTURE wa_CE8GB10 TO <field>. IF sy-subrc <> 0. EXIT. ENDIF. WRITE:/ 'Field Value', <field>, sy-vline. gd_str = <field> . lo_typedescr ?= CL_ABAP_DATADESCR=>DESCRIBE_BY_DATA( <field> ). lv_fieldname = lo_typedescr->GET_RELATIVE_NAME( ). WRITE:/ 'Field Name', lv_fieldname. ENDDO. *Redo loop but convert all fields from internal to out value LOOP AT IT_CE8GB10 INTO WA_CE8GB10. *Write horizonal line to screen report. WRITE:/ sy-uline. *Convert all fields to display/output versions using conversion routines PERFORM convert_all_field_values CHANGING wa_EKKO. ENDLOOP. *&---------------------------------------------------------------------* *& Form convert_all_field_values *&---------------------------------------------------------------------* FORM convert_all_field_values CHANGING p_EKKO LIKE wa_EKKO. DATA: ld_input(1000) TYPE c, ld_output(1000) TYPE C.
*Conversion exit LEDBO, internal->external for field PALEDGER CALL FUNCTION 'CONVERSION_EXIT_LEDBO_OUTPUT' EXPORTING input = WA_CE8GB10-PALEDGER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-PALEDGER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERSI CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-VERSI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-VERSI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KNDNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-KNDNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-KNDNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field ARTNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_CE8GB10-ARTNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-ARTNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KAUFN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-KAUFN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-KAUFN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RKAUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-RKAUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-RKAUFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-PRCTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-PRCTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PPRCTR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-PPRCTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-PPRCTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_CE8GB10-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-GJAHR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field PSPNR CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_CE8GB10-PSPNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-PSPNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSN, internal->external for field COPA_POSID CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_CE8GB10-COPA_POSID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-COPA_POSID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSN, internal->external for field COPA_CRMID CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_CE8GB10-COPA_CRMID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-COPA_CRMID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KSTAR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-KSTAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-KSTAR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field WRTTP CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-WRTTP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WRTTP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG001 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG002 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG003 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG004 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG005 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG006 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG007 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG008 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG009 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG010 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG011 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG012 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG013 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG014 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG015 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WTG016 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WTG016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WTG016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG001 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG002 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG003 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG004 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG005 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG006 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG007 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG008 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG009 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG010 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG011 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG012 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG013 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG014 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG015 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WOG016 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WOG016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WOG016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG001 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG002 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG003 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG004 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG005 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG006 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG007 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG008 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG009 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG010 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG011 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG012 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG013 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG014 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG015 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKG016 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKG016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKG016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF001 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF002 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF003 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF004 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF005 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF006 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF007 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF008 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF009 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF010 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF011 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF012 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF013 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF014 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF015 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field WKF016 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CE8GB10-WKF016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-WKF016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HIE03 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-HIE03 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-HIE03.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HIE01 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-HIE01 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-HIE01.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HIE02 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CE8GB10-HIE02 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CE8GB10-HIE02.
WRITE:/ 'New Value:', ld_input.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_CE8GB10_STR,
MANDT TYPE STRING,
PALEDGER TYPE STRING,
VRGAR TYPE STRING,
PLIKZ TYPE STRING,
VERSI TYPE STRING,
PAOBJNR TYPE STRING,
PASUBNR TYPE STRING,
PAPAOBJNR TYPE STRING,
PAPASUBNR TYPE STRING,
HRKFT TYPE STRING,
KNDNR TYPE STRING,
ARTNR TYPE STRING,
FKART TYPE STRING,
KAUFN TYPE STRING,
KDPOS TYPE STRING,
RKAUFNR TYPE STRING,
BUKRS TYPE STRING,
WERKS TYPE STRING,
GSBER TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
PRCTR TYPE STRING,
PPRCTR TYPE STRING,
PA_TYPE TYPE STRING,
INUMKR TYPE STRING,
GJAHR TYPE STRING,
FRWAE TYPE STRING,
KSTRG TYPE STRING,
PSPNR TYPE STRING,
COPA_POSID TYPE STRING,
COPA_CRMID TYPE STRING,
KSTAR TYPE STRING,
WRTTP TYPE STRING,
WTG001 TYPE STRING,
WTG002 TYPE STRING,
WTG003 TYPE STRING,
WTG004 TYPE STRING,
WTG005 TYPE STRING,
WTG006 TYPE STRING,
WTG007 TYPE STRING,
WTG008 TYPE STRING,
WTG009 TYPE STRING,
WTG010 TYPE STRING,
WTG011 TYPE STRING,
WTG012 TYPE STRING,
WTG013 TYPE STRING,
WTG014 TYPE STRING,
WTG015 TYPE STRING,
WTG016 TYPE STRING,
WOG001 TYPE STRING,
WOG002 TYPE STRING,
WOG003 TYPE STRING,
WOG004 TYPE STRING,
WOG005 TYPE STRING,
WOG006 TYPE STRING,
WOG007 TYPE STRING,
WOG008 TYPE STRING,
WOG009 TYPE STRING,
WOG010 TYPE STRING,
WOG011 TYPE STRING,
WOG012 TYPE STRING,
WOG013 TYPE STRING,
WOG014 TYPE STRING,
WOG015 TYPE STRING,
WOG016 TYPE STRING,
WKG001 TYPE STRING,
WKG002 TYPE STRING,
WKG003 TYPE STRING,
WKG004 TYPE STRING,
WKG005 TYPE STRING,
WKG006 TYPE STRING,
WKG007 TYPE STRING,
WKG008 TYPE STRING,
WKG009 TYPE STRING,
WKG010 TYPE STRING,
WKG011 TYPE STRING,
WKG012 TYPE STRING,
WKG013 TYPE STRING,
WKG014 TYPE STRING,
WKG015 TYPE STRING,
WKG016 TYPE STRING,
WKF001 TYPE STRING,
WKF002 TYPE STRING,
WKF003 TYPE STRING,
WKF004 TYPE STRING,
WKF005 TYPE STRING,
WKF006 TYPE STRING,
WKF007 TYPE STRING,
WKF008 TYPE STRING,
WKF009 TYPE STRING,
WKF010 TYPE STRING,
WKF011 TYPE STRING,
WKF012 TYPE STRING,
WKF013 TYPE STRING,
WKF014 TYPE STRING,
WKF015 TYPE STRING,
WKF016 TYPE STRING,
MEG001 TYPE STRING,
MEG002 TYPE STRING,
MEG003 TYPE STRING,
MEG004 TYPE STRING,
MEG005 TYPE STRING,
MEG006 TYPE STRING,
MEG007 TYPE STRING,
MEG008 TYPE STRING,
MEG009 TYPE STRING,
MEG010 TYPE STRING,
MEG011 TYPE STRING,
MEG012 TYPE STRING,
MEG013 TYPE STRING,
MEG014 TYPE STRING,
MEG015 TYPE STRING,
MEG016 TYPE STRING,
HIE03 TYPE STRING,
HIE01 TYPE STRING,
HIE02 TYPE STRING,
WWBS TYPE STRING,END OF T_EKKO_STR. DATA: WA_CE8GB10_STR type T_EKKO_STR. DATA: ld_text TYPE string. LOOP AT IT_EKKO INTO WA_EKKO. MOVE-CORRESPONDING wa_EKKO TO WA_EKKO_STR. CONCATENATE: sy-vline
WA_CE8GB10_STR-MANDT sy-vline
WA_CE8GB10_STR-PALEDGER sy-vline
WA_CE8GB10_STR-VRGAR sy-vline
WA_CE8GB10_STR-PLIKZ sy-vline
WA_CE8GB10_STR-VERSI sy-vline
WA_CE8GB10_STR-PAOBJNR sy-vline
WA_CE8GB10_STR-PASUBNR sy-vline
WA_CE8GB10_STR-PAPAOBJNR sy-vline
WA_CE8GB10_STR-PAPASUBNR sy-vline
WA_CE8GB10_STR-HRKFT sy-vline
WA_CE8GB10_STR-KNDNR sy-vline
WA_CE8GB10_STR-ARTNR sy-vline
WA_CE8GB10_STR-FKART sy-vline
WA_CE8GB10_STR-KAUFN sy-vline
WA_CE8GB10_STR-KDPOS sy-vline
WA_CE8GB10_STR-RKAUFNR sy-vline
WA_CE8GB10_STR-BUKRS sy-vline
WA_CE8GB10_STR-WERKS sy-vline
WA_CE8GB10_STR-GSBER sy-vline
WA_CE8GB10_STR-VKORG sy-vline
WA_CE8GB10_STR-VTWEG sy-vline
WA_CE8GB10_STR-SPART sy-vline
WA_CE8GB10_STR-PRCTR sy-vline
WA_CE8GB10_STR-PPRCTR sy-vline
WA_CE8GB10_STR-PA_TYPE sy-vline
WA_CE8GB10_STR-INUMKR sy-vline
WA_CE8GB10_STR-GJAHR sy-vline
WA_CE8GB10_STR-FRWAE sy-vline
WA_CE8GB10_STR-KSTRG sy-vline
WA_CE8GB10_STR-PSPNR sy-vline
WA_CE8GB10_STR-COPA_POSID sy-vline
WA_CE8GB10_STR-COPA_CRMID sy-vline
WA_CE8GB10_STR-KSTAR sy-vline
WA_CE8GB10_STR-WRTTP sy-vline
WA_CE8GB10_STR-WTG001 sy-vline
WA_CE8GB10_STR-WTG002 sy-vline
WA_CE8GB10_STR-WTG003 sy-vline
WA_CE8GB10_STR-WTG004 sy-vline
WA_CE8GB10_STR-WTG005 sy-vline
WA_CE8GB10_STR-WTG006 sy-vline
WA_CE8GB10_STR-WTG007 sy-vline
WA_CE8GB10_STR-WTG008 sy-vline
WA_CE8GB10_STR-WTG009 sy-vline
WA_CE8GB10_STR-WTG010 sy-vline
WA_CE8GB10_STR-WTG011 sy-vline
WA_CE8GB10_STR-WTG012 sy-vline
WA_CE8GB10_STR-WTG013 sy-vline
WA_CE8GB10_STR-WTG014 sy-vline
WA_CE8GB10_STR-WTG015 sy-vline
WA_CE8GB10_STR-WTG016 sy-vline
WA_CE8GB10_STR-WOG001 sy-vline
WA_CE8GB10_STR-WOG002 sy-vline
WA_CE8GB10_STR-WOG003 sy-vline
WA_CE8GB10_STR-WOG004 sy-vline
WA_CE8GB10_STR-WOG005 sy-vline
WA_CE8GB10_STR-WOG006 sy-vline
WA_CE8GB10_STR-WOG007 sy-vline
WA_CE8GB10_STR-WOG008 sy-vline
WA_CE8GB10_STR-WOG009 sy-vline
WA_CE8GB10_STR-WOG010 sy-vline
WA_CE8GB10_STR-WOG011 sy-vline
WA_CE8GB10_STR-WOG012 sy-vline
WA_CE8GB10_STR-WOG013 sy-vline
WA_CE8GB10_STR-WOG014 sy-vline
WA_CE8GB10_STR-WOG015 sy-vline
WA_CE8GB10_STR-WOG016 sy-vline
WA_CE8GB10_STR-WKG001 sy-vline
WA_CE8GB10_STR-WKG002 sy-vline
WA_CE8GB10_STR-WKG003 sy-vline
WA_CE8GB10_STR-WKG004 sy-vline
WA_CE8GB10_STR-WKG005 sy-vline
WA_CE8GB10_STR-WKG006 sy-vline
WA_CE8GB10_STR-WKG007 sy-vline
WA_CE8GB10_STR-WKG008 sy-vline
WA_CE8GB10_STR-WKG009 sy-vline
WA_CE8GB10_STR-WKG010 sy-vline
WA_CE8GB10_STR-WKG011 sy-vline
WA_CE8GB10_STR-WKG012 sy-vline
WA_CE8GB10_STR-WKG013 sy-vline
WA_CE8GB10_STR-WKG014 sy-vline
WA_CE8GB10_STR-WKG015 sy-vline
WA_CE8GB10_STR-WKG016 sy-vline
WA_CE8GB10_STR-WKF001 sy-vline
WA_CE8GB10_STR-WKF002 sy-vline
WA_CE8GB10_STR-WKF003 sy-vline
WA_CE8GB10_STR-WKF004 sy-vline
WA_CE8GB10_STR-WKF005 sy-vline
WA_CE8GB10_STR-WKF006 sy-vline
WA_CE8GB10_STR-WKF007 sy-vline
WA_CE8GB10_STR-WKF008 sy-vline
WA_CE8GB10_STR-WKF009 sy-vline
WA_CE8GB10_STR-WKF010 sy-vline
WA_CE8GB10_STR-WKF011 sy-vline
WA_CE8GB10_STR-WKF012 sy-vline
WA_CE8GB10_STR-WKF013 sy-vline
WA_CE8GB10_STR-WKF014 sy-vline
WA_CE8GB10_STR-WKF015 sy-vline
WA_CE8GB10_STR-WKF016 sy-vline
WA_CE8GB10_STR-MEG001 sy-vline
WA_CE8GB10_STR-MEG002 sy-vline
WA_CE8GB10_STR-MEG003 sy-vline
WA_CE8GB10_STR-MEG004 sy-vline
WA_CE8GB10_STR-MEG005 sy-vline
WA_CE8GB10_STR-MEG006 sy-vline
WA_CE8GB10_STR-MEG007 sy-vline
WA_CE8GB10_STR-MEG008 sy-vline
WA_CE8GB10_STR-MEG009 sy-vline
WA_CE8GB10_STR-MEG010 sy-vline
WA_CE8GB10_STR-MEG011 sy-vline
WA_CE8GB10_STR-MEG012 sy-vline
WA_CE8GB10_STR-MEG013 sy-vline
WA_CE8GB10_STR-MEG014 sy-vline
WA_CE8GB10_STR-MEG015 sy-vline
WA_CE8GB10_STR-MEG016 sy-vline
WA_CE8GB10_STR-HIE03 sy-vline
WA_CE8GB10_STR-HIE01 sy-vline
WA_CE8GB10_STR-HIE02 sy-vline
WA_CE8GB10_STR-WWBS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
