[Home] [Help]
44: FUNCTION check_license
45: RETURN VARCHAR2 IS
46:
47:
48: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
49: l_sales_contracts_enabled VARCHAR2(3);
50: l_dummy BOOLEAN;
51: lx_status VARCHAR2(1);
52: lx_industry VARCHAR2(1);
53: lx_oracle_schema VARCHAR2(30);
54:
55: BEGIN
56: IF l_debug_level > 0 THEN
57: oe_debug_pub.add('In OE_Contracts_util.check_license', 1);
58: END IF;
59:
60: IF OE_CONTRACTS_UTIL.G_CNTR_LICENSED IS NULL OR
61: OE_CONTRACTS_UTIL.G_CNTR_LICENSED NOT IN ('Y','N') THEN
69: oracle_schema => lx_oracle_schema
70: );
71:
72: IF l_debug_level > 0 THEN
73: oe_debug_pub.add('performing check first time, lx_status: ' || lx_status, 3);
74: END IF;
75:
76: IF lx_status = 'I' THEN
77: --contracts is installed so check profile option to see if it is also licensed
79: l_sales_contracts_enabled := NVL(FND_PROFILE.VALUE('OKC_ENABLE_SALES_CONTRACTS'),'N');
80: l_sales_contracts_enabled := UPPER(SUBSTR(l_sales_contracts_enabled,1,1)); -- take 'Y' or 'N'
81:
82: IF l_debug_level > 0 THEN
83: oe_debug_pub.add('l_sales_contracts_enabled: ' || l_sales_contracts_enabled, 3);
84: END IF;
85:
86: IF l_sales_contracts_enabled = 'Y' THEN
87: OE_CONTRACTS_UTIL.G_CNTR_LICENSED := 'Y';
97: ELSE
98: --contracts is not installed at all
99: OE_CONTRACTS_UTIL.G_CNTR_LICENSED := 'N';
100: IF l_debug_level > 0 THEN
101: oe_debug_pub.add('Contracts is not installed at all, returning ''N''', 3);
102: END IF;
103: RETURN 'N';
104: END IF;
105:
106:
107: -- we have already performed the license check earlier so reuse the cache
108: ELSE
109: IF l_debug_level > 0 THEN
110: oe_debug_pub.add('cache already has value, OE_CONTRACTS_UTIL.G_BSA_CNTR_LICENSE: ' ||OE_CONTRACTS_UTIL.G_CNTR_LICENSED, 3);
111: END IF;
112:
113: RETURN OE_CONTRACTS_UTIL.G_CNTR_LICENSED;
114: END IF;
114: END IF;
115:
116:
117: IF l_debug_level > 0 THEN
118: oe_debug_pub.add('End of OE_Contracts_util.check_license', 1);
119: END IF;
120:
121: EXCEPTION
122: WHEN OTHERS THEN
121: EXCEPTION
122: WHEN OTHERS THEN
123:
124: IF l_debug_level > 0 THEN
125: oe_debug_pub.add('WHEN-OTHERS in check_license', 1);
126: END IF;
127:
128: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
129: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
155: x_msg_count OUT NOCOPY NUMBER,
156: x_msg_data OUT NOCOPY VARCHAR2
157: ) IS
158:
159: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
160: l_copy_to_doc_number VARCHAR2(30) := TO_CHAR(p_copy_to_doc_number);
161:
162: l_doc_type VARCHAR2(5) := p_doc_type;
163: l_copy_to_doc_id NUMBER := p_copy_to_doc_id;
167:
168: BEGIN
169:
170: IF l_debug_level > 0 THEN
171: oe_debug_pub.add('In OE_Contracts_util.copy_articles ', 1);
172: END IF;
173:
174:
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
181:
182: --Check for licensing
183: IF OE_Contracts_util.check_license() <> 'Y' THEN
184: IF l_debug_level > 0 THEN
185: oe_debug_pub.add('Contractual option not licensed, hence not performing copy ', 3);
186: END IF;
187: RETURN;
188: END IF;
189:
189:
190:
191: --checking if version number passed is the latest BSA or Sales Order version
192: IF p_version_number IS NOT NULL THEN
193: oe_debug_pub.add('Checking for latest version number for for p_doc_type: '|| p_doc_type
194: || ' and p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
195:
196: IF p_doc_type = OE_CONTRACTS_UTIL.G_BSA_DOC_TYPE THEN
197: SELECT version_number
205: FROM oe_order_headers_all
206: WHERE header_id = p_copy_from_doc_id;
207:
208: END IF;
209: oe_debug_pub.add('l_latest_version_number for p_doc_type: '||p_doc_type || ' and p_copy_from_doc_id: '
210: || p_copy_from_doc_id || ' is: ' || l_latest_version_number, 3);
211: END IF;
212:
213:
217: p_version_number = l_latest_version_number THEN
218: --we are in the context of copying from a BSA or Sales Order to create a new BSA or Sales Order
219:
220: IF l_debug_level > 0 THEN
221: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc ', 3);
222: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
218: --we are in the context of copying from a BSA or Sales Order to create a new BSA or Sales Order
219:
220: IF l_debug_level > 0 THEN
221: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc ', 3);
222: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
219:
220: IF l_debug_level > 0 THEN
221: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc ', 3);
222: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
220: IF l_debug_level > 0 THEN
221: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc ', 3);
222: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
221: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc ', 3);
222: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
229: oe_debug_pub.add('p_copy_to_doc_start_date: ' || p_copy_to_doc_start_date, 3);
222: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
229: oe_debug_pub.add('p_copy_to_doc_start_date: ' || p_copy_to_doc_start_date, 3);
230: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
223: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
229: oe_debug_pub.add('p_copy_to_doc_start_date: ' || p_copy_to_doc_start_date, 3);
230: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
231: END IF;
224: oe_debug_pub.add('p_commit: ' || p_commit,3);
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
229: oe_debug_pub.add('p_copy_to_doc_start_date: ' || p_copy_to_doc_start_date, 3);
230: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
231: END IF;
232:
225: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
229: oe_debug_pub.add('p_copy_to_doc_start_date: ' || p_copy_to_doc_start_date, 3);
230: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
231: END IF;
232:
233: OKC_TERMS_COPY_GRP.copy_doc (
226: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
227: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
228: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
229: oe_debug_pub.add('p_copy_to_doc_start_date: ' || p_copy_to_doc_start_date, 3);
230: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
231: END IF;
232:
233: OKC_TERMS_COPY_GRP.copy_doc (
234: p_api_version => p_api_version,
249: p_copy_abstract_yn => 'N'
250: );
251:
252: IF l_debug_level > 0 THEN
253: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
254: END IF;
255:
256: --ETR
257: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
265: p_version_number <> l_latest_version_number THEN
266: --we are in the context of copying from an archived version of a BSA Sales Order to create a new BSA Sales Order
267:
268: IF l_debug_level > 0 THEN
269: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_archived_doc ', 3);
270: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
266: --we are in the context of copying from an archived version of a BSA Sales Order to create a new BSA Sales Order
267:
268: IF l_debug_level > 0 THEN
269: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_archived_doc ', 3);
270: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
267:
268: IF l_debug_level > 0 THEN
269: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_archived_doc ', 3);
270: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
268: IF l_debug_level > 0 THEN
269: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_archived_doc ', 3);
270: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
269: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_archived_doc ', 3);
270: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
277: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
270: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
277: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
278: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
271: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
277: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
278: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
279: END IF;
272: oe_debug_pub.add('p_commit: ' || p_commit,3);
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
277: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
278: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
279: END IF;
280:
273: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
277: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
278: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
279: END IF;
280:
281: OKC_TERMS_COPY_GRP.copy_archived_doc (
274: oe_debug_pub.add('p_copy_from_doc_id: ' || p_copy_from_doc_id, 3);
275: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
276: oe_debug_pub.add('p_copy_to_doc_id: ' || p_copy_to_doc_id, 3);
277: oe_debug_pub.add('p_keep_version: ' || p_keep_version, 3);
278: oe_debug_pub.add('l_copy_to_doc_number: ' || l_copy_to_doc_number, 3);
279: END IF;
280:
281: OKC_TERMS_COPY_GRP.copy_archived_doc (
282: p_api_version => p_api_version,
293: x_msg_count => x_msg_count
294: );
295:
296: IF l_debug_level > 0 THEN
297: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
298: END IF;
299:
300: --ETR
301: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
308: END IF;
309:
310:
311: IF l_debug_level > 0 THEN
312: oe_debug_pub.add('End of OE_Contracts_util.copy_articles, x_return_status ' || x_return_status, 1);
313: END IF;
314:
315: EXCEPTION
316: WHEN FND_API.G_EXC_ERROR THEN
315: EXCEPTION
316: WHEN FND_API.G_EXC_ERROR THEN
317:
318: IF l_debug_level > 0 THEN
319: oe_debug_pub.add('WHEN G_EXC_ERROR in copy_articles ', 3);
320: END IF;
321:
322: x_return_status := FND_API.G_RET_STS_ERROR;
323:
336:
337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
338:
339: IF l_debug_level > 0 THEN
340: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in copy_articles ', 3);
341: END IF;
342:
343: --close any cursors
344:
359:
360: WHEN OTHERS THEN
361:
362: IF l_debug_level > 0 THEN
363: oe_debug_pub.add('WHEN OTHERS in copy_articles ', 3);
364: END IF;
365:
366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
367:
407: x_msg_count OUT NOCOPY NUMBER,
408: x_msg_data OUT NOCOPY VARCHAR2
409: ) IS
410:
411: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
412:
413: BEGIN
414:
415: IF l_debug_level > 0 THEN
412:
413: BEGIN
414:
415: IF l_debug_level > 0 THEN
416: oe_debug_pub.add('In OE_Contracts_util.version_articles ', 1);
417: END IF;
418:
419: x_return_status := FND_API.G_RET_STS_SUCCESS;
420:
425:
426: --Check for licensing
427: IF OE_Contracts_util.check_license() <> 'Y' THEN
428: IF l_debug_level > 0 THEN
429: oe_debug_pub.add('Contractual option not licensed, hence not performing versioning ', 3);
430: END IF;
431: RETURN;
432: END IF;
433:
432: END IF;
433:
434:
435: IF l_debug_level > 0 THEN
436: oe_debug_pub.add('Calling OKC_TERMS_VERSION_GRP.version_doc ', 3);
437: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
433:
434:
435: IF l_debug_level > 0 THEN
436: oe_debug_pub.add('Calling OKC_TERMS_VERSION_GRP.version_doc ', 3);
437: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
441: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
434:
435: IF l_debug_level > 0 THEN
436: oe_debug_pub.add('Calling OKC_TERMS_VERSION_GRP.version_doc ', 3);
437: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
441: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
442: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
435: IF l_debug_level > 0 THEN
436: oe_debug_pub.add('Calling OKC_TERMS_VERSION_GRP.version_doc ', 3);
437: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
441: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
442: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
443: END IF;
436: oe_debug_pub.add('Calling OKC_TERMS_VERSION_GRP.version_doc ', 3);
437: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
441: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
442: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
443: END IF;
444: --go ahead and version the articles belonging to the BSA or Sales Order
437: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
441: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
442: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
443: END IF;
444: --go ahead and version the articles belonging to the BSA or Sales Order
445: OKC_TERMS_VERSION_GRP.version_doc (
438: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
439: oe_debug_pub.add('p_commit: ' || p_commit,3);
440: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
441: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
442: oe_debug_pub.add('p_version_number: ' || p_version_number, 3);
443: END IF;
444: --go ahead and version the articles belonging to the BSA or Sales Order
445: OKC_TERMS_VERSION_GRP.version_doc (
446: p_api_version => p_api_version,
455: x_msg_count => x_msg_count
456: );
457:
458: IF l_debug_level > 0 THEN
459: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
460: END IF;
461:
462: --ETR
463: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
467: END IF;
468: --ETR
469:
470: IF l_debug_level > 0 THEN
471: oe_debug_pub.add('End of OE_Contracts_util.version_articles , x_return_status ' || x_return_status, 1);
472: END IF;
473:
474: EXCEPTION
475: WHEN FND_API.G_EXC_ERROR THEN
474: EXCEPTION
475: WHEN FND_API.G_EXC_ERROR THEN
476:
477: IF l_debug_level > 0 THEN
478: oe_debug_pub.add('WHEN G_EXC_ERROR in version_articles ', 3);
479: END IF;
480:
481: --close any cursors
482:
497:
498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
499:
500: IF l_debug_level > 0 THEN
501: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in version_articles ', 3);
502: END IF;
503:
504: --close any cursors
505:
520:
521: WHEN OTHERS THEN
522:
523: IF l_debug_level > 0 THEN
524: oe_debug_pub.add('WHEN OTHERS in version_articles ', 3);
525: END IF;
526:
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528:
574: --ETR
575: l_order_signed VARCHAR2(1);
576: --ETR
577: lx_qa_result_tbl qa_result_tbl_type;
578: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
579: l_template_id NUMBER;
580: l_template_name VARCHAR2(240);
581: l_contract_source VARCHAR2(240);
582: l_authoring_party VARCHAR2(240);
586:
587: BEGIN
588:
589: IF l_debug_level > 0 THEN
590: oe_debug_pub.add('In OE_Contracts_util.qa_articles ', 1);
591: END IF;
592:
593: x_return_status := FND_API.G_RET_STS_SUCCESS;
594:
599:
600: --Check for licensing
601: IF OE_Contracts_util.check_license() <> 'Y' THEN
602: IF l_debug_level > 0 THEN
603: oe_debug_pub.add('Contractual option not licensed, hence not performing article QA ', 3);
604: END IF;
605: RETURN;
606: END IF;
607:
607:
608: --ETR
609: IF p_doc_type = OE_CONTRACTS_UTIL.get_G_SO_DOC_TYPE() THEN
610: IF l_debug_level > 0 THEN
611: oe_debug_pub.add('Calling OE_CONTRACTS_UTIL_GRP.is_order_signed ', 3);
612: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
613: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
614: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
615: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
608: --ETR
609: IF p_doc_type = OE_CONTRACTS_UTIL.get_G_SO_DOC_TYPE() THEN
610: IF l_debug_level > 0 THEN
611: oe_debug_pub.add('Calling OE_CONTRACTS_UTIL_GRP.is_order_signed ', 3);
612: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
613: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
614: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
615: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
616: END IF;
609: IF p_doc_type = OE_CONTRACTS_UTIL.get_G_SO_DOC_TYPE() THEN
610: IF l_debug_level > 0 THEN
611: oe_debug_pub.add('Calling OE_CONTRACTS_UTIL_GRP.is_order_signed ', 3);
612: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
613: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
614: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
615: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
616: END IF;
617:
610: IF l_debug_level > 0 THEN
611: oe_debug_pub.add('Calling OE_CONTRACTS_UTIL_GRP.is_order_signed ', 3);
612: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
613: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
614: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
615: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
616: END IF;
617:
618: --Check whether Order already signed ; if signed, QA already performed
611: oe_debug_pub.add('Calling OE_CONTRACTS_UTIL_GRP.is_order_signed ', 3);
612: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
613: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
614: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
615: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
616: END IF;
617:
618: --Check whether Order already signed ; if signed, QA already performed
619: l_order_signed := oe_contracts_util.is_order_signed (
624: x_msg_data => x_msg_data,
625: x_msg_count => x_msg_count
626: );
627: IF l_debug_level > 0 THEN
628: oe_debug_pub.add('l_order_signed: '|| l_order_signed, 3);
629: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
630: END IF;
631:
632: --ETR
625: x_msg_count => x_msg_count
626: );
627: IF l_debug_level > 0 THEN
628: oe_debug_pub.add('l_order_signed: '|| l_order_signed, 3);
629: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
630: END IF;
631:
632: --ETR
633: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
636: --ETR
637:
638: IF l_order_signed = 'Y' THEN
639: IF l_debug_level > 0 THEN
640: oe_debug_pub.add('SO signed and therefore already QAd, hence not performing article QA ', 3);
641: END IF;
642: RETURN;
643: END IF;
644: END IF; --IF p_doc_type = 'O' THEN
644: END IF; --IF p_doc_type = 'O' THEN
645: --ETR
646:
647: IF l_debug_level > 0 THEN
648: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist ', 3);
649: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
650: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
651: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
652: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
645: --ETR
646:
647: IF l_debug_level > 0 THEN
648: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist ', 3);
649: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
650: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
651: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
652: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
653: END IF;
646:
647: IF l_debug_level > 0 THEN
648: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist ', 3);
649: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
650: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
651: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
652: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
653: END IF;
654:
647: IF l_debug_level > 0 THEN
648: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist ', 3);
649: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
650: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
651: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
652: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
653: END IF;
654:
655: --Determine whether any articles exist for the BSA or Sales Order being QA'd
648: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist ', 3);
649: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
650: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
651: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
652: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
653: END IF;
654:
655: --Determine whether any articles exist for the BSA or Sales Order being QA'd
656: l_article_exist := OKC_TERMS_UTIL_GRP.is_article_exist (
663: x_msg_count => x_msg_count
664:
665: );
666: IF l_debug_level > 0 THEN
667: oe_debug_pub.add('l_article_exist: '|| l_article_exist, 3);
668: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
669: END IF;
670:
671: --ETR
664:
665: );
666: IF l_debug_level > 0 THEN
667: oe_debug_pub.add('l_article_exist: '|| l_article_exist, 3);
668: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
669: END IF;
670:
671: --ETR
672: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
701: END IF;
702:
703:
704: IF l_debug_level > 0 THEN
705: oe_debug_pub.add('Calling OKC_TERMS_QA_GRP.QA_doc ', 3);
706: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
707: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
708: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
709: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
702:
703:
704: IF l_debug_level > 0 THEN
705: oe_debug_pub.add('Calling OKC_TERMS_QA_GRP.QA_doc ', 3);
706: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
707: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
708: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
709: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
710: oe_debug_pub.add('p_qa_mode ' || p_qa_mode,3);
703:
704: IF l_debug_level > 0 THEN
705: oe_debug_pub.add('Calling OKC_TERMS_QA_GRP.QA_doc ', 3);
706: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
707: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
708: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
709: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
710: oe_debug_pub.add('p_qa_mode ' || p_qa_mode,3);
711: END IF;
704: IF l_debug_level > 0 THEN
705: oe_debug_pub.add('Calling OKC_TERMS_QA_GRP.QA_doc ', 3);
706: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
707: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
708: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
709: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
710: oe_debug_pub.add('p_qa_mode ' || p_qa_mode,3);
711: END IF;
712: --p_run_expert_flag added for fix 5186582 to skip expert validations in Quote to order
705: oe_debug_pub.add('Calling OKC_TERMS_QA_GRP.QA_doc ', 3);
706: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
707: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
708: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
709: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
710: oe_debug_pub.add('p_qa_mode ' || p_qa_mode,3);
711: END IF;
712: --p_run_expert_flag added for fix 5186582 to skip expert validations in Quote to order
713:
706: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
707: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
708: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
709: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
710: oe_debug_pub.add('p_qa_mode ' || p_qa_mode,3);
711: END IF;
712: --p_run_expert_flag added for fix 5186582 to skip expert validations in Quote to order
713:
714: --bug6318133
735: x_msg_count => x_msg_count
736: );
737:
738: IF l_debug_level > 0 THEN
739: oe_debug_pub.add('x_qa_return_status: '|| x_qa_return_status, 3);
740: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
741: oe_debug_pub.add('lx_qa_result_tbl.COUNT: ' || lx_qa_result_tbl.COUNT, 3);
742: END IF;
743:
736: );
737:
738: IF l_debug_level > 0 THEN
739: oe_debug_pub.add('x_qa_return_status: '|| x_qa_return_status, 3);
740: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
741: oe_debug_pub.add('lx_qa_result_tbl.COUNT: ' || lx_qa_result_tbl.COUNT, 3);
742: END IF;
743:
744: IF l_contract_source_code = 'ATTACHED' AND l_has_primary_doc = 'N' THEN
737:
738: IF l_debug_level > 0 THEN
739: oe_debug_pub.add('x_qa_return_status: '|| x_qa_return_status, 3);
740: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
741: oe_debug_pub.add('lx_qa_result_tbl.COUNT: ' || lx_qa_result_tbl.COUNT, 3);
742: END IF;
743:
744: IF l_contract_source_code = 'ATTACHED' AND l_has_primary_doc = 'N' THEN
745: --set qa return status to error
757: END IF;
758: --ETR
759:
760: IF l_debug_level > 0 THEN
761: oe_debug_pub.add('retrieving QA messages from lx_qa_result_tbl and place them onto the FND error message stack ', 3);
762: END IF;
763:
764: --retrieve QA messages from lx_qa_result_tbl and place them onto the FND error message stack
765: IF lx_qa_result_tbl.FIRST IS NOT NULL THEN
773: END IF;
774: END LOOP;
775:
776: IF l_debug_level > 0 THEN
777: oe_debug_pub.add('Transferring messages from FND stack to OM error message stack ', 3);
778: END IF;
779: OE_MSG_PUB.Transfer_Msg_Stack;
780:
781: --Get message count and data
791: END IF;
792:
793:
794: IF l_debug_level > 0 THEN
795: oe_debug_pub.add('End of OE_Contracts_util.qa_articles , x_return_status ' || x_return_status, 1);
796: END IF;
797:
798: EXCEPTION
799: WHEN FND_API.G_EXC_ERROR THEN
798: EXCEPTION
799: WHEN FND_API.G_EXC_ERROR THEN
800:
801: IF l_debug_level > 0 THEN
802: oe_debug_pub.add('WHEN G_EXC_ERROR in qa_articles ', 3);
803: END IF;
804:
805: --close any cursors
806:
821:
822: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
823:
824: IF l_debug_level > 0 THEN
825: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in qa_articles ', 3);
826: END IF;
827:
828: --close any cursors
829:
845:
846: WHEN OTHERS THEN
847:
848: IF l_debug_level > 0 THEN
849: oe_debug_pub.add('WHEN OTHERS in qa_articles ', 3);
850: END IF;
851:
852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
853:
890: x_msg_data OUT NOCOPY VARCHAR2
891: )
892:
893: RETURN VARCHAR2 IS
894: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
895: l_article_type VARCHAR2(50);
896: BEGIN
897:
898: IF l_debug_level > 0 THEN
895: l_article_type VARCHAR2(50);
896: BEGIN
897:
898: IF l_debug_level > 0 THEN
899: oe_debug_pub.add('In OE_Contracts_util.non_standard_article_exists ', 1);
900: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
901: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
902: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist',3);
903: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
896: BEGIN
897:
898: IF l_debug_level > 0 THEN
899: oe_debug_pub.add('In OE_Contracts_util.non_standard_article_exists ', 1);
900: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
901: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
902: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist',3);
903: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
904: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
897:
898: IF l_debug_level > 0 THEN
899: oe_debug_pub.add('In OE_Contracts_util.non_standard_article_exists ', 1);
900: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
901: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
902: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist',3);
903: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
904: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
905: END IF;
898: IF l_debug_level > 0 THEN
899: oe_debug_pub.add('In OE_Contracts_util.non_standard_article_exists ', 1);
900: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
901: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
902: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist',3);
903: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
904: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
905: END IF;
906:
899: oe_debug_pub.add('In OE_Contracts_util.non_standard_article_exists ', 1);
900: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
901: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
902: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist',3);
903: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
904: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
905: END IF;
906:
907: x_return_status := FND_API.G_RET_STS_SUCCESS;
900: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
901: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
902: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.is_article_exist',3);
903: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
904: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
905: END IF;
906:
907: x_return_status := FND_API.G_RET_STS_SUCCESS;
908:
908:
909: --Check for licensing
910: IF OE_Contracts_util.check_license() <> 'Y' THEN
911: IF l_debug_level > 0 THEN
912: oe_debug_pub.add('Contractual option not licensed, hence not performing non_standard_article_exists check ', 3);
913: END IF;
914: ---RETURN NULL;
915: RETURN 'N';
916: END IF;
926: x_msg_data => x_msg_data
927: );
928:
929: IF l_debug_level > 0 THEN
930: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
931: oe_debug_pub.add('l_article_type: ' || l_article_type, 3);
932: END IF;
933:
934: --ETR
927: );
928:
929: IF l_debug_level > 0 THEN
930: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
931: oe_debug_pub.add('l_article_type: ' || l_article_type, 3);
932: END IF;
933:
934: --ETR
935: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
940: --ETR
941:
942: IF l_article_type = OKC_TERMS_UTIL_GRP.G_NON_STANDARD_ART_EXIST THEN --i.e. 'NON_STANDARD_EXIST'
943: IF l_debug_level > 0 THEN
944: oe_debug_pub.add('End of OE_Contracts_util.non_standard_article_exists , returning Y');
945: END IF;
946: RETURN 'Y';
947: ELSE
948: IF l_debug_level > 0 THEN
945: END IF;
946: RETURN 'Y';
947: ELSE
948: IF l_debug_level > 0 THEN
949: oe_debug_pub.add('End of OE_Contracts_util.non_standard_article_exists , returning N');
950: END IF;
951: RETURN 'N';
952: END IF;
953:
955: EXCEPTION
956: WHEN FND_API.G_EXC_ERROR THEN
957:
958: IF l_debug_level > 0 THEN
959: oe_debug_pub.add('WHEN G_EXC_ERROR in non_standard_article_exists ', 3);
960: END IF;
961:
962: x_return_status := FND_API.G_RET_STS_ERROR;
963:
976:
977: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
978:
979: IF l_debug_level > 0 THEN
980: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in non_standard_article_exists ', 3);
981: END IF;
982:
983: --close any cursors
984:
999:
1000:
1001: WHEN OTHERS THEN
1002: IF l_debug_level > 0 THEN
1003: oe_debug_pub.add('WHEN OTHERS in non_standard_article_exists ', 3);
1004: END IF;
1005:
1006: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1007: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1037: lx_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1038: lx_msg_count NUMBER := 0;
1039: lx_msg_data VARCHAR2(2000);
1040:
1041: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1042:
1043: BEGIN
1044:
1045: IF l_debug_level > 0 THEN
1042:
1043: BEGIN
1044:
1045: IF l_debug_level > 0 THEN
1046: oe_debug_pub.add( 'ENTERING WF_non_standard_article_exists',1) ;
1047: END IF;
1048:
1049: OE_STANDARD_WF.Set_Msg_Context(actid);
1050:
1052: --header_id is the itemkey of the workflow
1053: l_doc_id := to_number(itemkey);
1054:
1055: IF l_debug_level > 0 THEN
1056: oe_debug_pub.add('l_doc_id: ' || l_doc_id,3);
1057: END IF;
1058:
1059: l_sales_document_type_code := wf_engine.GetItemAttrText(itemtype,
1060: itemkey,
1059: l_sales_document_type_code := wf_engine.GetItemAttrText(itemtype,
1060: itemkey,
1061: 'SALES_DOCUMENT_TYPE_CODE');
1062: IF l_debug_level > 0 THEN
1063: oe_debug_pub.add('l_sales_document_type_code: ' || l_sales_document_type_code,3);
1064: oe_debug_pub.add('Calling non_standard_article_exists()',3);
1065: END IF;
1066:
1067:
1060: itemkey,
1061: 'SALES_DOCUMENT_TYPE_CODE');
1062: IF l_debug_level > 0 THEN
1063: oe_debug_pub.add('l_sales_document_type_code: ' || l_sales_document_type_code,3);
1064: oe_debug_pub.add('Calling non_standard_article_exists()',3);
1065: END IF;
1066:
1067:
1068:
1077: );
1078:
1079:
1080: IF l_debug_level > 0 THEN
1081: oe_debug_pub.add('l_non_standard_article_exists: ' || l_non_standard_article_exists, 3);
1082: oe_debug_pub.add('lx_return_status: ' || lx_return_status, 3);
1083: END IF;
1084:
1085:
1078:
1079:
1080: IF l_debug_level > 0 THEN
1081: oe_debug_pub.add('l_non_standard_article_exists: ' || l_non_standard_article_exists, 3);
1082: oe_debug_pub.add('lx_return_status: ' || lx_return_status, 3);
1083: END IF;
1084:
1085:
1086: IF (funcmode = 'RUN') then
1101:
1102: EXCEPTION
1103: WHEN OTHERS THEN
1104: IF l_debug_level > 0 THEN
1105: oe_debug_pub.add('In WHEN OTHERS: ', 3);
1106: END IF;
1107:
1108: wf_core.context('OE_CONTRACTS_UTIL',
1109: 'WF_non_standard_article_exists',
1139: l_template_id NUMBER;
1140: l_template_name VARCHAR2(500);
1141: l_workflow_string VARCHAR2(1000);
1142:
1143: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1144:
1145: l_doc_version_number NUMBER;
1146:
1147: l_attachment_exist_check CHAR(1);
1187:
1188: BEGIN
1189:
1190: IF l_debug_level > 0 THEN
1191: oe_debug_pub.add('In OE_Contracts_util.attachment_location ', 1);
1192: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1193: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1194: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1195: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1188: BEGIN
1189:
1190: IF l_debug_level > 0 THEN
1191: oe_debug_pub.add('In OE_Contracts_util.attachment_location ', 1);
1192: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1193: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1194: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1195: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1196: END IF;
1189:
1190: IF l_debug_level > 0 THEN
1191: oe_debug_pub.add('In OE_Contracts_util.attachment_location ', 1);
1192: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1193: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1194: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1195: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1196: END IF;
1197:
1190: IF l_debug_level > 0 THEN
1191: oe_debug_pub.add('In OE_Contracts_util.attachment_location ', 1);
1192: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1193: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1194: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1195: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1196: END IF;
1197:
1198: x_return_status := FND_API.G_RET_STS_SUCCESS;
1191: oe_debug_pub.add('In OE_Contracts_util.attachment_location ', 1);
1192: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1193: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1194: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1195: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1196: END IF;
1197:
1198: x_return_status := FND_API.G_RET_STS_SUCCESS;
1199:
1203:
1204: --Check for licensing, proceed with procesing only if licensed
1205: IF OE_Contracts_util.check_license() <> 'Y' THEN
1206: IF l_debug_level > 0 THEN
1207: oe_debug_pub.add('Contractual option not licensed, hence exiting attachment_location ', 3);
1208: END IF;
1209: RETURN;
1210: END IF;
1211:
1219: FETCH c_attachment_exist_check INTO l_attachment_exist_check;
1220: CLOSE c_attachment_exist_check;
1221: IF l_attachment_exist_check IS NULL THEN
1222: IF l_debug_level > 0 THEN
1223: oe_debug_pub.add('No attachments exist for the BSA or Sales Order, hence exiting attachment_location...', 3);
1224: END IF;
1225: x_workflow_string := NULL; --returning NULL will ensure that no paper clip icon is shown in the workflow
1226: RETURN;
1227: END IF;
1227: END IF;
1228:
1229:
1230: IF l_debug_level > 0 THEN
1231: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1232: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1233: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1234: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1235: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1228:
1229:
1230: IF l_debug_level > 0 THEN
1231: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1232: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1233: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1234: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1235: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1236: END IF;
1229:
1230: IF l_debug_level > 0 THEN
1231: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1232: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1233: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1234: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1235: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1236: END IF;
1237:
1230: IF l_debug_level > 0 THEN
1231: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1232: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1233: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1234: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1235: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1236: END IF;
1237:
1238: --first determine whether any terms and conditions have been instantiated for the BSA or Sales Order
1231: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1232: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1233: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1234: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1235: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1236: END IF;
1237:
1238: --first determine whether any terms and conditions have been instantiated for the BSA or Sales Order
1239: oe_contracts_util.get_terms_template (
1251: );
1252:
1253:
1254: IF l_debug_level > 0 THEN
1255: oe_debug_pub.add('x_template_id: '|| l_template_id, 3);
1256: oe_debug_pub.add('x_template_name: '|| l_template_name, 3);
1257: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
1258: END IF;
1259:
1252:
1253:
1254: IF l_debug_level > 0 THEN
1255: oe_debug_pub.add('x_template_id: '|| l_template_id, 3);
1256: oe_debug_pub.add('x_template_name: '|| l_template_name, 3);
1257: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
1258: END IF;
1259:
1260: /*
1253:
1254: IF l_debug_level > 0 THEN
1255: oe_debug_pub.add('x_template_id: '|| l_template_id, 3);
1256: oe_debug_pub.add('x_template_name: '|| l_template_name, 3);
1257: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
1258: END IF;
1259:
1260: /*
1261: IF l_template_id IS NOT NULL THEN
1276: FETCH c_get_bsa_version INTO l_doc_version_number;
1277: CLOSE c_get_bsa_version;
1278:
1279: IF l_debug_level > 0 THEN
1280: oe_debug_pub.add('l_doc_version_number of blanket: '|| l_doc_version_number, 3);
1281: END IF;
1282:
1283: ELSIF p_doc_type = OE_CONTRACTS_UTIL.G_SO_DOC_TYPE THEN
1284: IF c_get_so_version%ISOPEN THEN
1289: FETCH c_get_so_version INTO l_doc_version_number;
1290: CLOSE c_get_so_version;
1291:
1292: IF l_debug_level > 0 THEN
1293: oe_debug_pub.add('l_doc_version_number of sales order: '|| l_doc_version_number, 3);
1294: END IF;
1295:
1296: END IF;
1297: ************/
1316: l_workflow_string := l_workflow_string ||'&'|| 'categories=OE_PRINT_CATEGORY';
1317: END IF;
1318:
1319: IF l_debug_level > 0 THEN
1320: oe_debug_pub.add('l_workflow_string: '|| l_workflow_string, 3);
1321: oe_debug_pub.add('End of OE_Contracts_util.attachment_location, x_return_status ' || x_return_status, 1);
1322: END IF;
1323:
1324: x_workflow_string := l_workflow_string;
1317: END IF;
1318:
1319: IF l_debug_level > 0 THEN
1320: oe_debug_pub.add('l_workflow_string: '|| l_workflow_string, 3);
1321: oe_debug_pub.add('End of OE_Contracts_util.attachment_location, x_return_status ' || x_return_status, 1);
1322: END IF;
1323:
1324: x_workflow_string := l_workflow_string;
1325:
1327: EXCEPTION
1328: WHEN FND_API.G_EXC_ERROR THEN
1329:
1330: IF l_debug_level > 0 THEN
1331: oe_debug_pub.add('WHEN OTHERS in attachment_location ', 3);
1332: END IF;
1333:
1334: IF c_attachment_exist_check%ISOPEN THEN
1335: CLOSE c_attachment_exist_check;
1363:
1364: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1365:
1366: IF l_debug_level > 0 THEN
1367: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in attachment_location ', 3);
1368: END IF;
1369:
1370: IF c_attachment_exist_check%ISOPEN THEN
1371: CLOSE c_attachment_exist_check;
1398:
1399: WHEN OTHERS THEN
1400:
1401: IF l_debug_level > 0 THEN
1402: oe_debug_pub.add('WHEN OTHERS in attachment_location ', 3);
1403: END IF;
1404:
1405: IF c_attachment_exist_check%ISOPEN THEN
1406: CLOSE c_attachment_exist_check;
1455: p_doc_id IN NUMBER
1456: )
1457: RETURN VARCHAR2 IS
1458:
1459: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1460: l_result VARCHAR2(1) := 'N';
1461:
1462: /* l_return_status VARCHAR2(1);
1463: l_msg_count NUMBER;
1462: /* l_return_status VARCHAR2(1);
1463: l_msg_count NUMBER;
1464: l_msg_data VARCHAR2(2000);
1465:
1466: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1467: l_template_id NUMBER;
1468: l_template_name VARCHAR2(500);
1469: */
1470: BEGIN
1469: */
1470: BEGIN
1471:
1472: IF l_debug_level > 0 THEN
1473: oe_debug_pub.add('In OE_Contracts_util.terms_exists ', 1);
1474: END IF;
1475:
1476: --Check for licensing
1477: IF OE_Contracts_util.check_license() <> 'Y' THEN
1475:
1476: --Check for licensing
1477: IF OE_Contracts_util.check_license() <> 'Y' THEN
1478: IF l_debug_level > 0 THEN
1479: oe_debug_pub.add('Contracts not licensed, exiting terms_exists', 3);
1480: END IF;
1481: --RETURN NULL;
1482: RETURN 'N';
1483: END IF;
1483: END IF;
1484:
1485:
1486: IF l_debug_level > 0 THEN
1487: oe_debug_pub.add('Calling OE_Contracts_util.has_terms ', 3);
1488: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1489: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1490: END IF;
1491:
1484:
1485:
1486: IF l_debug_level > 0 THEN
1487: oe_debug_pub.add('Calling OE_Contracts_util.has_terms ', 3);
1488: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1489: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1490: END IF;
1491:
1492: --first determine whether any terms and conditions have been instantiated for the BSA or sales order
1485:
1486: IF l_debug_level > 0 THEN
1487: oe_debug_pub.add('Calling OE_Contracts_util.has_terms ', 3);
1488: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1489: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1490: END IF;
1491:
1492: --first determine whether any terms and conditions have been instantiated for the BSA or sales order
1493: /* oe_contracts_util.get_terms_template (
1504: );
1505:
1506:
1507: IF l_debug_level > 0 THEN
1508: oe_debug_pub.add('l_template_id: '|| l_template_id, 3);
1509: oe_debug_pub.add('l_template_name: '|| l_template_name, 3);
1510: oe_debug_pub.add('l_return_status: '|| l_return_status, 3);
1511: END IF;
1512:
1505:
1506:
1507: IF l_debug_level > 0 THEN
1508: oe_debug_pub.add('l_template_id: '|| l_template_id, 3);
1509: oe_debug_pub.add('l_template_name: '|| l_template_name, 3);
1510: oe_debug_pub.add('l_return_status: '|| l_return_status, 3);
1511: END IF;
1512:
1513:
1506:
1507: IF l_debug_level > 0 THEN
1508: oe_debug_pub.add('l_template_id: '|| l_template_id, 3);
1509: oe_debug_pub.add('l_template_name: '|| l_template_name, 3);
1510: oe_debug_pub.add('l_return_status: '|| l_return_status, 3);
1511: END IF;
1512:
1513:
1514: IF l_template_id IS NOT NULL THEN
1512:
1513:
1514: IF l_template_id IS NOT NULL THEN
1515: IF l_debug_level > 0 THEN
1516: oe_debug_pub.add('End of OE_Contracts_util.terms_exists , returning Y');
1517: END IF;
1518: RETURN ('Y');
1519: ELSE
1520: IF l_debug_level > 0 THEN
1517: END IF;
1518: RETURN ('Y');
1519: ELSE
1520: IF l_debug_level > 0 THEN
1521: oe_debug_pub.add('End of OE_Contracts_util.terms_exists , returning Y');
1522: END IF;
1523: RETURN ('N');
1524: END IF;*/
1525:
1530: p_document_id => p_doc_id
1531: );
1532:
1533: IF l_debug_level > 0 THEN
1534: oe_debug_pub.add('End of OE_Contracts_util.terms_exists result is:'||l_result );
1535: END IF;
1536:
1537: RETURN l_result;
1538:
1541:
1542: WHEN OTHERS THEN
1543:
1544: IF l_debug_level > 0 THEN
1545: oe_debug_pub.add('WHEN-OTHERS in terms_exists', 1);
1546: END IF;
1547:
1548: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1549: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1571: x_msg_count OUT NOCOPY NUMBER,
1572: x_msg_data OUT NOCOPY VARCHAR2
1573: ) IS
1574:
1575: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1576:
1577: BEGIN
1578:
1579: IF l_debug_level > 0 THEN
1576:
1577: BEGIN
1578:
1579: IF l_debug_level > 0 THEN
1580: oe_debug_pub.add('In OE_Contracts_util.delete_articles ', 1);
1581: END IF;
1582:
1583: x_return_status := FND_API.G_RET_STS_SUCCESS;
1584:
1588:
1589: --Check for licensing
1590: IF OE_Contracts_util.check_license() <> 'Y' THEN
1591: IF l_debug_level > 0 THEN
1592: oe_debug_pub.add('Contractual option not licensed, hence exiting delete_articles ', 3);
1593: END IF;
1594: RETURN;
1595: END IF;
1596:
1596:
1597:
1598:
1599: IF l_debug_level > 0 THEN
1600: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1601: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1602: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1603: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1604: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1597:
1598:
1599: IF l_debug_level > 0 THEN
1600: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1601: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1602: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1603: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1604: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1605: oe_debug_pub.add('p_commit: ' || p_commit,3);
1598:
1599: IF l_debug_level > 0 THEN
1600: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1601: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1602: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1603: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1604: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1605: oe_debug_pub.add('p_commit: ' || p_commit,3);
1606: END IF;
1599: IF l_debug_level > 0 THEN
1600: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1601: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1602: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1603: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1604: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1605: oe_debug_pub.add('p_commit: ' || p_commit,3);
1606: END IF;
1607:
1600: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1601: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1602: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1603: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1604: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1605: oe_debug_pub.add('p_commit: ' || p_commit,3);
1606: END IF;
1607:
1608: OKC_TERMS_UTIL_GRP.delete_doc (
1601: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1602: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1603: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1604: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1605: oe_debug_pub.add('p_commit: ' || p_commit,3);
1606: END IF;
1607:
1608: OKC_TERMS_UTIL_GRP.delete_doc (
1609: p_api_version => p_api_version,
1616: x_msg_count => x_msg_count
1617: );
1618:
1619: IF l_debug_level > 0 THEN
1620: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
1621: END IF;
1622:
1623: --ETR
1624: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1628: END IF;
1629: --ETR
1630:
1631: IF l_debug_level > 0 THEN
1632: oe_debug_pub.add('End of OE_Contracts_util.delete_articles, x_return_status ' || x_return_status, 1);
1633: END IF;
1634:
1635: EXCEPTION
1636: WHEN FND_API.G_EXC_ERROR THEN
1635: EXCEPTION
1636: WHEN FND_API.G_EXC_ERROR THEN
1637:
1638: IF l_debug_level > 0 THEN
1639: oe_debug_pub.add('WHEN G_EXC_ERROR in delete_articles ', 3);
1640: END IF;
1641:
1642: --close any cursors
1643:
1658:
1659: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1660:
1661: IF l_debug_level > 0 THEN
1662: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in delete_articles ', 3);
1663: END IF;
1664:
1665: --close any cursors
1666:
1681:
1682: WHEN OTHERS THEN
1683:
1684: IF l_debug_level > 0 THEN
1685: oe_debug_pub.add('WHEN OTHERS in delete_articles ', 3);
1686: END IF;
1687:
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1689:
1723: x_msg_count OUT NOCOPY NUMBER,
1724: x_msg_data OUT NOCOPY VARCHAR2
1725: ) IS
1726:
1727: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1728:
1729: BEGIN
1730:
1731: IF l_debug_level > 0 THEN
1728:
1729: BEGIN
1730:
1731: IF l_debug_level > 0 THEN
1732: oe_debug_pub.add('In OE_Contracts_util.purge_articles ', 1);
1733: END IF;
1734:
1735: x_return_status := FND_API.G_RET_STS_SUCCESS;
1736:
1740:
1741: --Check for licensing
1742: IF OE_Contracts_util.check_license() <> 'Y' THEN
1743: IF l_debug_level > 0 THEN
1744: oe_debug_pub.add('Contractual option not licensed, hence exiting purge_articles ', 3);
1745: END IF;
1746: RETURN;
1747: END IF;
1748:
1748:
1749:
1750:
1751: IF l_debug_level > 0 THEN
1752: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1753: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1754: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1755: oe_debug_pub.add('p_commit: ' || p_commit,3);
1756: END IF;
1749:
1750:
1751: IF l_debug_level > 0 THEN
1752: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1753: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1754: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1755: oe_debug_pub.add('p_commit: ' || p_commit,3);
1756: END IF;
1757:
1750:
1751: IF l_debug_level > 0 THEN
1752: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1753: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1754: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1755: oe_debug_pub.add('p_commit: ' || p_commit,3);
1756: END IF;
1757:
1758: OKC_TERMS_UTIL_GRP.purge_doc (
1751: IF l_debug_level > 0 THEN
1752: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1753: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1754: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1755: oe_debug_pub.add('p_commit: ' || p_commit,3);
1756: END IF;
1757:
1758: OKC_TERMS_UTIL_GRP.purge_doc (
1759: p_api_version => p_api_version,
1765: x_msg_count => x_msg_count
1766: );
1767:
1768: IF l_debug_level > 0 THEN
1769: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
1770: END IF;
1771:
1772: --ETR
1773: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1777: END IF;
1778: --ETR
1779:
1780: IF l_debug_level > 0 THEN
1781: oe_debug_pub.add('End of OE_Contracts_util.purge_articles, x_return_status ' || x_return_status, 1);
1782: END IF;
1783:
1784: EXCEPTION
1785: WHEN FND_API.G_EXC_ERROR THEN
1784: EXCEPTION
1785: WHEN FND_API.G_EXC_ERROR THEN
1786:
1787: IF l_debug_level > 0 THEN
1788: oe_debug_pub.add('WHEN G_EXC_ERROR in purge_articles ', 3);
1789: END IF;
1790:
1791: --close any cursors
1792:
1807:
1808: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1809:
1810: IF l_debug_level > 0 THEN
1811: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in purge_articles ', 3);
1812: END IF;
1813:
1814: --close any cursors
1815:
1830:
1831: WHEN OTHERS THEN
1832:
1833: IF l_debug_level > 0 THEN
1834: oe_debug_pub.add('WHEN OTHERS in purge_articles ', 3);
1835: END IF;
1836:
1837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1838:
1933:
1934:
1935: l_bsa_header_variables c_get_bsa_header_variables%ROWTYPE;
1936: l_so_header_variables c_get_so_header_variables%ROWTYPE;
1937: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1938:
1939: BEGIN
1940:
1941: IF l_debug_level > 0 THEN
1938:
1939: BEGIN
1940:
1941: IF l_debug_level > 0 THEN
1942: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for header level variables', 1);
1943: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1944: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1945: END IF;
1946:
1939: BEGIN
1940:
1941: IF l_debug_level > 0 THEN
1942: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for header level variables', 1);
1943: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1944: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1945: END IF;
1946:
1947: x_return_status := FND_API.G_RET_STS_SUCCESS;
1940:
1941: IF l_debug_level > 0 THEN
1942: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for header level variables', 1);
1943: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1944: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1945: END IF;
1946:
1947: x_return_status := FND_API.G_RET_STS_SUCCESS;
1948:
1966:
1967: OPEN c_get_bsa_header_variables;
1968: FETCH c_get_bsa_header_variables INTO l_bsa_header_variables;
1969: IF l_debug_level > 0 THEN
1970: oe_debug_pub.add('c_get_bsa_header_variables%ROWCOUNT: ' || c_get_bsa_header_variables%ROWCOUNT, 3);
1971: END IF;
1972: CLOSE c_get_bsa_header_variables;
1973:
1974: ELSIF p_doc_type = OE_CONTRACTS_UTIL.G_SO_DOC_TYPE THEN
1979:
1980: OPEN c_get_so_header_variables;
1981: FETCH c_get_so_header_variables INTO l_so_header_variables;
1982: IF l_debug_level > 0 THEN
1983: oe_debug_pub.add('c_get_so_header_variables%ROWCOUNT: ' || c_get_so_header_variables%ROWCOUNT, 3);
1984: END IF;
1985: CLOSE c_get_so_header_variables;
1986:
1987: END IF;
2183: ELSE NULL;
2184: END IF;
2185:
2186: IF l_debug_level > 0 THEN
2187: oe_debug_pub.add(p_sys_var_value_tbl(i).variable_code || ': ' || p_sys_var_value_tbl(i).variable_value_id, 3);
2188: END IF;
2189:
2190:
2191: END LOOP;
2193:
2194: END IF;
2195:
2196: IF l_debug_level > 0 THEN
2197: oe_debug_pub.add('End of OE_Contracts_util.get_article_variable_values for header level variables, x_return_status ' || x_return_status, 1);
2198: END IF;
2199:
2200:
2201: EXCEPTION
2201: EXCEPTION
2202: WHEN FND_API.G_EXC_ERROR THEN
2203:
2204: IF l_debug_level > 0 THEN
2205: oe_debug_pub.add('WHEN G_EXC_ERROR in get_article_variable_values ', 3);
2206: END IF;
2207:
2208: --close any cursors
2209: IF c_get_bsa_header_variables%ISOPEN THEN
2227:
2228: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2229:
2230: IF l_debug_level > 0 THEN
2231: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_article_variable_values ', 3);
2232: END IF;
2233:
2234: --close any cursors
2235: IF c_get_bsa_header_variables%ISOPEN THEN
2253:
2254: WHEN OTHERS THEN
2255:
2256: IF l_debug_level > 0 THEN
2257: oe_debug_pub.add('WHEN OTHERS in get_article_variable_values ', 3);
2258: END IF;
2259:
2260: IF c_get_bsa_header_variables%ISOPEN THEN
2261: CLOSE c_get_bsa_header_variables;
2379: j BINARY_INTEGER := 1;
2380: l_master_org_id NUMBER;
2381: lx_ordered_item VARCHAR2(2000);
2382: lx_inventory_item VARCHAR2(2000);
2383: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2384:
2385: BEGIN
2386:
2387: IF l_debug_level > 0 THEN
2384:
2385: BEGIN
2386:
2387: IF l_debug_level > 0 THEN
2388: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2389: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2390: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2391: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2392: END IF;
2385: BEGIN
2386:
2387: IF l_debug_level > 0 THEN
2388: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2389: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2390: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2391: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2392: END IF;
2393:
2386:
2387: IF l_debug_level > 0 THEN
2388: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2389: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2390: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2391: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2392: END IF;
2393:
2394:
2387: IF l_debug_level > 0 THEN
2388: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2389: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2390: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2391: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2392: END IF;
2393:
2394:
2395: x_return_status := FND_API.G_RET_STS_SUCCESS;
2406: IF p_line_var_tbl.FIRST IS NOT NULL THEN
2407: FOR i IN p_line_var_tbl.FIRST..p_line_var_tbl.LAST LOOP
2408:
2409: IF l_debug_level > 0 THEN
2410: oe_debug_pub.add('Processing for ' || p_line_var_tbl(i), 3);
2411: END IF;
2412:
2413: IF p_line_var_tbl(i) = 'OKC$S_ITEMS' THEN
2414:
2414:
2415: FOR c_get_items_rec IN c_get_items LOOP
2416: --loop thru all the items for internal INT items
2417: IF l_debug_level > 0 THEN
2418: oe_debug_pub.add('c_get_items_rec.item_identifier_type: '||c_get_items_rec.item_identifier_type, 3);
2419: END IF;
2420:
2421: IF c_get_items_rec.item_identifier_type = 'INT' THEN
2422: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_INTERNAL_ITEM
2434: param_name => 'MASTER_ORGANIZATION_ID'
2435: ));
2436:
2437: IF l_debug_level > 0 THEN
2438: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2439: oe_debug_pub.add('mapping non-INT item to INT item, Calling OE_Id_To_Value.Ordered_Item ', 3);
2440: END IF;
2441:
2442: --map non-INT item to INT item
2435: ));
2436:
2437: IF l_debug_level > 0 THEN
2438: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2439: oe_debug_pub.add('mapping non-INT item to INT item, Calling OE_Id_To_Value.Ordered_Item ', 3);
2440: END IF;
2441:
2442: --map non-INT item to INT item
2443: OE_Id_To_Value.Ordered_Item (
2454: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_INTERNAL_ITEM
2455: x_line_var_value_tbl(j).variable_value_id := lx_inventory_item;
2456:
2457: IF l_debug_level > 0 THEN
2458: oe_debug_pub.add('lx_inventory_item: ' || lx_inventory_item, 3);
2459: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2460: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2461: END IF;
2462:
2455: x_line_var_value_tbl(j).variable_value_id := lx_inventory_item;
2456:
2457: IF l_debug_level > 0 THEN
2458: oe_debug_pub.add('lx_inventory_item: ' || lx_inventory_item, 3);
2459: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2460: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2461: END IF;
2462:
2463:
2456:
2457: IF l_debug_level > 0 THEN
2458: oe_debug_pub.add('lx_inventory_item: ' || lx_inventory_item, 3);
2459: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2460: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2461: END IF;
2462:
2463:
2464: END IF;
2479: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_ITEM_CATEGORIES
2480: x_line_var_value_tbl(j).variable_value_id := c_get_item_categories_rec.ordered_item;
2481:
2482: IF l_debug_level > 0 THEN
2483: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2484: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2485: END IF;
2486:
2487: j := j + 1;
2480: x_line_var_value_tbl(j).variable_value_id := c_get_item_categories_rec.ordered_item;
2481:
2482: IF l_debug_level > 0 THEN
2483: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2484: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2485: END IF;
2486:
2487: j := j + 1;
2488:
2502: param_name => 'MASTER_ORGANIZATION_ID'
2503: ));
2504:
2505: IF l_debug_level > 0 THEN
2506: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2507: oe_debug_pub.add('get the item categories to which the INT and non-INT items in the BSA belong to',3);
2508: END IF;
2509:
2510: l_bsa_derived_item_category := null; --initialize !!!!!!! this causes NULL values: ref: Arun/Aftab issue
2503: ));
2504:
2505: IF l_debug_level > 0 THEN
2506: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2507: oe_debug_pub.add('get the item categories to which the INT and non-INT items in the BSA belong to',3);
2508: END IF;
2509:
2510: l_bsa_derived_item_category := null; --initialize !!!!!!! this causes NULL values: ref: Arun/Aftab issue
2511: IF c_get_derived_item_category%ISOPEN THEN
2518: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_ITEM_CATEGORIES
2519: x_line_var_value_tbl(j).variable_value_id := l_bsa_derived_item_category.category_concat_segs;
2520:
2521: IF l_debug_level > 0 THEN
2522: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2523: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2524: END IF;
2525:
2526: j := j + 1;
2519: x_line_var_value_tbl(j).variable_value_id := l_bsa_derived_item_category.category_concat_segs;
2520:
2521: IF l_debug_level > 0 THEN
2522: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2523: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2524: END IF;
2525:
2526: j := j + 1;
2527:
2534: END IF; ----IF p_line_var_tbl.FIRST IS NOT NULL THEN
2535:
2536:
2537: IF l_debug_level > 0 THEN
2538: oe_debug_pub.add('End of OE_Contracts_util.get_article_variable_values for line level variables, x_return_status: '|| x_return_status, 1);
2539: END IF;
2540:
2541: EXCEPTION
2542: WHEN FND_API.G_EXC_ERROR THEN
2541: EXCEPTION
2542: WHEN FND_API.G_EXC_ERROR THEN
2543:
2544: IF l_debug_level > 0 THEN
2545: oe_debug_pub.add('WHEN G_EXC_ERROR in get_article_variable_values ', 3);
2546: END IF;
2547:
2548: --close any cursors
2549: IF c_get_derived_item_category%ISOPEN THEN
2568:
2569: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2570:
2571: IF l_debug_level > 0 THEN
2572: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_article_variable_values ', 3);
2573: END IF;
2574:
2575: --close any cursors
2576: IF c_get_derived_item_category%ISOPEN THEN
2594:
2595: WHEN OTHERS THEN
2596:
2597: IF l_debug_level > 0 THEN
2598: oe_debug_pub.add('WHEN OTHERS in get_article_variable_values ', 3);
2599: END IF;
2600:
2601: --close any cursors
2602: IF c_get_derived_item_category%ISOPEN THEN
2650:
2651: IS
2652:
2653:
2654: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2655:
2656:
2657: BEGIN
2658:
2656:
2657: BEGIN
2658:
2659: IF l_debug_level > 0 THEN
2660: oe_debug_pub.add('In OE_Contracts_util.get_terms_template ', 1);
2661: END IF;
2662:
2663: x_return_status := FND_API.G_RET_STS_SUCCESS;
2664:
2668:
2669: --Check for licensing
2670: IF OE_Contracts_util.check_license() <> 'Y' THEN
2671: IF l_debug_level > 0 THEN
2672: oe_debug_pub.add('Contractual option not licensed, hence exiting get_terms_template ', 3);
2673: END IF;
2674: x_template_id := NULL;
2675: x_template_name := NULL;
2676: RETURN;
2677: END IF;
2678:
2679:
2680: IF l_debug_level > 0 THEN
2681: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2682: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2683: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2684: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2685: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2678:
2679:
2680: IF l_debug_level > 0 THEN
2681: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2682: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2683: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2684: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2685: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2686: END IF;
2679:
2680: IF l_debug_level > 0 THEN
2681: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2682: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2683: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2684: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2685: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2686: END IF;
2687:
2680: IF l_debug_level > 0 THEN
2681: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2682: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2683: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2684: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2685: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2686: END IF;
2687:
2688: OKC_TERMS_UTIL_GRP.get_terms_template (
2681: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2682: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2683: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2684: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2685: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2686: END IF;
2687:
2688: OKC_TERMS_UTIL_GRP.get_terms_template (
2689: p_api_version => p_api_version,
2698: x_msg_data => x_msg_data
2699: );
2700:
2701: IF l_debug_level > 0 THEN
2702: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
2703: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
2704: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
2705: END IF;
2706:
2699: );
2700:
2701: IF l_debug_level > 0 THEN
2702: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
2703: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
2704: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
2705: END IF;
2706:
2707: --ETR
2700:
2701: IF l_debug_level > 0 THEN
2702: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
2703: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
2704: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
2705: END IF;
2706:
2707: --ETR
2708: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2712: END IF;
2713: --ETR
2714:
2715: IF l_debug_level > 0 THEN
2716: oe_debug_pub.add('End of OE_Contracts_util.get_terms_template , x_return_status ' || x_return_status, 1);
2717: END IF;
2718:
2719: EXCEPTION
2720: WHEN FND_API.G_EXC_ERROR THEN
2719: EXCEPTION
2720: WHEN FND_API.G_EXC_ERROR THEN
2721:
2722: IF l_debug_level > 0 THEN
2723: oe_debug_pub.add('WHEN G_EXC_ERROR in get_terms_template ', 3);
2724: END IF;
2725:
2726: x_return_status := FND_API.G_RET_STS_ERROR;
2727:
2740:
2741: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2742:
2743: IF l_debug_level > 0 THEN
2744: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_terms_template ', 3);
2745: END IF;
2746:
2747: --close any cursors
2748:
2763:
2764: WHEN OTHERS THEN
2765:
2766: IF l_debug_level > 0 THEN
2767: oe_debug_pub.add('WHEN OTHERS in get_terms_template ', 3);
2768: END IF;
2769:
2770: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2771:
2805: x_msg_count OUT NOCOPY NUMBER
2806: ) RETURN VARCHAR2 IS
2807:
2808:
2809: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2810: l_template_name VARCHAR2(500);
2811:
2812:
2813: BEGIN
2812:
2813: BEGIN
2814:
2815: IF l_debug_level > 0 THEN
2816: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2817: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2818: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2819: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2820: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2813: BEGIN
2814:
2815: IF l_debug_level > 0 THEN
2816: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2817: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2818: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2819: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2820: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2821: END IF;
2814:
2815: IF l_debug_level > 0 THEN
2816: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2817: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2818: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2819: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2820: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2821: END IF;
2822:
2815: IF l_debug_level > 0 THEN
2816: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2817: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2818: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2819: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2820: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2821: END IF;
2822:
2823: x_return_status := FND_API.G_RET_STS_SUCCESS;
2816: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2817: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2818: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2819: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2820: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2821: END IF;
2822:
2823: x_return_status := FND_API.G_RET_STS_SUCCESS;
2824:
2824:
2825: --Check for licensing
2826: IF OE_Contracts_util.check_license() <> 'Y' THEN
2827: IF l_debug_level > 0 THEN
2828: oe_debug_pub.add('Contractual option not licensed, hence exiting Get_Template_Name ', 3);
2829: END IF;
2830: RETURN TO_CHAR(NULL); --returning null is OK here as null will be displayed
2831: END IF;
2832:
2841: );
2842:
2843:
2844: IF l_debug_level > 0 THEN
2845: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
2846: oe_debug_pub.add('l_template_name: ' || l_template_name, 3);
2847: END IF;
2848:
2849: --ETR
2842:
2843:
2844: IF l_debug_level > 0 THEN
2845: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
2846: oe_debug_pub.add('l_template_name: ' || l_template_name, 3);
2847: END IF;
2848:
2849: --ETR
2850: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2854: END IF;
2855: --ETR
2856:
2857: IF l_debug_level > 0 THEN
2858: oe_debug_pub.add('End of OE_Contracts_util.Get_Template_Name, returning l_template_name: ' || l_template_name);
2859: END IF;
2860:
2861: RETURN l_template_name;
2862:
2864: EXCEPTION
2865: WHEN FND_API.G_EXC_ERROR THEN
2866:
2867: IF l_debug_level > 0 THEN
2868: oe_debug_pub.add('WHEN G_EXC_ERROR in Get_Template_Name ', 3);
2869: END IF;
2870:
2871: x_return_status := FND_API.G_RET_STS_ERROR;
2872:
2885:
2886: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2887:
2888: IF l_debug_level > 0 THEN
2889: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in Get_Template_Name ', 3);
2890: END IF;
2891:
2892: --close any cursors
2893:
2907:
2908:
2909: WHEN OTHERS THEN
2910: IF l_debug_level > 0 THEN
2911: oe_debug_pub.add('WHEN OTHERS in Get_Template_Name ', 3);
2912: END IF;
2913:
2914: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2915: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
2950: )
2951:
2952: IS
2953:
2954: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2955: BEGIN
2956:
2957: IF l_debug_level > 0 THEN
2958: oe_debug_pub.add('In OE_Contracts_util.instantiate_terms ', 1);
2954: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2955: BEGIN
2956:
2957: IF l_debug_level > 0 THEN
2958: oe_debug_pub.add('In OE_Contracts_util.instantiate_terms ', 1);
2959: END IF;
2960:
2961: x_return_status := FND_API.G_RET_STS_SUCCESS;
2962:
2966:
2967: --Check for licensing
2968: IF OE_Contracts_util.check_license() <> 'Y' THEN
2969: IF l_debug_level > 0 THEN
2970: oe_debug_pub.add('Contractual option not licensed, hence exiting instantiate_terms ', 3);
2971: END IF;
2972: RETURN;
2973: END IF;
2974:
2973: END IF;
2974:
2975:
2976: IF l_debug_level > 0 THEN
2977: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2978: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2974:
2975:
2976: IF l_debug_level > 0 THEN
2977: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2978: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2975:
2976: IF l_debug_level > 0 THEN
2977: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2978: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2983: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2976: IF l_debug_level > 0 THEN
2977: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2978: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2983: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2984: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2977: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2978: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2983: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2984: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2985: END IF;
2978: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2983: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2984: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2985: END IF;
2986:
2979: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2983: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2984: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2985: END IF;
2986:
2987:
2980: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2981: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2982: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2983: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2984: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2985: END IF;
2986:
2987:
2988: OKC_TERMS_COPY_GRP.copy_terms (
3002: x_msg_data => x_msg_data
3003: );
3004:
3005: IF l_debug_level > 0 THEN
3006: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3007: END IF;
3008:
3009: --ETR
3010: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3014: END IF;
3015: --ETR
3016:
3017: IF l_debug_level > 0 THEN
3018: oe_debug_pub.add('End of OE_Contracts_util.instantiate_terms , x_return_status ' || x_return_status, 1);
3019: END IF;
3020:
3021: EXCEPTION
3022: WHEN FND_API.G_EXC_ERROR THEN
3021: EXCEPTION
3022: WHEN FND_API.G_EXC_ERROR THEN
3023:
3024: IF l_debug_level > 0 THEN
3025: oe_debug_pub.add('WHEN G_EXC_ERROR in instantiate_terms ', 3);
3026: END IF;
3027:
3028: x_return_status := FND_API.G_RET_STS_ERROR;
3029:
3042:
3043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3044:
3045: IF l_debug_level > 0 THEN
3046: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in instantiate_terms ', 3);
3047: END IF;
3048:
3049: --close any cursors
3050:
3065:
3066: WHEN OTHERS THEN
3067:
3068: IF l_debug_level > 0 THEN
3069: oe_debug_pub.add('WHEN OTHERS in instantiate_terms ', 3);
3070: END IF;
3071:
3072: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3073:
3115: )
3116:
3117: IS
3118:
3119: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3120:
3121: l_instntiatd_templt_id NUMBER;
3122: lx_template_name VARCHAR2(500);
3123:
3123:
3124: BEGIN
3125:
3126: IF l_debug_level > 0 THEN
3127: oe_debug_pub.add('In OE_Contracts_util.instantiate_doc_terms ', 1);
3128: END IF;
3129:
3130: x_return_status := FND_API.G_RET_STS_SUCCESS;
3131:
3135:
3136: --Check for licensing
3137: IF OE_Contracts_util.check_license() <> 'Y' THEN
3138: IF l_debug_level > 0 THEN
3139: oe_debug_pub.add('Contractual option not licensed, hence exiting instantiate_doc_terms ', 3);
3140: END IF;
3141: RETURN;
3142: END IF;
3143:
3142: END IF;
3143:
3144:
3145: IF l_debug_level > 0 THEN
3146: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3147: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3143:
3144:
3145: IF l_debug_level > 0 THEN
3146: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3147: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3151: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3144:
3145: IF l_debug_level > 0 THEN
3146: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3147: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3151: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3152: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3145: IF l_debug_level > 0 THEN
3146: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3147: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3151: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3152: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3153: END IF;
3146: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3147: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3151: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3152: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3153: END IF;
3154:
3147: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3151: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3152: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3153: END IF;
3154:
3155:
3148: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3149: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3150: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3151: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3152: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3153: END IF;
3154:
3155:
3156:
3160: IF p_template_id IS NOT NULL THEN
3161:
3162:
3163: IF l_debug_level > 0 THEN
3164: oe_debug_pub.add('Calling oe_contracts_util.get_terms_template', 3);
3165: END IF;
3166:
3167:
3168: --first determine whether any terms and conditions have been instantiated for the BSA or Sales Order
3181: x_msg_data => x_msg_data
3182: );
3183:
3184: IF l_debug_level > 0 THEN
3185: oe_debug_pub.add('l_instntiatd_templt_id: ' || l_instntiatd_templt_id, 3);
3186: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3187: END IF;
3188:
3189:
3182: );
3183:
3184: IF l_debug_level > 0 THEN
3185: oe_debug_pub.add('l_instntiatd_templt_id: ' || l_instntiatd_templt_id, 3);
3186: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3187: END IF;
3188:
3189:
3190: IF l_instntiatd_templt_id IS NULL THEN
3191: /** i.e. the contract template freshly defaulted in the form has not yet been
3192: instantiated so go ahead and instantiate it against the BSA or SO **/
3193:
3194: IF l_debug_level > 0 THEN
3195: oe_debug_pub.add('Calling oe_contracts_util.instantiate_terms', 3);
3196: END IF;
3197:
3198: oe_contracts_util.instantiate_terms (
3199: p_api_version => 1.0,
3212: );
3213:
3214:
3215: IF l_debug_level > 0 THEN
3216: oe_debug_pub.add('After trying to instantiate p_template_id: ' || p_template_id, 3);
3217: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3218: END IF;
3219:
3220:
3213:
3214:
3215: IF l_debug_level > 0 THEN
3216: oe_debug_pub.add('After trying to instantiate p_template_id: ' || p_template_id, 3);
3217: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3218: END IF;
3219:
3220:
3221:
3225:
3226:
3227:
3228: IF l_debug_level > 0 THEN
3229: oe_debug_pub.add('End of OE_Contracts_util.instantiate_doc_terms , x_return_status ' || x_return_status, 1);
3230: END IF;
3231:
3232: EXCEPTION
3233: WHEN FND_API.G_EXC_ERROR THEN
3232: EXCEPTION
3233: WHEN FND_API.G_EXC_ERROR THEN
3234:
3235: IF l_debug_level > 0 THEN
3236: oe_debug_pub.add('WHEN G_EXC_ERROR in instantiate_doc_terms ', 3);
3237: END IF;
3238:
3239: x_return_status := FND_API.G_RET_STS_ERROR;
3240:
3253:
3254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3255:
3256: IF l_debug_level > 0 THEN
3257: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in instantiate_doc_terms ', 3);
3258: END IF;
3259:
3260: --close any cursors
3261:
3276:
3277: WHEN OTHERS THEN
3278:
3279: IF l_debug_level > 0 THEN
3280: oe_debug_pub.add('WHEN OTHERS in instantiate_doc_terms ', 3);
3281: END IF;
3282:
3283: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3284:
3328: --ETR
3329: l_sign_by VARCHAR2(240);
3330: l_sign_date DATE;
3331: --ETR
3332: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3333:
3334: CURSOR find_ord_signed IS
3335: SELECT a.customer_signature,
3336: a.customer_signature_date
3338: WHERE a.header_id = p_doc_id;
3339:
3340: BEGIN
3341: IF (l_debug_level > 0) THEN
3342: oe_debug_pub.add('In OE_Contracts_util.is_order_signed', 2);
3343: END IF;
3344: -- Initialize message list if p_init_msg_list is set to TRUE.
3345: IF p_init_msg_list = FND_API.G_TRUE THEN
3346: oe_msg_pub.initialize;
3347: END IF;
3348: -- Initialize API return status to success
3349: x_return_status := FND_API.G_RET_STS_SUCCESS;
3350: IF l_debug_level > 0 THEN
3351: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3352: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3353: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3354: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3355: END IF;
3348: -- Initialize API return status to success
3349: x_return_status := FND_API.G_RET_STS_SUCCESS;
3350: IF l_debug_level > 0 THEN
3351: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3352: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3353: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3354: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3355: END IF;
3356:
3349: x_return_status := FND_API.G_RET_STS_SUCCESS;
3350: IF l_debug_level > 0 THEN
3351: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3352: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3353: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3354: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3355: END IF;
3356:
3357: OPEN find_ord_signed;
3350: IF l_debug_level > 0 THEN
3351: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3352: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3353: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3354: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3355: END IF;
3356:
3357: OPEN find_ord_signed;
3358: FETCH find_ord_signed INTO l_sign_by, l_sign_date;
3372: END IF;
3373:
3374:
3375: IF l_debug_level > 0 THEN
3376: oe_debug_pub.add('Order signed ?: sign_by = ' || l_sign_by || ' sign_date = ' || l_sign_date, 3);
3377: oe_debug_pub.add('Order signed ?: return value = ' || l_return_value, 3);
3378: END IF;
3379:
3380: IF (l_debug_level > 0) THEN
3373:
3374:
3375: IF l_debug_level > 0 THEN
3376: oe_debug_pub.add('Order signed ?: sign_by = ' || l_sign_by || ' sign_date = ' || l_sign_date, 3);
3377: oe_debug_pub.add('Order signed ?: return value = ' || l_return_value, 3);
3378: END IF;
3379:
3380: IF (l_debug_level > 0) THEN
3381: oe_debug_pub.add('End of OE_Contracts_util.is_order_signed', 2);
3377: oe_debug_pub.add('Order signed ?: return value = ' || l_return_value, 3);
3378: END IF;
3379:
3380: IF (l_debug_level > 0) THEN
3381: oe_debug_pub.add('End of OE_Contracts_util.is_order_signed', 2);
3382: END IF;
3383: RETURN l_return_value;
3384:
3385: EXCEPTION
3385: EXCEPTION
3386:
3387: WHEN OTHERS THEN
3388: IF l_debug_level > 0 THEN
3389: oe_debug_pub.add('WHEN-OTHERS in is_order_signed: '||sqlerrm, 1);
3390: END IF;
3391: IF find_ord_signed%ISOPEN THEN
3392: CLOSE find_ord_signed;
3393: END IF;
3427:
3428: l_target_doc_type VARCHAR2(30):= p_target_doc_type;
3429: l_target_doc_id NUMBER := p_target_doc_id;
3430: l_doc_template_name VARCHAR2(240):= null;
3431: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3432: l_keep_version VARCHAR2(1) := 'Y';
3433: l_copy_attch VARCHAR2(1) := 'N';
3434: l_document_number NUMBER:= null;
3435:
3435:
3436: BEGIN
3437:
3438: IF l_debug_level > 0 THEN
3439: oe_debug_pub.add('In OE_Contracts_util.copy_doc ', 1);
3440: END IF;
3441:
3442: x_return_status := FND_API.G_RET_STS_SUCCESS;
3443:
3447:
3448: --Check contract Licence
3449: IF OE_Contracts_util.check_license() <> 'Y' THEN
3450: IF l_debug_level > 0 THEN
3451: oe_debug_pub.add('Contractual option not licensed. Exiting copy_doc', 3);
3452: END IF;
3453: RETURN;
3454: END IF;
3455:
3454: END IF;
3455:
3456:
3457: IF l_debug_level > 0 THEN
3458: oe_debug_pub.add('Parameter Values passed', 3);
3459: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3455:
3456:
3457: IF l_debug_level > 0 THEN
3458: oe_debug_pub.add('Parameter Values passed', 3);
3459: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3456:
3457: IF l_debug_level > 0 THEN
3458: oe_debug_pub.add('Parameter Values passed', 3);
3459: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3457: IF l_debug_level > 0 THEN
3458: oe_debug_pub.add('Parameter Values passed', 3);
3459: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3465: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3458: oe_debug_pub.add('Parameter Values passed', 3);
3459: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3465: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3466: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3459: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3465: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3466: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3467: END IF;
3460: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3465: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3466: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3467: END IF;
3468:
3461: oe_debug_pub.add('p_commit: ' || p_commit,3);
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3465: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3466: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3467: END IF;
3468:
3469: IF p_source_doc_id is not null Then
3462: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3463: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3464: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3465: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3466: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3467: END IF;
3468:
3469: IF p_source_doc_id is not null Then
3470: l_doc_template_name := okc_terms_util_grp.Get_Terms_Template(
3483: l_document_number := NULL;
3484: END;
3485: END IF;
3486: If l_debug_level > 0 THEN
3487: oe_debug_pub.add('l_document_number: ' || l_document_number, 3);
3488: End If;
3489:
3490: IF l_doc_template_name is null THEN
3491: --Instantiate from the template
3490: IF l_doc_template_name is null THEN
3491: --Instantiate from the template
3492: If p_contract_template_id is not null then
3493: If l_debug_level > 0 THEN
3494: oe_debug_pub.add('Instantiating COntract Terms, No articles on source document',3);
3495: End If;
3496:
3497: OKC_TERMS_COPY_GRP.copy_terms (
3498: p_api_version => p_api_version,
3518:
3519: End If;
3520: ELSE
3521: If l_debug_level > 0 THEN
3522: oe_debug_pub.add('Terms exist in source document',3);
3523: End If;
3524:
3525: If (p_source_doc_type <> p_target_doc_type) Then
3526: l_copy_attch := 'Y';
3531: If (p_source_doc_type =p_target_doc_type and
3532: p_source_doc_id =p_target_doc_id) THEN
3533:
3534: If l_debug_level > 0 THEN
3535: oe_debug_pub.add('Target Doc and Source Document are Same. exiting copy_doc',3);
3536: End If;
3537: RETURN;
3538: End If;
3539:
3537: RETURN;
3538: End If;
3539:
3540: If l_debug_level > 0 THEN
3541: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3542: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3543: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3544: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3545: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3538: End If;
3539:
3540: If l_debug_level > 0 THEN
3541: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3542: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3543: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3544: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3545: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3546: End If;
3539:
3540: If l_debug_level > 0 THEN
3541: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3542: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3543: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3544: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3545: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3546: End If;
3547:
3540: If l_debug_level > 0 THEN
3541: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3542: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3543: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3544: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3545: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3546: End If;
3547:
3548: OKC_TERMS_COPY_GRP.copy_doc (
3541: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3542: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3543: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3544: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3545: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3546: End If;
3547:
3548: OKC_TERMS_COPY_GRP.copy_doc (
3549: p_api_version => p_api_version,
3572:
3573: END IF;
3574:
3575: If l_debug_level > 0 THEN
3576: oe_debug_pub.add('Return Status + x_return_status',3);
3577: End If;
3578:
3579:
3580: EXCEPTION
3580: EXCEPTION
3581: WHEN FND_API.G_EXC_ERROR THEN
3582:
3583: IF l_debug_level > 0 THEN
3584: oe_debug_pub.add('WHEN G_EXC_ERROR in copy_doc ', 3);
3585: END IF;
3586: --Get message count and data
3587: OE_MSG_PUB.Count_And_Get (
3588: p_count => x_msg_count,
3590:
3591: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3592:
3593: IF l_debug_level > 0 THEN
3594: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in copy_doc ', 3);
3595: END IF;
3596:
3597: --Get message count and data
3598: OE_MSG_PUB.Count_And_Get (
3601:
3602: WHEN OTHERS THEN
3603:
3604: IF l_debug_level > 0 THEN
3605: oe_debug_pub.add('WHEN OTHERS in copy_doc ', 3);
3606: END IF;
3607:
3608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3609:
3640: , p_ordered_item IN VARCHAR2
3641: , p_org_id IN Number DEFAULT NULL
3642: ) RETURN VARCHAR2 IS
3643:
3644: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3645: l_ordered_item varchar2(2000);
3646: l_inventory_item varchar2(300);
3647: l_ordered_item_desc varchar2(2000);
3648: l_return_status varchar2(30);
3651: l_value varchar2(2000);
3652:
3653: BEGIN
3654: IF l_debug_level > 0 THEN
3655: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3656: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3652:
3653: BEGIN
3654: IF l_debug_level > 0 THEN
3655: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3656: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3660: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3653: BEGIN
3654: IF l_debug_level > 0 THEN
3655: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3656: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3660: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3661: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3654: IF l_debug_level > 0 THEN
3655: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3656: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3660: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3661: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3662: END IF;
3655: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3656: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3660: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3661: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3662: END IF;
3663:
3656: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3660: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3661: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3662: END IF;
3663:
3664: OE_LINE_UTIL.GET_ITEM_INFO (
3657: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3658: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3659: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3660: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3661: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3662: END IF;
3663:
3664: OE_LINE_UTIL.GET_ITEM_INFO (
3665: x_return_status => l_return_status
3677:
3678: );
3679:
3680: IF l_debug_level > 0 THEN
3681: oe_debug_pub.add('Return status from OE_LINE_UTIL.GET_ITEM_INFO is '||l_return_status) ;
3682: END IF;
3683:
3684: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3693: l_value := l_ordered_item_desc;
3694: END IF;
3695:
3696: IF l_debug_level > 0 THEN
3697: oe_debug_pub.add( 'l_value = '||l_value ) ;
3698: END IF;
3699:
3700: IF l_debug_level > 0 THEN
3701: oe_debug_pub.add( 'EXIT GET_ITEM_INFO FUNCTION' ) ;
3697: oe_debug_pub.add( 'l_value = '||l_value ) ;
3698: END IF;
3699:
3700: IF l_debug_level > 0 THEN
3701: oe_debug_pub.add( 'EXIT GET_ITEM_INFO FUNCTION' ) ;
3702: END IF;
3703:
3704: RETURN l_value;
3705:
3705:
3706: EXCEPTION
3707: WHEN FND_API.G_EXC_ERROR THEN
3708: IF l_debug_level > 0 THEN
3709: oe_debug_pub.add('In oe_contracts_util.get_item_info:g_exc_error section') ;
3710: END IF;
3711: RAISE FND_API.G_EXC_ERROR;
3712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3713: IF l_debug_level > 0 THEN
3710: END IF;
3711: RAISE FND_API.G_EXC_ERROR;
3712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3713: IF l_debug_level > 0 THEN
3714: oe_debug_pub.add('In oe_contracts_util.get_item_info:g_exc_unexpected_error section') ;
3715: END IF;
3716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3717: WHEN OTHERS THEN
3718: IF l_debug_level > 0 THEN
3715: END IF;
3716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3717: WHEN OTHERS THEN
3718: IF l_debug_level > 0 THEN
3719: oe_debug_pub.add('In oe_contracts_util.get_item_info: when others section') ;
3720: END IF;
3721: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3722: THEN
3723: OE_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,'GET_ITEM_INFO');
3741: )
3742:
3743: IS
3744: l_template_description VARCHAR2(2000); -- bug 4382305
3745: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3746:
3747: BEGIN
3748:
3749: IF l_debug_level > 0 THEN
3746:
3747: BEGIN
3748:
3749: IF l_debug_level > 0 THEN
3750: oe_debug_pub.add('In OE_Contracts_util.get_contract_defaults ', 1);
3751: END IF;
3752:
3753: x_return_status := FND_API.G_RET_STS_SUCCESS;
3754:
3758:
3759: --Check for licensing
3760: IF OE_Contracts_util.check_license() <> 'Y' THEN
3761: IF l_debug_level > 0 THEN
3762: oe_debug_pub.add('Contractual option not licensed, hence exiting get_terms_template ', 3);
3763: END IF;
3764: x_contract_source := NULL;
3765: x_authoring_party := NULL;
3766: x_template_name := NULL;
3768: END IF;
3769:
3770:
3771: IF l_debug_level > 0 THEN
3772: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3773: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3774: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3775: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3776: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3769:
3770:
3771: IF l_debug_level > 0 THEN
3772: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3773: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3774: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3775: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3776: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3777: END IF;
3770:
3771: IF l_debug_level > 0 THEN
3772: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3773: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3774: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3775: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3776: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3777: END IF;
3778:
3771: IF l_debug_level > 0 THEN
3772: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3773: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3774: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3775: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3776: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3777: END IF;
3778:
3779: OKC_TERMS_UTIL_GRP.get_contract_defaults (
3772: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3773: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3774: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3775: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3776: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3777: END IF;
3778:
3779: OKC_TERMS_UTIL_GRP.get_contract_defaults (
3780: p_api_version => p_api_version,
3790: x_template_description => l_template_description
3791: );
3792:
3793: IF l_debug_level > 0 THEN
3794: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3795: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3796: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3797: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3798: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3791: );
3792:
3793: IF l_debug_level > 0 THEN
3794: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3795: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3796: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3797: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3798: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3799: END IF;
3792:
3793: IF l_debug_level > 0 THEN
3794: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3795: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3796: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3797: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3798: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3799: END IF;
3800:
3793: IF l_debug_level > 0 THEN
3794: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3795: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3796: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3797: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3798: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3799: END IF;
3800:
3801: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3794: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3795: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3796: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3797: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3798: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3799: END IF;
3800:
3801: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3802: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3804: RAISE FND_API.G_EXC_ERROR ;
3805: END IF;
3806:
3807: IF l_debug_level > 0 THEN
3808: oe_debug_pub.add('End of OE_Contracts_util.get_contract_defaults , x_return_status ' || x_return_status, 1);
3809: END IF;
3810:
3811: EXCEPTION
3812: WHEN FND_API.G_EXC_ERROR THEN
3811: EXCEPTION
3812: WHEN FND_API.G_EXC_ERROR THEN
3813:
3814: IF l_debug_level > 0 THEN
3815: oe_debug_pub.add('WHEN G_EXC_ERROR in get_contract_defaults ', 3);
3816: END IF;
3817:
3818: x_return_status := FND_API.G_RET_STS_ERROR;
3819:
3826:
3827: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3828:
3829: IF l_debug_level > 0 THEN
3830: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_contract_defaults ', 3);
3831: END IF;
3832:
3833: --close any cursors
3834:
3843:
3844: WHEN OTHERS THEN
3845:
3846: IF l_debug_level > 0 THEN
3847: oe_debug_pub.add('WHEN OTHERS in get_contract_defaults ', 3);
3848: END IF;
3849:
3850: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3851:
3892: l_template_description VARCHAR2(2000); -- bug 4382305
3893: l_template_instruction VARCHAR2(2000); -- bug 4382305
3894: l_is_primary_doc_mergeable VARCHAR2(100);
3895: l_primary_doc_file_id VARCHAR2(100);
3896: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3897:
3898:
3899: BEGIN
3900:
3898:
3899: BEGIN
3900:
3901: IF l_debug_level > 0 THEN
3902: oe_debug_pub.add('In OE_Contracts_util.get_contract_details_all ', 1);
3903: END IF;
3904:
3905: x_return_status := FND_API.G_RET_STS_SUCCESS;
3906:
3910:
3911: --Check for licensing
3912: IF OE_Contracts_util.check_license() <> 'Y' THEN
3913: IF l_debug_level > 0 THEN
3914: oe_debug_pub.add('Contractual option not licensed, hence exiting get_contract_details_all ', 3);
3915: END IF;
3916: x_contract_source := NULL;
3917: x_authoring_party := NULL;
3918: x_template_name := NULL;
3921: END IF;
3922:
3923:
3924: IF l_debug_level > 0 THEN
3925: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3926: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3927: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3928: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3929: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3922:
3923:
3924: IF l_debug_level > 0 THEN
3925: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3926: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3927: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3928: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3929: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3930: END IF;
3923:
3924: IF l_debug_level > 0 THEN
3925: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3926: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3927: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3928: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3929: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3930: END IF;
3931:
3924: IF l_debug_level > 0 THEN
3925: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3926: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3927: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3928: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3929: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3930: END IF;
3931:
3932: OKC_TERMS_UTIL_GRP.get_contract_details_all (
3925: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3926: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3927: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3928: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3929: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3930: END IF;
3931:
3932: OKC_TERMS_UTIL_GRP.get_contract_details_all (
3933: p_api_version => p_api_version,
3952: x_primary_doc_file_id => l_primary_doc_file_id
3953: );
3954:
3955: IF l_debug_level > 0 THEN
3956: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3957: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3953: );
3954:
3955: IF l_debug_level > 0 THEN
3956: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3957: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3954:
3955: IF l_debug_level > 0 THEN
3956: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3957: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3962: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3955: IF l_debug_level > 0 THEN
3956: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3957: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3962: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3963: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3956: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3957: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3962: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3963: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3964: END IF;
3957: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3962: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3963: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3964: END IF;
3965:
3958: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3962: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3963: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3964: END IF;
3965:
3966: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3959: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3960: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3961: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3962: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3963: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3964: END IF;
3965:
3966: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3967: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3969: RAISE FND_API.G_EXC_ERROR ;
3970: END IF;
3971:
3972: IF l_debug_level > 0 THEN
3973: oe_debug_pub.add('End of OE_Contracts_util.get_contract_details_all , x_return_status ' || x_return_status, 1);
3974: END IF;
3975:
3976: EXCEPTION
3977: WHEN FND_API.G_EXC_ERROR THEN
3976: EXCEPTION
3977: WHEN FND_API.G_EXC_ERROR THEN
3978:
3979: IF l_debug_level > 0 THEN
3980: oe_debug_pub.add('WHEN G_EXC_ERROR in get_contract_details_all ', 3);
3981: END IF;
3982:
3983: x_return_status := FND_API.G_RET_STS_ERROR;
3984:
3991:
3992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3993:
3994: IF l_debug_level > 0 THEN
3995: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_contract_details_all ', 3);
3996: END IF;
3997:
3998: --close any cursors
3999:
4008:
4009: WHEN OTHERS THEN
4010:
4011: IF l_debug_level > 0 THEN
4012: oe_debug_pub.add('WHEN OTHERS in get_contract_details_all ', 3);
4013: END IF;
4014:
4015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4016:
4045: p_template_id IN NUMBER,
4046: p_org_id IN NUMBER
4047: ) RETURN VARCHAR2 IS
4048:
4049: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4050: l_result VARCHAR2(1) := 'N';
4051:
4052: BEGIN
4053:
4051:
4052: BEGIN
4053:
4054: IF l_debug_level > 0 THEN
4055: oe_debug_pub.add('In OE_Contracts_util.Is_Terms_Template_Valid ', 1);
4056: END IF;
4057:
4058: x_return_status := FND_API.G_RET_STS_SUCCESS;
4059:
4063:
4064: --Check for licensing
4065: IF OE_Contracts_util.check_license() <> 'Y' THEN
4066: IF l_debug_level > 0 THEN
4067: oe_debug_pub.add('Contractual option not licensed, hence exiting Is_Terms_Template_Valid ', 3);
4068: END IF;
4069: RETURN NULL;
4070: END IF;
4071:
4070: END IF;
4071:
4072:
4073: IF l_debug_level > 0 THEN
4074: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4075: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4076: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4077: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4078: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4071:
4072:
4073: IF l_debug_level > 0 THEN
4074: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4075: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4076: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4077: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4078: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4079: END IF;
4072:
4073: IF l_debug_level > 0 THEN
4074: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4075: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4076: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4077: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4078: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4079: END IF;
4080:
4073: IF l_debug_level > 0 THEN
4074: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4075: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4076: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4077: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4078: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4079: END IF;
4080:
4081: l_result := OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid (
4074: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4075: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4076: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4077: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4078: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4079: END IF;
4080:
4081: l_result := OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid (
4082: p_api_version => p_api_version,
4091: );
4092:
4093:
4094: IF l_debug_level > 0 THEN
4095: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
4096: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
4097: oe_debug_pub.add(' l_result: '|| l_result, 3);
4098: END IF;
4099:
4092:
4093:
4094: IF l_debug_level > 0 THEN
4095: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
4096: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
4097: oe_debug_pub.add(' l_result: '|| l_result, 3);
4098: END IF;
4099:
4100: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
4093:
4094: IF l_debug_level > 0 THEN
4095: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
4096: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
4097: oe_debug_pub.add(' l_result: '|| l_result, 3);
4098: END IF;
4099:
4100: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
4101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4103: RAISE FND_API.G_EXC_ERROR ;
4104: END IF;
4105:
4106: IF l_debug_level > 0 THEN
4107: oe_debug_pub.add('End of OE_Contracts_util.Is_Terms_Template_Valid , x_return_status ' || x_return_status, 1);
4108: END IF;
4109:
4110: RETURN l_result;
4111:
4112: EXCEPTION
4113: WHEN FND_API.G_EXC_ERROR THEN
4114:
4115: IF l_debug_level > 0 THEN
4116: oe_debug_pub.add('WHEN G_EXC_ERROR in Is_Terms_Template_Valid ', 3);
4117: END IF;
4118:
4119: x_return_status := FND_API.G_RET_STS_ERROR;
4120:
4127:
4128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4129:
4130: IF l_debug_level > 0 THEN
4131: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in Is_Terms_Template_Valid ', 3);
4132: END IF;
4133:
4134: --close any cursors
4135:
4144:
4145: WHEN OTHERS THEN
4146:
4147: IF l_debug_level > 0 THEN
4148: oe_debug_pub.add('WHEN OTHERS in Is_Terms_Template_Valid ', 3);
4149: END IF;
4150:
4151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4152:
4173: p_doc_type IN VARCHAR2,
4174: p_doc_id IN NUMBER
4175: )
4176: RETURN VARCHAR2 IS
4177: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4178: l_authoring_party_code VARCHAR2(100);
4179: BEGIN
4180:
4181: IF l_debug_level > 0 THEN
4178: l_authoring_party_code VARCHAR2(100);
4179: BEGIN
4180:
4181: IF l_debug_level > 0 THEN
4182: oe_debug_pub.add('In OE_Contracts_util.Is_Auth_Party_Internal ', 1);
4183: END IF;
4184:
4185: --Check for licensing
4186: IF OE_Contracts_util.check_license() <> 'Y' THEN
4184:
4185: --Check for licensing
4186: IF OE_Contracts_util.check_license() <> 'Y' THEN
4187: IF l_debug_level > 0 THEN
4188: oe_debug_pub.add('Contractual option not licensed, hence exiting Is_Auth_Party_Internal ', 3);
4189: END IF;
4190:
4191: RETURN 'N';
4192: END IF;
4191: RETURN 'N';
4192: END IF;
4193:
4194: IF l_debug_level > 0 THEN
4195: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code', 3);
4196: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4197: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4198: END IF;
4199:
4192: END IF;
4193:
4194: IF l_debug_level > 0 THEN
4195: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code', 3);
4196: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4197: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4198: END IF;
4199:
4200: l_authoring_party_code := OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code(
4193:
4194: IF l_debug_level > 0 THEN
4195: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code', 3);
4196: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4197: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4198: END IF;
4199:
4200: l_authoring_party_code := OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code(
4201: p_document_type => p_doc_type,
4202: p_document_id => p_doc_id
4203: );
4204:
4205: IF l_debug_level > 0 THEN
4206: oe_debug_pub.add('l_authoring_party_code '|| l_authoring_party_code, 3);
4207: END IF;
4208:
4209: IF l_authoring_party_code = 'INTERNAL_ORG' THEN
4210: RETURN 'Y';
4216:
4217: WHEN OTHERS THEN
4218:
4219: IF l_debug_level > 0 THEN
4220: oe_debug_pub.add('WHEN-OTHERS in Is_Auth_Party_Internal ', 1);
4221: END IF;
4222:
4223: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4224: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
4234: (
4235: p_doc_id IN NUMBER
4236: )
4237: RETURN VARCHAR2 IS
4238: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4239: l_rch_enabled VARCHAR2(1) := 'N';
4240: l_org_id NUMBER := NULL;
4241:
4242: BEGIN
4241:
4242: BEGIN
4243:
4244: IF l_debug_level > 0 THEN
4245: oe_debug_pub.add('In OE_Contracts_util.Is_RChg_Enabled ', 1);
4246: END IF;
4247: --Get the org_id
4248: BEGIN
4249: SELECT org_id into l_org_id
4254: l_org_id:=NULL;
4255: END;
4256:
4257: IF l_debug_level > 0 THEN
4258: oe_debug_pub.add('Calling OE_SYS_PARAMETER.VALUE(RECURRING_CHARGES)', 3);
4259: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4260: oe_debug_pub.add('l_org_id: ' || l_org_id, 3);
4261: END IF;
4262:
4255: END;
4256:
4257: IF l_debug_level > 0 THEN
4258: oe_debug_pub.add('Calling OE_SYS_PARAMETER.VALUE(RECURRING_CHARGES)', 3);
4259: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4260: oe_debug_pub.add('l_org_id: ' || l_org_id, 3);
4261: END IF;
4262:
4263: IF l_org_id is not null then
4256:
4257: IF l_debug_level > 0 THEN
4258: oe_debug_pub.add('Calling OE_SYS_PARAMETER.VALUE(RECURRING_CHARGES)', 3);
4259: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4260: oe_debug_pub.add('l_org_id: ' || l_org_id, 3);
4261: END IF;
4262:
4263: IF l_org_id is not null then
4264: l_rch_enabled := nvl(OE_SYS_PARAMETERS.VALUE('RECURRING_CHARGES',l_org_id),'N');
4266: l_rch_enabled := 'N';
4267: END IF;
4268:
4269: IF l_debug_level > 0 THEN
4270: oe_debug_pub.add('l_rch_enabled '|| l_rch_enabled, 3);
4271: END IF;
4272:
4273: return l_rch_enabled;
4274:
4276:
4277: WHEN OTHERS THEN
4278:
4279: IF l_debug_level > 0 THEN
4280: oe_debug_pub.add('WHEN-OTHERS in Is_RChg_Enabled ', 1);
4281: END IF;
4282:
4283: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4284: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,