ABAP Select data from SAP table IVIORA 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 IVIORA 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 IVIORA. 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 IVIORA 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_IVIORA TYPE STANDARD TABLE OF IVIORA,
      WA_IVIORA TYPE IVIORA,
      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: <IVIORA> TYPE IVIORA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IVIORA
*  INTO TABLE @DATA(IT_IVIORA2).
*--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_IVIORA INDEX 1 INTO DATA(WA_IVIORA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IVIORA ASSIGNING <IVIORA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IVIORA>-MANDT = 1.
<IVIORA>-AUFNR = 1.
<IVIORA>-IWERK = 1.
<IVIORA>-ILOAN = 1.
<IVIORA>-ILOAI = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IVIORA-OBKNR, sy-vline,
WA_IVIORA-IPHAS, sy-vline,
WA_IVIORA-AUART, sy-vline,
WA_IVIORA-AUTYP, sy-vline,
WA_IVIORA-REFNR, sy-vline,
WA_IVIORA-ERNAM, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IVIORA 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_IVIORA 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_IVIORA INTO WA_IVIORA. *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 AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IVIORA-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-AUFNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit ABPSP, internal->external for field PSPEL CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_IVIORA-PSPEL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-PSPEL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SCOPE, internal->external for field SCOPE CALL FUNCTION 'CONVERSION_EXIT_SCOPE_OUTPUT' EXPORTING input = WA_IVIORA-SCOPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-SCOPE.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit TSTLC, internal->external for field CPD_UPDAT CALL FUNCTION 'CONVERSION_EXIT_TSTLC_OUTPUT' EXPORTING input = WA_IVIORA-CPD_UPDAT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-CPD_UPDAT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit NUMCV, internal->external for field STLNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_IVIORA-STLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-STLNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit NUMCV, internal->external for field VORUE CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_IVIORA-VORUE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-VORUE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit KONPD, internal->external for field PRONR CALL FUNCTION 'CONVERSION_EXIT_KONPD_OUTPUT' EXPORTING input = WA_IVIORA-PRONR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-PRONR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit NUMCV, internal->external for field REVLV CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_IVIORA-REVLV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-REVLV.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field RMANR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IVIORA-RMANR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IVIORA-RMANR.
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_IVIORA_STR,
MANDT TYPE STRING,
AUFNR TYPE STRING,
IWERK TYPE STRING,
ILOAN TYPE STRING,
ILOAI TYPE STRING,
OBKNR TYPE STRING,
IPHAS TYPE STRING,
AUART TYPE STRING,
AUTYP TYPE STRING,
REFNR TYPE STRING,
ERNAM TYPE STRING,
ERDAT TYPE STRING,
AENAM TYPE STRING,
AEDAT TYPE STRING,
KTEXT TYPE STRING,
LTEXT TYPE STRING,
BUKRS TYPE STRING,
WERKS TYPE STRING,
GSBER TYPE STRING,
KOKRS TYPE STRING,
CCKEY TYPE STRING,
KOSTV TYPE STRING,
STORT TYPE STRING,
SOWRK TYPE STRING,
ASTKZ TYPE STRING,
WAERS TYPE STRING,
STDAT TYPE STRING,
IDAT1 TYPE STRING,
IDAT2 TYPE STRING,
IDAT3 TYPE STRING,
OBJID TYPE STRING,
LOEKZ TYPE STRING,
PLGKZ TYPE STRING,
KVEWE TYPE STRING,
KAPPL TYPE STRING,
KALSM TYPE STRING,
ZSCHL TYPE STRING,
ABKRS TYPE STRING,
KSTAR TYPE STRING,
KOSTL TYPE STRING,
SETNM TYPE STRING,
CYCLE TYPE STRING,
SDATE TYPE STRING,
SEQNR TYPE STRING,
USER4 TYPE STRING,
OBJNR TYPE STRING,
PRCTR TYPE STRING,
PSPEL TYPE STRING,
AWSLS TYPE STRING,
ABGSL TYPE STRING,
EB_POST TYPE STRING,
TXJCD TYPE STRING,
FUNC_AREA TYPE STRING,
SCOPE TYPE STRING,
PLINT TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
AUFEX TYPE STRING,
IVPRO TYPE STRING,
LOGSYSTEM TYPE STRING,
FLG_MLTPS TYPE STRING,
ABUKR TYPE STRING,
SIZECL TYPE STRING,
IZWEK TYPE STRING,
UMWKZ TYPE STRING,
KSTEMPF TYPE STRING,
ZSCHM TYPE STRING,
PKOSA TYPE STRING,
ANFAUFNR TYPE STRING,
PROCNR TYPE STRING,
PROTY TYPE STRING,
RSORD TYPE STRING,
BEMOT TYPE STRING,
ADRNRA TYPE STRING,
ERFZEIT TYPE STRING,
AEZEIT TYPE STRING,
CSTG_VRNT TYPE STRING,
COSTESTNR TYPE STRING,
VERAA_USER TYPE STRING,
EEW_AUFK_PS_DUMMY TYPE STRING,
VNAME TYPE STRING,
RECID TYPE STRING,
ETYPE TYPE STRING,
OTYPE TYPE STRING,
JV_JIBCL TYPE STRING,
JV_JIBSA TYPE STRING,
JV_OCO TYPE STRING,
CPD_UPDAT TYPE STRING,
/CUM/INDCU TYPE STRING,
/CUM/CMNUM TYPE STRING,
/CUM/AUEST TYPE STRING,
/CUM/DESNUM TYPE STRING,
AD01PROFNR TYPE STRING,
VAPLZ TYPE STRING,
WAWRK TYPE STRING,
FERC_IND TYPE STRING,
CLAIM_CONTROL TYPE STRING,
UPDATE_NEEDED TYPE STRING,
UPDATE_CONTROL TYPE STRING,
GLTRP TYPE STRING,
GSTRP TYPE STRING,
FTRMS TYPE STRING,
GLTRS TYPE STRING,
GSTRS TYPE STRING,
GSTRI TYPE STRING,
GETRI TYPE STRING,
GLTRI TYPE STRING,
FTRMI TYPE STRING,
FTRMP TYPE STRING,
RSNUM TYPE STRING,
GASMG TYPE STRING,
GAMNG TYPE STRING,
GMEIN TYPE STRING,
PLNBEZ TYPE STRING,
PLNTY TYPE STRING,
PLNNR TYPE STRING,
PLNAW TYPE STRING,
PLNAL TYPE STRING,
PVERW TYPE STRING,
PLAUF TYPE STRING,
PLSVB TYPE STRING,
PLNME TYPE STRING,
PLSVN TYPE STRING,
PDATV TYPE STRING,
PAENR TYPE STRING,
PLGRP TYPE STRING,
LODIV TYPE STRING,
STLTY TYPE STRING,
STLBEZ TYPE STRING,
STLST TYPE STRING,
STLNR TYPE STRING,
SDATV TYPE STRING,
SBMNG TYPE STRING,
SBMEH TYPE STRING,
SAENR TYPE STRING,
STLAL TYPE STRING,
STLAN TYPE STRING,
SLSVN TYPE STRING,
SLSBS TYPE STRING,
AUFLD TYPE STRING,
DISPO TYPE STRING,
AUFPL TYPE STRING,
FEVOR TYPE STRING,
FHORI TYPE STRING,
TERKZ TYPE STRING,
REDKZ TYPE STRING,
APRIO TYPE STRING,
NTZUE TYPE STRING,
VORUE TYPE STRING,
PROFID TYPE STRING,
VORGZ TYPE STRING,
SICHZ TYPE STRING,
FREIZ TYPE STRING,
UPTER TYPE STRING,
BEDID TYPE STRING,
PRONR TYPE STRING,
ZAEHL TYPE STRING,
MZAEHL TYPE STRING,
ZKRIZ TYPE STRING,
PRUEFLOS TYPE STRING,
KLVARP TYPE STRING,
KLVARI TYPE STRING,
RGEKZ TYPE STRING,
PLART TYPE STRING,
FLG_AOB TYPE STRING,
FLG_ARBEI TYPE STRING,
GLTPP TYPE STRING,
GSTPP TYPE STRING,
GLTPS TYPE STRING,
GSTPS TYPE STRING,
FTRPS TYPE STRING,
RDKZP TYPE STRING,
TRKZP TYPE STRING,
RUECK TYPE STRING,
RMZHL TYPE STRING,
IGMNG TYPE STRING,
RATID TYPE STRING,
GROID TYPE STRING,
CUOBJ TYPE STRING,
GLUZS TYPE STRING,
GSUZS TYPE STRING,
REVLV TYPE STRING,
RSHTY TYPE STRING,
RSHID TYPE STRING,
RSNTY TYPE STRING,
RSNID TYPE STRING,
NAUTERM TYPE STRING,
NAUCOST TYPE STRING,
STUFE TYPE STRING,
WEGXX TYPE STRING,
VWEGX TYPE STRING,
ARSNR TYPE STRING,
ARSPS TYPE STRING,
MAUFNR TYPE STRING,
LKNOT TYPE STRING,
RKNOT TYPE STRING,
PRODNET TYPE STRING,
IASMG TYPE STRING,
ABARB TYPE STRING,
AUFNT TYPE STRING,
AUFPT TYPE STRING,
APLZT TYPE STRING,
NO_DISP TYPE STRING,
CSPLIT TYPE STRING,
AENNR TYPE STRING,
CY_SEQNR TYPE STRING,
BREAKS TYPE STRING,
VORGZ_TRM TYPE STRING,
SICHZ_TRM TYPE STRING,
TRMDT TYPE STRING,
GLUZP TYPE STRING,
GSUZP TYPE STRING,
GSUZI TYPE STRING,
GEUZI TYPE STRING,
GLUPP TYPE STRING,
GSUPP TYPE STRING,
GLUPS TYPE STRING,
GSUPS TYPE STRING,
CHSCH TYPE STRING,
KAPT_VORGZ TYPE STRING,
KAPT_SICHZ TYPE STRING,
LEAD_AUFNR TYPE STRING,
PNETSTARTD TYPE STRING,
PNETSTARTT TYPE STRING,
PNETENDD TYPE STRING,
PNETENDT TYPE STRING,
KBED TYPE STRING,
KKALKR TYPE STRING,
SFCPF TYPE STRING,
RMNGA TYPE STRING,
GSBTR TYPE STRING,
VFMNG TYPE STRING,
NOPCOST TYPE STRING,
NETZKONT TYPE STRING,
ATRKZ TYPE STRING,
OBJTYPE TYPE STRING,
CH_PROC TYPE STRING,
KAPVERSA TYPE STRING,
COLORDPROC TYPE STRING,
KZERB TYPE STRING,
CONF_KEY TYPE STRING,
ST_ARBID TYPE STRING,
VSNMR_V TYPE STRING,
TERHW TYPE STRING,
SPLSTAT TYPE STRING,
COSTUPD TYPE STRING,
RMANR TYPE STRING,
POSNR_RMA TYPE STRING,
POSNV_RMA TYPE STRING,
REVNR TYPE STRING,END OF T_EKKO_STR. DATA: WA_IVIORA_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_IVIORA_STR-MANDT sy-vline
WA_IVIORA_STR-AUFNR sy-vline
WA_IVIORA_STR-IWERK sy-vline
WA_IVIORA_STR-ILOAN sy-vline
WA_IVIORA_STR-ILOAI sy-vline
WA_IVIORA_STR-OBKNR sy-vline
WA_IVIORA_STR-IPHAS sy-vline
WA_IVIORA_STR-AUART sy-vline
WA_IVIORA_STR-AUTYP sy-vline
WA_IVIORA_STR-REFNR sy-vline
WA_IVIORA_STR-ERNAM sy-vline
WA_IVIORA_STR-ERDAT sy-vline
WA_IVIORA_STR-AENAM sy-vline
WA_IVIORA_STR-AEDAT sy-vline
WA_IVIORA_STR-KTEXT sy-vline
WA_IVIORA_STR-LTEXT sy-vline
WA_IVIORA_STR-BUKRS sy-vline
WA_IVIORA_STR-WERKS sy-vline
WA_IVIORA_STR-GSBER sy-vline
WA_IVIORA_STR-KOKRS sy-vline
WA_IVIORA_STR-CCKEY sy-vline
WA_IVIORA_STR-KOSTV sy-vline
WA_IVIORA_STR-STORT sy-vline
WA_IVIORA_STR-SOWRK sy-vline
WA_IVIORA_STR-ASTKZ sy-vline
WA_IVIORA_STR-WAERS sy-vline
WA_IVIORA_STR-STDAT sy-vline
WA_IVIORA_STR-IDAT1 sy-vline
WA_IVIORA_STR-IDAT2 sy-vline
WA_IVIORA_STR-IDAT3 sy-vline
WA_IVIORA_STR-OBJID sy-vline
WA_IVIORA_STR-LOEKZ sy-vline
WA_IVIORA_STR-PLGKZ sy-vline
WA_IVIORA_STR-KVEWE sy-vline
WA_IVIORA_STR-KAPPL sy-vline
WA_IVIORA_STR-KALSM sy-vline
WA_IVIORA_STR-ZSCHL sy-vline
WA_IVIORA_STR-ABKRS sy-vline
WA_IVIORA_STR-KSTAR sy-vline
WA_IVIORA_STR-KOSTL sy-vline
WA_IVIORA_STR-SETNM sy-vline
WA_IVIORA_STR-CYCLE sy-vline
WA_IVIORA_STR-SDATE sy-vline
WA_IVIORA_STR-SEQNR sy-vline
WA_IVIORA_STR-USER4 sy-vline
WA_IVIORA_STR-OBJNR sy-vline
WA_IVIORA_STR-PRCTR sy-vline
WA_IVIORA_STR-PSPEL sy-vline
WA_IVIORA_STR-AWSLS sy-vline
WA_IVIORA_STR-ABGSL sy-vline
WA_IVIORA_STR-EB_POST sy-vline
WA_IVIORA_STR-TXJCD sy-vline
WA_IVIORA_STR-FUNC_AREA sy-vline
WA_IVIORA_STR-SCOPE sy-vline
WA_IVIORA_STR-PLINT sy-vline
WA_IVIORA_STR-KDAUF sy-vline
WA_IVIORA_STR-KDPOS sy-vline
WA_IVIORA_STR-AUFEX sy-vline
WA_IVIORA_STR-IVPRO sy-vline
WA_IVIORA_STR-LOGSYSTEM sy-vline
WA_IVIORA_STR-FLG_MLTPS sy-vline
WA_IVIORA_STR-ABUKR sy-vline
WA_IVIORA_STR-SIZECL sy-vline
WA_IVIORA_STR-IZWEK sy-vline
WA_IVIORA_STR-UMWKZ sy-vline
WA_IVIORA_STR-KSTEMPF sy-vline
WA_IVIORA_STR-ZSCHM sy-vline
WA_IVIORA_STR-PKOSA sy-vline
WA_IVIORA_STR-ANFAUFNR sy-vline
WA_IVIORA_STR-PROCNR sy-vline
WA_IVIORA_STR-PROTY sy-vline
WA_IVIORA_STR-RSORD sy-vline
WA_IVIORA_STR-BEMOT sy-vline
WA_IVIORA_STR-ADRNRA sy-vline
WA_IVIORA_STR-ERFZEIT sy-vline
WA_IVIORA_STR-AEZEIT sy-vline
WA_IVIORA_STR-CSTG_VRNT sy-vline
WA_IVIORA_STR-COSTESTNR sy-vline
WA_IVIORA_STR-VERAA_USER sy-vline
WA_IVIORA_STR-EEW_AUFK_PS_DUMMY sy-vline
WA_IVIORA_STR-VNAME sy-vline
WA_IVIORA_STR-RECID sy-vline
WA_IVIORA_STR-ETYPE sy-vline
WA_IVIORA_STR-OTYPE sy-vline
WA_IVIORA_STR-JV_JIBCL sy-vline
WA_IVIORA_STR-JV_JIBSA sy-vline
WA_IVIORA_STR-JV_OCO sy-vline
WA_IVIORA_STR-CPD_UPDAT sy-vline
WA_IVIORA_STR-/CUM/INDCU sy-vline
WA_IVIORA_STR-/CUM/CMNUM sy-vline
WA_IVIORA_STR-/CUM/AUEST sy-vline
WA_IVIORA_STR-/CUM/DESNUM sy-vline
WA_IVIORA_STR-AD01PROFNR sy-vline
WA_IVIORA_STR-VAPLZ sy-vline
WA_IVIORA_STR-WAWRK sy-vline
WA_IVIORA_STR-FERC_IND sy-vline
WA_IVIORA_STR-CLAIM_CONTROL sy-vline
WA_IVIORA_STR-UPDATE_NEEDED sy-vline
WA_IVIORA_STR-UPDATE_CONTROL sy-vline
WA_IVIORA_STR-GLTRP sy-vline
WA_IVIORA_STR-GSTRP sy-vline
WA_IVIORA_STR-FTRMS sy-vline
WA_IVIORA_STR-GLTRS sy-vline
WA_IVIORA_STR-GSTRS sy-vline
WA_IVIORA_STR-GSTRI sy-vline
WA_IVIORA_STR-GETRI sy-vline
WA_IVIORA_STR-GLTRI sy-vline
WA_IVIORA_STR-FTRMI sy-vline
WA_IVIORA_STR-FTRMP sy-vline
WA_IVIORA_STR-RSNUM sy-vline
WA_IVIORA_STR-GASMG sy-vline
WA_IVIORA_STR-GAMNG sy-vline
WA_IVIORA_STR-GMEIN sy-vline
WA_IVIORA_STR-PLNBEZ sy-vline
WA_IVIORA_STR-PLNTY sy-vline
WA_IVIORA_STR-PLNNR sy-vline
WA_IVIORA_STR-PLNAW sy-vline
WA_IVIORA_STR-PLNAL sy-vline
WA_IVIORA_STR-PVERW sy-vline
WA_IVIORA_STR-PLAUF sy-vline
WA_IVIORA_STR-PLSVB sy-vline
WA_IVIORA_STR-PLNME sy-vline
WA_IVIORA_STR-PLSVN sy-vline
WA_IVIORA_STR-PDATV sy-vline
WA_IVIORA_STR-PAENR sy-vline
WA_IVIORA_STR-PLGRP sy-vline
WA_IVIORA_STR-LODIV sy-vline
WA_IVIORA_STR-STLTY sy-vline
WA_IVIORA_STR-STLBEZ sy-vline
WA_IVIORA_STR-STLST sy-vline
WA_IVIORA_STR-STLNR sy-vline
WA_IVIORA_STR-SDATV sy-vline
WA_IVIORA_STR-SBMNG sy-vline
WA_IVIORA_STR-SBMEH sy-vline
WA_IVIORA_STR-SAENR sy-vline
WA_IVIORA_STR-STLAL sy-vline
WA_IVIORA_STR-STLAN sy-vline
WA_IVIORA_STR-SLSVN sy-vline
WA_IVIORA_STR-SLSBS sy-vline
WA_IVIORA_STR-AUFLD sy-vline
WA_IVIORA_STR-DISPO sy-vline
WA_IVIORA_STR-AUFPL sy-vline
WA_IVIORA_STR-FEVOR sy-vline
WA_IVIORA_STR-FHORI sy-vline
WA_IVIORA_STR-TERKZ sy-vline
WA_IVIORA_STR-REDKZ sy-vline
WA_IVIORA_STR-APRIO sy-vline
WA_IVIORA_STR-NTZUE sy-vline
WA_IVIORA_STR-VORUE sy-vline
WA_IVIORA_STR-PROFID sy-vline
WA_IVIORA_STR-VORGZ sy-vline
WA_IVIORA_STR-SICHZ sy-vline
WA_IVIORA_STR-FREIZ sy-vline
WA_IVIORA_STR-UPTER sy-vline
WA_IVIORA_STR-BEDID sy-vline
WA_IVIORA_STR-PRONR sy-vline
WA_IVIORA_STR-ZAEHL sy-vline
WA_IVIORA_STR-MZAEHL sy-vline
WA_IVIORA_STR-ZKRIZ sy-vline
WA_IVIORA_STR-PRUEFLOS sy-vline
WA_IVIORA_STR-KLVARP sy-vline
WA_IVIORA_STR-KLVARI sy-vline
WA_IVIORA_STR-RGEKZ sy-vline
WA_IVIORA_STR-PLART sy-vline
WA_IVIORA_STR-FLG_AOB sy-vline
WA_IVIORA_STR-FLG_ARBEI sy-vline
WA_IVIORA_STR-GLTPP sy-vline
WA_IVIORA_STR-GSTPP sy-vline
WA_IVIORA_STR-GLTPS sy-vline
WA_IVIORA_STR-GSTPS sy-vline
WA_IVIORA_STR-FTRPS sy-vline
WA_IVIORA_STR-RDKZP sy-vline
WA_IVIORA_STR-TRKZP sy-vline
WA_IVIORA_STR-RUECK sy-vline
WA_IVIORA_STR-RMZHL sy-vline
WA_IVIORA_STR-IGMNG sy-vline
WA_IVIORA_STR-RATID sy-vline
WA_IVIORA_STR-GROID sy-vline
WA_IVIORA_STR-CUOBJ sy-vline
WA_IVIORA_STR-GLUZS sy-vline
WA_IVIORA_STR-GSUZS sy-vline
WA_IVIORA_STR-REVLV sy-vline
WA_IVIORA_STR-RSHTY sy-vline
WA_IVIORA_STR-RSHID sy-vline
WA_IVIORA_STR-RSNTY sy-vline
WA_IVIORA_STR-RSNID sy-vline
WA_IVIORA_STR-NAUTERM sy-vline
WA_IVIORA_STR-NAUCOST sy-vline
WA_IVIORA_STR-STUFE sy-vline
WA_IVIORA_STR-WEGXX sy-vline
WA_IVIORA_STR-VWEGX sy-vline
WA_IVIORA_STR-ARSNR sy-vline
WA_IVIORA_STR-ARSPS sy-vline
WA_IVIORA_STR-MAUFNR sy-vline
WA_IVIORA_STR-LKNOT sy-vline
WA_IVIORA_STR-RKNOT sy-vline
WA_IVIORA_STR-PRODNET sy-vline
WA_IVIORA_STR-IASMG sy-vline
WA_IVIORA_STR-ABARB sy-vline
WA_IVIORA_STR-AUFNT sy-vline
WA_IVIORA_STR-AUFPT sy-vline
WA_IVIORA_STR-APLZT sy-vline
WA_IVIORA_STR-NO_DISP sy-vline
WA_IVIORA_STR-CSPLIT sy-vline
WA_IVIORA_STR-AENNR sy-vline
WA_IVIORA_STR-CY_SEQNR sy-vline
WA_IVIORA_STR-BREAKS sy-vline
WA_IVIORA_STR-VORGZ_TRM sy-vline
WA_IVIORA_STR-SICHZ_TRM sy-vline
WA_IVIORA_STR-TRMDT sy-vline
WA_IVIORA_STR-GLUZP sy-vline
WA_IVIORA_STR-GSUZP sy-vline
WA_IVIORA_STR-GSUZI sy-vline
WA_IVIORA_STR-GEUZI sy-vline
WA_IVIORA_STR-GLUPP sy-vline
WA_IVIORA_STR-GSUPP sy-vline
WA_IVIORA_STR-GLUPS sy-vline
WA_IVIORA_STR-GSUPS sy-vline
WA_IVIORA_STR-CHSCH sy-vline
WA_IVIORA_STR-KAPT_VORGZ sy-vline
WA_IVIORA_STR-KAPT_SICHZ sy-vline
WA_IVIORA_STR-LEAD_AUFNR sy-vline
WA_IVIORA_STR-PNETSTARTD sy-vline
WA_IVIORA_STR-PNETSTARTT sy-vline
WA_IVIORA_STR-PNETENDD sy-vline
WA_IVIORA_STR-PNETENDT sy-vline
WA_IVIORA_STR-KBED sy-vline
WA_IVIORA_STR-KKALKR sy-vline
WA_IVIORA_STR-SFCPF sy-vline
WA_IVIORA_STR-RMNGA sy-vline
WA_IVIORA_STR-GSBTR sy-vline
WA_IVIORA_STR-VFMNG sy-vline
WA_IVIORA_STR-NOPCOST sy-vline
WA_IVIORA_STR-NETZKONT sy-vline
WA_IVIORA_STR-ATRKZ sy-vline
WA_IVIORA_STR-OBJTYPE sy-vline
WA_IVIORA_STR-CH_PROC sy-vline
WA_IVIORA_STR-KAPVERSA sy-vline
WA_IVIORA_STR-COLORDPROC sy-vline
WA_IVIORA_STR-KZERB sy-vline
WA_IVIORA_STR-CONF_KEY sy-vline
WA_IVIORA_STR-ST_ARBID sy-vline
WA_IVIORA_STR-VSNMR_V sy-vline
WA_IVIORA_STR-TERHW sy-vline
WA_IVIORA_STR-SPLSTAT sy-vline
WA_IVIORA_STR-COSTUPD sy-vline
WA_IVIORA_STR-RMANR sy-vline
WA_IVIORA_STR-POSNR_RMA sy-vline
WA_IVIORA_STR-POSNV_RMA sy-vline
WA_IVIORA_STR-REVNR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.