DBA Data[Home] [Help]

APPS.PO_CONTERMS_UTL_GRP dependencies on FND_API

Line 38: -- FND_API.G_TRUE if Procurement Contracts is enabled

34: -- This function determines if Contracts is enabled or not.
35: --Parameters:
36: -- None
37: --Returns:
38: -- FND_API.G_TRUE if Procurement Contracts is enabled
39: -- FND_API.G_FALSE if Procurement Contracts is disabled.
40: --Testing:
41: --
42: --End of Comments

Line 39: -- FND_API.G_FALSE if Procurement Contracts is disabled.

35: --Parameters:
36: -- None
37: --Returns:
38: -- FND_API.G_TRUE if Procurement Contracts is enabled
39: -- FND_API.G_FALSE if Procurement Contracts is disabled.
40: --Testing:
41: --
42: --End of Comments
43: -------------------------------------------------------------------------------

Line 51: RETURN FND_API.G_TRUE;

47: BEGIN
48:
49: -- read the global variable that stores the profile option.
50: IF (g_contracts_enabled = 'Y') THEN
51: RETURN FND_API.G_TRUE;
52: ELSE
53: RETURN FND_API.G_FALSE;
54: END IF;
55:

Line 53: RETURN FND_API.G_FALSE;

49: -- read the global variable that stores the profile option.
50: IF (g_contracts_enabled = 'Y') THEN
51: RETURN FND_API.G_TRUE;
52: ELSE
53: RETURN FND_API.G_FALSE;
54: END IF;
55:
56: EXCEPTION
57: WHEN OTHERS THEN

Line 84: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

80: -- Message count
81: --x_msg_data
82: -- message data
83: --x_return_status
84: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
85: --x_contracts_enabled
86: -- FND_API.G_TRUE if Procurement Contracts is enabled
87: -- FND_API.G_FALSE if Procurement Contracts is disabled.
88: --Testing:

Line 86: -- FND_API.G_TRUE if Procurement Contracts is enabled

82: -- message data
83: --x_return_status
84: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
85: --x_contracts_enabled
86: -- FND_API.G_TRUE if Procurement Contracts is enabled
87: -- FND_API.G_FALSE if Procurement Contracts is disabled.
88: --Testing:
89: --
90: --End of Comments

Line 87: -- FND_API.G_FALSE if Procurement Contracts is disabled.

83: --x_return_status
84: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
85: --x_contracts_enabled
86: -- FND_API.G_TRUE if Procurement Contracts is enabled
87: -- FND_API.G_FALSE if Procurement Contracts is disabled.
88: --Testing:
89: --
90: --End of Comments
91: -------------------------------------------------------------------------------

Line 95: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

91: -------------------------------------------------------------------------------
92:
93: PROCEDURE is_contracts_enabled
94: (p_api_version IN NUMBER --bug4028805
95: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
96: ,x_return_status OUT NOCOPY VARCHAR2
97: ,x_msg_count OUT NOCOPY NUMBER
98: ,x_msg_data OUT NOCOPY VARCHAR2
99: ,x_contracts_enabled OUT NOCOPY VARCHAR2) IS

Line 106: IF NOT (FND_API.compatible_api_call(l_api_version

102: l_api_name CONSTANT VARCHAR2(30) := 'is_contracts_enabled';
103: l_api_version CONSTANT NUMBER := 1.0; --bug 4028805
104:
105: BEGIN
106: IF NOT (FND_API.compatible_api_call(l_api_version
107: ,p_api_version
108: ,l_api_name
109: ,g_pkg_name)) THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

106: IF NOT (FND_API.compatible_api_call(l_api_version
107: ,p_api_version
108: ,l_api_name
109: ,g_pkg_name)) THEN
110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112:
113: -- initialize API return status to success
114: x_return_status:= FND_API.G_RET_STS_SUCCESS;

Line 114: x_return_status:= FND_API.G_RET_STS_SUCCESS;

110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
111: END IF;
112:
113: -- initialize API return status to success
114: x_return_status:= FND_API.G_RET_STS_SUCCESS;
115:
116: -- initialize meesage list
117: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
118: FND_MSG_PUB.initialize;

Line 117: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

113: -- initialize API return status to success
114: x_return_status:= FND_API.G_RET_STS_SUCCESS;
115:
116: -- initialize meesage list
117: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
118: FND_MSG_PUB.initialize;
119: END IF;
120:
121: x_contracts_enabled := is_contracts_enabled;

Line 125: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

121: x_contracts_enabled := is_contracts_enabled;
122:
123: EXCEPTION
124: WHEN OTHERS THEN
125: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
126: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
127: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
128: IF (g_fnd_debug='Y') THEN
129: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 249: -- FND_API.G_RET_STS_ERROR - for expected error

245: -- Message count
246: --x_msg_data
247: -- message data
248: --x_return_status
249: -- FND_API.G_RET_STS_ERROR - for expected error
250: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
251: -- FND_API.G_RET_STS_SUCCESS - for success
252: --x_supplier_userlist
253: -- PL/SQL table of supplier user names

Line 250: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

246: --x_msg_data
247: -- message data
248: --x_return_status
249: -- FND_API.G_RET_STS_ERROR - for expected error
250: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
251: -- FND_API.G_RET_STS_SUCCESS - for success
252: --x_supplier_userlist
253: -- PL/SQL table of supplier user names
254: --Notes:

Line 251: -- FND_API.G_RET_STS_SUCCESS - for success

247: -- message data
248: --x_return_status
249: -- FND_API.G_RET_STS_ERROR - for expected error
250: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
251: -- FND_API.G_RET_STS_SUCCESS - for success
252: --x_supplier_userlist
253: -- PL/SQL table of supplier user names
254: --Notes:
255: -- SAHEGDE 07/18/2003

Line 268: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

264: -------------------------------------------------------------------------------
265:
266: PROCEDURE get_external_userlist
267: (p_api_version IN NUMBER --bug4028805
268: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
269: ,p_document_id IN NUMBER
270: ,p_document_type IN VARCHAR2
271: ,p_external_contact_id IN NUMBER DEFAULT NULL
272: ,x_return_status OUT NOCOPY VARCHAR2

Line 288: IF NOT (FND_API.compatible_api_call(l_api_version

284: l_external_user_tbl external_user_tbl_type;
285:
286:
287: BEGIN
288: IF NOT (FND_API.compatible_api_call(l_api_version
289: ,p_api_version
290: ,l_api_name
291: ,g_pkg_name)) THEN
292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

288: IF NOT (FND_API.compatible_api_call(l_api_version
289: ,p_api_version
290: ,l_api_name
291: ,g_pkg_name)) THEN
292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
293: END IF;
294:
295: -- initialize API return status to success
296: x_return_status:= FND_API.G_RET_STS_SUCCESS;

Line 296: x_return_status:= FND_API.G_RET_STS_SUCCESS;

292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
293: END IF;
294:
295: -- initialize API return status to success
296: x_return_status:= FND_API.G_RET_STS_SUCCESS;
297:
298: -- initialize meesage list
299: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
300: FND_MSG_PUB.initialize;

Line 299: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

295: -- initialize API return status to success
296: x_return_status:= FND_API.G_RET_STS_SUCCESS;
297:
298: -- initialize meesage list
299: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
300: FND_MSG_PUB.initialize;
301: END IF;
302:
303: -- parse the contracts document type to type lookup

Line 329: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

325: ,x_msg_data => x_msg_data
326: ,x_external_user_tbl => l_external_user_tbl);
327:
328:
329: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
332:
333: -- populate the out parameter. Contracts need comma delimited list of users.

Line 330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

326: ,x_external_user_tbl => l_external_user_tbl);
327:
328:
329: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: END IF;
332:
333: -- populate the out parameter. Contracts need comma delimited list of users.
334: x_external_user_tbl := l_external_user_tbl;

Line 337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

333: -- populate the out parameter. Contracts need comma delimited list of users.
334: x_external_user_tbl := l_external_user_tbl;
335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
339: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
340: ,p_data => x_msg_data);
341: WHEN OTHERS THEN

Line 338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

334: x_external_user_tbl := l_external_user_tbl;
335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
339: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
340: ,p_data => x_msg_data);
341: WHEN OTHERS THEN
342: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 342: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
339: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
340: ,p_data => x_msg_data);
341: WHEN OTHERS THEN
342: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
343: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
344: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
345: IF (g_fnd_debug='Y') THEN
346: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 391: -- FND_API.G_RET_STS_ERROR - for expected error

387: -- Message count
388: --x_msg_data
389: -- message data
390: --x_return_status
391: -- FND_API.G_RET_STS_ERROR - for expected error
392: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
393: -- FND_API.G_RET_STS_SUCCESS - for success
394: --x_supplier_userlist
395: -- Comma delimited list of supplier user names

Line 392: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

