ABAP Select data from SAP table PSCABUSINESSPARTNERLINEITEM_DR 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 PSCABUSINESSPARTNERLINEITEM_DR 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 PSCABUSINESSPARTNERLINEITEM_DR. 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 PSCABUSINESSPARTNERLINEITEM_DR 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_PSCABUSINESSPARTNERLINEITEM_DR TYPE STANDARD TABLE OF PSCABUSINESSPARTNERLINEITEM_DR,
      WA_PSCABUSINESSPARTNERLINEITEM_DR TYPE PSCABUSINESSPARTNERLINEITEM_DR,
      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: <PSCABUSINESSPARTNERLINEITEM_DR> TYPE PSCABUSINESSPARTNERLINEITEM_DR.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PSCABUSINESSPARTNERLINEITEM_DR
*  INTO TABLE @DATA(IT_PSCABUSINESSPARTNERLINEITEM_DR2).
*--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_PSCABUSINESSPARTNERLINEITEM_DR INDEX 1 INTO DATA(WA_PSCABUSINESSPARTNERLINEITEM_DR2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PSCABUSINESSPARTNERLINEITEM_DR>-DRAFTUUID = 1.
<PSCABUSINESSPARTNERLINEITEM_DR>-CADOCUMENTNUMBER = 1.
<PSCABUSINESSPARTNERLINEITEM_DR>-CAREPETITIONITEMNUMBER = 1.
<PSCABUSINESSPARTNERLINEITEM_DR>-CABPITEMNUMBER = 1.
<PSCABUSINESSPARTNERLINEITEM_DR>-CASUBITEMNUMBER = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PSCABUSINESSPARTNERLINEITEM_DR-COMPANYCODE, sy-vline,
  WA_PSCABUSINESSPARTNERLINEITEM_DR-BUSINESSAREA, sy-vline,
  WA_PSCABUSINESSPARTNERLINEITEM_DR-BUSINESSPLACE, sy-vline,
  WA_PSCABUSINESSPARTNERLINEITEM_DR-SEGMENT, sy-vline,
  WA_PSCABUSINESSPARTNERLINEITEM_DR-PROFITCENTER, sy-vline,
  WA_PSCABUSINESSPARTNERLINEITEM_DR-DIVISION, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PSCABUSINESSPARTNERLINEITEM_DR 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_PSCABUSINESSPARTNERLINEITEM_DR 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_PSCABUSINESSPARTNERLINEITEM_DR INTO WA_PSCABUSINESSPARTNERLINEITEM_DR.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field CAREVENUEDISTRFINALRECIPIENT
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PSCABUSINESSPARTNERLINEITEM_DR-CAREVENUEDISTRFINALRECIPIENT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PSCABUSINESSPARTNERLINEITEM_DR-CAREVENUEDISTRFINALRECIPIENT.
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_PSCABUSINESSPARTNERLINEITEM_DR_STR, 
DRAFTUUID TYPE STRING,
CADOCUMENTNUMBER TYPE STRING,
CAREPETITIONITEMNUMBER TYPE STRING,
CABPITEMNUMBER TYPE STRING,
CASUBITEMNUMBER TYPE STRING,
COMPANYCODE TYPE STRING,
BUSINESSAREA TYPE STRING,
BUSINESSPLACE TYPE STRING,
SEGMENT TYPE STRING,
PROFITCENTER TYPE STRING,
DIVISION TYPE STRING,
PERSONNELNUMBER TYPE STRING,
PARTNERCOMPANY TYPE STRING,
BUSINESSPARTNER TYPE STRING,
BUSINESSPARTNERFULLNAME TYPE STRING,
CACONTRACT TYPE STRING,
CAPROVIDERCONTRACTITEMNUMBER TYPE STRING,
CAADDITIONALCONTRACT TYPE STRING,
CONTRACTACCOUNT TYPE STRING,
CASUBAPPLICATION TYPE STRING,
ALTVCONTRACTACCTFORCOLLVBILLS TYPE STRING,
CARECONCILIATIONACCOUNT TYPE STRING,
CAAPPLICATIONAREA TYPE STRING,
CAMAINTRANSACTION TYPE STRING,
CASUBTRANSACTION TYPE STRING,
CAACCOUNTDETERMINATIONCODE TYPE STRING,
CADOUBTFULORVALUEADJMTCODE TYPE STRING,
CAACCOUNTASSIGNMENTCATEGORY TYPE STRING,
CAACCOUNTASSIGNMENT TYPE STRING,
CADOCUMENTTYPE TYPE STRING,
CAISDOWNPAYMENTREQUEST TYPE STRING,
CAITEMISONLYFORSETTLEMENT TYPE STRING,
CASTATISTICALITEMCODE TYPE STRING,
CABPITEMTEXT TYPE STRING,
CANUMBEROFREPETITIONITEMS TYPE STRING,
CAREPETITIONGROUP TYPE STRING,
CASTARTDATEOFBILLINGPERIOD TYPE STRING,
CAENDDATEOFBILLINGPERIOD TYPE STRING,
CAGROUPINGCODEFORBPITEMS TYPE STRING,
CAPERIODCODE TYPE STRING,
CACHANGEISFORBIDDEN TYPE STRING,
CAINTERESTCODE TYPE STRING,
CAROUNDINGITEMCODE TYPE STRING,
CARECEIVINGCOUNTRY TYPE STRING,
CAINTERNALPOSTINGREASONCODE TYPE STRING,
CAWORKFLOWCHECKREASON TYPE STRING,
CAWORKFLOWCHECKPROCESS TYPE STRING,
CANEGATIVEPOSTINGCONTROLCODE TYPE STRING,
CAPARTNERSETTLEMENTSTATUS TYPE STRING,
CAISPARTOFJOINTLIABILITY TYPE STRING,
CASUBSTITUTEDOCUMENTNUMBER TYPE STRING,
CASUBSTITUTEDOCUMENTCATEGORY TYPE STRING,
CASTATISTICALCODEOFORIGINITEM TYPE STRING,
CADOCUMENTNUMBEROFORIGINITEM TYPE STRING,
CAREFERENCEDOCUMENT TYPE STRING,
DOCUMENTDATE TYPE STRING,
CAPOSTINGDATE TYPE STRING,
CANETDUEDATE TYPE STRING,
CADEFERRALDATE TYPE STRING,
TRANSACTIONCURRENCY TYPE STRING,
CAEXCHANGERATE TYPE STRING,
CAAMOUNTINLOCALCURRENCY TYPE STRING,
CAAMOUNTINTRANSACTIONCURRENCY TYPE STRING,
CAAMOUNTINSECONDCURRENCY TYPE STRING,
CAAMOUNTINTHIRDCURRENCY TYPE STRING,
CACASHDISCOUNTDUEDATE TYPE STRING,
CACASHDISCOUNTRATE TYPE STRING,
CAELIGIBLEAMOUNTFORCSHDISCOUNT TYPE STRING,
CACASHDISCAMOUNTINCLEARINGCRCY TYPE STRING,
TAXCODE TYPE STRING,
CASUPPLEMENTARYTAXCODE TYPE STRING,
CATAXAMOUNTINLOCALCURRENCY TYPE STRING,
CATAXAMOUNTINTRANSCURRENCY TYPE STRING,
CATAXAMOUNTINSECONDCURRENCY TYPE STRING,
CATAXAMOUNTINTHIRDCURRENCY TYPE STRING,
CADOWNPAYMENTTAXACCOUNT TYPE STRING,
CADOWNPAYMENTOFFSETTAXACCOUNT TYPE STRING,
TAXJURISDICTION TYPE STRING,
CATAXDATE TYPE STRING,
WITHHOLDINGTAXCODE TYPE STRING,
CAWITHHOLDINGTAXSUPPLEMENT TYPE STRING,
CAWITHHOLDINGTAXCATEGORY TYPE STRING,
CABASEAMOUNTFORWITHHOLDINGTAX TYPE STRING,
CAWITHHOLDINGTAXAMOUNT TYPE STRING,
CAWITHHOLDINGTAXPERCENTAGE TYPE STRING,
WITHHOLDINGTAXCERTIFICATE TYPE STRING,
CAOTHERTAXCODE TYPE STRING,
CAGROUPINGCODEFORTAXITEMS TYPE STRING,
CATAXPORTIONINLOCALCURRENCY TYPE STRING,
CATAXPORTIONINTRANSCURRENCY TYPE STRING,
CATAXISCALCULATEDEXTERNALLY TYPE STRING,
CAPAYMENTMETHOD TYPE STRING,
CAPAYMENTCOMPANYCODE TYPE STRING,
CAGROUPINGFORPAYMENT TYPE STRING,
CAPAYMENTSPECIFICATIONCATEGORY TYPE STRING,
CACLEARINGSTATUS TYPE STRING,
CACLEARINGSTATUSNAME TYPE STRING,
CACLEARINGDATE TYPE STRING,
CACLEARINGDOCUMENTNUMBER TYPE STRING,
CAPOSTINGDATEOFCLEARINGDOC TYPE STRING,
CACLEARINGREASON TYPE STRING,
CACLEARINGCURRENCY TYPE STRING,
CACLEARINGAMOUNTINCLEARINGCRCY TYPE STRING,
CATAXAMOUNTINCLEARINGCRCY TYPE STRING,
CAVALUEDATEFORCLEARING TYPE STRING,
CACLEARINGRESTRICTIONCODE TYPE STRING,
CACLEARINGPOSTINGISRESET TYPE STRING,
CAITEMISWITHDRAWN TYPE STRING,
CAITEMISEXCLUDEDFROMDUNNING TYPE STRING,
CADUNNINGPROCEDURE TYPE STRING,
CAGRPGCODEFORTRANSFTOCOLLAGCY TYPE STRING,
CAISINCLUDEDINCOLLECTIONCASE TYPE STRING,
CASHPLANNINGGROUP TYPE STRING,
PLANNINGLEVEL TYPE STRING,
CAADDITIONALDAYSFORCASHMGMT TYPE STRING,
PLANNEDAMTINTRANSACTIONCRCY TYPE STRING,
CAALTVBPFORPAYMENT TYPE STRING,
CABANKOFALTVBPFORPAYMENT TYPE STRING,
CAADDRESSOFALTVBPFORPAYMENT TYPE STRING,
CACARDOFALTVBPFORPAYMENT TYPE STRING,
CAGLPOSTINGCURRENCY TYPE STRING,
CAGLPOSTINGAMOUNT TYPE STRING,
CAGLPOSTINGTAXAMOUNT TYPE STRING,
CAISSEPARATELINEITEMINGL TYPE STRING,
CAISCASHFLOWITEM TYPE STRING,
CACASHFLOWACCOUNT TYPE STRING,
CACASHFLOWCOMPANYCODE TYPE STRING,
CAPAYMENTPRENOTIFICATIONCODE TYPE STRING,
CASEPAPRENOTIFICATIONNUMBER TYPE STRING,
CASEPAPRENOTIFORIGINCODE TYPE STRING,
CASEPAPRENOTIFEXECUTIONDATE TYPE STRING,
CASEPAPRENOTIFICATIONRQMTCODE TYPE STRING,
CAREVENUEDISTRFINALRECIPIENT TYPE STRING,
CAREVENUEDISTRCURRENTSTATUS TYPE STRING,
CAREVENUEDISTRLASTSTATUS TYPE STRING,
CONTROLLINGAREA TYPE STRING,
CHARTOFACCOUNTS TYPE STRING,
COUNTRY TYPE STRING,
TAXCALCULATIONPROCEDURE TYPE STRING,
POSTALCODE TYPE STRING,
CAAUTHORIZATIONGROUP TYPE STRING,
HASACTIVEENTITY TYPE STRING,
DRAFTENTITYCREATIONDATETIME TYPE STRING,
DRAFTENTITYLASTCHANGEDATETIME TYPE STRING,
DRAFTADMINISTRATIVEDATAUUID TYPE STRING,
DRAFTENTITYCONSISTENCYSTATUS TYPE STRING,
DRAFTENTITYOPERATIONCODE TYPE STRING,
ISACTIVEENTITY TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PSCABUSINESSPARTNERLINEITEM_DR_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_PSCABUSINESSPARTNERLINEITEM_DR_STR-DRAFTUUID sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADOCUMENTNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAREPETITIONITEMNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CABPITEMNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASUBITEMNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-COMPANYCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-BUSINESSAREA sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-BUSINESSPLACE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-SEGMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-PROFITCENTER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DIVISION sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-PERSONNELNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-PARTNERCOMPANY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-BUSINESSPARTNER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-BUSINESSPARTNERFULLNAME sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACONTRACT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPROVIDERCONTRACTITEMNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAADDITIONALCONTRACT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CONTRACTACCOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASUBAPPLICATION sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-ALTVCONTRACTACCTFORCOLLVBILLS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CARECONCILIATIONACCOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAAPPLICATIONAREA sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAMAINTRANSACTION sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASUBTRANSACTION sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAACCOUNTDETERMINATIONCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADOUBTFULORVALUEADJMTCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAACCOUNTASSIGNMENTCATEGORY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAACCOUNTASSIGNMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADOCUMENTTYPE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAISDOWNPAYMENTREQUEST sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAITEMISONLYFORSETTLEMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASTATISTICALITEMCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CABPITEMTEXT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CANUMBEROFREPETITIONITEMS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAREPETITIONGROUP sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASTARTDATEOFBILLINGPERIOD sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAENDDATEOFBILLINGPERIOD sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGROUPINGCODEFORBPITEMS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPERIODCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACHANGEISFORBIDDEN sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAINTERESTCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAROUNDINGITEMCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CARECEIVINGCOUNTRY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAINTERNALPOSTINGREASONCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAWORKFLOWCHECKREASON sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAWORKFLOWCHECKPROCESS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CANEGATIVEPOSTINGCONTROLCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPARTNERSETTLEMENTSTATUS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAISPARTOFJOINTLIABILITY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASUBSTITUTEDOCUMENTNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASUBSTITUTEDOCUMENTCATEGORY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASTATISTICALCODEOFORIGINITEM sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADOCUMENTNUMBEROFORIGINITEM sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAREFERENCEDOCUMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DOCUMENTDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPOSTINGDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CANETDUEDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADEFERRALDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-TRANSACTIONCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAEXCHANGERATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAAMOUNTINLOCALCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAAMOUNTINTRANSACTIONCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAAMOUNTINSECONDCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAAMOUNTINTHIRDCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACASHDISCOUNTDUEDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACASHDISCOUNTRATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAELIGIBLEAMOUNTFORCSHDISCOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACASHDISCAMOUNTINCLEARINGCRCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-TAXCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASUPPLEMENTARYTAXCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXAMOUNTINLOCALCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXAMOUNTINTRANSCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXAMOUNTINSECONDCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXAMOUNTINTHIRDCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADOWNPAYMENTTAXACCOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADOWNPAYMENTOFFSETTAXACCOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-TAXJURISDICTION sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-WITHHOLDINGTAXCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAWITHHOLDINGTAXSUPPLEMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAWITHHOLDINGTAXCATEGORY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CABASEAMOUNTFORWITHHOLDINGTAX sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAWITHHOLDINGTAXAMOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAWITHHOLDINGTAXPERCENTAGE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-WITHHOLDINGTAXCERTIFICATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAOTHERTAXCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGROUPINGCODEFORTAXITEMS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXPORTIONINLOCALCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXPORTIONINTRANSCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXISCALCULATEDEXTERNALLY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPAYMENTMETHOD sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPAYMENTCOMPANYCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGROUPINGFORPAYMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPAYMENTSPECIFICATIONCATEGORY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGSTATUS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGSTATUSNAME sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGDOCUMENTNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPOSTINGDATEOFCLEARINGDOC sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGREASON sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGAMOUNTINCLEARINGCRCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CATAXAMOUNTINCLEARINGCRCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAVALUEDATEFORCLEARING sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGRESTRICTIONCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACLEARINGPOSTINGISRESET sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAITEMISWITHDRAWN sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAITEMISEXCLUDEDFROMDUNNING sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CADUNNINGPROCEDURE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGRPGCODEFORTRANSFTOCOLLAGCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAISINCLUDEDINCOLLECTIONCASE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASHPLANNINGGROUP sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-PLANNINGLEVEL sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAADDITIONALDAYSFORCASHMGMT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-PLANNEDAMTINTRANSACTIONCRCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAALTVBPFORPAYMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CABANKOFALTVBPFORPAYMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAADDRESSOFALTVBPFORPAYMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACARDOFALTVBPFORPAYMENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGLPOSTINGCURRENCY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGLPOSTINGAMOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAGLPOSTINGTAXAMOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAISSEPARATELINEITEMINGL sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAISCASHFLOWITEM sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACASHFLOWACCOUNT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CACASHFLOWCOMPANYCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAPAYMENTPRENOTIFICATIONCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASEPAPRENOTIFICATIONNUMBER sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASEPAPRENOTIFORIGINCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASEPAPRENOTIFEXECUTIONDATE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CASEPAPRENOTIFICATIONRQMTCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAREVENUEDISTRFINALRECIPIENT sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAREVENUEDISTRCURRENTSTATUS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAREVENUEDISTRLASTSTATUS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CONTROLLINGAREA sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CHARTOFACCOUNTS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-COUNTRY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-TAXCALCULATIONPROCEDURE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-POSTALCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-CAAUTHORIZATIONGROUP sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-HASACTIVEENTITY sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DRAFTENTITYCREATIONDATETIME sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DRAFTENTITYLASTCHANGEDATETIME sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DRAFTADMINISTRATIVEDATAUUID sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DRAFTENTITYCONSISTENCYSTATUS sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-DRAFTENTITYOPERATIONCODE sy-vline 
WA_PSCABUSINESSPARTNERLINEITEM_DR_STR-ISACTIVEENTITY sy-vline      INTO ld_text SEPARATED BY SPACE.

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