ABAP Select data from SAP table CIF_MATKEY 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 CIF_MATKEY 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 CIF_MATKEY. 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 CIF_MATKEY 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_CIF_MATKEY TYPE STANDARD TABLE OF CIF_MATKEY, WA_CIF_MATKEY TYPE CIF_MATKEY, 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: <CIF_MATKEY> TYPE CIF_MATKEY. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_CIF_MATKEY. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM CIF_MATKEY INTO TABLE IT_CIF_MATKEY. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM CIF_MATKEY * INTO TABLE @DATA(IT_CIF_MATKEY2). *--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_CIF_MATKEY INDEX 1 INTO DATA(WA_CIF_MATKEY2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_CIF_MATKEY ASSIGNING <CIF_MATKEY>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<CIF_MATKEY>-METHOD = 1.
<CIF_MATKEY>-MATNR = 1.
<CIF_MATKEY>-MEINS = 1.
<CIF_MATKEY>-DISST = 1.
<CIF_MATKEY>-BRGEW = 1.
ENDLOOP. LOOP AT IT_CIF_MATKEY INTO WA_CIF_MATKEY. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_CIF_MATKEY-GEWEI, sy-vline,
WA_CIF_MATKEY-VOLUM, sy-vline,
WA_CIF_MATKEY-VOLEH, sy-vline,
WA_CIF_MATKEY-KOSCH, sy-vline,
WA_CIF_MATKEY-COMPL, sy-vline,
WA_CIF_MATKEY-MATKL, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CIF_MATKEY 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_CIF_MATKEY 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_CIF_MATKEY INTO WA_CIF_MATKEY. *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 CUNIT, internal->external for field MEINS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-MEINS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-MEINS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field GEWEI CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-GEWEI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-GEWEI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field VOLEH CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-VOLEH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-VOLEH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field MAXW_UOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-MAXW_UOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-MAXW_UOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field MAXV_UOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-MAXV_UOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-MAXV_UOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field MAXDIM_UOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-MAXDIM_UOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-MAXDIM_UOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field QQTIMEUOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-QQTIMEUOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-QQTIMEUOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field LOGUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-LOGUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-LOGUNIT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field PUOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CIF_MATKEY-PUOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-PUOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit PERKZ, internal->external for field IPRKZ CALL FUNCTION 'CONVERSION_EXIT_PERKZ_OUTPUT' EXPORTING input = WA_CIF_MATKEY-IPRKZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CIF_MATKEY-IPRKZ.
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_CIF_MATKEY_STR,
METHOD TYPE STRING,
MATNR TYPE STRING,
MEINS TYPE STRING,
DISST TYPE STRING,
BRGEW TYPE STRING,
GEWEI TYPE STRING,
VOLUM TYPE STRING,
VOLEH TYPE STRING,
KOSCH TYPE STRING,
COMPL TYPE STRING,
MATKL TYPE STRING,
STFAC TYPE STRING,
ATT01 TYPE STRING,
ATT02 TYPE STRING,
ATT03 TYPE STRING,
ATT04 TYPE STRING,
ATT05 TYPE STRING,
KOSCH_GRP TYPE STRING,
MATGUID TYPE STRING,
MATNRLONG TYPE STRING,
MATVERS TYPE STRING,
TRAGR TYPE STRING,
SATNR TYPE STRING,
SHLLIFEDUR TYPE STRING,
MATURTYDUR TYPE STRING,
SHLLIFEFLG TYPE STRING,
SHLLFEDMIN TYPE STRING,
SHLLFEDMAX TYPE STRING,
CUOBJ_TYPE TYPE STRING,
CUOBJ_ID TYPE STRING,
KZKFG TYPE STRING,
TD_SDP_USE TYPE STRING,
PRDHA TYPE STRING,
GTIN_IND TYPE STRING,
CFGSYS TYPE STRING,
DISPLAY TYPE STRING,
VMIKOSCH TYPE STRING,
VMIKOSCH_G TYPE STRING,
PACKGR TYPE STRING,
EXTRMATP TYPE STRING,
HUTYP_DFLT TYPE STRING,
BATCH_REQ TYPE STRING,
PILFERABLE TYPE STRING,
WHSTC TYPE STRING,
WHMATGR TYPE STRING,
HNDLCODE TYPE STRING,
HAZMAT TYPE STRING,
ENVREL TYPE STRING,
DGPROFL TYPE STRING,
ITMTPG TYPE STRING,
MAXW TYPE STRING,
MAXW_UOM TYPE STRING,
MAXW_TOL TYPE STRING,
MAXV TYPE STRING,
MAXV_UOM TYPE STRING,
MAXV_TOL TYPE STRING,
PMTYP TYPE STRING,
CLOSED_PM TYPE STRING,
MAX_FILLUP TYPE STRING,
HUTYP TYPE STRING,
TARE_VAR TYPE STRING,
MAXC TYPE STRING,
MAXC_TOL TYPE STRING,
MAXL TYPE STRING,
MAXB TYPE STRING,
MAXH TYPE STRING,
MAXDIM_UOM TYPE STRING,
MATFRGTGRP TYPE STRING,
COUNTRYORI TYPE STRING,
NTGEW TYPE STRING,
QQTIME TYPE STRING,
QQTIMEUOM TYPE STRING,
QGRP TYPE STRING,
SERIAL TYPE STRING,
PS_SMARTFORM TYPE STRING,
MHDRZ TYPE STRING,
SLED_BBD TYPE STRING,
SLDRND TYPE STRING,
EXTWG TYPE STRING,
SPART TYPE STRING,
CWREL TYPE STRING,
CWTOLGR TYPE STRING,
CWPROC TYPE STRING,
LOGUNIT TYPE STRING,
ATTYP TYPE STRING,
MHDLP TYPE STRING,
ADPROF TYPE STRING,
PUOM TYPE STRING,
MTART TYPE STRING,
IPRKZ TYPE STRING,
KLART TYPE STRING,
CLASS TYPE STRING,
PLANT_BATCH_HANDLING TYPE STRING,END OF T_EKKO_STR. DATA: WA_CIF_MATKEY_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_CIF_MATKEY_STR-METHOD sy-vline
WA_CIF_MATKEY_STR-MATNR sy-vline
WA_CIF_MATKEY_STR-MEINS sy-vline
WA_CIF_MATKEY_STR-DISST sy-vline
WA_CIF_MATKEY_STR-BRGEW sy-vline
WA_CIF_MATKEY_STR-GEWEI sy-vline
WA_CIF_MATKEY_STR-VOLUM sy-vline
WA_CIF_MATKEY_STR-VOLEH sy-vline
WA_CIF_MATKEY_STR-KOSCH sy-vline
WA_CIF_MATKEY_STR-COMPL sy-vline
WA_CIF_MATKEY_STR-MATKL sy-vline
WA_CIF_MATKEY_STR-STFAC sy-vline
WA_CIF_MATKEY_STR-ATT01 sy-vline
WA_CIF_MATKEY_STR-ATT02 sy-vline
WA_CIF_MATKEY_STR-ATT03 sy-vline
WA_CIF_MATKEY_STR-ATT04 sy-vline
WA_CIF_MATKEY_STR-ATT05 sy-vline
WA_CIF_MATKEY_STR-KOSCH_GRP sy-vline
WA_CIF_MATKEY_STR-MATGUID sy-vline
WA_CIF_MATKEY_STR-MATNRLONG sy-vline
WA_CIF_MATKEY_STR-MATVERS sy-vline
WA_CIF_MATKEY_STR-TRAGR sy-vline
WA_CIF_MATKEY_STR-SATNR sy-vline
WA_CIF_MATKEY_STR-SHLLIFEDUR sy-vline
WA_CIF_MATKEY_STR-MATURTYDUR sy-vline
WA_CIF_MATKEY_STR-SHLLIFEFLG sy-vline
WA_CIF_MATKEY_STR-SHLLFEDMIN sy-vline
WA_CIF_MATKEY_STR-SHLLFEDMAX sy-vline
WA_CIF_MATKEY_STR-CUOBJ_TYPE sy-vline
WA_CIF_MATKEY_STR-CUOBJ_ID sy-vline
WA_CIF_MATKEY_STR-KZKFG sy-vline
WA_CIF_MATKEY_STR-TD_SDP_USE sy-vline
WA_CIF_MATKEY_STR-PRDHA sy-vline
WA_CIF_MATKEY_STR-GTIN_IND sy-vline
WA_CIF_MATKEY_STR-CFGSYS sy-vline
WA_CIF_MATKEY_STR-DISPLAY sy-vline
WA_CIF_MATKEY_STR-VMIKOSCH sy-vline
WA_CIF_MATKEY_STR-VMIKOSCH_G sy-vline
WA_CIF_MATKEY_STR-PACKGR sy-vline
WA_CIF_MATKEY_STR-EXTRMATP sy-vline
WA_CIF_MATKEY_STR-HUTYP_DFLT sy-vline
WA_CIF_MATKEY_STR-BATCH_REQ sy-vline
WA_CIF_MATKEY_STR-PILFERABLE sy-vline
WA_CIF_MATKEY_STR-WHSTC sy-vline
WA_CIF_MATKEY_STR-WHMATGR sy-vline
WA_CIF_MATKEY_STR-HNDLCODE sy-vline
WA_CIF_MATKEY_STR-HAZMAT sy-vline
WA_CIF_MATKEY_STR-ENVREL sy-vline
WA_CIF_MATKEY_STR-DGPROFL sy-vline
WA_CIF_MATKEY_STR-ITMTPG sy-vline
WA_CIF_MATKEY_STR-MAXW sy-vline
WA_CIF_MATKEY_STR-MAXW_UOM sy-vline
WA_CIF_MATKEY_STR-MAXW_TOL sy-vline
WA_CIF_MATKEY_STR-MAXV sy-vline
WA_CIF_MATKEY_STR-MAXV_UOM sy-vline
WA_CIF_MATKEY_STR-MAXV_TOL sy-vline
WA_CIF_MATKEY_STR-PMTYP sy-vline
WA_CIF_MATKEY_STR-CLOSED_PM sy-vline
WA_CIF_MATKEY_STR-MAX_FILLUP sy-vline
WA_CIF_MATKEY_STR-HUTYP sy-vline
WA_CIF_MATKEY_STR-TARE_VAR sy-vline
WA_CIF_MATKEY_STR-MAXC sy-vline
WA_CIF_MATKEY_STR-MAXC_TOL sy-vline
WA_CIF_MATKEY_STR-MAXL sy-vline
WA_CIF_MATKEY_STR-MAXB sy-vline
WA_CIF_MATKEY_STR-MAXH sy-vline
WA_CIF_MATKEY_STR-MAXDIM_UOM sy-vline
WA_CIF_MATKEY_STR-MATFRGTGRP sy-vline
WA_CIF_MATKEY_STR-COUNTRYORI sy-vline
WA_CIF_MATKEY_STR-NTGEW sy-vline
WA_CIF_MATKEY_STR-QQTIME sy-vline
WA_CIF_MATKEY_STR-QQTIMEUOM sy-vline
WA_CIF_MATKEY_STR-QGRP sy-vline
WA_CIF_MATKEY_STR-SERIAL sy-vline
WA_CIF_MATKEY_STR-PS_SMARTFORM sy-vline
WA_CIF_MATKEY_STR-MHDRZ sy-vline
WA_CIF_MATKEY_STR-SLED_BBD sy-vline
WA_CIF_MATKEY_STR-SLDRND sy-vline
WA_CIF_MATKEY_STR-EXTWG sy-vline
WA_CIF_MATKEY_STR-SPART sy-vline
WA_CIF_MATKEY_STR-CWREL sy-vline
WA_CIF_MATKEY_STR-CWTOLGR sy-vline
WA_CIF_MATKEY_STR-CWPROC sy-vline
WA_CIF_MATKEY_STR-LOGUNIT sy-vline
WA_CIF_MATKEY_STR-ATTYP sy-vline
WA_CIF_MATKEY_STR-MHDLP sy-vline
WA_CIF_MATKEY_STR-ADPROF sy-vline
WA_CIF_MATKEY_STR-PUOM sy-vline
WA_CIF_MATKEY_STR-MTART sy-vline
WA_CIF_MATKEY_STR-IPRKZ sy-vline
WA_CIF_MATKEY_STR-KLART sy-vline
WA_CIF_MATKEY_STR-CLASS sy-vline
WA_CIF_MATKEY_STR-PLANT_BATCH_HANDLING sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.