388: --x_msg_data
389: -- message data
390: --x_return_status
391: -- FND_API.G_RET_STS_ERROR - for expected error
392: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
393: -- FND_API.G_RET_STS_SUCCESS - for success
394: --x_supplier_userlist
395: -- Comma delimited list of supplier user names
396: --Notes:

Line 393: -- FND_API.G_RET_STS_SUCCESS - for success

389: -- message data
390: --x_return_status
391: -- FND_API.G_RET_STS_ERROR - for expected error
392: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
393: -- FND_API.G_RET_STS_SUCCESS - for success
394: --x_supplier_userlist
395: -- Comma delimited list of supplier user names
396: --Notes:
397: -- This is an overloaded API to return the supplier names in a comma delimited

Line 405: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

401: --End of Comments
402: -------------------------------------------------------------------------------
403: PROCEDURE get_external_userlist
404: (p_api_version IN NUMBER --bug4028805
405: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
406: ,p_document_id IN NUMBER
407: ,p_document_type IN VARCHAR2
408: ,p_external_contact_id IN NUMBER DEFAULT NULL
409: ,x_return_status OUT NOCOPY VARCHAR2

Line 430: IF NOT (FND_API.compatible_api_call(l_api_version

426:
427:
428:
429: BEGIN
430: IF NOT (FND_API.compatible_api_call(l_api_version
431: ,p_api_version
432: ,l_api_name
433: ,g_pkg_name)) THEN
434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

430: IF NOT (FND_API.compatible_api_call(l_api_version
431: ,p_api_version
432: ,l_api_name
433: ,g_pkg_name)) THEN
434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
437: -- initialize API return status to success
438: x_return_status:= FND_API.G_RET_STS_SUCCESS;

Line 438: x_return_status:= FND_API.G_RET_STS_SUCCESS;

434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
435: END IF;
436:
437: -- initialize API return status to success
438: x_return_status:= FND_API.G_RET_STS_SUCCESS;
439:
440: -- initialize meesage list
441: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
442: FND_MSG_PUB.initialize;

Line 441: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

437: -- initialize API return status to success
438: x_return_status:= FND_API.G_RET_STS_SUCCESS;
439:
440: -- initialize meesage list
441: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
442: FND_MSG_PUB.initialize;
443: END IF;
444:
445: -- parse the contracts document type to type lookup

Line 461: ,p_init_msg_list => FND_API.G_FALSE

457: /* Mod changes */
458:
459: PO_VENDORS_GRP.get_external_userlist
460: (p_api_version => 1.0 --bug4028805
461: ,p_init_msg_list => FND_API.G_FALSE
462: ,p_document_id => l_document_id
463: ,p_document_type => l_document_type
464: ,p_external_contact_id => p_external_contact_id
465: ,x_return_status => l_return_status

Line 476: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

472: ,x_vendor_id => l_vendor_id);
473:
474:
475:
476: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
477: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
478: END IF;
479:
480: -- populate the out parameter. Contracts need comma delimited list of users.

Line 477: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

473:
474:
475:
476: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
477: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
478: END IF;
479:
480: -- populate the out parameter. Contracts need comma delimited list of users.
481: x_external_userlist := l_external_userlist;

Line 484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

480: -- populate the out parameter. Contracts need comma delimited list of users.
481: x_external_userlist := l_external_userlist;
482:
483: EXCEPTION
484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
486: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
487: ,p_data => x_msg_data);
488: WHEN OTHERS THEN

Line 485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

481: x_external_userlist := l_external_userlist;
482:
483: EXCEPTION
484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
486: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
487: ,p_data => x_msg_data);
488: WHEN OTHERS THEN
489: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 489: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
486: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
487: ,p_data => x_msg_data);
488: WHEN OTHERS THEN
489: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
490: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
491: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
492: IF (g_fnd_debug='Y') THEN
493: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 533: -- FND_API.G_RET_STS_ERROR - for expected error

529: -- Message count
530: --x_msg_data
531: -- message data
532: --x_return_status
533: -- FND_API.G_RET_STS_ERROR - for expected error
534: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
535: -- FND_API.G_RET_STS_SUCCESS - for success
536: --x_category_tbl
537: -- PL/SQL table of concatenated category names for lines used in the PO

Line 534: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

530: --x_msg_data
531: -- message data
532: --x_return_status
533: -- FND_API.G_RET_STS_ERROR - for expected error
534: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
535: -- FND_API.G_RET_STS_SUCCESS - for success
536: --x_category_tbl
537: -- PL/SQL table of concatenated category names for lines used in the PO
538: --x_item_tbl

Line 535: -- FND_API.G_RET_STS_SUCCESS - for success

531: -- message data
532: --x_return_status
533: -- FND_API.G_RET_STS_ERROR - for expected error
534: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
535: -- FND_API.G_RET_STS_SUCCESS - for success
536: --x_category_tbl
537: -- PL/SQL table of concatenated category names for lines used in the PO
538: --x_item_tbl
539: -- PL/SQL table of concatenated items for the lines used in the PO

Line 549: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

