ABAP Select data from SAP table /ISHFR/RNINV_DATA into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP /ISHFR/RNINV_DATA 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 /ISHFR/RNINV_DATA. 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 /ISHFR/RNINV_DATA 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_/ISHFR/RNINV_DATA TYPE STANDARD TABLE OF /ISHFR/RNINV_DATA,
      WA_/ISHFR/RNINV_DATA TYPE /ISHFR/RNINV_DATA,
      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: </ISHFR/RNINV_DATA> TYPE /ISHFR/RNINV_DATA.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /ISHFR/RNINV_DATA
  INTO TABLE IT_/ISHFR/RNINV_DATA.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /ISHFR/RNINV_DATA
*  INTO TABLE @DATA(IT_/ISHFR/RNINV_DATA2).
*--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_/ISHFR/RNINV_DATA INDEX 1 INTO DATA(WA_/ISHFR/RNINV_DATA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/ISHFR/RNINV_DATA ASSIGNING </ISHFR/RNINV_DATA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
</ISHFR/RNINV_DATA>-WORKMODE = 1.
</ISHFR/RNINV_DATA>-BILLMOD = 1.
</ISHFR/RNINV_DATA>-HDR = 1.
</ISHFR/RNINV_DATA>-INVOICENR = 1.
</ISHFR/RNINV_DATA>-INVOICENR_9 = 1.
ENDLOOP.

LOOP AT IT_/ISHFR/RNINV_DATA INTO WA_/ISHFR/RNINV_DATA.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/ISHFR/RNINV_DATA-INVOICEDATE, sy-vline,
WA_/ISHFR/RNINV_DATA-STORN, sy-vline,
WA_/ISHFR/RNINV_DATA-CASENR, sy-vline,
WA_/ISHFR/RNINV_DATA-CASENR_7, sy-vline,
WA_/ISHFR/RNINV_DATA-CASENR_9, sy-vline,
WA_/ISHFR/RNINV_DATA-FINESS, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/ISHFR/RNINV_DATA 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_/ISHFR/RNINV_DATA 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_/ISHFR/RNINV_DATA INTO WA_/ISHFR/RNINV_DATA. *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 INVOICENR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/ISHFR/RNINV_DATA-INVOICENR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISHFR/RNINV_DATA-INVOICENR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field INSTCODE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/ISHFR/RNINV_DATA-INSTCODE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISHFR/RNINV_DATA-INSTCODE.
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_/ISHFR/RNINV_DATA_STR,
WORKMODE TYPE STRING,
BILLMOD TYPE STRING,
HDR TYPE STRING,
INVOICENR TYPE STRING,
INVOICENR_9 TYPE STRING,
INVOICEDATE TYPE STRING,
STORN TYPE STRING,
CASENR TYPE STRING,
CASENR_7 TYPE STRING,
CASENR_9 TYPE STRING,
FINESS TYPE STRING,
FINESS_C TYPE STRING,
FINESSEXT TYPE STRING,
FINESSEXT_MAND TYPE STRING,
FINESSEXT_C TYPE STRING,
FINESSEXT1 TYPE STRING,
FINESSEXT1_C TYPE STRING,
FINESSEXT2 TYPE STRING,
FINESSEXT2_C TYPE STRING,
SINR TYPE STRING,
SINRDIGIT TYPE STRING,
PATSINR TYPE STRING,
PATSINRDGT TYPE STRING,
RECEIVTYPE TYPE STRING,
BIPTYPE TYPE STRING,
BIPNR TYPE STRING,
BIPNR_C3 TYPE STRING,
BIPADMNR TYPE STRING,
IVTYPE TYPE STRING,
IVTYPE_C TYPE STRING,
IVDATE TYPE STRING,
IVVALID TYPE STRING,
IVISSUER TYPE STRING,
INSTYPE TYPE STRING,
EXEMPTREAS TYPE STRING,
EXEMPTREAS_C TYPE STRING,
ADMDATE TYPE STRING,
ADMTIME TYPE STRING,
ADMDATEGL TYPE STRING,
DISDATE TYPE STRING,
DISTIME TYPE STRING,
DIS_NOTFOUND_TXT TYPE STRING,
DISTYPE TYPE STRING,
SICK TYPE STRING,
PREGNANT TYPE STRING,
ACCIDENT TYPE STRING,
ACCIDENTNR TYPE STRING,
ACCIDENTDATE TYPE STRING,
ACCIDENTFD TYPE STRING,
PAYMENTRCP TYPE STRING,
FPHYS TYPE STRING,
FPHYS_C TYPE STRING,
FPHYS_MAND TYPE STRING,
FPHYSPERNR TYPE STRING,
FPPHYSNR TYPE STRING,
FPHYSLNAME TYPE STRING,
FPHYSFNAME TYPE STRING,
TYPECOVER TYPE STRING,
TYPECOVER_C TYPE STRING,
FORMADDR TYPE STRING,
FORMADDR_C TYPE STRING,
FORMADDR_C1 TYPE STRING,
PATLNAME TYPE STRING,
PATFNAME TYPE STRING,
PATBNAME TYPE STRING,
PATSTREETNAME TYPE STRING,
PATCITY TYPE STRING,
PATPOSTCODE TYPE STRING,
BIRTHDATE TYPE STRING,
BIRTHRANK TYPE STRING,
STREETNAME TYPE STRING,
CITY TYPE STRING,
POSTCODE TYPE STRING,
MINS TYPE STRING,
MINSLNAME TYPE STRING,
MINSFNAME TYPE STRING,
GHSGHTCODE TYPE STRING,
GHSGHTCODE_C4 TYPE STRING,
GHSGHTCODE_C8 TYPE STRING,
GHSGHTCODE_LEFT TYPE STRING,
COVTYPE TYPE STRING,
PARTCODE TYPE STRING,
DAY_RATE TYPE STRING,
MCOCOEFF TYPE STRING,
MCOAREA TYPE STRING,
MCOAREA_C TYPE STRING,
TOTAMOUNT TYPE STRING,
TOTAMOUNT_T3 TYPE STRING,
TOTAMOUNT_T4 TYPE STRING,
REIMBBASE TYPE STRING,
REIMBBASE_MAND TYPE STRING,
REIMBBASE_T3 TYPE STRING,
REIMBBASE_T4 TYPE STRING,
TOTALFEE TYPE STRING,
TOTALFEE_T3 TYPE STRING,
TOTALFEE_T4 TYPE STRING,
COVAMOUNT TYPE STRING,
COVAMOUNT_T3 TYPE STRING,
COVAMOUNT_T4 TYPE STRING,
NONCOVAMOUNT TYPE STRING,
NONCOVAMOUNT_T3 TYPE STRING,
NONCOVAMOUNT_T4 TYPE STRING,
CPLIPAMNT TYPE STRING,
CPLIPAMNT_T3 TYPE STRING,
CPLIPAMNT_T4 TYPE STRING,
INSTCODE TYPE STRING,
INSTCODE_C TYPE STRING,
SEXIND TYPE STRING,
CONTRTYPE TYPE STRING,
COMPIPNR TYPE STRING,
BILLABLE TYPE STRING,
PARTICIP TYPE STRING,
NUMBRSS TYPE STRING,
PARTAMT TYPE STRING,
FJAMT TYPE STRING,
TOTHIFAMT TYPE STRING,
PATHSUR TYPE STRING,
RBASEAMT TYPE STRING,
RRATE TYPE STRING,
CHAININD TYPE STRING,
REVDOC TYPE STRING,
PATRANK TYPE STRING,
FIYEAR TYPE STRING,
TGPID TYPE STRING,
HOSPCODE TYPE STRING,
ACCID TYPE STRING,
ECLAT_FLUX TYPE STRING,
T_POS TYPE STRING,END OF T_EKKO_STR. DATA: WA_/ISHFR/RNINV_DATA_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_/ISHFR/RNINV_DATA_STR-WORKMODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-BILLMOD sy-vline
WA_/ISHFR/RNINV_DATA_STR-HDR sy-vline
WA_/ISHFR/RNINV_DATA_STR-INVOICENR sy-vline
WA_/ISHFR/RNINV_DATA_STR-INVOICENR_9 sy-vline
WA_/ISHFR/RNINV_DATA_STR-INVOICEDATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-STORN sy-vline
WA_/ISHFR/RNINV_DATA_STR-CASENR sy-vline
WA_/ISHFR/RNINV_DATA_STR-CASENR_7 sy-vline
WA_/ISHFR/RNINV_DATA_STR-CASENR_9 sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESS sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESS_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT_MAND sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT1 sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT1_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT2 sy-vline
WA_/ISHFR/RNINV_DATA_STR-FINESSEXT2_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-SINR sy-vline
WA_/ISHFR/RNINV_DATA_STR-SINRDIGIT sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATSINR sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATSINRDGT sy-vline
WA_/ISHFR/RNINV_DATA_STR-RECEIVTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-BIPTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-BIPNR sy-vline
WA_/ISHFR/RNINV_DATA_STR-BIPNR_C3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-BIPADMNR sy-vline
WA_/ISHFR/RNINV_DATA_STR-IVTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-IVTYPE_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-IVDATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-IVVALID sy-vline
WA_/ISHFR/RNINV_DATA_STR-IVISSUER sy-vline
WA_/ISHFR/RNINV_DATA_STR-INSTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-EXEMPTREAS sy-vline
WA_/ISHFR/RNINV_DATA_STR-EXEMPTREAS_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-ADMDATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-ADMTIME sy-vline
WA_/ISHFR/RNINV_DATA_STR-ADMDATEGL sy-vline
WA_/ISHFR/RNINV_DATA_STR-DISDATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-DISTIME sy-vline
WA_/ISHFR/RNINV_DATA_STR-DIS_NOTFOUND_TXT sy-vline
WA_/ISHFR/RNINV_DATA_STR-DISTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-SICK sy-vline
WA_/ISHFR/RNINV_DATA_STR-PREGNANT sy-vline
WA_/ISHFR/RNINV_DATA_STR-ACCIDENT sy-vline
WA_/ISHFR/RNINV_DATA_STR-ACCIDENTNR sy-vline
WA_/ISHFR/RNINV_DATA_STR-ACCIDENTDATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-ACCIDENTFD sy-vline
WA_/ISHFR/RNINV_DATA_STR-PAYMENTRCP sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPHYS sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPHYS_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPHYS_MAND sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPHYSPERNR sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPPHYSNR sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPHYSLNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-FPHYSFNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-TYPECOVER sy-vline
WA_/ISHFR/RNINV_DATA_STR-TYPECOVER_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-FORMADDR sy-vline
WA_/ISHFR/RNINV_DATA_STR-FORMADDR_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-FORMADDR_C1 sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATLNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATFNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATBNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATSTREETNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATCITY sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATPOSTCODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-BIRTHDATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-BIRTHRANK sy-vline
WA_/ISHFR/RNINV_DATA_STR-STREETNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-CITY sy-vline
WA_/ISHFR/RNINV_DATA_STR-POSTCODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-MINS sy-vline
WA_/ISHFR/RNINV_DATA_STR-MINSLNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-MINSFNAME sy-vline
WA_/ISHFR/RNINV_DATA_STR-GHSGHTCODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-GHSGHTCODE_C4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-GHSGHTCODE_C8 sy-vline
WA_/ISHFR/RNINV_DATA_STR-GHSGHTCODE_LEFT sy-vline
WA_/ISHFR/RNINV_DATA_STR-COVTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-PARTCODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-DAY_RATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-MCOCOEFF sy-vline
WA_/ISHFR/RNINV_DATA_STR-MCOAREA sy-vline
WA_/ISHFR/RNINV_DATA_STR-MCOAREA_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTAMOUNT sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTAMOUNT_T3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTAMOUNT_T4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-REIMBBASE sy-vline
WA_/ISHFR/RNINV_DATA_STR-REIMBBASE_MAND sy-vline
WA_/ISHFR/RNINV_DATA_STR-REIMBBASE_T3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-REIMBBASE_T4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTALFEE sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTALFEE_T3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTALFEE_T4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-COVAMOUNT sy-vline
WA_/ISHFR/RNINV_DATA_STR-COVAMOUNT_T3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-COVAMOUNT_T4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-NONCOVAMOUNT sy-vline
WA_/ISHFR/RNINV_DATA_STR-NONCOVAMOUNT_T3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-NONCOVAMOUNT_T4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-CPLIPAMNT sy-vline
WA_/ISHFR/RNINV_DATA_STR-CPLIPAMNT_T3 sy-vline
WA_/ISHFR/RNINV_DATA_STR-CPLIPAMNT_T4 sy-vline
WA_/ISHFR/RNINV_DATA_STR-INSTCODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-INSTCODE_C sy-vline
WA_/ISHFR/RNINV_DATA_STR-SEXIND sy-vline
WA_/ISHFR/RNINV_DATA_STR-CONTRTYPE sy-vline
WA_/ISHFR/RNINV_DATA_STR-COMPIPNR sy-vline
WA_/ISHFR/RNINV_DATA_STR-BILLABLE sy-vline
WA_/ISHFR/RNINV_DATA_STR-PARTICIP sy-vline
WA_/ISHFR/RNINV_DATA_STR-NUMBRSS sy-vline
WA_/ISHFR/RNINV_DATA_STR-PARTAMT sy-vline
WA_/ISHFR/RNINV_DATA_STR-FJAMT sy-vline
WA_/ISHFR/RNINV_DATA_STR-TOTHIFAMT sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATHSUR sy-vline
WA_/ISHFR/RNINV_DATA_STR-RBASEAMT sy-vline
WA_/ISHFR/RNINV_DATA_STR-RRATE sy-vline
WA_/ISHFR/RNINV_DATA_STR-CHAININD sy-vline
WA_/ISHFR/RNINV_DATA_STR-REVDOC sy-vline
WA_/ISHFR/RNINV_DATA_STR-PATRANK sy-vline
WA_/ISHFR/RNINV_DATA_STR-FIYEAR sy-vline
WA_/ISHFR/RNINV_DATA_STR-TGPID sy-vline
WA_/ISHFR/RNINV_DATA_STR-HOSPCODE sy-vline
WA_/ISHFR/RNINV_DATA_STR-ACCID sy-vline
WA_/ISHFR/RNINV_DATA_STR-ECLAT_FLUX sy-vline
WA_/ISHFR/RNINV_DATA_STR-T_POS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.