SAP Reports / Programs | SAP Utilities | SAP Utilities(IS-U) SAP IS

ISUSMORDER SAP ABAP INCLUDE - Program for Object Type ISUSMORDER: IS-U: Service Order







ISUSMORDER is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter ISUSMORDER into the relevant SAP transactions such as SE38 or SE80


ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.






SUBMIT ISUSMORDER. "Basic submit
SUBMIT ISUSMORDER AND RETURN. "Return to original report after report execution complete
SUBMIT ISUSMORDER VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Program for Object Type ISUSMORDER: IS-U: Service Order
Text Symbol: S02 = Create notification
Text Symbol: S01 = New Selection
Text Symbol: 018 = the following permits are missing:
Text Symbol: 016 = For order
Text Symbol: 014 = following permits are missing:
Text Symbol: 013 = the
Text Symbol: 012 = number
Text Symbol: 010 = For customer
Text Symbol: 005 = To service order
Text Symbol: 004 = Display
Text Symbol: 003 = Change
Text Symbol: 002 = Create
Text Symbol: 001 = Service orders
Text Symbol: S04 = New Selection
Text Symbol: T22 = Missing permits
Text Symbol: T20 = Inform the customer
Text Symbol: T13 = or cancel the selection?
Text Symbol: T12 = Do you want to select an order
Text Symbol: T11 = No order was selected.
Text Symbol: T09 = sel.
Text Symbol: T07 = Change selection parameters
Text Symbol: T06 = found
Text Symbol: T05 = No order for
Text Symbol: T03 = parameters or cancel the selection?
Text Symbol: T02 = Do you want to change the selection
Text Symbol: T01 = No orders were found.


INCLUDES used within this REPORT ISUSMORDER

No INCLUDES are used within this REPORT code!


TABLES used within REPORT and the associated SELECT statement:





No SAP DATABASE tables are accessed within this REPORT code!


Function Modules used within report and the associated call statement:

TH_IN_UPDATE_TASK CALL FUNCTION 'TH_IN_UPDATE_TASK' IMPORTING in_update_task = in_update_task.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = aufnr IMPORTING output = aufnr.

IM_SM_READ_TABLES CALL FUNCTION 'IM_SM_READ_TABLES' EXPORTING iwerk = srvprod-iwerk svobj_id = srvprod-svobj_id svobj = srvprod-svobj IMPORTING t399a_exp = t399a EXCEPTIONS OTHERS = 1.

T350_READ CALL FUNCTION 'T350_READ' EXPORTING auart = t399a-auart IMPORTING t350_wa = t350 EXCEPTIONS OTHERS = 1.

IM_SM_CREATE_ORDER CALL FUNCTION 'IM_SM_CREATE_ORDER' EXPORTING objnr = $objnr iwerk = srvprod-iwerk svobj_id = srvprod-svobj_id svobj = srvprod-svobj gstrp = basicstartdate gltrp = finishdate ktext = shorttext bzgsobjtyp = technicalobjecttype bzgsobj = technicalobject bzgsernr = serialnumber pm_ihpa = pm_ihpa[] EXCEPTIONS OTHERS = 1.

IM_SM_UPDATE_ALL CALL FUNCTION 'IM_SM_UPDATE_ALL' TABLES numbers = numbers EXCEPTIONS update_error = 1 OTHERS = 2.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = numbers-aufnr IMPORTING output = numbers-aufnr.

IM_SM_DATA_RESET CALL FUNCTION 'IM_SM_DATA_RESET'.

CR_WORKSTATION_CHECK CALL FUNCTION 'CR_WORKSTATION_CHECK' EXPORTING arbpl = wa_order_data-vaplz * MSGTY = 'E' werks = wa_order_data-vawrk EXCEPTIONS not_found = 1 OTHERS = 2.

ISU_PMPLANT_DETERMINE CALL FUNCTION 'ISU_PMPLANT_DETERMINE' EXPORTING x_ordercode = wa_order_data-order_code x_regiogroup = regiogroup * X_ROLE = 20500033 IMPORTING y_iwerk = wa_order_data-iwerk y_vaplz = tmp_vaplz * wa_order_data-vaplz EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 OTHERS = 4.

ISU_DB_TEWOCODE_SINGLE CALL FUNCTION 'ISU_DB_TEWOCODE_SINGLE' EXPORTING x_order_code = wa_order_data-order_code * x_spras = IMPORTING y_svobj_id = svobj_id y_svobj = svobj * y_ktext = EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 OTHERS = 4.

ISU_DB_T399A_SINGLE CALL FUNCTION 'ISU_DB_T399A_SINGLE' EXPORTING x_iwerk = wa_order_data-iwerk x_svobj_id = svobj_id x_svobj = svobj IMPORTING y_t399a = t399a EXCEPTIONS not_found = 1 system_error = 2 OTHERS = 3.

ISU_ORDER_AUTHORITY_CHECK CALL FUNCTION 'ISU_ORDER_AUTHORITY_CHECK' EXPORTING mode = '01' iwerk = wa_order_data-iwerk auart = t399a-auart EXCEPTIONS keine_berechtigung_s_tcode = 1 keine_berechtigung_i_tcode = 2 keine_berechtigung_i_auart = 3 benutzerstamm_fehlerhaft = 4 kein_profil_im_bstamm = 5 objekt_nicht_in_bstamm = 6 system_error = 7 OTHERS = 8.

ISU_CREATE_ORDER CALL FUNCTION 'ISU_CREATE_ORDER' EXPORTING x_commit = ' ' * X_APPL_LOG = ' ' TABLES txy_order_data = t_order_data EXCEPTIONS update_failed = 1 OTHERS = 2.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = wa_order_data-aufnr IMPORTING output = wa_order_data-aufnr.

IM_SM_DATA_RESET CALL FUNCTION 'IM_SM_DATA_RESET'.

ENQUEUE_ESORDER CALL FUNCTION 'ENQUEUE_ESORDER' EXPORTING aufnr = aufnr _wait = 'X' EXCEPTIONS OTHERS = 1.

DEQUEUE_ESORDER CALL FUNCTION 'DEQUEUE_ESORDER' EXPORTING aufnr = aufnr.

ISU_CALL_TRANSACTION





* CALL FUNCTION 'ISU_CALL_TRANSACTION' * EXPORTING * CALL_PARAM = CALL_PARAMETER * IMPORTING * MSGV_STRUC = MSGV_STRUC * EXCEPTIONS * PROCESSING_ERROR = 1 * OTHERS = 2 * .

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = number IMPORTING output = number.

ISU_SMORDER_DECISION CALL FUNCTION 'ISU_SMORDER_DECISION' EXPORTING x_aufnr = number IMPORTING y_decision = decision EXCEPTIONS not_found = 1.

BAPI_ISUSMORDER_CREATEMULTIPLE CALL FUNCTION 'BAPI_ISUSMORDER_CREATEMULTIPLE' TABLES orderdata = orderdata return = return objectlist = objectlist longtext = longtext permits = permits objectrelation = objectrelations EXCEPTIONS OTHERS = 1.

BALW_BAPIRETURN_GET1 CALL FUNCTION 'BALW_BAPIRETURN_GET1' EXPORTING type = 'E' cl = 'E9' number = '100' par1 = text2 par2 = text1 IMPORTING bapireturn = return.

BALW_BAPIRETURN_GET1 CALL FUNCTION 'BALW_BAPIRETURN_GET1' EXPORTING type = 'E' cl = 'EEWM-WORKFLOW-01' number = '017' par1 = text2 par2 = text1 IMPORTING bapireturn = return.

BAPI_ISUSMORDER_SETSTATUSTECHN CALL FUNCTION 'BAPI_ISUSMORDER_SETSTATUSTECHN' EXPORTING number = object-key-number referencedate = referencedate referencetime = referencetime TABLES return = return EXCEPTIONS OTHERS = 0.

