ABAP Select data from SAP table BBP_PDHSS 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 BBP_PDHSS 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 BBP_PDHSS. 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 BBP_PDHSS 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_BBP_PDHSS TYPE STANDARD TABLE OF BBP_PDHSS,
      WA_BBP_PDHSS TYPE BBP_PDHSS,
      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: <BBP_PDHSS> TYPE BBP_PDHSS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM BBP_PDHSS
*  INTO TABLE @DATA(IT_BBP_PDHSS2).
*--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_BBP_PDHSS INDEX 1 INTO DATA(WA_BBP_PDHSS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<BBP_PDHSS>-CLIENT = 1.
<BBP_PDHSS>-GUID = 1.
<BBP_PDHSS>-DUMMY_EEW_PDHSS = 1.
<BBP_PDHSS>-PS_HIER_TEMPL = 1.
<BBP_PDHSS>-PS_NUMVRS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BBP_PDHSS-/LOCSRM/SGUID_BR, sy-vline,
  WA_BBP_PDHSS-PS_COMPLEX_IND, sy-vline,
  WA_BBP_PDHSS-APCGK, sy-vline,
  WA_BBP_PDHSS-APCGK_EXTEND, sy-vline,
  WA_BBP_PDHSS-BAS_DATE, sy-vline,
  WA_BBP_PDHSS-ADATTYP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_BBP_PDHSS 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_BBP_PDHSS 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_BBP_PDHSS INTO WA_BBP_PDHSS.


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

*Conversion exit GJAHR, internal->external for field PS_FISCAL_YEAR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_BBP_PDHSS-PS_FISCAL_YEAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BBP_PDHSS-PS_FISCAL_YEAR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field PS_SC_ID
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_BBP_PDHSS-PS_SC_ID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BBP_PDHSS-PS_SC_ID.
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_BBP_PDHSS_STR, 
CLIENT TYPE STRING,
GUID TYPE STRING,
DUMMY_EEW_PDHSS TYPE STRING,
PS_HIER_TEMPL TYPE STRING,
PS_NUMVRS TYPE STRING,
/LOCSRM/SGUID_BR TYPE STRING,
PS_COMPLEX_IND TYPE STRING,
APCGK TYPE STRING,
APCGK_EXTEND TYPE STRING,
BAS_DATE TYPE STRING,
ADATTYP TYPE STRING,
START_DAT TYPE STRING,
DEV TYPE STRING,
INDANX TYPE STRING,
LIMIT_DAT TYPE STRING,
NUMERATOR TYPE STRING,
/LOCSRM/CIG_NUM TYPE STRING,
/LOCSRM/CUP_NUM TYPE STRING,
AWARD_TYPE TYPE STRING,
CONTRACT_TYPE TYPE STRING,
PROCESS_NUM_BR TYPE STRING,
FLAG_PPS_BR TYPE STRING,
PROCESS_NUM TYPE STRING,
FLAG_BR TYPE STRING,
/LOCSRM/LAW123 TYPE STRING,
/LOCSRM/RANTIME TYPE STRING,
PS_PGS_ID TYPE STRING,
PS_CANCEL_IND TYPE STRING,
PS_CLOSEOUT TYPE STRING,
PS_DOCB_ID TYPE STRING,
PS_IN_DOCB_PROC TYPE STRING,
PS_SEND_TO_DB TYPE STRING,
PS_DB_SXMSGUID TYPE STRING,
PS_DP_TYPE TYPE STRING,
PS_DP_AMOUNT TYPE STRING,
PS_DP_PERCENT TYPE STRING,
PS_DP_DUE_DATE TYPE STRING,
PS_COMPANY_CODE TYPE STRING,
PS_POSTING_DATE TYPE STRING,
PS_ORDER_DATE TYPE STRING,
PS_FISCAL_YEAR TYPE STRING,
PS_POST_PERIOD TYPE STRING,
PS_DOC_DATE_BL TYPE STRING,
PS_FPDS_STATUS TYPE STRING,
PS_REQUEST_DATE TYPE STRING,
PS_GUAR_MIN_QUOT TYPE STRING,
PS_GUAR_MIN_BID TYPE STRING,
PS_GM_LEVEL TYPE STRING,
PS_GM_NO_EMF TYPE STRING,
PS_GM_CLOSED TYPE STRING,
PS_IDC_DOC TYPE STRING,
PS_INFU_ACTIVE TYPE STRING,
PS_MAX_VALUE_H TYPE STRING,
PS_CORRES_NOV_PO TYPE STRING,
PS_MCNGUID TYPE STRING,
OPT_CPLX_DOC TYPE STRING,
PS_ULTIM_VALUE TYPE STRING,
PS_CURR_VALUE TYPE STRING,
PS_EST_VAL TYPE STRING,
PS_SC_ID TYPE STRING,
PS_PARK_IND TYPE STRING,
PS_PA_ID_HDR TYPE STRING,
PS_PA_CLNG_HDR TYPE STRING,
PS_PA_CLNG_IND TYPE STRING,
PS_INDICATOR TYPE STRING,
PS_REASON_CODE TYPE STRING,
PS_SELPROM_BLOCK TYPE STRING,
PS_SELPROM_REL TYPE STRING,
PS_LONGNUM TYPE STRING,
PS_NUMTYPE TYPE STRING,
PS_EXTERNAL TYPE STRING,
PS_CHANGE_SERIAL TYPE STRING,
PS_SET_LPN_FINAL TYPE STRING,
PS_CLASSCODE TYPE STRING,
PS_NAICS TYPE STRING,
PS_SYNOPSISID TYPE STRING,
PS_SETASIDE TYPE STRING,
PS_EU_DOCB_ID TYPE STRING,
PS_EU_DOCB_GUID TYPE STRING,
PS_EU_DOCB_VER TYPE STRING,
PS_TNDR_REQ TYPE STRING,
PS_TNDR_AMNT TYPE STRING,
PS_TNDR_CL_DT TYPE STRING,
PS_PQQ_REQ TYPE STRING,
PS_PQQ_CL_DT TYPE STRING,
PS_PQQ_AUTO TYPE STRING,
PS_PQQ_THRSHLD TYPE STRING,
PS_PQQ TYPE STRING,
PS_PQQ_SETGUID TYPE STRING,
PS_BDR_STS_GUID TYPE STRING,
PS_EMD_REQ TYPE STRING,
PS_EMD_AMNT TYPE STRING,
PS_EMD_CL_DT TYPE STRING,
PS_TNDR_COLB_ID TYPE STRING,
PS_TNDR_AREA_ID TYPE STRING,
PS_TECH_OPND TYPE STRING,
PS_PRICE_OPND TYPE STRING,
PS_PERM_GUID TYPE STRING,
PS_TECH_OPEN_DT TYPE STRING,
PS_TNDR_CL_TM TYPE STRING,
PS_PQQ_CL_TM TYPE STRING,
PS_EMD_CL_TM TYPE STRING,
PS_TECH_OPEN_TM TYPE STRING,
PS_TECH_QTE_STA TYPE STRING,
PS_FLDR_SET_GUID TYPE STRING,
PS_TH_EXCEEDED TYPE STRING,
PS_CHANGE_TYPE TYPE STRING,
PS_US01 TYPE STRING,
PS_US02 TYPE STRING,
PS_US03 TYPE STRING,
PS_US04 TYPE STRING,
PS_US05 TYPE STRING,
PS_US06 TYPE STRING,
PS_US07 TYPE STRING,
PS_US08 TYPE STRING,
PS_US09 TYPE STRING,
PS_US10 TYPE STRING,
PS_US01_DATE TYPE STRING,
PS_US02_DATE TYPE STRING,
PS_US03_DATE TYPE STRING,
PS_US04_DATE TYPE STRING,
PS_US05_DATE TYPE STRING,
PS_US06_DATE TYPE STRING,
PS_US07_DATE TYPE STRING,
PS_US08_DATE TYPE STRING,
PS_US09_DATE TYPE STRING,
PS_US10_DATE TYPE STRING,
PS_WH_PRCNT_HDR TYPE STRING,
PS_WH_IND TYPE STRING,
DOC_TYPE_EXI TYPE STRING,
PAY_METH_EXI TYPE STRING,
PAY_BLOCK_EXI TYPE STRING,
CPD_VENDOR_EXI TYPE STRING,
POBK_CURAC_EXI TYPE STRING,
BANK_ACCT_EXI TYPE STRING,
BANK_NO_EXI TYPE STRING,
BANK_CTRY_EXI TYPE STRING,
CTRL_KEY_EXI TYPE STRING,
LAM_SOL_KEY TYPE STRING,
LAM_HDR_GAID TYPE STRING,
LAM_HDR_TEXT TYPE STRING,
ICC_LZBKZ_DE TYPE STRING,
ICC_LZBKZ_NL TYPE STRING,
ICC_BR_TAXAMT TYPE STRING,
BBP_ICC_EXC_NUM TYPE STRING,
BBP_ICC_EXC_DATE TYPE STRING,
BBP_ICC_EXC_TXT TYPE STRING,
BBP_ICC_EXC_PARK TYPE STRING,
VZSKZ TYPE STRING,END OF T_EKKO_STR.
DATA: WA_BBP_PDHSS_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_BBP_PDHSS_STR-CLIENT sy-vline 
WA_BBP_PDHSS_STR-GUID sy-vline 
WA_BBP_PDHSS_STR-DUMMY_EEW_PDHSS sy-vline 
WA_BBP_PDHSS_STR-PS_HIER_TEMPL sy-vline 
WA_BBP_PDHSS_STR-PS_NUMVRS sy-vline 
WA_BBP_PDHSS_STR-/LOCSRM/SGUID_BR sy-vline 
WA_BBP_PDHSS_STR-PS_COMPLEX_IND sy-vline 
WA_BBP_PDHSS_STR-APCGK sy-vline 
WA_BBP_PDHSS_STR-APCGK_EXTEND sy-vline 
WA_BBP_PDHSS_STR-BAS_DATE sy-vline 
WA_BBP_PDHSS_STR-ADATTYP sy-vline 
WA_BBP_PDHSS_STR-START_DAT sy-vline 
WA_BBP_PDHSS_STR-DEV sy-vline 
WA_BBP_PDHSS_STR-INDANX sy-vline 
WA_BBP_PDHSS_STR-LIMIT_DAT sy-vline 
WA_BBP_PDHSS_STR-NUMERATOR sy-vline 
WA_BBP_PDHSS_STR-/LOCSRM/CIG_NUM sy-vline 
WA_BBP_PDHSS_STR-/LOCSRM/CUP_NUM sy-vline 
WA_BBP_PDHSS_STR-AWARD_TYPE sy-vline 
WA_BBP_PDHSS_STR-CONTRACT_TYPE sy-vline 
WA_BBP_PDHSS_STR-PROCESS_NUM_BR sy-vline 
WA_BBP_PDHSS_STR-FLAG_PPS_BR sy-vline 
WA_BBP_PDHSS_STR-PROCESS_NUM sy-vline 
WA_BBP_PDHSS_STR-FLAG_BR sy-vline 
WA_BBP_PDHSS_STR-/LOCSRM/LAW123 sy-vline 
WA_BBP_PDHSS_STR-/LOCSRM/RANTIME sy-vline 
WA_BBP_PDHSS_STR-PS_PGS_ID sy-vline 
WA_BBP_PDHSS_STR-PS_CANCEL_IND sy-vline 
WA_BBP_PDHSS_STR-PS_CLOSEOUT sy-vline 
WA_BBP_PDHSS_STR-PS_DOCB_ID sy-vline 
WA_BBP_PDHSS_STR-PS_IN_DOCB_PROC sy-vline 
WA_BBP_PDHSS_STR-PS_SEND_TO_DB sy-vline 
WA_BBP_PDHSS_STR-PS_DB_SXMSGUID sy-vline 
WA_BBP_PDHSS_STR-PS_DP_TYPE sy-vline 
WA_BBP_PDHSS_STR-PS_DP_AMOUNT sy-vline 
WA_BBP_PDHSS_STR-PS_DP_PERCENT sy-vline 
WA_BBP_PDHSS_STR-PS_DP_DUE_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_COMPANY_CODE sy-vline 
WA_BBP_PDHSS_STR-PS_POSTING_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_ORDER_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_FISCAL_YEAR sy-vline 
WA_BBP_PDHSS_STR-PS_POST_PERIOD sy-vline 
WA_BBP_PDHSS_STR-PS_DOC_DATE_BL sy-vline 
WA_BBP_PDHSS_STR-PS_FPDS_STATUS sy-vline 
WA_BBP_PDHSS_STR-PS_REQUEST_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_GUAR_MIN_QUOT sy-vline 
WA_BBP_PDHSS_STR-PS_GUAR_MIN_BID sy-vline 
WA_BBP_PDHSS_STR-PS_GM_LEVEL sy-vline 
WA_BBP_PDHSS_STR-PS_GM_NO_EMF sy-vline 
WA_BBP_PDHSS_STR-PS_GM_CLOSED sy-vline 
WA_BBP_PDHSS_STR-PS_IDC_DOC sy-vline 
WA_BBP_PDHSS_STR-PS_INFU_ACTIVE sy-vline 
WA_BBP_PDHSS_STR-PS_MAX_VALUE_H sy-vline 
WA_BBP_PDHSS_STR-PS_CORRES_NOV_PO sy-vline 
WA_BBP_PDHSS_STR-PS_MCNGUID sy-vline 
WA_BBP_PDHSS_STR-OPT_CPLX_DOC sy-vline 
WA_BBP_PDHSS_STR-PS_ULTIM_VALUE sy-vline 
WA_BBP_PDHSS_STR-PS_CURR_VALUE sy-vline 
WA_BBP_PDHSS_STR-PS_EST_VAL sy-vline 
WA_BBP_PDHSS_STR-PS_SC_ID sy-vline 
WA_BBP_PDHSS_STR-PS_PARK_IND sy-vline 
WA_BBP_PDHSS_STR-PS_PA_ID_HDR sy-vline 
WA_BBP_PDHSS_STR-PS_PA_CLNG_HDR sy-vline 
WA_BBP_PDHSS_STR-PS_PA_CLNG_IND sy-vline 
WA_BBP_PDHSS_STR-PS_INDICATOR sy-vline 
WA_BBP_PDHSS_STR-PS_REASON_CODE sy-vline 
WA_BBP_PDHSS_STR-PS_SELPROM_BLOCK sy-vline 
WA_BBP_PDHSS_STR-PS_SELPROM_REL sy-vline 
WA_BBP_PDHSS_STR-PS_LONGNUM sy-vline 
WA_BBP_PDHSS_STR-PS_NUMTYPE sy-vline 
WA_BBP_PDHSS_STR-PS_EXTERNAL sy-vline 
WA_BBP_PDHSS_STR-PS_CHANGE_SERIAL sy-vline 
WA_BBP_PDHSS_STR-PS_SET_LPN_FINAL sy-vline 
WA_BBP_PDHSS_STR-PS_CLASSCODE sy-vline 
WA_BBP_PDHSS_STR-PS_NAICS sy-vline 
WA_BBP_PDHSS_STR-PS_SYNOPSISID sy-vline 
WA_BBP_PDHSS_STR-PS_SETASIDE sy-vline 
WA_BBP_PDHSS_STR-PS_EU_DOCB_ID sy-vline 
WA_BBP_PDHSS_STR-PS_EU_DOCB_GUID sy-vline 
WA_BBP_PDHSS_STR-PS_EU_DOCB_VER sy-vline 
WA_BBP_PDHSS_STR-PS_TNDR_REQ sy-vline 
WA_BBP_PDHSS_STR-PS_TNDR_AMNT sy-vline 
WA_BBP_PDHSS_STR-PS_TNDR_CL_DT sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ_REQ sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ_CL_DT sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ_AUTO sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ_THRSHLD sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ_SETGUID sy-vline 
WA_BBP_PDHSS_STR-PS_BDR_STS_GUID sy-vline 
WA_BBP_PDHSS_STR-PS_EMD_REQ sy-vline 
WA_BBP_PDHSS_STR-PS_EMD_AMNT sy-vline 
WA_BBP_PDHSS_STR-PS_EMD_CL_DT sy-vline 
WA_BBP_PDHSS_STR-PS_TNDR_COLB_ID sy-vline 
WA_BBP_PDHSS_STR-PS_TNDR_AREA_ID sy-vline 
WA_BBP_PDHSS_STR-PS_TECH_OPND sy-vline 
WA_BBP_PDHSS_STR-PS_PRICE_OPND sy-vline 
WA_BBP_PDHSS_STR-PS_PERM_GUID sy-vline 
WA_BBP_PDHSS_STR-PS_TECH_OPEN_DT sy-vline 
WA_BBP_PDHSS_STR-PS_TNDR_CL_TM sy-vline 
WA_BBP_PDHSS_STR-PS_PQQ_CL_TM sy-vline 
WA_BBP_PDHSS_STR-PS_EMD_CL_TM sy-vline 
WA_BBP_PDHSS_STR-PS_TECH_OPEN_TM sy-vline 
WA_BBP_PDHSS_STR-PS_TECH_QTE_STA sy-vline 
WA_BBP_PDHSS_STR-PS_FLDR_SET_GUID sy-vline 
WA_BBP_PDHSS_STR-PS_TH_EXCEEDED sy-vline 
WA_BBP_PDHSS_STR-PS_CHANGE_TYPE sy-vline 
WA_BBP_PDHSS_STR-PS_US01 sy-vline 
WA_BBP_PDHSS_STR-PS_US02 sy-vline 
WA_BBP_PDHSS_STR-PS_US03 sy-vline 
WA_BBP_PDHSS_STR-PS_US04 sy-vline 
WA_BBP_PDHSS_STR-PS_US05 sy-vline 
WA_BBP_PDHSS_STR-PS_US06 sy-vline 
WA_BBP_PDHSS_STR-PS_US07 sy-vline 
WA_BBP_PDHSS_STR-PS_US08 sy-vline 
WA_BBP_PDHSS_STR-PS_US09 sy-vline 
WA_BBP_PDHSS_STR-PS_US10 sy-vline 
WA_BBP_PDHSS_STR-PS_US01_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US02_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US03_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US04_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US05_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US06_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US07_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US08_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US09_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_US10_DATE sy-vline 
WA_BBP_PDHSS_STR-PS_WH_PRCNT_HDR sy-vline 
WA_BBP_PDHSS_STR-PS_WH_IND sy-vline 
WA_BBP_PDHSS_STR-DOC_TYPE_EXI sy-vline 
WA_BBP_PDHSS_STR-PAY_METH_EXI sy-vline 
WA_BBP_PDHSS_STR-PAY_BLOCK_EXI sy-vline 
WA_BBP_PDHSS_STR-CPD_VENDOR_EXI sy-vline 
WA_BBP_PDHSS_STR-POBK_CURAC_EXI sy-vline 
WA_BBP_PDHSS_STR-BANK_ACCT_EXI sy-vline 
WA_BBP_PDHSS_STR-BANK_NO_EXI sy-vline 
WA_BBP_PDHSS_STR-BANK_CTRY_EXI sy-vline 
WA_BBP_PDHSS_STR-CTRL_KEY_EXI sy-vline 
WA_BBP_PDHSS_STR-LAM_SOL_KEY sy-vline 
WA_BBP_PDHSS_STR-LAM_HDR_GAID sy-vline 
WA_BBP_PDHSS_STR-LAM_HDR_TEXT sy-vline 
WA_BBP_PDHSS_STR-ICC_LZBKZ_DE sy-vline 
WA_BBP_PDHSS_STR-ICC_LZBKZ_NL sy-vline 
WA_BBP_PDHSS_STR-ICC_BR_TAXAMT sy-vline 
WA_BBP_PDHSS_STR-BBP_ICC_EXC_NUM sy-vline 
WA_BBP_PDHSS_STR-BBP_ICC_EXC_DATE sy-vline 
WA_BBP_PDHSS_STR-BBP_ICC_EXC_TXT sy-vline 
WA_BBP_PDHSS_STR-BBP_ICC_EXC_PARK sy-vline 
WA_BBP_PDHSS_STR-VZSKZ sy-vline      INTO ld_text SEPARATED BY SPACE.

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