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_IMP_PVT dependencies on FND_LOG

Line 25: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

21: BEGIN
22: l_api_name := 'Update_contract_usages';
23: l_user_id := FND_GLOBAL.user_id();
24:
25: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
26: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
27: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
28: END IF;
29:

Line 26: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

22: l_api_name := 'Update_contract_usages';
23: l_user_id := FND_GLOBAL.user_id();
24:
25: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
26: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
27: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
28: END IF;
29:
30: -- Standard call to check for call compatibility.

Line 87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

83: );
84:
85: x_return_status := 'S';
86:
87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
88: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
89: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
90: END IF;
91:

Line 88: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

84:
85: x_return_status := 'S';
86:
87: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
88: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
89: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
90: END IF;
91:
92: END Update_contract_usages;

Line 115: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

111: BEGIN
112: l_api_name := 'delete_contract_usages';
113: l_user_id := FND_GLOBAL.user_id();
114:
115: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
117: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
118: END IF;
119:

Line 116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

112: l_api_name := 'delete_contract_usages';
113: l_user_id := FND_GLOBAL.user_id();
114:
115: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
117: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
118: END IF;
119:
120: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 133: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

129: WHERE contract_type = p_contract_rec.contract_type
130: AND contract_id = p_contract_rec.contract_id
131: AND contract_version = p_contract_rec.contract_version_num;
132:
133: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
135: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
136: END IF;
137:

Line 134: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

130: AND contract_id = p_contract_rec.contract_id
131: AND contract_version = p_contract_rec.contract_version_num;
132:
133: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
135: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
136: END IF;
137:
138: EXCEPTION

Line 140: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

136: END IF;
137:
138: EXCEPTION
139: WHEN OTHERS THEN
140: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
141: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
142: g_module || l_api_name,
143: 'Leaving delete_contract_usages because of EXCEPTION: ' || sqlerrm);
144: END IF;

Line 141: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

137:
138: EXCEPTION
139: WHEN OTHERS THEN
140: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
141: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
142: g_module || l_api_name,
143: 'Leaving delete_contract_usages because of EXCEPTION: ' || sqlerrm);
144: END IF;
145: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 184: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

180: BEGIN
181:
182: l_api_name := 'create_contract';
183:
184: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
185: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
186: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
187: END IF;
188:

Line 185: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

181:
182: l_api_name := 'create_contract';
183:
184: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
185: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
186: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
187: END IF;
188:
189: -- Standard call to check for call compatibility.

Line 272: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

268: FROM okc_rep_imp_errors_t
269: WHERE run_id = p_contract_rec.run_id;
270: END IF;
271:
272: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
274: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
275: END IF;
276:

Line 273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

269: WHERE run_id = p_contract_rec.run_id;
270: END IF;
271:
272: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
273: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
274: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
275: END IF;
276:
277:

Line 297: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

293: BEGIN
294:
295: l_api_name := 'populate_contract_hdr';
296:
297: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
298: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
299: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
300: END IF;
301:

Line 298: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

294:
295: l_api_name := 'populate_contract_hdr';
296:
297: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
298: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
299: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
300: END IF;
301:
302: -- Standard call to check for call compatibility.

Line 413: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

409: p_contract_rec.reference_document_number,
410: p_contract_rec.reference_document_id);
411:
412:
413: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
415: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
416: END IF;
417:

Line 414: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

410: p_contract_rec.reference_document_id);
411:
412:
413: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
415: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
416: END IF;
417:
418: END populate_contract_hdr;

Line 436: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

432: BEGIN
433:
434: l_api_name := 'populate_contract_parties';
435:
436: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
437: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
438: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
439: END IF;
440:

Line 437: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

433:
434: l_api_name := 'populate_contract_parties';
435:
436: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
437: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
438: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
439: END IF;
440:
441: -- Standard call to check for call compatibility.

Line 471: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

467: p_run_id);
468: END LOOP;
469: END IF;
470:
471: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
472: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
473: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
474: END IF;
475:

Line 472: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

468: END LOOP;
469: END IF;
470:
471: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
472: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
473: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
474: END IF;
475:
476: END populate_contract_parties;

Line 496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

492: BEGIN
493:
494: l_api_name := 'populate_party_contacts';
495:
496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
498: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
499: END IF;
500:

Line 497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

493:
494: l_api_name := 'populate_party_contacts';
495:
496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
498: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
499: END IF;
500:
501: -- Standard call to check for call compatibility.

Line 550: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

546: p_run_id);
547: END LOOP;
548: END IF;
549:
550: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
551: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
552: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
553: END IF;
554:

Line 551: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

547: END LOOP;
548: END IF;
549:
550: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
551: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
552: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
553: END IF;
554:
555: END populate_party_contacts;

Line 572: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

568: BEGIN
569:
570: l_api_name := 'populate_contract_risks ';
571:
572: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
574: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
575: END IF;
576:

Line 573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

569:
570: l_api_name := 'populate_contract_risks ';
571:
572: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
574: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
575: END IF;
576:
577: -- Standard call to check for call compatibility.

Line 612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

608: --p_risks_tbl(i).created_by);
609: END LOOP;
610: END IF;
611:
612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
614: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
615: END IF;
616:

Line 613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

609: END LOOP;
610: END IF;
611:
612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
614: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
615: END IF;
616:
617: END populate_contract_risks;

Line 639: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

635:
636: BEGIN
637: l_api_name := 'delete_contract ';
638:
639: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
641: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
642: END IF;
643:

Line 640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

636: BEGIN
637: l_api_name := 'delete_contract ';
638:
639: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
641: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
642: END IF;
643:
644: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 667: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