ISU_DB_EEWM_IDOC_FM_SINGLE CALL FUNCTION 'ISU_DB_EEWM_IDOC_FM_SINGLE' EXPORTING x_apparea = co_apparea_order x_idoctyp = basictype * X_ACTUAL = IMPORTING y_funcname = funcname EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 OTHERS = 4.

ISU_ORDER_AUTHORITY_CHECK CALL FUNCTION 'ISU_ORDER_AUTHORITY_CHECK' EXPORTING mode = '02' iwerk = l_pplant auart = l_ordertype EXCEPTIONS keine_berechtigung_s_tcode = 1 keine_berechtigung_i_tcode = 2 keine_berechtigung_i_auart = 3 benutzerstamm_fehlerhaft = 4 kein_profil_im_bstamm = 5 objekt_nicht_in_bstamm = 6 system_error = 7 OTHERS = 8.

ENQUEUE_ESORDER CALL FUNCTION 'ENQUEUE_ESORDER' EXPORTING aufnr = l_aufnr EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

SPECIALPER_ASSIGNMENT * CALL FUNCTION 'SPECIALPER_ASSIGNMENT' * EXPORTING * init = 'X' * objnr = l_objnr * object = '3' * shorttext = l_text * aufnr = l_aufnr * tplnr = l_caufvd-tplnr * equnr = l_caufvd-equnr * aktyp = 'V' * status = l_caufvd-iphas * awerk = l_caufvd-iwerk * workorder_class_data = l_caufvd * IMPORTING * ind_upd_ihsog = l_updflg * EXCEPTIONS * keine_genehmigung = 1 * OTHERS = 2.

SPECIALPER_ASSIGNMENT CALL FUNCTION 'SPECIALPER_ASSIGNMENT' EXPORTING i_aktyp = 'V' i_k_objekt = '3' I_IWERK = l_caufvd-iwerk i_objnr = l_objnr I_AUFNR = l_aufnr I_TPLNR = l_caufvd-tplnr I_EQUNR = l_caufvd-equnr i_stxt = l_text I_CAUFVD = l_caufvd I_PHASE = l_caufvd-iphas I_INITFLG = 'X' * I_DARKFLG = ' ' IMPORTING E_UPDFLG = l_updflg EXCEPTIONS NO_PERMITS = 1 OTHERS = 2.

DEQUEUE_ESORDER CALL FUNCTION 'DEQUEUE_ESORDER' EXPORTING aufnr = l_aufnr.

COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' EXPORTING keep = 'X'.

PM_SP_ISSUE_VB * CALL FUNCTION 'PM_SP_ISSUE_VB' * EXPORTING * objnr = l_objnr * aufnr = l_aufnr.

PM_SP_ISSUE_VB CALL FUNCTION 'PM_SP_ISSUE_VB' EXPORTING i_objnr = l_objnr.

DEQUEUE_ESORDER CALL FUNCTION 'DEQUEUE_ESORDER' EXPORTING aufnr = l_aufnr.

ISU_PERMIT_DETERMINE CALL FUNCTION 'ISU_PERMIT_DETERMINE' EXPORTING x_date = date x_role = role x_anlage = installation x_ordercode = ordercode x_regiogroup = regiogroup x_haus = connobj TABLES tx_anlage = installations ty_eewm_permit = permits EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 OTHERS = 4.

BAPI_ISUSMORDER_USERSTATUSSET CALL FUNCTION 'BAPI_ISUSMORDER_USERSTATUSSET' EXPORTING number = object-key-number status = status inactive = inactive IMPORTING return = return EXCEPTIONS OTHERS = 01.

ISU_SMORDER_FINDBYPERMIT CALL FUNCTION 'ISU_SMORDER_FINDBYPERMIT' EXPORTING x_permit = l_permit ************************************************************************ * Anpassung wg. neuer ILOAN seit 4.6 im PM/CS




POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING * DEFAULTOPTION = '1' textline1 = text-t01 * Es wurden keine Aufträge zur Genehmigung gefunden.

POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING * DEFAULTOPTION = '1' textline1 = text-t01 * Es wurden keine Aufträge gefunden.

POPUP_GET_VALUES CALL FUNCTION 'POPUP_GET_VALUES' EXPORTING * NO_VALUE_CHECK = ' ' popup_title = text-t07 * Selektionsparamter ändern * START_COLUMN = '5' * START_ROW = '5' * importing * returncode = ret_val TABLES fields = felder EXCEPTIONS error_in_fields = 1 OTHERS = 2.

ISU_SMORDER_POPUPSELECT CALL FUNCTION 'ISU_SMORDER_POPUPSELECT' EXPORTING x_permit = l_permit IMPORTING y_aufk = wa_aufk y_canceled = l_canceled TABLES xt_aufk = lt_aufk EXCEPTIONS no_object = 1 OTHERS = 2.

POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING * DEFAULTOPTION = '1' textline1 = text-t11 * Es wurde kein Auftrag ausgewählt.

POPUP_GET_VALUES CALL FUNCTION 'POPUP_GET_VALUES' EXPORTING * NO_VALUE_CHECK = ' ' popup_title = text-t07 * Selektionsparamter ändern * START_COLUMN = '5' * START_ROW = '5' * importing * returncode = ret_val TABLES fields = felder EXCEPTIONS error_in_fields = 1 OTHERS = 2.

ISU_SMORDER_RAISE_EVENT_RECO CALL FUNCTION 'ISU_SMORDER_RAISE_EVENT_RECO' EXPORTING x_aufnr = aufnr x_auart = auart EXCEPTIONS system_error = 1 OTHERS = 2.

POPUP_TO_DECIDE_LIST CALL FUNCTION 'POPUP_TO_DECIDE_LIST' EXPORTING * CURSORLINE = 1 mark_flag = 'X' mark_max = 0 * START_COL = 0 * START_ROW = 0 textline1 = textline1 textline2 = textline2 textline3 = textline3 titel = title display_only = 'X' * IMPORTING * ANSWER = TABLES t_spopli = t_spopli * EXCEPTIONS * not_enough_answers = 1 * too_much_answers = 2 * too_much_marks = 3 * OTHERS = 4 .

ISU_CALL_TRANSACTION CALL FUNCTION 'ISU_CALL_TRANSACTION' EXPORTING call_param = call_parameter IMPORTING msgv_struc = msgv_struc EXCEPTIONS processing_error = 1 OTHERS = 2 .

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = quotation_key IMPORTING output = quotation_key.

ISU_CALL_TRANSACTION CALL FUNCTION 'ISU_CALL_TRANSACTION' EXPORTING call_param = call_parameter IMPORTING msgv_struc = msgv_struc EXCEPTIONS processing_error = 1 OTHERS = 2 .

ISU_CALL_TRANSACTION CALL FUNCTION 'ISU_CALL_TRANSACTION' EXPORTING call_param = call_parameter IMPORTING msgv_struc = msgv_struc EXCEPTIONS processing_error = 1 OTHERS = 2 .

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = billingrequest_key IMPORTING output = billingrequest_key.

ISU_ORDER_AUTHORITY_CHECK CALL FUNCTION 'ISU_ORDER_AUTHORITY_CHECK' EXPORTING mode = $mode iwerk = viaufkst-iwerk auart = viaufkst-auart EXCEPTIONS OTHERS = 1.

IM_SM_GET_ORDER_INFO CALL FUNCTION 'IM_SM_GET_ORDER_INFO' EXPORTING OBJNR = I_OBJNR IMPORTING EXP_CAUFVD = L_CAUFVD.

T350_READ CALL FUNCTION 'T350_READ' EXPORTING AUART = L_CAUFVD-AUART IMPORTING T350_WA = L_T350_WA.

