ABAP Select data from SAP table PLMCHGRECD_D 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 PLMCHGRECD_D 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 PLMCHGRECD_D. 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 PLMCHGRECD_D 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_PLMCHGRECD_D TYPE STANDARD TABLE OF PLMCHGRECD_D,
      WA_PLMCHGRECD_D TYPE PLMCHGRECD_D,
      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: <PLMCHGRECD_D> TYPE PLMCHGRECD_D.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PLMCHGRECD_D
*  INTO TABLE @DATA(IT_PLMCHGRECD_D2).
*--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_PLMCHGRECD_D INDEX 1 INTO DATA(WA_PLMCHGRECD_D2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PLMCHGRECD_D ASSIGNING <PLMCHGRECD_D>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PLMCHGRECD_D>-MANDT = 1.
<PLMCHGRECD_D>-CHANGERECORDUUID = 1.
<PLMCHGRECD_D>-CHANGERECORD = 1.
<PLMCHGRECD_D>-CHANGERECORDTYPE = 1.
<PLMCHGRECD_D>-PARENTCHANGERECORDUUID = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PLMCHGRECD_D-ROOTCHANGERECORDUUID, sy-vline,
  WA_PLMCHGRECD_D-CHANGERECORDPRIORITY, sy-vline,
  WA_PLMCHGRECD_D-CHANGERECORDSTATUS, sy-vline,
  WA_PLMCHGRECD_D-ACCESSCONTROLCONTEXT, sy-vline,
  WA_PLMCHGRECD_D-LOGACCMSECUREIDOWNERID, sy-vline,
  WA_PLMCHGRECD_D-CHANGENUMBER, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PLMCHGRECD_D 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_PLMCHGRECD_D 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_PLMCHGRECD_D INTO WA_PLMCHGRECD_D.


*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 ALPHA, internal->external for field CHANGERECORD
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PLMCHGRECD_D-CHANGERECORD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PLMCHGRECD_D-CHANGERECORD.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CHANGERECORDPRIORITY
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PLMCHGRECD_D-CHANGERECORDPRIORITY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PLMCHGRECD_D-CHANGERECORDPRIORITY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CHANGENUMBER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PLMCHGRECD_D-CHANGENUMBER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PLMCHGRECD_D-CHANGENUMBER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PARTNER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PLMCHGRECD_D-PARTNER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PLMCHGRECD_D-PARTNER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CHGRECDINITIATEDSTATUSACTION
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PLMCHGRECD_D-CHGRECDINITIATEDSTATUSACTION
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PLMCHGRECD_D-CHGRECDINITIATEDSTATUSACTION.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field REFCR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PLMCHGRECD_D-REFCR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PLMCHGRECD_D-REFCR.
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_PLMCHGRECD_D_STR, 
MANDT TYPE STRING,
CHANGERECORDUUID TYPE STRING,
CHANGERECORD TYPE STRING,
CHANGERECORDTYPE TYPE STRING,
PARENTCHANGERECORDUUID TYPE STRING,
ROOTCHANGERECORDUUID TYPE STRING,
CHANGERECORDPRIORITY TYPE STRING,
CHANGERECORDSTATUS TYPE STRING,
ACCESSCONTROLCONTEXT TYPE STRING,
LOGACCMSECUREIDOWNERID TYPE STRING,
CHANGENUMBER TYPE STRING,
CREATEDBYUSER TYPE STRING,
CREATIONDATETIME TYPE STRING,
LASTCHANGEDBYUSER TYPE STRING,
LASTCHANGEDATETIME TYPE STRING,
PARTNER TYPE STRING,
CHANGERECORDLIFECYCLESTATUS TYPE STRING,
CHGRECDDIGITALSIGNATURESTATUS TYPE STRING,
CHGRECORDDESCRIPTIONTEXT TYPE STRING,
CHGRECDEXPECTEDCOMPLETIONDATE TYPE STRING,
CHANGERECORDDETAILDESCRIPTION TYPE STRING,
CHGRECDHDREXTNUUID TYPE STRING,
CHGRECDINITIATEDSTATUSACTION TYPE STRING,
CHGRECDENGEFFECTIVEDATE TYPE STRING,
CHGRECDMFGEFFECTIVEDATE TYPE STRING,
CHANGERECORDITEMISNOTEDITABLE TYPE STRING,
CHANGERECORDITMISADDDELENABLED TYPE STRING,
CHANGERECORDITEMEDITMODE TYPE STRING,
ACTIVEUUID TYPE STRING,
HASACTIVEENTITY TYPE STRING,
DRAFTENTITYCREATIONDATETIME TYPE STRING,
DRAFTENTITYLASTCHANGEDATETIME TYPE STRING,
DRAFTADMINISTRATIVEDATAUUID TYPE STRING,
DRAFTENTITYCONSISTENCYSTATUS TYPE STRING,
DRAFTENTITYOPERATIONCODE TYPE STRING,
I_ROOT TYPE STRING,
/CPD/MC_MP_GUID TYPE STRING,
ARCHIVING TYPE STRING,
OBJECT_GUID TYPE STRING,
IDENTIFY_STAGE TYPE STRING,
RISK_ID TYPE STRING,
CAT_ID TYPE STRING,
SUB_CAT_ID TYPE STRING,
RISK_TXT TYPE STRING,
PROBABILITY_ID TYPE STRING,
SEVERITY_ID TYPE STRING,
RISK_LEVEL_ID TYPE STRING,
RISK_STATUS TYPE STRING,
EST_COST_IMPACT TYPE STRING,
EST_SHDL_DELAY TYPE STRING,
RESP_TYPE TYPE STRING,
RESP_STATUS TYPE STRING,
RISK_MIT_COST TYPE STRING,
RM_CURRENCY TYPE STRING,
RISK_OPPT TYPE STRING,
COST TYPE STRING,
SCHEDULE TYPE STRING,
QUALITY TYPE STRING,
SCOPE TYPE STRING,
VERSION_GUID TYPE STRING,
MIGRATION_SOURCE TYPE STRING,
EST_COST TYPE STRING,
CURRENCY TYPE STRING,
EST_DELAY TYPE STRING,
EST_DELAY_TYPE TYPE STRING,
SEND_NOTI TYPE STRING,
STAT_CD TYPE STRING,
REFCR TYPE STRING,
CRCAT TYPE STRING,
PLAN_ID TYPE STRING,
PLAN_VERSION TYPE STRING,
PLAN_VERSION_ID TYPE STRING,
PLAN_VERSION_TYPE TYPE STRING,
MASTER_PROJ TYPE STRING,
PICM_LCYCLE_CD TYPE STRING,
PROBABILITY TYPE STRING,
ARCHIVING_STATUS TYPE STRING,
PLAN_KEY TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PLMCHGRECD_D_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_PLMCHGRECD_D_STR-MANDT sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDUUID sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORD sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDTYPE sy-vline 
WA_PLMCHGRECD_D_STR-PARENTCHANGERECORDUUID sy-vline 
WA_PLMCHGRECD_D_STR-ROOTCHANGERECORDUUID sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDPRIORITY sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDSTATUS sy-vline 
WA_PLMCHGRECD_D_STR-ACCESSCONTROLCONTEXT sy-vline 
WA_PLMCHGRECD_D_STR-LOGACCMSECUREIDOWNERID sy-vline 
WA_PLMCHGRECD_D_STR-CHANGENUMBER sy-vline 
WA_PLMCHGRECD_D_STR-CREATEDBYUSER sy-vline 
WA_PLMCHGRECD_D_STR-CREATIONDATETIME sy-vline 
WA_PLMCHGRECD_D_STR-LASTCHANGEDBYUSER sy-vline 
WA_PLMCHGRECD_D_STR-LASTCHANGEDATETIME sy-vline 
WA_PLMCHGRECD_D_STR-PARTNER sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDLIFECYCLESTATUS sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECDDIGITALSIGNATURESTATUS sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECORDDESCRIPTIONTEXT sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECDEXPECTEDCOMPLETIONDATE sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDDETAILDESCRIPTION sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECDHDREXTNUUID sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECDINITIATEDSTATUSACTION sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECDENGEFFECTIVEDATE sy-vline 
WA_PLMCHGRECD_D_STR-CHGRECDMFGEFFECTIVEDATE sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDITEMISNOTEDITABLE sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDITMISADDDELENABLED sy-vline 
WA_PLMCHGRECD_D_STR-CHANGERECORDITEMEDITMODE sy-vline 
WA_PLMCHGRECD_D_STR-ACTIVEUUID sy-vline 
WA_PLMCHGRECD_D_STR-HASACTIVEENTITY sy-vline 
WA_PLMCHGRECD_D_STR-DRAFTENTITYCREATIONDATETIME sy-vline 
WA_PLMCHGRECD_D_STR-DRAFTENTITYLASTCHANGEDATETIME sy-vline 
WA_PLMCHGRECD_D_STR-DRAFTADMINISTRATIVEDATAUUID sy-vline 
WA_PLMCHGRECD_D_STR-DRAFTENTITYCONSISTENCYSTATUS sy-vline 
WA_PLMCHGRECD_D_STR-DRAFTENTITYOPERATIONCODE sy-vline 
WA_PLMCHGRECD_D_STR-I_ROOT sy-vline 
WA_PLMCHGRECD_D_STR-/CPD/MC_MP_GUID sy-vline 
WA_PLMCHGRECD_D_STR-ARCHIVING sy-vline 
WA_PLMCHGRECD_D_STR-OBJECT_GUID sy-vline 
WA_PLMCHGRECD_D_STR-IDENTIFY_STAGE sy-vline 
WA_PLMCHGRECD_D_STR-RISK_ID sy-vline 
WA_PLMCHGRECD_D_STR-CAT_ID sy-vline 
WA_PLMCHGRECD_D_STR-SUB_CAT_ID sy-vline 
WA_PLMCHGRECD_D_STR-RISK_TXT sy-vline 
WA_PLMCHGRECD_D_STR-PROBABILITY_ID sy-vline 
WA_PLMCHGRECD_D_STR-SEVERITY_ID sy-vline 
WA_PLMCHGRECD_D_STR-RISK_LEVEL_ID sy-vline 
WA_PLMCHGRECD_D_STR-RISK_STATUS sy-vline 
WA_PLMCHGRECD_D_STR-EST_COST_IMPACT sy-vline 
WA_PLMCHGRECD_D_STR-EST_SHDL_DELAY sy-vline 
WA_PLMCHGRECD_D_STR-RESP_TYPE sy-vline 
WA_PLMCHGRECD_D_STR-RESP_STATUS sy-vline 
WA_PLMCHGRECD_D_STR-RISK_MIT_COST sy-vline 
WA_PLMCHGRECD_D_STR-RM_CURRENCY sy-vline 
WA_PLMCHGRECD_D_STR-RISK_OPPT sy-vline 
WA_PLMCHGRECD_D_STR-COST sy-vline 
WA_PLMCHGRECD_D_STR-SCHEDULE sy-vline 
WA_PLMCHGRECD_D_STR-QUALITY sy-vline 
WA_PLMCHGRECD_D_STR-SCOPE sy-vline 
WA_PLMCHGRECD_D_STR-VERSION_GUID sy-vline 
WA_PLMCHGRECD_D_STR-MIGRATION_SOURCE sy-vline 
WA_PLMCHGRECD_D_STR-EST_COST sy-vline 
WA_PLMCHGRECD_D_STR-CURRENCY sy-vline 
WA_PLMCHGRECD_D_STR-EST_DELAY sy-vline 
WA_PLMCHGRECD_D_STR-EST_DELAY_TYPE sy-vline 
WA_PLMCHGRECD_D_STR-SEND_NOTI sy-vline 
WA_PLMCHGRECD_D_STR-STAT_CD sy-vline 
WA_PLMCHGRECD_D_STR-REFCR sy-vline 
WA_PLMCHGRECD_D_STR-CRCAT sy-vline 
WA_PLMCHGRECD_D_STR-PLAN_ID sy-vline 
WA_PLMCHGRECD_D_STR-PLAN_VERSION sy-vline 
WA_PLMCHGRECD_D_STR-PLAN_VERSION_ID sy-vline 
WA_PLMCHGRECD_D_STR-PLAN_VERSION_TYPE sy-vline 
WA_PLMCHGRECD_D_STR-MASTER_PROJ sy-vline 
WA_PLMCHGRECD_D_STR-PICM_LCYCLE_CD sy-vline 
WA_PLMCHGRECD_D_STR-PROBABILITY sy-vline 
WA_PLMCHGRECD_D_STR-ARCHIVING_STATUS sy-vline 
WA_PLMCHGRECD_D_STR-PLAN_KEY sy-vline      INTO ld_text SEPARATED BY SPACE.

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