ABAP Select data from SAP table ISH_SERVICE_SHOW 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 ISH_SERVICE_SHOW 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 ISH_SERVICE_SHOW. 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 ISH_SERVICE_SHOW 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_ISH_SERVICE_SHOW TYPE STANDARD TABLE OF ISH_SERVICE_SHOW,
      WA_ISH_SERVICE_SHOW TYPE ISH_SERVICE_SHOW,
      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: <ISH_SERVICE_SHOW> TYPE ISH_SERVICE_SHOW.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ISH_SERVICE_SHOW
*  INTO TABLE @DATA(IT_ISH_SERVICE_SHOW2).
*--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_ISH_SERVICE_SHOW INDEX 1 INTO DATA(WA_ISH_SERVICE_SHOW2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_ISH_SERVICE_SHOW ASSIGNING <ISH_SERVICE_SHOW>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<ISH_SERVICE_SHOW>-MARK = 1.
<ISH_SERVICE_SHOW>-FALNR = 1.
<ISH_SERVICE_SHOW>-LEIST = 1.
<ISH_SERVICE_SHOW>-LNRLS = 1.
<ISH_SERVICE_SHOW>-LFDBEW = 1.
ENDLOOP.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field CONSVA CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISH_SERVICE_SHOW-CONSVA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISH_SERVICE_SHOW-CONSVA.
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_ISH_SERVICE_SHOW_STR,
MARK TYPE STRING,
FALNR TYPE STRING,
LEIST TYPE STRING,
LNRLS TYPE STRING,
LFDBEW TYPE STRING,
ERBTY TYPE STRING,
ANFOE TYPE STRING,
ANMAN TYPE STRING,
ERBOE TYPE STRING,
ERMAN TYPE STRING,
HAUST TYPE STRING,
PREIS TYPE STRING,
ABRKZ TYPE STRING,
STALS TYPE STRING,
IMENG TYPE STRING,
IBGDT TYPE STRING,
IENDT TYPE STRING,
IBZT TYPE STRING,
IEZT TYPE STRING,
TARIF TYPE STRING,
TARLS TYPE STRING,
TARSP TYPE STRING,
TARAS TYPE STRING,
LEINH 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,
REMRK TYPE STRING,
ANPOE TYPE STRING,
APMAN TYPE STRING,
HCOKZ TYPE STRING,
ANART 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,
EVTUP TYPE STRING,
OBJUP TYPE STRING,
ABTYP TYPE STRING,
TCODE 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,
USER2 TYPE STRING,
USERTEXT1 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,
KTXTCONC TYPE STRING,
ANFOEKB TYPE STRING,
ANPOEKB TYPE STRING,
ERBOEKB TYPE STRING,
WAERS TYPE STRING,
LMED TYPE STRING,
ABGER TYPE STRING,
ABMEN TYPE STRING,
ABDAT TYPE STRING,
EXTNR TYPE STRING,
TGRKZ TYPE STRING,
TAGRU TYPE STRING,
TAGR2 TYPE STRING,
OTYPL TYPE STRING,
ABWRL TYPE STRING,
OPTAB TYPE STRING,
PRADM TYPE STRING,
TAKAT TYPE STRING,
DKAT TYPE STRING,
DKEY TYPE STRING,
ASHOSP1 TYPE STRING,
GPART1 TYPE STRING,
ROLTP1 TYPE STRING,
ANAME1 TYPE STRING,
ROLBZ1 TYPE STRING,
ASHOSP2 TYPE STRING,
GPART2 TYPE STRING,
ROLTP2 TYPE STRING,
ANAME2 TYPE STRING,
ROLBZ2 TYPE STRING,
ASHOSP3 TYPE STRING,
GPART3 TYPE STRING,
ROLTP3 TYPE STRING,
ANAME3 TYPE STRING,
ROLBZ3 TYPE STRING,
ASHOSP4 TYPE STRING,
GPART4 TYPE STRING,
ROLTP4 TYPE STRING,
ANAME4 TYPE STRING,
ROLBZ4 TYPE STRING,
ASHOSP5 TYPE STRING,
GPART5 TYPE STRING,
ROLTP5 TYPE STRING,
ANAME5 TYPE STRING,
ROLBZ5 TYPE STRING,
SECDE TYPE STRING,
NAMEN TYPE STRING,
VIEWTYPE TYPE STRING,
FORMNAME TYPE STRING,
FORMBELNR TYPE STRING,
NLSLOK TYPE STRING,
MDIND TYPE STRING,
CONVSIGN TYPE STRING,
LNRLM TYPE STRING,
MATNR TYPE STRING,
MATERIAL_TXT TYPE STRING,
MENGE TYPE STRING,
MEINS TYPE STRING,
IMENG_LONG TYPE STRING,
UMENG_LONG TYPE STRING,
USERPRICE1_LONG TYPE STRING,
USERAMOUNT1_LONG TYPE STRING,
ABMEN_LONG TYPE STRING,
NAMEN_LONG TYPE STRING,
MENGE_LONG TYPE STRING,
BELNR 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/BPRICE TYPE STRING,
/ISHFR/BPRICEC TYPE STRING,
/ISHFR/NABM_CO TYPE STRING,
/ISHFR/HONPRICE TYPE STRING,
/ISHFR/PSCRV TYPE STRING,
/ISHFR/PSCRV_TEXT TYPE STRING,
HIC_FREE TYPE STRING,
DEVNR TYPE STRING,
ORDNR TYPE STRING,
BEAG TYPE STRING,
LABTYP TYPE STRING,
DCODE TYPE STRING,
CONSVA TYPE STRING,END OF T_EKKO_STR. DATA: WA_ISH_SERVICE_SHOW_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_ISH_SERVICE_SHOW_STR-MARK sy-vline
WA_ISH_SERVICE_SHOW_STR-FALNR sy-vline
WA_ISH_SERVICE_SHOW_STR-LEIST sy-vline
WA_ISH_SERVICE_SHOW_STR-LNRLS sy-vline
WA_ISH_SERVICE_SHOW_STR-LFDBEW sy-vline
WA_ISH_SERVICE_SHOW_STR-ERBTY sy-vline
WA_ISH_SERVICE_SHOW_STR-ANFOE sy-vline
WA_ISH_SERVICE_SHOW_STR-ANMAN sy-vline
WA_ISH_SERVICE_SHOW_STR-ERBOE sy-vline
WA_ISH_SERVICE_SHOW_STR-ERMAN sy-vline
WA_ISH_SERVICE_SHOW_STR-HAUST sy-vline
WA_ISH_SERVICE_SHOW_STR-PREIS sy-vline
WA_ISH_SERVICE_SHOW_STR-ABRKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-STALS sy-vline
WA_ISH_SERVICE_SHOW_STR-IMENG sy-vline
WA_ISH_SERVICE_SHOW_STR-IBGDT sy-vline
WA_ISH_SERVICE_SHOW_STR-IENDT sy-vline
WA_ISH_SERVICE_SHOW_STR-IBZT sy-vline
WA_ISH_SERVICE_SHOW_STR-IEZT sy-vline
WA_ISH_SERVICE_SHOW_STR-TARIF sy-vline
WA_ISH_SERVICE_SHOW_STR-TARLS sy-vline
WA_ISH_SERVICE_SHOW_STR-TARSP sy-vline
WA_ISH_SERVICE_SHOW_STR-TARAS sy-vline
WA_ISH_SERVICE_SHOW_STR-LEINH sy-vline
WA_ISH_SERVICE_SHOW_STR-ERDAT sy-vline
WA_ISH_SERVICE_SHOW_STR-ERUSR sy-vline
WA_ISH_SERVICE_SHOW_STR-UPDAT sy-vline
WA_ISH_SERVICE_SHOW_STR-UPUSR sy-vline
WA_ISH_SERVICE_SHOW_STR-STORN sy-vline
WA_ISH_SERVICE_SHOW_STR-STUSR sy-vline
WA_ISH_SERVICE_SHOW_STR-REFLNR sy-vline
WA_ISH_SERVICE_SHOW_STR-ZEITR sy-vline
WA_ISH_SERVICE_SHOW_STR-BEGTX sy-vline
WA_ISH_SERVICE_SHOW_STR-REMRK sy-vline
WA_ISH_SERVICE_SHOW_STR-ANPOE sy-vline
WA_ISH_SERVICE_SHOW_STR-APMAN sy-vline
WA_ISH_SERVICE_SHOW_STR-HCOKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-ANART sy-vline
WA_ISH_SERVICE_SHOW_STR-UBVON sy-vline
WA_ISH_SERVICE_SHOW_STR-UBBIS sy-vline
WA_ISH_SERVICE_SHOW_STR-UBLKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-UMENG sy-vline
WA_ISH_SERVICE_SHOW_STR-UAEKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-NUBKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-ENTKY sy-vline
WA_ISH_SERVICE_SHOW_STR-ENZKY sy-vline
WA_ISH_SERVICE_SHOW_STR-ENTG2 sy-vline
WA_ISH_SERVICE_SHOW_STR-EVENT sy-vline
WA_ISH_SERVICE_SHOW_STR-OBJCT sy-vline
WA_ISH_SERVICE_SHOW_STR-EVTUP sy-vline
WA_ISH_SERVICE_SHOW_STR-OBJUP sy-vline
WA_ISH_SERVICE_SHOW_STR-ABTYP sy-vline
WA_ISH_SERVICE_SHOW_STR-TCODE sy-vline
WA_ISH_SERVICE_SHOW_STR-EAUFN sy-vline
WA_ISH_SERVICE_SHOW_STR-BZLST sy-vline
WA_ISH_SERVICE_SHOW_STR-KTRKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-BFORM sy-vline
WA_ISH_SERVICE_SHOW_STR-ENTGA sy-vline
WA_ISH_SERVICE_SHOW_STR-NBGDT sy-vline
WA_ISH_SERVICE_SHOW_STR-NBGZT sy-vline
WA_ISH_SERVICE_SHOW_STR-ZOTYP sy-vline
WA_ISH_SERVICE_SHOW_STR-PZAHL sy-vline
WA_ISH_SERVICE_SHOW_STR-REFKY sy-vline
WA_ISH_SERVICE_SHOW_STR-EXCAT sy-vline
WA_ISH_SERVICE_SHOW_STR-USER0 sy-vline
WA_ISH_SERVICE_SHOW_STR-USER1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USER2 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERTEXT1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERDATE1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERDATE2 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERTIME1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERTIME2 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERPRICE1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERAMOUNT1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERUNIT1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERSIGN1 sy-vline
WA_ISH_SERVICE_SHOW_STR-USERSIGN2 sy-vline
WA_ISH_SERVICE_SHOW_STR-SEQUE sy-vline
WA_ISH_SERVICE_SHOW_STR-KTXTCONC sy-vline
WA_ISH_SERVICE_SHOW_STR-ANFOEKB sy-vline
WA_ISH_SERVICE_SHOW_STR-ANPOEKB sy-vline
WA_ISH_SERVICE_SHOW_STR-ERBOEKB sy-vline
WA_ISH_SERVICE_SHOW_STR-WAERS sy-vline
WA_ISH_SERVICE_SHOW_STR-LMED sy-vline
WA_ISH_SERVICE_SHOW_STR-ABGER sy-vline
WA_ISH_SERVICE_SHOW_STR-ABMEN sy-vline
WA_ISH_SERVICE_SHOW_STR-ABDAT sy-vline
WA_ISH_SERVICE_SHOW_STR-EXTNR sy-vline
WA_ISH_SERVICE_SHOW_STR-TGRKZ sy-vline
WA_ISH_SERVICE_SHOW_STR-TAGRU sy-vline
WA_ISH_SERVICE_SHOW_STR-TAGR2 sy-vline
WA_ISH_SERVICE_SHOW_STR-OTYPL sy-vline
WA_ISH_SERVICE_SHOW_STR-ABWRL sy-vline
WA_ISH_SERVICE_SHOW_STR-OPTAB sy-vline
WA_ISH_SERVICE_SHOW_STR-PRADM sy-vline
WA_ISH_SERVICE_SHOW_STR-TAKAT sy-vline
WA_ISH_SERVICE_SHOW_STR-DKAT sy-vline
WA_ISH_SERVICE_SHOW_STR-DKEY sy-vline
WA_ISH_SERVICE_SHOW_STR-ASHOSP1 sy-vline
WA_ISH_SERVICE_SHOW_STR-GPART1 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLTP1 sy-vline
WA_ISH_SERVICE_SHOW_STR-ANAME1 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLBZ1 sy-vline
WA_ISH_SERVICE_SHOW_STR-ASHOSP2 sy-vline
WA_ISH_SERVICE_SHOW_STR-GPART2 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLTP2 sy-vline
WA_ISH_SERVICE_SHOW_STR-ANAME2 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLBZ2 sy-vline
WA_ISH_SERVICE_SHOW_STR-ASHOSP3 sy-vline
WA_ISH_SERVICE_SHOW_STR-GPART3 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLTP3 sy-vline
WA_ISH_SERVICE_SHOW_STR-ANAME3 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLBZ3 sy-vline
WA_ISH_SERVICE_SHOW_STR-ASHOSP4 sy-vline
WA_ISH_SERVICE_SHOW_STR-GPART4 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLTP4 sy-vline
WA_ISH_SERVICE_SHOW_STR-ANAME4 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLBZ4 sy-vline
WA_ISH_SERVICE_SHOW_STR-ASHOSP5 sy-vline
WA_ISH_SERVICE_SHOW_STR-GPART5 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLTP5 sy-vline
WA_ISH_SERVICE_SHOW_STR-ANAME5 sy-vline
WA_ISH_SERVICE_SHOW_STR-ROLBZ5 sy-vline
WA_ISH_SERVICE_SHOW_STR-SECDE sy-vline
WA_ISH_SERVICE_SHOW_STR-NAMEN sy-vline
WA_ISH_SERVICE_SHOW_STR-VIEWTYPE sy-vline
WA_ISH_SERVICE_SHOW_STR-FORMNAME sy-vline
WA_ISH_SERVICE_SHOW_STR-FORMBELNR sy-vline
WA_ISH_SERVICE_SHOW_STR-NLSLOK sy-vline
WA_ISH_SERVICE_SHOW_STR-MDIND sy-vline
WA_ISH_SERVICE_SHOW_STR-CONVSIGN sy-vline
WA_ISH_SERVICE_SHOW_STR-LNRLM sy-vline
WA_ISH_SERVICE_SHOW_STR-MATNR sy-vline
WA_ISH_SERVICE_SHOW_STR-MATERIAL_TXT sy-vline
WA_ISH_SERVICE_SHOW_STR-MENGE sy-vline
WA_ISH_SERVICE_SHOW_STR-MEINS sy-vline
WA_ISH_SERVICE_SHOW_STR-IMENG_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-UMENG_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-USERPRICE1_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-USERAMOUNT1_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-ABMEN_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-NAMEN_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-MENGE_LONG sy-vline
WA_ISH_SERVICE_SHOW_STR-BELNR sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/AKTIV sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/PHASE sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/MOD_CD1 sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/MOD_CD2 sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/MOD_CD3 sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/MOD_CD4 sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/KOE_SV sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/PRSC_DT sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/ASS_CD sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/PUR_PR sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/EXO_CP sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/BPRICE sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/BPRICEC sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/NABM_CO sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/HONPRICE sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/PSCRV sy-vline
WA_ISH_SERVICE_SHOW_STR-/ISHFR/PSCRV_TEXT sy-vline
WA_ISH_SERVICE_SHOW_STR-HIC_FREE sy-vline
WA_ISH_SERVICE_SHOW_STR-DEVNR sy-vline
WA_ISH_SERVICE_SHOW_STR-ORDNR sy-vline
WA_ISH_SERVICE_SHOW_STR-BEAG sy-vline
WA_ISH_SERVICE_SHOW_STR-LABTYP sy-vline
WA_ISH_SERVICE_SHOW_STR-DCODE sy-vline
WA_ISH_SERVICE_SHOW_STR-CONSVA sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.