ABAP Select data from SAP table YCRM01_SIS_DOCRE 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 YCRM01_SIS_DOCRE 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 YCRM01_SIS_DOCRE. 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 YCRM01_SIS_DOCRE 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_YCRM01_SIS_DOCRE TYPE STANDARD TABLE OF YCRM01_SIS_DOCRE,
      WA_YCRM01_SIS_DOCRE TYPE YCRM01_SIS_DOCRE,
      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: <YCRM01_SIS_DOCRE> TYPE YCRM01_SIS_DOCRE.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<YCRM01_SIS_DOCRE>-MANDT_H = 1.
<YCRM01_SIS_DOCRE>-POST_YEAR_H = 1.
<YCRM01_SIS_DOCRE>-DOC_ID_H = 1.
<YCRM01_SIS_DOCRE>-KNW_TIMESTAMP_H = 1.
<YCRM01_SIS_DOCRE>-CLC_TIMESTAMP_H = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_YCRM01_SIS_DOCRE-FLG_REVERSOR_H, sy-vline,
  WA_YCRM01_SIS_DOCRE-DOC_TYPE_H, sy-vline,
  WA_YCRM01_SIS_DOCRE-POST_DATE_H, sy-vline,
  WA_YCRM01_SIS_DOCRE-POST_MONTH_H, sy-vline,
  WA_YCRM01_SIS_DOCRE-TRI_IMP_DATE_H, sy-vline,
  WA_YCRM01_SIS_DOCRE-TRI_IMP_YEAR_H, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_YCRM01_SIS_DOCRE 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_YCRM01_SIS_DOCRE 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_YCRM01_SIS_DOCRE INTO WA_YCRM01_SIS_DOCRE.


