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 75: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

71: l_api_version := 1.0;
72: -- Standard Start of API savepoint
73: SAVEPOINT submit_contract_PVT;
74: -- Standard call to check for call compatibility.
75: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
78: -- Initialize message list if p_init_msg_list is set to TRUE.
79: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

72: -- Standard Start of API savepoint
73: SAVEPOINT submit_contract_PVT;
74: -- Standard call to check for call compatibility.
75: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
78: -- Initialize message list if p_init_msg_list is set to TRUE.
79: IF FND_API.to_Boolean( p_init_msg_list ) THEN
80: FND_MSG_PUB.initialize;

Line 79: IF FND_API.to_Boolean( p_init_msg_list ) THEN

75: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
76: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
77: END IF;
78: -- Initialize message list if p_init_msg_list is set to TRUE.
79: IF FND_API.to_Boolean( p_init_msg_list ) THEN
80: FND_MSG_PUB.initialize;
81: END IF;
82: -- Initialize API return status to success
83: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 83: x_return_status := FND_API.G_RET_STS_SUCCESS;

79: IF FND_API.to_Boolean( p_init_msg_list ) THEN
80: FND_MSG_PUB.initialize;
81: END IF;
82: -- Initialize API return status to success
83: x_return_status := FND_API.G_RET_STS_SUCCESS;
84:
85: SELECT OKC_REP_WF_S.nextval INTO l_wf_sequence FROM dual;
86: -- Get contract number
87: OPEN contract_csr;

Line 99: RAISE FND_API.G_EXC_ERROR;

95: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
96: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
97: p_token1 => G_CONTRACT_ID_TOKEN,
98: p_token1_value => to_char(p_contract_id));
99: RAISE FND_API.G_EXC_ERROR;
100: -- RAISE NO_DATA_FOUND;
101: END IF;
102:
103:

Line 116: RAISE FND_API.G_EXC_ERROR;

112: G_MODULE||l_api_name,
113: 'Workflow not associated for the Document');
114: END IF;
115:
116: RAISE FND_API.G_EXC_ERROR;
117:
118: END IF;
119:
120:

Line 130: p_init_msg_list => FND_API.G_FALSE,

126: END IF;
127: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
128: OKC_REP_UTIL_PVT.change_contract_status(
129: p_api_version => 1.0,
130: p_init_msg_list => FND_API.G_FALSE,
131: p_contract_id => p_contract_id,
132: p_contract_version => p_contract_version,
133: p_status_code => G_STATUS_PENDING_APPROVAL,
134: p_user_id => fnd_global.user_id,

Line 160: p_init_msg_list => FND_API.G_FALSE,

156: END IF;
157: -- Add a record in ONC_REP_CON_APPROVALS table.
158: OKC_REP_UTIL_PVT.add_approval_hist_record(
159: p_api_version => 1.0,
160: p_init_msg_list => FND_API.G_FALSE,
161: p_contract_id => p_contract_id,
162: p_contract_version => p_contract_version,
163: p_action_code => G_ACTION_SUBMITTED,
164: p_user_id => fnd_global.user_id,

Line 337: WHEN FND_API.G_EXC_ERROR THEN

333: 'Leaving OKC_REP_WF_PVT.submit_contract');
334: END IF;
335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_ERROR THEN
338: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
339: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
340: g_module || l_api_name,
341: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');

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

337: WHEN FND_API.G_EXC_ERROR THEN
338: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
339: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
340: g_module || l_api_name,
341: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
342: END IF;
343: --close cursors
344: IF (contract_csr%ISOPEN) THEN
345: CLOSE contract_csr ;

Line 348: x_return_status := FND_API.G_RET_STS_ERROR;

344: IF (contract_csr%ISOPEN) THEN
345: CLOSE contract_csr ;
346: END IF;
347: ROLLBACK TO submit_contract_PVT;
348: x_return_status := FND_API.G_RET_STS_ERROR;
349: FND_MSG_PUB.Count_And_Get(
350: p_count => x_msg_count,
351: p_data => x_msg_data
352: );

Line 354: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

350: p_count => x_msg_count,
351: p_data => x_msg_data
352: );
353:
354: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
355: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
357: g_module || l_api_name,
358: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

354: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
355: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
357: g_module || l_api_name,
358: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
359: END IF;
360: --close cursors
361: IF (contract_csr%ISOPEN) THEN
362: CLOSE contract_csr ;

Line 365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

361: IF (contract_csr%ISOPEN) THEN
362: CLOSE contract_csr ;
363: END IF;
364: ROLLBACK TO submit_contract_PVT;
365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
366: FND_MSG_PUB.Count_And_Get(
367: p_count => x_msg_count,
368: p_data => x_msg_data
369: );

Line 388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

384: p_token1_value => sqlcode,
385: p_token2 => G_SQLERRM_TOKEN,
386: p_token2_value => sqlerrm);
387: ROLLBACK TO submit_contract_PVT;
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
389: FND_MSG_PUB.Count_And_Get(
390: p_count => x_msg_count,
391: p_data => x_msg_data
392: );

Line 406: -- Default = FND_API.G_FALSE

402: --Pre-reqs : None.
403: --Parameters :
404: --IN : p_api_version IN NUMBER Required
405: -- : p_init_msg_list IN VARCHAR2 Optional
406: -- Default = FND_API.G_FALSE
407: -- : p_commit IN VARCHAR2 Optional
408: -- Default = FND_API.G_FALSE
409: -- : p_contract_id IN NUMBER Required
410: -- Contract ID of the contract whose contacts are to be deleted

Line 408: -- Default = FND_API.G_FALSE

404: --IN : p_api_version IN NUMBER Required
405: -- : p_init_msg_list IN VARCHAR2 Optional
406: -- Default = FND_API.G_FALSE
407: -- : p_commit IN VARCHAR2 Optional
408: -- Default = FND_API.G_FALSE
409: -- : p_contract_id IN NUMBER Required
410: -- Contract ID of the contract whose contacts are to be deleted
411: --OUT : x_return_status OUT VARCHAR2(1)
412: -- : x_msg_count OUT NUMBER

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

437: l_api_version := 1.0;
438: -- Standard Start of API savepoint
439: SAVEPOINT delete_contacts_PVT;
440: -- Standard call to check for call compatibility.
441: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
443: END IF;
444: -- Initialize message list if p_init_msg_list is set to TRUE.
445: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

438: -- Standard Start of API savepoint
439: SAVEPOINT delete_contacts_PVT;
440: -- Standard call to check for call compatibility.
441: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
443: END IF;
444: -- Initialize message list if p_init_msg_list is set to TRUE.
445: IF FND_API.to_Boolean( p_init_msg_list ) THEN
446: FND_MSG_PUB.initialize;

Line 445: IF FND_API.to_Boolean( p_init_msg_list ) THEN

441: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
443: END IF;
444: -- Initialize message list if p_init_msg_list is set to TRUE.
445: IF FND_API.to_Boolean( p_init_msg_list ) THEN
446: FND_MSG_PUB.initialize;
447: END IF;
448:
449: -- Initialize API return status to success

Line 450: x_return_status := FND_API.G_RET_STS_SUCCESS;

446: FND_MSG_PUB.initialize;
447: END IF;
448:
449: -- Initialize API return status to success
450: x_return_status := FND_API.G_RET_STS_SUCCESS;
451:
452: -- Delete the records. The records are locked in the delete_contract API.
453: DELETE FROM OKC_REP_PARTY_CONTACTS
454: WHERE CONTRACT_ID = p_CONTRACT_ID;

Line 457: IF FND_API.To_Boolean( p_commit ) THEN

453: DELETE FROM OKC_REP_PARTY_CONTACTS
454: WHERE CONTRACT_ID = p_CONTRACT_ID;
455:
456: -- Standard check of p_commit
457: IF FND_API.To_Boolean( p_commit ) THEN
458: COMMIT WORK;
459: END IF;
460:
461: -- Standard call to get message count and if count is 1, get message info.

Line 471: WHEN FND_API.G_EXC_ERROR THEN

467: END IF;
468:
469:
470: EXCEPTION
471: WHEN FND_API.G_EXC_ERROR THEN
472: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
474: g_module || l_api_name,
475: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');

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

471: WHEN FND_API.G_EXC_ERROR THEN
472: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
474: g_module || l_api_name,
475: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
476: END IF;
477: ROLLBACK TO delete_contacts_PVT;
478: x_return_status := FND_API.G_RET_STS_ERROR;
479: FND_MSG_PUB.Count_And_Get(

Line 478: x_return_status := FND_API.G_RET_STS_ERROR;

474: g_module || l_api_name,
475: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
476: END IF;
477: ROLLBACK TO delete_contacts_PVT;
478: x_return_status := FND_API.G_RET_STS_ERROR;
479: FND_MSG_PUB.Count_And_Get(
480: p_count => x_msg_count,
481: p_data => x_msg_data
482: );

Line 484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

480: p_count => x_msg_count,
481: p_data => x_msg_data
482: );
483:
484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
486: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
487: g_module || l_api_name,
488: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
486: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
487: g_module || l_api_name,
488: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
489: END IF;
490: ROLLBACK TO delete_contacts_PVT;
491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
492: FND_MSG_PUB.Count_And_Get(

Line 491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

487: g_module || l_api_name,
488: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
489: END IF;
490: ROLLBACK TO delete_contacts_PVT;
491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
492: FND_MSG_PUB.Count_And_Get(
493: p_count => x_msg_count,
494: p_data => x_msg_data
495: );

Line 510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

506: p_token1_value => sqlcode,
507: p_token2 => G_SQLERRM_TOKEN,
508: p_token2_value => sqlerrm);
509: ROLLBACK TO delete_contacts_PVT;
510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
511: FND_MSG_PUB.Count_And_Get(
512: p_count => x_msg_count,
513: p_data => x_msg_data
514: );

Line 526: -- Default = FND_API.G_FALSE

522: --Pre-reqs : None.
523: --Parameters :
524: --IN : p_api_version IN NUMBER Required
525: -- : p_init_msg_list IN VARCHAR2 Optional
526: -- Default = FND_API.G_FALSE
527: -- : p_commit IN VARCHAR2 Optional
528: -- Default = FND_API.G_FALSE
529: -- : p_contract_id IN NUMBER Required
530: -- Contract ID of the contract whose parties are to be deleted

Line 528: -- Default = FND_API.G_FALSE

524: --IN : p_api_version IN NUMBER Required
525: -- : p_init_msg_list IN VARCHAR2 Optional
526: -- Default = FND_API.G_FALSE
527: -- : p_commit IN VARCHAR2 Optional
528: -- Default = FND_API.G_FALSE
529: -- : p_contract_id IN NUMBER Required
530: -- Contract ID of the contract whose parties are to be deleted
531: --OUT : x_return_status OUT VARCHAR2(1)
532: -- : x_msg_count OUT NUMBER

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

556: l_api_version := 1.0;
557: -- Standard Start of API savepoint
558: SAVEPOINT delete_parties_PVT;
559: -- Standard call to check for call compatibility.
560: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
562: END IF;
563: -- Initialize message list if p_init_msg_list is set to TRUE.
564: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

557: -- Standard Start of API savepoint
558: SAVEPOINT delete_parties_PVT;
559: -- Standard call to check for call compatibility.
560: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
562: END IF;
563: -- Initialize message list if p_init_msg_list is set to TRUE.
564: IF FND_API.to_Boolean( p_init_msg_list ) THEN
565: FND_MSG_PUB.initialize;

Line 564: IF FND_API.to_Boolean( p_init_msg_list ) THEN

560: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
562: END IF;
563: -- Initialize message list if p_init_msg_list is set to TRUE.
564: IF FND_API.to_Boolean( p_init_msg_list ) THEN
565: FND_MSG_PUB.initialize;
566: END IF;
567:
568: -- Initialize API return status to success

Line 569: x_return_status := FND_API.G_RET_STS_SUCCESS;

565: FND_MSG_PUB.initialize;
566: END IF;
567:
568: -- Initialize API return status to success
569: x_return_status := FND_API.G_RET_STS_SUCCESS;
570:
571: -- Delete the records. The records are locked in the delete_contract API.
572: DELETE FROM OKC_REP_CONTRACT_PARTIES
573: WHERE CONTRACT_ID = p_CONTRACT_ID;

Line 576: IF FND_API.To_Boolean( p_commit ) THEN

572: DELETE FROM OKC_REP_CONTRACT_PARTIES
573: WHERE CONTRACT_ID = p_CONTRACT_ID;
574:
575: -- Standard check of p_commit
576: IF FND_API.To_Boolean( p_commit ) THEN
577: COMMIT WORK;
578: END IF;
579:
580: -- Standard call to get message count and if count is 1, get message info.

Line 590: WHEN FND_API.G_EXC_ERROR THEN

586: END IF;
587:
588:
589: EXCEPTION
590: WHEN FND_API.G_EXC_ERROR THEN
591: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
593: g_module || l_api_name,
594: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');

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

590: WHEN FND_API.G_EXC_ERROR THEN
591: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
593: g_module || l_api_name,
594: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
595: END IF;
596: ROLLBACK TO delete_parties_PVT;
597: x_return_status := FND_API.G_RET_STS_ERROR;
598: FND_MSG_PUB.Count_And_Get(

Line 597: x_return_status := FND_API.G_RET_STS_ERROR;

593: g_module || l_api_name,
594: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
595: END IF;
596: ROLLBACK TO delete_parties_PVT;
597: x_return_status := FND_API.G_RET_STS_ERROR;
598: FND_MSG_PUB.Count_And_Get(
599: p_count => x_msg_count,
600: p_data => x_msg_data
601: );

Line 603: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

599: p_count => x_msg_count,
600: p_data => x_msg_data
601: );
602:
603: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
605: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
606: g_module || l_api_name,
607: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

603: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
605: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
606: g_module || l_api_name,
607: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
608: END IF;
609: ROLLBACK TO delete_parties_PVT;
610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
611: FND_MSG_PUB.Count_And_Get(

Line 610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

606: g_module || l_api_name,
607: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
608: END IF;
609: ROLLBACK TO delete_parties_PVT;
610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
611: FND_MSG_PUB.Count_And_Get(
612: p_count => x_msg_count,
613: p_data => x_msg_data
614: );

Line 629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

625: p_token1_value => sqlcode,
626: p_token2 => G_SQLERRM_TOKEN,
627: p_token2_value => sqlerrm);
628: ROLLBACK TO delete_parties_PVT;
629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
630: FND_MSG_PUB.Count_And_Get(
631: p_count => x_msg_count,
632: p_data => x_msg_data
633: );

Line 645: -- Default = FND_API.G_FALSE

641: --Pre-reqs : None.
642: --Parameters :
643: --IN : p_api_version IN NUMBER Required
644: -- : p_init_msg_list IN VARCHAR2 Optional
645: -- Default = FND_API.G_FALSE
646: -- : p_commit IN VARCHAR2 Optional
647: -- Default = FND_API.G_FALSE
648: -- : p_contract_id IN NUMBER Required
649: -- Contract ID of the contract whose risks are to be deleted

Line 647: -- Default = FND_API.G_FALSE

643: --IN : p_api_version IN NUMBER Required
644: -- : p_init_msg_list IN VARCHAR2 Optional
645: -- Default = FND_API.G_FALSE
646: -- : p_commit IN VARCHAR2 Optional
647: -- Default = FND_API.G_FALSE
648: -- : p_contract_id IN NUMBER Required
649: -- Contract ID of the contract whose risks are to be deleted
650: --OUT : x_return_status OUT VARCHAR2(1)
651: -- : x_msg_count OUT NUMBER

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

683: l_api_version := 1.0;
684: -- Standard Start of API savepoint
685: SAVEPOINT delete_risks_PVT;
686: -- Standard call to check for call compatibility.
687: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690: -- Initialize message list if p_init_msg_list is set to TRUE.
691: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

684: -- Standard Start of API savepoint
685: SAVEPOINT delete_risks_PVT;
686: -- Standard call to check for call compatibility.
687: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690: -- Initialize message list if p_init_msg_list is set to TRUE.
691: IF FND_API.to_Boolean( p_init_msg_list ) THEN
692: FND_MSG_PUB.initialize;

Line 691: IF FND_API.to_Boolean( p_init_msg_list ) THEN

687: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END IF;
690: -- Initialize message list if p_init_msg_list is set to TRUE.
691: IF FND_API.to_Boolean( p_init_msg_list ) THEN
692: FND_MSG_PUB.initialize;
693: END IF;
694:
695: -- Initialize API return status to success

Line 696: x_return_status := FND_API.G_RET_STS_SUCCESS;

692: FND_MSG_PUB.initialize;
693: END IF;
694:
695: -- Initialize API return status to success
696: x_return_status := FND_API.G_RET_STS_SUCCESS;
697: -- Get contract_type and version of the contract.
698: OPEN contract_csr;
699: FETCH contract_csr INTO contract_rec;
700: IF(contract_csr%NOTFOUND) THEN

Line 710: RAISE FND_API.G_EXC_ERROR;

706: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
707: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
708: p_token1 => G_CONTRACT_ID_TOKEN,
709: p_token1_value => to_char(p_contract_id));
710: RAISE FND_API.G_EXC_ERROR;
711: -- RAISE NO_DATA_FOUND;
712: END IF;
713: -- Delete the records. The records are locked in the delete_contract API.
714: DELETE FROM OKC_CONTRACT_RISKS

Line 721: IF FND_API.To_Boolean( p_commit ) THEN

717: AND BUSINESS_DOCUMENT_VERSION = contract_rec.contract_version_num;
718: -- Close cursor
719: CLOSE contract_csr;
720: -- Standard check of p_commit
721: IF FND_API.To_Boolean( p_commit ) THEN
722: COMMIT WORK;
723: END IF;
724:
725: -- Standard call to get message count and if count is 1, get message info.

Line 735: WHEN FND_API.G_EXC_ERROR THEN

731: END IF;
732:
733:
734: EXCEPTION
735: WHEN FND_API.G_EXC_ERROR THEN
736: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
738: g_module || l_api_name,
739: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');

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

735: WHEN FND_API.G_EXC_ERROR THEN
736: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
738: g_module || l_api_name,
739: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');
740: END IF;
741: --close cursors
742: IF (contract_csr%ISOPEN) THEN
743: CLOSE contract_csr ;

Line 746: x_return_status := FND_API.G_RET_STS_ERROR;

742: IF (contract_csr%ISOPEN) THEN
743: CLOSE contract_csr ;
744: END IF;
745: ROLLBACK TO delete_risks_PVT;
746: x_return_status := FND_API.G_RET_STS_ERROR;
747: FND_MSG_PUB.Count_And_Get(
748: p_count => x_msg_count,
749: p_data => x_msg_data
750: );

Line 752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

748: p_count => x_msg_count,
749: p_data => x_msg_data
750: );
751:
752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
753: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
755: g_module || l_api_name,
756: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
753: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
755: g_module || l_api_name,
756: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
757: END IF;
758: --close cursors
759: IF (contract_csr%ISOPEN) THEN
760: CLOSE contract_csr ;

Line 763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

759: IF (contract_csr%ISOPEN) THEN
760: CLOSE contract_csr ;
761: END IF;
762: ROLLBACK TO delete_risks_PVT;
763: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
764: FND_MSG_PUB.Count_And_Get(
765: p_count => x_msg_count,
766: p_data => x_msg_data
767: );

Line 786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

782: p_token1_value => sqlcode,
783: p_token2 => G_SQLERRM_TOKEN,
784: p_token2_value => sqlerrm);
785: ROLLBACK TO delete_risks_PVT;
786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
787: FND_MSG_PUB.Count_And_Get(
788: p_count => x_msg_count,
789: p_data => x_msg_data
790: );

