ABAP Select data from SAP table P0660 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 P0660 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 P0660. 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 P0660 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_P0660 TYPE STANDARD TABLE OF P0660,
      WA_P0660 TYPE P0660,
      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: <P0660> TYPE P0660.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM P0660
*  INTO TABLE @DATA(IT_P06602).
*--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_P0660 INDEX 1 INTO DATA(WA_P06602).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_P0660 ASSIGNING <P0660>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<P0660>-PERNR = 1.
<P0660>-INFTY = 1.
<P0660>-SUBTY = 1.
<P0660>-OBJPS = 1.
<P0660>-SPRPS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_P0660-ENDDA, sy-vline,
WA_P0660-BEGDA, sy-vline,
WA_P0660-SEQNR, sy-vline,
WA_P0660-AEDTM, sy-vline,
WA_P0660-UNAME, sy-vline,
WA_P0660-HISTO, sy-vline.
ENDLOOP. *Add any further fields from structure WA_P0660 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_P0660 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_P0660 INTO WA_P0660. *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 PRYEA CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_P0660-PRYEA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_P0660-PRYEA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field ACYEA CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_P0660-ACYEA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_P0660-ACYEA.
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_P0660_STR,
PERNR TYPE STRING,
INFTY TYPE STRING,
SUBTY TYPE STRING,
OBJPS TYPE STRING,
SPRPS TYPE STRING,
ENDDA TYPE STRING,
BEGDA TYPE STRING,
SEQNR TYPE STRING,
AEDTM TYPE STRING,
UNAME TYPE STRING,
HISTO TYPE STRING,
ITXEX TYPE STRING,
REFEX TYPE STRING,
ORDEX TYPE STRING,
ITBLD TYPE STRING,
PREAS TYPE STRING,
FLAG1 TYPE STRING,
FLAG2 TYPE STRING,
FLAG3 TYPE STRING,
FLAG4 TYPE STRING,
RESE1 TYPE STRING,
RESE2 TYPE STRING,
GRPVL TYPE STRING,
EMRTX TYPE STRING,
SIBEG TYPE STRING,
SIEND TYPE STRING,
HIRED TYPE STRING,
PRYEA TYPE STRING,
ACYEA TYPE STRING,
WAERS TYPE STRING,
MSA01 TYPE STRING,
MSA02 TYPE STRING,
MSA03 TYPE STRING,
MSA04 TYPE STRING,
MSA05 TYPE STRING,
MSA06 TYPE STRING,
MSA07 TYPE STRING,
MSA08 TYPE STRING,
MSA09 TYPE STRING,
MSA10 TYPE STRING,
MSA11 TYPE STRING,
MSA12 TYPE STRING,
MSA13 TYPE STRING,
MSA14 TYPE STRING,
MSA15 TYPE STRING,
MSA16 TYPE STRING,
MSA17 TYPE STRING,
MSA18 TYPE STRING,
MSA19 TYPE STRING,
MSA20 TYPE STRING,
MSA21 TYPE STRING,
MSA22 TYPE STRING,
MSA23 TYPE STRING,
MSA24 TYPE STRING,
ABE01 TYPE STRING,
AEN01 TYPE STRING,
ACO01 TYPE STRING,
ABE02 TYPE STRING,
AEN02 TYPE STRING,
ACO02 TYPE STRING,
ABE03 TYPE STRING,
AEN03 TYPE STRING,
ACO03 TYPE STRING,
ABE04 TYPE STRING,
AEN04 TYPE STRING,
ACO04 TYPE STRING,
ABE05 TYPE STRING,
AEN05 TYPE STRING,
ACO05 TYPE STRING,
ABE06 TYPE STRING,
AEN06 TYPE STRING,
ACO06 TYPE STRING,
ABE07 TYPE STRING,
AEN07 TYPE STRING,
ACO07 TYPE STRING,
ABE08 TYPE STRING,
AEN08 TYPE STRING,
ACO08 TYPE STRING,
ABE09 TYPE STRING,
AEN09 TYPE STRING,
ACO09 TYPE STRING,
ABE10 TYPE STRING,
AEN10 TYPE STRING,
ACO10 TYPE STRING,
ABE11 TYPE STRING,
AEN11 TYPE STRING,
ACO11 TYPE STRING,
ABE12 TYPE STRING,
AEN12 TYPE STRING,
ACO12 TYPE STRING,
ABE13 TYPE STRING,
AEN13 TYPE STRING,
ACO13 TYPE STRING,
ABE14 TYPE STRING,
AEN14 TYPE STRING,
ACO14 TYPE STRING,
ABE15 TYPE STRING,
AEN15 TYPE STRING,
ACO15 TYPE STRING,
ABE16 TYPE STRING,
AEN16 TYPE STRING,
ACO16 TYPE STRING,
ABE17 TYPE STRING,
AEN17 TYPE STRING,
ACO17 TYPE STRING,
ABE18 TYPE STRING,
AEN18 TYPE STRING,
ACO18 TYPE STRING,
ABE19 TYPE STRING,
AEN19 TYPE STRING,
ACO19 TYPE STRING,
ABE20 TYPE STRING,
AEN20 TYPE STRING,
ACO20 TYPE STRING,
NRJ01 TYPE STRING,
NRI01 TYPE STRING,
NRM01 TYPE STRING,
NRD01 TYPE STRING,
NRJ02 TYPE STRING,
NRI02 TYPE STRING,
NRM02 TYPE STRING,
NRD02 TYPE STRING,
NRJ03 TYPE STRING,
NRI03 TYPE STRING,
NRM03 TYPE STRING,
NRD03 TYPE STRING,
NRJ04 TYPE STRING,
NRI04 TYPE STRING,
NRM04 TYPE STRING,
NRD04 TYPE STRING,
NRJ05 TYPE STRING,
NRI05 TYPE STRING,
NRM05 TYPE STRING,
NRD05 TYPE STRING,
NRJ06 TYPE STRING,
NRI06 TYPE STRING,
NRM06 TYPE STRING,
NRD06 TYPE STRING,
NRJ07 TYPE STRING,
NRI07 TYPE STRING,
NRM07 TYPE STRING,
NRD07 TYPE STRING,
NRJ08 TYPE STRING,
NRI08 TYPE STRING,
NRM08 TYPE STRING,
NRD08 TYPE STRING,
NRJ09 TYPE STRING,
NRI09 TYPE STRING,
NRM09 TYPE STRING,
NRD09 TYPE STRING,
NRJ10 TYPE STRING,
NRI10 TYPE STRING,
NRM10 TYPE STRING,
NRD10 TYPE STRING,
NRJ11 TYPE STRING,
NRI11 TYPE STRING,
NRM11 TYPE STRING,
NRD11 TYPE STRING,
NRJ12 TYPE STRING,
NRI12 TYPE STRING,
NRM12 TYPE STRING,
NRD12 TYPE STRING,
NRJ13 TYPE STRING,
NRI13 TYPE STRING,
NRM13 TYPE STRING,
NRD13 TYPE STRING,
NRJ14 TYPE STRING,
NRI14 TYPE STRING,
NRM14 TYPE STRING,
NRD14 TYPE STRING,
NRJ15 TYPE STRING,
NRI15 TYPE STRING,
NRM15 TYPE STRING,
NRD15 TYPE STRING,
NRJ16 TYPE STRING,
NRI16 TYPE STRING,
NRM16 TYPE STRING,
NRD16 TYPE STRING,
NRJ17 TYPE STRING,
NRI17 TYPE STRING,
NRM17 TYPE STRING,
NRD17 TYPE STRING,
NRJ18 TYPE STRING,
NRI18 TYPE STRING,
NRM18 TYPE STRING,
NRD18 TYPE STRING,
NRJ19 TYPE STRING,
NRI19 TYPE STRING,
NRM19 TYPE STRING,
NRD19 TYPE STRING,
NRJ20 TYPE STRING,
NRI20 TYPE STRING,
NRM20 TYPE STRING,
NRD20 TYPE STRING,
KIF01 TYPE STRING,
KIF02 TYPE STRING,
KIF03 TYPE STRING,
KIF04 TYPE STRING,
KIF05 TYPE STRING,
KIF06 TYPE STRING,
KIF07 TYPE STRING,
KIF08 TYPE STRING,
KIF09 TYPE STRING,
KIF10 TYPE STRING,
KIF11 TYPE STRING,
KIF12 TYPE STRING,
KIF13 TYPE STRING,
KIF14 TYPE STRING,
KIF15 TYPE STRING,
KIF16 TYPE STRING,
KIF17 TYPE STRING,
KIF18 TYPE STRING,
KIF19 TYPE STRING,
KIF20 TYPE STRING,
JOGVT TYPE STRING,
LGA01 TYPE STRING,
LGA02 TYPE STRING,
LGA03 TYPE STRING,
LGA04 TYPE STRING,
LGA05 TYPE STRING,
LGA06 TYPE STRING,
LGA07 TYPE STRING,
LGA08 TYPE STRING,
LGA09 TYPE STRING,
LGA10 TYPE STRING,
LGA11 TYPE STRING,
LGA12 TYPE STRING,
LGA13 TYPE STRING,
LGA14 TYPE STRING,
LGA15 TYPE STRING,
LGA16 TYPE STRING,
LGA17 TYPE STRING,
LGA18 TYPE STRING,
LGA19 TYPE STRING,
LGA20 TYPE STRING,
AWA01 TYPE STRING,
AWA02 TYPE STRING,
AWA03 TYPE STRING,
AWA04 TYPE STRING,
AWA05 TYPE STRING,
AWA06 TYPE STRING,
AWA07 TYPE STRING,
AWA08 TYPE STRING,
AWA09 TYPE STRING,
AWA10 TYPE STRING,
AWA11 TYPE STRING,
AWA12 TYPE STRING,
AWA13 TYPE STRING,
AWA14 TYPE STRING,
AWA15 TYPE STRING,
AWA16 TYPE STRING,
AWA17 TYPE STRING,
AWA18 TYPE STRING,
AWA19 TYPE STRING,
AWA20 TYPE STRING,END OF T_EKKO_STR. DATA: WA_P0660_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_P0660_STR-PERNR sy-vline
WA_P0660_STR-INFTY sy-vline
WA_P0660_STR-SUBTY sy-vline
WA_P0660_STR-OBJPS sy-vline
WA_P0660_STR-SPRPS sy-vline
WA_P0660_STR-ENDDA sy-vline
WA_P0660_STR-BEGDA sy-vline
WA_P0660_STR-SEQNR sy-vline
WA_P0660_STR-AEDTM sy-vline
WA_P0660_STR-UNAME sy-vline
WA_P0660_STR-HISTO sy-vline
WA_P0660_STR-ITXEX sy-vline
WA_P0660_STR-REFEX sy-vline
WA_P0660_STR-ORDEX sy-vline
WA_P0660_STR-ITBLD sy-vline
WA_P0660_STR-PREAS sy-vline
WA_P0660_STR-FLAG1 sy-vline
WA_P0660_STR-FLAG2 sy-vline
WA_P0660_STR-FLAG3 sy-vline
WA_P0660_STR-FLAG4 sy-vline
WA_P0660_STR-RESE1 sy-vline
WA_P0660_STR-RESE2 sy-vline
WA_P0660_STR-GRPVL sy-vline
WA_P0660_STR-EMRTX sy-vline
WA_P0660_STR-SIBEG sy-vline
WA_P0660_STR-SIEND sy-vline
WA_P0660_STR-HIRED sy-vline
WA_P0660_STR-PRYEA sy-vline
WA_P0660_STR-ACYEA sy-vline
WA_P0660_STR-WAERS sy-vline
WA_P0660_STR-MSA01 sy-vline
WA_P0660_STR-MSA02 sy-vline
WA_P0660_STR-MSA03 sy-vline
WA_P0660_STR-MSA04 sy-vline
WA_P0660_STR-MSA05 sy-vline
WA_P0660_STR-MSA06 sy-vline
WA_P0660_STR-MSA07 sy-vline
WA_P0660_STR-MSA08 sy-vline
WA_P0660_STR-MSA09 sy-vline
WA_P0660_STR-MSA10 sy-vline
WA_P0660_STR-MSA11 sy-vline
WA_P0660_STR-MSA12 sy-vline
WA_P0660_STR-MSA13 sy-vline
WA_P0660_STR-MSA14 sy-vline
WA_P0660_STR-MSA15 sy-vline
WA_P0660_STR-MSA16 sy-vline
WA_P0660_STR-MSA17 sy-vline
WA_P0660_STR-MSA18 sy-vline
WA_P0660_STR-MSA19 sy-vline
WA_P0660_STR-MSA20 sy-vline
WA_P0660_STR-MSA21 sy-vline
WA_P0660_STR-MSA22 sy-vline
WA_P0660_STR-MSA23 sy-vline
WA_P0660_STR-MSA24 sy-vline
WA_P0660_STR-ABE01 sy-vline
WA_P0660_STR-AEN01 sy-vline
WA_P0660_STR-ACO01 sy-vline
WA_P0660_STR-ABE02 sy-vline
WA_P0660_STR-AEN02 sy-vline
WA_P0660_STR-ACO02 sy-vline
WA_P0660_STR-ABE03 sy-vline
WA_P0660_STR-AEN03 sy-vline
WA_P0660_STR-ACO03 sy-vline
WA_P0660_STR-ABE04 sy-vline
WA_P0660_STR-AEN04 sy-vline
WA_P0660_STR-ACO04 sy-vline
WA_P0660_STR-ABE05 sy-vline
WA_P0660_STR-AEN05 sy-vline
WA_P0660_STR-ACO05 sy-vline
WA_P0660_STR-ABE06 sy-vline
WA_P0660_STR-AEN06 sy-vline
WA_P0660_STR-ACO06 sy-vline
WA_P0660_STR-ABE07 sy-vline
WA_P0660_STR-AEN07 sy-vline
WA_P0660_STR-ACO07 sy-vline
WA_P0660_STR-ABE08 sy-vline
WA_P0660_STR-AEN08 sy-vline
WA_P0660_STR-ACO08 sy-vline
WA_P0660_STR-ABE09 sy-vline
WA_P0660_STR-AEN09 sy-vline
WA_P0660_STR-ACO09 sy-vline
WA_P0660_STR-ABE10 sy-vline
WA_P0660_STR-AEN10 sy-vline
WA_P0660_STR-ACO10 sy-vline
WA_P0660_STR-ABE11 sy-vline
WA_P0660_STR-AEN11 sy-vline
WA_P0660_STR-ACO11 sy-vline
WA_P0660_STR-ABE12 sy-vline
WA_P0660_STR-AEN12 sy-vline
WA_P0660_STR-ACO12 sy-vline
WA_P0660_STR-ABE13 sy-vline
WA_P0660_STR-AEN13 sy-vline
WA_P0660_STR-ACO13 sy-vline
WA_P0660_STR-ABE14 sy-vline
WA_P0660_STR-AEN14 sy-vline
WA_P0660_STR-ACO14 sy-vline
WA_P0660_STR-ABE15 sy-vline
WA_P0660_STR-AEN15 sy-vline
WA_P0660_STR-ACO15 sy-vline
WA_P0660_STR-ABE16 sy-vline
WA_P0660_STR-AEN16 sy-vline
WA_P0660_STR-ACO16 sy-vline
WA_P0660_STR-ABE17 sy-vline
WA_P0660_STR-AEN17 sy-vline
WA_P0660_STR-ACO17 sy-vline
WA_P0660_STR-ABE18 sy-vline
WA_P0660_STR-AEN18 sy-vline
WA_P0660_STR-ACO18 sy-vline
WA_P0660_STR-ABE19 sy-vline
WA_P0660_STR-AEN19 sy-vline
WA_P0660_STR-ACO19 sy-vline
WA_P0660_STR-ABE20 sy-vline
WA_P0660_STR-AEN20 sy-vline
WA_P0660_STR-ACO20 sy-vline
WA_P0660_STR-NRJ01 sy-vline
WA_P0660_STR-NRI01 sy-vline
WA_P0660_STR-NRM01 sy-vline
WA_P0660_STR-NRD01 sy-vline
WA_P0660_STR-NRJ02 sy-vline
WA_P0660_STR-NRI02 sy-vline
WA_P0660_STR-NRM02 sy-vline
WA_P0660_STR-NRD02 sy-vline
WA_P0660_STR-NRJ03 sy-vline
WA_P0660_STR-NRI03 sy-vline
WA_P0660_STR-NRM03 sy-vline
WA_P0660_STR-NRD03 sy-vline
WA_P0660_STR-NRJ04 sy-vline
WA_P0660_STR-NRI04 sy-vline
WA_P0660_STR-NRM04 sy-vline
WA_P0660_STR-NRD04 sy-vline
WA_P0660_STR-NRJ05 sy-vline
WA_P0660_STR-NRI05 sy-vline
WA_P0660_STR-NRM05 sy-vline
WA_P0660_STR-NRD05 sy-vline
WA_P0660_STR-NRJ06 sy-vline
WA_P0660_STR-NRI06 sy-vline
WA_P0660_STR-NRM06 sy-vline
WA_P0660_STR-NRD06 sy-vline
WA_P0660_STR-NRJ07 sy-vline
WA_P0660_STR-NRI07 sy-vline
WA_P0660_STR-NRM07 sy-vline
WA_P0660_STR-NRD07 sy-vline
WA_P0660_STR-NRJ08 sy-vline
WA_P0660_STR-NRI08 sy-vline
WA_P0660_STR-NRM08 sy-vline
WA_P0660_STR-NRD08 sy-vline
WA_P0660_STR-NRJ09 sy-vline
WA_P0660_STR-NRI09 sy-vline
WA_P0660_STR-NRM09 sy-vline
WA_P0660_STR-NRD09 sy-vline
WA_P0660_STR-NRJ10 sy-vline
WA_P0660_STR-NRI10 sy-vline
WA_P0660_STR-NRM10 sy-vline
WA_P0660_STR-NRD10 sy-vline
WA_P0660_STR-NRJ11 sy-vline
WA_P0660_STR-NRI11 sy-vline
WA_P0660_STR-NRM11 sy-vline
WA_P0660_STR-NRD11 sy-vline
WA_P0660_STR-NRJ12 sy-vline
WA_P0660_STR-NRI12 sy-vline
WA_P0660_STR-NRM12 sy-vline
WA_P0660_STR-NRD12 sy-vline
WA_P0660_STR-NRJ13 sy-vline
WA_P0660_STR-NRI13 sy-vline
WA_P0660_STR-NRM13 sy-vline
WA_P0660_STR-NRD13 sy-vline
WA_P0660_STR-NRJ14 sy-vline
WA_P0660_STR-NRI14 sy-vline
WA_P0660_STR-NRM14 sy-vline
WA_P0660_STR-NRD14 sy-vline
WA_P0660_STR-NRJ15 sy-vline
WA_P0660_STR-NRI15 sy-vline
WA_P0660_STR-NRM15 sy-vline
WA_P0660_STR-NRD15 sy-vline
WA_P0660_STR-NRJ16 sy-vline
WA_P0660_STR-NRI16 sy-vline
WA_P0660_STR-NRM16 sy-vline
WA_P0660_STR-NRD16 sy-vline
WA_P0660_STR-NRJ17 sy-vline
WA_P0660_STR-NRI17 sy-vline
WA_P0660_STR-NRM17 sy-vline
WA_P0660_STR-NRD17 sy-vline
WA_P0660_STR-NRJ18 sy-vline
WA_P0660_STR-NRI18 sy-vline
WA_P0660_STR-NRM18 sy-vline
WA_P0660_STR-NRD18 sy-vline
WA_P0660_STR-NRJ19 sy-vline
WA_P0660_STR-NRI19 sy-vline
WA_P0660_STR-NRM19 sy-vline
WA_P0660_STR-NRD19 sy-vline
WA_P0660_STR-NRJ20 sy-vline
WA_P0660_STR-NRI20 sy-vline
WA_P0660_STR-NRM20 sy-vline
WA_P0660_STR-NRD20 sy-vline
WA_P0660_STR-KIF01 sy-vline
WA_P0660_STR-KIF02 sy-vline
WA_P0660_STR-KIF03 sy-vline
WA_P0660_STR-KIF04 sy-vline
WA_P0660_STR-KIF05 sy-vline
WA_P0660_STR-KIF06 sy-vline
WA_P0660_STR-KIF07 sy-vline
WA_P0660_STR-KIF08 sy-vline
WA_P0660_STR-KIF09 sy-vline
WA_P0660_STR-KIF10 sy-vline
WA_P0660_STR-KIF11 sy-vline
WA_P0660_STR-KIF12 sy-vline
WA_P0660_STR-KIF13 sy-vline
WA_P0660_STR-KIF14 sy-vline
WA_P0660_STR-KIF15 sy-vline
WA_P0660_STR-KIF16 sy-vline
WA_P0660_STR-KIF17 sy-vline
WA_P0660_STR-KIF18 sy-vline
WA_P0660_STR-KIF19 sy-vline
WA_P0660_STR-KIF20 sy-vline
WA_P0660_STR-JOGVT sy-vline
WA_P0660_STR-LGA01 sy-vline
WA_P0660_STR-LGA02 sy-vline
WA_P0660_STR-LGA03 sy-vline
WA_P0660_STR-LGA04 sy-vline
WA_P0660_STR-LGA05 sy-vline
WA_P0660_STR-LGA06 sy-vline
WA_P0660_STR-LGA07 sy-vline
WA_P0660_STR-LGA08 sy-vline
WA_P0660_STR-LGA09 sy-vline
WA_P0660_STR-LGA10 sy-vline
WA_P0660_STR-LGA11 sy-vline
WA_P0660_STR-LGA12 sy-vline
WA_P0660_STR-LGA13 sy-vline
WA_P0660_STR-LGA14 sy-vline
WA_P0660_STR-LGA15 sy-vline
WA_P0660_STR-LGA16 sy-vline
WA_P0660_STR-LGA17 sy-vline
WA_P0660_STR-LGA18 sy-vline
WA_P0660_STR-LGA19 sy-vline
WA_P0660_STR-LGA20 sy-vline
WA_P0660_STR-AWA01 sy-vline
WA_P0660_STR-AWA02 sy-vline
WA_P0660_STR-AWA03 sy-vline
WA_P0660_STR-AWA04 sy-vline
WA_P0660_STR-AWA05 sy-vline
WA_P0660_STR-AWA06 sy-vline
WA_P0660_STR-AWA07 sy-vline
WA_P0660_STR-AWA08 sy-vline
WA_P0660_STR-AWA09 sy-vline
WA_P0660_STR-AWA10 sy-vline
WA_P0660_STR-AWA11 sy-vline
WA_P0660_STR-AWA12 sy-vline
WA_P0660_STR-AWA13 sy-vline
WA_P0660_STR-AWA14 sy-vline
WA_P0660_STR-AWA15 sy-vline
WA_P0660_STR-AWA16 sy-vline
WA_P0660_STR-AWA17 sy-vline
WA_P0660_STR-AWA18 sy-vline
WA_P0660_STR-AWA19 sy-vline
WA_P0660_STR-AWA20 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.