ABAP Select data from SAP table REAJ_ADJM_TASK_OBJ_L 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 REAJ_ADJM_TASK_OBJ_L 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 REAJ_ADJM_TASK_OBJ_L. 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 REAJ_ADJM_TASK_OBJ_L 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_REAJ_ADJM_TASK_OBJ_L TYPE STANDARD TABLE OF REAJ_ADJM_TASK_OBJ_L,
      WA_REAJ_ADJM_TASK_OBJ_L TYPE REAJ_ADJM_TASK_OBJ_L,
      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: <REAJ_ADJM_TASK_OBJ_L> TYPE REAJ_ADJM_TASK_OBJ_L.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_REAJ_ADJM_TASK_OBJ_L.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM REAJ_ADJM_TASK_OBJ_L
  INTO TABLE IT_REAJ_ADJM_TASK_OBJ_L.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM REAJ_ADJM_TASK_OBJ_L
*  INTO TABLE @DATA(IT_REAJ_ADJM_TASK_OBJ_L2).
*--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_REAJ_ADJM_TASK_OBJ_L INDEX 1 INTO DATA(WA_REAJ_ADJM_TASK_OBJ_L2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_REAJ_ADJM_TASK_OBJ_L ASSIGNING <REAJ_ADJM_TASK_OBJ_L>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<REAJ_ADJM_TASK_OBJ_L>-MANDT = 1.
<REAJ_ADJM_TASK_OBJ_L>-INTRENO = 1.
<REAJ_ADJM_TASK_OBJ_L>-OBJNRADJM = 1.
<REAJ_ADJM_TASK_OBJ_L>-COSTSPOS = 1.
<REAJ_ADJM_TASK_OBJ_L>-XCOSTSPOS = 1.
ENDLOOP.

LOOP AT IT_REAJ_ADJM_TASK_OBJ_L INTO WA_REAJ_ADJM_TASK_OBJ_L.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_REAJ_ADJM_TASK_OBJ_L-CALCINCP, sy-vline,
WA_REAJ_ADJM_TASK_OBJ_L-CALCINCA, sy-vline,
WA_REAJ_ADJM_TASK_OBJ_L-CALCABSP, sy-vline,
WA_REAJ_ADJM_TASK_OBJ_L-CALCABSA, sy-vline,
WA_REAJ_ADJM_TASK_OBJ_L-CALCINCMEASP, sy-vline,
WA_REAJ_ADJM_TASK_OBJ_L-CALCINCMEASA, sy-vline.
ENDLOOP. *Add any further fields from structure WA_REAJ_ADJM_TASK_OBJ_L 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_REAJ_ADJM_TASK_OBJ_L 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_REAJ_ADJM_TASK_OBJ_L INTO WA_REAJ_ADJM_TASK_OBJ_L. *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 RECUP, internal->external for field CALCINCP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCINCP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCINCP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCINCA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCINCA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCINCA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCABSP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCABSP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCABSP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCABSA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCABSA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCABSA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCINCMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCINCMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCINCMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCINCMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCINCMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCINCMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCABSMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCABSMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCABSMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CALCABSMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CALCABSMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CALCABSMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODINCP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODINCP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODINCP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODINCA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODINCA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODINCA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODABSP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODABSP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODABSP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODABSA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODABSA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODABSA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODINCMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODINCMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODINCMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODINCMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODINCMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODINCMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODABSMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODABSMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODABSMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MODABSMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MODABSMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MODABSMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field DECP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-DECP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-DECP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field DECA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-DECA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-DECA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field DECMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-DECMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-DECMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field DECMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-DECMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-DECMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPINCP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPINCA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPABSP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPABSA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPINCMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPINCMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPINCMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPABSMEASP CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSMEASP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSMEASP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field BFCAPABSMEASA CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSMEASA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-BFCAPABSMEASA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXINC CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXINC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXINC.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXABS CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXABS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXABS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXINCMEAS CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXINCMEAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXINCMEAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXABSMEAS CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXABSMEAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXABSMEAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXEPMEAS CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXEPMEAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXEPMEAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXEPMEASCN CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXEPMEASCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXEPMEASCN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXEPABS CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXEPABS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXEPABS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field MAXEPABSCN CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MAXEPABSCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MAXEPABSCN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field MEASUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-MEASUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-MEASUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field COSTSMEAS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-COSTSMEAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-COSTSMEAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field COSTSMEASUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-COSTSMEASUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-COSTSMEASUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ADJMCT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-ADJMCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-ADJMCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ADJMCTCUST CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-ADJMCTCUST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-ADJMCTCUST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ADJMCTREF CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-ADJMCTREF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-ADJMCTREF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field WAIVERCT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-WAIVERCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-WAIVERCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CAPPINGCT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CAPPINGCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CAPPINGCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit RECUP, internal->external for field CEACSTAMOUNT CALL FUNCTION 'CONVERSION_EXIT_RECUP_OUTPUT' EXPORTING input = WA_REAJ_ADJM_TASK_OBJ_L-CEACSTAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ_L-CEACSTAMOUNT.
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_REAJ_ADJM_TASK_OBJ_L_STR,
MANDT TYPE STRING,
INTRENO TYPE STRING,
OBJNRADJM TYPE STRING,
COSTSPOS TYPE STRING,
XCOSTSPOS TYPE STRING,
CALCINCP TYPE STRING,
CALCINCA TYPE STRING,
CALCABSP TYPE STRING,
CALCABSA TYPE STRING,
CALCINCMEASP TYPE STRING,
CALCINCMEASA TYPE STRING,
CALCABSMEASP TYPE STRING,
CALCABSMEASA TYPE STRING,
MODINCP TYPE STRING,
MODINCA TYPE STRING,
MODABSP TYPE STRING,
MODABSA TYPE STRING,
MODINCMEASP TYPE STRING,
MODINCMEASA TYPE STRING,
MODABSMEASP TYPE STRING,
MODABSMEASA TYPE STRING,
DECP TYPE STRING,
DECA TYPE STRING,
DECMEASP TYPE STRING,
DECMEASA TYPE STRING,
BFCAPINCP TYPE STRING,
BFCAPINCA TYPE STRING,
BFCAPABSP TYPE STRING,
BFCAPABSA TYPE STRING,
BFCAPINCMEASP TYPE STRING,
BFCAPINCMEASA TYPE STRING,
BFCAPABSMEASP TYPE STRING,
BFCAPABSMEASA TYPE STRING,
MAXINC TYPE STRING,
MAXABS TYPE STRING,
MAXINCMEAS TYPE STRING,
MAXABSMEAS TYPE STRING,
MAXEPMEAS TYPE STRING,
MAXEPMEASCN TYPE STRING,
MAXEPABS TYPE STRING,
MAXEPABSCN TYPE STRING,
FULLWAIVER TYPE STRING,
FULLWAIVERCN TYPE STRING,
NOCOSTSOBJP TYPE STRING,
NOCOSTSOBJA TYPE STRING,
IDENTADJM TYPE STRING,
ISSUMCOSTSPOS TYPE STRING,
MEASVALUEP TYPE STRING,
MEASVALUEA TYPE STRING,
MEASUNIT TYPE STRING,
COSTSMEAS TYPE STRING,
COSTSMEASUNIT TYPE STRING,
COSTSREFER TYPE STRING,
COSTSPOSGRP TYPE STRING,
XCOSTSPOSGRP TYPE STRING,
OBJNRADJMCN TYPE STRING,
IDENTADJMCN TYPE STRING,
ADJMCT TYPE STRING,
ADJMCP TYPE STRING,
ADJMCTCUST TYPE STRING,
ADJMCPCUST TYPE STRING,
ADJMCTREF TYPE STRING,
ADJMCPREF TYPE STRING,
WAIVERCT TYPE STRING,
WAIVERCP TYPE STRING,
CAPPINGCT TYPE STRING,
CAPPINGCP TYPE STRING,
XCAPPINGCT TYPE STRING,
XADJMCT TYPE STRING,
XWAIVERCT TYPE STRING,
SORTORDERGRP TYPE STRING,
SORTORDERPOS TYPE STRING,
ICON_DETAIL TYPE STRING,
COLORTAB TYPE STRING,
STYLETAB TYPE STRING,
ISTOTSUMCOSTSPOS TYPE STRING,
IDENTADJMSORT TYPE STRING,
MEASVALCHARP TYPE STRING,
MEASVALCHARA TYPE STRING,
CEACSTAMOUNT TYPE STRING,
SORTORDER TYPE STRING,END OF T_EKKO_STR. DATA: WA_REAJ_ADJM_TASK_OBJ_L_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_REAJ_ADJM_TASK_OBJ_L_STR-MANDT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-INTRENO sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-OBJNRADJM sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-COSTSPOS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-XCOSTSPOS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCINCP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCINCA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCABSP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCABSA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCINCMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCINCMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCABSMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CALCABSMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODINCP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODINCA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODABSP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODABSA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODINCMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODINCMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODABSMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MODABSMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-DECP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-DECA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-DECMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-DECMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPINCP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPINCA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPABSP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPABSA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPINCMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPINCMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPABSMEASP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-BFCAPABSMEASA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXINC sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXABS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXINCMEAS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXABSMEAS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXEPMEAS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXEPMEASCN sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXEPABS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MAXEPABSCN sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-FULLWAIVER sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-FULLWAIVERCN sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-NOCOSTSOBJP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-NOCOSTSOBJA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-IDENTADJM sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ISSUMCOSTSPOS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MEASVALUEP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MEASVALUEA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MEASUNIT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-COSTSMEAS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-COSTSMEASUNIT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-COSTSREFER sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-COSTSPOSGRP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-XCOSTSPOSGRP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-OBJNRADJMCN sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-IDENTADJMCN sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ADJMCT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ADJMCP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ADJMCTCUST sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ADJMCPCUST sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ADJMCTREF sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ADJMCPREF sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-WAIVERCT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-WAIVERCP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CAPPINGCT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CAPPINGCP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-XCAPPINGCT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-XADJMCT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-XWAIVERCT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-SORTORDERGRP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-SORTORDERPOS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ICON_DETAIL sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-COLORTAB sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-STYLETAB sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-ISTOTSUMCOSTSPOS sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-IDENTADJMSORT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MEASVALCHARP sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-MEASVALCHARA sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-CEACSTAMOUNT sy-vline
WA_REAJ_ADJM_TASK_OBJ_L_STR-SORTORDER sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.