PACKAGE: APPS.BIS_CORRECTIVE_ACTION_PUB

Source

1 PACKAGE BIS_CORRECTIVE_ACTION_PUB AUTHID CURRENT_USER AS
2 /* $Header: BISPCACS.pls 115.15 2002/12/31 21:45:54 sashaik ship $ */
3 /*
4 REM +=======================================================================+
5 REM |    Copyright (c) 1998 Oracle Corporation, Redwood Shores, CA, USA     |
6 REM |                         All rights reserved.                          |
7 REM +=======================================================================+
8 REM | FILENAME                                                              |
9 REM |     BISPCACS.pls                                                      |
10 REM |                                                                       |
11 REM | DESCRIPTION                                                           |
12 REM |     Public API for the Corrective Action
13 REM |
14 REM | NOTES                                                                 |
15 REM |                                                                       |
16 REM | HISTORY                                                               |
17 REM |     APR-2000 irchen   Creation
18 REM +=======================================================================+
19 */
20 --
21 -- Constants
22 --
23 G_BIS_GEN_WORKFLOW_ITEM_TYPE CONSTANT VARCHAR2(100) := 'BISBISWF';
24 G_BIS_GEN_WORKFLOW_PROCESS CONSTANT VARCHAR2(100) := 'BIS_SEND_NOTIFICATION';
25 G_BIS_ALR_WORKFLOW_PROCESS CONSTANT VARCHAR2(100) := 'BIS_ALERT_NOTIFICATION';
26 
27 G_MSG_TYPE_REGULAR          CONSTANT VARCHAR2(100) := 'REGULAR';
28 G_MSG_TYPE_EXCEPTION_RANGE1 CONSTANT VARCHAR2(100) := 'ERROR_RANGE1';
29 G_MSG_TYPE_EXCEPTION_RANGE2 CONSTANT VARCHAR2(100) := 'ERROR_RANGE2';
30 G_MSG_TYPE_EXCEPTION_RANGE3 CONSTANT VARCHAR2(100) := 'ERROR_RANGE3';
31 
32 G_DELIVERY_METHOD_WORKFLOW  CONSTANT VARCHAR2(30)  := 'WORKFLOW';
33 /*
34 -- for future enhencements
35 G_DELIVERY_METHOD_MOBIL  CONSTANT VARCHAR2(30)  := 'MOBIL';
36 G_DELIVERY_METHOD_EMAIL  CONSTANT VARCHAR2(30)  := 'EMAIL';
37 */
38 
39 --
40 -- Type: Records
41 --
42 
43 
44 -- Recipient must be workflow role
45 -- 2729637: Taking out reference to wf_roles as it is causing
46 --   ORA-28112: failed to execute policy function
47 --   while applying patch.
48 TYPE Recipient_Rec_Type IS RECORD (      -- 2729637
49   Recipient_name           VARCHAR2(320) -- WF_ROLES.name%TYPE
50 , Recipient_display_name   VARCHAR2(360) -- WF_ROLES.display_name%TYPE
51 , Notification_Preference  VARCHAR2(240) -- WF_ROLES.notification_preference%TYPE
52 , ORIG_SYSTEM              VARCHAR2(30)  -- WF_ROLES.orig_system%TYPE
53 , ORIG_SYSTEM_ID           NUMBER        -- WF_ROLES.orig_system_id%TYPE
54 );
55 
56 
57 --
58 -- Type: Tables
59 --
60 TYPE Recipient_Tbl_Type IS TABLE OF Recipient_Rec_Type
61 INDEX BY BINARY_INTEGER;
62 
63 G_MISS_RECIPIENT_TBL  Recipient_Tbl_Type;
64 
65 --
66 -- Procedures
67 --
68 
69 -- Starts the corrective action workflow
70 --
71 Procedure Start_Corrective_Action
72 ( p_measure_instance      IN BIS_MEASURE_PUB.Measure_Instance_type
73 , p_dim_level_value_tbl	  IN BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type
74 , p_comparison_result     IN VARCHAR2
75 );
76 
77 -- Sends the Alert notification
78 --
79 Procedure Send_Alert
80 ( p_measure_instance      IN BIS_MEASURE_PUB.Measure_Instance_type
81 , p_dim_level_value_tbl	  IN BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type
82 , p_comparison_result     IN VARCHAR2
83 );
84 
85 END BIS_CORRECTIVE_ACTION_PUB;