ABAP Select data from SAP table REBD_FUNC_LOC_X 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 REBD_FUNC_LOC_X 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 REBD_FUNC_LOC_X. 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 REBD_FUNC_LOC_X 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_REBD_FUNC_LOC_X TYPE STANDARD TABLE OF REBD_FUNC_LOC_X,
      WA_REBD_FUNC_LOC_X TYPE REBD_FUNC_LOC_X,
      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: <REBD_FUNC_LOC_X> TYPE REBD_FUNC_LOC_X.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM REBD_FUNC_LOC_X
*  INTO TABLE @DATA(IT_REBD_FUNC_LOC_X2).
*--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_REBD_FUNC_LOC_X INDEX 1 INTO DATA(WA_REBD_FUNC_LOC_X2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_REBD_FUNC_LOC_X ASSIGNING <REBD_FUNC_LOC_X>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<REBD_FUNC_LOC_X>-MANDT = 1.
<REBD_FUNC_LOC_X>-EQUNR = 1.
<REBD_FUNC_LOC_X>-ERDAT = 1.
<REBD_FUNC_LOC_X>-ERNAM = 1.
<REBD_FUNC_LOC_X>-AEDAT = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_REBD_FUNC_LOC_X-AENAM, sy-vline,
WA_REBD_FUNC_LOC_X-BEGRU, sy-vline,
WA_REBD_FUNC_LOC_X-EQTYP, sy-vline,
WA_REBD_FUNC_LOC_X-EQART, sy-vline,
WA_REBD_FUNC_LOC_X-LVORM, sy-vline,
WA_REBD_FUNC_LOC_X-INVNR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_REBD_FUNC_LOC_X 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_REBD_FUNC_LOC_X 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_REBD_FUNC_LOC_X INTO WA_REBD_FUNC_LOC_X. *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 EQUNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REBD_FUNC_LOC_X-EQUNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REBD_FUNC_LOC_X-EQUNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit GERNR, internal->external for field SERNR CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT' EXPORTING input = WA_REBD_FUNC_LOC_X-SERNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REBD_FUNC_LOC_X-SERNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit TMPLA, internal->external for field TSEGTP CALL FUNCTION 'CONVERSION_EXIT_TMPLA_OUTPUT' EXPORTING input = WA_REBD_FUNC_LOC_X-TSEGTP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REBD_FUNC_LOC_X-TSEGTP.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit TPLNR, internal->external for field TPLMA CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT' EXPORTING input = WA_REBD_FUNC_LOC_X-TPLMA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REBD_FUNC_LOC_X-TPLMA.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field ADRNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REBD_FUNC_LOC_X-ADRNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REBD_FUNC_LOC_X-ADRNR.
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_REBD_FUNC_LOC_X_STR,
MANDT TYPE STRING,
EQUNR TYPE STRING,
ERDAT TYPE STRING,
ERNAM TYPE STRING,
AEDAT TYPE STRING,
AENAM TYPE STRING,
BEGRU TYPE STRING,
EQTYP TYPE STRING,
EQART TYPE STRING,
LVORM TYPE STRING,
INVNR TYPE STRING,
GROES TYPE STRING,
BRGEW TYPE STRING,
GEWEI TYPE STRING,
ANSDT TYPE STRING,
ANSWT TYPE STRING,
WAERS TYPE STRING,
ELIEF TYPE STRING,
GWLEN TYPE STRING,
GWLDT TYPE STRING,
WDBWT TYPE STRING,
HERST TYPE STRING,
HERLD TYPE STRING,
HZEIN TYPE STRING,
SERGE TYPE STRING,
TYPBZ TYPE STRING,
BAUJJ TYPE STRING,
BAUMM TYPE STRING,
APLKZ TYPE STRING,
AULDT TYPE STRING,
INBDT TYPE STRING,
EQLFN TYPE STRING,
GWLDV TYPE STRING,
EQDAT TYPE STRING,
EQBER TYPE STRING,
EQNUM TYPE STRING,
OBJNR TYPE STRING,
EQSNR TYPE STRING,
CUOBJ TYPE STRING,
KRFKZ TYPE STRING,
KMATN TYPE STRING,
MATNR TYPE STRING,
SERNR TYPE STRING,
WERK TYPE STRING,
LAGER TYPE STRING,
CHARGE TYPE STRING,
KUNDE TYPE STRING,
WARPL TYPE STRING,
IMRC_POINT TYPE STRING,
REVLV TYPE STRING,
MGANR TYPE STRING,
BEGRUI TYPE STRING,
S_EQUI TYPE STRING,
S_SERIAL TYPE STRING,
S_KONFI TYPE STRING,
S_SALE TYPE STRING,
S_FHM TYPE STRING,
S_ELSE TYPE STRING,
S_ISU TYPE STRING,
S_EQBS TYPE STRING,
S_FLEET TYPE STRING,
BSTVP TYPE STRING,
SPARTE TYPE STRING,
HANDLE TYPE STRING,
TSEGTP TYPE STRING,
EMATN TYPE STRING,
ACT_CHANGE_AA TYPE STRING,
S_CC TYPE STRING,
DATLWB TYPE STRING,
UII TYPE STRING,
IUID_TYPE TYPE STRING,
UII_PLANT TYPE STRING,
ENDOFUSE TYPE STRING,
DUMMY_EQUI_INCL_EEW_PS TYPE STRING,
EQEXT_ACTIVE TYPE STRING,
EQUI_SRTYPE TYPE STRING,
EQUI_SNTYPE TYPE STRING,
EQLB_DUTY TYPE STRING,
EQLB_HIDE TYPE STRING,
J_3GDISPO TYPE STRING,
J_3GZDEQUI TYPE STRING,
J_3GEQART TYPE STRING,
J_3GKZMENG TYPE STRING,
J_3GKONDE TYPE STRING,
J_3GFIKTIV TYPE STRING,
J_3GBELTYP TYPE STRING,
MEINS TYPE STRING,
J_3GKZLADG TYPE STRING,
J_3GKZBERG TYPE STRING,
J_3GEIFR TYPE STRING,
J_3GVERMEIN TYPE STRING,
J_3GZULNR TYPE STRING,
/SAPCEM/ABRECHVH TYPE STRING,
/SAPCEM/ABRECHLG TYPE STRING,
/SAPCEM/DISPOGR TYPE STRING,
DATBI TYPE STRING,
EQUZN TYPE STRING,
TIMBI TYPE STRING,
ESTAI TYPE STRING,
ESTAE TYPE STRING,
STNAM TYPE STRING,
DATAB TYPE STRING,
IWERK TYPE STRING,
IWERKI TYPE STRING,
SUBMT TYPE STRING,
MAPAR TYPE STRING,
HEQUI TYPE STRING,
INGRP TYPE STRING,
INGRPI TYPE STRING,
PM_OBJTY TYPE STRING,
TIDNR TYPE STRING,
TIDNRI TYPE STRING,
KUND1 TYPE STRING,
KUND2 TYPE STRING,
KUND3 TYPE STRING,
LIZNR TYPE STRING,
RBNR TYPE STRING,
EZDAT TYPE STRING,
EZBER TYPE STRING,
EZNUM TYPE STRING,
RBNR_I TYPE STRING,
IBLNR TYPE STRING,
BLDAT TYPE STRING,
PVS_FOCUS TYPE STRING,
PPEGUID TYPE STRING,
TECHS TYPE STRING,
FUNCID TYPE STRING,
FRCFIT TYPE STRING,
FRCRMV TYPE STRING,
REF_DESIGNATOR TYPE STRING,
PVS_NODE TYPE STRING,
PVS_OTYPE TYPE STRING,
PVS_APPLOBJ_TYPE TYPE STRING,
TOP_EQUI TYPE STRING,
TOP_EQUI_FLAG TYPE STRING,
J_3GEIGNER TYPE STRING,
J_3GVERWAL TYPE STRING,
J_3GPMAUFE TYPE STRING,
J_3GPMAUFV TYPE STRING,
J_3GPACHT TYPE STRING,
LVORM_Z TYPE STRING,
EQLFN_Z TYPE STRING,
ERDAT_Z TYPE STRING,
ERNAM_Z TYPE STRING,
AEDAT_Z TYPE STRING,
AENAM_Z TYPE STRING,
WKCTR TYPE STRING,
WKCTRI TYPE STRING,
SPRAS TYPE STRING,
KZLTX TYPE STRING,
TXASP TYPE STRING,
SHTXT TYPE STRING,
TPLNR TYPE STRING,
MLANG TYPE STRING,
TPLKZ TYPE STRING,
FLTYP TYPE STRING,
TPLMA TYPE STRING,
TRPNR TYPE STRING,
PSTAE TYPE STRING,
SUBMTI TYPE STRING,
MAPARI TYPE STRING,
IEQUI TYPE STRING,
IEQUII TYPE STRING,
EINZL TYPE STRING,
POSNR TYPE STRING,
ISTYP TYPE STRING,
PREMS TYPE STRING,
DUMMY_IFLOT_INCL_EEW_PS TYPE STRING,
FLLB_DUTY TYPE STRING,
FLLB_HIDE TYPE STRING,
IFLOT_SRTYPE TYPE STRING,
IFLOT_SNTYPE TYPE STRING,
ILOAN TYPE STRING,
ABCKZ TYPE STRING,
ABCKZI TYPE STRING,
EQFNR TYPE STRING,
EQFNRI TYPE STRING,
SWERK TYPE STRING,
SWERKI TYPE STRING,
STORT TYPE STRING,
STORTI TYPE STRING,
MSGRP TYPE STRING,
MSGRPI TYPE STRING,
BEBER TYPE STRING,
BEBERI TYPE STRING,
CR_OBJTY TYPE STRING,
PPSID TYPE STRING,
PPSIDI TYPE STRING,
GSBER TYPE STRING,
GSBERI TYPE STRING,
KOKRS TYPE STRING,
KOKRSI TYPE STRING,
KOSTL TYPE STRING,
KOSTLI TYPE STRING,
PROID TYPE STRING,
PROIDI TYPE STRING,
BUKRS TYPE STRING,
BUKRSI TYPE STRING,
ANLNR TYPE STRING,
ANLNRI TYPE STRING,
ANLUN TYPE STRING,
ANLUNI TYPE STRING,
DAUFN TYPE STRING,
DAUFNI TYPE STRING,
AUFNR TYPE STRING,
AUFNRI TYPE STRING,
TPLNRI TYPE STRING,
VKORG TYPE STRING,
VKORGI TYPE STRING,
VTWEG TYPE STRING,
VTWEGI TYPE STRING,
SPART TYPE STRING,
SPARTI TYPE STRING,
ADRNR TYPE STRING,
ADRNRI TYPE STRING,
OWNER TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,END OF T_EKKO_STR. DATA: WA_REBD_FUNC_LOC_X_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_REBD_FUNC_LOC_X_STR-MANDT sy-vline
WA_REBD_FUNC_LOC_X_STR-EQUNR sy-vline
WA_REBD_FUNC_LOC_X_STR-ERDAT sy-vline
WA_REBD_FUNC_LOC_X_STR-ERNAM sy-vline
WA_REBD_FUNC_LOC_X_STR-AEDAT sy-vline
WA_REBD_FUNC_LOC_X_STR-AENAM sy-vline
WA_REBD_FUNC_LOC_X_STR-BEGRU sy-vline
WA_REBD_FUNC_LOC_X_STR-EQTYP sy-vline
WA_REBD_FUNC_LOC_X_STR-EQART sy-vline
WA_REBD_FUNC_LOC_X_STR-LVORM sy-vline
WA_REBD_FUNC_LOC_X_STR-INVNR sy-vline
WA_REBD_FUNC_LOC_X_STR-GROES sy-vline
WA_REBD_FUNC_LOC_X_STR-BRGEW sy-vline
WA_REBD_FUNC_LOC_X_STR-GEWEI sy-vline
WA_REBD_FUNC_LOC_X_STR-ANSDT sy-vline
WA_REBD_FUNC_LOC_X_STR-ANSWT sy-vline
WA_REBD_FUNC_LOC_X_STR-WAERS sy-vline
WA_REBD_FUNC_LOC_X_STR-ELIEF sy-vline
WA_REBD_FUNC_LOC_X_STR-GWLEN sy-vline
WA_REBD_FUNC_LOC_X_STR-GWLDT sy-vline
WA_REBD_FUNC_LOC_X_STR-WDBWT sy-vline
WA_REBD_FUNC_LOC_X_STR-HERST sy-vline
WA_REBD_FUNC_LOC_X_STR-HERLD sy-vline
WA_REBD_FUNC_LOC_X_STR-HZEIN sy-vline
WA_REBD_FUNC_LOC_X_STR-SERGE sy-vline
WA_REBD_FUNC_LOC_X_STR-TYPBZ sy-vline
WA_REBD_FUNC_LOC_X_STR-BAUJJ sy-vline
WA_REBD_FUNC_LOC_X_STR-BAUMM sy-vline
WA_REBD_FUNC_LOC_X_STR-APLKZ sy-vline
WA_REBD_FUNC_LOC_X_STR-AULDT sy-vline
WA_REBD_FUNC_LOC_X_STR-INBDT sy-vline
WA_REBD_FUNC_LOC_X_STR-EQLFN sy-vline
WA_REBD_FUNC_LOC_X_STR-GWLDV sy-vline
WA_REBD_FUNC_LOC_X_STR-EQDAT sy-vline
WA_REBD_FUNC_LOC_X_STR-EQBER sy-vline
WA_REBD_FUNC_LOC_X_STR-EQNUM sy-vline
WA_REBD_FUNC_LOC_X_STR-OBJNR sy-vline
WA_REBD_FUNC_LOC_X_STR-EQSNR sy-vline
WA_REBD_FUNC_LOC_X_STR-CUOBJ sy-vline
WA_REBD_FUNC_LOC_X_STR-KRFKZ sy-vline
WA_REBD_FUNC_LOC_X_STR-KMATN sy-vline
WA_REBD_FUNC_LOC_X_STR-MATNR sy-vline
WA_REBD_FUNC_LOC_X_STR-SERNR sy-vline
WA_REBD_FUNC_LOC_X_STR-WERK sy-vline
WA_REBD_FUNC_LOC_X_STR-LAGER sy-vline
WA_REBD_FUNC_LOC_X_STR-CHARGE sy-vline
WA_REBD_FUNC_LOC_X_STR-KUNDE sy-vline
WA_REBD_FUNC_LOC_X_STR-WARPL sy-vline
WA_REBD_FUNC_LOC_X_STR-IMRC_POINT sy-vline
WA_REBD_FUNC_LOC_X_STR-REVLV sy-vline
WA_REBD_FUNC_LOC_X_STR-MGANR sy-vline
WA_REBD_FUNC_LOC_X_STR-BEGRUI sy-vline
WA_REBD_FUNC_LOC_X_STR-S_EQUI sy-vline
WA_REBD_FUNC_LOC_X_STR-S_SERIAL sy-vline
WA_REBD_FUNC_LOC_X_STR-S_KONFI sy-vline
WA_REBD_FUNC_LOC_X_STR-S_SALE sy-vline
WA_REBD_FUNC_LOC_X_STR-S_FHM sy-vline
WA_REBD_FUNC_LOC_X_STR-S_ELSE sy-vline
WA_REBD_FUNC_LOC_X_STR-S_ISU sy-vline
WA_REBD_FUNC_LOC_X_STR-S_EQBS sy-vline
WA_REBD_FUNC_LOC_X_STR-S_FLEET sy-vline
WA_REBD_FUNC_LOC_X_STR-BSTVP sy-vline
WA_REBD_FUNC_LOC_X_STR-SPARTE sy-vline
WA_REBD_FUNC_LOC_X_STR-HANDLE sy-vline
WA_REBD_FUNC_LOC_X_STR-TSEGTP sy-vline
WA_REBD_FUNC_LOC_X_STR-EMATN sy-vline
WA_REBD_FUNC_LOC_X_STR-ACT_CHANGE_AA sy-vline
WA_REBD_FUNC_LOC_X_STR-S_CC sy-vline
WA_REBD_FUNC_LOC_X_STR-DATLWB sy-vline
WA_REBD_FUNC_LOC_X_STR-UII sy-vline
WA_REBD_FUNC_LOC_X_STR-IUID_TYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-UII_PLANT sy-vline
WA_REBD_FUNC_LOC_X_STR-ENDOFUSE sy-vline
WA_REBD_FUNC_LOC_X_STR-DUMMY_EQUI_INCL_EEW_PS sy-vline
WA_REBD_FUNC_LOC_X_STR-EQEXT_ACTIVE sy-vline
WA_REBD_FUNC_LOC_X_STR-EQUI_SRTYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-EQUI_SNTYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-EQLB_DUTY sy-vline
WA_REBD_FUNC_LOC_X_STR-EQLB_HIDE sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GDISPO sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GZDEQUI sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GEQART sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GKZMENG sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GKONDE sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GFIKTIV sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GBELTYP sy-vline
WA_REBD_FUNC_LOC_X_STR-MEINS sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GKZLADG sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GKZBERG sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GEIFR sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GVERMEIN sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GZULNR sy-vline
WA_REBD_FUNC_LOC_X_STR-/SAPCEM/ABRECHVH sy-vline
WA_REBD_FUNC_LOC_X_STR-/SAPCEM/ABRECHLG sy-vline
WA_REBD_FUNC_LOC_X_STR-/SAPCEM/DISPOGR sy-vline
WA_REBD_FUNC_LOC_X_STR-DATBI sy-vline
WA_REBD_FUNC_LOC_X_STR-EQUZN sy-vline
WA_REBD_FUNC_LOC_X_STR-TIMBI sy-vline
WA_REBD_FUNC_LOC_X_STR-ESTAI sy-vline
WA_REBD_FUNC_LOC_X_STR-ESTAE sy-vline
WA_REBD_FUNC_LOC_X_STR-STNAM sy-vline
WA_REBD_FUNC_LOC_X_STR-DATAB sy-vline
WA_REBD_FUNC_LOC_X_STR-IWERK sy-vline
WA_REBD_FUNC_LOC_X_STR-IWERKI sy-vline
WA_REBD_FUNC_LOC_X_STR-SUBMT sy-vline
WA_REBD_FUNC_LOC_X_STR-MAPAR sy-vline
WA_REBD_FUNC_LOC_X_STR-HEQUI sy-vline
WA_REBD_FUNC_LOC_X_STR-INGRP sy-vline
WA_REBD_FUNC_LOC_X_STR-INGRPI sy-vline
WA_REBD_FUNC_LOC_X_STR-PM_OBJTY sy-vline
WA_REBD_FUNC_LOC_X_STR-TIDNR sy-vline
WA_REBD_FUNC_LOC_X_STR-TIDNRI sy-vline
WA_REBD_FUNC_LOC_X_STR-KUND1 sy-vline
WA_REBD_FUNC_LOC_X_STR-KUND2 sy-vline
WA_REBD_FUNC_LOC_X_STR-KUND3 sy-vline
WA_REBD_FUNC_LOC_X_STR-LIZNR sy-vline
WA_REBD_FUNC_LOC_X_STR-RBNR sy-vline
WA_REBD_FUNC_LOC_X_STR-EZDAT sy-vline
WA_REBD_FUNC_LOC_X_STR-EZBER sy-vline
WA_REBD_FUNC_LOC_X_STR-EZNUM sy-vline
WA_REBD_FUNC_LOC_X_STR-RBNR_I sy-vline
WA_REBD_FUNC_LOC_X_STR-IBLNR sy-vline
WA_REBD_FUNC_LOC_X_STR-BLDAT sy-vline
WA_REBD_FUNC_LOC_X_STR-PVS_FOCUS sy-vline
WA_REBD_FUNC_LOC_X_STR-PPEGUID sy-vline
WA_REBD_FUNC_LOC_X_STR-TECHS sy-vline
WA_REBD_FUNC_LOC_X_STR-FUNCID sy-vline
WA_REBD_FUNC_LOC_X_STR-FRCFIT sy-vline
WA_REBD_FUNC_LOC_X_STR-FRCRMV sy-vline
WA_REBD_FUNC_LOC_X_STR-REF_DESIGNATOR sy-vline
WA_REBD_FUNC_LOC_X_STR-PVS_NODE sy-vline
WA_REBD_FUNC_LOC_X_STR-PVS_OTYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-PVS_APPLOBJ_TYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-TOP_EQUI sy-vline
WA_REBD_FUNC_LOC_X_STR-TOP_EQUI_FLAG sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GEIGNER sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GVERWAL sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GPMAUFE sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GPMAUFV sy-vline
WA_REBD_FUNC_LOC_X_STR-J_3GPACHT sy-vline
WA_REBD_FUNC_LOC_X_STR-LVORM_Z sy-vline
WA_REBD_FUNC_LOC_X_STR-EQLFN_Z sy-vline
WA_REBD_FUNC_LOC_X_STR-ERDAT_Z sy-vline
WA_REBD_FUNC_LOC_X_STR-ERNAM_Z sy-vline
WA_REBD_FUNC_LOC_X_STR-AEDAT_Z sy-vline
WA_REBD_FUNC_LOC_X_STR-AENAM_Z sy-vline
WA_REBD_FUNC_LOC_X_STR-WKCTR sy-vline
WA_REBD_FUNC_LOC_X_STR-WKCTRI sy-vline
WA_REBD_FUNC_LOC_X_STR-SPRAS sy-vline
WA_REBD_FUNC_LOC_X_STR-KZLTX sy-vline
WA_REBD_FUNC_LOC_X_STR-TXASP sy-vline
WA_REBD_FUNC_LOC_X_STR-SHTXT sy-vline
WA_REBD_FUNC_LOC_X_STR-TPLNR sy-vline
WA_REBD_FUNC_LOC_X_STR-MLANG sy-vline
WA_REBD_FUNC_LOC_X_STR-TPLKZ sy-vline
WA_REBD_FUNC_LOC_X_STR-FLTYP sy-vline
WA_REBD_FUNC_LOC_X_STR-TPLMA sy-vline
WA_REBD_FUNC_LOC_X_STR-TRPNR sy-vline
WA_REBD_FUNC_LOC_X_STR-PSTAE sy-vline
WA_REBD_FUNC_LOC_X_STR-SUBMTI sy-vline
WA_REBD_FUNC_LOC_X_STR-MAPARI sy-vline
WA_REBD_FUNC_LOC_X_STR-IEQUI sy-vline
WA_REBD_FUNC_LOC_X_STR-IEQUII sy-vline
WA_REBD_FUNC_LOC_X_STR-EINZL sy-vline
WA_REBD_FUNC_LOC_X_STR-POSNR sy-vline
WA_REBD_FUNC_LOC_X_STR-ISTYP sy-vline
WA_REBD_FUNC_LOC_X_STR-PREMS sy-vline
WA_REBD_FUNC_LOC_X_STR-DUMMY_IFLOT_INCL_EEW_PS sy-vline
WA_REBD_FUNC_LOC_X_STR-FLLB_DUTY sy-vline
WA_REBD_FUNC_LOC_X_STR-FLLB_HIDE sy-vline
WA_REBD_FUNC_LOC_X_STR-IFLOT_SRTYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-IFLOT_SNTYPE sy-vline
WA_REBD_FUNC_LOC_X_STR-ILOAN sy-vline
WA_REBD_FUNC_LOC_X_STR-ABCKZ sy-vline
WA_REBD_FUNC_LOC_X_STR-ABCKZI sy-vline
WA_REBD_FUNC_LOC_X_STR-EQFNR sy-vline
WA_REBD_FUNC_LOC_X_STR-EQFNRI sy-vline
WA_REBD_FUNC_LOC_X_STR-SWERK sy-vline
WA_REBD_FUNC_LOC_X_STR-SWERKI sy-vline
WA_REBD_FUNC_LOC_X_STR-STORT sy-vline
WA_REBD_FUNC_LOC_X_STR-STORTI sy-vline
WA_REBD_FUNC_LOC_X_STR-MSGRP sy-vline
WA_REBD_FUNC_LOC_X_STR-MSGRPI sy-vline
WA_REBD_FUNC_LOC_X_STR-BEBER sy-vline
WA_REBD_FUNC_LOC_X_STR-BEBERI sy-vline
WA_REBD_FUNC_LOC_X_STR-CR_OBJTY sy-vline
WA_REBD_FUNC_LOC_X_STR-PPSID sy-vline
WA_REBD_FUNC_LOC_X_STR-PPSIDI sy-vline
WA_REBD_FUNC_LOC_X_STR-GSBER sy-vline
WA_REBD_FUNC_LOC_X_STR-GSBERI sy-vline
WA_REBD_FUNC_LOC_X_STR-KOKRS sy-vline
WA_REBD_FUNC_LOC_X_STR-KOKRSI sy-vline
WA_REBD_FUNC_LOC_X_STR-KOSTL sy-vline
WA_REBD_FUNC_LOC_X_STR-KOSTLI sy-vline
WA_REBD_FUNC_LOC_X_STR-PROID sy-vline
WA_REBD_FUNC_LOC_X_STR-PROIDI sy-vline
WA_REBD_FUNC_LOC_X_STR-BUKRS sy-vline
WA_REBD_FUNC_LOC_X_STR-BUKRSI sy-vline
WA_REBD_FUNC_LOC_X_STR-ANLNR sy-vline
WA_REBD_FUNC_LOC_X_STR-ANLNRI sy-vline
WA_REBD_FUNC_LOC_X_STR-ANLUN sy-vline
WA_REBD_FUNC_LOC_X_STR-ANLUNI sy-vline
WA_REBD_FUNC_LOC_X_STR-DAUFN sy-vline
WA_REBD_FUNC_LOC_X_STR-DAUFNI sy-vline
WA_REBD_FUNC_LOC_X_STR-AUFNR sy-vline
WA_REBD_FUNC_LOC_X_STR-AUFNRI sy-vline
WA_REBD_FUNC_LOC_X_STR-TPLNRI sy-vline
WA_REBD_FUNC_LOC_X_STR-VKORG sy-vline
WA_REBD_FUNC_LOC_X_STR-VKORGI sy-vline
WA_REBD_FUNC_LOC_X_STR-VTWEG sy-vline
WA_REBD_FUNC_LOC_X_STR-VTWEGI sy-vline
WA_REBD_FUNC_LOC_X_STR-SPART sy-vline
WA_REBD_FUNC_LOC_X_STR-SPARTI sy-vline
WA_REBD_FUNC_LOC_X_STR-ADRNR sy-vline
WA_REBD_FUNC_LOC_X_STR-ADRNRI sy-vline
WA_REBD_FUNC_LOC_X_STR-OWNER sy-vline
WA_REBD_FUNC_LOC_X_STR-VKBUR sy-vline
WA_REBD_FUNC_LOC_X_STR-VKGRP sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.