545: -------------------------------------------------------------------------------
546:
547: PROCEDURE get_item_categorylist
548: (p_api_version IN NUMBER
549: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
550: ,p_doc_type IN VARCHAR2 := NULL -- CLM Mod project
551: ,p_document_id IN NUMBER
552: ,x_return_status OUT NOCOPY VARCHAR2
553: ,x_msg_count OUT NOCOPY NUMBER

Line 574: IF NOT (FND_API.compatible_api_call(l_api_version

570: l_category_tbl category_table_type;
571: l_item_tbl item_table_type;
572:
573: BEGIN
574: IF NOT (FND_API.compatible_api_call(l_api_version
575: ,p_api_version
576: ,l_api_name
577: ,g_pkg_name)) THEN
578: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 578: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

574: IF NOT (FND_API.compatible_api_call(l_api_version
575: ,p_api_version
576: ,l_api_name
577: ,g_pkg_name)) THEN
578: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
579: END IF;
580:
581: -- initialize API return status to success
582: x_return_status:= FND_API.G_RET_STS_SUCCESS;

Line 582: x_return_status:= FND_API.G_RET_STS_SUCCESS;

578: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
579: END IF;
580:
581: -- initialize API return status to success
582: x_return_status:= FND_API.G_RET_STS_SUCCESS;
583:
584: -- initialize meesage list
585: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
586: FND_MSG_PUB.initialize;

Line 585: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

581: -- initialize API return status to success
582: x_return_status:= FND_API.G_RET_STS_SUCCESS;
583:
584: -- initialize meesage list
585: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
586: FND_MSG_PUB.initialize;
587: END IF;
588:
589: /* Mod changes */

Line 666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

662: end loop;
663: END IF;
664:
665: EXCEPTION
666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
668: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
669: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
670: IF (g_fnd_debug='Y') THEN

Line 667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

663: END IF;
664:
665: EXCEPTION
666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
667: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
668: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
669: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
670: IF (g_fnd_debug='Y') THEN
671: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 729: -- FND_API.G_RET_STS_ERROR - for expected error

725: --x_msg_data
726: -- Standard parameter.message data
727: --x_return_status
728: -- Standard parameter. Status Returned to calling API. Possible values are following
729: -- FND_API.G_RET_STS_ERROR - for expected error
730: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
731: -- FND_API.G_RET_STS_SUCCESS - for success
732: --Notes:
733: -- 07/11/2003 smhanda

Line 730: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

726: -- Standard parameter.message data
727: --x_return_status
728: -- Standard parameter. Status Returned to calling API. Possible values are following
729: -- FND_API.G_RET_STS_ERROR - for expected error
730: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
731: -- FND_API.G_RET_STS_SUCCESS - for success
732: --Notes:
733: -- 07/11/2003 smhanda
734: -- 1. This API has been written specifically for integration with contracts wherein Contracts Changes

Line 731: -- FND_API.G_RET_STS_SUCCESS - for success

727: --x_return_status
728: -- Standard parameter. Status Returned to calling API. Possible values are following
729: -- FND_API.G_RET_STS_ERROR - for expected error
730: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
731: -- FND_API.G_RET_STS_SUCCESS - for success
732: --Notes:
733: -- 07/11/2003 smhanda
734: -- 1. This API has been written specifically for integration with contracts wherein Contracts Changes
735: -- are treated as extension to PO Entry form changes of the PO. Before using it in any other place

Line 756: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

752: --End of Comments
753: -------------------------------------------------------------------------------
754: PROCEDURE IS_po_update_allowed (
755: p_api_version IN NUMBER,
756: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
757: p_doc_type IN VARCHAR2 := NULL, -- CLM Mod
758: p_header_id IN NUMBER,
759: p_callout_string IN VARCHAR2,
760: p_lock_flag IN VARCHAR2 DEFAULT 'N',

Line 795: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,

791: END IF;
792: End if;
793:
794: -- Standard call to check for call compatibility.
795: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,
796: p_caller_version_number =>p_api_version,
797: p_api_name =>l_api_name,
798: p_pkg_name =>G_PKG_NAME)
799:

Line 801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

797: p_api_name =>l_api_name,
798: p_pkg_name =>G_PKG_NAME)
799:
800: THEN
801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
802: END IF;
803:
804: -- Initialize message list if p_init_msg_list is set to TRUE.
805: IF FND_API.to_Boolean(p_init_msg_list ) THEN

Line 805: IF FND_API.to_Boolean(p_init_msg_list ) THEN

801: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
802: END IF;
803:
804: -- Initialize message list if p_init_msg_list is set to TRUE.
805: IF FND_API.to_Boolean(p_init_msg_list ) THEN
806: FND_MSG_PUB.initialize;
807: END IF;
808:
809: -- Initialize API return status to success

Line 810: x_return_status := FND_API.G_RET_STS_SUCCESS;

806: FND_MSG_PUB.initialize;
807: END IF;
808:
809: -- Initialize API return status to success
810: x_return_status := FND_API.G_RET_STS_SUCCESS;
811: X_update_allowed := 'Y';
812:
813: If g_fnd_debug = 'Y' then
814: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

Line 827: x_return_status := FND_API.G_RET_STS_ERROR;

823: Fnd_message.set_name('PO','PO_VALUE_MISSING');
824: Fnd_message.set_token( token => 'VARIABLE'
825: , VALUE => 'p_header_id');
826: FND_MSG_PUB.Add;
827: x_return_status := FND_API.G_RET_STS_ERROR;
828: RAISE FND_API.G_EXC_ERROR;
829: END IF;
830:
831: If p_callout_string is not null then

Line 828: RAISE FND_API.G_EXC_ERROR;

824: Fnd_message.set_token( token => 'VARIABLE'
825: , VALUE => 'p_header_id');
826: FND_MSG_PUB.Add;
827: x_return_status := FND_API.G_RET_STS_ERROR;
828: RAISE FND_API.G_EXC_ERROR;
829: END IF;
830:
831: If p_callout_string is not null then
832: L_start := 1;

Line 851: x_return_status := FND_API.G_RET_STS_ERROR;

847: Fnd_message.set_name('PO','PO_VALUE_MISSING');
848: Fnd_message.set_token( token => 'VARIABLE'
849: , VALUE => 'p_callout_string');
850: FND_MSG_PUB.Add;
851: x_return_status := FND_API.G_RET_STS_ERROR;
852: RAISE FND_API.G_EXC_ERROR;
853:
854: END IF;-- p_callout _string
855: If g_fnd_debug = 'Y' then

Line 852: RAISE FND_API.G_EXC_ERROR;

848: Fnd_message.set_token( token => 'VARIABLE'
849: , VALUE => 'p_callout_string');
850: FND_MSG_PUB.Add;
851: x_return_status := FND_API.G_RET_STS_ERROR;
852: RAISE FND_API.G_EXC_ERROR;
853:
854: END IF;-- p_callout _string
855: If g_fnd_debug = 'Y' then
856: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

Line 882: x_return_status := FND_API.G_RET_STS_ERROR;

878: Fnd_message.set_name('PO','PO_VALUE_MISSING');
879: Fnd_message.set_token( token => 'VARIABLE'
880: , VALUE => 'callout_status');
881: FND_MSG_PUB.Add;
882: x_return_status := FND_API.G_RET_STS_ERROR;
883: RAISE FND_API.G_EXC_ERROR;
884: END IF;
885: IF l_callout_revision is null then
886: Fnd_message.set_name('PO','PO_VALUE_MISSING');

Line 883: RAISE FND_API.G_EXC_ERROR;

879: Fnd_message.set_token( token => 'VARIABLE'
880: , VALUE => 'callout_status');
881: FND_MSG_PUB.Add;
882: x_return_status := FND_API.G_RET_STS_ERROR;
883: RAISE FND_API.G_EXC_ERROR;
884: END IF;
885: IF l_callout_revision is null then
886: Fnd_message.set_name('PO','PO_VALUE_MISSING');
887: Fnd_message.set_token( token => 'VARIABLE'

Line 890: x_return_status := FND_API.G_RET_STS_ERROR;

886: Fnd_message.set_name('PO','PO_VALUE_MISSING');
887: Fnd_message.set_token( token => 'VARIABLE'
888: , VALUE => 'callout_revision');
889: FND_MSG_PUB.Add;
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: RAISE FND_API.G_EXC_ERROR;
892: END IF;
893: /* Mod changes */
894: IF p_doc_type = 'PO_STANDARD_MOD' OR

Line 891: RAISE FND_API.G_EXC_ERROR;

887: Fnd_message.set_token( token => 'VARIABLE'
888: , VALUE => 'callout_revision');
889: FND_MSG_PUB.Add;
890: x_return_status := FND_API.G_RET_STS_ERROR;
891: RAISE FND_API.G_EXC_ERROR;
892: END IF;
893: /* Mod changes */
894: IF p_doc_type = 'PO_STANDARD_MOD' OR
895: p_doc_type = 'PA_BLANKET_MOD' OR --

Line 924: x_return_status := FND_API.G_RET_STS_ERROR;

920: EXCEPTION
921: WHEN NO_DATA_FOUND then
922: Fnd_message.set_name('PO','PO_DOESNOT_EXIST');
923: FND_MSG_PUB.Add;
924: x_return_status := FND_API.G_RET_STS_ERROR;
925: RAISE FND_API.G_EXC_ERROR;
926:
927: END;
928:

Line 925: RAISE FND_API.G_EXC_ERROR;

921: WHEN NO_DATA_FOUND then
922: Fnd_message.set_name('PO','PO_DOESNOT_EXIST');
923: FND_MSG_PUB.Add;
924: x_return_status := FND_API.G_RET_STS_ERROR;
925: RAISE FND_API.G_EXC_ERROR;
926:
927: END;
928:
929: IF g_fnd_debug = 'Y' then

Line 951: x_return_status := FND_API.G_RET_STS_ERROR;

947: Fnd_message.set_name('PO','PO_VALUE_MISSING');
948: Fnd_message.set_token( token => 'VARIABLE'
949: , VALUE => 'emp_id_in_callout_str');
950: FND_MSG_PUB.Add;
951: x_return_status := FND_API.G_RET_STS_ERROR;
952: RAISE FND_API.G_EXC_ERROR;
953: End if;--emp id is null
954: --Check if current user is the current approver for the PO
955: IF g_fnd_debug = 'Y' then

Line 952: RAISE FND_API.G_EXC_ERROR;

948: Fnd_message.set_token( token => 'VARIABLE'
949: , VALUE => 'emp_id_in_callout_str');
950: FND_MSG_PUB.Add;
951: x_return_status := FND_API.G_RET_STS_ERROR;
952: RAISE FND_API.G_EXC_ERROR;
953: End if;--emp id is null
954: --Check if current user is the current approver for the PO
955: IF g_fnd_debug = 'Y' then
956: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

Line 1044: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1040: END IF;
1041: END IF;
1042: ---Return status handling.
1043: --If any errors happen abort API.
1044: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1045: RAISE FND_API.G_EXC_ERROR;
1046: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1048: END IF;

Line 1045: RAISE FND_API.G_EXC_ERROR;

1041: END IF;
1042: ---Return status handling.
1043: --If any errors happen abort API.
1044: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1045: RAISE FND_API.G_EXC_ERROR;
1046: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1048: END IF;
1049: --PO Status check returns N if document is in status "In Process"

Line 1046: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1042: ---Return status handling.
1043: --If any errors happen abort API.
1044: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1045: RAISE FND_API.G_EXC_ERROR;
1046: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1048: END IF;
1049: --PO Status check returns N if document is in status "In Process"
1050: -- But for Terms authoring it is a valid status. So ignore

Line 1047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1043: --If any errors happen abort API.
1044: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1045: RAISE FND_API.G_EXC_ERROR;
1046: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1048: END IF;
1049: --PO Status check returns N if document is in status "In Process"
1050: -- But for Terms authoring it is a valid status. So ignore
1051: -- results by PO Status Check in that case because the other flags

Line 1078: x_return_status := FND_API.G_RET_STS_ERROR;

1074: END IF;
1075: END IF;
1076: EXCEPTION
1077: WHEN l_STATUS_CHANGED then
1078: x_return_status := FND_API.G_RET_STS_ERROR;
1079: x_update_allowed := 'N';
1080: FND_MESSAGE.set_name('PO', 'PO_STATUS_CHANGED');
1081: FND_MSG_PUB.Add;
1082: FND_MSG_PUB.Count_And_Get

Line 1095: x_return_status := FND_API.G_RET_STS_ERROR;

1091: END IF;
1092:
1093:
1094: WHEN l_DONOT_UPDATE then
1095: x_return_status := FND_API.G_RET_STS_ERROR;
1096: x_update_allowed := 'N';
1097: FND_MESSAGE.set_name('PO', 'PO_NO_UPDATE_ALLOWED');
1098: FND_MSG_PUB.Add;
1099: FND_MSG_PUB.Count_And_Get

Line 1110: WHEN FND_API.G_EXC_ERROR then

1106: MESSAGE =>'550:Exception l_donot_update ');
1107: END IF;
1108: END IF;
1109:
1110: WHEN FND_API.G_EXC_ERROR then
1111: x_return_status := FND_API.G_RET_STS_ERROR;
1112: x_update_allowed := 'N';
1113: FND_MSG_PUB.Count_And_Get
1114: (p_count => x_msg_count,

Line 1111: x_return_status := FND_API.G_RET_STS_ERROR;

1107: END IF;
1108: END IF;
1109:
1110: WHEN FND_API.G_EXC_ERROR then
1111: x_return_status := FND_API.G_RET_STS_ERROR;
1112: x_update_allowed := 'N';
1113: FND_MSG_PUB.Count_And_Get
1114: (p_count => x_msg_count,
1115: p_data => x_msg_data );

Line 1131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then

1127: END IF;
1128: END LOOP;
1129:
1130: END IF;
1131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1133: x_update_allowed := 'N';
1134: FND_MSG_PUB.Count_And_Get
1135: (p_count => x_msg_count,

Line 1132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1128: END LOOP;
1129:
1130: END IF;
1131: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1133: x_update_allowed := 'N';
1134: FND_MSG_PUB.Count_And_Get
1135: (p_count => x_msg_count,
1136: p_data => x_msg_data );

Line 1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1150:
1151: END IF;
1152:
1153: WHEN OTHERS THEN
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155: X_update_allowed := 'N';
1156:
1157: IF FND_MSG_PUB.Check_Msg_Level
1158: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 1232: -- FND_API.G_RET_STS_ERROR - for expected error

1228: --x_msg_data
1229: -- Standard parameter.message data
1230: --x_return_status
1231: -- Standard parameter. Status Returned to calling API. Possible values are following
1232: -- FND_API.G_RET_STS_ERROR - for expected error
1233: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
1234: -- FND_API.G_RET_STS_SUCCESS - for success
1235: --Notes:
1236: -- 07/11/2003 smhanda

Line 1233: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

1229: -- Standard parameter.message data
1230: --x_return_status
1231: -- Standard parameter. Status Returned to calling API. Possible values are following
1232: -- FND_API.G_RET_STS_ERROR - for expected error
1233: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
1234: -- FND_API.G_RET_STS_SUCCESS - for success
1235: --Notes:
1236: -- 07/11/2003 smhanda
1237: -- 1. This API has been written specifically for integration with contracts wherein Contracts Changes

Line 1234: -- FND_API.G_RET_STS_SUCCESS - for success

1230: --x_return_status
1231: -- Standard parameter. Status Returned to calling API. Possible values are following
1232: -- FND_API.G_RET_STS_ERROR - for expected error
1233: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
1234: -- FND_API.G_RET_STS_SUCCESS - for success
1235: --Notes:
1236: -- 07/11/2003 smhanda
1237: -- 1. This API has been written specifically for integration with contracts wherein Contracts Changes
1238: -- are treated as extension to PO Entry form changes of the PO. Before using it in any other place

Line 1262: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1258: --End of Comments
1259: -------------------------------------------------------------------------------
1260: PROCEDURE Apply_template_change (
1261: p_api_version IN NUMBER,
1262: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1263: p_doc_type IN VARCHAR2 := NULL, -- CLM Mod
1264: p_header_id IN NUMBER,
1265: p_callout_string IN VARCHAR2,
1266: p_template_changed IN VARCHAR2,

Line 1267: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1263: p_doc_type IN VARCHAR2 := NULL, -- CLM Mod
1264: p_header_id IN NUMBER,
1265: p_callout_string IN VARCHAR2,
1266: p_template_changed IN VARCHAR2,
1267: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1268: x_update_allowed OUT NOCOPY VARCHAR2,
1269: x_return_status OUT NOCOPY VARCHAR2,
1270: x_msg_data OUT NOCOPY VARCHAR2,
1271: x_msg_count OUT NOCOPY NUMBER

Line 1296: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,

1292: End if;
1293: --Savepoint
1294: SAVEPOINT SP_APPLY_TEMPLATE_CHANGE;
1295: -- Standard call to check for call compatibility.
1296: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,
1297: p_caller_version_number =>p_api_version,
1298: p_api_name =>l_api_name,
1299: p_pkg_name =>G_PKG_NAME)
1300: THEN

Line 1301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1297: p_caller_version_number =>p_api_version,
1298: p_api_name =>l_api_name,
1299: p_pkg_name =>G_PKG_NAME)
1300: THEN
1301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1302: END IF;
1303:
1304: -- Initialize message list if p_init_msg_list is set to TRUE.
1305: IF FND_API.to_Boolean(p_init_msg_list ) THEN

Line 1305: IF FND_API.to_Boolean(p_init_msg_list ) THEN

1301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1302: END IF;
1303:
1304: -- Initialize message list if p_init_msg_list is set to TRUE.
1305: IF FND_API.to_Boolean(p_init_msg_list ) THEN
1306: FND_MSG_PUB.initialize;
1307: END IF;
1308:
1309: -- Initialize API return status to success

Line 1310: x_return_status := FND_API.G_RET_STS_SUCCESS;

1306: FND_MSG_PUB.initialize;
1307: END IF;
1308:
1309: -- Initialize API return status to success
1310: x_return_status := FND_API.G_RET_STS_SUCCESS;
1311: x_update_allowed := 'N';
1312:
1313: IF g_fnd_debug = 'Y' then
1314: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

Line 1360: x_return_status := FND_API.G_RET_STS_ERROR;

1356: Fnd_message.set_name('PO','PO_VALUE_MISSING');
1357: Fnd_message.set_token( token => 'VARIABLE'
1358: , VALUE => 'p_callout_string');
1359: FND_MSG_PUB.Add;
1360: x_return_status := FND_API.G_RET_STS_ERROR;
1361: RAISE FND_API.G_EXC_ERROR;
1362:
1363: END IF;-- p_callout _string
1364: IF g_fnd_debug = 'Y' then

Line 1361: RAISE FND_API.G_EXC_ERROR;

1357: Fnd_message.set_token( token => 'VARIABLE'
1358: , VALUE => 'p_callout_string');
1359: FND_MSG_PUB.Add;
1360: x_return_status := FND_API.G_RET_STS_ERROR;
1361: RAISE FND_API.G_EXC_ERROR;
1362:
1363: END IF;-- p_callout _string
1364: IF g_fnd_debug = 'Y' then
1365: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN

Line 1444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1440: MODULE =>g_module_prefix||l_api_name,
1441: MESSAGE =>'200:update allowed after calling is_po_update_allowed'||x_update_allowed);
1442: END IF;
1443: End if;
1444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1445: RAISE FND_API.G_EXC_ERROR;
1446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1448: END IF;

Line 1445: RAISE FND_API.G_EXC_ERROR;

1441: MESSAGE =>'200:update allowed after calling is_po_update_allowed'||x_update_allowed);
1442: END IF;
1443: End if;
1444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1445: RAISE FND_API.G_EXC_ERROR;
1446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1448: END IF;
1449:

Line 1446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1442: END IF;
1443: End if;
1444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1445: RAISE FND_API.G_EXC_ERROR;
1446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1448: END IF;
1449:
1450: -- take action on PO if update is allowed. The Control should reach here

Line 1447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1443: End if;
1444: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1445: RAISE FND_API.G_EXC_ERROR;
1446: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1448: END IF;
1449:
1450: -- take action on PO if update is allowed. The Control should reach here
1451: -- only if x_update_allowed = Y. Otherwise po_update_allowed

Line 1516: x_return_status := FND_API.G_RET_STS_ERROR;

1512: Fnd_message.set_name('PO','PO_VALUE_MISSING');
1513: Fnd_message.set_token( token => 'VARIABLE'
1514: , VALUE => 'p_template_changed');
1515: FND_MSG_PUB.Add;
1516: x_return_status := FND_API.G_RET_STS_ERROR;
1517: RAISE FND_API.G_EXC_ERROR;
1518:
1519: END IF; -- if p_template_changed other than Y or D
1520:

Line 1517: RAISE FND_API.G_EXC_ERROR;

1513: Fnd_message.set_token( token => 'VARIABLE'
1514: , VALUE => 'p_template_changed');
1515: FND_MSG_PUB.Add;
1516: x_return_status := FND_API.G_RET_STS_ERROR;
1517: RAISE FND_API.G_EXC_ERROR;
1518:
1519: END IF; -- if p_template_changed other than Y or D
1520:
1521: -- Commit the transaction if p_commit set true

Line 1522: IF FND_API.TO_BOOLEAN(p_commit) then

1518:
1519: END IF; -- if p_template_changed other than Y or D
1520:
1521: -- Commit the transaction if p_commit set true
1522: IF FND_API.TO_BOOLEAN(p_commit) then
1523: IF g_fnd_debug = 'Y' then
1524: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
1525: FND_LOG.string(LOG_LEVEL=>FND_LOG.LEVEL_STATEMENT,
1526: MODULE =>g_module_prefix||l_api_name,

Line 1541: x_return_status := FND_API.G_RET_STS_ERROR;

1537: END IF;
1538: End if;
1539: EXCEPTION
1540: WHEN l_update_not_allowed then
1541: x_return_status := FND_API.G_RET_STS_ERROR;
1542: X_update_allowed := 'N';
1543: ROLLBACK TO SP_APPLY_TEMPLATE_CHANGE;
1544: FND_MESSAGE.set_name('PO', 'PO_NO_TEMPLATE_CHANGE');
1545: FND_MSG_PUB.Add;

Line 1556: WHEN FND_API.G_EXC_ERROR then

1552: MODULE =>g_module_prefix||l_api_name,
1553: MESSAGE =>'450:Exception l_update_not_allowed ');
1554: END IF;
1555: END IF;
1556: WHEN FND_API.G_EXC_ERROR then
1557: x_return_status := FND_API.G_RET_STS_ERROR;
1558: ROLLBACK TO SP_APPLY_TEMPLATE_CHANGE;
1559: FND_MSG_PUB.Count_And_Get
1560: (p_count => x_msg_count,

Line 1557: x_return_status := FND_API.G_RET_STS_ERROR;

1553: MESSAGE =>'450:Exception l_update_not_allowed ');
1554: END IF;
1555: END IF;
1556: WHEN FND_API.G_EXC_ERROR then
1557: x_return_status := FND_API.G_RET_STS_ERROR;
1558: ROLLBACK TO SP_APPLY_TEMPLATE_CHANGE;
1559: FND_MSG_PUB.Count_And_Get
1560: (p_count => x_msg_count,
1561: p_data => x_msg_data );

Line 1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then

1572: MESSAGE =>'470:errors '||FND_MSG_PUB.Get(p_msg_index=>i,p_encoded =>'F' ));
1573: END IF;
1574: END LOOP;
1575: END IF;
1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1578: ROLLBACK TO SP_APPLY_TEMPLATE_CHANGE;
1579: FND_MSG_PUB.Count_And_Get
1580: (p_count => x_msg_count,

Line 1577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1573: END IF;
1574: END LOOP;
1575: END IF;
1576: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1578: ROLLBACK TO SP_APPLY_TEMPLATE_CHANGE;
1579: FND_MSG_PUB.Count_And_Get
1580: (p_count => x_msg_count,
1581: p_data => x_msg_data );

Line 1599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1595:
1596: END IF;
1597:
1598: WHEN OTHERS THEN
1599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1600: ROLLBACK TO SP_APPLY_TEMPLATE_CHANGE;
1601: IF FND_MSG_PUB.Check_Msg_Level
1602: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1603: THEN

Line 1655: -- FND_API.G_RET_STS_ERROR - for expected error

1651: --x_msg_data
1652: -- Standard parameter.message data
1653: --x_return_status
1654: -- Standard parameter. Status Returned to calling API. Possible values are following
1655: -- FND_API.G_RET_STS_ERROR - for expected error
1656: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
1657: -- FND_API.G_RET_STS_SUCCESS - for success
1658: --Notes:
1659: -- 07/11/2003 smhanda

Line 1656: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

1652: -- Standard parameter.message data
1653: --x_return_status
1654: -- Standard parameter. Status Returned to calling API. Possible values are following
1655: -- FND_API.G_RET_STS_ERROR - for expected error
1656: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
1657: -- FND_API.G_RET_STS_SUCCESS - for success
1658: --Notes:
1659: -- 07/11/2003 smhanda
1660: -- 1. This API has been written specifically for integration with contracts Before using it in any other place

Line 1657: -- FND_API.G_RET_STS_SUCCESS - for success

1653: --x_return_status
1654: -- Standard parameter. Status Returned to calling API. Possible values are following
1655: -- FND_API.G_RET_STS_ERROR - for expected error
1656: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
1657: -- FND_API.G_RET_STS_SUCCESS - for success
1658: --Notes:
1659: -- 07/11/2003 smhanda
1660: -- 1. This API has been written specifically for integration with contracts Before using it in any other place
1661: -- Please diagnose the impact about including security

Line 1669: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

1665: --End of Comments
1666: -------------------------------------------------------------------------------
1667: PROCEDURE attribute_value_changed (
1668: p_api_version IN NUMBER,
1669: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
1670: p_doc_type IN VARCHAR2 := NULL, -- CLM Mod project
1671: p_doc_id IN NUMBER,
1672: p_sys_var_tbl IN OUT NOCOPY VARIABLE_CODE_TBL_TYPE,
1673: x_return_status OUT NOCOPY VARCHAR2,

Line 1699: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,

1695: MESSAGE =>'10: Start API' ||l_api_name);
1696: END IF;
1697: END IF;
1698: -- Standard call to check for call compatibility.
1699: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,
1700: p_caller_version_number =>p_api_version,
1701: p_api_name =>l_api_name,
1702: p_pkg_name =>G_PKG_NAME)
1703: THEN