Line 802: -- Default = FND_API.G_FALSE

798: --Pre-reqs : None.
799: --Parameters :
800: --IN : p_api_version IN NUMBER Required
801: -- : p_init_msg_list IN VARCHAR2 Optional
802: -- Default = FND_API.G_FALSE
803: -- : p_commit IN VARCHAR2 Optional
804: -- Default = FND_API.G_FALSE
805: -- : p_contract_id IN NUMBER Required
806: -- Contract ID of the contract whose related contracts are to be deleted

Line 804: -- Default = FND_API.G_FALSE

800: --IN : p_api_version IN NUMBER Required
801: -- : p_init_msg_list IN VARCHAR2 Optional
802: -- Default = FND_API.G_FALSE
803: -- : p_commit IN VARCHAR2 Optional
804: -- Default = FND_API.G_FALSE
805: -- : p_contract_id IN NUMBER Required
806: -- Contract ID of the contract whose related contracts are to be deleted
807: --OUT : x_return_status OUT VARCHAR2(1)
808: -- : x_msg_count OUT NUMBER

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

841: l_api_version := 1.0;
842: -- Standard Start of API savepoint
843: SAVEPOINT delete_related_contracts_PVT;
844: -- Standard call to check for call compatibility.
845: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
847: END IF;
848: -- Initialize message list if p_init_msg_list is set to TRUE.
849: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

842: -- Standard Start of API savepoint
843: SAVEPOINT delete_related_contracts_PVT;
844: -- Standard call to check for call compatibility.
845: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
847: END IF;
848: -- Initialize message list if p_init_msg_list is set to TRUE.
849: IF FND_API.to_Boolean( p_init_msg_list ) THEN
850: FND_MSG_PUB.initialize;

Line 849: IF FND_API.to_Boolean( p_init_msg_list ) THEN

845: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
847: END IF;
848: -- Initialize message list if p_init_msg_list is set to TRUE.
849: IF FND_API.to_Boolean( p_init_msg_list ) THEN
850: FND_MSG_PUB.initialize;
851: END IF;
852:
853: -- Initialize API return status to success

Line 854: x_return_status := FND_API.G_RET_STS_SUCCESS;

850: FND_MSG_PUB.initialize;
851: END IF;
852:
853: -- Initialize API return status to success
854: x_return_status := FND_API.G_RET_STS_SUCCESS;
855:
856: -- Get contract_type and version of the contract.
857: OPEN contract_csr;
858: FETCH contract_csr INTO contract_rec;

Line 869: RAISE FND_API.G_EXC_ERROR;

865: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
866: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
867: p_token1 => G_CONTRACT_ID_TOKEN,
868: p_token1_value => to_char(p_contract_id));
869: RAISE FND_API.G_EXC_ERROR;
870: -- RAISE NO_DATA_FOUND;
871: END IF;
872:
873: -- Delete the records. The records are locked in the delete_contract API.

Line 880: IF FND_API.To_Boolean( p_commit ) THEN

876: AND contract_ID = p_CONTRACT_ID
877: AND contract_VERSION = contract_rec.contract_version_num;
878:
879: -- Standard check of p_commit
880: IF FND_API.To_Boolean( p_commit ) THEN
881: COMMIT WORK;
882: END IF;
883:
884: -- Standard call to get message count and if count is 1, get message info.

Line 894: WHEN FND_API.G_EXC_ERROR THEN

890: END IF;
891:
892:
893: EXCEPTION
894: WHEN FND_API.G_EXC_ERROR THEN
895: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
897: g_module || l_api_name,
898: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');

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

894: WHEN FND_API.G_EXC_ERROR THEN
895: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
897: g_module || l_api_name,
898: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
899: END IF;
900: ROLLBACK TO delete_related_contracts_PVT;
901: x_return_status := FND_API.G_RET_STS_ERROR;
902: FND_MSG_PUB.Count_And_Get(

Line 901: x_return_status := FND_API.G_RET_STS_ERROR;

897: g_module || l_api_name,
898: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
899: END IF;
900: ROLLBACK TO delete_related_contracts_PVT;
901: x_return_status := FND_API.G_RET_STS_ERROR;
902: FND_MSG_PUB.Count_And_Get(
903: p_count => x_msg_count,
904: p_data => x_msg_data
905: );

Line 907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

903: p_count => x_msg_count,
904: p_data => x_msg_data
905: );
906:
907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
908: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
909: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
910: g_module || l_api_name,
911: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
908: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
909: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
910: g_module || l_api_name,
911: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
912: END IF;
913: ROLLBACK TO delete_related_contracts_PVT;
914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
915: FND_MSG_PUB.Count_And_Get(

Line 914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

910: g_module || l_api_name,
911: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
912: END IF;
913: ROLLBACK TO delete_related_contracts_PVT;
914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
915: FND_MSG_PUB.Count_And_Get(
916: p_count => x_msg_count,
917: p_data => x_msg_data
918: );

Line 933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

929: p_token1_value => sqlcode,
930: p_token2 => G_SQLERRM_TOKEN,
931: p_token2_value => sqlerrm);
932: ROLLBACK TO delete_related_contracts_PVT;
933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
934: FND_MSG_PUB.Count_And_Get(
935: p_count => x_msg_count,
936: p_data => x_msg_data
937: );

Line 948: -- Default = FND_API.G_FALSE

944: --Pre-reqs : None.
945: --Parameters :
946: --IN : p_api_version IN NUMBER Required
947: -- : p_init_msg_list IN VARCHAR2 Optional
948: -- Default = FND_API.G_FALSE
949: -- : p_commit IN VARCHAR2 Optional
950: -- Default = FND_API.G_FALSE
951: -- : p_contract_id IN NUMBER Required
952: -- Contract ID of the contract whose ACL is to be deleted

Line 950: -- Default = FND_API.G_FALSE

946: --IN : p_api_version IN NUMBER Required
947: -- : p_init_msg_list IN VARCHAR2 Optional
948: -- Default = FND_API.G_FALSE
949: -- : p_commit IN VARCHAR2 Optional
950: -- Default = FND_API.G_FALSE
951: -- : p_contract_id IN NUMBER Required
952: -- Contract ID of the contract whose ACL is to be deleted
953: --OUT : x_return_status OUT VARCHAR2(1)
954: -- : x_msg_count OUT NUMBER

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

997: l_api_version := 1.0;
998: -- Standard Start of API savepoint
999: SAVEPOINT delete_ACL_PVT;
1000: -- Standard call to check for call compatibility.
1001: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003: END IF;
1004: -- Initialize message list if p_init_msg_list is set to TRUE.
1005: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

998: -- Standard Start of API savepoint
999: SAVEPOINT delete_ACL_PVT;
1000: -- Standard call to check for call compatibility.
1001: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003: END IF;
1004: -- Initialize message list if p_init_msg_list is set to TRUE.
1005: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1006: FND_MSG_PUB.initialize;

Line 1005: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1001: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003: END IF;
1004: -- Initialize message list if p_init_msg_list is set to TRUE.
1005: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1006: FND_MSG_PUB.initialize;
1007: END IF;
1008:
1009: -- Initialize API return status to success

Line 1010: x_return_status := FND_API.G_RET_STS_SUCCESS;

1006: FND_MSG_PUB.initialize;
1007: END IF;
1008:
1009: -- Initialize API return status to success
1010: x_return_status := FND_API.G_RET_STS_SUCCESS;
1011:
1012: FOR acl_rec IN acl_csr LOOP
1013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1051: IF FND_API.To_Boolean( p_commit ) THEN

1047: END IF;
1048: --------------------------------------------------------
1049: END LOOP;
1050: -- Standard check of p_commit
1051: IF FND_API.To_Boolean( p_commit ) THEN
1052: COMMIT WORK;
1053: END IF;
1054:
1055: -- Standard call to get message count and if count is 1, get message info.

Line 1065: WHEN FND_API.G_EXC_ERROR THEN

1061: END IF;
1062:
1063:
1064: EXCEPTION
1065: WHEN FND_API.G_EXC_ERROR THEN
1066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1067: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1068: g_module || l_api_name,
1069: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');

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

1065: WHEN FND_API.G_EXC_ERROR THEN
1066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1067: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1068: g_module || l_api_name,
1069: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');
1070: END IF;
1071: --close cursors
1072: IF (acl_csr%ISOPEN) THEN
1073: CLOSE acl_csr ;

Line 1076: x_return_status := FND_API.G_RET_STS_ERROR;

1072: IF (acl_csr%ISOPEN) THEN
1073: CLOSE acl_csr ;
1074: END IF;
1075: ROLLBACK TO delete_ACL_PVT;
1076: x_return_status := FND_API.G_RET_STS_ERROR;
1077: FND_MSG_PUB.Count_And_Get(
1078: p_count => x_msg_count,
1079: p_data => x_msg_data
1080: );

Line 1082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

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

1082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1083: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1084: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1085: g_module || l_api_name,
1086: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1087: END IF;
1088: IF (acl_csr%ISOPEN) THEN
1089: CLOSE acl_csr ;
1090: END IF;

Line 1092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1088: IF (acl_csr%ISOPEN) THEN
1089: CLOSE acl_csr ;
1090: END IF;
1091: ROLLBACK TO delete_ACL_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 1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1110: p_token1_value => sqlcode,
1111: p_token2 => G_SQLERRM_TOKEN,
1112: p_token2_value => sqlerrm);
1113: ROLLBACK TO delete_ACL_PVT;
1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1115: FND_MSG_PUB.Count_And_Get(
1116: p_count => x_msg_count,
1117: p_data => x_msg_data
1118: );

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 status 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 status history is to be deleted
1135: -- : p_contract_version IN NUMBER Required
1136: -- Contract version of the contract whose status 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_status_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_status_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_STATUS_HIST
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_status_history:FND_API.G_EXC_ERROR Exception');

Line 1205: 'Leaving delete_status_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_status_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;
1207: ROLLBACK TO delete_status_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_status_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;
1207: ROLLBACK TO delete_status_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_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 1218: 'Leaving delete_status_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_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;
1220: ROLLBACK TO delete_status_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_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;
1220: ROLLBACK TO delete_status_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_status_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 1259: -- Default = FND_API.G_FALSE

1255: --Pre-reqs : None.
1256: --Parameters :
1257: --IN : p_api_version IN NUMBER Required
1258: -- : p_init_msg_list IN VARCHAR2 Optional
1259: -- Default = FND_API.G_FALSE
1260: -- : p_commit IN VARCHAR2 Optional
1261: -- Default = FND_API.G_FALSE
1262: -- : p_contract_id IN NUMBER Required
1263: -- Contract ID of the contract whose approval history is to be deleted

Line 1261: -- Default = FND_API.G_FALSE

1257: --IN : p_api_version IN NUMBER Required
1258: -- : p_init_msg_list IN VARCHAR2 Optional
1259: -- Default = FND_API.G_FALSE
1260: -- : p_commit IN VARCHAR2 Optional
1261: -- Default = FND_API.G_FALSE
1262: -- : p_contract_id IN NUMBER Required
1263: -- Contract ID of the contract whose approval history is to be deleted
1264: -- : p_contract_version IN NUMBER Required
1265: -- Contract version of the contract whose approval history is to be deleted

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

1295: l_api_version := 1.0;
1296: -- Standard Start of API savepoint
1297: SAVEPOINT delete_approval_history_PVT;
1298: -- Standard call to check for call compatibility.
1299: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: -- Initialize message list if p_init_msg_list is set to TRUE.
1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1296: -- Standard Start of API savepoint
1297: SAVEPOINT delete_approval_history_PVT;
1298: -- Standard call to check for call compatibility.
1299: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: -- Initialize message list if p_init_msg_list is set to TRUE.
1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1304: FND_MSG_PUB.initialize;

Line 1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1299: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: -- Initialize message list if p_init_msg_list is set to TRUE.
1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1304: FND_MSG_PUB.initialize;
1305: END IF;
1306:
1307: -- Initialize API return status to success

Line 1308: x_return_status := FND_API.G_RET_STS_SUCCESS;

1304: FND_MSG_PUB.initialize;
1305: END IF;
1306:
1307: -- Initialize API return status to success
1308: x_return_status := FND_API.G_RET_STS_SUCCESS;
1309:
1310: -- Delete the records. The records are locked in the delete_contract API.
1311: DELETE FROM OKC_REP_CON_APPROVALS
1312: WHERE CONTRACT_ID = p_CONTRACT_ID

Line 1316: IF FND_API.To_Boolean( p_commit ) THEN

1312: WHERE CONTRACT_ID = p_CONTRACT_ID
1313: AND CONTRACT_VERSION_NUM = p_contract_version;
1314:
1315: -- Standard check of p_commit
1316: IF FND_API.To_Boolean( p_commit ) THEN
1317: COMMIT WORK;
1318: END IF;
1319:
1320: -- Standard call to get message count and if count is 1, get message info.

Line 1330: WHEN FND_API.G_EXC_ERROR THEN

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

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

1330: WHEN FND_API.G_EXC_ERROR THEN
1331: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1332: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1333: g_module || l_api_name,
1334: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1335: END IF;
1336: ROLLBACK TO delete_approval_history_PVT;
1337: x_return_status :=FND_API.G_RET_STS_ERROR;
1338: FND_MSG_PUB.Count_And_Get(

Line 1337: x_return_status :=FND_API.G_RET_STS_ERROR;

1333: g_module || l_api_name,
1334: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1335: END IF;
1336: ROLLBACK TO delete_approval_history_PVT;
1337: x_return_status :=FND_API.G_RET_STS_ERROR;
1338: FND_MSG_PUB.Count_And_Get(
1339: p_count => x_msg_count,
1340: p_data => x_msg_data
1341: );

Line 1343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

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

1343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1346: g_module || l_api_name,
1347: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1348: END IF;
1349: ROLLBACK TO delete_approval_history_PVT;
1350: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;
1351: FND_MSG_PUB.Count_And_Get(

Line 1350: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;

1346: g_module || l_api_name,
1347: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1348: END IF;
1349: ROLLBACK TO delete_approval_history_PVT;
1350: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;
1351: FND_MSG_PUB.Count_And_Get(
1352: p_count => x_msg_count,
1353: p_data => x_msg_data
1354: );

Line 1369: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;

1365: p_token1_value => sqlcode,
1366: p_token2 => G_SQLERRM_TOKEN,
1367: p_token2_value => sqlerrm);
1368: ROLLBACK TO delete_approval_history_PVT;
1369: x_return_status :=FND_API.G_RET_STS_UNEXP_ERROR;
1370: FND_MSG_PUB.Count_And_Get(
1371: p_count => x_msg_count,
1372: p_data => x_msg_data
1373: );

Line 1384: -- Default = FND_API.G_FALSE

1380: --Pre-reqs : None.
1381: --Parameters :
1382: --IN : p_api_version IN NUMBER Required
1383: -- : p_init_msg_list IN VARCHAR2 Optional
1384: -- Default = FND_API.G_FALSE
1385: -- : p_commit IN VARCHAR2 Optional
1386: -- Default = FND_API.G_FALSE
1387: -- : p_contract_type IN VARCHAR2 Required
1388: -- Contract Type of the contract whose status history is to be deleted

Line 1386: -- Default = FND_API.G_FALSE

1382: --IN : p_api_version IN NUMBER Required
1383: -- : p_init_msg_list IN VARCHAR2 Optional
1384: -- Default = FND_API.G_FALSE
1385: -- : p_commit IN VARCHAR2 Optional
1386: -- Default = FND_API.G_FALSE
1387: -- : p_contract_type IN VARCHAR2 Required
1388: -- Contract Type of the contract whose status history is to be deleted
1389: -- : p_contract_id IN NUMBER Required
1390: -- Contract ID of the contract whose status history is to be deleted

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

1418: l_api_version := 1.0;
1419: -- Standard Start of API savepoint
1420: SAVEPOINT delete_bookmarks_PVT;
1421: -- Standard call to check for call compatibility.
1422: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1424: END IF;
1425: -- Initialize message list if p_init_msg_list is set to TRUE.
1426: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1419: -- Standard Start of API savepoint
1420: SAVEPOINT delete_bookmarks_PVT;
1421: -- Standard call to check for call compatibility.
1422: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1424: END IF;
1425: -- Initialize message list if p_init_msg_list is set to TRUE.
1426: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1427: FND_MSG_PUB.initialize;

Line 1426: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1422: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1424: END IF;
1425: -- Initialize message list if p_init_msg_list is set to TRUE.
1426: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1427: FND_MSG_PUB.initialize;
1428: END IF;
1429:
1430: -- Initialize API return status to success

Line 1431: x_return_status := FND_API.G_RET_STS_SUCCESS;

1427: FND_MSG_PUB.initialize;
1428: END IF;
1429:
1430: -- Initialize API return status to success
1431: x_return_status := FND_API.G_RET_STS_SUCCESS;
1432:
1433:
1434:
1435: -- Delete the records. The records are locked in the delete_contract API.

Line 1442: IF FND_API.To_Boolean( p_commit ) THEN

1438: AND OBJECT_ID = p_CONTRACT_ID
1439: AND BOOKMARK_TYPE_CODE = G_CONTRACT_BOOKMARK_TYPE;
1440:
1441: -- Standard check of p_commit
1442: IF FND_API.To_Boolean( p_commit ) THEN
1443: COMMIT WORK;
1444: END IF;
1445:
1446: -- Standard call to get message count and if count is 1, get message info.

Line 1456: WHEN FND_API.G_EXC_ERROR THEN

1452: END IF;
1453:
1454:
1455: EXCEPTION
1456: WHEN FND_API.G_EXC_ERROR THEN
1457: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1458: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1459: g_module || l_api_name,
1460: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');

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

1456: WHEN FND_API.G_EXC_ERROR THEN
1457: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1458: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1459: g_module || l_api_name,
1460: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1461: END IF;
1462: ROLLBACK TO delete_bookmarks_PVT;
1463: x_return_status := FND_API.G_RET_STS_ERROR;
1464: FND_MSG_PUB.Count_And_Get(

Line 1463: x_return_status := FND_API.G_RET_STS_ERROR;

1459: g_module || l_api_name,
1460: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1461: END IF;
1462: ROLLBACK TO delete_bookmarks_PVT;
1463: x_return_status := FND_API.G_RET_STS_ERROR;
1464: FND_MSG_PUB.Count_And_Get(
1465: p_count => x_msg_count,
1466: p_data => x_msg_data
1467: );

Line 1469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1465: p_count => x_msg_count,
1466: p_data => x_msg_data
1467: );
1468:
1469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1470: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1471: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1472: g_module || l_api_name,
1473: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

1469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1470: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1471: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1472: g_module || l_api_name,
1473: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1474: END IF;
1475: ROLLBACK TO delete_bookmarks_PVT;
1476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1477: FND_MSG_PUB.Count_And_Get(

Line 1476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1472: g_module || l_api_name,
1473: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1474: END IF;
1475: ROLLBACK TO delete_bookmarks_PVT;
1476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1477: FND_MSG_PUB.Count_And_Get(
1478: p_count => x_msg_count,
1479: p_data => x_msg_data
1480: );

Line 1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1491: p_token1_value => sqlcode,
1492: p_token2 => G_SQLERRM_TOKEN,
1493: p_token2_value => sqlerrm);
1494: ROLLBACK TO delete_bookmarks_PVT;
1495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1496: FND_MSG_PUB.Count_And_Get(
1497: p_count => x_msg_count,
1498: p_data => x_msg_data
1499: );

Line 1561: RETURN(FND_API.G_RET_STS_ERROR );

1557: IF (lock_csr%ISOPEN) THEN
1558: CLOSE lock_csr;
1559: END IF;
1560: Okc_Api.Set_Message(G_FND_APP,G_UNABLE_TO_RESERVE_REC);
1561: RETURN(FND_API.G_RET_STS_ERROR );
1562: END;
1563:
1564: IF ( l_row_notfound ) THEN
1565: l_return_status :=FND_API.G_RET_STS_ERROR;

Line 1565: l_return_status :=FND_API.G_RET_STS_ERROR;

1561: RETURN(FND_API.G_RET_STS_ERROR );
1562: END;
1563:
1564: IF ( l_row_notfound ) THEN
1565: l_return_status :=FND_API.G_RET_STS_ERROR;
1566:
1567: OPEN lchk_csr(p_contract_id);
1568: FETCH lchk_csr INTO l_object_version_number;
1569: l_row_notfound := lchk_csr%NOTFOUND;

Line 1582: l_return_status :=FND_API.G_RET_STS_SUCCESS;

1578: ELSE -- it can be the only above condition. It can happen after restore version
1579: Okc_Api.Set_Message(G_APP_NAME,G_RECORD_CHANGED);
1580: END IF;
1581: ELSE
1582: l_return_status :=FND_API.G_RET_STS_SUCCESS;
1583: END IF;
1584:
1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

Line 1616: RETURN(FND_API.G_RET_STS_UNEXP_ERROR );

1612: p_token1_value => sqlcode,
1613: p_token2 => G_SQLERRM_TOKEN,
1614: p_token2_value => sqlerrm);
1615:
1616: RETURN(FND_API.G_RET_STS_UNEXP_ERROR );
1617: END Lock_Contract_Header;
1618:
1619:
1620: -- Start of comments

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

