ABAP Select data from SAP table RJEP_BUSISM012_VIEW 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 RJEP_BUSISM012_VIEW 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 RJEP_BUSISM012_VIEW. 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 RJEP_BUSISM012_VIEW 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_RJEP_BUSISM012_VIEW TYPE STANDARD TABLE OF RJEP_BUSISM012_VIEW,
      WA_RJEP_BUSISM012_VIEW TYPE RJEP_BUSISM012_VIEW,
      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: <RJEP_BUSISM012_VIEW> TYPE RJEP_BUSISM012_VIEW.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RJEP_BUSISM012_VIEW>-COA_NUMBER = 1.
<RJEP_BUSISM012_VIEW>-MEDIAMIX = 1.
<RJEP_BUSISM012_VIEW>-SALESORG = 1.
<RJEP_BUSISM012_VIEW>-SALESORG_TEXT = 1.
<RJEP_BUSISM012_VIEW>-DISTR_CHAN = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RJEP_BUSISM012_VIEW-DISTR_CHAN_TEXT, sy-vline,
  WA_RJEP_BUSISM012_VIEW-DIVISION, sy-vline,
  WA_RJEP_BUSISM012_VIEW-DIVISION_TEXT, sy-vline,
  WA_RJEP_BUSISM012_VIEW-CONTRACT_STATUS, sy-vline,
  WA_RJEP_BUSISM012_VIEW-CONTRACT_STATUS_TEXT, sy-vline,
  WA_RJEP_BUSISM012_VIEW-VALIDITY_START, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RJEP_BUSISM012_VIEW 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_RJEP_BUSISM012_VIEW 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_RJEP_BUSISM012_VIEW INTO WA_RJEP_BUSISM012_VIEW.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field FORMAT_OL
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RJEP_BUSISM012_VIEW-FORMAT_OL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RJEP_BUSISM012_VIEW-FORMAT_OL.
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_RJEP_BUSISM012_VIEW_STR, 
COA_NUMBER TYPE STRING,
MEDIAMIX TYPE STRING,
SALESORG TYPE STRING,
SALESORG_TEXT TYPE STRING,
DISTR_CHAN TYPE STRING,
DISTR_CHAN_TEXT TYPE STRING,
DIVISION TYPE STRING,
DIVISION_TEXT TYPE STRING,
CONTRACT_STATUS TYPE STRING,
CONTRACT_STATUS_TEXT TYPE STRING,
VALIDITY_START TYPE STRING,
VALIDITY_END TYPE STRING,
TARGET_NUMBER TYPE STRING,
TARGET_UON TYPE STRING,
TARGET_UON_ISO TYPE STRING,
TARGET_QUANTITY TYPE STRING,
TARGET_UOM TYPE STRING,
TARGET_UOM_ISO TYPE STRING,
TARGET_SALESVOL TYPE STRING,
TARGET_CURRENCY TYPE STRING,
TARGET_CURRENCY_ISO TYPE STRING,
COND_VALUE_1 TYPE STRING,
COND_CURRENCY_1 TYPE STRING,
COND_CURRENCY_1_ISO TYPE STRING,
COND_P_UNT_1 TYPE STRING,
COND_UNIT_1 TYPE STRING,
CD_UNT_1_ISO TYPE STRING,
COND_VALUE_2 TYPE STRING,
COND_CURRENCY_2 TYPE STRING,
COND_CURRENCY_2_ISO TYPE STRING,
COND_P_UNT_2 TYPE STRING,
COND_UNIT_2 TYPE STRING,
CD_UNT_2_ISO TYPE STRING,
REQ_NO TYPE STRING,
EXCLUSIVE TYPE STRING,
EXCL_REQ_NO1 TYPE STRING,
EXCL_REQ_NO2 TYPE STRING,
COA_ITEM_NO TYPE STRING,
REQ_KEY TYPE STRING,
REQ_KEY_TEXT TYPE STRING,
REQ_ELEMENT_NO TYPE STRING,
QUAL_FOR_DISCOUNT TYPE STRING,
QUAL_FOR_BONUS TYPE STRING,
CNTS_TWD_DISCOUNT TYPE STRING,
CNTS_TWD_BONUS TYPE STRING,
ITEM_TYPE_AD TYPE STRING,
ITEM_TYPE_AI TYPE STRING,
ITEM_TYPE_SV TYPE STRING,
ITEM_TYPE_CM TYPE STRING,
ITEM_TYPE_DT TYPE STRING,
ITEM_TYPE_OL TYPE STRING,
ITEM_CATEGORY TYPE STRING,
ITEM_CATEGORY_TEXT TYPE STRING,
AD_FIXED_FORMAT TYPE STRING,
AD_FIXED_FORMAT_TEXT TYPE STRING,
AD_SHAPE TYPE STRING,
AD_SHAPE_TEXT TYPE STRING,
AD_COLOR_SCHEMA TYPE STRING,
AD_COLOR_SCHEMA_TEXT TYPE STRING,
AD_DESIGN_TYPE TYPE STRING,
AD_DESIGN_TYPE_TEXT TYPE STRING,
AD_CALCULATION_TYPE TYPE STRING,
AD_CALCULATION_TYPE_TEXT TYPE STRING,
BUSINESS_CONTENT_COMPONENT TYPE STRING,
SPECIAL_PUBLICATION_CONT_COMP TYPE STRING,
BOOKING_UNIT TYPE STRING,
BOOKING_UNIT_TEXT TYPE STRING,
PRICE_GRP TYPE STRING,
PRICE_GRP_TEXT TYPE STRING,
AD_INSERT_PROC_TYPE TYPE STRING,
AD_INSERT_PROC_TYPE_TEXT TYPE STRING,
AD_INSERT_CATEGORY_AI TYPE STRING,
AD_INSERT_CATEGORY_AI_TEXT TYPE STRING,
DELTA_COVERAGE TYPE STRING,
SELECTIVE_BOOKING_AI TYPE STRING,
MIN_COVERAGE TYPE STRING,
SERVICE_TYPE TYPE STRING,
SERVICE_TYPE_TEXT TYPE STRING,
COMMERCIAL_TYPE TYPE STRING,
COMMERCIAL_TYPE_TEXT TYPE STRING,
PRODUCT_HIERARCHY TYPE STRING,
PRODUCT_HIERARCHY_TEXT TYPE STRING,
CAMPAIGN TYPE STRING,
AD_INSERT_CATEGORY_DT TYPE STRING,
AD_INSERT_CATEGORY_DT_TEXT TYPE STRING,
PLANNED_QTY_TYPE_DT TYPE STRING,
PLANNED_QTY_TYPE_DT_TEXT TYPE STRING,
SELECTIVE_BOOKING_DT TYPE STRING,
BOOKING_TYPE_OL TYPE STRING,
BOOKING_TYPE_OL_TEXT TYPE STRING,
FORMAT_OL TYPE STRING,
FORMAT_OL_TEXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RJEP_BUSISM012_VIEW_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_RJEP_BUSISM012_VIEW_STR-COA_NUMBER sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-MEDIAMIX sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SALESORG sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SALESORG_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-DISTR_CHAN sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-DISTR_CHAN_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-DIVISION sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-DIVISION_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CONTRACT_STATUS sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CONTRACT_STATUS_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-VALIDITY_START sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-VALIDITY_END sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_NUMBER sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_UON sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_UON_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_QUANTITY sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_UOM sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_UOM_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_SALESVOL sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_CURRENCY sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-TARGET_CURRENCY_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_VALUE_1 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_CURRENCY_1 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_CURRENCY_1_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_P_UNT_1 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_UNIT_1 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CD_UNT_1_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_VALUE_2 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_CURRENCY_2 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_CURRENCY_2_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_P_UNT_2 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COND_UNIT_2 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CD_UNT_2_ISO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-REQ_NO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-EXCLUSIVE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-EXCL_REQ_NO1 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-EXCL_REQ_NO2 sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COA_ITEM_NO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-REQ_KEY sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-REQ_KEY_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-REQ_ELEMENT_NO sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-QUAL_FOR_DISCOUNT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-QUAL_FOR_BONUS sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CNTS_TWD_DISCOUNT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CNTS_TWD_BONUS sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_TYPE_AD sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_TYPE_AI sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_TYPE_SV sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_TYPE_CM sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_TYPE_DT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_TYPE_OL sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_CATEGORY sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-ITEM_CATEGORY_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_FIXED_FORMAT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_FIXED_FORMAT_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_SHAPE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_SHAPE_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_COLOR_SCHEMA sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_COLOR_SCHEMA_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_DESIGN_TYPE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_DESIGN_TYPE_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_CALCULATION_TYPE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_CALCULATION_TYPE_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-BUSINESS_CONTENT_COMPONENT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SPECIAL_PUBLICATION_CONT_COMP sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-BOOKING_UNIT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-BOOKING_UNIT_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-PRICE_GRP sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-PRICE_GRP_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_INSERT_PROC_TYPE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_INSERT_PROC_TYPE_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_INSERT_CATEGORY_AI sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_INSERT_CATEGORY_AI_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-DELTA_COVERAGE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SELECTIVE_BOOKING_AI sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-MIN_COVERAGE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SERVICE_TYPE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SERVICE_TYPE_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COMMERCIAL_TYPE sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-COMMERCIAL_TYPE_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-PRODUCT_HIERARCHY sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-PRODUCT_HIERARCHY_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-CAMPAIGN sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_INSERT_CATEGORY_DT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-AD_INSERT_CATEGORY_DT_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-PLANNED_QTY_TYPE_DT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-PLANNED_QTY_TYPE_DT_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-SELECTIVE_BOOKING_DT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-BOOKING_TYPE_OL sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-BOOKING_TYPE_OL_TEXT sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-FORMAT_OL sy-vline 
WA_RJEP_BUSISM012_VIEW_STR-FORMAT_OL_TEXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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