ABAP Select data from SAP table BAPICMS_VBRP 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 BAPICMS_VBRP 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 BAPICMS_VBRP. 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 BAPICMS_VBRP 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_BAPICMS_VBRP TYPE STANDARD TABLE OF BAPICMS_VBRP,
      WA_BAPICMS_VBRP TYPE BAPICMS_VBRP,
      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: <BAPICMS_VBRP> TYPE BAPICMS_VBRP.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<BAPICMS_VBRP>-OPERATION = 1.
<BAPICMS_VBRP>-BILL_DOC = 1.
<BAPICMS_VBRP>-BILL_ITEM_NO = 1.
<BAPICMS_VBRP>-HG_LV_ITEM = 1.
<BAPICMS_VBRP>-INV_QTY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BAPICMS_VBRP-SALES_UNIT, sy-vline,
  WA_BAPICMS_VBRP-ISO_SALES_UNIT, sy-vline,
  WA_BAPICMS_VBRP-SALES_QTY_NUM, sy-vline,
  WA_BAPICMS_VBRP-SALES_QTY_DENOM, sy-vline,
  WA_BAPICMS_VBRP-BASE_UOM, sy-vline,
  WA_BAPICMS_VBRP-T_UNIT_ISO, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_BAPICMS_VBRP 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_BAPICMS_VBRP 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_BAPICMS_VBRP INTO WA_BAPICMS_VBRP.


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

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

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

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

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