Line 1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1700: p_caller_version_number =>p_api_version,
1701: p_api_name =>l_api_name,
1702: p_pkg_name =>G_PKG_NAME)
1703: THEN
1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1705: END IF;
1706:
1707: -- Initialize message list if p_init_msg_list is set to TRUE.
1708: IF FND_API.to_Boolean(p_init_msg_list ) THEN

Line 1708: IF FND_API.to_Boolean(p_init_msg_list ) THEN

1704: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1705: END IF;
1706:
1707: -- Initialize message list if p_init_msg_list is set to TRUE.
1708: IF FND_API.to_Boolean(p_init_msg_list ) THEN
1709: FND_MSG_PUB.initialize;
1710: END IF;
1711:
1712: -- Initialize API return status to success

Line 1713: x_return_status := FND_API.G_RET_STS_SUCCESS;

1709: FND_MSG_PUB.initialize;
1710: END IF;
1711:
1712: -- Initialize API return status to success
1713: x_return_status := FND_API.G_RET_STS_SUCCESS;
1714:
1715: -- Basic validations about in parameters
1716: IF p_doc_id is null then
1717: Fnd_message.set_name('PO','PO_VALUE_MISSING');

Line 1721: x_return_status := FND_API.G_RET_STS_ERROR;

1717: Fnd_message.set_name('PO','PO_VALUE_MISSING');
1718: Fnd_message.set_token( token => 'VARIABLE'
1719: , VALUE => 'p_doc_id');
1720: FND_MSG_PUB.Add;
1721: x_return_status := FND_API.G_RET_STS_ERROR;
1722: RAISE FND_API.G_EXC_ERROR;
1723: END IF;
1724:
1725:

