1 PACKAGE OKS_PM_ENTITLEMENTS_PUB AUTHID CURRENT_USER AS
2 /* $Header: OKSPPMES.pls 120.0 2005/05/25 18:10:31 appldev noship $ */
3
4 -- GLOBAL VARIABLES
5 -------------------------------------------------------------------------------
6 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKS_PM_ENTITLEMENTS_PUB';
7 G_APP_NAME_OKS CONSTANT VARCHAR2(3) := 'OKS';
8 G_APP_NAME_OKC CONSTANT VARCHAR2(3) := 'OKC';
9 -------------------------------------------------------------------------------
10
11 SUBTYPE hdr_rec_type IS OKS_ENTITLEMENTS_PUB.hdr_rec_type;
12 TYPE hdr_tbl_type IS TABLE OF hdr_rec_type INDEX BY BINARY_INTEGER;
13 SUBTYPE inp_rec_type IS OKS_ENTITLEMENTS_PUB.inp_rec_type;
14
15 TYPE get_contop_rec IS RECORD
16 (contract_id Number
17 ,contract_number OKC_K_HEADERS_B.CONTRACT_NUMBER%TYPE
18 ,contract_number_modifier OKC_K_HEADERS_B.CONTRACT_NUMBER_MODIFIER%TYPE
19 ,sts_code OKC_K_HEADERS_B.STS_CODE%TYPE
20 ,service_line_id Number
21 ,service_name VARCHAR2(300) --OKX_SYSTEM_ITEMS_V.NAME%TYPE
22 ,service_description VARCHAR2(300) --OKX_SYSTEM_ITEMS_V.DESCRIPTION%TYPE
23 ,coverage_term_line_id Number
24 ,coverage_term_name OKC_K_LINES_V.NAME%TYPE
25 ,coverage_term_description OKC_K_LINES_V.ITEM_DESCRIPTION%TYPE
26 ,coverage_type_code Oks_Cov_Types_B.Code%TYPE
27 ,coverage_type_meaning Oks_Cov_Types_TL.Meaning%TYPE
28 ,coverage_type_imp_level Oks_Cov_Types_B.Importance_Level%TYPE
29 ,service_start_date Date
30 ,service_end_date Date
31 ,warranty_flag Varchar2(1)
32 ,eligible_for_entitlement Varchar2(1)
33 ,exp_reaction_time Date
34 ,exp_resolution_time Date
35 ,status_code Varchar2(1)
36 ,status_text Varchar2(1995)
37 , date_terminated Date
38 ,PM_Program_Id VARCHAR2(40)
39 ,PM_Schedule_Exists VARCHAR2(450)
40 );
41 TYPE get_contop_tbl IS TABLE OF get_contop_rec INDEX BY BINARY_INTEGER;
42
43
44 TYPE get_activityop_rec IS RECORD
45 (service_line_id Number
46 ,PM_Program_Id Number
47 ,Activity_id Number
48 ,Act_Schedule_Exists VARCHAR2(1));
49
50 TYPE get_activityop_tbl IS TABLE OF get_activityop_rec INDEX BY BINARY_INTEGER;
51
52 TYPE get_pmcontin_rec IS RECORD
53 (contract_number OKC_K_HEADERS_B.CONTRACT_NUMBER%TYPE
54 ,contract_number_modifier OKC_K_HEADERS_B.CONTRACT_NUMBER_MODIFIER%TYPE
55 ,service_line_id Number
56 ,party_id Number
57 ,item_id Number
58 ,product_id Number
59 ,request_date Date
60 ,request_date_start Date
61 ,request_date_end Date
62 ,sort_key VARCHAR2(10));
63
64 /* Old Record Type
65 TYPE pm_sch_rec_type IS RECORD
66 (service_line_id NUMBER
67 ,schedule_on DATE
68 ,schedule_from DATE
69 ,schedule_to DATE);
70 */
71
72 /*New Record Type For Phase 2*/
73 TYPE pm_sch_rec_type IS RECORD
74 (service_line_id NUMBER
75 ,program_id NUMBER
76 ,Activity_Id NUMBER
77 ,schedule_on DATE
78 ,schedule_from DATE
79 ,schedule_to DATE);
80
81 TYPE pm_sch_tbl_type IS TABLE OF pm_sch_rec_type INDEX BY BINARY_INTEGER;
82
83 TYPE inp_sch_rec IS RECORD
84 (service_line_id NUMBER
85 ,program_id NUMBER
86 ,activity_id NUMBER
87 ,schedule_start_date DATE
88 ,schedule_end_date DATE);
89
90 G_BEST CONSTANT VARCHAR2(10):= 'BEST';
91 G_FIRST CONSTANT VARCHAR2(10):= 'FIRST';
92 G_REACTION CONSTANT VARCHAR2(30):= 'RCN';
93 G_RESOLUTION CONSTANT VARCHAR2(30):= 'RSN';
94 G_REACT_RESOLVE CONSTANT VARCHAR2(30):= 'RCN_RSN';
95
96 G_REACTION_TIME CONSTANT VARCHAR2(10):= 'RCN';
97 G_RESOLUTION_TIME CONSTANT VARCHAR2(10):= 'RSN';
98 G_COVERAGE_TYPE_IMP_LEVEL CONSTANT VARCHAR2(10):= 'COVTYP_IMP';
99 G_NO_SORT_KEY CONSTANT VARCHAR2(10):= 'NO_KEY';
100
101 --PROCEDURES and FUNCTIONS
102
103
104 PROCEDURE Get_PM_Contracts
105 (p_api_version IN Number
106 ,p_init_msg_list IN Varchar2
107 ,p_inp_rec IN Get_pmcontin_rec
108 ,x_return_status out nocopy Varchar2
109 ,x_msg_count out nocopy Number
110 ,x_msg_data out nocopy Varchar2
111 ,x_ent_contracts out nocopy OKS_ENTITLEMENTS_PUB.get_contop_tbl
112 ,x_pm_activities out nocopy OKS_PM_ENTITLEMENTS_PUB.get_activityop_tbl); -- New parameter added to return list of activities for contract_line and PM program
113
114
115 PROCEDURE Get_PM_Schedule
116 (p_api_version IN Number
117 ,p_init_msg_list IN Varchar2
118 ,p_sch_rec IN inp_sch_rec
119 ,x_return_status out nocopy Varchar2
120 ,x_msg_count out nocopy Number
121 ,x_msg_data out nocopy Varchar2
122 ,x_pm_schedule out nocopy pm_sch_tbl_type);
123
124 /* Old Record Type
125
126 PROCEDURE Get_PM_Confirmation
127 (p_api_version IN Number
128 ,p_init_msg_list IN Varchar2
129 ,p_service_line_id IN Number
130 ,x_return_status out nocopy Varchar2
131 ,x_msg_count out nocopy Number
132 ,x_msg_data out nocopy Varchar2
133 ,x_pm_conf_reqd out nocopy Varchar2);
134 */
135
136 /*New Record Type For Phase 2*/
137 PROCEDURE Get_PM_Confirmation
138 (p_api_version IN Number
139 ,p_init_msg_list IN Varchar2
140 ,p_service_line_id IN Number -- This is mandatory
141 ,p_program_id IN Number -- If this is passed and with no p_activity_id, the API will return confirmation_required flag for PM Program
142 ,p_Activity_Id IN Number -- If this is passed, API will return confirmation_required flag for Activity
143 ,x_return_status out nocopy Varchar2
144 ,x_msg_count out nocopy Number
145 ,x_msg_data out nocopy Varchar2
146 ,x_pm_conf_reqd out nocopy Varchar2);
147 --chkrishn 02/26/2004 Added parameter p_pm_activity_id
148 PROCEDURE Check_PM_Exists
149 (p_api_version IN Number
150 ,p_init_msg_list IN Varchar2
151 ,p_pm_program_id IN Number default null
152 ,p_pm_activity_id IN Number default null
153 ,x_return_status out nocopy Varchar2
154 ,x_msg_count out nocopy Number
155 ,x_msg_data out nocopy Varchar2
156 ,x_pm_reference_exists out nocopy Varchar2);
157
158 END OKS_PM_ENTITLEMENTS_PUB;