*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 DOC_ID_H
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-DOC_ID_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-DOC_ID_H.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field KNW_TIMESTAMP_H
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-KNW_TIMESTAMP_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-KNW_TIMESTAMP_H.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field CLC_TIMESTAMP_H
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-CLC_TIMESTAMP_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-CLC_TIMESTAMP_H.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit BOBJ0, internal->external for field BUSOBJ_TYPE_H
CALL FUNCTION 'CONVERSION_EXIT_BOBJ0_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-BUSOBJ_TYPE_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-BUSOBJ_TYPE_H.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BOBJ1, internal->external for field BUSOBJ_ID_H
CALL FUNCTION 'CONVERSION_EXIT_BOBJ1_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-BUSOBJ_ID_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-BUSOBJ_ID_H.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field BUSOBJ_VERSDATE_H
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-BUSOBJ_VERSDATE_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-BUSOBJ_VERSDATE_H.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit TSTPS, internal->external for field CHG_TIMESTAMP_H
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-CHG_TIMESTAMP_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-CHG_TIMESTAMP_H.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field REV_TIMESTAMP_H
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-REV_TIMESTAMP_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-REV_TIMESTAMP_H.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field UPD_TIMESTAMP_H
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-UPD_TIMESTAMP_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-UPD_TIMESTAMP_H.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit TSTPS, internal->external for field RESP_RUPT_BEGIN_R
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-RESP_RUPT_BEGIN_R
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-RESP_RUPT_BEGIN_R.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field RESP_RUPT_END_R
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-RESP_RUPT_END_R
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-RESP_RUPT_END_R.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit TSTPS, internal->external for field UPD_TIMESTAMP_R
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_YCRM01_SIS_DOCRE-UPD_TIMESTAMP_R
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_YCRM01_SIS_DOCRE-UPD_TIMESTAMP_R.
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_YCRM01_SIS_DOCRE_STR, 
MANDT_H TYPE STRING,
POST_YEAR_H TYPE STRING,
DOC_ID_H TYPE STRING,
KNW_TIMESTAMP_H TYPE STRING,
CLC_TIMESTAMP_H TYPE STRING,
FLG_REVERSOR_H TYPE STRING,
DOC_TYPE_H TYPE STRING,
POST_DATE_H TYPE STRING,
POST_MONTH_H TYPE STRING,
TRI_IMP_DATE_H TYPE STRING,
TRI_IMP_YEAR_H TYPE STRING,
TRI_CASE_ID_H TYPE STRING,
TRI_CASE_VERS_H TYPE STRING,
FLG_NOSETTLEMENT_H TYPE STRING,
FLG_NORESETTLE_H TYPE STRING,
FLG_FUTURECHECK_H TYPE STRING,
RELEASE_DATE_H TYPE STRING,
TRI_CASE_TXT_H TYPE STRING,
FLG_ASYNC_DONE_H TYPE STRING,
ASYNC_LEVEL_H TYPE STRING,
BUSOBJ_TYPE_H TYPE STRING,
BUSOBJ_ID_H TYPE STRING,
BUSOBJ_VERS_H TYPE STRING,
BUSOBJ_VERSDATE_H TYPE STRING,
REM_BUSCASE_TYP_H TYPE STRING,
REM_BUSCASE_ID_H TYPE STRING,
REM_BUSCASE_VERS_H TYPE STRING,
LED_CURR_H TYPE STRING,
TRIGGER_SYS_H TYPE STRING,
TRIGGER_DATE_H TYPE STRING,
TRI_BUSCASE_TYP_H TYPE STRING,
TRI_BUSCASE_ID_H TYPE STRING,
TRI_BUSCASE_VERS_H TYPE STRING,
TRGCAS_TYPE_H TYPE STRING,
TRGCASAGR_ID_H TYPE STRING,
TRGCASRU_ID_H TYPE STRING,
PERIODRULE_ID_H TYPE STRING,
PERIOD_NO_H TYPE STRING,
RUN_ID_H TYPE STRING,
EXT_RUN_ID_H TYPE STRING,
PAY_REF_ID_H TYPE STRING,
REV_DOC_ID_H TYPE STRING,
REV_POST_YEAR_H TYPE STRING,
LOG_HANDLE_H TYPE STRING,
CHG_TIMESTAMP_H TYPE STRING,
CHG_TCODE_H TYPE STRING,
CHG_USR_H TYPE STRING,
TRI_METH_TYP_H TYPE STRING,
TRI_METH_TARGET_H TYPE STRING,
FLG_REVERSED_H TYPE STRING,
STATUS_POS_H TYPE STRING,
STATUS_WORK_H TYPE STRING,
REV_TIMESTAMP_H TYPE STRING,
REV_TCODE_H TYPE STRING,
REV_USR_H TYPE STRING,
UPD_TIMESTAMP_H TYPE STRING,
MANDT_R TYPE STRING,
POST_YEAR_R TYPE STRING,
DOC_ID_R TYPE STRING,
REMUN_POS_R TYPE STRING,
INCENTIVE_BAS_R TYPE STRING,
COMM_BAS_VAL_R TYPE STRING,
GUID_R TYPE STRING,
ITEM_GUID_R TYPE STRING,
CURRENCY_R TYPE STRING,
COMM_TRI_DATE_R TYPE STRING,
ZZSALESVALUE_R TYPE STRING,
ZZCUSTOMER_R TYPE STRING,
ZACHV_R TYPE STRING,
ZCMBASV_R TYPE STRING,
ZDOCVALUE_R TYPE STRING,
ZINCTPY_R TYPE STRING,
ZORDERVAL_R TYPE STRING,
ZPRDSALES_R TYPE STRING,
ZRTNVALUE_R TYPE STRING,
ZSRVSALES_R TYPE STRING,
ZTGINCT_R TYPE STRING,
ZZQUAN_R TYPE STRING,
VRKME_R TYPE STRING,
CURR_YR_TO_DATE_R TYPE STRING,
PREV_YR_TO_DATE_R TYPE STRING,
EXO_MONTHLY_R TYPE STRING,
SUP_MONTHLY_R TYPE STRING,
EXO_QTR_PLAN_R TYPE STRING,
SUP_QTR_ACTUAL_R TYPE STRING,
EXO_QTR_ACTUAL_R TYPE STRING,
SUP_QTR_PLAN_R TYPE STRING,
FLG_COMPL_R TYPE STRING,
FLG_REVERSED_R TYPE STRING,
STATUS_POS_R TYPE STRING,
STATUS_WORK_R TYPE STRING,
PART_POS_R TYPE STRING,
INV_POS_R TYPE STRING,
CTRTBU_ID_R TYPE STRING,
BUCAGR_ID_R TYPE STRING,
CLAIM_OBJTYPE_R TYPE STRING,
CLAIM_OBJID_R TYPE STRING,
REM_IMP_YEAR_R TYPE STRING,
REM_CASE_ID_R TYPE STRING,
REM_CASE_VERS_R TYPE STRING,
POW_OBJ_TYPE_R TYPE STRING,
POW_OBJ_ID_R TYPE STRING,
ACTIVITY_R TYPE STRING,
ACT_POS_R TYPE STRING,
ACTGRP_R TYPE STRING,
REM_OBJ_TYPE_R TYPE STRING,
REM_OBJ_ID_R TYPE STRING,
VALUE_R TYPE STRING,
VALUE_TYPE_R TYPE STRING,
VALUE_POS_R TYPE STRING,
REMVAL_LEDAMNT_R TYPE STRING,
REMVAL_QUAN_R TYPE STRING,
VALUE_UNIT_R TYPE STRING,
ROLE_R TYPE STRING,
ROLE_REMUSHAR_R TYPE STRING,
CONSTELL_R TYPE STRING,
DIST_TYPE_R TYPE STRING,
CON_CURR_R TYPE STRING,
LED_CURR_R TYPE STRING,
ALLOCATION_R TYPE STRING,
REMUNERATION_R TYPE STRING,
REM_VERSION_R TYPE STRING,
REM_RATE_R TYPE STRING,
REM_CONAMNT_R TYPE STRING,
DUE_CONAMNT_R TYPE STRING,
REM_LEDAMNT_R TYPE STRING,
DUE_LEDAMNT_R TYPE STRING,
REM_UNIT_R TYPE STRING,
REM_QUAN_R TYPE STRING,
DUE_QUAN_R TYPE STRING,
OFFSET_END_DATE_R TYPE STRING,
OFFSET_RULE_ID_R TYPE STRING,
OFFSET_CONAMNT_R TYPE STRING,
OFFSET_LEDAMNT_R TYPE STRING,
OFFSET_QUAN_R TYPE STRING,
RESP_BEGIN_DATE_R TYPE STRING,
RESP_END_DATE_R TYPE STRING,
RESP_RULE_ID_R TYPE STRING,
RESP_CONAMNT_R TYPE STRING,
RESP_LEDAMNT_R TYPE STRING,
RESP_QUAN_R TYPE STRING,
RESPVAL_LEDAMNT_R TYPE STRING,
RESPVAL_QUAN_R TYPE STRING,
STATUS_RESP_R TYPE STRING,
RESP_RUPT_BEGIN_R TYPE STRING,
RESP_RUPT_END_R TYPE STRING,
CORRBY_DOC_ID_R TYPE STRING,
CORRBY_PST_YEAR_R TYPE STRING,
CORRBY_PST_DATE_R TYPE STRING,
CORRTO_DOC_ID_R TYPE STRING,
CORRTO_PST_YEAR_R TYPE STRING,
CORRTO_REMUN_POS_R TYPE STRING,
FLG_CORR_R TYPE STRING,
SETTLE_GROUP_R TYPE STRING,
UPD_TIMESTAMP_R TYPE STRING,
AUTHORITY_CHECK TYPE STRING,END OF T_EKKO_STR.
DATA: WA_YCRM01_SIS_DOCRE_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_YCRM01_SIS_DOCRE_STR-MANDT_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-POST_YEAR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DOC_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-KNW_TIMESTAMP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CLC_TIMESTAMP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_REVERSOR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DOC_TYPE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-POST_DATE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-POST_MONTH_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_IMP_DATE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_IMP_YEAR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_CASE_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_CASE_VERS_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_NOSETTLEMENT_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_NORESETTLE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_FUTURECHECK_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RELEASE_DATE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_CASE_TXT_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_ASYNC_DONE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ASYNC_LEVEL_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-BUSOBJ_TYPE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-BUSOBJ_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-BUSOBJ_VERS_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-BUSOBJ_VERSDATE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_BUSCASE_TYP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_BUSCASE_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_BUSCASE_VERS_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-LED_CURR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRIGGER_SYS_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRIGGER_DATE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_BUSCASE_TYP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_BUSCASE_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_BUSCASE_VERS_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRGCAS_TYPE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRGCASAGR_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRGCASRU_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-PERIODRULE_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-PERIOD_NO_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RUN_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-EXT_RUN_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-PAY_REF_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REV_DOC_ID_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REV_POST_YEAR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-LOG_HANDLE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CHG_TIMESTAMP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CHG_TCODE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CHG_USR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_METH_TYP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-TRI_METH_TARGET_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_REVERSED_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-STATUS_POS_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-STATUS_WORK_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REV_TIMESTAMP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REV_TCODE_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REV_USR_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-UPD_TIMESTAMP_H sy-vline 
WA_YCRM01_SIS_DOCRE_STR-MANDT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-POST_YEAR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DOC_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REMUN_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-INCENTIVE_BAS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-COMM_BAS_VAL_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-GUID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ITEM_GUID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CURRENCY_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-COMM_TRI_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZZSALESVALUE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZZCUSTOMER_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZACHV_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZCMBASV_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZDOCVALUE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZINCTPY_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZORDERVAL_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZPRDSALES_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZRTNVALUE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZSRVSALES_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZTGINCT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ZZQUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-VRKME_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CURR_YR_TO_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-PREV_YR_TO_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-EXO_MONTHLY_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-SUP_MONTHLY_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-EXO_QTR_PLAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-SUP_QTR_ACTUAL_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-EXO_QTR_ACTUAL_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-SUP_QTR_PLAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_COMPL_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_REVERSED_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-STATUS_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-STATUS_WORK_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-PART_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-INV_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CTRTBU_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-BUCAGR_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CLAIM_OBJTYPE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CLAIM_OBJID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_IMP_YEAR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_CASE_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_CASE_VERS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-POW_OBJ_TYPE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-POW_OBJ_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ACTIVITY_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ACT_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ACTGRP_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_OBJ_TYPE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_OBJ_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-VALUE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-VALUE_TYPE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-VALUE_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REMVAL_LEDAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REMVAL_QUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-VALUE_UNIT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ROLE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ROLE_REMUSHAR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CONSTELL_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DIST_TYPE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CON_CURR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-LED_CURR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-ALLOCATION_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REMUNERATION_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_VERSION_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_RATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_CONAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DUE_CONAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_LEDAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DUE_LEDAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_UNIT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-REM_QUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-DUE_QUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-OFFSET_END_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-OFFSET_RULE_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-OFFSET_CONAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-OFFSET_LEDAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-OFFSET_QUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_BEGIN_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_END_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_RULE_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_CONAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_LEDAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_QUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESPVAL_LEDAMNT_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESPVAL_QUAN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-STATUS_RESP_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_RUPT_BEGIN_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-RESP_RUPT_END_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CORRBY_DOC_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CORRBY_PST_YEAR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CORRBY_PST_DATE_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CORRTO_DOC_ID_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CORRTO_PST_YEAR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-CORRTO_REMUN_POS_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-FLG_CORR_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-SETTLE_GROUP_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-UPD_TIMESTAMP_R sy-vline 
WA_YCRM01_SIS_DOCRE_STR-AUTHORITY_CHECK sy-vline      INTO ld_text SEPARATED BY SPACE.

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