663: x_msg_count => x_msg_count,
664: x_return_status => x_return_status);
665: ELSE
666:
667: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
668: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
669: 'Delete cannot be performed on a contract in status signed/terminated');
670: END IF;
671:

Line 668: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

664: x_return_status => x_return_status);
665: ELSE
666:
667: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
668: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
669: 'Delete cannot be performed on a contract in status signed/terminated');
670: END IF;
671:
672: END IF;

Line 674: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

670: END IF;
671:
672: END IF;
673:
674: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
676: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
677: END IF;
678:

Line 675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

671:
672: END IF;
673:
674: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
676: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
677: END IF;
678:
679: EXCEPTION

Line 681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

677: END IF;
678:
679: EXCEPTION
680: WHEN OTHERS THEN
681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
683: g_module || l_api_name,
684: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
685: END IF;

Line 682: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

678:
679: EXCEPTION
680: WHEN OTHERS THEN
681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
682: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
683: g_module || l_api_name,
684: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
685: END IF;
686: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 749: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

745:
746: BEGIN
747: l_api_name := 'validate_and_insert_con_cp ';
748:
749: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
750: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
751: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
752: END IF;
753:

Line 750: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

746: BEGIN
747: l_api_name := 'validate_and_insert_con_cp ';
748:
749: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
750: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
751: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
752: END IF;
753:
754: FND_MSG_PUB.initialize;

Line 922: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

918: okc_debug.log('1100: After okc_rep_util_pvt.validate_and_insert_contracts l_return_status: '||l_return_status, 1);
919: okc_debug.log('1100: After okc_rep_util_pvt.validate_and_insert_contracts l_number_inserted: ' ||l_number_inserted, 1);
920: END IF;
921:
922: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
923: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
924: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
925: END IF;
926:

Line 923: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

919: okc_debug.log('1100: After okc_rep_util_pvt.validate_and_insert_contracts l_number_inserted: ' ||l_number_inserted, 1);
920: END IF;
921:
922: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
923: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
924: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
925: END IF;
926:
927: EXCEPTION

Line 974: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

970: BEGIN
971:
972: l_api_name := 'delete_contract_risks ';
973:
974: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
976: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
977: END IF;
978:

Line 975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

971:
972: l_api_name := 'delete_contract_risks ';
973:
974: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
976: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
977: END IF;
978:
979: -- Standard call to check for call compatibility.

Line 1001: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

997: --Business_document_id should be entered
998: --Business_document_version should be entered
999:
1000: --Risk Event should be entered
1001: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1002: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1003: 'Checking if user enters risk_event_txt');
1004: END IF;
1005: IF p_risks_tbl(i).risk_event_txt IS NOT NULL THEN

Line 1002: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

998: --Business_document_version should be entered
999:
1000: --Risk Event should be entered
1001: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1002: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1003: 'Checking if user enters risk_event_txt');
1004: END IF;
1005: IF p_risks_tbl(i).risk_event_txt IS NOT NULL THEN
1006: p_risks_tbl(i).risk_event_txt := LTRIM(p_risks_tbl(i).risk_event_txt);

Line 1016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1012: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_RISK_EVENT');
1013: fnd_message.set_token(TOKEN => 'RISK_INDEX',
1014: VALUE => p_risks_tbl(i).risk_index);
1015: l_error_msg := fnd_message.get;
1016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1018: 'Party Name is missing');
1019: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1020: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 1017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1013: fnd_message.set_token(TOKEN => 'RISK_INDEX',
1014: VALUE => p_risks_tbl(i).risk_index);
1015: l_error_msg := fnd_message.get;
1016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1018: 'Party Name is missing');
1019: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1020: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1019: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1015: l_error_msg := fnd_message.get;
1016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1018: 'Party Name is missing');
1019: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1020: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1022: 'l_error_msg: '||l_error_msg);
1023: END IF;

Line 1021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1018: 'Party Name is missing');
1019: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1020: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1022: 'l_error_msg: '||l_error_msg);
1023: END IF;
1024: END IF;
1025:

Line 1028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1024: END IF;
1025:
1026: --If l_valid_flag is already set to 'N', we do not perform any more checks
1027: --Risk Event should be valid
1028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1030: 'Checking if risk_event_txt is valid');
1031: END IF;
1032:

Line 1029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1025:
1026: --If l_valid_flag is already set to 'N', we do not perform any more checks
1027: --Risk Event should be valid
1028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1030: 'Checking if risk_event_txt is valid');
1031: END IF;
1032:
1033: OPEN c_risk_event_valid_csr(l_import_risks_rec.risk_event_txt);

Line 1046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1042: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_RISK_PROB');
1043: fnd_message.set_token(TOKEN => 'RISK_INDEX',
1044: VALUE => l_import_risks_rec.risk_index);
1045: l_error_msg := fnd_message.get;
1046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1048: 'Risk Event is not valid ');
1049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1050: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 1047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1043: fnd_message.set_token(TOKEN => 'RISK_INDEX',
1044: VALUE => l_import_risks_rec.risk_index);
1045: l_error_msg := fnd_message.get;
1046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1048: 'Risk Event is not valid ');
1049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1050: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1045: l_error_msg := fnd_message.get;
1046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1048: 'Risk Event is not valid ');
1049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1050: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1052: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
1053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1048: 'Risk Event is not valid ');
1049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1050: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1052: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
1053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1054: 'l_error_msg: '||l_error_msg);
1055: END IF;

Line 1053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1050: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1052: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
1053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1054: 'l_error_msg: '||l_error_msg);
1055: END IF;
1056:
1057: END IF;

