SAP Reports / Programs

comments icon Comments

ISUSRVPROD SAP ABAP INCLUDE - Program for Object Type ISUSRVPROD: IS-U Service Product







ISUSRVPROD 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 ISUSRVPROD 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 ISUSRVPROD. "Basic submit
SUBMIT ISUSRVPROD AND RETURN. "Return to original report after report execution complete
SUBMIT ISUSRVPROD 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 ISUSRVPROD: IS-U Service Product
Text Symbol: 001 = Specify division and region
Text Symbol: 002 = Select service products


INCLUDES used within this REPORT ISUSRVPROD

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:

ISU_DB_TESERVICE_SINGLE
CALL FUNCTION 'ISU_DB_TESERVICE_SINGLE'
     EXPORTING
          x_sparte     = sector
          x_setebene   = setebene
     TABLES
          t_teservice  = service_tab
     EXCEPTIONS
          not_found    = 1
          system_error = 2
          OTHERS       = 3.

ISU_PMPLANT_DETERMINE
  CALL FUNCTION 'ISU_PMPLANT_DETERMINE'
       EXPORTING
*             X_ORDERCODE   =
            x_svobj_id    = service_tab-svobj_id
            x_svobj       = service_tab-svobj
            x_regiogroup  = regiogroup
*             X_ROLE        = 20500033
*        importing
*             y_iwerk       = iwerk
       EXCEPTIONS
            not_found     = 1
            not_qualified = 2
            system_error  = 3
            OTHERS        = 4.

F4IF_INT_TABLE_VALUE_REQUEST
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
     EXPORTING
          retfield        = 'SVOBJ'
          value_org       = 'S'
     TABLES
          value_tab       = srvprod_disp
          return_tab      = sel_srvprod
     EXCEPTIONS
          parameter_error = 1
          no_values_found = 2
          OTHERS          = 3.

ISU_PMPLANT_DETERMINE
CALL FUNCTION 'ISU_PMPLANT_DETERMINE'
     EXPORTING
*           X_ORDERCODE   =
          x_svobj_id    = object-key-serviceobjectid
          x_svobj       = object-key-serviceobject
          x_regiogroup  = regiogroup
*           X_ROLE        = 20500033
     IMPORTING
          y_iwerk       = object-planningplant
     EXCEPTIONS
          not_found     = 1
          not_qualified = 2
          system_error  = 3
          OTHERS        = 4.

ISU_SRVPROD_GET_REF_OBJECT
  CALL FUNCTION 'ISU_SRVPROD_GET_REF_OBJECT'
       EXPORTING
            i_svobj            = svobj
            i_svobj_id         = svobjid
            i_iwerk            = iwerk
       IMPORTING
            e_equisales        = equisales
            e_equilocation     = equilocation
            e_equitext         = equitext
            e_equitime         = equitime
            e_equimaster       = equimaster
       EXCEPTIONS
            no_ref_object      = 1001
            srvprod_exists_not = 1002
            OTHERS             = 01.

ISU_SRVPROD_COPY_REF_OBJECT
CALL FUNCTION 'ISU_SRVPROD_COPY_REF_OBJECT'
     EXPORTING
          i_svobj                  = object-key-serviceobject
          i_svobj_id               = object-key-serviceobjectid
          i_iwerk                  = iwerk
     IMPORTING
          e_objectid               = refobjectcopy
     EXCEPTIONS
          no_ref_object            = 1001
          srvprod_exists_not       = 1002
          object_not_created       = 1003
          objecttype_not_supported = 1004
          OTHERS                   = 01.

ISU_SRVPROD_GET_CONFIGURATION
CALL FUNCTION 'ISU_SRVPROD_GET_CONFIGURATION'
     EXPORTING
          i_titletext           = l_titletext
          i_deliveryplant       = l_deliveringplant
          I_CALLFORISUPRODUCT   = L_CALLFORISUPRODUCT
     TABLES
          i_serviceobjects      = l_tab
          e_conf_out            = configurationoutput
     EXCEPTIONS
          not_configurable      = 1
          configuration_error   = 2
          no_configuration_done = 3
          OTHERS                = 4.

EPD_GET_DDIF_PARAMS_FROM_MDG
          CALL FUNCTION 'EPD_GET_DDIF_PARAMS_FROM_MDG'
            EXPORTING
              IM_PRODID  =  X_PRODID
            TABLES
              RET_TABLE  =  RET_TABLE
            EXCEPTIONS
              OTHERS     =  1.

ISU_PRODUCT_IMPLEMENT
  CALL FUNCTION 'ISU_PRODUCT_IMPLEMENT'
    EXPORTING
      X_PRODID         =   X_PRODID
      X_CONTAINER      =   X_CONTAINER
    CHANGING
      XY_NEW_KEYS_TAB  =   XY_NEW_KEYS_TAB
    EXCEPTIONS
      OTHERS           =   01.

EEWM_UT_GET_QUOTATION_PARAMS
  CALL FUNCTION 'EEWM_UT_GET_QUOTATION_PARAMS'
       EXPORTING
            MATERIAL        = MATKEY
            PARTNER         = PARTNERKEY
       IMPORTING
            VKONT           = CONTRACTACCOUNTKEY-VKONT
            VKORG           = SALESANDDISTRIBAREAKEY-VKORG
            VTWEG           = SALESANDDISTRIBAREAKEY-VTWEG
            SPART           = SALESANDDISTRIBAREAKEY-SPART
            WERK            = PLANTKEY
            QUOTATIONTYPE   = QUOTATIONTYPE
            VALIDTO         = VALIDTO
       EXCEPTIONS
            OTHERS          = 1.

ISU_DB_T399A_SINGLE
  CALL FUNCTION 'ISU_DB_T399A_SINGLE'
    EXPORTING
      X_IWERK        = IWERK
      X_SVOBJ_ID     = SVOBJ_ID
      X_SVOBJ        = SVOBJ
    IMPORTING
      Y_T399A        = T399A_WA
    EXCEPTIONS
      OTHERS         = 1.

EQUIPMENT_READ
    CALL FUNCTION 'EQUIPMENT_READ'
         EXPORTING
              EQUI_NO      = EQUNR
         IMPORTING
              EQUI         = EQUI_WA
         EXCEPTIONS
              OTHERS       = 1.


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 ISUSRVPROD or its description.


   
 

ISUSRVPROD - Program for Object Type ISUSRVPROD: IS-U Service Product
ISUSRVPROD - Program for Object Type ISUSRVPROD: IS-U Service Product
ISUSMORDER - Program for Object Type ISUSMORDER: IS-U: Service Order
ISUSMORDER - Program for Object Type ISUSMORDER: IS-U: Service Order
ISUSMNOTIF - Program for Object Type ISUSMNOTIF: IS-U Service Notification
ISUSMNOTIF - Program for Object Type ISUSMNOTIF: IS-U Service Notification