ABAP Select data from SAP table DBOMHDREXPLOUT 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 DBOMHDREXPLOUT 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 DBOMHDREXPLOUT. 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 DBOMHDREXPLOUT 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_DBOMHDREXPLOUT TYPE STANDARD TABLE OF DBOMHDREXPLOUT,
      WA_DBOMHDREXPLOUT TYPE DBOMHDREXPLOUT,
      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: <DBOMHDREXPLOUT> TYPE DBOMHDREXPLOUT.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<DBOMHDREXPLOUT>-MANDT = 1.
<DBOMHDREXPLOUT>-B_O_M_HDR_ROOT_MATL_HIER_NODE = 1.
<DBOMHDREXPLOUT>-MATERIAL_NAME = 1.
<DBOMHDREXPLOUT>-BILL_OF_MATERIAL_ROOT = 1.
<DBOMHDREXPLOUT>-B_O_M_HEADER_QUANTITY_PRIMARY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_DBOMHDREXPLOUT-B_O_M_HEADER_BASE_UNIT, sy-vline,
  WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_ROOT_VARIANT, sy-vline,
  WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_VARIANT_USAGE, sy-vline,
  WA_DBOMHDREXPLOUT-HEADER_VALIDITY_START_DATE, sy-vline,
  WA_DBOMHDREXPLOUT-HEADER_VALIDITY_END_DATE, sy-vline,
  WA_DBOMHDREXPLOUT-CHANGE_NUMBER, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_DBOMHDREXPLOUT 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_DBOMHDREXPLOUT 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_DBOMHDREXPLOUT INTO WA_DBOMHDREXPLOUT.