Line 1722: RAISE FND_API.G_EXC_ERROR;

1718: Fnd_message.set_token( token => 'VARIABLE'
1719: , VALUE => 'p_doc_id');
1720: FND_MSG_PUB.Add;
1721: x_return_status := FND_API.G_RET_STS_ERROR;
1722: RAISE FND_API.G_EXC_ERROR;
1723: END IF;
1724:
1725:
1726: /* Mod changes */

Line 1985: WHEN FND_API.G_EXC_ERROR then

1981: END IF;
1982: END IF; -- if fnd debug
1983: EXCEPTION
1984:
1985: WHEN FND_API.G_EXC_ERROR then
1986: x_return_status := FND_API.G_RET_STS_ERROR;
1987: FND_MSG_PUB.Count_And_Get
1988: (p_count => x_msg_count,
1989: p_data => x_msg_data );

Line 1986: x_return_status := FND_API.G_RET_STS_ERROR;

1982: END IF; -- if fnd debug
1983: EXCEPTION
1984:
1985: WHEN FND_API.G_EXC_ERROR then
1986: x_return_status := FND_API.G_RET_STS_ERROR;
1987: FND_MSG_PUB.Count_And_Get
1988: (p_count => x_msg_count,
1989: p_data => x_msg_data );
1990: IF g_fnd_debug = 'Y' then

Line 2005: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then

2001: END IF;
2002: END LOOP;
2003:
2004: END IF;
2005: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2006: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2007: FND_MSG_PUB.Count_And_Get
2008: (p_count => x_msg_count,
2009: p_data => x_msg_data );

Line 2006: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2002: END LOOP;
2003:
2004: END IF;
2005: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2006: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2007: FND_MSG_PUB.Count_And_Get
2008: (p_count => x_msg_count,
2009: p_data => x_msg_data );
2010: IF g_fnd_debug = 'Y' then

Line 2027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2023:
2024: END IF;
2025:
2026: WHEN OTHERS THEN
2027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2028: IF FND_MSG_PUB.Check_Msg_Level
2029: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2030: THEN
2031: FND_MSG_PUB.Add_Exc_Msg

Line 2090: -- FND_API.G_RET_STS_ERROR - for expected error

2086: --x_msg_data
2087: -- Standard parameter.message data
2088: --x_return_status
2089: -- Standard parameter. Status Returned to calling API. Possible values are following
2090: -- FND_API.G_RET_STS_ERROR - for expected error
2091: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
2092: -- FND_API.G_RET_STS_SUCCESS - for success
2093: --Notes:
2094: -- 07/11/2003 smhanda

Line 2091: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

2087: -- Standard parameter.message data
2088: --x_return_status
2089: -- Standard parameter. Status Returned to calling API. Possible values are following
2090: -- FND_API.G_RET_STS_ERROR - for expected error
2091: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
2092: -- FND_API.G_RET_STS_SUCCESS - for success
2093: --Notes:
2094: -- 07/11/2003 smhanda
2095: -- 1. This API has been written specifically for integration with contracts Before using it in any other place

Line 2092: -- FND_API.G_RET_STS_SUCCESS - for success

2088: --x_return_status
2089: -- Standard parameter. Status Returned to calling API. Possible values are following
2090: -- FND_API.G_RET_STS_ERROR - for expected error
2091: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
2092: -- FND_API.G_RET_STS_SUCCESS - for success
2093: --Notes:
2094: -- 07/11/2003 smhanda
2095: -- 1. This API has been written specifically for integration with contracts Before using it in any other place
2096: -- Please diagnose the impact about including security

Line 2104: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

2100: --End of Comments
2101: -------------------------------------------------------------------------------
2102: PROCEDURE Get_PO_Attribute_values(
2103: p_api_version IN NUMBER,
2104: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2105: p_doc_type IN VARCHAR2 := NULL, -- CLM Mod project
2106: p_doc_id IN NUMBER,
2107: p_sys_var_value_tbl IN OUT NOCOPY VARIABLE_VALUE_TBL_TYPE,
2108: x_return_status OUT NOCOPY VARCHAR2,

Line 2151: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,

2147: MESSAGE =>'10: Start API' ||l_api_name);
2148: END IF;
2149: END IF;
2150: -- Standard call to check for call compatibility.
2151: IF NOT FND_API.Compatible_API_Call (p_current_version_number=>l_api_version,
2152: p_caller_version_number =>p_api_version,
2153: p_api_name =>l_api_name,
2154: p_pkg_name =>G_PKG_NAME)
2155: THEN

Line 2156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2152: p_caller_version_number =>p_api_version,
2153: p_api_name =>l_api_name,
2154: p_pkg_name =>G_PKG_NAME)
2155: THEN
2156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2157: END IF;
2158:
2159: -- Initialize message list if p_init_msg_list is set to TRUE.
2160: IF FND_API.to_Boolean(p_init_msg_list ) THEN

Line 2160: IF FND_API.to_Boolean(p_init_msg_list ) THEN

2156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2157: END IF;
2158:
2159: -- Initialize message list if p_init_msg_list is set to TRUE.
2160: IF FND_API.to_Boolean(p_init_msg_list ) THEN
2161: FND_MSG_PUB.initialize;
2162: END IF;
2163:
2164: -- Initialize API return status to success

Line 2165: x_return_status := FND_API.G_RET_STS_SUCCESS;

2161: FND_MSG_PUB.initialize;
2162: END IF;
2163:
2164: -- Initialize API return status to success
2165: x_return_status := FND_API.G_RET_STS_SUCCESS;
2166:
2167: -- Basic validations about in parameters
2168: IF p_doc_id is null then
2169: Fnd_message.set_name('PO','PO_VALUE_MISSING');

Line 2173: x_return_status := FND_API.G_RET_STS_ERROR;

2169: Fnd_message.set_name('PO','PO_VALUE_MISSING');
2170: Fnd_message.set_token( token => 'VARIABLE'
2171: , VALUE => 'p_doc_id');
2172: FND_MSG_PUB.Add;
2173: x_return_status := FND_API.G_RET_STS_ERROR;
2174: RAISE FND_API.G_EXC_ERROR;
2175: END IF;
2176:
2177: -- make the return table with attribute names

Line 2174: RAISE FND_API.G_EXC_ERROR;

2170: Fnd_message.set_token( token => 'VARIABLE'
2171: , VALUE => 'p_doc_id');
2172: FND_MSG_PUB.Add;
2173: x_return_status := FND_API.G_RET_STS_ERROR;
2174: RAISE FND_API.G_EXC_ERROR;
2175: END IF;
2176:
2177: -- make the return table with attribute names
2178: l_po_attrib_tbl(1).variable_code:= 'OKC$B_ORGANIZATION';

Line 2814: WHEN FND_API.G_EXC_ERROR then

2810: END IF;
2811: END IF;-- if fnd debug
2812: EXCEPTION
2813:
2814: WHEN FND_API.G_EXC_ERROR then
2815: x_return_status := FND_API.G_RET_STS_ERROR;
2816: FND_MSG_PUB.Count_And_Get
2817: (p_count => x_msg_count,
2818: p_data => x_msg_data );

Line 2815: x_return_status := FND_API.G_RET_STS_ERROR;

2811: END IF;-- if fnd debug
2812: EXCEPTION
2813:
2814: WHEN FND_API.G_EXC_ERROR then
2815: x_return_status := FND_API.G_RET_STS_ERROR;
2816: FND_MSG_PUB.Count_And_Get
2817: (p_count => x_msg_count,
2818: p_data => x_msg_data );
2819: IF g_fnd_debug = 'Y' then

Line 2833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then

2829: MESSAGE =>'610:errors '||FND_MSG_PUB.Get(p_msg_index=>i,p_encoded =>'F' ));
2830: END IF;
2831: END LOOP;
2832: END IF;
2833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2835: FND_MSG_PUB.Count_And_Get
2836: (p_count => x_msg_count,
2837: p_data => x_msg_data );

Line 2834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2830: END IF;
2831: END LOOP;
2832: END IF;
2833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2835: FND_MSG_PUB.Count_And_Get
2836: (p_count => x_msg_count,
2837: p_data => x_msg_data );
2838: IF g_fnd_debug = 'Y' then

Line 2855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2851:
2852: END IF;
2853:
2854: WHEN OTHERS THEN
2855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2856: IF FND_MSG_PUB.Check_Msg_Level
2857: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2858: THEN
2859: FND_MSG_PUB.Add_Exc_Msg

Line 2906: -- FND_API.G_RET_STS_ERROR - for expected error

2902: --x_msg_data
2903: -- Standard parameter.message data
2904: --x_return_status
2905: -- Standard parameter. Status Returned to calling API. Possible values are following
2906: -- FND_API.G_RET_STS_ERROR - for expected error
2907: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
2908: -- FND_API.G_RET_STS_SUCCESS - for success
2909: --x_signed_records
2910: -- Returns 'Y' if there exists a Signed record. Otherwise returns 'N'

Line 2907: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

2903: -- Standard parameter.message data
2904: --x_return_status
2905: -- Standard parameter. Status Returned to calling API. Possible values are following
2906: -- FND_API.G_RET_STS_ERROR - for expected error
2907: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
2908: -- FND_API.G_RET_STS_SUCCESS - for success
2909: --x_signed_records
2910: -- Returns 'Y' if there exists a Signed record. Otherwise returns 'N'
2911: --Notes:

Line 2908: -- FND_API.G_RET_STS_SUCCESS - for success

2904: --x_return_status
2905: -- Standard parameter. Status Returned to calling API. Possible values are following
2906: -- FND_API.G_RET_STS_ERROR - for expected error
2907: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
2908: -- FND_API.G_RET_STS_SUCCESS - for success
2909: --x_signed_records
2910: -- Returns 'Y' if there exists a Signed record. Otherwise returns 'N'
2911: --Notes:
2912: -- 09/23/2003 rbairraj

Line 2922: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

2918: --End of Comments
2919: -------------------------------------------------------------------------------
2920: PROCEDURE Get_Last_Signed_Revision (
2921: p_api_version IN NUMBER,
2922: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2923: p_doc_type IN VARCHAR2 := NULL, -- CLM Mod project
2924: p_header_id IN NUMBER,
2925: p_revision_num IN NUMBER,
2926: x_signed_revision_num OUT NOCOPY NUMBER,

Line 2942: IF NOT (FND_API.compatible_api_call(l_api_version

2938: l_is_mod VARCHAR2(1) := 'N'; -- CLM Mod
2939:
2940: BEGIN
2941:
2942: IF NOT (FND_API.compatible_api_call(l_api_version
2943: ,p_api_version
2944: ,l_api_name
2945: ,g_pkg_name)) THEN
2946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2942: IF NOT (FND_API.compatible_api_call(l_api_version
2943: ,p_api_version
2944: ,l_api_name
2945: ,g_pkg_name)) THEN
2946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2947: END IF;
2948:
2949: -- initialize API return status to success
2950: x_return_status:= FND_API.G_RET_STS_SUCCESS;

Line 2950: x_return_status:= FND_API.G_RET_STS_SUCCESS;

2946: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2947: END IF;
2948:
2949: -- initialize API return status to success
2950: x_return_status:= FND_API.G_RET_STS_SUCCESS;
2951:
2952: -- initialize meesage list
2953: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
2954: FND_MSG_PUB.initialize;

Line 2953: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

2949: -- initialize API return status to success
2950: x_return_status:= FND_API.G_RET_STS_SUCCESS;
2951:
2952: -- initialize meesage list
2953: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
2954: FND_MSG_PUB.initialize;
2955: END IF;
2956:
2957:

Line 2974: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2970: x_signed_revision_num => l_signed_revision_num,
2971: x_signed_records => l_signed_records,
2972: x_return_status => x_return_status);
2973:
2974: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2976: END IF;
2977:
2978: IF l_signed_revision_num is not null THEN

Line 2975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2971: x_signed_records => l_signed_records,
2972: x_return_status => x_return_status);
2973:
2974: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2975: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2976: END IF;
2977:
2978: IF l_signed_revision_num is not null THEN
2979: -- Migrate PO

Line 3011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3007: END IF;
3008: END IF; -- l_is_mod = 'N' THEN -- CLM Mod
3009:
3010: EXCEPTION
3011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3013: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
3014: ,p_data => x_msg_data);
3015: WHEN OTHERS THEN

