ABAP Select data from SAP table RNLEI_AUTORG_IT 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 RNLEI_AUTORG_IT 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 RNLEI_AUTORG_IT. 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 RNLEI_AUTORG_IT 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_RNLEI_AUTORG_IT TYPE STANDARD TABLE OF RNLEI_AUTORG_IT,
      WA_RNLEI_AUTORG_IT TYPE RNLEI_AUTORG_IT,
      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: <RNLEI_AUTORG_IT> TYPE RNLEI_AUTORG_IT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RNLEI_AUTORG_IT
*  INTO TABLE @DATA(IT_RNLEI_AUTORG_IT2).
*--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_RNLEI_AUTORG_IT INDEX 1 INTO DATA(WA_RNLEI_AUTORG_IT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RNLEI_AUTORG_IT ASSIGNING <RNLEI_AUTORG_IT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RNLEI_AUTORG_IT>-MANDT = 1.
<RNLEI_AUTORG_IT>-EINRI = 1.
<RNLEI_AUTORG_IT>-FALNR = 1.
<RNLEI_AUTORG_IT>-ORGID = 1.
<RNLEI_AUTORG_IT>-LEIST = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RNLEI_AUTORG_IT-LNRLS, sy-vline,
WA_RNLEI_AUTORG_IT-LFDBEW, sy-vline,
WA_RNLEI_AUTORG_IT-REFBEW, sy-vline,
WA_RNLEI_AUTORG_IT-ERBTY, sy-vline,
WA_RNLEI_AUTORG_IT-ANFOE, sy-vline,
WA_RNLEI_AUTORG_IT-ANMAN, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RNLEI_AUTORG_IT 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_RNLEI_AUTORG_IT 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_RNLEI_AUTORG_IT INTO WA_RNLEI_AUTORG_IT. *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 EINRI CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RNLEI_AUTORG_IT-EINRI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNLEI_AUTORG_IT-EINRI.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field REMKZ CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_RNLEI_AUTORG_IT-REMKZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNLEI_AUTORG_IT-REMKZ.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ISOLA, internal->external for field BEGKZ CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_RNLEI_AUTORG_IT-BEGKZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNLEI_AUTORG_IT-BEGKZ.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field TAGR2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RNLEI_AUTORG_IT-TAGR2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNLEI_AUTORG_IT-TAGR2.
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_RNLEI_AUTORG_IT_STR,
MANDT TYPE STRING,
EINRI TYPE STRING,
FALNR TYPE STRING,
ORGID TYPE STRING,
LEIST TYPE STRING,
LNRLS TYPE STRING,
LFDBEW TYPE STRING,
REFBEW TYPE STRING,
ERBTY TYPE STRING,
ANFOE TYPE STRING,
ANMAN TYPE STRING,
ERBOE TYPE STRING,
ERMAN TYPE STRING,
HAUST TYPE STRING,
PREIS TYPE STRING,
MATNR TYPE STRING,
ABRKZ TYPE STRING,
STALS TYPE STRING,
IMENG TYPE STRING,
IBGDT TYPE STRING,
IENDT TYPE STRING,
IBZT TYPE STRING,
IEZT TYPE STRING,
PMENG TYPE STRING,
PBGDT TYPE STRING,
PENDT TYPE STRING,
PBZT TYPE STRING,
PEZT TYPE STRING,
TARIF TYPE STRING,
TARLS TYPE STRING,
TARSP TYPE STRING,
TARAS TYPE STRING,
TLMEN TYPE STRING,
LEINH TYPE STRING,
LEITX TYPE STRING,
ERDAT TYPE STRING,
ERUSR TYPE STRING,
UPDAT TYPE STRING,
UPUSR TYPE STRING,
STORN TYPE STRING,
STUSR TYPE STRING,
REFLNR TYPE STRING,
ZEITR TYPE STRING,
BEGTX TYPE STRING,
WNDNR TYPE STRING,
REMRK TYPE STRING,
REFNR TYPE STRING,
KZBCP TYPE STRING,
BILLP TYPE STRING,
ANPOE TYPE STRING,
APMAN TYPE STRING,
REMKZ TYPE STRING,
ICPMK TYPE STRING,
ICPML TYPE STRING,
ICPHC TYPE STRING,
BEGKZ TYPE STRING,
HCOKZ TYPE STRING,
ANART TYPE STRING,
OTYPL TYPE STRING,
UBVON TYPE STRING,
UBBIS TYPE STRING,
UBLKZ TYPE STRING,
UMENG TYPE STRING,
UAEKZ TYPE STRING,
NUBKZ TYPE STRING,
ENTKY TYPE STRING,
ENZKY TYPE STRING,
ENTG2 TYPE STRING,
EVENT TYPE STRING,
OBJCT TYPE STRING,
KALKZ TYPE STRING,
EVTUP TYPE STRING,
OBJUP TYPE STRING,
ABTYP TYPE STRING,
TCODE TYPE STRING,
ABRMA TYPE STRING,
EAUFN TYPE STRING,
BZLST TYPE STRING,
KTRKZ TYPE STRING,
BFORM TYPE STRING,
ENTGA TYPE STRING,
NBGDT TYPE STRING,
NBGZT TYPE STRING,
ZOTYP TYPE STRING,
PZAHL TYPE STRING,
REFKY TYPE STRING,
EXCAT TYPE STRING,
USER0 TYPE STRING,
USER1 TYPE STRING,
USERDATE1 TYPE STRING,
USERDATE2 TYPE STRING,
USERTIME1 TYPE STRING,
USERTIME2 TYPE STRING,
USERPRICE1 TYPE STRING,
USERAMOUNT1 TYPE STRING,
USERUNIT1 TYPE STRING,
USERSIGN1 TYPE STRING,
USERSIGN2 TYPE STRING,
SEQUE TYPE STRING,
USER2 TYPE STRING,
USERTEXT1 TYPE STRING,
VIEWTYPE TYPE STRING,
FORMNAME TYPE STRING,
FORMBELNR TYPE STRING,
NLSLOK TYPE STRING,
MDIND TYPE STRING,
BGMAN TYPE STRING,
EDMAN TYPE STRING,
BEWMAN TYPE STRING,
TIMESTAMP TYPE STRING,
DBCNR TYPE STRING,
CONVSIGN TYPE STRING,
WISSCD TYPE STRING,
MEDUNIT TYPE STRING,
LNRLM TYPE STRING,
/ISHFR/AKTIV TYPE STRING,
/ISHFR/PHASE TYPE STRING,
/ISHFR/MOD_CD1 TYPE STRING,
/ISHFR/MOD_CD2 TYPE STRING,
/ISHFR/MOD_CD3 TYPE STRING,
/ISHFR/MOD_CD4 TYPE STRING,
/ISHFR/KOE_SV TYPE STRING,
/ISHFR/PRSC_DT TYPE STRING,
/ISHFR/ASS_CD TYPE STRING,
/ISHFR/PUR_PR TYPE STRING,
/ISHFR/EXO_CP TYPE STRING,
/ISHFR/NABM_CO TYPE STRING,
/ISHFR/HOPRICE TYPE STRING,
/ISHFR/PSCRV TYPE STRING,
NLKZA TYPE STRING,
TAMAN TYPE STRING,
HIC_FREE TYPE STRING,
DEVNR TYPE STRING,
ORDNR TYPE STRING,
LABTYP TYPE STRING,
BEAG TYPE STRING,
DCODE TYPE STRING,
CONSVA TYPE STRING,
LAAMB TYPE STRING,
LSCHL TYPE STRING,
ABRTX TYPE STRING,
ENTGAMB TYPE STRING,
THERGROUP TYPE STRING,
TAGRU TYPE STRING,
TAGR2 TYPE STRING,
AUTOPSY TYPE STRING,
ORGAN TYPE STRING,END OF T_EKKO_STR. DATA: WA_RNLEI_AUTORG_IT_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_RNLEI_AUTORG_IT_STR-MANDT sy-vline
WA_RNLEI_AUTORG_IT_STR-EINRI sy-vline
WA_RNLEI_AUTORG_IT_STR-FALNR sy-vline
WA_RNLEI_AUTORG_IT_STR-ORGID sy-vline
WA_RNLEI_AUTORG_IT_STR-LEIST sy-vline
WA_RNLEI_AUTORG_IT_STR-LNRLS sy-vline
WA_RNLEI_AUTORG_IT_STR-LFDBEW sy-vline
WA_RNLEI_AUTORG_IT_STR-REFBEW sy-vline
WA_RNLEI_AUTORG_IT_STR-ERBTY sy-vline
WA_RNLEI_AUTORG_IT_STR-ANFOE sy-vline
WA_RNLEI_AUTORG_IT_STR-ANMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-ERBOE sy-vline
WA_RNLEI_AUTORG_IT_STR-ERMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-HAUST sy-vline
WA_RNLEI_AUTORG_IT_STR-PREIS sy-vline
WA_RNLEI_AUTORG_IT_STR-MATNR sy-vline
WA_RNLEI_AUTORG_IT_STR-ABRKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-STALS sy-vline
WA_RNLEI_AUTORG_IT_STR-IMENG sy-vline
WA_RNLEI_AUTORG_IT_STR-IBGDT sy-vline
WA_RNLEI_AUTORG_IT_STR-IENDT sy-vline
WA_RNLEI_AUTORG_IT_STR-IBZT sy-vline
WA_RNLEI_AUTORG_IT_STR-IEZT sy-vline
WA_RNLEI_AUTORG_IT_STR-PMENG sy-vline
WA_RNLEI_AUTORG_IT_STR-PBGDT sy-vline
WA_RNLEI_AUTORG_IT_STR-PENDT sy-vline
WA_RNLEI_AUTORG_IT_STR-PBZT sy-vline
WA_RNLEI_AUTORG_IT_STR-PEZT sy-vline
WA_RNLEI_AUTORG_IT_STR-TARIF sy-vline
WA_RNLEI_AUTORG_IT_STR-TARLS sy-vline
WA_RNLEI_AUTORG_IT_STR-TARSP sy-vline
WA_RNLEI_AUTORG_IT_STR-TARAS sy-vline
WA_RNLEI_AUTORG_IT_STR-TLMEN sy-vline
WA_RNLEI_AUTORG_IT_STR-LEINH sy-vline
WA_RNLEI_AUTORG_IT_STR-LEITX sy-vline
WA_RNLEI_AUTORG_IT_STR-ERDAT sy-vline
WA_RNLEI_AUTORG_IT_STR-ERUSR sy-vline
WA_RNLEI_AUTORG_IT_STR-UPDAT sy-vline
WA_RNLEI_AUTORG_IT_STR-UPUSR sy-vline
WA_RNLEI_AUTORG_IT_STR-STORN sy-vline
WA_RNLEI_AUTORG_IT_STR-STUSR sy-vline
WA_RNLEI_AUTORG_IT_STR-REFLNR sy-vline
WA_RNLEI_AUTORG_IT_STR-ZEITR sy-vline
WA_RNLEI_AUTORG_IT_STR-BEGTX sy-vline
WA_RNLEI_AUTORG_IT_STR-WNDNR sy-vline
WA_RNLEI_AUTORG_IT_STR-REMRK sy-vline
WA_RNLEI_AUTORG_IT_STR-REFNR sy-vline
WA_RNLEI_AUTORG_IT_STR-KZBCP sy-vline
WA_RNLEI_AUTORG_IT_STR-BILLP sy-vline
WA_RNLEI_AUTORG_IT_STR-ANPOE sy-vline
WA_RNLEI_AUTORG_IT_STR-APMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-REMKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-ICPMK sy-vline
WA_RNLEI_AUTORG_IT_STR-ICPML sy-vline
WA_RNLEI_AUTORG_IT_STR-ICPHC sy-vline
WA_RNLEI_AUTORG_IT_STR-BEGKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-HCOKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-ANART sy-vline
WA_RNLEI_AUTORG_IT_STR-OTYPL sy-vline
WA_RNLEI_AUTORG_IT_STR-UBVON sy-vline
WA_RNLEI_AUTORG_IT_STR-UBBIS sy-vline
WA_RNLEI_AUTORG_IT_STR-UBLKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-UMENG sy-vline
WA_RNLEI_AUTORG_IT_STR-UAEKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-NUBKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-ENTKY sy-vline
WA_RNLEI_AUTORG_IT_STR-ENZKY sy-vline
WA_RNLEI_AUTORG_IT_STR-ENTG2 sy-vline
WA_RNLEI_AUTORG_IT_STR-EVENT sy-vline
WA_RNLEI_AUTORG_IT_STR-OBJCT sy-vline
WA_RNLEI_AUTORG_IT_STR-KALKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-EVTUP sy-vline
WA_RNLEI_AUTORG_IT_STR-OBJUP sy-vline
WA_RNLEI_AUTORG_IT_STR-ABTYP sy-vline
WA_RNLEI_AUTORG_IT_STR-TCODE sy-vline
WA_RNLEI_AUTORG_IT_STR-ABRMA sy-vline
WA_RNLEI_AUTORG_IT_STR-EAUFN sy-vline
WA_RNLEI_AUTORG_IT_STR-BZLST sy-vline
WA_RNLEI_AUTORG_IT_STR-KTRKZ sy-vline
WA_RNLEI_AUTORG_IT_STR-BFORM sy-vline
WA_RNLEI_AUTORG_IT_STR-ENTGA sy-vline
WA_RNLEI_AUTORG_IT_STR-NBGDT sy-vline
WA_RNLEI_AUTORG_IT_STR-NBGZT sy-vline
WA_RNLEI_AUTORG_IT_STR-ZOTYP sy-vline
WA_RNLEI_AUTORG_IT_STR-PZAHL sy-vline
WA_RNLEI_AUTORG_IT_STR-REFKY sy-vline
WA_RNLEI_AUTORG_IT_STR-EXCAT sy-vline
WA_RNLEI_AUTORG_IT_STR-USER0 sy-vline
WA_RNLEI_AUTORG_IT_STR-USER1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERDATE1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERDATE2 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERTIME1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERTIME2 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERPRICE1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERAMOUNT1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERUNIT1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERSIGN1 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERSIGN2 sy-vline
WA_RNLEI_AUTORG_IT_STR-SEQUE sy-vline
WA_RNLEI_AUTORG_IT_STR-USER2 sy-vline
WA_RNLEI_AUTORG_IT_STR-USERTEXT1 sy-vline
WA_RNLEI_AUTORG_IT_STR-VIEWTYPE sy-vline
WA_RNLEI_AUTORG_IT_STR-FORMNAME sy-vline
WA_RNLEI_AUTORG_IT_STR-FORMBELNR sy-vline
WA_RNLEI_AUTORG_IT_STR-NLSLOK sy-vline
WA_RNLEI_AUTORG_IT_STR-MDIND sy-vline
WA_RNLEI_AUTORG_IT_STR-BGMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-EDMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-BEWMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-TIMESTAMP sy-vline
WA_RNLEI_AUTORG_IT_STR-DBCNR sy-vline
WA_RNLEI_AUTORG_IT_STR-CONVSIGN sy-vline
WA_RNLEI_AUTORG_IT_STR-WISSCD sy-vline
WA_RNLEI_AUTORG_IT_STR-MEDUNIT sy-vline
WA_RNLEI_AUTORG_IT_STR-LNRLM sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/AKTIV sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/PHASE sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/MOD_CD1 sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/MOD_CD2 sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/MOD_CD3 sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/MOD_CD4 sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/KOE_SV sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/PRSC_DT sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/ASS_CD sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/PUR_PR sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/EXO_CP sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/NABM_CO sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/HOPRICE sy-vline
WA_RNLEI_AUTORG_IT_STR-/ISHFR/PSCRV sy-vline
WA_RNLEI_AUTORG_IT_STR-NLKZA sy-vline
WA_RNLEI_AUTORG_IT_STR-TAMAN sy-vline
WA_RNLEI_AUTORG_IT_STR-HIC_FREE sy-vline
WA_RNLEI_AUTORG_IT_STR-DEVNR sy-vline
WA_RNLEI_AUTORG_IT_STR-ORDNR sy-vline
WA_RNLEI_AUTORG_IT_STR-LABTYP sy-vline
WA_RNLEI_AUTORG_IT_STR-BEAG sy-vline
WA_RNLEI_AUTORG_IT_STR-DCODE sy-vline
WA_RNLEI_AUTORG_IT_STR-CONSVA sy-vline
WA_RNLEI_AUTORG_IT_STR-LAAMB sy-vline
WA_RNLEI_AUTORG_IT_STR-LSCHL sy-vline
WA_RNLEI_AUTORG_IT_STR-ABRTX sy-vline
WA_RNLEI_AUTORG_IT_STR-ENTGAMB sy-vline
WA_RNLEI_AUTORG_IT_STR-THERGROUP sy-vline
WA_RNLEI_AUTORG_IT_STR-TAGRU sy-vline
WA_RNLEI_AUTORG_IT_STR-TAGR2 sy-vline
WA_RNLEI_AUTORG_IT_STR-AUTOPSY sy-vline
WA_RNLEI_AUTORG_IT_STR-ORGAN sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.