ABAP Select data from SAP table WTYSC_WWB_SELSCREEN 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 WTYSC_WWB_SELSCREEN 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 WTYSC_WWB_SELSCREEN. 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 WTYSC_WWB_SELSCREEN 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_WTYSC_WWB_SELSCREEN TYPE STANDARD TABLE OF WTYSC_WWB_SELSCREEN,
      WA_WTYSC_WWB_SELSCREEN TYPE WTYSC_WWB_SELSCREEN,
      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: <WTYSC_WWB_SELSCREEN> TYPE WTYSC_WWB_SELSCREEN.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM WTYSC_WWB_SELSCREEN
*  INTO TABLE @DATA(IT_WTYSC_WWB_SELSCREEN2).
*--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_WTYSC_WWB_SELSCREEN INDEX 1 INTO DATA(WA_WTYSC_WWB_SELSCREEN2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<WTYSC_WWB_SELSCREEN>-CLMNO = 1.
<WTYSC_WWB_SELSCREEN>-CLMTY = 1.
<WTYSC_WWB_SELSCREEN>-PARNR = 1.
<WTYSC_WWB_SELSCREEN>-PARVW = 1.
<WTYSC_WWB_SELSCREEN>-REFNO = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_WTYSC_WWB_SELSCREEN-ASTATE, sy-vline,
  WA_WTYSC_WWB_SELSCREEN-CLOSED, sy-vline,
  WA_WTYSC_WWB_SELSCREEN-CLMGRP, sy-vline,
  WA_WTYSC_WWB_SELSCREEN-CLERK, sy-vline,
  WA_WTYSC_WWB_SELSCREEN-AUTNA, sy-vline,
  WA_WTYSC_WWB_SELSCREEN-AUTNO, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_WTYSC_WWB_SELSCREEN 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_WTYSC_WWB_SELSCREEN 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_WTYSC_WWB_SELSCREEN INTO WA_WTYSC_WWB_SELSCREEN.


*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.
ENDFORM. 

*&---------------------------------------------------------------------*
*& Form process_as_string_field_values
*&---------------------------------------------------------------------*
FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO.

TYPES: BEGIN OF T_WTYSC_WWB_SELSCREEN_STR, 
CLMNO TYPE STRING,
CLMTY TYPE STRING,
PARNR TYPE STRING,
PARVW TYPE STRING,
REFNO TYPE STRING,
ASTATE TYPE STRING,
CLOSED TYPE STRING,
CLMGRP TYPE STRING,
CLERK TYPE STRING,
AUTNA TYPE STRING,
AUTNO TYPE STRING,
CREADAT TYPE STRING,
CREABY TYPE STRING,
CHNGDAT TYPE STRING,
CHNGBY TYPE STRING,
V_REJCD TYPE STRING,
RELTY TYPE STRING,
RELOT TYPE STRING,
RELOB_EXT TYPE STRING,
FKDAT TYPE STRING,
REFDT TYPE STRING,
V_PARNR TYPE STRING,
V_PARVW TYPE STRING,
QMNUM1 TYPE STRING,
QMART1 TYPE STRING,
TPLNR1 TYPE STRING,
STRNO1 TYPE STRING,
EQUNR1 TYPE STRING,
SERMAT1 TYPE STRING,
SERIALNR1 TYPE STRING,
DEVICEID1 TYPE STRING,
AUFNR1 TYPE STRING,
TERMAB1 TYPE STRING,
TERMBI1 TYPE STRING,
DY_PARVW1 TYPE STRING,
DY_PARNR1 TYPE STRING,
BAUTL1 TYPE STRING,
KUNUM1 TYPE STRING,
ERDAT1 TYPE STRING,
ERNAM1 TYPE STRING,
DY_OFN1 TYPE STRING,
DY_IAR1 TYPE STRING,
DY_MAB1 TYPE STRING,
DY_HIS1 TYPE STRING,
SELSCHE1 TYPE STRING,
AUFNR2 TYPE STRING,
AUART2 TYPE STRING,
EQUNR2 TYPE STRING,
TPLNR2 TYPE STRING,
STRNO2 TYPE STRING,
SERMAT2 TYPE STRING,
SERIALNR2 TYPE STRING,
QMNUM2 TYPE STRING,
GEWRK2 TYPE STRING,
VAWRK2 TYPE STRING,
TERMAB2 TYPE STRING,
TERMBI2 TYPE STRING,
DY_PARVW2 TYPE STRING,
DY_PARNR2 TYPE STRING,
WAERS2 TYPE STRING,
KUNUM2 TYPE STRING,
ERDAT2 TYPE STRING,
ERNAM2 TYPE STRING,
CLMCON TYPE STRING,
UPDCON TYPE STRING,
INCON TYPE STRING,
DY_OFN2 TYPE STRING,
DY_IAR2 TYPE STRING,
DY_MAB2 TYPE STRING,
DY_HIS2 TYPE STRING,
SELSCHE2 TYPE STRING,
VBELN5 TYPE STRING,
KUNNR5 TYPE STRING,
ERDAT5 TYPE STRING,
ERNAM5 TYPE STRING,
AUDAT5 TYPE STRING,
VKORG5 TYPE STRING,
VKBUR5 TYPE STRING,
VKGRP5 TYPE STRING,
VTWEG5 TYPE STRING,
SPART5 TYPE STRING,
AUART5 TYPE STRING,
BANFN4 TYPE STRING,
BSART4 TYPE STRING,
BSTYP4 TYPE STRING,
MAXRECORDS TYPE STRING,
SELECTIONMODE TYPE STRING,
OBJ_SELECTION TYPE STRING,
VIEW_TYPE TYPE STRING,
PROFILE TYPE STRING,END OF T_EKKO_STR.
DATA: WA_WTYSC_WWB_SELSCREEN_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_WTYSC_WWB_SELSCREEN_STR-CLMNO sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CLMTY sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-PARNR sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-PARVW sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-REFNO sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ASTATE sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CLOSED sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CLMGRP sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CLERK sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUTNA sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUTNO sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CREADAT sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CREABY sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CHNGDAT sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CHNGBY sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-V_REJCD sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-RELTY sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-RELOT sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-RELOB_EXT sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-FKDAT sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-REFDT sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-V_PARNR sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-V_PARVW sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-QMNUM1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-QMART1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-TPLNR1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-STRNO1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-EQUNR1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SERMAT1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SERIALNR1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DEVICEID1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUFNR1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-TERMAB1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-TERMBI1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_PARVW1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_PARNR1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-BAUTL1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-KUNUM1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ERDAT1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ERNAM1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_OFN1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_IAR1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_MAB1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_HIS1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SELSCHE1 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUFNR2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUART2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-EQUNR2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-TPLNR2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-STRNO2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SERMAT2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SERIALNR2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-QMNUM2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-GEWRK2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VAWRK2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-TERMAB2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-TERMBI2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_PARVW2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_PARNR2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-WAERS2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-KUNUM2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ERDAT2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ERNAM2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-CLMCON sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-UPDCON sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-INCON sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_OFN2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_IAR2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_MAB2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-DY_HIS2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SELSCHE2 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VBELN5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-KUNNR5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ERDAT5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-ERNAM5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUDAT5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VKORG5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VKBUR5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VKGRP5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VTWEG5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SPART5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-AUART5 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-BANFN4 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-BSART4 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-BSTYP4 sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-MAXRECORDS sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-SELECTIONMODE sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-OBJ_SELECTION sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-VIEW_TYPE sy-vline 
WA_WTYSC_WWB_SELSCREEN_STR-PROFILE sy-vline      INTO ld_text SEPARATED BY SPACE.

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