1658: p_contract_id => p_contract_id,
1659: p_object_version_number => p_object_version_number
1660: );
1661: ---------------------------------------------------------
1662: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1664: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;

Line 1663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1659: p_object_version_number => p_object_version_number
1660: );
1661: ---------------------------------------------------------
1662: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1664: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: ----------------------------------------------------------

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

1660: );
1661: ---------------------------------------------------------
1662: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1664: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: ----------------------------------------------------------
1668: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1665: RAISE FND_API.G_EXC_ERROR;

1661: ---------------------------------------------------------
1662: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1664: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: ----------------------------------------------------------
1668: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1669: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

Line 1675: WHEN FND_API.G_EXC_ERROR THEN

1671: 'Leaving Lock_Contract_Header');
1672: END IF;
1673:
1674: EXCEPTION
1675: WHEN FND_API.G_EXC_ERROR THEN
1676: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1677: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1678: g_module || l_api_name,
1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');

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

1675: WHEN FND_API.G_EXC_ERROR THEN
1676: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1677: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1678: g_module || l_api_name,
1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1680: END IF;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1681: x_return_status := FND_API.G_RET_STS_ERROR;

1677: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1678: g_module || l_api_name,
1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1680: END IF;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1685: g_module || l_api_name,

Line 1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1678: g_module || l_api_name,
1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1680: END IF;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1685: g_module || l_api_name,
1686: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1685: g_module || l_api_name,
1686: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1687: END IF;
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1689:
1690: WHEN OTHERS THEN

Line 1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1685: g_module || l_api_name,
1686: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1687: END IF;
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1689:
1690: WHEN OTHERS THEN
1691: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1692: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

Line 1696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1692: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1693: g_module || l_api_name,
1694: 'Leaving Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1695: END IF;
1696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1697: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1698: p_msg_name => G_UNEXPECTED_ERROR,
1699: p_token1 => G_SQLCODE_TOKEN,
1700: p_token1_value => sqlcode,

Line 1715: -- Default = FND_API.G_FALSE

1711: --Pre-reqs : None.
1712: --Parameters :
1713: --IN : p_api_version IN NUMBER Required
1714: -- : p_init_msg_list IN VARCHAR2 Optional
1715: -- Default = FND_API.G_FALSE
1716: -- : p_commit IN VARCHAR2 Optional
1717: -- Default = FND_API.G_FALSE
1718: -- : p_contract_id IN NUMBER Required
1719: -- Contract ID of the contract to be deleted

Line 1717: -- Default = FND_API.G_FALSE

1713: --IN : p_api_version IN NUMBER Required
1714: -- : p_init_msg_list IN VARCHAR2 Optional
1715: -- Default = FND_API.G_FALSE
1716: -- : p_commit IN VARCHAR2 Optional
1717: -- Default = FND_API.G_FALSE
1718: -- : p_contract_id IN NUMBER Required
1719: -- Contract ID of the contract to be deleted
1720: --OUT : x_return_status OUT VARCHAR2(1)
1721: -- : x_msg_count OUT NUMBER

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

1765: l_api_version := 1.0;
1766: -- Standard Start of API savepoint
1767: SAVEPOINT delete_contract_PVT;
1768: -- Standard call to check for call compatibility.
1769: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1771: END IF;
1772: -- Initialize message list if p_init_msg_list is set to TRUE.
1773: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1766: -- Standard Start of API savepoint
1767: SAVEPOINT delete_contract_PVT;
1768: -- Standard call to check for call compatibility.
1769: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1771: END IF;
1772: -- Initialize message list if p_init_msg_list is set to TRUE.
1773: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1774: FND_MSG_PUB.initialize;

Line 1773: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1769: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1771: END IF;
1772: -- Initialize message list if p_init_msg_list is set to TRUE.
1773: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1774: FND_MSG_PUB.initialize;
1775: END IF;
1776:
1777: -- Initialize API return status to success

Line 1778: x_return_status := FND_API.G_RET_STS_SUCCESS;

1774: FND_MSG_PUB.initialize;
1775: END IF;
1776:
1777: -- Initialize API return status to success
1778: x_return_status := FND_API.G_RET_STS_SUCCESS;
1779:
1780: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1782: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');

Line 1817: RAISE FND_API.G_EXC_ERROR;

1813: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1814: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
1815: p_token1 => G_CONTRACT_ID_TOKEN,
1816: p_token1_value => to_char(p_contract_id));
1817: RAISE FND_API.G_EXC_ERROR;
1818: -- RAISE NO_DATA_FOUND;
1819: END IF;
1820:
1821:

Line 1829: p_commit => FND_API.G_FALSE,

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

Line 1830: p_init_msg_list => FND_API.G_FALSE,

1826: END IF;
1827: delete_contacts(
1828: p_api_version => 1.0,
1829: p_commit => FND_API.G_FALSE,
1830: p_init_msg_list => FND_API.G_FALSE,
1831: p_contract_id => p_contract_id,
1832: x_msg_data => x_msg_data,
1833: x_msg_count => x_msg_count,
1834: x_return_status => x_return_status);

Line 1855: p_init_msg_list => FND_API.G_FALSE,

