eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_REP_CONTRACT_PROCESS_PVT dependencies on FND_API

Line 22: -- Default = FND_API.G_FALSE

18: --Pre-reqs : None.
19: --Parameters :
20: --IN : p_api_version IN NUMBER Required
21: -- : p_init_msg_list IN VARCHAR2 Optional
22: -- Default = FND_API.G_FALSE
23: -- : p_contract_id IN NUMBER Required
24: -- Contract ID of the contract to be submitted for approval
25: -- : p_contract_version IN NUMBER Required
26: -- Contract Version of the contract to be submitted for approval

Line 66: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

62: l_api_version := 1.0;
63: -- Standard Start of API savepoint
64: SAVEPOINT submit_contract_PVT;
65: -- Standard call to check for call compatibility.
66: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
68: END IF;
69: -- Initialize message list if p_init_msg_list is set to TRUE.
70: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

63: -- Standard Start of API savepoint
64: SAVEPOINT submit_contract_PVT;
65: -- Standard call to check for call compatibility.
66: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
68: END IF;
69: -- Initialize message list if p_init_msg_list is set to TRUE.
70: IF FND_API.to_Boolean( p_init_msg_list ) THEN
71: FND_MSG_PUB.initialize;

Line 70: IF FND_API.to_Boolean( p_init_msg_list ) THEN

66: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
68: END IF;
69: -- Initialize message list if p_init_msg_list is set to TRUE.
70: IF FND_API.to_Boolean( p_init_msg_list ) THEN
71: FND_MSG_PUB.initialize;
72: END IF;
73: -- Initialize API return status to success
74: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 74: x_return_status := FND_API.G_RET_STS_SUCCESS;

70: IF FND_API.to_Boolean( p_init_msg_list ) THEN
71: FND_MSG_PUB.initialize;
72: END IF;
73: -- Initialize API return status to success
74: x_return_status := FND_API.G_RET_STS_SUCCESS;
75:
76: SELECT OKC_REP_WF_S.nextval INTO l_wf_sequence FROM dual;
77: -- Get contract number
78: OPEN contract_csr;

Line 90: RAISE FND_API.G_EXC_ERROR;

86: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
87: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
88: p_token1 => G_CONTRACT_ID_TOKEN,
89: p_token1_value => to_char(p_contract_id));
90: RAISE FND_API.G_EXC_ERROR;
91: -- RAISE NO_DATA_FOUND;
92: END IF;
93: CLOSE contract_csr;
94:

Line 102: p_init_msg_list => FND_API.G_FALSE,

98: END IF;
99: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
100: OKC_REP_UTIL_PVT.change_contract_status(
101: p_api_version => 1.0,
102: p_init_msg_list => FND_API.G_FALSE,
103: p_contract_id => p_contract_id,
104: p_contract_version => p_contract_version,
105: p_status_code => G_STATUS_PENDING_APPROVAL,
106: p_user_id => fnd_global.user_id,

Line 132: p_init_msg_list => FND_API.G_FALSE,

128: END IF;
129: -- Add a record in ONC_REP_CON_APPROVALS table.
130: OKC_REP_UTIL_PVT.add_approval_hist_record(
131: p_api_version => 1.0,
132: p_init_msg_list => FND_API.G_FALSE,
133: p_contract_id => p_contract_id,
134: p_contract_version => p_contract_version,
135: p_action_code => G_ACTION_SUBMITTED,
136: p_user_id => fnd_global.user_id,

Line 237: WHEN FND_API.G_EXC_ERROR THEN

233: 'Leaving OKC_REP_WF_PVT.submit_contract');
234: END IF;
235:
236: EXCEPTION
237: WHEN FND_API.G_EXC_ERROR THEN
238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
239: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
240: g_module || l_api_name,
241: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');

Line 241: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');

237: WHEN FND_API.G_EXC_ERROR THEN
238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
239: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
240: g_module || l_api_name,
241: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
242: END IF;
243: --close cursors
244: IF (contract_csr%ISOPEN) THEN
245: CLOSE contract_csr ;

Line 248: x_return_status := FND_API.G_RET_STS_ERROR;

244: IF (contract_csr%ISOPEN) THEN
245: CLOSE contract_csr ;
246: END IF;
247: ROLLBACK TO submit_contract_PVT;
248: x_return_status := FND_API.G_RET_STS_ERROR;
249: FND_MSG_PUB.Count_And_Get(
250: p_count => x_msg_count,
251: p_data => x_msg_data
252: );

Line 254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

250: p_count => x_msg_count,
251: p_data => x_msg_data
252: );
253:
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
256: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
257: g_module || l_api_name,
258: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 258: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
256: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
257: g_module || l_api_name,
258: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
259: END IF;
260: --close cursors
261: IF (contract_csr%ISOPEN) THEN
262: CLOSE contract_csr ;

Line 265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

261: IF (contract_csr%ISOPEN) THEN
262: CLOSE contract_csr ;
263: END IF;
264: ROLLBACK TO submit_contract_PVT;
265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
266: FND_MSG_PUB.Count_And_Get(
267: p_count => x_msg_count,
268: p_data => x_msg_data
269: );

Line 288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

284: p_token1_value => sqlcode,
285: p_token2 => G_SQLERRM_TOKEN,
286: p_token2_value => sqlerrm);
287: ROLLBACK TO submit_contract_PVT;
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
289: FND_MSG_PUB.Count_And_Get(
290: p_count => x_msg_count,
291: p_data => x_msg_data
292: );

Line 305: -- Default = FND_API.G_FALSE

301: --Pre-reqs : None.
302: --Parameters :
303: --IN : p_api_version IN NUMBER Required
304: -- : p_init_msg_list IN VARCHAR2 Optional
305: -- Default = FND_API.G_FALSE
306: -- : p_commit IN VARCHAR2 Optional
307: -- Default = FND_API.G_FALSE
308: -- : p_contract_id IN NUMBER Required
309: -- Contract ID of the contract whose contacts are to be deleted

Line 307: -- Default = FND_API.G_FALSE

303: --IN : p_api_version IN NUMBER Required
304: -- : p_init_msg_list IN VARCHAR2 Optional
305: -- Default = FND_API.G_FALSE
306: -- : p_commit IN VARCHAR2 Optional
307: -- Default = FND_API.G_FALSE
308: -- : p_contract_id IN NUMBER Required
309: -- Contract ID of the contract whose contacts are to be deleted
310: --OUT : x_return_status OUT VARCHAR2(1)
311: -- : x_msg_count OUT NUMBER

Line 340: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

336: l_api_version := 1.0;
337: -- Standard Start of API savepoint
338: SAVEPOINT delete_contacts_PVT;
339: -- Standard call to check for call compatibility.
340: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
342: END IF;
343: -- Initialize message list if p_init_msg_list is set to TRUE.
344: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

337: -- Standard Start of API savepoint
338: SAVEPOINT delete_contacts_PVT;
339: -- Standard call to check for call compatibility.
340: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
342: END IF;
343: -- Initialize message list if p_init_msg_list is set to TRUE.
344: IF FND_API.to_Boolean( p_init_msg_list ) THEN
345: FND_MSG_PUB.initialize;

Line 344: IF FND_API.to_Boolean( p_init_msg_list ) THEN

340: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
341: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
342: END IF;
343: -- Initialize message list if p_init_msg_list is set to TRUE.
344: IF FND_API.to_Boolean( p_init_msg_list ) THEN
345: FND_MSG_PUB.initialize;
346: END IF;
347:
348: -- Initialize API return status to success

Line 349: x_return_status := FND_API.G_RET_STS_SUCCESS;

345: FND_MSG_PUB.initialize;
346: END IF;
347:
348: -- Initialize API return status to success
349: x_return_status := FND_API.G_RET_STS_SUCCESS;
350:
351: -- Delete the records. The records are locked in the delete_contract API.
352: DELETE FROM OKC_REP_PARTY_CONTACTS
353: WHERE CONTRACT_ID = p_CONTRACT_ID;

Line 356: IF FND_API.To_Boolean( p_commit ) THEN

352: DELETE FROM OKC_REP_PARTY_CONTACTS
353: WHERE CONTRACT_ID = p_CONTRACT_ID;
354:
355: -- Standard check of p_commit
356: IF FND_API.To_Boolean( p_commit ) THEN
357: COMMIT WORK;
358: END IF;
359:
360: -- Standard call to get message count and if count is 1, get message info.

Line 370: WHEN FND_API.G_EXC_ERROR THEN

366: END IF;
367:
368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
372: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
373: g_module || l_api_name,
374: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');

Line 374: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');

370: WHEN FND_API.G_EXC_ERROR THEN
371: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
372: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
373: g_module || l_api_name,
374: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
375: END IF;
376: ROLLBACK TO delete_contacts_PVT;
377: x_return_status := FND_API.G_RET_STS_ERROR;
378: FND_MSG_PUB.Count_And_Get(

Line 377: x_return_status := FND_API.G_RET_STS_ERROR;

373: g_module || l_api_name,
374: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
375: END IF;
376: ROLLBACK TO delete_contacts_PVT;
377: x_return_status := FND_API.G_RET_STS_ERROR;
378: FND_MSG_PUB.Count_And_Get(
379: p_count => x_msg_count,
380: p_data => x_msg_data
381: );

Line 383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

379: p_count => x_msg_count,
380: p_data => x_msg_data
381: );
382:
383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
384: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
385: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
386: g_module || l_api_name,
387: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 387: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
384: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
385: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
386: g_module || l_api_name,
387: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
388: END IF;
389: ROLLBACK TO delete_contacts_PVT;
390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
391: FND_MSG_PUB.Count_And_Get(

Line 390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

386: g_module || l_api_name,
387: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
388: END IF;
389: ROLLBACK TO delete_contacts_PVT;
390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
391: FND_MSG_PUB.Count_And_Get(
392: p_count => x_msg_count,
393: p_data => x_msg_data
394: );

Line 409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

405: p_token1_value => sqlcode,
406: p_token2 => G_SQLERRM_TOKEN,
407: p_token2_value => sqlerrm);
408: ROLLBACK TO delete_contacts_PVT;
409: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
410: FND_MSG_PUB.Count_And_Get(
411: p_count => x_msg_count,
412: p_data => x_msg_data
413: );

Line 425: -- Default = FND_API.G_FALSE

421: --Pre-reqs : None.
422: --Parameters :
423: --IN : p_api_version IN NUMBER Required
424: -- : p_init_msg_list IN VARCHAR2 Optional
425: -- Default = FND_API.G_FALSE
426: -- : p_commit IN VARCHAR2 Optional
427: -- Default = FND_API.G_FALSE
428: -- : p_contract_id IN NUMBER Required
429: -- Contract ID of the contract whose parties are to be deleted

Line 427: -- Default = FND_API.G_FALSE

423: --IN : p_api_version IN NUMBER Required
424: -- : p_init_msg_list IN VARCHAR2 Optional
425: -- Default = FND_API.G_FALSE
426: -- : p_commit IN VARCHAR2 Optional
427: -- Default = FND_API.G_FALSE
428: -- : p_contract_id IN NUMBER Required
429: -- Contract ID of the contract whose parties are to be deleted
430: --OUT : x_return_status OUT VARCHAR2(1)
431: -- : x_msg_count OUT NUMBER

Line 459: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

455: l_api_version := 1.0;
456: -- Standard Start of API savepoint
457: SAVEPOINT delete_parties_PVT;
458: -- Standard call to check for call compatibility.
459: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
461: END IF;
462: -- Initialize message list if p_init_msg_list is set to TRUE.
463: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

456: -- Standard Start of API savepoint
457: SAVEPOINT delete_parties_PVT;
458: -- Standard call to check for call compatibility.
459: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
461: END IF;
462: -- Initialize message list if p_init_msg_list is set to TRUE.
463: IF FND_API.to_Boolean( p_init_msg_list ) THEN
464: FND_MSG_PUB.initialize;

Line 463: IF FND_API.to_Boolean( p_init_msg_list ) THEN

459: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
461: END IF;
462: -- Initialize message list if p_init_msg_list is set to TRUE.
463: IF FND_API.to_Boolean( p_init_msg_list ) THEN
464: FND_MSG_PUB.initialize;
465: END IF;
466:
467: -- Initialize API return status to success

Line 468: x_return_status := FND_API.G_RET_STS_SUCCESS;

464: FND_MSG_PUB.initialize;
465: END IF;
466:
467: -- Initialize API return status to success
468: x_return_status := FND_API.G_RET_STS_SUCCESS;
469:
470: -- Delete the records. The records are locked in the delete_contract API.
471: DELETE FROM OKC_REP_CONTRACT_PARTIES
472: WHERE CONTRACT_ID = p_CONTRACT_ID;

Line 475: IF FND_API.To_Boolean( p_commit ) THEN

471: DELETE FROM OKC_REP_CONTRACT_PARTIES
472: WHERE CONTRACT_ID = p_CONTRACT_ID;
473:
474: -- Standard check of p_commit
475: IF FND_API.To_Boolean( p_commit ) THEN
476: COMMIT WORK;
477: END IF;
478:
479: -- Standard call to get message count and if count is 1, get message info.

Line 489: WHEN FND_API.G_EXC_ERROR THEN

485: END IF;
486:
487:
488: EXCEPTION
489: WHEN FND_API.G_EXC_ERROR THEN
490: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
491: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
492: g_module || l_api_name,
493: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');

Line 493: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');

489: WHEN FND_API.G_EXC_ERROR THEN
490: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
491: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
492: g_module || l_api_name,
493: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
494: END IF;
495: ROLLBACK TO delete_parties_PVT;
496: x_return_status := FND_API.G_RET_STS_ERROR;
497: FND_MSG_PUB.Count_And_Get(

Line 496: x_return_status := FND_API.G_RET_STS_ERROR;

492: g_module || l_api_name,
493: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
494: END IF;
495: ROLLBACK TO delete_parties_PVT;
496: x_return_status := FND_API.G_RET_STS_ERROR;
497: FND_MSG_PUB.Count_And_Get(
498: p_count => x_msg_count,
499: p_data => x_msg_data
500: );

Line 502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

498: p_count => x_msg_count,
499: p_data => x_msg_data
500: );
501:
502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
505: g_module || l_api_name,
506: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 506: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
505: g_module || l_api_name,
506: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
507: END IF;
508: ROLLBACK TO delete_parties_PVT;
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
510: FND_MSG_PUB.Count_And_Get(

Line 509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

505: g_module || l_api_name,
506: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
507: END IF;
508: ROLLBACK TO delete_parties_PVT;
509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
510: FND_MSG_PUB.Count_And_Get(
511: p_count => x_msg_count,
512: p_data => x_msg_data
513: );

Line 528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

524: p_token1_value => sqlcode,
525: p_token2 => G_SQLERRM_TOKEN,
526: p_token2_value => sqlerrm);
527: ROLLBACK TO delete_parties_PVT;
528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
529: FND_MSG_PUB.Count_And_Get(
530: p_count => x_msg_count,
531: p_data => x_msg_data
532: );

Line 544: -- Default = FND_API.G_FALSE

540: --Pre-reqs : None.
541: --Parameters :
542: --IN : p_api_version IN NUMBER Required
543: -- : p_init_msg_list IN VARCHAR2 Optional
544: -- Default = FND_API.G_FALSE
545: -- : p_commit IN VARCHAR2 Optional
546: -- Default = FND_API.G_FALSE
547: -- : p_contract_id IN NUMBER Required
548: -- Contract ID of the contract whose risks are to be deleted

Line 546: -- Default = FND_API.G_FALSE

542: --IN : p_api_version IN NUMBER Required
543: -- : p_init_msg_list IN VARCHAR2 Optional
544: -- Default = FND_API.G_FALSE
545: -- : p_commit IN VARCHAR2 Optional
546: -- Default = FND_API.G_FALSE
547: -- : p_contract_id IN NUMBER Required
548: -- Contract ID of the contract whose risks are to be deleted
549: --OUT : x_return_status OUT VARCHAR2(1)
550: -- : x_msg_count OUT NUMBER

Line 586: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

582: l_api_version := 1.0;
583: -- Standard Start of API savepoint
584: SAVEPOINT delete_risks_PVT;
585: -- Standard call to check for call compatibility.
586: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
589: -- Initialize message list if p_init_msg_list is set to TRUE.
590: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

583: -- Standard Start of API savepoint
584: SAVEPOINT delete_risks_PVT;
585: -- Standard call to check for call compatibility.
586: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
589: -- Initialize message list if p_init_msg_list is set to TRUE.
590: IF FND_API.to_Boolean( p_init_msg_list ) THEN
591: FND_MSG_PUB.initialize;

Line 590: IF FND_API.to_Boolean( p_init_msg_list ) THEN

