ABAP Select data from SAP table CTRLPOSHIST 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 CTRLPOSHIST 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 CTRLPOSHIST. 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 CTRLPOSHIST 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_CTRLPOSHIST TYPE STANDARD TABLE OF CTRLPOSHIST,
      WA_CTRLPOSHIST TYPE CTRLPOSHIST,
      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: <CTRLPOSHIST> TYPE CTRLPOSHIST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CTRLPOSHIST
*  INTO TABLE @DATA(IT_CTRLPOSHIST2).
*--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_CTRLPOSHIST INDEX 1 INTO DATA(WA_CTRLPOSHIST2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<CTRLPOSHIST>-MANDT = 1.
<CTRLPOSHIST>-TREASURYVALUATIONAREA = 1.
<CTRLPOSHIST>-TREASURYVALUATIONAREANAME = 1.
<CTRLPOSHIST>-TREASURYVALUATIONCLASS = 1.
<CTRLPOSHIST>-TREASURYVALUATIONCLASSNAME = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CTRLPOSHIST-COMPANYCODE, sy-vline,
  WA_CTRLPOSHIST-COMPANYCODENAME, sy-vline,
  WA_CTRLPOSHIST-SECURITYACCOUNT, sy-vline,
  WA_CTRLPOSHIST-SECURITYCLASS, sy-vline,
  WA_CTRLPOSHIST-TREASURYPOSITIONACCOUNT, sy-vline,
  WA_CTRLPOSHIST-TREASURYPOSITIONLOT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_CTRLPOSHIST 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_CTRLPOSHIST 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_CTRLPOSHIST INTO WA_CTRLPOSHIST.


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

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

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

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

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

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

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

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

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

*Conversion exit GJAHR, internal->external for field HEDGEDITEMFISCALYEAR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_CTRLPOSHIST-HEDGEDITEMFISCALYEAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CTRLPOSHIST-HEDGEDITEMFISCALYEAR.
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_CTRLPOSHIST_STR, 
MANDT TYPE STRING,
TREASURYVALUATIONAREA TYPE STRING,
TREASURYVALUATIONAREANAME TYPE STRING,
TREASURYVALUATIONCLASS TYPE STRING,
TREASURYVALUATIONCLASSNAME TYPE STRING,
COMPANYCODE TYPE STRING,
COMPANYCODENAME TYPE STRING,
SECURITYACCOUNT TYPE STRING,
SECURITYCLASS TYPE STRING,
TREASURYPOSITIONACCOUNT TYPE STRING,
TREASURYPOSITIONLOT TYPE STRING,
FINANCIALTRANSACTION TYPE STRING,
FINANCIALEXPOSUREITEM TYPE STRING,
FINANCIALEXPOSURESUBITEM TYPE STRING,
FINANCIALINSTRVALUATIONCLASS TYPE STRING,
DIFFERENTIATIONPORTFOLIO TYPE STRING,
SECURITYACCOUNTGROUP TYPE STRING,
LOANCONTRACT TYPE STRING,
TREASURYPOSITIONLONGSHORTCODE TYPE STRING,
CENTRALCLEARINGACCOUNT TYPE STRING,
FINANCIALINSTRUMENTPRODUCTTYPE TYPE STRING,
FINANCIALINSTRPRODTYPENAME TYPE STRING,
CENTRALCLEARINGACCOUNTCURRENCY TYPE STRING,
TRADER TYPE STRING,
FUND TYPE STRING,
GRANTID TYPE STRING,
TREASURYACCOUNTINGCODE TYPE STRING,
TREASURYPOSITIONZERODATE TYPE STRING,
TREASURYPOSASSETLIABILITYCODE TYPE STRING,
TRSYPOSMANAGEMENTPROCEDURE TYPE STRING,
TREASURYPOSITIONLEDGERDATE TYPE STRING,
TREASURYPOSITIONLEDGERDATETEXT TYPE STRING,
POSTINGDATE TYPE STRING,
TREASURYPOSITION TYPE STRING,
TRSYSUBPOSITION TYPE STRING,
TRSYPOSQUANTITYCHANGECATEGORY TYPE STRING,
TRSYPOSAMOUNTCHANGECATEGORY TYPE STRING,
TREASURYBUSINESSTRANSSTATUS TYPE STRING,
TRSYPOSVALUATIONSTEPPROCEDURE TYPE STRING,
HEDGINGINSTR TYPE STRING,
HEDGINGINSTRUMENTFISCALYEAR TYPE STRING,
HEDGEDITEM TYPE STRING,
HEDGEDITEMFISCALYEAR TYPE STRING,
ISFREESTANDING TYPE STRING,
TRSYDERIVEDBUSTRANSACISUPDATED TYPE STRING,
TREASURYBUSINESSTRANSCATEGORY TYPE STRING,
TREASURYUPDATETYPE TYPE STRING,
TREASURYGLACCOUNTASSIGNMENTREF TYPE STRING,
POSITIONCURRENCY TYPE STRING,
VALUATIONCURRENCY TYPE STRING,
NOMINALCURRENCY TYPE STRING,
DISPLAYCURRENCY TYPE STRING,
EXCHANGERATETYPE TYPE STRING,
TREASURYPOSITIONPERIOD TYPE STRING,
KEYDATE TYPE STRING,
QUANTITYINPIECES TYPE STRING,
NOMINALAMOUNTINNOMINALCURRENCY TYPE STRING,
NOMINALAMOUNTINDISPLAYCURRENCY TYPE STRING,
ORIGLNOMINALAMTINNOMINALCRCY TYPE STRING,
ORIGLNOMINALAMTINDISPLAYCRCY TYPE STRING,
PURCHASEVALUEINPOSITIONCRCY TYPE STRING,
PURCHASEVALUEINVALUATIONCRCY TYPE STRING,
PURCHASEVALUEINDC TYPE STRING,
SECURITYVALUATIONAMTINPOSCRCY TYPE STRING,
SECURITYVALUATIONAMTINVALNCRCY TYPE STRING,
SECURITYVALUATIONAMTINDC TYPE STRING,
FOREIGNCRCYVALNAMTINVALNCRCY TYPE STRING,
FOREIGNCRCYVALNAMTINDC TYPE STRING,
COSTINPOSITIONCURRENCY TYPE STRING,
COSTINVALUATIONCURRENCY TYPE STRING,
COSTINDISPLAYCURRENCY TYPE STRING,
SECURITYCOSTVALNAMTINPOSCRCY TYPE STRING,
SECURITYCOSTVALNAMTINVALNCRCY TYPE STRING,
SECURITYCOSTVALNAMTINDSPCRCY TYPE STRING,
FRGNEXCHCOSTVALNAMTINVALNCRCY TYPE STRING,
FRGNEXCHCOSTVALNAMTINDC TYPE STRING,
AMORTIZATIONAMTINPOSITIONCRCY TYPE STRING,
AMORTIZATIONAMTINVALUATIONCRCY TYPE STRING,
AMORTIZATIONAMTINDISPLAYCRCY TYPE STRING,
CLRDPREMDISCDEFRLTXCOMPNAMOUNT TYPE STRING,
CLRDPREMDISCDEFRLAMTINVALNCRCY TYPE STRING,
CLRDPREMDISCDEFRLAMTINDC TYPE STRING,
PURVALDEFERRALITMAMTINPOSCRCY TYPE STRING,
PURVALDEFERRALITMAMTINVALNCRCY TYPE STRING,
PURVALDEFERRALITMAMTINDC TYPE STRING,
VARIATIONMARGINAMOUNTINPOSCRCY TYPE STRING,
VARIATIONMARGINAMTINVALNCRCY TYPE STRING,
VARIATIONMARGINAMOUNTINDC TYPE STRING,
OCISECURITYVALNAMOUNTINPOSCRCY TYPE STRING,
OCISCRTYVALNAMOUNTINVALNCRCY TYPE STRING,
OCISECURITYVALNAMOUNTINDC TYPE STRING,
OCIFRGNEXCHVALNAMTINVALNCRCY TYPE STRING,
OCIFRGNEXCHVALNAMTINDC TYPE STRING,
OCISCRTYCOSTVALNAMTINPOSCRCY TYPE STRING,
OCISCRTYCOSTVALNAMTINVALNCRCY TYPE STRING,
OCISCRTYCOSTVALNAMTINDSPCRCY TYPE STRING,
OCICOSTFXVALNAMOUNTINVALNCRCY TYPE STRING,
OCICOSTFXVALNAMOUNTINDSPCRCY TYPE STRING,
ACCRUEDINTERESTINPOSITIONCRCY TYPE STRING,
ACCRUEDINTERESTINVALUATIONCRCY TYPE STRING,
ACCRUEDINTERESTAMTINDSPCRCY TYPE STRING,
NEGTTNSPREADAMTZNAMTINPOSCRCY TYPE STRING,
NEGTTNSPREADAMTZNAMTINVALNCRCY TYPE STRING,
NEGTTNSPREADAMTZNAMTINDSPCRCY TYPE STRING,
CUMLTVREPAYMENTAMOUNTINPOSCRCY TYPE STRING,
CUMLTVREPAYMENTAMTINVALNCRCY TYPE STRING,
CUMLTVREPAYMENTAMOUNTINDSPCRCY TYPE STRING,
PURCRCYSPOTVALNAMTINVALNCRCY TYPE STRING,
PURCRCYSPOTVALNAMTINDSPCRCY TYPE STRING,
SALECRCYSPOTVALNAMTINVALNCRCY TYPE STRING,
SALECRCYSPOTVALNAMTINDSPCRCY TYPE STRING,
SWAPACCRUALAMOUNTINPOSCURRENCY TYPE STRING,
SWAPACCRUALAMOUNTINVALNCRCY TYPE STRING,
SWAPACCRUALAMOUNTINDSPCRCY TYPE STRING,
SWAPVALUATIONAMOUNTINDSPCRCY TYPE STRING,
IMPAIRMENTAMOUNTINPOSITIONCRCY TYPE STRING,
IMPAIRMENTAMTINVALUATIONCRCY TYPE STRING,
IMPAIRMENTAMOUNTINDISPLAYCRCY TYPE STRING,
CAPITALIZATIONRSRVINPOSCRCY TYPE STRING,
CAPITALIZATIONRSRVINVALNCRCY TYPE STRING,
CAPITALIZATIONRSRVAMTINDSPCRCY TYPE STRING,
FXVALNAMTZDACQNAMTINVALNCRCY TYPE STRING,
FXVALNAMTZDACQNAMTINDSPCRCY TYPE STRING,
FOREIGNEXCHIMPRMTAMTINVALNCRCY TYPE STRING,
FOREIGNEXCHIMPRMTAMTINDSPCRCY TYPE STRING,
INTERESTINCOMEINPOSITIONCRCY TYPE STRING,
INTERESTINCOMEINVALUATIONCRCY TYPE STRING,
INTERESTINCOMEAMTINDSPCRCY TYPE STRING,
SECURITYWRITEUPAMOUNTINPOSCRCY TYPE STRING,
SECURITYWRITEUPAMTINVALNCRCY TYPE STRING,
SECURITYWRITEUPAMOUNTINDSPCRCY TYPE STRING,
SECURITYWRITEDOWNAMTINPOSCRCY TYPE STRING,
SCRTYWRITEDOWNAMTINVALNCRCY TYPE STRING,
SECURITYWRITEDOWNAMTINDSPCRCY TYPE STRING,
FRGNEXCHWRITEUPAMTINVALNCRCY TYPE STRING,
FRGNEXCHWRITEUPAMTINDSPCRCY TYPE STRING,
FRGNEXCHWRITEDOWNAMTINVALNCRCY TYPE STRING,
FRGNEXCHWRITEDOWNAMTINDSPCRCY TYPE STRING,
SCRTYCOSTWRITEUPAMTINPOSCRCY TYPE STRING,
SCRTYCOSTWRITEUPAMTINVALNCRCY TYPE STRING,
SCRTYCOSTWRITEUPAMTINDSPCRCY TYPE STRING,
SCRTYCOSTWRITEDOWNAMTINPOSCRCY TYPE STRING,
SCRTYCOSTWRTDOWNAMTINVALNCRCY TYPE STRING,
SCRTYCOSTWRITEDOWNAMTINDSPCRCY TYPE STRING,
FRGNEXCHCOSTWRTUPAMTINVALNCRCY TYPE STRING,
FRGNEXCHCOSTWRTUPAMTINDSPCRCY TYPE STRING,
FXCOSTWRITEDOWNAMTINVALNCRCY TYPE STRING,
FXCOSTWRITEDOWNAMTINDSPCRCY TYPE STRING,
FRGNEXCHVALNDIFFAMTINVALNCRCY TYPE STRING,
FRGNEXCHVALNDIFFAMTINDSPCRCY TYPE STRING,
DESIGNATEDQUANTITYINPIECES TYPE STRING,
DESIGNATEDNOMINALCURRENCY TYPE STRING,
DESIGNATEDAMOUNTINNOMINALCRCY TYPE STRING,
DESIGNATEDAMOUNTINDISPLAYCRCY TYPE STRING,
DESIGNATEDORIGAMTINNOMINALCRCY TYPE STRING,
DESIGNATEDORIGAMTINDISPLAYCRCY TYPE STRING,
HEDGEAMORTIZATIONAMTINPOSCRCY TYPE STRING,
HEDGEAMORTIZATIONAMTINVALNCRCY TYPE STRING,
HEDGEAMORTIZATIONAMTINDSPCRCY TYPE STRING,
GAINVALUEADJMTAMOUNTINPOSCRCY TYPE STRING,
GAINVALUEADJMTAMOUNTINVALNCRCY TYPE STRING,
GAINVALUEADJMTAMOUNTINDSPCRCY TYPE STRING,
LOSSVALUEADJMTAMOUNTINPOSCRCY TYPE STRING,
LOSSVALUEADJMTAMOUNTINVALNCRCY TYPE STRING,
LOSSVALUEADJMTAMOUNTINDSPCRCY TYPE STRING,
ORIGINALVALUEADJMTAMTINPOSCRCY TYPE STRING,
ORIGINALVALADJMTAMTINVALNCRCY TYPE STRING,
ORIGINALVALUEADJMTAMTINDSPCRCY TYPE STRING,
EFFCTVAMTINPOSCRCY TYPE STRING,
EFFCTVAMTINVALNCRCY TYPE STRING,
EFFCTVAMTINDSPCRCY TYPE STRING,
INEFFCTVAMTINPOSCRCY TYPE STRING,
INEFFCTVAMTINVALNCRCY TYPE STRING,
INEFFCTVAMTINDSPCRCY TYPE STRING,
EFFCTVCOSTHDGGRSRVINPOSCRCY TYPE STRING,
EFFCTVCOSTHDGGRSRVINVALNCRCY TYPE STRING,
EFFCTVCOSTHDGGRSRVAMTINDSPCRCY TYPE STRING,
INEFFCTVHDGGRSRVPNLINPOSCRCY TYPE STRING,
INEFFCTVHDGGRSRVPNLINVALNCRCY TYPE STRING,
INEFFCTVHDGGRSRVPNLAMTINDC TYPE STRING,
EFFCTVHDGGRSRVPNLINPOSCRCY TYPE STRING,
EFFCTVHDGGRSRVPNLINVALNCRCY TYPE STRING,
EFFCTVHDGGRSRVPNLAMTINDC TYPE STRING,
INEFFCTVCOSTHDGRSRVPNLPOSCRCY TYPE STRING,
INEFFCTVCOSTHDGRSRVPNLVALNCRCY TYPE STRING,
INEFFCTVCOSTHDGRSRVPNLAMTINDC TYPE STRING,
EFFCTVCOSTHDGRSRVPNLINPOSCRCY TYPE STRING,
EFFCTVCOSTHDGRSRVPNLINVALNCRCY TYPE STRING,
EFFCTVCOSTHDGRSRVPNLAMTINDC TYPE STRING,
CNSLDTDSCRTYGAINAMTINPOSCRCY TYPE STRING,
CNSLDTDSCRTYGAINAMTINVALNCRCY TYPE STRING,
CNSLDTDSCRTYGAINAMTINDSPCRCY TYPE STRING,
CNSLDTDSCRTYLOSSAMTINPOSCRCY TYPE STRING,
CNSLDTDSCRTYLOSSAMTINVALNCRCY TYPE STRING,
CNSLDTDSCRTYLOSSAMTINDSPCRCY TYPE STRING,
CNSLDTDFOREXGAINAMTINVALNCRCY TYPE STRING,
CNSLDTDFXGAINAMTINDSPCRCY TYPE STRING,
CNSLDTDFOREXLOSSAMTINVALNCRCY TYPE STRING,
CNSLDTDFOREXLOSSAMTINDSPCRCY TYPE STRING,
LOSSALLOWANCEAMOUNTINPOSCRCY TYPE STRING,
LOSSALLOWANCEAMOUNTINVALNCRCY TYPE STRING,
LOSSALLOWANCEAMOUNTINDSPCRCY TYPE STRING,
FXLOSSALLOWANCEAMTINVALNCRCY TYPE STRING,
FXLOSSALLOWANCEAMTINDSPCRCY TYPE STRING,
OFFSTLOSSALLOWANCEAMTINPOSCRCY TYPE STRING,
OFFSETLOSSALLWNCAMTINVALNCRCY TYPE STRING,
OFFSTLOSSALLOWANCEAMTINDSPCRCY TYPE STRING,
FXOFFSTLOSSALLWNCAMTINVALNCRCY TYPE STRING,
FXOFFSTLOSSALLWNCAMTINDSPCRCY TYPE STRING,
OCIOFFSTLOSSALLWNCAMTINPOSCRCY TYPE STRING,
OCIOFFSTLOSSALLWNCINVALNCRCY TYPE STRING,
OCIOFFSTLOSSALLWNCAMTINDSPCRCY TYPE STRING,
FXOFFSTOCILOSSALLWNCINVALNCRCY TYPE STRING,
FXOFFSTOCILOSSALLAMTINDSPCRCY TYPE STRING,
AMTZNADJMTLOSSALLWNCINPOSCRCY TYPE STRING,
AMTZNADJMTLOSSALLWNCINVALNCRCY TYPE STRING,
AMTZNADJMTLOSSALLAMTINDSPCRCY TYPE STRING,
FXAMTZNADJLOSSALLWNCINVALNCRCY TYPE STRING,
FXAMTZNADJLOSSALLAMTINDSPCRCY TYPE STRING,
CONTRACTCHANGEAMTINPOSCRCY TYPE STRING,
CONTRACTCHANGEAMTINVALNCRCY TYPE STRING,
CONTRACTCHANGEAMTINDSPCRCY TYPE STRING,
FRGNEXCHCONTRCHGAMTINVALNCRCY TYPE STRING,
FRGNEXCHCONTRCHGAMTINDSPCRCY TYPE STRING,
ACQUISITIONAMTINPOSITIONCRCY TYPE STRING,
ACQUISITIONAMOUNTINVALNCRCY TYPE STRING,
ACQUISITIONAMTINDISPLAYCRCY TYPE STRING,
AMORTIZEDACQNAMOUNTINPOSCRCY TYPE STRING,
AMORTIZEDACQNAMOUNTINVALNCRCY TYPE STRING,
AMORTIZEDACQNAMOUNTINDC TYPE STRING,
AMORTIZEDCOSTINPOSITIONCRCY TYPE STRING,
AMORTIZEDCOSTINVALUATIONCRCY TYPE STRING,
AMORTIZEDCOSTINDISPLAYCRCY TYPE STRING,
BOOKVALUEAMOUNTINVALNCURRENCY TYPE STRING,
BOOKVALUEAMTINPOSITIONCURRENCY TYPE STRING,
BOOKVALUEAMOUNTINDC TYPE STRING,END OF T_EKKO_STR.
DATA: WA_CTRLPOSHIST_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_CTRLPOSHIST_STR-MANDT sy-vline 
WA_CTRLPOSHIST_STR-TREASURYVALUATIONAREA sy-vline 
WA_CTRLPOSHIST_STR-TREASURYVALUATIONAREANAME sy-vline 
WA_CTRLPOSHIST_STR-TREASURYVALUATIONCLASS sy-vline 
WA_CTRLPOSHIST_STR-TREASURYVALUATIONCLASSNAME sy-vline 
WA_CTRLPOSHIST_STR-COMPANYCODE sy-vline 
WA_CTRLPOSHIST_STR-COMPANYCODENAME sy-vline 
WA_CTRLPOSHIST_STR-SECURITYACCOUNT sy-vline 
WA_CTRLPOSHIST_STR-SECURITYCLASS sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONACCOUNT sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONLOT sy-vline 
WA_CTRLPOSHIST_STR-FINANCIALTRANSACTION sy-vline 
WA_CTRLPOSHIST_STR-FINANCIALEXPOSUREITEM sy-vline 
WA_CTRLPOSHIST_STR-FINANCIALEXPOSURESUBITEM sy-vline 
WA_CTRLPOSHIST_STR-FINANCIALINSTRVALUATIONCLASS sy-vline 
WA_CTRLPOSHIST_STR-DIFFERENTIATIONPORTFOLIO sy-vline 
WA_CTRLPOSHIST_STR-SECURITYACCOUNTGROUP sy-vline 
WA_CTRLPOSHIST_STR-LOANCONTRACT sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONLONGSHORTCODE sy-vline 
WA_CTRLPOSHIST_STR-CENTRALCLEARINGACCOUNT sy-vline 
WA_CTRLPOSHIST_STR-FINANCIALINSTRUMENTPRODUCTTYPE sy-vline 
WA_CTRLPOSHIST_STR-FINANCIALINSTRPRODTYPENAME sy-vline 
WA_CTRLPOSHIST_STR-CENTRALCLEARINGACCOUNTCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-TRADER sy-vline 
WA_CTRLPOSHIST_STR-FUND sy-vline 
WA_CTRLPOSHIST_STR-GRANTID sy-vline 
WA_CTRLPOSHIST_STR-TREASURYACCOUNTINGCODE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONZERODATE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSASSETLIABILITYCODE sy-vline 
WA_CTRLPOSHIST_STR-TRSYPOSMANAGEMENTPROCEDURE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONLEDGERDATE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONLEDGERDATETEXT sy-vline 
WA_CTRLPOSHIST_STR-POSTINGDATE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITION sy-vline 
WA_CTRLPOSHIST_STR-TRSYSUBPOSITION sy-vline 
WA_CTRLPOSHIST_STR-TRSYPOSQUANTITYCHANGECATEGORY sy-vline 
WA_CTRLPOSHIST_STR-TRSYPOSAMOUNTCHANGECATEGORY sy-vline 
WA_CTRLPOSHIST_STR-TREASURYBUSINESSTRANSSTATUS sy-vline 
WA_CTRLPOSHIST_STR-TRSYPOSVALUATIONSTEPPROCEDURE sy-vline 
WA_CTRLPOSHIST_STR-HEDGINGINSTR sy-vline 
WA_CTRLPOSHIST_STR-HEDGINGINSTRUMENTFISCALYEAR sy-vline 
WA_CTRLPOSHIST_STR-HEDGEDITEM sy-vline 
WA_CTRLPOSHIST_STR-HEDGEDITEMFISCALYEAR sy-vline 
WA_CTRLPOSHIST_STR-ISFREESTANDING sy-vline 
WA_CTRLPOSHIST_STR-TRSYDERIVEDBUSTRANSACISUPDATED sy-vline 
WA_CTRLPOSHIST_STR-TREASURYBUSINESSTRANSCATEGORY sy-vline 
WA_CTRLPOSHIST_STR-TREASURYUPDATETYPE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYGLACCOUNTASSIGNMENTREF sy-vline 
WA_CTRLPOSHIST_STR-POSITIONCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-VALUATIONCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-NOMINALCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-DISPLAYCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-EXCHANGERATETYPE sy-vline 
WA_CTRLPOSHIST_STR-TREASURYPOSITIONPERIOD sy-vline 
WA_CTRLPOSHIST_STR-KEYDATE sy-vline 
WA_CTRLPOSHIST_STR-QUANTITYINPIECES sy-vline 
WA_CTRLPOSHIST_STR-NOMINALAMOUNTINNOMINALCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-NOMINALAMOUNTINDISPLAYCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-ORIGLNOMINALAMTINNOMINALCRCY sy-vline 
WA_CTRLPOSHIST_STR-ORIGLNOMINALAMTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURCHASEVALUEINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURCHASEVALUEINVALUATIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURCHASEVALUEINDC sy-vline 
WA_CTRLPOSHIST_STR-SECURITYVALUATIONAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYVALUATIONAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYVALUATIONAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-FOREIGNCRCYVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FOREIGNCRCYVALNAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-COSTINPOSITIONCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-COSTINVALUATIONCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-COSTINDISPLAYCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYCOSTVALNAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYCOSTVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYCOSTVALNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHCOSTVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHCOSTVALNAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZATIONAMTINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZATIONAMTINVALUATIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZATIONAMTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-CLRDPREMDISCDEFRLTXCOMPNAMOUNT sy-vline 
WA_CTRLPOSHIST_STR-CLRDPREMDISCDEFRLAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CLRDPREMDISCDEFRLAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-PURVALDEFERRALITMAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURVALDEFERRALITMAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURVALDEFERRALITMAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-VARIATIONMARGINAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-VARIATIONMARGINAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-VARIATIONMARGINAMOUNTINDC sy-vline 
WA_CTRLPOSHIST_STR-OCISECURITYVALNAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCISCRTYVALNAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCISECURITYVALNAMOUNTINDC sy-vline 
WA_CTRLPOSHIST_STR-OCIFRGNEXCHVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCIFRGNEXCHVALNAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-OCISCRTYCOSTVALNAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCISCRTYCOSTVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCISCRTYCOSTVALNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCICOSTFXVALNAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCICOSTFXVALNAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-ACCRUEDINTERESTINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-ACCRUEDINTERESTINVALUATIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-ACCRUEDINTERESTAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-NEGTTNSPREADAMTZNAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-NEGTTNSPREADAMTZNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-NEGTTNSPREADAMTZNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-CUMLTVREPAYMENTAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-CUMLTVREPAYMENTAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CUMLTVREPAYMENTAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURCRCYSPOTVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-PURCRCYSPOTVALNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SALECRCYSPOTVALNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SALECRCYSPOTVALNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SWAPACCRUALAMOUNTINPOSCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-SWAPACCRUALAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SWAPACCRUALAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SWAPVALUATIONAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-IMPAIRMENTAMOUNTINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-IMPAIRMENTAMTINVALUATIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-IMPAIRMENTAMOUNTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-CAPITALIZATIONRSRVINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-CAPITALIZATIONRSRVINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CAPITALIZATIONRSRVAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXVALNAMTZDACQNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXVALNAMTZDACQNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FOREIGNEXCHIMPRMTAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FOREIGNEXCHIMPRMTAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-INTERESTINCOMEINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-INTERESTINCOMEINVALUATIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-INTERESTINCOMEAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYWRITEUPAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYWRITEUPAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYWRITEUPAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYWRITEDOWNAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYWRITEDOWNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SECURITYWRITEDOWNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHWRITEUPAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHWRITEUPAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHWRITEDOWNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHWRITEDOWNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYCOSTWRITEUPAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYCOSTWRITEUPAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYCOSTWRITEUPAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYCOSTWRITEDOWNAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYCOSTWRTDOWNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-SCRTYCOSTWRITEDOWNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHCOSTWRTUPAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHCOSTWRTUPAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXCOSTWRITEDOWNAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXCOSTWRITEDOWNAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHVALNDIFFAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHVALNDIFFAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-DESIGNATEDQUANTITYINPIECES sy-vline 
WA_CTRLPOSHIST_STR-DESIGNATEDNOMINALCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-DESIGNATEDAMOUNTINNOMINALCRCY sy-vline 
WA_CTRLPOSHIST_STR-DESIGNATEDAMOUNTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-DESIGNATEDORIGAMTINNOMINALCRCY sy-vline 
WA_CTRLPOSHIST_STR-DESIGNATEDORIGAMTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-HEDGEAMORTIZATIONAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-HEDGEAMORTIZATIONAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-HEDGEAMORTIZATIONAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-GAINVALUEADJMTAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-GAINVALUEADJMTAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-GAINVALUEADJMTAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-LOSSVALUEADJMTAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-LOSSVALUEADJMTAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-LOSSVALUEADJMTAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-ORIGINALVALUEADJMTAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-ORIGINALVALADJMTAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-ORIGINALVALUEADJMTAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVCOSTHDGGRSRVINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVCOSTHDGGRSRVINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVCOSTHDGGRSRVAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVHDGGRSRVPNLINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVHDGGRSRVPNLINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVHDGGRSRVPNLAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVHDGGRSRVPNLINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVHDGGRSRVPNLINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVHDGGRSRVPNLAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVCOSTHDGRSRVPNLPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVCOSTHDGRSRVPNLVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-INEFFCTVCOSTHDGRSRVPNLAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVCOSTHDGRSRVPNLINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVCOSTHDGRSRVPNLINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-EFFCTVCOSTHDGRSRVPNLAMTINDC sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDSCRTYGAINAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDSCRTYGAINAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDSCRTYGAINAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDSCRTYLOSSAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDSCRTYLOSSAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDSCRTYLOSSAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDFOREXGAINAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDFXGAINAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDFOREXLOSSAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CNSLDTDFOREXLOSSAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-LOSSALLOWANCEAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-LOSSALLOWANCEAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-LOSSALLOWANCEAMOUNTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXLOSSALLOWANCEAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXLOSSALLOWANCEAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-OFFSTLOSSALLOWANCEAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-OFFSETLOSSALLWNCAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-OFFSTLOSSALLOWANCEAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXOFFSTLOSSALLWNCAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXOFFSTLOSSALLWNCAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCIOFFSTLOSSALLWNCAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCIOFFSTLOSSALLWNCINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-OCIOFFSTLOSSALLWNCAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXOFFSTOCILOSSALLWNCINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXOFFSTOCILOSSALLAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMTZNADJMTLOSSALLWNCINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMTZNADJMTLOSSALLWNCINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMTZNADJMTLOSSALLAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXAMTZNADJLOSSALLWNCINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FXAMTZNADJLOSSALLAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-CONTRACTCHANGEAMTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-CONTRACTCHANGEAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-CONTRACTCHANGEAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHCONTRCHGAMTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-FRGNEXCHCONTRCHGAMTINDSPCRCY sy-vline 
WA_CTRLPOSHIST_STR-ACQUISITIONAMTINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-ACQUISITIONAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-ACQUISITIONAMTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZEDACQNAMOUNTINPOSCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZEDACQNAMOUNTINVALNCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZEDACQNAMOUNTINDC sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZEDCOSTINPOSITIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZEDCOSTINVALUATIONCRCY sy-vline 
WA_CTRLPOSHIST_STR-AMORTIZEDCOSTINDISPLAYCRCY sy-vline 
WA_CTRLPOSHIST_STR-BOOKVALUEAMOUNTINVALNCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-BOOKVALUEAMTINPOSITIONCURRENCY sy-vline 
WA_CTRLPOSHIST_STR-BOOKVALUEAMOUNTINDC sy-vline      INTO ld_text SEPARATED BY SPACE.

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