1851: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_parties()');
1852: END IF;
1853: delete_parties(
1854: p_api_version => 1.0,
1855: p_init_msg_list => FND_API.G_FALSE,
1856: p_commit => FND_API.G_FALSE,
1857: p_contract_id => p_contract_id,
1858: x_msg_data => x_msg_data,
1859: x_msg_count => x_msg_count,

Line 1856: p_commit => FND_API.G_FALSE,

1852: END IF;
1853: delete_parties(
1854: p_api_version => 1.0,
1855: p_init_msg_list => FND_API.G_FALSE,
1856: p_commit => FND_API.G_FALSE,
1857: p_contract_id => p_contract_id,
1858: x_msg_data => x_msg_data,
1859: x_msg_count => x_msg_count,
1860: x_return_status => x_return_status);

Line 1881: p_init_msg_list => FND_API.G_FALSE,

1877: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_risks()');
1878: END IF;
1879: delete_risks(
1880: p_api_version => 1.0,
1881: p_init_msg_list => FND_API.G_FALSE,
1882: p_commit => FND_API.G_FALSE,
1883: p_contract_id => p_contract_id,
1884: x_msg_data => x_msg_data,
1885: x_msg_count => x_msg_count,

Line 1882: p_commit => FND_API.G_FALSE,

1878: END IF;
1879: delete_risks(
1880: p_api_version => 1.0,
1881: p_init_msg_list => FND_API.G_FALSE,
1882: p_commit => FND_API.G_FALSE,
1883: p_contract_id => p_contract_id,
1884: x_msg_data => x_msg_data,
1885: x_msg_count => x_msg_count,
1886: x_return_status => x_return_status);

Line 1907: p_init_msg_list => FND_API.G_FALSE,

1903: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL()');
1904: END IF;
1905: delete_ACL(
1906: p_api_version => 1.0,
1907: p_init_msg_list => FND_API.G_FALSE,
1908: p_commit => FND_API.G_FALSE,
1909: p_contract_id => p_contract_id,
1910: x_msg_data => x_msg_data,
1911: x_msg_count => x_msg_count,

Line 1908: p_commit => FND_API.G_FALSE,

1904: END IF;
1905: delete_ACL(
1906: p_api_version => 1.0,
1907: p_init_msg_list => FND_API.G_FALSE,
1908: p_commit => FND_API.G_FALSE,
1909: p_contract_id => p_contract_id,
1910: x_msg_data => x_msg_data,
1911: x_msg_count => x_msg_count,
1912: x_return_status => x_return_status);

Line 1933: p_init_msg_list => FND_API.G_FALSE,

1929: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history()');
1930: END IF;
1931: delete_status_history(
1932: p_api_version => 1.0,
1933: p_init_msg_list => FND_API.G_FALSE,
1934: p_commit => FND_API.G_FALSE,
1935: p_contract_id => p_contract_id,
1936: p_contract_version => contract_rec.contract_version_num,
1937: x_msg_data => x_msg_data,

Line 1934: p_commit => FND_API.G_FALSE,

1930: END IF;
1931: delete_status_history(
1932: p_api_version => 1.0,
1933: p_init_msg_list => FND_API.G_FALSE,
1934: p_commit => FND_API.G_FALSE,
1935: p_contract_id => p_contract_id,
1936: p_contract_version => contract_rec.contract_version_num,
1937: x_msg_data => x_msg_data,
1938: x_msg_count => x_msg_count,

Line 1960: p_init_msg_list => FND_API.G_FALSE,

1956: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history()');
1957: END IF;
1958: delete_approval_history(
1959: p_api_version => 1.0,
1960: p_init_msg_list => FND_API.G_FALSE,
1961: p_commit => FND_API.G_FALSE,
1962: p_contract_id => p_contract_id,
1963: p_contract_version => contract_rec.contract_version_num,
1964: x_msg_data => x_msg_data,

Line 1961: p_commit => FND_API.G_FALSE,

1957: END IF;
1958: delete_approval_history(
1959: p_api_version => 1.0,
1960: p_init_msg_list => FND_API.G_FALSE,
1961: p_commit => FND_API.G_FALSE,
1962: p_contract_id => p_contract_id,
1963: p_contract_version => contract_rec.contract_version_num,
1964: x_msg_data => x_msg_data,
1965: x_msg_count => x_msg_count,

Line 1987: p_init_msg_list => FND_API.G_FALSE,

1983: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks()');
1984: END IF;
1985: delete_bookmarks(
1986: p_api_version => 1.0,
1987: p_init_msg_list => FND_API.G_FALSE,
1988: p_commit => FND_API.G_FALSE,
1989: p_contract_type => contract_rec.contract_type,
1990: p_contract_id => p_contract_id,
1991: x_msg_data => x_msg_data,

Line 1988: p_commit => FND_API.G_FALSE,

1984: END IF;
1985: delete_bookmarks(
1986: p_api_version => 1.0,
1987: p_init_msg_list => FND_API.G_FALSE,
1988: p_commit => FND_API.G_FALSE,
1989: p_contract_type => contract_rec.contract_type,
1990: p_contract_id => p_contract_id,
1991: x_msg_data => x_msg_data,
1992: x_msg_count => x_msg_count,

Line 2017: p_init_msg_list => FND_API.G_FALSE,

2013: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts()');
2014: END IF;
2015: delete_related_contracts(
2016: p_api_version => 1.0,
2017: p_init_msg_list => FND_API.G_FALSE,
2018: p_commit => FND_API.G_FALSE,
2019: p_contract_id => p_contract_id,
2020: x_msg_data => x_msg_data,
2021: x_msg_count => x_msg_count,

Line 2018: p_commit => FND_API.G_FALSE,

2014: END IF;
2015: delete_related_contracts(
2016: p_api_version => 1.0,
2017: p_init_msg_list => FND_API.G_FALSE,
2018: p_commit => FND_API.G_FALSE,
2019: p_contract_id => p_contract_id,
2020: x_msg_data => x_msg_data,
2021: x_msg_count => x_msg_count,
2022: x_return_status => x_return_status);

Line 2072: p_init_msg_list => FND_API.G_FALSE,

2068: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values()');
2069: END IF;
2070: delete_uda_attribute_values(
2071: p_api_version => 1.0,
2072: p_init_msg_list => FND_API.G_FALSE,
2073: p_commit => FND_API.G_FALSE,
2074: p_contract_id => p_contract_id,
2075: x_msg_data => x_msg_data,
2076: x_msg_count => x_msg_count,

Line 2073: p_commit => FND_API.G_FALSE,

2069: END IF;
2070: delete_uda_attribute_values(
2071: p_api_version => 1.0,
2072: p_init_msg_list => FND_API.G_FALSE,
2073: p_commit => FND_API.G_FALSE,
2074: p_contract_id => p_contract_id,
2075: x_msg_data => x_msg_data,
2076: x_msg_count => x_msg_count,
2077: x_return_status => x_return_status);

Line 2194: p_init_msg_list => FND_API.G_FALSE,

2190:
2191: -- Delete Deliverables
2192: OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables (
2193: p_api_version => 1.0,
2194: p_init_msg_list => FND_API.G_FALSE,
2195: p_bus_doc_id => p_contract_id,
2196: p_bus_doc_type => contract_rec.contract_type,
2197: p_bus_doc_version => G_CURRENT_VERSION,
2198: x_return_status => x_return_status,

Line 2217: p_init_msg_list => FND_API.G_FALSE,

2213: END IF;
2214:
2215: OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables(
2216: p_api_version => 1.0,
2217: p_init_msg_list => FND_API.G_FALSE,
2218: p_bus_doc_id => p_contract_id,
2219: p_bus_doc_type => contract_rec.contract_type,
2220: p_bus_doc_version => contract_rec.contract_version_num,
2221: p_prev_del_active => l_is_activated,

Line 2401: IF FND_API.To_Boolean( p_commit ) THEN

2397: AND contract_version_num = l_prev_version;
2398: END IF; -- (contract_rec.contract_version_num > 1)
2399:
2400: -- Standard check of p_commit
2401: IF FND_API.To_Boolean( p_commit ) THEN
2402: COMMIT WORK;
2403: END IF;
2404:
2405: CLOSE contract_csr;

Line 2416: WHEN FND_API.G_EXC_ERROR THEN

2412: END IF;
2413:
2414:
2415: EXCEPTION
2416: WHEN FND_API.G_EXC_ERROR THEN
2417: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2418: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2419: g_module || l_api_name,
2420: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');

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

2416: WHEN FND_API.G_EXC_ERROR THEN
2417: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2418: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2419: g_module || l_api_name,
2420: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');
2421: END IF;
2422: --close cursors
2423: IF (contract_csr%ISOPEN) THEN
2424: CLOSE contract_csr ;

Line 2427: x_return_status := FND_API.G_RET_STS_ERROR;

2423: IF (contract_csr%ISOPEN) THEN
2424: CLOSE contract_csr ;
2425: END IF;
2426: ROLLBACK TO delete_contract_PVT;
2427: x_return_status := FND_API.G_RET_STS_ERROR;
2428: FND_MSG_PUB.Count_And_Get(
2429: p_count => x_msg_count,
2430: p_data => x_msg_data
2431: );

Line 2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2429: p_count => x_msg_count,
2430: p_data => x_msg_data
2431: );
2432:
2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2434: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2435: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2436: g_module || l_api_name,
2437: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2434: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2435: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2436: g_module || l_api_name,
2437: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2438: END IF;
2439: --close cursors
2440: IF (contract_csr%ISOPEN) THEN
2441: CLOSE contract_csr ;

Line 2444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2440: IF (contract_csr%ISOPEN) THEN
2441: CLOSE contract_csr ;
2442: END IF;
2443: ROLLBACK TO delete_contract_PVT;
2444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2445: FND_MSG_PUB.Count_And_Get(
2446: p_count => x_msg_count,
2447: p_data => x_msg_data
2448: );

Line 2467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2463: --close cursors
2464: IF (contract_csr%ISOPEN) THEN
2465: CLOSE contract_csr ;
2466: END IF;
2467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2468: FND_MSG_PUB.Count_And_Get(
2469: p_count => x_msg_count,
2470: p_data => x_msg_data
2471: );

Line 2483: -- Default = FND_API.G_FALSE

2479: --Pre-reqs : None.
2480: --Parameters :
2481: --IN : p_api_version IN NUMBER Required
2482: -- : p_init_msg_list IN VARCHAR2 Optional
2483: -- Default = FND_API.G_FALSE
2484: -- : p_commit IN VARCHAR2 Optional
2485: -- Default = FND_API.G_FALSE
2486: -- : p_source_contract_id IN NUMBER Required
2487: -- Id of the contract whose contacts are to be copied

Line 2485: -- Default = FND_API.G_FALSE

2481: --IN : p_api_version IN NUMBER Required
2482: -- : p_init_msg_list IN VARCHAR2 Optional
2483: -- Default = FND_API.G_FALSE
2484: -- : p_commit IN VARCHAR2 Optional
2485: -- Default = FND_API.G_FALSE
2486: -- : p_source_contract_id IN NUMBER Required
2487: -- Id of the contract whose contacts are to be copied
2488: -- : p_target_contract_id IN NUMBER Required
2489: -- Id of the contract to which source contacts are to be copied

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

2529: l_api_version := 1.0;
2530: -- Standard Start of API savepoint
2531: SAVEPOINT copy_contacts_PVT;
2532: -- Standard call to check for call compatibility.
2533: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2535: END IF;
2536: -- Initialize message list if p_init_msg_list is set to TRUE.
2537: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2530: -- Standard Start of API savepoint
2531: SAVEPOINT copy_contacts_PVT;
2532: -- Standard call to check for call compatibility.
2533: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2535: END IF;
2536: -- Initialize message list if p_init_msg_list is set to TRUE.
2537: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2538: FND_MSG_PUB.initialize;

Line 2537: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2533: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2535: END IF;
2536: -- Initialize message list if p_init_msg_list is set to TRUE.
2537: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2538: FND_MSG_PUB.initialize;
2539: END IF;
2540:
2541: -- Initialize API return status to success

Line 2542: x_return_status := FND_API.G_RET_STS_SUCCESS;

2538: FND_MSG_PUB.initialize;
2539: END IF;
2540:
2541: -- Initialize API return status to success
2542: x_return_status := FND_API.G_RET_STS_SUCCESS;
2543: -- Populate who columns
2544: l_creation_date := Sysdate;
2545: l_created_by := Fnd_Global.User_Id;
2546: l_last_update_date := l_creation_date;

Line 2593: IF FND_API.To_Boolean( p_commit ) THEN

2589: contact_rec.SIGNATURE_SEQUENCE,
2590: contact_rec.ESIGNATURE_TYPE);
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_contacts:FND_API.G_EXC_ERROR Exception');

Line 2611: 'Leaving copy_contacts: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_contacts:FND_API.G_EXC_ERROR Exception');
2612: END IF;
2613: ROLLBACK TO copy_contacts_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_contacts:FND_API.G_EXC_ERROR Exception');
2612: END IF;
2613: ROLLBACK TO copy_contacts_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_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 2624: 'Leaving copy_contacts: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_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;
2626: ROLLBACK TO copy_contacts_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_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;
2626: ROLLBACK TO copy_contacts_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_contacts_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 parties 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 parties are to be copied
2667: -- : p_target_contract_id IN NUMBER Required
2668: -- Id of the contract to which source parties are to be copied

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

2708: l_api_version := 1.0;
2709: -- Standard Start of API savepoint
2710: SAVEPOINT copy_parties_PVT;
2711: -- Standard call to check for call compatibility.
2712: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2714: END IF;
2715: -- Initialize message list if p_init_msg_list is set to TRUE.
2716: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2709: -- Standard Start of API savepoint
2710: SAVEPOINT copy_parties_PVT;
2711: -- Standard call to check for call compatibility.
2712: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2714: END IF;
2715: -- Initialize message list if p_init_msg_list is set to TRUE.
2716: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2717: FND_MSG_PUB.initialize;

Line 2716: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2712: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2714: END IF;
2715: -- Initialize message list if p_init_msg_list is set to TRUE.
2716: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2717: FND_MSG_PUB.initialize;
2718: END IF;
2719:
2720: -- Initialize API return status to success

Line 2721: x_return_status := FND_API.G_RET_STS_SUCCESS;

2717: FND_MSG_PUB.initialize;
2718: END IF;
2719:
2720: -- Initialize API return status to success
2721: x_return_status := FND_API.G_RET_STS_SUCCESS;
2722: -- Populate who columns
2723: l_creation_date := Sysdate;
2724: l_created_by := Fnd_Global.User_Id;
2725: l_last_update_date := l_creation_date;

Line 2763: IF FND_API.To_Boolean( p_commit ) THEN

2759: l_last_update_date,
2760: l_last_update_login);
2761: END LOOP;
2762: -- Standard check of p_commit
2763: IF FND_API.To_Boolean( p_commit ) THEN
2764: COMMIT WORK;
2765: END IF;
2766:
2767: -- Standard call to get message count and if count is 1, get message info.

Line 2777: WHEN FND_API.G_EXC_ERROR THEN

2773: END IF;
2774:
2775:
2776: EXCEPTION
2777: WHEN FND_API.G_EXC_ERROR THEN
2778: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2780: g_module || l_api_name,
2781: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');

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

2777: WHEN FND_API.G_EXC_ERROR THEN
2778: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2780: g_module || l_api_name,
2781: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2782: END IF;
2783: ROLLBACK TO copy_parties_PVT;
2784: x_return_status := FND_API.G_RET_STS_ERROR;
2785: FND_MSG_PUB.Count_And_Get(

Line 2784: x_return_status := FND_API.G_RET_STS_ERROR;

2780: g_module || l_api_name,
2781: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2782: END IF;
2783: ROLLBACK TO copy_parties_PVT;
2784: x_return_status := FND_API.G_RET_STS_ERROR;
2785: FND_MSG_PUB.Count_And_Get(
2786: p_count => x_msg_count,
2787: p_data => x_msg_data
2788: );

Line 2790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2786: p_count => x_msg_count,
2787: p_data => x_msg_data
2788: );
2789:
2790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2793: g_module || l_api_name,
2794: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

2790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2793: g_module || l_api_name,
2794: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2795: END IF;
2796: ROLLBACK TO copy_parties_PVT;
2797: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2798: FND_MSG_PUB.Count_And_Get(

Line 2797: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2793: g_module || l_api_name,
2794: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2795: END IF;
2796: ROLLBACK TO copy_parties_PVT;
2797: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2798: FND_MSG_PUB.Count_And_Get(
2799: p_count => x_msg_count,
2800: p_data => x_msg_data
2801: );

Line 2816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2812: p_token1_value => sqlcode,
2813: p_token2 => G_SQLERRM_TOKEN,
2814: p_token2_value => sqlerrm);
2815: ROLLBACK TO copy_parties_PVT;
2816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2817: FND_MSG_PUB.Count_And_Get(
2818: p_count => x_msg_count,
2819: p_data => x_msg_data
2820: );

Line 2832: -- Default = FND_API.G_FALSE

2828: --Pre-reqs : None.
2829: --Parameters :
2830: --IN : p_api_version IN NUMBER Required
2831: -- : p_init_msg_list IN VARCHAR2 Optional
2832: -- Default = FND_API.G_FALSE
2833: -- : p_commit IN VARCHAR2 Optional
2834: -- Default = FND_API.G_FALSE
2835: -- : p_source_contract_id IN NUMBER Required
2836: -- Id of the contract whose risks are to be copied

Line 2834: -- Default = FND_API.G_FALSE

2830: --IN : p_api_version IN NUMBER Required
2831: -- : p_init_msg_list IN VARCHAR2 Optional
2832: -- Default = FND_API.G_FALSE
2833: -- : p_commit IN VARCHAR2 Optional
2834: -- Default = FND_API.G_FALSE
2835: -- : p_source_contract_id IN NUMBER Required
2836: -- Id of the contract whose risks are to be copied
2837: -- : p_target_contract_id IN NUMBER Required
2838: -- Id of the contract to which source contract risks are to be copied

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

2889: l_api_version := 1.0;
2890: -- Standard Start of API savepoint
2891: SAVEPOINT copy_risks_PVT;
2892: -- Standard call to check for call compatibility.
2893: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2895: END IF;
2896: -- Initialize message list if p_init_msg_list is set to TRUE.
2897: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2890: -- Standard Start of API savepoint
2891: SAVEPOINT copy_risks_PVT;
2892: -- Standard call to check for call compatibility.
2893: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2895: END IF;
2896: -- Initialize message list if p_init_msg_list is set to TRUE.
2897: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2898: FND_MSG_PUB.initialize;

Line 2897: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2893: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2895: END IF;
2896: -- Initialize message list if p_init_msg_list is set to TRUE.
2897: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2898: FND_MSG_PUB.initialize;
2899: END IF;
2900:
2901: -- Initialize API return status to success

Line 2902: x_return_status := FND_API.G_RET_STS_SUCCESS;

2898: FND_MSG_PUB.initialize;
2899: END IF;
2900:
2901: -- Initialize API return status to success
2902: x_return_status := FND_API.G_RET_STS_SUCCESS;
2903:
2904: -- Populate who columns
2905: l_creation_date := Sysdate;
2906: l_created_by := Fnd_Global.User_Id;

Line 2925: RAISE FND_API.G_EXC_ERROR;

2921: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
2922: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
2923: p_token1 => G_CONTRACT_ID_TOKEN,
2924: p_token1_value => to_char(p_source_contract_id));
2925: RAISE FND_API.G_EXC_ERROR;
2926: -- RAISE NO_DATA_FOUND;
2927: END IF;
2928:
2929:

Line 2990: IF FND_API.To_Boolean( p_commit ) THEN

2986: l_last_update_date,
2987: l_last_update_login);
2988: END LOOP;
2989: -- Standard check of p_commit
2990: IF FND_API.To_Boolean( p_commit ) THEN
2991: COMMIT WORK;
2992: END IF;
2993:
2994: -- Standard call to get message count and if count is 1, get message info.

Line 3004: WHEN FND_API.G_EXC_ERROR THEN

3000: END IF;
3001:
3002:
3003: EXCEPTION
3004: WHEN FND_API.G_EXC_ERROR THEN
3005: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3006: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3007: g_module || l_api_name,
3008: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');

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

3004: WHEN FND_API.G_EXC_ERROR THEN
3005: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3006: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3007: g_module || l_api_name,
3008: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');
3009: END IF;
3010: --close cursors
3011: IF (contract_csr%ISOPEN) THEN
3012: CLOSE contract_csr ;

Line 3015: x_return_status := FND_API.G_RET_STS_ERROR;

3011: IF (contract_csr%ISOPEN) THEN
3012: CLOSE contract_csr ;
3013: END IF;
3014: ROLLBACK TO copy_risks_PVT;
3015: x_return_status := FND_API.G_RET_STS_ERROR;
3016: FND_MSG_PUB.Count_And_Get(
3017: p_count => x_msg_count,
3018: p_data => x_msg_data
3019: );

Line 3021: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3017: p_count => x_msg_count,
3018: p_data => x_msg_data
3019: );
3020:
3021: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3022: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3024: g_module || l_api_name,
3025: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

3021: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3022: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3024: g_module || l_api_name,
3025: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3026: END IF;
3027: --close cursors
3028: IF (contract_csr%ISOPEN) THEN
3029: CLOSE contract_csr ;

Line 3032: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3028: IF (contract_csr%ISOPEN) THEN
3029: CLOSE contract_csr ;
3030: END IF;
3031: ROLLBACK TO copy_risks_PVT;
3032: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3033: FND_MSG_PUB.Count_And_Get(
3034: p_count => x_msg_count,
3035: p_data => x_msg_data
3036: );

Line 3055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3051: p_token1_value => sqlcode,
3052: p_token2 => G_SQLERRM_TOKEN,
3053: p_token2_value => sqlerrm);
3054: ROLLBACK TO copy_risks_PVT;
3055: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3056: FND_MSG_PUB.Count_And_Get(
3057: p_count => x_msg_count,
3058: p_data => x_msg_data
3059: );

Line 3071: -- Default = FND_API.G_FALSE

3067: --Pre-reqs : None.
3068: --Parameters :
3069: --IN : p_api_version IN NUMBER Required
3070: -- : p_init_msg_list IN VARCHAR2 Optional
3071: -- Default = FND_API.G_FALSE
3072: -- : p_commit IN VARCHAR2 Optional
3073: -- Default = FND_API.G_FALSE
3074: -- : p_source_contract_id IN NUMBER Required
3075: -- Id of the contract whose ACLs are to be copied

Line 3073: -- Default = FND_API.G_FALSE

3069: --IN : p_api_version IN NUMBER Required
3070: -- : p_init_msg_list IN VARCHAR2 Optional
3071: -- Default = FND_API.G_FALSE
3072: -- : p_commit IN VARCHAR2 Optional
3073: -- Default = FND_API.G_FALSE
3074: -- : p_source_contract_id IN NUMBER Required
3075: -- Id of the contract whose ACLs are to be copied
3076: -- : p_target_contract_id IN NUMBER Required
3077: -- Id of the contract to which source contract ACL are to be copied

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

3129: l_api_version := 1.0;
3130: -- Standard Start of API savepoint
3131: SAVEPOINT copy_ACL_PVT;
3132: -- Standard call to check for call compatibility.
3133: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3135: END IF;
3136: -- Initialize message list if p_init_msg_list is set to TRUE.
3137: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3130: -- Standard Start of API savepoint
3131: SAVEPOINT copy_ACL_PVT;
3132: -- Standard call to check for call compatibility.
3133: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3135: END IF;
3136: -- Initialize message list if p_init_msg_list is set to TRUE.
3137: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3138: FND_MSG_PUB.initialize;

Line 3137: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3133: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3135: END IF;
3136: -- Initialize message list if p_init_msg_list is set to TRUE.
3137: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3138: FND_MSG_PUB.initialize;
3139: END IF;
3140:
3141: -- Initialize API return status to success

Line 3142: x_return_status := FND_API.G_RET_STS_SUCCESS;

3138: FND_MSG_PUB.initialize;
3139: END IF;
3140:
3141: -- Initialize API return status to success
3142: x_return_status := FND_API.G_RET_STS_SUCCESS;
3143:
3144: FOR acl_rec IN acl_csr LOOP
3145: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 3190: IF FND_API.To_Boolean( p_commit ) THEN

3186: END IF;
3187: --------------------------------------------------------
3188: END LOOP;
3189: -- Standard check of p_commit
3190: IF FND_API.To_Boolean( p_commit ) THEN
3191: COMMIT WORK;
3192: END IF;
3193:
3194: -- Standard call to get message count and if count is 1, get message info.

Line 3204: WHEN FND_API.G_EXC_ERROR THEN

3200: END IF;
3201:
3202:
3203: EXCEPTION
3204: WHEN FND_API.G_EXC_ERROR THEN
3205: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3206: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3207: g_module || l_api_name,
3208: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');

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

3204: WHEN FND_API.G_EXC_ERROR THEN
3205: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3206: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3207: g_module || l_api_name,
3208: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3209: END IF;
3210: ROLLBACK TO copy_ACL_PVT;
3211: x_return_status := FND_API.G_RET_STS_ERROR;
3212: FND_MSG_PUB.Count_And_Get(

Line 3211: x_return_status := FND_API.G_RET_STS_ERROR;

3207: g_module || l_api_name,
3208: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3209: END IF;
3210: ROLLBACK TO copy_ACL_PVT;
3211: x_return_status := FND_API.G_RET_STS_ERROR;
3212: FND_MSG_PUB.Count_And_Get(
3213: p_count => x_msg_count,
3214: p_data => x_msg_data
3215: );

Line 3217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3213: p_count => x_msg_count,
3214: p_data => x_msg_data
3215: );
3216:
3217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3220: g_module || l_api_name,
3221: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

3217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3220: g_module || l_api_name,
3221: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3222: END IF;
3223: ROLLBACK TO copy_ACL_PVT;
3224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3225: FND_MSG_PUB.Count_And_Get(

Line 3224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3220: g_module || l_api_name,
3221: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3222: END IF;
3223: ROLLBACK TO copy_ACL_PVT;
3224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3225: FND_MSG_PUB.Count_And_Get(
3226: p_count => x_msg_count,
3227: p_data => x_msg_data
3228: );

Line 3243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3239: p_token1_value => sqlcode,
3240: p_token2 => G_SQLERRM_TOKEN,
3241: p_token2_value => sqlerrm);
3242: ROLLBACK TO copy_ACL_PVT;
3243: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3244: FND_MSG_PUB.Count_And_Get(
3245: p_count => x_msg_count,
3246: p_data => x_msg_data
3247: );

Line 3260: -- Default = FND_API.G_FALSE

3256: --Pre-reqs : None.
3257: --Parameters :
3258: --IN : p_api_version IN NUMBER Required
3259: -- : p_init_msg_list IN VARCHAR2 Optional
3260: -- Default = FND_API.G_FALSE
3261: -- : p_commit IN VARCHAR2 Optional
3262: -- Default = FND_API.G_FALSE
3263: -- : p_source_contract_id IN NUMBER Required
3264: -- Id of the contract whose details are to be copied

Line 3262: -- Default = FND_API.G_FALSE

3258: --IN : p_api_version IN NUMBER Required
3259: -- : p_init_msg_list IN VARCHAR2 Optional
3260: -- Default = FND_API.G_FALSE
3261: -- : p_commit IN VARCHAR2 Optional
3262: -- Default = FND_API.G_FALSE
3263: -- : p_source_contract_id IN NUMBER Required
3264: -- Id of the contract whose details are to be copied
3265: -- : p_target_contract_id IN NUMBER Required
3266: -- Id of the contract to which source contract details are to be copied

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

3327: l_api_version := 1.0;
3328: -- Standard Start of API savepoint
3329: SAVEPOINT copy_contract_details_PVT;
3330: -- Standard call to check for call compatibility.
3331: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3333: END IF;
3334: -- Initialize message list if p_init_msg_list is set to TRUE.
3335: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3328: -- Standard Start of API savepoint
3329: SAVEPOINT copy_contract_details_PVT;
3330: -- Standard call to check for call compatibility.
3331: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3333: END IF;
3334: -- Initialize message list if p_init_msg_list is set to TRUE.
3335: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3336: FND_MSG_PUB.initialize;

Line 3335: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3331: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3333: END IF;
3334: -- Initialize message list if p_init_msg_list is set to TRUE.
3335: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3336: FND_MSG_PUB.initialize;
3337: END IF;
3338:
3339: -- Initialize API return status to success

Line 3340: x_return_status := FND_API.G_RET_STS_SUCCESS;

3336: FND_MSG_PUB.initialize;
3337: END IF;
3338:
3339: -- Initialize API return status to success
3340: x_return_status := FND_API.G_RET_STS_SUCCESS;
3341:
3342: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3343: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3344: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');

Line 3348: p_init_msg_list => FND_API.G_FALSE,

3344: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');
3345: END IF;
3346: copy_parties(
3347: p_api_version => 1.0,
3348: p_init_msg_list => FND_API.G_FALSE,
3349: p_commit => FND_API.G_FALSE,
3350: p_source_contract_id => p_source_contract_id,
3351: p_target_contract_id => p_target_contract_id,
3352: x_msg_data => x_msg_data,

Line 3349: p_commit => FND_API.G_FALSE,

3345: END IF;
3346: copy_parties(
3347: p_api_version => 1.0,
3348: p_init_msg_list => FND_API.G_FALSE,
3349: p_commit => FND_API.G_FALSE,
3350: p_source_contract_id => p_source_contract_id,
3351: p_target_contract_id => p_target_contract_id,
3352: x_msg_data => x_msg_data,
3353: x_msg_count => x_msg_count,

Line 3375: p_init_msg_list => FND_API.G_FALSE,

3371: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts()');
3372: END IF;
3373: copy_contacts(
3374: p_api_version => 1.0,
3375: p_init_msg_list => FND_API.G_FALSE,
3376: p_commit => FND_API.G_FALSE,
3377: p_source_contract_id => p_source_contract_id,
3378: p_target_contract_id => p_target_contract_id,
3379: x_msg_data => x_msg_data,

Line 3376: p_commit => FND_API.G_FALSE,

3372: END IF;
3373: copy_contacts(
3374: p_api_version => 1.0,
3375: p_init_msg_list => FND_API.G_FALSE,
3376: p_commit => FND_API.G_FALSE,
3377: p_source_contract_id => p_source_contract_id,
3378: p_target_contract_id => p_target_contract_id,
3379: x_msg_data => x_msg_data,
3380: x_msg_count => x_msg_count,

Line 3401: p_init_msg_list => FND_API.G_FALSE,

3397: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_risks()');
3398: END IF;
3399: copy_risks(
3400: p_api_version => 1.0,
3401: p_init_msg_list => FND_API.G_FALSE,
3402: p_commit => FND_API.G_FALSE,
3403: p_source_contract_id => p_source_contract_id,
3404: p_target_contract_id => p_target_contract_id,
3405: x_msg_data => x_msg_data,

Line 3402: p_commit => FND_API.G_FALSE,

3398: END IF;
3399: copy_risks(
3400: p_api_version => 1.0,
3401: p_init_msg_list => FND_API.G_FALSE,
3402: p_commit => FND_API.G_FALSE,
3403: p_source_contract_id => p_source_contract_id,
3404: p_target_contract_id => p_target_contract_id,
3405: x_msg_data => x_msg_data,
3406: x_msg_count => x_msg_count,

Line 3427: p_init_msg_list => FND_API.G_FALSE,

3423: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL()');
3424: END IF;
3425: copy_ACL(
3426: p_api_version => 1.0,
3427: p_init_msg_list => FND_API.G_FALSE,
3428: p_commit => FND_API.G_FALSE,
3429: p_source_contract_id => p_source_contract_id,
3430: p_target_contract_id => p_target_contract_id,
3431: x_msg_data => x_msg_data,

Line 3428: p_commit => FND_API.G_FALSE,

3424: END IF;
3425: copy_ACL(
3426: p_api_version => 1.0,
3427: p_init_msg_list => FND_API.G_FALSE,
3428: p_commit => FND_API.G_FALSE,
3429: p_source_contract_id => p_source_contract_id,
3430: p_target_contract_id => p_target_contract_id,
3431: x_msg_data => x_msg_data,
3432: x_msg_count => x_msg_count,

Line 3455: p_init_msg_list => FND_API.G_FALSE,

3451: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values()');
3452: END IF;
3453: copy_uda_attribute_values(
3454: p_api_version => 1.0,
3455: p_init_msg_list => FND_API.G_FALSE,
3456: p_commit => FND_API.G_FALSE,
3457: p_source_contract_id => p_source_contract_id,
3458: p_target_contract_id => p_target_contract_id,
3459: x_msg_data => x_msg_data,

Line 3456: p_commit => FND_API.G_FALSE,

3452: END IF;
3453: copy_uda_attribute_values(
3454: p_api_version => 1.0,
3455: p_init_msg_list => FND_API.G_FALSE,
3456: p_commit => FND_API.G_FALSE,
3457: p_source_contract_id => p_source_contract_id,
3458: p_target_contract_id => p_target_contract_id,
3459: x_msg_data => x_msg_data,
3460: x_msg_count => x_msg_count,

Line 3488: RAISE FND_API.G_EXC_ERROR;

3484: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
3485: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
3486: p_token1 => G_CONTRACT_ID_TOKEN,
3487: p_token1_value => to_char(p_source_contract_id));
3488: RAISE FND_API.G_EXC_ERROR;
3489: END IF;
3490:
3491: -- Get internal party_id. Needed for deliverables api
3492: OPEN party_csr;

Line 3500: RAISE FND_API.G_EXC_ERROR;

3496: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3497: G_MODULE||l_api_name,
3498: 'No internal party for the contract');
3499: END IF;
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502:
3503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3504: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 3543: p_init_msg_list => FND_API.G_FALSE,

3539: x_target_contract_type := source_contract_rec.contract_type;
3540: x_target_contract_id := p_target_contract_id;
3541: OKC_TERMS_COPY_PVT.copy_tc(
3542: p_api_version => 1,
3543: p_init_msg_list => FND_API.G_FALSE,
3544: p_commit => FND_API.G_FALSE,
3545: p_source_doc_type => source_contract_rec.contract_type,
3546: p_source_doc_id => p_source_contract_id,
3547: p_target_doc_type =>x_target_contract_type ,

Line 3544: p_commit => FND_API.G_FALSE,

3540: x_target_contract_id := p_target_contract_id;
3541: OKC_TERMS_COPY_PVT.copy_tc(
3542: p_api_version => 1,
3543: p_init_msg_list => FND_API.G_FALSE,
3544: p_commit => FND_API.G_FALSE,
3545: p_source_doc_type => source_contract_rec.contract_type,
3546: p_source_doc_id => p_source_contract_id,
3547: p_target_doc_type =>x_target_contract_type ,
3548: p_target_doc_id => x_target_contract_id,

Line 3574: p_init_msg_list => FND_API.G_FALSE,

3570: 'Calling OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables');
3571: END IF;
3572: OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables (
3573: p_api_version => 1.0,
3574: p_init_msg_list => FND_API.G_FALSE,
3575: p_source_doc_id => p_source_contract_id,
3576: p_source_doc_type => source_contract_rec.contract_type,
3577: p_target_doc_id => p_target_contract_id,
3578: p_target_doc_type => source_contract_rec.contract_type,

Line 3607: IF FND_API.To_Boolean( p_commit ) THEN

3603: CLOSE source_contract_csr;
3604: CLOSE party_csr;
3605:
3606: -- Standard check of p_commit
3607: IF FND_API.To_Boolean( p_commit ) THEN
3608: COMMIT WORK;
3609: END IF;
3610:
3611: -- Standard call to get message count and if count is 1, get message info.

Line 3621: WHEN FND_API.G_EXC_ERROR THEN

3617: END IF;
3618:
3619:
3620: EXCEPTION
3621: WHEN FND_API.G_EXC_ERROR THEN
3622: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3624: g_module || l_api_name,
3625: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');

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

3621: WHEN FND_API.G_EXC_ERROR THEN
3622: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3624: g_module || l_api_name,
3625: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');
3626: END IF;
3627: --close cursors
3628: IF (source_contract_csr%ISOPEN) THEN
3629: CLOSE source_contract_csr ;

Line 3635: x_return_status := FND_API.G_RET_STS_ERROR;

3631: IF (party_csr%ISOPEN) THEN
3632: CLOSE party_csr ;
3633: END IF;
3634: ROLLBACK TO copy_contract_details_PVT;
3635: x_return_status := FND_API.G_RET_STS_ERROR;
3636: FND_MSG_PUB.Count_And_Get(
3637: p_count => x_msg_count,
3638: p_data => x_msg_data
3639: );

Line 3641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3637: p_count => x_msg_count,
3638: p_data => x_msg_data
3639: );
3640:
3641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3642: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3643: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3644: g_module || l_api_name,
3645: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

3641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3642: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3643: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3644: g_module || l_api_name,
3645: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3646: END IF;
3647: --close cursors
3648: IF (source_contract_csr%ISOPEN) THEN
3649: CLOSE source_contract_csr ;

Line 3655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3651: IF (party_csr%ISOPEN) THEN
3652: CLOSE party_csr ;
3653: END IF;
3654: ROLLBACK TO copy_contract_details_PVT;
3655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3656: FND_MSG_PUB.Count_And_Get(
3657: p_count => x_msg_count,
3658: p_data => x_msg_data
3659: );

Line 3681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3677: END IF;
3678: IF (party_csr%ISOPEN) THEN
3679: CLOSE party_csr ;
3680: END IF;
3681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3682: FND_MSG_PUB.Count_And_Get(
3683: p_count => x_msg_count,
3684: p_data => x_msg_data
3685: );

Line 3697: -- Default = FND_API.G_FALSE

3693: --Pre-reqs : None.
3694: --Parameters :
3695: --IN : p_api_version IN NUMBER Required
3696: -- : p_init_msg_list IN VARCHAR2 Optional
3697: -- Default = FND_API.G_FALSE
3698: -- : p_commit IN VARCHAR2 Optional
3699: -- Default = FND_API.G_FALSE
3700: -- : p_contract_id IN NUMBER Required
3701: -- Id of the contract whose details are to be versioned

Line 3699: -- Default = FND_API.G_FALSE

3695: --IN : p_api_version IN NUMBER Required
3696: -- : p_init_msg_list IN VARCHAR2 Optional
3697: -- Default = FND_API.G_FALSE
3698: -- : p_commit IN VARCHAR2 Optional
3699: -- Default = FND_API.G_FALSE
3700: -- : p_contract_id IN NUMBER Required
3701: -- Id of the contract whose details are to be versioned
3702: --OUT : x_return_status OUT VARCHAR2(1)
3703: -- : x_msg_count OUT NUMBER

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

3751: l_api_version := 1.0;
3752: -- Standard Start of API savepoint
3753: SAVEPOINT version_contract_usages_PVT;
3754: -- Standard call to check for call compatibility.
3755: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3756: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3757: END IF;
3758: -- Initialize message list if p_init_msg_list is set to TRUE.
3759: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3756: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3752: -- Standard Start of API savepoint
3753: SAVEPOINT version_contract_usages_PVT;
3754: -- Standard call to check for call compatibility.
3755: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3756: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3757: END IF;
3758: -- Initialize message list if p_init_msg_list is set to TRUE.
3759: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3760: FND_MSG_PUB.initialize;

Line 3759: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3755: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3756: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3757: END IF;
3758: -- Initialize message list if p_init_msg_list is set to TRUE.
3759: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3760: FND_MSG_PUB.initialize;
3761: END IF;
3762:
3763: -- Initialize API return status to success

Line 3764: x_return_status := FND_API.G_RET_STS_SUCCESS;

3760: FND_MSG_PUB.initialize;
3761: END IF;
3762:
3763: -- Initialize API return status to success
3764: x_return_status := FND_API.G_RET_STS_SUCCESS;
3765:
3766: -- Populate who columns
3767: l_creation_date := Sysdate;
3768: l_created_by := Fnd_Global.User_Id;

Line 3787: RAISE FND_API.G_EXC_ERROR;

3783: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
3784: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
3785: p_token1 => G_CONTRACT_ID_TOKEN,
3786: p_token1_value => to_char(p_contract_id));
3787: RAISE FND_API.G_EXC_ERROR;
3788: -- RAISE NO_DATA_FOUND;
3789: END IF;
3790:
3791: FOR usages_rec IN usages_csr(contract_rec.contract_type, p_contract_id, contract_rec.contract_version_num) LOOP

Line 3860: IF FND_API.To_Boolean( p_commit ) THEN

3856: );
3857:
3858: END LOOP;
3859: -- Standard check of p_commit
3860: IF FND_API.To_Boolean( p_commit ) THEN
3861: COMMIT WORK;
3862: END IF;
3863:
3864: -- Standard call to get message count and if count is 1, get message info.

Line 3874: WHEN FND_API.G_EXC_ERROR THEN

3870: END IF;
3871:
3872:
3873: EXCEPTION
3874: WHEN FND_API.G_EXC_ERROR THEN
3875: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3876: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3877: g_module || l_api_name,
3878: 'Leaving version_contract_usages:FND_API.G_EXC_ERROR Exception');

Line 3878: 'Leaving version_contract_usages:FND_API.G_EXC_ERROR Exception');

3874: WHEN FND_API.G_EXC_ERROR THEN
3875: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3876: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3877: g_module || l_api_name,
3878: 'Leaving version_contract_usages:FND_API.G_EXC_ERROR Exception');
3879: END IF;
3880: --close cursors
3881: IF (contract_csr%ISOPEN) THEN
3882: CLOSE contract_csr ;

Line 3885: x_return_status := FND_API.G_RET_STS_ERROR;

3881: IF (contract_csr%ISOPEN) THEN
3882: CLOSE contract_csr ;
3883: END IF;
3884: ROLLBACK TO version_contract_usages_PVT;
3885: x_return_status := FND_API.G_RET_STS_ERROR;
3886: FND_MSG_PUB.Count_And_Get(
3887: p_count => x_msg_count,
3888: p_data => x_msg_data
3889: );

Line 3891: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3887: p_count => x_msg_count,
3888: p_data => x_msg_data
3889: );
3890:
3891: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3892: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3893: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3894: g_module || l_api_name,
3895: 'Leaving version_contract_usages:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 3895: 'Leaving version_contract_usages:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

3891: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3892: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3893: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3894: g_module || l_api_name,
3895: 'Leaving version_contract_usages:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3896: END IF;
3897: --close cursors
3898: IF (contract_csr%ISOPEN) THEN
3899: CLOSE contract_csr ;

Line 3902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3898: IF (contract_csr%ISOPEN) THEN
3899: CLOSE contract_csr ;
3900: END IF;
3901: ROLLBACK TO version_contract_usages_PVT;
3902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3903: FND_MSG_PUB.Count_And_Get(
3904: p_count => x_msg_count,
3905: p_data => x_msg_data
3906: );

Line 3925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3921: p_token1_value => sqlcode,
3922: p_token2 => G_SQLERRM_TOKEN,
3923: p_token2_value => sqlerrm);
3924: ROLLBACK TO version_contract_usages_PVT;
3925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3926: FND_MSG_PUB.Count_And_Get(
3927: p_count => x_msg_count,
3928: p_data => x_msg_data
3929: );

Line 3940: -- Default = FND_API.G_FALSE

3936: --Pre-reqs : None.
3937: --Parameters :
3938: --IN : p_api_version IN NUMBER Required
3939: -- : p_init_msg_list IN VARCHAR2 Optional
3940: -- Default = FND_API.G_FALSE
3941: -- : p_commit IN VARCHAR2 Optional
3942: -- Default = FND_API.G_FALSE
3943: -- : p_contract_id IN NUMBER Required
3944: -- Id of the contract whose details are to be versioned

Line 3942: -- Default = FND_API.G_FALSE

3938: --IN : p_api_version IN NUMBER Required
3939: -- : p_init_msg_list IN VARCHAR2 Optional
3940: -- Default = FND_API.G_FALSE
3941: -- : p_commit IN VARCHAR2 Optional
3942: -- Default = FND_API.G_FALSE
3943: -- : p_contract_id IN NUMBER Required
3944: -- Id of the contract whose details are to be versioned
3945: --OUT : x_return_status OUT VARCHAR2(1)
3946: -- : x_msg_count OUT NUMBER

Line 3955: p_version_from_api IN VARCHAR2 DEFAULT fnd_api.g_false,

3951: p_api_version IN NUMBER,
3952: p_init_msg_list IN VARCHAR2,
3953: p_commit IN VARCHAR2,
3954: p_contract_id IN NUMBER,
3955: p_version_from_api IN VARCHAR2 DEFAULT fnd_api.g_false,
3956: x_msg_data OUT NOCOPY VARCHAR2,
3957: x_msg_count OUT NOCOPY NUMBER,
3958: x_return_status OUT NOCOPY VARCHAR2) IS
3959: l_api_name VARCHAR2(30);

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

3990: l_api_version := 1.0;
3991: -- Standard Start of API savepoint
3992: SAVEPOINT version_contract_details_PVT;
3993: -- Standard call to check for call compatibility.
3994: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3996: END IF;
3997: -- Initialize message list if p_init_msg_list is set to TRUE.
3998: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3991: -- Standard Start of API savepoint
3992: SAVEPOINT version_contract_details_PVT;
3993: -- Standard call to check for call compatibility.
3994: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3996: END IF;
3997: -- Initialize message list if p_init_msg_list is set to TRUE.
3998: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3999: FND_MSG_PUB.initialize;

Line 3998: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3994: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
3995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3996: END IF;
3997: -- Initialize message list if p_init_msg_list is set to TRUE.
3998: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3999: FND_MSG_PUB.initialize;
4000: END IF;
4001:
4002: -- Initialize API return status to success

Line 4003: x_return_status := FND_API.G_RET_STS_SUCCESS;

3999: FND_MSG_PUB.initialize;
4000: END IF;
4001:
4002: -- Initialize API return status to success
4003: x_return_status := FND_API.G_RET_STS_SUCCESS;
4004:
4005: -- Lock the contract header
4006: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4007: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 4186: RAISE FND_API.G_EXC_ERROR;

4182: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
4183: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
4184: p_token1 => G_CONTRACT_ID_TOKEN,
4185: p_token1_value => to_char(p_contract_id));
4186: RAISE FND_API.G_EXC_ERROR;
4187: -- RAISE NO_DATA_FOUND;
4188: END IF;
4189:
4190: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 4252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

4248: p_version_number => contract_rec.contract_version_num
4249: );
4250: --------------------------------------------
4251: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4253: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4254: RAISE FND_API.G_EXC_ERROR ;
4255: END IF;
4256:

Line 4254: RAISE FND_API.G_EXC_ERROR ;

4250: --------------------------------------------
4251: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4253: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4254: RAISE FND_API.G_EXC_ERROR ;
4255: END IF;
4256:
4257: ELSIF l_contract_source = 'ATTACHED' THEN
4258:

Line 4274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

4270: p_major_version => contract_rec.contract_version_num
4271: );
4272: --------------------------------------------
4273: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4275: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4276: RAISE FND_API.G_EXC_ERROR ;
4277: END IF;
4278:

Line 4276: RAISE FND_API.G_EXC_ERROR ;

4272: --------------------------------------------
4273: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
4275: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4276: RAISE FND_API.G_EXC_ERROR ;
4277: END IF;
4278:
4279: END IF;
4280: -- Code changes for Bug# 6902073 Ends

Line 4295: p_init_msg_list => FND_API.G_FALSE,

4291: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4292: END IF;
4293: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
4294: p_api_version => 1.0,
4295: p_init_msg_list => FND_API.G_FALSE,
4296: p_doc_id => p_contract_id,
4297: p_doc_version => contract_rec.contract_version_num,
4298: p_doc_type => contract_rec.contract_type,
4299: x_return_status => x_return_status,

Line 4323: p_init_msg_list => FND_API.G_FALSE,

4319: 'Calling OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation');
4320: END IF;
4321: OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation (
4322: p_api_version => 1.0,
4323: p_init_msg_list => FND_API.G_FALSE,
4324: p_doc_id => p_contract_id,
4325: p_doc_type => contract_rec.contract_type,
4326: p_keep_summary => 'N',
4327: x_return_status => x_return_status,

Line 4351: p_init_msg_list => FND_API.G_FALSE,

4347: END IF;
4348:
4349: version_uda_attribute_values(
4350: p_api_version => 1,
4351: p_init_msg_list => FND_API.G_FALSE,
4352: p_commit => FND_API.G_FALSE,
4353: p_contract_id => p_contract_id,
4354: p_contract_version => contract_rec.contract_version_num,
4355: x_return_status => x_return_status,

Line 4352: p_commit => FND_API.G_FALSE,

4348:
4349: version_uda_attribute_values(
4350: p_api_version => 1,
4351: p_init_msg_list => FND_API.G_FALSE,
4352: p_commit => FND_API.G_FALSE,
4353: p_contract_id => p_contract_id,
4354: p_contract_version => contract_rec.contract_version_num,
4355: x_return_status => x_return_status,
4356: x_msg_count => x_msg_count,

Line 4375: p_init_msg_list => FND_API.G_FALSE,

4371:
4372: ---Version the relationships information
4373: version_contract_usages(
4374: p_api_version => 1,
4375: p_init_msg_list => FND_API.G_FALSE,
4376: p_commit => FND_API.G_FALSE,
4377: p_contract_id => p_contract_id,
4378: x_return_status => x_return_status,
4379: x_msg_count => x_msg_count,

Line 4376: p_commit => FND_API.G_FALSE,

4372: ---Version the relationships information
4373: version_contract_usages(
4374: p_api_version => 1,
4375: p_init_msg_list => FND_API.G_FALSE,
4376: p_commit => FND_API.G_FALSE,
4377: p_contract_id => p_contract_id,
4378: x_return_status => x_return_status,
4379: x_msg_count => x_msg_count,
4380: x_msg_data => x_msg_data

Line 4404: IF(p_version_from_api = fnd_api.g_false) THEN

4400: 'Delete contract header record.');
4401: END IF;
4402:
4403: -- If this is called from API versioning, do not delete the header
4404: IF(p_version_from_api = fnd_api.g_false) THEN
4405: -- Delete the header record
4406: DELETE FROM OKC_REP_CONTRACTS_ALL
4407: WHERE contract_id=p_contract_id;
4408: END IF;

Line 4411: IF FND_API.To_Boolean( p_commit ) THEN

4407: WHERE contract_id=p_contract_id;
4408: END IF;
4409:
4410: -- Standard check of p_commit
4411: IF FND_API.To_Boolean( p_commit ) THEN
4412: COMMIT WORK;
4413: END IF;
4414:
4415: -- Standard call to get message count and if count is 1, get message info.

Line 4425: WHEN FND_API.G_EXC_ERROR THEN

4421: END IF;
4422:
4423:
4424: EXCEPTION
4425: WHEN FND_API.G_EXC_ERROR THEN
4426: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4427: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4428: g_module || l_api_name,
4429: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');

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

4425: WHEN FND_API.G_EXC_ERROR THEN
4426: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4427: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4428: g_module || l_api_name,
4429: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');
4430: END IF;
4431: --close cursors
4432: IF (contract_csr%ISOPEN) THEN
4433: CLOSE contract_csr ;

Line 4436: x_return_status := FND_API.G_RET_STS_ERROR;

4432: IF (contract_csr%ISOPEN) THEN
4433: CLOSE contract_csr ;
4434: END IF;
4435: ROLLBACK TO version_contract_details_PVT;
4436: x_return_status := FND_API.G_RET_STS_ERROR;
4437: FND_MSG_PUB.Count_And_Get(
4438: p_count => x_msg_count,
4439: p_data => x_msg_data
4440: );

Line 4442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4438: p_count => x_msg_count,
4439: p_data => x_msg_data
4440: );
4441:
4442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4445: g_module || l_api_name,
4446: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

4442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4445: g_module || l_api_name,
4446: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4447: END IF;
4448: --close cursors
4449: IF (contract_csr%ISOPEN) THEN
4450: CLOSE contract_csr ;

Line 4453: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4449: IF (contract_csr%ISOPEN) THEN
4450: CLOSE contract_csr ;
4451: END IF;
4452: ROLLBACK TO version_contract_details_PVT;
4453: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4454: FND_MSG_PUB.Count_And_Get(
4455: p_count => x_msg_count,
4456: p_data => x_msg_data
4457: );

Line 4476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4472: --close cursors
4473: IF (contract_csr%ISOPEN) THEN
4474: CLOSE contract_csr ;
4475: END IF;
4476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4477: FND_MSG_PUB.Count_And_Get(
4478: p_count => x_msg_count,
4479: p_data => x_msg_data
4480: );

Line 4494: -- Default = FND_API.G_FALSE

4490: --Pre-reqs : None.
4491: --Parameters :
4492: --IN : p_api_version IN NUMBER Required
4493: -- : p_init_msg_list IN VARCHAR2 Optional
4494: -- Default = FND_API.G_FALSE
4495: -- : p_commit IN VARCHAR2 Optional
4496: -- Default = FND_API.G_FALSE
4497: -- : p_contract_id IN NUMBER Required
4498: -- Id of the contract to be signed

Line 4496: -- Default = FND_API.G_FALSE

4492: --IN : p_api_version IN NUMBER Required
4493: -- : p_init_msg_list IN VARCHAR2 Optional
4494: -- Default = FND_API.G_FALSE
4495: -- : p_commit IN VARCHAR2 Optional
4496: -- Default = FND_API.G_FALSE
4497: -- : p_contract_id IN NUMBER Required
4498: -- Id of the contract to be signed
4499: --OUT : x_return_status OUT VARCHAR2(1)
4500: -- : x_msg_count OUT NUMBER

Line 4539: l_expiration_date_matches_flag := FND_API.G_FALSE;

4535: arch_contract_rec arch_contract_csr%ROWTYPE;
4536:
4537: BEGIN
4538:
4539: l_expiration_date_matches_flag := FND_API.G_FALSE;
4540: l_effective_date_matches_flag := FND_API.G_FALSE;
4541:
4542: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4540: l_effective_date_matches_flag := FND_API.G_FALSE;

4536:
4537: BEGIN
4538:
4539: l_expiration_date_matches_flag := FND_API.G_FALSE;
4540: l_effective_date_matches_flag := FND_API.G_FALSE;
4541:
4542: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4544: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');

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

4549: l_api_version := 1.0;
4550: -- Standard Start of API savepoint
4551: SAVEPOINT sign_contract_PVT;
4552: -- Standard call to check for call compatibility.
4553: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4554: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4555: END IF;
4556: -- Initialize message list if p_init_msg_list is set to TRUE.
4557: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 4554: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4550: -- Standard Start of API savepoint
4551: SAVEPOINT sign_contract_PVT;
4552: -- Standard call to check for call compatibility.
4553: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4554: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4555: END IF;
4556: -- Initialize message list if p_init_msg_list is set to TRUE.
4557: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4558: FND_MSG_PUB.initialize;

Line 4557: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4553: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4554: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4555: END IF;
4556: -- Initialize message list if p_init_msg_list is set to TRUE.
4557: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4558: FND_MSG_PUB.initialize;
4559: END IF;
4560:
4561: -- Initialize API return status to success

Line 4562: x_return_status := FND_API.G_RET_STS_SUCCESS;

4558: FND_MSG_PUB.initialize;
4559: END IF;
4560:
4561: -- Initialize API return status to success
4562: x_return_status := FND_API.G_RET_STS_SUCCESS;
4563:
4564: -- Get effective dates and version of the contract.
4565: OPEN contract_csr;
4566: FETCH contract_csr INTO contract_rec;

Line 4577: RAISE FND_API.G_EXC_ERROR;

4573: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
4574: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
4575: p_token1 => G_CONTRACT_ID_TOKEN,
4576: p_token1_value => to_char(p_contract_id));
4577: RAISE FND_API.G_EXC_ERROR;
4578: -- RAISE NO_DATA_FOUND;
4579: END IF;
4580:
4581: -- Lock the contract header

Line 4612: p_init_msg_list => FND_API.G_FALSE,

4608: END IF;
4609: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
4610: OKC_REP_UTIL_PVT.change_contract_status(
4611: p_api_version => 1.0,
4612: p_init_msg_list => FND_API.G_FALSE,
4613: p_contract_id => p_contract_id,
4614: p_contract_version => contract_rec.contract_version_num,
4615: p_status_code => G_STATUS_SIGNED,
4616: p_user_id => fnd_global.user_id,

Line 4641: p_init_msg_list => FND_API.G_FALSE,

4637: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4638: END IF;
4639: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
4640: p_api_version => 1.0,
4641: p_init_msg_list => FND_API.G_FALSE,
4642: p_doc_id => p_contract_id,
4643: p_doc_version => contract_rec.contract_version_num,
4644: p_doc_type => contract_rec.contract_type,
4645: x_return_status => x_return_status,

Line 4669: l_sync_flag := FND_API.G_FALSE;

4665: || contract_rec.latest_signed_ver_number);
4666: END IF;
4667: -- Now we need to activate deliverables
4668: if (contract_rec.latest_signed_ver_number IS NULL) THEN
4669: l_sync_flag := FND_API.G_FALSE;
4670: ELSE
4671: l_sync_flag := FND_API.G_TRUE;
4672: END IF;
4673:

Line 4671: l_sync_flag := FND_API.G_TRUE;

4667: -- Now we need to activate deliverables
4668: if (contract_rec.latest_signed_ver_number IS NULL) THEN
4669: l_sync_flag := FND_API.G_FALSE;
4670: ELSE
4671: l_sync_flag := FND_API.G_TRUE;
4672: END IF;
4673:
4674: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 4688: p_init_msg_list => FND_API.G_FALSE,

4684: END IF;
4685:
4686: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (
4687: p_api_version => 1.0,
4688: p_init_msg_list => FND_API.G_FALSE,
4689: p_commit => FND_API.G_FALSE,
4690: p_bus_doc_id => p_contract_id,
4691: p_bus_doc_type => contract_rec.contract_type,
4692: p_bus_doc_version => contract_rec.contract_version_num,

Line 4689: p_commit => FND_API.G_FALSE,

4685:
4686: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (
4687: p_api_version => 1.0,
4688: p_init_msg_list => FND_API.G_FALSE,
4689: p_commit => FND_API.G_FALSE,
4690: p_bus_doc_id => p_contract_id,
4691: p_bus_doc_type => contract_rec.contract_type,
4692: p_bus_doc_version => contract_rec.contract_version_num,
4693: p_event_code => G_CONTRACT_EFFECTIVE_EVENT,

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

4711: END IF;
4712: --------------------------------------------------------
4713:
4714: -- Checking if we need to call deliverable's APIs for synch-ing
4715: IF (l_sync_flag = FND_API.G_TRUE) THEN
4716: -- Get the previous signed contract's expiration date
4717: -- Get effective dates and version of the contract.
4718: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number);
4719: FETCH arch_contract_csr INTO arch_contract_rec;

Line 4730: RAISE FND_API.G_EXC_ERROR;

4726: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
4727: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
4728: p_token1 => G_CONTRACT_ID_TOKEN,
4729: p_token1_value => to_char(p_contract_id));
4730: RAISE FND_API.G_EXC_ERROR;
4731: -- RAISE NO_DATA_FOUND;
4732: END IF;
4733: l_prev_signed_effective_date := arch_contract_rec.contract_effective_date;
4734: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;

Line 4753: l_expiration_date_matches_flag := FND_API.G_TRUE;

4749: -- If last signed version's expiration date is different from the current version's expiration date
4750: -- we need to call deliverables API for synching previous signed deliverables.
4751: -- This logic is executed to handle the null date scenarios
4752: IF (trunc(l_prev_signed_expiration_date)=trunc(contract_rec.contract_expiration_date)) THEN
4753: l_expiration_date_matches_flag := FND_API.G_TRUE;
4754: END IF;
4755:
4756: IF (trunc(l_prev_signed_effective_date)=trunc(contract_rec.contract_effective_date)) THEN
4757: l_effective_date_matches_flag := FND_API.G_TRUE;

Line 4757: l_effective_date_matches_flag := FND_API.G_TRUE;

4753: l_expiration_date_matches_flag := FND_API.G_TRUE;
4754: END IF;
4755:
4756: IF (trunc(l_prev_signed_effective_date)=trunc(contract_rec.contract_effective_date)) THEN
4757: l_effective_date_matches_flag := FND_API.G_TRUE;
4758: END IF;
4759:
4760: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4761: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

4756: IF (trunc(l_prev_signed_effective_date)=trunc(contract_rec.contract_effective_date)) THEN
4757: l_effective_date_matches_flag := FND_API.G_TRUE;
4758: END IF;
4759:
4760: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4761: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4762: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4763: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4764: END IF;

Line 4767: p_init_msg_list => FND_API.G_FALSE,

4763: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4764: END IF;
4765: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4766: p_api_version => 1.0,
4767: p_init_msg_list => FND_API.G_FALSE,
4768: p_commit => FND_API.G_FALSE,
4769: p_bus_doc_id => p_contract_id,
4770: p_bus_doc_type => contract_rec.contract_type,
4771: p_bus_doc_version => contract_rec.contract_version_num,

Line 4768: p_commit => FND_API.G_FALSE,

4764: END IF;
4765: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4766: p_api_version => 1.0,
4767: p_init_msg_list => FND_API.G_FALSE,
4768: p_commit => FND_API.G_FALSE,
4769: p_bus_doc_id => p_contract_id,
4770: p_bus_doc_type => contract_rec.contract_type,
4771: p_bus_doc_version => contract_rec.contract_version_num,
4772: p_bus_doc_date_events_tbl => l_update_event_tbl,

Line 4797: p_init_msg_list => FND_API.G_FALSE,

4793: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
4794: END IF;
4795: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
4796: p_api_version => 1.0,
4797: p_init_msg_list => FND_API.G_FALSE,
4798: p_commit => FND_API.G_FALSE,
4799: p_bus_doc_id => p_contract_id,
4800: p_bus_doc_type => contract_rec.contract_type,
4801: p_bus_doc_version => contract_rec.latest_signed_ver_number,

Line 4798: p_commit => FND_API.G_FALSE,

4794: END IF;
4795: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
4796: p_api_version => 1.0,
4797: p_init_msg_list => FND_API.G_FALSE,
4798: p_commit => FND_API.G_FALSE,
4799: p_bus_doc_id => p_contract_id,
4800: p_bus_doc_type => contract_rec.contract_type,
4801: p_bus_doc_version => contract_rec.latest_signed_ver_number,
4802: x_msg_data => x_msg_data,

Line 4828: IF FND_API.To_Boolean( p_commit ) THEN

4824: SET latest_signed_ver_number = contract_rec.contract_version_num
4825: WHERE contract_id = p_contract_id;
4826: CLOSE contract_csr;
4827: -- Standard check of p_commit
4828: IF FND_API.To_Boolean( p_commit ) THEN
4829: COMMIT WORK;
4830: END IF;
4831:
4832: -- Standard call to get message count and if count is 1, get message info.

Line 4842: WHEN FND_API.G_EXC_ERROR THEN

4838: END IF;
4839:
4840:
4841: EXCEPTION
4842: WHEN FND_API.G_EXC_ERROR THEN
4843: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4844: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4845: g_module || l_api_name,
4846: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');

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

4842: WHEN FND_API.G_EXC_ERROR THEN
4843: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4844: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4845: g_module || l_api_name,
4846: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
4847: END IF;
4848: --close cursors
4849: IF (contract_csr%ISOPEN) THEN
4850: CLOSE contract_csr ;

Line 4856: x_return_status := FND_API.G_RET_STS_ERROR;

4852: IF (arch_contract_csr%ISOPEN) THEN
4853: CLOSE arch_contract_csr ;
4854: END IF;
4855: ROLLBACK TO sign_contract_PVT;
4856: x_return_status := FND_API.G_RET_STS_ERROR;
4857: FND_MSG_PUB.Count_And_Get(
4858: p_count => x_msg_count,
4859: p_data => x_msg_data
4860: );

Line 4862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4858: p_count => x_msg_count,
4859: p_data => x_msg_data
4860: );
4861:
4862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4863: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4864: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4865: g_module || l_api_name,
4866: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

4862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4863: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4864: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4865: g_module || l_api_name,
4866: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4867: END IF;
4868: --close cursors
4869: IF (contract_csr%ISOPEN) THEN
4870: CLOSE contract_csr ;

Line 4876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4872: IF (arch_contract_csr%ISOPEN) THEN
4873: CLOSE arch_contract_csr ;
4874: END IF;
4875: ROLLBACK TO sign_contract_PVT;
4876: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4877: FND_MSG_PUB.Count_And_Get(
4878: p_count => x_msg_count,
4879: p_data => x_msg_data
4880: );

Line 4902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4898: END IF;
4899: IF (arch_contract_csr%ISOPEN) THEN
4900: CLOSE arch_contract_csr ;
4901: END IF;
4902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4903: FND_MSG_PUB.Count_And_Get(
4904: p_count => x_msg_count,
4905: p_data => x_msg_data
4906: );

Line 4917: -- Default = FND_API.G_FALSE

4913: --Pre-reqs : None.
4914: --Parameters :
4915: --IN : p_api_version IN NUMBER Required
4916: -- : p_init_msg_list IN VARCHAR2 Optional
4917: -- Default = FND_API.G_FALSE
4918: -- : p_commit IN VARCHAR2 Optional
4919: -- Default = FND_API.G_FALSE
4920: -- : p_contract_id IN NUMBER Required
4921: -- Id of the contract to be signed

Line 4919: -- Default = FND_API.G_FALSE

4915: --IN : p_api_version IN NUMBER Required
4916: -- : p_init_msg_list IN VARCHAR2 Optional
4917: -- Default = FND_API.G_FALSE
4918: -- : p_commit IN VARCHAR2 Optional
4919: -- Default = FND_API.G_FALSE
4920: -- : p_contract_id IN NUMBER Required
4921: -- Id of the contract to be signed
4922: --OUT : x_return_status OUT VARCHAR2(1)
4923: -- : x_msg_count OUT NUMBER

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

4984: l_api_version := 1.0;
4985: -- Standard Start of API savepoint
4986: SAVEPOINT Esign_contract;
4987: -- Standard call to check for call compatibility.
4988: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4990: END IF;
4991: -- Initialize message list if p_init_msg_list is set to TRUE.
4992: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 4989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4985: -- Standard Start of API savepoint
4986: SAVEPOINT Esign_contract;
4987: -- Standard call to check for call compatibility.
4988: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4990: END IF;
4991: -- Initialize message list if p_init_msg_list is set to TRUE.
4992: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4993: FND_MSG_PUB.initialize;

Line 4992: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4988: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
4989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4990: END IF;
4991: -- Initialize message list if p_init_msg_list is set to TRUE.
4992: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4993: FND_MSG_PUB.initialize;
4994: END IF;
4995: -- Initialize API return status to success
4996: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4996: x_return_status := FND_API.G_RET_STS_SUCCESS;

4992: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4993: FND_MSG_PUB.initialize;
4994: END IF;
4995: -- Initialize API return status to success
4996: x_return_status := FND_API.G_RET_STS_SUCCESS;
4997:
4998: SELECT OKC_REP_WF_SIGN_S.nextval INTO l_wf_sequence FROM dual;
4999: -- Get contract number
5000: OPEN contract_csr;

Line 5012: RAISE FND_API.G_EXC_ERROR;

5008: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5009: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
5010: p_token1 => G_CONTRACT_ID_TOKEN,
5011: p_token1_value => to_char(p_contract_id));
5012: RAISE FND_API.G_EXC_ERROR;
5013: -- RAISE NO_DATA_FOUND;
5014: END IF;
5015:
5016: -- Get the user key

Line 5034: RAISE FND_API.G_EXC_ERROR;

5030: END IF;
5031: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5032: p_msg_name => 'OKC_REP_INV_E_SIGN'
5033: );
5034: RAISE FND_API.G_EXC_ERROR;
5035:
5036: END IF;
5037:
5038: CLOSE contract_csr;

Line 5047: p_init_msg_list => FND_API.G_FALSE,

5043: END IF;
5044: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
5045: OKC_REP_UTIL_PVT.change_contract_status(
5046: p_api_version => 1.0,
5047: p_init_msg_list => FND_API.G_FALSE,
5048: p_contract_id => p_contract_id,
5049: p_contract_version => l_contract_version,
5050: p_status_code => G_STATUS_PENDING_SIGNATURE,
5051: p_user_id => fnd_global.user_id,

Line 5078: p_init_msg_list => FND_API.G_FALSE,

5074: END IF;
5075: -- Add a record in OKC_REP_CON_SIGNATURES table.
5076: OKC_REP_UTIL_PVT.add_signature_hist_record(
5077: p_api_version => 1.0,
5078: p_init_msg_list => FND_API.G_FALSE,
5079: p_contract_id => p_contract_id,
5080: p_sequence_id => NULL ,
5081: p_contract_version => contract_rec.contract_version_num,
5082: p_action_code => G_ACTION_SUBMITTED,

Line 5244: WHEN FND_API.G_EXC_ERROR THEN

5240: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.Esign_contract');
5241: END IF;
5242:
5243: EXCEPTION
5244: WHEN FND_API.G_EXC_ERROR THEN
5245: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5246: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5247: g_module || l_api_name,
5248: 'Leaving Esign_contract:FND_API.G_EXC_ERROR Exception');

Line 5248: 'Leaving Esign_contract:FND_API.G_EXC_ERROR Exception');

5244: WHEN FND_API.G_EXC_ERROR THEN
5245: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5246: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5247: g_module || l_api_name,
5248: 'Leaving Esign_contract:FND_API.G_EXC_ERROR Exception');
5249: END IF;
5250: --close cursors
5251: IF (contract_csr%ISOPEN) THEN
5252: CLOSE contract_csr ;

