ABAP Select data from SAP table WCB_BVB_CHANGE into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP WCB_BVB_CHANGE 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 WCB_BVB_CHANGE. 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 WCB_BVB_CHANGE 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_WCB_BVB_CHANGE TYPE STANDARD TABLE OF WCB_BVB_CHANGE,
      WA_WCB_BVB_CHANGE TYPE WCB_BVB_CHANGE,
      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: <WCB_BVB_CHANGE> TYPE WCB_BVB_CHANGE.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM WCB_BVB_CHANGE
*  INTO TABLE @DATA(IT_WCB_BVB_CHANGE2).
*--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_WCB_BVB_CHANGE INDEX 1 INTO DATA(WA_WCB_BVB_CHANGE2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_WCB_BVB_CHANGE ASSIGNING <WCB_BVB_CHANGE>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<WCB_BVB_CHANGE>-ORDER_KEY_IN = 1.
<WCB_BVB_CHANGE>-MANDT = 1.
<WCB_BVB_CHANGE>-NUM = 1.
<WCB_BVB_CHANGE>-GUID = 1.
<WCB_BVB_CHANGE>-FIELDCOMB = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_WCB_BVB_CHANGE-INCL_EXCL, sy-vline,
WA_WCB_BVB_CHANGE-X_LIFNR, sy-vline,
WA_WCB_BVB_CHANGE-X_KUNNR, sy-vline,
WA_WCB_BVB_CHANGE-SELECTION_GROUP, sy-vline,
WA_WCB_BVB_CHANGE-VALID_FROM, sy-vline,
WA_WCB_BVB_CHANGE-VALID_TO, sy-vline.
ENDLOOP. *Add any further fields from structure WA_WCB_BVB_CHANGE 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_WCB_BVB_CHANGE 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_WCB_BVB_CHANGE INTO WA_WCB_BVB_CHANGE. *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 NUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_WCB_BVB_CHANGE-NUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_WCB_BVB_CHANGE-NUM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field SERVICE_DOC_ID_K CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_WCB_BVB_CHANGE-SERVICE_DOC_ID_K IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_WCB_BVB_CHANGE-SERVICE_DOC_ID_K.
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_WCB_BVB_CHANGE_STR,
ORDER_KEY_IN TYPE STRING,
MANDT TYPE STRING,
NUM TYPE STRING,
GUID TYPE STRING,
FIELDCOMB TYPE STRING,
INCL_EXCL TYPE STRING,
X_LIFNR TYPE STRING,
X_KUNNR TYPE STRING,
SELECTION_GROUP TYPE STRING,
VALID_FROM TYPE STRING,
VALID_TO TYPE STRING,
_DATAAGING TYPE STRING,
FC_GROUP_BVB TYPE STRING,
ORIGIN TYPE STRING,
LIFNR TYPE STRING,
KUNNR TYPE STRING,
EKORG TYPE STRING,
EKGRP TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
BUKRS TYPE STRING,
WERKS TYPE STRING,
LTSNR TYPE STRING,
MATKL TYPE STRING,
MATNR TYPE STRING,
CUSTOMER_LIST TYPE STRING,
VENDOR_LIST TYPE STRING,
PLANT_LIST TYPE STRING,
OFFERID TYPE STRING,
AKTNR TYPE STRING,
WGHIE TYPE STRING,
KUNHIER TYPE STRING,
PRODH TYPE STRING,
MVGR1 TYPE STRING,
MVGR2 TYPE STRING,
MVGR3 TYPE STRING,
MVGR4 TYPE STRING,
MVGR5 TYPE STRING,
CAMPAIGN TYPE STRING,
TG_ID TYPE STRING,
BVB_LIST TYPE STRING,
EKKOL TYPE STRING,
MTART TYPE STRING,
AUGRU TYPE STRING,
MFRNR TYPE STRING,
LIFNR_ROYALTIES TYPE STRING,
LIFNR_COMMISSION TYPE STRING,
BONUS TYPE STRING,
PROVG TYPE STRING,
LAND1 TYPE STRING,
REGIO TYPE STRING,
KONDM TYPE STRING,
KUNWE TYPE STRING,
PMATN TYPE STRING,
SATNR TYPE STRING,
PS_PSP_PNR TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
KUNRG TYPE STRING,
CONTRACT TYPE STRING,
CONTRACT_PROCESS TYPE STRING,
SERVICE_DOC_TYPE TYPE STRING,
SERVICE_DOC_ID TYPE STRING,
SERVICE_DOC_ITEM_ID TYPE STRING,
BLART TYPE STRING,
KVGR1 TYPE STRING,
KVGR2 TYPE STRING,
KVGR3 TYPE STRING,
KVGR4 TYPE STRING,
KVGR5 TYPE STRING,
KDGRP TYPE STRING,
DUMMY TYPE STRING,
EXT_GUID TYPE STRING,
UPDKZ TYPE STRING,
VAKEY TYPE STRING,
SOURCE TYPE STRING,
FC_GROUP TYPE STRING,
BVB_GROUP_ID TYPE STRING,
BVB_GROUP_TYPE TYPE STRING,
LIFNR_K TYPE STRING,
KUNNR_K TYPE STRING,
EKORG_K TYPE STRING,
EKGRP_K TYPE STRING,
VKORG_K TYPE STRING,
VTWEG_K TYPE STRING,
SPART_K TYPE STRING,
BUKRS_K TYPE STRING,
WERKS_K TYPE STRING,
LTSNR_K TYPE STRING,
MATKL_K TYPE STRING,
MATNR_K TYPE STRING,
CUSTOMER_LIST_K TYPE STRING,
VENDOR_LIST_K TYPE STRING,
PLANT_LIST_K TYPE STRING,
OFFERID_K TYPE STRING,
AKTNR_K TYPE STRING,
WGHIE_K TYPE STRING,
KUNHIER_K TYPE STRING,
PRODH_K TYPE STRING,
MVGR1_K TYPE STRING,
MVGR2_K TYPE STRING,
MVGR3_K TYPE STRING,
MVGR4_K TYPE STRING,
MVGR5_K TYPE STRING,
CAMPAIGN_K TYPE STRING,
TG_ID_K TYPE STRING,
BVB_LIST_K TYPE STRING,
EKKOL_K TYPE STRING,
MTART_K TYPE STRING,
AUGRU_K TYPE STRING,
MFRNR_K TYPE STRING,
LIFNR_ROYALTIES_K TYPE STRING,
LIFNR_COMMISSION_K TYPE STRING,
BONUS_K TYPE STRING,
PROVG_K TYPE STRING,
LAND1_K TYPE STRING,
REGIO_K TYPE STRING,
KONDM_K TYPE STRING,
KUNWE_K TYPE STRING,
PMATN_K TYPE STRING,
SATNR_K TYPE STRING,
PS_PSP_PNR_K TYPE STRING,
VKBUR_K TYPE STRING,
VKGRP_K TYPE STRING,
KUNRG_K TYPE STRING,
CONTRACT_K TYPE STRING,
CONTRACT_PROCESS_K TYPE STRING,
SERVICE_DOC_TYPE_K TYPE STRING,
SERVICE_DOC_ID_K TYPE STRING,
SERVICE_DOC_ITEM_ID_K TYPE STRING,
BLART_K TYPE STRING,
KVGR1_K TYPE STRING,
KVGR2_K TYPE STRING,
KVGR3_K TYPE STRING,
KVGR4_K TYPE STRING,
KVGR5_K TYPE STRING,
KDGRP_K TYPE STRING,
DUMMY_K TYPE STRING,
VALID_FROM_K TYPE STRING,
VALID_TO_K TYPE STRING,END OF T_EKKO_STR. DATA: WA_WCB_BVB_CHANGE_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_WCB_BVB_CHANGE_STR-ORDER_KEY_IN sy-vline
WA_WCB_BVB_CHANGE_STR-MANDT sy-vline
WA_WCB_BVB_CHANGE_STR-NUM sy-vline
WA_WCB_BVB_CHANGE_STR-GUID sy-vline
WA_WCB_BVB_CHANGE_STR-FIELDCOMB sy-vline
WA_WCB_BVB_CHANGE_STR-INCL_EXCL sy-vline
WA_WCB_BVB_CHANGE_STR-X_LIFNR sy-vline
WA_WCB_BVB_CHANGE_STR-X_KUNNR sy-vline
WA_WCB_BVB_CHANGE_STR-SELECTION_GROUP sy-vline
WA_WCB_BVB_CHANGE_STR-VALID_FROM sy-vline
WA_WCB_BVB_CHANGE_STR-VALID_TO sy-vline
WA_WCB_BVB_CHANGE_STR-_DATAAGING sy-vline
WA_WCB_BVB_CHANGE_STR-FC_GROUP_BVB sy-vline
WA_WCB_BVB_CHANGE_STR-ORIGIN sy-vline
WA_WCB_BVB_CHANGE_STR-LIFNR sy-vline
WA_WCB_BVB_CHANGE_STR-KUNNR sy-vline
WA_WCB_BVB_CHANGE_STR-EKORG sy-vline
WA_WCB_BVB_CHANGE_STR-EKGRP sy-vline
WA_WCB_BVB_CHANGE_STR-VKORG sy-vline
WA_WCB_BVB_CHANGE_STR-VTWEG sy-vline
WA_WCB_BVB_CHANGE_STR-SPART sy-vline
WA_WCB_BVB_CHANGE_STR-BUKRS sy-vline
WA_WCB_BVB_CHANGE_STR-WERKS sy-vline
WA_WCB_BVB_CHANGE_STR-LTSNR sy-vline
WA_WCB_BVB_CHANGE_STR-MATKL sy-vline
WA_WCB_BVB_CHANGE_STR-MATNR sy-vline
WA_WCB_BVB_CHANGE_STR-CUSTOMER_LIST sy-vline
WA_WCB_BVB_CHANGE_STR-VENDOR_LIST sy-vline
WA_WCB_BVB_CHANGE_STR-PLANT_LIST sy-vline
WA_WCB_BVB_CHANGE_STR-OFFERID sy-vline
WA_WCB_BVB_CHANGE_STR-AKTNR sy-vline
WA_WCB_BVB_CHANGE_STR-WGHIE sy-vline
WA_WCB_BVB_CHANGE_STR-KUNHIER sy-vline
WA_WCB_BVB_CHANGE_STR-PRODH sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR1 sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR2 sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR3 sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR4 sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR5 sy-vline
WA_WCB_BVB_CHANGE_STR-CAMPAIGN sy-vline
WA_WCB_BVB_CHANGE_STR-TG_ID sy-vline
WA_WCB_BVB_CHANGE_STR-BVB_LIST sy-vline
WA_WCB_BVB_CHANGE_STR-EKKOL sy-vline
WA_WCB_BVB_CHANGE_STR-MTART sy-vline
WA_WCB_BVB_CHANGE_STR-AUGRU sy-vline
WA_WCB_BVB_CHANGE_STR-MFRNR sy-vline
WA_WCB_BVB_CHANGE_STR-LIFNR_ROYALTIES sy-vline
WA_WCB_BVB_CHANGE_STR-LIFNR_COMMISSION sy-vline
WA_WCB_BVB_CHANGE_STR-BONUS sy-vline
WA_WCB_BVB_CHANGE_STR-PROVG sy-vline
WA_WCB_BVB_CHANGE_STR-LAND1 sy-vline
WA_WCB_BVB_CHANGE_STR-REGIO sy-vline
WA_WCB_BVB_CHANGE_STR-KONDM sy-vline
WA_WCB_BVB_CHANGE_STR-KUNWE sy-vline
WA_WCB_BVB_CHANGE_STR-PMATN sy-vline
WA_WCB_BVB_CHANGE_STR-SATNR sy-vline
WA_WCB_BVB_CHANGE_STR-PS_PSP_PNR sy-vline
WA_WCB_BVB_CHANGE_STR-VKBUR sy-vline
WA_WCB_BVB_CHANGE_STR-VKGRP sy-vline
WA_WCB_BVB_CHANGE_STR-KUNRG sy-vline
WA_WCB_BVB_CHANGE_STR-CONTRACT sy-vline
WA_WCB_BVB_CHANGE_STR-CONTRACT_PROCESS sy-vline
WA_WCB_BVB_CHANGE_STR-SERVICE_DOC_TYPE sy-vline
WA_WCB_BVB_CHANGE_STR-SERVICE_DOC_ID sy-vline
WA_WCB_BVB_CHANGE_STR-SERVICE_DOC_ITEM_ID sy-vline
WA_WCB_BVB_CHANGE_STR-BLART sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR1 sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR2 sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR3 sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR4 sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR5 sy-vline
WA_WCB_BVB_CHANGE_STR-KDGRP sy-vline
WA_WCB_BVB_CHANGE_STR-DUMMY sy-vline
WA_WCB_BVB_CHANGE_STR-EXT_GUID sy-vline
WA_WCB_BVB_CHANGE_STR-UPDKZ sy-vline
WA_WCB_BVB_CHANGE_STR-VAKEY sy-vline
WA_WCB_BVB_CHANGE_STR-SOURCE sy-vline
WA_WCB_BVB_CHANGE_STR-FC_GROUP sy-vline
WA_WCB_BVB_CHANGE_STR-BVB_GROUP_ID sy-vline
WA_WCB_BVB_CHANGE_STR-BVB_GROUP_TYPE sy-vline
WA_WCB_BVB_CHANGE_STR-LIFNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-KUNNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-EKORG_K sy-vline
WA_WCB_BVB_CHANGE_STR-EKGRP_K sy-vline
WA_WCB_BVB_CHANGE_STR-VKORG_K sy-vline
WA_WCB_BVB_CHANGE_STR-VTWEG_K sy-vline
WA_WCB_BVB_CHANGE_STR-SPART_K sy-vline
WA_WCB_BVB_CHANGE_STR-BUKRS_K sy-vline
WA_WCB_BVB_CHANGE_STR-WERKS_K sy-vline
WA_WCB_BVB_CHANGE_STR-LTSNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-MATKL_K sy-vline
WA_WCB_BVB_CHANGE_STR-MATNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-CUSTOMER_LIST_K sy-vline
WA_WCB_BVB_CHANGE_STR-VENDOR_LIST_K sy-vline
WA_WCB_BVB_CHANGE_STR-PLANT_LIST_K sy-vline
WA_WCB_BVB_CHANGE_STR-OFFERID_K sy-vline
WA_WCB_BVB_CHANGE_STR-AKTNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-WGHIE_K sy-vline
WA_WCB_BVB_CHANGE_STR-KUNHIER_K sy-vline
WA_WCB_BVB_CHANGE_STR-PRODH_K sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR1_K sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR2_K sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR3_K sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR4_K sy-vline
WA_WCB_BVB_CHANGE_STR-MVGR5_K sy-vline
WA_WCB_BVB_CHANGE_STR-CAMPAIGN_K sy-vline
WA_WCB_BVB_CHANGE_STR-TG_ID_K sy-vline
WA_WCB_BVB_CHANGE_STR-BVB_LIST_K sy-vline
WA_WCB_BVB_CHANGE_STR-EKKOL_K sy-vline
WA_WCB_BVB_CHANGE_STR-MTART_K sy-vline
WA_WCB_BVB_CHANGE_STR-AUGRU_K sy-vline
WA_WCB_BVB_CHANGE_STR-MFRNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-LIFNR_ROYALTIES_K sy-vline
WA_WCB_BVB_CHANGE_STR-LIFNR_COMMISSION_K sy-vline
WA_WCB_BVB_CHANGE_STR-BONUS_K sy-vline
WA_WCB_BVB_CHANGE_STR-PROVG_K sy-vline
WA_WCB_BVB_CHANGE_STR-LAND1_K sy-vline
WA_WCB_BVB_CHANGE_STR-REGIO_K sy-vline
WA_WCB_BVB_CHANGE_STR-KONDM_K sy-vline
WA_WCB_BVB_CHANGE_STR-KUNWE_K sy-vline
WA_WCB_BVB_CHANGE_STR-PMATN_K sy-vline
WA_WCB_BVB_CHANGE_STR-SATNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-PS_PSP_PNR_K sy-vline
WA_WCB_BVB_CHANGE_STR-VKBUR_K sy-vline
WA_WCB_BVB_CHANGE_STR-VKGRP_K sy-vline
WA_WCB_BVB_CHANGE_STR-KUNRG_K sy-vline
WA_WCB_BVB_CHANGE_STR-CONTRACT_K sy-vline
WA_WCB_BVB_CHANGE_STR-CONTRACT_PROCESS_K sy-vline
WA_WCB_BVB_CHANGE_STR-SERVICE_DOC_TYPE_K sy-vline
WA_WCB_BVB_CHANGE_STR-SERVICE_DOC_ID_K sy-vline
WA_WCB_BVB_CHANGE_STR-SERVICE_DOC_ITEM_ID_K sy-vline
WA_WCB_BVB_CHANGE_STR-BLART_K sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR1_K sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR2_K sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR3_K sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR4_K sy-vline
WA_WCB_BVB_CHANGE_STR-KVGR5_K sy-vline
WA_WCB_BVB_CHANGE_STR-KDGRP_K sy-vline
WA_WCB_BVB_CHANGE_STR-DUMMY_K sy-vline
WA_WCB_BVB_CHANGE_STR-VALID_FROM_K sy-vline
WA_WCB_BVB_CHANGE_STR-VALID_TO_K sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.