ABAP Select data from SAP table /CPD/PFPS_RM_BROADCAST into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP /CPD/PFPS_RM_BROADCAST 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 /CPD/PFPS_RM_BROADCAST. 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 /CPD/PFPS_RM_BROADCAST 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_/CPD/PFPS_RM_BROADCAST TYPE STANDARD TABLE OF /CPD/PFPS_RM_BROADCAST,
      WA_/CPD/PFPS_RM_BROADCAST TYPE /CPD/PFPS_RM_BROADCAST,
      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: </CPD/PFPS_RM_BROADCAST> TYPE /CPD/PFPS_RM_BROADCAST.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /CPD/PFPS_RM_BROADCAST
  INTO TABLE IT_/CPD/PFPS_RM_BROADCAST.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /CPD/PFPS_RM_BROADCAST
*  INTO TABLE @DATA(IT_/CPD/PFPS_RM_BROADCAST2).
*--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_/CPD/PFPS_RM_BROADCAST INDEX 1 INTO DATA(WA_/CPD/PFPS_RM_BROADCAST2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/CPD/PFPS_RM_BROADCAST ASSIGNING </CPD/PFPS_RM_BROADCAST>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</CPD/PFPS_RM_BROADCAST>-GUID = 1.
</CPD/PFPS_RM_BROADCAST>-REQUEST_NUMBER = 1.
</CPD/PFPS_RM_BROADCAST>-ROLE_NUMBER = 1.
</CPD/PFPS_RM_BROADCAST>-BCRID = 1.
</CPD/PFPS_RM_BROADCAST>-BCRIDTY = 1.

ENDLOOP.

LOOP AT IT_/CPD/PFPS_RM_BROADCAST INTO WA_/CPD/PFPS_RM_BROADCAST.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/CPD/PFPS_RM_BROADCAST-BCDONE, sy-vline,
  WA_/CPD/PFPS_RM_BROADCAST-TIMESTAMP, sy-vline,
  WA_/CPD/PFPS_RM_BROADCAST-REBCF, sy-vline,
  WA_/CPD/PFPS_RM_BROADCAST-CANCEL, sy-vline,
  WA_/CPD/PFPS_RM_BROADCAST-DESCRIPTION, sy-vline,
  WA_/CPD/PFPS_RM_BROADCAST-BCSTATUS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/CPD/PFPS_RM_BROADCAST 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_/CPD/PFPS_RM_BROADCAST 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_/CPD/PFPS_RM_BROADCAST INTO WA_/CPD/PFPS_RM_BROADCAST.


*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 DURATION_UNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_/CPD/PFPS_RM_BROADCAST-DURATION_UNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/CPD/PFPS_RM_BROADCAST-DURATION_UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field TOTAL_WORK_UNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_/CPD/PFPS_RM_BROADCAST-TOTAL_WORK_UNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/CPD/PFPS_RM_BROADCAST-TOTAL_WORK_UNIT.
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_/CPD/PFPS_RM_BROADCAST_STR, 
GUID TYPE STRING,
REQUEST_NUMBER TYPE STRING,
ROLE_NUMBER TYPE STRING,
BCRID TYPE STRING,
BCRIDTY TYPE STRING,
BCDONE TYPE STRING,
TIMESTAMP TYPE STRING,
REBCF TYPE STRING,
CANCEL TYPE STRING,
DESCRIPTION TYPE STRING,
BCSTATUS TYPE STRING,
BCDATE TYPE STRING,
VGRPID TYPE STRING,
VERSION_NO TYPE STRING,
STATUS TYPE STRING,
KEY_EXT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SEARCH_GROUP_DESC TYPE STRING,
SEARCH_PARTY_ID TYPE STRING,
SEARCH_PARTY_NAME TYPE STRING,
VAL_FROM TYPE STRING,
VAL_TO TYPE STRING,
PLAN_FROM TYPE STRING,
PLAN_TO TYPE STRING,
EARL_START TYPE STRING,
LAT_START TYPE STRING,
EARL_END TYPE STRING,
LAT_END TYPE STRING,
SCHED_FROM TYPE STRING,
SCHED_TO TYPE STRING,
DURATION TYPE STRING,
DURATION_UNIT TYPE STRING,
TOTAL_WORK TYPE STRING,
TOTAL_WORK_UNIT TYPE STRING,
MULT_RES TYPE STRING,
VBKZ TYPE STRING,
DEMAND_GUID TYPE STRING,
SOURCE_ORG TYPE STRING,
SOURCE_ORG_DESC TYPE STRING,
VISIBLE TYPE STRING,
INC_BROADCAST TYPE STRING,
CREATED_BY_RQSTR TYPE STRING,
VGRP_DESCRIPTION TYPE STRING,
CREATED_BY TYPE STRING,
CREATED_ON TYPE STRING,
CHANGED_BY TYPE STRING,
CHANGED_ON TYPE STRING,
CREATEDUSER TYPE STRING,
CHANGEDUSER TYPE STRING,
CHANGED_AT TYPE STRING,
DURATION_UI TYPE STRING,
BC_BY_OTHER_SP TYPE STRING,
EDITABLE TYPE STRING,
MESSAGE_TAB TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/CPD/PFPS_RM_BROADCAST_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_/CPD/PFPS_RM_BROADCAST_STR-GUID sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-REQUEST_NUMBER sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-ROLE_NUMBER sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-BCRID sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-BCRIDTY sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-BCDONE sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-TIMESTAMP sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-REBCF sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CANCEL sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-DESCRIPTION sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-BCSTATUS sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-BCDATE sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VGRPID sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VERSION_NO sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-STATUS sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-KEY_EXT sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-PLVAR sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-OTYPE sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-OBJID sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SEARCH_GROUP_DESC sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SEARCH_PARTY_ID sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SEARCH_PARTY_NAME sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VAL_FROM sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VAL_TO sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-PLAN_FROM sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-PLAN_TO sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-EARL_START sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-LAT_START sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-EARL_END sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-LAT_END sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SCHED_FROM sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SCHED_TO sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-DURATION sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-DURATION_UNIT sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-TOTAL_WORK sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-TOTAL_WORK_UNIT sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-MULT_RES sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VBKZ sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-DEMAND_GUID sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SOURCE_ORG sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-SOURCE_ORG_DESC sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VISIBLE sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-INC_BROADCAST sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CREATED_BY_RQSTR sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-VGRP_DESCRIPTION sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CREATED_BY sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CREATED_ON sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CHANGED_BY sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CHANGED_ON sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CREATEDUSER sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CHANGEDUSER sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-CHANGED_AT sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-DURATION_UI sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-BC_BY_OTHER_SP sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-EDITABLE sy-vline 
WA_/CPD/PFPS_RM_BROADCAST_STR-MESSAGE_TAB sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.