ABAP Select data from SAP table LXDCKM_OUTDLV_SLOPT 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 LXDCKM_OUTDLV_SLOPT 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 LXDCKM_OUTDLV_SLOPT. 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 LXDCKM_OUTDLV_SLOPT 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_LXDCKM_OUTDLV_SLOPT TYPE STANDARD TABLE OF LXDCKM_OUTDLV_SLOPT,
      WA_LXDCKM_OUTDLV_SLOPT TYPE LXDCKM_OUTDLV_SLOPT,
      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: <LXDCKM_OUTDLV_SLOPT> TYPE LXDCKM_OUTDLV_SLOPT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM LXDCKM_OUTDLV_SLOPT
*  INTO TABLE @DATA(IT_LXDCKM_OUTDLV_SLOPT2).
*--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_LXDCKM_OUTDLV_SLOPT INDEX 1 INTO DATA(WA_LXDCKM_OUTDLV_SLOPT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_LXDCKM_OUTDLV_SLOPT ASSIGNING <LXDCKM_OUTDLV_SLOPT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<LXDCKM_OUTDLV_SLOPT>-DOCNR = 1.
<LXDCKM_OUTDLV_SLOPT>-LFDAT = 1.
<LXDCKM_OUTDLV_SLOPT>-KODAT = 1.
<LXDCKM_OUTDLV_SLOPT>-VSTEL = 1.
<LXDCKM_OUTDLV_SLOPT>-VKORG = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_LXDCKM_OUTDLV_SLOPT-LFART, sy-vline,
WA_LXDCKM_OUTDLV_SLOPT-WADAT, sy-vline,
WA_LXDCKM_OUTDLV_SLOPT-LDDAT, sy-vline,
WA_LXDCKM_OUTDLV_SLOPT-TDDAT, sy-vline,
WA_LXDCKM_OUTDLV_SLOPT-ABLAD, sy-vline,
WA_LXDCKM_OUTDLV_SLOPT-ROUTE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_LXDCKM_OUTDLV_SLOPT 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_LXDCKM_OUTDLV_SLOPT 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_LXDCKM_OUTDLV_SLOPT INTO WA_LXDCKM_OUTDLV_SLOPT. *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 DOCNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_LXDCKM_OUTDLV_SLOPT-DOCNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_LXDCKM_OUTDLV_SLOPT-DOCNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit EAN11, internal->external for field EAN11 CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT' EXPORTING input = WA_LXDCKM_OUTDLV_SLOPT-EAN11 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_LXDCKM_OUTDLV_SLOPT-EAN11.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PONUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_LXDCKM_OUTDLV_SLOPT-PONUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_LXDCKM_OUTDLV_SLOPT-PONUM.
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_LXDCKM_OUTDLV_SLOPT_STR,
DOCNR TYPE STRING,
LFDAT TYPE STRING,
KODAT TYPE STRING,
VSTEL TYPE STRING,
VKORG TYPE STRING,
LFART TYPE STRING,
WADAT TYPE STRING,
LDDAT TYPE STRING,
TDDAT TYPE STRING,
ABLAD TYPE STRING,
ROUTE TYPE STRING,
LPRIO TYPE STRING,
VSBED TYPE STRING,
KUNNR TYPE STRING,
KUNAG TYPE STRING,
KDGRP TYPE STRING,
LSTEL TYPE STRING,
VTWIV TYPE STRING,
SPAIV TYPE STRING,
LIFNR TYPE STRING,
TRAID TYPE STRING,
LIFEX TYPE STRING,
TERNR TYPE STRING,
AULWE TYPE STRING,
WERKS TYPE STRING,
LGTOR TYPE STRING,
LGBZO TYPE STRING,
PRVBE TYPE STRING,
PARTN TYPE STRING,
SPDNR TYPE STRING,
LGORT TYPE STRING,
CHARG TYPE STRING,
TKNUM TYPE STRING,
EXIDV TYPE STRING,
GRPNR TYPE STRING,
RLSDT TYPE STRING,
LRLDT TYPE STRING,
MATNR TYPE STRING,
EAN11 TYPE STRING,
PONUM TYPE STRING,
ITMNO TYPE STRING,END OF T_EKKO_STR. DATA: WA_LXDCKM_OUTDLV_SLOPT_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_LXDCKM_OUTDLV_SLOPT_STR-DOCNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LFDAT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-KODAT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-VSTEL sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-VKORG sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LFART sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-WADAT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LDDAT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-TDDAT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-ABLAD sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-ROUTE sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LPRIO sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-VSBED sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-KUNNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-KUNAG sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-KDGRP sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LSTEL sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-VTWIV sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-SPAIV sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LIFNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-TRAID sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LIFEX sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-TERNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-AULWE sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-WERKS sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LGTOR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LGBZO sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-PRVBE sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-PARTN sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-SPDNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LGORT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-CHARG sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-TKNUM sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-EXIDV sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-GRPNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-RLSDT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-LRLDT sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-MATNR sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-EAN11 sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-PONUM sy-vline
WA_LXDCKM_OUTDLV_SLOPT_STR-ITMNO sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.