ABAP Select data from SAP table P21_S_TARTIG_GARN_E 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 P21_S_TARTIG_GARN_E 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 P21_S_TARTIG_GARN_E. 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 P21_S_TARTIG_GARN_E 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_P21_S_TARTIG_GARN_E TYPE STANDARD TABLE OF P21_S_TARTIG_GARN_E,
      WA_P21_S_TARTIG_GARN_E TYPE P21_S_TARTIG_GARN_E,
      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: <P21_S_TARTIG_GARN_E> TYPE P21_S_TARTIG_GARN_E.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM P21_S_TARTIG_GARN_E
*  INTO TABLE @DATA(IT_P21_S_TARTIG_GARN_E2).
*--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_P21_S_TARTIG_GARN_E INDEX 1 INTO DATA(WA_P21_S_TARTIG_GARN_E2).


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

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_P21_S_TARTIG_GARN_E-SPRPS, sy-vline,
WA_P21_S_TARTIG_GARN_E-ENDDA, sy-vline,
WA_P21_S_TARTIG_GARN_E-BEGDA, sy-vline,
WA_P21_S_TARTIG_GARN_E-SEQNR, sy-vline,
WA_P21_S_TARTIG_GARN_E-AEDTM, sy-vline,
WA_P21_S_TARTIG_GARN_E-UNAME, sy-vline.
ENDLOOP. *Add any further fields from structure WA_P21_S_TARTIG_GARN_E 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_P21_S_TARTIG_GARN_E 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_P21_S_TARTIG_GARN_E INTO WA_P21_S_TARTIG_GARN_E. *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_P21_S_TARTIG_GARN_E_STR,
S_0226 TYPE STRING,
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,
PFTYP TYPE STRING,
PFSTY TYPE STRING,
PFLGA TYPE STRING,
WAERS TYPE STRING,
KORSU TYPE STRING,
RESSU TYPE STRING,
PFPRP TYPE STRING,
PPROZ TYPE STRING,
PMINS TYPE STRING,
PMOSU TYPE STRING,
PKONT TYPE STRING,
PFREG TYPE STRING,
EMFSL TYPE STRING,
EMFTX TYPE STRING,
BKPLZ TYPE STRING,
BKORT TYPE STRING,
STRAS TYPE STRING,
LOCAT TYPE STRING,
BANKS TYPE STRING,
BANKL TYPE STRING,
BANKN TYPE STRING,
ZWECK TYPE STRING,
ZLSCH TYPE STRING,
LGRT0 TYPE STRING,
LGRT1 TYPE STRING,
LGRT2 TYPE STRING,
LGRT3 TYPE STRING,
LGRT4 TYPE STRING,
LGRT5 TYPE STRING,
LGRT6 TYPE STRING,
LGRT7 TYPE STRING,
LGRT8 TYPE STRING,
LGRT9 TYPE STRING,
PROZ0 TYPE STRING,
PROZ1 TYPE STRING,
PROZ2 TYPE STRING,
PROZ3 TYPE STRING,
PROZ4 TYPE STRING,
PROZ5 TYPE STRING,
PROZ6 TYPE STRING,
PROZ7 TYPE STRING,
PROZ8 TYPE STRING,
PROZ9 TYPE STRING,
FLEG0 TYPE STRING,
FLEG1 TYPE STRING,
FLEG2 TYPE STRING,
FLEG3 TYPE STRING,
FLEG4 TYPE STRING,
FLEG5 TYPE STRING,
FLEG6 TYPE STRING,
FLEG7 TYPE STRING,
FLEG8 TYPE STRING,
FLEG9 TYPE STRING,
VEGRJ TYPE STRING,
LETJL TYPE STRING,
SPLIT TYPE STRING,
PRIOT TYPE STRING,
KAMAT TYPE STRING,
KORKM TYPE STRING,
KNRSU TYPE STRING,
VKORR TYPE STRING,
WKORR TYPE STRING,
IBAN TYPE STRING,
NOLET TYPE STRING,
MAXPF TYPE STRING,
PMAXS TYPE STRING,
KAMT2 TYPE STRING,
HATDT TYPE STRING,
VJPFB TYPE STRING,
PFPRL TYPE STRING,
FAIND TYPE STRING,
USZAM TYPE STRING,
ISZAM TYPE STRING,
LTIND TYPE STRING,
INDDA TYPE STRING,
MNOSZ TYPE STRING,
MEGEL TYPE STRING,
MEGJ1 TYPE STRING,
MEGJ2 TYPE STRING,
MODO1 TYPE STRING,
MODO2 TYPE STRING,
LTSTA TYPE STRING,
VHJRE TYPE STRING,
FOGK1 TYPE STRING,
FOGK2 TYPE STRING,
FOGK3 TYPE STRING,
FOGK4 TYPE STRING,
CELK1 TYPE STRING,
CELK2 TYPE STRING,
CELK3 TYPE STRING,
CELK4 TYPE STRING,
NMXPF TYPE STRING,
PFPRI TYPE STRING,
VSPLT TYPE STRING,
JOGCIM TYPE STRING,
HATR_H TYPE STRING,
HATR_R TYPE STRING,
HATR_Q TYPE STRING,
HATR_V TYPE STRING,
ADDRS TYPE STRING,
BANKN TYPE STRING,
VJSZAZ TYPE STRING,
VFELF TYPE STRING,
WAERS TYPE STRING,END OF T_EKKO_STR. DATA: WA_P21_S_TARTIG_GARN_E_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_P21_S_TARTIG_GARN_E_STR-S_0226 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PERNR sy-vline
WA_P21_S_TARTIG_GARN_E_STR-INFTY sy-vline
WA_P21_S_TARTIG_GARN_E_STR-SUBTY sy-vline
WA_P21_S_TARTIG_GARN_E_STR-OBJPS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-SPRPS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ENDDA sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BEGDA sy-vline
WA_P21_S_TARTIG_GARN_E_STR-SEQNR sy-vline
WA_P21_S_TARTIG_GARN_E_STR-AEDTM sy-vline
WA_P21_S_TARTIG_GARN_E_STR-UNAME sy-vline
WA_P21_S_TARTIG_GARN_E_STR-HISTO sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ITXEX sy-vline
WA_P21_S_TARTIG_GARN_E_STR-REFEX sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ORDEX sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ITBLD sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PREAS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLAG1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLAG2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLAG3 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLAG4 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-RESE1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-RESE2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-GRPVL sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFTYP sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFSTY sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFLGA sy-vline
WA_P21_S_TARTIG_GARN_E_STR-WAERS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-KORSU sy-vline
WA_P21_S_TARTIG_GARN_E_STR-RESSU sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFPRP sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PPROZ sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PMINS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PMOSU sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PKONT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFREG sy-vline
WA_P21_S_TARTIG_GARN_E_STR-EMFSL sy-vline
WA_P21_S_TARTIG_GARN_E_STR-EMFTX sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BKPLZ sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BKORT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-STRAS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LOCAT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BANKS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BANKL sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BANKN sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ZWECK sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ZLSCH sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT0 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT3 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT4 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT5 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT6 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT7 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT8 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LGRT9 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ0 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ3 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ4 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ5 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ6 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ7 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ8 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PROZ9 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG0 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG3 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG4 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG5 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG6 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG7 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG8 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FLEG9 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VEGRJ sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LETJL sy-vline
WA_P21_S_TARTIG_GARN_E_STR-SPLIT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PRIOT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-KAMAT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-KORKM sy-vline
WA_P21_S_TARTIG_GARN_E_STR-KNRSU sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VKORR sy-vline
WA_P21_S_TARTIG_GARN_E_STR-WKORR sy-vline
WA_P21_S_TARTIG_GARN_E_STR-IBAN sy-vline
WA_P21_S_TARTIG_GARN_E_STR-NOLET sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MAXPF sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PMAXS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-KAMT2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-HATDT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VJPFB sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFPRL sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FAIND sy-vline
WA_P21_S_TARTIG_GARN_E_STR-USZAM sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ISZAM sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LTIND sy-vline
WA_P21_S_TARTIG_GARN_E_STR-INDDA sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MNOSZ sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MEGEL sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MEGJ1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MEGJ2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MODO1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-MODO2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-LTSTA sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VHJRE sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FOGK1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FOGK2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FOGK3 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-FOGK4 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-CELK1 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-CELK2 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-CELK3 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-CELK4 sy-vline
WA_P21_S_TARTIG_GARN_E_STR-NMXPF sy-vline
WA_P21_S_TARTIG_GARN_E_STR-PFPRI sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VSPLT sy-vline
WA_P21_S_TARTIG_GARN_E_STR-JOGCIM sy-vline
WA_P21_S_TARTIG_GARN_E_STR-HATR_H sy-vline
WA_P21_S_TARTIG_GARN_E_STR-HATR_R sy-vline
WA_P21_S_TARTIG_GARN_E_STR-HATR_Q sy-vline
WA_P21_S_TARTIG_GARN_E_STR-HATR_V sy-vline
WA_P21_S_TARTIG_GARN_E_STR-ADDRS sy-vline
WA_P21_S_TARTIG_GARN_E_STR-BANKN sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VJSZAZ sy-vline
WA_P21_S_TARTIG_GARN_E_STR-VFELF sy-vline
WA_P21_S_TARTIG_GARN_E_STR-WAERS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.