ABAP Select data from SAP table /BIC/CCTA0RPM_PM_01 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 /BIC/CCTA0RPM_PM_01 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 /BIC/CCTA0RPM_PM_01. 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 /BIC/CCTA0RPM_PM_01 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_/BIC/CCTA0RPM_PM_01 TYPE STANDARD TABLE OF /BIC/CCTA0RPM_PM_01,
WA_/BIC/CCTA0RPM_PM_01 TYPE /BIC/CCTA0RPM_PM_01,
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: </BIC/CCTA0RPM_PM_01> TYPE /BIC/CCTA0RPM_PM_01.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_/BIC/CCTA0RPM_PM_01.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM /BIC/CCTA0RPM_PM_01
INTO TABLE IT_/BIC/CCTA0RPM_PM_01.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM /BIC/CCTA0RPM_PM_01
* INTO TABLE @DATA(IT_/BIC/CCTA0RPM_PM_012).
*--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_/BIC/CCTA0RPM_PM_01 INDEX 1 INTO DATA(WA_/BIC/CCTA0RPM_PM_012).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/BIC/CCTA0RPM_PM_01 ASSIGNING </BIC/CCTA0RPM_PM_01>.
*To update a field value using a field symbol simply change the value via the field symbol pointer</BIC/CCTA0RPM_PM_01>-GUID = 1.
</BIC/CCTA0RPM_PM_01>-EXTERNAL_ID = 1.
</BIC/CCTA0RPM_PM_01>-PROJ_DESCRIPTION = 1.
</BIC/CCTA0RPM_PM_01>-ACTUALSTART = 1.
</BIC/CCTA0RPM_PM_01>-ACTUALFINISH = 1.
ENDLOOP. LOOP AT IT_/BIC/CCTA0RPM_PM_01 INTO WA_/BIC/CCTA0RPM_PM_01. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/BIC/CCTA0RPM_PM_01-PLANSTART, sy-vline,
WA_/BIC/CCTA0RPM_PM_01-PLANFINISH, sy-vline,
WA_/BIC/CCTA0RPM_PM_01-DELIVERY_DATE, sy-vline,
WA_/BIC/CCTA0RPM_PM_01-ACTUAL_DURATION, sy-vline,
WA_/BIC/CCTA0RPM_PM_01-PLAN_DURATION, sy-vline,
WA_/BIC/CCTA0RPM_PM_01-DURATION_UNIT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/BIC/CCTA0RPM_PM_01 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_/BIC/CCTA0RPM_PM_01 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_/BIC/CCTA0RPM_PM_01 INTO WA_/BIC/CCTA0RPM_PM_01. *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_/BIC/CCTA0RPM_PM_01_STR,
GUID TYPE STRING,
EXTERNAL_ID TYPE STRING,
PROJ_DESCRIPTION TYPE STRING,
ACTUALSTART TYPE STRING,
ACTUALFINISH TYPE STRING,
PLANSTART TYPE STRING,
PLANFINISH TYPE STRING,
DELIVERY_DATE TYPE STRING,
ACTUAL_DURATION TYPE STRING,
PLAN_DURATION TYPE STRING,
DURATION_UNIT TYPE STRING,
CATEGORY TYPE STRING,
SUBCATEGORY TYPE STRING,
PHASE TYPE STRING,
PTYPE TYPE STRING,
PTEST TYPE STRING,
CTEST TYPE STRING,
TTYPE TYPE STRING,
APSTAT TYPE STRING,
APSTAT_GROUP TYPE STRING,
EXSTAT TYPE STRING,
EXSTAT_GROUP TYPE STRING,
PPRIO TYPE STRING,
RISKA TYPE STRING,
PROBT TYPE STRING,
PROBC TYPE STRING,
HEADC TYPE STRING,
BUDGT TYPE STRING,
COSTF TYPE STRING,
COSTA TYPE STRING,
COSTD TYPE STRING,
COSTL TYPE STRING,
NPV TYPE STRING,
WAERS TYPE STRING,
LOCATION TYPE STRING,
GEOGRAPHY TYPE STRING,
COUNTRY TYPE STRING,
REGION TYPE STRING,
POST_CODE TYPE STRING,
ACTUAL_HEADCOUNT TYPE STRING,
ECV TYPE STRING,
PROPOSED TYPE STRING,
DERIVED_RISK TYPE STRING,
START_VARIANCE TYPE STRING,
END_VARIANCE TYPE STRING,
DUR_VARIANCE TYPE STRING,
HEAD_VARIANCE TYPE STRING,
COST_VARIANCE TYPE STRING,
COST_TD_VARIANCE TYPE STRING,
ACTUAL_WORK TYPE STRING,
PLANNED_WORK TYPE STRING,
WORK_UNITS TYPE STRING,
BASELINE_START TYPE STRING,
BASELINE_FINISH TYPE STRING,
COSTF_TD TYPE STRING,
COSTA_TD TYPE STRING,
ANNUAL_BUDGET TYPE STRING,
IS_MASTER TYPE STRING,
PARENT_ID TYPE STRING,
PRIORITY_GROUP TYPE STRING,
BUDGET_GROUP TYPE STRING,
SCHEDULE_GROUP TYPE STRING,
RISK_GROUP TYPE STRING,
STAFFING_GROUP TYPE STRING,
AMOUNT1 TYPE STRING,
AMOUNT2 TYPE STRING,
AMOUNT3 TYPE STRING,
AMOUNT4 TYPE STRING,
AMOUNT5 TYPE STRING,
NUMBER1 TYPE STRING,
NUMBER2 TYPE STRING,
NUMBER3 TYPE STRING,
NUMBER4 TYPE STRING,
NUMBER5 TYPE STRING,
AMOUNT6 TYPE STRING,
AMOUNT7 TYPE STRING,
AMOUNT8 TYPE STRING,
AMOUNT9 TYPE STRING,
AMOUNT10 TYPE STRING,
NUMBER6 TYPE STRING,
NUMBER7 TYPE STRING,
NUMBER8 TYPE STRING,
NUMBER9 TYPE STRING,
NUMBER10 TYPE STRING,
SUM_HEADC TYPE STRING,
SUM_BUDGT TYPE STRING,
SUM_COSTF TYPE STRING,
SUM_COSTA TYPE STRING,
SUM_COSTD TYPE STRING,
SUM_COSTL TYPE STRING,
SUM_NPV TYPE STRING,
SUM_A_HEADCOUNT TYPE STRING,
SUM_COSTF_TD TYPE STRING,
SUM_COSTA_TD TYPE STRING,
SUM_A_BUDGET TYPE STRING,
SUM_V_COST TYPE STRING,
SUM_V_HEADCOUNT TYPE STRING,
SUM_V_COST_TD TYPE STRING,
SUM_ECV TYPE STRING,
AVG_PROBT TYPE STRING,
AVG_PROBC TYPE STRING,END OF T_EKKO_STR. DATA: WA_/BIC/CCTA0RPM_PM_01_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_/BIC/CCTA0RPM_PM_01_STR-GUID sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-EXTERNAL_ID sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PROJ_DESCRIPTION sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ACTUALSTART sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ACTUALFINISH sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PLANSTART sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PLANFINISH sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-DELIVERY_DATE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ACTUAL_DURATION sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PLAN_DURATION sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-DURATION_UNIT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-CATEGORY sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUBCATEGORY sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PHASE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PTYPE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PTEST sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-CTEST sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-TTYPE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-APSTAT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-APSTAT_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-EXSTAT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-EXSTAT_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PPRIO sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-RISKA sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PROBT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PROBC sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-HEADC sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-BUDGT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COSTF sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COSTA sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COSTD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COSTL sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NPV sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-WAERS sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-LOCATION sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-GEOGRAPHY sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COUNTRY sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-REGION sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-POST_CODE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ACTUAL_HEADCOUNT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ECV sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PROPOSED sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-DERIVED_RISK sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-START_VARIANCE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-END_VARIANCE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-DUR_VARIANCE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-HEAD_VARIANCE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COST_VARIANCE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COST_TD_VARIANCE sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ACTUAL_WORK sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PLANNED_WORK sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-WORK_UNITS sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-BASELINE_START sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-BASELINE_FINISH sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COSTF_TD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-COSTA_TD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-ANNUAL_BUDGET sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-IS_MASTER sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PARENT_ID sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-PRIORITY_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-BUDGET_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SCHEDULE_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-RISK_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-STAFFING_GROUP sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT1 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT2 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT3 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT4 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT5 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER1 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER2 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER3 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER4 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER5 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT6 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT7 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT8 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT9 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AMOUNT10 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER6 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER7 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER8 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER9 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-NUMBER10 sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_HEADC sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_BUDGT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_COSTF sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_COSTA sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_COSTD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_COSTL sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_NPV sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_A_HEADCOUNT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_COSTF_TD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_COSTA_TD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_A_BUDGET sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_V_COST sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_V_HEADCOUNT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_V_COST_TD sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-SUM_ECV sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AVG_PROBT sy-vline
WA_/BIC/CCTA0RPM_PM_01_STR-AVG_PROBC sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
