[Home] [Help]
PACKAGE: APPS.PN_LEASE_UTILS
Source
1 PACKAGE PN_LEASE_UTILS AUTHID CURRENT_USER AS
2 /* $Header: PNLSUTLS.pls 120.1 2010/12/15 10:24:03 rmaringa noship $ */
3
4 --G_PN_MISS_NUM CONSTANT NUMBER :=NULL;
5 --G_PN_MISS_DATE CONSTANT DATE :=NULL;
6 --G_PN_MISS_CHAR CONSTANT VARCHAR2(1) := NULL;
7 -----G_PN_MISS_NUM CONSTANT NUMBER := 1.7E20;
8 -----G_PN_MISS_DATE CONSTANT DATE := TO_DATE('01/01/4712','DD/MM/YYYY');
9 ---G_PN_MISS_CHAR CONSTANT VARCHAR2(3) := '^';
10 --G_PN_MISS_NUM CONSTANT NUMBER := 9.99E125;
11 --G_PN_MISS_CHAR CONSTANT VARCHAR2(1) := chr(0);
12 --G_PN_MISS_DATE CONSTANT DATE := TO_DATE('1','j');
13
14 G_PN_MISS_NUM CONSTANT NUMBER := 1.7E20;
15 G_PN_MISS_DATE CONSTANT DATE := TO_DATE('01/01/4712','DD/MM/YYYY');
16 G_PN_MISS_CHAR CONSTANT VARCHAR2(3) := '^';
17 ---------- Vivek Added ----------------------------------------
18 -- Record Type for the accounting key flexfields associated with the PN_LEASE_DETAILS_ALL
19 TYPE ACCOUNT_REC IS RECORD
20 (
21 account_id NUMBER := PN_LEASE_UTILS.G_PN_MISS_NUM
22 , account_vals_or_ids VARCHAR2 (1) := PN_LEASE_UTILS.G_PN_MISS_CHAR
23 , account_conc_segs VARCHAR2 (800) := PN_LEASE_UTILS.G_PN_MISS_CHAR
24 , account_segment1 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
25 , account_segment2 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
26 , account_segment3 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
27 , account_segment4 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
28 , account_segment5 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
29 , account_segment6 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
30 , account_segment7 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
31 , account_segment8 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
32 , account_segment9 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
33 , account_segment10 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
34 , account_segment11 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
35 , account_segment12 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
36 , account_segment13 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
37 , account_segment14 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
38 , account_segment15 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
39 , account_segment16 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
40 , account_segment17 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
41 , account_segment18 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
42 , account_segment19 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
43 , account_segment20 VARCHAR2 (30) := PN_LEASE_UTILS.G_PN_MISS_CHAR
44 , account_percentage NUMBER := PN_LEASE_UTILS.G_PN_MISS_NUM
45 );
46 -----------------Vivek Added End-----------------------------------------------
47 PROCEDURE ADD_NULL_PARAMETER_MSG (p_token_apiname IN VARCHAR2
48 ,p_token_nullparam VARCHAR2
49 );
50 PROCEDURE GET_LOOKUP_CODE
51 ( p_parameter_name IN VARCHAR2
52 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
53 , p_lookup_meaning IN VARCHAR2
54 , p_lookup_type IN VARCHAR2
55 , x_lookup_type_code IN OUT NOCOPY VARCHAR2
56 , x_return_status OUT NOCOPY VARCHAR2
57 );
58 PROCEDURE CHECK_LEASE_NAME
59 ( p_parameter_name IN VARCHAR2
60 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
61 , X_lease_name IN OUT NOCOPY VARCHAR2
62 , x_return_status OUT NOCOPY VARCHAR2
63 );
64 PROCEDURE GET_USER_ID
65 ( p_parameter_name IN VARCHAR2
66 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
67 , p_user_name IN VARCHAR2
68 , x_user_id IN OUT NOCOPY NUMBER
69 , x_return_status OUT NOCOPY VARCHAR2
70 );
71 PROCEDURE GET_LOCATION_ID (
72 p_parameter_name IN VARCHAR2
73 , p_location_code IN VARCHAR2
74 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
75 , p_org_id IN NUMBER
76 , p_lease_class_code IN VARCHAR2
77 , p_parent_lease_id IN NUMBER
78 , p_lease_comm_date IN DATE DEFAULT NULL
79 , p_lease_term_date IN DATE DEFAULT NULL
80 , x_return_status OUT NOCOPY VARCHAR2
81 , x_location_id IN OUT NOCOPY NUMBER
82 );
83 PROCEDURE GET_MASTERLEASE_ID (
84 p_parameter_name IN VARCHAR2
85 , p_master_lease IN VARCHAR2
86 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
87 , p_org_id IN NUMBER
88 , p_lease_id IN NUMBER DEFAULT NULL
89 , x_return_status OUT NOCOPY VARCHAR2
90 , x_master_lease_id IN OUT NOCOPY VARCHAR2
91 );
92 PROCEDURE CROSSVAL_LEASEDATES (
93 p_parameter_name IN VARCHAR2
94 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
95 , p_lease_exec_date IN DATE
96 , p_lease_comm_date IN DATE
97 , p_lease_term_date IN DATE
98 , x_return_status OUT NOCOPY VARCHAR2
99 );
100 PROCEDURE GET_TERM_TEMPLATE_ID(
101 p_parameter_name IN VARCHAR2
102 , p_termtemp_name IN VARCHAR2
103 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
104 , p_termtemp_type IN VARCHAR2
105 , p_org_id IN NUMBER
106 , x_return_status OUT NOCOPY VARCHAR2
107 , x_termtemp_id IN OUT NOCOPY NUMBER
108 );
109
110 PROCEDURE GET_INVOICE_GROUPING_RULE(
111 p_parameter_name IN VARCHAR2
112 , p_grouping_rule IN VARCHAR2
113 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
114 , x_return_status OUT NOCOPY VARCHAR2
115 , x_grouping_rule_id IN OUT NOCOPY NUMBER
116 );
117 --------------Rupak BEGIN--------------
118
119 PROCEDURE validate_desc_flex (
120 p_api_name IN VARCHAR2
121 , p_application_short_name IN VARCHAR2
122 , p_desc_flex_name IN VARCHAR2
123 , p_desc_segment1 IN VARCHAR2
124 , p_desc_segment2 IN VARCHAR2
125 , p_desc_segment3 IN VARCHAR2
126 , p_desc_segment4 IN VARCHAR2
127 , p_desc_segment5 IN VARCHAR2
128 , p_desc_segment6 IN VARCHAR2
129 , p_desc_segment7 IN VARCHAR2
130 , p_desc_segment8 IN VARCHAR2
131 , p_desc_segment9 IN VARCHAR2
132 , p_desc_segment10 IN VARCHAR2
133 , p_desc_segment11 IN VARCHAR2
134 , p_desc_segment12 IN VARCHAR2
135 , p_desc_segment13 IN VARCHAR2
136 , p_desc_segment14 IN VARCHAR2
137 , p_desc_segment15 IN VARCHAR2
138 , p_desc_context IN VARCHAR2
139 , p_resp_appl_id IN NUMBER := NULL
140 , p_resp_id IN NUMBER := NULL
141 , p_return_status OUT NOCOPY VARCHAR2
142 );
143 PROCEDURE add_desc_flex_msg (p_token_an VARCHAR2
144 , p_token_dfm VARCHAR2
145 );
146 --------------Rupak END----------------
147 --------------Vivek Begin----------------
148 PROCEDURE GET_ACCOUNT_ID
149 ( p_parameter_name IN VARCHAR2
150 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
151 , p_account_id IN OUT NOCOPY NUMBER
152 , p_account_conc_segs IN OUT NOCOPY VARCHAR2
153 , p_account_segment1 IN VARCHAR2
154 , p_account_segment2 IN VARCHAR2
155 , p_account_segment3 IN VARCHAR2
156 , p_account_segment4 IN VARCHAR2
157 , p_account_segment5 IN VARCHAR2
158 , p_account_segment6 IN VARCHAR2
159 , p_account_segment7 IN VARCHAR2
160 , p_account_segment8 IN VARCHAR2
161 , p_account_segment9 IN VARCHAR2
162 , p_account_segment10 IN VARCHAR2
163 , p_account_segment11 IN VARCHAR2
164 , p_account_segment12 IN VARCHAR2
165 , p_account_segment13 IN VARCHAR2
166 , p_account_segment14 IN VARCHAR2
167 , p_account_segment15 IN VARCHAR2
168 , p_account_segment16 IN VARCHAR2
169 , p_account_segment17 IN VARCHAR2
170 , p_account_segment18 IN VARCHAR2
171 , p_account_segment19 IN VARCHAR2
172 , p_account_segment20 IN VARCHAR2
173 , x_return_status OUT NOCOPY VARCHAR2
174 );
175 PROCEDURE GET_COMPANY_ID
176 ( p_parameter_name IN VARCHAR2
177 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
178 , p_lease_role_type IN VARCHAR2
179 , p_company_name IN VARCHAR2
180 , x_return_status OUT NOCOPY VARCHAR2
181 , x_company_id IN OUT NOCOPY NUMBER
182 );
183
184 PROCEDURE GET_COMPANY_SITE_ID
185 ( p_parameter_name IN VARCHAR2
186 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
187 , p_company_id IN VARCHAR2
188 , p_company_site_name IN VARCHAR
189 , x_return_status OUT NOCOPY VARCHAR2
190 , x_company_site_id IN OUT NOCOPY NUMBER
191 );
192
193 PROCEDURE VALIDATE_TENANCY_DATES (
194 p_parameter_name IN VARCHAR2
195 , p_operation IN VARCHAR2
196 , p_estimated_occ_date IN DATE
197 , p_actual_occ_date IN DATE
198 , p_tenancy_exp_date IN DATE
199 , p_lease_comm_date IN DATE
200 , p_lease_term_date IN DATE
201 , x_return_status OUT NOCOPY VARCHAR2
202 );
203 PROCEDURE GET_TENANCY_CUST_ID (
204 p_parameter_name IN VARCHAR2
205 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
206 , p_customer_name IN VARCHAR2
207 , p_org_id IN NUMBER
208 , x_customer_id IN OUT NOCOPY NUMBER
209 , x_customer_site_use_id OUT NOCOPY NUMBER
210 , x_return_status OUT NOCOPY VARCHAR2
211 );
212
213 PROCEDURE get_customer_id (
214 p_parameter_name IN VARCHAR2
215 , p_customer_name IN VARCHAR2
216 , p_operation IN VARCHAR2 DEFAULT 'CREATE_LEASE'
217 , x_return_status OUT NOCOPY VARCHAR2
218 , x_customer_id IN OUT NOCOPY NUMBER
219 );
220 PROCEDURE get_cal_start_date ( p_parameter_name IN VARCHAR2
221 , x_cal_start IN OUT NOCOPY VARCHAR2
222 , p_operation IN VARCHAR2
223 , x_return_status OUT NOCOPY VARCHAR2
224 );
225 PROCEDURE VALIDATE_FIN_OBLIG_END_DATE (
226 p_parameter_name IN VARCHAR2
227 , p_operation IN VARCHAR2
228 , p_fin_oblig_end_date IN DATE
229 , p_tenancy_exp_date IN DATE
230 , x_return_status OUT NOCOPY VARCHAR2
231 );
232 --------------Vivek End----------------
233
234 PROCEDURE VALIDATE_COMPANY_ID (
235 p_company_name IN VARCHAR2
236 , x_company_id IN OUT NOCOPY NUMBER
237 , x_return_status OUT NOCOPY VARCHAR2
238
239 );
240 ---------------------------Terms Begin----------------------------------------------------------------------------------
241 FUNCTION GET_LEASE_CONTEXT (p_lease_id IN NUMBER
242 , p_org_id IN NUMBER
243 )
244 RETURN VARCHAR2;
245
246 FUNCTION GET_LEASE_CHANGE_ID (p_lease_id IN NUMBER
247 , p_org_id IN NUMBER
248 )
249 RETURN NUMBER;
250
251 PROCEDURE VALIDATE_PAYMENT_DATES(p_parameter_name IN VARCHAR2
252 , p_operation IN VARCHAR2
253 , p_start_date IN DATE
254 , p_end_date IN DATE
255 , p_lease_comm_date IN DATE
256 , p_lease_term_date IN DATE
257 , x_return_status OUT NOCOPY VARCHAR2
258 );
259
260 PROCEDURE GET_VENDOR_ID (p_parameter_name IN VARCHAR2
261 , p_vendor_name IN VARCHAR2
262 , p_operation IN VARCHAR2 DEFAULT 'CREATE'
263 , p_org_id IN NUMBER
264 , x_return_status OUT NOCOPY VARCHAR2
265 , x_vendor_id IN OUT NOCOPY NUMBER
266 );
267 PROCEDURE GET_VENDOR_SITE_ID (p_parameter_name IN VARCHAR2
268 , p_vendor_id IN NUMBER
269 , p_vendor_site IN VARCHAR2
270 , p_operation IN VARCHAR2 DEFAULT 'CREATE'
271 , p_org_id IN NUMBER
272 , x_return_status OUT NOCOPY VARCHAR2
273 , x_vendor_site_id IN OUT NOCOPY NUMBER
274 );
275 PROCEDURE GET_PAY_CUSTOMER_ID(p_parameter_name IN VARCHAR2
276 , p_customer_name IN VARCHAR2
277 , p_operation IN VARCHAR2 DEFAULT 'CREATE'
278 , p_org_id IN NUMBER
279 , x_return_status OUT NOCOPY VARCHAR2
280 , x_customer_id IN OUT NOCOPY NUMBER
281 );
282
283 PROCEDURE GET_PAY_CUSTOMER_SITE_ID (p_parameter_name IN VARCHAR2
284 , p_customer_site IN VARCHAR2
285 , p_customer_id IN NUMBER
286 , p_operation IN VARCHAR2 DEFAULT 'CREATE'
287 , p_org_id IN NUMBER
288 , x_return_status OUT NOCOPY VARCHAR2
289 , x_customer_site_id IN OUT NOCOPY NUMBER
290 );
291
292 ----------------------------Terms End-----------------------------------
293 END PN_LEASE_UTILS;