50: 'Target Contract Type is: ' || p_target_contract_type);
51: END IF;
52: l_api_name := 'copy_deliverables';
53: l_api_version := 1.0;
54: -- Standard Start of API savepoint
55: SAVEPOINT copy_deliverables_PVT;
56: -- Standard call to check for call compatibility.
57: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
52: l_api_name := 'copy_deliverables';
53: l_api_version := 1.0;
54: -- Standard Start of API savepoint
55: SAVEPOINT copy_deliverables_PVT;
56: -- Standard call to check for call compatibility.
57: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
59: END IF;
60: -- Initialize message list if p_init_msg_list is set to TRUE.
128:
129: -- close open cursors
130: CLOSE target_contract_csr;
131: CLOSE party_csr;
132: -- Standard check of p_commit
133: IF FND_API.To_Boolean( p_commit ) THEN
134: COMMIT WORK;
135: END IF;
136:
133: IF FND_API.To_Boolean( p_commit ) THEN
134: COMMIT WORK;
135: END IF;
136:
137: -- Standard call to get message count and if count is 1, get message info.
138: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
139:
140: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
255:
256: l_api_name := 'revise_checklist';
257: l_api_version := 1.0;
258:
259: -- Standard Start of API savepoint
260: SAVEPOINT revise_checklist_PVT;
261:
262: -- Standard call to check for call compatibility.
263: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
258:
259: -- Standard Start of API savepoint
260: SAVEPOINT revise_checklist_PVT;
261:
262: -- Standard call to check for call compatibility.
263: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
265: END IF;
266:
319: WHERE contract_id = p_contract_id
320: AND contract_type = p_contract_type;
321: END IF;
322:
323: -- Standard check of p_commit
324: IF FND_API.To_Boolean( p_commit ) THEN
325: COMMIT WORK;
326: END IF;
327:
324: IF FND_API.To_Boolean( p_commit ) THEN
325: COMMIT WORK;
326: END IF;
327:
328: -- Standard call to get message count and if count is 1, get message info.
329: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
330:
331: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
440:
441: l_api_name := 'freeze_checklist';
442: l_api_version := 1.0;
443:
444: -- Standard Start of API savepoint
445: SAVEPOINT freeze_checklist_PVT;
446:
447: -- Standard call to check for call compatibility.
448: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
443:
444: -- Standard Start of API savepoint
445: SAVEPOINT freeze_checklist_PVT;
446:
447: -- Standard call to check for call compatibility.
448: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
449: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
450: END IF;
451:
497:
498: -- close open cursors
499: CLOSE c_get_doc_details;
500:
501: -- Standard check of p_commit
502: IF FND_API.To_Boolean( p_commit ) THEN
503: COMMIT WORK;
504: END IF;
505:
502: IF FND_API.To_Boolean( p_commit ) THEN
503: COMMIT WORK;
504: END IF;
505:
506: -- Standard call to get message count and if count is 1, get message info.
507: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
508:
509: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
510: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
620:
621: l_api_name := 'validate_closeout_tasks';
622: l_api_version := 1.0;
623:
624: -- Standard Start of API savepoint
625: SAVEPOINT val_closeout_tasks_PVT;
626:
627: -- Standard call to check for call compatibility.
628: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
623:
624: -- Standard Start of API savepoint
625: SAVEPOINT val_closeout_tasks_PVT;
626:
627: -- Standard call to check for call compatibility.
628: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
631:
746:
747: -- close open cursors
748: CLOSE c_get_doc_details;
749:
750: -- Standard check of p_commit
751: IF FND_API.To_Boolean( p_commit ) THEN
752: COMMIT WORK;
753: END IF;
754:
751: IF FND_API.To_Boolean( p_commit ) THEN
752: COMMIT WORK;
753: END IF;
754:
755: -- Standard call to get message count and if count is 1, get message info.
756: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
757:
758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
882: END IF;
883: l_api_name := 'Activate_tasks_closeout';
884: l_api_version := 1.0;
885:
886: -- Standard Start of API savepoint
887: SAVEPOINT Act_tasks_closeout_PVT;
888:
889: -- Standard call to check for call compatibility.
890: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
885:
886: -- Standard Start of API savepoint
887: SAVEPOINT Act_tasks_closeout_PVT;
888:
889: -- Standard call to check for call compatibility.
890: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
891: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
892: END IF;
893: -- Initialize message list if p_init_msg_list is set to TRUE.
1167: x_task_status := G_TASK_STATUS_COMP;
1168: END IF;
1169: CLOSE c_del_status_csr;
1170:
1171: -- Standard check of p_commit
1172: IF FND_API.To_Boolean( p_commit ) THEN
1173: COMMIT WORK;
1174: END IF;
1175:
1172: IF FND_API.To_Boolean( p_commit ) THEN
1173: COMMIT WORK;
1174: END IF;
1175:
1176: -- Standard call to get message count and if count is 1, get message info.
1177: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1178:
1179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1287: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1288: 'Entered OKC_REP_CLOSEOUT_PVT.'||l_api_name);
1289: END IF;
1290:
1291: -- Standard Start of API savepoint
1292: SAVEPOINT create_contract_PVT;
1293:
1294: -- Standard call to check for call compatibility.
1295: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1290:
1291: -- Standard Start of API savepoint
1292: SAVEPOINT create_contract_PVT;
1293:
1294: -- Standard call to check for call compatibility.
1295: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1297: END IF;
1298:
1343: x_msg_data => x_msg_data,
1344: x_msg_count => x_msg_count,
1345: x_return_status => x_return_status);
1346:
1347: -- Standard check of p_commit
1348: IF FND_API.To_Boolean( p_commit ) THEN
1349: COMMIT WORK;
1350: END IF;
1351:
1348: IF FND_API.To_Boolean( p_commit ) THEN
1349: COMMIT WORK;
1350: END IF;
1351:
1352: -- Standard call to get message count and if count is 1, get message info.
1353: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1354:
1355: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1356: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1433: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1434: 'Entered OKC_REP_CLOSEOUT_PVT.'||l_api_name);
1435: END IF;
1436:
1437: -- Standard Start of API savepoint
1438: SAVEPOINT delete_contract_PVT;
1439:
1440: -- Standard call to check for call compatibility.
1441: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1436:
1437: -- Standard Start of API savepoint
1438: SAVEPOINT delete_contract_PVT;
1439:
1440: -- Standard call to check for call compatibility.
1441: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1443: END IF;
1444:
1450: x_msg_data => x_msg_data,
1451: x_msg_count => x_msg_count,
1452: x_return_status => x_return_status);
1453:
1454: -- Standard check of p_commit
1455: IF FND_API.To_Boolean( p_commit ) THEN
1456: COMMIT WORK;
1457: END IF;
1458:
1455: IF FND_API.To_Boolean( p_commit ) THEN
1456: COMMIT WORK;
1457: END IF;
1458:
1459: -- Standard call to get message count and if count is 1, get message info.
1460: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1461:
1462: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1463: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1551: 'p_commit : '||p_commit);
1552: END IF;
1553:
1554: -- Standard Start of API savepoint
1555: SAVEPOINT create_contract_vers_PVT;
1556:
1557: -- Standard call to check for call compatibility.
1558: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1553:
1554: -- Standard Start of API savepoint
1555: SAVEPOINT create_contract_vers_PVT;
1556:
1557: -- Standard call to check for call compatibility.
1558: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1560: END IF;
1561:
1573: x_msg_data => x_msg_data,
1574: x_msg_count => x_msg_count,
1575: x_return_status => x_return_status);
1576:
1577: -- Standard check of p_commit
1578: IF FND_API.To_Boolean( p_commit ) THEN
1579: COMMIT WORK;
1580: END IF;
1581:
1578: IF FND_API.To_Boolean( p_commit ) THEN
1579: COMMIT WORK;
1580: END IF;
1581:
1582: -- Standard call to get message count and if count is 1, get message info.
1583: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1584:
1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1668: 'p_document_rec.business_document_version '||p_document_rec.business_document_version);
1669: END IF;
1670:
1671: -- Standard Start of API savepoint
1672: SAVEPOINT check_contract_exists_PVT;
1673:
1674: -- Standard call to check for call compatibility.
1675: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1670:
1671: -- Standard Start of API savepoint
1672: SAVEPOINT check_contract_exists_PVT;
1673:
1674: -- Standard call to check for call compatibility.
1675: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1676: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1677: END IF;
1678:
1689: x_msg_data => x_msg_data,
1690: x_msg_count => x_msg_count,
1691: x_return_status => x_return_status);
1692:
1693: -- Standard call to get message count and if count is 1, get message info.
1694: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1695:
1696: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1697: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1898:
1899: l_api_name := 'validate_closeout_tasks';
1900: l_api_version := 1.0;
1901:
1902: -- Standard Start of API savepoint
1903: SAVEPOINT val_closeout_tasks_PVT;
1904:
1905: -- Standard call to check for call compatibility.
1906: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1901:
1902: -- Standard Start of API savepoint
1903: SAVEPOINT val_closeout_tasks_PVT;
1904:
1905: -- Standard call to check for call compatibility.
1906: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1907: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1908: END IF;
1909:
2018:
2019: -- close open cursors
2020: CLOSE c_get_doc_details;
2021:
2022: -- Standard check of p_commit
2023: IF FND_API.To_Boolean( p_commit ) THEN
2024: COMMIT WORK;
2025: END IF;
2026:
2023: IF FND_API.To_Boolean( p_commit ) THEN
2024: COMMIT WORK;
2025: END IF;
2026:
2027: -- Standard call to get message count and if count is 1, get message info.
2028: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2029:
2030: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2031: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2157:
2158: l_api_name := 'copy_set_tasks_to_each_po';
2159: l_api_version := 1.0;
2160:
2161: -- Standard Start of API savepoint
2162: SAVEPOINT copy_tasks_to_each_po_PVT;
2163:
2164: -- Standard call to check for call compatibility.
2165: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2160:
2161: -- Standard Start of API savepoint
2162: SAVEPOINT copy_tasks_to_each_po_PVT;
2163:
2164: -- Standard call to check for call compatibility.
2165: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2166: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2167: END IF;
2168:
2276: RAISE OKC_API.G_EXCEPTION_ERROR;
2277: END IF;
2278: --------------------------------------------------------
2279:
2280: -- Standard check of p_commit
2281: IF FND_API.To_Boolean( p_commit ) THEN
2282: COMMIT WORK;
2283: END IF;
2284:
2281: IF FND_API.To_Boolean( p_commit ) THEN
2282: COMMIT WORK;
2283: END IF;
2284:
2285: -- Standard call to get message count and if count is 1, get message info.
2286: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2287:
2288: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2401: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2402: 'p_document_rec.business_document_version '||p_document_rec.business_document_version);
2403: END IF;
2404:
2405: -- Standard Start of API savepoint
2406: SAVEPOINT check_tasks_exists_PVT;
2407:
2408: -- Standard call to check for call compatibility.
2409: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2404:
2405: -- Standard Start of API savepoint
2406: SAVEPOINT check_tasks_exists_PVT;
2407:
2408: -- Standard call to check for call compatibility.
2409: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2411: END IF;
2412:
2418: END IF;
2419:
2420: CLOSE c_get_tasks_exists_csr;
2421:
2422: -- Standard call to get message count and if count is 1, get message info.
2423: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2424:
2425: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2426: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,