DBA Data[Home] [Help]

APPS.OKC_REP_CONTRACT_IMP_PVT dependencies on OKC_REP_CONTRACT_IMP_PVT

Line 1: PACKAGE BODY OKC_REP_CONTRACT_IMP_PVT AS

1: PACKAGE BODY OKC_REP_CONTRACT_IMP_PVT AS
2: /* $Header: OKCVREPIMPB.pls 120.0.12020000.13 2013/06/04 14:25:02 nbingi noship $ */
3:
4: /*
5: Updates the okc_contract_usages table with the relationships provided

Line 27: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 89: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
93:

Line 117: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
121:

Line 135: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
139: WHEN OTHERS THEN

Line 186: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 274: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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:
278: END create_contract;

Line 299: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 415: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
419:

Line 438: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 473: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
477:

Line 498: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 552: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
556:

Line 574: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 614: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
618:

Line 641: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
645:

Line 676: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
680: WHEN OTHERS THEN

Line 751: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
755: retcode := 0;

Line 924: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
928: WHEN OTHERS THEN

Line 976: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 1106: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
1110:

Line 1129: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 1148: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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;
1152: */

Line 1378: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
1382:

Line 1487: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 1568: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
1572:

Line 1753: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
1757: WHEN OTHERS THEN

Line 2343: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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

Line 2424: 'OKC_REP_CONTRACT_IMP_PVT.delete_contract return status is : '

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: -----------------------------------------------------
2428: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2445: 'OKC_REP_CONTRACT_IMP_PVT.delete_contract return status is : '

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:
2449: -----------------------------------------------------

Line 2469: 'OKC_REP_CONTRACT_IMP_PVT.cancel_contract return status is : '

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:
2473: -----------------------------------------------------

Line 2488: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
2492: WHEN OTHERS THEN

Line 2541: 'Entered OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
2545: SAVEPOINT cancel_contract_PVT;

Line 2612: 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

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
2616:

Line 2773: 'OKC_REP_CONTRACT_IMP_PVT.cancel_contract return status is : '

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:
2777: -----------------------------------------------------

Line 2963: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Entered OKC_REP_CONTRACT_IMP_PVT.' || l_api_name);

2959:
2960: BEGIN
2961: l_api_name := 'migrate_contract_relations';
2962:
2963: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Entered OKC_REP_CONTRACT_IMP_PVT.' || l_api_name);
2964: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Input parameter p_purge_and_rerun: ' || p_purge_and_rerun);
2965: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Input parameter p_simulate: ' || p_simulate);
2966:
2967: g_conc_request_id := FND_GLOBAL.conc_request_id;

Line 3096: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);

3092: FND_FILE.PUT_LINE(FND_FILE.LOG, 'This program is run in simulate mode, so the MIGRATED DATA WILL NOT BE COMMITTED.');
3093: END IF;
3094:
3095: retcode := G_RETURN_CODE_SUCCESS;
3096: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Leaving OKC_REP_CONTRACT_IMP_PVT.'||l_api_name);
3097:
3098: EXCEPTION
3099: WHEN OTHERS THEN
3100: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Leaving migrate_contract_relations because of EXCEPTION: ' || sqlerrm);

Line 3106: END OKC_REP_CONTRACT_IMP_PVT;

3102: errbuf := substr(SQLERRM, 1, 200);
3103:
3104: END migrate_contract_relations;
3105:
3106: END OKC_REP_CONTRACT_IMP_PVT;
3107: