[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:
1211: ----------
1212: --Check for licensing, proceed with procesing only if licensed
1213: IF OE_Contracts_util.check_license() <> 'Y' THEN
1214: IF l_debug_level > 0 THEN
1215: oe_debug_pub.add('Contractual option not licensed, hence exiting attachment_location ', 3);
1216: END IF;
1217: RETURN;
1218: END IF;
1219: */
1228: FETCH c_attachment_exist_check INTO l_attachment_exist_check;
1229: CLOSE c_attachment_exist_check;
1230: IF l_attachment_exist_check IS NULL THEN
1231: IF l_debug_level > 0 THEN
1232: oe_debug_pub.add('No attachments exist for the BSA or Sales Order, hence exiting attachment_location...', 3);
1233: END IF;
1234: x_workflow_string := NULL; --returning NULL will ensure that no paper clip icon is shown in the workflow
1235: RETURN;
1236: END IF;
1236: END IF;
1237:
1238:
1239: IF l_debug_level > 0 THEN
1240: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1241: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1242: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1243: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1244: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1237:
1238:
1239: IF l_debug_level > 0 THEN
1240: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1241: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1242: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1243: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1244: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1245: END IF;
1238:
1239: IF l_debug_level > 0 THEN
1240: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1241: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1242: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1243: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1244: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1245: END IF;
1246:
1239: IF l_debug_level > 0 THEN
1240: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1241: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1242: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1243: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1244: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1245: END IF;
1246:
1247: --first determine whether any terms and conditions have been instantiated for the BSA or Sales Order
1240: oe_debug_pub.add('Calling OE_Contracts_util.get_terms_template ', 3);
1241: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1242: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1243: oe_debug_pub.add('p_doc_type: '|| p_doc_type, 3);
1244: oe_debug_pub.add('p_doc_id: '|| p_doc_id, 3);
1245: END IF;
1246:
1247: --first determine whether any terms and conditions have been instantiated for the BSA or Sales Order
1248: oe_contracts_util.get_terms_template (
1260: );
1261:
1262:
1263: IF l_debug_level > 0 THEN
1264: oe_debug_pub.add('x_template_id: '|| l_template_id, 3);
1265: oe_debug_pub.add('x_template_name: '|| l_template_name, 3);
1266: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
1267: END IF;
1268:
1261:
1262:
1263: IF l_debug_level > 0 THEN
1264: oe_debug_pub.add('x_template_id: '|| l_template_id, 3);
1265: oe_debug_pub.add('x_template_name: '|| l_template_name, 3);
1266: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
1267: END IF;
1268:
1269: /*
1262:
1263: IF l_debug_level > 0 THEN
1264: oe_debug_pub.add('x_template_id: '|| l_template_id, 3);
1265: oe_debug_pub.add('x_template_name: '|| l_template_name, 3);
1266: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
1267: END IF;
1268:
1269: /*
1270: IF l_template_id IS NOT NULL THEN
1285: FETCH c_get_bsa_version INTO l_doc_version_number;
1286: CLOSE c_get_bsa_version;
1287:
1288: IF l_debug_level > 0 THEN
1289: oe_debug_pub.add('l_doc_version_number of blanket: '|| l_doc_version_number, 3);
1290: END IF;
1291:
1292: ELSIF p_doc_type = OE_CONTRACTS_UTIL.G_SO_DOC_TYPE THEN
1293: IF c_get_so_version%ISOPEN THEN
1298: FETCH c_get_so_version INTO l_doc_version_number;
1299: CLOSE c_get_so_version;
1300:
1301: IF l_debug_level > 0 THEN
1302: oe_debug_pub.add('l_doc_version_number of sales order: '|| l_doc_version_number, 3);
1303: END IF;
1304:
1305: END IF;
1306: ************/
1325: l_workflow_string := l_workflow_string ||'&'|| 'categories=OE_PRINT_CATEGORY';
1326: END IF;
1327:
1328: IF l_debug_level > 0 THEN
1329: oe_debug_pub.add('l_workflow_string: '|| l_workflow_string, 3);
1330: oe_debug_pub.add('End of OE_Contracts_util.attachment_location, x_return_status ' || x_return_status, 1);
1331: END IF;
1332:
1333: x_workflow_string := l_workflow_string;
1326: END IF;
1327:
1328: IF l_debug_level > 0 THEN
1329: oe_debug_pub.add('l_workflow_string: '|| l_workflow_string, 3);
1330: oe_debug_pub.add('End of OE_Contracts_util.attachment_location, x_return_status ' || x_return_status, 1);
1331: END IF;
1332:
1333: x_workflow_string := l_workflow_string;
1334:
1336: EXCEPTION
1337: WHEN FND_API.G_EXC_ERROR THEN
1338:
1339: IF l_debug_level > 0 THEN
1340: oe_debug_pub.add('WHEN OTHERS in attachment_location ', 3);
1341: END IF;
1342:
1343: IF c_attachment_exist_check%ISOPEN THEN
1344: CLOSE c_attachment_exist_check;
1372:
1373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1374:
1375: IF l_debug_level > 0 THEN
1376: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in attachment_location ', 3);
1377: END IF;
1378:
1379: IF c_attachment_exist_check%ISOPEN THEN
1380: CLOSE c_attachment_exist_check;
1407:
1408: WHEN OTHERS THEN
1409:
1410: IF l_debug_level > 0 THEN
1411: oe_debug_pub.add('WHEN OTHERS in attachment_location ', 3);
1412: END IF;
1413:
1414: IF c_attachment_exist_check%ISOPEN THEN
1415: CLOSE c_attachment_exist_check;
1464: p_doc_id IN NUMBER
1465: )
1466: RETURN VARCHAR2 IS
1467:
1468: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1469: l_result VARCHAR2(1) := 'N';
1470:
1471: /* l_return_status VARCHAR2(1);
1472: l_msg_count NUMBER;
1471: /* l_return_status VARCHAR2(1);
1472: l_msg_count NUMBER;
1473: l_msg_data VARCHAR2(2000);
1474:
1475: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1476: l_template_id NUMBER;
1477: l_template_name VARCHAR2(500);
1478: */
1479: BEGIN
1478: */
1479: BEGIN
1480:
1481: IF l_debug_level > 0 THEN
1482: oe_debug_pub.add('In OE_Contracts_util.terms_exists ', 1);
1483: END IF;
1484:
1485: --Check for licensing
1486: IF OE_Contracts_util.check_license() <> 'Y' THEN
1484:
1485: --Check for licensing
1486: IF OE_Contracts_util.check_license() <> 'Y' THEN
1487: IF l_debug_level > 0 THEN
1488: oe_debug_pub.add('Contracts not licensed, exiting terms_exists', 3);
1489: END IF;
1490: --RETURN NULL;
1491: RETURN 'N';
1492: END IF;
1492: END IF;
1493:
1494:
1495: IF l_debug_level > 0 THEN
1496: oe_debug_pub.add('Calling OE_Contracts_util.has_terms ', 3);
1497: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1498: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1499: END IF;
1500:
1493:
1494:
1495: IF l_debug_level > 0 THEN
1496: oe_debug_pub.add('Calling OE_Contracts_util.has_terms ', 3);
1497: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1498: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1499: END IF;
1500:
1501: --first determine whether any terms and conditions have been instantiated for the BSA or sales order
1494:
1495: IF l_debug_level > 0 THEN
1496: oe_debug_pub.add('Calling OE_Contracts_util.has_terms ', 3);
1497: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1498: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1499: END IF;
1500:
1501: --first determine whether any terms and conditions have been instantiated for the BSA or sales order
1502: /* oe_contracts_util.get_terms_template (
1513: );
1514:
1515:
1516: IF l_debug_level > 0 THEN
1517: oe_debug_pub.add('l_template_id: '|| l_template_id, 3);
1518: oe_debug_pub.add('l_template_name: '|| l_template_name, 3);
1519: oe_debug_pub.add('l_return_status: '|| l_return_status, 3);
1520: END IF;
1521:
1514:
1515:
1516: IF l_debug_level > 0 THEN
1517: oe_debug_pub.add('l_template_id: '|| l_template_id, 3);
1518: oe_debug_pub.add('l_template_name: '|| l_template_name, 3);
1519: oe_debug_pub.add('l_return_status: '|| l_return_status, 3);
1520: END IF;
1521:
1522:
1515:
1516: IF l_debug_level > 0 THEN
1517: oe_debug_pub.add('l_template_id: '|| l_template_id, 3);
1518: oe_debug_pub.add('l_template_name: '|| l_template_name, 3);
1519: oe_debug_pub.add('l_return_status: '|| l_return_status, 3);
1520: END IF;
1521:
1522:
1523: IF l_template_id IS NOT NULL THEN
1521:
1522:
1523: IF l_template_id IS NOT NULL THEN
1524: IF l_debug_level > 0 THEN
1525: oe_debug_pub.add('End of OE_Contracts_util.terms_exists , returning Y');
1526: END IF;
1527: RETURN ('Y');
1528: ELSE
1529: IF l_debug_level > 0 THEN
1526: END IF;
1527: RETURN ('Y');
1528: ELSE
1529: IF l_debug_level > 0 THEN
1530: oe_debug_pub.add('End of OE_Contracts_util.terms_exists , returning Y');
1531: END IF;
1532: RETURN ('N');
1533: END IF;*/
1534:
1539: p_document_id => p_doc_id
1540: );
1541:
1542: IF l_debug_level > 0 THEN
1543: oe_debug_pub.add('End of OE_Contracts_util.terms_exists result is:'||l_result );
1544: END IF;
1545:
1546: RETURN l_result;
1547:
1550:
1551: WHEN OTHERS THEN
1552:
1553: IF l_debug_level > 0 THEN
1554: oe_debug_pub.add('WHEN-OTHERS in terms_exists', 1);
1555: END IF;
1556:
1557: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1558: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
1580: x_msg_count OUT NOCOPY NUMBER,
1581: x_msg_data OUT NOCOPY VARCHAR2
1582: ) IS
1583:
1584: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1585:
1586: BEGIN
1587:
1588: IF l_debug_level > 0 THEN
1585:
1586: BEGIN
1587:
1588: IF l_debug_level > 0 THEN
1589: oe_debug_pub.add('In OE_Contracts_util.delete_articles ', 1);
1590: END IF;
1591:
1592: x_return_status := FND_API.G_RET_STS_SUCCESS;
1593:
1597:
1598: --Check for licensing
1599: IF OE_Contracts_util.check_license() <> 'Y' THEN
1600: IF l_debug_level > 0 THEN
1601: oe_debug_pub.add('Contractual option not licensed, hence exiting delete_articles ', 3);
1602: END IF;
1603: RETURN;
1604: END IF;
1605:
1605:
1606:
1607:
1608: IF l_debug_level > 0 THEN
1609: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1610: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1611: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1612: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1613: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1606:
1607:
1608: IF l_debug_level > 0 THEN
1609: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1610: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1611: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1612: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1613: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1614: oe_debug_pub.add('p_commit: ' || p_commit,3);
1607:
1608: IF l_debug_level > 0 THEN
1609: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1610: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1611: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1612: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1613: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1614: oe_debug_pub.add('p_commit: ' || p_commit,3);
1615: END IF;
1608: IF l_debug_level > 0 THEN
1609: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1610: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1611: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1612: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1613: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1614: oe_debug_pub.add('p_commit: ' || p_commit,3);
1615: END IF;
1616:
1609: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.delete_doc ', 3);
1610: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1611: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1612: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1613: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1614: oe_debug_pub.add('p_commit: ' || p_commit,3);
1615: END IF;
1616:
1617: OKC_TERMS_UTIL_GRP.delete_doc (
1610: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1611: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1612: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1613: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1614: oe_debug_pub.add('p_commit: ' || p_commit,3);
1615: END IF;
1616:
1617: OKC_TERMS_UTIL_GRP.delete_doc (
1618: p_api_version => p_api_version,
1625: x_msg_count => x_msg_count
1626: );
1627:
1628: IF l_debug_level > 0 THEN
1629: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
1630: END IF;
1631:
1632: --ETR
1633: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1637: END IF;
1638: --ETR
1639:
1640: IF l_debug_level > 0 THEN
1641: oe_debug_pub.add('End of OE_Contracts_util.delete_articles, x_return_status ' || x_return_status, 1);
1642: END IF;
1643:
1644: EXCEPTION
1645: WHEN FND_API.G_EXC_ERROR THEN
1644: EXCEPTION
1645: WHEN FND_API.G_EXC_ERROR THEN
1646:
1647: IF l_debug_level > 0 THEN
1648: oe_debug_pub.add('WHEN G_EXC_ERROR in delete_articles ', 3);
1649: END IF;
1650:
1651: --close any cursors
1652:
1667:
1668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1669:
1670: IF l_debug_level > 0 THEN
1671: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in delete_articles ', 3);
1672: END IF;
1673:
1674: --close any cursors
1675:
1690:
1691: WHEN OTHERS THEN
1692:
1693: IF l_debug_level > 0 THEN
1694: oe_debug_pub.add('WHEN OTHERS in delete_articles ', 3);
1695: END IF;
1696:
1697: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1698:
1732: x_msg_count OUT NOCOPY NUMBER,
1733: x_msg_data OUT NOCOPY VARCHAR2
1734: ) IS
1735:
1736: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1737:
1738: BEGIN
1739:
1740: IF l_debug_level > 0 THEN
1737:
1738: BEGIN
1739:
1740: IF l_debug_level > 0 THEN
1741: oe_debug_pub.add('In OE_Contracts_util.purge_articles ', 1);
1742: END IF;
1743:
1744: x_return_status := FND_API.G_RET_STS_SUCCESS;
1745:
1749:
1750: --Check for licensing
1751: IF OE_Contracts_util.check_license() <> 'Y' THEN
1752: IF l_debug_level > 0 THEN
1753: oe_debug_pub.add('Contractual option not licensed, hence exiting purge_articles ', 3);
1754: END IF;
1755: RETURN;
1756: END IF;
1757:
1757:
1758:
1759:
1760: IF l_debug_level > 0 THEN
1761: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1762: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1763: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1764: oe_debug_pub.add('p_commit: ' || p_commit,3);
1765: END IF;
1758:
1759:
1760: IF l_debug_level > 0 THEN
1761: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1762: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1763: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1764: oe_debug_pub.add('p_commit: ' || p_commit,3);
1765: END IF;
1766:
1759:
1760: IF l_debug_level > 0 THEN
1761: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1762: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1763: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1764: oe_debug_pub.add('p_commit: ' || p_commit,3);
1765: END IF;
1766:
1767: OKC_TERMS_UTIL_GRP.purge_doc (
1760: IF l_debug_level > 0 THEN
1761: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.purge_articles ', 3);
1762: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
1763: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
1764: oe_debug_pub.add('p_commit: ' || p_commit,3);
1765: END IF;
1766:
1767: OKC_TERMS_UTIL_GRP.purge_doc (
1768: p_api_version => p_api_version,
1774: x_msg_count => x_msg_count
1775: );
1776:
1777: IF l_debug_level > 0 THEN
1778: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
1779: END IF;
1780:
1781: --ETR
1782: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1786: END IF;
1787: --ETR
1788:
1789: IF l_debug_level > 0 THEN
1790: oe_debug_pub.add('End of OE_Contracts_util.purge_articles, x_return_status ' || x_return_status, 1);
1791: END IF;
1792:
1793: EXCEPTION
1794: WHEN FND_API.G_EXC_ERROR THEN
1793: EXCEPTION
1794: WHEN FND_API.G_EXC_ERROR THEN
1795:
1796: IF l_debug_level > 0 THEN
1797: oe_debug_pub.add('WHEN G_EXC_ERROR in purge_articles ', 3);
1798: END IF;
1799:
1800: --close any cursors
1801:
1816:
1817: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1818:
1819: IF l_debug_level > 0 THEN
1820: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in purge_articles ', 3);
1821: END IF;
1822:
1823: --close any cursors
1824:
1839:
1840: WHEN OTHERS THEN
1841:
1842: IF l_debug_level > 0 THEN
1843: oe_debug_pub.add('WHEN OTHERS in purge_articles ', 3);
1844: END IF;
1845:
1846: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1847:
1942:
1943:
1944: l_bsa_header_variables c_get_bsa_header_variables%ROWTYPE;
1945: l_so_header_variables c_get_so_header_variables%ROWTYPE;
1946: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1947:
1948: BEGIN
1949:
1950: IF l_debug_level > 0 THEN
1947:
1948: BEGIN
1949:
1950: IF l_debug_level > 0 THEN
1951: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for header level variables', 1);
1952: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1953: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1954: END IF;
1955:
1948: BEGIN
1949:
1950: IF l_debug_level > 0 THEN
1951: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for header level variables', 1);
1952: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1953: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1954: END IF;
1955:
1956: x_return_status := FND_API.G_RET_STS_SUCCESS;
1949:
1950: IF l_debug_level > 0 THEN
1951: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for header level variables', 1);
1952: oe_debug_pub.add('p_doc_type: ' || p_doc_type,3);
1953: oe_debug_pub.add('p_doc_id: ' || p_doc_id,3);
1954: END IF;
1955:
1956: x_return_status := FND_API.G_RET_STS_SUCCESS;
1957:
1975:
1976: OPEN c_get_bsa_header_variables;
1977: FETCH c_get_bsa_header_variables INTO l_bsa_header_variables;
1978: IF l_debug_level > 0 THEN
1979: oe_debug_pub.add('c_get_bsa_header_variables%ROWCOUNT: ' || c_get_bsa_header_variables%ROWCOUNT, 3);
1980: END IF;
1981: CLOSE c_get_bsa_header_variables;
1982:
1983: ELSIF p_doc_type = OE_CONTRACTS_UTIL.G_SO_DOC_TYPE THEN
1988:
1989: OPEN c_get_so_header_variables;
1990: FETCH c_get_so_header_variables INTO l_so_header_variables;
1991: IF l_debug_level > 0 THEN
1992: oe_debug_pub.add('c_get_so_header_variables%ROWCOUNT: ' || c_get_so_header_variables%ROWCOUNT, 3);
1993: END IF;
1994: CLOSE c_get_so_header_variables;
1995:
1996: END IF;
2192: ELSE NULL;
2193: END IF;
2194:
2195: IF l_debug_level > 0 THEN
2196: oe_debug_pub.add(p_sys_var_value_tbl(i).variable_code || ': ' || p_sys_var_value_tbl(i).variable_value_id, 3);
2197: END IF;
2198:
2199:
2200: END LOOP;
2202:
2203: END IF;
2204:
2205: IF l_debug_level > 0 THEN
2206: oe_debug_pub.add('End of OE_Contracts_util.get_article_variable_values for header level variables, x_return_status ' || x_return_status, 1);
2207: END IF;
2208:
2209:
2210: EXCEPTION
2210: EXCEPTION
2211: WHEN FND_API.G_EXC_ERROR THEN
2212:
2213: IF l_debug_level > 0 THEN
2214: oe_debug_pub.add('WHEN G_EXC_ERROR in get_article_variable_values ', 3);
2215: END IF;
2216:
2217: --close any cursors
2218: IF c_get_bsa_header_variables%ISOPEN THEN
2236:
2237: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2238:
2239: IF l_debug_level > 0 THEN
2240: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_article_variable_values ', 3);
2241: END IF;
2242:
2243: --close any cursors
2244: IF c_get_bsa_header_variables%ISOPEN THEN
2262:
2263: WHEN OTHERS THEN
2264:
2265: IF l_debug_level > 0 THEN
2266: oe_debug_pub.add('WHEN OTHERS in get_article_variable_values ', 3);
2267: END IF;
2268:
2269: IF c_get_bsa_header_variables%ISOPEN THEN
2270: CLOSE c_get_bsa_header_variables;
2388: j BINARY_INTEGER := 1;
2389: l_master_org_id NUMBER;
2390: lx_ordered_item VARCHAR2(2000);
2391: lx_inventory_item VARCHAR2(2000);
2392: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2393:
2394: BEGIN
2395:
2396: IF l_debug_level > 0 THEN
2393:
2394: BEGIN
2395:
2396: IF l_debug_level > 0 THEN
2397: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2398: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2399: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2400: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2401: END IF;
2394: BEGIN
2395:
2396: IF l_debug_level > 0 THEN
2397: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2398: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2399: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2400: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2401: END IF;
2402:
2395:
2396: IF l_debug_level > 0 THEN
2397: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2398: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2399: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2400: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2401: END IF;
2402:
2403:
2396: IF l_debug_level > 0 THEN
2397: oe_debug_pub.add('In OE_Contracts_util.get_article_variable_values for line level variables ', 1);
2398: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 1);
2399: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 1);
2400: oe_debug_pub.add('p_line_var_tbl.COUNT: ' || p_line_var_tbl.COUNT, 1);
2401: END IF;
2402:
2403:
2404: x_return_status := FND_API.G_RET_STS_SUCCESS;
2415: IF p_line_var_tbl.FIRST IS NOT NULL THEN
2416: FOR i IN p_line_var_tbl.FIRST..p_line_var_tbl.LAST LOOP
2417:
2418: IF l_debug_level > 0 THEN
2419: oe_debug_pub.add('Processing for ' || p_line_var_tbl(i), 3);
2420: END IF;
2421:
2422: IF p_line_var_tbl(i) = 'OKC$S_ITEMS' THEN
2423:
2423:
2424: FOR c_get_items_rec IN c_get_items LOOP
2425: --loop thru all the items for internal INT items
2426: IF l_debug_level > 0 THEN
2427: oe_debug_pub.add('c_get_items_rec.item_identifier_type: '||c_get_items_rec.item_identifier_type, 3);
2428: END IF;
2429:
2430: IF c_get_items_rec.item_identifier_type = 'INT' THEN
2431: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_INTERNAL_ITEM
2443: param_name => 'MASTER_ORGANIZATION_ID'
2444: ));
2445:
2446: IF l_debug_level > 0 THEN
2447: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2448: oe_debug_pub.add('mapping non-INT item to INT item, Calling OE_Id_To_Value.Ordered_Item ', 3);
2449: END IF;
2450:
2451: --map non-INT item to INT item
2444: ));
2445:
2446: IF l_debug_level > 0 THEN
2447: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2448: oe_debug_pub.add('mapping non-INT item to INT item, Calling OE_Id_To_Value.Ordered_Item ', 3);
2449: END IF;
2450:
2451: --map non-INT item to INT item
2452: OE_Id_To_Value.Ordered_Item (
2463: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_INTERNAL_ITEM
2464: x_line_var_value_tbl(j).variable_value_id := lx_inventory_item;
2465:
2466: IF l_debug_level > 0 THEN
2467: oe_debug_pub.add('lx_inventory_item: ' || lx_inventory_item, 3);
2468: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2469: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2470: END IF;
2471:
2464: x_line_var_value_tbl(j).variable_value_id := lx_inventory_item;
2465:
2466: IF l_debug_level > 0 THEN
2467: oe_debug_pub.add('lx_inventory_item: ' || lx_inventory_item, 3);
2468: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2469: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2470: END IF;
2471:
2472:
2465:
2466: IF l_debug_level > 0 THEN
2467: oe_debug_pub.add('lx_inventory_item: ' || lx_inventory_item, 3);
2468: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2469: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2470: END IF;
2471:
2472:
2473: END IF;
2488: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_ITEM_CATEGORIES
2489: x_line_var_value_tbl(j).variable_value_id := c_get_item_categories_rec.ordered_item;
2490:
2491: IF l_debug_level > 0 THEN
2492: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2493: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2494: END IF;
2495:
2496: j := j + 1;
2489: x_line_var_value_tbl(j).variable_value_id := c_get_item_categories_rec.ordered_item;
2490:
2491: IF l_debug_level > 0 THEN
2492: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2493: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2494: END IF;
2495:
2496: j := j + 1;
2497:
2511: param_name => 'MASTER_ORGANIZATION_ID'
2512: ));
2513:
2514: IF l_debug_level > 0 THEN
2515: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2516: oe_debug_pub.add('get the item categories to which the INT and non-INT items in the BSA belong to',3);
2517: END IF;
2518:
2519: l_bsa_derived_item_category := null; --initialize !!!!!!! this causes NULL values: ref: Arun/Aftab issue
2512: ));
2513:
2514: IF l_debug_level > 0 THEN
2515: oe_debug_pub.add('l_master_org_id: ' || l_master_org_id, 3);
2516: oe_debug_pub.add('get the item categories to which the INT and non-INT items in the BSA belong to',3);
2517: END IF;
2518:
2519: l_bsa_derived_item_category := null; --initialize !!!!!!! this causes NULL values: ref: Arun/Aftab issue
2520: IF c_get_derived_item_category%ISOPEN THEN
2527: x_line_var_value_tbl(j).variable_code := p_line_var_tbl(i); --i.e. OKC$S_ITEM_CATEGORIES
2528: x_line_var_value_tbl(j).variable_value_id := l_bsa_derived_item_category.category_concat_segs;
2529:
2530: IF l_debug_level > 0 THEN
2531: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2532: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2533: END IF;
2534:
2535: j := j + 1;
2528: x_line_var_value_tbl(j).variable_value_id := l_bsa_derived_item_category.category_concat_segs;
2529:
2530: IF l_debug_level > 0 THEN
2531: oe_debug_pub.add('x_line_var_value_tbl(j).variable_code: ' || x_line_var_value_tbl(j).variable_code,3);
2532: oe_debug_pub.add('x_line_var_value_tbl(j).variable_value_id: ' || x_line_var_value_tbl(j).variable_value_id,3);
2533: END IF;
2534:
2535: j := j + 1;
2536:
2543: END IF; ----IF p_line_var_tbl.FIRST IS NOT NULL THEN
2544:
2545:
2546: IF l_debug_level > 0 THEN
2547: oe_debug_pub.add('End of OE_Contracts_util.get_article_variable_values for line level variables, x_return_status: '|| x_return_status, 1);
2548: END IF;
2549:
2550: EXCEPTION
2551: WHEN FND_API.G_EXC_ERROR THEN
2550: EXCEPTION
2551: WHEN FND_API.G_EXC_ERROR THEN
2552:
2553: IF l_debug_level > 0 THEN
2554: oe_debug_pub.add('WHEN G_EXC_ERROR in get_article_variable_values ', 3);
2555: END IF;
2556:
2557: --close any cursors
2558: IF c_get_derived_item_category%ISOPEN THEN
2577:
2578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2579:
2580: IF l_debug_level > 0 THEN
2581: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_article_variable_values ', 3);
2582: END IF;
2583:
2584: --close any cursors
2585: IF c_get_derived_item_category%ISOPEN THEN
2603:
2604: WHEN OTHERS THEN
2605:
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add('WHEN OTHERS in get_article_variable_values ', 3);
2608: END IF;
2609:
2610: --close any cursors
2611: IF c_get_derived_item_category%ISOPEN THEN
2659:
2660: IS
2661:
2662:
2663: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2664:
2665:
2666: BEGIN
2667:
2665:
2666: BEGIN
2667:
2668: IF l_debug_level > 0 THEN
2669: oe_debug_pub.add('In OE_Contracts_util.get_terms_template ', 1);
2670: END IF;
2671:
2672: x_return_status := FND_API.G_RET_STS_SUCCESS;
2673:
2677:
2678: --Check for licensing
2679: IF OE_Contracts_util.check_license() <> 'Y' THEN
2680: IF l_debug_level > 0 THEN
2681: oe_debug_pub.add('Contractual option not licensed, hence exiting get_terms_template ', 3);
2682: END IF;
2683: x_template_id := NULL;
2684: x_template_name := NULL;
2685: RETURN;
2686: END IF;
2687:
2688:
2689: IF l_debug_level > 0 THEN
2690: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2691: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2692: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2693: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2694: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2687:
2688:
2689: IF l_debug_level > 0 THEN
2690: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2691: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2692: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2693: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2694: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2695: END IF;
2688:
2689: IF l_debug_level > 0 THEN
2690: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2691: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2692: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2693: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2694: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2695: END IF;
2696:
2689: IF l_debug_level > 0 THEN
2690: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2691: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2692: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2693: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2694: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2695: END IF;
2696:
2697: OKC_TERMS_UTIL_GRP.get_terms_template (
2690: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_terms_template ', 3);
2691: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2692: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2693: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2694: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2695: END IF;
2696:
2697: OKC_TERMS_UTIL_GRP.get_terms_template (
2698: p_api_version => p_api_version,
2707: x_msg_data => x_msg_data
2708: );
2709:
2710: IF l_debug_level > 0 THEN
2711: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
2712: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
2713: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
2714: END IF;
2715:
2708: );
2709:
2710: IF l_debug_level > 0 THEN
2711: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
2712: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
2713: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
2714: END IF;
2715:
2716: --ETR
2709:
2710: IF l_debug_level > 0 THEN
2711: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
2712: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
2713: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
2714: END IF;
2715:
2716: --ETR
2717: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2721: END IF;
2722: --ETR
2723:
2724: IF l_debug_level > 0 THEN
2725: oe_debug_pub.add('End of OE_Contracts_util.get_terms_template , x_return_status ' || x_return_status, 1);
2726: END IF;
2727:
2728: EXCEPTION
2729: WHEN FND_API.G_EXC_ERROR THEN
2728: EXCEPTION
2729: WHEN FND_API.G_EXC_ERROR THEN
2730:
2731: IF l_debug_level > 0 THEN
2732: oe_debug_pub.add('WHEN G_EXC_ERROR in get_terms_template ', 3);
2733: END IF;
2734:
2735: x_return_status := FND_API.G_RET_STS_ERROR;
2736:
2749:
2750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2751:
2752: IF l_debug_level > 0 THEN
2753: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_terms_template ', 3);
2754: END IF;
2755:
2756: --close any cursors
2757:
2772:
2773: WHEN OTHERS THEN
2774:
2775: IF l_debug_level > 0 THEN
2776: oe_debug_pub.add('WHEN OTHERS in get_terms_template ', 3);
2777: END IF;
2778:
2779: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2780:
2814: x_msg_count OUT NOCOPY NUMBER
2815: ) RETURN VARCHAR2 IS
2816:
2817:
2818: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2819: l_template_name VARCHAR2(500);
2820:
2821:
2822: BEGIN
2821:
2822: BEGIN
2823:
2824: IF l_debug_level > 0 THEN
2825: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2826: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2827: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2828: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2829: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2822: BEGIN
2823:
2824: IF l_debug_level > 0 THEN
2825: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2826: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2827: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2828: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2829: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2830: END IF;
2823:
2824: IF l_debug_level > 0 THEN
2825: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2826: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2827: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2828: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2829: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2830: END IF;
2831:
2824: IF l_debug_level > 0 THEN
2825: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2826: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2827: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2828: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2829: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2830: END IF;
2831:
2832: x_return_status := FND_API.G_RET_STS_SUCCESS;
2825: oe_debug_pub.add('In OE_Contracts_util.Get_Template_Name ', 1);
2826: oe_debug_pub.add('p_api_version: ' || p_api_version, 3);
2827: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2828: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Template_Name',3);
2829: oe_debug_pub.add('p_tempate_id: ' || p_template_id,3);
2830: END IF;
2831:
2832: x_return_status := FND_API.G_RET_STS_SUCCESS;
2833:
2833:
2834: --Check for licensing
2835: IF OE_Contracts_util.check_license() <> 'Y' THEN
2836: IF l_debug_level > 0 THEN
2837: oe_debug_pub.add('Contractual option not licensed, hence exiting Get_Template_Name ', 3);
2838: END IF;
2839: RETURN TO_CHAR(NULL); --returning null is OK here as null will be displayed
2840: END IF;
2841:
2850: );
2851:
2852:
2853: IF l_debug_level > 0 THEN
2854: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
2855: oe_debug_pub.add('l_template_name: ' || l_template_name, 3);
2856: END IF;
2857:
2858: --ETR
2851:
2852:
2853: IF l_debug_level > 0 THEN
2854: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
2855: oe_debug_pub.add('l_template_name: ' || l_template_name, 3);
2856: END IF;
2857:
2858: --ETR
2859: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2863: END IF;
2864: --ETR
2865:
2866: IF l_debug_level > 0 THEN
2867: oe_debug_pub.add('End of OE_Contracts_util.Get_Template_Name, returning l_template_name: ' || l_template_name);
2868: END IF;
2869:
2870: RETURN l_template_name;
2871:
2873: EXCEPTION
2874: WHEN FND_API.G_EXC_ERROR THEN
2875:
2876: IF l_debug_level > 0 THEN
2877: oe_debug_pub.add('WHEN G_EXC_ERROR in Get_Template_Name ', 3);
2878: END IF;
2879:
2880: x_return_status := FND_API.G_RET_STS_ERROR;
2881:
2894:
2895: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2896:
2897: IF l_debug_level > 0 THEN
2898: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in Get_Template_Name ', 3);
2899: END IF;
2900:
2901: --close any cursors
2902:
2916:
2917:
2918: WHEN OTHERS THEN
2919: IF l_debug_level > 0 THEN
2920: oe_debug_pub.add('WHEN OTHERS in Get_Template_Name ', 3);
2921: END IF;
2922:
2923: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2924: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
2959: )
2960:
2961: IS
2962:
2963: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2964: BEGIN
2965:
2966: IF l_debug_level > 0 THEN
2967: oe_debug_pub.add('In OE_Contracts_util.instantiate_terms ', 1);
2963: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2964: BEGIN
2965:
2966: IF l_debug_level > 0 THEN
2967: oe_debug_pub.add('In OE_Contracts_util.instantiate_terms ', 1);
2968: END IF;
2969:
2970: x_return_status := FND_API.G_RET_STS_SUCCESS;
2971:
2975:
2976: --Check for licensing
2977: IF OE_Contracts_util.check_license() <> 'Y' THEN
2978: IF l_debug_level > 0 THEN
2979: oe_debug_pub.add('Contractual option not licensed, hence exiting instantiate_terms ', 3);
2980: END IF;
2981: RETURN;
2982: END IF;
2983:
2982: END IF;
2983:
2984:
2985: IF l_debug_level > 0 THEN
2986: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2987: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2983:
2984:
2985: IF l_debug_level > 0 THEN
2986: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2987: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2984:
2985: IF l_debug_level > 0 THEN
2986: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2987: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2992: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2985: IF l_debug_level > 0 THEN
2986: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2987: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2992: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2993: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2986: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_terms ', 3);
2987: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2992: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2993: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2994: END IF;
2987: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2992: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2993: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2994: END IF;
2995:
2988: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2992: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2993: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2994: END IF;
2995:
2996:
2989: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
2990: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
2991: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
2992: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
2993: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
2994: END IF;
2995:
2996:
2997: OKC_TERMS_COPY_GRP.copy_terms (
3011: x_msg_data => x_msg_data
3012: );
3013:
3014: IF l_debug_level > 0 THEN
3015: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3016: END IF;
3017:
3018: --ETR
3019: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3023: END IF;
3024: --ETR
3025:
3026: IF l_debug_level > 0 THEN
3027: oe_debug_pub.add('End of OE_Contracts_util.instantiate_terms , x_return_status ' || x_return_status, 1);
3028: END IF;
3029:
3030: EXCEPTION
3031: WHEN FND_API.G_EXC_ERROR THEN
3030: EXCEPTION
3031: WHEN FND_API.G_EXC_ERROR THEN
3032:
3033: IF l_debug_level > 0 THEN
3034: oe_debug_pub.add('WHEN G_EXC_ERROR in instantiate_terms ', 3);
3035: END IF;
3036:
3037: x_return_status := FND_API.G_RET_STS_ERROR;
3038:
3051:
3052: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3053:
3054: IF l_debug_level > 0 THEN
3055: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in instantiate_terms ', 3);
3056: END IF;
3057:
3058: --close any cursors
3059:
3074:
3075: WHEN OTHERS THEN
3076:
3077: IF l_debug_level > 0 THEN
3078: oe_debug_pub.add('WHEN OTHERS in instantiate_terms ', 3);
3079: END IF;
3080:
3081: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3082:
3124: )
3125:
3126: IS
3127:
3128: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3129:
3130: l_instntiatd_templt_id NUMBER;
3131: lx_template_name VARCHAR2(500);
3132:
3132:
3133: BEGIN
3134:
3135: IF l_debug_level > 0 THEN
3136: oe_debug_pub.add('In OE_Contracts_util.instantiate_doc_terms ', 1);
3137: END IF;
3138:
3139: x_return_status := FND_API.G_RET_STS_SUCCESS;
3140:
3144:
3145: --Check for licensing
3146: IF OE_Contracts_util.check_license() <> 'Y' THEN
3147: IF l_debug_level > 0 THEN
3148: oe_debug_pub.add('Contractual option not licensed, hence exiting instantiate_doc_terms ', 3);
3149: END IF;
3150: RETURN;
3151: END IF;
3152:
3151: END IF;
3152:
3153:
3154: IF l_debug_level > 0 THEN
3155: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3156: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3152:
3153:
3154: IF l_debug_level > 0 THEN
3155: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3156: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3160: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3153:
3154: IF l_debug_level > 0 THEN
3155: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3156: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3160: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3161: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3154: IF l_debug_level > 0 THEN
3155: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3156: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3160: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3161: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3162: END IF;
3155: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3156: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3160: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3161: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3162: END IF;
3163:
3156: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3160: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3161: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3162: END IF;
3163:
3164:
3157: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3158: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3159: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3160: oe_debug_pub.add('p_doc_start_date: ' || p_doc_start_date, 3);
3161: oe_debug_pub.add('p_doc_number: ' || p_doc_number, 3);
3162: END IF;
3163:
3164:
3165:
3169: IF p_template_id IS NOT NULL THEN
3170:
3171:
3172: IF l_debug_level > 0 THEN
3173: oe_debug_pub.add('Calling oe_contracts_util.get_terms_template', 3);
3174: END IF;
3175:
3176:
3177: --first determine whether any terms and conditions have been instantiated for the BSA or Sales Order
3190: x_msg_data => x_msg_data
3191: );
3192:
3193: IF l_debug_level > 0 THEN
3194: oe_debug_pub.add('l_instntiatd_templt_id: ' || l_instntiatd_templt_id, 3);
3195: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3196: END IF;
3197:
3198:
3191: );
3192:
3193: IF l_debug_level > 0 THEN
3194: oe_debug_pub.add('l_instntiatd_templt_id: ' || l_instntiatd_templt_id, 3);
3195: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3196: END IF;
3197:
3198:
3199: IF l_instntiatd_templt_id IS NULL THEN
3200: /** i.e. the contract template freshly defaulted in the form has not yet been
3201: instantiated so go ahead and instantiate it against the BSA or SO **/
3202:
3203: IF l_debug_level > 0 THEN
3204: oe_debug_pub.add('Calling oe_contracts_util.instantiate_terms', 3);
3205: END IF;
3206:
3207: oe_contracts_util.instantiate_terms (
3208: p_api_version => 1.0,
3221: );
3222:
3223:
3224: IF l_debug_level > 0 THEN
3225: oe_debug_pub.add('After trying to instantiate p_template_id: ' || p_template_id, 3);
3226: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3227: END IF;
3228:
3229:
3222:
3223:
3224: IF l_debug_level > 0 THEN
3225: oe_debug_pub.add('After trying to instantiate p_template_id: ' || p_template_id, 3);
3226: oe_debug_pub.add('x_return_status: ' || x_return_status, 3);
3227: END IF;
3228:
3229:
3230:
3234:
3235:
3236:
3237: IF l_debug_level > 0 THEN
3238: oe_debug_pub.add('End of OE_Contracts_util.instantiate_doc_terms , x_return_status ' || x_return_status, 1);
3239: END IF;
3240:
3241: EXCEPTION
3242: WHEN FND_API.G_EXC_ERROR THEN
3241: EXCEPTION
3242: WHEN FND_API.G_EXC_ERROR THEN
3243:
3244: IF l_debug_level > 0 THEN
3245: oe_debug_pub.add('WHEN G_EXC_ERROR in instantiate_doc_terms ', 3);
3246: END IF;
3247:
3248: x_return_status := FND_API.G_RET_STS_ERROR;
3249:
3262:
3263: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3264:
3265: IF l_debug_level > 0 THEN
3266: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in instantiate_doc_terms ', 3);
3267: END IF;
3268:
3269: --close any cursors
3270:
3285:
3286: WHEN OTHERS THEN
3287:
3288: IF l_debug_level > 0 THEN
3289: oe_debug_pub.add('WHEN OTHERS in instantiate_doc_terms ', 3);
3290: END IF;
3291:
3292: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3293:
3337: --ETR
3338: l_sign_by VARCHAR2(240);
3339: l_sign_date DATE;
3340: --ETR
3341: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3342:
3343: CURSOR find_ord_signed IS
3344: SELECT a.customer_signature,
3345: a.customer_signature_date
3347: WHERE a.header_id = p_doc_id;
3348:
3349: BEGIN
3350: IF (l_debug_level > 0) THEN
3351: oe_debug_pub.add('In OE_Contracts_util.is_order_signed', 2);
3352: END IF;
3353: -- Initialize message list if p_init_msg_list is set to TRUE.
3354: IF p_init_msg_list = FND_API.G_TRUE THEN
3355: oe_msg_pub.initialize;
3356: END IF;
3357: -- Initialize API return status to success
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3359: IF l_debug_level > 0 THEN
3360: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3361: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3362: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3363: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3364: END IF;
3357: -- Initialize API return status to success
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3359: IF l_debug_level > 0 THEN
3360: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3361: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3362: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3363: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3364: END IF;
3365:
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3359: IF l_debug_level > 0 THEN
3360: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3361: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3362: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3363: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3364: END IF;
3365:
3366: OPEN find_ord_signed;
3359: IF l_debug_level > 0 THEN
3360: oe_debug_pub.add('Fetching customer_signature and customer_signature_date from oe_order_headers_all ', 3);
3361: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3362: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3363: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3364: END IF;
3365:
3366: OPEN find_ord_signed;
3367: FETCH find_ord_signed INTO l_sign_by, l_sign_date;
3381: END IF;
3382:
3383:
3384: IF l_debug_level > 0 THEN
3385: oe_debug_pub.add('Order signed ?: sign_by = ' || l_sign_by || ' sign_date = ' || l_sign_date, 3);
3386: oe_debug_pub.add('Order signed ?: return value = ' || l_return_value, 3);
3387: END IF;
3388:
3389: IF (l_debug_level > 0) THEN
3382:
3383:
3384: IF l_debug_level > 0 THEN
3385: oe_debug_pub.add('Order signed ?: sign_by = ' || l_sign_by || ' sign_date = ' || l_sign_date, 3);
3386: oe_debug_pub.add('Order signed ?: return value = ' || l_return_value, 3);
3387: END IF;
3388:
3389: IF (l_debug_level > 0) THEN
3390: oe_debug_pub.add('End of OE_Contracts_util.is_order_signed', 2);
3386: oe_debug_pub.add('Order signed ?: return value = ' || l_return_value, 3);
3387: END IF;
3388:
3389: IF (l_debug_level > 0) THEN
3390: oe_debug_pub.add('End of OE_Contracts_util.is_order_signed', 2);
3391: END IF;
3392: RETURN l_return_value;
3393:
3394: EXCEPTION
3394: EXCEPTION
3395:
3396: WHEN OTHERS THEN
3397: IF l_debug_level > 0 THEN
3398: oe_debug_pub.add('WHEN-OTHERS in is_order_signed: '||sqlerrm, 1);
3399: END IF;
3400: IF find_ord_signed%ISOPEN THEN
3401: CLOSE find_ord_signed;
3402: END IF;
3436:
3437: l_target_doc_type VARCHAR2(30):= p_target_doc_type;
3438: l_target_doc_id NUMBER := p_target_doc_id;
3439: l_doc_template_name VARCHAR2(240):= null;
3440: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3441: l_keep_version VARCHAR2(1) := 'Y';
3442: l_copy_attch VARCHAR2(1) := 'N';
3443: l_document_number NUMBER:= null;
3444:
3444:
3445: BEGIN
3446:
3447: IF l_debug_level > 0 THEN
3448: oe_debug_pub.add('In OE_Contracts_util.copy_doc ', 1);
3449: END IF;
3450:
3451: x_return_status := FND_API.G_RET_STS_SUCCESS;
3452:
3456:
3457: --Check contract Licence
3458: IF OE_Contracts_util.check_license() <> 'Y' THEN
3459: IF l_debug_level > 0 THEN
3460: oe_debug_pub.add('Contractual option not licensed. Exiting copy_doc', 3);
3461: END IF;
3462: RETURN;
3463: END IF;
3464:
3463: END IF;
3464:
3465:
3466: IF l_debug_level > 0 THEN
3467: oe_debug_pub.add('Parameter Values passed', 3);
3468: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3464:
3465:
3466: IF l_debug_level > 0 THEN
3467: oe_debug_pub.add('Parameter Values passed', 3);
3468: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3465:
3466: IF l_debug_level > 0 THEN
3467: oe_debug_pub.add('Parameter Values passed', 3);
3468: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3466: IF l_debug_level > 0 THEN
3467: oe_debug_pub.add('Parameter Values passed', 3);
3468: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3474: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3467: oe_debug_pub.add('Parameter Values passed', 3);
3468: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3474: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3475: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3468: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3474: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3475: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3476: END IF;
3469: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3474: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3475: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3476: END IF;
3477:
3470: oe_debug_pub.add('p_commit: ' || p_commit,3);
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3474: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3475: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3476: END IF;
3477:
3478: IF p_source_doc_id is not null Then
3471: oe_debug_pub.add('p_source_doc_type: ' || p_source_doc_type,3);
3472: oe_debug_pub.add('p_source_doc_id: ' || p_source_doc_id, 3);
3473: oe_debug_pub.add('p_target_doc_type: ' || p_target_doc_type,3);
3474: oe_debug_pub.add('p_target_doc_id: ' || p_target_doc_id, 3);
3475: oe_debug_pub.add('p_contract_template_id' || p_contract_template_id, 3);
3476: END IF;
3477:
3478: IF p_source_doc_id is not null Then
3479: l_doc_template_name := okc_terms_util_grp.Get_Terms_Template(
3492: l_document_number := NULL;
3493: END;
3494: END IF;
3495: If l_debug_level > 0 THEN
3496: oe_debug_pub.add('l_document_number: ' || l_document_number, 3);
3497: End If;
3498:
3499: IF l_doc_template_name is null THEN
3500: --Instantiate from the template
3499: IF l_doc_template_name is null THEN
3500: --Instantiate from the template
3501: If p_contract_template_id is not null then
3502: If l_debug_level > 0 THEN
3503: oe_debug_pub.add('Instantiating COntract Terms, No articles on source document',3);
3504: End If;
3505:
3506: OKC_TERMS_COPY_GRP.copy_terms (
3507: p_api_version => p_api_version,
3527:
3528: End If;
3529: ELSE
3530: If l_debug_level > 0 THEN
3531: oe_debug_pub.add('Terms exist in source document',3);
3532: End If;
3533:
3534: If (p_source_doc_type <> p_target_doc_type) Then
3535: l_copy_attch := 'Y';
3540: If (p_source_doc_type =p_target_doc_type and
3541: p_source_doc_id =p_target_doc_id) THEN
3542:
3543: If l_debug_level > 0 THEN
3544: oe_debug_pub.add('Target Doc and Source Document are Same. exiting copy_doc',3);
3545: End If;
3546: RETURN;
3547: End If;
3548:
3546: RETURN;
3547: End If;
3548:
3549: If l_debug_level > 0 THEN
3550: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3551: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3552: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3553: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3554: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3547: End If;
3548:
3549: If l_debug_level > 0 THEN
3550: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3551: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3552: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3553: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3554: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3555: End If;
3548:
3549: If l_debug_level > 0 THEN
3550: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3551: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3552: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3553: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3554: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3555: End If;
3556:
3549: If l_debug_level > 0 THEN
3550: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3551: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3552: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3553: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3554: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3555: End If;
3556:
3557: OKC_TERMS_COPY_GRP.copy_doc (
3550: oe_debug_pub.add('Calling OKC_TERMS_COPY_GRP.copy_doc',3);
3551: oe_debug_pub.add('p_copy_doc_attachments: ' ||l_copy_attch,3);
3552: oe_debug_pub.add('p_keep_version: ' || l_keep_version, 3);
3553: oe_debug_pub.add('p_target_doc_type: ' ||l_target_doc_type,3);
3554: oe_debug_pub.add('p_target_doc_id: ' || l_target_doc_id, 3);
3555: End If;
3556:
3557: OKC_TERMS_COPY_GRP.copy_doc (
3558: p_api_version => p_api_version,
3581:
3582: END IF;
3583:
3584: If l_debug_level > 0 THEN
3585: oe_debug_pub.add('Return Status + x_return_status',3);
3586: End If;
3587:
3588:
3589: EXCEPTION
3589: EXCEPTION
3590: WHEN FND_API.G_EXC_ERROR THEN
3591:
3592: IF l_debug_level > 0 THEN
3593: oe_debug_pub.add('WHEN G_EXC_ERROR in copy_doc ', 3);
3594: END IF;
3595: --Get message count and data
3596: OE_MSG_PUB.Count_And_Get (
3597: p_count => x_msg_count,
3599:
3600: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3601:
3602: IF l_debug_level > 0 THEN
3603: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in copy_doc ', 3);
3604: END IF;
3605:
3606: --Get message count and data
3607: OE_MSG_PUB.Count_And_Get (
3610:
3611: WHEN OTHERS THEN
3612:
3613: IF l_debug_level > 0 THEN
3614: oe_debug_pub.add('WHEN OTHERS in copy_doc ', 3);
3615: END IF;
3616:
3617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3618:
3649: , p_ordered_item IN VARCHAR2
3650: , p_org_id IN Number DEFAULT NULL
3651: ) RETURN VARCHAR2 IS
3652:
3653: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3654: l_ordered_item varchar2(2000);
3655: l_inventory_item varchar2(300);
3656: l_ordered_item_desc varchar2(2000);
3657: l_return_status varchar2(30);
3660: l_value varchar2(2000);
3661:
3662: BEGIN
3663: IF l_debug_level > 0 THEN
3664: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3665: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3661:
3662: BEGIN
3663: IF l_debug_level > 0 THEN
3664: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3665: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3669: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3662: BEGIN
3663: IF l_debug_level > 0 THEN
3664: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3665: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3669: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3670: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3663: IF l_debug_level > 0 THEN
3664: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3665: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3669: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3670: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3671: END IF;
3664: oe_debug_pub.add( 'ENTER GET_ITEM_INFO FUNCTION' ) ;
3665: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3669: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3670: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3671: END IF;
3672:
3665: oe_debug_pub.add( 'ITEM_OR_DESC : '||P_ITEM_OR_DESC ) ;
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3669: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3670: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3671: END IF;
3672:
3673: OE_LINE_UTIL.GET_ITEM_INFO (
3666: oe_debug_pub.add( 'ITEM_IDENTIFIER_TYPE : '||P_ITEM_IDENTIFIER_TYPE ) ;
3667: oe_debug_pub.add( 'INVENTORY_ITEM_ID : '||P_INVENTORY_ITEM_ID ) ;
3668: oe_debug_pub.add( 'ORDERED_ITEM_ID : '||P_ORDERED_ITEM_ID ) ;
3669: oe_debug_pub.add( 'ORDERED_ITEM : '||P_ORDERED_ITEM ) ;
3670: oe_debug_pub.add( 'SOLD_TO_ORG_ID : '||P_SOLD_TO_ORG_ID ) ;
3671: END IF;
3672:
3673: OE_LINE_UTIL.GET_ITEM_INFO (
3674: x_return_status => l_return_status
3686:
3687: );
3688:
3689: IF l_debug_level > 0 THEN
3690: oe_debug_pub.add('Return status from OE_LINE_UTIL.GET_ITEM_INFO is '||l_return_status) ;
3691: END IF;
3692:
3693: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3694: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3702: l_value := l_ordered_item_desc;
3703: END IF;
3704:
3705: IF l_debug_level > 0 THEN
3706: oe_debug_pub.add( 'l_value = '||l_value ) ;
3707: END IF;
3708:
3709: IF l_debug_level > 0 THEN
3710: oe_debug_pub.add( 'EXIT GET_ITEM_INFO FUNCTION' ) ;
3706: oe_debug_pub.add( 'l_value = '||l_value ) ;
3707: END IF;
3708:
3709: IF l_debug_level > 0 THEN
3710: oe_debug_pub.add( 'EXIT GET_ITEM_INFO FUNCTION' ) ;
3711: END IF;
3712:
3713: RETURN l_value;
3714:
3714:
3715: EXCEPTION
3716: WHEN FND_API.G_EXC_ERROR THEN
3717: IF l_debug_level > 0 THEN
3718: oe_debug_pub.add('In oe_contracts_util.get_item_info:g_exc_error section') ;
3719: END IF;
3720: RAISE FND_API.G_EXC_ERROR;
3721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3722: IF l_debug_level > 0 THEN
3719: END IF;
3720: RAISE FND_API.G_EXC_ERROR;
3721: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3722: IF l_debug_level > 0 THEN
3723: oe_debug_pub.add('In oe_contracts_util.get_item_info:g_exc_unexpected_error section') ;
3724: END IF;
3725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3726: WHEN OTHERS THEN
3727: IF l_debug_level > 0 THEN
3724: END IF;
3725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3726: WHEN OTHERS THEN
3727: IF l_debug_level > 0 THEN
3728: oe_debug_pub.add('In oe_contracts_util.get_item_info: when others section') ;
3729: END IF;
3730: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3731: THEN
3732: OE_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,'GET_ITEM_INFO');
3750: )
3751:
3752: IS
3753: l_template_description VARCHAR2(2000); -- bug 4382305
3754: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3755:
3756: BEGIN
3757:
3758: IF l_debug_level > 0 THEN
3755:
3756: BEGIN
3757:
3758: IF l_debug_level > 0 THEN
3759: oe_debug_pub.add('In OE_Contracts_util.get_contract_defaults ', 1);
3760: END IF;
3761:
3762: x_return_status := FND_API.G_RET_STS_SUCCESS;
3763:
3767:
3768: --Check for licensing
3769: IF OE_Contracts_util.check_license() <> 'Y' THEN
3770: IF l_debug_level > 0 THEN
3771: oe_debug_pub.add('Contractual option not licensed, hence exiting get_terms_template ', 3);
3772: END IF;
3773: x_contract_source := NULL;
3774: x_authoring_party := NULL;
3775: x_template_name := NULL;
3777: END IF;
3778:
3779:
3780: IF l_debug_level > 0 THEN
3781: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3782: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3783: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3784: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3785: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3778:
3779:
3780: IF l_debug_level > 0 THEN
3781: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3782: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3783: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3784: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3785: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3786: END IF;
3779:
3780: IF l_debug_level > 0 THEN
3781: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3782: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3783: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3784: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3785: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3786: END IF;
3787:
3780: IF l_debug_level > 0 THEN
3781: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3782: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3783: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3784: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3785: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3786: END IF;
3787:
3788: OKC_TERMS_UTIL_GRP.get_contract_defaults (
3781: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_defaults ', 3);
3782: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3783: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3784: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3785: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
3786: END IF;
3787:
3788: OKC_TERMS_UTIL_GRP.get_contract_defaults (
3789: p_api_version => p_api_version,
3799: x_template_description => l_template_description
3800: );
3801:
3802: IF l_debug_level > 0 THEN
3803: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3804: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3805: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3806: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3807: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3800: );
3801:
3802: IF l_debug_level > 0 THEN
3803: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3804: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3805: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3806: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3807: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3808: END IF;
3801:
3802: IF l_debug_level > 0 THEN
3803: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3804: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3805: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3806: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3807: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3808: END IF;
3809:
3802: IF l_debug_level > 0 THEN
3803: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3804: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3805: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3806: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3807: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3808: END IF;
3809:
3810: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3803: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
3804: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3805: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3806: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3807: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3808: END IF;
3809:
3810: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3811: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3813: RAISE FND_API.G_EXC_ERROR ;
3814: END IF;
3815:
3816: IF l_debug_level > 0 THEN
3817: oe_debug_pub.add('End of OE_Contracts_util.get_contract_defaults , x_return_status ' || x_return_status, 1);
3818: END IF;
3819:
3820: EXCEPTION
3821: WHEN FND_API.G_EXC_ERROR THEN
3820: EXCEPTION
3821: WHEN FND_API.G_EXC_ERROR THEN
3822:
3823: IF l_debug_level > 0 THEN
3824: oe_debug_pub.add('WHEN G_EXC_ERROR in get_contract_defaults ', 3);
3825: END IF;
3826:
3827: x_return_status := FND_API.G_RET_STS_ERROR;
3828:
3835:
3836: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3837:
3838: IF l_debug_level > 0 THEN
3839: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_contract_defaults ', 3);
3840: END IF;
3841:
3842: --close any cursors
3843:
3852:
3853: WHEN OTHERS THEN
3854:
3855: IF l_debug_level > 0 THEN
3856: oe_debug_pub.add('WHEN OTHERS in get_contract_defaults ', 3);
3857: END IF;
3858:
3859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3860:
3901: l_template_description VARCHAR2(2000); -- bug 4382305
3902: l_template_instruction VARCHAR2(2000); -- bug 4382305
3903: l_is_primary_doc_mergeable VARCHAR2(100);
3904: l_primary_doc_file_id VARCHAR2(100);
3905: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3906:
3907:
3908: BEGIN
3909:
3907:
3908: BEGIN
3909:
3910: IF l_debug_level > 0 THEN
3911: oe_debug_pub.add('In OE_Contracts_util.get_contract_details_all ', 1);
3912: END IF;
3913:
3914: x_return_status := FND_API.G_RET_STS_SUCCESS;
3915:
3919:
3920: --Check for licensing
3921: IF OE_Contracts_util.check_license() <> 'Y' THEN
3922: IF l_debug_level > 0 THEN
3923: oe_debug_pub.add('Contractual option not licensed, hence exiting get_contract_details_all ', 3);
3924: END IF;
3925: x_contract_source := NULL;
3926: x_authoring_party := NULL;
3927: x_template_name := NULL;
3930: END IF;
3931:
3932:
3933: IF l_debug_level > 0 THEN
3934: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3935: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3936: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3937: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3938: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3931:
3932:
3933: IF l_debug_level > 0 THEN
3934: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3935: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3936: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3937: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3938: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3939: END IF;
3932:
3933: IF l_debug_level > 0 THEN
3934: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3935: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3936: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3937: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3938: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3939: END IF;
3940:
3933: IF l_debug_level > 0 THEN
3934: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3935: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3936: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3937: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3938: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3939: END IF;
3940:
3941: OKC_TERMS_UTIL_GRP.get_contract_details_all (
3934: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.get_contract_details_all ', 3);
3935: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
3936: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
3937: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
3938: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
3939: END IF;
3940:
3941: OKC_TERMS_UTIL_GRP.get_contract_details_all (
3942: p_api_version => p_api_version,
3961: x_primary_doc_file_id => l_primary_doc_file_id
3962: );
3963:
3964: IF l_debug_level > 0 THEN
3965: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3966: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3962: );
3963:
3964: IF l_debug_level > 0 THEN
3965: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3966: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3963:
3964: IF l_debug_level > 0 THEN
3965: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3966: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3971: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3964: IF l_debug_level > 0 THEN
3965: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3966: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3971: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3972: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3965: oe_debug_pub.add('x_contract_source: '|| x_contract_source, 3);
3966: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3971: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3972: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3973: END IF;
3966: oe_debug_pub.add('x_contract_source_code: '|| x_contract_source_code, 3);
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3971: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3972: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3973: END IF;
3974:
3967: oe_debug_pub.add('x_template_id: '|| x_template_id, 3);
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3971: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3972: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3973: END IF;
3974:
3975: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3968: oe_debug_pub.add('x_authoring_party: '|| x_authoring_party, 3);
3969: oe_debug_pub.add('x_template_name: '|| x_template_name, 3);
3970: oe_debug_pub.add('x_has_primary_doc: '|| x_has_primary_doc, 3);
3971: oe_debug_pub.add('x_msg_data: '|| x_msg_data, 3); -- bug 4382305
3972: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
3973: END IF;
3974:
3975: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3976: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3978: RAISE FND_API.G_EXC_ERROR ;
3979: END IF;
3980:
3981: IF l_debug_level > 0 THEN
3982: oe_debug_pub.add('End of OE_Contracts_util.get_contract_details_all , x_return_status ' || x_return_status, 1);
3983: END IF;
3984:
3985: EXCEPTION
3986: WHEN FND_API.G_EXC_ERROR THEN
3985: EXCEPTION
3986: WHEN FND_API.G_EXC_ERROR THEN
3987:
3988: IF l_debug_level > 0 THEN
3989: oe_debug_pub.add('WHEN G_EXC_ERROR in get_contract_details_all ', 3);
3990: END IF;
3991:
3992: x_return_status := FND_API.G_RET_STS_ERROR;
3993:
4000:
4001: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4002:
4003: IF l_debug_level > 0 THEN
4004: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in get_contract_details_all ', 3);
4005: END IF;
4006:
4007: --close any cursors
4008:
4017:
4018: WHEN OTHERS THEN
4019:
4020: IF l_debug_level > 0 THEN
4021: oe_debug_pub.add('WHEN OTHERS in get_contract_details_all ', 3);
4022: END IF;
4023:
4024: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4025:
4054: p_template_id IN NUMBER,
4055: p_org_id IN NUMBER
4056: ) RETURN VARCHAR2 IS
4057:
4058: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4059: l_result VARCHAR2(1) := 'N';
4060:
4061: BEGIN
4062:
4060:
4061: BEGIN
4062:
4063: IF l_debug_level > 0 THEN
4064: oe_debug_pub.add('In OE_Contracts_util.Is_Terms_Template_Valid ', 1);
4065: END IF;
4066:
4067: x_return_status := FND_API.G_RET_STS_SUCCESS;
4068:
4072:
4073: --Check for licensing
4074: IF OE_Contracts_util.check_license() <> 'Y' THEN
4075: IF l_debug_level > 0 THEN
4076: oe_debug_pub.add('Contractual option not licensed, hence exiting Is_Terms_Template_Valid ', 3);
4077: END IF;
4078: RETURN NULL;
4079: END IF;
4080:
4079: END IF;
4080:
4081:
4082: IF l_debug_level > 0 THEN
4083: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4084: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4085: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4086: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4087: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4080:
4081:
4082: IF l_debug_level > 0 THEN
4083: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4084: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4085: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4086: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4087: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4088: END IF;
4081:
4082: IF l_debug_level > 0 THEN
4083: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4084: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4085: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4086: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4087: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4088: END IF;
4089:
4082: IF l_debug_level > 0 THEN
4083: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4084: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4085: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4086: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4087: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4088: END IF;
4089:
4090: l_result := OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid (
4083: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid ', 3);
4084: oe_debug_pub.add('p_api_version: ' || p_api_version,3);
4085: oe_debug_pub.add('p_init_msg_list: ' || p_init_msg_list,3);
4086: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4087: oe_debug_pub.add('p_template_id: ' || p_template_id, 3);
4088: END IF;
4089:
4090: l_result := OKC_TERMS_UTIL_GRP.Is_Terms_Template_Valid (
4091: p_api_version => p_api_version,
4100: );
4101:
4102:
4103: IF l_debug_level > 0 THEN
4104: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
4105: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
4106: oe_debug_pub.add(' l_result: '|| l_result, 3);
4107: END IF;
4108:
4101:
4102:
4103: IF l_debug_level > 0 THEN
4104: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
4105: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
4106: oe_debug_pub.add(' l_result: '|| l_result, 3);
4107: END IF;
4108:
4109: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
4102:
4103: IF l_debug_level > 0 THEN
4104: oe_debug_pub.add('p_template_id: '|| p_template_id, 3);
4105: oe_debug_pub.add('x_return_status: '|| x_return_status, 3);
4106: oe_debug_pub.add(' l_result: '|| l_result, 3);
4107: END IF;
4108:
4109: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
4110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4112: RAISE FND_API.G_EXC_ERROR ;
4113: END IF;
4114:
4115: IF l_debug_level > 0 THEN
4116: oe_debug_pub.add('End of OE_Contracts_util.Is_Terms_Template_Valid , x_return_status ' || x_return_status, 1);
4117: END IF;
4118:
4119: RETURN l_result;
4120:
4121: EXCEPTION
4122: WHEN FND_API.G_EXC_ERROR THEN
4123:
4124: IF l_debug_level > 0 THEN
4125: oe_debug_pub.add('WHEN G_EXC_ERROR in Is_Terms_Template_Valid ', 3);
4126: END IF;
4127:
4128: x_return_status := FND_API.G_RET_STS_ERROR;
4129:
4136:
4137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4138:
4139: IF l_debug_level > 0 THEN
4140: oe_debug_pub.add('WHEN G_EXC_UNEXPECTED_ERROR in Is_Terms_Template_Valid ', 3);
4141: END IF;
4142:
4143: --close any cursors
4144:
4153:
4154: WHEN OTHERS THEN
4155:
4156: IF l_debug_level > 0 THEN
4157: oe_debug_pub.add('WHEN OTHERS in Is_Terms_Template_Valid ', 3);
4158: END IF;
4159:
4160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4161:
4182: p_doc_type IN VARCHAR2,
4183: p_doc_id IN NUMBER
4184: )
4185: RETURN VARCHAR2 IS
4186: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4187: l_authoring_party_code VARCHAR2(100);
4188: BEGIN
4189:
4190: IF l_debug_level > 0 THEN
4187: l_authoring_party_code VARCHAR2(100);
4188: BEGIN
4189:
4190: IF l_debug_level > 0 THEN
4191: oe_debug_pub.add('In OE_Contracts_util.Is_Auth_Party_Internal ', 1);
4192: END IF;
4193:
4194: --Check for licensing
4195: IF OE_Contracts_util.check_license() <> 'Y' THEN
4193:
4194: --Check for licensing
4195: IF OE_Contracts_util.check_license() <> 'Y' THEN
4196: IF l_debug_level > 0 THEN
4197: oe_debug_pub.add('Contractual option not licensed, hence exiting Is_Auth_Party_Internal ', 3);
4198: END IF;
4199:
4200: RETURN 'N';
4201: END IF;
4200: RETURN 'N';
4201: END IF;
4202:
4203: IF l_debug_level > 0 THEN
4204: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code', 3);
4205: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4206: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4207: END IF;
4208:
4201: END IF;
4202:
4203: IF l_debug_level > 0 THEN
4204: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code', 3);
4205: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4206: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4207: END IF;
4208:
4209: l_authoring_party_code := OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code(
4202:
4203: IF l_debug_level > 0 THEN
4204: oe_debug_pub.add('Calling OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code', 3);
4205: oe_debug_pub.add('p_doc_type: ' || p_doc_type, 3);
4206: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4207: END IF;
4208:
4209: l_authoring_party_code := OKC_TERMS_UTIL_GRP.Get_Authoring_Party_Code(
4210: p_document_type => p_doc_type,
4211: p_document_id => p_doc_id
4212: );
4213:
4214: IF l_debug_level > 0 THEN
4215: oe_debug_pub.add('l_authoring_party_code '|| l_authoring_party_code, 3);
4216: END IF;
4217:
4218: IF l_authoring_party_code = 'INTERNAL_ORG' THEN
4219: RETURN 'Y';
4225:
4226: WHEN OTHERS THEN
4227:
4228: IF l_debug_level > 0 THEN
4229: oe_debug_pub.add('WHEN-OTHERS in Is_Auth_Party_Internal ', 1);
4230: END IF;
4231:
4232: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4233: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,
4243: (
4244: p_doc_id IN NUMBER
4245: )
4246: RETURN VARCHAR2 IS
4247: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4248: l_rch_enabled VARCHAR2(1) := 'N';
4249: l_org_id NUMBER := NULL;
4250:
4251: BEGIN
4250:
4251: BEGIN
4252:
4253: IF l_debug_level > 0 THEN
4254: oe_debug_pub.add('In OE_Contracts_util.Is_RChg_Enabled ', 1);
4255: END IF;
4256: --Get the org_id
4257: BEGIN
4258: SELECT org_id into l_org_id
4263: l_org_id:=NULL;
4264: END;
4265:
4266: IF l_debug_level > 0 THEN
4267: oe_debug_pub.add('Calling OE_SYS_PARAMETER.VALUE(RECURRING_CHARGES)', 3);
4268: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4269: oe_debug_pub.add('l_org_id: ' || l_org_id, 3);
4270: END IF;
4271:
4264: END;
4265:
4266: IF l_debug_level > 0 THEN
4267: oe_debug_pub.add('Calling OE_SYS_PARAMETER.VALUE(RECURRING_CHARGES)', 3);
4268: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4269: oe_debug_pub.add('l_org_id: ' || l_org_id, 3);
4270: END IF;
4271:
4272: IF l_org_id is not null then
4265:
4266: IF l_debug_level > 0 THEN
4267: oe_debug_pub.add('Calling OE_SYS_PARAMETER.VALUE(RECURRING_CHARGES)', 3);
4268: oe_debug_pub.add('p_doc_id: ' || p_doc_id, 3);
4269: oe_debug_pub.add('l_org_id: ' || l_org_id, 3);
4270: END IF;
4271:
4272: IF l_org_id is not null then
4273: l_rch_enabled := nvl(OE_SYS_PARAMETERS.VALUE('RECURRING_CHARGES',l_org_id),'N');
4275: l_rch_enabled := 'N';
4276: END IF;
4277:
4278: IF l_debug_level > 0 THEN
4279: oe_debug_pub.add('l_rch_enabled '|| l_rch_enabled, 3);
4280: END IF;
4281:
4282: return l_rch_enabled;
4283:
4285:
4286: WHEN OTHERS THEN
4287:
4288: IF l_debug_level > 0 THEN
4289: oe_debug_pub.add('WHEN-OTHERS in Is_RChg_Enabled ', 1);
4290: END IF;
4291:
4292: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4293: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,