[Home] [Help]
PACKAGE BODY: APPS.OKS_COV_ENT_PVT
Source
1 PACKAGE BODY OKS_COV_ENT_PVT AS
2 /* $Header: OKSRCENB.pls 120.3.12010000.2 2010/05/03 12:34:58 vgujarat ship $ */
3
4 PROCEDURE Get_default_react_resolve_by
5 (p_api_version in number
6 ,p_init_msg_list in varchar2
7 ,p_inp_rec in gdrt_inp_rec_type
8 ,x_return_status out nocopy varchar2
9 ,x_msg_count out nocopy number
10 ,x_msg_data out nocopy varchar2
11 ,x_react_rec out nocopy rcn_rsn_rec_type
12 ,x_resolve_rec out nocopy rcn_rsn_rec_type)
13 IS
14
15 Lx_SVL_Id CONSTANT Gx_OKS_Id := p_inp_rec.Coverage_Template_Id; --p_inp_rec.Contract_Line_Id;
16 Lx_BusiProc_Id CONSTANT Gx_BusProcess_Id := p_inp_rec.Business_Process_Id;
17 Lx_Severity_Id CONSTANT Gx_Severity_Id := p_inp_rec.Severity_id;
18 Ld_Request_Date CONSTANT DATE := nvl(p_inp_rec.Request_Date,sysdate);
19 Lx_Request_TZone_Id CONSTANT Gx_TimeZoneId := p_inp_rec.Time_Zone_Id;
20 Lx_ReactReso_Category CONSTANT VARCHAR2(30) := 'RCN_RSN'; --Gx_Rule_Category := p_inp_rec.category_rcn_rsn;
21 Lx_Set_ExcepionStack CONSTANT Gx_Boolean := G_TRUE;
22 Lv_Option CONSTANT VARCHAR2(10) := null; --p_inp_rec.compute_option;
23 Lv_Template_YN CONSTANT VARCHAR2(1) := 'Y';
24
25 /*vgujarat - modified for access hour ER 9675504*/
26 Lx_cust_id CONSTANT NUMBER := p_inp_rec.cust_id;
27 Lx_cust_site_id CONSTANT NUMBER := p_inp_rec.cust_site_id;
28 Lx_cust_loc_id CONSTANT NUMBER := p_inp_rec.cust_loc_id;
29
30 Lx_React_Durn Gx_ReactDurn;
31 Lx_React_UOM Gx_ReactUOM;
32 Lv_React_Day VARCHAR2(25);
33 Ld_React_By_DateTime DATE;
34 Ld_React_Start_DateTime DATE;
35
36 Lx_Resol_Durn Gx_ReactDurn;
37 Lx_Resol_UOM Gx_ReactUOM;
38 Lv_Resol_Day VARCHAR2(25);
39 Ld_Resol_By_DateTime DATE;
40 Ld_Resol_Start_DateTime DATE;
41
42 Lx_Result Gx_Boolean DEFAULT G_TRUE;
43 Lx_Return_Status Gx_Ret_Sts DEFAULT G_RET_STS_SUCCESS;
44
45 -- Added for 12.0 ENT-TZ project (JVARGHES)
46 Lx_Dates_In_Input_TZ CONSTANT VARCHAR2(1) := p_inp_rec.Dates_In_Input_TZ;
47 --
48
49 BEGIN
50 /*vgujarat - modified for access hour ER 9675504*/
51 OKS_ENTITLEMENTS_PVT.Get_ReactResol_By_DateTime
52 (P_API_Version => P_API_Version
53 ,P_Init_Msg_List => P_Init_Msg_List
54 ,P_SVL_Id => Lx_SVL_Id
55 ,P_BusiProc_Id => Lx_BusiProc_Id
56 ,P_Severity_Id => Lx_Severity_Id
57 ,P_Request_Date => Ld_Request_Date
58 ,P_Request_TZone_Id => Lx_Request_TZone_Id
59 ,P_Dates_In_Input_TZ => Lx_Dates_In_Input_TZ -- Added for 12.0 ENT-TZ project (JVARGHES)
60 ,P_Option => Lv_Option
61 ,P_Rcn_Rsn_Flag => Lx_ReactReso_Category
62 ,P_Set_ExcepionStack => Lx_Set_ExcepionStack
63 ,P_Template_YN => Lv_Template_YN -- for default coverage functionality
64 ,X_React_Durn => Lx_React_Durn
65 ,X_React_UOM => Lx_React_UOM
66 ,X_React_Day => Lv_React_Day
67 ,X_React_By_DateTime => Ld_React_By_DateTime
68 ,X_React_Start_DateTime => Ld_React_Start_DateTime
69 ,X_Resolve_Durn => Lx_Resol_Durn
70 ,X_Resolve_UOM => Lx_Resol_UOM
71 ,X_Resolve_Day => Lv_Resol_Day
72 ,X_Resolve_By_DateTime => Ld_Resol_By_DateTime
73 ,X_Resolve_Start_DateTime => Ld_Resol_Start_DateTime
74 ,X_Msg_count => X_Msg_Count
75 ,X_Msg_Data => X_Msg_Data
76 ,X_Result => Lx_Result
77 ,X_Return_Status => Lx_Return_Status
78 ,P_cust_id => Lx_cust_id
79 ,P_cust_site_id => Lx_cust_site_id
80 ,P_cust_loc_id => Lx_cust_loc_id);
81
82 x_react_rec.by_date_start := Ld_React_Start_DateTime;
83 x_react_rec.by_date_end := Ld_React_By_DateTime;
84
85 x_resolve_rec.by_date_start := Ld_Resol_Start_DateTime;
86 x_resolve_rec.by_date_end := Ld_Resol_By_DateTime;
87
88 x_return_status := Lx_Return_Status;
89
90 EXCEPTION
91
92 WHEN OTHERS THEN
93
94 OKC_API.SET_MESSAGE
95 (P_App_Name => G_APP_NAME_OKC
96 ,P_Msg_Name => G_UNEXPECTED_ERROR
97 ,P_Token1 => G_SQLCODE_TOKEN
98 ,P_Token1_Value => SQLCODE
99 ,P_Token2 => G_SQLERRM_TOKEN
100 ,P_Token2_Value => SQLERRM);
101
102 OKC_API.SET_MESSAGE
103 (P_App_Name => G_APP_NAME_OKC
104 ,P_Msg_Name => G_DEBUG_TOKEN
105 ,P_Token1 => G_PACKAGE_TOKEN
106 ,P_Token1_Value => G_PKG_NAME
107 ,P_Token2 => G_PROGRAM_TOKEN
108 ,P_Token2_Value => 'Get_default_react_resolve_by');
109
110 X_Return_Status := G_RET_STS_UNEXP_ERROR;
111
112 END Get_default_react_resolve_by;
113
114 END OKS_COV_ENT_PVT;