ABAP Select data from SAP table ICFLOGIN 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 ICFLOGIN 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 ICFLOGIN. 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 ICFLOGIN 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_ICFLOGIN TYPE STANDARD TABLE OF ICFLOGIN,
      WA_ICFLOGIN TYPE ICFLOGIN,
      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: <ICFLOGIN> TYPE ICFLOGIN.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ICFLOGIN
*  INTO TABLE @DATA(IT_ICFLOGIN2).
*--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_ICFLOGIN INDEX 1 INTO DATA(WA_ICFLOGIN2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ICFLOGIN>-OBLMANDT = 1.
<ICFLOGIN>-OBLUSER = 1.
<ICFLOGIN>-OBLPASSWD = 1.
<ICFLOGIN>-OBLLANGU = 1.
<ICFLOGIN>-ICF_MANDT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ICFLOGIN-ICF_USER, sy-vline,
  WA_ICFLOGIN-ICF_PASSWD, sy-vline,
  WA_ICFLOGIN-ICF_LANGU, sy-vline,
  WA_ICFLOGIN-PROTSEC, sy-vline,
  WA_ICFLOGIN-ALIASLOGIN, sy-vline,
  WA_ICFLOGIN-HDROTRCONC, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ICFLOGIN 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_ICFLOGIN 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_ICFLOGIN INTO WA_ICFLOGIN.


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

*Conversion exit ISOLA, internal->external for field ICF_LANGU
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_ICFLOGIN-ICF_LANGU
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ICFLOGIN-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_ICFLOGIN_STR, 
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,END OF T_EKKO_STR.
DATA: WA_ICFLOGIN_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_ICFLOGIN_STR-OBLMANDT sy-vline 
WA_ICFLOGIN_STR-OBLUSER sy-vline 
WA_ICFLOGIN_STR-OBLPASSWD sy-vline 
WA_ICFLOGIN_STR-OBLLANGU sy-vline 
WA_ICFLOGIN_STR-ICF_MANDT sy-vline 
WA_ICFLOGIN_STR-ICF_USER sy-vline 
WA_ICFLOGIN_STR-ICF_PASSWD sy-vline 
WA_ICFLOGIN_STR-ICF_LANGU sy-vline 
WA_ICFLOGIN_STR-PROTSEC sy-vline 
WA_ICFLOGIN_STR-ALIASLOGIN sy-vline 
WA_ICFLOGIN_STR-HDROTRCONC sy-vline 
WA_ICFLOGIN_STR-BODOTRCONC sy-vline 
WA_ICFLOGIN_STR-URL500 sy-vline 
WA_ICFLOGIN_STR-KIND500 sy-vline 
WA_ICFLOGIN_STR-HTTPCDE500 sy-vline 
WA_ICFLOGIN_STR-HDROTR401 sy-vline 
WA_ICFLOGIN_STR-BODOTR401 sy-vline 
WA_ICFLOGIN_STR-URL401 sy-vline 
WA_ICFLOGIN_STR-FORMFLG401 sy-vline 
WA_ICFLOGIN_STR-KIND401 sy-vline 
WA_ICFLOGIN_STR-HTTPCDE401 sy-vline 
WA_ICFLOGIN_STR-HDROTRLPAG sy-vline 
WA_ICFLOGIN_STR-BODOTRLPAG sy-vline 
WA_ICFLOGIN_STR-URLLPAG sy-vline 
WA_ICFLOGIN_STR-KINDLPAG sy-vline 
WA_ICFLOGIN_STR-HTTPCDELPAG sy-vline 
WA_ICFLOGIN_STR-ICFBITMAP sy-vline 
WA_ICFLOGIN_STR-PUBLICFLAG sy-vline 
WA_ICFLOGIN_STR-COMPR_FLAG sy-vline 
WA_ICFLOGIN_STR-LOGORDER sy-vline 
WA_ICFLOGIN_STR-SYSLOG401 sy-vline 
WA_ICFLOGIN_STR-FALLTHRU sy-vline 
WA_ICFLOGIN_STR-ICFGUILNK sy-vline 
WA_ICFLOGIN_STR-LOG_FLAG sy-vline 
WA_ICFLOGIN_STR-HDROTRNFPAG sy-vline 
WA_ICFLOGIN_STR-BODOTRNFPAG sy-vline 
WA_ICFLOGIN_STR-URLNFPAG sy-vline 
WA_ICFLOGIN_STR-KINDNFPAG sy-vline 
WA_ICFLOGIN_STR-HTTPCDENFPAG sy-vline 
WA_ICFLOGIN_STR-ICF_CUSTSTR sy-vline 
WA_ICFLOGIN_STR-ACCESSIBILITY sy-vline 
WA_ICFLOGIN_STR-ICFAUTHTRC sy-vline 
WA_ICFLOGIN_STR-ICF_JAVA sy-vline 
WA_ICFLOGIN_STR-LOGIN_PROCESS sy-vline 
WA_ICFLOGIN_STR-SAML_FLAG sy-vline 
WA_ICFLOGIN_STR-SYSLOGIN sy-vline 
WA_ICFLOGIN_STR-ICF_ESI_LOGON sy-vline 
WA_ICFLOGIN_STR-ICF_REAUTH_OFF sy-vline 
WA_ICFLOGIN_STR-ICF_ESI_FLAG sy-vline 
WA_ICFLOGIN_STR-NO_SESSION_MANAGEMENT sy-vline      INTO ld_text SEPARATED BY SPACE.

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