ABAP Select data from SAP table ICL_CLAIM_FILE_WCOMP_S_FROIEMP 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 ICL_CLAIM_FILE_WCOMP_S_FROIEMP 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 ICL_CLAIM_FILE_WCOMP_S_FROIEMP. 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 ICL_CLAIM_FILE_WCOMP_S_FROIEMP 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_ICL_CLAIM_FILE_WCOMP_S_FROIEMP TYPE STANDARD TABLE OF ICL_CLAIM_FILE_WCOMP_S_FROIEMP,
      WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP TYPE ICL_CLAIM_FILE_WCOMP_S_FROIEMP,
      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: <ICL_CLAIM_FILE_WCOMP_S_FROIEMP> TYPE ICL_CLAIM_FILE_WCOMP_S_FROIEMP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ICL_CLAIM_FILE_WCOMP_S_FROIEMP
*  INTO TABLE @DATA(IT_ICL_CLAIM_FILE_WCOMP_S_FROIEMP2).
*--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_ICL_CLAIM_FILE_WCOMP_S_FROIEMP INDEX 1 INTO DATA(WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ICL_CLAIM_FILE_WCOMP_S_FROIEMP>-WA_FROI_EMPE = 1.
<ICL_CLAIM_FILE_WCOMP_S_FROIEMP>-CURRENCY = 1.
<ICL_CLAIM_FILE_WCOMP_S_FROIEMP>-CLAIM = 1.
<ICL_CLAIM_FILE_WCOMP_S_FROIEMP>-EXCLAIMNO = 1.
<ICL_CLAIM_FILE_WCOMP_S_FROIEMP>-JURISREGION = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-JURISCOUNTRY, sy-vline,
  WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-PREP, sy-vline,
  WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-PREP_DESCR, sy-vline,
  WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-PREP_SCR, sy-vline,
  WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-PREPAREDDATE, sy-vline,
  WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-EMPL, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP 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_ICL_CLAIM_FILE_WCOMP_S_FROIEMP 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_ICL_CLAIM_FILE_WCOMP_S_FROIEMP INTO WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP.


*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 CLAIM, internal->external for field CLAIM
CALL FUNCTION 'CONVERSION_EXIT_CLAIM_OUTPUT'
  EXPORTING
    input =                      WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-CLAIM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-CLAIM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field PREP_EMPL_SCR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-PREP_EMPL_SCR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP-PREP_EMPL_SCR.
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_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR, 
WA_FROI_EMPE TYPE STRING,
CURRENCY TYPE STRING,
CLAIM TYPE STRING,
EXCLAIMNO TYPE STRING,
JURISREGION TYPE STRING,
JURISCOUNTRY TYPE STRING,
PREP TYPE STRING,
PREP_DESCR TYPE STRING,
PREP_SCR TYPE STRING,
PREPAREDDATE TYPE STRING,
EMPL TYPE STRING,
EMPL_DESCR TYPE STRING,
EMPL_SCR TYPE STRING,
EMP_PAYROLL TYPE STRING,
EMP_INDUSTRYCODE TYPE STRING,
EMP_INDSTRCODEN TYPE STRING,
EMP_UINUMBER TYPE STRING,
EMP_NATOFBUS TYPE STRING,
EMP_NATOFBUSN TYPE STRING,
EMP_FEIN TYPE STRING,
EMP_LOCNUM TYPE STRING,
EMP_DATEREPTO TYPE STRING,
EMP_LOSSCOND_ACT TYPE STRING,
EMP_LOSS_ACTN TYPE STRING,
EMP_LOSS_TYPE TYPE STRING,
EMP_LOSS_TYPEN TYPE STRING,
EMP_RECOVER_TYPE TYPE STRING,
EMP_RECVR_TYPEN TYPE STRING,
EMP_COVERAG_TYPE TYPE STRING,
EMP_COVERG_TYPEN TYPE STRING,
EMP_SETTLE_TYPE TYPE STRING,
EMP_SETTLE_TYPEN TYPE STRING,
EMPE TYPE STRING,
EMPE_DESCR TYPE STRING,
EMPE_SCR TYPE STRING,
EMPE_EMP_STATUS TYPE STRING,
EMPE_EMP_STATUSN TYPE STRING,
EMPE_HIREDATE TYPE STRING,
EMPE_AWW TYPE STRING,
EMPE_OTHR_PAY TYPE STRING,
EMPE_WAGEBASIS TYPE STRING,
EMPE_WORKDAYS TYPE STRING,
EMPE_DISCFB TYPE STRING,
EMPE_NOOFDEP TYPE STRING,
EMPE_NOOFENTEXEM TYPE STRING,
EMPE_NOOFWHEXEM TYPE STRING,
EMPE_LDW TYPE STRING,
EMPE_RTW TYPE STRING,
EMPE_MMI_DATE TYPE STRING,
EMPE_WORKTIME TYPE STRING,
EMPE_OCC_CODE TYPE STRING,
EMPE_OCC_CODEN TYPE STRING,
EMPE_MC_CODE TYPE STRING,
EMPE_MC_CODEN TYPE STRING,
EMPE_OBJINJ TYPE STRING,
EMPE_OBJINJN TYPE STRING,
EMPE_INITTRMNTCO TYPE STRING,
EMPE_INITRMNTCON TYPE STRING,
EMPE_NOI TYPE STRING,
EMPE_NOIN TYPE STRING,
EMPE_COI TYPE STRING,
EMPE_COIN TYPE STRING,
EMP_CONPER TYPE STRING,
EMP_CONPER_DESCR TYPE STRING,
EMP_CONPER_SCR TYPE STRING,
CLAIM_ADMIN TYPE STRING,
CLAIM_ADMIN_DESC TYPE STRING,
CLAIM_ADMIN_SCR TYPE STRING,
CLAIM_ADMIN_FEIN TYPE STRING,
CLADMN_DATEREPTO TYPE STRING,
INSURER TYPE STRING,
INSURER_DESC TYPE STRING,
INSURER_SCR TYPE STRING,
INSURER_FEIN TYPE STRING,
INSURED TYPE STRING,
INSURED_DESC TYPE STRING,
INSURED_SCR TYPE STRING,
INSURED_FEIN TYPE STRING,
ACC_SITE_ORG TYPE STRING,
ACC_SITE_ORG_DES TYPE STRING,
ACC_SITE_ORG_SCR TYPE STRING,
MCO TYPE STRING,
MCO_DESCR TYPE STRING,
MCO_SCR TYPE STRING,
MCO_IDNUM TYPE STRING,
MED_PROV TYPE STRING,
MED_PROV_DESCR TYPE STRING,
MED_PROV_SCR TYPE STRING,
XINITIALPROVIDER TYPE STRING,
LAWYER TYPE STRING,
LAWYER_DESCR TYPE STRING,
LAWYER_SCR TYPE STRING,
LAWY_STARTDATE TYPE STRING,
LAWY_DISCLOSURE TYPE STRING,
PREP_EMPL TYPE STRING,
PREP_EMPL_DESCR TYPE STRING,
PREP_EMPL_SCR TYPE STRING,
OSHA_CASE_NUM TYPE STRING,
BODY_PART_CODE TYPE STRING,
BODY_PART_CODEN TYPE STRING,
DATELOSS TYPE STRING,
TIMELOSS TYPE STRING,
LTIMEZONE TYPE STRING,
EMPE_DEATHDATE TYPE STRING,END OF T_EKKO_STR.
DATA: WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_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_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-WA_FROI_EMPE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CURRENCY sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CLAIM sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EXCLAIMNO sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-JURISREGION sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-JURISCOUNTRY sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREP sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREP_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREP_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREPAREDDATE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPL sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPL_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPL_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_PAYROLL sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_INDUSTRYCODE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_INDSTRCODEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_UINUMBER sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_NATOFBUS sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_NATOFBUSN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_FEIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_LOCNUM sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_DATEREPTO sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_LOSSCOND_ACT sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_LOSS_ACTN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_LOSS_TYPE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_LOSS_TYPEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_RECOVER_TYPE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_RECVR_TYPEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_COVERAG_TYPE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_COVERG_TYPEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_SETTLE_TYPE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_SETTLE_TYPEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_EMP_STATUS sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_EMP_STATUSN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_HIREDATE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_AWW sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_OTHR_PAY sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_WAGEBASIS sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_WORKDAYS sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_DISCFB sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_NOOFDEP sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_NOOFENTEXEM sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_NOOFWHEXEM sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_LDW sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_RTW sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_MMI_DATE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_WORKTIME sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_OCC_CODE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_OCC_CODEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_MC_CODE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_MC_CODEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_OBJINJ sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_OBJINJN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_INITTRMNTCO sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_INITRMNTCON sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_NOI sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_NOIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_COI sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_COIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_CONPER sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_CONPER_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMP_CONPER_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CLAIM_ADMIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CLAIM_ADMIN_DESC sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CLAIM_ADMIN_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CLAIM_ADMIN_FEIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-CLADMN_DATEREPTO sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURER sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURER_DESC sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURER_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURER_FEIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURED sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURED_DESC sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURED_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-INSURED_FEIN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-ACC_SITE_ORG sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-ACC_SITE_ORG_DES sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-ACC_SITE_ORG_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MCO sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MCO_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MCO_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MCO_IDNUM sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MED_PROV sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MED_PROV_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-MED_PROV_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-XINITIALPROVIDER sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-LAWYER sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-LAWYER_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-LAWYER_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-LAWY_STARTDATE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-LAWY_DISCLOSURE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREP_EMPL sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREP_EMPL_DESCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-PREP_EMPL_SCR sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-OSHA_CASE_NUM sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-BODY_PART_CODE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-BODY_PART_CODEN sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-DATELOSS sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-TIMELOSS sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-LTIMEZONE sy-vline 
WA_ICL_CLAIM_FILE_WCOMP_S_FROIEMP_STR-EMPE_DEATHDATE sy-vline      INTO ld_text SEPARATED BY SPACE.

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