[Home] [Help]
PACKAGE: APPS.OKC_RENEW_PUB
Source
1 package OKC_RENEW_PUB AUTHID CURRENT_USER as
2 /* $Header: OKCPRENS.pls 120.0 2005/05/25 22:49:47 appldev noship $ */
3
4
5 subtype renew_in_parameters_rec is OKC_RENEW_PVT.renew_in_parameters_rec;
6 subtype renew_in_parameters_tbl is OKC_RENEW_PVT.renew_in_parameters_tbl;
7 subtype renew_out_parameters_rec is OKC_RENEW_PVT.renew_out_parameters_rec;
8 subtype renew_out_parameters_tbl is OKC_RENEW_PVT.renew_out_parameters_tbl;
9
10
11 -- GLOBAL VARIABLES
12 ---------------------------------------------------------------------------
13 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
14 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXP_ERROR';
15 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
16 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
17 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKC_RENEW_PUB';
18 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
19 ---------------------------------------------------------------------------
20
21 g_new_contract_id number;
22 g_renew_in_parameters_rec Renew_in_parameters_rec;
23 g_prerenew_in_parameters_rec Renew_in_parameters_rec;
24
25
26 -- Procedure Auto_Renew(errbuf out varchar2, retcode out varchar2);
27
28 Procedure Auto_Renew(errbuf out nocopy varchar2,
29 retcode out nocopy varchar2,
30 p_chr_id IN Number Default Null,
31 p_duration IN Number Default Null,
32 p_uom_code IN Varchar2 Default Null,
33 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'N',
34 /* added for bugfix 2093117 */
35 p_contract_number IN Varchar2 DEFAULT NULL,
36 p_contract_number_modifier IN Varchar2 DEFAULT NULL
37 );
38
39 FUNCTION is_renew_allowed(p_chr_id IN NUMBER,p_sts_code IN VARCHAR2) RETURN BOOLEAN;
40
41 PROCEDURE PRE_Renew( p_api_version IN NUMBER,
42 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
43 x_return_status OUT NOCOPY VARCHAR2,
44 x_msg_count OUT NOCOPY NUMBER,
45 x_msg_data OUT NOCOPY VARCHAR2,
46 p_renew_in_parameters_tbl IN Renew_in_parameters_tbl,
47 x_renew_out_parameters_tbl OUT nocopy Renew_out_parameters_tbl,
48 p_do_commit IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
49 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
50 );
51
52 PROCEDURE PRE_Renew( p_api_version IN NUMBER,
53 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
54 x_return_status OUT NOCOPY VARCHAR2,
55 x_msg_count OUT NOCOPY NUMBER,
56 x_msg_data OUT NOCOPY VARCHAR2,
57 x_contract_id OUT NOCOPY number,
58 p_renew_in_parameters_rec IN Renew_in_parameters_rec,
59 p_do_commit IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
60 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
61 );
62
63
64 Procedure Renew( p_api_version IN NUMBER,
65 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
66 x_return_status OUT NOCOPY VARCHAR2,
67 x_msg_count OUT NOCOPY NUMBER,
68 x_msg_data OUT NOCOPY VARCHAR2,
69 p_renew_in_parameters_tbl IN Renew_in_parameters_tbl,
70 x_renew_out_parameters_tbl OUT nocopy Renew_out_parameters_tbl,
71 p_do_commit IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
72 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
73 );
74
75 Procedure Renew( p_api_version IN NUMBER,
76 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
77 x_return_status OUT NOCOPY VARCHAR2,
78 x_msg_count OUT NOCOPY NUMBER,
79 x_msg_data OUT NOCOPY VARCHAR2,
80 x_contract_id OUT NOCOPY NUMBER,
81 p_renew_in_parameters_rec IN Renew_in_parameters_rec,
82 p_do_commit IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
83 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
84
85 );
86
87 FUNCTION Validate_line(p_contract_id IN NUMBER) RETURN VARCHAR2;
88
89 Procedure Create_Renewed_Contract( p_api_version IN NUMBER,
90 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
91 x_return_status OUT NOCOPY VARCHAR2,
92 x_msg_count OUT NOCOPY NUMBER,
93 x_msg_data OUT NOCOPY VARCHAR2,
94 x_contract_id OUT NOCOPY NUMBER,
95 p_renew_in_parameters_rec IN Renew_in_parameters_rec,
96 x_renew_in_parameters_rec OUT NOCOPY Renew_in_parameters_rec,
97 p_ren_type IN varchar2 DEFAULT OKC_API.G_MISS_CHAR,
98 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
99 );
100
101
102 PROCEDURE post_renewed_contract(
103 p_api_version IN NUMBER,
104 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
105 x_return_status OUT NOCOPY VARCHAR2,
106 x_msg_count OUT NOCOPY NUMBER,
107 x_msg_data OUT NOCOPY VARCHAR2,
108 p_renew_chr_id IN number,
109 p_renew_in_parameters_rec IN Renew_in_parameters_rec,
110 p_ren_type IN VARCHAR2 DEFAULT OKC_API.G_MISS_CHAR,
111 p_contact IN VARCHAR2 DEFAULT OKC_API.G_MISS_CHAR);
112
113 Procedure validate(
114 p_api_version IN NUMBER,
115 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
116 x_return_status OUT NOCOPY VARCHAR2,
117 x_msg_count OUT NOCOPY NUMBER,
118 x_msg_data OUT NOCOPY VARCHAR2,
119 p_renew_in_parameters_tbl IN Renew_in_parameters_tbl,
120 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
121 );
122
123
124 Procedure validate(
125 p_api_version IN NUMBER,
126 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
127 x_return_status OUT NOCOPY VARCHAR2,
128 x_msg_count OUT NOCOPY NUMBER,
129 x_msg_data OUT NOCOPY VARCHAR2,
130 p_renew_in_parameters_rec IN Renew_in_parameters_rec,
131 p_renewal_called_from_ui IN VARCHAR2 DEFAULT 'Y' /* added for bugfix 2093117 */
132 );
133
134 Procedure Update_Parents_Date_Renewed( p_api_version IN NUMBER,
135 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
136 x_return_status OUT NOCOPY VARCHAR2,
137 x_msg_count OUT NOCOPY NUMBER,
138 x_msg_data OUT NOCOPY VARCHAR2,
139 p_chr_id IN NUMBER
140 );
141 -- Bug 3580442 Overloaded this function since this is used in some of the events.
142 FUNCTION is_already_not_renewed(p_chr_id IN NUMBER, p_contract_number IN VARCHAR2) RETURN VARCHAR2;
143
144 -- Bug 3386577 Addedd an OUT parameter.
145 FUNCTION is_already_not_renewed(p_chr_id IN NUMBER, p_contract_number IN VARCHAR2, x_msg_name OUT NOCOPY VARCHAR2) RETURN VARCHAR2;
146
147
148 end OKC_RENEW_PUB;