ABAP Select data from SAP table /BIC/CCTA0000016492 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/CCTA0000016492 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/CCTA0000016492. 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/CCTA0000016492 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/CCTA0000016492 TYPE STANDARD TABLE OF /BIC/CCTA0000016492,
WA_/BIC/CCTA0000016492 TYPE /BIC/CCTA0000016492,
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/CCTA0000016492> TYPE /BIC/CCTA0000016492.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_/BIC/CCTA0000016492.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM /BIC/CCTA0000016492
INTO TABLE IT_/BIC/CCTA0000016492.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM /BIC/CCTA0000016492
* INTO TABLE @DATA(IT_/BIC/CCTA00000164922).
*--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/CCTA0000016492 INDEX 1 INTO DATA(WA_/BIC/CCTA00000164922).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/BIC/CCTA0000016492 ASSIGNING </BIC/CCTA0000016492>.
*To update a field value using a field symbol simply change the value via the field symbol pointer</BIC/CCTA0000016492>-ROCANCEL = 1.
</BIC/CCTA0000016492>-GUID = 1.
</BIC/CCTA0000016492>-EXTERNAL_ID = 1.
</BIC/CCTA0000016492>-PORTFOLIO_GUID = 1.
</BIC/CCTA0000016492>-PARENT_GUID = 1.
ENDLOOP. LOOP AT IT_/BIC/CCTA0000016492 INTO WA_/BIC/CCTA0000016492. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/BIC/CCTA0000016492-CATEGORY, sy-vline,
WA_/BIC/CCTA0000016492-SUBCATEGORY, sy-vline,
WA_/BIC/CCTA0000016492-PHASE, sy-vline,
WA_/BIC/CCTA0000016492-PTYPE, sy-vline,
WA_/BIC/CCTA0000016492-TTYPE, sy-vline,
WA_/BIC/CCTA0000016492-RISKA, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/BIC/CCTA0000016492 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/CCTA0000016492 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/CCTA0000016492 INTO WA_/BIC/CCTA0000016492. *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/CCTA0000016492_STR,
ROCANCEL TYPE STRING,
GUID TYPE STRING,
EXTERNAL_ID TYPE STRING,
PORTFOLIO_GUID TYPE STRING,
PARENT_GUID TYPE STRING,
CATEGORY TYPE STRING,
SUBCATEGORY TYPE STRING,
PHASE TYPE STRING,
PTYPE TYPE STRING,
TTYPE TYPE STRING,
RISKA TYPE STRING,
PROBT TYPE STRING,
PROBC TYPE STRING,
HEADC TYPE STRING,
COSTD TYPE STRING,
COSTL TYPE STRING,
NPV TYPE STRING,
CURRENCY TYPE STRING,
LOCATION TYPE STRING,
GEOGRAPHY TYPE STRING,
PERIODTYPE TYPE STRING,
UNIT TYPE STRING,
FORECAST_START TYPE STRING,
PLANNED_START TYPE STRING,
ACTUAL_START TYPE STRING,
FORECAST_FINISH TYPE STRING,
PLANNED_FINISH TYPE STRING,
ACTUAL_FINISH TYPE STRING,
ESCALATION TYPE STRING,
ITEM_TYPE TYPE STRING,
PORTFL_ITEM_GUID TYPE STRING,
ECV TYPE STRING,
PRIORITY_GROUP TYPE STRING,
CHANGED_BY TYPE STRING,
VERSION_ITEM TYPE STRING,
ITEM_CLASS TYPE STRING,
MASTER_ITEM_GUID TYPE STRING,
EA_DUMMY TYPE STRING,
RISK_PRCNT TYPE STRING,
RISK_GROUP TYPE STRING,
RISK_ICON TYPE STRING,
DERIVED_RISK TYPE STRING,
HEADC_ACTUAL TYPE STRING,
PRIORITY_ICON TYPE STRING,
PHASE_ICON TYPE STRING,
PHASE_COLOR TYPE STRING,
CHANGED_ON TYPE STRING,
VERSION_GUID_H TYPE STRING,
VERSION_TYPE TYPE STRING,
VERSION_ID TYPE STRING,
ORIGINAL_GUID_D TYPE STRING,
VALID_TO TYPE STRING,
MASTER_GUID TYPE STRING,
MASTER_TYPE TYPE STRING,
NAME TYPE STRING,
ORIGINAL_GUID_H TYPE STRING,
CLIENT TYPE STRING,
RPM_CHANGED_ON TYPE STRING,
STATUS TYPE STRING,
RPM_CREATED_ON TYPE STRING,END OF T_EKKO_STR. DATA: WA_/BIC/CCTA0000016492_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/CCTA0000016492_STR-ROCANCEL sy-vline
WA_/BIC/CCTA0000016492_STR-GUID sy-vline
WA_/BIC/CCTA0000016492_STR-EXTERNAL_ID sy-vline
WA_/BIC/CCTA0000016492_STR-PORTFOLIO_GUID sy-vline
WA_/BIC/CCTA0000016492_STR-PARENT_GUID sy-vline
WA_/BIC/CCTA0000016492_STR-CATEGORY sy-vline
WA_/BIC/CCTA0000016492_STR-SUBCATEGORY sy-vline
WA_/BIC/CCTA0000016492_STR-PHASE sy-vline
WA_/BIC/CCTA0000016492_STR-PTYPE sy-vline
WA_/BIC/CCTA0000016492_STR-TTYPE sy-vline
WA_/BIC/CCTA0000016492_STR-RISKA sy-vline
WA_/BIC/CCTA0000016492_STR-PROBT sy-vline
WA_/BIC/CCTA0000016492_STR-PROBC sy-vline
WA_/BIC/CCTA0000016492_STR-HEADC sy-vline
WA_/BIC/CCTA0000016492_STR-COSTD sy-vline
WA_/BIC/CCTA0000016492_STR-COSTL sy-vline
WA_/BIC/CCTA0000016492_STR-NPV sy-vline
WA_/BIC/CCTA0000016492_STR-CURRENCY sy-vline
WA_/BIC/CCTA0000016492_STR-LOCATION sy-vline
WA_/BIC/CCTA0000016492_STR-GEOGRAPHY sy-vline
WA_/BIC/CCTA0000016492_STR-PERIODTYPE sy-vline
WA_/BIC/CCTA0000016492_STR-UNIT sy-vline
WA_/BIC/CCTA0000016492_STR-FORECAST_START sy-vline
WA_/BIC/CCTA0000016492_STR-PLANNED_START sy-vline
WA_/BIC/CCTA0000016492_STR-ACTUAL_START sy-vline
WA_/BIC/CCTA0000016492_STR-FORECAST_FINISH sy-vline
WA_/BIC/CCTA0000016492_STR-PLANNED_FINISH sy-vline
WA_/BIC/CCTA0000016492_STR-ACTUAL_FINISH sy-vline
WA_/BIC/CCTA0000016492_STR-ESCALATION sy-vline
WA_/BIC/CCTA0000016492_STR-ITEM_TYPE sy-vline
WA_/BIC/CCTA0000016492_STR-PORTFL_ITEM_GUID sy-vline
WA_/BIC/CCTA0000016492_STR-ECV sy-vline
WA_/BIC/CCTA0000016492_STR-PRIORITY_GROUP sy-vline
WA_/BIC/CCTA0000016492_STR-CHANGED_BY sy-vline
WA_/BIC/CCTA0000016492_STR-VERSION_ITEM sy-vline
WA_/BIC/CCTA0000016492_STR-ITEM_CLASS sy-vline
WA_/BIC/CCTA0000016492_STR-MASTER_ITEM_GUID sy-vline
WA_/BIC/CCTA0000016492_STR-EA_DUMMY sy-vline
WA_/BIC/CCTA0000016492_STR-RISK_PRCNT sy-vline
WA_/BIC/CCTA0000016492_STR-RISK_GROUP sy-vline
WA_/BIC/CCTA0000016492_STR-RISK_ICON sy-vline
WA_/BIC/CCTA0000016492_STR-DERIVED_RISK sy-vline
WA_/BIC/CCTA0000016492_STR-HEADC_ACTUAL sy-vline
WA_/BIC/CCTA0000016492_STR-PRIORITY_ICON sy-vline
WA_/BIC/CCTA0000016492_STR-PHASE_ICON sy-vline
WA_/BIC/CCTA0000016492_STR-PHASE_COLOR sy-vline
WA_/BIC/CCTA0000016492_STR-CHANGED_ON sy-vline
WA_/BIC/CCTA0000016492_STR-VERSION_GUID_H sy-vline
WA_/BIC/CCTA0000016492_STR-VERSION_TYPE sy-vline
WA_/BIC/CCTA0000016492_STR-VERSION_ID sy-vline
WA_/BIC/CCTA0000016492_STR-ORIGINAL_GUID_D sy-vline
WA_/BIC/CCTA0000016492_STR-VALID_TO sy-vline
WA_/BIC/CCTA0000016492_STR-MASTER_GUID sy-vline
WA_/BIC/CCTA0000016492_STR-MASTER_TYPE sy-vline
WA_/BIC/CCTA0000016492_STR-NAME sy-vline
WA_/BIC/CCTA0000016492_STR-ORIGINAL_GUID_H sy-vline
WA_/BIC/CCTA0000016492_STR-CLIENT sy-vline
WA_/BIC/CCTA0000016492_STR-RPM_CHANGED_ON sy-vline
WA_/BIC/CCTA0000016492_STR-STATUS sy-vline
WA_/BIC/CCTA0000016492_STR-RPM_CREATED_ON sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