Line 1067: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1063:
1064:
1065: --If l_valid_flag is already set to 'N', we do not perform any more checks
1066: --Risk Event should be present on the contract
1067: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1068: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1069: 'Checking if risk_event_txt is valid');
1070: END IF;
1071:

Line 1068: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1064:
1065: --If l_valid_flag is already set to 'N', we do not perform any more checks
1066: --Risk Event should be present on the contract
1067: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1068: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1069: 'Checking if risk_event_txt is valid');
1070: END IF;
1071:
1072: OPEN c_risk_event_valid_csr(p_risks_tbl(i).risk_event_txt);

Line 1085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1081: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_RISK_NOT_AVAIL');
1082: fnd_message.set_token(TOKEN => 'RISK_INDEX',
1083: VALUE => l_import_risks_rec.risk_index);
1084: l_error_msg := fnd_message.get;
1085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1087: 'Risk Event is not valid ');
1088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1089: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1082: fnd_message.set_token(TOKEN => 'RISK_INDEX',
1083: VALUE => l_import_risks_rec.risk_index);
1084: l_error_msg := fnd_message.get;
1085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1087: 'Risk Event is not valid ');
1088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1089: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1084: l_error_msg := fnd_message.get;
1085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1087: 'Risk Event is not valid ');
1088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1089: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1091: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
1092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1087: 'Risk Event is not valid ');
1088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1089: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1091: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
1092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1093: 'l_error_msg: '||l_error_msg);
1094: END IF;

Line 1092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1089: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
1090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1091: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
1092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1093: 'l_error_msg: '||l_error_msg);
1094: END IF;
1095:
1096: END IF;

Line 1104: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1100:
1101: END LOOP;
1102: END IF;
1103:
1104: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1105: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1106: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1107: END IF;
1108:

Line 1105: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1101: END LOOP;
1102: END IF;
1103:
1104: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1105: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1106: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1107: END IF;
1108:
1109: END delete_contract_risks;

Line 1127: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1123: BEGIN
1124:
1125: l_api_name := 'delete_party_contacts ';
1126:
1127: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1128: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1129: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1130: END IF;
1131:

Line 1128: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1124:
1125: l_api_name := 'delete_party_contacts ';
1126:
1127: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1128: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1129: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1130: END IF;
1131:
1132: -- Standard call to check for call compatibility.

Line 1146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1142:
1143: END LOOP;
1144: END IF;
1145:
1146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1148: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1149: END IF;
1150:

Line 1147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1143: END LOOP;
1144: END IF;
1145:
1146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1148: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1149: END IF;
1150:
1151: END delete_party_contacts;

Line 1181: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1177: BEGIN
1178: l_api_name := 'create_contract';
1179: l_user_id := FND_GLOBAL.user_id();
1180:
1181: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1183: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1184: END IF;
1185:

Line 1182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1178: l_api_name := 'create_contract';
1179: l_user_id := FND_GLOBAL.user_id();
1180:
1181: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1183: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1184: END IF;
1185:
1186: -- Standard call to check for call compatibility.

Line 1229: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1225: IF p_commit = fnd_api.g_true THEN
1226: COMMIT;
1227: END IF;
1228:
1229: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1230: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1231: 'Leaving OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1232: END IF;
1233:

Line 1230: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1226: COMMIT;
1227: END IF;
1228:
1229: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1230: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1231: 'Leaving OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1232: END IF;
1233:
1234: END create_contract;

Line 1266: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1262:
1263: BEGIN
1264: l_api_name := 'delete_contract';
1265:
1266: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1267: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1268: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1269: END IF;
1270:

Line 1267: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1263: BEGIN
1264: l_api_name := 'delete_contract';
1265:
1266: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1267: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1268: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1269: END IF;
1270:
1271: -- Standard call to check for call compatibility.

Line 1376: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1372:
1373: -- Standard call to get message count and if count is 1, get message info.
1374: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1375:
1376: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1378: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1379: END IF;
1380:

Line 1377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1373: -- Standard call to get message count and if count is 1, get message info.
1374: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1375:
1376: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1378: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1379: END IF;
1380:
1381: EXCEPTION

Line 1385: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1381: EXCEPTION
1382:
1383: WHEN FND_API.G_EXC_ERROR THEN
1384:
1385: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1386: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1387: g_module || l_api_name,
1388: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1389: END IF;

Line 1386: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1382:
1383: WHEN FND_API.G_EXC_ERROR THEN
1384:
1385: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1386: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1387: g_module || l_api_name,
1388: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1389: END IF;
1390: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1408: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1404: );
1405:
1406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1407:
1408: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1409: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1410: g_module || l_api_name,
1411: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1412: END IF;

Line 1409: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1405:
1406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1407:
1408: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1409: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1410: g_module || l_api_name,
1411: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1412: END IF;
1413: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1430: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1426: p_data => x_msg_data
1427: );
1428:
1429: WHEN OTHERS THEN
1430: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1431: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1432: g_module || l_api_name,
1433: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1434: END IF;

Line 1431: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1427: );
1428:
1429: WHEN OTHERS THEN
1430: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1431: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1432: g_module || l_api_name,
1433: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1434: END IF;
1435: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1481: BEGIN
1482: l_api_name := 'create_new_contract_version';
1483: l_user_id := FND_GLOBAL.user_id();
1484:
1485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1487: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1488: END IF;
1489:

Line 1486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1482: l_api_name := 'create_new_contract_version';
1483: l_user_id := FND_GLOBAL.user_id();
1484:
1485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1487: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1488: END IF;
1489:
1490: -- Standard call to check for call compatibility.

Line 1526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1522:
1523:
1524: ELSE -- IF l_contract_status IN ('SIGNED', 'APPROVED', 'CANCELLED')
1525:
1526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1528: 'Contract not in valid status for creating new version');
1529: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1530: 'Contract ID: '||p_contract_id);

