[Home] [Help]
17: g_module CONSTANT VARCHAR2(250) := 'okc.plsql.'||g_pkg_name||'.';
18: ------------------------------------------------------------------------------
19: -- GLOBAL CONSTANTS
20: ------------------------------------------------------------------------------
21: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
22: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
23: g_ret_sts_success CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_success;
24: g_ret_sts_error CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_error;
25: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
18: ------------------------------------------------------------------------------
19: -- GLOBAL CONSTANTS
20: ------------------------------------------------------------------------------
21: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
22: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
23: g_ret_sts_success CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_success;
24: g_ret_sts_error CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_error;
25: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
26: := fnd_api.g_ret_sts_unexp_error;
19: -- GLOBAL CONSTANTS
20: ------------------------------------------------------------------------------
21: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
22: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
23: g_ret_sts_success CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_success;
24: g_ret_sts_error CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_error;
25: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
26: := fnd_api.g_ret_sts_unexp_error;
27: g_unexpected_error CONSTANT VARCHAR2 (200) := 'OKC_UNEXPECTED_ERROR';
20: ------------------------------------------------------------------------------
21: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
22: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
23: g_ret_sts_success CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_success;
24: g_ret_sts_error CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_error;
25: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
26: := fnd_api.g_ret_sts_unexp_error;
27: g_unexpected_error CONSTANT VARCHAR2 (200) := 'OKC_UNEXPECTED_ERROR';
28: g_sqlerrm_token CONSTANT VARCHAR2 (200) := 'ERROR_MESSAGE';
22: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
23: g_ret_sts_success CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_success;
24: g_ret_sts_error CONSTANT VARCHAR2 (1) := fnd_api.g_ret_sts_error;
25: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
26: := fnd_api.g_ret_sts_unexp_error;
27: g_unexpected_error CONSTANT VARCHAR2 (200) := 'OKC_UNEXPECTED_ERROR';
28: g_sqlerrm_token CONSTANT VARCHAR2 (200) := 'ERROR_MESSAGE';
29: g_sqlcode_token CONSTANT VARCHAR2 (200) := 'ERROR_CODE';
30: g_amend_code_deleted CONSTANT VARCHAR2 (30) := 'DELETED';
301:
302: PROCEDURE lock_entity (
303: p_api_version IN NUMBER,
304: p_init_msg_list IN VARCHAR2
305: DEFAULT fnd_api.g_false,
306: p_commit IN VARCHAR2
307: DEFAULT fnd_api.g_false,
308: p_entity_name IN VARCHAR2,
309: p_entity_pk1 IN VARCHAR2,
303: p_api_version IN NUMBER,
304: p_init_msg_list IN VARCHAR2
305: DEFAULT fnd_api.g_false,
306: p_commit IN VARCHAR2
307: DEFAULT fnd_api.g_false,
308: p_entity_name IN VARCHAR2,
309: p_entity_pk1 IN VARCHAR2,
310: p_entity_pk2 IN VARCHAR2 DEFAULT NULL,
311: p_entity_pk3 IN VARCHAR2 DEFAULT NULL,
351: -- Standard Start of API savepoint
352: SAVEPOINT g_lock_entity_grp;
353:
354: -- Standard call to check for call compatibility.
355: IF NOT fnd_api.compatible_api_call (l_api_version,
356: p_api_version,
357: l_api_name,
358: g_pkg_name
359: )
357: l_api_name,
358: g_pkg_name
359: )
360: THEN
361: RAISE fnd_api.g_exc_unexpected_error;
362: END IF;
363:
364: -- Initialize message list if p_init_msg_list is set to TRUE.
365: IF fnd_api.to_boolean (p_init_msg_list)
361: RAISE fnd_api.g_exc_unexpected_error;
362: END IF;
363:
364: -- Initialize message list if p_init_msg_list is set to TRUE.
365: IF fnd_api.to_boolean (p_init_msg_list)
366: THEN
367: fnd_msg_pub.initialize;
368: END IF;
369:
408:
409: ---------------------------------------------
410: IF (x_return_status = g_ret_sts_unexp_error)
411: THEN
412: RAISE fnd_api.g_exc_unexpected_error;
413: ELSIF (x_return_status = g_ret_sts_error)
414: THEN
415: RAISE fnd_api.g_exc_error;
416: END IF;
411: THEN
412: RAISE fnd_api.g_exc_unexpected_error;
413: ELSIF (x_return_status = g_ret_sts_error)
414: THEN
415: RAISE fnd_api.g_exc_error;
416: END IF;
417:
418: --------------------------------------------
419:
434:
435: ---------------------------------------------
436: IF (x_return_status = g_ret_sts_unexp_error)
437: THEN
438: RAISE fnd_api.g_exc_unexpected_error;
439: ELSIF (x_return_status = g_ret_sts_error)
440: THEN
441: RAISE fnd_api.g_exc_error;
442: END IF;
437: THEN
438: RAISE fnd_api.g_exc_unexpected_error;
439: ELSIF (x_return_status = g_ret_sts_error)
440: THEN
441: RAISE fnd_api.g_exc_error;
442: END IF;
443:
444: --------------------------------------------
445: IF NVL (l_lock_sts, -99) = 1 AND x_return_status = g_ret_sts_success
474:
475: --------------------------------------------
476: IF (x_return_status = g_ret_sts_unexp_error)
477: THEN
478: RAISE fnd_api.g_exc_unexpected_error;
479: ELSIF (x_return_status = g_ret_sts_error)
480: THEN
481: RAISE fnd_api.g_exc_error;
482: END IF;
477: THEN
478: RAISE fnd_api.g_exc_unexpected_error;
479: ELSIF (x_return_status = g_ret_sts_error)
480: THEN
481: RAISE fnd_api.g_exc_error;
482: END IF;
483:
484: --------------------------------------------
485:
500:
501: ---------------------------------------------
502: IF (x_return_status = g_ret_sts_unexp_error)
503: THEN
504: RAISE fnd_api.g_exc_unexpected_error;
505: ELSIF (x_return_status = g_ret_sts_error)
506: THEN
507: RAISE fnd_api.g_exc_error;
508: END IF;
503: THEN
504: RAISE fnd_api.g_exc_unexpected_error;
505: ELSIF (x_return_status = g_ret_sts_error)
506: THEN
507: RAISE fnd_api.g_exc_error;
508: END IF;
509:
510: --------------------------------------------
511: IF x_return_status = g_ret_sts_success
518: END IF;
519: END IF;
520:
521: -- Standard check of p_commit
522: IF fnd_api.to_boolean (p_commit)
523: THEN
524: COMMIT WORK;
525: END IF;
526: EXCEPTION
523: THEN
524: COMMIT WORK;
525: END IF;
526: EXCEPTION
527: WHEN fnd_api.g_exc_error
528: THEN
529: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
530: THEN
531: fnd_log.STRING
570:
571: PROCEDURE rebuild_locks (
572: p_api_version IN NUMBER,
573: p_init_msg_list IN VARCHAR2
574: DEFAULT fnd_api.g_false,
575: p_commit IN VARCHAR2
576: DEFAULT fnd_api.g_false,
577: p_update_from_doc_type IN VARCHAR2,
578: p_update_from_doc_id IN NUMBER,
572: p_api_version IN NUMBER,
573: p_init_msg_list IN VARCHAR2
574: DEFAULT fnd_api.g_false,
575: p_commit IN VARCHAR2
576: DEFAULT fnd_api.g_false,
577: p_update_from_doc_type IN VARCHAR2,
578: p_update_from_doc_id IN NUMBER,
579: p_update_to_doc_type IN VARCHAR2,
580: p_update_to_doc_id IN NUMBER,
669: SAVEPOINT g_rebuild_locks_grp;
670: -- Release the locks from Source Document Type and Doc ID
671: -- Delete the locks from Build_from_doc_type and build_to_doc_id
672: release_locks (p_api_version => 1,
673: p_init_msg_list => fnd_api.g_false,
674: p_commit => fnd_api.g_false,
675: p_doc_type => p_update_from_doc_type,
676: p_doc_id => p_update_from_doc_id,
677: x_return_status => x_return_status,
670: -- Release the locks from Source Document Type and Doc ID
671: -- Delete the locks from Build_from_doc_type and build_to_doc_id
672: release_locks (p_api_version => 1,
673: p_init_msg_list => fnd_api.g_false,
674: p_commit => fnd_api.g_false,
675: p_doc_type => p_update_from_doc_type,
676: p_doc_id => p_update_from_doc_id,
677: x_return_status => x_return_status,
678: x_msg_count => x_msg_count,
758: UPDATE OKC_DELIVERABLES
759: SET orig_system_reference_id1 = l_new_dlvbl_id_tbl(i)
760: WHERE deliverable_id = l_upd_dlvbl_id_tbl(i);
761: -- Standard check of p_commit
762: IF fnd_api.to_boolean (p_commit)
763: THEN
764: COMMIT WORK;
765: END IF;
766: EXCEPTION
770: END rebuild_locks;
771:
772: PROCEDURE release_locks (
773: p_api_version IN NUMBER,
774: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
775: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
776: p_doc_type IN VARCHAR2,
777: p_doc_id IN NUMBER,
778: x_return_status OUT NOCOPY VARCHAR2,
771:
772: PROCEDURE release_locks (
773: p_api_version IN NUMBER,
774: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
775: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
776: p_doc_type IN VARCHAR2,
777: p_doc_id IN NUMBER,
778: x_return_status OUT NOCOPY VARCHAR2,
779: x_msg_count OUT NOCOPY NUMBER,
786: WHERE lock_by_document_type = p_doc_type
787: AND lock_by_document_id = p_doc_id;
788:
789: -- Standard check of p_commit
790: IF fnd_api.to_boolean (p_commit)
791: THEN
792: COMMIT WORK;
793: END IF;
794: EXCEPTION
830:
831: PROCEDURE unlock_entity (
832: p_api_version IN NUMBER,
833: p_init_msg_list IN VARCHAR2
834: DEFAULT fnd_api.g_false,
835: p_commit IN VARCHAR2
836: DEFAULT fnd_api.g_false,
837: p_entity_name IN VARCHAR2,
838: p_entity_pk1 IN VARCHAR2,
832: p_api_version IN NUMBER,
833: p_init_msg_list IN VARCHAR2
834: DEFAULT fnd_api.g_false,
835: p_commit IN VARCHAR2
836: DEFAULT fnd_api.g_false,
837: p_entity_name IN VARCHAR2,
838: p_entity_pk1 IN VARCHAR2,
839: p_entity_pk2 IN VARCHAR2 DEFAULT NULL,
840: p_entity_pk3 IN VARCHAR2 DEFAULT NULL,
862: -- Standard Start of API savepoint
863: SAVEPOINT g_unlock_entity_grp;
864:
865: -- Standard call to check for call compatibility.
866: IF NOT fnd_api.compatible_api_call (l_api_version,
867: p_api_version,
868: l_api_name,
869: g_pkg_name
870: )
868: l_api_name,
869: g_pkg_name
870: )
871: THEN
872: RAISE fnd_api.g_exc_unexpected_error;
873: END IF;
874:
875: -- Initialize message list if p_init_msg_list is set to TRUE.
876: IF fnd_api.to_boolean (p_init_msg_list)
872: RAISE fnd_api.g_exc_unexpected_error;
873: END IF;
874:
875: -- Initialize message list if p_init_msg_list is set to TRUE.
876: IF fnd_api.to_boolean (p_init_msg_list)
877: THEN
878: fnd_msg_pub.initialize;
879: END IF;
880:
878: fnd_msg_pub.initialize;
879: END IF;
880:
881: -- Initialize API return status to success
882: x_return_status := fnd_api.g_ret_sts_success;
883: -- Calling simple API to delete the row
884: okc_k_entity_locks_pkg.delete_row
885: (p_entity_name => p_entity_name,
886: p_entity_pk1 => p_entity_pk1,
898:
899: --------------------------------------------
900: IF (x_return_status = g_ret_sts_unexp_error)
901: THEN
902: RAISE fnd_api.g_exc_unexpected_error;
903: ELSIF (x_return_status = g_ret_sts_error)
904: THEN
905: RAISE fnd_api.g_exc_error;
906: END IF;
901: THEN
902: RAISE fnd_api.g_exc_unexpected_error;
903: ELSIF (x_return_status = g_ret_sts_error)
904: THEN
905: RAISE fnd_api.g_exc_error;
906: END IF;
907:
908: --------------------------------------------
909: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
913: '9999: completed unlock_entity'
914: );
915: END IF;
916: EXCEPTION
917: WHEN fnd_api.g_exc_error
918: THEN
919: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
920: THEN
921: fnd_log.STRING
930: fnd_msg_pub.count_and_get (p_encoded => 'F',
931: p_count => x_msg_count,
932: p_data => x_msg_data
933: );
934: WHEN fnd_api.g_exc_unexpected_error
935: THEN
936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
937: THEN
938: fnd_log.STRING
1145: (p_app_name => g_app_name,
1146: p_msg_name => 'OKC_SRC_ART_NOT_FOUND_RVRT'
1147: );
1148: x_return_status := g_ret_sts_error;
1149: RAISE fnd_api.g_exc_error;
1150: END IF;
1151:
1152: CLOSE l_get_art_csr;
1153:
1171: (p_app_name => g_app_name,
1172: p_msg_name => 'OKC_RVRT_SEC_BEFORE_ART'
1173: );
1174: x_return_status := g_ret_sts_error;
1175: RAISE fnd_api.g_exc_error;
1176: END IF;
1177:
1178: IF l_doc_clause_rec.standard_yn = 'N'
1179: THEN
1179: THEN
1180: -- Copying Non-Standard Article and get the new article_id and article_Version_id
1181: okc_articles_grp.copy_article
1182: (p_api_version => 1,
1183: p_init_msg_list => fnd_api.g_false,
1184: p_validation_level => fnd_api.g_valid_level_full,
1185: p_commit => fnd_api.g_false,
1186: p_article_version_id => l_doc_clause_rec.article_version_id,
1187: p_new_article_title => NULL,
1180: -- Copying Non-Standard Article and get the new article_id and article_Version_id
1181: okc_articles_grp.copy_article
1182: (p_api_version => 1,
1183: p_init_msg_list => fnd_api.g_false,
1184: p_validation_level => fnd_api.g_valid_level_full,
1185: p_commit => fnd_api.g_false,
1186: p_article_version_id => l_doc_clause_rec.article_version_id,
1187: p_new_article_title => NULL,
1188: p_create_standard_yn => 'N',
1181: okc_articles_grp.copy_article
1182: (p_api_version => 1,
1183: p_init_msg_list => fnd_api.g_false,
1184: p_validation_level => fnd_api.g_valid_level_full,
1185: p_commit => fnd_api.g_false,
1186: p_article_version_id => l_doc_clause_rec.article_version_id,
1187: p_new_article_title => NULL,
1188: p_create_standard_yn => 'N',
1189: x_article_version_id => x_article_version_id,
1195: );
1196:
1197: IF (x_return_status = g_ret_sts_unexp_error)
1198: THEN
1199: RAISE fnd_api.g_exc_unexpected_error;
1200: ELSIF (x_return_status = g_ret_sts_error)
1201: THEN
1202: RAISE fnd_api.g_exc_error;
1203: END IF;
1198: THEN
1199: RAISE fnd_api.g_exc_unexpected_error;
1200: ELSIF (x_return_status = g_ret_sts_error)
1201: THEN
1202: RAISE fnd_api.g_exc_error;
1203: END IF;
1204:
1205: l_doc_clause_rec.article_version_id := x_article_version_id;
1206: l_doc_clause_rec.sav_sae_id := x_article_id;
1302:
1303: p_target_doc_clause_id := x_new_doc_clause_id;
1304:
1305: EXCEPTION
1306: WHEN fnd_api.g_exc_error
1307: THEN
1308: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1309: THEN
1310: fnd_log.STRING
1309: THEN
1310: fnd_log.STRING
1311: (fnd_log.LEVEL_STATEMENT,
1312: g_pkg_name,
1313: '0000: Leaving copy_clause:FND_API.G_EXC_ERROR Exception'
1314: );
1315: END IF;
1316:
1317: x_return_status := g_ret_sts_error;
1318: fnd_msg_pub.count_and_get (p_encoded => 'F',
1319: p_count => x_msg_count,
1320: p_data => x_msg_data
1321: );
1322: WHEN fnd_api.g_exc_unexpected_error
1323: THEN
1324: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
1325: THEN
1326: fnd_log.STRING
1325: THEN
1326: fnd_log.STRING
1327: (fnd_log.LEVEL_STATEMENT,
1328: g_pkg_name,
1329: '0000: Leaving copy_clause:FND_API.G_EXC_UNEXPECTED_ERROR Exception'
1330: );
1331: END IF;
1332:
1333: x_return_status := g_ret_sts_unexp_error;
1585: )
1586: THEN
1587: okc_xprt_cz_int_pvt.delete_configuration
1588: (p_api_version => 1.0,
1589: p_init_msg_list => fnd_api.g_false,
1590: p_config_header_id => l_old_config_header_id,
1591: p_config_rev_nbr => l_old_config_revision_number,
1592: x_return_status => x_return_status,
1593: x_msg_data => x_msg_data,
1595: );
1596: END IF; -- delete the old configuration
1597:
1598:
1599: IF (x_return_status <> fnd_api.g_ret_sts_success)
1600: THEN
1601: RAISE fnd_api.g_exc_unexpected_error;
1602: END IF;
1603: END IF; --configurator
1597:
1598:
1599: IF (x_return_status <> fnd_api.g_ret_sts_success)
1600: THEN
1601: RAISE fnd_api.g_exc_unexpected_error;
1602: END IF;
1603: END IF; --configurator
1604:
1605:
1678: (p_api_version => 1,
1679: p_init_msg_list => okc_api.g_false,
1680: p_config_header_id => l_src_config_header_id,
1681: p_config_rev_nbr => l_src_config_revision_number,
1682: p_new_config_flag => fnd_api.g_true,
1683: x_new_config_header_id => l_new_config_header_id,
1684: x_new_config_rev_nbr => l_new_config_rev_nbr,
1685: x_return_status => x_return_status,
1686: x_msg_data => x_msg_data,
1688: );
1689:
1690: IF (x_return_status = g_ret_sts_unexp_error)
1691: THEN
1692: RAISE fnd_api.g_exc_unexpected_error;
1693: ELSIF (x_return_status = g_ret_sts_error)
1694: THEN
1695: RAISE fnd_api.g_exc_error;
1696: END IF;
1691: THEN
1692: RAISE fnd_api.g_exc_unexpected_error;
1693: ELSIF (x_return_status = g_ret_sts_error)
1694: THEN
1695: RAISE fnd_api.g_exc_error;
1696: END IF;
1697:
1698: UPDATE okc_template_usages
1699: SET config_header_id = l_new_config_header_id,
1962: okc_Api.Set_Message(p_app_name => G_APP_NAME,
1963: p_msg_name => 'OKC_SRC_SEC_NOT_FOUND_RVRT'
1964: );
1965: x_return_status := G_RET_STS_ERROR;
1966: RAISE FND_API.G_EXC_ERROR;
1967: END IF;
1968: CLOSE cur_scn_details;
1969:
1970: IF l_src_scn_details_rec.parent_scn_id IS NOT NULL THEN
1981: p_token1 => 'SEC_NAME',
1982: p_token1_value => l_parent_scn_details_rec.heading
1983: );
1984: x_return_status := g_ret_sts_error;
1985: RAISE fnd_api.g_exc_error;
1986: ELSE
1987: l_parent_scn_id := l_parent_scn_details_rec.ID;
1988: END IF;
1989: ELSE
2073: okc_Api.Set_Message(p_app_name => G_APP_NAME,
2074: p_msg_name => 'OKC_SRC_ART_NOT_FOUND_RVRT'
2075: );
2076: x_return_status := G_RET_STS_ERROR;
2077: RAISE FND_API.G_EXC_ERROR;
2078: END IF;
2079:
2080: -- Update the existsing sub-sections /clauses with the new section id.
2081: UPDATE okc_sections_b
2412: x_msg_count,
2413: x_msg_data,
2414: x_errorcode
2415: );
2416: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2418: END IF;
2419:
2420: -- Delete the p_target_deliverable_id
2413: x_msg_data,
2414: x_errorcode
2415: );
2416: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2418: END IF;
2419:
2420: -- Delete the p_target_deliverable_id
2421: IF p_target_deliverable_id IS NOT NULL THEN
2441:
2442: PROCEDURE revert_changes (
2443: p_api_version IN NUMBER,
2444: p_init_msg_list IN VARCHAR2
2445: DEFAULT fnd_api.g_false,
2446: p_commit IN VARCHAR2
2447: DEFAULT fnd_api.g_false,
2448: p_K_ENTITY_LOCK_ID IN NUMBER,
2449: p_entity_name IN VARCHAR2,
2443: p_api_version IN NUMBER,
2444: p_init_msg_list IN VARCHAR2
2445: DEFAULT fnd_api.g_false,
2446: p_commit IN VARCHAR2
2447: DEFAULT fnd_api.g_false,
2448: p_K_ENTITY_LOCK_ID IN NUMBER,
2449: p_entity_name IN VARCHAR2,
2450: p_entity_pk1 IN VARCHAR2,
2451: p_entity_pk2 IN VARCHAR2 DEFAULT NULL,
2475: -- Standard Start of API savepoint
2476: SAVEPOINT g_revert_changes_grp;
2477:
2478: -- Standard call to check for call compatibility.
2479: IF NOT fnd_api.compatible_api_call (l_api_version,
2480: p_api_version,
2481: l_api_name,
2482: g_pkg_name
2483: )
2481: l_api_name,
2482: g_pkg_name
2483: )
2484: THEN
2485: RAISE fnd_api.g_exc_unexpected_error;
2486: END IF;
2487:
2488: -- Initialize message list if p_init_msg_list is set to TRUE.
2489: IF fnd_api.to_boolean (p_init_msg_list)
2485: RAISE fnd_api.g_exc_unexpected_error;
2486: END IF;
2487:
2488: -- Initialize message list if p_init_msg_list is set to TRUE.
2489: IF fnd_api.to_boolean (p_init_msg_list)
2490: THEN
2491: fnd_msg_pub.initialize;
2492: END IF;
2493:
2491: fnd_msg_pub.initialize;
2492: END IF;
2493:
2494: -- Initialize API return status to success
2495: x_return_status := fnd_api.g_ret_sts_success;
2496:
2497: IF p_entity_name = okc_k_entity_locks_grp.g_clause_entity
2498: THEN
2499: refresh_clause (p_source_doc_clause_id => TO_NUMBER
2550: DELETE FROM okc_k_entity_locks
2551: WHERE k_entity_lock_id = p_K_ENTITY_LOCK_ID;
2552:
2553: -- Standard check of p_commit
2554: IF fnd_api.to_boolean (p_commit)
2555: THEN
2556: COMMIT WORK;
2557: END IF;
2558:
2556: COMMIT WORK;
2557: END IF;
2558:
2559: EXCEPTION
2560: WHEN fnd_api.g_exc_error
2561: THEN
2562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2563: THEN
2564: fnd_log.STRING
2573: fnd_msg_pub.count_and_get (p_encoded => 'F',
2574: p_count => x_msg_count,
2575: p_data => x_msg_data
2576: );
2577: WHEN fnd_api.g_exc_unexpected_error
2578: THEN
2579: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2580: THEN
2581: fnd_log.STRING
2773: END get_src_doc_details;
2774:
2775:
2776: PROCEDURE revert_entity ( p_api_version IN NUMBER,
2777: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2778: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2779: p_k_entity_lock_id IN NUMBER,
2780: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
2781: X_MSG_COUNT OUT NOCOPY NUMBER,
2774:
2775:
2776: PROCEDURE revert_entity ( p_api_version IN NUMBER,
2777: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2778: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
2779: p_k_entity_lock_id IN NUMBER,
2780: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
2781: X_MSG_COUNT OUT NOCOPY NUMBER,
2782: X_MSG_DATA OUT NOCOPY VARCHAR2
3170: p_action_req_details IN VARCHAR2,
3171: x_return_status OUT NOCOPY VARCHAR2,
3172: x_msg_data OUT NOCOPY VARCHAR2,
3173: x_msg_count OUT NOCOPY NUMBER,
3174: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_true
3175:
3176: )
3177: IS
3178: l_wf_item_key VARCHAR2 (240);
3325: '1000: end'
3326: );
3327: END IF;
3328:
3329: IF p_init_msg_list = fnd_api.g_true
3330: THEN
3331: fnd_msg_pub.initialize;
3332: END IF;
3333: EXCEPTION
3358: END start_notify_workflow;
3359:
3360:
3361: PROCEDURE rebuild_ids( p_api_version IN NUMBER,
3362: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3363: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3364: p_update_from_doc_type IN VARCHAR2, -- Mod document
3365: p_update_from_doc_id IN NUMBER, -- Mod document
3366: p_update_to_doc_type IN VARCHAR2, -- Award document
3359:
3360:
3361: PROCEDURE rebuild_ids( p_api_version IN NUMBER,
3362: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3363: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3364: p_update_from_doc_type IN VARCHAR2, -- Mod document
3365: p_update_from_doc_id IN NUMBER, -- Mod document
3366: p_update_to_doc_type IN VARCHAR2, -- Award document
3367: p_update_to_doc_id IN NUMBER, -- Award document
3525: -- Release the locks acquired by Mod.
3526: -- Release the locks from Source Document Type and Doc ID
3527: -- Delete the locks from Build_from_doc_type and build_to_doc_id
3528: release_locks (p_api_version => 1,
3529: p_init_msg_list => fnd_api.g_false,
3530: p_commit => fnd_api.g_false,
3531: p_doc_type => p_update_from_doc_type,
3532: p_doc_id => p_update_from_doc_id,
3533: x_return_status => x_return_status,
3526: -- Release the locks from Source Document Type and Doc ID
3527: -- Delete the locks from Build_from_doc_type and build_to_doc_id
3528: release_locks (p_api_version => 1,
3529: p_init_msg_list => fnd_api.g_false,
3530: p_commit => fnd_api.g_false,
3531: p_doc_type => p_update_from_doc_type,
3532: p_doc_id => p_update_from_doc_id,
3533: x_return_status => x_return_status,
3534: x_msg_count => x_msg_count,
3534: x_msg_count => x_msg_count,
3535: x_msg_data => x_msg_data
3536: );
3537: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3538: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3539: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3540: RAISE FND_API.G_EXC_ERROR ;
3541: END IF;
3542:
3536: );
3537: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3538: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3539: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3540: RAISE FND_API.G_EXC_ERROR ;
3541: END IF;
3542:
3543:
3544: -- Standard check of p_commit
3541: END IF;
3542:
3543:
3544: -- Standard check of p_commit
3545: IF fnd_api.to_boolean (p_commit)
3546: THEN
3547: COMMIT WORK;
3548: END IF;
3549:
3684: END has_conflicting_locks;
3685:
3686: PROCEDURE merge_changes (
3687: p_api_version IN NUMBER,
3688: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3689: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3690: p_src_doc_type IN VARCHAR2, -- PAR document
3691: p_src_doc_id IN NUMBER, -- PAR document
3692: p_target_doc_type IN VARCHAR2, -- MOD document
3685:
3686: PROCEDURE merge_changes (
3687: p_api_version IN NUMBER,
3688: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3689: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
3690: p_src_doc_type IN VARCHAR2, -- PAR document
3691: p_src_doc_id IN NUMBER, -- PAR document
3692: p_target_doc_type IN VARCHAR2, -- MOD document
3693: p_target_doc_id IN NUMBER, -- MOD document
3803: x_msg_count => x_msg_count,
3804: x_msg_data => x_msg_data
3805: );
3806: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3807: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3808: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3809: RAISE FND_API.G_EXC_ERROR ;
3810: END IF;
3811:
3805: );
3806: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3807: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3808: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3809: RAISE FND_API.G_EXC_ERROR ;
3810: END IF;
3811:
3812: -- lock the deliverable
3813: IF del_rec.summary_amend_operation_code in ('UPDATED','DELETED')
3826: X_MSG_COUNT => X_MSG_COUNT,
3827: X_MSG_DATA => X_MSG_DATA
3828: );
3829: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3831: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3832: RAISE FND_API.G_EXC_ERROR ;
3833: END IF;
3834: END IF;
3828: );
3829: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3831: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3832: RAISE FND_API.G_EXC_ERROR ;
3833: END IF;
3834: END IF;
3835: END LOOP;
3836:
3857: x_msg_count => x_msg_count,
3858: x_msg_data => x_msg_data
3859: );
3860: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3862: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3863: RAISE FND_API.G_EXC_ERROR ;
3864: END IF;
3865:
3859: );
3860: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3862: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3863: RAISE FND_API.G_EXC_ERROR ;
3864: END IF;
3865:
3866: -- lock the deliverable
3867: IF clause_rec.summary_amend_operation_code in ('UPDATED','DELETED')
3881: X_MSG_DATA => X_MSG_DATA
3882:
3883: );
3884: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3886: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3887: RAISE FND_API.G_EXC_ERROR ;
3888: END IF;
3889: END IF;
3883: );
3884: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3886: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3887: RAISE FND_API.G_EXC_ERROR ;
3888: END IF;
3889: END IF;
3890: END LOOP;
3891: -- Sections.
3912: x_msg_count => x_msg_count,
3913: x_msg_data => x_msg_data
3914: );
3915: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3916: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3917: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3918: RAISE FND_API.G_EXC_ERROR ;
3919: END IF;
3920:
3914: );
3915: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3916: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3917: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3918: RAISE FND_API.G_EXC_ERROR ;
3919: END IF;
3920:
3921: -- lock the deliverable
3922: IF section_rec.summary_amend_operation_code IN ('UPDATED','DELETED')
3936: X_MSG_DATA => X_MSG_DATA
3937:
3938: );
3939: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3940: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3941: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3942: RAISE FND_API.G_EXC_ERROR ;
3943: END IF;
3944: END IF;
3938: );
3939: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3940: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3941: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3942: RAISE FND_API.G_EXC_ERROR ;
3943: END IF;
3944: END IF;
3945: END LOOP;
3946: