ABAP Select data from SAP table IVISUSIM 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 IVISUSIM 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 IVISUSIM. 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 IVISUSIM 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_IVISUSIM TYPE STANDARD TABLE OF IVISUSIM,
      WA_IVISUSIM TYPE IVISUSIM,
      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: <IVISUSIM> TYPE IVISUSIM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IVISUSIM
*  INTO TABLE @DATA(IT_IVISUSIM2).
*--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_IVISUSIM INDEX 1 INTO DATA(WA_IVISUSIM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<IVISUSIM>-MANDT = 1.
<IVISUSIM>-NOMINATIONDOC = 1.
<IVISUSIM>-NOMINATIONDOCITEM = 1.
<IVISUSIM>-NOMINATIONDOCDISCHARGEITEM = 1.
<IVISUSIM>-NOMINATIONEXTNUMBER = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IVISUSIM-NOMINATIONTYPE, sy-vline,
  WA_IVISUSIM-NOMINATIONHEADERSTATUS, sy-vline,
  WA_IVISUSIM-LOCATIONID, sy-vline,
  WA_IVISUSIM-LOCATIONNAME, sy-vline,
  WA_IVISUSIM-LOCATIONDISCHARGEID, sy-vline,
  WA_IVISUSIM-DESTINATIONLOCATIONNAME, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_IVISUSIM 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_IVISUSIM 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_IVISUSIM INTO WA_IVISUSIM.


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

*Conversion exit MATN1, internal->external for field SCHEDULEDMATERIAL
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_IVISUSIM-SCHEDULEDMATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IVISUSIM-SCHEDULEDMATERIAL.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit MATN1, internal->external for field LOADDEMANDMATERIALID
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_IVISUSIM-LOADDEMANDMATERIALID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IVISUSIM-LOADDEMANDMATERIALID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field DISCHARGEDEMANDMATERIALID
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_IVISUSIM-DISCHARGEDEMANDMATERIALID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IVISUSIM-DISCHARGEDEMANDMATERIALID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field NOMINATIONPEGID
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_IVISUSIM-NOMINATIONPEGID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IVISUSIM-NOMINATIONPEGID.
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_IVISUSIM_STR, 
MANDT TYPE STRING,
NOMINATIONDOC TYPE STRING,
NOMINATIONDOCITEM TYPE STRING,
NOMINATIONDOCDISCHARGEITEM TYPE STRING,
NOMINATIONEXTNUMBER TYPE STRING,
NOMINATIONTYPE TYPE STRING,
NOMINATIONHEADERSTATUS TYPE STRING,
LOCATIONID TYPE STRING,
LOCATIONNAME TYPE STRING,
LOCATIONDISCHARGEID TYPE STRING,
DESTINATIONLOCATIONNAME TYPE STRING,
COMPANYCODE TYPE STRING,
SCHEDULEDMATERIAL TYPE STRING,
SCHEDULEDQUANTITY TYPE STRING,
SCHEDULEDQUANTITYUNIT TYPE STRING,
DISCHARGESCHEDQUANTITY TYPE STRING,
DISCHARGEQUANTITYUNIT TYPE STRING,
ISREFERENCEDOCUMENT TYPE STRING,
NOMINATIONREFERENCEDOCUMENT TYPE STRING,
NOMINATIONPIPELINECYCLEID TYPE STRING,
NOMINATIONSHIPPER TYPE STRING,
NOMINATIONCARRIER TYPE STRING,
CARRIERNAME TYPE STRING,
INTRANSITPLANT TYPE STRING,
INTRANSITSTORAGELOCATION TYPE STRING,
VEHICLEID TYPE STRING,
VEHICLEDESCRIPTION TYPE STRING,
TRANSPORTSYSTEM TYPE STRING,
NOMINATIONLASTHEADERACTIONDATE TYPE STRING,
TRANSPORTATIONPLANNINGPOINT TYPE STRING,
SHIPPINGROUTE TYPE STRING,
ISBOOKEDTRANSPORTSYSTEM TYPE STRING,
NOMINATIONEVENTDEFAULTGROUP TYPE STRING,
NOMINATIONHEADERUOM TYPE STRING,
BULKSHIPMENTTYPE TYPE STRING,
NOMINATIONMODEOFTRANSPORT TYPE STRING,
MODEOFTRANSPORTTEXT TYPE STRING,
BUSINESSTYPE TYPE STRING,
VEHICLEIDENTIFIER TYPE STRING,
NOMINATIONCHANGEDDATE TYPE STRING,
NOMINATIONCREATIONDATE TYPE STRING,
NOMINATIONCREATIONTIME TYPE STRING,
NOMINATIONCREATEDBYUSER TYPE STRING,
NOMINATIONISBLOCKED TYPE STRING,
CONTRACTPARTNER TYPE STRING,
CONSIGNEEPARTNER TYPE STRING,
NOMINATIONISMARKEDFORDELETION TYPE STRING,
NOMINATIONREFERENCEDOCITEM TYPE STRING,
NOMINATIONREFERENCEDOCTYPE TYPE STRING,
ISIMPORTEXPORTPARTNER TYPE STRING,
BATCHORIGINLOCATION TYPE STRING,
BATCHDESTINATIONLOCATION TYPE STRING,
NOMINATIONSCHEDULEDATE TYPE STRING,
IMPORTEXPORTPARTNER TYPE STRING,
NOMINATIONISINCOMPLETE TYPE STRING,
NOMINATIONINSPECTOR TYPE STRING,
NOMINATIONITEMSTATUS TYPE STRING,
NOMINATIONITEMSUBSTATUS TYPE STRING,
LOADDEMANDMATERIALID TYPE STRING,
DISCHARGEDEMANDMATERIALID TYPE STRING,
LOCATIONPARTNER TYPE STRING,
LOCATIONPLANT TYPE STRING,
NOMINATIONSCHEDULETYPE TYPE STRING,
VALUATIONTYPE TYPE STRING,
VALUATIONTYPEDESTINATION TYPE STRING,
VALUATIONTYPEORIGIN TYPE STRING,
ISNOMINATIONWORKLISTENTRY TYPE STRING,
ACTUALSCHEDULEDQUANTITY TYPE STRING,
ACTUALSCHEDULEDQUANTITYUNIT TYPE STRING,
ACTUALDISCHARGEQUANTITY TYPE STRING,
ACTUALDISCHARGEQUANTITYUNIT TYPE STRING,
NOMINATIONITEMISCOMPLETE TYPE STRING,
SCHEDULEDBATCHSTARTDATETIME TYPE STRING,
SCHEDULEDBATCHENDDATETIME TYPE STRING,
ISNOMINATIONACTUAL TYPE STRING,
MATERIALDESC TYPE STRING,
DISCHARGENOMINATIONITEMSTATUS TYPE STRING,
NOMINATIONITEMSTATUSDESC TYPE STRING,
ITEMDISCHARGESTATUSTEXT TYPE STRING,
MATERIALGROUP TYPE STRING,
MATERIALGROUPNAME TYPE STRING,
PRODUCTHIERARCHY TYPE STRING,
PRODUCTHIERARCHYNAME TYPE STRING,
CUSTOMER TYPE STRING,
CUSTOMERNAME TYPE STRING,
SUPPLIERACCOUNT TYPE STRING,
SUPPLIERNAME TYPE STRING,
CUSTADDRESSNUMBER TYPE STRING,
CUSTOMERCITYNAME TYPE STRING,
CUSTOMERCOUNTRY TYPE STRING,
ADDRESSNUMBER TYPE STRING,
SUPPLIERCITYNAME TYPE STRING,
SOURCELOCATIONCOUNTRY TYPE STRING,
CITYNAME TYPE STRING,
COUNTRYNAME TYPE STRING,
REGION TYPE STRING,
BUSINESSPARTNERROLETYPE TYPE STRING,
FROMLATITUDE TYPE STRING,
FROMLONGITUDE TYPE STRING,
TOLATITUDE TYPE STRING,
TOLONGITUDE TYPE STRING,
CONNECTIONPOINTS TYPE STRING,
LOCATIONPOSITION TYPE STRING,
ROUTETEXT TYPE STRING,
ISALERT TYPE STRING,
ALERTTEXT TYPE STRING,
DISCHARGEQTYALERTTEXT TYPE STRING,
ISLOADTIMEALERT TYPE STRING,
LOADTIMEALERTTEXT TYPE STRING,
ISDISCHARGETIMEALERT TYPE STRING,
DISCHARGETIMEALERTTEXT TYPE STRING,
ISLOCATIONALERT TYPE STRING,
LOCATIONALERTDESC TYPE STRING,
ISDISCHARGELOCALERT TYPE STRING,
DISCHARGELOCALERTDESC TYPE STRING,
ISLOAD TYPE STRING,
ISNOMINATIONDOCITEM TYPE STRING,
ISPEGGED TYPE STRING,
SAFETYSTOCK TYPE STRING,
CAPACITYSTOCK TYPE STRING,
NOMINATIONEVENTNUMBER TYPE STRING,
NOMINATIONEVENTTYPE TYPE STRING,
NOMINATIONEVENTSEQUENCE TYPE STRING,
ACTUALSTARTDATEFROM TYPE STRING,
ACTUALSTARTTIMEFROM TYPE STRING,
NOMINATIONEVENTCHANGEDDATE TYPE STRING,
NOMINATIONEVENTCHANGEDTIME TYPE STRING,
ACTUALSTARTDATETIME TYPE STRING,
DISCHARGEEVENTNUMBER TYPE STRING,
DISCHARGEEVENTTYPE TYPE STRING,
DISCHARGEDATE TYPE STRING,
DISCHARGETIME TYPE STRING,
DISCHARGESTARTDATETIME TYPE STRING,
ACTUALSTARTDATETO TYPE STRING,
ACTUALSTARTTIMETO TYPE STRING,
ACTUALENDDATEFROM TYPE STRING,
ACTUALENDTIMEFROM TYPE STRING,
ACTUALENDDATETO TYPE STRING,
ACTUALENDTIMETO TYPE STRING,
NOMINATIONTICKETLOADSTARTDATE TYPE STRING,
NOMINATIONTICKETLOADSTARTTIME TYPE STRING,
NOMINATIONTICKETDISCHARGEDATE TYPE STRING,
NOMINATIONTICKETDISCHARGETIME TYPE STRING,
NOMINATIONSCHEDULEDTIME TYPE STRING,
PLANNEDDISCHARGEDATE TYPE STRING,
DISCHARGEBATCHSTARTDATETIME TYPE STRING,
NOMINATIONDISCHARGETIME TYPE STRING,
DESTINATIONLOCATION TYPE STRING,
ISVARIANT TYPE STRING,
ISNOMINATIONLOAD TYPE STRING,
ISNOMINATIONDISCHARGE TYPE STRING,
NOMINATIONPEGID TYPE STRING,
NOMINATIONPEGGINGTYPEUSAGE TYPE STRING,
TRANSSHIPMENTGROUPID TYPE STRING,
DISCHARGEREFERENCEDOCUMENT TYPE STRING,
NOMINATIONDISCHARGESCHEDTYPE TYPE STRING,
DISCHARGECONTRACTPARTNER TYPE STRING,
DISCHARGELOCATIONPARTNER TYPE STRING,
DISCHARGELOCATIONPLANT TYPE STRING,
NOTIFICATIONSTATUSOBJECT TYPE STRING,
STATUSOBJECT TYPE STRING,
NOTIFICATIONDATETIME TYPE STRING,
NOTIFICATIONTEXT TYPE STRING,
MAINTENANCENOTIFICATIONTEXT TYPE STRING,
INDICATORVALUE TYPE STRING,
ISCLOUDSYSTEM TYPE STRING,
SIMULATION TYPE STRING,
COMMENTS TYPE STRING,
LOADDEMANDMATERIALDESC TYPE STRING,
DISCHARGEDEMANDMATERIALDESC TYPE STRING,
SHIPMENTLOADCOST TYPE STRING,
SHIPMENTLOADCOSTCRCY TYPE STRING,
SHIPMENTDISCHARGECOST TYPE STRING,
SHIPMENTDISCHARGECOSTCRCY TYPE STRING,END OF T_EKKO_STR.
DATA: WA_IVISUSIM_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_IVISUSIM_STR-MANDT sy-vline 
WA_IVISUSIM_STR-NOMINATIONDOC sy-vline 
WA_IVISUSIM_STR-NOMINATIONDOCITEM sy-vline 
WA_IVISUSIM_STR-NOMINATIONDOCDISCHARGEITEM sy-vline 
WA_IVISUSIM_STR-NOMINATIONEXTNUMBER sy-vline 
WA_IVISUSIM_STR-NOMINATIONTYPE sy-vline 
WA_IVISUSIM_STR-NOMINATIONHEADERSTATUS sy-vline 
WA_IVISUSIM_STR-LOCATIONID sy-vline 
WA_IVISUSIM_STR-LOCATIONNAME sy-vline 
WA_IVISUSIM_STR-LOCATIONDISCHARGEID sy-vline 
WA_IVISUSIM_STR-DESTINATIONLOCATIONNAME sy-vline 
WA_IVISUSIM_STR-COMPANYCODE sy-vline 
WA_IVISUSIM_STR-SCHEDULEDMATERIAL sy-vline 
WA_IVISUSIM_STR-SCHEDULEDQUANTITY sy-vline 
WA_IVISUSIM_STR-SCHEDULEDQUANTITYUNIT sy-vline 
WA_IVISUSIM_STR-DISCHARGESCHEDQUANTITY sy-vline 
WA_IVISUSIM_STR-DISCHARGEQUANTITYUNIT sy-vline 
WA_IVISUSIM_STR-ISREFERENCEDOCUMENT sy-vline 
WA_IVISUSIM_STR-NOMINATIONREFERENCEDOCUMENT sy-vline 
WA_IVISUSIM_STR-NOMINATIONPIPELINECYCLEID sy-vline 
WA_IVISUSIM_STR-NOMINATIONSHIPPER sy-vline 
WA_IVISUSIM_STR-NOMINATIONCARRIER sy-vline 
WA_IVISUSIM_STR-CARRIERNAME sy-vline 
WA_IVISUSIM_STR-INTRANSITPLANT sy-vline 
WA_IVISUSIM_STR-INTRANSITSTORAGELOCATION sy-vline 
WA_IVISUSIM_STR-VEHICLEID sy-vline 
WA_IVISUSIM_STR-VEHICLEDESCRIPTION sy-vline 
WA_IVISUSIM_STR-TRANSPORTSYSTEM sy-vline 
WA_IVISUSIM_STR-NOMINATIONLASTHEADERACTIONDATE sy-vline 
WA_IVISUSIM_STR-TRANSPORTATIONPLANNINGPOINT sy-vline 
WA_IVISUSIM_STR-SHIPPINGROUTE sy-vline 
WA_IVISUSIM_STR-ISBOOKEDTRANSPORTSYSTEM sy-vline 
WA_IVISUSIM_STR-NOMINATIONEVENTDEFAULTGROUP sy-vline 
WA_IVISUSIM_STR-NOMINATIONHEADERUOM sy-vline 
WA_IVISUSIM_STR-BULKSHIPMENTTYPE sy-vline 
WA_IVISUSIM_STR-NOMINATIONMODEOFTRANSPORT sy-vline 
WA_IVISUSIM_STR-MODEOFTRANSPORTTEXT sy-vline 
WA_IVISUSIM_STR-BUSINESSTYPE sy-vline 
WA_IVISUSIM_STR-VEHICLEIDENTIFIER sy-vline 
WA_IVISUSIM_STR-NOMINATIONCHANGEDDATE sy-vline 
WA_IVISUSIM_STR-NOMINATIONCREATIONDATE sy-vline 
WA_IVISUSIM_STR-NOMINATIONCREATIONTIME sy-vline 
WA_IVISUSIM_STR-NOMINATIONCREATEDBYUSER sy-vline 
WA_IVISUSIM_STR-NOMINATIONISBLOCKED sy-vline 
WA_IVISUSIM_STR-CONTRACTPARTNER sy-vline 
WA_IVISUSIM_STR-CONSIGNEEPARTNER sy-vline 
WA_IVISUSIM_STR-NOMINATIONISMARKEDFORDELETION sy-vline 
WA_IVISUSIM_STR-NOMINATIONREFERENCEDOCITEM sy-vline 
WA_IVISUSIM_STR-NOMINATIONREFERENCEDOCTYPE sy-vline 
WA_IVISUSIM_STR-ISIMPORTEXPORTPARTNER sy-vline 
WA_IVISUSIM_STR-BATCHORIGINLOCATION sy-vline 
WA_IVISUSIM_STR-BATCHDESTINATIONLOCATION sy-vline 
WA_IVISUSIM_STR-NOMINATIONSCHEDULEDATE sy-vline 
WA_IVISUSIM_STR-IMPORTEXPORTPARTNER sy-vline 
WA_IVISUSIM_STR-NOMINATIONISINCOMPLETE sy-vline 
WA_IVISUSIM_STR-NOMINATIONINSPECTOR sy-vline 
WA_IVISUSIM_STR-NOMINATIONITEMSTATUS sy-vline 
WA_IVISUSIM_STR-NOMINATIONITEMSUBSTATUS sy-vline 
WA_IVISUSIM_STR-LOADDEMANDMATERIALID sy-vline 
WA_IVISUSIM_STR-DISCHARGEDEMANDMATERIALID sy-vline 
WA_IVISUSIM_STR-LOCATIONPARTNER sy-vline 
WA_IVISUSIM_STR-LOCATIONPLANT sy-vline 
WA_IVISUSIM_STR-NOMINATIONSCHEDULETYPE sy-vline 
WA_IVISUSIM_STR-VALUATIONTYPE sy-vline 
WA_IVISUSIM_STR-VALUATIONTYPEDESTINATION sy-vline 
WA_IVISUSIM_STR-VALUATIONTYPEORIGIN sy-vline 
WA_IVISUSIM_STR-ISNOMINATIONWORKLISTENTRY sy-vline 
WA_IVISUSIM_STR-ACTUALSCHEDULEDQUANTITY sy-vline 
WA_IVISUSIM_STR-ACTUALSCHEDULEDQUANTITYUNIT sy-vline 
WA_IVISUSIM_STR-ACTUALDISCHARGEQUANTITY sy-vline 
WA_IVISUSIM_STR-ACTUALDISCHARGEQUANTITYUNIT sy-vline 
WA_IVISUSIM_STR-NOMINATIONITEMISCOMPLETE sy-vline 
WA_IVISUSIM_STR-SCHEDULEDBATCHSTARTDATETIME sy-vline 
WA_IVISUSIM_STR-SCHEDULEDBATCHENDDATETIME sy-vline 
WA_IVISUSIM_STR-ISNOMINATIONACTUAL sy-vline 
WA_IVISUSIM_STR-MATERIALDESC sy-vline 
WA_IVISUSIM_STR-DISCHARGENOMINATIONITEMSTATUS sy-vline 
WA_IVISUSIM_STR-NOMINATIONITEMSTATUSDESC sy-vline 
WA_IVISUSIM_STR-ITEMDISCHARGESTATUSTEXT sy-vline 
WA_IVISUSIM_STR-MATERIALGROUP sy-vline 
WA_IVISUSIM_STR-MATERIALGROUPNAME sy-vline 
WA_IVISUSIM_STR-PRODUCTHIERARCHY sy-vline 
WA_IVISUSIM_STR-PRODUCTHIERARCHYNAME sy-vline 
WA_IVISUSIM_STR-CUSTOMER sy-vline 
WA_IVISUSIM_STR-CUSTOMERNAME sy-vline 
WA_IVISUSIM_STR-SUPPLIERACCOUNT sy-vline 
WA_IVISUSIM_STR-SUPPLIERNAME sy-vline 
WA_IVISUSIM_STR-CUSTADDRESSNUMBER sy-vline 
WA_IVISUSIM_STR-CUSTOMERCITYNAME sy-vline 
WA_IVISUSIM_STR-CUSTOMERCOUNTRY sy-vline 
WA_IVISUSIM_STR-ADDRESSNUMBER sy-vline 
WA_IVISUSIM_STR-SUPPLIERCITYNAME sy-vline 
WA_IVISUSIM_STR-SOURCELOCATIONCOUNTRY sy-vline 
WA_IVISUSIM_STR-CITYNAME sy-vline 
WA_IVISUSIM_STR-COUNTRYNAME sy-vline 
WA_IVISUSIM_STR-REGION sy-vline 
WA_IVISUSIM_STR-BUSINESSPARTNERROLETYPE sy-vline 
WA_IVISUSIM_STR-FROMLATITUDE sy-vline 
WA_IVISUSIM_STR-FROMLONGITUDE sy-vline 
WA_IVISUSIM_STR-TOLATITUDE sy-vline 
WA_IVISUSIM_STR-TOLONGITUDE sy-vline 
WA_IVISUSIM_STR-CONNECTIONPOINTS sy-vline 
WA_IVISUSIM_STR-LOCATIONPOSITION sy-vline 
WA_IVISUSIM_STR-ROUTETEXT sy-vline 
WA_IVISUSIM_STR-ISALERT sy-vline 
WA_IVISUSIM_STR-ALERTTEXT sy-vline 
WA_IVISUSIM_STR-DISCHARGEQTYALERTTEXT sy-vline 
WA_IVISUSIM_STR-ISLOADTIMEALERT sy-vline 
WA_IVISUSIM_STR-LOADTIMEALERTTEXT sy-vline 
WA_IVISUSIM_STR-ISDISCHARGETIMEALERT sy-vline 
WA_IVISUSIM_STR-DISCHARGETIMEALERTTEXT sy-vline 
WA_IVISUSIM_STR-ISLOCATIONALERT sy-vline 
WA_IVISUSIM_STR-LOCATIONALERTDESC sy-vline 
WA_IVISUSIM_STR-ISDISCHARGELOCALERT sy-vline 
WA_IVISUSIM_STR-DISCHARGELOCALERTDESC sy-vline 
WA_IVISUSIM_STR-ISLOAD sy-vline 
WA_IVISUSIM_STR-ISNOMINATIONDOCITEM sy-vline 
WA_IVISUSIM_STR-ISPEGGED sy-vline 
WA_IVISUSIM_STR-SAFETYSTOCK sy-vline 
WA_IVISUSIM_STR-CAPACITYSTOCK sy-vline 
WA_IVISUSIM_STR-NOMINATIONEVENTNUMBER sy-vline 
WA_IVISUSIM_STR-NOMINATIONEVENTTYPE sy-vline 
WA_IVISUSIM_STR-NOMINATIONEVENTSEQUENCE sy-vline 
WA_IVISUSIM_STR-ACTUALSTARTDATEFROM sy-vline 
WA_IVISUSIM_STR-ACTUALSTARTTIMEFROM sy-vline 
WA_IVISUSIM_STR-NOMINATIONEVENTCHANGEDDATE sy-vline 
WA_IVISUSIM_STR-NOMINATIONEVENTCHANGEDTIME sy-vline 
WA_IVISUSIM_STR-ACTUALSTARTDATETIME sy-vline 
WA_IVISUSIM_STR-DISCHARGEEVENTNUMBER sy-vline 
WA_IVISUSIM_STR-DISCHARGEEVENTTYPE sy-vline 
WA_IVISUSIM_STR-DISCHARGEDATE sy-vline 
WA_IVISUSIM_STR-DISCHARGETIME sy-vline 
WA_IVISUSIM_STR-DISCHARGESTARTDATETIME sy-vline 
WA_IVISUSIM_STR-ACTUALSTARTDATETO sy-vline 
WA_IVISUSIM_STR-ACTUALSTARTTIMETO sy-vline 
WA_IVISUSIM_STR-ACTUALENDDATEFROM sy-vline 
WA_IVISUSIM_STR-ACTUALENDTIMEFROM sy-vline 
WA_IVISUSIM_STR-ACTUALENDDATETO sy-vline 
WA_IVISUSIM_STR-ACTUALENDTIMETO sy-vline 
WA_IVISUSIM_STR-NOMINATIONTICKETLOADSTARTDATE sy-vline 
WA_IVISUSIM_STR-NOMINATIONTICKETLOADSTARTTIME sy-vline 
WA_IVISUSIM_STR-NOMINATIONTICKETDISCHARGEDATE sy-vline 
WA_IVISUSIM_STR-NOMINATIONTICKETDISCHARGETIME sy-vline 
WA_IVISUSIM_STR-NOMINATIONSCHEDULEDTIME sy-vline 
WA_IVISUSIM_STR-PLANNEDDISCHARGEDATE sy-vline 
WA_IVISUSIM_STR-DISCHARGEBATCHSTARTDATETIME sy-vline 
WA_IVISUSIM_STR-NOMINATIONDISCHARGETIME sy-vline 
WA_IVISUSIM_STR-DESTINATIONLOCATION sy-vline 
WA_IVISUSIM_STR-ISVARIANT sy-vline 
WA_IVISUSIM_STR-ISNOMINATIONLOAD sy-vline 
WA_IVISUSIM_STR-ISNOMINATIONDISCHARGE sy-vline 
WA_IVISUSIM_STR-NOMINATIONPEGID sy-vline 
WA_IVISUSIM_STR-NOMINATIONPEGGINGTYPEUSAGE sy-vline 
WA_IVISUSIM_STR-TRANSSHIPMENTGROUPID sy-vline 
WA_IVISUSIM_STR-DISCHARGEREFERENCEDOCUMENT sy-vline 
WA_IVISUSIM_STR-NOMINATIONDISCHARGESCHEDTYPE sy-vline 
WA_IVISUSIM_STR-DISCHARGECONTRACTPARTNER sy-vline 
WA_IVISUSIM_STR-DISCHARGELOCATIONPARTNER sy-vline 
WA_IVISUSIM_STR-DISCHARGELOCATIONPLANT sy-vline 
WA_IVISUSIM_STR-NOTIFICATIONSTATUSOBJECT sy-vline 
WA_IVISUSIM_STR-STATUSOBJECT sy-vline 
WA_IVISUSIM_STR-NOTIFICATIONDATETIME sy-vline 
WA_IVISUSIM_STR-NOTIFICATIONTEXT sy-vline 
WA_IVISUSIM_STR-MAINTENANCENOTIFICATIONTEXT sy-vline 
WA_IVISUSIM_STR-INDICATORVALUE sy-vline 
WA_IVISUSIM_STR-ISCLOUDSYSTEM sy-vline 
WA_IVISUSIM_STR-SIMULATION sy-vline 
WA_IVISUSIM_STR-COMMENTS sy-vline 
WA_IVISUSIM_STR-LOADDEMANDMATERIALDESC sy-vline 
WA_IVISUSIM_STR-DISCHARGEDEMANDMATERIALDESC sy-vline 
WA_IVISUSIM_STR-SHIPMENTLOADCOST sy-vline 
WA_IVISUSIM_STR-SHIPMENTLOADCOSTCRCY sy-vline 
WA_IVISUSIM_STR-SHIPMENTDISCHARGECOST sy-vline 
WA_IVISUSIM_STR-SHIPMENTDISCHARGECOSTCRCY sy-vline      INTO ld_text SEPARATED BY SPACE.

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