ABAP Select data from SAP table IPRQI 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 IPRQI 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 IPRQI. 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 IPRQI 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_IPRQI TYPE STANDARD TABLE OF IPRQI,
      WA_IPRQI TYPE IPRQI,
      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: <IPRQI> TYPE IPRQI.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IPRQI
*  INTO TABLE @DATA(IT_IPRQI2).
*--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_IPRQI INDEX 1 INTO DATA(WA_IPRQI2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IPRQI ASSIGNING <IPRQI>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IPRQI>-ACIND = 1.
<IPRQI>-OACIN = 1.
<IPRQI>-SAKN2 = 1.
<IPRQI>-KBLNR_COM = 1.
<IPRQI>-KBLPOS_COM = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IPRQI-FIPOS_COM, sy-vline,
WA_IPRQI-FISTL_COM, sy-vline,
WA_IPRQI-GEBER_COM, sy-vline,
WA_IPRQI-ERLKZ_COM, sy-vline,
WA_IPRQI-ERLKZ_PAY, sy-vline,
WA_IPRQI-MANDT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IPRQI 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_IPRQI 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_IPRQI INTO WA_IPRQI. *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 SAKN2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IPRQI-SAKN2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-SAKN2.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit FMCIS, internal->external for field FIPOS_COM CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_IPRQI-FIPOS_COM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-FIPOS_COM.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit AU132, internal->external for field DMBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-DMBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-DMBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBE2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-DMBE2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-DMBE2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBE3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-DMBE3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-DMBE3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WRBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-WRBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-WRBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field HWBAS CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-HWBAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-HWBAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field FWBAS CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-FWBAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-FWBAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EXCRT, internal->external for field KURSR CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT' EXPORTING input = WA_IPRQI-KURSR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-KURSR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field GBETR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-GBETR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-GBETR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AC132, internal->external for field FDWBT CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_IPRQI-FDWBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-FDWBT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit AU132, internal->external for field REWWR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_IPRQI-REWWR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-REWWR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GJAHR, internal->external for field LFGJA CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_IPRQI-LFGJA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-LFGJA.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_IPRQI-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-FIPOS.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AC132, internal->external for field ANBTR_PN CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_IPRQI-ANBTR_PN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-ANBTR_PN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIL, internal->external for field FIPEX CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT' EXPORTING input = WA_IPRQI-FIPEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IPRQI-FIPEX.
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_IPRQI_STR,
ACIND TYPE STRING,
OACIN TYPE STRING,
SAKN2 TYPE STRING,
KBLNR_COM TYPE STRING,
KBLPOS_COM TYPE STRING,
FIPOS_COM TYPE STRING,
FISTL_COM TYPE STRING,
GEBER_COM TYPE STRING,
ERLKZ_COM TYPE STRING,
ERLKZ_PAY TYPE STRING,
MANDT TYPE STRING,
AUSBK TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
BZKEY TYPE STRING,
BUKRS TYPE STRING,
BUZEI TYPE STRING,
BSCHL TYPE STRING,
SHKZG TYPE STRING,
GSBER TYPE STRING,
PARGB TYPE STRING,
TAX_COUNTRY TYPE STRING,
MWSKZ TYPE STRING,
TXDAT TYPE STRING,
TXDAT_FROM TYPE STRING,
DMBTR TYPE STRING,
DMBE2 TYPE STRING,
DMBE3 TYPE STRING,
WRBTR TYPE STRING,
HWMET TYPE STRING,
HWBAS TYPE STRING,
FWBAS TYPE STRING,
MWART TYPE STRING,
KURSR TYPE STRING,
GBETR TYPE STRING,
ZFBDT TYPE STRING,
VALUT TYPE STRING,
ZUONR TYPE STRING,
SGTXT TYPE STRING,
ANBWA TYPE STRING,
ZINKZ TYPE STRING,
RMVCT TYPE STRING,
FDLEV TYPE STRING,
FDGRP TYPE STRING,
FDWBT TYPE STRING,
FDTAG TYPE STRING,
KOKRS TYPE STRING,
KOSTL TYPE STRING,
AUFNR TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
PPRCTR TYPE STRING,
IMKEY TYPE STRING,
PERNR TYPE STRING,
XUMSW TYPE STRING,
XSKRL TYPE STRING,
SAKNR TYPE STRING,
HZUON TYPE STRING,
LZBKZ TYPE STRING,
LANDL TYPE STRING,
MATNR TYPE STRING,
WERKS TYPE STRING,
MENGE TYPE STRING,
MEINS TYPE STRING,
BPMNG TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
REWRT TYPE STRING,
REWWR TYPE STRING,
ZEKKN TYPE STRING,
LFBNR TYPE STRING,
LFPOS TYPE STRING,
LFGJA TYPE STRING,
BWKEY TYPE STRING,
BWTAR TYPE STRING,
TBTKZ TYPE STRING,
STCEG TYPE STRING,
PRCTR TYPE STRING,
VNAME TYPE STRING,
RECID TYPE STRING,
EGRUP TYPE STRING,
VPTNR TYPE STRING,
VERTT TYPE STRING,
VERTN TYPE STRING,
VBEWA TYPE STRING,
TXJCD TYPE STRING,
DABRZ TYPE STRING,
KSTRG TYPE STRING,
NPLNR TYPE STRING,
AUFPL TYPE STRING,
PS_PSP_PNR TYPE STRING,
PAOBJNR TYPE STRING,
PASUBNR TYPE STRING,
BTYPE TYPE STRING,
ETYPE TYPE STRING,
XEGDR TYPE STRING,
HRKFT TYPE STRING,
FIPOS TYPE STRING,
KOART TYPE STRING,
VPRSV TYPE STRING,
PEINH TYPE STRING,
KDEIN TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
SMWSK TYPE STRING,
SWAER TYPE STRING,
STUNR TYPE STRING,
ZAEHK TYPE STRING,
XFDIS TYPE STRING,
KBLNR TYPE STRING,
KBLPOS TYPE STRING,
STTAX TYPE STRING,
GEBER TYPE STRING,
FISTL TYPE STRING,
VORNR TYPE STRING,
ABPER TYPE STRING,
EREKZ TYPE STRING,
FKBER TYPE STRING,
VBUND TYPE STRING,
XREF1 TYPE STRING,
XREF2 TYPE STRING,
XREF3 TYPE STRING,
CCBTC TYPE STRING,
RSTGR TYPE STRING,
GRICD TYPE STRING,
GRIRG TYPE STRING,
GITYP TYPE STRING,
IDXSP TYPE STRING,
BUZID TYPE STRING,
ERLKZ TYPE STRING,
BUPLA TYPE STRING,
LSTAR TYPE STRING,
PSTYP TYPE STRING,
PRZNR TYPE STRING,
KONTT TYPE STRING,
KONTL TYPE STRING,
HBKID_S TYPE STRING,
HKTID_S TYPE STRING,
DUMMY_INCL_EEW_COBL TYPE STRING,
GRANT_NBR TYPE STRING,
BZDAT TYPE STRING,
XNEGP TYPE STRING,
SEGMENT TYPE STRING,
PSEGMENT TYPE STRING,
UZAWE TYPE STRING,
PGEBER TYPE STRING,
PGRANT_NBR TYPE STRING,
MEASURE TYPE STRING,
BUDGET_PD TYPE STRING,
PBUDGET_PD TYPE STRING,
NETDT TYPE STRING,
SERVICE_DOC_TYPE TYPE STRING,
SERVICE_DOC_ID TYPE STRING,
SERVICE_DOC_ITEM_ID TYPE STRING,
ACROBJTYPE TYPE STRING,
ACRLOGSYS TYPE STRING,
ACROBJ_ID TYPE STRING,
ACRSOBJ_ID TYPE STRING,
ACRITMTYPE TYPE STRING,
ACRREFOBJ_ID TYPE STRING,
ACRVALDAT TYPE STRING,
SDM_VERSION TYPE STRING,
ANLN2_PN TYPE STRING,
BWASL_PN TYPE STRING,
BZDAT_PN TYPE STRING,
XVABG_PN TYPE STRING,
ANBTR_PN TYPE STRING,
PROZS_PN TYPE STRING,
FIPEX TYPE STRING,
PEROP_BEG TYPE STRING,
PEROP_END TYPE STRING,
FASTPAY TYPE STRING,
PPA_EX_IND TYPE STRING,
FMFGUS_KEY TYPE STRING,
PRODPER TYPE STRING,
HSN_SAC TYPE STRING,
INWARD_NO TYPE STRING,
INWARD_DT TYPE STRING,
GROUND_NO TYPE STRING,
GROUND_DT TYPE STRING,
GROUND_TYP TYPE STRING,
CHWRB TYPE STRING,END OF T_EKKO_STR. DATA: WA_IPRQI_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_IPRQI_STR-ACIND sy-vline
WA_IPRQI_STR-OACIN sy-vline
WA_IPRQI_STR-SAKN2 sy-vline
WA_IPRQI_STR-KBLNR_COM sy-vline
WA_IPRQI_STR-KBLPOS_COM sy-vline
WA_IPRQI_STR-FIPOS_COM sy-vline
WA_IPRQI_STR-FISTL_COM sy-vline
WA_IPRQI_STR-GEBER_COM sy-vline
WA_IPRQI_STR-ERLKZ_COM sy-vline
WA_IPRQI_STR-ERLKZ_PAY sy-vline
WA_IPRQI_STR-MANDT sy-vline
WA_IPRQI_STR-AUSBK sy-vline
WA_IPRQI_STR-BELNR sy-vline
WA_IPRQI_STR-GJAHR sy-vline
WA_IPRQI_STR-BZKEY sy-vline
WA_IPRQI_STR-BUKRS sy-vline
WA_IPRQI_STR-BUZEI sy-vline
WA_IPRQI_STR-BSCHL sy-vline
WA_IPRQI_STR-SHKZG sy-vline
WA_IPRQI_STR-GSBER sy-vline
WA_IPRQI_STR-PARGB sy-vline
WA_IPRQI_STR-TAX_COUNTRY sy-vline
WA_IPRQI_STR-MWSKZ sy-vline
WA_IPRQI_STR-TXDAT sy-vline
WA_IPRQI_STR-TXDAT_FROM sy-vline
WA_IPRQI_STR-DMBTR sy-vline
WA_IPRQI_STR-DMBE2 sy-vline
WA_IPRQI_STR-DMBE3 sy-vline
WA_IPRQI_STR-WRBTR sy-vline
WA_IPRQI_STR-HWMET sy-vline
WA_IPRQI_STR-HWBAS sy-vline
WA_IPRQI_STR-FWBAS sy-vline
WA_IPRQI_STR-MWART sy-vline
WA_IPRQI_STR-KURSR sy-vline
WA_IPRQI_STR-GBETR sy-vline
WA_IPRQI_STR-ZFBDT sy-vline
WA_IPRQI_STR-VALUT sy-vline
WA_IPRQI_STR-ZUONR sy-vline
WA_IPRQI_STR-SGTXT sy-vline
WA_IPRQI_STR-ANBWA sy-vline
WA_IPRQI_STR-ZINKZ sy-vline
WA_IPRQI_STR-RMVCT sy-vline
WA_IPRQI_STR-FDLEV sy-vline
WA_IPRQI_STR-FDGRP sy-vline
WA_IPRQI_STR-FDWBT sy-vline
WA_IPRQI_STR-FDTAG sy-vline
WA_IPRQI_STR-KOKRS sy-vline
WA_IPRQI_STR-KOSTL sy-vline
WA_IPRQI_STR-AUFNR sy-vline
WA_IPRQI_STR-KDAUF sy-vline
WA_IPRQI_STR-KDPOS sy-vline
WA_IPRQI_STR-PPRCTR sy-vline
WA_IPRQI_STR-IMKEY sy-vline
WA_IPRQI_STR-PERNR sy-vline
WA_IPRQI_STR-XUMSW sy-vline
WA_IPRQI_STR-XSKRL sy-vline
WA_IPRQI_STR-SAKNR sy-vline
WA_IPRQI_STR-HZUON sy-vline
WA_IPRQI_STR-LZBKZ sy-vline
WA_IPRQI_STR-LANDL sy-vline
WA_IPRQI_STR-MATNR sy-vline
WA_IPRQI_STR-WERKS sy-vline
WA_IPRQI_STR-MENGE sy-vline
WA_IPRQI_STR-MEINS sy-vline
WA_IPRQI_STR-BPMNG sy-vline
WA_IPRQI_STR-EBELN sy-vline
WA_IPRQI_STR-EBELP sy-vline
WA_IPRQI_STR-REWRT sy-vline
WA_IPRQI_STR-REWWR sy-vline
WA_IPRQI_STR-ZEKKN sy-vline
WA_IPRQI_STR-LFBNR sy-vline
WA_IPRQI_STR-LFPOS sy-vline
WA_IPRQI_STR-LFGJA sy-vline
WA_IPRQI_STR-BWKEY sy-vline
WA_IPRQI_STR-BWTAR sy-vline
WA_IPRQI_STR-TBTKZ sy-vline
WA_IPRQI_STR-STCEG sy-vline
WA_IPRQI_STR-PRCTR sy-vline
WA_IPRQI_STR-VNAME sy-vline
WA_IPRQI_STR-RECID sy-vline
WA_IPRQI_STR-EGRUP sy-vline
WA_IPRQI_STR-VPTNR sy-vline
WA_IPRQI_STR-VERTT sy-vline
WA_IPRQI_STR-VERTN sy-vline
WA_IPRQI_STR-VBEWA sy-vline
WA_IPRQI_STR-TXJCD sy-vline
WA_IPRQI_STR-DABRZ sy-vline
WA_IPRQI_STR-KSTRG sy-vline
WA_IPRQI_STR-NPLNR sy-vline
WA_IPRQI_STR-AUFPL sy-vline
WA_IPRQI_STR-PS_PSP_PNR sy-vline
WA_IPRQI_STR-PAOBJNR sy-vline
WA_IPRQI_STR-PASUBNR sy-vline
WA_IPRQI_STR-BTYPE sy-vline
WA_IPRQI_STR-ETYPE sy-vline
WA_IPRQI_STR-XEGDR sy-vline
WA_IPRQI_STR-HRKFT sy-vline
WA_IPRQI_STR-FIPOS sy-vline
WA_IPRQI_STR-KOART sy-vline
WA_IPRQI_STR-VPRSV sy-vline
WA_IPRQI_STR-PEINH sy-vline
WA_IPRQI_STR-KDEIN sy-vline
WA_IPRQI_STR-ANLN1 sy-vline
WA_IPRQI_STR-ANLN2 sy-vline
WA_IPRQI_STR-SMWSK sy-vline
WA_IPRQI_STR-SWAER sy-vline
WA_IPRQI_STR-STUNR sy-vline
WA_IPRQI_STR-ZAEHK sy-vline
WA_IPRQI_STR-XFDIS sy-vline
WA_IPRQI_STR-KBLNR sy-vline
WA_IPRQI_STR-KBLPOS sy-vline
WA_IPRQI_STR-STTAX sy-vline
WA_IPRQI_STR-GEBER sy-vline
WA_IPRQI_STR-FISTL sy-vline
WA_IPRQI_STR-VORNR sy-vline
WA_IPRQI_STR-ABPER sy-vline
WA_IPRQI_STR-EREKZ sy-vline
WA_IPRQI_STR-FKBER sy-vline
WA_IPRQI_STR-VBUND sy-vline
WA_IPRQI_STR-XREF1 sy-vline
WA_IPRQI_STR-XREF2 sy-vline
WA_IPRQI_STR-XREF3 sy-vline
WA_IPRQI_STR-CCBTC sy-vline
WA_IPRQI_STR-RSTGR sy-vline
WA_IPRQI_STR-GRICD sy-vline
WA_IPRQI_STR-GRIRG sy-vline
WA_IPRQI_STR-GITYP sy-vline
WA_IPRQI_STR-IDXSP sy-vline
WA_IPRQI_STR-BUZID sy-vline
WA_IPRQI_STR-ERLKZ sy-vline
WA_IPRQI_STR-BUPLA sy-vline
WA_IPRQI_STR-LSTAR sy-vline
WA_IPRQI_STR-PSTYP sy-vline
WA_IPRQI_STR-PRZNR sy-vline
WA_IPRQI_STR-KONTT sy-vline
WA_IPRQI_STR-KONTL sy-vline
WA_IPRQI_STR-HBKID_S sy-vline
WA_IPRQI_STR-HKTID_S sy-vline
WA_IPRQI_STR-DUMMY_INCL_EEW_COBL sy-vline
WA_IPRQI_STR-GRANT_NBR sy-vline
WA_IPRQI_STR-BZDAT sy-vline
WA_IPRQI_STR-XNEGP sy-vline
WA_IPRQI_STR-SEGMENT sy-vline
WA_IPRQI_STR-PSEGMENT sy-vline
WA_IPRQI_STR-UZAWE sy-vline
WA_IPRQI_STR-PGEBER sy-vline
WA_IPRQI_STR-PGRANT_NBR sy-vline
WA_IPRQI_STR-MEASURE sy-vline
WA_IPRQI_STR-BUDGET_PD sy-vline
WA_IPRQI_STR-PBUDGET_PD sy-vline
WA_IPRQI_STR-NETDT sy-vline
WA_IPRQI_STR-SERVICE_DOC_TYPE sy-vline
WA_IPRQI_STR-SERVICE_DOC_ID sy-vline
WA_IPRQI_STR-SERVICE_DOC_ITEM_ID sy-vline
WA_IPRQI_STR-ACROBJTYPE sy-vline
WA_IPRQI_STR-ACRLOGSYS sy-vline
WA_IPRQI_STR-ACROBJ_ID sy-vline
WA_IPRQI_STR-ACRSOBJ_ID sy-vline
WA_IPRQI_STR-ACRITMTYPE sy-vline
WA_IPRQI_STR-ACRREFOBJ_ID sy-vline
WA_IPRQI_STR-ACRVALDAT sy-vline
WA_IPRQI_STR-SDM_VERSION sy-vline
WA_IPRQI_STR-ANLN2_PN sy-vline
WA_IPRQI_STR-BWASL_PN sy-vline
WA_IPRQI_STR-BZDAT_PN sy-vline
WA_IPRQI_STR-XVABG_PN sy-vline
WA_IPRQI_STR-ANBTR_PN sy-vline
WA_IPRQI_STR-PROZS_PN sy-vline
WA_IPRQI_STR-FIPEX sy-vline
WA_IPRQI_STR-PEROP_BEG sy-vline
WA_IPRQI_STR-PEROP_END sy-vline
WA_IPRQI_STR-FASTPAY sy-vline
WA_IPRQI_STR-PPA_EX_IND sy-vline
WA_IPRQI_STR-FMFGUS_KEY sy-vline
WA_IPRQI_STR-PRODPER sy-vline
WA_IPRQI_STR-HSN_SAC sy-vline
WA_IPRQI_STR-INWARD_NO sy-vline
WA_IPRQI_STR-INWARD_DT sy-vline
WA_IPRQI_STR-GROUND_NO sy-vline
WA_IPRQI_STR-GROUND_DT sy-vline
WA_IPRQI_STR-GROUND_TYP sy-vline
WA_IPRQI_STR-CHWRB sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.