Line 1527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1523:
1524: ELSE -- IF l_contract_status IN ('SIGNED', 'APPROVED', 'CANCELLED')
1525:
1526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1528: 'Contract not in valid status for creating new version');
1529: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1530: 'Contract ID: '||p_contract_id);
1531: END IF;

Line 1529: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1525:
1526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1528: 'Contract not in valid status for creating new version');
1529: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1530: 'Contract ID: '||p_contract_id);
1531: END IF;
1532:
1533: l_valid_flag := 'N';

Line 1537: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1533: l_valid_flag := 'N';
1534: fnd_message.set_name(G_APP_NAME,'OKC_REP_INV_CON_STS');
1535: l_error_msg := fnd_message.get;
1536:
1537: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1539: 'Contract not in valid status for creating new version');
1540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1541: 'Contract ID: '||p_contract_id);

Line 1538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1534: fnd_message.set_name(G_APP_NAME,'OKC_REP_INV_CON_STS');
1535: l_error_msg := fnd_message.get;
1536:
1537: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1539: 'Contract not in valid status for creating new version');
1540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1541: 'Contract ID: '||p_contract_id);
1542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 1540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1536:
1537: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1539: 'Contract not in valid status for creating new version');
1540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1541: 'Contract ID: '||p_contract_id);
1542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1543: 'l_error_msg: '||l_error_msg);
1544:

Line 1542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1539: 'Contract not in valid status for creating new version');
1540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1541: 'Contract ID: '||p_contract_id);
1542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1543: 'l_error_msg: '||l_error_msg);
1544:
1545: END IF;
1546:

Line 1566: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1562: x_msg_count => x_msg_count,
1563: x_msg_data => x_msg_data);
1564: END IF;
1565:
1566: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1568: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1569: END IF;
1570:

Line 1567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1563: x_msg_data => x_msg_data);
1564: END IF;
1565:
1566: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1568: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1569: END IF;
1570:
1571: EXCEPTION

Line 1579: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1575: IF c_get_contract_status%ISOPEN THEN
1576: CLOSE c_get_contract_status;
1577: END IF;
1578:
1579: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1580: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
1581: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
1582: END IF;
1583:

Line 1580: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

1576: CLOSE c_get_contract_status;
1577: END IF;
1578:
1579: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1580: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
1581: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
1582: END IF;
1583:
1584: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1590: IF c_get_contract_status%ISOPEN THEN
1591: CLOSE c_get_contract_status;
1592: END IF;
1593:
1594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
1596: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1597: END IF;
1598:

Line 1595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

1591: CLOSE c_get_contract_status;
1592: END IF;
1593:
1594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
1596: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1597: END IF;
1598:
1599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1609: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1605: IF c_get_contract_status%ISOPEN THEN
1606: CLOSE c_get_contract_status;
1607: END IF;
1608:
1609: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1610: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
1611: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
1612: END IF;
1613:

Line 1610: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

1606: CLOSE c_get_contract_status;
1607: END IF;
1608:
1609: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1610: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
1611: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
1612: END IF;
1613:
1614: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1660: BEGIN
1661: l_api_name := 'create_new_contract_version';
1662: l_user_id := FND_GLOBAL.user_id();
1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1666: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1667: END IF;
1668:

Line 1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1661: l_api_name := 'create_new_contract_version';
1662: l_user_id := FND_GLOBAL.user_id();
1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1666: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1667: END IF;
1668:
1669: -- Standard call to check for call compatibility.

Line 1751: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1747: END LOOP;
1748: CLOSE c_contract_id_cur;
1749:
1750:
1751: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1752: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1753: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1754: END IF;
1755:

Line 1752: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1748: CLOSE c_contract_id_cur;
1749:
1750:
1751: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1752: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1753: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
1754: END IF;
1755:
1756: EXCEPTION

Line 1758: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1754: END IF;
1755:
1756: EXCEPTION
1757: WHEN OTHERS THEN
1758: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1760: g_module || l_api_name,
1761: 'Leaving create_new_contract_version because of EXCEPTION: ' || sqlerrm);
1762: END IF;

Line 1759: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1755:
1756: EXCEPTION
1757: WHEN OTHERS THEN
1758: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1760: g_module || l_api_name,
1761: 'Leaving create_new_contract_version because of EXCEPTION: ' || sqlerrm);
1762: END IF;
1763: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1810: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1806:
1807: l_api_name := 'check_contract_exists';
1808: -- l_user_id := FND_GLOBAL.user_id();
1809:
1810: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1811: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1812: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1813: END IF;
1814:

Line 1811: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1807: l_api_name := 'check_contract_exists';
1808: -- l_user_id := FND_GLOBAL.user_id();
1809:
1810: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1811: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1812: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
1813: END IF;
1814:
1815: -- Standard call to check for call compatibility.

Line 1828: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1824:
1825: OPEN c_contract_exist_csr;
1826: FETCH c_contract_exist_csr INTO x_contract_type, x_contract_id, x_contract_version_num;
1827: IF(c_contract_exist_csr%NOTFOUND) THEN
1828: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1829: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1830: G_MODULE||l_api_name,
1831: 'No Contract Exists for this document: '|| p_document_rec.business_document_type );
1832: END IF;

Line 1829: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

1825: OPEN c_contract_exist_csr;
1826: FETCH c_contract_exist_csr INTO x_contract_type, x_contract_id, x_contract_version_num;
1827: IF(c_contract_exist_csr%NOTFOUND) THEN
1828: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1829: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1830: G_MODULE||l_api_name,
1831: 'No Contract Exists for this document: '|| p_document_rec.business_document_type );
1832: END IF;
1833:

