ABAP Select data from SAP table PIQCORRHISTORY_DISP 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 PIQCORRHISTORY_DISP 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 PIQCORRHISTORY_DISP. 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 PIQCORRHISTORY_DISP 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_PIQCORRHISTORY_DISP TYPE STANDARD TABLE OF PIQCORRHISTORY_DISP,
      WA_PIQCORRHISTORY_DISP TYPE PIQCORRHISTORY_DISP,
      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: <PIQCORRHISTORY_DISP> TYPE PIQCORRHISTORY_DISP.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIQCORRHISTORY_DISP>-MANDT_H = 1.
<PIQCORRHISTORY_DISP>-COTYP_H = 1.
<PIQCORRHISTORY_DISP>-COKEY_H = 1.
<PIQCORRHISTORY_DISP>-UNAME_H = 1.
<PIQCORRHISTORY_DISP>-CDATE_H = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIQCORRHISTORY_DISP-CTIME_H, sy-vline,
  WA_PIQCORRHISTORY_DISP-GPART_H, sy-vline,
  WA_PIQCORRHISTORY_DISP-GPART_GUID_H, sy-vline,
  WA_PIQCORRHISTORY_DISP-GPART_ADR_KIND_H, sy-vline,
  WA_PIQCORRHISTORY_DISP-ORG_GPART_H, sy-vline,
  WA_PIQCORRHISTORY_DISP-ORG_GPART_GUID_H, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PIQCORRHISTORY_DISP 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_PIQCORRHISTORY_DISP 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_PIQCORRHISTORY_DISP INTO WA_PIQCORRHISTORY_DISP.


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

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

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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field SPRAS_H
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORRHISTORY_DISP-SPRAS_H
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORRHISTORY_DISP-SPRAS_H.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit GJAHR, internal->external for field COCYR_HI
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORRHISTORY_DISP-COCYR_HI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORRHISTORY_DISP-COCYR_HI.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit PDATE, internal->external for field DATE_BIRTH
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORRHISTORY_DISP-DATE_BIRTH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORRHISTORY_DISP-DATE_BIRTH.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field CORRESP_LANGUAGE
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORRHISTORY_DISP-CORRESP_LANGUAGE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORRHISTORY_DISP-CORRESP_LANGUAGE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PIQST, internal->external for field STUDENT12
CALL FUNCTION 'CONVERSION_EXIT_PIQST_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORRHISTORY_DISP-STUDENT12
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORRHISTORY_DISP-STUDENT12.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ADM_QMNUM
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORRHISTORY_DISP-ADM_QMNUM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORRHISTORY_DISP-ADM_QMNUM.
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_PIQCORRHISTORY_DISP_STR, 
MANDT_H TYPE STRING,
COTYP_H TYPE STRING,
COKEY_H TYPE STRING,
UNAME_H TYPE STRING,
CDATE_H TYPE STRING,
CTIME_H TYPE STRING,
GPART_H TYPE STRING,
GPART_GUID_H TYPE STRING,
GPART_ADR_KIND_H TYPE STRING,
ORG_GPART_H TYPE STRING,
ORG_GPART_GUID_H TYPE STRING,
ADD_GPART_H TYPE STRING,
ADD_GPART_GUID_H TYPE STRING,
ADD_GPART_CAT_H TYPE STRING,
VKONT_H TYPE STRING,
VTREF_H TYPE STRING,
ADR_VALID_ON_H TYPE STRING,
ADRNR_H TYPE STRING,
ADR_GUID_H TYPE STRING,
ADRNR_INDEP_COMM_H TYPE STRING,
AGPART_H TYPE STRING,
AGPART_GUID_H TYPE STRING,
AGPART_ADR_KIND_H TYPE STRING,
AADRNR_H TYPE STRING,
AADR_GUID_H TYPE STRING,
FORMKEY_H TYPE STRING,
FORMKEY_RDI_H TYPE STRING,
ENTID1_H TYPE STRING,
DATA1_H TYPE STRING,
ENTID2_H TYPE STRING,
DATA2_H TYPE STRING,
ENTID3_H TYPE STRING,
DATA3_H TYPE STRING,
ENTID4_H TYPE STRING,
DATA4_H TYPE STRING,
CSORT_H TYPE STRING,
XCODT_H TYPE STRING,
XCODT_CLUST_H TYPE STRING,
LAUFD_H TYPE STRING,
LAUFI_H TYPE STRING,
XTEST_H TYPE STRING,
COPRI_H TYPE STRING,
COIDT_H TYPE STRING,
COITM_H TYPE STRING,
SPRAS_H TYPE STRING,
SALWA_H TYPE STRING,
SALBE_H TYPE STRING,
SENDCONTROL_H TYPE STRING,
PERSNUMBER_H TYPE STRING,
APERSNUMBER_H TYPE STRING,
BUKRS_H TYPE STRING,
CORR_ROLE_H TYPE STRING,
COPRI_LAUFD_H TYPE STRING,
COPRI_LAUFI_H TYPE STRING,
PROCESS_ID__H TYPE STRING,
NO_DOCPARTS_H TYPE STRING,
DOCPART_ROLE_H TYPE STRING,
XTRIAL_H TYPE STRING,
XREPRINT_H TYPE STRING,
SUBAP_H TYPE STRING,
XDELETE_H TYPE STRING,
PRINT_MODE_H TYPE STRING,
X_NO_ARC_H TYPE STRING,
X_DOCPART_LIST_H TYPE STRING,
LOCK_STATUS_H TYPE STRING,
/PF1/CLEARING_AREA_H TYPE STRING,
/PF1/TYPE_H TYPE STRING,
/PF1/REFERENCE_NO_H TYPE STRING,
/PF1/FAX_NUMBER_H TYPE STRING,
/PF1/ORDER_DATE_H TYPE STRING,
/PF1/ERROR_TEXT_H TYPE STRING,
BKKRS_H TYPE STRING,
ACNUM_INT_H TYPE STRING,
OBJECT_IDCMS_H TYPE STRING,
FLG_ORIGINALCMS_H TYPE STRING,
SENDCONTROLCMS_H TYPE STRING,
INT_ACCNT_IDPF1_H TYPE STRING,
AM_AREAPF1_H TYPE STRING,
PRODUCT_IDPF1_H TYPE STRING,
BP_AREAPF1_H TYPE STRING,
PRODUCTTYPEFVD_H TYPE STRING,
BP_ROLEFVD_H TYPE STRING,
BP_ROLETYPEFVD_H TYPE STRING,
SOBJECTFVD_H TYPE STRING,
CORR_ACTIVITYFVD_H TYPE STRING,
REFERENCEDATEFVD_H TYPE STRING,
MANDT_HI TYPE STRING,
COTYP_HI TYPE STRING,
GPART_HI TYPE STRING,
VKONT_HI TYPE STRING,
COKEY_HI TYPE STRING,
GPART_GUID_HI TYPE STRING,
ORG_GPART_HI TYPE STRING,
ORG_GPART_GUID_HI TYPE STRING,
VTREF_HI TYPE STRING,
CDATE_HI TYPE STRING,
COIDT_HI TYPE STRING,
COITM_HI TYPE STRING,
COISSTSTMP_HI TYPE STRING,
COISSTSTMPNEW_HI TYPE STRING,
COISSUSER_HI TYPE STRING,
COPRI_HI TYPE STRING,
COPRITSTMP_HI TYPE STRING,
COPRIUSER_HI TYPE STRING,
COCYR_HI TYPE STRING,
COPER_HI TYPE STRING,
COPNR_HI TYPE STRING,
COEMP_HI TYPE STRING,
SALWA_HI TYPE STRING,
SALBE_HI TYPE STRING,
UMBUCH_HI TYPE STRING,
BUKRS_HI TYPE STRING,
CORR_STATUS_HI TYPE STRING,
INCORR_HI TYPE STRING,
INCORR_FAEDN_HI TYPE STRING,
INCORR_INDATE_HI TYPE STRING,
COPRI_LAUFD_HI TYPE STRING,
COPRI_LAUFI_HI TYPE STRING,
SUBAP_HI TYPE STRING,
XTRIAL_HI TYPE STRING,
TECH_STATUS_HI TYPE STRING,
FORMKEY_HI TYPE STRING,
FORMKEY_RDI_HI TYPE STRING,
SENDCONTROL_HI TYPE STRING,
ARCHIVE_STATUS_HI TYPE STRING,
ARCHIVE_FLUD_HI TYPE STRING,
REJECTION_HI TYPE STRING,
BKKRS_HI TYPE STRING,
ACNUM_INT_HI TYPE STRING,
OBJECT_IDCMS_HI TYPE STRING,
FLG_ORIGINALCMS_HI TYPE STRING,
SENDCONTROLCMS_HI TYPE STRING,
FORM_OF_ADDRESS_KEY TYPE STRING,
FORM_OF_ADDRESS_KEY_TXT TYPE STRING,
INITIALS TYPE STRING,
FIRST_NAME TYPE STRING,
LAST_NAME TYPE STRING,
MIDDLE_NAME TYPE STRING,
TITEL TYPE STRING,
TITEL_TXT TYPE STRING,
NAME_AFFIX TYPE STRING,
NAME_AFFIX_TXT TYPE STRING,
ARISTOCRATIC_TITLE TYPE STRING,
ARISTOCRATIC_TITLE_TXT TYPE STRING,
NICKNAME TYPE STRING,
NAME_AT_BIRTH TYPE STRING,
DATE_BIRTH TYPE STRING,
BIRTHPLACE TYPE STRING,
COUNTRY_OF_BIRTH TYPE STRING,
COUNTRY_OF_BIRTH_ISO TYPE STRING,
NAMEOFBIRTHCOUNTRY TYPE STRING,
REGION_OF_BIRTH TYPE STRING,
NAMEOFBIRTHSTATE TYPE STRING,
NATIONALITY_AT_BIRTH TYPE STRING,
NATIONALITY_AT_BIRTH_ISO TYPE STRING,
NATIONALITY_AT_BIRTH_TXT TYPE STRING,
NATIONALITY TYPE STRING,
NATIONALITY_ISO TYPE STRING,
NATIONALITY_TXT TYPE STRING,
SECOND_NATIONALITY TYPE STRING,
SECOND_NATIONALITY_ISO TYPE STRING,
SECOND_NATIONALITY_TXT TYPE STRING,
THIRD_NATIONALITY TYPE STRING,
THIRD_NATIONALITY_ISO TYPE STRING,
THIRD_NATIONALITY_TXT TYPE STRING,
GENDER_KEY TYPE STRING,
GENDER_KEY_TXT TYPE STRING,
MARITAL_STATUS TYPE STRING,
MARITAL_STATUS_TXT TYPE STRING,
PERSIDNO TYPE STRING,
CORRESP_LANGUAGE TYPE STRING,
CORRESP_LANGUAGE_ISO TYPE STRING,
CORRESP_LANGUAGE_TXT TYPE STRING,
DEATH_DATE TYPE STRING,
DEATH_REGDATE TYPE STRING,
STUDENT_OBJID TYPE STRING,
STUDENT12 TYPE STRING,
ADM_QMNUM TYPE STRING,
ACTIVITY TYPE STRING,
ACTIVITY_TXT TYPE STRING,
ADM_ISTAT TYPE STRING,
ADM_ISTAT_TXT TYPE STRING,
PROGRAM_OBJID TYPE STRING,
PROGRAM_SHORT TYPE STRING,
PROGRAM_STEXT TYPE STRING,
COTXT TYPE STRING,
FORMCLASS TYPE STRING,
FORMCLASS_TXT TYPE STRING,
FORMKEY_TXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PIQCORRHISTORY_DISP_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_PIQCORRHISTORY_DISP_STR-MANDT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COTYP_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COKEY_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-UNAME_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CDATE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CTIME_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GPART_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GPART_GUID_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GPART_ADR_KIND_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ORG_GPART_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ORG_GPART_GUID_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADD_GPART_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADD_GPART_GUID_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADD_GPART_CAT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-VKONT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-VTREF_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADR_VALID_ON_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADRNR_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADR_GUID_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADRNR_INDEP_COMM_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-AGPART_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-AGPART_GUID_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-AGPART_ADR_KIND_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-AADRNR_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-AADR_GUID_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMKEY_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMKEY_RDI_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ENTID1_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DATA1_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ENTID2_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DATA2_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ENTID3_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DATA3_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ENTID4_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DATA4_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CSORT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XCODT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XCODT_CLUST_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-LAUFD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-LAUFI_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XTEST_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRI_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COIDT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COITM_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SPRAS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SALWA_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SALBE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SENDCONTROL_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PERSNUMBER_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-APERSNUMBER_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BUKRS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CORR_ROLE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRI_LAUFD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRI_LAUFI_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PROCESS_ID__H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NO_DOCPARTS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DOCPART_ROLE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XTRIAL_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XREPRINT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SUBAP_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XDELETE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PRINT_MODE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-X_NO_ARC_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-X_DOCPART_LIST_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-LOCK_STATUS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-/PF1/CLEARING_AREA_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-/PF1/TYPE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-/PF1/REFERENCE_NO_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-/PF1/FAX_NUMBER_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-/PF1/ORDER_DATE_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-/PF1/ERROR_TEXT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BKKRS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ACNUM_INT_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-OBJECT_IDCMS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FLG_ORIGINALCMS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SENDCONTROLCMS_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-INT_ACCNT_IDPF1_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-AM_AREAPF1_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PRODUCT_IDPF1_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BP_AREAPF1_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PRODUCTTYPEFVD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BP_ROLEFVD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BP_ROLETYPEFVD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SOBJECTFVD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CORR_ACTIVITYFVD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-REFERENCEDATEFVD_H sy-vline 
WA_PIQCORRHISTORY_DISP_STR-MANDT_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COTYP_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GPART_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-VKONT_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COKEY_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GPART_GUID_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ORG_GPART_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ORG_GPART_GUID_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-VTREF_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CDATE_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COIDT_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COITM_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COISSTSTMP_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COISSTSTMPNEW_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COISSUSER_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRI_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRITSTMP_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRIUSER_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COCYR_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPER_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPNR_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COEMP_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SALWA_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SALBE_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-UMBUCH_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BUKRS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CORR_STATUS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-INCORR_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-INCORR_FAEDN_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-INCORR_INDATE_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRI_LAUFD_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COPRI_LAUFI_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SUBAP_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-XTRIAL_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-TECH_STATUS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMKEY_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMKEY_RDI_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SENDCONTROL_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ARCHIVE_STATUS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ARCHIVE_FLUD_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-REJECTION_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BKKRS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ACNUM_INT_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-OBJECT_IDCMS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FLG_ORIGINALCMS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SENDCONTROLCMS_HI sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORM_OF_ADDRESS_KEY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORM_OF_ADDRESS_KEY_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-INITIALS sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FIRST_NAME sy-vline 
WA_PIQCORRHISTORY_DISP_STR-LAST_NAME sy-vline 
WA_PIQCORRHISTORY_DISP_STR-MIDDLE_NAME sy-vline 
WA_PIQCORRHISTORY_DISP_STR-TITEL sy-vline 
WA_PIQCORRHISTORY_DISP_STR-TITEL_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NAME_AFFIX sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NAME_AFFIX_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ARISTOCRATIC_TITLE sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ARISTOCRATIC_TITLE_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NICKNAME sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NAME_AT_BIRTH sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DATE_BIRTH sy-vline 
WA_PIQCORRHISTORY_DISP_STR-BIRTHPLACE sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COUNTRY_OF_BIRTH sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COUNTRY_OF_BIRTH_ISO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NAMEOFBIRTHCOUNTRY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-REGION_OF_BIRTH sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NAMEOFBIRTHSTATE sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NATIONALITY_AT_BIRTH sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NATIONALITY_AT_BIRTH_ISO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NATIONALITY_AT_BIRTH_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NATIONALITY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NATIONALITY_ISO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-NATIONALITY_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SECOND_NATIONALITY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SECOND_NATIONALITY_ISO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-SECOND_NATIONALITY_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-THIRD_NATIONALITY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-THIRD_NATIONALITY_ISO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-THIRD_NATIONALITY_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GENDER_KEY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-GENDER_KEY_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-MARITAL_STATUS sy-vline 
WA_PIQCORRHISTORY_DISP_STR-MARITAL_STATUS_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PERSIDNO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CORRESP_LANGUAGE sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CORRESP_LANGUAGE_ISO sy-vline 
WA_PIQCORRHISTORY_DISP_STR-CORRESP_LANGUAGE_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DEATH_DATE sy-vline 
WA_PIQCORRHISTORY_DISP_STR-DEATH_REGDATE sy-vline 
WA_PIQCORRHISTORY_DISP_STR-STUDENT_OBJID sy-vline 
WA_PIQCORRHISTORY_DISP_STR-STUDENT12 sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADM_QMNUM sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ACTIVITY sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ACTIVITY_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADM_ISTAT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-ADM_ISTAT_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PROGRAM_OBJID sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PROGRAM_SHORT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-PROGRAM_STEXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-COTXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMCLASS sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMCLASS_TXT sy-vline 
WA_PIQCORRHISTORY_DISP_STR-FORMKEY_TXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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