ABAP Select data from SAP table /LIME/PI_ITEM_CREATE 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 /LIME/PI_ITEM_CREATE 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 /LIME/PI_ITEM_CREATE. 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 /LIME/PI_ITEM_CREATE 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_/LIME/PI_ITEM_CREATE TYPE STANDARD TABLE OF /LIME/PI_ITEM_CREATE,
      WA_/LIME/PI_ITEM_CREATE TYPE /LIME/PI_ITEM_CREATE,
      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: </LIME/PI_ITEM_CREATE> TYPE /LIME/PI_ITEM_CREATE.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /LIME/PI_ITEM_CREATE
  INTO TABLE IT_/LIME/PI_ITEM_CREATE.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /LIME/PI_ITEM_CREATE
*  INTO TABLE @DATA(IT_/LIME/PI_ITEM_CREATE2).
*--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_/LIME/PI_ITEM_CREATE INDEX 1 INTO DATA(WA_/LIME/PI_ITEM_CREATE2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/LIME/PI_ITEM_CREATE ASSIGNING </LIME/PI_ITEM_CREATE>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
</LIME/PI_ITEM_CREATE>-DATA = 1.
</LIME/PI_ITEM_CREATE>-ITEM_NO = 1.
</LIME/PI_ITEM_CREATE>-ITEM_GROUP = 1.
</LIME/PI_ITEM_CREATE>-DOC_TYPE = 1.
</LIME/PI_ITEM_CREATE>-GUID_ITEM = 1.
ENDLOOP.

LOOP AT IT_/LIME/PI_ITEM_CREATE INTO WA_/LIME/PI_ITEM_CREATE.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/LIME/PI_ITEM_CREATE-TYPE_ITEM, sy-vline,
WA_/LIME/PI_ITEM_CREATE-IDX_ITEM, sy-vline,
WA_/LIME/PI_ITEM_CREATE-GUID_PARENT, sy-vline,
WA_/LIME/PI_ITEM_CREATE-TYPE_PARENT, sy-vline,
WA_/LIME/PI_ITEM_CREATE-IDX_PARENT, sy-vline,
WA_/LIME/PI_ITEM_CREATE-STOCK_ITEM, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/LIME/PI_ITEM_CREATE 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_/LIME/PI_ITEM_CREATE 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_/LIME/PI_ITEM_CREATE INTO WA_/LIME/PI_ITEM_CREATE. *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 MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_/LIME/PI_ITEM_CREATE-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/LIME/PI_ITEM_CREATE-MATNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MDLPD, internal->external for field MATID CALL FUNCTION 'CONVERSION_EXIT_MDLPD_OUTPUT' EXPORTING input = WA_/LIME/PI_ITEM_CREATE-MATID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/LIME/PI_ITEM_CREATE-MATID.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit HUID, internal->external for field HUIDENT CALL FUNCTION 'CONVERSION_EXIT_HUID_OUTPUT' EXPORTING input = WA_/LIME/PI_ITEM_CREATE-HUIDENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/LIME/PI_ITEM_CREATE-HUIDENT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field TU_NUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/LIME/PI_ITEM_CREATE-TU_NUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/LIME/PI_ITEM_CREATE-TU_NUM.
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_/LIME/PI_ITEM_CREATE_STR,
DATA TYPE STRING,
ITEM_NO TYPE STRING,
ITEM_GROUP TYPE STRING,
DOC_TYPE TYPE STRING,
GUID_ITEM TYPE STRING,
TYPE_ITEM TYPE STRING,
IDX_ITEM TYPE STRING,
GUID_PARENT TYPE STRING,
TYPE_PARENT TYPE STRING,
IDX_PARENT TYPE STRING,
STOCK_ITEM TYPE STRING,
MATNR TYPE STRING,
CHARG TYPE STRING,
OWNER TYPE STRING,
OWNER_ROLE TYPE STRING,
GTIN TYPE STRING,
GTIN_VARIANT TYPE STRING,
CAT TYPE STRING,
STOCK_USAGE TYPE STRING,
SALES_ORD_STOCK TYPE STRING,
S_ORD_ITEM_STOCK TYPE STRING,
WBS_STOCK TYPE STRING,
VRSIOID TYPE STRING,
PRDID TYPE STRING,
APO_MATNR TYPE STRING,
LGNUM_STOCK TYPE STRING,
MATID TYPE STRING,
BATCHID TYPE STRING,
STOCK_DOCCAT TYPE STRING,
STOCK_DOCNO TYPE STRING,
STOCK_ITMNO TYPE STRING,
DOCCAT TYPE STRING,
ENTITLED TYPE STRING,
ENTITLED_ROLE TYPE STRING,
STOCK_CNT TYPE STRING,
HU_ITEM TYPE STRING,
SSCC TYPE STRING,
LGNUM_HU TYPE STRING,
HUIDENT TYPE STRING,
VHI TYPE STRING,
LOC_PARENT TYPE STRING,
WERKS TYPE STRING,
LGORT TYPE STRING,
GLN TYPE STRING,
DUNS4 TYPE STRING,
LOCID TYPE STRING,
APO_LOCNO TYPE STRING,
PARTNER TYPE STRING,
PARTNER_ROLE TYPE STRING,
MOTID TYPE STRING,
MOTSCODE TYPE STRING,
LGNUM TYPE STRING,
LGTYP TYPE STRING,
LGPLA TYPE STRING,
RSRC TYPE STRING,
TU_NUM TYPE STRING,
LGNUM_VIEW TYPE STRING,
COUNT_DATE TYPE STRING,
BLOCK_IND TYPE STRING,
FREEZE_IND TYPE STRING,
REASON TYPE STRING,
PRIORITY TYPE STRING,
WDATU TYPE STRING,
VFDAT TYPE STRING,
COO TYPE STRING,
INSPTYP TYPE STRING,
INSPID TYPE STRING,
IDPLATE TYPE STRING,
QDOCCAT TYPE STRING,
QDOCID TYPE STRING,
QITMID TYPE STRING,
T_PARAM TYPE STRING,
T_REFERENCE TYPE STRING,
INACTIVE TYPE STRING,
ACTIVE TYPE STRING,END OF T_EKKO_STR. DATA: WA_/LIME/PI_ITEM_CREATE_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_/LIME/PI_ITEM_CREATE_STR-DATA sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-ITEM_NO sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-ITEM_GROUP sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-DOC_TYPE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-GUID_ITEM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-TYPE_ITEM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-IDX_ITEM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-GUID_PARENT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-TYPE_PARENT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-IDX_PARENT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-STOCK_ITEM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-MATNR sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-CHARG sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-OWNER sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-OWNER_ROLE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-GTIN sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-GTIN_VARIANT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-CAT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-STOCK_USAGE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-SALES_ORD_STOCK sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-S_ORD_ITEM_STOCK sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-WBS_STOCK sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-VRSIOID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-PRDID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-APO_MATNR sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGNUM_STOCK sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-MATID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-BATCHID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-STOCK_DOCCAT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-STOCK_DOCNO sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-STOCK_ITMNO sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-DOCCAT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-ENTITLED sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-ENTITLED_ROLE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-STOCK_CNT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-HU_ITEM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-SSCC sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGNUM_HU sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-HUIDENT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-VHI sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LOC_PARENT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-WERKS sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGORT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-GLN sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-DUNS4 sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LOCID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-APO_LOCNO sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-PARTNER sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-PARTNER_ROLE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-MOTID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-MOTSCODE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGNUM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGTYP sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGPLA sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-RSRC sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-TU_NUM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-LGNUM_VIEW sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-COUNT_DATE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-BLOCK_IND sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-FREEZE_IND sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-REASON sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-PRIORITY sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-WDATU sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-VFDAT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-COO sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-INSPTYP sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-INSPID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-IDPLATE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-QDOCCAT sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-QDOCID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-QITMID sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-T_PARAM sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-T_REFERENCE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-INACTIVE sy-vline
WA_/LIME/PI_ITEM_CREATE_STR-ACTIVE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.