ABAP Select data from SAP table ISSR_COLL_AMOUNT_DYNPRO 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 ISSR_COLL_AMOUNT_DYNPRO 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 ISSR_COLL_AMOUNT_DYNPRO. 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 ISSR_COLL_AMOUNT_DYNPRO 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_ISSR_COLL_AMOUNT_DYNPRO TYPE STANDARD TABLE OF ISSR_COLL_AMOUNT_DYNPRO,
      WA_ISSR_COLL_AMOUNT_DYNPRO TYPE ISSR_COLL_AMOUNT_DYNPRO,
      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: <ISSR_COLL_AMOUNT_DYNPRO> TYPE ISSR_COLL_AMOUNT_DYNPRO.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ISSR_COLL_AMOUNT_DYNPRO
*  INTO TABLE @DATA(IT_ISSR_COLL_AMOUNT_DYNPRO2).
*--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_ISSR_COLL_AMOUNT_DYNPRO INDEX 1 INTO DATA(WA_ISSR_COLL_AMOUNT_DYNPRO2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_ISSR_COLL_AMOUNT_DYNPRO ASSIGNING <ISSR_COLL_AMOUNT_DYNPRO>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<ISSR_COLL_AMOUNT_DYNPRO>-MANDT = 1.
<ISSR_COLL_AMOUNT_DYNPRO>-ISSR_MFT_GUID = 1.
<ISSR_COLL_AMOUNT_DYNPRO>-MW_GUID = 1.
<ISSR_COLL_AMOUNT_DYNPRO>-COUNTRY_VAR = 1.
<ISSR_COLL_AMOUNT_DYNPRO>-BUKRS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ISSR_COLL_AMOUNT_DYNPRO-PRODUCT_CATEGORY, sy-vline,
WA_ISSR_COLL_AMOUNT_DYNPRO-PRODUCT_TYPE, sy-vline,
WA_ISSR_COLL_AMOUNT_DYNPRO-ASSET_NR, sy-vline,
WA_ISSR_COLL_AMOUNT_DYNPRO-SEC_ACCOUNT, sy-vline,
WA_ISSR_COLL_AMOUNT_DYNPRO-PORTFOLIO, sy-vline,
WA_ISSR_COLL_AMOUNT_DYNPRO-ACCOUNT_GRP, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ISSR_COLL_AMOUNT_DYNPRO 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_ISSR_COLL_AMOUNT_DYNPRO 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_ISSR_COLL_AMOUNT_DYNPRO INTO WA_ISSR_COLL_AMOUNT_DYNPRO. *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 ASSET_NR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISSR_COLL_AMOUNT_DYNPRO-ASSET_NR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISSR_COLL_AMOUNT_DYNPRO-ASSET_NR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field VVKEY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISSR_COLL_AMOUNT_DYNPRO-VVKEY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISSR_COLL_AMOUNT_DYNPRO-VVKEY.
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_ISSR_COLL_AMOUNT_DYNPRO_STR,
MANDT TYPE STRING,
ISSR_MFT_GUID TYPE STRING,
MW_GUID TYPE STRING,
COUNTRY_VAR TYPE STRING,
BUKRS TYPE STRING,
PRODUCT_CATEGORY TYPE STRING,
PRODUCT_TYPE TYPE STRING,
ASSET_NR TYPE STRING,
SEC_ACCOUNT TYPE STRING,
PORTFOLIO TYPE STRING,
ACCOUNT_GRP TYPE STRING,
BUDAT TYPE STRING,
NUMB_TP_DAY TYPE STRING,
SPARTE TYPE STRING,
STOCKBAV TYPE STRING,
STOCKFA TYPE STRING,
DV TYPE STRING,
DVUA TYPE STRING,
ABS54AVAG TYPE STRING,
NW101 TYPE STRING,
NW102 TYPE STRING,
NW201 TYPE STRING,
NW600 TYPE STRING,
NW670 TYPE STRING,
NW671 TYPE STRING,
R59703 TYPE STRING,
R59704 TYPE STRING,
R59705 TYPE STRING,
R59706 TYPE STRING,
R59708 TYPE STRING,
R59710_1 TYPE STRING,
R59710_2 TYPE STRING,
R59710_3 TYPE STRING,
R59710_4 TYPE STRING,
ANRWERT TYPE STRING,
ANRWERTWHR TYPE STRING,
VERKEHRSW TYPE STRING,
VERKEHRSWWHR TYPE STRING,
BEDECKWHR TYPE STRING,
GENAKTZ TYPE STRING,
GENDAT TYPE STRING,
ANRWERTDAT TYPE STRING,
ANRWERTAKTZ TYPE STRING,
AUFBLAND TYPE STRING,
AUFBWORT TYPE STRING,
DURCHR_FONDS TYPE STRING,
ATTRIBUTE_LI01 TYPE STRING,
ATTRIBUTE_LI02 TYPE STRING,
ATTRIBUTE_LI03 TYPE STRING,
ATTRIBUTE_LI04 TYPE STRING,
ATTRIBUTE_LI05 TYPE STRING,
IDENTNR TYPE STRING,
IDENTNRH TYPE STRING,
RANTYP TYPE STRING,
VVKEY TYPE STRING,
OBJNR TYPE STRING,
NUMB_PER_ASSET TYPE STRING,
ECOMPONENT TYPE STRING,
EPGM TYPE STRING,
ENAME TYPE STRING,
EDATUM TYPE STRING,
ETIME TYPE STRING,
NEW_EXT_ID TYPE STRING,
MASTER_REC_KEY TYPE STRING,
FLG_SECONDARY TYPE STRING,
SIGN_IDENT TYPE STRING,
FLG_INVESTMENT TYPE STRING,
ASSET_TYPE TYPE STRING,
RVAL_AREA TYPE STRING,
RTCUR_SEL TYPE STRING,
TSL_SEL TYPE STRING,
HSL_SEL TYPE STRING,
KSL_SEL TYPE STRING,
MSL_SEL TYPE STRING,
ASL_SEL TYPE STRING,
HWCUR_SEL TYPE STRING,
NWBTR_SEL TYPE STRING,
NWCUR_SEL TYPE STRING,
HSL_ACT TYPE STRING,
HWCUR_ACT TYPE STRING,
NWBTR_ACT TYPE STRING,
NWCUR_ACT TYPE STRING,
RTCUR_ACT TYPE STRING,
TSL_ACT TYPE STRING,
KSL_ACT TYPE STRING,
MSL_ACT TYPE STRING,
ASL_ACT TYPE STRING,
BUDAT_ACT TYPE STRING,
STATUS TYPE STRING,
STATUS_TP TYPE STRING,
MARK TYPE STRING,
SL_ID_CHANGEONLY TYPE STRING,END OF T_EKKO_STR. DATA: WA_ISSR_COLL_AMOUNT_DYNPRO_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_ISSR_COLL_AMOUNT_DYNPRO_STR-MANDT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ISSR_MFT_GUID sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-MW_GUID sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-COUNTRY_VAR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-BUKRS sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-PRODUCT_CATEGORY sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-PRODUCT_TYPE sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ASSET_NR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-SEC_ACCOUNT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-PORTFOLIO sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ACCOUNT_GRP sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-BUDAT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NUMB_TP_DAY sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-SPARTE sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-STOCKBAV sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-STOCKFA sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-DV sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-DVUA sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ABS54AVAG sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NW101 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NW102 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NW201 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NW600 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NW670 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NW671 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59703 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59704 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59705 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59706 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59708 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59710_1 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59710_2 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59710_3 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-R59710_4 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ANRWERT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ANRWERTWHR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-VERKEHRSW sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-VERKEHRSWWHR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-BEDECKWHR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-GENAKTZ sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-GENDAT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ANRWERTDAT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ANRWERTAKTZ sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-AUFBLAND sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-AUFBWORT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-DURCHR_FONDS sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ATTRIBUTE_LI01 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ATTRIBUTE_LI02 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ATTRIBUTE_LI03 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ATTRIBUTE_LI04 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ATTRIBUTE_LI05 sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-IDENTNR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-IDENTNRH sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-RANTYP sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-VVKEY sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-OBJNR sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NUMB_PER_ASSET sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ECOMPONENT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-EPGM sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ENAME sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-EDATUM sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ETIME sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NEW_EXT_ID sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-MASTER_REC_KEY sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-FLG_SECONDARY sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-SIGN_IDENT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-FLG_INVESTMENT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ASSET_TYPE sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-RVAL_AREA sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-RTCUR_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-TSL_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-HSL_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-KSL_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-MSL_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ASL_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-HWCUR_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NWBTR_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NWCUR_SEL sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-HSL_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-HWCUR_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NWBTR_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-NWCUR_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-RTCUR_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-TSL_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-KSL_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-MSL_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-ASL_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-BUDAT_ACT sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-STATUS sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-STATUS_TP sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-MARK sy-vline
WA_ISSR_COLL_AMOUNT_DYNPRO_STR-SL_ID_CHANGEONLY sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.