Line 3012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3008: END IF; -- l_is_mod = 'N' THEN -- CLM Mod
3009:
3010: EXCEPTION
3011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3013: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
3014: ,p_data => x_msg_data);
3015: WHEN OTHERS THEN
3016: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3016: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3013: FND_MSG_PUB.Count_and_Get(p_count => x_msg_count
3014: ,p_data => x_msg_data);
3015: WHEN OTHERS THEN
3016: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3017: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3018: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3019: IF (g_fnd_debug='Y') THEN
3020: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 3056: -- FND_API.G_RET_STS_ERROR - for expected error

3052: -- Message count
3053: --x_msg_data
3054: -- message data
3055: --x_return_status
3056: -- FND_API.G_RET_STS_ERROR - for expected error
3057: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3058: -- FND_API.G_RET_STS_SUCCESS - for success
3059: --Testing:
3060: --

Line 3057: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

3053: --x_msg_data
3054: -- message data
3055: --x_return_status
3056: -- FND_API.G_RET_STS_ERROR - for expected error
3057: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3058: -- FND_API.G_RET_STS_SUCCESS - for success
3059: --Testing:
3060: --
3061: --End of Comments

Line 3058: -- FND_API.G_RET_STS_SUCCESS - for success

3054: -- message data
3055: --x_return_status
3056: -- FND_API.G_RET_STS_ERROR - for expected error
3057: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3058: -- FND_API.G_RET_STS_SUCCESS - for success
3059: --Testing:
3060: --
3061: --End of Comments
3062: ------------------------------------------------------------------------------

Line 3098: x_return_status := FND_API.G_RET_STS_SUCCESS;

3094: END IF;
3095:
3096: l_progress := 20;
3097: -- Initialize API return status to success
3098: x_return_status := FND_API.G_RET_STS_SUCCESS;
3099:
3100: l_progress := 25;
3101: IF g_contracts_enabled = 'N' OR
3102: g_auto_apply_template = 'N' THEN

Line 3190: p_init_msg_list => FND_API.G_TRUE,

3186: END IF;
3187:
3188: OKC_TERMS_UTIL_GRP.GET_DEFAULT_TEMPLATE(
3189: p_api_version => 1.0,
3190: p_init_msg_list => FND_API.G_TRUE,
3191: x_return_status => x_return_status,
3192: x_msg_data => l_msg_data,
3193: x_msg_count => l_msg_count,
3194: p_document_type => l_k_doc_type,

Line 3208: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3204: || l_progress,'Return status from get default template:'||x_return_status );
3205: END IF;
3206: END IF;
3207:
3208: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3210: END IF;
3211:
3212: ELSE

Line 3209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3205: END IF;
3206: END IF;
3207:
3208: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3210: END IF;
3211:
3212: ELSE
3213: l_progress := 60;

Line 3246: p_commit => FND_API.G_FALSE,

3242: p_api_version => 1.0, --bug4028805
3243: x_return_status => x_return_status,
3244: x_msg_data => l_msg_data,
3245: x_msg_count => l_msg_count,
3246: p_commit => FND_API.G_FALSE,
3247: p_template_id => l_template_id,
3248: p_target_doc_type => l_k_doc_type,
3249: p_target_doc_id => p_document_id,
3250: p_document_number => l_doc_number, -- Bug 4096095

Line 3257: p_validate_commit => FND_API.G_TRUE,

3253: p_external_party_site_id => l_vendor_site_id, -- Bug 4096095
3254: p_retain_deliverable => 'N',
3255: p_internal_contact_id => l_agent_id,
3256: p_article_effective_date => sysdate,
3257: p_validate_commit => FND_API.G_TRUE,
3258: p_validation_string => l_status ||','||l_revision||','|| null
3259: );
3260:
3261: IF g_debug_stmt THEN

Line 3269: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

3265: END IF;
3266: END IF;
3267: ELSE
3268: -- Do not apply any terms if the template is null
3269: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3271: END IF;
3272: END IF;
3273:

Line 3270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3266: END IF;
3267: ELSE
3268: -- Do not apply any terms if the template is null
3269: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3271: END IF;
3272: END IF;
3273:
3274: l_progress := 80;

Line 3280: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3276: PO_DEBUG.debug_end(l_log_head);
3277: END IF;
3278:
3279: Exception
3280: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3282: FND_MSG_PUB.Count_and_Get(p_count => l_msg_count
3283: ,p_data => l_msg_data);
3284: WHEN OTHERS THEN

Line 3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3277: END IF;
3278:
3279: Exception
3280: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3282: FND_MSG_PUB.Count_and_Get(p_count => l_msg_count
3283: ,p_data => l_msg_data);
3284: WHEN OTHERS THEN
3285: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3285: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3281: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3282: FND_MSG_PUB.Count_and_Get(p_count => l_msg_count
3283: ,p_data => l_msg_data);
3284: WHEN OTHERS THEN
3285: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3286: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3287: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3288: IF (g_fnd_debug='Y') THEN
3289: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 3329: -- FND_API.G_RET_STS_ERROR - for expected error

3325: -- Message count
3326: --x_msg_data
3327: -- message data
3328: --x_return_status
3329: -- FND_API.G_RET_STS_ERROR - for expected error
3330: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3331: -- FND_API.G_RET_STS_SUCCESS - for success
3332: --Testing:
3333: --

Line 3330: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

3326: --x_msg_data
3327: -- message data
3328: --x_return_status
3329: -- FND_API.G_RET_STS_ERROR - for expected error
3330: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3331: -- FND_API.G_RET_STS_SUCCESS - for success
3332: --Testing:
3333: --
3334: --End of Comments

Line 3331: -- FND_API.G_RET_STS_SUCCESS - for success

3327: -- message data
3328: --x_return_status
3329: -- FND_API.G_RET_STS_ERROR - for expected error
3330: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3331: -- FND_API.G_RET_STS_SUCCESS - for success
3332: --Testing:
3333: --
3334: --End of Comments
3335: ------------------------------------------------------------------------------

Line 3373: x_return_status := FND_API.G_RET_STS_SUCCESS;

3369: END IF;
3370:
3371: l_progress := 20;
3372: -- Initialize API return status to success
3373: x_return_status := FND_API.G_RET_STS_SUCCESS;
3374:
3375: l_progress := 25;
3376: IF g_contracts_enabled = 'N' THEN
3377: l_progress := 30;

Line 3503: p_init_msg_list => FND_API.G_TRUE,

3499:
3500: -- Call the OKC API to porcess mod terms
3501: OKC_TERMS_COPY_GRP.process_mod_terms(
3502: p_api_version => 1.0,
3503: p_init_msg_list => FND_API.G_TRUE,
3504: p_commit => FND_API.G_FALSE,
3505: p_process => p_mode,
3506: p_source_doc_type => l_k_doc_type_source,
3507: p_source_doc_id => l_doc_source,

Line 3504: p_commit => FND_API.G_FALSE,

3500: -- Call the OKC API to porcess mod terms
3501: OKC_TERMS_COPY_GRP.process_mod_terms(
3502: p_api_version => 1.0,
3503: p_init_msg_list => FND_API.G_TRUE,
3504: p_commit => FND_API.G_FALSE,
3505: p_process => p_mode,
3506: p_source_doc_type => l_k_doc_type_source,
3507: p_source_doc_id => l_doc_source,
3508: p_target_doc_type => l_k_doc_type_target,

Line 3516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3512: x_msg_data => l_msg_data,
3513: x_msg_count => l_msg_count);
3514:
3515: EXCEPTION
3516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3518: FND_MSG_PUB.Count_and_Get(p_count => l_msg_count
3519: ,p_data => l_msg_data);
3520: WHEN OTHERS THEN

Line 3517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3513: x_msg_count => l_msg_count);
3514:
3515: EXCEPTION
3516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3518: FND_MSG_PUB.Count_and_Get(p_count => l_msg_count
3519: ,p_data => l_msg_data);
3520: WHEN OTHERS THEN
3521: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3521: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3518: FND_MSG_PUB.Count_and_Get(p_count => l_msg_count
3519: ,p_data => l_msg_data);
3520: WHEN OTHERS THEN
3521: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3522: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3523: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
3524: IF (g_fnd_debug='Y') THEN
3525: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

