ABAP Select data from SAP table BPDY 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 BPDY 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 BPDY. 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 BPDY 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_BPDY TYPE STANDARD TABLE OF BPDY,
      WA_BPDY TYPE BPDY,
      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: <BPDY> TYPE BPDY.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM BPDY
*  INTO TABLE @DATA(IT_BPDY2).
*--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_BPDY INDEX 1 INTO DATA(WA_BPDY2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<BPDY>-LIST = 1.
<BPDY>-ELEMENT = 1.
<BPDY>-TITLE = 1.
<BPDY>-YEAR1 = 1.
<BPDY>-YEAR2 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BPDY-TWAER, sy-vline,
  WA_BPDY-ROW1, sy-vline,
  WA_BPDY-WAER1, sy-vline,
  WA_BPDY-ROW2, sy-vline,
  WA_BPDY-WAER2, sy-vline,
  WA_BPDY-GJAHR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_BPDY 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_BPDY 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_BPDY INTO WA_BPDY.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit FMCIL, internal->external for field FIPEX
CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT'
  EXPORTING
    input =                      WA_BPDY-FIPEX
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BPDY-FIPEX.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field RE_GNJHR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_BPDY-RE_GNJHR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BPDY-RE_GNJHR.
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_BPDY_STR, 
LIST TYPE STRING,
ELEMENT TYPE STRING,
TITLE TYPE STRING,
YEAR1 TYPE STRING,
YEAR2 TYPE STRING,
TWAER TYPE STRING,
ROW1 TYPE STRING,
WAER1 TYPE STRING,
ROW2 TYPE STRING,
WAER2 TYPE STRING,
GJAHR TYPE STRING,
JAHR TYPE STRING,
PERIODE TYPE STRING,
PERIO TYPE STRING,
HERKZ TYPE STRING,
HERKL TYPE STRING,
WERT1 TYPE STRING,
WERT2 TYPE STRING,
SUWERT1 TYPE STRING,
SUWERT2 TYPE STRING,
GWERT1 TYPE STRING,
GWERT2 TYPE STRING,
PERI1 TYPE STRING,
PERI2 TYPE STRING,
DECIMAL TYPE STRING,
SCALE TYPE STRING,
SCALE1 TYPE STRING,
SPREDT TYPE STRING,
SPREDL TYPE STRING,
SPRED TYPE STRING,
SPRED1 TYPE STRING,
SPRED2 TYPE STRING,
SUBVO TYPE STRING,
VERSN TYPE STRING,
VGROUP1 TYPE STRING,
TXT TYPE STRING,
UPDATE TYPE STRING,
PROTOKOLL TYPE STRING,
BUDAT TYPE STRING,
BUPER TYPE STRING,
BLDAT TYPE STRING,
SGTXT TYPE STRING,
U_SJAHR TYPE STRING,
U_EJAHR TYPE STRING,
JAHR_VON TYPE STRING,
JAHR_BIS TYPE STRING,
U_SGES TYPE STRING,
U_EGES TYPE STRING,
TDNAME TYPE STRING,
WGES TYPE STRING,
SVTB TYPE STRING,
CALC TYPE STRING,
VALUE TYPE STRING,
PPROFIL TYPE STRING,
BPROFIL TYPE STRING,
VERANT TYPE STRING,
RPUBLAW TYPE STRING,
RLEGIS TYPE STRING,
RCOHORT TYPE STRING,
DOCTYPE TYPE STRING,
AWORG TYPE STRING,
AWREF TYPE STRING,
AWSYS TYPE STRING,
AWTYP TYPE STRING,
TI_JAHR TYPE STRING,
TI_GES TYPE STRING,
TI_JAHR_1 TYPE STRING,
TI_GES_1 TYPE STRING,
U_S_GEBER TYPE STRING,
U_E_GEBER TYPE STRING,
U_S_PERIO TYPE STRING,
U_E_PERIO TYPE STRING,
V_VERS_V TYPE STRING,
V_VERS_Z TYPE STRING,
V_TEXT_V TYPE STRING,
V_TEXT_Z TYPE STRING,
V_PROTO TYPE STRING,
V_BATCH TYPE STRING,
V_UPD TYPE STRING,
V_GESAMT TYPE STRING,
V_JAHRWERT TYPE STRING,
V_VJAHR TYPE STRING,
V_ZJAHR TYPE STRING,
V_GEBER TYPE STRING,
V_N_GEBER TYPE STRING,
V_ACTIV_PO TYPE STRING,
V_ACTIV_SE TYPE STRING,
V_NO_CHANG TYPE STRING,
V_ADD TYPE STRING,
V_COLL TYPE STRING,
V_ORIG TYPE STRING,
V_NTRAG TYPE STRING,
V_RUECKGA TYPE STRING,
V_UMBUCH TYPE STRING,
V_AKTU TYPE STRING,
V_FREIG TYPE STRING,
V_ALL_PLAN TYPE STRING,
V_COST TYPE STRING,
V_ERLOESE TYPE STRING,
V_PSP TYPE STRING,
V_EINZKALK TYPE STRING,
V_YEAR_1 TYPE STRING,
V_YEAR_1V TYPE STRING,
V_YEAR_1Z TYPE STRING,
V_YEAR_X TYPE STRING,
V_YEAR_XS TYPE STRING,
V_YEAR_XE TYPE STRING,
BELNR TYPE STRING,
VADAT TYPE STRING,
WERT3 TYPE STRING,
VORGA TYPE STRING,
VORGA_KT TYPE STRING,
BSTAT_T TYPE STRING,
RSTAT_T TYPE STRING,
REV_DOCNR TYPE STRING,
REV_DOCNR_TXT TYPE STRING,
FITXT TYPE STRING,
COPY_ADD TYPE STRING,
COPY_REPL TYPE STRING,
COPY_PERC TYPE STRING,
BLPOS TYPE STRING,
POSI TYPE STRING,
SH_CTR TYPE STRING,
SH_POS TYPE STRING,
SH_TOP TYPE STRING,
SH_NTOP TYPE STRING,
CP_M1 TYPE STRING,
CP_M2 TYPE STRING,
CP_M3 TYPE STRING,
SH_LEVEL TYPE STRING,
SHIFT TYPE STRING,
TOTALUP TYPE STRING,
MARK TYPE STRING,
UNTRG TYPE STRING,
STUFE TYPE STRING,
BSPID TYPE STRING,
BSPID2 TYPE STRING,
ACCAR TYPE STRING,
BPCAR TYPE STRING,
CARR_YR_S TYPE STRING,
CARR_YR_E TYPE STRING,
CARR_GES TYPE STRING,
CARR_YR_ID TYPE STRING,
CARR_Y_STA TYPE STRING,
TESTMODE TYPE STRING,
CARR_DF_BP TYPE STRING,
CARR_DF_AC TYPE STRING,
XSENDER TYPE STRING,
XEMPFGR TYPE STRING,
REFDOC TYPE STRING,
WERT4 TYPE STRING,
HEADER1 TYPE STRING,
HEADER2 TYPE STRING,
VALKEY TYPE STRING,
WERT11 TYPE STRING,
WERT12 TYPE STRING,
WERT13 TYPE STRING,
WERT14 TYPE STRING,
CTRLSUM1 TYPE STRING,
CTRLSUM2 TYPE STRING,
XPB TYPE STRING,
XCB TYPE STRING,
XPBO TYPE STRING,
XCBO TYPE STRING,
VORGA_BEZ TYPE STRING,
WRTTP_BEZ TYPE STRING,
SUBVO_BEZ TYPE STRING,
USNAM TYPE STRING,
CPUDT TYPE STRING,
DOCNR TYPE STRING,
COPY_PREL TYPE STRING,
CARR_SINGL TYPE STRING,
CARR_GROUP TYPE STRING,
GNJHR TYPE STRING,
INFO50 TYPE STRING,
INFO20 TYPE STRING,
PROC_TOTAL TYPE STRING,
TOT_UP_NEW TYPE STRING,
BP_CAT_PB TYPE STRING,
BP_CAT_CB TYPE STRING,
BP_BTP_DIT TYPE STRING,
BP_BTP_ORG TYPE STRING,
BP_BTP_DAB TYPE STRING,
BP_BTP_ASS TYPE STRING,
BP_BTP_ACT TYPE STRING,
BP_CAT_HEA TYPE STRING,
BP_BTP_HEA TYPE STRING,
CP_BGT TYPE STRING,
CP_ACT TYPE STRING,
CP_SEL TYPE STRING,
CP_ORG TYPE STRING,
CP_UMB TYPE STRING,
CP_NAC TYPE STRING,
CP_RUE TYPE STRING,
EINZEL TYPE STRING,
BGT_COLLECT TYPE STRING,
BP_CAT_FIP TYPE STRING,
DEL_TOTAL TYPE STRING,
ROW3 TYPE STRING,
AUTORELEASE TYPE STRING,
FAREA TYPE STRING,
FAREA_TXT TYPE STRING,
FINCODE_TXT TYPE STRING,
FMREASN_TXT TYPE STRING,
FMREASON TYPE STRING,
FIPEX TYPE STRING,
FICTR TYPE STRING,
GNJHR1 TYPE STRING,
GNJHR2 TYPE STRING,
GNJHR3 TYPE STRING,
GNJHR4 TYPE STRING,
GNJHR5 TYPE STRING,
GNJHR6 TYPE STRING,
GNJHR7 TYPE STRING,
GNJHR8 TYPE STRING,
GNJHR9 TYPE STRING,
GNJHR10 TYPE STRING,
T_GNJHR1 TYPE STRING,
T_GNJHR2 TYPE STRING,
T_GNJHR3 TYPE STRING,
T_GNJHR4 TYPE STRING,
T_GNJHR5 TYPE STRING,
T_GNJHR6 TYPE STRING,
T_GNJHR7 TYPE STRING,
T_GNJHR8 TYPE STRING,
T_GNJHR9 TYPE STRING,
T_GNJHR10 TYPE STRING,
RE_GNJHR TYPE STRING,END OF T_EKKO_STR.
DATA: WA_BPDY_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_BPDY_STR-LIST sy-vline 
WA_BPDY_STR-ELEMENT sy-vline 
WA_BPDY_STR-TITLE sy-vline 
WA_BPDY_STR-YEAR1 sy-vline 
WA_BPDY_STR-YEAR2 sy-vline 
WA_BPDY_STR-TWAER sy-vline 
WA_BPDY_STR-ROW1 sy-vline 
WA_BPDY_STR-WAER1 sy-vline 
WA_BPDY_STR-ROW2 sy-vline 
WA_BPDY_STR-WAER2 sy-vline 
WA_BPDY_STR-GJAHR sy-vline 
WA_BPDY_STR-JAHR sy-vline 
WA_BPDY_STR-PERIODE sy-vline 
WA_BPDY_STR-PERIO sy-vline 
WA_BPDY_STR-HERKZ sy-vline 
WA_BPDY_STR-HERKL sy-vline 
WA_BPDY_STR-WERT1 sy-vline 
WA_BPDY_STR-WERT2 sy-vline 
WA_BPDY_STR-SUWERT1 sy-vline 
WA_BPDY_STR-SUWERT2 sy-vline 
WA_BPDY_STR-GWERT1 sy-vline 
WA_BPDY_STR-GWERT2 sy-vline 
WA_BPDY_STR-PERI1 sy-vline 
WA_BPDY_STR-PERI2 sy-vline 
WA_BPDY_STR-DECIMAL sy-vline 
WA_BPDY_STR-SCALE sy-vline 
WA_BPDY_STR-SCALE1 sy-vline 
WA_BPDY_STR-SPREDT sy-vline 
WA_BPDY_STR-SPREDL sy-vline 
WA_BPDY_STR-SPRED sy-vline 
WA_BPDY_STR-SPRED1 sy-vline 
WA_BPDY_STR-SPRED2 sy-vline 
WA_BPDY_STR-SUBVO sy-vline 
WA_BPDY_STR-VERSN sy-vline 
WA_BPDY_STR-VGROUP1 sy-vline 
WA_BPDY_STR-TXT sy-vline 
WA_BPDY_STR-UPDATE sy-vline 
WA_BPDY_STR-PROTOKOLL sy-vline 
WA_BPDY_STR-BUDAT sy-vline 
WA_BPDY_STR-BUPER sy-vline 
WA_BPDY_STR-BLDAT sy-vline 
WA_BPDY_STR-SGTXT sy-vline 
WA_BPDY_STR-U_SJAHR sy-vline 
WA_BPDY_STR-U_EJAHR sy-vline 
WA_BPDY_STR-JAHR_VON sy-vline 
WA_BPDY_STR-JAHR_BIS sy-vline 
WA_BPDY_STR-U_SGES sy-vline 
WA_BPDY_STR-U_EGES sy-vline 
WA_BPDY_STR-TDNAME sy-vline 
WA_BPDY_STR-WGES sy-vline 
WA_BPDY_STR-SVTB sy-vline 
WA_BPDY_STR-CALC sy-vline 
WA_BPDY_STR-VALUE sy-vline 
WA_BPDY_STR-PPROFIL sy-vline 
WA_BPDY_STR-BPROFIL sy-vline 
WA_BPDY_STR-VERANT sy-vline 
WA_BPDY_STR-RPUBLAW sy-vline 
WA_BPDY_STR-RLEGIS sy-vline 
WA_BPDY_STR-RCOHORT sy-vline 
WA_BPDY_STR-DOCTYPE sy-vline 
WA_BPDY_STR-AWORG sy-vline 
WA_BPDY_STR-AWREF sy-vline 
WA_BPDY_STR-AWSYS sy-vline 
WA_BPDY_STR-AWTYP sy-vline 
WA_BPDY_STR-TI_JAHR sy-vline 
WA_BPDY_STR-TI_GES sy-vline 
WA_BPDY_STR-TI_JAHR_1 sy-vline 
WA_BPDY_STR-TI_GES_1 sy-vline 
WA_BPDY_STR-U_S_GEBER sy-vline 
WA_BPDY_STR-U_E_GEBER sy-vline 
WA_BPDY_STR-U_S_PERIO sy-vline 
WA_BPDY_STR-U_E_PERIO sy-vline 
WA_BPDY_STR-V_VERS_V sy-vline 
WA_BPDY_STR-V_VERS_Z sy-vline 
WA_BPDY_STR-V_TEXT_V sy-vline 
WA_BPDY_STR-V_TEXT_Z sy-vline 
WA_BPDY_STR-V_PROTO sy-vline 
WA_BPDY_STR-V_BATCH sy-vline 
WA_BPDY_STR-V_UPD sy-vline 
WA_BPDY_STR-V_GESAMT sy-vline 
WA_BPDY_STR-V_JAHRWERT sy-vline 
WA_BPDY_STR-V_VJAHR sy-vline 
WA_BPDY_STR-V_ZJAHR sy-vline 
WA_BPDY_STR-V_GEBER sy-vline 
WA_BPDY_STR-V_N_GEBER sy-vline 
WA_BPDY_STR-V_ACTIV_PO sy-vline 
WA_BPDY_STR-V_ACTIV_SE sy-vline 
WA_BPDY_STR-V_NO_CHANG sy-vline 
WA_BPDY_STR-V_ADD sy-vline 
WA_BPDY_STR-V_COLL sy-vline 
WA_BPDY_STR-V_ORIG sy-vline 
WA_BPDY_STR-V_NTRAG sy-vline 
WA_BPDY_STR-V_RUECKGA sy-vline 
WA_BPDY_STR-V_UMBUCH sy-vline 
WA_BPDY_STR-V_AKTU sy-vline 
WA_BPDY_STR-V_FREIG sy-vline 
WA_BPDY_STR-V_ALL_PLAN sy-vline 
WA_BPDY_STR-V_COST sy-vline 
WA_BPDY_STR-V_ERLOESE sy-vline 
WA_BPDY_STR-V_PSP sy-vline 
WA_BPDY_STR-V_EINZKALK sy-vline 
WA_BPDY_STR-V_YEAR_1 sy-vline 
WA_BPDY_STR-V_YEAR_1V sy-vline 
WA_BPDY_STR-V_YEAR_1Z sy-vline 
WA_BPDY_STR-V_YEAR_X sy-vline 
WA_BPDY_STR-V_YEAR_XS sy-vline 
WA_BPDY_STR-V_YEAR_XE sy-vline 
WA_BPDY_STR-BELNR sy-vline 
WA_BPDY_STR-VADAT sy-vline 
WA_BPDY_STR-WERT3 sy-vline 
WA_BPDY_STR-VORGA sy-vline 
WA_BPDY_STR-VORGA_KT sy-vline 
WA_BPDY_STR-BSTAT_T sy-vline 
WA_BPDY_STR-RSTAT_T sy-vline 
WA_BPDY_STR-REV_DOCNR sy-vline 
WA_BPDY_STR-REV_DOCNR_TXT sy-vline 
WA_BPDY_STR-FITXT sy-vline 
WA_BPDY_STR-COPY_ADD sy-vline 
WA_BPDY_STR-COPY_REPL sy-vline 
WA_BPDY_STR-COPY_PERC sy-vline 
WA_BPDY_STR-BLPOS sy-vline 
WA_BPDY_STR-POSI sy-vline 
WA_BPDY_STR-SH_CTR sy-vline 
WA_BPDY_STR-SH_POS sy-vline 
WA_BPDY_STR-SH_TOP sy-vline 
WA_BPDY_STR-SH_NTOP sy-vline 
WA_BPDY_STR-CP_M1 sy-vline 
WA_BPDY_STR-CP_M2 sy-vline 
WA_BPDY_STR-CP_M3 sy-vline 
WA_BPDY_STR-SH_LEVEL sy-vline 
WA_BPDY_STR-SHIFT sy-vline 
WA_BPDY_STR-TOTALUP sy-vline 
WA_BPDY_STR-MARK sy-vline 
WA_BPDY_STR-UNTRG sy-vline 
WA_BPDY_STR-STUFE sy-vline 
WA_BPDY_STR-BSPID sy-vline 
WA_BPDY_STR-BSPID2 sy-vline 
WA_BPDY_STR-ACCAR sy-vline 
WA_BPDY_STR-BPCAR sy-vline 
WA_BPDY_STR-CARR_YR_S sy-vline 
WA_BPDY_STR-CARR_YR_E sy-vline 
WA_BPDY_STR-CARR_GES sy-vline 
WA_BPDY_STR-CARR_YR_ID sy-vline 
WA_BPDY_STR-CARR_Y_STA sy-vline 
WA_BPDY_STR-TESTMODE sy-vline 
WA_BPDY_STR-CARR_DF_BP sy-vline 
WA_BPDY_STR-CARR_DF_AC sy-vline 
WA_BPDY_STR-XSENDER sy-vline 
WA_BPDY_STR-XEMPFGR sy-vline 
WA_BPDY_STR-REFDOC sy-vline 
WA_BPDY_STR-WERT4 sy-vline 
WA_BPDY_STR-HEADER1 sy-vline 
WA_BPDY_STR-HEADER2 sy-vline 
WA_BPDY_STR-VALKEY sy-vline 
WA_BPDY_STR-WERT11 sy-vline 
WA_BPDY_STR-WERT12 sy-vline 
WA_BPDY_STR-WERT13 sy-vline 
WA_BPDY_STR-WERT14 sy-vline 
WA_BPDY_STR-CTRLSUM1 sy-vline 
WA_BPDY_STR-CTRLSUM2 sy-vline 
WA_BPDY_STR-XPB sy-vline 
WA_BPDY_STR-XCB sy-vline 
WA_BPDY_STR-XPBO sy-vline 
WA_BPDY_STR-XCBO sy-vline 
WA_BPDY_STR-VORGA_BEZ sy-vline 
WA_BPDY_STR-WRTTP_BEZ sy-vline 
WA_BPDY_STR-SUBVO_BEZ sy-vline 
WA_BPDY_STR-USNAM sy-vline 
WA_BPDY_STR-CPUDT sy-vline 
WA_BPDY_STR-DOCNR sy-vline 
WA_BPDY_STR-COPY_PREL sy-vline 
WA_BPDY_STR-CARR_SINGL sy-vline 
WA_BPDY_STR-CARR_GROUP sy-vline 
WA_BPDY_STR-GNJHR sy-vline 
WA_BPDY_STR-INFO50 sy-vline 
WA_BPDY_STR-INFO20 sy-vline 
WA_BPDY_STR-PROC_TOTAL sy-vline 
WA_BPDY_STR-TOT_UP_NEW sy-vline 
WA_BPDY_STR-BP_CAT_PB sy-vline 
WA_BPDY_STR-BP_CAT_CB sy-vline 
WA_BPDY_STR-BP_BTP_DIT sy-vline 
WA_BPDY_STR-BP_BTP_ORG sy-vline 
WA_BPDY_STR-BP_BTP_DAB sy-vline 
WA_BPDY_STR-BP_BTP_ASS sy-vline 
WA_BPDY_STR-BP_BTP_ACT sy-vline 
WA_BPDY_STR-BP_CAT_HEA sy-vline 
WA_BPDY_STR-BP_BTP_HEA sy-vline 
WA_BPDY_STR-CP_BGT sy-vline 
WA_BPDY_STR-CP_ACT sy-vline 
WA_BPDY_STR-CP_SEL sy-vline 
WA_BPDY_STR-CP_ORG sy-vline 
WA_BPDY_STR-CP_UMB sy-vline 
WA_BPDY_STR-CP_NAC sy-vline 
WA_BPDY_STR-CP_RUE sy-vline 
WA_BPDY_STR-EINZEL sy-vline 
WA_BPDY_STR-BGT_COLLECT sy-vline 
WA_BPDY_STR-BP_CAT_FIP sy-vline 
WA_BPDY_STR-DEL_TOTAL sy-vline 
WA_BPDY_STR-ROW3 sy-vline 
WA_BPDY_STR-AUTORELEASE sy-vline 
WA_BPDY_STR-FAREA sy-vline 
WA_BPDY_STR-FAREA_TXT sy-vline 
WA_BPDY_STR-FINCODE_TXT sy-vline 
WA_BPDY_STR-FMREASN_TXT sy-vline 
WA_BPDY_STR-FMREASON sy-vline 
WA_BPDY_STR-FIPEX sy-vline 
WA_BPDY_STR-FICTR sy-vline 
WA_BPDY_STR-GNJHR1 sy-vline 
WA_BPDY_STR-GNJHR2 sy-vline 
WA_BPDY_STR-GNJHR3 sy-vline 
WA_BPDY_STR-GNJHR4 sy-vline 
WA_BPDY_STR-GNJHR5 sy-vline 
WA_BPDY_STR-GNJHR6 sy-vline 
WA_BPDY_STR-GNJHR7 sy-vline 
WA_BPDY_STR-GNJHR8 sy-vline 
WA_BPDY_STR-GNJHR9 sy-vline 
WA_BPDY_STR-GNJHR10 sy-vline 
WA_BPDY_STR-T_GNJHR1 sy-vline 
WA_BPDY_STR-T_GNJHR2 sy-vline 
WA_BPDY_STR-T_GNJHR3 sy-vline 
WA_BPDY_STR-T_GNJHR4 sy-vline 
WA_BPDY_STR-T_GNJHR5 sy-vline 
WA_BPDY_STR-T_GNJHR6 sy-vline 
WA_BPDY_STR-T_GNJHR7 sy-vline 
WA_BPDY_STR-T_GNJHR8 sy-vline 
WA_BPDY_STR-T_GNJHR9 sy-vline 
WA_BPDY_STR-T_GNJHR10 sy-vline 
WA_BPDY_STR-RE_GNJHR sy-vline      INTO ld_text SEPARATED BY SPACE.

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