ABAP Select data from SAP table CCNTXIIPTTP 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 CCNTXIIPTTP 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 CCNTXIIPTTP. 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 CCNTXIIPTTP 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_CCNTXIIPTTP TYPE STANDARD TABLE OF CCNTXIIPTTP,
      WA_CCNTXIIPTTP TYPE CCNTXIIPTTP,
      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: <CCNTXIIPTTP> TYPE CCNTXIIPTTP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CCNTXIIPTTP
*  INTO TABLE @DATA(IT_CCNTXIIPTTP2).
*--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_CCNTXIIPTTP INDEX 1 INTO DATA(WA_CCNTXIIPTTP2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<CCNTXIIPTTP>-MANDT = 1.
<CCNTXIIPTTP>-CN_TAXINVCUUID = 1.
<CCNTXIIPTTP>-CN_TAXINVCCODE = 1.
<CCNTXIIPTTP>-CN_TAXINVCNMBR = 1.
<CCNTXIIPTTP>-CN_TAXINVCCODENMBR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CCNTXIIPTTP-CN_TAXSELLERREGNNMBR, sy-vline,
  WA_CCNTXIIPTTP-CN_TAXBUYERREGNNMBR, sy-vline,
  WA_CCNTXIIPTTP-CN_TAXINVCTYPE, sy-vline,
  WA_CCNTXIIPTTP-CN_TAXINVCDATE, sy-vline,
  WA_CCNTXIIPTTP-CN_TAXDECLNDEADLINE, sy-vline,
  WA_CCNTXIIPTTP-CN_TAXINVCCRCY, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_CCNTXIIPTTP 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_CCNTXIIPTTP 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_CCNTXIIPTTP INTO WA_CCNTXIIPTTP.


*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 AC172, internal->external for field CN_TAXINVCNETAMTININVCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC172_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-CN_TAXINVCNETAMTININVCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-CN_TAXINVCNETAMTININVCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field CN_TAXINVCTAXAMTININVCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-CN_TAXINVCTAXAMTININVCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-CN_TAXINVCTAXAMTININVCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field CN_TAXINVCDEDUCTAMTININVCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-CN_TAXINVCDEDUCTAMTININVCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-CN_TAXINVCDEDUCTAMTININVCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU172, internal->external for field CN_TAXINVCTOTAMTININVCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AU172_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-CN_TAXINVCTOTAMTININVCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-CN_TAXINVCTOTAMTININVCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC172, internal->external for field CN_TAXINVCDISCNETAMTININVCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC172_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-CN_TAXINVCDISCNETAMTININVCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-CN_TAXINVCDISCNETAMTININVCCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field CN_TAXINVCDISCTAXAMTININVCCRCY
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-CN_TAXINVCDISCTAXAMTININVCCRCY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-CN_TAXINVCDISCTAXAMTININVCCRCY.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GJAHR, internal->external for field FISCALYEAR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-FISCALYEAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-FISCALYEAR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field SUPPLIER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_CCNTXIIPTTP-SUPPLIER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CCNTXIIPTTP-SUPPLIER.
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_CCNTXIIPTTP_STR, 
MANDT TYPE STRING,
CN_TAXINVCUUID TYPE STRING,
CN_TAXINVCCODE TYPE STRING,
CN_TAXINVCNMBR TYPE STRING,
CN_TAXINVCCODENMBR TYPE STRING,
CN_TAXSELLERREGNNMBR TYPE STRING,
CN_TAXBUYERREGNNMBR TYPE STRING,
CN_TAXINVCTYPE TYPE STRING,
CN_TAXINVCDATE TYPE STRING,
CN_TAXDECLNDEADLINE TYPE STRING,
CN_TAXINVCCRCY TYPE STRING,
CN_TAXINVCNETAMTININVCCRCY TYPE STRING,
CN_TAXINVCTAXAMTININVCCRCY TYPE STRING,
CN_TAXINVCDEDUCTAMTININVCCRCY TYPE STRING,
CN_TAXINVCTOTAMTININVCCRCY TYPE STRING,
CN_TAXENTITYID TYPE STRING,
CN_TAXINVCDISCNETAMTININVCCRCY TYPE STRING,
CN_TAXINVCDISCTAXAMTININVCCRCY TYPE STRING,
CN_TAXINVCISELECTRONIC TYPE STRING,
TAXRATE TYPE STRING,
RATIOUNIT TYPE STRING,
COMPANYCODE TYPE STRING,
CN_TAXINVCGLDNTXSYSTSTS TYPE STRING,
CN_TAXINVCGLDNTXSYSTSTSSYNCTME TYPE STRING,
CN_TAXINVCINPTPROCGSTS TYPE STRING,
CN_TAXINVCDEDUCTIONTYPE TYPE STRING,
FISCALYEAR TYPE STRING,
CN_TAXSELLERNAME TYPE STRING,
TAXCATEGORY TYPE STRING,
CN_TAXDECLNYEAR TYPE STRING,
CN_TAXDECLNMONTH TYPE STRING,
CN_TAXDECLNYEARMONTH TYPE STRING,
TAXINVOICEBUYERADDRESSPHONE TYPE STRING,
TAXINVOICEBUYERBANKACCOUNT TYPE STRING,
TAXINVOICESELLERADDRESSPHONE TYPE STRING,
TAXINVOICESELLERBANKACCOUNT TYPE STRING,
TAXINVOICEISTAXREBATE TYPE STRING,
TAXINVOICEDECLARATIONTYPECODE TYPE STRING,
CN_ISNOTVEHICLETAXINVOICE TYPE STRING,
CN_ISNOTTOLLTAXINVOICE TYPE STRING,
CN_TAXINVOICEVEHICLETYPE TYPE STRING,
CN_TAXINVOICEVEHFACTORYMODEL TYPE STRING,
CN_TAXINVOICEVEHICLEPRODNPLACE TYPE STRING,
CN_TAXINVOICEVEHICLECERTNUMBER TYPE STRING,
CN_TAXINVOICEVEHIMPORTCERTNMBR TYPE STRING,
CN_TAXINVOICEVEHICLEINSPNUMBER TYPE STRING,
CN_TAXINVOICEVEHICLEENGINENMBR TYPE STRING,
CN_TAXINVOICEVEHICLENUMBER TYPE STRING,
CN_TAXINVCVEHTOTAMTININVCCRCY TYPE STRING,
CN_TAXINVOICEVEHTXNRECORDNMBR TYPE STRING,
CN_TAXINVOICEVEHICLETONNAGE TYPE STRING,
CN_TAXINVOICEVEHPASSENGERLIMIT TYPE STRING,
CN_TAXINVCCOMMENT TYPE STRING,
PURCHASINGORGANIZATION TYPE STRING,
PURCHASINGGROUP TYPE STRING,
SUPPLIER TYPE STRING,
CREATEDBYUSER TYPE STRING,
CREATIONUTCDATETIME TYPE STRING,
LASTCHANGEDBYUSER TYPE STRING,
LASTCHANGEDATETIME TYPE STRING,
DOCUMENTSTATUSDESC TYPE STRING,
DOCUMENTHEADERTEXT TYPE STRING,
EDITINGSTATUSTEXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_CCNTXIIPTTP_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_CCNTXIIPTTP_STR-MANDT sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCUUID sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCCODE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCNMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCCODENMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXSELLERREGNNMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXBUYERREGNNMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCTYPE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCDATE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXDECLNDEADLINE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCNETAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCTAXAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCDEDUCTAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCTOTAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXENTITYID sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCDISCNETAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCDISCTAXAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCISELECTRONIC sy-vline 
WA_CCNTXIIPTTP_STR-TAXRATE sy-vline 
WA_CCNTXIIPTTP_STR-RATIOUNIT sy-vline 
WA_CCNTXIIPTTP_STR-COMPANYCODE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCGLDNTXSYSTSTS sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCGLDNTXSYSTSTSSYNCTME sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCINPTPROCGSTS sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCDEDUCTIONTYPE sy-vline 
WA_CCNTXIIPTTP_STR-FISCALYEAR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXSELLERNAME sy-vline 
WA_CCNTXIIPTTP_STR-TAXCATEGORY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXDECLNYEAR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXDECLNMONTH sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXDECLNYEARMONTH sy-vline 
WA_CCNTXIIPTTP_STR-TAXINVOICEBUYERADDRESSPHONE sy-vline 
WA_CCNTXIIPTTP_STR-TAXINVOICEBUYERBANKACCOUNT sy-vline 
WA_CCNTXIIPTTP_STR-TAXINVOICESELLERADDRESSPHONE sy-vline 
WA_CCNTXIIPTTP_STR-TAXINVOICESELLERBANKACCOUNT sy-vline 
WA_CCNTXIIPTTP_STR-TAXINVOICEISTAXREBATE sy-vline 
WA_CCNTXIIPTTP_STR-TAXINVOICEDECLARATIONTYPECODE sy-vline 
WA_CCNTXIIPTTP_STR-CN_ISNOTVEHICLETAXINVOICE sy-vline 
WA_CCNTXIIPTTP_STR-CN_ISNOTTOLLTAXINVOICE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLETYPE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHFACTORYMODEL sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLEPRODNPLACE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLECERTNUMBER sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHIMPORTCERTNMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLEINSPNUMBER sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLEENGINENMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLENUMBER sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCVEHTOTAMTININVCCRCY sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHTXNRECORDNMBR sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHICLETONNAGE sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVOICEVEHPASSENGERLIMIT sy-vline 
WA_CCNTXIIPTTP_STR-CN_TAXINVCCOMMENT sy-vline 
WA_CCNTXIIPTTP_STR-PURCHASINGORGANIZATION sy-vline 
WA_CCNTXIIPTTP_STR-PURCHASINGGROUP sy-vline 
WA_CCNTXIIPTTP_STR-SUPPLIER sy-vline 
WA_CCNTXIIPTTP_STR-CREATEDBYUSER sy-vline 
WA_CCNTXIIPTTP_STR-CREATIONUTCDATETIME sy-vline 
WA_CCNTXIIPTTP_STR-LASTCHANGEDBYUSER sy-vline 
WA_CCNTXIIPTTP_STR-LASTCHANGEDATETIME sy-vline 
WA_CCNTXIIPTTP_STR-DOCUMENTSTATUSDESC sy-vline 
WA_CCNTXIIPTTP_STR-DOCUMENTHEADERTEXT sy-vline 
WA_CCNTXIIPTTP_STR-EDITINGSTATUSTEXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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