Line 5255: x_return_status := FND_API.G_RET_STS_ERROR;

5251: IF (contract_csr%ISOPEN) THEN
5252: CLOSE contract_csr ;
5253: END IF;
5254: ROLLBACK TO Esign_contract;
5255: x_return_status := FND_API.G_RET_STS_ERROR;
5256: FND_MSG_PUB.Count_And_Get(
5257: p_count => x_msg_count,
5258: p_data => x_msg_data
5259: );

Line 5261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5257: p_count => x_msg_count,
5258: p_data => x_msg_data
5259: );
5260:
5261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5262: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5263: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5264: g_module || l_api_name,
5265: 'Leaving Esign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 5265: 'Leaving Esign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

5261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5262: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5263: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5264: g_module || l_api_name,
5265: 'Leaving Esign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5266: END IF;
5267: --close cursors
5268: IF (contract_csr%ISOPEN) THEN
5269: CLOSE contract_csr ;

Line 5272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5268: IF (contract_csr%ISOPEN) THEN
5269: CLOSE contract_csr ;
5270: END IF;
5271: ROLLBACK TO Esign_contract;
5272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5273: FND_MSG_PUB.Count_And_Get(
5274: p_count => x_msg_count,
5275: p_data => x_msg_data
5276: );

Line 5295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5291: p_token1_value => sqlcode,
5292: p_token2 => G_SQLERRM_TOKEN,
5293: p_token2_value => sqlerrm);
5294: ROLLBACK TO Esign_contract;
5295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5296: FND_MSG_PUB.Count_And_Get(
5297: p_count => x_msg_count,
5298: p_data => x_msg_data
5299: );

