ABAP Select data from SAP table MPES_RTGV_PRT 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 MPES_RTGV_PRT 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 MPES_RTGV_PRT. 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 MPES_RTGV_PRT 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_MPES_RTGV_PRT TYPE STANDARD TABLE OF MPES_RTGV_PRT,
      WA_MPES_RTGV_PRT TYPE MPES_RTGV_PRT,
      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: <MPES_RTGV_PRT> TYPE MPES_RTGV_PRT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM MPES_RTGV_PRT
*  INTO TABLE @DATA(IT_MPES_RTGV_PRT2).
*--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_MPES_RTGV_PRT INDEX 1 INTO DATA(WA_MPES_RTGV_PRT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_MPES_RTGV_PRT ASSIGNING <MPES_RTGV_PRT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<MPES_RTGV_PRT>-PLNTY = 1.
<MPES_RTGV_PRT>-PLNNR = 1.
<MPES_RTGV_PRT>-PLNAL = 1.
<MPES_RTGV_PRT>-VERSN = 1.
<MPES_RTGV_PRT>-PLNFL = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_MPES_RTGV_PRT-PLNKN, sy-vline,
WA_MPES_RTGV_PRT-PZLFH, sy-vline,
WA_MPES_RTGV_PRT-DATUV, sy-vline,
WA_MPES_RTGV_PRT-TECHV, sy-vline,
WA_MPES_RTGV_PRT-LOEKZ, sy-vline,
WA_MPES_RTGV_PRT-PARKZ, sy-vline.
ENDLOOP. *Add any further fields from structure WA_MPES_RTGV_PRT 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_MPES_RTGV_PRT 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_MPES_RTGV_PRT INTO WA_MPES_RTGV_PRT. *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 PLNNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_MPES_RTGV_PRT-PLNNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MPES_RTGV_PRT-PLNNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field VERSN_REFT_OLD CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_MPES_RTGV_PRT-VERSN_REFT_OLD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MPES_RTGV_PRT-VERSN_REFT_OLD.
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_MPES_RTGV_PRT_STR,
PLNTY TYPE STRING,
PLNNR TYPE STRING,
PLNAL TYPE STRING,
VERSN TYPE STRING,
PLNFL TYPE STRING,
PLNKN TYPE STRING,
PZLFH TYPE STRING,
DATUV TYPE STRING,
TECHV TYPE STRING,
LOEKZ TYPE STRING,
PARKZ TYPE STRING,
AENNR TYPE STRING,
DATUI TYPE STRING,
USERI TYPE STRING,
DATUC TYPE STRING,
USERC TYPE STRING,
OBJTY TYPE STRING,
OBJID TYPE STRING,
OBJCT TYPE STRING,
PSNFH TYPE STRING,
STEUF TYPE STRING,
KZKBL TYPE STRING,
BZOFFB TYPE STRING,
OFFSTB TYPE STRING,
EHOFFB TYPE STRING,
BZOFFE TYPE STRING,
OFFSTE TYPE STRING,
EHOFFE TYPE STRING,
MGEINH TYPE STRING,
MGVGW TYPE STRING,
MGFORM TYPE STRING,
EWEINH TYPE STRING,
EWVGW TYPE STRING,
EWFORM TYPE STRING,
TXTSP TYPE STRING,
KTSCH TYPE STRING,
TXTZ1 TYPE STRING,
KNOBJ TYPE STRING,
GP_KRIT1 TYPE STRING,
VPLTY TYPE STRING,
VPLNR TYPE STRING,
VPLAL TYPE STRING,
IDENT TYPE STRING,
IDENT_REF TYPE STRING,
HERKUNFT TYPE STRING,
MGSOL TYPE STRING,
MGIST TYPE STRING,
MGRST TYPE STRING,
MGAUS TYPE STRING,
EWSOL TYPE STRING,
EWIST TYPE STRING,
EWRST TYPE STRING,
FHMAR TYPE STRING,
FHMNR TYPE STRING,
FHWRK TYPE STRING,
MATNR TYPE STRING,
SFHNR TYPE STRING,
DOKAR TYPE STRING,
DOKNR TYPE STRING,
DOKTL TYPE STRING,
DOKVR TYPE STRING,
EQUNR TYPE STRING,
EQWPL TYPE STRING,
EQWTX TYPE STRING,
EQPNT TYPE STRING,
EQPTX TYPE STRING,
ATNAM TYPE STRING,
ATVOR TYPE STRING,
MSEHI TYPE STRING,
ATDIM TYPE STRING,
ANZDZ TYPE STRING,
FHKTX TYPE STRING,
BASEH TYPE STRING,
MEINS TYPE STRING,
FGRU1 TYPE STRING,
FGRU2 TYPE STRING,
STOWK TYPE STRING,
STORT TYPE STRING,
STEUF_REF TYPE STRING,
KTSCH_REF TYPE STRING,
BZOFFB_REF TYPE STRING,
OFFSTB_REF TYPE STRING,
BZOFFE_REF TYPE STRING,
OFFSTE_REF TYPE STRING,
MGFORM_REF TYPE STRING,
EWFORM_REF TYPE STRING,
DATUB TYPE STRING,
AENNR_AUS TYPE STRING,
TXTKZ TYPE STRING,
CF_KZSVS TYPE STRING,
CF_KZSVE TYPE STRING,
CF_KZEVS TYPE STRING,
CF_KZEVE TYPE STRING,
VORNR TYPE STRING,
LONG_TEXT_EXIST TYPE STRING,
VERSN_SOURCE TYPE STRING,
VERSN_SOURCE_PZLFH TYPE STRING,
VERSN_ORIGIN_ROUTING TYPE STRING,
ORIGIN_TEXT TYPE STRING,
REGISTRABLE TYPE STRING,
FAKTX TYPE STRING,
EQKTX TYPE STRING,
MAKTX TYPE STRING,
FHMAR_EXT TYPE STRING,
STA_ASSIGNMENT_TYPE TYPE STRING,
STA_ASSIGNMENT_TYPE_DESCR TYPE STRING,
OAN_ID TYPE STRING,
OAN_VERSION_NO TYPE STRING,
OAN_ELEMENT_NUMBER TYPE STRING,
OAN_SEGMENT_TYPE TYPE STRING,
OA_ID TYPE STRING,
OA_VERSION_NO TYPE STRING,
OAN_ELEMENT_NUMBER_EXT TYPE STRING,
OAN_ELEMENT_AENNR TYPE STRING,
OAN_SEGMENT_TYPE_TEXT TYPE STRING,
OAN_GROUP_TYPE TYPE STRING,
OA_SOURCE_ID TYPE STRING,
OA_ACTIVITY_SASNAME TYPE STRING,
OA_SFI_SASNAME TYPE STRING,
OA_TEXT TYPE STRING,
OA_ORIGINAL_COUNT TYPE STRING,
OA_PRED_ELEMENT_NUMBER TYPE STRING,
OA_GROUP_ELEMENT_NUMBER TYPE STRING,
OA_LINKED_TO_PRED TYPE STRING,
OA_WI_EMB_UUID TYPE STRING,
OA_PROCESS_SEQUENCE TYPE STRING,
OA_DISPLAY_ORDER_IN_SEGMENT TYPE STRING,
OA_EXECUTION_STATUS TYPE STRING,
OA_EXECUTION_STATUS_DESCR TYPE STRING,
FAV_GUID TYPE STRING,
FAV_VERSN TYPE STRING,
FAV_GUID_OLD TYPE STRING,
FAV_VERSN_OLD TYPE STRING,
PLNTY_REFT TYPE STRING,
PLNNR_REFT TYPE STRING,
PLNAL_REFT TYPE STRING,
VERSN_REFT TYPE STRING,
PLNTY_REFT_OLD TYPE STRING,
PLNNR_REFT_OLD TYPE STRING,
PLNAL_REFT_OLD TYPE STRING,
VERSN_REFT_OLD TYPE STRING,
TEMPLATE_REFERENCE_OBJECT TYPE STRING,
TEMPLATE_REFERENCE_OBJECT_DISP TYPE STRING,
TEMPLATE_REFERENCE_OBJECT_DESC TYPE STRING,
TEMPLATE_REFERENCE_OBJECT_VERS TYPE STRING,
EFFECTIVITY_TYPE TYPE STRING,
EFF_STRING TYPE STRING,
OA_IS_OPTIONAL TYPE STRING,
CREATED_BY TYPE STRING,
CREATED_AT TYPE STRING,
CHANGED_BY TYPE STRING,
CHANGED_AT TYPE STRING,
HAS_COMPONENTS TYPE STRING,
HAS_PRT TYPE STRING,
HAS_DOC TYPE STRING,
HAS_INSPCHAR TYPE STRING,
HAS_WORKINSTR TYPE STRING,
HAS_CERTIF TYPE STRING,
HAS_QUALIF TYPE STRING,
HAS_REFMAT TYPE STRING,
HAS_BUYOFF TYPE STRING,
HAS_PREDECESSORS TYPE STRING,
HAS_LCOMP TYPE STRING,
HAS_SUCCESSORS TYPE STRING,
NOT_CHANGEABLE TYPE STRING,
PART_OF_PARENT_ORDER TYPE STRING,
INSERT_BEFORE_NOT_POSSIBLE TYPE STRING,
INSERT_AFTER_NOT_POSSIBLE TYPE STRING,
DUMMY_MPE_OA_INCL_EEW_PS TYPE STRING,
DUMMY_MPE_DOC_INCL_EEW_PS TYPE STRING,END OF T_EKKO_STR. DATA: WA_MPES_RTGV_PRT_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_MPES_RTGV_PRT_STR-PLNTY sy-vline
WA_MPES_RTGV_PRT_STR-PLNNR sy-vline
WA_MPES_RTGV_PRT_STR-PLNAL sy-vline
WA_MPES_RTGV_PRT_STR-VERSN sy-vline
WA_MPES_RTGV_PRT_STR-PLNFL sy-vline
WA_MPES_RTGV_PRT_STR-PLNKN sy-vline
WA_MPES_RTGV_PRT_STR-PZLFH sy-vline
WA_MPES_RTGV_PRT_STR-DATUV sy-vline
WA_MPES_RTGV_PRT_STR-TECHV sy-vline
WA_MPES_RTGV_PRT_STR-LOEKZ sy-vline
WA_MPES_RTGV_PRT_STR-PARKZ sy-vline
WA_MPES_RTGV_PRT_STR-AENNR sy-vline
WA_MPES_RTGV_PRT_STR-DATUI sy-vline
WA_MPES_RTGV_PRT_STR-USERI sy-vline
WA_MPES_RTGV_PRT_STR-DATUC sy-vline
WA_MPES_RTGV_PRT_STR-USERC sy-vline
WA_MPES_RTGV_PRT_STR-OBJTY sy-vline
WA_MPES_RTGV_PRT_STR-OBJID sy-vline
WA_MPES_RTGV_PRT_STR-OBJCT sy-vline
WA_MPES_RTGV_PRT_STR-PSNFH sy-vline
WA_MPES_RTGV_PRT_STR-STEUF sy-vline
WA_MPES_RTGV_PRT_STR-KZKBL sy-vline
WA_MPES_RTGV_PRT_STR-BZOFFB sy-vline
WA_MPES_RTGV_PRT_STR-OFFSTB sy-vline
WA_MPES_RTGV_PRT_STR-EHOFFB sy-vline
WA_MPES_RTGV_PRT_STR-BZOFFE sy-vline
WA_MPES_RTGV_PRT_STR-OFFSTE sy-vline
WA_MPES_RTGV_PRT_STR-EHOFFE sy-vline
WA_MPES_RTGV_PRT_STR-MGEINH sy-vline
WA_MPES_RTGV_PRT_STR-MGVGW sy-vline
WA_MPES_RTGV_PRT_STR-MGFORM sy-vline
WA_MPES_RTGV_PRT_STR-EWEINH sy-vline
WA_MPES_RTGV_PRT_STR-EWVGW sy-vline
WA_MPES_RTGV_PRT_STR-EWFORM sy-vline
WA_MPES_RTGV_PRT_STR-TXTSP sy-vline
WA_MPES_RTGV_PRT_STR-KTSCH sy-vline
WA_MPES_RTGV_PRT_STR-TXTZ1 sy-vline
WA_MPES_RTGV_PRT_STR-KNOBJ sy-vline
WA_MPES_RTGV_PRT_STR-GP_KRIT1 sy-vline
WA_MPES_RTGV_PRT_STR-VPLTY sy-vline
WA_MPES_RTGV_PRT_STR-VPLNR sy-vline
WA_MPES_RTGV_PRT_STR-VPLAL sy-vline
WA_MPES_RTGV_PRT_STR-IDENT sy-vline
WA_MPES_RTGV_PRT_STR-IDENT_REF sy-vline
WA_MPES_RTGV_PRT_STR-HERKUNFT sy-vline
WA_MPES_RTGV_PRT_STR-MGSOL sy-vline
WA_MPES_RTGV_PRT_STR-MGIST sy-vline
WA_MPES_RTGV_PRT_STR-MGRST sy-vline
WA_MPES_RTGV_PRT_STR-MGAUS sy-vline
WA_MPES_RTGV_PRT_STR-EWSOL sy-vline
WA_MPES_RTGV_PRT_STR-EWIST sy-vline
WA_MPES_RTGV_PRT_STR-EWRST sy-vline
WA_MPES_RTGV_PRT_STR-FHMAR sy-vline
WA_MPES_RTGV_PRT_STR-FHMNR sy-vline
WA_MPES_RTGV_PRT_STR-FHWRK sy-vline
WA_MPES_RTGV_PRT_STR-MATNR sy-vline
WA_MPES_RTGV_PRT_STR-SFHNR sy-vline
WA_MPES_RTGV_PRT_STR-DOKAR sy-vline
WA_MPES_RTGV_PRT_STR-DOKNR sy-vline
WA_MPES_RTGV_PRT_STR-DOKTL sy-vline
WA_MPES_RTGV_PRT_STR-DOKVR sy-vline
WA_MPES_RTGV_PRT_STR-EQUNR sy-vline
WA_MPES_RTGV_PRT_STR-EQWPL sy-vline
WA_MPES_RTGV_PRT_STR-EQWTX sy-vline
WA_MPES_RTGV_PRT_STR-EQPNT sy-vline
WA_MPES_RTGV_PRT_STR-EQPTX sy-vline
WA_MPES_RTGV_PRT_STR-ATNAM sy-vline
WA_MPES_RTGV_PRT_STR-ATVOR sy-vline
WA_MPES_RTGV_PRT_STR-MSEHI sy-vline
WA_MPES_RTGV_PRT_STR-ATDIM sy-vline
WA_MPES_RTGV_PRT_STR-ANZDZ sy-vline
WA_MPES_RTGV_PRT_STR-FHKTX sy-vline
WA_MPES_RTGV_PRT_STR-BASEH sy-vline
WA_MPES_RTGV_PRT_STR-MEINS sy-vline
WA_MPES_RTGV_PRT_STR-FGRU1 sy-vline
WA_MPES_RTGV_PRT_STR-FGRU2 sy-vline
WA_MPES_RTGV_PRT_STR-STOWK sy-vline
WA_MPES_RTGV_PRT_STR-STORT sy-vline
WA_MPES_RTGV_PRT_STR-STEUF_REF sy-vline
WA_MPES_RTGV_PRT_STR-KTSCH_REF sy-vline
WA_MPES_RTGV_PRT_STR-BZOFFB_REF sy-vline
WA_MPES_RTGV_PRT_STR-OFFSTB_REF sy-vline
WA_MPES_RTGV_PRT_STR-BZOFFE_REF sy-vline
WA_MPES_RTGV_PRT_STR-OFFSTE_REF sy-vline
WA_MPES_RTGV_PRT_STR-MGFORM_REF sy-vline
WA_MPES_RTGV_PRT_STR-EWFORM_REF sy-vline
WA_MPES_RTGV_PRT_STR-DATUB sy-vline
WA_MPES_RTGV_PRT_STR-AENNR_AUS sy-vline
WA_MPES_RTGV_PRT_STR-TXTKZ sy-vline
WA_MPES_RTGV_PRT_STR-CF_KZSVS sy-vline
WA_MPES_RTGV_PRT_STR-CF_KZSVE sy-vline
WA_MPES_RTGV_PRT_STR-CF_KZEVS sy-vline
WA_MPES_RTGV_PRT_STR-CF_KZEVE sy-vline
WA_MPES_RTGV_PRT_STR-VORNR sy-vline
WA_MPES_RTGV_PRT_STR-LONG_TEXT_EXIST sy-vline
WA_MPES_RTGV_PRT_STR-VERSN_SOURCE sy-vline
WA_MPES_RTGV_PRT_STR-VERSN_SOURCE_PZLFH sy-vline
WA_MPES_RTGV_PRT_STR-VERSN_ORIGIN_ROUTING sy-vline
WA_MPES_RTGV_PRT_STR-ORIGIN_TEXT sy-vline
WA_MPES_RTGV_PRT_STR-REGISTRABLE sy-vline
WA_MPES_RTGV_PRT_STR-FAKTX sy-vline
WA_MPES_RTGV_PRT_STR-EQKTX sy-vline
WA_MPES_RTGV_PRT_STR-MAKTX sy-vline
WA_MPES_RTGV_PRT_STR-FHMAR_EXT sy-vline
WA_MPES_RTGV_PRT_STR-STA_ASSIGNMENT_TYPE sy-vline
WA_MPES_RTGV_PRT_STR-STA_ASSIGNMENT_TYPE_DESCR sy-vline
WA_MPES_RTGV_PRT_STR-OAN_ID sy-vline
WA_MPES_RTGV_PRT_STR-OAN_VERSION_NO sy-vline
WA_MPES_RTGV_PRT_STR-OAN_ELEMENT_NUMBER sy-vline
WA_MPES_RTGV_PRT_STR-OAN_SEGMENT_TYPE sy-vline
WA_MPES_RTGV_PRT_STR-OA_ID sy-vline
WA_MPES_RTGV_PRT_STR-OA_VERSION_NO sy-vline
WA_MPES_RTGV_PRT_STR-OAN_ELEMENT_NUMBER_EXT sy-vline
WA_MPES_RTGV_PRT_STR-OAN_ELEMENT_AENNR sy-vline
WA_MPES_RTGV_PRT_STR-OAN_SEGMENT_TYPE_TEXT sy-vline
WA_MPES_RTGV_PRT_STR-OAN_GROUP_TYPE sy-vline
WA_MPES_RTGV_PRT_STR-OA_SOURCE_ID sy-vline
WA_MPES_RTGV_PRT_STR-OA_ACTIVITY_SASNAME sy-vline
WA_MPES_RTGV_PRT_STR-OA_SFI_SASNAME sy-vline
WA_MPES_RTGV_PRT_STR-OA_TEXT sy-vline
WA_MPES_RTGV_PRT_STR-OA_ORIGINAL_COUNT sy-vline
WA_MPES_RTGV_PRT_STR-OA_PRED_ELEMENT_NUMBER sy-vline
WA_MPES_RTGV_PRT_STR-OA_GROUP_ELEMENT_NUMBER sy-vline
WA_MPES_RTGV_PRT_STR-OA_LINKED_TO_PRED sy-vline
WA_MPES_RTGV_PRT_STR-OA_WI_EMB_UUID sy-vline
WA_MPES_RTGV_PRT_STR-OA_PROCESS_SEQUENCE sy-vline
WA_MPES_RTGV_PRT_STR-OA_DISPLAY_ORDER_IN_SEGMENT sy-vline
WA_MPES_RTGV_PRT_STR-OA_EXECUTION_STATUS sy-vline
WA_MPES_RTGV_PRT_STR-OA_EXECUTION_STATUS_DESCR sy-vline
WA_MPES_RTGV_PRT_STR-FAV_GUID sy-vline
WA_MPES_RTGV_PRT_STR-FAV_VERSN sy-vline
WA_MPES_RTGV_PRT_STR-FAV_GUID_OLD sy-vline
WA_MPES_RTGV_PRT_STR-FAV_VERSN_OLD sy-vline
WA_MPES_RTGV_PRT_STR-PLNTY_REFT sy-vline
WA_MPES_RTGV_PRT_STR-PLNNR_REFT sy-vline
WA_MPES_RTGV_PRT_STR-PLNAL_REFT sy-vline
WA_MPES_RTGV_PRT_STR-VERSN_REFT sy-vline
WA_MPES_RTGV_PRT_STR-PLNTY_REFT_OLD sy-vline
WA_MPES_RTGV_PRT_STR-PLNNR_REFT_OLD sy-vline
WA_MPES_RTGV_PRT_STR-PLNAL_REFT_OLD sy-vline
WA_MPES_RTGV_PRT_STR-VERSN_REFT_OLD sy-vline
WA_MPES_RTGV_PRT_STR-TEMPLATE_REFERENCE_OBJECT sy-vline
WA_MPES_RTGV_PRT_STR-TEMPLATE_REFERENCE_OBJECT_DISP sy-vline
WA_MPES_RTGV_PRT_STR-TEMPLATE_REFERENCE_OBJECT_DESC sy-vline
WA_MPES_RTGV_PRT_STR-TEMPLATE_REFERENCE_OBJECT_VERS sy-vline
WA_MPES_RTGV_PRT_STR-EFFECTIVITY_TYPE sy-vline
WA_MPES_RTGV_PRT_STR-EFF_STRING sy-vline
WA_MPES_RTGV_PRT_STR-OA_IS_OPTIONAL sy-vline
WA_MPES_RTGV_PRT_STR-CREATED_BY sy-vline
WA_MPES_RTGV_PRT_STR-CREATED_AT sy-vline
WA_MPES_RTGV_PRT_STR-CHANGED_BY sy-vline
WA_MPES_RTGV_PRT_STR-CHANGED_AT sy-vline
WA_MPES_RTGV_PRT_STR-HAS_COMPONENTS sy-vline
WA_MPES_RTGV_PRT_STR-HAS_PRT sy-vline
WA_MPES_RTGV_PRT_STR-HAS_DOC sy-vline
WA_MPES_RTGV_PRT_STR-HAS_INSPCHAR sy-vline
WA_MPES_RTGV_PRT_STR-HAS_WORKINSTR sy-vline
WA_MPES_RTGV_PRT_STR-HAS_CERTIF sy-vline
WA_MPES_RTGV_PRT_STR-HAS_QUALIF sy-vline
WA_MPES_RTGV_PRT_STR-HAS_REFMAT sy-vline
WA_MPES_RTGV_PRT_STR-HAS_BUYOFF sy-vline
WA_MPES_RTGV_PRT_STR-HAS_PREDECESSORS sy-vline
WA_MPES_RTGV_PRT_STR-HAS_LCOMP sy-vline
WA_MPES_RTGV_PRT_STR-HAS_SUCCESSORS sy-vline
WA_MPES_RTGV_PRT_STR-NOT_CHANGEABLE sy-vline
WA_MPES_RTGV_PRT_STR-PART_OF_PARENT_ORDER sy-vline
WA_MPES_RTGV_PRT_STR-INSERT_BEFORE_NOT_POSSIBLE sy-vline
WA_MPES_RTGV_PRT_STR-INSERT_AFTER_NOT_POSSIBLE sy-vline
WA_MPES_RTGV_PRT_STR-DUMMY_MPE_OA_INCL_EEW_PS sy-vline
WA_MPES_RTGV_PRT_STR-DUMMY_MPE_DOC_INCL_EEW_PS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.