*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 MATN1, internal->external for field B_O_M_HDR_ROOT_MATL_HIER_NODE
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-B_O_M_HDR_ROOT_MATL_HIER_NODE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-B_O_M_HDR_ROOT_MATL_HIER_NODE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field BILL_OF_MATERIAL_ROOT
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_ROOT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_ROOT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MATN1, internal->external for field B_O_M_HDR_MATL_HIER_NODE
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-B_O_M_HDR_MATL_HIER_NODE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-B_O_M_HDR_MATL_HIER_NODE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field BILL_OF_MATERIAL_ITEM_NUMBER
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_ITEM_NUMBER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_ITEM_NUMBER.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit NUMCV, internal->external for field BILL_OF_MATERIAL
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MATN1, internal->external for field BILL_OF_MATERIAL_COMPONENT
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_COMPONENT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-BILL_OF_MATERIAL_COMPONENT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MATN1, internal->external for field FOLLOW_UP_PRODUCT
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-FOLLOW_UP_PRODUCT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-FOLLOW_UP_PRODUCT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit NUMCV, internal->external for field B_O_M_NO_NXT_LVL
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-B_O_M_NO_NXT_LVL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-B_O_M_NO_NXT_LVL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field INTRA_MATERIAL
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-INTRA_MATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-INTRA_MATERIAL.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit NUMCV, internal->external for field REVISION_LEVEL
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_DBOMHDREXPLOUT-REVISION_LEVEL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBOMHDREXPLOUT-REVISION_LEVEL.
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_DBOMHDREXPLOUT_STR, 
MANDT TYPE STRING,
B_O_M_HDR_ROOT_MATL_HIER_NODE TYPE STRING,
MATERIAL_NAME TYPE STRING,
BILL_OF_MATERIAL_ROOT TYPE STRING,
B_O_M_HEADER_QUANTITY_PRIMARY TYPE STRING,
B_O_M_HEADER_BASE_UNIT TYPE STRING,
BILL_OF_MATERIAL_ROOT_VARIANT TYPE STRING,
BILL_OF_MATERIAL_VARIANT_USAGE TYPE STRING,
HEADER_VALIDITY_START_DATE TYPE STRING,
HEADER_VALIDITY_END_DATE TYPE STRING,
CHANGE_NUMBER TYPE STRING,
B_O_M_HDR_MATL_HIER_NODE TYPE STRING,
PRODUCTION_VERSION TYPE STRING,
B_O_M_ALTERNATIVE_TEXT TYPE STRING,
B_O_M_EXPLOSION_LEVEL TYPE STRING,
PATH_PREDECESSOR TYPE STRING,
PATH TYPE STRING,
BILL_OF_MATERIAL_ITEM_NUMBER TYPE STRING,
BILL_OF_MATERIAL_VARIANT TYPE STRING,
BILL_OF_MATERIAL TYPE STRING,
BOM_CHANGE_NUMBER TYPE STRING,
PLANTNAME TYPE STRING,
B_O_M_VERS_STATUS_DESCRIPTION TYPE STRING,
BILL_OF_MATERIAL_COMPONENT TYPE STRING,
BILL_OF_MATERIAL_ITEM_QUANTITY TYPE STRING,
BILL_OF_MATERIAL_ITEM_UNIT TYPE STRING,
BILL_OF_MATERIAL_COMP_QUANT TYPE STRING,
BILL_OF_MATERIAL_BASE_QUANT TYPE STRING,
B_O_M_COMPONENT_DESCRIPTION TYPE STRING,
MATERIAL_TYPE TYPE STRING,
STANDARD_PRICE TYPE STRING,
M_R_P_TYPE TYPE STRING,
SPECIAL_PROCUREMENT_TYPE TYPE STRING,
FOLLOW_UP_PRODUCT TYPE STRING,
MATERIAL_IS_CONFIGURABLE TYPE STRING,
RECORD_CREATION_DATE TYPE STRING,
CREATED_BY_USER TYPE STRING,
LAST_CHANGE_DATE TYPE STRING,
LAST_CHANGED_BY_USER TYPE STRING,
BILL_OF_MATERIAL_ITEM_CATEGORY TYPE STRING,
IS_MATERIAL_PROVISION TYPE STRING,
IS_B_O_M_ITEM_SPARE_PART TYPE STRING,
IS_C_A_D TYPE STRING,
PURCHASING_ORGANISATION TYPE STRING,
PURCHASING_GROUP TYPE STRING,
SUPPLIER TYPE STRING,
MATERIAL_COMPONENT_PRICE TYPE STRING,
PRICE_UNIT TYPE STRING,
CURRENCY TYPE STRING,
COST_ELEMENT TYPE STRING,
DOC_NUMBER TYPE STRING,
DOCUMENT_TYPE TYPE STRING,
DOCUMENT_PART TYPE STRING,
DOCUMENT_VERSION TYPE STRING,
B_O_M_ITEM_DESCRIPTION TYPE STRING,
ITEM_DESCRIPTION_LINE_2 TYPE STRING,
MATERIAL_GROUP TYPE STRING,
GOODS_RECEIPT_DURATION_IN_DAYS TYPE STRING,
VALIDITY_START_DATE TYPE STRING,
VALIDITY_END_DATE TYPE STRING,
IS_PHANTOM_ITEM TYPE STRING,
PROD_ORDER_ISSUE_LOCATION TYPE STRING,
IS_SOFTWARE_COMPONENT TYPE STRING,
B_O_M_ITEM_IS_DISCONTINUED TYPE STRING,
CHG_TO_ENG_CHG_NUMBER TYPE STRING,
DELIVERY_TIME_IN_DAYS TYPE STRING,
ALTERNATIVE_ITEM TYPE STRING,
ALT_ITEM_GROUP TYPE STRING,
ALT_NXT_LVL TYPE STRING,
AS_SELECTION_COND TYPE STRING,
ASSEMBLY_INDICATOR TYPE STRING,
BASE_QTY_NXT_LVL TYPE STRING,
BASE_UNIT_NXT_LVL TYPE STRING,
B_O_M_ALT_NXT_LVL TYPE STRING,
B_O_M_CAT_NXT_LVL TYPE STRING,
B_O_M_CATEGORY TYPE STRING,
B_O_M_NO_NXT_LVL TYPE STRING,
B_O_M_USAGE_NXT_LVL TYPE STRING,
CLASS TYPE STRING,
CLASS_TYPE TYPE STRING,
CLASSIFICATION TYPE STRING,
CONF_BOM_NXT_LVL TYPE STRING,
CO_PRODUCT TYPE STRING,
COUNTER TYPE STRING,
DAT_HIST_NXT_LVL TYPE STRING,
DELETION_INDICATOR TYPE STRING,
DISCONT_GROUP TYPE STRING,
DISTRIBUTION_KEY TYPE STRING,
DEL_IND_NXT_LVL TYPE STRING,
EXPLOSION_TYPE TYPE STRING,
FIXED_QUANTITY TYPE STRING,
FOLLOW_UP_GRP TYPE STRING,
FOLLOW_UP_ITEM TYPE STRING,
FORMULA_KEY TYPE STRING,
GOODS_RECIPIENT TYPE STRING,
HEADER_RECORD_ID TYPE STRING,
INTRA_MATERIAL TYPE STRING,
ITEM_IDENTIFICATION TYPE STRING,
LEAD_TIME_OFFSET TYPE STRING,
LONG_TEXT_LANG TYPE STRING,
MAT_PURITY_IN_PERC TYPE STRING,
MULTIPLE_SEL TYPE STRING,
NO_VAR_SIZE_ITEMS TYPE STRING,
NO_CU_INSTANCES TYPE STRING,
OBJECT_TYPE TYPE STRING,
OBJ_DEP_ASSGT_NO TYPE STRING,
OPER_LT_OFFSET TYPE STRING,
OPER_LTO_UNIT TYPE STRING,
ORG_AREA TYPE STRING,
PRIORITY TYPE STRING,
PRODN_SUPPLY_AREA TYPE STRING,
QTY_VAR_SIZE_ITEM TYPE STRING,
REFERENCE_POINT TYPE STRING,
REQUIRED_COMPONENT TYPE STRING,
SCRAP_QTY_BUN TYPE STRING,
SIZE1 TYPE STRING,
SIZE2 TYPE STRING,
SIZE3 TYPE STRING,
SIZE_UNIT TYPE STRING,
SPECIAL_PROC_TYP_ITM TYPE STRING,
SPECIAL_PROC_TYP_MASTR TYPE STRING,
STORAGE_LOCATION TYPE STRING,
STRATEGY TYPE STRING,
SUB_ITEM_INDICATOR TYPE STRING,
TABLE_ROW TYPE STRING,
TEST_HIST_NXT_LVL TYPE STRING,
TOTALS_RECORD_ID TYPE STRING,
UNIT_OF_MEASURE TYPE STRING,
UNLOADING_POINT TYPE STRING,
USAGE_PROBABILITY TYPE STRING,
VARIANTS_NXT_LVL TYPE STRING,
ITEM_SIGN TYPE STRING,
ASSIGN_EFFECT_VALS TYPE STRING,
ASSY_SCRAP_ITM_MAT TYPE STRING,
BASE_UOM TYPE STRING,
BATCH_ENTRY TYPE STRING,
BATCH_MGMT TYPE STRING,
BULK_MATERIAL TYPE STRING,
COMP_SCRAP_ITM TYPE STRING,
COMMODITY_CODE TYPE STRING,
COMP_SCRAP_ITM_MAT TYPE STRING,
COMP_MAINT_STATUS TYPE STRING,
CONFIG_MAT_VAR TYPE STRING,
CONFIG_MULTI_LEVEL TYPE STRING,
CUSTOMS_PREFERENCE TYPE STRING,
DENOMINATOR TYPE STRING,
DOC_VERSION TYPE STRING,
DOC TYPE STRING,
DOC_STATUS TYPE STRING,
DOC_TYPE TYPE STRING,
DOC_REQD TYPE STRING,
EFFECTIVE_OUT_DATE TYPE STRING,
ENGINEERING_DESIGN TYPE STRING,
EXCEPTION_BOM TYPE STRING,
FIXED_PRICE_CO_PROD TYPE STRING,
HL_CONFIGURATION TYPE STRING,
INDIVIDUAL_COLL TYPE STRING,
INTERNAL_OBJ_NO TYPE STRING,
ISSUING_PLANT TYPE STRING,
ITEM_NODE TYPE STRING,
LOW_LEVEL_CODE TYPE STRING,
MAINTENANCE_STATUS TYPE STRING,
MOVING_PRICE TYPE STRING,
NET_SCRAP_INDICATOR TYPE STRING,
NO_OF_SHEETS TYPE STRING,
NUMERATOR TYPE STRING,
OBJECT_DESCRIPTION TYPE STRING,
OPERATION_SCRAP_PERC TYPE STRING,
PAGE_FORMAT TYPE STRING,
PAGE_NUMBER TYPE STRING,
PLANT TYPE STRING,
PLANT_MAINTENANCE TYPE STRING,
PLANT_SP_MATL_STATUS TYPE STRING,
PRICE_CONTROL TYPE STRING,
PROCURED_EXTERNALLY TYPE STRING,
PRODUCTION_RELEVANT TYPE STRING,
PROFIT_CENTER TYPE STRING,
RECURS_ALLOWED TYPE STRING,
RECURISVE TYPE STRING,
RELEVANCY_TO_COSTING TYPE STRING,
RELEVANT_TO_SALES TYPE STRING,
REQUIREMENT_SEGMENT TYPE STRING,
REVISION_LEVEL TYPE STRING,
SERIAL_NO_PROFILE TYPE STRING,
SORT_STRING TYPE STRING,
SPEC_PROC_COSTING TYPE STRING,
STATUS_TEXT TYPE STRING,
STOCK_SEGMENT TYPE STRING,
TECH_STATUS_FROM TYPE STRING,
UOM_USAGE TYPE STRING,
PLT_SP_STATUS_VALID_FROM TYPE STRING,
X_PLT_STATUS_VALID_FROM TYPE STRING,
VALUATION_CATEGORY TYPE STRING,
X_PLANT_MATERIAL_STATUS TYPE STRING,
B_O_M_VERSION TYPE STRING,
B_O_M_VERSION_STATUS TYPE STRING,
ITEM_INDEX TYPE STRING,END OF T_EKKO_STR.
DATA: WA_DBOMHDREXPLOUT_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_DBOMHDREXPLOUT_STR-MANDT sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_HDR_ROOT_MATL_HIER_NODE sy-vline 
WA_DBOMHDREXPLOUT_STR-MATERIAL_NAME sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_ROOT sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_HEADER_QUANTITY_PRIMARY sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_HEADER_BASE_UNIT sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_ROOT_VARIANT sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_VARIANT_USAGE sy-vline 
WA_DBOMHDREXPLOUT_STR-HEADER_VALIDITY_START_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-HEADER_VALIDITY_END_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-CHANGE_NUMBER sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_HDR_MATL_HIER_NODE sy-vline 
WA_DBOMHDREXPLOUT_STR-PRODUCTION_VERSION sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_ALTERNATIVE_TEXT sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_EXPLOSION_LEVEL sy-vline 
WA_DBOMHDREXPLOUT_STR-PATH_PREDECESSOR sy-vline 
WA_DBOMHDREXPLOUT_STR-PATH sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_ITEM_NUMBER sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_VARIANT sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL sy-vline 
WA_DBOMHDREXPLOUT_STR-BOM_CHANGE_NUMBER sy-vline 
WA_DBOMHDREXPLOUT_STR-PLANTNAME sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_VERS_STATUS_DESCRIPTION sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_COMPONENT sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_ITEM_QUANTITY sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_ITEM_UNIT sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_COMP_QUANT sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_BASE_QUANT sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_COMPONENT_DESCRIPTION sy-vline 
WA_DBOMHDREXPLOUT_STR-MATERIAL_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-STANDARD_PRICE sy-vline 
WA_DBOMHDREXPLOUT_STR-M_R_P_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-SPECIAL_PROCUREMENT_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-FOLLOW_UP_PRODUCT sy-vline 
WA_DBOMHDREXPLOUT_STR-MATERIAL_IS_CONFIGURABLE sy-vline 
WA_DBOMHDREXPLOUT_STR-RECORD_CREATION_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-CREATED_BY_USER sy-vline 
WA_DBOMHDREXPLOUT_STR-LAST_CHANGE_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-LAST_CHANGED_BY_USER sy-vline 
WA_DBOMHDREXPLOUT_STR-BILL_OF_MATERIAL_ITEM_CATEGORY sy-vline 
WA_DBOMHDREXPLOUT_STR-IS_MATERIAL_PROVISION sy-vline 
WA_DBOMHDREXPLOUT_STR-IS_B_O_M_ITEM_SPARE_PART sy-vline 
WA_DBOMHDREXPLOUT_STR-IS_C_A_D sy-vline 
WA_DBOMHDREXPLOUT_STR-PURCHASING_ORGANISATION sy-vline 
WA_DBOMHDREXPLOUT_STR-PURCHASING_GROUP sy-vline 
WA_DBOMHDREXPLOUT_STR-SUPPLIER sy-vline 
WA_DBOMHDREXPLOUT_STR-MATERIAL_COMPONENT_PRICE sy-vline 
WA_DBOMHDREXPLOUT_STR-PRICE_UNIT sy-vline 
WA_DBOMHDREXPLOUT_STR-CURRENCY sy-vline 
WA_DBOMHDREXPLOUT_STR-COST_ELEMENT sy-vline 
WA_DBOMHDREXPLOUT_STR-DOC_NUMBER sy-vline 
WA_DBOMHDREXPLOUT_STR-DOCUMENT_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-DOCUMENT_PART sy-vline 
WA_DBOMHDREXPLOUT_STR-DOCUMENT_VERSION sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_ITEM_DESCRIPTION sy-vline 
WA_DBOMHDREXPLOUT_STR-ITEM_DESCRIPTION_LINE_2 sy-vline 
WA_DBOMHDREXPLOUT_STR-MATERIAL_GROUP sy-vline 
WA_DBOMHDREXPLOUT_STR-GOODS_RECEIPT_DURATION_IN_DAYS sy-vline 
WA_DBOMHDREXPLOUT_STR-VALIDITY_START_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-VALIDITY_END_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-IS_PHANTOM_ITEM sy-vline 
WA_DBOMHDREXPLOUT_STR-PROD_ORDER_ISSUE_LOCATION sy-vline 
WA_DBOMHDREXPLOUT_STR-IS_SOFTWARE_COMPONENT sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_ITEM_IS_DISCONTINUED sy-vline 
WA_DBOMHDREXPLOUT_STR-CHG_TO_ENG_CHG_NUMBER sy-vline 
WA_DBOMHDREXPLOUT_STR-DELIVERY_TIME_IN_DAYS sy-vline 
WA_DBOMHDREXPLOUT_STR-ALTERNATIVE_ITEM sy-vline 
WA_DBOMHDREXPLOUT_STR-ALT_ITEM_GROUP sy-vline 
WA_DBOMHDREXPLOUT_STR-ALT_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-AS_SELECTION_COND sy-vline 
WA_DBOMHDREXPLOUT_STR-ASSEMBLY_INDICATOR sy-vline 
WA_DBOMHDREXPLOUT_STR-BASE_QTY_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-BASE_UNIT_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_ALT_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_CAT_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_CATEGORY sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_NO_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_USAGE_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-CLASS sy-vline 
WA_DBOMHDREXPLOUT_STR-CLASS_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-CLASSIFICATION sy-vline 
WA_DBOMHDREXPLOUT_STR-CONF_BOM_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-CO_PRODUCT sy-vline 
WA_DBOMHDREXPLOUT_STR-COUNTER sy-vline 
WA_DBOMHDREXPLOUT_STR-DAT_HIST_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-DELETION_INDICATOR sy-vline 
WA_DBOMHDREXPLOUT_STR-DISCONT_GROUP sy-vline 
WA_DBOMHDREXPLOUT_STR-DISTRIBUTION_KEY sy-vline 
WA_DBOMHDREXPLOUT_STR-DEL_IND_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-EXPLOSION_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-FIXED_QUANTITY sy-vline 
WA_DBOMHDREXPLOUT_STR-FOLLOW_UP_GRP sy-vline 
WA_DBOMHDREXPLOUT_STR-FOLLOW_UP_ITEM sy-vline 
WA_DBOMHDREXPLOUT_STR-FORMULA_KEY sy-vline 
WA_DBOMHDREXPLOUT_STR-GOODS_RECIPIENT sy-vline 
WA_DBOMHDREXPLOUT_STR-HEADER_RECORD_ID sy-vline 
WA_DBOMHDREXPLOUT_STR-INTRA_MATERIAL sy-vline 
WA_DBOMHDREXPLOUT_STR-ITEM_IDENTIFICATION sy-vline 
WA_DBOMHDREXPLOUT_STR-LEAD_TIME_OFFSET sy-vline 
WA_DBOMHDREXPLOUT_STR-LONG_TEXT_LANG sy-vline 
WA_DBOMHDREXPLOUT_STR-MAT_PURITY_IN_PERC sy-vline 
WA_DBOMHDREXPLOUT_STR-MULTIPLE_SEL sy-vline 
WA_DBOMHDREXPLOUT_STR-NO_VAR_SIZE_ITEMS sy-vline 
WA_DBOMHDREXPLOUT_STR-NO_CU_INSTANCES sy-vline 
WA_DBOMHDREXPLOUT_STR-OBJECT_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-OBJ_DEP_ASSGT_NO sy-vline 
WA_DBOMHDREXPLOUT_STR-OPER_LT_OFFSET sy-vline 
WA_DBOMHDREXPLOUT_STR-OPER_LTO_UNIT sy-vline 
WA_DBOMHDREXPLOUT_STR-ORG_AREA sy-vline 
WA_DBOMHDREXPLOUT_STR-PRIORITY sy-vline 
WA_DBOMHDREXPLOUT_STR-PRODN_SUPPLY_AREA sy-vline 
WA_DBOMHDREXPLOUT_STR-QTY_VAR_SIZE_ITEM sy-vline 
WA_DBOMHDREXPLOUT_STR-REFERENCE_POINT sy-vline 
WA_DBOMHDREXPLOUT_STR-REQUIRED_COMPONENT sy-vline 
WA_DBOMHDREXPLOUT_STR-SCRAP_QTY_BUN sy-vline 
WA_DBOMHDREXPLOUT_STR-SIZE1 sy-vline 
WA_DBOMHDREXPLOUT_STR-SIZE2 sy-vline 
WA_DBOMHDREXPLOUT_STR-SIZE3 sy-vline 
WA_DBOMHDREXPLOUT_STR-SIZE_UNIT sy-vline 
WA_DBOMHDREXPLOUT_STR-SPECIAL_PROC_TYP_ITM sy-vline 
WA_DBOMHDREXPLOUT_STR-SPECIAL_PROC_TYP_MASTR sy-vline 
WA_DBOMHDREXPLOUT_STR-STORAGE_LOCATION sy-vline 
WA_DBOMHDREXPLOUT_STR-STRATEGY sy-vline 
WA_DBOMHDREXPLOUT_STR-SUB_ITEM_INDICATOR sy-vline 
WA_DBOMHDREXPLOUT_STR-TABLE_ROW sy-vline 
WA_DBOMHDREXPLOUT_STR-TEST_HIST_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-TOTALS_RECORD_ID sy-vline 
WA_DBOMHDREXPLOUT_STR-UNIT_OF_MEASURE sy-vline 
WA_DBOMHDREXPLOUT_STR-UNLOADING_POINT sy-vline 
WA_DBOMHDREXPLOUT_STR-USAGE_PROBABILITY sy-vline 
WA_DBOMHDREXPLOUT_STR-VARIANTS_NXT_LVL sy-vline 
WA_DBOMHDREXPLOUT_STR-ITEM_SIGN sy-vline 
WA_DBOMHDREXPLOUT_STR-ASSIGN_EFFECT_VALS sy-vline 
WA_DBOMHDREXPLOUT_STR-ASSY_SCRAP_ITM_MAT sy-vline 
WA_DBOMHDREXPLOUT_STR-BASE_UOM sy-vline 
WA_DBOMHDREXPLOUT_STR-BATCH_ENTRY sy-vline 
WA_DBOMHDREXPLOUT_STR-BATCH_MGMT sy-vline 
WA_DBOMHDREXPLOUT_STR-BULK_MATERIAL sy-vline 
WA_DBOMHDREXPLOUT_STR-COMP_SCRAP_ITM sy-vline 
WA_DBOMHDREXPLOUT_STR-COMMODITY_CODE sy-vline 
WA_DBOMHDREXPLOUT_STR-COMP_SCRAP_ITM_MAT sy-vline 
WA_DBOMHDREXPLOUT_STR-COMP_MAINT_STATUS sy-vline 
WA_DBOMHDREXPLOUT_STR-CONFIG_MAT_VAR sy-vline 
WA_DBOMHDREXPLOUT_STR-CONFIG_MULTI_LEVEL sy-vline 
WA_DBOMHDREXPLOUT_STR-CUSTOMS_PREFERENCE sy-vline 
WA_DBOMHDREXPLOUT_STR-DENOMINATOR sy-vline 
WA_DBOMHDREXPLOUT_STR-DOC_VERSION sy-vline 
WA_DBOMHDREXPLOUT_STR-DOC sy-vline 
WA_DBOMHDREXPLOUT_STR-DOC_STATUS sy-vline 
WA_DBOMHDREXPLOUT_STR-DOC_TYPE sy-vline 
WA_DBOMHDREXPLOUT_STR-DOC_REQD sy-vline 
WA_DBOMHDREXPLOUT_STR-EFFECTIVE_OUT_DATE sy-vline 
WA_DBOMHDREXPLOUT_STR-ENGINEERING_DESIGN sy-vline 
WA_DBOMHDREXPLOUT_STR-EXCEPTION_BOM sy-vline 
WA_DBOMHDREXPLOUT_STR-FIXED_PRICE_CO_PROD sy-vline 
WA_DBOMHDREXPLOUT_STR-HL_CONFIGURATION sy-vline 
WA_DBOMHDREXPLOUT_STR-INDIVIDUAL_COLL sy-vline 
WA_DBOMHDREXPLOUT_STR-INTERNAL_OBJ_NO sy-vline 
WA_DBOMHDREXPLOUT_STR-ISSUING_PLANT sy-vline 
WA_DBOMHDREXPLOUT_STR-ITEM_NODE sy-vline 
WA_DBOMHDREXPLOUT_STR-LOW_LEVEL_CODE sy-vline 
WA_DBOMHDREXPLOUT_STR-MAINTENANCE_STATUS sy-vline 
WA_DBOMHDREXPLOUT_STR-MOVING_PRICE sy-vline 
WA_DBOMHDREXPLOUT_STR-NET_SCRAP_INDICATOR sy-vline 
WA_DBOMHDREXPLOUT_STR-NO_OF_SHEETS sy-vline 
WA_DBOMHDREXPLOUT_STR-NUMERATOR sy-vline 
WA_DBOMHDREXPLOUT_STR-OBJECT_DESCRIPTION sy-vline 
WA_DBOMHDREXPLOUT_STR-OPERATION_SCRAP_PERC sy-vline 
WA_DBOMHDREXPLOUT_STR-PAGE_FORMAT sy-vline 
WA_DBOMHDREXPLOUT_STR-PAGE_NUMBER sy-vline 
WA_DBOMHDREXPLOUT_STR-PLANT sy-vline 
WA_DBOMHDREXPLOUT_STR-PLANT_MAINTENANCE sy-vline 
WA_DBOMHDREXPLOUT_STR-PLANT_SP_MATL_STATUS sy-vline 
WA_DBOMHDREXPLOUT_STR-PRICE_CONTROL sy-vline 
WA_DBOMHDREXPLOUT_STR-PROCURED_EXTERNALLY sy-vline 
WA_DBOMHDREXPLOUT_STR-PRODUCTION_RELEVANT sy-vline 
WA_DBOMHDREXPLOUT_STR-PROFIT_CENTER sy-vline 
WA_DBOMHDREXPLOUT_STR-RECURS_ALLOWED sy-vline 
WA_DBOMHDREXPLOUT_STR-RECURISVE sy-vline 
WA_DBOMHDREXPLOUT_STR-RELEVANCY_TO_COSTING sy-vline 
WA_DBOMHDREXPLOUT_STR-RELEVANT_TO_SALES sy-vline 
WA_DBOMHDREXPLOUT_STR-REQUIREMENT_SEGMENT sy-vline 
WA_DBOMHDREXPLOUT_STR-REVISION_LEVEL sy-vline 
WA_DBOMHDREXPLOUT_STR-SERIAL_NO_PROFILE sy-vline 
WA_DBOMHDREXPLOUT_STR-SORT_STRING sy-vline 
WA_DBOMHDREXPLOUT_STR-SPEC_PROC_COSTING sy-vline 
WA_DBOMHDREXPLOUT_STR-STATUS_TEXT sy-vline 
WA_DBOMHDREXPLOUT_STR-STOCK_SEGMENT sy-vline 
WA_DBOMHDREXPLOUT_STR-TECH_STATUS_FROM sy-vline 
WA_DBOMHDREXPLOUT_STR-UOM_USAGE sy-vline 
WA_DBOMHDREXPLOUT_STR-PLT_SP_STATUS_VALID_FROM sy-vline 
WA_DBOMHDREXPLOUT_STR-X_PLT_STATUS_VALID_FROM sy-vline 
WA_DBOMHDREXPLOUT_STR-VALUATION_CATEGORY sy-vline 
WA_DBOMHDREXPLOUT_STR-X_PLANT_MATERIAL_STATUS sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_VERSION sy-vline 
WA_DBOMHDREXPLOUT_STR-B_O_M_VERSION_STATUS sy-vline 
WA_DBOMHDREXPLOUT_STR-ITEM_INDEX sy-vline      INTO ld_text SEPARATED BY SPACE.

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