ABAP Select data from SAP table CSKWHLDGTXITM 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 CSKWHLDGTXITM 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 CSKWHLDGTXITM. 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 CSKWHLDGTXITM 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_CSKWHLDGTXITM TYPE STANDARD TABLE OF CSKWHLDGTXITM,
      WA_CSKWHLDGTXITM TYPE CSKWHLDGTXITM,
      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: <CSKWHLDGTXITM> TYPE CSKWHLDGTXITM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CSKWHLDGTXITM
*  INTO TABLE @DATA(IT_CSKWHLDGTXITM2).
*--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_CSKWHLDGTXITM INDEX 1 INTO DATA(WA_CSKWHLDGTXITM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CSKWHLDGTXITM ASSIGNING <CSKWHLDGTXITM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<CSKWHLDGTXITM>-MANDT = 1.
<CSKWHLDGTXITM>-COMPANYCODE = 1.
<CSKWHLDGTXITM>-ACCOUNTINGDOCUMENT = 1.
<CSKWHLDGTXITM>-FISCALYEAR = 1.
<CSKWHLDGTXITM>-ACCOUNTINGDOCUMENTITEM = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CSKWHLDGTXITM-WITHHOLDINGTAXTYPE, sy-vline,
WA_CSKWHLDGTXITM-STATRYRPTGENTITY, sy-vline,
WA_CSKWHLDGTXITM-STATRYRPTCATEGORY, sy-vline,
WA_CSKWHLDGTXITM-STATRYRPTRUNID, sy-vline,
WA_CSKWHLDGTXITM-WITHHOLDINGTAXCODE, sy-vline,
WA_CSKWHLDGTXITM-OFFICIALWHLDGTAXCODE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CSKWHLDGTXITM 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_CSKWHLDGTXITM 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_CSKWHLDGTXITM INTO WA_CSKWHLDGTXITM. *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 ACCOUNTINGDOCUMENT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CSKWHLDGTXITM-ACCOUNTINGDOCUMENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CSKWHLDGTXITM-ACCOUNTINGDOCUMENT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field LANGUAGE CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_CSKWHLDGTXITM-LANGUAGE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CSKWHLDGTXITM-LANGUAGE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SXIDN, internal->external for field EMAILADDRESS CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT' EXPORTING input = WA_CSKWHLDGTXITM-EMAILADDRESS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CSKWHLDGTXITM-EMAILADDRESS.
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_CSKWHLDGTXITM_STR,
MANDT TYPE STRING,
COMPANYCODE TYPE STRING,
ACCOUNTINGDOCUMENT TYPE STRING,
FISCALYEAR TYPE STRING,
ACCOUNTINGDOCUMENTITEM TYPE STRING,
WITHHOLDINGTAXTYPE TYPE STRING,
STATRYRPTGENTITY TYPE STRING,
STATRYRPTCATEGORY TYPE STRING,
STATRYRPTRUNID TYPE STRING,
WITHHOLDINGTAXCODE TYPE STRING,
OFFICIALWHLDGTAXCODE TYPE STRING,
COUNTRY TYPE STRING,
CURRENTDAY TYPE STRING,
CURRENTMONTH TYPE STRING,
CALENDARYEAR TYPE STRING,
CREDITOR TYPE STRING,
DEBTOR TYPE STRING,
POSTINGDATE TYPE STRING,
DOCUMENTDATE TYPE STRING,
SUPPLIERRECIPIENTTYPE TYPE STRING,
WITHHOLDINGTAXPERCENT TYPE STRING,
CLEARINGDATE TYPE STRING,
REPORTINGCURRENCY TYPE STRING,
TRANSACTIONCURRENCY TYPE STRING,
WHLDGTAXBASEAMTINTRANSACCRCY TYPE STRING,
WHLDGTAXBASEAMTINCOCODECRCY TYPE STRING,
WHLDGTAXAMTINTRANSACCRCY TYPE STRING,
WITHHOLDINGTAXAMOUNT TYPE STRING,
WHLDGTAXDOCUMENTTYPE TYPE STRING,
STREETNAME TYPE STRING,
HOUSENUMBER TYPE STRING,
POSTALCODE TYPE STRING,
CITYNAME TYPE STRING,
BUSINESSPARTNERNUMBER TYPE STRING,
BUSINESSPARTNER TYPE STRING,
FIRSTNAME TYPE STRING,
LASTNAME TYPE STRING,
BIRTHDATE TYPE STRING,
PAYERTIN TYPE STRING,
WITHHOLDINGTAXINCOMETYPE TYPE STRING,
SUPPLIERNAME TYPE STRING,
FISCALPERIOD TYPE STRING,
POSTINGKEY TYPE STRING,
ACCOUNTINGDOCUMENTTYPE TYPE STRING,
SPECIALGLCODE TYPE STRING,
SPECIALGLTRANSACTIONTYPE TYPE STRING,
INVOICEREFERENCE TYPE STRING,
TAXSECTION TYPE STRING,
ISREVERSED TYPE STRING,
ISREVERSAL TYPE STRING,
REVERSEDOCUMENT TYPE STRING,
CLEARINGACCOUNTINGDOCUMENT TYPE STRING,
WHLDGTAXBASEISENTEREDMANUALLY TYPE STRING,
WHLDGTAXISENTEREDMANUALLY TYPE STRING,
WHLDGTAXITEMSTATUS TYPE STRING,
ISNATURALPERSON TYPE STRING,
ISSELFWHLDGTAX TYPE STRING,
ISGROSSINGUP TYPE STRING,
WITHHOLDINGTAXCERTIFICATE TYPE STRING,
WHLDGTAXCERTDATE TYPE STRING,
ITEMISREPORTINGRELEVANT TYPE STRING,
NAME TYPE STRING,
TAXNUMBER1 TYPE STRING,
TAXNUMBER2 TYPE STRING,
TAXNUMBER3 TYPE STRING,
TAXNUMBER4 TYPE STRING,
TAXNUMBER5 TYPE STRING,
VATREGISTRATION TYPE STRING,
HOUSENUMBERSUPPLEMENTTEXT TYPE STRING,
ORGANIZATIONBPNAME1 TYPE STRING,
SEARCHTERM1 TYPE STRING,
ORGANIZATIONBPNAME2 TYPE STRING,
POBOXPOSTALCODE TYPE STRING,
POBOX TYPE STRING,
REGION TYPE STRING,
BUSINESSPARTNERCOUNTRY TYPE STRING,
COUNTRYNAME TYPE STRING,
TAXNUMBERTYPE TYPE STRING,
PAYMENTISNOTIFIED TYPE STRING,
LANGUAGE TYPE STRING,
TAXITEMISZERORATED TYPE STRING,
DOCUMENTREFERENCEID TYPE STRING,
TRANSACTIONCODE TYPE STRING,
ACCOUNTINGDOCUMENTHEADERTEXT TYPE STRING,
DOCUMENTITEMTEXT TYPE STRING,
EMAILADDRESS TYPE STRING,
SQNTLNMBROFWHLDGTAXTYPE TYPE STRING,
DEPENDENCYNMBROFWHLDGTAXTYPE TYPE STRING,
WHLDGTAXBASEISINHERITED TYPE STRING,END OF T_EKKO_STR. DATA: WA_CSKWHLDGTXITM_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_CSKWHLDGTXITM_STR-MANDT sy-vline
WA_CSKWHLDGTXITM_STR-COMPANYCODE sy-vline
WA_CSKWHLDGTXITM_STR-ACCOUNTINGDOCUMENT sy-vline
WA_CSKWHLDGTXITM_STR-FISCALYEAR sy-vline
WA_CSKWHLDGTXITM_STR-ACCOUNTINGDOCUMENTITEM sy-vline
WA_CSKWHLDGTXITM_STR-WITHHOLDINGTAXTYPE sy-vline
WA_CSKWHLDGTXITM_STR-STATRYRPTGENTITY sy-vline
WA_CSKWHLDGTXITM_STR-STATRYRPTCATEGORY sy-vline
WA_CSKWHLDGTXITM_STR-STATRYRPTRUNID sy-vline
WA_CSKWHLDGTXITM_STR-WITHHOLDINGTAXCODE sy-vline
WA_CSKWHLDGTXITM_STR-OFFICIALWHLDGTAXCODE sy-vline
WA_CSKWHLDGTXITM_STR-COUNTRY sy-vline
WA_CSKWHLDGTXITM_STR-CURRENTDAY sy-vline
WA_CSKWHLDGTXITM_STR-CURRENTMONTH sy-vline
WA_CSKWHLDGTXITM_STR-CALENDARYEAR sy-vline
WA_CSKWHLDGTXITM_STR-CREDITOR sy-vline
WA_CSKWHLDGTXITM_STR-DEBTOR sy-vline
WA_CSKWHLDGTXITM_STR-POSTINGDATE sy-vline
WA_CSKWHLDGTXITM_STR-DOCUMENTDATE sy-vline
WA_CSKWHLDGTXITM_STR-SUPPLIERRECIPIENTTYPE sy-vline
WA_CSKWHLDGTXITM_STR-WITHHOLDINGTAXPERCENT sy-vline
WA_CSKWHLDGTXITM_STR-CLEARINGDATE sy-vline
WA_CSKWHLDGTXITM_STR-REPORTINGCURRENCY sy-vline
WA_CSKWHLDGTXITM_STR-TRANSACTIONCURRENCY sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXBASEAMTINTRANSACCRCY sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXBASEAMTINCOCODECRCY sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXAMTINTRANSACCRCY sy-vline
WA_CSKWHLDGTXITM_STR-WITHHOLDINGTAXAMOUNT sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXDOCUMENTTYPE sy-vline
WA_CSKWHLDGTXITM_STR-STREETNAME sy-vline
WA_CSKWHLDGTXITM_STR-HOUSENUMBER sy-vline
WA_CSKWHLDGTXITM_STR-POSTALCODE sy-vline
WA_CSKWHLDGTXITM_STR-CITYNAME sy-vline
WA_CSKWHLDGTXITM_STR-BUSINESSPARTNERNUMBER sy-vline
WA_CSKWHLDGTXITM_STR-BUSINESSPARTNER sy-vline
WA_CSKWHLDGTXITM_STR-FIRSTNAME sy-vline
WA_CSKWHLDGTXITM_STR-LASTNAME sy-vline
WA_CSKWHLDGTXITM_STR-BIRTHDATE sy-vline
WA_CSKWHLDGTXITM_STR-PAYERTIN sy-vline
WA_CSKWHLDGTXITM_STR-WITHHOLDINGTAXINCOMETYPE sy-vline
WA_CSKWHLDGTXITM_STR-SUPPLIERNAME sy-vline
WA_CSKWHLDGTXITM_STR-FISCALPERIOD sy-vline
WA_CSKWHLDGTXITM_STR-POSTINGKEY sy-vline
WA_CSKWHLDGTXITM_STR-ACCOUNTINGDOCUMENTTYPE sy-vline
WA_CSKWHLDGTXITM_STR-SPECIALGLCODE sy-vline
WA_CSKWHLDGTXITM_STR-SPECIALGLTRANSACTIONTYPE sy-vline
WA_CSKWHLDGTXITM_STR-INVOICEREFERENCE sy-vline
WA_CSKWHLDGTXITM_STR-TAXSECTION sy-vline
WA_CSKWHLDGTXITM_STR-ISREVERSED sy-vline
WA_CSKWHLDGTXITM_STR-ISREVERSAL sy-vline
WA_CSKWHLDGTXITM_STR-REVERSEDOCUMENT sy-vline
WA_CSKWHLDGTXITM_STR-CLEARINGACCOUNTINGDOCUMENT sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXBASEISENTEREDMANUALLY sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXISENTEREDMANUALLY sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXITEMSTATUS sy-vline
WA_CSKWHLDGTXITM_STR-ISNATURALPERSON sy-vline
WA_CSKWHLDGTXITM_STR-ISSELFWHLDGTAX sy-vline
WA_CSKWHLDGTXITM_STR-ISGROSSINGUP sy-vline
WA_CSKWHLDGTXITM_STR-WITHHOLDINGTAXCERTIFICATE sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXCERTDATE sy-vline
WA_CSKWHLDGTXITM_STR-ITEMISREPORTINGRELEVANT sy-vline
WA_CSKWHLDGTXITM_STR-NAME sy-vline
WA_CSKWHLDGTXITM_STR-TAXNUMBER1 sy-vline
WA_CSKWHLDGTXITM_STR-TAXNUMBER2 sy-vline
WA_CSKWHLDGTXITM_STR-TAXNUMBER3 sy-vline
WA_CSKWHLDGTXITM_STR-TAXNUMBER4 sy-vline
WA_CSKWHLDGTXITM_STR-TAXNUMBER5 sy-vline
WA_CSKWHLDGTXITM_STR-VATREGISTRATION sy-vline
WA_CSKWHLDGTXITM_STR-HOUSENUMBERSUPPLEMENTTEXT sy-vline
WA_CSKWHLDGTXITM_STR-ORGANIZATIONBPNAME1 sy-vline
WA_CSKWHLDGTXITM_STR-SEARCHTERM1 sy-vline
WA_CSKWHLDGTXITM_STR-ORGANIZATIONBPNAME2 sy-vline
WA_CSKWHLDGTXITM_STR-POBOXPOSTALCODE sy-vline
WA_CSKWHLDGTXITM_STR-POBOX sy-vline
WA_CSKWHLDGTXITM_STR-REGION sy-vline
WA_CSKWHLDGTXITM_STR-BUSINESSPARTNERCOUNTRY sy-vline
WA_CSKWHLDGTXITM_STR-COUNTRYNAME sy-vline
WA_CSKWHLDGTXITM_STR-TAXNUMBERTYPE sy-vline
WA_CSKWHLDGTXITM_STR-PAYMENTISNOTIFIED sy-vline
WA_CSKWHLDGTXITM_STR-LANGUAGE sy-vline
WA_CSKWHLDGTXITM_STR-TAXITEMISZERORATED sy-vline
WA_CSKWHLDGTXITM_STR-DOCUMENTREFERENCEID sy-vline
WA_CSKWHLDGTXITM_STR-TRANSACTIONCODE sy-vline
WA_CSKWHLDGTXITM_STR-ACCOUNTINGDOCUMENTHEADERTEXT sy-vline
WA_CSKWHLDGTXITM_STR-DOCUMENTITEMTEXT sy-vline
WA_CSKWHLDGTXITM_STR-EMAILADDRESS sy-vline
WA_CSKWHLDGTXITM_STR-SQNTLNMBROFWHLDGTAXTYPE sy-vline
WA_CSKWHLDGTXITM_STR-DEPENDENCYNMBROFWHLDGTAXTYPE sy-vline
WA_CSKWHLDGTXITM_STR-WHLDGTAXBASEISINHERITED sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.