Line 1880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1876: BEGIN
1877:
1878: l_phy_complete_date_match_flag := FND_API.G_FALSE;
1879:
1880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract_closeout');
1883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1884: 'Business Document Id is: ' || p_document_rec.business_document_id);

Line 1881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1877:
1878: l_phy_complete_date_match_flag := FND_API.G_FALSE;
1879:
1880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract_closeout');
1883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1884: 'Business Document Id is: ' || p_document_rec.business_document_id);
1885: END IF;

Line 1883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1879:
1880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract_closeout');
1883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1884: 'Business Document Id is: ' || p_document_rec.business_document_id);
1885: END IF;
1886: l_api_name := 'Activate_tasks_closeout';
1887: l_api_version := 1.0;

Line 1908: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1904: --find the contract associated to this business document
1905: OPEN c_get_contract_id_csr;
1906: FETCH c_get_contract_id_csr INTO l_contract_type, l_contract_id;
1907: IF(c_get_contract_id_csr%NOTFOUND) THEN
1908: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1909: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1910: G_MODULE||l_api_name,
1911: 'Invalid Business Document Type: '|| p_document_rec.business_document_type);
1912: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

Line 1909: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

1905: OPEN c_get_contract_id_csr;
1906: FETCH c_get_contract_id_csr INTO l_contract_type, l_contract_id;
1907: IF(c_get_contract_id_csr%NOTFOUND) THEN
1908: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1909: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1910: G_MODULE||l_api_name,
1911: 'Invalid Business Document Type: '|| p_document_rec.business_document_type);
1912: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1913: G_MODULE||l_api_name,

Line 1912: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

1908: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1909: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1910: G_MODULE||l_api_name,
1911: 'Invalid Business Document Type: '|| p_document_rec.business_document_type);
1912: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1913: G_MODULE||l_api_name,
1914: 'Invalid Business Document Id: '|| p_document_rec.business_document_id);
1915:
1916: END IF;

Line 1929: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1925: -- Get effective dates and version of the contract.
1926: OPEN contract_csr(l_contract_type, l_contract_id);
1927: FETCH contract_csr INTO contract_rec;
1928: IF(contract_csr%NOTFOUND) THEN
1929: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1930: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1931: G_MODULE||l_api_name,
1932: 'Invalid Contract Id: '|| l_contract_id);
1933: END IF;

Line 1930: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

1926: OPEN contract_csr(l_contract_type, l_contract_id);
1927: FETCH contract_csr INTO contract_rec;
1928: IF(contract_csr%NOTFOUND) THEN
1929: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1930: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1931: G_MODULE||l_api_name,
1932: 'Invalid Contract Id: '|| l_contract_id);
1933: END IF;
1934: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1943: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1939: -- RAISE NO_DATA_FOUND;
1940: END IF;
1941:
1942: -- Lock the contract header
1943: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1944: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1945: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
1946: END IF;
1947: -- Lock the contract header

Line 1944: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1940: END IF;
1941:
1942: -- Lock the contract header
1943: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1944: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1945: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
1946: END IF;
1947: -- Lock the contract header
1948: okc_rep_contract_process_pvt.Lock_Contract_Header(

Line 1954: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1950: p_object_version_number => NULL,
1951: x_return_status => x_return_status
1952: );
1953:
1954: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1956: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
1957: || x_return_status);
1958: END IF;

Line 1955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1951: x_return_status => x_return_status
1952: );
1953:
1954: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1956: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
1957: || x_return_status);
1958: END IF;
1959:

Line 1968: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;
1966: -----------------------------------------------------
1967:
1968: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1970: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
1971: END IF;
1972: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

Line 1969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1965: END IF;
1966: -----------------------------------------------------
1967:
1968: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1970: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
1971: END IF;
1972: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
1973: OKC_REP_UTIL_PVT.change_contract_status(

Line 1984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1980: p_note => NULL,
1981: x_msg_data => x_msg_data,
1982: x_msg_count => x_msg_count,
1983: x_return_status => x_return_status);
1984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1985: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1986: g_module || l_api_name,
1987: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
1988: END IF;

Line 1985: fnd_log.string(FND_LOG.LEVEL_STATEMENT,

1981: x_msg_data => x_msg_data,
1982: x_msg_count => x_msg_count,
1983: x_return_status => x_return_status);
1984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1985: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1986: g_module || l_api_name,
1987: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
1988: END IF;
1989: -----------------------------------------------------

Line 1998: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1994: END IF;
1995: ------------------------------------------------------
1996:
1997: -- We need to first version the deliverables
1998: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1999: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2000: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
2001: END IF;
2002:

Line 1999: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1995: ------------------------------------------------------
1996:
1997: -- We need to first version the deliverables
1998: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1999: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2000: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
2001: END IF;
2002:
2003: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (

Line 2013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2009: x_return_status => x_return_status,
2010: x_msg_count => x_msg_count,
2011: x_msg_data => x_msg_data
2012: );
2013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2015: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
2016: || x_return_status);
2017: END IF;

Line 2014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2010: x_msg_count => x_msg_count,
2011: x_msg_data => x_msg_data
2012: );
2013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2015: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
2016: || x_return_status);
2017: END IF;
2018: -----------------------------------------------------

Line 2026: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2022: RAISE OKC_API.G_EXCEPTION_ERROR;
2023: END IF;
2024: --------------------------------------------------------
2025:
2026: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2027: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2028: 'Latest signed version number is : '
2029: || contract_rec.latest_signed_ver_number);
2030: END IF;

