ABAP Select data from SAP table IEINFRECHANDINST 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 IEINFRECHANDINST 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 IEINFRECHANDINST. 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 IEINFRECHANDINST 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_IEINFRECHANDINST TYPE STANDARD TABLE OF IEINFRECHANDINST,
      WA_IEINFRECHANDINST TYPE IEINFRECHANDINST,
      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: <IEINFRECHANDINST> TYPE IEINFRECHANDINST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IEINFRECHANDINST
*  INTO TABLE @DATA(IT_IEINFRECHANDINST2).
*--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_IEINFRECHANDINST INDEX 1 INTO DATA(WA_IEINFRECHANDINST2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IEINFRECHANDINST ASSIGNING <IEINFRECHANDINST>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IEINFRECHANDINST>-MANDT = 1.
<IEINFRECHANDINST>-UTILITIESINSTALLATION = 1.
<IEINFRECHANDINST>-UTILITIESLOGICALDEVICENUMBER = 1.
<IEINFRECHANDINST>-UTILSDVCERATEDATAVALDTYENDDTE = 1.
<IEINFRECHANDINST>-UTILSDVCERATEDATAVALDTYSTRTDTE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IEINFRECHANDINST-UTILSDEVICEPRICECLASS, sy-vline,
WA_IEINFRECHANDINST-UTILSDVCEISRELEVANTFORRNTLPRC, sy-vline,
WA_IEINFRECHANDINST-UTILSDEVICERATETYPE, sy-vline,
WA_IEINFRECHANDINST-UTILSDEVICERATEFACTGROUP, sy-vline,
WA_IEINFRECHANDINST-UTILSDVCEISNOTBILLINGRELEVANT, sy-vline,
WA_IEINFRECHANDINST-UTILITIESDEVICEINFORECORD, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IEINFRECHANDINST 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_IEINFRECHANDINST 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_IEINFRECHANDINST INTO WA_IEINFRECHANDINST. *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 UTILITIESINSTALLATION CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEINFRECHANDINST-UTILITIESINSTALLATION IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEINFRECHANDINST-UTILITIESINSTALLATION.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MATN1, internal->external for field UTILITIESDEVICECATEGORY CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_IEINFRECHANDINST-UTILITIESDEVICECATEGORY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEINFRECHANDINST-UTILITIESDEVICECATEGORY.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit GERNR, internal->external for field SERIALNUMBER CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT' EXPORTING input = WA_IEINFRECHANDINST-SERIALNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEINFRECHANDINST-SERIALNUMBER.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field HIGHERLEVELUTILSINSTALLATION CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEINFRECHANDINST-HIGHERLEVELUTILSINSTALLATION IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEINFRECHANDINST-HIGHERLEVELUTILSINSTALLATION.
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_IEINFRECHANDINST_STR,
MANDT TYPE STRING,
UTILITIESINSTALLATION TYPE STRING,
UTILITIESLOGICALDEVICENUMBER TYPE STRING,
UTILSDVCERATEDATAVALDTYENDDTE TYPE STRING,
UTILSDVCERATEDATAVALDTYSTRTDTE TYPE STRING,
UTILSDEVICEPRICECLASS TYPE STRING,
UTILSDVCEISRELEVANTFORRNTLPRC TYPE STRING,
UTILSDEVICERATETYPE TYPE STRING,
UTILSDEVICERATEFACTGROUP TYPE STRING,
UTILSDVCEISNOTBILLINGRELEVANT TYPE STRING,
UTILITIESDEVICEINFORECORD TYPE STRING,
UTILSDEVICEVALIDITYENDDATE TYPE STRING,
UTILSDEVICEVALIDITYSTARTDATE TYPE STRING,
UTILITIESREGISTERGROUP TYPE STRING,
UTILITIESDEVICECATEGORY TYPE STRING,
UTILSDEVICEBSCCATCOMBINATION TYPE STRING,
UTILSDEVICEINSTALLATIONDATE TYPE STRING,
UTILSDEVICEREMOVALDATE TYPE STRING,
UTILSDEVICEGROUP TYPE STRING,
UTILITIESPREPAYMENTMETERTYPE TYPE STRING,
UTILSDEVICELOSSDETNGROUP TYPE STRING,
DVCEPWRTRNSFRMTRPRIMVOLTVAL TYPE STRING,
DVCEPWRTRNSFRMTRSECDRYVOLTVAL TYPE STRING,
DVCEPWRTRNSFRMTRTRNSFRATINGVAL TYPE STRING,
ADVANCEDMETERINGSYSTEM TYPE STRING,
ADVANCEDMETERCAPABILITYGROUP TYPE STRING,
UNIQUEITEMIDENTIFIER TYPE STRING,
UTILSDEVICEWINDINGGROUP TYPE STRING,
UTILSDEVICEINFORECDSRVCPRVD TYPE STRING,
SERIALNUMBER TYPE STRING,
UTILSINFORECDAUTHORIZATIONGRP TYPE STRING,
UTILITIESINSTALLATIONTYPE TYPE STRING,
UTILITIESINSTVOLTAGELEVEL TYPE STRING,
UTILITIESINSTGASPRSSRLVL TYPE STRING,
UTILSINSTTIMEZONE TYPE STRING,
UTILSINSTGUAROFSUPREASON TYPE STRING,
UTILSINSTDEREGULATIONSTS TYPE STRING,
UTILSINSTDATARELEASESTATUS TYPE STRING,
UTILITIESSRVCPROVIDERROLE TYPE STRING,
UTILSINSTISFORENERGYFEEDIN TYPE STRING,
UTILSINSTCREATIONDATE TYPE STRING,
UTILSINSTCREATEDBYUSER TYPE STRING,
UTILSINSTLASTCHANGEDATE TYPE STRING,
UTILSINSTLASTCHANGEDBYUSER TYPE STRING,
METERREADINGBLOCKINGREASON TYPE STRING,
METERREADINGBASEPERIODCAT TYPE STRING,
NMBROFALLWDMTRRDNGSCNTRLCODE TYPE STRING,
ISMARKEDFORDELETION TYPE STRING,
UTILITIESPREMISE TYPE STRING,
AUTHORIZATIONGROUP TYPE STRING,
DIVISION TYPE STRING,
UTILSINSTHISTVALIDITYENDDATE TYPE STRING,
UTILSINSTHISTVALIDITYSTARTDATE TYPE STRING,
UTILITIESRATECATEGORY TYPE STRING,
UTILITIESBILLINGSCHEMA TYPE STRING,
UTILITIESBILLINGCLASS TYPE STRING,
METERREADINGUNIT TYPE STRING,
UTILITIESTEMPERATUREAREA TYPE STRING,
UTILSINSTISEXMPTFRMFRNCHSFEE TYPE STRING,
UTILSINSTDVCEALLCTNISNOTALLWD TYPE STRING,
UTILITIESFRANCHISECONTRACT TYPE STRING,
UTILITIESBILLINGPARTY TYPE STRING,
UTILITIESINVOICINGPARTY TYPE STRING,
OBLIGATORYSUPUTILSSRVCPROVIDER TYPE STRING,
PRIMARYUTILITIESINSTALLATION TYPE STRING,
UTILSINSTALLATIONGROUPROLE TYPE STRING,
UTILSINSTALLATIONGROUPTYPE TYPE STRING,
HIGHERLEVELUTILSINSTALLATION TYPE STRING,
UNBILLDREVNXTRAPLTNTYPE TYPE STRING,
UTILSREGDEPDNTVALDTNGROUP TYPE STRING,END OF T_EKKO_STR. DATA: WA_IEINFRECHANDINST_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_IEINFRECHANDINST_STR-MANDT sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESINSTALLATION sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESLOGICALDEVICENUMBER sy-vline
WA_IEINFRECHANDINST_STR-UTILSDVCERATEDATAVALDTYENDDTE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDVCERATEDATAVALDTYSTRTDTE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEPRICECLASS sy-vline
WA_IEINFRECHANDINST_STR-UTILSDVCEISRELEVANTFORRNTLPRC sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICERATETYPE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICERATEFACTGROUP sy-vline
WA_IEINFRECHANDINST_STR-UTILSDVCEISNOTBILLINGRELEVANT sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESDEVICEINFORECORD sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEVALIDITYENDDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEVALIDITYSTARTDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESREGISTERGROUP sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESDEVICECATEGORY sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEBSCCATCOMBINATION sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEINSTALLATIONDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEREMOVALDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEGROUP sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESPREPAYMENTMETERTYPE sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICELOSSDETNGROUP sy-vline
WA_IEINFRECHANDINST_STR-DVCEPWRTRNSFRMTRPRIMVOLTVAL sy-vline
WA_IEINFRECHANDINST_STR-DVCEPWRTRNSFRMTRSECDRYVOLTVAL sy-vline
WA_IEINFRECHANDINST_STR-DVCEPWRTRNSFRMTRTRNSFRATINGVAL sy-vline
WA_IEINFRECHANDINST_STR-ADVANCEDMETERINGSYSTEM sy-vline
WA_IEINFRECHANDINST_STR-ADVANCEDMETERCAPABILITYGROUP sy-vline
WA_IEINFRECHANDINST_STR-UNIQUEITEMIDENTIFIER sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEWINDINGGROUP sy-vline
WA_IEINFRECHANDINST_STR-UTILSDEVICEINFORECDSRVCPRVD sy-vline
WA_IEINFRECHANDINST_STR-SERIALNUMBER sy-vline
WA_IEINFRECHANDINST_STR-UTILSINFORECDAUTHORIZATIONGRP sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESINSTALLATIONTYPE sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESINSTVOLTAGELEVEL sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESINSTGASPRSSRLVL sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTTIMEZONE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTGUAROFSUPREASON sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTDEREGULATIONSTS sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTDATARELEASESTATUS sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESSRVCPROVIDERROLE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTISFORENERGYFEEDIN sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTCREATIONDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTCREATEDBYUSER sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTLASTCHANGEDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTLASTCHANGEDBYUSER sy-vline
WA_IEINFRECHANDINST_STR-METERREADINGBLOCKINGREASON sy-vline
WA_IEINFRECHANDINST_STR-METERREADINGBASEPERIODCAT sy-vline
WA_IEINFRECHANDINST_STR-NMBROFALLWDMTRRDNGSCNTRLCODE sy-vline
WA_IEINFRECHANDINST_STR-ISMARKEDFORDELETION sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESPREMISE sy-vline
WA_IEINFRECHANDINST_STR-AUTHORIZATIONGROUP sy-vline
WA_IEINFRECHANDINST_STR-DIVISION sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTHISTVALIDITYENDDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTHISTVALIDITYSTARTDATE sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESRATECATEGORY sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESBILLINGSCHEMA sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESBILLINGCLASS sy-vline
WA_IEINFRECHANDINST_STR-METERREADINGUNIT sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESTEMPERATUREAREA sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTISEXMPTFRMFRNCHSFEE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTDVCEALLCTNISNOTALLWD sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESFRANCHISECONTRACT sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESBILLINGPARTY sy-vline
WA_IEINFRECHANDINST_STR-UTILITIESINVOICINGPARTY sy-vline
WA_IEINFRECHANDINST_STR-OBLIGATORYSUPUTILSSRVCPROVIDER sy-vline
WA_IEINFRECHANDINST_STR-PRIMARYUTILITIESINSTALLATION sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTALLATIONGROUPROLE sy-vline
WA_IEINFRECHANDINST_STR-UTILSINSTALLATIONGROUPTYPE sy-vline
WA_IEINFRECHANDINST_STR-HIGHERLEVELUTILSINSTALLATION sy-vline
WA_IEINFRECHANDINST_STR-UNBILLDREVNXTRAPLTNTYPE sy-vline
WA_IEINFRECHANDINST_STR-UTILSREGDEPDNTVALDTNGROUP sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.