586: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: END IF;
589: -- Initialize message list if p_init_msg_list is set to TRUE.
590: IF FND_API.to_Boolean( p_init_msg_list ) THEN
591: FND_MSG_PUB.initialize;
592: END IF;
593:
594: -- Initialize API return status to success

Line 595: x_return_status := FND_API.G_RET_STS_SUCCESS;

591: FND_MSG_PUB.initialize;
592: END IF;
593:
594: -- Initialize API return status to success
595: x_return_status := FND_API.G_RET_STS_SUCCESS;
596: -- Get contract_type and version of the contract.
597: OPEN contract_csr;
598: FETCH contract_csr INTO contract_rec;
599: IF(contract_csr%NOTFOUND) THEN

Line 609: RAISE FND_API.G_EXC_ERROR;

605: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
606: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
607: p_token1 => G_CONTRACT_ID_TOKEN,
608: p_token1_value => to_char(p_contract_id));
609: RAISE FND_API.G_EXC_ERROR;
610: -- RAISE NO_DATA_FOUND;
611: END IF;
612: -- Delete the records. The records are locked in the delete_contract API.
613: DELETE FROM OKC_CONTRACT_RISKS

Line 620: IF FND_API.To_Boolean( p_commit ) THEN

616: AND BUSINESS_DOCUMENT_VERSION = contract_rec.contract_version_num;
617: -- Close cursor
618: CLOSE contract_csr;
619: -- Standard check of p_commit
620: IF FND_API.To_Boolean( p_commit ) THEN
621: COMMIT WORK;
622: END IF;
623:
624: -- Standard call to get message count and if count is 1, get message info.

Line 634: WHEN FND_API.G_EXC_ERROR THEN

630: END IF;
631:
632:
633: EXCEPTION
634: WHEN FND_API.G_EXC_ERROR THEN
635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
637: g_module || l_api_name,
638: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');

Line 638: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');

634: WHEN FND_API.G_EXC_ERROR THEN
635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
637: g_module || l_api_name,
638: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');
639: END IF;
640: --close cursors
641: IF (contract_csr%ISOPEN) THEN
642: CLOSE contract_csr ;

Line 645: x_return_status := FND_API.G_RET_STS_ERROR;

641: IF (contract_csr%ISOPEN) THEN
642: CLOSE contract_csr ;
643: END IF;
644: ROLLBACK TO delete_risks_PVT;
645: x_return_status := FND_API.G_RET_STS_ERROR;
646: FND_MSG_PUB.Count_And_Get(
647: p_count => x_msg_count,
648: p_data => x_msg_data
649: );

Line 651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

647: p_count => x_msg_count,
648: p_data => x_msg_data
649: );
650:
651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
653: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
654: g_module || l_api_name,
655: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 655: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
653: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
654: g_module || l_api_name,
655: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
656: END IF;
657: --close cursors
658: IF (contract_csr%ISOPEN) THEN
659: CLOSE contract_csr ;

Line 662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

658: IF (contract_csr%ISOPEN) THEN
659: CLOSE contract_csr ;
660: END IF;
661: ROLLBACK TO delete_risks_PVT;
662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
663: FND_MSG_PUB.Count_And_Get(
664: p_count => x_msg_count,
665: p_data => x_msg_data
666: );

Line 685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

681: p_token1_value => sqlcode,
682: p_token2 => G_SQLERRM_TOKEN,
683: p_token2_value => sqlerrm);
684: ROLLBACK TO delete_risks_PVT;
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686: FND_MSG_PUB.Count_And_Get(
687: p_count => x_msg_count,
688: p_data => x_msg_data
689: );

Line 701: -- Default = FND_API.G_FALSE

697: --Pre-reqs : None.
698: --Parameters :
699: --IN : p_api_version IN NUMBER Required
700: -- : p_init_msg_list IN VARCHAR2 Optional
701: -- Default = FND_API.G_FALSE
702: -- : p_commit IN VARCHAR2 Optional
703: -- Default = FND_API.G_FALSE
704: -- : p_contract_id IN NUMBER Required
705: -- Contract ID of the contract whose related contracts are to be deleted

Line 703: -- Default = FND_API.G_FALSE

699: --IN : p_api_version IN NUMBER Required
700: -- : p_init_msg_list IN VARCHAR2 Optional
701: -- Default = FND_API.G_FALSE
702: -- : p_commit IN VARCHAR2 Optional
703: -- Default = FND_API.G_FALSE
704: -- : p_contract_id IN NUMBER Required
705: -- Contract ID of the contract whose related contracts are to be deleted
706: --OUT : x_return_status OUT VARCHAR2(1)
707: -- : x_msg_count OUT NUMBER

Line 735: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

731: l_api_version := 1.0;
732: -- Standard Start of API savepoint
733: SAVEPOINT delete_related_contracts_PVT;
734: -- Standard call to check for call compatibility.
735: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;
738: -- Initialize message list if p_init_msg_list is set to TRUE.
739: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

732: -- Standard Start of API savepoint
733: SAVEPOINT delete_related_contracts_PVT;
734: -- Standard call to check for call compatibility.
735: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;
738: -- Initialize message list if p_init_msg_list is set to TRUE.
739: IF FND_API.to_Boolean( p_init_msg_list ) THEN
740: FND_MSG_PUB.initialize;

Line 739: IF FND_API.to_Boolean( p_init_msg_list ) THEN

735: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: END IF;
738: -- Initialize message list if p_init_msg_list is set to TRUE.
739: IF FND_API.to_Boolean( p_init_msg_list ) THEN
740: FND_MSG_PUB.initialize;
741: END IF;
742:
743: -- Initialize API return status to success

Line 744: x_return_status := FND_API.G_RET_STS_SUCCESS;

740: FND_MSG_PUB.initialize;
741: END IF;
742:
743: -- Initialize API return status to success
744: x_return_status := FND_API.G_RET_STS_SUCCESS;
745:
746: -- Delete the records. The records are locked in the delete_related_contracts API.
747: DELETE FROM OKC_REP_CONTRACT_RELS
748: WHERE CONTRACT_ID = p_CONTRACT_ID;

Line 751: IF FND_API.To_Boolean( p_commit ) THEN

747: DELETE FROM OKC_REP_CONTRACT_RELS
748: WHERE CONTRACT_ID = p_CONTRACT_ID;
749:
750: -- Standard check of p_commit
751: IF FND_API.To_Boolean( p_commit ) THEN
752: COMMIT WORK;
753: END IF;
754:
755: -- Standard call to get message count and if count is 1, get message info.

Line 765: WHEN FND_API.G_EXC_ERROR THEN

761: END IF;
762:
763:
764: EXCEPTION
765: WHEN FND_API.G_EXC_ERROR THEN
766: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
768: g_module || l_api_name,
769: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');

Line 769: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');

765: WHEN FND_API.G_EXC_ERROR THEN
766: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
768: g_module || l_api_name,
769: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
770: END IF;
771: ROLLBACK TO delete_related_contracts_PVT;
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: FND_MSG_PUB.Count_And_Get(

Line 772: x_return_status := FND_API.G_RET_STS_ERROR;

768: g_module || l_api_name,
769: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
770: END IF;
771: ROLLBACK TO delete_related_contracts_PVT;
772: x_return_status := FND_API.G_RET_STS_ERROR;
773: FND_MSG_PUB.Count_And_Get(
774: p_count => x_msg_count,
775: p_data => x_msg_data
776: );

Line 778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

774: p_count => x_msg_count,
775: p_data => x_msg_data
776: );
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
781: g_module || l_api_name,
782: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 782: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
781: g_module || l_api_name,
782: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
783: END IF;
784: ROLLBACK TO delete_related_contracts_PVT;
785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
786: FND_MSG_PUB.Count_And_Get(

Line 785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

781: g_module || l_api_name,
782: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
783: END IF;
784: ROLLBACK TO delete_related_contracts_PVT;
785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
786: FND_MSG_PUB.Count_And_Get(
787: p_count => x_msg_count,
788: p_data => x_msg_data
789: );

Line 804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

800: p_token1_value => sqlcode,
801: p_token2 => G_SQLERRM_TOKEN,
802: p_token2_value => sqlerrm);
803: ROLLBACK TO delete_related_contracts_PVT;
804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
805: FND_MSG_PUB.Count_And_Get(
806: p_count => x_msg_count,
807: p_data => x_msg_data
808: );

Line 819: -- Default = FND_API.G_FALSE

815: --Pre-reqs : None.
816: --Parameters :
817: --IN : p_api_version IN NUMBER Required
818: -- : p_init_msg_list IN VARCHAR2 Optional
819: -- Default = FND_API.G_FALSE
820: -- : p_commit IN VARCHAR2 Optional
821: -- Default = FND_API.G_FALSE
822: -- : p_contract_id IN NUMBER Required
823: -- Contract ID of the contract whose ACL is to be deleted

Line 821: -- Default = FND_API.G_FALSE

817: --IN : p_api_version IN NUMBER Required
818: -- : p_init_msg_list IN VARCHAR2 Optional
819: -- Default = FND_API.G_FALSE
820: -- : p_commit IN VARCHAR2 Optional
821: -- Default = FND_API.G_FALSE
822: -- : p_contract_id IN NUMBER Required
823: -- Contract ID of the contract whose ACL is to be deleted
824: --OUT : x_return_status OUT VARCHAR2(1)
825: -- : x_msg_count OUT NUMBER

Line 872: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

868: l_api_version := 1.0;
869: -- Standard Start of API savepoint
870: SAVEPOINT delete_ACL_PVT;
871: -- Standard call to check for call compatibility.
872: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
874: END IF;
875: -- Initialize message list if p_init_msg_list is set to TRUE.
876: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

869: -- Standard Start of API savepoint
870: SAVEPOINT delete_ACL_PVT;
871: -- Standard call to check for call compatibility.
872: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
874: END IF;
875: -- Initialize message list if p_init_msg_list is set to TRUE.
876: IF FND_API.to_Boolean( p_init_msg_list ) THEN
877: FND_MSG_PUB.initialize;

Line 876: IF FND_API.to_Boolean( p_init_msg_list ) THEN

872: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
873: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
874: END IF;
875: -- Initialize message list if p_init_msg_list is set to TRUE.
876: IF FND_API.to_Boolean( p_init_msg_list ) THEN
877: FND_MSG_PUB.initialize;
878: END IF;
879:
880: -- Initialize API return status to success

Line 881: x_return_status := FND_API.G_RET_STS_SUCCESS;

877: FND_MSG_PUB.initialize;
878: END IF;
879:
880: -- Initialize API return status to success
881: x_return_status := FND_API.G_RET_STS_SUCCESS;
882:
883: FOR acl_rec IN acl_csr LOOP
884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 922: IF FND_API.To_Boolean( p_commit ) THEN

918: END IF;
919: --------------------------------------------------------
920: END LOOP;
921: -- Standard check of p_commit
922: IF FND_API.To_Boolean( p_commit ) THEN
923: COMMIT WORK;
924: END IF;
925:
926: -- Standard call to get message count and if count is 1, get message info.

Line 936: WHEN FND_API.G_EXC_ERROR THEN

932: END IF;
933:
934:
935: EXCEPTION
936: WHEN FND_API.G_EXC_ERROR THEN
937: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
938: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
939: g_module || l_api_name,
940: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');

Line 940: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');

936: WHEN FND_API.G_EXC_ERROR THEN
937: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
938: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
939: g_module || l_api_name,
940: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');
941: END IF;
942: --close cursors
943: IF (acl_csr%ISOPEN) THEN
944: CLOSE acl_csr ;

Line 947: x_return_status := FND_API.G_RET_STS_ERROR;

943: IF (acl_csr%ISOPEN) THEN
944: CLOSE acl_csr ;
945: END IF;
946: ROLLBACK TO delete_ACL_PVT;
947: x_return_status := FND_API.G_RET_STS_ERROR;
948: FND_MSG_PUB.Count_And_Get(
949: p_count => x_msg_count,
950: p_data => x_msg_data
951: );

Line 953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

949: p_count => x_msg_count,
950: p_data => x_msg_data
951: );
952:
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
955: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
956: g_module || l_api_name,
957: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 957: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
955: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
956: g_module || l_api_name,
957: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
958: END IF;
959: IF (acl_csr%ISOPEN) THEN
960: CLOSE acl_csr ;
961: END IF;

Line 963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

959: IF (acl_csr%ISOPEN) THEN
960: CLOSE acl_csr ;
961: END IF;
962: ROLLBACK TO delete_ACL_PVT;
963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
964: FND_MSG_PUB.Count_And_Get(
965: p_count => x_msg_count,
966: p_data => x_msg_data
967: );

Line 985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

981: p_token1_value => sqlcode,
982: p_token2 => G_SQLERRM_TOKEN,
983: p_token2_value => sqlerrm);
984: ROLLBACK TO delete_ACL_PVT;
985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
986: FND_MSG_PUB.Count_And_Get(
987: p_count => x_msg_count,
988: p_data => x_msg_data
989: );

Line 1001: -- Default = FND_API.G_FALSE

997: --Pre-reqs : None.
998: --Parameters :
999: --IN : p_api_version IN NUMBER Required
1000: -- : p_init_msg_list IN VARCHAR2 Optional
1001: -- Default = FND_API.G_FALSE
1002: -- : p_commit IN VARCHAR2 Optional
1003: -- Default = FND_API.G_FALSE
1004: -- : p_contract_id IN NUMBER Required
1005: -- Contract ID of the contract whose status history is to be deleted

Line 1003: -- Default = FND_API.G_FALSE

999: --IN : p_api_version IN NUMBER Required
1000: -- : p_init_msg_list IN VARCHAR2 Optional
1001: -- Default = FND_API.G_FALSE
1002: -- : p_commit IN VARCHAR2 Optional
1003: -- Default = FND_API.G_FALSE
1004: -- : p_contract_id IN NUMBER Required
1005: -- Contract ID of the contract whose status history is to be deleted
1006: -- : p_contract_version IN NUMBER Required
1007: -- Contract version of the contract whose status history is to be deleted

Line 1041: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1037: l_api_version := 1.0;
1038: -- Standard Start of API savepoint
1039: SAVEPOINT delete_status_history_PVT;
1040: -- Standard call to check for call compatibility.
1041: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1043: END IF;
1044: -- Initialize message list if p_init_msg_list is set to TRUE.
1045: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1038: -- Standard Start of API savepoint
1039: SAVEPOINT delete_status_history_PVT;
1040: -- Standard call to check for call compatibility.
1041: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1043: END IF;
1044: -- Initialize message list if p_init_msg_list is set to TRUE.
1045: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1046: FND_MSG_PUB.initialize;

Line 1045: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1041: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1042: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1043: END IF;
1044: -- Initialize message list if p_init_msg_list is set to TRUE.
1045: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1046: FND_MSG_PUB.initialize;
1047: END IF;
1048:
1049: -- Initialize API return status to success

Line 1050: x_return_status := FND_API.G_RET_STS_SUCCESS;

1046: FND_MSG_PUB.initialize;
1047: END IF;
1048:
1049: -- Initialize API return status to success
1050: x_return_status := FND_API.G_RET_STS_SUCCESS;
1051:
1052: -- Delete the records. The records are locked in the delete_contract API.
1053: DELETE FROM OKC_REP_CON_STATUS_HIST
1054: WHERE CONTRACT_ID = p_CONTRACT_ID

Line 1058: IF FND_API.To_Boolean( p_commit ) THEN

1054: WHERE CONTRACT_ID = p_CONTRACT_ID
1055: AND CONTRACT_VERSION_NUM = p_contract_version;
1056:
1057: -- Standard check of p_commit
1058: IF FND_API.To_Boolean( p_commit ) THEN
1059: COMMIT WORK;
1060: END IF;
1061:
1062: -- Standard call to get message count and if count is 1, get message info.

Line 1072: WHEN FND_API.G_EXC_ERROR THEN

1068: END IF;
1069:
1070:
1071: EXCEPTION
1072: WHEN FND_API.G_EXC_ERROR THEN
1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1074: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1075: g_module || l_api_name,
1076: 'Leaving delete_status_history:FND_API.G_EXC_ERROR Exception');

Line 1076: 'Leaving delete_status_history:FND_API.G_EXC_ERROR Exception');

1072: WHEN FND_API.G_EXC_ERROR THEN
1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1074: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1075: g_module || l_api_name,
1076: 'Leaving delete_status_history:FND_API.G_EXC_ERROR Exception');
1077: END IF;
1078: ROLLBACK TO delete_status_history_PVT;
1079: x_return_status := FND_API.G_RET_STS_ERROR;
1080: FND_MSG_PUB.Count_And_Get(

Line 1079: x_return_status := FND_API.G_RET_STS_ERROR;

1075: g_module || l_api_name,
1076: 'Leaving delete_status_history:FND_API.G_EXC_ERROR Exception');
1077: END IF;
1078: ROLLBACK TO delete_status_history_PVT;
1079: x_return_status := FND_API.G_RET_STS_ERROR;
1080: FND_MSG_PUB.Count_And_Get(
1081: p_count => x_msg_count,
1082: p_data => x_msg_data
1083: );

