ABAP Select data from SAP table ISU2CI_BIT_IT 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 ISU2CI_BIT_IT 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 ISU2CI_BIT_IT. 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 ISU2CI_BIT_IT 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_ISU2CI_BIT_IT TYPE STANDARD TABLE OF ISU2CI_BIT_IT,
      WA_ISU2CI_BIT_IT TYPE ISU2CI_BIT_IT,
      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: <ISU2CI_BIT_IT> TYPE ISU2CI_BIT_IT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ISU2CI_BIT_IT
*  INTO TABLE @DATA(IT_ISU2CI_BIT_IT2).
*--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_ISU2CI_BIT_IT INDEX 1 INTO DATA(WA_ISU2CI_BIT_IT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ISU2CI_BIT_IT>-BITCAT = 1.
<ISU2CI_BIT_IT>-SRCTATYPE = 1.
<ISU2CI_BIT_IT>-SRCTAID = 1.
<ISU2CI_BIT_IT>-SRCTASUBID = 1.
<ISU2CI_BIT_IT>-SUBPROCESS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ISU2CI_BIT_IT-BITTYPE, sy-vline,
  WA_ISU2CI_BIT_IT-PREPAID, sy-vline,
  WA_ISU2CI_BIT_IT-PPREFILL, sy-vline,
  WA_ISU2CI_BIT_IT-APPLK, sy-vline,
  WA_ISU2CI_BIT_IT-VKONT, sy-vline,
  WA_ISU2CI_BIT_IT-VKONA, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ISU2CI_BIT_IT 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_ISU2CI_BIT_IT 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_ISU2CI_BIT_IT INTO WA_ISU2CI_BIT_IT.


*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 SRCTAID
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_ISU2CI_BIT_IT-SRCTAID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ISU2CI_BIT_IT-SRCTAID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field SRCTAID_CORR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_ISU2CI_BIT_IT-SRCTAID_CORR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ISU2CI_BIT_IT-SRCTAID_CORR.
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_ISU2CI_BIT_IT_STR, 
BITCAT TYPE STRING,
SRCTATYPE TYPE STRING,
SRCTAID TYPE STRING,
SRCTASUBID TYPE STRING,
SUBPROCESS TYPE STRING,
BITTYPE TYPE STRING,
PREPAID TYPE STRING,
PPREFILL TYPE STRING,
APPLK TYPE STRING,
VKONT TYPE STRING,
VKONA TYPE STRING,
GPART TYPE STRING,
BPEXT TYPE STRING,
MDCAT TYPE STRING,
VTREF TYPE STRING,
VTPOS TYPE STRING,
SUBAP TYPE STRING,
PPACC TYPE STRING,
MAKEY TYPE STRING,
BILL_BASEDATE TYPE STRING,
BILL_FIRST TYPE STRING,
BITDATE TYPE STRING,
BITTIME TYPE STRING,
BITDATE_FROM TYPE STRING,
BITDATE_TO TYPE STRING,
BITUUID TYPE STRING,
BIT_AMOUNT TYPE STRING,
BIT_CURR TYPE STRING,
BIT_QUANTITY TYPE STRING,
BIT_QTY_UNIT TYPE STRING,
BITREVERSAL TYPE STRING,
POSTREL TYPE STRING,
PRINTREL TYPE STRING,
NOT_BPREL TYPE STRING,
PRINT_SUBSTITUTE TYPE STRING,
SPART TYPE STRING,
BUKRS TYPE STRING,
GSBER TYPE STRING,
SEGMT TYPE STRING,
PRCTR TYPE STRING,
HVORG TYPE STRING,
TVORG TYPE STRING,
KOFIZ TYPE STRING,
SERVICE_TYPE TYPE STRING,
TAX_INCLUDED TYPE STRING,
TAX_DET_TYPE TYPE STRING,
TAX_DATE_TYPE TYPE STRING,
EXT_TAX_DATE TYPE STRING,
EXT_TAX_ID TYPE STRING,
ERMWSKZ TYPE STRING,
MWSKZ TYPE STRING,
STRKZ TYPE STRING,
TXJCD TYPE STRING,
XANZA TYPE STRING,
STAKZ TYPE STRING,
PYMET TYPE STRING,
BITREF32 TYPE STRING,
PY_GROUP TYPE STRING,
TAX_GROUP TYPE STRING,
TXT_GROUP TYPE STRING,
DEFREV_CAT TYPE STRING,
DEFREV_PDATE TYPE STRING,
REVREC_TYPE TYPE STRING,
BILLAC_TYPE TYPE STRING,
EXTN_TYPE TYPE STRING,
SEPARATE_INV TYPE STRING,
SIMULATED TYPE STRING,
DITTYPE TYPE STRING,
CRM_ITEM_TYPE TYPE STRING,
CRM_ACCTGRP_PROD TYPE STRING,
CRM_SALES_ORG TYPE STRING,
CRM_DIS_CHANNEL TYPE STRING,
CRM_DIVISION TYPE STRING,
SRCTATYPE_CORR TYPE STRING,
SRCTAID_CORR TYPE STRING,
SRCTASUBID_CORR TYPE STRING,
SRCTA_CORRCAT TYPE STRING,
PA8120_POS_ID1 TYPE STRING,
PA8120_POS_ID2 TYPE STRING,
PA8120_POS_ID3 TYPE STRING,
PA8120_POS_ID4 TYPE STRING,
PA8121_POS_ID1 TYPE STRING,
PA8121_POS_ID2 TYPE STRING,
PA8121_POS_ID3 TYPE STRING,
PA8121_POS_ID4 TYPE STRING,
OFFSET_REFID TYPE STRING,
OFFSET_CAT TYPE STRING,
OFFSET_PROC TYPE STRING,
OFFSET_ACTION TYPE STRING,
OFFSET_GROUP TYPE STRING,END OF T_EKKO_STR.
DATA: WA_ISU2CI_BIT_IT_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_ISU2CI_BIT_IT_STR-BITCAT sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTATYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTAID sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTASUBID sy-vline 
WA_ISU2CI_BIT_IT_STR-SUBPROCESS sy-vline 
WA_ISU2CI_BIT_IT_STR-BITTYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-PREPAID sy-vline 
WA_ISU2CI_BIT_IT_STR-PPREFILL sy-vline 
WA_ISU2CI_BIT_IT_STR-APPLK sy-vline 
WA_ISU2CI_BIT_IT_STR-VKONT sy-vline 
WA_ISU2CI_BIT_IT_STR-VKONA sy-vline 
WA_ISU2CI_BIT_IT_STR-GPART sy-vline 
WA_ISU2CI_BIT_IT_STR-BPEXT sy-vline 
WA_ISU2CI_BIT_IT_STR-MDCAT sy-vline 
WA_ISU2CI_BIT_IT_STR-VTREF sy-vline 
WA_ISU2CI_BIT_IT_STR-VTPOS sy-vline 
WA_ISU2CI_BIT_IT_STR-SUBAP sy-vline 
WA_ISU2CI_BIT_IT_STR-PPACC sy-vline 
WA_ISU2CI_BIT_IT_STR-MAKEY sy-vline 
WA_ISU2CI_BIT_IT_STR-BILL_BASEDATE sy-vline 
WA_ISU2CI_BIT_IT_STR-BILL_FIRST sy-vline 
WA_ISU2CI_BIT_IT_STR-BITDATE sy-vline 
WA_ISU2CI_BIT_IT_STR-BITTIME sy-vline 
WA_ISU2CI_BIT_IT_STR-BITDATE_FROM sy-vline 
WA_ISU2CI_BIT_IT_STR-BITDATE_TO sy-vline 
WA_ISU2CI_BIT_IT_STR-BITUUID sy-vline 
WA_ISU2CI_BIT_IT_STR-BIT_AMOUNT sy-vline 
WA_ISU2CI_BIT_IT_STR-BIT_CURR sy-vline 
WA_ISU2CI_BIT_IT_STR-BIT_QUANTITY sy-vline 
WA_ISU2CI_BIT_IT_STR-BIT_QTY_UNIT sy-vline 
WA_ISU2CI_BIT_IT_STR-BITREVERSAL sy-vline 
WA_ISU2CI_BIT_IT_STR-POSTREL sy-vline 
WA_ISU2CI_BIT_IT_STR-PRINTREL sy-vline 
WA_ISU2CI_BIT_IT_STR-NOT_BPREL sy-vline 
WA_ISU2CI_BIT_IT_STR-PRINT_SUBSTITUTE sy-vline 
WA_ISU2CI_BIT_IT_STR-SPART sy-vline 
WA_ISU2CI_BIT_IT_STR-BUKRS sy-vline 
WA_ISU2CI_BIT_IT_STR-GSBER sy-vline 
WA_ISU2CI_BIT_IT_STR-SEGMT sy-vline 
WA_ISU2CI_BIT_IT_STR-PRCTR sy-vline 
WA_ISU2CI_BIT_IT_STR-HVORG sy-vline 
WA_ISU2CI_BIT_IT_STR-TVORG sy-vline 
WA_ISU2CI_BIT_IT_STR-KOFIZ sy-vline 
WA_ISU2CI_BIT_IT_STR-SERVICE_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-TAX_INCLUDED sy-vline 
WA_ISU2CI_BIT_IT_STR-TAX_DET_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-TAX_DATE_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-EXT_TAX_DATE sy-vline 
WA_ISU2CI_BIT_IT_STR-EXT_TAX_ID sy-vline 
WA_ISU2CI_BIT_IT_STR-ERMWSKZ sy-vline 
WA_ISU2CI_BIT_IT_STR-MWSKZ sy-vline 
WA_ISU2CI_BIT_IT_STR-STRKZ sy-vline 
WA_ISU2CI_BIT_IT_STR-TXJCD sy-vline 
WA_ISU2CI_BIT_IT_STR-XANZA sy-vline 
WA_ISU2CI_BIT_IT_STR-STAKZ sy-vline 
WA_ISU2CI_BIT_IT_STR-PYMET sy-vline 
WA_ISU2CI_BIT_IT_STR-BITREF32 sy-vline 
WA_ISU2CI_BIT_IT_STR-PY_GROUP sy-vline 
WA_ISU2CI_BIT_IT_STR-TAX_GROUP sy-vline 
WA_ISU2CI_BIT_IT_STR-TXT_GROUP sy-vline 
WA_ISU2CI_BIT_IT_STR-DEFREV_CAT sy-vline 
WA_ISU2CI_BIT_IT_STR-DEFREV_PDATE sy-vline 
WA_ISU2CI_BIT_IT_STR-REVREC_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-BILLAC_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-EXTN_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-SEPARATE_INV sy-vline 
WA_ISU2CI_BIT_IT_STR-SIMULATED sy-vline 
WA_ISU2CI_BIT_IT_STR-DITTYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-CRM_ITEM_TYPE sy-vline 
WA_ISU2CI_BIT_IT_STR-CRM_ACCTGRP_PROD sy-vline 
WA_ISU2CI_BIT_IT_STR-CRM_SALES_ORG sy-vline 
WA_ISU2CI_BIT_IT_STR-CRM_DIS_CHANNEL sy-vline 
WA_ISU2CI_BIT_IT_STR-CRM_DIVISION sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTATYPE_CORR sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTAID_CORR sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTASUBID_CORR sy-vline 
WA_ISU2CI_BIT_IT_STR-SRCTA_CORRCAT sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8120_POS_ID1 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8120_POS_ID2 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8120_POS_ID3 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8120_POS_ID4 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8121_POS_ID1 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8121_POS_ID2 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8121_POS_ID3 sy-vline 
WA_ISU2CI_BIT_IT_STR-PA8121_POS_ID4 sy-vline 
WA_ISU2CI_BIT_IT_STR-OFFSET_REFID sy-vline 
WA_ISU2CI_BIT_IT_STR-OFFSET_CAT sy-vline 
WA_ISU2CI_BIT_IT_STR-OFFSET_PROC sy-vline 
WA_ISU2CI_BIT_IT_STR-OFFSET_ACTION sy-vline 
WA_ISU2CI_BIT_IT_STR-OFFSET_GROUP sy-vline      INTO ld_text SEPARATED BY SPACE.

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