ABAP Select data from SAP table CRMT_BACKORDER_COM 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 CRMT_BACKORDER_COM 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 CRMT_BACKORDER_COM. 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 CRMT_BACKORDER_COM 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_CRMT_BACKORDER_COM TYPE STANDARD TABLE OF CRMT_BACKORDER_COM,
      WA_CRMT_BACKORDER_COM TYPE CRMT_BACKORDER_COM,
      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: <CRMT_BACKORDER_COM> TYPE CRMT_BACKORDER_COM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CRMT_BACKORDER_COM
*  INTO TABLE @DATA(IT_CRMT_BACKORDER_COM2).
*--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_CRMT_BACKORDER_COM INDEX 1 INTO DATA(WA_CRMT_BACKORDER_COM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CRMT_BACKORDER_COM ASSIGNING <CRMT_BACKORDER_COM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<CRMT_BACKORDER_COM>-ORDID = 1.
<CRMT_BACKORDER_COM>-SCHEDID = 1.
<CRMT_BACKORDER_COM>-METHOD = 1.
<CRMT_BACKORDER_COM>-DOC = 1.
<CRMT_BACKORDER_COM>-ITEM = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CRMT_BACKORDER_COM-SCHED, sy-vline,
WA_CRMT_BACKORDER_COM-ATPCAT, sy-vline,
WA_CRMT_BACKORDER_COM-PRODUCT, sy-vline,
WA_CRMT_BACKORDER_COM-LOCATION, sy-vline,
WA_CRMT_BACKORDER_COM-SALES_ORG, sy-vline,
WA_CRMT_BACKORDER_COM-DISTR_CHAN, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CRMT_BACKORDER_COM 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_CRMT_BACKORDER_COM 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_CRMT_BACKORDER_COM INTO WA_CRMT_BACKORDER_COM. *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 AUART, internal->external for field DOC_TYPE CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_CRMT_BACKORDER_COM-DOC_TYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CRMT_BACKORDER_COM-DOC_TYPE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field BASME CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CRMT_BACKORDER_COM-BASME IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CRMT_BACKORDER_COM-BASME.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field QT_BASME CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CRMT_BACKORDER_COM-QT_BASME IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CRMT_BACKORDER_COM-QT_BASME.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field ATP_DUEDATE CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT' EXPORTING input = WA_CRMT_BACKORDER_COM-ATP_DUEDATE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CRMT_BACKORDER_COM-ATP_DUEDATE.
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_CRMT_BACKORDER_COM_STR,
ORDID TYPE STRING,
SCHEDID TYPE STRING,
METHOD TYPE STRING,
DOC TYPE STRING,
ITEM TYPE STRING,
SCHED TYPE STRING,
ATPCAT TYPE STRING,
PRODUCT TYPE STRING,
LOCATION TYPE STRING,
SALES_ORG TYPE STRING,
DISTR_CHAN TYPE STRING,
DIVISION TYPE STRING,
DOC_TYPE TYPE STRING,
SHIP_TO TYPE STRING,
SOLD_TO TYPE STRING,
WMENG TYPE STRING,
BASME TYPE STRING,
EDATU TYPE STRING,
BMENG TYPE STRING,
MBDAT TYPE STRING,
BSTKD TYPE STRING,
LOCID TYPE STRING,
MATID TYPE STRING,
KOSCH TYPE STRING,
CHMOD TYPE STRING,
QT_PLUID TYPE STRING,
QT_DATUM TYPE STRING,
QT_MENGE TYPE STRING,
QT_BASME TYPE STRING,
MAINITEM TYPE STRING,
POSGUID TYPE STRING,
MI_POSGUID TYPE STRING,
SUBSREASON TYPE STRING,
SYSIND TYPE STRING,
RPFLG TYPE STRING,
LOGQS TYPE STRING,
ATPM1 TYPE STRING,
ATPMG TYPE STRING,
LOCNO TYPE STRING,
LOCTYPE TYPE STRING,
SOBKZ TYPE STRING,
SSKEY TYPE STRING,
LGORT TYPE STRING,
CHARG TYPE STRING,
REMFLG TYPE STRING,
FIXMG TYPE STRING,
TDDAT TYPE STRING,
LDDAT TYPE STRING,
WADAT TYPE STRING,
MBUHR TYPE STRING,
TDUHR TYPE STRING,
LDUHR TYPE STRING,
WAUHR TYPE STRING,
TTYPE TYPE STRING,
LFUHR TYPE STRING,
SRCPS TYPE STRING,
PERSIST_ID TYPE STRING,
DELET TYPE STRING,
VSMNG TYPE STRING,
ACTIME TYPE STRING,
UOM_ISO TYPE STRING,
READ_REQ TYPE STRING,
QUANTITY_FACTOR TYPE STRING,
QUANTITY_DIVISOR TYPE STRING,
ATP_DUEDATE TYPE STRING,
ITM_USAGE TYPE STRING,
ITM_TYPE_USAGE TYPE STRING,
TAXJURCODE TYPE STRING,
REGION TYPE STRING,
COUNTRY TYPE STRING,
DELIV_GROUP_CORR TYPE STRING,
GEOROUTE TYPE STRING,
GEOROUTE_IND TYPE STRING,
ROUTE_GTS TYPE STRING,
GTS_IND TYPE STRING,
CARRIER TYPE STRING,
CARRIER_IND TYPE STRING,
FACING_LOCATION TYPE STRING,
FACING_LOCTYPE TYPE STRING,
FIRST_STOCK_LOCATION TYPE STRING,
FIRST_STOCK_LOCTYPE TYPE STRING,
TPDS_TYPE TYPE STRING,
ITM_ANCHOR TYPE STRING,
ITM_OWN_QUANTITY TYPE STRING,
REQQTY_UNRND TYPE STRING,
ELDAT TYPE STRING,
ELUHR TYPE STRING,
TEMP_OBJ_MODE TYPE STRING,
CONSFLG TYPE STRING,
RLDAT TYPE STRING,
RLUHR TYPE STRING,
KEEP_QTY TYPE STRING,
SCRAP_IND TYPE STRING,
CD_LOCATION TYPE STRING,
CD_LOCATION_TYPE TYPE STRING,
SUDAT TYPE STRING,
SUUHR TYPE STRING,END OF T_EKKO_STR. DATA: WA_CRMT_BACKORDER_COM_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_CRMT_BACKORDER_COM_STR-ORDID sy-vline
WA_CRMT_BACKORDER_COM_STR-SCHEDID sy-vline
WA_CRMT_BACKORDER_COM_STR-METHOD sy-vline
WA_CRMT_BACKORDER_COM_STR-DOC sy-vline
WA_CRMT_BACKORDER_COM_STR-ITEM sy-vline
WA_CRMT_BACKORDER_COM_STR-SCHED sy-vline
WA_CRMT_BACKORDER_COM_STR-ATPCAT sy-vline
WA_CRMT_BACKORDER_COM_STR-PRODUCT sy-vline
WA_CRMT_BACKORDER_COM_STR-LOCATION sy-vline
WA_CRMT_BACKORDER_COM_STR-SALES_ORG sy-vline
WA_CRMT_BACKORDER_COM_STR-DISTR_CHAN sy-vline
WA_CRMT_BACKORDER_COM_STR-DIVISION sy-vline
WA_CRMT_BACKORDER_COM_STR-DOC_TYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-SHIP_TO sy-vline
WA_CRMT_BACKORDER_COM_STR-SOLD_TO sy-vline
WA_CRMT_BACKORDER_COM_STR-WMENG sy-vline
WA_CRMT_BACKORDER_COM_STR-BASME sy-vline
WA_CRMT_BACKORDER_COM_STR-EDATU sy-vline
WA_CRMT_BACKORDER_COM_STR-BMENG sy-vline
WA_CRMT_BACKORDER_COM_STR-MBDAT sy-vline
WA_CRMT_BACKORDER_COM_STR-BSTKD sy-vline
WA_CRMT_BACKORDER_COM_STR-LOCID sy-vline
WA_CRMT_BACKORDER_COM_STR-MATID sy-vline
WA_CRMT_BACKORDER_COM_STR-KOSCH sy-vline
WA_CRMT_BACKORDER_COM_STR-CHMOD sy-vline
WA_CRMT_BACKORDER_COM_STR-QT_PLUID sy-vline
WA_CRMT_BACKORDER_COM_STR-QT_DATUM sy-vline
WA_CRMT_BACKORDER_COM_STR-QT_MENGE sy-vline
WA_CRMT_BACKORDER_COM_STR-QT_BASME sy-vline
WA_CRMT_BACKORDER_COM_STR-MAINITEM sy-vline
WA_CRMT_BACKORDER_COM_STR-POSGUID sy-vline
WA_CRMT_BACKORDER_COM_STR-MI_POSGUID sy-vline
WA_CRMT_BACKORDER_COM_STR-SUBSREASON sy-vline
WA_CRMT_BACKORDER_COM_STR-SYSIND sy-vline
WA_CRMT_BACKORDER_COM_STR-RPFLG sy-vline
WA_CRMT_BACKORDER_COM_STR-LOGQS sy-vline
WA_CRMT_BACKORDER_COM_STR-ATPM1 sy-vline
WA_CRMT_BACKORDER_COM_STR-ATPMG sy-vline
WA_CRMT_BACKORDER_COM_STR-LOCNO sy-vline
WA_CRMT_BACKORDER_COM_STR-LOCTYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-SOBKZ sy-vline
WA_CRMT_BACKORDER_COM_STR-SSKEY sy-vline
WA_CRMT_BACKORDER_COM_STR-LGORT sy-vline
WA_CRMT_BACKORDER_COM_STR-CHARG sy-vline
WA_CRMT_BACKORDER_COM_STR-REMFLG sy-vline
WA_CRMT_BACKORDER_COM_STR-FIXMG sy-vline
WA_CRMT_BACKORDER_COM_STR-TDDAT sy-vline
WA_CRMT_BACKORDER_COM_STR-LDDAT sy-vline
WA_CRMT_BACKORDER_COM_STR-WADAT sy-vline
WA_CRMT_BACKORDER_COM_STR-MBUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-TDUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-LDUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-WAUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-TTYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-LFUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-SRCPS sy-vline
WA_CRMT_BACKORDER_COM_STR-PERSIST_ID sy-vline
WA_CRMT_BACKORDER_COM_STR-DELET sy-vline
WA_CRMT_BACKORDER_COM_STR-VSMNG sy-vline
WA_CRMT_BACKORDER_COM_STR-ACTIME sy-vline
WA_CRMT_BACKORDER_COM_STR-UOM_ISO sy-vline
WA_CRMT_BACKORDER_COM_STR-READ_REQ sy-vline
WA_CRMT_BACKORDER_COM_STR-QUANTITY_FACTOR sy-vline
WA_CRMT_BACKORDER_COM_STR-QUANTITY_DIVISOR sy-vline
WA_CRMT_BACKORDER_COM_STR-ATP_DUEDATE sy-vline
WA_CRMT_BACKORDER_COM_STR-ITM_USAGE sy-vline
WA_CRMT_BACKORDER_COM_STR-ITM_TYPE_USAGE sy-vline
WA_CRMT_BACKORDER_COM_STR-TAXJURCODE sy-vline
WA_CRMT_BACKORDER_COM_STR-REGION sy-vline
WA_CRMT_BACKORDER_COM_STR-COUNTRY sy-vline
WA_CRMT_BACKORDER_COM_STR-DELIV_GROUP_CORR sy-vline
WA_CRMT_BACKORDER_COM_STR-GEOROUTE sy-vline
WA_CRMT_BACKORDER_COM_STR-GEOROUTE_IND sy-vline
WA_CRMT_BACKORDER_COM_STR-ROUTE_GTS sy-vline
WA_CRMT_BACKORDER_COM_STR-GTS_IND sy-vline
WA_CRMT_BACKORDER_COM_STR-CARRIER sy-vline
WA_CRMT_BACKORDER_COM_STR-CARRIER_IND sy-vline
WA_CRMT_BACKORDER_COM_STR-FACING_LOCATION sy-vline
WA_CRMT_BACKORDER_COM_STR-FACING_LOCTYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-FIRST_STOCK_LOCATION sy-vline
WA_CRMT_BACKORDER_COM_STR-FIRST_STOCK_LOCTYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-TPDS_TYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-ITM_ANCHOR sy-vline
WA_CRMT_BACKORDER_COM_STR-ITM_OWN_QUANTITY sy-vline
WA_CRMT_BACKORDER_COM_STR-REQQTY_UNRND sy-vline
WA_CRMT_BACKORDER_COM_STR-ELDAT sy-vline
WA_CRMT_BACKORDER_COM_STR-ELUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-TEMP_OBJ_MODE sy-vline
WA_CRMT_BACKORDER_COM_STR-CONSFLG sy-vline
WA_CRMT_BACKORDER_COM_STR-RLDAT sy-vline
WA_CRMT_BACKORDER_COM_STR-RLUHR sy-vline
WA_CRMT_BACKORDER_COM_STR-KEEP_QTY sy-vline
WA_CRMT_BACKORDER_COM_STR-SCRAP_IND sy-vline
WA_CRMT_BACKORDER_COM_STR-CD_LOCATION sy-vline
WA_CRMT_BACKORDER_COM_STR-CD_LOCATION_TYPE sy-vline
WA_CRMT_BACKORDER_COM_STR-SUDAT sy-vline
WA_CRMT_BACKORDER_COM_STR-SUUHR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.