ABAP Select data from SAP table P01P_RPSPSTD0_STATAB 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 P01P_RPSPSTD0_STATAB 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 P01P_RPSPSTD0_STATAB. 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 P01P_RPSPSTD0_STATAB 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_P01P_RPSPSTD0_STATAB TYPE STANDARD TABLE OF P01P_RPSPSTD0_STATAB,
WA_P01P_RPSPSTD0_STATAB TYPE P01P_RPSPSTD0_STATAB,
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: <P01P_RPSPSTD0_STATAB> TYPE P01P_RPSPSTD0_STATAB.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_P01P_RPSPSTD0_STATAB.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM P01P_RPSPSTD0_STATAB
INTO TABLE IT_P01P_RPSPSTD0_STATAB.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM P01P_RPSPSTD0_STATAB
* INTO TABLE @DATA(IT_P01P_RPSPSTD0_STATAB2).
*--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_P01P_RPSPSTD0_STATAB INDEX 1 INTO DATA(WA_P01P_RPSPSTD0_STATAB2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_P01P_RPSPSTD0_STATAB ASSIGNING <P01P_RPSPSTD0_STATAB>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<P01P_RPSPSTD0_STATAB>-WERKS = 1.
<P01P_RPSPSTD0_STATAB>-BTRTL = 1.
<P01P_RPSPSTD0_STATAB>-NACHN = 1.
<P01P_RPSPSTD0_STATAB>-VORNA = 1.
<P01P_RPSPSTD0_STATAB>-TITEL = 1.
ENDLOOP. LOOP AT IT_P01P_RPSPSTD0_STATAB INTO WA_P01P_RPSPSTD0_STATAB. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_P01P_RPSPSTD0_STATAB-LFDNR, sy-vline,
WA_P01P_RPSPSTD0_STATAB-LAND, sy-vline,
WA_P01P_RPSPSTD0_STATAB-BESCHBER, sy-vline,
WA_P01P_RPSPSTD0_STATAB-BERSTNR, sy-vline,
WA_P01P_RPSPSTD0_STATAB-BESCHNR, sy-vline,
WA_P01P_RPSPSTD0_STATAB-STAUFGB, sy-vline.
ENDLOOP. *Add any further fields from structure WA_P01P_RPSPSTD0_STATAB 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_P01P_RPSPSTD0_STATAB 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_P01P_RPSPSTD0_STATAB INTO WA_P01P_RPSPSTD0_STATAB. *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_P01P_RPSPSTD0_STATAB_STR,
WERKS TYPE STRING,
BTRTL TYPE STRING,
NACHN TYPE STRING,
VORNA TYPE STRING,
TITEL TYPE STRING,
LFDNR TYPE STRING,
LAND TYPE STRING,
BESCHBER TYPE STRING,
BERSTNR TYPE STRING,
BESCHNR TYPE STRING,
STAUFGB TYPE STRING,
KAUFGB TYPE STRING,
GESCH TYPE STRING,
GEBMON TYPE STRING,
GEBJAHR TYPE STRING,
BESCHUMF TYPE STRING,
DIENSTD TYPE STRING,
DIENSTA TYPE STRING,
LBGRUPPE TYPE STRING,
EINSTUF TYPE STRING,
DIOLAND TYPE STRING,
DIORBEZ TYPE STRING,
DIOKREIS TYPE STRING,
DIOGEM TYPE STRING,
GEMGRKL TYPE STRING,
KAPLHAUS TYPE STRING,
DLASTUFE TYPE STRING,
FAMSTOZ TYPE STRING,
KIANTOZ TYPE STRING,
WOHNLAND TYPE STRING,
WOHNRBEZ TYPE STRING,
WOHNKREIS TYPE STRING,
WOHNGEM TYPE STRING,
ARBFAKT TYPE STRING,
ARBFAKTU2 TYPE STRING,
PLZ TYPE STRING,
LEER TYPE STRING,
GKZNAME TYPE STRING,
LIEFERANT TYPE STRING,
STEUBRU TYPE STRING,
OWKZN TYPE STRING,
V_LSTNG TYPE STRING,
ZULAGE TYPE STRING,
ART1 TYPE STRING,
ZULAGE1 TYPE STRING,
ART2 TYPE STRING,
ZULAGE2 TYPE STRING,
ART3 TYPE STRING,
ZULAGE3 TYPE STRING,
ART4 TYPE STRING,
ZULAGE4 TYPE STRING,
ART5 TYPE STRING,
ZULAGE5 TYPE STRING,
ART6 TYPE STRING,
ZULAGE6 TYPE STRING,
ART7 TYPE STRING,
ZULAGE7 TYPE STRING,
ART8 TYPE STRING,
ZULAGE8 TYPE STRING,
EF41 TYPE STRING,
KPRODNR TYPE STRING,
TVART TYPE STRING,
BESTD TYPE STRING,
STAUSGL TYPE STRING,
MOSOZ TYPE STRING,
TRWAZ TYPE STRING,
VDR_BESCHBER TYPE STRING,
VDR_AUFBER TYPE STRING,
VDR_VERSTR TYPE STRING,
VDR_INTERN TYPE STRING,
VWDBR TYPE STRING,
BEFHG TYPE STRING,
STAAT TYPE STRING,
BEMERKUNG TYPE STRING,
BESCHA TYPE STRING,
WGB01 TYPE STRING,
ANT01 TYPE STRING,
WGB02 TYPE STRING,
ANT02 TYPE STRING,
WGB03 TYPE STRING,
ANT03 TYPE STRING,
WGB04 TYPE STRING,
ANT04 TYPE STRING,
WGB05 TYPE STRING,
ANT05 TYPE STRING,
WGB06 TYPE STRING,
ANT06 TYPE STRING,
WGB07 TYPE STRING,
ANT07 TYPE STRING,
WGB08 TYPE STRING,
ANT08 TYPE STRING,
WGB09 TYPE STRING,
ANT09 TYPE STRING,
WGB10 TYPE STRING,
ANT10 TYPE STRING,
WGB11 TYPE STRING,
ANT11 TYPE STRING,
WGB12 TYPE STRING,
ANT12 TYPE STRING,
WGB13 TYPE STRING,
ANT13 TYPE STRING,
WGB14 TYPE STRING,
ANT14 TYPE STRING,
WGB15 TYPE STRING,
ANT15 TYPE STRING,
WGB16 TYPE STRING,
ANT16 TYPE STRING,
WGB17 TYPE STRING,
ANT17 TYPE STRING,
WGB18 TYPE STRING,
ANT18 TYPE STRING,
WGB19 TYPE STRING,
ANT19 TYPE STRING,
WGB20 TYPE STRING,
ANT20 TYPE STRING,
WGB21 TYPE STRING,
ANT21 TYPE STRING,
WGB22 TYPE STRING,
ANT22 TYPE STRING,
WGB23 TYPE STRING,
ANT23 TYPE STRING,
WGB24 TYPE STRING,
ANT24 TYPE STRING,
WGB25 TYPE STRING,
ANT25 TYPE STRING,
GEBJAHR_CHAR4 TYPE STRING,
BEMERKUNG_FA TYPE STRING,
FEHLANZEIGE TYPE STRING,END OF T_EKKO_STR. DATA: WA_P01P_RPSPSTD0_STATAB_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_P01P_RPSPSTD0_STATAB_STR-WERKS sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BTRTL sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-NACHN sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-VORNA sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-TITEL sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-LFDNR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-LAND sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BESCHBER sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BERSTNR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BESCHNR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-STAUFGB sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-KAUFGB sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-GESCH sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-GEBMON sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-GEBJAHR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BESCHUMF sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DIENSTD sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DIENSTA sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-LBGRUPPE sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-EINSTUF sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DIOLAND sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DIORBEZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DIOKREIS sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DIOGEM sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-GEMGRKL sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-KAPLHAUS sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-DLASTUFE sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-FAMSTOZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-KIANTOZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WOHNLAND sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WOHNRBEZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WOHNKREIS sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WOHNGEM sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ARBFAKT sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ARBFAKTU2 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-PLZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-LEER sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-GKZNAME sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-LIEFERANT sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-STEUBRU sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-OWKZN sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-V_LSTNG sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART1 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE1 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART2 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE2 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART3 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE3 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART4 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE4 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART5 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE5 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART6 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE6 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART7 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE7 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ART8 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ZULAGE8 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-EF41 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-KPRODNR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-TVART sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BESTD sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-STAUSGL sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-MOSOZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-TRWAZ sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-VDR_BESCHBER sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-VDR_AUFBER sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-VDR_VERSTR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-VDR_INTERN sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-VWDBR sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BEFHG sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-STAAT sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BEMERKUNG sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BESCHA sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB01 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT01 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB02 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT02 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB03 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT03 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB04 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT04 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB05 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT05 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB06 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT06 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB07 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT07 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB08 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT08 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB09 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT09 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB10 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT10 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB11 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT11 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB12 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT12 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB13 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT13 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB14 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT14 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB15 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT15 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB16 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT16 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB17 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT17 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB18 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT18 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB19 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT19 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB20 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT20 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB21 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT21 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB22 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT22 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB23 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT23 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB24 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT24 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-WGB25 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-ANT25 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-GEBJAHR_CHAR4 sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-BEMERKUNG_FA sy-vline
WA_P01P_RPSPSTD0_STATAB_STR-FEHLANZEIGE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