PMSDO_GET CALL FUNCTION 'PMSDO_GET' EXPORTING I_OBJNR = L_PMSDO-OBJNR IMPORTING E_PMSDO = E_PMSDO EXCEPTIONS OTHERS = 1.

DDIF_NAMETAB_GET CALL FUNCTION 'DDIF_NAMETAB_GET' EXPORTING TABNAME = 'PMSDO' TABLES DFIES_TAB = DFIES_TAB EXCEPTIONS OTHERS = 1.

PMSDO_SET_EXTERNAL CALL FUNCTION 'PMSDO_SET_EXTERNAL' EXPORTING I_PMSDO = L_PMSDO I_AUART = L_CAUFVD-AUART I_AUTYP = L_CAUFVD-AUTYP I_IWERK = L_CAUFVD-IWERK EXCEPTIONS ERROR_OCCURRED = 1 OTHERS = 2.

ISU_PMPLANT_DETERMINE CALL FUNCTION 'ISU_PMPLANT_DETERMINE' EXPORTING X_ORDERCODE = ordercode X_SVOBJ_ID = svobjectid X_SVOBJ = svobject X_REGIOGROUP = regiogroup X_ROLE = 20500033 IMPORTING Y_IWERK = planningplant Y_VAPLZ = workcenter EXCEPTIONS NOT_FOUND = 1 NOT_QUALIFIED = 2 SYSTEM_ERROR = 3 OTHERS = 4.

ISU_DB_TEWOCODE_SINGLE CALL FUNCTION 'ISU_DB_TEWOCODE_SINGLE' EXPORTING X_ORDER_CODE = ORDERCODE * X_SPRAS = SY-LANGU IMPORTING Y_SVOBJ_ID = svobjectid Y_SVOBJ = svobject * Y_KTEXT = EXCEPTIONS NOT_FOUND = 1 NOT_QUALIFIED = 2 SYSTEM_ERROR = 3 OTHERS = 4.

ISU_DB_T399A_SINGLE CALL FUNCTION 'ISU_DB_T399A_SINGLE' EXPORTING x_iwerk = planningplant x_svobj_id = svobjectid x_svobj = svobject IMPORTING Y_T399A = tmp_t399a EXCEPTIONS NOT_FOUND = 1 SYSTEM_ERROR = 2 OTHERS = 3.

ISU_APPOINTMENT_CREATE CALL FUNCTION 'ISU_APPOINTMENT_CREATE' EXPORTING x_werks = PLANNINGPLANT x_arbpl = WORKCENTER x_capacity = RequiredCapacity X_SLA_WEEKDAYS = sla_weekdays X_SLA_WORKDAYS = sla_workdays X_BLOCK_NON_SLA = BlockNonSLASlots IMPORTING Y_DATE = date Y_END_DATE = enddate Y_START_TIME = starttime Y_END_TIME = endtime EXCEPTIONS NOT_QUALIFIED = 1 SYSTEM_ERROR = 2 CANCELLED = 3 PARAMETER_ERROR = 4 OTHERS = 5.

ISU_SMORDER_READ_WC_CAPACITY CALL FUNCTION 'ISU_SMORDER_READ_WC_CAPACITY' EXPORTING x_aufnr = aufnr IMPORTING Y_WORKCENTER = workcenter Y_PLANT = plantforworkcenter Y_CAPACITY = requiredcapacity EXCEPTIONS NOT_FOUND = 1 SYSTEM_ERROR = 2 OTHERS = 3.

ENQUEUE_ESORDER CALL FUNCTION 'ENQUEUE_ESORDER' EXPORTING MODE_AUFK = 'E' AUFNR = aufnr EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.

DEQUEUE_ESORDER CALL FUNCTION 'DEQUEUE_ESORDER' EXPORTING AUFNR = aufnr _SYNCHRON = 'X'.



Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name ISUSMORDER or its description.