Line 5314: -- Default = FND_API.G_FALSE

5310: --Pre-reqs : None.
5311: --Parameters :
5312: --IN : p_api_version IN NUMBER Required
5313: -- : p_init_msg_list IN VARCHAR2 Optional
5314: -- Default = FND_API.G_FALSE
5315: -- : p_commit IN VARCHAR2 Optional
5316: -- Default = FND_API.G_FALSE
5317: -- : p_contract_id IN NUMBER Required
5318: -- Id of the contract to be terminated

Line 5316: -- Default = FND_API.G_FALSE

5312: --IN : p_api_version IN NUMBER Required
5313: -- : p_init_msg_list IN VARCHAR2 Optional
5314: -- Default = FND_API.G_FALSE
5315: -- : p_commit IN VARCHAR2 Optional
5316: -- Default = FND_API.G_FALSE
5317: -- : p_contract_id IN NUMBER Required
5318: -- Id of the contract to be terminated
5319: -- : p_termination_date IN DATE Required
5320: -- Date the contract is terminated

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

5362: l_api_version := 1.0;
5363: -- Standard Start of API savepoint
5364: SAVEPOINT terminate_contract_PVT;
5365: -- Standard call to check for call compatibility.
5366: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5368: END IF;
5369: -- Initialize message list if p_init_msg_list is set to TRUE.
5370: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 5367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5363: -- Standard Start of API savepoint
5364: SAVEPOINT terminate_contract_PVT;
5365: -- Standard call to check for call compatibility.
5366: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5368: END IF;
5369: -- Initialize message list if p_init_msg_list is set to TRUE.
5370: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5371: FND_MSG_PUB.initialize;

