ABAP Select data from SAP table COVJTA 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 COVJTA 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 COVJTA. 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 COVJTA 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_COVJTA TYPE STANDARD TABLE OF COVJTA,
WA_COVJTA TYPE COVJTA,
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: <COVJTA> TYPE COVJTA.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_COVJTA.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM COVJTA
INTO TABLE IT_COVJTA.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM COVJTA
* INTO TABLE @DATA(IT_COVJTA2).
*--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_COVJTA INDEX 1 INTO DATA(WA_COVJTA2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_COVJTA ASSIGNING <COVJTA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<COVJTA>-KOKRS = 1.
<COVJTA>-BELNR = 1.
<COVJTA>-BUZEI = 1.
<COVJTA>-TKG001 = 1.
<COVJTA>-TKG002 = 1.
ENDLOOP. LOOP AT IT_COVJTA INTO WA_COVJTA. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_COVJTA-TKG003, sy-vline,
WA_COVJTA-TKG004, sy-vline,
WA_COVJTA-TKG005, sy-vline,
WA_COVJTA-TKG006, sy-vline,
WA_COVJTA-TKG007, sy-vline,
WA_COVJTA-TKG008, sy-vline.
ENDLOOP. *Add any further fields from structure WA_COVJTA 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_COVJTA 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_COVJTA INTO WA_COVJTA. *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 ALPHA, internal->external for field BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-BELNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG001 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG002 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG003 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG004 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG005 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG006 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG007 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG008 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG009 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG010 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG011 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG012 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG013 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG014 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG015 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKG016 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKG016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKG016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF001 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF002 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF003 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF004 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF005 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF006 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF007 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF008 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF009 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF010 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF011 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF012 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF013 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF014 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF015 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TKF016 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TKF016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TKF016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG001 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG002 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG003 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG004 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG005 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG006 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG007 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG008 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG009 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG010 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG011 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG012 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG013 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG014 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG015 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOG016 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOG016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOG016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF001 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF001 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF001.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF002 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF002 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF002.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF003 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF003 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF003.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF004 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF004 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF004.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF005 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF005 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF005.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF006 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF006 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF006.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF007 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF007 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF007.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF008 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF008 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF008.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF009 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF009 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF009.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF010 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF010 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF010.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF011 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF011 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF011.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF012 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF012 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF012.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF013 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF013 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF013.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF014 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF014 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF014.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF015 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF015 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF015.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC112, internal->external for field TOF016 CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT' EXPORTING input = WA_COVJTA-TOF016 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TOF016.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field LEDNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-LEDNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-LEDNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_COVJTA-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-GJAHR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field WRTTP CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-WRTTP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-WRTTP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERSN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-VERSN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-VERSN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field TARKZ CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-TARKZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-TARKZ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field REFBN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-REFBN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-REFBN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field REFGJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_COVJTA-REFGJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-REFGJ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field LOGSYSTEM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_COVJTA-LOGSYSTEM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_COVJTA-LOGSYSTEM.
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_COVJTA_STR,
KOKRS TYPE STRING,
BELNR TYPE STRING,
BUZEI TYPE STRING,
TKG001 TYPE STRING,
TKG002 TYPE STRING,
TKG003 TYPE STRING,
TKG004 TYPE STRING,
TKG005 TYPE STRING,
TKG006 TYPE STRING,
TKG007 TYPE STRING,
TKG008 TYPE STRING,
TKG009 TYPE STRING,
TKG010 TYPE STRING,
TKG011 TYPE STRING,
TKG012 TYPE STRING,
TKG013 TYPE STRING,
TKG014 TYPE STRING,
TKG015 TYPE STRING,
TKG016 TYPE STRING,
TKF001 TYPE STRING,
TKF002 TYPE STRING,
TKF003 TYPE STRING,
TKF004 TYPE STRING,
TKF005 TYPE STRING,
TKF006 TYPE STRING,
TKF007 TYPE STRING,
TKF008 TYPE STRING,
TKF009 TYPE STRING,
TKF010 TYPE STRING,
TKF011 TYPE STRING,
TKF012 TYPE STRING,
TKF013 TYPE STRING,
TKF014 TYPE STRING,
TKF015 TYPE STRING,
TKF016 TYPE STRING,
TKE001 TYPE STRING,
TKE002 TYPE STRING,
TKE003 TYPE STRING,
TKE004 TYPE STRING,
TKE005 TYPE STRING,
TKE006 TYPE STRING,
TKE007 TYPE STRING,
TKE008 TYPE STRING,
TKE009 TYPE STRING,
TKE010 TYPE STRING,
TKE011 TYPE STRING,
TKE012 TYPE STRING,
TKE013 TYPE STRING,
TKE014 TYPE STRING,
TKE015 TYPE STRING,
TKE016 TYPE STRING,
TOG001 TYPE STRING,
TOG002 TYPE STRING,
TOG003 TYPE STRING,
TOG004 TYPE STRING,
TOG005 TYPE STRING,
TOG006 TYPE STRING,
TOG007 TYPE STRING,
TOG008 TYPE STRING,
TOG009 TYPE STRING,
TOG010 TYPE STRING,
TOG011 TYPE STRING,
TOG012 TYPE STRING,
TOG013 TYPE STRING,
TOG014 TYPE STRING,
TOG015 TYPE STRING,
TOG016 TYPE STRING,
TOF001 TYPE STRING,
TOF002 TYPE STRING,
TOF003 TYPE STRING,
TOF004 TYPE STRING,
TOF005 TYPE STRING,
TOF006 TYPE STRING,
TOF007 TYPE STRING,
TOF008 TYPE STRING,
TOF009 TYPE STRING,
TOF010 TYPE STRING,
TOF011 TYPE STRING,
TOF012 TYPE STRING,
TOF013 TYPE STRING,
TOF014 TYPE STRING,
TOF015 TYPE STRING,
TOF016 TYPE STRING,
TOE001 TYPE STRING,
TOE002 TYPE STRING,
TOE003 TYPE STRING,
TOE004 TYPE STRING,
TOE005 TYPE STRING,
TOE006 TYPE STRING,
TOE007 TYPE STRING,
TOE008 TYPE STRING,
TOE009 TYPE STRING,
TOE010 TYPE STRING,
TOE011 TYPE STRING,
TOE012 TYPE STRING,
TOE013 TYPE STRING,
TOE014 TYPE STRING,
TOE015 TYPE STRING,
TOE016 TYPE STRING,
LEDNR TYPE STRING,
OBJNR TYPE STRING,
GJAHR TYPE STRING,
WRTTP TYPE STRING,
VERSN TYPE STRING,
TARKZ TYPE STRING,
VRGNG TYPE STRING,
SGTXT TYPE STRING,
REFBZ TYPE STRING,
ZLENR TYPE STRING,
PERAB TYPE STRING,
PERBI TYPE STRING,
BLDAT TYPE STRING,
BUDAT TYPE STRING,
CPUDT TYPE STRING,
USNAM TYPE STRING,
BLTXT TYPE STRING,
STFLG TYPE STRING,
STOKZ TYPE STRING,
REFBT TYPE STRING,
REFBN TYPE STRING,
REFBK TYPE STRING,
REFGJ TYPE STRING,
BLART TYPE STRING,
ORGVG TYPE STRING,
SUMBZ TYPE STRING,
DELBZ TYPE STRING,
WSDAT TYPE STRING,
KURST TYPE STRING,
VARNR TYPE STRING,
KWAER TYPE STRING,
CTYP1 TYPE STRING,
CTYP2 TYPE STRING,
CTYP3 TYPE STRING,
CTYP4 TYPE STRING,
AWTYP TYPE STRING,
AWORG TYPE STRING,
LOGSYSTEM TYPE STRING,
TIMESTMP TYPE STRING,END OF T_EKKO_STR. DATA: WA_COVJTA_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_COVJTA_STR-KOKRS sy-vline
WA_COVJTA_STR-BELNR sy-vline
WA_COVJTA_STR-BUZEI sy-vline
WA_COVJTA_STR-TKG001 sy-vline
WA_COVJTA_STR-TKG002 sy-vline
WA_COVJTA_STR-TKG003 sy-vline
WA_COVJTA_STR-TKG004 sy-vline
WA_COVJTA_STR-TKG005 sy-vline
WA_COVJTA_STR-TKG006 sy-vline
WA_COVJTA_STR-TKG007 sy-vline
WA_COVJTA_STR-TKG008 sy-vline
WA_COVJTA_STR-TKG009 sy-vline
WA_COVJTA_STR-TKG010 sy-vline
WA_COVJTA_STR-TKG011 sy-vline
WA_COVJTA_STR-TKG012 sy-vline
WA_COVJTA_STR-TKG013 sy-vline
WA_COVJTA_STR-TKG014 sy-vline
WA_COVJTA_STR-TKG015 sy-vline
WA_COVJTA_STR-TKG016 sy-vline
WA_COVJTA_STR-TKF001 sy-vline
WA_COVJTA_STR-TKF002 sy-vline
WA_COVJTA_STR-TKF003 sy-vline
WA_COVJTA_STR-TKF004 sy-vline
WA_COVJTA_STR-TKF005 sy-vline
WA_COVJTA_STR-TKF006 sy-vline
WA_COVJTA_STR-TKF007 sy-vline
WA_COVJTA_STR-TKF008 sy-vline
WA_COVJTA_STR-TKF009 sy-vline
WA_COVJTA_STR-TKF010 sy-vline
WA_COVJTA_STR-TKF011 sy-vline
WA_COVJTA_STR-TKF012 sy-vline
WA_COVJTA_STR-TKF013 sy-vline
WA_COVJTA_STR-TKF014 sy-vline
WA_COVJTA_STR-TKF015 sy-vline
WA_COVJTA_STR-TKF016 sy-vline
WA_COVJTA_STR-TKE001 sy-vline
WA_COVJTA_STR-TKE002 sy-vline
WA_COVJTA_STR-TKE003 sy-vline
WA_COVJTA_STR-TKE004 sy-vline
WA_COVJTA_STR-TKE005 sy-vline
WA_COVJTA_STR-TKE006 sy-vline
WA_COVJTA_STR-TKE007 sy-vline
WA_COVJTA_STR-TKE008 sy-vline
WA_COVJTA_STR-TKE009 sy-vline
WA_COVJTA_STR-TKE010 sy-vline
WA_COVJTA_STR-TKE011 sy-vline
WA_COVJTA_STR-TKE012 sy-vline
WA_COVJTA_STR-TKE013 sy-vline
WA_COVJTA_STR-TKE014 sy-vline
WA_COVJTA_STR-TKE015 sy-vline
WA_COVJTA_STR-TKE016 sy-vline
WA_COVJTA_STR-TOG001 sy-vline
WA_COVJTA_STR-TOG002 sy-vline
WA_COVJTA_STR-TOG003 sy-vline
WA_COVJTA_STR-TOG004 sy-vline
WA_COVJTA_STR-TOG005 sy-vline
WA_COVJTA_STR-TOG006 sy-vline
WA_COVJTA_STR-TOG007 sy-vline
WA_COVJTA_STR-TOG008 sy-vline
WA_COVJTA_STR-TOG009 sy-vline
WA_COVJTA_STR-TOG010 sy-vline
WA_COVJTA_STR-TOG011 sy-vline
WA_COVJTA_STR-TOG012 sy-vline
WA_COVJTA_STR-TOG013 sy-vline
WA_COVJTA_STR-TOG014 sy-vline
WA_COVJTA_STR-TOG015 sy-vline
WA_COVJTA_STR-TOG016 sy-vline
WA_COVJTA_STR-TOF001 sy-vline
WA_COVJTA_STR-TOF002 sy-vline
WA_COVJTA_STR-TOF003 sy-vline
WA_COVJTA_STR-TOF004 sy-vline
WA_COVJTA_STR-TOF005 sy-vline
WA_COVJTA_STR-TOF006 sy-vline
WA_COVJTA_STR-TOF007 sy-vline
WA_COVJTA_STR-TOF008 sy-vline
WA_COVJTA_STR-TOF009 sy-vline
WA_COVJTA_STR-TOF010 sy-vline
WA_COVJTA_STR-TOF011 sy-vline
WA_COVJTA_STR-TOF012 sy-vline
WA_COVJTA_STR-TOF013 sy-vline
WA_COVJTA_STR-TOF014 sy-vline
WA_COVJTA_STR-TOF015 sy-vline
WA_COVJTA_STR-TOF016 sy-vline
WA_COVJTA_STR-TOE001 sy-vline
WA_COVJTA_STR-TOE002 sy-vline
WA_COVJTA_STR-TOE003 sy-vline
WA_COVJTA_STR-TOE004 sy-vline
WA_COVJTA_STR-TOE005 sy-vline
WA_COVJTA_STR-TOE006 sy-vline
WA_COVJTA_STR-TOE007 sy-vline
WA_COVJTA_STR-TOE008 sy-vline
WA_COVJTA_STR-TOE009 sy-vline
WA_COVJTA_STR-TOE010 sy-vline
WA_COVJTA_STR-TOE011 sy-vline
WA_COVJTA_STR-TOE012 sy-vline
WA_COVJTA_STR-TOE013 sy-vline
WA_COVJTA_STR-TOE014 sy-vline
WA_COVJTA_STR-TOE015 sy-vline
WA_COVJTA_STR-TOE016 sy-vline
WA_COVJTA_STR-LEDNR sy-vline
WA_COVJTA_STR-OBJNR sy-vline
WA_COVJTA_STR-GJAHR sy-vline
WA_COVJTA_STR-WRTTP sy-vline
WA_COVJTA_STR-VERSN sy-vline
WA_COVJTA_STR-TARKZ sy-vline
WA_COVJTA_STR-VRGNG sy-vline
WA_COVJTA_STR-SGTXT sy-vline
WA_COVJTA_STR-REFBZ sy-vline
WA_COVJTA_STR-ZLENR sy-vline
WA_COVJTA_STR-PERAB sy-vline
WA_COVJTA_STR-PERBI sy-vline
WA_COVJTA_STR-BLDAT sy-vline
WA_COVJTA_STR-BUDAT sy-vline
WA_COVJTA_STR-CPUDT sy-vline
WA_COVJTA_STR-USNAM sy-vline
WA_COVJTA_STR-BLTXT sy-vline
WA_COVJTA_STR-STFLG sy-vline
WA_COVJTA_STR-STOKZ sy-vline
WA_COVJTA_STR-REFBT sy-vline
WA_COVJTA_STR-REFBN sy-vline
WA_COVJTA_STR-REFBK sy-vline
WA_COVJTA_STR-REFGJ sy-vline
WA_COVJTA_STR-BLART sy-vline
WA_COVJTA_STR-ORGVG sy-vline
WA_COVJTA_STR-SUMBZ sy-vline
WA_COVJTA_STR-DELBZ sy-vline
WA_COVJTA_STR-WSDAT sy-vline
WA_COVJTA_STR-KURST sy-vline
WA_COVJTA_STR-VARNR sy-vline
WA_COVJTA_STR-KWAER sy-vline
WA_COVJTA_STR-CTYP1 sy-vline
WA_COVJTA_STR-CTYP2 sy-vline
WA_COVJTA_STR-CTYP3 sy-vline
WA_COVJTA_STR-CTYP4 sy-vline
WA_COVJTA_STR-AWTYP sy-vline
WA_COVJTA_STR-AWORG sy-vline
WA_COVJTA_STR-LOGSYSTEM sy-vline
WA_COVJTA_STR-TIMESTMP sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
