ABAP Select data from SAP table CARFORM731ITEMQ 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 CARFORM731ITEMQ 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 CARFORM731ITEMQ. 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 CARFORM731ITEMQ 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_CARFORM731ITEMQ TYPE STANDARD TABLE OF CARFORM731ITEMQ,
WA_CARFORM731ITEMQ TYPE CARFORM731ITEMQ,
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: <CARFORM731ITEMQ> TYPE CARFORM731ITEMQ.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_CARFORM731ITEMQ.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM CARFORM731ITEMQ
INTO TABLE IT_CARFORM731ITEMQ.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM CARFORM731ITEMQ
* INTO TABLE @DATA(IT_CARFORM731ITEMQ2).
*--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_CARFORM731ITEMQ INDEX 1 INTO DATA(WA_CARFORM731ITEMQ2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CARFORM731ITEMQ ASSIGNING <CARFORM731ITEMQ>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<CARFORM731ITEMQ>-MANDT = 1.
<CARFORM731ITEMQ>-COMPANYCODE = 1.
<CARFORM731ITEMQ>-ACCOUNTINGDOCUMENT = 1.
<CARFORM731ITEMQ>-FISCALYEAR = 1.
<CARFORM731ITEMQ>-TAXITEM = 1.
ENDLOOP. LOOP AT IT_CARFORM731ITEMQ INTO WA_CARFORM731ITEMQ. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_CARFORM731ITEMQ-TRANSACTIONTYPEDETERMINATION, sy-vline,
WA_CARFORM731ITEMQ-TAXCODE, sy-vline,
WA_CARFORM731ITEMQ-STATRYRPTGENTITY, sy-vline,
WA_CARFORM731ITEMQ-STATRYRPTCATEGORY, sy-vline,
WA_CARFORM731ITEMQ-STATRYRPTRUNID, sy-vline,
WA_CARFORM731ITEMQ-POSTINGDATE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CARFORM731ITEMQ 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_CARFORM731ITEMQ 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_CARFORM731ITEMQ INTO WA_CARFORM731ITEMQ. *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_CARFORM731ITEMQ-ACCOUNTINGDOCUMENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-ACCOUNTINGDOCUMENT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field FISCALYEAR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-FISCALYEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-FISCALYEAR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field GLACCOUNT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-GLACCOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-GLACCOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field TAXBASEAMOUNTINCOCODECRCY CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TAXBASEAMOUNTINCOCODECRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TAXBASEAMOUNTINCOCODECRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field TAXAMOUNTINCOCODECRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TAXAMOUNTINCOCODECRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TAXAMOUNTINCOCODECRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field TAXBASEAMOUNTINTRANSCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TAXBASEAMOUNTINTRANSCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TAXBASEAMOUNTINTRANSCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field TAXAMOUNTINCOUNTRYCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TAXAMOUNTINCOUNTRYCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TAXAMOUNTINCOUNTRYCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field TAXBASEAMOUNTINCOUNTRYCRCY CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TAXBASEAMOUNTINCOUNTRYCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TAXBASEAMOUNTINCOUNTRYCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field REGISTEREDBPTAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-REGISTEREDBPTAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-REGISTEREDBPTAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field REGISTEREDBPTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-REGISTEREDBPTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-REGISTEREDBPTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field NOTREGISTEREDBPTAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-NOTREGISTEREDBPTAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-NOTREGISTEREDBPTAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field TXBASEAMTWITHTXRATE18INCCCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TXBASEAMTWITHTXRATE18INCCCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TXBASEAMTWITHTXRATE18INCCCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field TXBASEAMTWITHTXRATE0INCCCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TXBASEAMTWITHTXRATE0INCCCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TXBASEAMTWITHTXRATE0INCCCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field TXBASEAMTWITHTXRATE10INCCCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-TXBASEAMTWITHTXRATE10INCCCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-TXBASEAMTWITHTXRATE10INCCCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXEMPTEDCONSUMERTAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXEMPTEDCONSUMERTAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXEMPTEDCONSUMERTAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXEMPTEDCONSUMERTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXEMPTEDCONSUMERTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXEMPTEDCONSUMERTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field REGIMETAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-REGIMETAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-REGIMETAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field REGIMETAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-REGIMETAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-REGIMETAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXPORTOPERATIONTAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXPORTOPERATIONTAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXPORTOPERATIONTAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXPORTOPERATIONTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXPORTOPERATIONTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXPORTOPERATIONTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXEMPTEDICMSAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXEMPTEDICMSAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXEMPTEDICMSAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field FIXEDASSETAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-FIXEDASSETAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-FIXEDASSETAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field FIXEDASSETTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-FIXEDASSETTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-FIXEDASSETTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field NOTREGISTEREDFIXEDASSETBASEAMT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-NOTREGISTEREDFIXEDASSETBASEAMT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-NOTREGISTEREDFIXEDASSETBASEAMT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field NOTREGISTEREDFIXEDASSETTAXAMT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-NOTREGISTEREDFIXEDASSETTAXAMT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-NOTREGISTEREDFIXEDASSETTAXAMT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXEMPTEDSIMPFDREGIMETAXBASEAMT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXEMPTEDSIMPFDREGIMETAXBASEAMT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXEMPTEDSIMPFDREGIMETAXBASEAMT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field EXEMPTEDSIMPFDREGIMETAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-EXEMPTEDSIMPFDREGIMETAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-EXEMPTEDSIMPFDREGIMETAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PURCHASEOFGOODSCREDITAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-PURCHASEOFGOODSCREDITAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-PURCHASEOFGOODSCREDITAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SERVICECREDITTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-SERVICECREDITTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-SERVICECREDITTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field RENTSCREDITTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-RENTSCREDITTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-RENTSCREDITTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field FIXEDASSETCREDITTAXAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-FIXEDASSETCREDITTAXAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-FIXEDASSETCREDITTAXAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field CREDITAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-CREDITAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-CREDITAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field NOTTAXEDAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-NOTTAXEDAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-NOTTAXEDAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field NOTREGISTEREDTAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-NOTREGISTEREDTAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-NOTREGISTEREDTAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SIMPLIFIEDREGIMETAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-SIMPLIFIEDREGIMETAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-SIMPLIFIEDREGIMETAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field GOODSRECEIPTGOODSAMTINCCCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-GOODSRECEIPTGOODSAMTINCCCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-GOODSRECEIPTGOODSAMTINCCCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field OTHERPURCHASESTAXBASEAMOUNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-OTHERPURCHASESTAXBASEAMOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-OTHERPURCHASESTAXBASEAMOUNT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field CRDTSTRTGBALAMTINBALTRANSCRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-CRDTSTRTGBALAMTINBALTRANSCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-CRDTSTRTGBALAMTINBALTRANSCRCY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field BUDGETAMOUNTINCOMPANYCODECRCY CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_CARFORM731ITEMQ-BUDGETAMOUNTINCOMPANYCODECRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CARFORM731ITEMQ-BUDGETAMOUNTINCOMPANYCODECRCY.
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_CARFORM731ITEMQ_STR,
MANDT TYPE STRING,
COMPANYCODE TYPE STRING,
ACCOUNTINGDOCUMENT TYPE STRING,
FISCALYEAR TYPE STRING,
TAXITEM TYPE STRING,
TRANSACTIONTYPEDETERMINATION TYPE STRING,
TAXCODE TYPE STRING,
STATRYRPTGENTITY TYPE STRING,
STATRYRPTCATEGORY TYPE STRING,
STATRYRPTRUNID TYPE STRING,
POSTINGDATE TYPE STRING,
FINANCIALACCOUNTTYPE TYPE STRING,
REPORTINGDATE TYPE STRING,
TAXREPORTINGDATE TYPE STRING,
GLACCOUNT TYPE STRING,
TAXTYPE TYPE STRING,
TAXBASEAMOUNTINCOCODECRCY TYPE STRING,
TAXAMOUNTINCOCODECRCY TYPE STRING,
TAXBASEAMOUNTINTRANSCRCY TYPE STRING,
TAXAMOUNTINCOUNTRYCRCY TYPE STRING,
TAXBASEAMOUNTINCOUNTRYCRCY TYPE STRING,
COMPANYCODECURRENCY TYPE STRING,
COMPANYCODECOUNTRY TYPE STRING,
DOCUMENTCURRENCY TYPE STRING,
COUNTRYCURRENCY TYPE STRING,
TAXCALCULATIONPROCEDURE TYPE STRING,
STRPTAXCLASSIFICATION TYPE STRING,
ADDRESSREGION TYPE STRING,
CUSTOMERCOUNTY TYPE STRING,
MUNICIPALJURISDICTION TYPE STRING,
ZEROVATRSN TYPE STRING,
TAXISPRORATED TYPE STRING,
RESPONSIBLETYPE TYPE STRING,
REGISTEREDBPTAXBASEAMOUNT TYPE STRING,
REGISTEREDBPTAXAMOUNT TYPE STRING,
NOTREGISTEREDBPTAXBASEAMOUNT TYPE STRING,
TXBASEAMTWITHTXRATE18INCCCRCY TYPE STRING,
TXBASEAMTWITHTXRATE0INCCCRCY TYPE STRING,
TXBASEAMTWITHTXRATE10INCCCRCY TYPE STRING,
EXEMPTEDCONSUMERTAXBASEAMOUNT TYPE STRING,
EXEMPTEDCONSUMERTAXAMOUNT TYPE STRING,
REGIMETAXBASEAMOUNT TYPE STRING,
REGIMETAXAMOUNT TYPE STRING,
EXPORTOPERATIONTAXBASEAMOUNT TYPE STRING,
EXPORTOPERATIONTAXAMOUNT TYPE STRING,
EXEMPTEDICMSAMOUNT TYPE STRING,
FIXEDASSETAMOUNT TYPE STRING,
FIXEDASSETTAXAMOUNT TYPE STRING,
NOTREGISTEREDFIXEDASSETBASEAMT TYPE STRING,
NOTREGISTEREDFIXEDASSETTAXAMT TYPE STRING,
EXEMPTEDSIMPFDREGIMETAXBASEAMT TYPE STRING,
EXEMPTEDSIMPFDREGIMETAXAMOUNT TYPE STRING,
PURCHASEOFGOODSCREDITAMOUNT TYPE STRING,
SERVICECREDITTAXAMOUNT TYPE STRING,
RENTSCREDITTAXAMOUNT TYPE STRING,
FIXEDASSETCREDITTAXAMOUNT TYPE STRING,
CREDITAMOUNT TYPE STRING,
EXPORTAMOUNTINCOMPANYCODECRCY TYPE STRING,
NOTTAXEDAMOUNT TYPE STRING,
NOTREGISTEREDTAXBASEAMOUNT TYPE STRING,
SIMPLIFIEDREGIMETAXBASEAMOUNT TYPE STRING,
GOODSRECEIPTGOODSAMTINCCCRCY TYPE STRING,
OTHERPURCHASESTAXBASEAMOUNT TYPE STRING,
CRDTSTRTGBALAMTINBALTRANSCRCY TYPE STRING,
BUDGETAMOUNTINCOMPANYCODECRCY TYPE STRING,
CALCULATEDTXBASEAMTINTRANSCRCY TYPE STRING,
OCIOFFSTLOSSALLWNCINVALNCRCY TYPE STRING,
ACTLBLLDREVENUEITEMAMTINCCCRCY TYPE STRING,
IDXCLNAMORTIZEDCOSTINPOSCRCY TYPE STRING,
AMORTIZEDCOSTINPOSITIONCRCY TYPE STRING,
CAPITALTXBLPURCHASEAMTINCCCRCY TYPE STRING,END OF T_EKKO_STR. DATA: WA_CARFORM731ITEMQ_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_CARFORM731ITEMQ_STR-MANDT sy-vline
WA_CARFORM731ITEMQ_STR-COMPANYCODE sy-vline
WA_CARFORM731ITEMQ_STR-ACCOUNTINGDOCUMENT sy-vline
WA_CARFORM731ITEMQ_STR-FISCALYEAR sy-vline
WA_CARFORM731ITEMQ_STR-TAXITEM sy-vline
WA_CARFORM731ITEMQ_STR-TRANSACTIONTYPEDETERMINATION sy-vline
WA_CARFORM731ITEMQ_STR-TAXCODE sy-vline
WA_CARFORM731ITEMQ_STR-STATRYRPTGENTITY sy-vline
WA_CARFORM731ITEMQ_STR-STATRYRPTCATEGORY sy-vline
WA_CARFORM731ITEMQ_STR-STATRYRPTRUNID sy-vline
WA_CARFORM731ITEMQ_STR-POSTINGDATE sy-vline
WA_CARFORM731ITEMQ_STR-FINANCIALACCOUNTTYPE sy-vline
WA_CARFORM731ITEMQ_STR-REPORTINGDATE sy-vline
WA_CARFORM731ITEMQ_STR-TAXREPORTINGDATE sy-vline
WA_CARFORM731ITEMQ_STR-GLACCOUNT sy-vline
WA_CARFORM731ITEMQ_STR-TAXTYPE sy-vline
WA_CARFORM731ITEMQ_STR-TAXBASEAMOUNTINCOCODECRCY sy-vline
WA_CARFORM731ITEMQ_STR-TAXAMOUNTINCOCODECRCY sy-vline
WA_CARFORM731ITEMQ_STR-TAXBASEAMOUNTINTRANSCRCY sy-vline
WA_CARFORM731ITEMQ_STR-TAXAMOUNTINCOUNTRYCRCY sy-vline
WA_CARFORM731ITEMQ_STR-TAXBASEAMOUNTINCOUNTRYCRCY sy-vline
WA_CARFORM731ITEMQ_STR-COMPANYCODECURRENCY sy-vline
WA_CARFORM731ITEMQ_STR-COMPANYCODECOUNTRY sy-vline
WA_CARFORM731ITEMQ_STR-DOCUMENTCURRENCY sy-vline
WA_CARFORM731ITEMQ_STR-COUNTRYCURRENCY sy-vline
WA_CARFORM731ITEMQ_STR-TAXCALCULATIONPROCEDURE sy-vline
WA_CARFORM731ITEMQ_STR-STRPTAXCLASSIFICATION sy-vline
WA_CARFORM731ITEMQ_STR-ADDRESSREGION sy-vline
WA_CARFORM731ITEMQ_STR-CUSTOMERCOUNTY sy-vline
WA_CARFORM731ITEMQ_STR-MUNICIPALJURISDICTION sy-vline
WA_CARFORM731ITEMQ_STR-ZEROVATRSN sy-vline
WA_CARFORM731ITEMQ_STR-TAXISPRORATED sy-vline
WA_CARFORM731ITEMQ_STR-RESPONSIBLETYPE sy-vline
WA_CARFORM731ITEMQ_STR-REGISTEREDBPTAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-REGISTEREDBPTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-NOTREGISTEREDBPTAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-TXBASEAMTWITHTXRATE18INCCCRCY sy-vline
WA_CARFORM731ITEMQ_STR-TXBASEAMTWITHTXRATE0INCCCRCY sy-vline
WA_CARFORM731ITEMQ_STR-TXBASEAMTWITHTXRATE10INCCCRCY sy-vline
WA_CARFORM731ITEMQ_STR-EXEMPTEDCONSUMERTAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-EXEMPTEDCONSUMERTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-REGIMETAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-REGIMETAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-EXPORTOPERATIONTAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-EXPORTOPERATIONTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-EXEMPTEDICMSAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-FIXEDASSETAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-FIXEDASSETTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-NOTREGISTEREDFIXEDASSETBASEAMT sy-vline
WA_CARFORM731ITEMQ_STR-NOTREGISTEREDFIXEDASSETTAXAMT sy-vline
WA_CARFORM731ITEMQ_STR-EXEMPTEDSIMPFDREGIMETAXBASEAMT sy-vline
WA_CARFORM731ITEMQ_STR-EXEMPTEDSIMPFDREGIMETAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-PURCHASEOFGOODSCREDITAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-SERVICECREDITTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-RENTSCREDITTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-FIXEDASSETCREDITTAXAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-CREDITAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-EXPORTAMOUNTINCOMPANYCODECRCY sy-vline
WA_CARFORM731ITEMQ_STR-NOTTAXEDAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-NOTREGISTEREDTAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-SIMPLIFIEDREGIMETAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-GOODSRECEIPTGOODSAMTINCCCRCY sy-vline
WA_CARFORM731ITEMQ_STR-OTHERPURCHASESTAXBASEAMOUNT sy-vline
WA_CARFORM731ITEMQ_STR-CRDTSTRTGBALAMTINBALTRANSCRCY sy-vline
WA_CARFORM731ITEMQ_STR-BUDGETAMOUNTINCOMPANYCODECRCY sy-vline
WA_CARFORM731ITEMQ_STR-CALCULATEDTXBASEAMTINTRANSCRCY sy-vline
WA_CARFORM731ITEMQ_STR-OCIOFFSTLOSSALLWNCINVALNCRCY sy-vline
WA_CARFORM731ITEMQ_STR-ACTLBLLDREVENUEITEMAMTINCCCRCY sy-vline
WA_CARFORM731ITEMQ_STR-IDXCLNAMORTIZEDCOSTINPOSCRCY sy-vline
WA_CARFORM731ITEMQ_STR-AMORTIZEDCOSTINPOSITIONCRCY sy-vline
WA_CARFORM731ITEMQ_STR-CAPITALTXBLPURCHASEAMTINCCCRCY sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