Line 5370: IF FND_API.to_Boolean( p_init_msg_list ) THEN

5366: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5368: END IF;
5369: -- Initialize message list if p_init_msg_list is set to TRUE.
5370: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5371: FND_MSG_PUB.initialize;
5372: END IF;
5373:
5374: -- Initialize API return status to success

Line 5375: x_return_status := FND_API.G_RET_STS_SUCCESS;

5371: FND_MSG_PUB.initialize;
5372: END IF;
5373:
5374: -- Initialize API return status to success
5375: x_return_status := FND_API.G_RET_STS_SUCCESS;
5376:
5377: -- Get effective dates and version of the contract.
5378: OPEN contract_csr;
5379: FETCH contract_csr INTO contract_rec;

Line 5390: RAISE FND_API.G_EXC_ERROR;

5386: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5387: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
5388: p_token1 => G_CONTRACT_ID_TOKEN,
5389: p_token1_value => to_char(p_contract_id));
5390: RAISE FND_API.G_EXC_ERROR;
5391: -- RAISE NO_DATA_FOUND;
5392: END IF;
5393:
5394: -- Lock the contract header

Line 5426: p_init_msg_list => FND_API.G_FALSE,

5422:
5423: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
5424: OKC_REP_UTIL_PVT.change_contract_status(
5425: p_api_version => 1.0,
5426: p_init_msg_list => FND_API.G_FALSE,
5427: p_contract_id => p_contract_id,
5428: p_contract_version => contract_rec.contract_version_num,
5429: p_status_code => G_STATUS_TERMINATED,
5430: p_user_id => fnd_global.user_id,

Line 5463: p_init_msg_list => FND_API.G_FALSE,

5459: END IF;
5460:
5461: OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables (
5462: p_api_version => 1.0,
5463: p_init_msg_list => FND_API.G_FALSE,
5464: p_commit => FND_API.G_FALSE,
5465: p_bus_doc_id => p_contract_id,
5466: p_bus_doc_type => contract_rec.contract_type,
5467: p_bus_doc_version => contract_rec.contract_version_num,

Line 5464: p_commit => FND_API.G_FALSE,

5460:
5461: OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables (
5462: p_api_version => 1.0,
5463: p_init_msg_list => FND_API.G_FALSE,
5464: p_commit => FND_API.G_FALSE,
5465: p_bus_doc_id => p_contract_id,
5466: p_bus_doc_type => contract_rec.contract_type,
5467: p_bus_doc_version => contract_rec.contract_version_num,
5468: p_event_code => G_CONTRACT_TERMINATED_EVENT,

Line 5498: p_init_msg_list => FND_API.G_FALSE,

5494: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables ');
5495: END IF;
5496: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
5497: p_api_version => 1.0,
5498: p_init_msg_list => FND_API.G_FALSE,
5499: p_commit => FND_API.G_FALSE,
5500: p_bus_doc_id => p_contract_id,
5501: p_bus_doc_type => contract_rec.contract_type,
5502: p_bus_doc_version => contract_rec.contract_version_num,

Line 5499: p_commit => FND_API.G_FALSE,

5495: END IF;
5496: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
5497: p_api_version => 1.0,
5498: p_init_msg_list => FND_API.G_FALSE,
5499: p_commit => FND_API.G_FALSE,
5500: p_bus_doc_id => p_contract_id,
5501: p_bus_doc_type => contract_rec.contract_type,
5502: p_bus_doc_version => contract_rec.contract_version_num,
5503: p_bus_doc_date_events_tbl => l_update_event_tbl,

Line 5526: IF FND_API.To_Boolean( p_commit ) THEN

5522:
5523: CLOSE contract_csr;
5524:
5525: -- Standard check of p_commit
5526: IF FND_API.To_Boolean( p_commit ) THEN
5527: COMMIT WORK;
5528: END IF;
5529:
5530: -- Standard call to get message count and if count is 1, get message info.

Line 5540: WHEN FND_API.G_EXC_ERROR THEN

5536: END IF;
5537:
5538:
5539: EXCEPTION
5540: WHEN FND_API.G_EXC_ERROR THEN
5541: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5542: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5543: g_module || l_api_name,
5544: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');

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

5540: WHEN FND_API.G_EXC_ERROR THEN
5541: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5542: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5543: g_module || l_api_name,
5544: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');
5545: END IF;
5546: --close cursors
5547: IF (contract_csr%ISOPEN) THEN
5548: CLOSE contract_csr ;

Line 5551: x_return_status := FND_API.G_RET_STS_ERROR;

5547: IF (contract_csr%ISOPEN) THEN
5548: CLOSE contract_csr ;
5549: END IF;
5550: ROLLBACK TO terminate_contract_PVT;
5551: x_return_status := FND_API.G_RET_STS_ERROR;
5552: FND_MSG_PUB.Count_And_Get(
5553: p_count => x_msg_count,
5554: p_data => x_msg_data
5555: );

Line 5557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5553: p_count => x_msg_count,
5554: p_data => x_msg_data
5555: );
5556:
5557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5558: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5559: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5560: g_module || l_api_name,
5561: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

5557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5558: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5559: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5560: g_module || l_api_name,
5561: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5562: END IF;
5563: --close cursors
5564: IF (contract_csr%ISOPEN) THEN
5565: CLOSE contract_csr ;

Line 5568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5564: IF (contract_csr%ISOPEN) THEN
5565: CLOSE contract_csr ;
5566: END IF;
5567: ROLLBACK TO terminate_contract_PVT;
5568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5569: FND_MSG_PUB.Count_And_Get(
5570: p_count => x_msg_count,
5571: p_data => x_msg_data
5572: );

Line 5591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5587: --close cursors
5588: IF (contract_csr%ISOPEN) THEN
5589: CLOSE contract_csr;
5590: END IF;
5591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5592: FND_MSG_PUB.Count_And_Get(
5593: p_count => x_msg_count,
5594: p_data => x_msg_data
5595: );

Line 5607: -- Default = FND_API.G_FALSE

5603: --Pre-reqs : None.
5604: --Parameters :
5605: --IN : p_api_version IN NUMBER Required
5606: -- : p_init_msg_list IN VARCHAR2 Optional
5607: -- Default = FND_API.G_FALSE
5608: -- : p_contract_id IN NUMBER Required
5609: -- Id of the contract to be processed
5610: -- : p_contract_number IN NUMBER Required
5611: -- Number of the contract to be processed

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

5723: -- Standard Start of API savepoint
5724: SAVEPOINT repository_notifier_pvt;
5725:
5726: -- Standard call to check for call compatibility.
5727: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5729: END IF;
5730:
5731: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 5728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5724: SAVEPOINT repository_notifier_pvt;
5725:
5726: -- Standard call to check for call compatibility.
5727: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
5728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5729: END IF;
5730:
5731: -- Initialize message list if p_init_msg_list is set to TRUE.
5732: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 5732: IF FND_API.to_Boolean( p_init_msg_list ) THEN

5728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5729: END IF;
5730:
5731: -- Initialize message list if p_init_msg_list is set to TRUE.
5732: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5733: FND_MSG_PUB.initialize;
5734: END IF;
5735:
5736: -- Get contact role name

Line 6014: WHEN FND_API.G_EXC_ERROR THEN

6010: END IF;
6011:
6012:
6013: EXCEPTION
6014: WHEN FND_API.G_EXC_ERROR THEN
6015: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6016: fnd_log.string(
6017: FND_LOG.LEVEL_EXCEPTION,
6018: g_module || l_api_name,

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

6015: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6016: fnd_log.string(
6017: FND_LOG.LEVEL_EXCEPTION,
6018: g_module || l_api_name,
6019: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');
6020: END IF;
6021: --close cursors
6022: IF (CONTRACT_CONTACTS%ISOPEN) THEN
6023: CLOSE CONTRACT_CONTACTS ;

Line 6030: x_return_status := FND_API.G_RET_STS_ERROR;

6026: CLOSE CONTACT_ATTRIBUTES ;
6027: END IF;
6028: ROLLBACK TO repository_notifier_pvt;
6029:
6030: x_return_status := FND_API.G_RET_STS_ERROR;
6031: FND_MSG_PUB.Count_And_Get(
6032: p_count => x_msg_count,
6033: p_data => x_msg_data
6034: );

Line 6036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6032: p_count => x_msg_count,
6033: p_data => x_msg_data
6034: );
6035:
6036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6038: fnd_log.string(
6039: FND_LOG.LEVEL_EXCEPTION,
6040: g_module || l_api_name,

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

6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6038: fnd_log.string(
6039: FND_LOG.LEVEL_EXCEPTION,
6040: g_module || l_api_name,
6041: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6042: END IF;
6043: --close cursors
6044: IF (CONTRACT_CONTACTS%ISOPEN) THEN
6045: CLOSE CONTRACT_CONTACTS ;

Line 6052: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6048: CLOSE CONTACT_ATTRIBUTES ;
6049: END IF;
6050: ROLLBACK TO repository_notifier_pvt;
6051:
6052: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6053: FND_MSG_PUB.Count_And_Get(
6054: p_count => x_msg_count,
6055: p_data => x_msg_data
6056: );

Line 6082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6078: CLOSE CONTACT_ATTRIBUTES ;
6079: END IF;
6080: ROLLBACK TO repository_notifier_pvt;
6081:
6082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6083: FND_MSG_PUB.Count_And_Get(
6084: p_count => x_msg_count,
6085: p_data => x_msg_data
6086: );

Line 6097: -- Default = FND_API.G_FALSE

6093: --Pre-reqs : None.
6094: --Parameters :
6095: --IN : p_api_version IN NUMBER Required
6096: -- : p_init_msg_list IN VARCHAR2 Optional
6097: -- Default = FND_API.G_FALSE
6098: -- : p_contract_id IN NUMBER Required
6099: -- Id of the contract to be processed
6100: -- : p_contract_version IN NUMBER Required
6101: -- Version of the contract to be processed

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

6147: -- Standard Start of API savepoint
6148: SAVEPOINT submit_contract_PVT;
6149:
6150: -- Standard call to check for call compatibility.
6151: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6153: END IF;
6154:
6155: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 6152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6148: SAVEPOINT submit_contract_PVT;
6149:
6150: -- Standard call to check for call compatibility.
6151: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6153: END IF;
6154:
6155: -- Initialize message list if p_init_msg_list is set to TRUE.
6156: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 6156: IF FND_API.to_Boolean( p_init_msg_list ) THEN

6152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6153: END IF;
6154:
6155: -- Initialize message list if p_init_msg_list is set to TRUE.
6156: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6157: FND_MSG_PUB.initialize;
6158: END IF;
6159:
6160: -- Initialize API return status to success

Line 6161: x_return_status := FND_API.G_RET_STS_SUCCESS;

6157: FND_MSG_PUB.initialize;
6158: END IF;
6159:
6160: -- Initialize API return status to success
6161: x_return_status := FND_API.G_RET_STS_SUCCESS;
6162:
6163:
6164: -- Get workflow information of the contract's approval process
6165: OPEN contract_csr;

Line 6178: RAISE FND_API.G_EXC_ERROR;

6174: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6175: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
6176: p_token1 => G_CONTRACT_ID_TOKEN,
6177: p_token1_value => to_char(p_contract_id));
6178: RAISE FND_API.G_EXC_ERROR;
6179: -- RAISE NO_DATA_FOUND;
6180: END IF;
6181: CLOSE contract_csr;
6182:

Line 6232: RAISE FND_API.G_EXC_ERROR;

6228: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6229: p_msg_name => G_CANEL_APPROVAL_ERROR_MSG,
6230: p_token1 => G_CONTRACT_NUM_TOKEN,
6231: p_token1_value => l_contract_number);
6232: RAISE FND_API.G_EXC_ERROR;
6233:
6234: END IF;
6235:
6236:

Line 6245: p_init_msg_list => FND_API.G_FALSE,

6241:
6242: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
6243: OKC_REP_UTIL_PVT.change_contract_status(
6244: p_api_version => 1.0,
6245: p_init_msg_list => FND_API.G_FALSE,
6246: p_contract_id => p_contract_id,
6247: p_contract_version => p_contract_version,
6248: p_status_code => G_STATUS_DRAFT,
6249: p_user_id => fnd_global.user_id,

Line 6276: p_init_msg_list => FND_API.G_FALSE,

6272:
6273: -- Add a record in ONC_REP_CON_APPROVALS table.
6274: OKC_REP_UTIL_PVT.add_approval_hist_record(
6275: p_api_version => 1.0,
6276: p_init_msg_list => FND_API.G_FALSE,
6277: p_contract_id => p_contract_id,
6278: p_contract_version => p_contract_version,
6279: p_action_code => G_ACTION_ABORTED,
6280: p_user_id => fnd_global.user_id,

Line 6309: WHEN FND_API.G_EXC_ERROR THEN

6305: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6306: END IF;
6307:
6308: EXCEPTION
6309: WHEN FND_API.G_EXC_ERROR THEN
6310: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6311: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6312: g_module || l_api_name,
6313: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');

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

6309: WHEN FND_API.G_EXC_ERROR THEN
6310: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6311: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6312: g_module || l_api_name,
6313: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');
6314: END IF;
6315: --close cursors
6316: IF (contract_csr%ISOPEN) THEN
6317: CLOSE contract_csr ;

Line 6320: x_return_status := FND_API.G_RET_STS_ERROR;

6316: IF (contract_csr%ISOPEN) THEN
6317: CLOSE contract_csr ;
6318: END IF;
6319: ROLLBACK TO submit_contract_PVT;
6320: x_return_status := FND_API.G_RET_STS_ERROR;
6321: FND_MSG_PUB.Count_And_Get(
6322: p_count => x_msg_count,
6323: p_data => x_msg_data
6324: );

Line 6326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6322: p_count => x_msg_count,
6323: p_data => x_msg_data
6324: );
6325:
6326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6329: g_module || l_api_name,
6330: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

6326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6329: g_module || l_api_name,
6330: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6331: END IF;
6332: --close cursors
6333: IF (contract_csr%ISOPEN) THEN
6334: CLOSE contract_csr ;

Line 6337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6333: IF (contract_csr%ISOPEN) THEN
6334: CLOSE contract_csr ;
6335: END IF;
6336: ROLLBACK TO submit_contract_PVT;
6337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6338: FND_MSG_PUB.Count_And_Get(
6339: p_count => x_msg_count,
6340: p_data => x_msg_data
6341: );

Line 6360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6356: p_token1_value => sqlcode,
6357: p_token2 => G_SQLERRM_TOKEN,
6358: p_token2_value => sqlerrm);
6359: ROLLBACK TO submit_contract_PVT;
6360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6361: FND_MSG_PUB.Count_And_Get(
6362: p_count => x_msg_count,
6363: p_data => x_msg_data
6364: );

Line 6383: -- Default = FND_API.G_FALSE

6379: --Pre-reqs : None.
6380: --Parameters :
6381: --IN : p_api_version IN NUMBER Required
6382: -- : p_init_msg_list IN VARCHAR2 Optional
6383: -- Default = FND_API.G_FALSE
6384: -- : p_contract_number IN VARCHAR2 Optional
6385: -- Number of the contract
6386: -- : p_org_id IN NUMBER Required
6387: -- Id of the contract organization

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

6457: -- Standard Start of API savepoint
6458: SAVEPOINT submit_contract_PVT;
6459:
6460: -- Standard call to check for call compatibility.
6461: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6463: END IF;
6464:
6465: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 6462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6458: SAVEPOINT submit_contract_PVT;
6459:
6460: -- Standard call to check for call compatibility.
6461: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6463: END IF;
6464:
6465: -- Initialize message list if p_init_msg_list is set to TRUE.
6466: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 6466: IF FND_API.to_Boolean( p_init_msg_list ) THEN

6462: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6463: END IF;
6464:
6465: -- Initialize message list if p_init_msg_list is set to TRUE.
6466: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6467: FND_MSG_PUB.initialize;
6468: END IF;
6469:
6470: -- Initialize API return status to success

Line 6471: x_return_status := FND_API.G_RET_STS_SUCCESS;

6467: FND_MSG_PUB.initialize;
6468: END IF;
6469:
6470: -- Initialize API return status to success
6471: x_return_status := FND_API.G_RET_STS_SUCCESS;
6472:
6473: -- Get value of the profile option "Sequential Numbering"
6474: l_profile_doc_seq := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
6475:

Line 6478: x_auto_number_enabled := FND_API.G_FALSE;

6474: l_profile_doc_seq := fnd_profile.value('UNIQUE:SEQ_NUMBERS');
6475:
6476: IF p_info_only = 'Y' AND
6477: l_profile_doc_seq = 'N' THEN
6478: x_auto_number_enabled := FND_API.G_FALSE;
6479: return;
6480: END IF;
6481:
6482:

Line 6495: RAISE FND_API.G_EXC_ERROR ;

6491: 'Set of book id not found');
6492: END IF;
6493:
6494: CLOSE l_get_sob_csr;
6495: RAISE FND_API.G_EXC_ERROR ;
6496: END IF;
6497: l_row_notfound := FALSE;
6498: l_doc_category_code := substr(Fnd_Profile.Value('OKC_REP_CON_NUM_DOC_SEQ_CATEGORY'),1,30);
6499:

Line 6518: RAISE FND_API.G_EXC_ERROR;

6514: suppress_error => 'N' ,
6515: suppress_warn => 'Y');
6516:
6517: IF l_result <> FND_SEQNUM.SEQSUCC THEN
6518: RAISE FND_API.G_EXC_ERROR;
6519: END IF;
6520:
6521: IF p_info_only = 'Y' THEN
6522: IF l_doc_sequence_type <> 'M' THEN

Line 6523: x_auto_number_enabled := FND_API.G_TRUE;

6519: END IF;
6520:
6521: IF p_info_only = 'Y' THEN
6522: IF l_doc_sequence_type <> 'M' THEN
6523: x_auto_number_enabled := FND_API.G_TRUE;
6524: ELSE
6525: x_auto_number_enabled := FND_API.G_FALSE;
6526: END IF;
6527: return;

Line 6525: x_auto_number_enabled := FND_API.G_FALSE;

6521: IF p_info_only = 'Y' THEN
6522: IF l_doc_sequence_type <> 'M' THEN
6523: x_auto_number_enabled := FND_API.G_TRUE;
6524: ELSE
6525: x_auto_number_enabled := FND_API.G_FALSE;
6526: END IF;
6527: return;
6528: END IF;
6529:

Line 6542: RAISE FND_API.G_EXC_ERROR;

6538: seq_val => l_doc_sequence_value,
6539: docseq_id => l_doc_sequence_id);
6540:
6541: IF l_result <> 0 THEN
6542: RAISE FND_API.G_EXC_ERROR;
6543: ELSE
6544: x_contract_number := TO_CHAR(l_doc_sequence_value);
6545: END IF;
6546:

