ABAP Select data from SAP table E1BP_PLL80 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 E1BP_PLL80 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 E1BP_PLL80. 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 E1BP_PLL80 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_E1BP_PLL80 TYPE STANDARD TABLE OF E1BP_PLL80,
      WA_E1BP_PLL80 TYPE E1BP_PLL80,
      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: <E1BP_PLL80> TYPE E1BP_PLL80.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM E1BP_PLL80
*  INTO TABLE @DATA(IT_E1BP_PLL802).
*--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_E1BP_PLL80 INDEX 1 INTO DATA(WA_E1BP_PLL802).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_E1BP_PLL80 ASSIGNING <E1BP_PLL80>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<E1BP_PLL80>-CONF_NO = 1.
<E1BP_PLL80>-CONF_CNT = 1.
<E1BP_PLL80>-REVERSED = 1.
<E1BP_PLL80>-REV_CONF_CNT = 1.
<E1BP_PLL80>-TIMEID_NO = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_E1BP_PLL80-PERNO, sy-vline,
WA_E1BP_PLL80-GROUP, sy-vline,
WA_E1BP_PLL80-GROUPNAME, sy-vline,
WA_E1BP_PLL80-TTIC_TYPE, sy-vline,
WA_E1BP_PLL80-PR_FORMULA, sy-vline,
WA_E1BP_PLL80-SOURCE_APPL, sy-vline.
ENDLOOP. *Add any further fields from structure WA_E1BP_PLL80 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_E1BP_PLL80 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_E1BP_PLL80 INTO WA_E1BP_PLL80. *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.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_E1BP_PLL80_STR,
CONF_NO TYPE STRING,
CONF_CNT TYPE STRING,
REVERSED TYPE STRING,
REV_CONF_CNT TYPE STRING,
TIMEID_NO TYPE STRING,
PERNO TYPE STRING,
GROUP TYPE STRING,
GROUPNAME TYPE STRING,
TTIC_TYPE TYPE STRING,
PR_FORMULA TYPE STRING,
SOURCE_APPL TYPE STRING,
SOURCE_SYS TYPE STRING,
UPD_STATUS TYPE STRING,
PSTNG_DATE TYPE STRING,
ORDER_CATG TYPE STRING,
ORDER_TYPE TYPE STRING,
ORDER TYPE STRING,
SEQUENCE_NO TYPE STRING,
ACTIVITY TYPE STRING,
SUB_ACTIVITY TYPE STRING,
WORK_CNTR TYPE STRING,
PLANT TYPE STRING,
COMP_CODE TYPE STRING,
BUS_AREA TYPE STRING,
COSTCENTER TYPE STRING,
WAGETYPE TYPE STRING,
COLLAGRMGR TYPE STRING,
COLLAGRMLV TYPE STRING,
TERMINALID TYPE STRING,
TEVENTTYPE TYPE STRING,
LOGDATE TYPE STRING,
LOGTIME TYPE STRING,
PHYSDATE TYPE STRING,
PHYSTIME TYPE STRING,
UNITOFQ TYPE STRING,
UNITOFQISO TYPE STRING,
YIELD TYPE STRING,
SCRAP TYPE STRING,
SCRAPRSN TYPE STRING,
BASE TYPE STRING,
STDVALUE1 TYPE STRING,
SVUNIT1 TYPE STRING,
SVUNIT1ISO TYPE STRING,
TARGVALUE1 TYPE STRING,
TVUNIT1 TYPE STRING,
TVUNIT1ISO TYPE STRING,
CONFVALUE1 TYPE STRING,
CVUNIT1 TYPE STRING,
CVUNIT1ISO TYPE STRING,
CONFSTART1 TYPE STRING,
CONFEND1 TYPE STRING,
STDVALUE2 TYPE STRING,
SVUNIT2 TYPE STRING,
SVUNIT2ISO TYPE STRING,
TARGVALUE2 TYPE STRING,
TVUNIT2 TYPE STRING,
TVUNIT2ISO TYPE STRING,
CONFVALUE2 TYPE STRING,
CVUNIT2 TYPE STRING,
CVUNIT2ISO TYPE STRING,
CONFSTART2 TYPE STRING,
CONFEND2 TYPE STRING,
STDVALUE3 TYPE STRING,
SVUNIT3 TYPE STRING,
SVUNIT3ISO TYPE STRING,
TARGVALUE3 TYPE STRING,
TVUNIT3 TYPE STRING,
TVUNIT3ISO TYPE STRING,
CONFVALUE3 TYPE STRING,
CVUNIT3 TYPE STRING,
CVUNIT3ISO TYPE STRING,
CONFSTART3 TYPE STRING,
CONFEND3 TYPE STRING,
STDVALUE4 TYPE STRING,
SVUNIT4 TYPE STRING,
SVUNIT4ISO TYPE STRING,
TARGVALUE4 TYPE STRING,
TVUNIT4 TYPE STRING,
TVUNIT4ISO TYPE STRING,
CONFVALUE4 TYPE STRING,
CVUNIT4 TYPE STRING,
CVUNIT4ISO TYPE STRING,
CONFSTART4 TYPE STRING,
CONFEND4 TYPE STRING,
STDVALUE5 TYPE STRING,
SVUNIT5 TYPE STRING,
SVUNIT5ISO TYPE STRING,
TARGVALUE5 TYPE STRING,
TVUNIT5 TYPE STRING,
TVUNIT5ISO TYPE STRING,
CONFVALUE5 TYPE STRING,
CVUNIT5 TYPE STRING,
CVUNIT5ISO TYPE STRING,
CONFSTART5 TYPE STRING,
CONFEND5 TYPE STRING,
STDVALUE6 TYPE STRING,
SVUNIT6 TYPE STRING,
SVUNIT6ISO TYPE STRING,
TARGVALUE6 TYPE STRING,
TVUNIT6 TYPE STRING,
TVUNIT6ISO TYPE STRING,
CONFVALUE6 TYPE STRING,
CVUNIT6 TYPE STRING,
CVUNIT6ISO TYPE STRING,
CONFSTART6 TYPE STRING,
CONFEND6 TYPE STRING,
USERFIELD TYPE STRING,END OF T_EKKO_STR. DATA: WA_E1BP_PLL80_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_E1BP_PLL80_STR-CONF_NO sy-vline
WA_E1BP_PLL80_STR-CONF_CNT sy-vline
WA_E1BP_PLL80_STR-REVERSED sy-vline
WA_E1BP_PLL80_STR-REV_CONF_CNT sy-vline
WA_E1BP_PLL80_STR-TIMEID_NO sy-vline
WA_E1BP_PLL80_STR-PERNO sy-vline
WA_E1BP_PLL80_STR-GROUP sy-vline
WA_E1BP_PLL80_STR-GROUPNAME sy-vline
WA_E1BP_PLL80_STR-TTIC_TYPE sy-vline
WA_E1BP_PLL80_STR-PR_FORMULA sy-vline
WA_E1BP_PLL80_STR-SOURCE_APPL sy-vline
WA_E1BP_PLL80_STR-SOURCE_SYS sy-vline
WA_E1BP_PLL80_STR-UPD_STATUS sy-vline
WA_E1BP_PLL80_STR-PSTNG_DATE sy-vline
WA_E1BP_PLL80_STR-ORDER_CATG sy-vline
WA_E1BP_PLL80_STR-ORDER_TYPE sy-vline
WA_E1BP_PLL80_STR-ORDER sy-vline
WA_E1BP_PLL80_STR-SEQUENCE_NO sy-vline
WA_E1BP_PLL80_STR-ACTIVITY sy-vline
WA_E1BP_PLL80_STR-SUB_ACTIVITY sy-vline
WA_E1BP_PLL80_STR-WORK_CNTR sy-vline
WA_E1BP_PLL80_STR-PLANT sy-vline
WA_E1BP_PLL80_STR-COMP_CODE sy-vline
WA_E1BP_PLL80_STR-BUS_AREA sy-vline
WA_E1BP_PLL80_STR-COSTCENTER sy-vline
WA_E1BP_PLL80_STR-WAGETYPE sy-vline
WA_E1BP_PLL80_STR-COLLAGRMGR sy-vline
WA_E1BP_PLL80_STR-COLLAGRMLV sy-vline
WA_E1BP_PLL80_STR-TERMINALID sy-vline
WA_E1BP_PLL80_STR-TEVENTTYPE sy-vline
WA_E1BP_PLL80_STR-LOGDATE sy-vline
WA_E1BP_PLL80_STR-LOGTIME sy-vline
WA_E1BP_PLL80_STR-PHYSDATE sy-vline
WA_E1BP_PLL80_STR-PHYSTIME sy-vline
WA_E1BP_PLL80_STR-UNITOFQ sy-vline
WA_E1BP_PLL80_STR-UNITOFQISO sy-vline
WA_E1BP_PLL80_STR-YIELD sy-vline
WA_E1BP_PLL80_STR-SCRAP sy-vline
WA_E1BP_PLL80_STR-SCRAPRSN sy-vline
WA_E1BP_PLL80_STR-BASE sy-vline
WA_E1BP_PLL80_STR-STDVALUE1 sy-vline
WA_E1BP_PLL80_STR-SVUNIT1 sy-vline
WA_E1BP_PLL80_STR-SVUNIT1ISO sy-vline
WA_E1BP_PLL80_STR-TARGVALUE1 sy-vline
WA_E1BP_PLL80_STR-TVUNIT1 sy-vline
WA_E1BP_PLL80_STR-TVUNIT1ISO sy-vline
WA_E1BP_PLL80_STR-CONFVALUE1 sy-vline
WA_E1BP_PLL80_STR-CVUNIT1 sy-vline
WA_E1BP_PLL80_STR-CVUNIT1ISO sy-vline
WA_E1BP_PLL80_STR-CONFSTART1 sy-vline
WA_E1BP_PLL80_STR-CONFEND1 sy-vline
WA_E1BP_PLL80_STR-STDVALUE2 sy-vline
WA_E1BP_PLL80_STR-SVUNIT2 sy-vline
WA_E1BP_PLL80_STR-SVUNIT2ISO sy-vline
WA_E1BP_PLL80_STR-TARGVALUE2 sy-vline
WA_E1BP_PLL80_STR-TVUNIT2 sy-vline
WA_E1BP_PLL80_STR-TVUNIT2ISO sy-vline
WA_E1BP_PLL80_STR-CONFVALUE2 sy-vline
WA_E1BP_PLL80_STR-CVUNIT2 sy-vline
WA_E1BP_PLL80_STR-CVUNIT2ISO sy-vline
WA_E1BP_PLL80_STR-CONFSTART2 sy-vline
WA_E1BP_PLL80_STR-CONFEND2 sy-vline
WA_E1BP_PLL80_STR-STDVALUE3 sy-vline
WA_E1BP_PLL80_STR-SVUNIT3 sy-vline
WA_E1BP_PLL80_STR-SVUNIT3ISO sy-vline
WA_E1BP_PLL80_STR-TARGVALUE3 sy-vline
WA_E1BP_PLL80_STR-TVUNIT3 sy-vline
WA_E1BP_PLL80_STR-TVUNIT3ISO sy-vline
WA_E1BP_PLL80_STR-CONFVALUE3 sy-vline
WA_E1BP_PLL80_STR-CVUNIT3 sy-vline
WA_E1BP_PLL80_STR-CVUNIT3ISO sy-vline
WA_E1BP_PLL80_STR-CONFSTART3 sy-vline
WA_E1BP_PLL80_STR-CONFEND3 sy-vline
WA_E1BP_PLL80_STR-STDVALUE4 sy-vline
WA_E1BP_PLL80_STR-SVUNIT4 sy-vline
WA_E1BP_PLL80_STR-SVUNIT4ISO sy-vline
WA_E1BP_PLL80_STR-TARGVALUE4 sy-vline
WA_E1BP_PLL80_STR-TVUNIT4 sy-vline
WA_E1BP_PLL80_STR-TVUNIT4ISO sy-vline
WA_E1BP_PLL80_STR-CONFVALUE4 sy-vline
WA_E1BP_PLL80_STR-CVUNIT4 sy-vline
WA_E1BP_PLL80_STR-CVUNIT4ISO sy-vline
WA_E1BP_PLL80_STR-CONFSTART4 sy-vline
WA_E1BP_PLL80_STR-CONFEND4 sy-vline
WA_E1BP_PLL80_STR-STDVALUE5 sy-vline
WA_E1BP_PLL80_STR-SVUNIT5 sy-vline
WA_E1BP_PLL80_STR-SVUNIT5ISO sy-vline
WA_E1BP_PLL80_STR-TARGVALUE5 sy-vline
WA_E1BP_PLL80_STR-TVUNIT5 sy-vline
WA_E1BP_PLL80_STR-TVUNIT5ISO sy-vline
WA_E1BP_PLL80_STR-CONFVALUE5 sy-vline
WA_E1BP_PLL80_STR-CVUNIT5 sy-vline
WA_E1BP_PLL80_STR-CVUNIT5ISO sy-vline
WA_E1BP_PLL80_STR-CONFSTART5 sy-vline
WA_E1BP_PLL80_STR-CONFEND5 sy-vline
WA_E1BP_PLL80_STR-STDVALUE6 sy-vline
WA_E1BP_PLL80_STR-SVUNIT6 sy-vline
WA_E1BP_PLL80_STR-SVUNIT6ISO sy-vline
WA_E1BP_PLL80_STR-TARGVALUE6 sy-vline
WA_E1BP_PLL80_STR-TVUNIT6 sy-vline
WA_E1BP_PLL80_STR-TVUNIT6ISO sy-vline
WA_E1BP_PLL80_STR-CONFVALUE6 sy-vline
WA_E1BP_PLL80_STR-CVUNIT6 sy-vline
WA_E1BP_PLL80_STR-CVUNIT6ISO sy-vline
WA_E1BP_PLL80_STR-CONFSTART6 sy-vline
WA_E1BP_PLL80_STR-CONFEND6 sy-vline
WA_E1BP_PLL80_STR-USERFIELD sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.