ABAP Select data from SAP table SWX_V_FORMABSENC 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 SWX_V_FORMABSENC 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 SWX_V_FORMABSENC. 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 SWX_V_FORMABSENC 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_SWX_V_FORMABSENC TYPE STANDARD TABLE OF SWX_V_FORMABSENC,
      WA_SWX_V_FORMABSENC TYPE SWX_V_FORMABSENC,
      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: <SWX_V_FORMABSENC> TYPE SWX_V_FORMABSENC.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM SWX_V_FORMABSENC
*  INTO TABLE @DATA(IT_SWX_V_FORMABSENC2).
*--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_SWX_V_FORMABSENC INDEX 1 INTO DATA(WA_SWX_V_FORMABSENC2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<SWX_V_FORMABSENC>-MANDT = 1.
<SWX_V_FORMABSENC>-LEAVEREQUESTID = 1.
<SWX_V_FORMABSENC>-T_APPROVEDTIMESTAMP = 1.
<SWX_V_FORMABSENC>-APPROVEDTIMESTAMP = 1.
<SWX_V_FORMABSENC>-APPROVEDDATE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_SWX_V_FORMABSENC-APPROVEDTIME, sy-vline,
  WA_SWX_V_FORMABSENC-T_CREATEDTIMESTAMP, sy-vline,
  WA_SWX_V_FORMABSENC-CREATEDDATE, sy-vline,
  WA_SWX_V_FORMABSENC-CREATEDTIME, sy-vline,
  WA_SWX_V_FORMABSENC-APPROVEDBY, sy-vline,
  WA_SWX_V_FORMABSENC-ADDRESSNUMBER, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_SWX_V_FORMABSENC 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_SWX_V_FORMABSENC 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_SWX_V_FORMABSENC INTO WA_SWX_V_FORMABSENC.


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

*Conversion exit ALPHA, internal->external for field PERSONALNUMBER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_SWX_V_FORMABSENC-PERSONALNUMBER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_SWX_V_FORMABSENC-PERSONALNUMBER.
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_SWX_V_FORMABSENC_STR, 
MANDT TYPE STRING,
LEAVEREQUESTID TYPE STRING,
T_APPROVEDTIMESTAMP TYPE STRING,
APPROVEDTIMESTAMP TYPE STRING,
APPROVEDDATE TYPE STRING,
APPROVEDTIME TYPE STRING,
T_CREATEDTIMESTAMP TYPE STRING,
CREATEDDATE TYPE STRING,
CREATEDTIME TYPE STRING,
APPROVEDBY TYPE STRING,
ADDRESSNUMBER TYPE STRING,
PERSONALNUMBER TYPE STRING,
CREATEDBY TYPE STRING,
CREATORNAMETEXT TYPE STRING,
CREATORDEPARTMENT TYPE STRING,
COSTCENTER TYPE STRING,
PARTONEFIRSTDAY TYPE STRING,
PARTONELASTDAY TYPE STRING,
PARTONETIMEZONE TYPE STRING,
PARTONELEAVETYPE TYPE STRING,
PARTONEABSENCEHOURS TYPE STRING,
PARTTWOFIRSTDAY TYPE STRING,
PARTTWOLASTDAY TYPE STRING,
PARTTWOTIMEZONE TYPE STRING,
PARTTWOLEAVETYPE TYPE STRING,
PARTTWOABSENCEHOURS TYPE STRING,
PARTTHREEFIRSTDAY TYPE STRING,
PARTTHREELASTDAY TYPE STRING,
PARTTHREETIMEZONE TYPE STRING,
PARTTHREELEAVETYPE TYPE STRING,
PARTTHREEABSENCEHOURS TYPE STRING,
REASON TYPE STRING,
CONTACT TYPE STRING,
LEAVEREQUESTSTATE TYPE STRING,
LEAVEREQUESTSTATETEXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_SWX_V_FORMABSENC_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_SWX_V_FORMABSENC_STR-MANDT sy-vline 
WA_SWX_V_FORMABSENC_STR-LEAVEREQUESTID sy-vline 
WA_SWX_V_FORMABSENC_STR-T_APPROVEDTIMESTAMP sy-vline 
WA_SWX_V_FORMABSENC_STR-APPROVEDTIMESTAMP sy-vline 
WA_SWX_V_FORMABSENC_STR-APPROVEDDATE sy-vline 
WA_SWX_V_FORMABSENC_STR-APPROVEDTIME sy-vline 
WA_SWX_V_FORMABSENC_STR-T_CREATEDTIMESTAMP sy-vline 
WA_SWX_V_FORMABSENC_STR-CREATEDDATE sy-vline 
WA_SWX_V_FORMABSENC_STR-CREATEDTIME sy-vline 
WA_SWX_V_FORMABSENC_STR-APPROVEDBY sy-vline 
WA_SWX_V_FORMABSENC_STR-ADDRESSNUMBER sy-vline 
WA_SWX_V_FORMABSENC_STR-PERSONALNUMBER sy-vline 
WA_SWX_V_FORMABSENC_STR-CREATEDBY sy-vline 
WA_SWX_V_FORMABSENC_STR-CREATORNAMETEXT sy-vline 
WA_SWX_V_FORMABSENC_STR-CREATORDEPARTMENT sy-vline 
WA_SWX_V_FORMABSENC_STR-COSTCENTER sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTONEFIRSTDAY sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTONELASTDAY sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTONETIMEZONE sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTONELEAVETYPE sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTONEABSENCEHOURS sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTWOFIRSTDAY sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTWOLASTDAY sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTWOTIMEZONE sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTWOLEAVETYPE sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTWOABSENCEHOURS sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTHREEFIRSTDAY sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTHREELASTDAY sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTHREETIMEZONE sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTHREELEAVETYPE sy-vline 
WA_SWX_V_FORMABSENC_STR-PARTTHREEABSENCEHOURS sy-vline 
WA_SWX_V_FORMABSENC_STR-REASON sy-vline 
WA_SWX_V_FORMABSENC_STR-CONTACT sy-vline 
WA_SWX_V_FORMABSENC_STR-LEAVEREQUESTSTATE sy-vline 
WA_SWX_V_FORMABSENC_STR-LEAVEREQUESTSTATETEXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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