ABAP Select data from SAP table IDUNNINGENTRY 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 IDUNNINGENTRY 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 IDUNNINGENTRY. 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 IDUNNINGENTRY 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_IDUNNINGENTRY TYPE STANDARD TABLE OF IDUNNINGENTRY,
      WA_IDUNNINGENTRY TYPE IDUNNINGENTRY,
      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: <IDUNNINGENTRY> TYPE IDUNNINGENTRY.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IDUNNINGENTRY
*  INTO TABLE @DATA(IT_IDUNNINGENTRY2).
*--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_IDUNNINGENTRY INDEX 1 INTO DATA(WA_IDUNNINGENTRY2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<IDUNNINGENTRY>-MANDT = 1.
<IDUNNINGENTRY>-DUNNINGRUNDATE = 1.
<IDUNNINGENTRY>-DUNNINGRUN = 1.
<IDUNNINGENTRY>-FINANCIALACCOUNTTYPE = 1.
<IDUNNINGENTRY>-COMPANYCODE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IDUNNINGENTRY-CUSTOMER, sy-vline,
  WA_IDUNNINGENTRY-SUPPLIER, sy-vline,
  WA_IDUNNINGENTRY-ONETIMEACCTBANKACCOUNT, sy-vline,
  WA_IDUNNINGENTRY-CUSTOMERHEADOFFICE, sy-vline,
  WA_IDUNNINGENTRY-GROUPINGDUNNINGAREA, sy-vline,
  WA_IDUNNINGENTRY-GROUPINGDUNNINGLEVEL, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_IDUNNINGENTRY 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_IDUNNINGENTRY 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_IDUNNINGENTRY INTO WA_IDUNNINGENTRY.


*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 CUSTOMER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-CUSTOMER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-CUSTOMER.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AC152, internal->external for field DUNAREAACCTBALANCEDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUNAREAACCTBALANCEDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUNAREAACCTBALANCEDUNCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUNAREAACCTBALANCECCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUNAREAACCTBALANCECCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUNAREAACCTBALANCECCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUEITEMSBLOCKEDINDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUEITEMSBLOCKEDINDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUEITEMSBLOCKEDINDUNCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field NOTDUEITEMSBLOCKEDINDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-NOTDUEITEMSBLOCKEDINDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-NOTDUEITEMSBLOCKEDINDUNCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUELINEITEMSTOTALINDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUELINEITEMSTOTALINDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUELINEITEMSTOTALINDUNCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUELINEITEMSTOTALINCCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUELINEITEMSTOTALINCCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUELINEITEMSTOTALINCCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field INTERESTAMOUNTINDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-INTERESTAMOUNTINDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-INTERESTAMOUNTINDUNCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field INTERESTAMOUNTINCCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-INTERESTAMOUNTINCCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-INTERESTAMOUNTINCCCRCY.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit IMKEY, internal->external for field REALESTATEOBJECT
CALL FUNCTION 'CONVERSION_EXIT_IMKEY_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-REALESTATEOBJECT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-REALESTATEOBJECT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUEITEMDUNLEVELTOTALINDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUEITEMDUNLEVELTOTALINDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUEITEMDUNLEVELTOTALINDUNCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUEITEMDUNLEVELTOTALINCCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUEITEMDUNLEVELTOTALINCCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUEITEMDUNLEVELTOTALINCCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUNNINGCHARGEINCCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUNNINGCHARGEINCCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUNNINGCHARGEINCCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field DUNNINGCHARGEINDUNCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_IDUNNINGENTRY-DUNNINGCHARGEINDUNCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IDUNNINGENTRY-DUNNINGCHARGEINDUNCRCY.
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_IDUNNINGENTRY_STR, 
MANDT TYPE STRING,
DUNNINGRUNDATE TYPE STRING,
DUNNINGRUN TYPE STRING,
FINANCIALACCOUNTTYPE TYPE STRING,
COMPANYCODE TYPE STRING,
CUSTOMER TYPE STRING,
SUPPLIER TYPE STRING,
ONETIMEACCTBANKACCOUNT TYPE STRING,
CUSTOMERHEADOFFICE TYPE STRING,
GROUPINGDUNNINGAREA TYPE STRING,
GROUPINGDUNNINGLEVEL TYPE STRING,
DUNNINGCLERK TYPE STRING,
DUNNINGDATE TYPE STRING,
DOCINCLDUPTOPOSTGDATE TYPE STRING,
DUNNINGRECIPIENT TYPE STRING,
LEGDUNNINGPROCEDUREON TYPE STRING,
DUNNINGPROCEDURE TYPE STRING,
DUNNINGLEVEL TYPE STRING,
INTERESTCALCULATIONCODE TYPE STRING,
DUNNINGCURRENCY TYPE STRING,
DUNAREAACCTBALANCEDUNCRCY TYPE STRING,
DUNAREAACCTBALANCECCCRCY TYPE STRING,
DUEITEMSBLOCKEDINDUNCRCY TYPE STRING,
NOTDUEITEMSBLOCKEDINDUNCRCY TYPE STRING,
DUELINEITEMSTOTALINDUNCRCY TYPE STRING,
DUELINEITEMSTOTALINCCCRCY TYPE STRING,
DUNNINGNOTICEISSENT TYPE STRING,
DUNNINGBLOCKINGREASON TYPE STRING,
MAXIMUMDUNNINGLEVEL TYPE STRING,
INTERESTAMOUNTINDUNCRCY TYPE STRING,
INTERESTAMOUNTINCCCRCY TYPE STRING,
INTERESTISNOTDISPLAYED TYPE STRING,
DUNNINGNOTICEGROUP TYPE STRING,
TREASURYCONTRACT TYPE STRING,
TREASURYCONTRACTTYPE TYPE STRING,
REALESTATEOBJECT TYPE STRING,
DUEITEMDUNLEVELTOTALINDUNCRCY TYPE STRING,
DUEITEMDUNLEVELTOTALINCCCRCY TYPE STRING,
POSTALCODE TYPE STRING,
CITYNAME TYPE STRING,
STREETNAME TYPE STRING,
POBOX TYPE STRING,
COUNTRY TYPE STRING,
PAYMENTADVICE TYPE STRING,
BUSTRANSEVENTAPPLICATION TYPE STRING,
DUNNINGCHARGEINCCCRCY TYPE STRING,
DUNNINGCHARGEINDUNCRCY TYPE STRING,
DUNNINGPRINTDATE TYPE STRING,
LASTDUNNINGPRNTDATE TYPE STRING,END OF T_EKKO_STR.
DATA: WA_IDUNNINGENTRY_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_IDUNNINGENTRY_STR-MANDT sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGRUNDATE sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGRUN sy-vline 
WA_IDUNNINGENTRY_STR-FINANCIALACCOUNTTYPE sy-vline 
WA_IDUNNINGENTRY_STR-COMPANYCODE sy-vline 
WA_IDUNNINGENTRY_STR-CUSTOMER sy-vline 
WA_IDUNNINGENTRY_STR-SUPPLIER sy-vline 
WA_IDUNNINGENTRY_STR-ONETIMEACCTBANKACCOUNT sy-vline 
WA_IDUNNINGENTRY_STR-CUSTOMERHEADOFFICE sy-vline 
WA_IDUNNINGENTRY_STR-GROUPINGDUNNINGAREA sy-vline 
WA_IDUNNINGENTRY_STR-GROUPINGDUNNINGLEVEL sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGCLERK sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGDATE sy-vline 
WA_IDUNNINGENTRY_STR-DOCINCLDUPTOPOSTGDATE sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGRECIPIENT sy-vline 
WA_IDUNNINGENTRY_STR-LEGDUNNINGPROCEDUREON sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGPROCEDURE sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGLEVEL sy-vline 
WA_IDUNNINGENTRY_STR-INTERESTCALCULATIONCODE sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGCURRENCY sy-vline 
WA_IDUNNINGENTRY_STR-DUNAREAACCTBALANCEDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUNAREAACCTBALANCECCCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUEITEMSBLOCKEDINDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-NOTDUEITEMSBLOCKEDINDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUELINEITEMSTOTALINDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUELINEITEMSTOTALINCCCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGNOTICEISSENT sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGBLOCKINGREASON sy-vline 
WA_IDUNNINGENTRY_STR-MAXIMUMDUNNINGLEVEL sy-vline 
WA_IDUNNINGENTRY_STR-INTERESTAMOUNTINDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-INTERESTAMOUNTINCCCRCY sy-vline 
WA_IDUNNINGENTRY_STR-INTERESTISNOTDISPLAYED sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGNOTICEGROUP sy-vline 
WA_IDUNNINGENTRY_STR-TREASURYCONTRACT sy-vline 
WA_IDUNNINGENTRY_STR-TREASURYCONTRACTTYPE sy-vline 
WA_IDUNNINGENTRY_STR-REALESTATEOBJECT sy-vline 
WA_IDUNNINGENTRY_STR-DUEITEMDUNLEVELTOTALINDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUEITEMDUNLEVELTOTALINCCCRCY sy-vline 
WA_IDUNNINGENTRY_STR-POSTALCODE sy-vline 
WA_IDUNNINGENTRY_STR-CITYNAME sy-vline 
WA_IDUNNINGENTRY_STR-STREETNAME sy-vline 
WA_IDUNNINGENTRY_STR-POBOX sy-vline 
WA_IDUNNINGENTRY_STR-COUNTRY sy-vline 
WA_IDUNNINGENTRY_STR-PAYMENTADVICE sy-vline 
WA_IDUNNINGENTRY_STR-BUSTRANSEVENTAPPLICATION sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGCHARGEINCCCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGCHARGEINDUNCRCY sy-vline 
WA_IDUNNINGENTRY_STR-DUNNINGPRINTDATE sy-vline 
WA_IDUNNINGENTRY_STR-LASTDUNNINGPRNTDATE sy-vline      INTO ld_text SEPARATED BY SPACE.

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