ABAP Select data from SAP table PRU_RSV1_T24 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 PRU_RSV1_T24 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 PRU_RSV1_T24. 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 PRU_RSV1_T24 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_PRU_RSV1_T24 TYPE STANDARD TABLE OF PRU_RSV1_T24,
      WA_PRU_RSV1_T24 TYPE PRU_RSV1_T24,
      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: <PRU_RSV1_T24> TYPE PRU_RSV1_T24.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PRU_RSV1_T24
*  INTO TABLE @DATA(IT_PRU_RSV1_T242).
*--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_PRU_RSV1_T24 INDEX 1 INTO DATA(WA_PRU_RSV1_T242).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PRU_RSV1_T24 ASSIGNING <PRU_RSV1_T24>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PRU_RSV1_T24>-KODOS = 1.
<PRU_RSV1_T24>-OSNZP = 1.
<PRU_RSV1_T24>-T2403 = 1.
<PRU_RSV1_T24>-T2404 = 1.
<PRU_RSV1_T24>-T2405 = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PRU_RSV1_T24-T2406, sy-vline,
WA_PRU_RSV1_T24-T2413, sy-vline,
WA_PRU_RSV1_T24-T2414, sy-vline,
WA_PRU_RSV1_T24-T2415, sy-vline,
WA_PRU_RSV1_T24-T2416, sy-vline,
WA_PRU_RSV1_T24-T2433, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PRU_RSV1_T24 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_PRU_RSV1_T24 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_PRU_RSV1_T24 INTO WA_PRU_RSV1_T24. *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_PRU_RSV1_T24_STR,
KODOS TYPE STRING,
OSNZP TYPE STRING,
T2403 TYPE STRING,
T2404 TYPE STRING,
T2405 TYPE STRING,
T2406 TYPE STRING,
T2413 TYPE STRING,
T2414 TYPE STRING,
T2415 TYPE STRING,
T2416 TYPE STRING,
T2433 TYPE STRING,
T2434 TYPE STRING,
T2435 TYPE STRING,
T2436 TYPE STRING,
T2443 TYPE STRING,
T2444 TYPE STRING,
T2445 TYPE STRING,
T2446 TYPE STRING,
T2453 TYPE STRING,
T2454 TYPE STRING,
T2455 TYPE STRING,
T2456 TYPE STRING,
T2463 TYPE STRING,
T2464 TYPE STRING,
T2465 TYPE STRING,
T2466 TYPE STRING,
T2473 TYPE STRING,
T2474 TYPE STRING,
T2475 TYPE STRING,
T2476 TYPE STRING,
T2493 TYPE STRING,
T2494 TYPE STRING,
T2495 TYPE STRING,
T2496 TYPE STRING,
T2503 TYPE STRING,
T2504 TYPE STRING,
T2505 TYPE STRING,
T2506 TYPE STRING,
T2513 TYPE STRING,
T2514 TYPE STRING,
T2515 TYPE STRING,
T2516 TYPE STRING,
T2523 TYPE STRING,
T2524 TYPE STRING,
T2525 TYPE STRING,
T2526 TYPE STRING,
T2533 TYPE STRING,
T2534 TYPE STRING,
T2535 TYPE STRING,
T2536 TYPE STRING,
T2553 TYPE STRING,
T2554 TYPE STRING,
T2555 TYPE STRING,
T2556 TYPE STRING,
T2563 TYPE STRING,
T2564 TYPE STRING,
T2565 TYPE STRING,
T2566 TYPE STRING,
T2573 TYPE STRING,
T2574 TYPE STRING,
T2575 TYPE STRING,
T2576 TYPE STRING,
T2583 TYPE STRING,
T2584 TYPE STRING,
T2585 TYPE STRING,
T2586 TYPE STRING,
T2593 TYPE STRING,
T2594 TYPE STRING,
T2595 TYPE STRING,
T2596 TYPE STRING,
T2613 TYPE STRING,
T2614 TYPE STRING,
T2615 TYPE STRING,
T2616 TYPE STRING,
T2623 TYPE STRING,
T2624 TYPE STRING,
T2625 TYPE STRING,
T2626 TYPE STRING,
T2633 TYPE STRING,
T2634 TYPE STRING,
T2635 TYPE STRING,
T2636 TYPE STRING,
T2643 TYPE STRING,
T2644 TYPE STRING,
T2645 TYPE STRING,
T2646 TYPE STRING,
T2653 TYPE STRING,
T2654 TYPE STRING,
T2655 TYPE STRING,
T2656 TYPE STRING,
T2673 TYPE STRING,
T2674 TYPE STRING,
T2675 TYPE STRING,
T2676 TYPE STRING,
T2683 TYPE STRING,
T2684 TYPE STRING,
T2685 TYPE STRING,
T2686 TYPE STRING,
T2693 TYPE STRING,
T2694 TYPE STRING,
T2695 TYPE STRING,
T2696 TYPE STRING,END OF T_EKKO_STR. DATA: WA_PRU_RSV1_T24_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_PRU_RSV1_T24_STR-KODOS sy-vline
WA_PRU_RSV1_T24_STR-OSNZP sy-vline
WA_PRU_RSV1_T24_STR-T2403 sy-vline
WA_PRU_RSV1_T24_STR-T2404 sy-vline
WA_PRU_RSV1_T24_STR-T2405 sy-vline
WA_PRU_RSV1_T24_STR-T2406 sy-vline
WA_PRU_RSV1_T24_STR-T2413 sy-vline
WA_PRU_RSV1_T24_STR-T2414 sy-vline
WA_PRU_RSV1_T24_STR-T2415 sy-vline
WA_PRU_RSV1_T24_STR-T2416 sy-vline
WA_PRU_RSV1_T24_STR-T2433 sy-vline
WA_PRU_RSV1_T24_STR-T2434 sy-vline
WA_PRU_RSV1_T24_STR-T2435 sy-vline
WA_PRU_RSV1_T24_STR-T2436 sy-vline
WA_PRU_RSV1_T24_STR-T2443 sy-vline
WA_PRU_RSV1_T24_STR-T2444 sy-vline
WA_PRU_RSV1_T24_STR-T2445 sy-vline
WA_PRU_RSV1_T24_STR-T2446 sy-vline
WA_PRU_RSV1_T24_STR-T2453 sy-vline
WA_PRU_RSV1_T24_STR-T2454 sy-vline
WA_PRU_RSV1_T24_STR-T2455 sy-vline
WA_PRU_RSV1_T24_STR-T2456 sy-vline
WA_PRU_RSV1_T24_STR-T2463 sy-vline
WA_PRU_RSV1_T24_STR-T2464 sy-vline
WA_PRU_RSV1_T24_STR-T2465 sy-vline
WA_PRU_RSV1_T24_STR-T2466 sy-vline
WA_PRU_RSV1_T24_STR-T2473 sy-vline
WA_PRU_RSV1_T24_STR-T2474 sy-vline
WA_PRU_RSV1_T24_STR-T2475 sy-vline
WA_PRU_RSV1_T24_STR-T2476 sy-vline
WA_PRU_RSV1_T24_STR-T2493 sy-vline
WA_PRU_RSV1_T24_STR-T2494 sy-vline
WA_PRU_RSV1_T24_STR-T2495 sy-vline
WA_PRU_RSV1_T24_STR-T2496 sy-vline
WA_PRU_RSV1_T24_STR-T2503 sy-vline
WA_PRU_RSV1_T24_STR-T2504 sy-vline
WA_PRU_RSV1_T24_STR-T2505 sy-vline
WA_PRU_RSV1_T24_STR-T2506 sy-vline
WA_PRU_RSV1_T24_STR-T2513 sy-vline
WA_PRU_RSV1_T24_STR-T2514 sy-vline
WA_PRU_RSV1_T24_STR-T2515 sy-vline
WA_PRU_RSV1_T24_STR-T2516 sy-vline
WA_PRU_RSV1_T24_STR-T2523 sy-vline
WA_PRU_RSV1_T24_STR-T2524 sy-vline
WA_PRU_RSV1_T24_STR-T2525 sy-vline
WA_PRU_RSV1_T24_STR-T2526 sy-vline
WA_PRU_RSV1_T24_STR-T2533 sy-vline
WA_PRU_RSV1_T24_STR-T2534 sy-vline
WA_PRU_RSV1_T24_STR-T2535 sy-vline
WA_PRU_RSV1_T24_STR-T2536 sy-vline
WA_PRU_RSV1_T24_STR-T2553 sy-vline
WA_PRU_RSV1_T24_STR-T2554 sy-vline
WA_PRU_RSV1_T24_STR-T2555 sy-vline
WA_PRU_RSV1_T24_STR-T2556 sy-vline
WA_PRU_RSV1_T24_STR-T2563 sy-vline
WA_PRU_RSV1_T24_STR-T2564 sy-vline
WA_PRU_RSV1_T24_STR-T2565 sy-vline
WA_PRU_RSV1_T24_STR-T2566 sy-vline
WA_PRU_RSV1_T24_STR-T2573 sy-vline
WA_PRU_RSV1_T24_STR-T2574 sy-vline
WA_PRU_RSV1_T24_STR-T2575 sy-vline
WA_PRU_RSV1_T24_STR-T2576 sy-vline
WA_PRU_RSV1_T24_STR-T2583 sy-vline
WA_PRU_RSV1_T24_STR-T2584 sy-vline
WA_PRU_RSV1_T24_STR-T2585 sy-vline
WA_PRU_RSV1_T24_STR-T2586 sy-vline
WA_PRU_RSV1_T24_STR-T2593 sy-vline
WA_PRU_RSV1_T24_STR-T2594 sy-vline
WA_PRU_RSV1_T24_STR-T2595 sy-vline
WA_PRU_RSV1_T24_STR-T2596 sy-vline
WA_PRU_RSV1_T24_STR-T2613 sy-vline
WA_PRU_RSV1_T24_STR-T2614 sy-vline
WA_PRU_RSV1_T24_STR-T2615 sy-vline
WA_PRU_RSV1_T24_STR-T2616 sy-vline
WA_PRU_RSV1_T24_STR-T2623 sy-vline
WA_PRU_RSV1_T24_STR-T2624 sy-vline
WA_PRU_RSV1_T24_STR-T2625 sy-vline
WA_PRU_RSV1_T24_STR-T2626 sy-vline
WA_PRU_RSV1_T24_STR-T2633 sy-vline
WA_PRU_RSV1_T24_STR-T2634 sy-vline
WA_PRU_RSV1_T24_STR-T2635 sy-vline
WA_PRU_RSV1_T24_STR-T2636 sy-vline
WA_PRU_RSV1_T24_STR-T2643 sy-vline
WA_PRU_RSV1_T24_STR-T2644 sy-vline
WA_PRU_RSV1_T24_STR-T2645 sy-vline
WA_PRU_RSV1_T24_STR-T2646 sy-vline
WA_PRU_RSV1_T24_STR-T2653 sy-vline
WA_PRU_RSV1_T24_STR-T2654 sy-vline
WA_PRU_RSV1_T24_STR-T2655 sy-vline
WA_PRU_RSV1_T24_STR-T2656 sy-vline
WA_PRU_RSV1_T24_STR-T2673 sy-vline
WA_PRU_RSV1_T24_STR-T2674 sy-vline
WA_PRU_RSV1_T24_STR-T2675 sy-vline
WA_PRU_RSV1_T24_STR-T2676 sy-vline
WA_PRU_RSV1_T24_STR-T2683 sy-vline
WA_PRU_RSV1_T24_STR-T2684 sy-vline
WA_PRU_RSV1_T24_STR-T2685 sy-vline
WA_PRU_RSV1_T24_STR-T2686 sy-vline
WA_PRU_RSV1_T24_STR-T2693 sy-vline
WA_PRU_RSV1_T24_STR-T2694 sy-vline
WA_PRU_RSV1_T24_STR-T2695 sy-vline
WA_PRU_RSV1_T24_STR-T2696 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.