ABAP Select data from SAP table /ISDFPS/ME_WO_HEADER_NEW 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 /ISDFPS/ME_WO_HEADER_NEW 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 /ISDFPS/ME_WO_HEADER_NEW. 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 /ISDFPS/ME_WO_HEADER_NEW 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_/ISDFPS/ME_WO_HEADER_NEW TYPE STANDARD TABLE OF /ISDFPS/ME_WO_HEADER_NEW,
      WA_/ISDFPS/ME_WO_HEADER_NEW TYPE /ISDFPS/ME_WO_HEADER_NEW,
      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: </ISDFPS/ME_WO_HEADER_NEW> TYPE /ISDFPS/ME_WO_HEADER_NEW.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /ISDFPS/ME_WO_HEADER_NEW
  INTO TABLE IT_/ISDFPS/ME_WO_HEADER_NEW.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /ISDFPS/ME_WO_HEADER_NEW
*  INTO TABLE @DATA(IT_/ISDFPS/ME_WO_HEADER_NEW2).
*--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_/ISDFPS/ME_WO_HEADER_NEW INDEX 1 INTO DATA(WA_/ISDFPS/ME_WO_HEADER_NEW2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/ISDFPS/ME_WO_HEADER_NEW ASSIGNING </ISDFPS/ME_WO_HEADER_NEW>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
</ISDFPS/ME_WO_HEADER_NEW>-ORDERID = 1.
</ISDFPS/ME_WO_HEADER_NEW>-ORDER_TYPE = 1.
</ISDFPS/ME_WO_HEADER_NEW>-PLANPLANT = 1.
</ISDFPS/ME_WO_HEADER_NEW>-BUS_AREA = 1.
</ISDFPS/ME_WO_HEADER_NEW>-MN_WK_CTR = 1.
ENDLOOP.

LOOP AT IT_/ISDFPS/ME_WO_HEADER_NEW INTO WA_/ISDFPS/ME_WO_HEADER_NEW.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/ISDFPS/ME_WO_HEADER_NEW-PLANT, sy-vline,
WA_/ISDFPS/ME_WO_HEADER_NEW-MN_WKCTR_ID, sy-vline,
WA_/ISDFPS/ME_WO_HEADER_NEW-PMACTTYPE, sy-vline,
WA_/ISDFPS/ME_WO_HEADER_NEW-PLANGROUP, sy-vline,
WA_/ISDFPS/ME_WO_HEADER_NEW-SYSTCOND, sy-vline,
WA_/ISDFPS/ME_WO_HEADER_NEW-FUNCT_LOC, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/ISDFPS/ME_WO_HEADER_NEW 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_/ISDFPS/ME_WO_HEADER_NEW 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_/ISDFPS/ME_WO_HEADER_NEW INTO WA_/ISDFPS/ME_WO_HEADER_NEW. *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 ORDERID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/ISDFPS/ME_WO_HEADER_NEW-ORDERID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/ME_WO_HEADER_NEW-ORDERID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit ABPSN, internal->external for field WBS_ELEM CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_/ISDFPS/ME_WO_HEADER_NEW-WBS_ELEM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/ME_WO_HEADER_NEW-WBS_ELEM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field ISDFPS_MEQUI CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/ISDFPS/ME_WO_HEADER_NEW-ISDFPS_MEQUI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/ME_WO_HEADER_NEW-ISDFPS_MEQUI.
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_/ISDFPS/ME_WO_HEADER_NEW_STR,
ORDERID TYPE STRING,
ORDER_TYPE TYPE STRING,
PLANPLANT TYPE STRING,
BUS_AREA TYPE STRING,
MN_WK_CTR TYPE STRING,
PLANT TYPE STRING,
MN_WKCTR_ID TYPE STRING,
PMACTTYPE TYPE STRING,
PLANGROUP TYPE STRING,
SYSTCOND TYPE STRING,
FUNCT_LOC TYPE STRING,
FUNCLOC_DISP TYPE STRING,
FUNCLOC_DESC TYPE STRING,
FUNCLOC_CREATE TYPE STRING,
EQUIPMENT TYPE STRING,
EQUIPMENT_DESC TYPE STRING,
EQUIPMENT_CREATE TYPE STRING,
SERIALNO TYPE STRING,
UII TYPE STRING,
MATERIAL TYPE STRING,
MATL_DESC TYPE STRING,
ASSEMBLY TYPE STRING,
ASSEMBLY_DESC TYPE STRING,
DEVICEDATA TYPE STRING,
MAINTPLANT TYPE STRING,
LOCATION TYPE STRING,
MAINTROOM TYPE STRING,
PLSECTN TYPE STRING,
LOC_WK_CTR TYPE STRING,
LOC_WKCTR_ID TYPE STRING,
ABCINDIC TYPE STRING,
SORTFIELD TYPE STRING,
COMP_CODE TYPE STRING,
PROFIT_CTR TYPE STRING,
CO_AREA TYPE STRING,
RESPCCTR TYPE STRING,
FUNC_AREA TYPE STRING,
SUPERIOR_NETWORK TYPE STRING,
SUPERIOR_ACTIVITY TYPE STRING,
SUPERIOR_ROUTING_NO TYPE STRING,
SUPERIOR_COUNTER TYPE STRING,
WBS_ELEM TYPE STRING,
PROJ_DEF TYPE STRING,
PROCESSING_GROUP TYPE STRING,
OBJECTCLASS TYPE STRING,
TAXJURCODE TYPE STRING,
LOC_COMP_CODE TYPE STRING,
LOC_CO_AREA TYPE STRING,
ASSET_NO TYPE STRING,
SUB_NUMBER TYPE STRING,
LOC_BUS_AREA TYPE STRING,
COSTCENTER TYPE STRING,
LOC_WBS_ELEM TYPE STRING,
STANDORDER TYPE STRING,
SETTLORDER TYPE STRING,
SALESORG TYPE STRING,
DISTR_CHAN TYPE STRING,
DIVISION TYPE STRING,
ORDPLANID TYPE STRING,
START_DATE TYPE STRING,
FINISH_DATE TYPE STRING,
BASICSTART TYPE STRING,
BASIC_FIN TYPE STRING,
START_DATE_TZ TYPE STRING,
START_DATE_UTC TYPE STRING,
FINISH_DATE_TZ TYPE STRING,
FINISH_DATE_UTC TYPE STRING,
PRIORITY TYPE STRING,
REVISION TYPE STRING,
VERSION TYPE STRING,
SCHED_TYPE TYPE STRING,
AUTOSCHED TYPE STRING,
CAP_REQMTS TYPE STRING,
SCHEDULING_EXACT_BREAK_TIMES TYPE STRING,
MRP_RELEVANT TYPE STRING,
PRODUCTION_START_DATE TYPE STRING,
PRODUCTION_FINISH_DATE TYPE STRING,
PRODUCTION_START_TIME TYPE STRING,
PRODUCTION_FINISH_TIME TYPE STRING,
PRODUCTION_START_TZ TYPE STRING,
PRODUCTION_START_UTC TYPE STRING,
PRODUCTION_FINISH_TC TYPE STRING,
PRODUCTION_FINISH_UTC TYPE STRING,
ACTUAL_START_DATE TYPE STRING,
ACTUAL_FINISH_DATE TYPE STRING,
ACTUAL_START_TIME TYPE STRING,
ACTUAL_FINISH_TIME TYPE STRING,
ACTUAL_START_DATE_TZ TYPE STRING,
ACTUAL_START_DATE_UTC TYPE STRING,
ACTUAL_FINISH_DATE_TZ TYPE STRING,
ACTUAL_FINISH_DATE_UTC TYPE STRING,
REFDATE TYPE STRING,
SALES_ORD TYPE STRING,
S_ORD_ITEM TYPE STRING,
CALC_MOTIVE TYPE STRING,
INVEST_PROFILE TYPE STRING,
SCALE TYPE STRING,
INV_REASON TYPE STRING,
ENVIR_INVEST TYPE STRING,
ESTIMATED_COSTS TYPE STRING,
CURRENCY TYPE STRING,
CURRENCY_ISO TYPE STRING,
CSTG_SHEET TYPE STRING,
OVERHEAD_KEY TYPE STRING,
RES_ANAL_KEY TYPE STRING,
NETWORK_PROFILE TYPE STRING,
CSTGVAPPLN TYPE STRING,
CSTGVARACT TYPE STRING,
TASK_LIST_GROUP TYPE STRING,
GROUP_COUNTER TYPE STRING,
TASK_LIST_TYPE TYPE STRING,
RESP_PLANNER_GROUP TYPE STRING,
MNTPLAN TYPE STRING,
MAINTITEM TYPE STRING,
CALL_NO TYPE STRING,
LAST_ORD TYPE STRING,
ENTERED_BY TYPE STRING,
ENTER_DATE TYPE STRING,
ENTER_DATE_TZ TYPE STRING,
ENTER_DATE_UTC TYPE STRING,
CHANGED_BY TYPE STRING,
CHANGE_DATE TYPE STRING,
CHANGE_DATE_TZ TYPE STRING,
CHANGE_DATE_UTC TYPE STRING,
SCENARIO TYPE STRING,
SYS_STATUS TYPE STRING,
USER_ST TYPE STRING,
USERSTATUS TYPE STRING,
STAT_PROF TYPE STRING,
OBJECT_NO TYPE STRING,
ROUTING_NO TYPE STRING,
RESERV_NO TYPE STRING,
SHORT_TEXT TYPE STRING,
LONG_TEXT TYPE STRING,
NOTIF_NO TYPE STRING,
NOTIF_NO_2 TYPE STRING,
NAME1 TYPE STRING,
POST_CODE1 TYPE STRING,
CITY1 TYPE STRING,
STREET TYPE STRING,
ISDFPS_OBJECT_NO TYPE STRING,
ISDFPS_MEQUI TYPE STRING,
DOC_GUID TYPE STRING,
ORDER_GUID TYPE STRING,
NOTIF_GUID TYPE STRING,
RESERV_GUID TYPE STRING,
DISM_GUID TYPE STRING,
PLVAR TYPE STRING,
HROBJID TYPE STRING,
OTYPE TYPE STRING,
DUMMY1 TYPE STRING,
DUMMY2 TYPE STRING,
DUMMY3 TYPE STRING,
DUMMY4 TYPE STRING,
DUMMY5 TYPE STRING,
DUMMY6 TYPE STRING,
DUMMY7 TYPE STRING,
DUMMY8 TYPE STRING,
DUMMY9 TYPE STRING,
DUMMY10 TYPE STRING,
DUMMY11 TYPE STRING,
DUMMY12 TYPE STRING,
DUMMY13 TYPE STRING,END OF T_EKKO_STR. DATA: WA_/ISDFPS/ME_WO_HEADER_NEW_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_/ISDFPS/ME_WO_HEADER_NEW_STR-ORDERID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ORDER_TYPE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PLANPLANT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-BUS_AREA sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MN_WK_CTR sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PLANT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MN_WKCTR_ID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PMACTTYPE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PLANGROUP sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SYSTCOND sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FUNCT_LOC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FUNCLOC_DISP sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FUNCLOC_DESC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FUNCLOC_CREATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-EQUIPMENT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-EQUIPMENT_DESC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-EQUIPMENT_CREATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SERIALNO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-UII sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MATERIAL sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MATL_DESC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ASSEMBLY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ASSEMBLY_DESC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DEVICEDATA sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MAINTPLANT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOCATION sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MAINTROOM sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PLSECTN sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOC_WK_CTR sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOC_WKCTR_ID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ABCINDIC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SORTFIELD sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-COMP_CODE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PROFIT_CTR sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CO_AREA sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-RESPCCTR sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FUNC_AREA sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SUPERIOR_NETWORK sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SUPERIOR_ACTIVITY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SUPERIOR_ROUTING_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SUPERIOR_COUNTER sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-WBS_ELEM sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PROJ_DEF sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PROCESSING_GROUP sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-OBJECTCLASS sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-TAXJURCODE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOC_COMP_CODE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOC_CO_AREA sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ASSET_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SUB_NUMBER sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOC_BUS_AREA sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-COSTCENTER sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LOC_WBS_ELEM sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-STANDORDER sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SETTLORDER sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SALESORG sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DISTR_CHAN sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DIVISION sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ORDPLANID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-START_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FINISH_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-BASICSTART sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-BASIC_FIN sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-START_DATE_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-START_DATE_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FINISH_DATE_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-FINISH_DATE_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRIORITY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-REVISION sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-VERSION sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SCHED_TYPE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-AUTOSCHED sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CAP_REQMTS sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SCHEDULING_EXACT_BREAK_TIMES sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MRP_RELEVANT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_START_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_FINISH_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_START_TIME sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_FINISH_TIME sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_START_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_START_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_FINISH_TC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PRODUCTION_FINISH_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_START_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_FINISH_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_START_TIME sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_FINISH_TIME sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_START_DATE_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_START_DATE_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_FINISH_DATE_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ACTUAL_FINISH_DATE_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-REFDATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SALES_ORD sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-S_ORD_ITEM sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CALC_MOTIVE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-INVEST_PROFILE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SCALE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-INV_REASON sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ENVIR_INVEST sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ESTIMATED_COSTS sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CURRENCY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CURRENCY_ISO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CSTG_SHEET sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-OVERHEAD_KEY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-RES_ANAL_KEY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-NETWORK_PROFILE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CSTGVAPPLN sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CSTGVARACT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-TASK_LIST_GROUP sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-GROUP_COUNTER sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-TASK_LIST_TYPE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-RESP_PLANNER_GROUP sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MNTPLAN sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-MAINTITEM sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CALL_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LAST_ORD sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ENTERED_BY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ENTER_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ENTER_DATE_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ENTER_DATE_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CHANGED_BY sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CHANGE_DATE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CHANGE_DATE_TZ sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CHANGE_DATE_UTC sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SCENARIO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SYS_STATUS sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-USER_ST sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-USERSTATUS sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-STAT_PROF sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-OBJECT_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ROUTING_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-RESERV_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-SHORT_TEXT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-LONG_TEXT sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-NOTIF_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-NOTIF_NO_2 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-NAME1 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-POST_CODE1 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-CITY1 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-STREET sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ISDFPS_OBJECT_NO sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ISDFPS_MEQUI sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DOC_GUID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-ORDER_GUID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-NOTIF_GUID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-RESERV_GUID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DISM_GUID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-PLVAR sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-HROBJID sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-OTYPE sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY1 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY2 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY3 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY4 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY5 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY6 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY7 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY8 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY9 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY10 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY11 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY12 sy-vline
WA_/ISDFPS/ME_WO_HEADER_NEW_STR-DUMMY13 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.