ABAP Select data from SAP table QAMS_RFC_VIQMEL 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 QAMS_RFC_VIQMEL 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 QAMS_RFC_VIQMEL. 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 QAMS_RFC_VIQMEL 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_QAMS_RFC_VIQMEL TYPE STANDARD TABLE OF QAMS_RFC_VIQMEL,
      WA_QAMS_RFC_VIQMEL TYPE QAMS_RFC_VIQMEL,
      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: <QAMS_RFC_VIQMEL> TYPE QAMS_RFC_VIQMEL.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM QAMS_RFC_VIQMEL
*  INTO TABLE @DATA(IT_QAMS_RFC_VIQMEL2).
*--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_QAMS_RFC_VIQMEL INDEX 1 INTO DATA(WA_QAMS_RFC_VIQMEL2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<QAMS_RFC_VIQMEL>-MANDT = 1.
<QAMS_RFC_VIQMEL>-QMNUM = 1.
<QAMS_RFC_VIQMEL>-IWERK = 1.
<QAMS_RFC_VIQMEL>-ILOAN = 1.
<QAMS_RFC_VIQMEL>-ILOAI = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_QAMS_RFC_VIQMEL-EQUNR, sy-vline,
  WA_QAMS_RFC_VIQMEL-BAUTL, sy-vline,
  WA_QAMS_RFC_VIQMEL-EBORT, sy-vline,
  WA_QAMS_RFC_VIQMEL-MSAUS, sy-vline,
  WA_QAMS_RFC_VIQMEL-AUSVN, sy-vline,
  WA_QAMS_RFC_VIQMEL-AUSBS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_QAMS_RFC_VIQMEL 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_QAMS_RFC_VIQMEL 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_QAMS_RFC_VIQMEL INTO WA_QAMS_RFC_VIQMEL.


*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_QAMS_RFC_VIQMEL_STR, 
MANDT TYPE STRING,
QMNUM TYPE STRING,
IWERK TYPE STRING,
ILOAN TYPE STRING,
ILOAI TYPE STRING,
EQUNR TYPE STRING,
BAUTL TYPE STRING,
EBORT TYPE STRING,
MSAUS TYPE STRING,
AUSVN TYPE STRING,
AUSBS TYPE STRING,
AUZTV TYPE STRING,
AUZTB TYPE STRING,
AUSZT TYPE STRING,
MAUEH TYPE STRING,
BTPLN TYPE STRING,
BEQUI TYPE STRING,
AUSWK TYPE STRING,
VERFV TYPE STRING,
VERFN TYPE STRING,
VERFM TYPE STRING,
ANLZV TYPE STRING,
ANLZN TYPE STRING,
ANLZE TYPE STRING,
INSPK TYPE STRING,
DATAN TYPE STRING,
INGRP TYPE STRING,
WARPL TYPE STRING,
ABNUM TYPE STRING,
WAPOS TYPE STRING,
SCREENTY TYPE STRING,
QMART TYPE STRING,
QMTXT TYPE STRING,
ARTPR TYPE STRING,
PRIOK TYPE STRING,
ERNAM TYPE STRING,
ERDAT TYPE STRING,
AENAM TYPE STRING,
AEDAT TYPE STRING,
MZEIT TYPE STRING,
QMDAT TYPE STRING,
QMNAM TYPE STRING,
STRMN TYPE STRING,
STRUR TYPE STRING,
LTRMN TYPE STRING,
LTRUR TYPE STRING,
WAERS TYPE STRING,
AUFNR TYPE STRING,
VERID TYPE STRING,
RM_MATNR TYPE STRING,
RM_WERKS TYPE STRING,
SA_AUFNR TYPE STRING,
MATNR TYPE STRING,
REVLV TYPE STRING,
MATKL TYPE STRING,
PRDHA TYPE STRING,
KZKRI TYPE STRING,
KZDKZ TYPE STRING,
KUNUM TYPE STRING,
FEKNZ TYPE STRING,
MAKNZ TYPE STRING,
OBJNR TYPE STRING,
QMDAB TYPE STRING,
QMZAB TYPE STRING,
RBNR TYPE STRING,
RBNRI TYPE STRING,
INDTX TYPE STRING,
KZMLA TYPE STRING,
HERKZ TYPE STRING,
BEZDT TYPE STRING,
BEZUR TYPE STRING,
LIFNUM TYPE STRING,
BUNAME TYPE STRING,
VBELN TYPE STRING,
BSTNK TYPE STRING,
BSTDK TYPE STRING,
SPART TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
ADRNR TYPE STRING,
AEZEIT TYPE STRING,
ERZEIT TYPE STRING,
MAWERK TYPE STRING,
QMKAT TYPE STRING,
QMGRP TYPE STRING,
QMCOD TYPE STRING,
AUSWIRK TYPE STRING,
TEILEV TYPE STRING,
PRUEFLOS TYPE STRING,
CHARG TYPE STRING,
LGORTCHARG TYPE STRING,
LICHN TYPE STRING,
HERSTELLER TYPE STRING,
EMATNR TYPE STRING,
EKORG TYPE STRING,
BKGRP TYPE STRING,
LGORTVORG TYPE STRING,
FERTAUFNR TYPE STRING,
FERTAUFPL TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
MJAHR TYPE STRING,
MBLNR TYPE STRING,
MBLPO TYPE STRING,
LS_KDAUF TYPE STRING,
LS_KDPOS TYPE STRING,
LS_VBELN TYPE STRING,
LS_POSNR TYPE STRING,
CROBJTY TYPE STRING,
ARBPL TYPE STRING,
ARBPLWERK TYPE STRING,
FEART TYPE STRING,
PNLKN TYPE STRING,
MGEIG TYPE STRING,
MGFRD TYPE STRING,
MGEIN TYPE STRING,
BZMNG TYPE STRING,
RKMNG TYPE STRING,
RGMNG TYPE STRING,
RKDAT TYPE STRING,
COAUFNR TYPE STRING,
QWRNUM TYPE STRING,
REFNUM TYPE STRING,
KDMAT TYPE STRING,
IDNLF TYPE STRING,
SERIALNR TYPE STRING,
KZLOESCH TYPE STRING,
PRODDAT TYPE STRING,
DEVICEID TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
AUTKZ TYPE STRING,
BEDID TYPE STRING,
BEDZL TYPE STRING,
PROFIL_TYP TYPE STRING,
PROFIL_ID TYPE STRING,
HANDLE TYPE STRING,
TSEGFL TYPE STRING,
TSEGTP TYPE STRING,
TZONSO TYPE STRING,
TZONID TYPE STRING,
FUNKTION TYPE STRING,END OF T_EKKO_STR.
DATA: WA_QAMS_RFC_VIQMEL_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_QAMS_RFC_VIQMEL_STR-MANDT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMNUM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-IWERK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ILOAN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ILOAI sy-vline 
WA_QAMS_RFC_VIQMEL_STR-EQUNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BAUTL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-EBORT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MSAUS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUSVN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUSBS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUZTV sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUZTB sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUSZT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MAUEH sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BTPLN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BEQUI sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUSWK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VERFV sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VERFN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VERFM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ANLZV sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ANLZN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ANLZE sy-vline 
WA_QAMS_RFC_VIQMEL_STR-INSPK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-DATAN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-INGRP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-WARPL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ABNUM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-WAPOS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-SCREENTY sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMART sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMTXT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ARTPR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PRIOK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ERNAM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ERDAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AENAM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AEDAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MZEIT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMDAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMNAM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-STRMN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-STRUR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LTRMN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LTRUR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-WAERS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUFNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VERID sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RM_MATNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RM_WERKS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-SA_AUFNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MATNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-REVLV sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MATKL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PRDHA sy-vline 
WA_QAMS_RFC_VIQMEL_STR-KZKRI sy-vline 
WA_QAMS_RFC_VIQMEL_STR-KZDKZ sy-vline 
WA_QAMS_RFC_VIQMEL_STR-KUNUM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-FEKNZ sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MAKNZ sy-vline 
WA_QAMS_RFC_VIQMEL_STR-OBJNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMDAB sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMZAB sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RBNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RBNRI sy-vline 
WA_QAMS_RFC_VIQMEL_STR-INDTX sy-vline 
WA_QAMS_RFC_VIQMEL_STR-KZMLA sy-vline 
WA_QAMS_RFC_VIQMEL_STR-HERKZ sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BEZDT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BEZUR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LIFNUM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BUNAME sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VBELN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BSTNK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BSTDK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-SPART sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VKORG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VTWEG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ADRNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AEZEIT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ERZEIT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MAWERK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMKAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMGRP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QMCOD sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUSWIRK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-TEILEV sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PRUEFLOS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-CHARG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LGORTCHARG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LICHN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-HERSTELLER sy-vline 
WA_QAMS_RFC_VIQMEL_STR-EMATNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-EKORG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BKGRP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LGORTVORG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-FERTAUFNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-FERTAUFPL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-EBELN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-EBELP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MJAHR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MBLNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MBLPO sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LS_KDAUF sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LS_KDPOS sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LS_VBELN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-LS_POSNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-CROBJTY sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ARBPL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-ARBPLWERK sy-vline 
WA_QAMS_RFC_VIQMEL_STR-FEART sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PNLKN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MGEIG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MGFRD sy-vline 
WA_QAMS_RFC_VIQMEL_STR-MGEIN sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BZMNG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RKMNG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RGMNG sy-vline 
WA_QAMS_RFC_VIQMEL_STR-RKDAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-COAUFNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-QWRNUM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-REFNUM sy-vline 
WA_QAMS_RFC_VIQMEL_STR-KDMAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-IDNLF sy-vline 
WA_QAMS_RFC_VIQMEL_STR-SERIALNR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-KZLOESCH sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PRODDAT sy-vline 
WA_QAMS_RFC_VIQMEL_STR-DEVICEID sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VKBUR sy-vline 
WA_QAMS_RFC_VIQMEL_STR-VKGRP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-AUTKZ sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BEDID sy-vline 
WA_QAMS_RFC_VIQMEL_STR-BEDZL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PROFIL_TYP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-PROFIL_ID sy-vline 
WA_QAMS_RFC_VIQMEL_STR-HANDLE sy-vline 
WA_QAMS_RFC_VIQMEL_STR-TSEGFL sy-vline 
WA_QAMS_RFC_VIQMEL_STR-TSEGTP sy-vline 
WA_QAMS_RFC_VIQMEL_STR-TZONSO sy-vline 
WA_QAMS_RFC_VIQMEL_STR-TZONID sy-vline 
WA_QAMS_RFC_VIQMEL_STR-FUNKTION sy-vline      INTO ld_text SEPARATED BY SPACE.

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