ABAP Select data from SAP table ICF_SHMRUNT 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 ICF_SHMRUNT 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 ICF_SHMRUNT. 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 ICF_SHMRUNT 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_ICF_SHMRUNT TYPE STANDARD TABLE OF ICF_SHMRUNT,
      WA_ICF_SHMRUNT TYPE ICF_SHMRUNT,
      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: <ICF_SHMRUNT> TYPE ICF_SHMRUNT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ICF_SHMRUNT
*  INTO TABLE @DATA(IT_ICF_SHMRUNT2).
*--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_ICF_SHMRUNT INDEX 1 INTO DATA(WA_ICF_SHMRUNT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_ICF_SHMRUNT ASSIGNING <ICF_SHMRUNT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<ICF_SHMRUNT>-URL = 1.
<ICF_SHMRUNT>-HOSTNUMBER = 1.
<ICF_SHMRUNT>-FIRSTALIAS = 1.
<ICF_SHMRUNT>-ICFALIAS = 1.
<ICF_SHMRUNT>-ICFPARGUID = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ICF_SHMRUNT-CASEFLAG, sy-vline,
WA_ICF_SHMRUNT-ICF_DOCU, sy-vline,
WA_ICF_SHMRUNT-ICFALIGUID, sy-vline,
WA_ICF_SHMRUNT-ICF_EXPAND, sy-vline,
WA_ICF_SHMRUNT-ICF_MANDT, sy-vline,
WA_ICF_SHMRUNT-ICF_USER, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ICF_SHMRUNT 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_ICF_SHMRUNT 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_ICF_SHMRUNT INTO WA_ICF_SHMRUNT. *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 ISOLA, internal->external for field ICF_LANGU CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_ICF_SHMRUNT-ICF_LANGU IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ICF_SHMRUNT-ICF_LANGU.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field OBLLANGU CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_ICF_SHMRUNT-OBLLANGU IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ICF_SHMRUNT-OBLLANGU.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field ICF_LANGU CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_ICF_SHMRUNT-ICF_LANGU IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ICF_SHMRUNT-ICF_LANGU.
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_ICF_SHMRUNT_STR,
URL TYPE STRING,
HOSTNUMBER TYPE STRING,
FIRSTALIAS TYPE STRING,
ICFALIAS TYPE STRING,
ICFPARGUID TYPE STRING,
CASEFLAG TYPE STRING,
ICF_DOCU TYPE STRING,
ICFALIGUID TYPE STRING,
ICF_EXPAND TYPE STRING,
ICF_MANDT TYPE STRING,
ICF_USER TYPE STRING,
ICF_PASSWD TYPE STRING,
ICF_LANGU TYPE STRING,
OBLUSRFLAG TYPE STRING,
PROTSEC TYPE STRING,
X509FLAG TYPE STRING,
SSLFLAG TYPE STRING,
ALIASLOGIN TYPE STRING,
ICF_AUTH TYPE STRING,
ICF_TCODE TYPE STRING,
ICF_NOACT TYPE STRING,
ICF_TRACE TYPE STRING,
ICF_DEBUG TYPE STRING,
ICF_EXPIR TYPE STRING,
ICF_OPTION TYPE STRING,
ICF_REDIR TYPE STRING,
ICF_TIME TYPE STRING,
ICF_CUSER TYPE STRING,
ICF_CDATE TYPE STRING,
ICF_MUSER TYPE STRING,
ICF_MDATE TYPE STRING,
ICF_HTTPS TYPE STRING,
ICF_AUTHRC TYPE STRING,
HDROTRCONC TYPE STRING,
BODOTRCONC TYPE STRING,
URL500 TYPE STRING,
KIND500 TYPE STRING,
HTTPCDE500 TYPE STRING,
HDROTR401 TYPE STRING,
BODOTR401 TYPE STRING,
URL401 TYPE STRING,
FORMFLG401 TYPE STRING,
KIND401 TYPE STRING,
HTTPCDE401 TYPE STRING,
ICFBITMAP TYPE STRING,
COMPR_FLAG TYPE STRING,
FALLTHRU TYPE STRING,
SYSLOG401 TYPE STRING,
LOG_FLAG TYPE STRING,
LOG_ORDER TYPE STRING,
HDROTRLPAG TYPE STRING,
BODOTRLPAG TYPE STRING,
URLLPAG TYPE STRING,
KINDLPAG TYPE STRING,
HTTPCDELPAG TYPE STRING,
ICFGUILNK TYPE STRING,
ICF_CCLNT TYPE STRING,
ICF_MCLNT TYPE STRING,
HDROTRNFPAG TYPE STRING,
BODOTRNFPAG TYPE STRING,
URLNFPAG TYPE STRING,
KINDNFPAG TYPE STRING,
HTTPCDENFPAG TYPE STRING,
APPLCUSTFLAG TYPE STRING,
ACCESSIBILITY TYPE STRING,
ICF_JAVA TYPE STRING,
LOGIN_PROCESS TYPE STRING,
KATEGORIE TYPE STRING,
READONLY TYPE STRING,
NOHEREDITY TYPE STRING,
SAML_FLAG TYPE STRING,
SYSLOGIN TYPE STRING,
ICF_ESI_FLAG TYPE STRING,
ICF_ESI_LOGON TYPE STRING,
ICF_REAUTH_OFF TYPE STRING,
NO_SESSION_MANAGEMENT TYPE STRING,
ICFSRVGRP TYPE STRING,
ICFNODGUID TYPE STRING,
ICFALIAS_STRG TYPE STRING,
SERVTBL TYPE STRING,
ACTLOGIN TYPE STRING,
OBLMANDT TYPE STRING,
OBLUSER TYPE STRING,
OBLPASSWD TYPE STRING,
OBLLANGU TYPE STRING,
ICF_MANDT TYPE STRING,
ICF_USER TYPE STRING,
ICF_PASSWD TYPE STRING,
ICF_LANGU TYPE STRING,
PROTSEC TYPE STRING,
ALIASLOGIN TYPE STRING,
HDROTRCONC TYPE STRING,
BODOTRCONC TYPE STRING,
URL500 TYPE STRING,
KIND500 TYPE STRING,
HTTPCDE500 TYPE STRING,
HDROTR401 TYPE STRING,
BODOTR401 TYPE STRING,
URL401 TYPE STRING,
FORMFLG401 TYPE STRING,
KIND401 TYPE STRING,
HTTPCDE401 TYPE STRING,
HDROTRLPAG TYPE STRING,
BODOTRLPAG TYPE STRING,
URLLPAG TYPE STRING,
KINDLPAG TYPE STRING,
HTTPCDELPAG TYPE STRING,
ICFBITMAP TYPE STRING,
PUBLICFLAG TYPE STRING,
COMPR_FLAG TYPE STRING,
LOGORDER TYPE STRING,
SYSLOG401 TYPE STRING,
FALLTHRU TYPE STRING,
ICFGUILNK TYPE STRING,
LOG_FLAG TYPE STRING,
HDROTRNFPAG TYPE STRING,
BODOTRNFPAG TYPE STRING,
URLNFPAG TYPE STRING,
KINDNFPAG TYPE STRING,
HTTPCDENFPAG TYPE STRING,
ICF_CUSTSTR TYPE STRING,
ACCESSIBILITY TYPE STRING,
ICFAUTHTRC TYPE STRING,
ICF_JAVA TYPE STRING,
LOGIN_PROCESS TYPE STRING,
SAML_FLAG TYPE STRING,
SYSLOGIN TYPE STRING,
ICF_ESI_LOGON TYPE STRING,
ICF_REAUTH_OFF TYPE STRING,
ICF_ESI_FLAG TYPE STRING,
NO_SESSION_MANAGEMENT TYPE STRING,
URLSUFFIX TYPE STRING,
URLSUFFIXHANDLER TYPE STRING,
PATHFIELDS TYPE STRING,
ORIG_SCRIPT_NAME TYPE STRING,
ORIG_PATH_INFO TYPE STRING,
EXP_SCRIPT_NAME TYPE STRING,
EXP_PATH_INFO TYPE STRING,
EXP_PATH_TRANSLATED TYPE STRING,
TIMESTAMP TYPE STRING,END OF T_EKKO_STR. DATA: WA_ICF_SHMRUNT_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_ICF_SHMRUNT_STR-URL sy-vline
WA_ICF_SHMRUNT_STR-HOSTNUMBER sy-vline
WA_ICF_SHMRUNT_STR-FIRSTALIAS sy-vline
WA_ICF_SHMRUNT_STR-ICFALIAS sy-vline
WA_ICF_SHMRUNT_STR-ICFPARGUID sy-vline
WA_ICF_SHMRUNT_STR-CASEFLAG sy-vline
WA_ICF_SHMRUNT_STR-ICF_DOCU sy-vline
WA_ICF_SHMRUNT_STR-ICFALIGUID sy-vline
WA_ICF_SHMRUNT_STR-ICF_EXPAND sy-vline
WA_ICF_SHMRUNT_STR-ICF_MANDT sy-vline
WA_ICF_SHMRUNT_STR-ICF_USER sy-vline
WA_ICF_SHMRUNT_STR-ICF_PASSWD sy-vline
WA_ICF_SHMRUNT_STR-ICF_LANGU sy-vline
WA_ICF_SHMRUNT_STR-OBLUSRFLAG sy-vline
WA_ICF_SHMRUNT_STR-PROTSEC sy-vline
WA_ICF_SHMRUNT_STR-X509FLAG sy-vline
WA_ICF_SHMRUNT_STR-SSLFLAG sy-vline
WA_ICF_SHMRUNT_STR-ALIASLOGIN sy-vline
WA_ICF_SHMRUNT_STR-ICF_AUTH sy-vline
WA_ICF_SHMRUNT_STR-ICF_TCODE sy-vline
WA_ICF_SHMRUNT_STR-ICF_NOACT sy-vline
WA_ICF_SHMRUNT_STR-ICF_TRACE sy-vline
WA_ICF_SHMRUNT_STR-ICF_DEBUG sy-vline
WA_ICF_SHMRUNT_STR-ICF_EXPIR sy-vline
WA_ICF_SHMRUNT_STR-ICF_OPTION sy-vline
WA_ICF_SHMRUNT_STR-ICF_REDIR sy-vline
WA_ICF_SHMRUNT_STR-ICF_TIME sy-vline
WA_ICF_SHMRUNT_STR-ICF_CUSER sy-vline
WA_ICF_SHMRUNT_STR-ICF_CDATE sy-vline
WA_ICF_SHMRUNT_STR-ICF_MUSER sy-vline
WA_ICF_SHMRUNT_STR-ICF_MDATE sy-vline
WA_ICF_SHMRUNT_STR-ICF_HTTPS sy-vline
WA_ICF_SHMRUNT_STR-ICF_AUTHRC sy-vline
WA_ICF_SHMRUNT_STR-HDROTRCONC sy-vline
WA_ICF_SHMRUNT_STR-BODOTRCONC sy-vline
WA_ICF_SHMRUNT_STR-URL500 sy-vline
WA_ICF_SHMRUNT_STR-KIND500 sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDE500 sy-vline
WA_ICF_SHMRUNT_STR-HDROTR401 sy-vline
WA_ICF_SHMRUNT_STR-BODOTR401 sy-vline
WA_ICF_SHMRUNT_STR-URL401 sy-vline
WA_ICF_SHMRUNT_STR-FORMFLG401 sy-vline
WA_ICF_SHMRUNT_STR-KIND401 sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDE401 sy-vline
WA_ICF_SHMRUNT_STR-ICFBITMAP sy-vline
WA_ICF_SHMRUNT_STR-COMPR_FLAG sy-vline
WA_ICF_SHMRUNT_STR-FALLTHRU sy-vline
WA_ICF_SHMRUNT_STR-SYSLOG401 sy-vline
WA_ICF_SHMRUNT_STR-LOG_FLAG sy-vline
WA_ICF_SHMRUNT_STR-LOG_ORDER sy-vline
WA_ICF_SHMRUNT_STR-HDROTRLPAG sy-vline
WA_ICF_SHMRUNT_STR-BODOTRLPAG sy-vline
WA_ICF_SHMRUNT_STR-URLLPAG sy-vline
WA_ICF_SHMRUNT_STR-KINDLPAG sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDELPAG sy-vline
WA_ICF_SHMRUNT_STR-ICFGUILNK sy-vline
WA_ICF_SHMRUNT_STR-ICF_CCLNT sy-vline
WA_ICF_SHMRUNT_STR-ICF_MCLNT sy-vline
WA_ICF_SHMRUNT_STR-HDROTRNFPAG sy-vline
WA_ICF_SHMRUNT_STR-BODOTRNFPAG sy-vline
WA_ICF_SHMRUNT_STR-URLNFPAG sy-vline
WA_ICF_SHMRUNT_STR-KINDNFPAG sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDENFPAG sy-vline
WA_ICF_SHMRUNT_STR-APPLCUSTFLAG sy-vline
WA_ICF_SHMRUNT_STR-ACCESSIBILITY sy-vline
WA_ICF_SHMRUNT_STR-ICF_JAVA sy-vline
WA_ICF_SHMRUNT_STR-LOGIN_PROCESS sy-vline
WA_ICF_SHMRUNT_STR-KATEGORIE sy-vline
WA_ICF_SHMRUNT_STR-READONLY sy-vline
WA_ICF_SHMRUNT_STR-NOHEREDITY sy-vline
WA_ICF_SHMRUNT_STR-SAML_FLAG sy-vline
WA_ICF_SHMRUNT_STR-SYSLOGIN sy-vline
WA_ICF_SHMRUNT_STR-ICF_ESI_FLAG sy-vline
WA_ICF_SHMRUNT_STR-ICF_ESI_LOGON sy-vline
WA_ICF_SHMRUNT_STR-ICF_REAUTH_OFF sy-vline
WA_ICF_SHMRUNT_STR-NO_SESSION_MANAGEMENT sy-vline
WA_ICF_SHMRUNT_STR-ICFSRVGRP sy-vline
WA_ICF_SHMRUNT_STR-ICFNODGUID sy-vline
WA_ICF_SHMRUNT_STR-ICFALIAS_STRG sy-vline
WA_ICF_SHMRUNT_STR-SERVTBL sy-vline
WA_ICF_SHMRUNT_STR-ACTLOGIN sy-vline
WA_ICF_SHMRUNT_STR-OBLMANDT sy-vline
WA_ICF_SHMRUNT_STR-OBLUSER sy-vline
WA_ICF_SHMRUNT_STR-OBLPASSWD sy-vline
WA_ICF_SHMRUNT_STR-OBLLANGU sy-vline
WA_ICF_SHMRUNT_STR-ICF_MANDT sy-vline
WA_ICF_SHMRUNT_STR-ICF_USER sy-vline
WA_ICF_SHMRUNT_STR-ICF_PASSWD sy-vline
WA_ICF_SHMRUNT_STR-ICF_LANGU sy-vline
WA_ICF_SHMRUNT_STR-PROTSEC sy-vline
WA_ICF_SHMRUNT_STR-ALIASLOGIN sy-vline
WA_ICF_SHMRUNT_STR-HDROTRCONC sy-vline
WA_ICF_SHMRUNT_STR-BODOTRCONC sy-vline
WA_ICF_SHMRUNT_STR-URL500 sy-vline
WA_ICF_SHMRUNT_STR-KIND500 sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDE500 sy-vline
WA_ICF_SHMRUNT_STR-HDROTR401 sy-vline
WA_ICF_SHMRUNT_STR-BODOTR401 sy-vline
WA_ICF_SHMRUNT_STR-URL401 sy-vline
WA_ICF_SHMRUNT_STR-FORMFLG401 sy-vline
WA_ICF_SHMRUNT_STR-KIND401 sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDE401 sy-vline
WA_ICF_SHMRUNT_STR-HDROTRLPAG sy-vline
WA_ICF_SHMRUNT_STR-BODOTRLPAG sy-vline
WA_ICF_SHMRUNT_STR-URLLPAG sy-vline
WA_ICF_SHMRUNT_STR-KINDLPAG sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDELPAG sy-vline
WA_ICF_SHMRUNT_STR-ICFBITMAP sy-vline
WA_ICF_SHMRUNT_STR-PUBLICFLAG sy-vline
WA_ICF_SHMRUNT_STR-COMPR_FLAG sy-vline
WA_ICF_SHMRUNT_STR-LOGORDER sy-vline
WA_ICF_SHMRUNT_STR-SYSLOG401 sy-vline
WA_ICF_SHMRUNT_STR-FALLTHRU sy-vline
WA_ICF_SHMRUNT_STR-ICFGUILNK sy-vline
WA_ICF_SHMRUNT_STR-LOG_FLAG sy-vline
WA_ICF_SHMRUNT_STR-HDROTRNFPAG sy-vline
WA_ICF_SHMRUNT_STR-BODOTRNFPAG sy-vline
WA_ICF_SHMRUNT_STR-URLNFPAG sy-vline
WA_ICF_SHMRUNT_STR-KINDNFPAG sy-vline
WA_ICF_SHMRUNT_STR-HTTPCDENFPAG sy-vline
WA_ICF_SHMRUNT_STR-ICF_CUSTSTR sy-vline
WA_ICF_SHMRUNT_STR-ACCESSIBILITY sy-vline
WA_ICF_SHMRUNT_STR-ICFAUTHTRC sy-vline
WA_ICF_SHMRUNT_STR-ICF_JAVA sy-vline
WA_ICF_SHMRUNT_STR-LOGIN_PROCESS sy-vline
WA_ICF_SHMRUNT_STR-SAML_FLAG sy-vline
WA_ICF_SHMRUNT_STR-SYSLOGIN sy-vline
WA_ICF_SHMRUNT_STR-ICF_ESI_LOGON sy-vline
WA_ICF_SHMRUNT_STR-ICF_REAUTH_OFF sy-vline
WA_ICF_SHMRUNT_STR-ICF_ESI_FLAG sy-vline
WA_ICF_SHMRUNT_STR-NO_SESSION_MANAGEMENT sy-vline
WA_ICF_SHMRUNT_STR-URLSUFFIX sy-vline
WA_ICF_SHMRUNT_STR-URLSUFFIXHANDLER sy-vline
WA_ICF_SHMRUNT_STR-PATHFIELDS sy-vline
WA_ICF_SHMRUNT_STR-ORIG_SCRIPT_NAME sy-vline
WA_ICF_SHMRUNT_STR-ORIG_PATH_INFO sy-vline
WA_ICF_SHMRUNT_STR-EXP_SCRIPT_NAME sy-vline
WA_ICF_SHMRUNT_STR-EXP_PATH_INFO sy-vline
WA_ICF_SHMRUNT_STR-EXP_PATH_TRANSLATED sy-vline
WA_ICF_SHMRUNT_STR-TIMESTAMP sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.