ABAP Select data from SAP table REAJ_ADJM_TASK_OBJ into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP REAJ_ADJM_TASK_OBJ 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. 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 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 TYPE STANDARD TABLE OF REAJ_ADJM_TASK_OBJ,
      WA_REAJ_ADJM_TASK_OBJ TYPE REAJ_ADJM_TASK_OBJ,
      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> TYPE REAJ_ADJM_TASK_OBJ.

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

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

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


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_REAJ_ADJM_TASK_OBJ ASSIGNING <REAJ_ADJM_TASK_OBJ>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<REAJ_ADJM_TASK_OBJ>-MANDT = 1.
<REAJ_ADJM_TASK_OBJ>-INTRENO = 1.
<REAJ_ADJM_TASK_OBJ>-OBJNRADJM = 1.
<REAJ_ADJM_TASK_OBJ>-COSTSPOS = 1.
<REAJ_ADJM_TASK_OBJ>-XCOSTSPOS = 1.

ENDLOOP.

LOOP AT IT_REAJ_ADJM_TASK_OBJ INTO WA_REAJ_ADJM_TASK_OBJ.
*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-CALCINCP, sy-vline,
  WA_REAJ_ADJM_TASK_OBJ-CALCINCA, sy-vline,
  WA_REAJ_ADJM_TASK_OBJ-CALCABSP, sy-vline,
  WA_REAJ_ADJM_TASK_OBJ-CALCABSA, sy-vline,
  WA_REAJ_ADJM_TASK_OBJ-CALCINCMEASP, sy-vline,
  WA_REAJ_ADJM_TASK_OBJ-CALCINCMEASA, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_REAJ_ADJM_TASK_OBJ 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 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 INTO WA_REAJ_ADJM_TASK_OBJ.


*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-CALCINCP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCINCA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCABSP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCABSA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCINCMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCINCMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCABSMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-CALCABSMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODINCP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODINCA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODABSP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODABSA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODINCMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODINCMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODABSMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MODABSMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-DECP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-DECA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-DECMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-DECMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPINCP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPINCA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPABSP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPABSA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPINCMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPINCMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPABSMEASP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-BFCAPABSMEASA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXINC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXABS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXINCMEAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXABSMEAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXEPMEAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXEPMEASCN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXEPABS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-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-MAXEPABSCN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REAJ_ADJM_TASK_OBJ-MAXEPABSCN.
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_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,END OF T_EKKO_STR.
DATA: WA_REAJ_ADJM_TASK_OBJ_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_STR-MANDT sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-INTRENO sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-OBJNRADJM sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-COSTSPOS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-XCOSTSPOS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCINCP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCINCA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCABSP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCABSA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCINCMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCINCMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCABSMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-CALCABSMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODINCP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODINCA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODABSP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODABSA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODINCMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODINCMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODABSMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MODABSMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-DECP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-DECA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-DECMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-DECMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPINCP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPINCA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPABSP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPABSA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPINCMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPINCMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPABSMEASP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-BFCAPABSMEASA sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXINC sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXABS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXINCMEAS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXABSMEAS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXEPMEAS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXEPMEASCN sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXEPABS sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-MAXEPABSCN sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-FULLWAIVER sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-FULLWAIVERCN sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-NOCOSTSOBJP sy-vline 
WA_REAJ_ADJM_TASK_OBJ_STR-NOCOSTSOBJA sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.