Line 3563: -- FND_API.G_RET_STS_ERROR - for expected error

3559: -- defaulted template id
3560: --x_template_name
3561: -- defaulted template name
3562: --x_return_status
3563: -- FND_API.G_RET_STS_ERROR - for expected error
3564: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3565: -- FND_API.G_RET_STS_SUCCESS - for success
3566: --Testing:
3567: --

Line 3564: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

3560: --x_template_name
3561: -- defaulted template name
3562: --x_return_status
3563: -- FND_API.G_RET_STS_ERROR - for expected error
3564: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3565: -- FND_API.G_RET_STS_SUCCESS - for success
3566: --Testing:
3567: --
3568: --End of Comments

Line 3565: -- FND_API.G_RET_STS_SUCCESS - for success

3561: -- defaulted template name
3562: --x_return_status
3563: -- FND_API.G_RET_STS_ERROR - for expected error
3564: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3565: -- FND_API.G_RET_STS_SUCCESS - for success
3566: --Testing:
3567: --
3568: --End of Comments
3569: ------------------------------------------------------------------------------

Line 3597: x_return_status := fnd_api.g_ret_sts_success;

3593: END IF;
3594:
3595: l_progress := 20;
3596: -- Initialize API return status to success
3597: x_return_status := fnd_api.g_ret_sts_success;
3598: l_progress := 25;
3599:
3600: IF g_contracts_enabled = 'N' OR g_auto_apply_template = 'N'
3601: THEN

Line 3656: p_init_msg_list => fnd_api.g_true,

3652: END IF;
3653:
3654: okc_terms_util_grp.get_default_template (
3655: p_api_version => 1.0,
3656: p_init_msg_list => fnd_api.g_true,
3657: x_return_status => x_return_status,
3658: x_msg_data => l_msg_data,
3659: x_msg_count => l_msg_count,
3660: p_document_type => l_k_doc_type,

Line 3679: IF x_return_status <> fnd_api.g_ret_sts_success

3675: );
3676: END IF;
3677: END IF;
3678:
3679: IF x_return_status <> fnd_api.g_ret_sts_success
3680: THEN
3681: RAISE fnd_api.g_exc_unexpected_error;
3682: END IF;
3683:

Line 3681: RAISE fnd_api.g_exc_unexpected_error;

3677: END IF;
3678:
3679: IF x_return_status <> fnd_api.g_ret_sts_success
3680: THEN
3681: RAISE fnd_api.g_exc_unexpected_error;
3682: END IF;
3683:
3684: IF x_template_id IS NOT NULL
3685: THEN

Line 3688: p_init_msg_list => fnd_api.g_true,

3684: IF x_template_id IS NOT NULL
3685: THEN
3686: okc_terms_util_grp.get_contract_defaults (
3687: p_api_version => 1.0,
3688: p_init_msg_list => fnd_api.g_true,
3689: x_return_status => x_return_status,
3690: x_msg_data => l_msg_data,
3691: x_msg_count => l_msg_count,
3692: p_template_id => x_template_id,

Line 3700: IF x_return_status <> fnd_api.g_ret_sts_success

3696: x_template_name => x_template_name,
3697: x_template_description => l_template_desc
3698: );
3699:
3700: IF x_return_status <> fnd_api.g_ret_sts_success
3701: THEN
3702: RAISE fnd_api.g_exc_unexpected_error;
3703: END IF;
3704: END IF;

Line 3702: RAISE fnd_api.g_exc_unexpected_error;

3698: );
3699:
3700: IF x_return_status <> fnd_api.g_ret_sts_success
3701: THEN
3702: RAISE fnd_api.g_exc_unexpected_error;
3703: END IF;
3704: END IF;
3705:
3706: l_progress := 60;

Line 3713: WHEN fnd_api.g_exc_unexpected_error

3709: THEN
3710: po_debug.debug_end (l_log_head);
3711: END IF;
3712: EXCEPTION
3713: WHEN fnd_api.g_exc_unexpected_error
3714: THEN
3715: x_return_status := fnd_api.g_ret_sts_unexp_error;
3716: fnd_msg_pub.count_and_get (p_count => l_msg_count,
3717: p_data => l_msg_data);

Line 3715: x_return_status := fnd_api.g_ret_sts_unexp_error;

3711: END IF;
3712: EXCEPTION
3713: WHEN fnd_api.g_exc_unexpected_error
3714: THEN
3715: x_return_status := fnd_api.g_ret_sts_unexp_error;
3716: fnd_msg_pub.count_and_get (p_count => l_msg_count,
3717: p_data => l_msg_data);
3718: WHEN OTHERS
3719: THEN

Line 3720: x_return_status := fnd_api.g_ret_sts_unexp_error;

3716: fnd_msg_pub.count_and_get (p_count => l_msg_count,
3717: p_data => l_msg_data);
3718: WHEN OTHERS
3719: THEN
3720: x_return_status := fnd_api.g_ret_sts_unexp_error;
3721:
3722: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3723: THEN
3724: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);

Line 3765: -- FND_API.G_RET_STS_ERROR - for expected error

3761: -- template name
3762: --x_authoring_party
3763: -- authoring party
3764: --x_return_status
3765: -- FND_API.G_RET_STS_ERROR - for expected error
3766: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3767: -- FND_API.G_RET_STS_SUCCESS - for success
3768: --Testing:
3769: --

Line 3766: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error

3762: --x_authoring_party
3763: -- authoring party
3764: --x_return_status
3765: -- FND_API.G_RET_STS_ERROR - for expected error
3766: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3767: -- FND_API.G_RET_STS_SUCCESS - for success
3768: --Testing:
3769: --
3770: --End of Comments

Line 3767: -- FND_API.G_RET_STS_SUCCESS - for success

3763: -- authoring party
3764: --x_return_status
3765: -- FND_API.G_RET_STS_ERROR - for expected error
3766: -- FND_API.G_RET_STS_UNEXP_ERROR - for unexpected error
3767: -- FND_API.G_RET_STS_SUCCESS - for success
3768: --Testing:
3769: --
3770: --End of Comments
3771: ------------------------------------------------------------------------------

Line 3830: p_init_msg_list => FND_API.G_TRUE,

3826: END IF;
3827:
3828: OKC_TERMS_UTIL_GRP.Get_Contract_Details(
3829: p_api_version => l_api_version,
3830: p_init_msg_list => FND_API.G_TRUE,
3831: x_return_status => x_return_status,
3832: x_msg_data => l_msg_data,
3833: x_msg_count => l_msg_count,
3834: p_document_type => l_k_doc_type,

Line 3855: IF x_return_status <> fnd_api.g_ret_sts_success

3851: );
3852: END IF;
3853: END IF;
3854:
3855: IF x_return_status <> fnd_api.g_ret_sts_success
3856: THEN
3857: RAISE fnd_api.g_exc_unexpected_error;
3858: END IF;
3859:

Line 3857: RAISE fnd_api.g_exc_unexpected_error;

3853: END IF;
3854:
3855: IF x_return_status <> fnd_api.g_ret_sts_success
3856: THEN
3857: RAISE fnd_api.g_exc_unexpected_error;
3858: END IF;
3859:
3860: -- Bug 4691053
3861: -- Override template name and authoring party names to be null in case

Line 3879: WHEN fnd_api.g_exc_unexpected_error

3875: x_authoring_party := NULL;
3876: END IF;
3877:
3878: EXCEPTION
3879: WHEN fnd_api.g_exc_unexpected_error
3880: THEN
3881: x_return_status := fnd_api.g_ret_sts_unexp_error;
3882: fnd_msg_pub.count_and_get (p_count => l_msg_count,
3883: p_data => l_msg_data);

Line 3881: x_return_status := fnd_api.g_ret_sts_unexp_error;

3877:
3878: EXCEPTION
3879: WHEN fnd_api.g_exc_unexpected_error
3880: THEN
3881: x_return_status := fnd_api.g_ret_sts_unexp_error;
3882: fnd_msg_pub.count_and_get (p_count => l_msg_count,
3883: p_data => l_msg_data);
3884: WHEN OTHERS
3885: THEN

Line 3886: x_return_status := fnd_api.g_ret_sts_unexp_error;

3882: fnd_msg_pub.count_and_get (p_count => l_msg_count,
3883: p_data => l_msg_data);
3884: WHEN OTHERS
3885: THEN
3886: x_return_status := fnd_api.g_ret_sts_unexp_error;
3887:
3888: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3889: THEN
3890: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);