ABAP Select data from SAP table RFC_CAPACITY_STR 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 RFC_CAPACITY_STR 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 RFC_CAPACITY_STR. 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 RFC_CAPACITY_STR 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_RFC_CAPACITY_STR TYPE STANDARD TABLE OF RFC_CAPACITY_STR,
      WA_RFC_CAPACITY_STR TYPE RFC_CAPACITY_STR,
      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: <RFC_CAPACITY_STR> TYPE RFC_CAPACITY_STR.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RFC_CAPACITY_STR
*  INTO TABLE @DATA(IT_RFC_CAPACITY_STR2).
*--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_RFC_CAPACITY_STR INDEX 1 INTO DATA(WA_RFC_CAPACITY_STR2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RFC_CAPACITY_STR ASSIGNING <RFC_CAPACITY_STR>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RFC_CAPACITY_STR>-PLANT = 1.
<RFC_CAPACITY_STR>-WORKCENTER_ID = 1.
<RFC_CAPACITY_STR>-WORKCENTER_NAME = 1.
<RFC_CAPACITY_STR>-WORKCENTER_TYPE = 1.
<RFC_CAPACITY_STR>-CAPACITY_LIST = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RFC_CAPACITY_STR-MANDT, sy-vline,
WA_RFC_CAPACITY_STR-KAPID, sy-vline,
WA_RFC_CAPACITY_STR-AZMAX, sy-vline,
WA_RFC_CAPACITY_STR-AZNOR, sy-vline,
WA_RFC_CAPACITY_STR-BASNE, sy-vline,
WA_RFC_CAPACITY_STR-BASZL, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RFC_CAPACITY_STR 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_RFC_CAPACITY_STR 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_RFC_CAPACITY_STR INTO WA_RFC_CAPACITY_STR. *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 CUNIT, internal->external for field MEINS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-MEINS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-MEINS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field KAPEH CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-KAPEH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-KAPEH.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field ANG_UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-ANG_UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-ANG_UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field CAPACITY_A_UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-CAPACITY_A_UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-CAPACITY_A_UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field BUFFERTIME_UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-BUFFERTIME_UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-BUFFERTIME_UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field MIN_OVERLAP_UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-MIN_OVERLAP_UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-MIN_OVERLAP_UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field STORAGE_UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-STORAGE_UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-STORAGE_UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field BR_QUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-BR_QUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-BR_QUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field BR_TUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RFC_CAPACITY_STR-BR_TUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RFC_CAPACITY_STR-BR_TUNIT.
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_RFC_CAPACITY_STR_STR,
PLANT TYPE STRING,
WORKCENTER_ID TYPE STRING,
WORKCENTER_NAME TYPE STRING,
WORKCENTER_TYPE TYPE STRING,
CAPACITY_LIST TYPE STRING,
MANDT TYPE STRING,
KAPID TYPE STRING,
AZMAX TYPE STRING,
AZNOR TYPE STRING,
BASNE TYPE STRING,
BASZL TYPE STRING,
BEGZT TYPE STRING,
BRGRU TYPE STRING,
ENDZT TYPE STRING,
KALID TYPE STRING,
KAPAR TYPE STRING,
MEINS TYPE STRING,
MOSID TYPE STRING,
NAME TYPE STRING,
NGRAD TYPE STRING,
PAUSE TYPE STRING,
PLANR TYPE STRING,
POOLK TYPE STRING,
REFAN TYPE STRING,
REFAZ TYPE STRING,
REFID TYPE STRING,
SUPPK TYPE STRING,
VERSA TYPE STRING,
WERKS TYPE STRING,
KAPIE TYPE STRING,
KAPTER TYPE STRING,
KAPAVO TYPE STRING,
UEBERLAST TYPE STRING,
KAPLPL TYPE STRING,
KAPEH TYPE STRING,
MEHR TYPE STRING,
ANG_UNIT TYPE STRING,
ANG_MIN TYPE STRING,
ANG_MAX TYPE STRING,
LASTCHANGE_DATETIME TYPE STRING,
TYPE TYPE STRING,
RESTYPE TYPE STRING,
CAPACITY_A TYPE STRING,
CAPACITY_A_UNIT TYPE STRING,
NUM_OF_PERIODS TYPE STRING,
PERIOD TYPE STRING,
BUFFERTIME TYPE STRING,
BUFFERTIME_UNIT TYPE STRING,
IS_BOTTLENECK TYPE STRING,
UNDERLOAD TYPE STRING,
OVERLAP_BUCKETS TYPE STRING,
START_ON_GRID TYPE STRING,
MIN_OVERLAP TYPE STRING,
MIN_OVERLAP_UNIT TYPE STRING,
LOSS_FACTOR TYPE STRING,
SORT TYPE STRING,
SYNC_START TYPE STRING,
DEFINE_BUCKETS TYPE STRING,
LC_DAYS_MINUS TYPE STRING,
LC_DAYS_PLUS TYPE STRING,
STORAGE_CAPABLE TYPE STRING,
MIN_STORAGE TYPE STRING,
MAX_STORAGE TYPE STRING,
STORAGE_UNIT TYPE STRING,
DIM_STORAGE TYPE STRING,
STORAGE_TO_ZERO TYPE STRING,
SNPLC TYPE STRING,
UTIL_BUCKET TYPE STRING,
CAMPAIGN_PPDS TYPE STRING,
CAMPAIGN_SNP TYPE STRING,
TSTREAM_EXTERNAL TYPE STRING,
FINITY_LEVEL TYPE STRING,
BR_QUANT TYPE STRING,
BR_QUNIT TYPE STRING,
BR_TIME TYPE STRING,
BR_TUNIT TYPE STRING,
RITT_FLG TYPE STRING,
MDRMODEL TYPE STRING,
PP_DEF_BUCKETS TYPE STRING,
PP_BUCKET_SCHEMA TYPE STRING,
PP_BUCKET_FACT TYPE STRING,
MIX_PLAN_TYPE TYPE STRING,END OF T_EKKO_STR. DATA: WA_RFC_CAPACITY_STR_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_RFC_CAPACITY_STR_STR-PLANT sy-vline
WA_RFC_CAPACITY_STR_STR-WORKCENTER_ID sy-vline
WA_RFC_CAPACITY_STR_STR-WORKCENTER_NAME sy-vline
WA_RFC_CAPACITY_STR_STR-WORKCENTER_TYPE sy-vline
WA_RFC_CAPACITY_STR_STR-CAPACITY_LIST sy-vline
WA_RFC_CAPACITY_STR_STR-MANDT sy-vline
WA_RFC_CAPACITY_STR_STR-KAPID sy-vline
WA_RFC_CAPACITY_STR_STR-AZMAX sy-vline
WA_RFC_CAPACITY_STR_STR-AZNOR sy-vline
WA_RFC_CAPACITY_STR_STR-BASNE sy-vline
WA_RFC_CAPACITY_STR_STR-BASZL sy-vline
WA_RFC_CAPACITY_STR_STR-BEGZT sy-vline
WA_RFC_CAPACITY_STR_STR-BRGRU sy-vline
WA_RFC_CAPACITY_STR_STR-ENDZT sy-vline
WA_RFC_CAPACITY_STR_STR-KALID sy-vline
WA_RFC_CAPACITY_STR_STR-KAPAR sy-vline
WA_RFC_CAPACITY_STR_STR-MEINS sy-vline
WA_RFC_CAPACITY_STR_STR-MOSID sy-vline
WA_RFC_CAPACITY_STR_STR-NAME sy-vline
WA_RFC_CAPACITY_STR_STR-NGRAD sy-vline
WA_RFC_CAPACITY_STR_STR-PAUSE sy-vline
WA_RFC_CAPACITY_STR_STR-PLANR sy-vline
WA_RFC_CAPACITY_STR_STR-POOLK sy-vline
WA_RFC_CAPACITY_STR_STR-REFAN sy-vline
WA_RFC_CAPACITY_STR_STR-REFAZ sy-vline
WA_RFC_CAPACITY_STR_STR-REFID sy-vline
WA_RFC_CAPACITY_STR_STR-SUPPK sy-vline
WA_RFC_CAPACITY_STR_STR-VERSA sy-vline
WA_RFC_CAPACITY_STR_STR-WERKS sy-vline
WA_RFC_CAPACITY_STR_STR-KAPIE sy-vline
WA_RFC_CAPACITY_STR_STR-KAPTER sy-vline
WA_RFC_CAPACITY_STR_STR-KAPAVO sy-vline
WA_RFC_CAPACITY_STR_STR-UEBERLAST sy-vline
WA_RFC_CAPACITY_STR_STR-KAPLPL sy-vline
WA_RFC_CAPACITY_STR_STR-KAPEH sy-vline
WA_RFC_CAPACITY_STR_STR-MEHR sy-vline
WA_RFC_CAPACITY_STR_STR-ANG_UNIT sy-vline
WA_RFC_CAPACITY_STR_STR-ANG_MIN sy-vline
WA_RFC_CAPACITY_STR_STR-ANG_MAX sy-vline
WA_RFC_CAPACITY_STR_STR-LASTCHANGE_DATETIME sy-vline
WA_RFC_CAPACITY_STR_STR-TYPE sy-vline
WA_RFC_CAPACITY_STR_STR-RESTYPE sy-vline
WA_RFC_CAPACITY_STR_STR-CAPACITY_A sy-vline
WA_RFC_CAPACITY_STR_STR-CAPACITY_A_UNIT sy-vline
WA_RFC_CAPACITY_STR_STR-NUM_OF_PERIODS sy-vline
WA_RFC_CAPACITY_STR_STR-PERIOD sy-vline
WA_RFC_CAPACITY_STR_STR-BUFFERTIME sy-vline
WA_RFC_CAPACITY_STR_STR-BUFFERTIME_UNIT sy-vline
WA_RFC_CAPACITY_STR_STR-IS_BOTTLENECK sy-vline
WA_RFC_CAPACITY_STR_STR-UNDERLOAD sy-vline
WA_RFC_CAPACITY_STR_STR-OVERLAP_BUCKETS sy-vline
WA_RFC_CAPACITY_STR_STR-START_ON_GRID sy-vline
WA_RFC_CAPACITY_STR_STR-MIN_OVERLAP sy-vline
WA_RFC_CAPACITY_STR_STR-MIN_OVERLAP_UNIT sy-vline
WA_RFC_CAPACITY_STR_STR-LOSS_FACTOR sy-vline
WA_RFC_CAPACITY_STR_STR-SORT sy-vline
WA_RFC_CAPACITY_STR_STR-SYNC_START sy-vline
WA_RFC_CAPACITY_STR_STR-DEFINE_BUCKETS sy-vline
WA_RFC_CAPACITY_STR_STR-LC_DAYS_MINUS sy-vline
WA_RFC_CAPACITY_STR_STR-LC_DAYS_PLUS sy-vline
WA_RFC_CAPACITY_STR_STR-STORAGE_CAPABLE sy-vline
WA_RFC_CAPACITY_STR_STR-MIN_STORAGE sy-vline
WA_RFC_CAPACITY_STR_STR-MAX_STORAGE sy-vline
WA_RFC_CAPACITY_STR_STR-STORAGE_UNIT sy-vline
WA_RFC_CAPACITY_STR_STR-DIM_STORAGE sy-vline
WA_RFC_CAPACITY_STR_STR-STORAGE_TO_ZERO sy-vline
WA_RFC_CAPACITY_STR_STR-SNPLC sy-vline
WA_RFC_CAPACITY_STR_STR-UTIL_BUCKET sy-vline
WA_RFC_CAPACITY_STR_STR-CAMPAIGN_PPDS sy-vline
WA_RFC_CAPACITY_STR_STR-CAMPAIGN_SNP sy-vline
WA_RFC_CAPACITY_STR_STR-TSTREAM_EXTERNAL sy-vline
WA_RFC_CAPACITY_STR_STR-FINITY_LEVEL sy-vline
WA_RFC_CAPACITY_STR_STR-BR_QUANT sy-vline
WA_RFC_CAPACITY_STR_STR-BR_QUNIT sy-vline
WA_RFC_CAPACITY_STR_STR-BR_TIME sy-vline
WA_RFC_CAPACITY_STR_STR-BR_TUNIT sy-vline
WA_RFC_CAPACITY_STR_STR-RITT_FLG sy-vline
WA_RFC_CAPACITY_STR_STR-MDRMODEL sy-vline
WA_RFC_CAPACITY_STR_STR-PP_DEF_BUCKETS sy-vline
WA_RFC_CAPACITY_STR_STR-PP_BUCKET_SCHEMA sy-vline
WA_RFC_CAPACITY_STR_STR-PP_BUCKET_FACT sy-vline
WA_RFC_CAPACITY_STR_STR-MIX_PLAN_TYPE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.