Line 1085: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1081: p_count => x_msg_count,
1082: p_data => x_msg_data
1083: );
1084:
1085: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1086: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1087: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1088: g_module || l_api_name,
1089: 'Leaving delete_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 1089: 'Leaving delete_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1085: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1086: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1087: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1088: g_module || l_api_name,
1089: 'Leaving delete_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1090: END IF;
1091: ROLLBACK TO delete_status_history_PVT;
1092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1093: FND_MSG_PUB.Count_And_Get(

Line 1092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1088: g_module || l_api_name,
1089: 'Leaving delete_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1090: END IF;
1091: ROLLBACK TO delete_status_history_PVT;
1092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1093: FND_MSG_PUB.Count_And_Get(
1094: p_count => x_msg_count,
1095: p_data => x_msg_data
1096: );

Line 1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1107: p_token1_value => sqlcode,
1108: p_token2 => G_SQLERRM_TOKEN,
1109: p_token2_value => sqlerrm);
1110: ROLLBACK TO delete_status_history_PVT;
1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1112: FND_MSG_PUB.Count_And_Get(
1113: p_count => x_msg_count,
1114: p_data => x_msg_data
1115: );

Line 1130: -- Default = FND_API.G_FALSE

1126: --Pre-reqs : None.
1127: --Parameters :
1128: --IN : p_api_version IN NUMBER Required
1129: -- : p_init_msg_list IN VARCHAR2 Optional
1130: -- Default = FND_API.G_FALSE
1131: -- : p_commit IN VARCHAR2 Optional
1132: -- Default = FND_API.G_FALSE
1133: -- : p_contract_id IN NUMBER Required
1134: -- Contract ID of the contract whose approval history is to be deleted

Line 1132: -- Default = FND_API.G_FALSE

1128: --IN : p_api_version IN NUMBER Required
1129: -- : p_init_msg_list IN VARCHAR2 Optional
1130: -- Default = FND_API.G_FALSE
1131: -- : p_commit IN VARCHAR2 Optional
1132: -- Default = FND_API.G_FALSE
1133: -- : p_contract_id IN NUMBER Required
1134: -- Contract ID of the contract whose approval history is to be deleted
1135: -- : p_contract_version IN NUMBER Required
1136: -- Contract version of the contract whose approval history is to be deleted

Line 1170: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1166: l_api_version := 1.0;
1167: -- Standard Start of API savepoint
1168: SAVEPOINT delete_approval_history_PVT;
1169: -- Standard call to check for call compatibility.
1170: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1172: END IF;
1173: -- Initialize message list if p_init_msg_list is set to TRUE.
1174: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1167: -- Standard Start of API savepoint
1168: SAVEPOINT delete_approval_history_PVT;
1169: -- Standard call to check for call compatibility.
1170: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1172: END IF;
1173: -- Initialize message list if p_init_msg_list is set to TRUE.
1174: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1175: FND_MSG_PUB.initialize;

Line 1174: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1170: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1172: END IF;
1173: -- Initialize message list if p_init_msg_list is set to TRUE.
1174: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1175: FND_MSG_PUB.initialize;
1176: END IF;
1177:
1178: -- Initialize API return status to success

Line 1179: x_return_status := FND_API.G_RET_STS_SUCCESS;

1175: FND_MSG_PUB.initialize;
1176: END IF;
1177:
1178: -- Initialize API return status to success
1179: x_return_status := FND_API.G_RET_STS_SUCCESS;
1180:
1181: -- Delete the records. The records are locked in the delete_contract API.
1182: DELETE FROM OKC_REP_CON_APPROVALS
1183: WHERE CONTRACT_ID = p_CONTRACT_ID

Line 1187: IF FND_API.To_Boolean( p_commit ) THEN

1183: WHERE CONTRACT_ID = p_CONTRACT_ID
1184: AND CONTRACT_VERSION_NUM = p_contract_version;
1185:
1186: -- Standard check of p_commit
1187: IF FND_API.To_Boolean( p_commit ) THEN
1188: COMMIT WORK;
1189: END IF;
1190:
1191: -- Standard call to get message count and if count is 1, get message info.

Line 1201: WHEN FND_API.G_EXC_ERROR THEN

1197: END IF;
1198:
1199:
1200: EXCEPTION
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1203: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1204: g_module || l_api_name,
1205: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');

Line 1205: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');

1201: WHEN FND_API.G_EXC_ERROR THEN
1202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1203: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1204: g_module || l_api_name,
1205: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;
1207: ROLLBACK TO delete_approval_history_PVT;
1208: x_return_status :=FND_API.G_RET_STS_ERROR;
1209: FND_MSG_PUB.Count_And_Get(

Line 1208: x_return_status :=FND_API.G_RET_STS_ERROR;

1204: g_module || l_api_name,
1205: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;
1207: ROLLBACK TO delete_approval_history_PVT;
1208: x_return_status :=FND_API.G_RET_STS_ERROR;
1209: FND_MSG_PUB.Count_And_Get(
1210: p_count => x_msg_count,
1211: p_data => x_msg_data
1212: );

Line 1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1210: p_count => x_msg_count,
1211: p_data => x_msg_data
1212: );
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1217: g_module || l_api_name,
1218: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 1218: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1217: g_module || l_api_name,
1218: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;
1220: ROLLBACK TO delete_approval_history_PVT;
1221: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;
1222: FND_MSG_PUB.Count_And_Get(

Line 1221: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;

1217: g_module || l_api_name,
1218: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;
1220: ROLLBACK TO delete_approval_history_PVT;
1221: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;
1222: FND_MSG_PUB.Count_And_Get(
1223: p_count => x_msg_count,
1224: p_data => x_msg_data
1225: );

Line 1240: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;

1236: p_token1_value => sqlcode,
1237: p_token2 => G_SQLERRM_TOKEN,
1238: p_token2_value => sqlerrm);
1239: ROLLBACK TO delete_approval_history_PVT;
1240: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;
1241: FND_MSG_PUB.Count_And_Get(
1242: p_count => x_msg_count,
1243: p_data => x_msg_data
1244: );

Line 1255: -- Default = FND_API.G_FALSE

1251: --Pre-reqs : None.
1252: --Parameters :
1253: --IN : p_api_version IN NUMBER Required
1254: -- : p_init_msg_list IN VARCHAR2 Optional
1255: -- Default = FND_API.G_FALSE
1256: -- : p_commit IN VARCHAR2 Optional
1257: -- Default = FND_API.G_FALSE
1258: -- : p_contract_type IN VARCHAR2 Required
1259: -- Contract Type of the contract whose status history is to be deleted

Line 1257: -- Default = FND_API.G_FALSE

1253: --IN : p_api_version IN NUMBER Required
1254: -- : p_init_msg_list IN VARCHAR2 Optional
1255: -- Default = FND_API.G_FALSE
1256: -- : p_commit IN VARCHAR2 Optional
1257: -- Default = FND_API.G_FALSE
1258: -- : p_contract_type IN VARCHAR2 Required
1259: -- Contract Type of the contract whose status history is to be deleted
1260: -- : p_contract_id IN NUMBER Required
1261: -- Contract ID of the contract whose status history is to be deleted

Line 1293: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1289: l_api_version := 1.0;
1290: -- Standard Start of API savepoint
1291: SAVEPOINT delete_bookmarks_PVT;
1292: -- Standard call to check for call compatibility.
1293: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1294: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1295: END IF;
1296: -- Initialize message list if p_init_msg_list is set to TRUE.
1297: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1294: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1290: -- Standard Start of API savepoint
1291: SAVEPOINT delete_bookmarks_PVT;
1292: -- Standard call to check for call compatibility.
1293: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1294: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1295: END IF;
1296: -- Initialize message list if p_init_msg_list is set to TRUE.
1297: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1298: FND_MSG_PUB.initialize;

Line 1297: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1293: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1294: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1295: END IF;
1296: -- Initialize message list if p_init_msg_list is set to TRUE.
1297: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1298: FND_MSG_PUB.initialize;
1299: END IF;
1300:
1301: -- Initialize API return status to success

Line 1302: x_return_status := FND_API.G_RET_STS_SUCCESS;

1298: FND_MSG_PUB.initialize;
1299: END IF;
1300:
1301: -- Initialize API return status to success
1302: x_return_status := FND_API.G_RET_STS_SUCCESS;
1303:
1304:
1305:
1306: -- Delete the records. The records are locked in the delete_contract API.

Line 1313: IF FND_API.To_Boolean( p_commit ) THEN

1309: AND OBJECT_ID = p_CONTRACT_ID
1310: AND BOOKMARK_TYPE_CODE = G_CONTRACT_BOOKMARK_TYPE;
1311:
1312: -- Standard check of p_commit
1313: IF FND_API.To_Boolean( p_commit ) THEN
1314: COMMIT WORK;
1315: END IF;
1316:
1317: -- Standard call to get message count and if count is 1, get message info.

Line 1327: WHEN FND_API.G_EXC_ERROR THEN

1323: END IF;
1324:
1325:
1326: EXCEPTION
1327: WHEN FND_API.G_EXC_ERROR THEN
1328: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1329: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1330: g_module || l_api_name,
1331: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');

Line 1331: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');

1327: WHEN FND_API.G_EXC_ERROR THEN
1328: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1329: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1330: g_module || l_api_name,
1331: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1332: END IF;
1333: ROLLBACK TO delete_bookmarks_PVT;
1334: x_return_status := FND_API.G_RET_STS_ERROR;
1335: FND_MSG_PUB.Count_And_Get(

Line 1334: x_return_status := FND_API.G_RET_STS_ERROR;

1330: g_module || l_api_name,
1331: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1332: END IF;
1333: ROLLBACK TO delete_bookmarks_PVT;
1334: x_return_status := FND_API.G_RET_STS_ERROR;
1335: FND_MSG_PUB.Count_And_Get(
1336: p_count => x_msg_count,
1337: p_data => x_msg_data
1338: );

Line 1340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1336: p_count => x_msg_count,
1337: p_data => x_msg_data
1338: );
1339:
1340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1341: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1342: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1343: g_module || l_api_name,
1344: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 1344: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1341: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1342: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1343: g_module || l_api_name,
1344: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1345: END IF;
1346: ROLLBACK TO delete_bookmarks_PVT;
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: FND_MSG_PUB.Count_And_Get(

Line 1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1343: g_module || l_api_name,
1344: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1345: END IF;
1346: ROLLBACK TO delete_bookmarks_PVT;
1347: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1348: FND_MSG_PUB.Count_And_Get(
1349: p_count => x_msg_count,
1350: p_data => x_msg_data
1351: );

Line 1366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1362: p_token1_value => sqlcode,
1363: p_token2 => G_SQLERRM_TOKEN,
1364: p_token2_value => sqlerrm);
1365: ROLLBACK TO delete_bookmarks_PVT;
1366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1367: FND_MSG_PUB.Count_And_Get(
1368: p_count => x_msg_count,
1369: p_data => x_msg_data
1370: );

Line 1432: RETURN(FND_API.G_RET_STS_ERROR );

1428: IF (lock_csr%ISOPEN) THEN
1429: CLOSE lock_csr;
1430: END IF;
1431: Okc_Api.Set_Message(G_FND_APP,G_UNABLE_TO_RESERVE_REC);
1432: RETURN(FND_API.G_RET_STS_ERROR );
1433: END;
1434:
1435: IF ( l_row_notfound ) THEN
1436: l_return_status :=FND_API.G_RET_STS_ERROR;

Line 1436: l_return_status :=FND_API.G_RET_STS_ERROR;

1432: RETURN(FND_API.G_RET_STS_ERROR );
1433: END;
1434:
1435: IF ( l_row_notfound ) THEN
1436: l_return_status :=FND_API.G_RET_STS_ERROR;
1437:
1438: OPEN lchk_csr(p_contract_id);
1439: FETCH lchk_csr INTO l_object_version_number;
1440: l_row_notfound := lchk_csr%NOTFOUND;

Line 1453: l_return_status :=FND_API.G_RET_STS_SUCCESS;

1449: ELSE -- it can be the only above condition. It can happen after restore version
1450: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_CHANGED);
1451: END IF;
1452: ELSE
1453: l_return_status :=FND_API.G_RET_STS_SUCCESS;
1454: END IF;
1455:
1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1457: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

Line 1487: RETURN(FND_API.G_RET_STS_UNEXP_ERROR );

1483: p_token1_value => sqlcode,
1484: p_token2 => G_SQLERRM_TOKEN,
1485: p_token2_value => sqlerrm);
1486:
1487: RETURN(FND_API.G_RET_STS_UNEXP_ERROR );
1488: END Lock_Contract_Header;
1489:
1490:
1491: -- Start of comments

Line 1533: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1529: p_contract_id => p_contract_id,
1530: p_object_version_number => p_object_version_number
1531: );
1532: ---------------------------------------------------------
1533: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1535: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1536: RAISE FND_API.G_EXC_ERROR;
1537: END IF;

Line 1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1530: p_object_version_number => p_object_version_number
1531: );
1532: ---------------------------------------------------------
1533: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1535: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1536: RAISE FND_API.G_EXC_ERROR;
1537: END IF;
1538: ----------------------------------------------------------

Line 1535: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1531: );
1532: ---------------------------------------------------------
1533: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1535: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1536: RAISE FND_API.G_EXC_ERROR;
1537: END IF;
1538: ----------------------------------------------------------
1539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1536: RAISE FND_API.G_EXC_ERROR;

1532: ---------------------------------------------------------
1533: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1535: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1536: RAISE FND_API.G_EXC_ERROR;
1537: END IF;
1538: ----------------------------------------------------------
1539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1540: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

Line 1546: WHEN FND_API.G_EXC_ERROR THEN

1542: 'Leaving Lock_Contract_Header');
1543: END IF;
1544:
1545: EXCEPTION
1546: WHEN FND_API.G_EXC_ERROR THEN
1547: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1548: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1549: g_module || l_api_name,
1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');

Line 1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');

1546: WHEN FND_API.G_EXC_ERROR THEN
1547: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1548: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1549: g_module || l_api_name,
1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1552: x_return_status := FND_API.G_RET_STS_ERROR;

1548: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1549: g_module || l_api_name,
1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1556: g_module || l_api_name,

Line 1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1549: g_module || l_api_name,
1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1556: g_module || l_api_name,
1557: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 1557: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1556: g_module || l_api_name,
1557: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1558: END IF;
1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1560:
1561: WHEN OTHERS THEN

Line 1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1556: g_module || l_api_name,
1557: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1558: END IF;
1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1560:
1561: WHEN OTHERS THEN
1562: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

Line 1567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1563: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1564: g_module || l_api_name,
1565: 'Leaving Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1566: END IF;
1567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1568: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1569: p_msg_name => G_UNEXPECTED_ERROR,
1570: p_token1 => G_SQLCODE_TOKEN,
1571: p_token1_value => sqlcode,

Line 1586: -- Default = FND_API.G_FALSE

1582: --Pre-reqs : None.
1583: --Parameters :
1584: --IN : p_api_version IN NUMBER Required
1585: -- : p_init_msg_list IN VARCHAR2 Optional
1586: -- Default = FND_API.G_FALSE
1587: -- : p_commit IN VARCHAR2 Optional
1588: -- Default = FND_API.G_FALSE
1589: -- : p_contract_id IN NUMBER Required
1590: -- Contract ID of the contract to be deleted

Line 1588: -- Default = FND_API.G_FALSE

1584: --IN : p_api_version IN NUMBER Required
1585: -- : p_init_msg_list IN VARCHAR2 Optional
1586: -- Default = FND_API.G_FALSE
1587: -- : p_commit IN VARCHAR2 Optional
1588: -- Default = FND_API.G_FALSE
1589: -- : p_contract_id IN NUMBER Required
1590: -- Contract ID of the contract to be deleted
1591: --OUT : x_return_status OUT VARCHAR2(1)
1592: -- : x_msg_count OUT NUMBER

Line 1639: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1635: l_api_version := 1.0;
1636: -- Standard Start of API savepoint
1637: SAVEPOINT delete_contract_PVT;
1638: -- Standard call to check for call compatibility.
1639: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1641: END IF;
1642: -- Initialize message list if p_init_msg_list is set to TRUE.
1643: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1636: -- Standard Start of API savepoint
1637: SAVEPOINT delete_contract_PVT;
1638: -- Standard call to check for call compatibility.
1639: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1641: END IF;
1642: -- Initialize message list if p_init_msg_list is set to TRUE.
1643: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1644: FND_MSG_PUB.initialize;

Line 1643: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1639: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1641: END IF;
1642: -- Initialize message list if p_init_msg_list is set to TRUE.
1643: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1644: FND_MSG_PUB.initialize;
1645: END IF;
1646:
1647: -- Initialize API return status to success

Line 1648: x_return_status := FND_API.G_RET_STS_SUCCESS;

1644: FND_MSG_PUB.initialize;
1645: END IF;
1646:
1647: -- Initialize API return status to success
1648: x_return_status := FND_API.G_RET_STS_SUCCESS;
1649:
1650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1652: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');

Line 1687: RAISE FND_API.G_EXC_ERROR;

1683: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1684: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
1685: p_token1 => G_CONTRACT_ID_TOKEN,
1686: p_token1_value => to_char(p_contract_id));
1687: RAISE FND_API.G_EXC_ERROR;
1688: -- RAISE NO_DATA_FOUND;
1689: END IF;
1690:
1691:

Line 1699: p_commit => FND_API.G_FALSE,

1695: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts()');
1696: END IF;
1697: delete_contacts(
1698: p_api_version => 1.0,
1699: p_commit => FND_API.G_FALSE,
1700: p_init_msg_list => FND_API.G_FALSE,
1701: p_contract_id => p_contract_id,
1702: x_msg_data => x_msg_data,
1703: x_msg_count => x_msg_count,

Line 1700: p_init_msg_list => FND_API.G_FALSE,

1696: END IF;
1697: delete_contacts(
1698: p_api_version => 1.0,
1699: p_commit => FND_API.G_FALSE,
1700: p_init_msg_list => FND_API.G_FALSE,
1701: p_contract_id => p_contract_id,
1702: x_msg_data => x_msg_data,
1703: x_msg_count => x_msg_count,
1704: x_return_status => x_return_status);

Line 1725: p_init_msg_list => FND_API.G_FALSE,

1721: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_parties()');
1722: END IF;
1723: delete_parties(
1724: p_api_version => 1.0,
1725: p_init_msg_list => FND_API.G_FALSE,
1726: p_commit => FND_API.G_FALSE,
1727: p_contract_id => p_contract_id,
1728: x_msg_data => x_msg_data,
1729: x_msg_count => x_msg_count,

Line 1726: p_commit => FND_API.G_FALSE,

1722: END IF;
1723: delete_parties(
1724: p_api_version => 1.0,
1725: p_init_msg_list => FND_API.G_FALSE,
1726: p_commit => FND_API.G_FALSE,
1727: p_contract_id => p_contract_id,
1728: x_msg_data => x_msg_data,
1729: x_msg_count => x_msg_count,
1730: x_return_status => x_return_status);

Line 1751: p_init_msg_list => FND_API.G_FALSE,

1747: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_risks()');
1748: END IF;
1749: delete_risks(
1750: p_api_version => 1.0,
1751: p_init_msg_list => FND_API.G_FALSE,
1752: p_commit => FND_API.G_FALSE,
1753: p_contract_id => p_contract_id,
1754: x_msg_data => x_msg_data,
1755: x_msg_count => x_msg_count,

Line 1752: p_commit => FND_API.G_FALSE,

1748: END IF;
1749: delete_risks(
1750: p_api_version => 1.0,
1751: p_init_msg_list => FND_API.G_FALSE,
1752: p_commit => FND_API.G_FALSE,
1753: p_contract_id => p_contract_id,
1754: x_msg_data => x_msg_data,
1755: x_msg_count => x_msg_count,
1756: x_return_status => x_return_status);

Line 1777: p_init_msg_list => FND_API.G_FALSE,

1773: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL()');
1774: END IF;
1775: delete_ACL(
1776: p_api_version => 1.0,
1777: p_init_msg_list => FND_API.G_FALSE,
1778: p_commit => FND_API.G_FALSE,
1779: p_contract_id => p_contract_id,
1780: x_msg_data => x_msg_data,
1781: x_msg_count => x_msg_count,

Line 1778: p_commit => FND_API.G_FALSE,

1774: END IF;
1775: delete_ACL(
1776: p_api_version => 1.0,
1777: p_init_msg_list => FND_API.G_FALSE,
1778: p_commit => FND_API.G_FALSE,
1779: p_contract_id => p_contract_id,
1780: x_msg_data => x_msg_data,
1781: x_msg_count => x_msg_count,
1782: x_return_status => x_return_status);

Line 1803: p_init_msg_list => FND_API.G_FALSE,

1799: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts()');
1800: END IF;
1801: delete_related_contracts(
1802: p_api_version => 1.0,
1803: p_init_msg_list => FND_API.G_FALSE,
1804: p_commit => FND_API.G_FALSE,
1805: p_contract_id => p_contract_id,
1806: x_msg_data => x_msg_data,
1807: x_msg_count => x_msg_count,

Line 1804: p_commit => FND_API.G_FALSE,

1800: END IF;
1801: delete_related_contracts(
1802: p_api_version => 1.0,
1803: p_init_msg_list => FND_API.G_FALSE,
1804: p_commit => FND_API.G_FALSE,
1805: p_contract_id => p_contract_id,
1806: x_msg_data => x_msg_data,
1807: x_msg_count => x_msg_count,
1808: x_return_status => x_return_status);

Line 1829: p_init_msg_list => FND_API.G_FALSE,

1825: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history()');
1826: END IF;
1827: delete_status_history(
1828: p_api_version => 1.0,
1829: p_init_msg_list => FND_API.G_FALSE,
1830: p_commit => FND_API.G_FALSE,
1831: p_contract_id => p_contract_id,
1832: p_contract_version => contract_rec.contract_version_num,
1833: x_msg_data => x_msg_data,

Line 1830: p_commit => FND_API.G_FALSE,

1826: END IF;
1827: delete_status_history(
1828: p_api_version => 1.0,
1829: p_init_msg_list => FND_API.G_FALSE,
1830: p_commit => FND_API.G_FALSE,
1831: p_contract_id => p_contract_id,
1832: p_contract_version => contract_rec.contract_version_num,
1833: x_msg_data => x_msg_data,
1834: x_msg_count => x_msg_count,

Line 1856: p_init_msg_list => FND_API.G_FALSE,

1852: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history()');
1853: END IF;
1854: delete_approval_history(
1855: p_api_version => 1.0,
1856: p_init_msg_list => FND_API.G_FALSE,
1857: p_commit => FND_API.G_FALSE,
1858: p_contract_id => p_contract_id,
1859: p_contract_version => contract_rec.contract_version_num,
1860: x_msg_data => x_msg_data,

Line 1857: p_commit => FND_API.G_FALSE,

1853: END IF;
1854: delete_approval_history(
1855: p_api_version => 1.0,
1856: p_init_msg_list => FND_API.G_FALSE,
1857: p_commit => FND_API.G_FALSE,
1858: p_contract_id => p_contract_id,
1859: p_contract_version => contract_rec.contract_version_num,
1860: x_msg_data => x_msg_data,
1861: x_msg_count => x_msg_count,

Line 1883: p_init_msg_list => FND_API.G_FALSE,

1879: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks()');
1880: END IF;
1881: delete_bookmarks(
1882: p_api_version => 1.0,
1883: p_init_msg_list => FND_API.G_FALSE,
1884: p_commit => FND_API.G_FALSE,
1885: p_contract_type => contract_rec.contract_type,
1886: p_contract_id => p_contract_id,
1887: x_msg_data => x_msg_data,

Line 1884: p_commit => FND_API.G_FALSE,

1880: END IF;
1881: delete_bookmarks(
1882: p_api_version => 1.0,
1883: p_init_msg_list => FND_API.G_FALSE,
1884: p_commit => FND_API.G_FALSE,
1885: p_contract_type => contract_rec.contract_type,
1886: p_contract_id => p_contract_id,
1887: x_msg_data => x_msg_data,
1888: x_msg_count => x_msg_count,

Line 2036: p_init_msg_list => FND_API.G_FALSE,

2032:
2033: -- Delete Deliverables
2034: OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables (
2035: p_api_version => 1.0,
2036: p_init_msg_list => FND_API.G_FALSE,
2037: p_bus_doc_id => p_contract_id,
2038: p_bus_doc_type => contract_rec.contract_type,
2039: p_bus_doc_version => G_CURRENT_VERSION,
2040: x_return_status => x_return_status,

Line 2059: p_init_msg_list => FND_API.G_FALSE,

2055: END IF;
2056:
2057: OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables(
2058: p_api_version => 1.0,
2059: p_init_msg_list => FND_API.G_FALSE,
2060: p_bus_doc_id => p_contract_id,
2061: p_bus_doc_type => contract_rec.contract_type,
2062: p_bus_doc_version => contract_rec.contract_version_num,
2063: p_prev_del_active => l_is_activated,

Line 2235: IF FND_API.To_Boolean( p_commit ) THEN

2231: AND contract_version_num = l_prev_version;
2232: END IF; -- (contract_rec.contract_version_num > 1)
2233:
2234: -- Standard check of p_commit
2235: IF FND_API.To_Boolean( p_commit ) THEN
2236: COMMIT WORK;
2237: END IF;
2238:
2239: CLOSE contract_csr;

Line 2250: WHEN FND_API.G_EXC_ERROR THEN

2246: END IF;
2247:
2248:
2249: EXCEPTION
2250: WHEN FND_API.G_EXC_ERROR THEN
2251: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2252: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2253: g_module || l_api_name,
2254: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');

Line 2254: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');

2250: WHEN FND_API.G_EXC_ERROR THEN
2251: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2252: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2253: g_module || l_api_name,
2254: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');
2255: END IF;
2256: --close cursors
2257: IF (contract_csr%ISOPEN) THEN
2258: CLOSE contract_csr ;

Line 2261: x_return_status := FND_API.G_RET_STS_ERROR;

2257: IF (contract_csr%ISOPEN) THEN
2258: CLOSE contract_csr ;
2259: END IF;
2260: ROLLBACK TO delete_contract_PVT;
2261: x_return_status := FND_API.G_RET_STS_ERROR;
2262: FND_MSG_PUB.Count_And_Get(
2263: p_count => x_msg_count,
2264: p_data => x_msg_data
2265: );

Line 2267: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2263: p_count => x_msg_count,
2264: p_data => x_msg_data
2265: );
2266:
2267: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2268: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2269: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2270: g_module || l_api_name,
2271: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 2271: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

2267: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2268: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2269: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2270: g_module || l_api_name,
2271: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2272: END IF;
2273: --close cursors
2274: IF (contract_csr%ISOPEN) THEN
2275: CLOSE contract_csr ;

Line 2278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2274: IF (contract_csr%ISOPEN) THEN
2275: CLOSE contract_csr ;
2276: END IF;
2277: ROLLBACK TO delete_contract_PVT;
2278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2279: FND_MSG_PUB.Count_And_Get(
2280: p_count => x_msg_count,
2281: p_data => x_msg_data
2282: );

Line 2301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2297: --close cursors
2298: IF (contract_csr%ISOPEN) THEN
2299: CLOSE contract_csr ;
2300: END IF;
2301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2302: FND_MSG_PUB.Count_And_Get(
2303: p_count => x_msg_count,
2304: p_data => x_msg_data
2305: );

Line 2317: -- Default = FND_API.G_FALSE

2313: --Pre-reqs : None.
2314: --Parameters :
2315: --IN : p_api_version IN NUMBER Required
2316: -- : p_init_msg_list IN VARCHAR2 Optional
2317: -- Default = FND_API.G_FALSE
2318: -- : p_commit IN VARCHAR2 Optional
2319: -- Default = FND_API.G_FALSE
2320: -- : p_source_contract_id IN NUMBER Required
2321: -- Id of the contract whose contacts are to be copied

Line 2319: -- Default = FND_API.G_FALSE

2315: --IN : p_api_version IN NUMBER Required
2316: -- : p_init_msg_list IN VARCHAR2 Optional
2317: -- Default = FND_API.G_FALSE
2318: -- : p_commit IN VARCHAR2 Optional
2319: -- Default = FND_API.G_FALSE
2320: -- : p_source_contract_id IN NUMBER Required
2321: -- Id of the contract whose contacts are to be copied
2322: -- : p_target_contract_id IN NUMBER Required
2323: -- Id of the contract to which source contacts are to be copied

Line 2367: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2363: l_api_version := 1.0;
2364: -- Standard Start of API savepoint
2365: SAVEPOINT copy_contacts_PVT;
2366: -- Standard call to check for call compatibility.
2367: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2369: END IF;
2370: -- Initialize message list if p_init_msg_list is set to TRUE.
2371: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2364: -- Standard Start of API savepoint
2365: SAVEPOINT copy_contacts_PVT;
2366: -- Standard call to check for call compatibility.
2367: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2369: END IF;
2370: -- Initialize message list if p_init_msg_list is set to TRUE.
2371: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2372: FND_MSG_PUB.initialize;

Line 2371: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2367: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2369: END IF;
2370: -- Initialize message list if p_init_msg_list is set to TRUE.
2371: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2372: FND_MSG_PUB.initialize;
2373: END IF;
2374:
2375: -- Initialize API return status to success

Line 2376: x_return_status := FND_API.G_RET_STS_SUCCESS;

2372: FND_MSG_PUB.initialize;
2373: END IF;
2374:
2375: -- Initialize API return status to success
2376: x_return_status := FND_API.G_RET_STS_SUCCESS;
2377: -- Populate who columns
2378: l_creation_date := Sysdate;
2379: l_created_by := Fnd_Global.User_Id;
2380: l_last_update_date := l_creation_date;

Line 2423: IF FND_API.To_Boolean( p_commit ) THEN

2419: l_last_update_date,
2420: l_last_update_login);
2421: END LOOP;
2422: -- Standard check of p_commit
2423: IF FND_API.To_Boolean( p_commit ) THEN
2424: COMMIT WORK;
2425: END IF;
2426:
2427: -- Standard call to get message count and if count is 1, get message info.

Line 2437: WHEN FND_API.G_EXC_ERROR THEN

2433: END IF;
2434:
2435:
2436: EXCEPTION
2437: WHEN FND_API.G_EXC_ERROR THEN
2438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2440: g_module || l_api_name,
2441: 'Leaving copy_contacts:FND_API.G_EXC_ERROR Exception');

Line 2441: 'Leaving copy_contacts:FND_API.G_EXC_ERROR Exception');

2437: WHEN FND_API.G_EXC_ERROR THEN
2438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2440: g_module || l_api_name,
2441: 'Leaving copy_contacts:FND_API.G_EXC_ERROR Exception');
2442: END IF;
2443: ROLLBACK TO copy_contacts_PVT;
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445: FND_MSG_PUB.Count_And_Get(

Line 2444: x_return_status := FND_API.G_RET_STS_ERROR;

2440: g_module || l_api_name,
2441: 'Leaving copy_contacts:FND_API.G_EXC_ERROR Exception');
2442: END IF;
2443: ROLLBACK TO copy_contacts_PVT;
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445: FND_MSG_PUB.Count_And_Get(
2446: p_count => x_msg_count,
2447: p_data => x_msg_data
2448: );

Line 2450: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2446: p_count => x_msg_count,
2447: p_data => x_msg_data
2448: );
2449:
2450: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2453: g_module || l_api_name,
2454: 'Leaving copy_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 2454: 'Leaving copy_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

2450: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2453: g_module || l_api_name,
2454: 'Leaving copy_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2455: END IF;
2456: ROLLBACK TO copy_contacts_PVT;
2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2458: FND_MSG_PUB.Count_And_Get(

Line 2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2453: g_module || l_api_name,
2454: 'Leaving copy_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2455: END IF;
2456: ROLLBACK TO copy_contacts_PVT;
2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2458: FND_MSG_PUB.Count_And_Get(
2459: p_count => x_msg_count,
2460: p_data => x_msg_data
2461: );

Line 2476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2472: p_token1_value => sqlcode,
2473: p_token2 => G_SQLERRM_TOKEN,
2474: p_token2_value => sqlerrm);
2475: ROLLBACK TO copy_contacts_PVT;
2476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2477: FND_MSG_PUB.Count_And_Get(
2478: p_count => x_msg_count,
2479: p_data => x_msg_data
2480: );

Line 2492: -- Default = FND_API.G_FALSE

2488: --Pre-reqs : None.
2489: --Parameters :
2490: --IN : p_api_version IN NUMBER Required
2491: -- : p_init_msg_list IN VARCHAR2 Optional
2492: -- Default = FND_API.G_FALSE
2493: -- : p_commit IN VARCHAR2 Optional
2494: -- Default = FND_API.G_FALSE
2495: -- : p_source_contract_id IN NUMBER Required
2496: -- Id of the contract whose parties are to be copied

Line 2494: -- Default = FND_API.G_FALSE

2490: --IN : p_api_version IN NUMBER Required
2491: -- : p_init_msg_list IN VARCHAR2 Optional
2492: -- Default = FND_API.G_FALSE
2493: -- : p_commit IN VARCHAR2 Optional
2494: -- Default = FND_API.G_FALSE
2495: -- : p_source_contract_id IN NUMBER Required
2496: -- Id of the contract whose parties are to be copied
2497: -- : p_target_contract_id IN NUMBER Required
2498: -- Id of the contract to which source parties are to be copied

Line 2542: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2538: l_api_version := 1.0;
2539: -- Standard Start of API savepoint
2540: SAVEPOINT copy_parties_PVT;
2541: -- Standard call to check for call compatibility.
2542: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2544: END IF;
2545: -- Initialize message list if p_init_msg_list is set to TRUE.
2546: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2539: -- Standard Start of API savepoint
2540: SAVEPOINT copy_parties_PVT;
2541: -- Standard call to check for call compatibility.
2542: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2544: END IF;
2545: -- Initialize message list if p_init_msg_list is set to TRUE.
2546: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2547: FND_MSG_PUB.initialize;

Line 2546: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2542: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2544: END IF;
2545: -- Initialize message list if p_init_msg_list is set to TRUE.
2546: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2547: FND_MSG_PUB.initialize;
2548: END IF;
2549:
2550: -- Initialize API return status to success

Line 2551: x_return_status := FND_API.G_RET_STS_SUCCESS;

2547: FND_MSG_PUB.initialize;
2548: END IF;
2549:
2550: -- Initialize API return status to success
2551: x_return_status := FND_API.G_RET_STS_SUCCESS;
2552: -- Populate who columns
2553: l_creation_date := Sysdate;
2554: l_created_by := Fnd_Global.User_Id;
2555: l_last_update_date := l_creation_date;

Line 2593: IF FND_API.To_Boolean( p_commit ) THEN

2589: l_last_update_date,
2590: l_last_update_login);
2591: END LOOP;
2592: -- Standard check of p_commit
2593: IF FND_API.To_Boolean( p_commit ) THEN
2594: COMMIT WORK;
2595: END IF;
2596:
2597: -- Standard call to get message count and if count is 1, get message info.

Line 2607: WHEN FND_API.G_EXC_ERROR THEN

2603: END IF;
2604:
2605:
2606: EXCEPTION
2607: WHEN FND_API.G_EXC_ERROR THEN
2608: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2609: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2610: g_module || l_api_name,
2611: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');

Line 2611: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');

2607: WHEN FND_API.G_EXC_ERROR THEN
2608: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2609: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2610: g_module || l_api_name,
2611: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2612: END IF;
2613: ROLLBACK TO copy_parties_PVT;
2614: x_return_status := FND_API.G_RET_STS_ERROR;
2615: FND_MSG_PUB.Count_And_Get(

Line 2614: x_return_status := FND_API.G_RET_STS_ERROR;

2610: g_module || l_api_name,
2611: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2612: END IF;
2613: ROLLBACK TO copy_parties_PVT;
2614: x_return_status := FND_API.G_RET_STS_ERROR;
2615: FND_MSG_PUB.Count_And_Get(
2616: p_count => x_msg_count,
2617: p_data => x_msg_data
2618: );

Line 2620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2616: p_count => x_msg_count,
2617: p_data => x_msg_data
2618: );
2619:
2620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2621: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2622: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2623: g_module || l_api_name,
2624: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 2624: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

2620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2621: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2622: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2623: g_module || l_api_name,
2624: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;
2626: ROLLBACK TO copy_parties_PVT;
2627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2628: FND_MSG_PUB.Count_And_Get(

Line 2627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2623: g_module || l_api_name,
2624: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;
2626: ROLLBACK TO copy_parties_PVT;
2627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2628: FND_MSG_PUB.Count_And_Get(
2629: p_count => x_msg_count,
2630: p_data => x_msg_data
2631: );

Line 2646: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2642: p_token1_value => sqlcode,
2643: p_token2 => G_SQLERRM_TOKEN,
2644: p_token2_value => sqlerrm);
2645: ROLLBACK TO copy_parties_PVT;
2646: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2647: FND_MSG_PUB.Count_And_Get(
2648: p_count => x_msg_count,
2649: p_data => x_msg_data
2650: );

Line 2662: -- Default = FND_API.G_FALSE

2658: --Pre-reqs : None.
2659: --Parameters :
2660: --IN : p_api_version IN NUMBER Required
2661: -- : p_init_msg_list IN VARCHAR2 Optional
2662: -- Default = FND_API.G_FALSE
2663: -- : p_commit IN VARCHAR2 Optional
2664: -- Default = FND_API.G_FALSE
2665: -- : p_source_contract_id IN NUMBER Required
2666: -- Id of the contract whose risks are to be copied

Line 2664: -- Default = FND_API.G_FALSE

2660: --IN : p_api_version IN NUMBER Required
2661: -- : p_init_msg_list IN VARCHAR2 Optional
2662: -- Default = FND_API.G_FALSE
2663: -- : p_commit IN VARCHAR2 Optional
2664: -- Default = FND_API.G_FALSE
2665: -- : p_source_contract_id IN NUMBER Required
2666: -- Id of the contract whose risks are to be copied
2667: -- : p_target_contract_id IN NUMBER Required
2668: -- Id of the contract to which source contract risks are to be copied

Line 2723: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2719: l_api_version := 1.0;
2720: -- Standard Start of API savepoint
2721: SAVEPOINT copy_risks_PVT;
2722: -- Standard call to check for call compatibility.
2723: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: END IF;
2726: -- Initialize message list if p_init_msg_list is set to TRUE.
2727: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2720: -- Standard Start of API savepoint
2721: SAVEPOINT copy_risks_PVT;
2722: -- Standard call to check for call compatibility.
2723: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: END IF;
2726: -- Initialize message list if p_init_msg_list is set to TRUE.
2727: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2728: FND_MSG_PUB.initialize;

Line 2727: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2723: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: END IF;
2726: -- Initialize message list if p_init_msg_list is set to TRUE.
2727: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2728: FND_MSG_PUB.initialize;
2729: END IF;
2730:
2731: -- Initialize API return status to success

Line 2732: x_return_status := FND_API.G_RET_STS_SUCCESS;

2728: FND_MSG_PUB.initialize;
2729: END IF;
2730:
2731: -- Initialize API return status to success
2732: x_return_status := FND_API.G_RET_STS_SUCCESS;
2733:
2734: -- Populate who columns
2735: l_creation_date := Sysdate;
2736: l_created_by := Fnd_Global.User_Id;

Line 2755: RAISE FND_API.G_EXC_ERROR;

2751: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
2752: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
2753: p_token1 => G_CONTRACT_ID_TOKEN,
2754: p_token1_value => to_char(p_source_contract_id));
2755: RAISE FND_API.G_EXC_ERROR;
2756: -- RAISE NO_DATA_FOUND;
2757: END IF;
2758:
2759:

Line 2820: IF FND_API.To_Boolean( p_commit ) THEN

2816: l_last_update_date,
2817: l_last_update_login);
2818: END LOOP;
2819: -- Standard check of p_commit
2820: IF FND_API.To_Boolean( p_commit ) THEN
2821: COMMIT WORK;
2822: END IF;
2823:
2824: -- Standard call to get message count and if count is 1, get message info.

Line 2834: WHEN FND_API.G_EXC_ERROR THEN

2830: END IF;
2831:
2832:
2833: EXCEPTION
2834: WHEN FND_API.G_EXC_ERROR THEN
2835: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2837: g_module || l_api_name,
2838: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');

Line 2838: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');

2834: WHEN FND_API.G_EXC_ERROR THEN
2835: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2837: g_module || l_api_name,
2838: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');
2839: END IF;
2840: --close cursors
2841: IF (contract_csr%ISOPEN) THEN
2842: CLOSE contract_csr ;

Line 2845: x_return_status := FND_API.G_RET_STS_ERROR;

2841: IF (contract_csr%ISOPEN) THEN
2842: CLOSE contract_csr ;
2843: END IF;
2844: ROLLBACK TO copy_risks_PVT;
2845: x_return_status := FND_API.G_RET_STS_ERROR;
2846: FND_MSG_PUB.Count_And_Get(
2847: p_count => x_msg_count,
2848: p_data => x_msg_data
2849: );

Line 2851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2847: p_count => x_msg_count,
2848: p_data => x_msg_data
2849: );
2850:
2851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2852: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2853: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2854: g_module || l_api_name,
2855: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 2855: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

2851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2852: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2853: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2854: g_module || l_api_name,
2855: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2856: END IF;
2857: --close cursors
2858: IF (contract_csr%ISOPEN) THEN
2859: CLOSE contract_csr ;

Line 2862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2858: IF (contract_csr%ISOPEN) THEN
2859: CLOSE contract_csr ;
2860: END IF;
2861: ROLLBACK TO copy_risks_PVT;
2862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2863: FND_MSG_PUB.Count_And_Get(
2864: p_count => x_msg_count,
2865: p_data => x_msg_data
2866: );

Line 2885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2881: p_token1_value => sqlcode,
2882: p_token2 => G_SQLERRM_TOKEN,
2883: p_token2_value => sqlerrm);
2884: ROLLBACK TO copy_risks_PVT;
2885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2886: FND_MSG_PUB.Count_And_Get(
2887: p_count => x_msg_count,
2888: p_data => x_msg_data
2889: );

Line 2901: -- Default = FND_API.G_FALSE

2897: --Pre-reqs : None.
2898: --Parameters :
2899: --IN : p_api_version IN NUMBER Required
2900: -- : p_init_msg_list IN VARCHAR2 Optional
2901: -- Default = FND_API.G_FALSE
2902: -- : p_commit IN VARCHAR2 Optional
2903: -- Default = FND_API.G_FALSE
2904: -- : p_source_contract_id IN NUMBER Required
2905: -- Id of the contract whose ACLs are to be copied

Line 2903: -- Default = FND_API.G_FALSE

2899: --IN : p_api_version IN NUMBER Required
2900: -- : p_init_msg_list IN VARCHAR2 Optional
2901: -- Default = FND_API.G_FALSE
2902: -- : p_commit IN VARCHAR2 Optional
2903: -- Default = FND_API.G_FALSE
2904: -- : p_source_contract_id IN NUMBER Required
2905: -- Id of the contract whose ACLs are to be copied
2906: -- : p_target_contract_id IN NUMBER Required
2907: -- Id of the contract to which source contract ACL are to be copied

Line 2963: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2959: l_api_version := 1.0;
2960: -- Standard Start of API savepoint
2961: SAVEPOINT copy_ACL_PVT;
2962: -- Standard call to check for call compatibility.
2963: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2965: END IF;
2966: -- Initialize message list if p_init_msg_list is set to TRUE.
2967: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2960: -- Standard Start of API savepoint
2961: SAVEPOINT copy_ACL_PVT;
2962: -- Standard call to check for call compatibility.
2963: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2965: END IF;
2966: -- Initialize message list if p_init_msg_list is set to TRUE.
2967: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2968: FND_MSG_PUB.initialize;

Line 2967: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2963: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2964: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2965: END IF;
2966: -- Initialize message list if p_init_msg_list is set to TRUE.
2967: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2968: FND_MSG_PUB.initialize;
2969: END IF;
2970:
2971: -- Initialize API return status to success

Line 2972: x_return_status := FND_API.G_RET_STS_SUCCESS;

2968: FND_MSG_PUB.initialize;
2969: END IF;
2970:
2971: -- Initialize API return status to success
2972: x_return_status := FND_API.G_RET_STS_SUCCESS;
2973:
2974: FOR acl_rec IN acl_csr LOOP
2975: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2976: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 3020: IF FND_API.To_Boolean( p_commit ) THEN

3016: END IF;
3017: --------------------------------------------------------
3018: END LOOP;
3019: -- Standard check of p_commit
3020: IF FND_API.To_Boolean( p_commit ) THEN
3021: COMMIT WORK;
3022: END IF;
3023:
3024: -- Standard call to get message count and if count is 1, get message info.

Line 3034: WHEN FND_API.G_EXC_ERROR THEN

3030: END IF;
3031:
3032:
3033: EXCEPTION
3034: WHEN FND_API.G_EXC_ERROR THEN
3035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3036: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3037: g_module || l_api_name,
3038: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');

Line 3038: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');

3034: WHEN FND_API.G_EXC_ERROR THEN
3035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3036: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3037: g_module || l_api_name,
3038: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3039: END IF;
3040: ROLLBACK TO copy_ACL_PVT;
3041: x_return_status := FND_API.G_RET_STS_ERROR;
3042: FND_MSG_PUB.Count_And_Get(

Line 3041: x_return_status := FND_API.G_RET_STS_ERROR;

3037: g_module || l_api_name,
3038: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3039: END IF;
3040: ROLLBACK TO copy_ACL_PVT;
3041: x_return_status := FND_API.G_RET_STS_ERROR;
3042: FND_MSG_PUB.Count_And_Get(
3043: p_count => x_msg_count,
3044: p_data => x_msg_data
3045: );

Line 3047: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3043: p_count => x_msg_count,
3044: p_data => x_msg_data
3045: );
3046:
3047: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3048: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3050: g_module || l_api_name,
3051: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 3051: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

3047: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3048: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3050: g_module || l_api_name,
3051: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3052: END IF;
3053: ROLLBACK TO copy_ACL_PVT;
3054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3055: FND_MSG_PUB.Count_And_Get(

Line 3054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3050: g_module || l_api_name,
3051: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3052: END IF;
3053: ROLLBACK TO copy_ACL_PVT;
3054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3055: FND_MSG_PUB.Count_And_Get(
3056: p_count => x_msg_count,
3057: p_data => x_msg_data
3058: );

Line 3073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3069: p_token1_value => sqlcode,
3070: p_token2 => G_SQLERRM_TOKEN,
3071: p_token2_value => sqlerrm);
3072: ROLLBACK TO copy_ACL_PVT;
3073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3074: FND_MSG_PUB.Count_And_Get(
3075: p_count => x_msg_count,
3076: p_data => x_msg_data
3077: );

Line 3090: -- Default = FND_API.G_FALSE

3086: --Pre-reqs : None.
3087: --Parameters :
3088: --IN : p_api_version IN NUMBER Required
3089: -- : p_init_msg_list IN VARCHAR2 Optional
3090: -- Default = FND_API.G_FALSE
3091: -- : p_commit IN VARCHAR2 Optional
3092: -- Default = FND_API.G_FALSE
3093: -- : p_source_contract_id IN NUMBER Required
3094: -- Id of the contract whose details are to be copied

Line 3092: -- Default = FND_API.G_FALSE

3088: --IN : p_api_version IN NUMBER Required
3089: -- : p_init_msg_list IN VARCHAR2 Optional
3090: -- Default = FND_API.G_FALSE
3091: -- : p_commit IN VARCHAR2 Optional
3092: -- Default = FND_API.G_FALSE
3093: -- : p_source_contract_id IN NUMBER Required
3094: -- Id of the contract whose details are to be copied
3095: -- : p_target_contract_id IN NUMBER Required
3096: -- Id of the contract to which source contract details are to be copied

Line 3161: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

3157: l_api_version := 1.0;
3158: -- Standard Start of API savepoint
3159: SAVEPOINT copy_contract_details_PVT;
3160: -- Standard call to check for call compatibility.
3161: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3163: END IF;
3164: -- Initialize message list if p_init_msg_list is set to TRUE.
3165: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3158: -- Standard Start of API savepoint
3159: SAVEPOINT copy_contract_details_PVT;
3160: -- Standard call to check for call compatibility.
3161: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3163: END IF;
3164: -- Initialize message list if p_init_msg_list is set to TRUE.
3165: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3166: FND_MSG_PUB.initialize;

Line 3165: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3161: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3163: END IF;
3164: -- Initialize message list if p_init_msg_list is set to TRUE.
3165: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3166: FND_MSG_PUB.initialize;
3167: END IF;
3168:
3169: -- Initialize API return status to success

Line 3170: x_return_status := FND_API.G_RET_STS_SUCCESS;

3166: FND_MSG_PUB.initialize;
3167: END IF;
3168:
3169: -- Initialize API return status to success
3170: x_return_status := FND_API.G_RET_STS_SUCCESS;
3171:
3172: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3173: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3174: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');

Line 3178: p_init_msg_list => FND_API.G_FALSE,

3174: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');
3175: END IF;
3176: copy_parties(
3177: p_api_version => 1.0,
3178: p_init_msg_list => FND_API.G_FALSE,
3179: p_commit => FND_API.G_FALSE,
3180: p_source_contract_id => p_source_contract_id,
3181: p_target_contract_id => p_target_contract_id,
3182: x_msg_data => x_msg_data,

Line 3179: p_commit => FND_API.G_FALSE,

3175: END IF;
3176: copy_parties(
3177: p_api_version => 1.0,
3178: p_init_msg_list => FND_API.G_FALSE,
3179: p_commit => FND_API.G_FALSE,
3180: p_source_contract_id => p_source_contract_id,
3181: p_target_contract_id => p_target_contract_id,
3182: x_msg_data => x_msg_data,
3183: x_msg_count => x_msg_count,

Line 3205: p_init_msg_list => FND_API.G_FALSE,

3201: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts()');
3202: END IF;
3203: copy_contacts(
3204: p_api_version => 1.0,
3205: p_init_msg_list => FND_API.G_FALSE,
3206: p_commit => FND_API.G_FALSE,
3207: p_source_contract_id => p_source_contract_id,
3208: p_target_contract_id => p_target_contract_id,
3209: x_msg_data => x_msg_data,

Line 3206: p_commit => FND_API.G_FALSE,

3202: END IF;
3203: copy_contacts(
3204: p_api_version => 1.0,
3205: p_init_msg_list => FND_API.G_FALSE,
3206: p_commit => FND_API.G_FALSE,
3207: p_source_contract_id => p_source_contract_id,
3208: p_target_contract_id => p_target_contract_id,
3209: x_msg_data => x_msg_data,
3210: x_msg_count => x_msg_count,

Line 3231: p_init_msg_list => FND_API.G_FALSE,

3227: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_risks()');
3228: END IF;
3229: copy_risks(
3230: p_api_version => 1.0,
3231: p_init_msg_list => FND_API.G_FALSE,
3232: p_commit => FND_API.G_FALSE,
3233: p_source_contract_id => p_source_contract_id,
3234: p_target_contract_id => p_target_contract_id,
3235: x_msg_data => x_msg_data,

Line 3232: p_commit => FND_API.G_FALSE,

3228: END IF;
3229: copy_risks(
3230: p_api_version => 1.0,
3231: p_init_msg_list => FND_API.G_FALSE,
3232: p_commit => FND_API.G_FALSE,
3233: p_source_contract_id => p_source_contract_id,
3234: p_target_contract_id => p_target_contract_id,
3235: x_msg_data => x_msg_data,
3236: x_msg_count => x_msg_count,

Line 3257: p_init_msg_list => FND_API.G_FALSE,

3253: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL()');
3254: END IF;
3255: copy_ACL(
3256: p_api_version => 1.0,
3257: p_init_msg_list => FND_API.G_FALSE,
3258: p_commit => FND_API.G_FALSE,
3259: p_source_contract_id => p_source_contract_id,
3260: p_target_contract_id => p_target_contract_id,
3261: x_msg_data => x_msg_data,

Line 3258: p_commit => FND_API.G_FALSE,

3254: END IF;
3255: copy_ACL(
3256: p_api_version => 1.0,
3257: p_init_msg_list => FND_API.G_FALSE,
3258: p_commit => FND_API.G_FALSE,
3259: p_source_contract_id => p_source_contract_id,
3260: p_target_contract_id => p_target_contract_id,
3261: x_msg_data => x_msg_data,
3262: x_msg_count => x_msg_count,

Line 3289: RAISE FND_API.G_EXC_ERROR;

3285: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
3286: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
3287: p_token1 => G_CONTRACT_ID_TOKEN,
3288: p_token1_value => to_char(p_source_contract_id));
3289: RAISE FND_API.G_EXC_ERROR;
3290: END IF;
3291:
3292: -- Get internal party_id. Needed for deliverables api
3293: OPEN party_csr;

Line 3301: RAISE FND_API.G_EXC_ERROR;

3297: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3298: G_MODULE||l_api_name,
3299: 'No internal party for the contract');
3300: END IF;
3301: RAISE FND_API.G_EXC_ERROR;
3302: END IF;
3303:
3304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 3344: p_init_msg_list => FND_API.G_FALSE,

3340: x_target_contract_type := source_contract_rec.contract_type;
3341: x_target_contract_id := p_target_contract_id;
3342: OKC_TERMS_COPY_PVT.copy_tc(
3343: p_api_version => 1,
3344: p_init_msg_list => FND_API.G_FALSE,
3345: p_commit => FND_API.G_FALSE,
3346: p_source_doc_type => source_contract_rec.contract_type,
3347: p_source_doc_id => p_source_contract_id,
3348: p_target_doc_type =>x_target_contract_type ,

Line 3345: p_commit => FND_API.G_FALSE,

3341: x_target_contract_id := p_target_contract_id;
3342: OKC_TERMS_COPY_PVT.copy_tc(
3343: p_api_version => 1,
3344: p_init_msg_list => FND_API.G_FALSE,
3345: p_commit => FND_API.G_FALSE,
3346: p_source_doc_type => source_contract_rec.contract_type,
3347: p_source_doc_id => p_source_contract_id,
3348: p_target_doc_type =>x_target_contract_type ,
3349: p_target_doc_id => x_target_contract_id,

Line 3375: p_init_msg_list => FND_API.G_FALSE,

3371: 'Calling OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables');
3372: END IF;
3373: OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables (
3374: p_api_version => 1.0,
3375: p_init_msg_list => FND_API.G_FALSE,
3376: p_source_doc_id => p_source_contract_id,
3377: p_source_doc_type => source_contract_rec.contract_type,
3378: p_target_doc_id => p_target_contract_id,
3379: p_target_doc_type => source_contract_rec.contract_type,

Line 3408: IF FND_API.To_Boolean( p_commit ) THEN

3404: CLOSE source_contract_csr;
3405: CLOSE party_csr;
3406:
3407: -- Standard check of p_commit
3408: IF FND_API.To_Boolean( p_commit ) THEN
3409: COMMIT WORK;
3410: END IF;
3411:
3412: -- Standard call to get message count and if count is 1, get message info.

Line 3422: WHEN FND_API.G_EXC_ERROR THEN

3418: END IF;
3419:
3420:
3421: EXCEPTION
3422: WHEN FND_API.G_EXC_ERROR THEN
3423: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3424: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3425: g_module || l_api_name,
3426: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');

Line 3426: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');

3422: WHEN FND_API.G_EXC_ERROR THEN
3423: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3424: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3425: g_module || l_api_name,
3426: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');
3427: END IF;
3428: --close cursors
3429: IF (source_contract_csr%ISOPEN) THEN
3430: CLOSE source_contract_csr ;

Line 3436: x_return_status := FND_API.G_RET_STS_ERROR;

3432: IF (party_csr%ISOPEN) THEN
3433: CLOSE party_csr ;
3434: END IF;
3435: ROLLBACK TO copy_contract_details_PVT;
3436: x_return_status := FND_API.G_RET_STS_ERROR;
3437: FND_MSG_PUB.Count_And_Get(
3438: p_count => x_msg_count,
3439: p_data => x_msg_data
3440: );

Line 3442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3438: p_count => x_msg_count,
3439: p_data => x_msg_data
3440: );
3441:
3442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3445: g_module || l_api_name,
3446: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 3446: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

3442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3445: g_module || l_api_name,
3446: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3447: END IF;
3448: --close cursors
3449: IF (source_contract_csr%ISOPEN) THEN
3450: CLOSE source_contract_csr ;

Line 3456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3452: IF (party_csr%ISOPEN) THEN
3453: CLOSE party_csr ;
3454: END IF;
3455: ROLLBACK TO copy_contract_details_PVT;
3456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3457: FND_MSG_PUB.Count_And_Get(
3458: p_count => x_msg_count,
3459: p_data => x_msg_data
3460: );

Line 3482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3478: END IF;
3479: IF (party_csr%ISOPEN) THEN
3480: CLOSE party_csr ;
3481: END IF;
3482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3483: FND_MSG_PUB.Count_And_Get(
3484: p_count => x_msg_count,
3485: p_data => x_msg_data
3486: );

Line 3498: -- Default = FND_API.G_FALSE

3494: --Pre-reqs : None.
3495: --Parameters :
3496: --IN : p_api_version IN NUMBER Required
3497: -- : p_init_msg_list IN VARCHAR2 Optional
3498: -- Default = FND_API.G_FALSE
3499: -- : p_commit IN VARCHAR2 Optional
3500: -- Default = FND_API.G_FALSE
3501: -- : p_contract_id IN NUMBER Required
3502: -- Id of the contract whose details are to be versioned

Line 3500: -- Default = FND_API.G_FALSE

3496: --IN : p_api_version IN NUMBER Required
3497: -- : p_init_msg_list IN VARCHAR2 Optional
3498: -- Default = FND_API.G_FALSE
3499: -- : p_commit IN VARCHAR2 Optional
3500: -- Default = FND_API.G_FALSE
3501: -- : p_contract_id IN NUMBER Required
3502: -- Id of the contract whose details are to be versioned
3503: --OUT : x_return_status OUT VARCHAR2(1)
3504: -- : x_msg_count OUT NUMBER

Line 3551: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

3547: l_api_version := 1.0;
3548: -- Standard Start of API savepoint
3549: SAVEPOINT version_contract_details_PVT;
3550: -- Standard call to check for call compatibility.
3551: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3553: END IF;
3554: -- Initialize message list if p_init_msg_list is set to TRUE.
3555: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3548: -- Standard Start of API savepoint
3549: SAVEPOINT version_contract_details_PVT;
3550: -- Standard call to check for call compatibility.
3551: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3553: END IF;
3554: -- Initialize message list if p_init_msg_list is set to TRUE.
3555: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3556: FND_MSG_PUB.initialize;

Line 3555: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3551: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3552: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3553: END IF;
3554: -- Initialize message list if p_init_msg_list is set to TRUE.
3555: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3556: FND_MSG_PUB.initialize;
3557: END IF;
3558:
3559: -- Initialize API return status to success

Line 3560: x_return_status := FND_API.G_RET_STS_SUCCESS;

3556: FND_MSG_PUB.initialize;
3557: END IF;
3558:
3559: -- Initialize API return status to success
3560: x_return_status := FND_API.G_RET_STS_SUCCESS;
3561:
3562: -- Lock the contract header
3563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 3729: RAISE FND_API.G_EXC_ERROR;

3725: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
3726: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
3727: p_token1 => G_CONTRACT_ID_TOKEN,
3728: p_token1_value => to_char(p_contract_id));
3729: RAISE FND_API.G_EXC_ERROR;
3730: -- RAISE NO_DATA_FOUND;
3731: END IF;
3732:
3733: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 3795: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

3791: p_version_number => contract_rec.contract_version_num
3792: );
3793: --------------------------------------------
3794: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3795: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3796: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3797: RAISE FND_API.G_EXC_ERROR ;
3798: END IF;
3799:

Line 3797: RAISE FND_API.G_EXC_ERROR ;

3793: --------------------------------------------
3794: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3795: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3796: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3797: RAISE FND_API.G_EXC_ERROR ;
3798: END IF;
3799:
3800: ELSIF l_contract_source = 'ATTACHED' THEN
3801:

Line 3817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

3813: p_major_version => contract_rec.contract_version_num
3814: );
3815: --------------------------------------------
3816: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3818: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3819: RAISE FND_API.G_EXC_ERROR ;
3820: END IF;
3821:

Line 3819: RAISE FND_API.G_EXC_ERROR ;

3815: --------------------------------------------
3816: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3818: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3819: RAISE FND_API.G_EXC_ERROR ;
3820: END IF;
3821:
3822: END IF;
3823: -- Code changes for Bug# 6902073 Ends

Line 3838: p_init_msg_list => FND_API.G_FALSE,

3834: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
3835: END IF;
3836: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
3837: p_api_version => 1.0,
3838: p_init_msg_list => FND_API.G_FALSE,
3839: p_doc_id => p_contract_id,
3840: p_doc_version => contract_rec.contract_version_num,
3841: p_doc_type => contract_rec.contract_type,
3842: x_return_status => x_return_status,

Line 3866: p_init_msg_list => FND_API.G_FALSE,

3862: 'Calling OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation');
3863: END IF;
3864: OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation (
3865: p_api_version => 1.0,
3866: p_init_msg_list => FND_API.G_FALSE,
3867: p_doc_id => p_contract_id,
3868: p_doc_type => contract_rec.contract_type,
3869: p_keep_summary => 'N',
3870: x_return_status => x_return_status,

Line 3904: IF FND_API.To_Boolean( p_commit ) THEN

3900: DELETE FROM OKC_REP_CONTRACTS_ALL
3901: WHERE contract_id=p_contract_id;
3902:
3903: -- Standard check of p_commit
3904: IF FND_API.To_Boolean( p_commit ) THEN
3905: COMMIT WORK;
3906: END IF;
3907:
3908: -- Standard call to get message count and if count is 1, get message info.

Line 3918: WHEN FND_API.G_EXC_ERROR THEN

3914: END IF;
3915:
3916:
3917: EXCEPTION
3918: WHEN FND_API.G_EXC_ERROR THEN
3919: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3921: g_module || l_api_name,
3922: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');

Line 3922: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');

3918: WHEN FND_API.G_EXC_ERROR THEN
3919: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3921: g_module || l_api_name,
3922: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');
3923: END IF;
3924: --close cursors
3925: IF (contract_csr%ISOPEN) THEN
3926: CLOSE contract_csr ;

Line 3929: x_return_status := FND_API.G_RET_STS_ERROR;

3925: IF (contract_csr%ISOPEN) THEN
3926: CLOSE contract_csr ;
3927: END IF;
3928: ROLLBACK TO version_contract_details_PVT;
3929: x_return_status := FND_API.G_RET_STS_ERROR;
3930: FND_MSG_PUB.Count_And_Get(
3931: p_count => x_msg_count,
3932: p_data => x_msg_data
3933: );

Line 3935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3931: p_count => x_msg_count,
3932: p_data => x_msg_data
3933: );
3934:
3935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3936: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3937: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3938: g_module || l_api_name,
3939: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 3939: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

3935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3936: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3937: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3938: g_module || l_api_name,
3939: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3940: END IF;
3941: --close cursors
3942: IF (contract_csr%ISOPEN) THEN
3943: CLOSE contract_csr ;

Line 3946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3942: IF (contract_csr%ISOPEN) THEN
3943: CLOSE contract_csr ;
3944: END IF;
3945: ROLLBACK TO version_contract_details_PVT;
3946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3947: FND_MSG_PUB.Count_And_Get(
3948: p_count => x_msg_count,
3949: p_data => x_msg_data
3950: );

Line 3969: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3965: --close cursors
3966: IF (contract_csr%ISOPEN) THEN
3967: CLOSE contract_csr ;
3968: END IF;
3969: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3970: FND_MSG_PUB.Count_And_Get(
3971: p_count => x_msg_count,
3972: p_data => x_msg_data
3973: );

Line 3987: -- Default = FND_API.G_FALSE

3983: --Pre-reqs : None.
3984: --Parameters :
3985: --IN : p_api_version IN NUMBER Required
3986: -- : p_init_msg_list IN VARCHAR2 Optional
3987: -- Default = FND_API.G_FALSE
3988: -- : p_commit IN VARCHAR2 Optional
3989: -- Default = FND_API.G_FALSE
3990: -- : p_contract_id IN NUMBER Required
3991: -- Id of the contract to be signed

Line 3989: -- Default = FND_API.G_FALSE

3985: --IN : p_api_version IN NUMBER Required
3986: -- : p_init_msg_list IN VARCHAR2 Optional
3987: -- Default = FND_API.G_FALSE
3988: -- : p_commit IN VARCHAR2 Optional
3989: -- Default = FND_API.G_FALSE
3990: -- : p_contract_id IN NUMBER Required
3991: -- Id of the contract to be signed
3992: --OUT : x_return_status OUT VARCHAR2(1)
3993: -- : x_msg_count OUT NUMBER

Line 4032: l_expiration_date_matches_flag := FND_API.G_FALSE;

4028: arch_contract_rec arch_contract_csr%ROWTYPE;
4029:
4030: BEGIN
4031:
4032: l_expiration_date_matches_flag := FND_API.G_FALSE;
4033: l_effective_date_matches_flag := FND_API.G_FALSE;
4034:
4035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4033: l_effective_date_matches_flag := FND_API.G_FALSE;

4029:
4030: BEGIN
4031:
4032: l_expiration_date_matches_flag := FND_API.G_FALSE;
4033: l_effective_date_matches_flag := FND_API.G_FALSE;
4034:
4035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4037: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');

Line 4046: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

4042: l_api_version := 1.0;
4043: -- Standard Start of API savepoint
4044: SAVEPOINT sign_contract_PVT;
4045: -- Standard call to check for call compatibility.
4046: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4048: END IF;
4049: -- Initialize message list if p_init_msg_list is set to TRUE.
4050: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 4047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4043: -- Standard Start of API savepoint
4044: SAVEPOINT sign_contract_PVT;
4045: -- Standard call to check for call compatibility.
4046: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4048: END IF;
4049: -- Initialize message list if p_init_msg_list is set to TRUE.
4050: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4051: FND_MSG_PUB.initialize;

Line 4050: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4046: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4048: END IF;
4049: -- Initialize message list if p_init_msg_list is set to TRUE.
4050: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4051: FND_MSG_PUB.initialize;
4052: END IF;
4053:
4054: -- Initialize API return status to success

Line 4055: x_return_status := FND_API.G_RET_STS_SUCCESS;

4051: FND_MSG_PUB.initialize;
4052: END IF;
4053:
4054: -- Initialize API return status to success
4055: x_return_status := FND_API.G_RET_STS_SUCCESS;
4056:
4057: -- Get effective dates and version of the contract.
4058: OPEN contract_csr;
4059: FETCH contract_csr INTO contract_rec;

Line 4070: RAISE FND_API.G_EXC_ERROR;

4066: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
4067: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
4068: p_token1 => G_CONTRACT_ID_TOKEN,
4069: p_token1_value => to_char(p_contract_id));
4070: RAISE FND_API.G_EXC_ERROR;
4071: -- RAISE NO_DATA_FOUND;
4072: END IF;
4073:
4074: -- Lock the contract header

Line 4105: p_init_msg_list => FND_API.G_FALSE,

4101: END IF;
4102: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
4103: OKC_REP_UTIL_PVT.change_contract_status(
4104: p_api_version => 1.0,
4105: p_init_msg_list => FND_API.G_FALSE,
4106: p_contract_id => p_contract_id,
4107: p_contract_version => contract_rec.contract_version_num,
4108: p_status_code => G_STATUS_SIGNED,
4109: p_user_id => fnd_global.user_id,

Line 4134: p_init_msg_list => FND_API.G_FALSE,

4130: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4131: END IF;
4132: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
4133: p_api_version => 1.0,
4134: p_init_msg_list => FND_API.G_FALSE,
4135: p_doc_id => p_contract_id,
4136: p_doc_version => contract_rec.contract_version_num,
4137: p_doc_type => contract_rec.contract_type,
4138: x_return_status => x_return_status,

Line 4162: l_sync_flag := FND_API.G_FALSE;

4158: || contract_rec.latest_signed_ver_number);
4159: END IF;
4160: -- Now we need to activate deliverables
4161: if (contract_rec.latest_signed_ver_number IS NULL) THEN
4162: l_sync_flag := FND_API.G_FALSE;
4163: ELSE
4164: l_sync_flag := FND_API.G_TRUE;
4165: END IF;
4166:

Line 4164: l_sync_flag := FND_API.G_TRUE;

4160: -- Now we need to activate deliverables
4161: if (contract_rec.latest_signed_ver_number IS NULL) THEN
4162: l_sync_flag := FND_API.G_FALSE;
4163: ELSE
4164: l_sync_flag := FND_API.G_TRUE;
4165: END IF;
4166:
4167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 4181: p_init_msg_list => FND_API.G_FALSE,

4177: END IF;
4178:
4179: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (
4180: p_api_version => 1.0,
4181: p_init_msg_list => FND_API.G_FALSE,
4182: p_commit => FND_API.G_FALSE,
4183: p_bus_doc_id => p_contract_id,
4184: p_bus_doc_type => contract_rec.contract_type,
4185: p_bus_doc_version => contract_rec.contract_version_num,

Line 4182: p_commit => FND_API.G_FALSE,

4178:
4179: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (
4180: p_api_version => 1.0,
4181: p_init_msg_list => FND_API.G_FALSE,
4182: p_commit => FND_API.G_FALSE,
4183: p_bus_doc_id => p_contract_id,
4184: p_bus_doc_type => contract_rec.contract_type,
4185: p_bus_doc_version => contract_rec.contract_version_num,
4186: p_event_code => G_CONTRACT_EFFECTIVE_EVENT,

Line 4208: IF (l_sync_flag = FND_API.G_TRUE) THEN

4204: END IF;
4205: --------------------------------------------------------
4206:
4207: -- Checking if we need to call deliverable's APIs for synch-ing
4208: IF (l_sync_flag = FND_API.G_TRUE) THEN
4209: -- Get the previous signed contract's expiration date
4210: -- Get effective dates and version of the contract.
4211: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number);
4212: FETCH arch_contract_csr INTO arch_contract_rec;

Line 4223: RAISE FND_API.G_EXC_ERROR;

4219: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
4220: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
4221: p_token1 => G_CONTRACT_ID_TOKEN,
4222: p_token1_value => to_char(p_contract_id));
4223: RAISE FND_API.G_EXC_ERROR;
4224: -- RAISE NO_DATA_FOUND;
4225: END IF;
4226: l_prev_signed_effective_date := arch_contract_rec.contract_effective_date;
4227: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;

Line 4246: l_expiration_date_matches_flag := FND_API.G_TRUE;

4242: -- If last signed version's expiration date is different from the current version's expiration date
4243: -- we need to call deliverables API for synching previous signed deliverables.
4244: -- This logic is executed to handle the null date scenarios
4245: IF (trunc(l_prev_signed_expiration_date)=trunc(contract_rec.contract_expiration_date)) THEN
4246: l_expiration_date_matches_flag := FND_API.G_TRUE;
4247: END IF;
4248:
4249: IF (trunc(l_prev_signed_effective_date)=trunc(contract_rec.contract_effective_date)) THEN
4250: l_effective_date_matches_flag := FND_API.G_TRUE;

Line 4250: l_effective_date_matches_flag := FND_API.G_TRUE;

4246: l_expiration_date_matches_flag := FND_API.G_TRUE;
4247: END IF;
4248:
4249: IF (trunc(l_prev_signed_effective_date)=trunc(contract_rec.contract_effective_date)) THEN
4250: l_effective_date_matches_flag := FND_API.G_TRUE;
4251: END IF;
4252:
4253: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 4253: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN

4249: IF (trunc(l_prev_signed_effective_date)=trunc(contract_rec.contract_effective_date)) THEN
4250: l_effective_date_matches_flag := FND_API.G_TRUE;
4251: END IF;
4252:
4253: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4256: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4257: END IF;

Line 4260: p_init_msg_list => FND_API.G_FALSE,

4256: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4257: END IF;
4258: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4259: p_api_version => 1.0,
4260: p_init_msg_list => FND_API.G_FALSE,
4261: p_commit => FND_API.G_FALSE,
4262: p_bus_doc_id => p_contract_id,
4263: p_bus_doc_type => contract_rec.contract_type,
4264: p_bus_doc_version => contract_rec.contract_version_num,

Line 4261: p_commit => FND_API.G_FALSE,

4257: END IF;
4258: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4259: p_api_version => 1.0,
4260: p_init_msg_list => FND_API.G_FALSE,
4261: p_commit => FND_API.G_FALSE,
4262: p_bus_doc_id => p_contract_id,
4263: p_bus_doc_type => contract_rec.contract_type,
4264: p_bus_doc_version => contract_rec.contract_version_num,
4265: p_bus_doc_date_events_tbl => l_update_event_tbl,

Line 4290: p_init_msg_list => FND_API.G_FALSE,

4286: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
4287: END IF;
4288: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
4289: p_api_version => 1.0,
4290: p_init_msg_list => FND_API.G_FALSE,
4291: p_commit => FND_API.G_FALSE,
4292: p_bus_doc_id => p_contract_id,
4293: p_bus_doc_type => contract_rec.contract_type,
4294: p_bus_doc_version => contract_rec.latest_signed_ver_number,

Line 4291: p_commit => FND_API.G_FALSE,

4287: END IF;
4288: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
4289: p_api_version => 1.0,
4290: p_init_msg_list => FND_API.G_FALSE,
4291: p_commit => FND_API.G_FALSE,
4292: p_bus_doc_id => p_contract_id,
4293: p_bus_doc_type => contract_rec.contract_type,
4294: p_bus_doc_version => contract_rec.latest_signed_ver_number,
4295: x_msg_data => x_msg_data,

Line 4321: IF FND_API.To_Boolean( p_commit ) THEN

4317: SET latest_signed_ver_number = contract_rec.contract_version_num
4318: WHERE contract_id = p_contract_id;
4319: CLOSE contract_csr;
4320: -- Standard check of p_commit
4321: IF FND_API.To_Boolean( p_commit ) THEN
4322: COMMIT WORK;
4323: END IF;
4324:
4325: -- Standard call to get message count and if count is 1, get message info.

Line 4335: WHEN FND_API.G_EXC_ERROR THEN

4331: END IF;
4332:
4333:
4334: EXCEPTION
4335: WHEN FND_API.G_EXC_ERROR THEN
4336: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4337: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4338: g_module || l_api_name,
4339: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');

Line 4339: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');

4335: WHEN FND_API.G_EXC_ERROR THEN
4336: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4337: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4338: g_module || l_api_name,
4339: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
4340: END IF;
4341: --close cursors
4342: IF (contract_csr%ISOPEN) THEN
4343: CLOSE contract_csr ;

Line 4349: x_return_status := FND_API.G_RET_STS_ERROR;

4345: IF (arch_contract_csr%ISOPEN) THEN
4346: CLOSE arch_contract_csr ;
4347: END IF;
4348: ROLLBACK TO sign_contract_PVT;
4349: x_return_status := FND_API.G_RET_STS_ERROR;
4350: FND_MSG_PUB.Count_And_Get(
4351: p_count => x_msg_count,
4352: p_data => x_msg_data
4353: );

Line 4355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4351: p_count => x_msg_count,
4352: p_data => x_msg_data
4353: );
4354:
4355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4356: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4357: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4358: g_module || l_api_name,
4359: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 4359: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

4355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4356: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4357: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4358: g_module || l_api_name,
4359: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4360: END IF;
4361: --close cursors
4362: IF (contract_csr%ISOPEN) THEN
4363: CLOSE contract_csr ;

Line 4369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4365: IF (arch_contract_csr%ISOPEN) THEN
4366: CLOSE arch_contract_csr ;
4367: END IF;
4368: ROLLBACK TO sign_contract_PVT;
4369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4370: FND_MSG_PUB.Count_And_Get(
4371: p_count => x_msg_count,
4372: p_data => x_msg_data
4373: );

Line 4395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4391: END IF;
4392: IF (arch_contract_csr%ISOPEN) THEN
4393: CLOSE arch_contract_csr ;
4394: END IF;
4395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4396: FND_MSG_PUB.Count_And_Get(
4397: p_count => x_msg_count,
4398: p_data => x_msg_data
4399: );

Line 4412: -- Default = FND_API.G_FALSE

4408: --Pre-reqs : None.
4409: --Parameters :
4410: --IN : p_api_version IN NUMBER Required
4411: -- : p_init_msg_list IN VARCHAR2 Optional
4412: -- Default = FND_API.G_FALSE
4413: -- : p_commit IN VARCHAR2 Optional
4414: -- Default = FND_API.G_FALSE
4415: -- : p_contract_id IN NUMBER Required
4416: -- Id of the contract to be terminated

Line 4414: -- Default = FND_API.G_FALSE

4410: --IN : p_api_version IN NUMBER Required
4411: -- : p_init_msg_list IN VARCHAR2 Optional
4412: -- Default = FND_API.G_FALSE
4413: -- : p_commit IN VARCHAR2 Optional
4414: -- Default = FND_API.G_FALSE
4415: -- : p_contract_id IN NUMBER Required
4416: -- Id of the contract to be terminated
4417: -- : p_termination_date IN DATE Required
4418: -- Date the contract is terminated

Line 4464: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

4460: l_api_version := 1.0;
4461: -- Standard Start of API savepoint
4462: SAVEPOINT terminate_contract_PVT;
4463: -- Standard call to check for call compatibility.
4464: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4465: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4466: END IF;
4467: -- Initialize message list if p_init_msg_list is set to TRUE.
4468: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 4465: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4461: -- Standard Start of API savepoint
4462: SAVEPOINT terminate_contract_PVT;
4463: -- Standard call to check for call compatibility.
4464: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4465: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4466: END IF;
4467: -- Initialize message list if p_init_msg_list is set to TRUE.
4468: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4469: FND_MSG_PUB.initialize;

Line 4468: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4464: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4465: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4466: END IF;
4467: -- Initialize message list if p_init_msg_list is set to TRUE.
4468: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4469: FND_MSG_PUB.initialize;
4470: END IF;
4471:
4472: -- Initialize API return status to success

Line 4473: x_return_status := FND_API.G_RET_STS_SUCCESS;

4469: FND_MSG_PUB.initialize;
4470: END IF;
4471:
4472: -- Initialize API return status to success
4473: x_return_status := FND_API.G_RET_STS_SUCCESS;
4474:
4475: -- Get effective dates and version of the contract.
4476: OPEN contract_csr;
4477: FETCH contract_csr INTO contract_rec;

Line 4488: RAISE FND_API.G_EXC_ERROR;

4484: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
4485: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
4486: p_token1 => G_CONTRACT_ID_TOKEN,
4487: p_token1_value => to_char(p_contract_id));
4488: RAISE FND_API.G_EXC_ERROR;
4489: -- RAISE NO_DATA_FOUND;
4490: END IF;
4491:
4492: -- Lock the contract header

Line 4524: p_init_msg_list => FND_API.G_FALSE,

4520:
4521: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
4522: OKC_REP_UTIL_PVT.change_contract_status(
4523: p_api_version => 1.0,
4524: p_init_msg_list => FND_API.G_FALSE,
4525: p_contract_id => p_contract_id,
4526: p_contract_version => contract_rec.contract_version_num,
4527: p_status_code => G_STATUS_TERMINATED,
4528: p_user_id => fnd_global.user_id,

Line 4561: p_init_msg_list => FND_API.G_FALSE,

4557: END IF;
4558:
4559: OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables (
4560: p_api_version => 1.0,
4561: p_init_msg_list => FND_API.G_FALSE,
4562: p_commit => FND_API.G_FALSE,
4563: p_bus_doc_id => p_contract_id,
4564: p_bus_doc_type => contract_rec.contract_type,
4565: p_bus_doc_version => contract_rec.contract_version_num,

Line 4562: p_commit => FND_API.G_FALSE,

4558:
4559: OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables (
4560: p_api_version => 1.0,
4561: p_init_msg_list => FND_API.G_FALSE,
4562: p_commit => FND_API.G_FALSE,
4563: p_bus_doc_id => p_contract_id,
4564: p_bus_doc_type => contract_rec.contract_type,
4565: p_bus_doc_version => contract_rec.contract_version_num,
4566: p_event_code => G_CONTRACT_TERMINATED_EVENT,

Line 4596: p_init_msg_list => FND_API.G_FALSE,

4592: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables ');
4593: END IF;
4594: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4595: p_api_version => 1.0,
4596: p_init_msg_list => FND_API.G_FALSE,
4597: p_commit => FND_API.G_FALSE,
4598: p_bus_doc_id => p_contract_id,
4599: p_bus_doc_type => contract_rec.contract_type,
4600: p_bus_doc_version => contract_rec.contract_version_num,

Line 4597: p_commit => FND_API.G_FALSE,

4593: END IF;
4594: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4595: p_api_version => 1.0,
4596: p_init_msg_list => FND_API.G_FALSE,
4597: p_commit => FND_API.G_FALSE,
4598: p_bus_doc_id => p_contract_id,
4599: p_bus_doc_type => contract_rec.contract_type,
4600: p_bus_doc_version => contract_rec.contract_version_num,
4601: p_bus_doc_date_events_tbl => l_update_event_tbl,

Line 4624: IF FND_API.To_Boolean( p_commit ) THEN

4620:
4621: CLOSE contract_csr;
4622:
4623: -- Standard check of p_commit
4624: IF FND_API.To_Boolean( p_commit ) THEN
4625: COMMIT WORK;
4626: END IF;
4627:
4628: -- Standard call to get message count and if count is 1, get message info.

Line 4638: WHEN FND_API.G_EXC_ERROR THEN

4634: END IF;
4635:
4636:
4637: EXCEPTION
4638: WHEN FND_API.G_EXC_ERROR THEN
4639: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4640: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4641: g_module || l_api_name,
4642: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');

Line 4642: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');

4638: WHEN FND_API.G_EXC_ERROR THEN
4639: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4640: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4641: g_module || l_api_name,
4642: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');
4643: END IF;
4644: --close cursors
4645: IF (contract_csr%ISOPEN) THEN
4646: CLOSE contract_csr ;

Line 4649: x_return_status := FND_API.G_RET_STS_ERROR;

4645: IF (contract_csr%ISOPEN) THEN
4646: CLOSE contract_csr ;
4647: END IF;
4648: ROLLBACK TO terminate_contract_PVT;
4649: x_return_status := FND_API.G_RET_STS_ERROR;
4650: FND_MSG_PUB.Count_And_Get(
4651: p_count => x_msg_count,
4652: p_data => x_msg_data
4653: );

Line 4655: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4651: p_count => x_msg_count,
4652: p_data => x_msg_data
4653: );
4654:
4655: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4656: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4657: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4658: g_module || l_api_name,
4659: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 4659: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

4655: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4656: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4657: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4658: g_module || l_api_name,
4659: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4660: END IF;
4661: --close cursors
4662: IF (contract_csr%ISOPEN) THEN
4663: CLOSE contract_csr ;

Line 4666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4662: IF (contract_csr%ISOPEN) THEN
4663: CLOSE contract_csr ;
4664: END IF;
4665: ROLLBACK TO terminate_contract_PVT;
4666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4667: FND_MSG_PUB.Count_And_Get(
4668: p_count => x_msg_count,
4669: p_data => x_msg_data
4670: );

Line 4689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4685: --close cursors
4686: IF (contract_csr%ISOPEN) THEN
4687: CLOSE contract_csr;
4688: END IF;
4689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4690: FND_MSG_PUB.Count_And_Get(
4691: p_count => x_msg_count,
4692: p_data => x_msg_data
4693: );

Line 4705: -- Default = FND_API.G_FALSE

4701: --Pre-reqs : None.
4702: --Parameters :
4703: --IN : p_api_version IN NUMBER Required
4704: -- : p_init_msg_list IN VARCHAR2 Optional
4705: -- Default = FND_API.G_FALSE
4706: -- : p_contract_id IN NUMBER Required
4707: -- Id of the contract to be processed
4708: -- : p_contract_number IN NUMBER Required
4709: -- Number of the contract to be processed

Line 4813: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

4809: -- Standard Start of API savepoint
4810: SAVEPOINT repository_notifier_pvt;
4811:
4812: -- Standard call to check for call compatibility.
4813: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4815: END IF;
4816:
4817: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 4814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4810: SAVEPOINT repository_notifier_pvt;
4811:
4812: -- Standard call to check for call compatibility.
4813: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4815: END IF;
4816:
4817: -- Initialize message list if p_init_msg_list is set to TRUE.
4818: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 4818: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4815: END IF;
4816:
4817: -- Initialize message list if p_init_msg_list is set to TRUE.
4818: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4819: FND_MSG_PUB.initialize;
4820: END IF;
4821:
4822: FOR contract_contacts_rec in CONTRACT_CONTACTS(p_contract_id) LOOP

Line 5062: WHEN FND_API.G_EXC_ERROR THEN

5058: END IF;
5059:
5060:
5061: EXCEPTION
5062: WHEN FND_API.G_EXC_ERROR THEN
5063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5064: fnd_log.string(
5065: FND_LOG.LEVEL_EXCEPTION,
5066: g_module || l_api_name,

Line 5067: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');

5063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5064: fnd_log.string(
5065: FND_LOG.LEVEL_EXCEPTION,
5066: g_module || l_api_name,
5067: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');
5068: END IF;
5069: --close cursors
5070: IF (CONTRACT_CONTACTS%ISOPEN) THEN
5071: CLOSE CONTRACT_CONTACTS ;

Line 5078: x_return_status := FND_API.G_RET_STS_ERROR;

5074: CLOSE CONTACT_ATTRIBUTES ;
5075: END IF;
5076: ROLLBACK TO repository_notifier_pvt;
5077:
5078: x_return_status := FND_API.G_RET_STS_ERROR;
5079: FND_MSG_PUB.Count_And_Get(
5080: p_count => x_msg_count,
5081: p_data => x_msg_data
5082: );

Line 5084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5080: p_count => x_msg_count,
5081: p_data => x_msg_data
5082: );
5083:
5084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5086: fnd_log.string(
5087: FND_LOG.LEVEL_EXCEPTION,
5088: g_module || l_api_name,

Line 5089: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

5085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5086: fnd_log.string(
5087: FND_LOG.LEVEL_EXCEPTION,
5088: g_module || l_api_name,
5089: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5090: END IF;
5091: --close cursors
5092: IF (CONTRACT_CONTACTS%ISOPEN) THEN
5093: CLOSE CONTRACT_CONTACTS ;

Line 5100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5096: CLOSE CONTACT_ATTRIBUTES ;
5097: END IF;
5098: ROLLBACK TO repository_notifier_pvt;
5099:
5100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5101: FND_MSG_PUB.Count_And_Get(
5102: p_count => x_msg_count,
5103: p_data => x_msg_data
5104: );

Line 5130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5126: CLOSE CONTACT_ATTRIBUTES ;
5127: END IF;
5128: ROLLBACK TO repository_notifier_pvt;
5129:
5130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5131: FND_MSG_PUB.Count_And_Get(
5132: p_count => x_msg_count,
5133: p_data => x_msg_data
5134: );

Line 5145: -- Default = FND_API.G_FALSE

5141: --Pre-reqs : None.
5142: --Parameters :
5143: --IN : p_api_version IN NUMBER Required
5144: -- : p_init_msg_list IN VARCHAR2 Optional
5145: -- Default = FND_API.G_FALSE
5146: -- : p_contract_id IN NUMBER Required
5147: -- Id of the contract to be processed
5148: -- : p_contract_version IN NUMBER Required
5149: -- Version of the contract to be processed

Line 5194: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

5190: -- Standard Start of API savepoint
5191: SAVEPOINT submit_contract_PVT;
5192:
5193: -- Standard call to check for call compatibility.
5194: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5196: END IF;
5197:
5198: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 5195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5191: SAVEPOINT submit_contract_PVT;
5192:
5193: -- Standard call to check for call compatibility.
5194: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5196: END IF;
5197:
5198: -- Initialize message list if p_init_msg_list is set to TRUE.
5199: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 5199: IF FND_API.to_Boolean( p_init_msg_list ) THEN

5195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5196: END IF;
5197:
5198: -- Initialize message list if p_init_msg_list is set to TRUE.
5199: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5200: FND_MSG_PUB.initialize;
5201: END IF;
5202:
5203: -- Initialize API return status to success

Line 5204: x_return_status := FND_API.G_RET_STS_SUCCESS;

5200: FND_MSG_PUB.initialize;
5201: END IF;
5202:
5203: -- Initialize API return status to success
5204: x_return_status := FND_API.G_RET_STS_SUCCESS;
5205:
5206:
5207: -- Get workflow information of the contract's approval process
5208: OPEN contract_csr;

Line 5221: RAISE FND_API.G_EXC_ERROR;

5217: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5218: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
5219: p_token1 => G_CONTRACT_ID_TOKEN,
5220: p_token1_value => to_char(p_contract_id));
5221: RAISE FND_API.G_EXC_ERROR;
5222: -- RAISE NO_DATA_FOUND;
5223: END IF;
5224: CLOSE contract_csr;
5225:

Line 5249: RAISE FND_API.G_EXC_ERROR;

5245: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5246: p_msg_name => G_CANEL_APPROVAL_ERROR_MSG,
5247: p_token1 => G_CONTRACT_NUM_TOKEN,
5248: p_token1_value => l_contract_number);
5249: RAISE FND_API.G_EXC_ERROR;
5250:
5251: END IF;
5252:
5253:

Line 5262: p_init_msg_list => FND_API.G_FALSE,

5258:
5259: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
5260: OKC_REP_UTIL_PVT.change_contract_status(
5261: p_api_version => 1.0,
5262: p_init_msg_list => FND_API.G_FALSE,
5263: p_contract_id => p_contract_id,
5264: p_contract_version => p_contract_version,
5265: p_status_code => G_STATUS_DRAFT,
5266: p_user_id => fnd_global.user_id,

Line 5293: p_init_msg_list => FND_API.G_FALSE,

5289:
5290: -- Add a record in ONC_REP_CON_APPROVALS table.
5291: OKC_REP_UTIL_PVT.add_approval_hist_record(
5292: p_api_version => 1.0,
5293: p_init_msg_list => FND_API.G_FALSE,
5294: p_contract_id => p_contract_id,
5295: p_contract_version => p_contract_version,
5296: p_action_code => G_ACTION_ABORTED,
5297: p_user_id => fnd_global.user_id,

Line 5326: WHEN FND_API.G_EXC_ERROR THEN

5322: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5323: END IF;
5324:
5325: EXCEPTION
5326: WHEN FND_API.G_EXC_ERROR THEN
5327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5329: g_module || l_api_name,
5330: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');

Line 5330: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');

5326: WHEN FND_API.G_EXC_ERROR THEN
5327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5329: g_module || l_api_name,
5330: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');
5331: END IF;
5332: --close cursors
5333: IF (contract_csr%ISOPEN) THEN
5334: CLOSE contract_csr ;

Line 5337: x_return_status := FND_API.G_RET_STS_ERROR;

5333: IF (contract_csr%ISOPEN) THEN
5334: CLOSE contract_csr ;
5335: END IF;
5336: ROLLBACK TO submit_contract_PVT;
5337: x_return_status := FND_API.G_RET_STS_ERROR;
5338: FND_MSG_PUB.Count_And_Get(
5339: p_count => x_msg_count,
5340: p_data => x_msg_data
5341: );

Line 5343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5339: p_count => x_msg_count,
5340: p_data => x_msg_data
5341: );
5342:
5343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5346: g_module || l_api_name,
5347: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 5347: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

5343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5346: g_module || l_api_name,
5347: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5348: END IF;
5349: --close cursors
5350: IF (contract_csr%ISOPEN) THEN
5351: CLOSE contract_csr ;

Line 5354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5350: IF (contract_csr%ISOPEN) THEN
5351: CLOSE contract_csr ;
5352: END IF;
5353: ROLLBACK TO submit_contract_PVT;
5354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5355: FND_MSG_PUB.Count_And_Get(
5356: p_count => x_msg_count,
5357: p_data => x_msg_data
5358: );

Line 5377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5373: p_token1_value => sqlcode,
5374: p_token2 => G_SQLERRM_TOKEN,
5375: p_token2_value => sqlerrm);
5376: ROLLBACK TO submit_contract_PVT;
5377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5378: FND_MSG_PUB.Count_And_Get(
5379: p_count => x_msg_count,
5380: p_data => x_msg_data
5381: );

Line 5400: -- Default = FND_API.G_FALSE

5396: --Pre-reqs : None.
5397: --Parameters :
5398: --IN : p_api_version IN NUMBER Required
5399: -- : p_init_msg_list IN VARCHAR2 Optional
5400: -- Default = FND_API.G_FALSE
5401: -- : p_contract_number IN VARCHAR2 Optional
5402: -- Number of the contract
5403: -- : p_org_id IN NUMBER Required
5404: -- Id of the contract organization

Line 5478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

5474: -- Standard Start of API savepoint
5475: SAVEPOINT submit_contract_PVT;
5476:
5477: -- Standard call to check for call compatibility.
5478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5480: END IF;
5481:
5482: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 5479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5475: SAVEPOINT submit_contract_PVT;
5476:
5477: -- Standard call to check for call compatibility.
5478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5480: END IF;
5481:
5482: -- Initialize message list if p_init_msg_list is set to TRUE.
5483: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 5483: IF FND_API.to_Boolean( p_init_msg_list ) THEN

5479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5480: END IF;
5481:
5482: -- Initialize message list if p_init_msg_list is set to TRUE.
5483: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5484: FND_MSG_PUB.initialize;
5485: END IF;
5486:
5487: -- Initialize API return status to success

Line 5488: x_return_status := FND_API.G_RET_STS_SUCCESS;

5484: FND_MSG_PUB.initialize;
5485: END IF;
5486:
5487: -- Initialize API return status to success
5488: x_return_status := FND_API.G_RET_STS_SUCCESS;
5489:
5490: -- Get value of the profile option "Sequential Numbering"
5491: l_profile_doc_seq := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
5492:

Line 5495: x_auto_number_enabled := FND_API.G_FALSE;

5491: l_profile_doc_seq := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
5492:
5493: IF p_info_only = 'Y' AND
5494: l_profile_doc_seq = 'N' THEN
5495: x_auto_number_enabled := FND_API.G_FALSE;
5496: return;
5497: END IF;
5498:
5499:

Line 5512: RAISE FND_API.G_EXC_ERROR ;

5508: 'Set of book id not found');
5509: END IF;
5510:
5511: CLOSE l_get_sob_csr;
5512: RAISE FND_API.G_EXC_ERROR ;
5513: END IF;
5514: l_row_notfound := FALSE;
5515: l_doc_category_code := substr(Fnd_Profile.Value('OKC_REP_CON_NUM_DOC_SEQ_CATEGORY'),1,30);
5516:

Line 5535: RAISE FND_API.G_EXC_ERROR;

5531: suppress_error => 'N' ,
5532: suppress_warn => 'Y');
5533:
5534: IF l_result <> FND_SEQNUM.SEQSUCC THEN
5535: RAISE FND_API.G_EXC_ERROR;
5536: END IF;
5537:
5538: IF p_info_only = 'Y' THEN
5539: IF l_doc_sequence_type <> 'M' THEN

Line 5540: x_auto_number_enabled := FND_API.G_TRUE;

5536: END IF;
5537:
5538: IF p_info_only = 'Y' THEN
5539: IF l_doc_sequence_type <> 'M' THEN
5540: x_auto_number_enabled := FND_API.G_TRUE;
5541: ELSE
5542: x_auto_number_enabled := FND_API.G_FALSE;
5543: END IF;
5544: return;

Line 5542: x_auto_number_enabled := FND_API.G_FALSE;

5538: IF p_info_only = 'Y' THEN
5539: IF l_doc_sequence_type <> 'M' THEN
5540: x_auto_number_enabled := FND_API.G_TRUE;
5541: ELSE
5542: x_auto_number_enabled := FND_API.G_FALSE;
5543: END IF;
5544: return;
5545: END IF;
5546:

Line 5559: RAISE FND_API.G_EXC_ERROR;

5555: seq_val => l_doc_sequence_value,
5556: docseq_id => l_doc_sequence_id);
5557:
5558: IF l_result <> 0 THEN
5559: RAISE FND_API.G_EXC_ERROR;
5560: ELSE
5561: x_contract_number := TO_CHAR(l_doc_sequence_value);
5562: END IF;
5563:

Line 5575: RAISE FND_API.G_EXC_ERROR;

5571: ELSE
5572: -- Show duplicate Contract number error message
5573: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5574: p_msg_name => G_INVALID_CONTRACT_NUMBER_MSG);
5575: RAISE FND_API.G_EXC_ERROR;
5576:
5577: END IF;
5578:
5579: ELSIF (l_doc_sequence_type = 'M') THEN

Line 5593: WHEN FND_API.G_EXC_ERROR THEN

5589: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
5590: END IF;
5591:
5592: EXCEPTION
5593: WHEN FND_API.G_EXC_ERROR THEN
5594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5596: g_module || l_api_name,
5597: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');

Line 5597: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');

5593: WHEN FND_API.G_EXC_ERROR THEN
5594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5596: g_module || l_api_name,
5597: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');
5598: END IF;
5599: --close cursors
5600: IF (l_ensure_unique_csr%ISOPEN) THEN
5601: CLOSE l_ensure_unique_csr ;

Line 5609: x_return_status := FND_API.G_RET_STS_ERROR;

5605: CLOSE l_get_sob_csr ;
5606: END IF;
5607:
5608: ROLLBACK TO submit_contract_PVT;
5609: x_return_status := FND_API.G_RET_STS_ERROR;
5610: FND_MSG_PUB.Count_And_Get(
5611: p_count => x_msg_count,
5612: p_data => x_msg_data
5613: );

Line 5615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5611: p_count => x_msg_count,
5612: p_data => x_msg_data
5613: );
5614:
5615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5616: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5617: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5618: g_module || l_api_name,
5619: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 5619: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

5615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5616: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5617: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5618: g_module || l_api_name,
5619: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5620: END IF;
5621: --close cursors
5622: IF (l_ensure_unique_csr%ISOPEN) THEN
5623: CLOSE l_ensure_unique_csr ;

Line 5631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5627: CLOSE l_get_sob_csr ;
5628: END IF;
5629:
5630: ROLLBACK TO submit_contract_PVT;
5631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5632: FND_MSG_PUB.Count_And_Get(
5633: p_count => x_msg_count,
5634: p_data => x_msg_data
5635: );

Line 5659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5655: p_token1_value => sqlcode,
5656: p_token2 => G_SQLERRM_TOKEN,
5657: p_token2_value => sqlerrm);
5658: ROLLBACK TO submit_contract_PVT;
5659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5660: FND_MSG_PUB.Count_And_Get(
5661: p_count => x_msg_count,
5662: p_data => x_msg_data
5663: );