Line 2027: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2023: END IF;
2024: --------------------------------------------------------
2025:
2026: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2027: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2028: 'Latest signed version number is : '
2029: || contract_rec.latest_signed_ver_number);
2030: END IF;
2031: -- Now we need to activate deliverables

Line 2038: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2034: ELSE
2035: l_sync_flag := FND_API.G_TRUE;
2036: END IF;
2037:
2038: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2040: 'l_sync_flag is : ' || l_sync_flag);
2041: END IF;
2042:

Line 2039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2035: l_sync_flag := FND_API.G_TRUE;
2036: END IF;
2037:
2038: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2040: 'l_sync_flag is : ' || l_sync_flag);
2041: END IF;
2042:
2043: l_activate_event_tbl(1).event_code := 'PO_PHYSICAL_COMPLETE';

Line 2046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2042:
2043: l_activate_event_tbl(1).event_code := 'PO_PHYSICAL_COMPLETE';
2044: l_activate_event_tbl(1).event_date := p_physical_completion_date;
2045:
2046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2048: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
2049: END IF;
2050:

Line 2047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2043: l_activate_event_tbl(1).event_code := 'PO_PHYSICAL_COMPLETE';
2044: l_activate_event_tbl(1).event_date := p_physical_completion_date;
2045:
2046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2048: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
2049: END IF;
2050:
2051: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (

Line 2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2062: x_msg_data => x_msg_data,
2063: x_msg_count => x_msg_count,
2064: x_return_status => x_return_status);
2065:
2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2068: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
2069: || x_return_status);
2070: END IF;

Line 2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2063: x_msg_count => x_msg_count,
2064: x_return_status => x_return_status);
2065:
2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2068: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
2069: || x_return_status);
2070: END IF;
2071: -----------------------------------------------------

Line 2082: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2078:
2079: -- Checking if we need to call deliverable's APIs for synch-ing
2080: IF (l_sync_flag = FND_API.G_TRUE) THEN
2081:
2082: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2083: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2084: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
2085: END IF;
2086:

Line 2083: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2079: -- Checking if we need to call deliverable's APIs for synch-ing
2080: IF (l_sync_flag = FND_API.G_TRUE) THEN
2081:
2082: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2083: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2084: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
2085: END IF;
2086:
2087: l_update_event_tbl(1).event_code := 'PO_PHYSICAL_COMPLETE';

Line 2092: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2088: l_update_event_tbl(1).event_date := p_physical_completion_date;
2089:
2090: -- we need to call deliverables API for synching previous signed deliverables.
2091:
2092: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2093: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2094: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
2095: END IF;
2096: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (

Line 2093: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2089:
2090: -- we need to call deliverables API for synching previous signed deliverables.
2091:
2092: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2093: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2094: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
2095: END IF;
2096: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
2097: p_api_version => 1.0,

Line 2108: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2104: x_msg_data => x_msg_data,
2105: x_msg_count => x_msg_count,
2106: x_return_status => x_return_status);
2107:
2108: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2110: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
2111: || x_return_status);
2112: END IF;

Line 2109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2105: x_msg_count => x_msg_count,
2106: x_return_status => x_return_status);
2107:
2108: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2110: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
2111: || x_return_status);
2112: END IF;
2113: -----------------------------------------------------

Line 2123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2119: --------------------------------------------------------
2120: END IF; -- expiration date comparision
2121:
2122: -- Disable prev. version deliverables
2123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2125: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
2126: END IF;
2127: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (

Line 2124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2120: END IF; -- expiration date comparision
2121:
2122: -- Disable prev. version deliverables
2123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2125: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
2126: END IF;
2127: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
2128: p_api_version => 1.0,

Line 2138: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2134: x_msg_data => x_msg_data,
2135: x_msg_count => x_msg_count,
2136: x_return_status => x_return_status);
2137:
2138: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2139: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2140: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
2141: || x_return_status);
2142: END IF;

Line 2139: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2135: x_msg_count => x_msg_count,
2136: x_return_status => x_return_status);
2137:
2138: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2139: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2140: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
2141: || x_return_status);
2142: END IF;
2143: -----------------------------------------------------

Line 2152: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2148: END IF;
2149: --------------------------------------------------------
2150: --END IF; -- (l_sync_flag = 'Y')
2151:
2152: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2153: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2154: 'Updating latest_signed_ver_number column');
2155: END IF;
2156:

Line 2153: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2149: --------------------------------------------------------
2150: --END IF; -- (l_sync_flag = 'Y')
2151:
2152: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2153: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2154: 'Updating latest_signed_ver_number column');
2155: END IF;
2156:
2157: UPDATE okc_rep_contracts_all

Line 2170: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2166:
2167: -- Standard call to get message count and if count is 1, get message info.
2168: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2169:
2170: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2171: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2172: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
2173: END IF;
2174:

Line 2171: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2167: -- Standard call to get message count and if count is 1, get message info.
2168: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2169:
2170: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2171: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2172: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
2173: END IF;
2174:
2175:

Line 2178: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2174:
2175:
2176: EXCEPTION
2177: WHEN FND_API.G_EXC_ERROR THEN
2178: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2180: g_module || l_api_name,
2181: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
2182: END IF;

Line 2179: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2175:
2176: EXCEPTION
2177: WHEN FND_API.G_EXC_ERROR THEN
2178: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2180: g_module || l_api_name,
2181: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
2182: END IF;
2183: --close cursors

Line 2198: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2194: p_data => x_msg_data
2195: );
2196:
2197: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2198: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2199: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2200: g_module || l_api_name,
2201: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2202: END IF;

Line 2199: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2195: );
2196:
2197: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2198: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2199: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2200: g_module || l_api_name,
2201: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2202: END IF;
2203: --close cursors

