ABAP Select data from SAP table PKR_YEAR_DEPENDANT_AMT 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 PKR_YEAR_DEPENDANT_AMT 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 PKR_YEAR_DEPENDANT_AMT. 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 PKR_YEAR_DEPENDANT_AMT 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_PKR_YEAR_DEPENDANT_AMT TYPE STANDARD TABLE OF PKR_YEAR_DEPENDANT_AMT,
      WA_PKR_YEAR_DEPENDANT_AMT TYPE PKR_YEAR_DEPENDANT_AMT,
      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: <PKR_YEAR_DEPENDANT_AMT> TYPE PKR_YEAR_DEPENDANT_AMT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PKR_YEAR_DEPENDANT_AMT
*  INTO TABLE @DATA(IT_PKR_YEAR_DEPENDANT_AMT2).
*--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_PKR_YEAR_DEPENDANT_AMT INDEX 1 INTO DATA(WA_PKR_YEAR_DEPENDANT_AMT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PKR_YEAR_DEPENDANT_AMT>-INSNA = 1.
<PKR_YEAR_DEPENDANT_AMT>-INSOT = 1.
<PKR_YEAR_DEPENDANT_AMT>-MEDNA = 1.
<PKR_YEAR_DEPENDANT_AMT>-MEDOT = 1.
<PKR_YEAR_DEPENDANT_AMT>-EDUNA = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PKR_YEAR_DEPENDANT_AMT-EDUOT, sy-vline,
  WA_PKR_YEAR_DEPENDANT_AMT-CRENA, sy-vline,
  WA_PKR_YEAR_DEPENDANT_AMT-CREOT, sy-vline,
  WA_PKR_YEAR_DEPENDANT_AMT-CASNA, sy-vline,
  WA_PKR_YEAR_DEPENDANT_AMT-CASOT, sy-vline,
  WA_PKR_YEAR_DEPENDANT_AMT-DONNA, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PKR_YEAR_DEPENDANT_AMT 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_PKR_YEAR_DEPENDANT_AMT 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_PKR_YEAR_DEPENDANT_AMT INTO WA_PKR_YEAR_DEPENDANT_AMT.


*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_PKR_YEAR_DEPENDANT_AMT_STR, 
INSNA TYPE STRING,
INSOT TYPE STRING,
MEDNA TYPE STRING,
MEDOT TYPE STRING,
EDUNA TYPE STRING,
EDUOT TYPE STRING,
CRENA TYPE STRING,
CREOT TYPE STRING,
CASNA TYPE STRING,
CASOT TYPE STRING,
DONNA TYPE STRING,
DONOT TYPE STRING,
DEBNA TYPE STRING,
DEBOT TYPE STRING,
GIRNA TYPE STRING,
GIROT TYPE STRING,
TRDNA TYPE STRING,
TRDOT TYPE STRING,
TRANA TYPE STRING,
TRAOT TYPE STRING,
SINNA TYPE STRING,
SINOT TYPE STRING,
SIHNA TYPE STRING,
SIHOT TYPE STRING,
IEINA TYPE STRING,
IEIOT TYPE STRING,
MFSNA TYPE STRING,
MFSOT TYPE STRING,
MHDNA TYPE STRING,
MHDOT TYPE STRING,
EHDNA TYPE STRING,
EHDOT TYPE STRING,
BPFNA TYPE STRING,
BPFOT TYPE STRING,
MPINA TYPE STRING,
MPIOT TYPE STRING,
ERONA TYPE STRING,
EROOT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PKR_YEAR_DEPENDANT_AMT_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_PKR_YEAR_DEPENDANT_AMT_STR-INSNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-INSOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MEDNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MEDOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-EDUNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-EDUOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-CRENA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-CREOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-CASNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-CASOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-DONNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-DONOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-DEBNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-DEBOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-GIRNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-GIROT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-TRDNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-TRDOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-TRANA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-TRAOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-SINNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-SINOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-SIHNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-SIHOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-IEINA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-IEIOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MFSNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MFSOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MHDNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MHDOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-EHDNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-EHDOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-BPFNA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-BPFOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MPINA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-MPIOT sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-ERONA sy-vline 
WA_PKR_YEAR_DEPENDANT_AMT_STR-EROOT sy-vline      INTO ld_text SEPARATED BY SPACE.

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