ABAP Select data from SAP table PPCEIODET 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 PPCEIODET 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 PPCEIODET. 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 PPCEIODET 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_PPCEIODET TYPE STANDARD TABLE OF PPCEIODET,
      WA_PPCEIODET TYPE PPCEIODET,
      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: <PPCEIODET> TYPE PPCEIODET.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PPCEIODET
*  INTO TABLE @DATA(IT_PPCEIODET2).
*--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_PPCEIODET INDEX 1 INTO DATA(WA_PPCEIODET2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PPCEIODET ASSIGNING <PPCEIODET>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PPCEIODET>-MANDT = 1.
<PPCEIODET>-PRODCMPLNCEVENTUUID = 1.
<PPCEIODET>-PRODCMPLNCEVENTSOURCEUUID = 1.
<PPCEIODET>-CHMLCMPSTNCHMLCMPLNCINFOUUID = 1.
<PPCEIODET>-CMPLRQRSLTCHMLCMPLNCINFOUUID = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PPCEIODET-CMPLRQRSLTCHMLSUPLRMATLUUID, sy-vline,
WA_PPCEIODET-CMPLRQRSLTSUBSTANCEUUID, sy-vline,
WA_PPCEIODET-SUPLRMATLASSGMTCCIUUID, sy-vline,
WA_PPCEIODET-CRRCSMCCIASSGMTCCIUUID, sy-vline,
WA_PPCEIODET-CHMLSUPLRMATLBPSUPPLIER, sy-vline,
WA_PPCEIODET-CRRCHMLSUPLRMATLBPSUPPLIER, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PPCEIODET 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_PPCEIODET 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_PPCEIODET INTO WA_PPCEIODET. *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 CHMLSUPLRMATLBPSUPPLIER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_PPCEIODET-CHMLSUPLRMATLBPSUPPLIER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-CHMLSUPLRMATLBPSUPPLIER.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit SPEC1, internal->external for field SPECIFICATION CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-SPECIFICATION IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-SPECIFICATION.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit SPEC1, internal->external for field CHMLCMPSTNCHMLCMPLNCINFOSPEC CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-CHMLCMPSTNCHMLCMPLNCINFOSPEC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-CHMLCMPSTNCHMLCMPLNCINFOSPEC.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit SPEC1, internal->external for field CMPLRQRSLTCHMLCMPLNCINFOSPEC CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-CMPLRQRSLTCHMLCMPLNCINFOSPEC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-CMPLRQRSLTCHMLCMPLNCINFOSPEC.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit SPEC1, internal->external for field CMPLRQRSLTCHMLSUPLRMATLSPEC CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-CMPLRQRSLTCHMLSUPLRMATLSPEC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-CMPLRQRSLTCHMLSUPLRMATLSPEC.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SPEC1, internal->external for field CMPLRQRSLTSUBSTANCESPEC CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-CMPLRQRSLTSUBSTANCESPEC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-CMPLRQRSLTSUBSTANCESPEC.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit SPEC1, internal->external for field SUBSTANCESPECIFICATION CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-SUBSTANCESPECIFICATION IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-SUBSTANCESPECIFICATION.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit SPEC1, internal->external for field CHMLSUPLRMATLCHMCMINSPEC CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_PPCEIODET-CHMLSUPLRMATLCHMCMINSPEC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PPCEIODET-CHMLSUPLRMATLCHMCMINSPEC.
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_PPCEIODET_STR,
MANDT TYPE STRING,
PRODCMPLNCEVENTUUID TYPE STRING,
PRODCMPLNCEVENTSOURCEUUID TYPE STRING,
CHMLCMPSTNCHMLCMPLNCINFOUUID TYPE STRING,
CMPLRQRSLTCHMLCMPLNCINFOUUID TYPE STRING,
CMPLRQRSLTCHMLSUPLRMATLUUID TYPE STRING,
CMPLRQRSLTSUBSTANCEUUID TYPE STRING,
SUPLRMATLASSGMTCCIUUID TYPE STRING,
CRRCSMCCIASSGMTCCIUUID TYPE STRING,
CHMLSUPLRMATLBPSUPPLIER TYPE STRING,
CRRCHMLSUPLRMATLBPSUPPLIER TYPE STRING,
CMPLNCPRPSNAME TYPE STRING,
CMPLNCPRPS TYPE STRING,
CMPLRQVERS TYPE STRING,
CMPLRQVERSID TYPE STRING,
CMPLRQVERSENGLISHNAME TYPE STRING,
COMPLIANCEREQUIREMENT TYPE STRING,
CHMLCMPLNCINTERNALNAME TYPE STRING,
PRODUCTNAME TYPE STRING,
MATERIAL TYPE STRING,
SPECIFICATION TYPE STRING,
CHMLCMPSTNCMPLNCINTERNALNAME TYPE STRING,
CHMLCMPSTNPRODUCTNAME TYPE STRING,
CHMLCMPSTNMATERIAL TYPE STRING,
CHMLCMPSTNCHMLCMPLNCINFOSPEC TYPE STRING,
CMPLRQRSLTCHMLCMPLNCINTNAME TYPE STRING,
CMPLRQRSLTPRODUCTNAME TYPE STRING,
CMPLRQRSLTMATERIAL TYPE STRING,
CMPLRQRSLTCHMLCMPLNCINFOSPEC TYPE STRING,
CMPLRQRSLTSUPLRMATLINTNAME TYPE STRING,
CMPLRQRSLTSUPLRMATLPRODNAME TYPE STRING,
CMPLRQRSLTSUPLRMATLMATERIAL TYPE STRING,
CMPLRQRSLTFIRSTNAME TYPE STRING,
CMPLRQRSLTLASTNAME TYPE STRING,
CMPLRQRSLTORGBPNAME1 TYPE STRING,
CMPLRQRSLTORGBPNAME2 TYPE STRING,
CMPLRQRSLTGROUPBPNAME1 TYPE STRING,
CMPLRQRSLTGROUPBPNAME2 TYPE STRING,
CMPLRQRSLTCHMLSUPLRMATLSPEC TYPE STRING,
CMPLRQRSLTSUBSTANCENAME TYPE STRING,
CMPLRQRSLTCUSTLSTDSUBSTNAME TYPE STRING,
CMPLRQRSLTCNTNTLSTDSUBSTNAME TYPE STRING,
CMPLRQRSLTSUBSTANCESPEC TYPE STRING,
CMPLRQRSLTCUSTLSTDSUBST TYPE STRING,
CMPLRQRSLTCNTNTLSTDSUBST TYPE STRING,
CMPLRQRSLTVERSNAME TYPE STRING,
CMPLRQRSLTCMPLRQ TYPE STRING,
COMPANYSUBSTANCENAME TYPE STRING,
CUSTLISTEDSUBSTANCEDFLTNAME TYPE STRING,
CNTNTLISTEDSUBSTANCEDFLTNAME TYPE STRING,
SUBSTANCESPECIFICATION TYPE STRING,
CUSTLISTEDSUBSTANCE TYPE STRING,
CNTNTLISTEDSUBSTANCE TYPE STRING,
CHMLSUPLRMATLCHMCMININTNAME TYPE STRING,
CHMLSUPLRMATLCHMCMINPRODNAME TYPE STRING,
CHMLSUPLRMATLMATERIAL TYPE STRING,
FIRSTNAME TYPE STRING,
LASTNAME TYPE STRING,
ORGANIZATIONBPNAME1 TYPE STRING,
ORGANIZATIONBPNAME2 TYPE STRING,
GROUPBUSINESSPARTNERNAME1 TYPE STRING,
GROUPBUSINESSPARTNERNAME2 TYPE STRING,
CHMLSUPLRMATLCHMCMINSPEC TYPE STRING,END OF T_EKKO_STR. DATA: WA_PPCEIODET_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_PPCEIODET_STR-MANDT sy-vline
WA_PPCEIODET_STR-PRODCMPLNCEVENTUUID sy-vline
WA_PPCEIODET_STR-PRODCMPLNCEVENTSOURCEUUID sy-vline
WA_PPCEIODET_STR-CHMLCMPSTNCHMLCMPLNCINFOUUID sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCHMLCMPLNCINFOUUID sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCHMLSUPLRMATLUUID sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTSUBSTANCEUUID sy-vline
WA_PPCEIODET_STR-SUPLRMATLASSGMTCCIUUID sy-vline
WA_PPCEIODET_STR-CRRCSMCCIASSGMTCCIUUID sy-vline
WA_PPCEIODET_STR-CHMLSUPLRMATLBPSUPPLIER sy-vline
WA_PPCEIODET_STR-CRRCHMLSUPLRMATLBPSUPPLIER sy-vline
WA_PPCEIODET_STR-CMPLNCPRPSNAME sy-vline
WA_PPCEIODET_STR-CMPLNCPRPS sy-vline
WA_PPCEIODET_STR-CMPLRQVERS sy-vline
WA_PPCEIODET_STR-CMPLRQVERSID sy-vline
WA_PPCEIODET_STR-CMPLRQVERSENGLISHNAME sy-vline
WA_PPCEIODET_STR-COMPLIANCEREQUIREMENT sy-vline
WA_PPCEIODET_STR-CHMLCMPLNCINTERNALNAME sy-vline
WA_PPCEIODET_STR-PRODUCTNAME sy-vline
WA_PPCEIODET_STR-MATERIAL sy-vline
WA_PPCEIODET_STR-SPECIFICATION sy-vline
WA_PPCEIODET_STR-CHMLCMPSTNCMPLNCINTERNALNAME sy-vline
WA_PPCEIODET_STR-CHMLCMPSTNPRODUCTNAME sy-vline
WA_PPCEIODET_STR-CHMLCMPSTNMATERIAL sy-vline
WA_PPCEIODET_STR-CHMLCMPSTNCHMLCMPLNCINFOSPEC sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCHMLCMPLNCINTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTPRODUCTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTMATERIAL sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCHMLCMPLNCINFOSPEC sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTSUPLRMATLINTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTSUPLRMATLPRODNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTSUPLRMATLMATERIAL sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTFIRSTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTLASTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTORGBPNAME1 sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTORGBPNAME2 sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTGROUPBPNAME1 sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTGROUPBPNAME2 sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCHMLSUPLRMATLSPEC sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTSUBSTANCENAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCUSTLSTDSUBSTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCNTNTLSTDSUBSTNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTSUBSTANCESPEC sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCUSTLSTDSUBST sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCNTNTLSTDSUBST sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTVERSNAME sy-vline
WA_PPCEIODET_STR-CMPLRQRSLTCMPLRQ sy-vline
WA_PPCEIODET_STR-COMPANYSUBSTANCENAME sy-vline
WA_PPCEIODET_STR-CUSTLISTEDSUBSTANCEDFLTNAME sy-vline
WA_PPCEIODET_STR-CNTNTLISTEDSUBSTANCEDFLTNAME sy-vline
WA_PPCEIODET_STR-SUBSTANCESPECIFICATION sy-vline
WA_PPCEIODET_STR-CUSTLISTEDSUBSTANCE sy-vline
WA_PPCEIODET_STR-CNTNTLISTEDSUBSTANCE sy-vline
WA_PPCEIODET_STR-CHMLSUPLRMATLCHMCMININTNAME sy-vline
WA_PPCEIODET_STR-CHMLSUPLRMATLCHMCMINPRODNAME sy-vline
WA_PPCEIODET_STR-CHMLSUPLRMATLMATERIAL sy-vline
WA_PPCEIODET_STR-FIRSTNAME sy-vline
WA_PPCEIODET_STR-LASTNAME sy-vline
WA_PPCEIODET_STR-ORGANIZATIONBPNAME1 sy-vline
WA_PPCEIODET_STR-ORGANIZATIONBPNAME2 sy-vline
WA_PPCEIODET_STR-GROUPBUSINESSPARTNERNAME1 sy-vline
WA_PPCEIODET_STR-GROUPBUSINESSPARTNERNAME2 sy-vline
WA_PPCEIODET_STR-CHMLSUPLRMATLCHMCMINSPEC sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.