Line 2218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2214: p_data => x_msg_data
2215: );
2216:
2217: WHEN OTHERS THEN
2218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2220: g_module || l_api_name,
2221: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
2222: END IF;

Line 2219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2215: );
2216:
2217: WHEN OTHERS THEN
2218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2220: g_module || l_api_name,
2221: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
2222: END IF;
2223: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2273: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2269:
2270: l_api_name := 'check_contract_exists';
2271: -- l_user_id := FND_GLOBAL.user_id();
2272:
2273: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2274: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2275: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2276: END IF;
2277:

Line 2274: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2270: l_api_name := 'check_contract_exists';
2271: -- l_user_id := FND_GLOBAL.user_id();
2272:
2273: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2274: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2275: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2276: END IF;
2277:
2278: -- Standard call to check for call compatibility.

Line 2293: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2289: FETCH c_contract_exist_csr INTO x_contract_rec.contract_type, x_contract_rec.contract_id,
2290: x_contract_rec.contract_version_num, x_contract_rec.contract_status_code,
2291: x_contract_rec.sbcr_coordination_type;
2292: IF(c_contract_exist_csr%NOTFOUND) THEN
2293: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
2295: G_MODULE||l_api_name,
2296: 'No Contract Exists for this document: '|| p_document_rec.business_document_type );
2297: END IF;

Line 2294: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

2290: x_contract_rec.contract_version_num, x_contract_rec.contract_status_code,
2291: x_contract_rec.sbcr_coordination_type;
2292: IF(c_contract_exist_csr%NOTFOUND) THEN
2293: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
2295: G_MODULE||l_api_name,
2296: 'No Contract Exists for this document: '|| p_document_rec.business_document_type );
2297: END IF;
2298:

Line 2341: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2337:
2338: BEGIN
2339: l_api_name := 'delete_cancel_contract';
2340:
2341: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2342: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2343: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2344: END IF;
2345:

Line 2342: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2338: BEGIN
2339: l_api_name := 'delete_cancel_contract';
2340:
2341: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2342: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2343: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2344: END IF;
2345:
2346: -- Standard call to check for call compatibility.

Line 2422: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2418: x_msg_data => x_msg_data,
2419: x_msg_count => x_msg_count,
2420: x_return_status => x_return_status);
2421:
2422: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2423: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2424: 'OKC_REP_CONTRACT_IMP_PVT.delete_contract return status is : '
2425: || x_return_status);
2426: END IF;

Line 2423: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2419: x_msg_count => x_msg_count,
2420: x_return_status => x_return_status);
2421:
2422: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2423: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2424: 'OKC_REP_CONTRACT_IMP_PVT.delete_contract return status is : '
2425: || x_return_status);
2426: END IF;
2427: -----------------------------------------------------

Line 2443: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2439: x_msg_data => x_msg_data,
2440: x_msg_count => x_msg_count,
2441: x_return_status => x_return_status);
2442:
2443: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2444: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2445: 'OKC_REP_CONTRACT_IMP_PVT.delete_contract return status is : '
2446: || x_return_status);
2447: END IF;

Line 2444: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2440: x_msg_count => x_msg_count,
2441: x_return_status => x_return_status);
2442:
2443: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2444: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2445: 'OKC_REP_CONTRACT_IMP_PVT.delete_contract return status is : '
2446: || x_return_status);
2447: END IF;
2448:

Line 2467: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2463: x_msg_data => x_msg_data,
2464: x_msg_count => x_msg_count,
2465: x_return_status => x_return_status);
2466:
2467: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2468: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2469: 'OKC_REP_CONTRACT_IMP_PVT.cancel_contract return status is : '
2470: || x_return_status);
2471: END IF;

Line 2468: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2464: x_msg_count => x_msg_count,
2465: x_return_status => x_return_status);
2466:
2467: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2468: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2469: 'OKC_REP_CONTRACT_IMP_PVT.cancel_contract return status is : '
2470: || x_return_status);
2471: END IF;
2472:

Line 2486: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2482:
2483: END LOOP;
2484: CLOSE c_contract_id_cur;
2485:
2486: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2487: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2488: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2489: END IF;
2490:

Line 2487: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2483: END LOOP;
2484: CLOSE c_contract_id_cur;
2485:
2486: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2487: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2488: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2489: END IF;
2490:
2491: EXCEPTION

Line 2493: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2489: END IF;
2490:
2491: EXCEPTION
2492: WHEN OTHERS THEN
2493: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2494: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2495: g_module || l_api_name,
2496: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
2497: END IF;

Line 2494: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2490:
2491: EXCEPTION
2492: WHEN OTHERS THEN
2493: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2494: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2495: g_module || l_api_name,
2496: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
2497: END IF;
2498: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2535:
2536: BEGIN
2537: l_api_name := 'cancel_contract ';
2538:
2539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2541: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2542: END IF;
2543:

Line 2540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2536: BEGIN
2537: l_api_name := 'cancel_contract ';
2538:
2539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2540: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2541: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2542: END IF;
2543:
2544: -- Standard Start of API savepoint

Line 2569: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2565: p_termination_date => SYSDATE,
2566: x_msg_data => x_msg_data,
2567: x_msg_count => x_msg_count,
2568: x_return_status => x_return_status);
2569: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2571: 'OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract return status is : '
2572: || x_return_status);
2573: END IF;

Line 2570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2566: x_msg_data => x_msg_data,
2567: x_msg_count => x_msg_count,
2568: x_return_status => x_return_status);
2569: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2571: 'OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract return status is : '
2572: || x_return_status);
2573: END IF;
2574:

Line 2591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2587: AND contract_type = l_contract_type;
2588:
2589: ELSE
2590:
2591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2593: 'Cancel cannot be performed on a contract in status pending signed/pending approval');
2594: END IF;
2595:

Line 2592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2588:
2589: ELSE
2590:
2591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2593: 'Cancel cannot be performed on a contract in status pending signed/pending approval');
2594: END IF;
2595:
2596: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2610: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2606: RAISE OKC_API.G_EXCEPTION_ERROR;
2607:
2608: END IF;
2609:
2610: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2611: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2612: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2613: END IF;
2614:

Line 2611: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2607:
2608: END IF;
2609:
2610: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2611: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2612: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
2613: END IF;
2614:
2615: EXCEPTION

Line 2618: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2614:
2615: EXCEPTION
2616:
2617: WHEN FND_API.G_EXC_ERROR THEN
2618: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2619: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2620: g_module || l_api_name,
2621: 'Leaving cancel_contract:FND_API.G_EXC_ERROR Exception');
2622: END IF;

Line 2619: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2615: EXCEPTION
2616:
2617: WHEN FND_API.G_EXC_ERROR THEN
2618: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2619: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2620: g_module || l_api_name,
2621: 'Leaving cancel_contract:FND_API.G_EXC_ERROR Exception');
2622: END IF;
2623: --close cursors

Line 2635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2631: p_data => x_msg_data
2632: );
2633:
2634: WHEN OTHERS THEN
2635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2637: g_module || l_api_name,
2638: 'Leaving cancel_contract because of EXCEPTION: ' || sqlerrm);
2639: END IF;

Line 2636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2632: );
2633:
2634: WHEN OTHERS THEN
2635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2637: g_module || l_api_name,
2638: 'Leaving cancel_contract because of EXCEPTION: ' || sqlerrm);
2639: END IF;
2640: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2693: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2689:
2690: BEGIN
2691: l_api_name := 'cancel_contract';
2692:
2693: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2695: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2697: 'p_document_rec.business_document_type '||p_document_rec.business_document_type);

Line 2694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2690: BEGIN
2691: l_api_name := 'cancel_contract';
2692:
2693: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2695: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2697: 'p_document_rec.business_document_type '||p_document_rec.business_document_type);
2698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 2696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2692:
2693: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2695: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2697: 'p_document_rec.business_document_type '||p_document_rec.business_document_type);
2698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2699: 'p_document_rec.business_document_id '||p_document_rec.business_document_id);
2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 2698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2695: 'Entered OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2697: 'p_document_rec.business_document_type '||p_document_rec.business_document_type);
2698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2699: 'p_document_rec.business_document_id '||p_document_rec.business_document_id);
2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2701: 'p_document_rec.business_document_version '||p_document_rec.business_document_version);
2702: END IF;

Line 2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2697: 'p_document_rec.business_document_type '||p_document_rec.business_document_type);
2698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2699: 'p_document_rec.business_document_id '||p_document_rec.business_document_id);
2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2701: 'p_document_rec.business_document_version '||p_document_rec.business_document_version);
2702: END IF;
2703:
2704: -- Standard call to check for call compatibility.

Line 2709: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2705: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2707: END IF;
2708:
2709: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2711: 'l_run_id : '||l_run_id);
2712: END IF;
2713:

Line 2710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2707: END IF;
2708:
2709: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2711: 'l_run_id : '||l_run_id);
2712: END IF;
2713:
2714: --Find the contracts to be deleted w.r.t the document

Line 2771: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2767: x_msg_data => x_msg_data,
2768: x_msg_count => x_msg_count,
2769: x_return_status => x_return_status);
2770:
2771: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2772: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2773: 'OKC_REP_CONTRACT_IMP_PVT.cancel_contract return status is : '
2774: || x_return_status);
2775: END IF;

Line 2772: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2768: x_msg_count => x_msg_count,
2769: x_return_status => x_return_status);
2770:
2771: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2772: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2773: 'OKC_REP_CONTRACT_IMP_PVT.cancel_contract return status is : '
2774: || x_return_status);
2775: END IF;
2776:

Line 2789: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2785: END LOOP;
2786: CLOSE c_contract_id_cur;
2787:
2788:
2789: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2791: 'Leaving OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2792: END IF;
2793:

Line 2790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2786: CLOSE c_contract_id_cur;
2787:
2788:
2789: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2791: 'Leaving OKC_REP_CONTRACT_IMP_PUB.'||l_api_name);
2792: END IF;
2793:
2794: EXCEPTION

Line 2797: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2793:
2794: EXCEPTION
2795:
2796: WHEN FND_API.G_EXC_ERROR THEN
2797: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2798: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2799: g_module || l_api_name,
2800: 'Leaving cancel_contract:FND_API.G_EXC_ERROR Exception');
2801: END IF;

Line 2798: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2794: EXCEPTION
2795:
2796: WHEN FND_API.G_EXC_ERROR THEN
2797: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2798: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2799: g_module || l_api_name,
2800: 'Leaving cancel_contract:FND_API.G_EXC_ERROR Exception');
2801: END IF;
2802: --close cursors

Line 2814: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2810: p_data => x_msg_data
2811: );
2812:
2813: WHEN OTHERS THEN
2814: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2815: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2816: g_module || l_api_name,
2817: 'Leaving cancel_contract because of EXCEPTION: ' || sqlerrm);
2818: END IF;

Line 2815: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2811: );
2812:
2813: WHEN OTHERS THEN
2814: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2815: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2816: g_module || l_api_name,
2817: 'Leaving cancel_contract because of EXCEPTION: ' || sqlerrm);
2818: END IF;
2819: Okc_Api.Set_Message(p_app_name => G_APP_NAME,