*Conversion exit EXCRT, internal->external for field EXCHG_RATE
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-EXCHG_RATE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-EXCHG_RATE.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MATN5, internal->external for field MATERIAL
CALL FUNCTION 'CONVERSION_EXIT_MATN5_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-MATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-MATERIAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN5, internal->external for field PR_REF_MAT
CALL FUNCTION 'CONVERSION_EXIT_MATN5_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-PR_REF_MAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-PR_REF_MAT.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit EXCRT, internal->external for field EXCH_RATE_STAT_CREATE
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-EXCH_RATE_STAT_CREATE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-EXCH_RATE_STAT_CREATE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EAN11, internal->external for field EAN_UPC
CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-EAN_UPC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-EAN_UPC.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MATN5, internal->external for field MAT_ENTRD
CALL FUNCTION 'CONVERSION_EXIT_MATN5_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-MAT_ENTRD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-MAT_ENTRD.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSP, internal->external for field WBS_ELEM
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-WBS_ELEM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-WBS_ELEM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit MATN5, internal->external for field PRIC_REF_MAT_MAIN_ITEM
CALL FUNCTION 'CONVERSION_EXIT_MATN5_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-PRIC_REF_MAT_MAIN_ITEM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-PRIC_REF_MAT_MAIN_ITEM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit EXCRT, internal->external for field EXCH_RATE_LET_CR
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-EXCH_RATE_LET_CR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-EXCH_RATE_LET_CR.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit AUART, internal->external for field SD_DOC_TYP
CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-SD_DOC_TYP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-SD_DOC_TYP.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MATN1, internal->external for field PRIC_REF_MAT_MAIN_ITEM_LONG
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_BAPICMS_VBRP-PRIC_REF_MAT_MAIN_ITEM_LONG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPICMS_VBRP-PRIC_REF_MAT_MAIN_ITEM_LONG.
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_BAPICMS_VBRP_STR, 
OPERATION TYPE STRING,
BILL_DOC TYPE STRING,
BILL_ITEM_NO TYPE STRING,
HG_LV_ITEM TYPE STRING,
INV_QTY TYPE STRING,
SALES_UNIT TYPE STRING,
ISO_SALES_UNIT TYPE STRING,
SALES_QTY_NUM TYPE STRING,
SALES_QTY_DENOM TYPE STRING,
BASE_UOM TYPE STRING,
T_UNIT_ISO TYPE STRING,
SCALE_QTY_BASE_UOM TYPE STRING,
INV_QTY_SU TYPE STRING,
REQ_QUAN_MAT_MAN_ST_UN TYPE STRING,
NET_WEIGHT TYPE STRING,
GROSS_WT TYPE STRING,
UNIT_OF_WT TYPE STRING,
ISO_WT_UNIT TYPE STRING,
VOLUME TYPE STRING,
VOLUMEUNIT TYPE STRING,
ISO_VOL_UNIT TYPE STRING,
BUS_AREA TYPE STRING,
PRICE_DATE TYPE STRING,
SERVICE_DATE TYPE STRING,
EXCHG_RATE TYPE STRING,
NET_VAL TYPE STRING,
ORGION_DOC TYPE STRING,
ORGION_DOC_ITEM TYPE STRING,
REF_DOC TYPE STRING,
REF_DOC_IT TYPE STRING,
REF_DOC_CA TYPE STRING,
DOC_NUMBER TYPE STRING,
ITM_NUMBER TYPE STRING,
FLAG_SALES_DOC_REF TYPE STRING,
MATERIAL TYPE STRING,
SHORT_TEXT TYPE STRING,
PR_REF_MAT TYPE STRING,
BATCH TYPE STRING,
MATL_GROUP TYPE STRING,
ITEM_CATEG TYPE STRING,
ITEM_TYPE TYPE STRING,
PROD_HIER TYPE STRING,
SHIP_POINT TYPE STRING,
REPLACE_PT TYPE STRING,
DIVISION TYPE STRING,
ITEM_NUM_PART_SEG TYPE STRING,
PLANT TYPE STRING,
DEPCOUNTRY TYPE STRING,
ISO_DEP_COUNTRY TYPE STRING,
WKREG TYPE STRING,
WKCOU TYPE STRING,
WKCTY TYPE STRING,
TAXM1 TYPE STRING,
TAXM2 TYPE STRING,
TAXM3 TYPE STRING,
TAXM4 TYPE STRING,
TAXM5 TYPE STRING,
TAXM6 TYPE STRING,
TAXM7 TYPE STRING,
TAXM8 TYPE STRING,
TAXM9 TYPE STRING,
STAT_VAL TYPE STRING,
FLAG_CARRY_PRICE TYPE STRING,
CASH_DISC TYPE STRING,
ELG_AMT_CASH_DISC TYPE STRING,
MAT_PR_GRP TYPE STRING,
ACCT_ASSGT TYPE STRING,
COSTCENTER TYPE STRING,
REBATE_GRP TYPE STRING,
COMM_GROUP TYPE STRING,
EUR_ART_NR TYPE STRING,
SALES_GRP TYPE STRING,
SALES_OFF TYPE STRING,
DIV_ORD_HEADER TYPE STRING,
FLAG_RETURN_ITEM TYPE STRING,
CREATED_BY TYPE STRING,
CR_ON TYPE STRING,
REC_TIME TYPE STRING,
VAL_TYPE TYPE STRING,
STGE_LOC TYPE STRING,
UPDATE_GRP TYPE STRING,
COST_DOC_CURR TYPE STRING,
SUB_TOT_1_PP_COND TYPE STRING,
SUB_TOT_2_PP_COND TYPE STRING,
SUB_TOT_3_PP_COND TYPE STRING,
SUB_TOT_4_PP_COND TYPE STRING,
SUB_TOT_5_PP_COND TYPE STRING,
SUB_TOT_6_PP_COND TYPE STRING,
EXCH_RATE_STAT_CREATE TYPE STRING,
FLAG_INCOMP_PRICE TYPE STRING,
FLAG_INCOMP_GEN TYPE STRING,
EAN_UPC TYPE STRING,
PROFIT_CTR TYPE STRING,
CUST_GRP1 TYPE STRING,
CUST_GRP2 TYPE STRING,
CUST_GRP3 TYPE STRING,
CUST_GRP4 TYPE STRING,
CUST_GRP5 TYPE STRING,
PRC_GROUP1 TYPE STRING,
PRC_GROUP2 TYPE STRING,
PRC_GROUP3 TYPE STRING,
PRC_GROUP4 TYPE STRING,
PRC_GROUP5 TYPE STRING,
MAT_ENTRD TYPE STRING,
BONBA TYPE STRING,
CO_AREA TYPE STRING,
PROFIT_SEGM_NO TYPE STRING,
WBS_ELEM TYPE STRING,
ORDERID TYPE STRING,
TAXJURCODE TYPE STRING,
ITEM_CR_PRICE TYPE STRING,
ITEM_ID_ACTV_REL_CR TYPE STRING,
CONFIGURATION TYPE STRING,
INT_OBJ_BATCH_CLASS TYPE STRING,
COND_UPDAT TYPE STRING,
HIGH_ITEM_BATCH_SPLIT TYPE STRING,
IND_BTCH TYPE STRING,
DLVSCHEDUSE_01 TYPE STRING,
BOMEXPL_NO TYPE STRING,
SALES_DIST_SO TYPE STRING,
CUST_GRP_SO TYPE STRING,
PRICE_GRP_SO TYPE STRING,
COUNT_DEST_SO TYPE STRING,
ISO_SO_COUN_DEST TYPE STRING,
STAT_MAP_PRICE_CHNG TYPE STRING,
PRICE_LIST_TYPE_SO TYPE STRING,
REGION_SO TYPE STRING,
SALE_ORG_SO TYPE STRING,
DIS_CHANNEL_SO TYPE STRING,
START_DATE_ACC_SET_PER TYPE STRING,
ID_MAT_SEL_ACTIVE TYPE STRING,
ID_HIGH_LEV_ITM_USG TYPE STRING,
SD_DOC_CAT TYPE STRING,
STAT_DATE TYPE STRING,
BILL_PLAN TYPE STRING,
BILL_PLAN_ITEM TYPE STRING,
ACTION TYPE STRING,
PROMOTION TYPE STRING,
SALES_DEAL TYPE STRING,
IND_PREF_IMP_EXP TYPE STRING,
TAX_AMT_DOC_CURR TYPE STRING,
ORD_REASON TYPE STRING,
RULE_BILL_INV TYPE STRING,
PRIC_REF_MAT_MAIN_ITEM TYPE STRING,
MAT_PRC_GRP_MAN_ITEM TYPE STRING,
ITEM_CR_PRICE_FLT TYPE STRING,
FORM_PAY_GUAR TYPE STRING,
FACTOR_GUAR TYPE STRING,
REASON_ZERO_VAT TYPE STRING,
REGION TYPE STRING,
ACT_CODE_GROSS_EMP_TAX TYPE STRING,
DIST_TYP_EMP_TAX TYPE STRING,
TAX_REL_CLASS TYPE STRING,
CFOP_CODE_EXTN TYPE STRING,
ICMS_TAX_LAW TYPE STRING,
IPI_TAX_LAW TYPE STRING,
SD_TAX_CODE TYPE STRING,
GROSS_VAL_BILL_ITEM TYPE STRING,
WKTNR TYPE STRING,
WKTPS TYPE STRING,
PAY_CARD_PLAN_NO_SD TYPE STRING,
TRANS_DATE TYPE STRING,
MAT_GRP_HIER1 TYPE STRING,
MAT_GRP_HIER2 TYPE STRING,
CUST_COND_GRP1 TYPE STRING,
CUST_COND_GRP2 TYPE STRING,
CUST_COND_GRP3 TYPE STRING,
CUST_COND_GRP4 TYPE STRING,
CUST_COND_GRP5 TYPE STRING,
DLVSCHEDUSE_02 TYPE STRING,
INFLATION_INDEX TYPE STRING,
INDEX_BASE_DATE TYPE STRING,
FLG_LEAD_UNIT TYPE STRING,
TAX_CODE TYPE STRING,
CONTRACT_TYPE TYPE STRING,
CONTRACT_NUM TYPE STRING,
ITEM_TEXT TYPE STRING,
AGREED_DEL_TIME TYPE STRING,
CALC_MOTIVE TYPE STRING,
REVENUE_TYPE TYPE STRING,
EXCH_RATE_LET_CR TYPE STRING,
PRODCAT TYPE STRING,
REF_DOC_EX TYPE STRING,
REF_DOC_IT_EX TYPE STRING,
LOG_SYSTEM TYPE STRING,
ACT_ELEM_CAT_EX TYPE STRING,
SD_DOC_TYP TYPE STRING,
SD_ITM_CAT TYPE STRING,
MATERIAL_LONG TYPE STRING,
PR_REF_MAT_LONG TYPE STRING,
MAT_ENTRD_LONG TYPE STRING,
PRIC_REF_MAT_MAIN_ITEM_LONG TYPE STRING,END OF T_EKKO_STR.
DATA: WA_BAPICMS_VBRP_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_BAPICMS_VBRP_STR-OPERATION sy-vline 
WA_BAPICMS_VBRP_STR-BILL_DOC sy-vline 
WA_BAPICMS_VBRP_STR-BILL_ITEM_NO sy-vline 
WA_BAPICMS_VBRP_STR-HG_LV_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-INV_QTY sy-vline 
WA_BAPICMS_VBRP_STR-SALES_UNIT sy-vline 
WA_BAPICMS_VBRP_STR-ISO_SALES_UNIT sy-vline 
WA_BAPICMS_VBRP_STR-SALES_QTY_NUM sy-vline 
WA_BAPICMS_VBRP_STR-SALES_QTY_DENOM sy-vline 
WA_BAPICMS_VBRP_STR-BASE_UOM sy-vline 
WA_BAPICMS_VBRP_STR-T_UNIT_ISO sy-vline 
WA_BAPICMS_VBRP_STR-SCALE_QTY_BASE_UOM sy-vline 
WA_BAPICMS_VBRP_STR-INV_QTY_SU sy-vline 
WA_BAPICMS_VBRP_STR-REQ_QUAN_MAT_MAN_ST_UN sy-vline 
WA_BAPICMS_VBRP_STR-NET_WEIGHT sy-vline 
WA_BAPICMS_VBRP_STR-GROSS_WT sy-vline 
WA_BAPICMS_VBRP_STR-UNIT_OF_WT sy-vline 
WA_BAPICMS_VBRP_STR-ISO_WT_UNIT sy-vline 
WA_BAPICMS_VBRP_STR-VOLUME sy-vline 
WA_BAPICMS_VBRP_STR-VOLUMEUNIT sy-vline 
WA_BAPICMS_VBRP_STR-ISO_VOL_UNIT sy-vline 
WA_BAPICMS_VBRP_STR-BUS_AREA sy-vline 
WA_BAPICMS_VBRP_STR-PRICE_DATE sy-vline 
WA_BAPICMS_VBRP_STR-SERVICE_DATE sy-vline 
WA_BAPICMS_VBRP_STR-EXCHG_RATE sy-vline 
WA_BAPICMS_VBRP_STR-NET_VAL sy-vline 
WA_BAPICMS_VBRP_STR-ORGION_DOC sy-vline 
WA_BAPICMS_VBRP_STR-ORGION_DOC_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-REF_DOC sy-vline 
WA_BAPICMS_VBRP_STR-REF_DOC_IT sy-vline 
WA_BAPICMS_VBRP_STR-REF_DOC_CA sy-vline 
WA_BAPICMS_VBRP_STR-DOC_NUMBER sy-vline 
WA_BAPICMS_VBRP_STR-ITM_NUMBER sy-vline 
WA_BAPICMS_VBRP_STR-FLAG_SALES_DOC_REF sy-vline 
WA_BAPICMS_VBRP_STR-MATERIAL sy-vline 
WA_BAPICMS_VBRP_STR-SHORT_TEXT sy-vline 
WA_BAPICMS_VBRP_STR-PR_REF_MAT sy-vline 
WA_BAPICMS_VBRP_STR-BATCH sy-vline 
WA_BAPICMS_VBRP_STR-MATL_GROUP sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_CATEG sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_TYPE sy-vline 
WA_BAPICMS_VBRP_STR-PROD_HIER sy-vline 
WA_BAPICMS_VBRP_STR-SHIP_POINT sy-vline 
WA_BAPICMS_VBRP_STR-REPLACE_PT sy-vline 
WA_BAPICMS_VBRP_STR-DIVISION sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_NUM_PART_SEG sy-vline 
WA_BAPICMS_VBRP_STR-PLANT sy-vline 
WA_BAPICMS_VBRP_STR-DEPCOUNTRY sy-vline 
WA_BAPICMS_VBRP_STR-ISO_DEP_COUNTRY sy-vline 
WA_BAPICMS_VBRP_STR-WKREG sy-vline 
WA_BAPICMS_VBRP_STR-WKCOU sy-vline 
WA_BAPICMS_VBRP_STR-WKCTY sy-vline 
WA_BAPICMS_VBRP_STR-TAXM1 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM2 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM3 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM4 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM5 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM6 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM7 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM8 sy-vline 
WA_BAPICMS_VBRP_STR-TAXM9 sy-vline 
WA_BAPICMS_VBRP_STR-STAT_VAL sy-vline 
WA_BAPICMS_VBRP_STR-FLAG_CARRY_PRICE sy-vline 
WA_BAPICMS_VBRP_STR-CASH_DISC sy-vline 
WA_BAPICMS_VBRP_STR-ELG_AMT_CASH_DISC sy-vline 
WA_BAPICMS_VBRP_STR-MAT_PR_GRP sy-vline 
WA_BAPICMS_VBRP_STR-ACCT_ASSGT sy-vline 
WA_BAPICMS_VBRP_STR-COSTCENTER sy-vline 
WA_BAPICMS_VBRP_STR-REBATE_GRP sy-vline 
WA_BAPICMS_VBRP_STR-COMM_GROUP sy-vline 
WA_BAPICMS_VBRP_STR-EUR_ART_NR sy-vline 
WA_BAPICMS_VBRP_STR-SALES_GRP sy-vline 
WA_BAPICMS_VBRP_STR-SALES_OFF sy-vline 
WA_BAPICMS_VBRP_STR-DIV_ORD_HEADER sy-vline 
WA_BAPICMS_VBRP_STR-FLAG_RETURN_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-CREATED_BY sy-vline 
WA_BAPICMS_VBRP_STR-CR_ON sy-vline 
WA_BAPICMS_VBRP_STR-REC_TIME sy-vline 
WA_BAPICMS_VBRP_STR-VAL_TYPE sy-vline 
WA_BAPICMS_VBRP_STR-STGE_LOC sy-vline 
WA_BAPICMS_VBRP_STR-UPDATE_GRP sy-vline 
WA_BAPICMS_VBRP_STR-COST_DOC_CURR sy-vline 
WA_BAPICMS_VBRP_STR-SUB_TOT_1_PP_COND sy-vline 
WA_BAPICMS_VBRP_STR-SUB_TOT_2_PP_COND sy-vline 
WA_BAPICMS_VBRP_STR-SUB_TOT_3_PP_COND sy-vline 
WA_BAPICMS_VBRP_STR-SUB_TOT_4_PP_COND sy-vline 
WA_BAPICMS_VBRP_STR-SUB_TOT_5_PP_COND sy-vline 
WA_BAPICMS_VBRP_STR-SUB_TOT_6_PP_COND sy-vline 
WA_BAPICMS_VBRP_STR-EXCH_RATE_STAT_CREATE sy-vline 
WA_BAPICMS_VBRP_STR-FLAG_INCOMP_PRICE sy-vline 
WA_BAPICMS_VBRP_STR-FLAG_INCOMP_GEN sy-vline 
WA_BAPICMS_VBRP_STR-EAN_UPC sy-vline 
WA_BAPICMS_VBRP_STR-PROFIT_CTR sy-vline 
WA_BAPICMS_VBRP_STR-CUST_GRP1 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_GRP2 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_GRP3 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_GRP4 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_GRP5 sy-vline 
WA_BAPICMS_VBRP_STR-PRC_GROUP1 sy-vline 
WA_BAPICMS_VBRP_STR-PRC_GROUP2 sy-vline 
WA_BAPICMS_VBRP_STR-PRC_GROUP3 sy-vline 
WA_BAPICMS_VBRP_STR-PRC_GROUP4 sy-vline 
WA_BAPICMS_VBRP_STR-PRC_GROUP5 sy-vline 
WA_BAPICMS_VBRP_STR-MAT_ENTRD sy-vline 
WA_BAPICMS_VBRP_STR-BONBA sy-vline 
WA_BAPICMS_VBRP_STR-CO_AREA sy-vline 
WA_BAPICMS_VBRP_STR-PROFIT_SEGM_NO sy-vline 
WA_BAPICMS_VBRP_STR-WBS_ELEM sy-vline 
WA_BAPICMS_VBRP_STR-ORDERID sy-vline 
WA_BAPICMS_VBRP_STR-TAXJURCODE sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_CR_PRICE sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_ID_ACTV_REL_CR sy-vline 
WA_BAPICMS_VBRP_STR-CONFIGURATION sy-vline 
WA_BAPICMS_VBRP_STR-INT_OBJ_BATCH_CLASS sy-vline 
WA_BAPICMS_VBRP_STR-COND_UPDAT sy-vline 
WA_BAPICMS_VBRP_STR-HIGH_ITEM_BATCH_SPLIT sy-vline 
WA_BAPICMS_VBRP_STR-IND_BTCH sy-vline 
WA_BAPICMS_VBRP_STR-DLVSCHEDUSE_01 sy-vline 
WA_BAPICMS_VBRP_STR-BOMEXPL_NO sy-vline 
WA_BAPICMS_VBRP_STR-SALES_DIST_SO sy-vline 
WA_BAPICMS_VBRP_STR-CUST_GRP_SO sy-vline 
WA_BAPICMS_VBRP_STR-PRICE_GRP_SO sy-vline 
WA_BAPICMS_VBRP_STR-COUNT_DEST_SO sy-vline 
WA_BAPICMS_VBRP_STR-ISO_SO_COUN_DEST sy-vline 
WA_BAPICMS_VBRP_STR-STAT_MAP_PRICE_CHNG sy-vline 
WA_BAPICMS_VBRP_STR-PRICE_LIST_TYPE_SO sy-vline 
WA_BAPICMS_VBRP_STR-REGION_SO sy-vline 
WA_BAPICMS_VBRP_STR-SALE_ORG_SO sy-vline 
WA_BAPICMS_VBRP_STR-DIS_CHANNEL_SO sy-vline 
WA_BAPICMS_VBRP_STR-START_DATE_ACC_SET_PER sy-vline 
WA_BAPICMS_VBRP_STR-ID_MAT_SEL_ACTIVE sy-vline 
WA_BAPICMS_VBRP_STR-ID_HIGH_LEV_ITM_USG sy-vline 
WA_BAPICMS_VBRP_STR-SD_DOC_CAT sy-vline 
WA_BAPICMS_VBRP_STR-STAT_DATE sy-vline 
WA_BAPICMS_VBRP_STR-BILL_PLAN sy-vline 
WA_BAPICMS_VBRP_STR-BILL_PLAN_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-ACTION sy-vline 
WA_BAPICMS_VBRP_STR-PROMOTION sy-vline 
WA_BAPICMS_VBRP_STR-SALES_DEAL sy-vline 
WA_BAPICMS_VBRP_STR-IND_PREF_IMP_EXP sy-vline 
WA_BAPICMS_VBRP_STR-TAX_AMT_DOC_CURR sy-vline 
WA_BAPICMS_VBRP_STR-ORD_REASON sy-vline 
WA_BAPICMS_VBRP_STR-RULE_BILL_INV sy-vline 
WA_BAPICMS_VBRP_STR-PRIC_REF_MAT_MAIN_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-MAT_PRC_GRP_MAN_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_CR_PRICE_FLT sy-vline 
WA_BAPICMS_VBRP_STR-FORM_PAY_GUAR sy-vline 
WA_BAPICMS_VBRP_STR-FACTOR_GUAR sy-vline 
WA_BAPICMS_VBRP_STR-REASON_ZERO_VAT sy-vline 
WA_BAPICMS_VBRP_STR-REGION sy-vline 
WA_BAPICMS_VBRP_STR-ACT_CODE_GROSS_EMP_TAX sy-vline 
WA_BAPICMS_VBRP_STR-DIST_TYP_EMP_TAX sy-vline 
WA_BAPICMS_VBRP_STR-TAX_REL_CLASS sy-vline 
WA_BAPICMS_VBRP_STR-CFOP_CODE_EXTN sy-vline 
WA_BAPICMS_VBRP_STR-ICMS_TAX_LAW sy-vline 
WA_BAPICMS_VBRP_STR-IPI_TAX_LAW sy-vline 
WA_BAPICMS_VBRP_STR-SD_TAX_CODE sy-vline 
WA_BAPICMS_VBRP_STR-GROSS_VAL_BILL_ITEM sy-vline 
WA_BAPICMS_VBRP_STR-WKTNR sy-vline 
WA_BAPICMS_VBRP_STR-WKTPS sy-vline 
WA_BAPICMS_VBRP_STR-PAY_CARD_PLAN_NO_SD sy-vline 
WA_BAPICMS_VBRP_STR-TRANS_DATE sy-vline 
WA_BAPICMS_VBRP_STR-MAT_GRP_HIER1 sy-vline 
WA_BAPICMS_VBRP_STR-MAT_GRP_HIER2 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_COND_GRP1 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_COND_GRP2 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_COND_GRP3 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_COND_GRP4 sy-vline 
WA_BAPICMS_VBRP_STR-CUST_COND_GRP5 sy-vline 
WA_BAPICMS_VBRP_STR-DLVSCHEDUSE_02 sy-vline 
WA_BAPICMS_VBRP_STR-INFLATION_INDEX sy-vline 
WA_BAPICMS_VBRP_STR-INDEX_BASE_DATE sy-vline 
WA_BAPICMS_VBRP_STR-FLG_LEAD_UNIT sy-vline 
WA_BAPICMS_VBRP_STR-TAX_CODE sy-vline 
WA_BAPICMS_VBRP_STR-CONTRACT_TYPE sy-vline 
WA_BAPICMS_VBRP_STR-CONTRACT_NUM sy-vline 
WA_BAPICMS_VBRP_STR-ITEM_TEXT sy-vline 
WA_BAPICMS_VBRP_STR-AGREED_DEL_TIME sy-vline 
WA_BAPICMS_VBRP_STR-CALC_MOTIVE sy-vline 
WA_BAPICMS_VBRP_STR-REVENUE_TYPE sy-vline 
WA_BAPICMS_VBRP_STR-EXCH_RATE_LET_CR sy-vline 
WA_BAPICMS_VBRP_STR-PRODCAT sy-vline 
WA_BAPICMS_VBRP_STR-REF_DOC_EX sy-vline 
WA_BAPICMS_VBRP_STR-REF_DOC_IT_EX sy-vline 
WA_BAPICMS_VBRP_STR-LOG_SYSTEM sy-vline 
WA_BAPICMS_VBRP_STR-ACT_ELEM_CAT_EX sy-vline 
WA_BAPICMS_VBRP_STR-SD_DOC_TYP sy-vline 
WA_BAPICMS_VBRP_STR-SD_ITM_CAT sy-vline 
WA_BAPICMS_VBRP_STR-MATERIAL_LONG sy-vline 
WA_BAPICMS_VBRP_STR-PR_REF_MAT_LONG sy-vline 
WA_BAPICMS_VBRP_STR-MAT_ENTRD_LONG sy-vline 
WA_BAPICMS_VBRP_STR-PRIC_REF_MAT_MAIN_ITEM_LONG sy-vline      INTO ld_text SEPARATED BY SPACE.

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