Line 6559: RAISE FND_API.G_EXC_ERROR;

6555: -- Show duplicate Contract number error message
6556:
6557: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6558: p_msg_name => G_INVALID_CONTRACT_NUMBER_MSG);
6559: RAISE FND_API.G_EXC_ERROR;
6560:
6561: END IF;
6562:
6563: ELSIF (l_doc_sequence_type = 'M') THEN

Line 6577: WHEN FND_API.G_EXC_ERROR THEN

6573: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
6574: END IF;
6575:
6576: EXCEPTION
6577: WHEN FND_API.G_EXC_ERROR THEN
6578: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6579: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6580: g_module || l_api_name,
6581: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');

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

6577: WHEN FND_API.G_EXC_ERROR THEN
6578: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6579: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6580: g_module || l_api_name,
6581: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');
6582: END IF;
6583: --close cursors
6584: IF (l_ensure_unique_csr%ISOPEN) THEN
6585: CLOSE l_ensure_unique_csr ;

Line 6593: x_return_status := FND_API.G_RET_STS_ERROR;

6589: CLOSE l_get_sob_csr ;
6590: END IF;
6591:
6592: ROLLBACK TO submit_contract_PVT;
6593: x_return_status := FND_API.G_RET_STS_ERROR;
6594: FND_MSG_PUB.Count_And_Get(
6595: p_count => x_msg_count,
6596: p_data => x_msg_data
6597: );

Line 6599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6595: p_count => x_msg_count,
6596: p_data => x_msg_data
6597: );
6598:
6599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6600: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6601: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6602: g_module || l_api_name,
6603: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

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

6599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6600: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6601: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6602: g_module || l_api_name,
6603: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6604: END IF;
6605: --close cursors
6606: IF (l_ensure_unique_csr%ISOPEN) THEN
6607: CLOSE l_ensure_unique_csr ;

Line 6615: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6611: CLOSE l_get_sob_csr ;
6612: END IF;
6613:
6614: ROLLBACK TO submit_contract_PVT;
6615: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6616: FND_MSG_PUB.Count_And_Get(
6617: p_count => x_msg_count,
6618: p_data => x_msg_data
6619: );

Line 6643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6639: p_token1_value => sqlcode,
6640: p_token2 => G_SQLERRM_TOKEN,
6641: p_token2_value => sqlerrm);
6642: ROLLBACK TO submit_contract_PVT;
6643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6644: FND_MSG_PUB.Count_And_Get(
6645: p_count => x_msg_count,
6646: p_data => x_msg_data
6647: );

Line 6659: -- Default = FND_API.G_FALSE

6655: --Pre-reqs : None.
6656: --Parameters :
6657: --IN : p_api_version IN NUMBER Required
6658: -- : p_init_msg_list IN VARCHAR2 Optional
6659: -- Default = FND_API.G_FALSE
6660: -- : p_commit IN VARCHAR2 Optional
6661: -- Default = FND_API.G_FALSE
6662: -- : p_contract_id IN NUMBER Required
6663: -- Contract ID of the contract whose status history is to be deleted

Line 6661: -- Default = FND_API.G_FALSE

6657: --IN : p_api_version IN NUMBER Required
6658: -- : p_init_msg_list IN VARCHAR2 Optional
6659: -- Default = FND_API.G_FALSE
6660: -- : p_commit IN VARCHAR2 Optional
6661: -- Default = FND_API.G_FALSE
6662: -- : p_contract_id IN NUMBER Required
6663: -- Contract ID of the contract whose status history is to be deleted
6664: -- : p_contract_version IN NUMBER Required
6665: -- Contract version of the contract whose status history is to be deleted

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

6693: l_api_version := 1.0;
6694: -- Standard Start of API savepoint
6695: SAVEPOINT delete_uda_attr_values_PVT;
6696: -- Standard call to check for call compatibility.
6697: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6699: END IF;
6700: -- Initialize message list if p_init_msg_list is set to TRUE.
6701: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 6698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6694: -- Standard Start of API savepoint
6695: SAVEPOINT delete_uda_attr_values_PVT;
6696: -- Standard call to check for call compatibility.
6697: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6699: END IF;
6700: -- Initialize message list if p_init_msg_list is set to TRUE.
6701: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6702: FND_MSG_PUB.initialize;

Line 6701: IF FND_API.to_Boolean( p_init_msg_list ) THEN

6697: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
6698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6699: END IF;
6700: -- Initialize message list if p_init_msg_list is set to TRUE.
6701: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6702: FND_MSG_PUB.initialize;
6703: END IF;
6704:
6705: -- Initialize API return status to success

Line 6706: x_return_status := FND_API.G_RET_STS_SUCCESS;

6702: FND_MSG_PUB.initialize;
6703: END IF;
6704:
6705: -- Initialize API return status to success
6706: x_return_status := FND_API.G_RET_STS_SUCCESS;
6707:
6708: select contract_version_num into l_con_version
6709: from okc_rep_contracts_all
6710: where CONTRACT_ID = p_contract_id ;

Line 7061: IF FND_API.To_Boolean( p_commit ) THEN

7057: WHERE CONTRACT_ID = p_contract_id
7058: AND contract_version_num = l_con_version - 1 ;
7059: */
7060: -- Standard check of p_commit
7061: IF FND_API.To_Boolean( p_commit ) THEN
7062: COMMIT WORK;
7063: END IF;
7064:
7065: -- Standard call to get message count and if count is 1, get message info.

Line 7075: WHEN FND_API.G_EXC_ERROR THEN

7071: END IF;
7072:
7073:
7074: EXCEPTION
7075: WHEN FND_API.G_EXC_ERROR THEN
7076: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7077: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7078: g_module || l_api_name,
7079: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_ERROR Exception');

Line 7079: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_ERROR Exception');

7075: WHEN FND_API.G_EXC_ERROR THEN
7076: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7077: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7078: g_module || l_api_name,
7079: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7080: END IF;
7081: ROLLBACK TO delete_uda_attr_values_PVT;
7082: x_return_status := FND_API.G_RET_STS_ERROR;
7083: FND_MSG_PUB.Count_And_Get(

Line 7082: x_return_status := FND_API.G_RET_STS_ERROR;

7078: g_module || l_api_name,
7079: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7080: END IF;
7081: ROLLBACK TO delete_uda_attr_values_PVT;
7082: x_return_status := FND_API.G_RET_STS_ERROR;
7083: FND_MSG_PUB.Count_And_Get(
7084: p_count => x_msg_count,
7085: p_data => x_msg_data
7086: );

Line 7088: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7084: p_count => x_msg_count,
7085: p_data => x_msg_data
7086: );
7087:
7088: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7089: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7090: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7091: g_module || l_api_name,
7092: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 7092: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

7088: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7089: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7090: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7091: g_module || l_api_name,
7092: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7093: END IF;
7094: ROLLBACK TO delete_uda_attr_values_PVT;
7095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7096: FND_MSG_PUB.Count_And_Get(

Line 7095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7091: g_module || l_api_name,
7092: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7093: END IF;
7094: ROLLBACK TO delete_uda_attr_values_PVT;
7095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7096: FND_MSG_PUB.Count_And_Get(
7097: p_count => x_msg_count,
7098: p_data => x_msg_data
7099: );

Line 7114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7110: p_token1_value => sqlcode,
7111: p_token2 => G_SQLERRM_TOKEN,
7112: p_token2_value => sqlerrm);
7113: ROLLBACK TO delete_uda_attr_values_PVT;
7114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7115: FND_MSG_PUB.Count_And_Get(
7116: p_count => x_msg_count,
7117: p_data => x_msg_data
7118: );

Line 7130: -- Default = FND_API.G_FALSE

7126: --Pre-reqs : None.
7127: --Parameters :
7128: --IN : p_api_version IN NUMBER Required
7129: -- : p_init_msg_list IN VARCHAR2 Optional
7130: -- Default = FND_API.G_FALSE
7131: -- : p_commit IN VARCHAR2 Optional
7132: -- Default = FND_API.G_FALSE
7133: -- : p_source_contract_id IN NUMBER Required
7134: -- Id of the contract whose UDAs are to be copied

Line 7132: -- Default = FND_API.G_FALSE

7128: --IN : p_api_version IN NUMBER Required
7129: -- : p_init_msg_list IN VARCHAR2 Optional
7130: -- Default = FND_API.G_FALSE
7131: -- : p_commit IN VARCHAR2 Optional
7132: -- Default = FND_API.G_FALSE
7133: -- : p_source_contract_id IN NUMBER Required
7134: -- Id of the contract whose UDAs are to be copied
7135: -- : p_target_contract_id IN NUMBER Required
7136: -- Id of the contract to which source contract UDA are to be copied

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

7186: l_api_version := 1.0;
7187: -- Standard Start of API savepoint
7188: SAVEPOINT copy_uda_attribute_values_PVT;
7189: -- Standard call to check for call compatibility.
7190: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
7191: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7192: END IF;
7193: -- Initialize message list if p_init_msg_list is set to TRUE.
7194: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 7191: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7187: -- Standard Start of API savepoint
7188: SAVEPOINT copy_uda_attribute_values_PVT;
7189: -- Standard call to check for call compatibility.
7190: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
7191: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7192: END IF;
7193: -- Initialize message list if p_init_msg_list is set to TRUE.
7194: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7195: FND_MSG_PUB.initialize;

Line 7194: IF FND_API.to_Boolean( p_init_msg_list ) THEN

7190: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
7191: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7192: END IF;
7193: -- Initialize message list if p_init_msg_list is set to TRUE.
7194: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7195: FND_MSG_PUB.initialize;
7196: END IF;
7197:
7198: -- Initialize API return status to success

Line 7199: x_return_status := FND_API.G_RET_STS_SUCCESS;

7195: FND_MSG_PUB.initialize;
7196: END IF;
7197:
7198: -- Initialize API return status to success
7199: x_return_status := FND_API.G_RET_STS_SUCCESS;
7200:
7201: SELECT *
7202: INTO l_object
7203: FROM FND_OBJECTS

Line 7245: RAISE FND_API.G_EXC_ERROR;

7241: END IF;
7242: ELSE
7243: FND_MESSAGE.set_name('PO', 'PO_UDA_PK_COL_NAME_ERR');
7244: FND_MSG_PUB.add;
7245: RAISE FND_API.G_EXC_ERROR;
7246: END IF;
7247: l_index := l_from_pk_col_value_pairs.NEXT(l_index);
7248: END LOOP;
7249:

Line 7309: IF FND_API.To_Boolean( p_commit ) THEN

7305: ,x_errorcode => l_error_code
7306: ,x_msg_count => x_msg_count
7307: ,x_msg_data => x_msg_data );
7308:
7309: IF FND_API.To_Boolean( p_commit ) THEN
7310: COMMIT WORK;
7311: END IF;
7312:
7313: -- Standard call to get message count and if count is 1, get message info.

Line 7323: WHEN FND_API.G_EXC_ERROR THEN

7319: END IF;
7320:
7321:
7322: EXCEPTION
7323: WHEN FND_API.G_EXC_ERROR THEN
7324: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7325: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7326: g_module || l_api_name,
7327: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_ERROR Exception');

Line 7327: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_ERROR Exception');

7323: WHEN FND_API.G_EXC_ERROR THEN
7324: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7325: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7326: g_module || l_api_name,
7327: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7328: END IF;
7329: ROLLBACK TO copy_uda_attribute_values_PVT;
7330: x_return_status := FND_API.G_RET_STS_ERROR;
7331: FND_MSG_PUB.Count_And_Get(

Line 7330: x_return_status := FND_API.G_RET_STS_ERROR;

7326: g_module || l_api_name,
7327: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7328: END IF;
7329: ROLLBACK TO copy_uda_attribute_values_PVT;
7330: x_return_status := FND_API.G_RET_STS_ERROR;
7331: FND_MSG_PUB.Count_And_Get(
7332: p_count => x_msg_count,
7333: p_data => x_msg_data
7334: );

Line 7336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7332: p_count => x_msg_count,
7333: p_data => x_msg_data
7334: );
7335:
7336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7337: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7338: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7339: g_module || l_api_name,
7340: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 7340: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

7336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7337: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7338: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7339: g_module || l_api_name,
7340: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7341: END IF;
7342: ROLLBACK TO copy_uda_attribute_values_PVT;
7343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7344: FND_MSG_PUB.Count_And_Get(

Line 7343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7339: g_module || l_api_name,
7340: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7341: END IF;
7342: ROLLBACK TO copy_uda_attribute_values_PVT;
7343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7344: FND_MSG_PUB.Count_And_Get(
7345: p_count => x_msg_count,
7346: p_data => x_msg_data
7347: );

Line 7362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7358: p_token1_value => sqlcode,
7359: p_token2 => G_SQLERRM_TOKEN,
7360: p_token2_value => sqlerrm);
7361: ROLLBACK TO copy_uda_attribute_values_PVT;
7362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7363: FND_MSG_PUB.Count_And_Get(
7364: p_count => x_msg_count,
7365: p_data => x_msg_data
7366: );

Line 7377: -- Default = FND_API.G_FALSE

7373: --Pre-reqs : None.
7374: --Parameters :
7375: --IN : p_api_version IN NUMBER Required
7376: -- : p_init_msg_list IN VARCHAR2 Optional
7377: -- Default = FND_API.G_FALSE
7378: -- : p_commit IN VARCHAR2 Optional
7379: -- Default = FND_API.G_FALSE
7380: -- : p_contract_id IN NUMBER Required
7381: -- Id of the contract whose UDA's are to be versioned

Line 7379: -- Default = FND_API.G_FALSE

7375: --IN : p_api_version IN NUMBER Required
7376: -- : p_init_msg_list IN VARCHAR2 Optional
7377: -- Default = FND_API.G_FALSE
7378: -- : p_commit IN VARCHAR2 Optional
7379: -- Default = FND_API.G_FALSE
7380: -- : p_contract_id IN NUMBER Required
7381: -- Id of the contract whose UDA's are to be versioned
7382: -- : p_contract_version IN NUMBER Required
7383: --

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

7421: l_api_version := 1.0;
7422: -- Standard Start of API savepoint
7423: SAVEPOINT version_uda_attr_values_PVT;
7424: -- Standard call to check for call compatibility.
7425: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
7426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7427: END IF;
7428: -- Initialize message list if p_init_msg_list is set to TRUE.
7429: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 7426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7422: -- Standard Start of API savepoint
7423: SAVEPOINT version_uda_attr_values_PVT;
7424: -- Standard call to check for call compatibility.
7425: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
7426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7427: END IF;
7428: -- Initialize message list if p_init_msg_list is set to TRUE.
7429: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7430: FND_MSG_PUB.initialize;

Line 7429: IF FND_API.to_Boolean( p_init_msg_list ) THEN

7425: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
7426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7427: END IF;
7428: -- Initialize message list if p_init_msg_list is set to TRUE.
7429: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7430: FND_MSG_PUB.initialize;
7431: END IF;
7432:
7433: -- Initialize API return status to success

Line 7434: x_return_status := FND_API.G_RET_STS_SUCCESS;

7430: FND_MSG_PUB.initialize;
7431: END IF;
7432:
7433: -- Initialize API return status to success
7434: x_return_status := FND_API.G_RET_STS_SUCCESS;
7435:
7436: --No API's in EGO to copy data from one object to another.
7437: --insert data from okc_rep_contracts_all_ext_b table to okc_rep_contract_vers_ext_b
7438:

Line 7776: IF FND_API.To_Boolean( p_commit ) THEN

7772:
7773: END LOOP;
7774:
7775: -- Standard check of p_commit
7776: IF FND_API.To_Boolean( p_commit ) THEN
7777: COMMIT WORK;
7778: END IF;
7779:
7780: -- Standard call to get message count and if count is 1, get message info.

Line 7790: WHEN FND_API.G_EXC_ERROR THEN

7786: END IF;
7787:
7788:
7789: EXCEPTION
7790: WHEN FND_API.G_EXC_ERROR THEN
7791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7793: g_module || l_api_name,
7794: 'Leaving version_uda_attribute_values:FND_API.G_EXC_ERROR Exception');

Line 7794: 'Leaving version_uda_attribute_values:FND_API.G_EXC_ERROR Exception');

7790: WHEN FND_API.G_EXC_ERROR THEN
7791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7793: g_module || l_api_name,
7794: 'Leaving version_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7795: END IF;
7796: ROLLBACK TO version_uda_attr_values_PVT;
7797: x_return_status := FND_API.G_RET_STS_ERROR;
7798: FND_MSG_PUB.Count_And_Get(

Line 7797: x_return_status := FND_API.G_RET_STS_ERROR;

7793: g_module || l_api_name,
7794: 'Leaving version_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7795: END IF;
7796: ROLLBACK TO version_uda_attr_values_PVT;
7797: x_return_status := FND_API.G_RET_STS_ERROR;
7798: FND_MSG_PUB.Count_And_Get(
7799: p_count => x_msg_count,
7800: p_data => x_msg_data
7801: );

Line 7803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7799: p_count => x_msg_count,
7800: p_data => x_msg_data
7801: );
7802:
7803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7804: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7806: g_module || l_api_name,
7807: 'Leaving version_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 7807: 'Leaving version_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

7803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7804: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7806: g_module || l_api_name,
7807: 'Leaving version_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7808: END IF;
7809: ROLLBACK TO version_uda_attr_values_PVT;
7810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7811: FND_MSG_PUB.Count_And_Get(

Line 7810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7806: g_module || l_api_name,
7807: 'Leaving version_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7808: END IF;
7809: ROLLBACK TO version_uda_attr_values_PVT;
7810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7811: FND_MSG_PUB.Count_And_Get(
7812: p_count => x_msg_count,
7813: p_data => x_msg_data
7814: );

Line 7829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7825: p_token1_value => sqlcode,
7826: p_token2 => G_SQLERRM_TOKEN,
7827: p_token2_value => sqlerrm);
7828: ROLLBACK TO version_uda_attr_values_PVT;
7829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7830: FND_MSG_PUB.Count_And_Get(
7831: p_count => x_msg_count,
7832: p_data => x_msg_data
7833: );