ABAP Select data from SAP table BIW_ISUWA_WDO_ITEM 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 BIW_ISUWA_WDO_ITEM 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 BIW_ISUWA_WDO_ITEM. 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 BIW_ISUWA_WDO_ITEM 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_BIW_ISUWA_WDO_ITEM TYPE STANDARD TABLE OF BIW_ISUWA_WDO_ITEM,
      WA_BIW_ISUWA_WDO_ITEM TYPE BIW_ISUWA_WDO_ITEM,
      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: <BIW_ISUWA_WDO_ITEM> TYPE BIW_ISUWA_WDO_ITEM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM BIW_ISUWA_WDO_ITEM
*  INTO TABLE @DATA(IT_BIW_ISUWA_WDO_ITEM2).
*--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_BIW_ISUWA_WDO_ITEM INDEX 1 INTO DATA(WA_BIW_ISUWA_WDO_ITEM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_BIW_ISUWA_WDO_ITEM ASSIGNING <BIW_ISUWA_WDO_ITEM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<BIW_ISUWA_WDO_ITEM>-MANDT = 1.
<BIW_ISUWA_WDO_ITEM>-ORDERNR = 1.
<BIW_ISUWA_WDO_ITEM>-ORDER_LAUFNR = 1.
<BIW_ISUWA_WDO_ITEM>-ROUTE = 1.
<BIW_ISUWA_WDO_ITEM>-ORDER_DATE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BIW_ISUWA_WDO_ITEM-SERVICE_TYPE, sy-vline,
WA_BIW_ISUWA_WDO_ITEM-UPDMOD, sy-vline,
WA_BIW_ISUWA_WDO_ITEM-COUNT_ITEM, sy-vline,
WA_BIW_ISUWA_WDO_ITEM-COUNT_NEG, sy-vline,
WA_BIW_ISUWA_WDO_ITEM-COUNT_CONF, sy-vline,
WA_BIW_ISUWA_WDO_ITEM-SERVLOC, sy-vline.
ENDLOOP. *Add any further fields from structure WA_BIW_ISUWA_WDO_ITEM 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_BIW_ISUWA_WDO_ITEM 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_BIW_ISUWA_WDO_ITEM INTO WA_BIW_ISUWA_WDO_ITEM. *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 ORDERNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_BIW_ISUWA_WDO_ITEM-ORDERNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_ISUWA_WDO_ITEM-ORDERNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit TPLNR, internal->external for field SERVLOC CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT' EXPORTING input = WA_BIW_ISUWA_WDO_ITEM-SERVLOC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_ISUWA_WDO_ITEM-SERVLOC.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit GERNR, internal->external for field SERNR CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT' EXPORTING input = WA_BIW_ISUWA_WDO_ITEM-SERNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_ISUWA_WDO_ITEM-SERNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field STREETCODE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_BIW_ISUWA_WDO_ITEM-STREETCODE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_ISUWA_WDO_ITEM-STREETCODE.
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_BIW_ISUWA_WDO_ITEM_STR,
MANDT TYPE STRING,
ORDERNR TYPE STRING,
ORDER_LAUFNR TYPE STRING,
ROUTE TYPE STRING,
ORDER_DATE TYPE STRING,
SERVICE_TYPE TYPE STRING,
UPDMOD TYPE STRING,
COUNT_ITEM TYPE STRING,
COUNT_NEG TYPE STRING,
COUNT_CONF TYPE STRING,
SERVLOC TYPE STRING,
KUNNR TYPE STRING,
KUNWE TYPE STRING,
BEH_TYPE TYPE STRING,
SERNR TYPE STRING,
SDCONTRACT TYPE STRING,
SDCONTRPOS TYPE STRING,
SDREQUEST TYPE STRING,
CONT_COUNT TYPE STRING,
EPROP TYPE STRING,
ROB TYPE STRING,
MBLNR TYPE STRING,
MBLNR_GG TYPE STRING,
BELNR TYPE STRING,
GGVERTRAG TYPE STRING,
KUNNR_BPID TYPE STRING,
TRANS_BPID TYPE STRING,
DISPO_BPID TYPE STRING,
APPNO TYPE STRING,
WASTE_CODE TYPE STRING,
WAKEYCATLG TYPE STRING,
MNINO_UNS TYPE STRING,
MNINO_BGS TYPE STRING,
TRANSPORTER TYPE STRING,
DISPOSER TYPE STRING,
WEIGHT_UNIT_ITEM TYPE STRING,
WASTE_WEIGHTITEM TYPE STRING,
WASTE_ITEM TYPE STRING,
VOL_UNIT_ITEM TYPE STRING,
WASTE_VOL_ITEM TYPE STRING,
CONT_SERV_DURAT TYPE STRING,
C_SERV_DURA_UNIT TYPE STRING,
REMENG TYPE STRING,
CONFTYPE1 TYPE STRING,
CONFTYPE2 TYPE STRING,
CONFTYPE3 TYPE STRING,
REF_WCNT TYPE STRING,
REF_ORDERNR TYPE STRING,
ABRMENGE TYPE STRING,
ADDRNR TYPE STRING,
COUNTRY TYPE STRING,
CITY_CODE TYPE STRING,
CITYP_CODE TYPE STRING,
REGIOGROUP TYPE STRING,
STREETCODE TYPE STRING,
STATUS TYPE STRING,
POBJNR TYPE STRING,END OF T_EKKO_STR. DATA: WA_BIW_ISUWA_WDO_ITEM_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_BIW_ISUWA_WDO_ITEM_STR-MANDT sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ORDERNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ORDER_LAUFNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ROUTE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ORDER_DATE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-SERVICE_TYPE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-UPDMOD sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-COUNT_ITEM sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-COUNT_NEG sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-COUNT_CONF sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-SERVLOC sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-KUNNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-KUNWE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-BEH_TYPE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-SERNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-SDCONTRACT sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-SDCONTRPOS sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-SDREQUEST sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CONT_COUNT sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-EPROP sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ROB sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-MBLNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-MBLNR_GG sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-BELNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-GGVERTRAG sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-KUNNR_BPID sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-TRANS_BPID sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-DISPO_BPID sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-APPNO sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-WASTE_CODE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-WAKEYCATLG sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-MNINO_UNS sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-MNINO_BGS sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-TRANSPORTER sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-DISPOSER sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-WEIGHT_UNIT_ITEM sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-WASTE_WEIGHTITEM sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-WASTE_ITEM sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-VOL_UNIT_ITEM sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-WASTE_VOL_ITEM sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CONT_SERV_DURAT sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-C_SERV_DURA_UNIT sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-REMENG sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CONFTYPE1 sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CONFTYPE2 sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CONFTYPE3 sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-REF_WCNT sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-REF_ORDERNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ABRMENGE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-ADDRNR sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-COUNTRY sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CITY_CODE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-CITYP_CODE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-REGIOGROUP sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-STREETCODE sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-STATUS sy-vline
WA_BIW_ISUWA_WDO_ITEM_STR-POBJNR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.