ABAP Select data from SAP table NETZR 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 NETZR 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 NETZR. 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 NETZR 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_NETZR TYPE STANDARD TABLE OF NETZR,
      WA_NETZR TYPE NETZR,
      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: <NETZR> TYPE NETZR.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM NETZR
*  INTO TABLE @DATA(IT_NETZR2).
*--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_NETZR INDEX 1 INTO DATA(WA_NETZR2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<NETZR>-ARNUMMER = 1.
<NETZR>-VSGRUPPE = 1.
<NETZR>-VSNUMMER = 1.
<NETZR>-PRCTR = 1.
<NETZR>-PRNAM = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_NETZR-PRPOS, sy-vline,
  WA_NETZR-PSPID, sy-vline,
  WA_NETZR-POSID, sy-vline,
  WA_NETZR-KDAUF, sy-vline,
  WA_NETZR-KDPOS, sy-vline,
  WA_NETZR-AUFNR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_NETZR 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_NETZR 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_NETZR INTO WA_NETZR.


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

*Conversion exit POSID, internal->external for field PRPOS
CALL FUNCTION 'CONVERSION_EXIT_POSID_OUTPUT'
  EXPORTING
    input =                      WA_NETZR-PRPOS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_NETZR-PRPOS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSN, internal->external for field PSPID
CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT'
  EXPORTING
    input =                      WA_NETZR-PSPID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_NETZR-PSPID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSN, internal->external for field POSID
CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT'
  EXPORTING
    input =                      WA_NETZR-POSID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_NETZR-POSID.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit NUMCV, internal->external for field VORNT
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_NETZR-VORNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_NETZR-VORNT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit CUNIT, internal->external for field VEINH
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_NETZR-VEINH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_NETZR-VEINH.
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_NETZR_STR, 
ARNUMMER TYPE STRING,
VSGRUPPE TYPE STRING,
VSNUMMER TYPE STRING,
PRCTR TYPE STRING,
PRNAM TYPE STRING,
PRPOS TYPE STRING,
PSPID TYPE STRING,
POSID TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
AUFNR TYPE STRING,
AUFNT TYPE STRING,
VORNT TYPE STRING,
AUART TYPE STRING,
KTEXT TYPE STRING,
LTEXT TYPE STRING,
BUKRS TYPE STRING,
WERKS TYPE STRING,
GSBER TYPE STRING,
KOKRS TYPE STRING,
KOSTV TYPE STRING,
WAERS TYPE STRING,
TXJCD TYPE STRING,
SCOPE TYPE STRING,
AENNR TYPE STRING,
GLTRP TYPE STRING,
GSTRP TYPE STRING,
FTRMS TYPE STRING,
GLTRS TYPE STRING,
GSTRS TYPE STRING,
GSTRI TYPE STRING,
GETRI TYPE STRING,
GLTRI TYPE STRING,
FTRMI TYPE STRING,
FTRMP TYPE STRING,
DISPO TYPE STRING,
DSNAM TYPE STRING,
FEVOR TYPE STRING,
TERKZ TYPE STRING,
REDKZ TYPE STRING,
APRIO TYPE STRING,
GLTPP TYPE STRING,
GSTPP TYPE STRING,
GLTPS TYPE STRING,
GSTPS TYPE STRING,
FTRPS TYPE STRING,
RDKZP TYPE STRING,
TRKZP TYPE STRING,
GLUZS TYPE STRING,
GSUZS TYPE STRING,
AUTERM TYPE STRING,
AUCOST TYPE STRING,
AUDISP TYPE STRING,
GLUZP TYPE STRING,
GSUZP TYPE STRING,
GSUZI TYPE STRING,
GEUZI TYPE STRING,
GLUPP TYPE STRING,
GSUPP TYPE STRING,
GLUPS TYPE STRING,
GSUPS TYPE STRING,
AUKBED TYPE STRING,
KDEIN TYPE STRING,
STATXT TYPE STRING,
FRUEHER TYPE STRING,
SPAETER TYPE STRING,
VERZUG TYPE STRING,
VORBEI TYPE STRING,
VEINH TYPE STRING,
GSBTR TYPE STRING,
KZAVC TYPE STRING,
RETCODE TYPE STRING,
MSGTY TYPE STRING,
FUNC_AREA TYPE STRING,
EEW_AUFK_PS_DUMMY TYPE STRING,END OF T_EKKO_STR.
DATA: WA_NETZR_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_NETZR_STR-ARNUMMER sy-vline 
WA_NETZR_STR-VSGRUPPE sy-vline 
WA_NETZR_STR-VSNUMMER sy-vline 
WA_NETZR_STR-PRCTR sy-vline 
WA_NETZR_STR-PRNAM sy-vline 
WA_NETZR_STR-PRPOS sy-vline 
WA_NETZR_STR-PSPID sy-vline 
WA_NETZR_STR-POSID sy-vline 
WA_NETZR_STR-KDAUF sy-vline 
WA_NETZR_STR-KDPOS sy-vline 
WA_NETZR_STR-AUFNR sy-vline 
WA_NETZR_STR-AUFNT sy-vline 
WA_NETZR_STR-VORNT sy-vline 
WA_NETZR_STR-AUART sy-vline 
WA_NETZR_STR-KTEXT sy-vline 
WA_NETZR_STR-LTEXT sy-vline 
WA_NETZR_STR-BUKRS sy-vline 
WA_NETZR_STR-WERKS sy-vline 
WA_NETZR_STR-GSBER sy-vline 
WA_NETZR_STR-KOKRS sy-vline 
WA_NETZR_STR-KOSTV sy-vline 
WA_NETZR_STR-WAERS sy-vline 
WA_NETZR_STR-TXJCD sy-vline 
WA_NETZR_STR-SCOPE sy-vline 
WA_NETZR_STR-AENNR sy-vline 
WA_NETZR_STR-GLTRP sy-vline 
WA_NETZR_STR-GSTRP sy-vline 
WA_NETZR_STR-FTRMS sy-vline 
WA_NETZR_STR-GLTRS sy-vline 
WA_NETZR_STR-GSTRS sy-vline 
WA_NETZR_STR-GSTRI sy-vline 
WA_NETZR_STR-GETRI sy-vline 
WA_NETZR_STR-GLTRI sy-vline 
WA_NETZR_STR-FTRMI sy-vline 
WA_NETZR_STR-FTRMP sy-vline 
WA_NETZR_STR-DISPO sy-vline 
WA_NETZR_STR-DSNAM sy-vline 
WA_NETZR_STR-FEVOR sy-vline 
WA_NETZR_STR-TERKZ sy-vline 
WA_NETZR_STR-REDKZ sy-vline 
WA_NETZR_STR-APRIO sy-vline 
WA_NETZR_STR-GLTPP sy-vline 
WA_NETZR_STR-GSTPP sy-vline 
WA_NETZR_STR-GLTPS sy-vline 
WA_NETZR_STR-GSTPS sy-vline 
WA_NETZR_STR-FTRPS sy-vline 
WA_NETZR_STR-RDKZP sy-vline 
WA_NETZR_STR-TRKZP sy-vline 
WA_NETZR_STR-GLUZS sy-vline 
WA_NETZR_STR-GSUZS sy-vline 
WA_NETZR_STR-AUTERM sy-vline 
WA_NETZR_STR-AUCOST sy-vline 
WA_NETZR_STR-AUDISP sy-vline 
WA_NETZR_STR-GLUZP sy-vline 
WA_NETZR_STR-GSUZP sy-vline 
WA_NETZR_STR-GSUZI sy-vline 
WA_NETZR_STR-GEUZI sy-vline 
WA_NETZR_STR-GLUPP sy-vline 
WA_NETZR_STR-GSUPP sy-vline 
WA_NETZR_STR-GLUPS sy-vline 
WA_NETZR_STR-GSUPS sy-vline 
WA_NETZR_STR-AUKBED sy-vline 
WA_NETZR_STR-KDEIN sy-vline 
WA_NETZR_STR-STATXT sy-vline 
WA_NETZR_STR-FRUEHER sy-vline 
WA_NETZR_STR-SPAETER sy-vline 
WA_NETZR_STR-VERZUG sy-vline 
WA_NETZR_STR-VORBEI sy-vline 
WA_NETZR_STR-VEINH sy-vline 
WA_NETZR_STR-GSBTR sy-vline 
WA_NETZR_STR-KZAVC sy-vline 
WA_NETZR_STR-RETCODE sy-vline 
WA_NETZR_STR-MSGTY sy-vline 
WA_NETZR_STR-FUNC_AREA sy-vline 
WA_NETZR_STR-EEW_AUFK_PS_DUMMY sy-vline      INTO ld_text SEPARATED BY SPACE.

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