DBA Data[Home] [Help]

APPS.PA_CONTROL_ITEMS_UTILS dependencies on PA_CONTROL_ITEMS

Line 1: PACKAGE BODY PA_CONTROL_ITEMS_UTILS AS

1: PACKAGE BODY PA_CONTROL_ITEMS_UTILS AS
2: --$Header: PACICIUB.pls 120.12.12010000.2 2008/08/22 16:08:05 mumohan ship $
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: G_user_id NUMBER:=-999;

Line 213: FROM pa_control_items

209:
210: CURSOR get_current_status
211: IS
212: SELECT status_code
213: FROM pa_control_items
214: WHERE ci_id = p_ci_id;
215:
216:
217: BEGIN

Line 272: from pa_control_items ci

268: ,status_code
269: ,ps.project_system_status_code system_status_code
270: ,cit.ci_type_class_code ci_type_class
271: ,cit.approval_required_flag approval_required_flag
272: from pa_control_items ci
273: ,pa_ci_types_b cit
274: ,pa_project_statuses ps
275: where ci.ci_id = p_ci_id
276: and ci.ci_type_id = cit.ci_type_id

Line 383: from pa_control_items

379:
380: IF g_CI_id is NULL or g_CI_id <> p_ci_id then
381: select status_code
382: into l_ci_status
383: from pa_control_items
384: where ci_id = p_ci_id ;
385: g_ci_status := l_ci_status ;
386: END IF ;
387:

Line 415: ,pa_control_items CI

411: into l_ci_type_has_impact
412: from dual
413: where exists ( select '1'
414: from pa_ci_impact_type_usage CIIU
415: ,pa_control_items CI
416: where CIIU.ci_type_id= CI.ci_type_id
417: and CI.CI_id = p_ci_id ) ;
418: g_ci_type_has_impact := l_ci_type_has_impact ;
419: END IF ;

Line 623: if pa_control_items_utils.CheckCIActionAllowed(

619: -- this logic NOT executed for CREATE page
620: if p_ci_id is NOT NULL
621: AND p_status_control is not null then
622: l_ci_status := getCIStatus(p_ci_id) ;
623: if pa_control_items_utils.CheckCIActionAllowed(
624: 'CONTROL_ITEM',
625: l_ci_status ,
626: p_status_control ) <> 'Y' then
627: return 'N';

Line 683: pa_control_items_workflow.start_workflow

679: l_wf_process_name IS NOT NULL THEN
680:
681: --debug_msg_s1 ('start workflow ' || l_wf_item_type || ':' || l_wf_process_name);
682:
683: pa_control_items_workflow.start_workflow
684: (
685: l_wf_item_type
686: , l_wf_process_name
687: , p_ci_id

Line 753: FROM pa_control_items

749:
750: CURSOR get_project_id
751: IS
752: SELECT project_id
753: FROM pa_control_items
754: WHERE ci_id = p_ci_id;
755:
756: BEGIN
757:

Line 781: pa_control_items_workflow.cancel_workflow

777:
778: else
779:
780: --debug_msg_s1 ('b4 canceling workflow ' || x_return_status);
781: pa_control_items_workflow.cancel_workflow
782: (
783: l_wf_item_type
784: , l_item_key
785: , x_msg_count

Line 823: FROM pa_control_items pci

819: IS
820: CURSOR get_ci_info
821: IS
822: SELECT pci.status_code, pci.project_id
823: FROM pa_control_items pci
824: WHERE ci_id = p_ci_id;
825:
826: CURSOR get_status_name(l_code varchar2)
827: IS SELECT meaning

Line 835: FROM pa_lookups pl, pa_control_items pci, pa_ci_types_b pcit

831:
832: CURSOR get_control_item_type
833: IS
834: SELECT pl.meaning,pl.lookup_code
835: FROM pa_lookups pl, pa_control_items pci, pa_ci_types_b pcit
836: WHERE
837: pl.lookup_type = 'PA_CI_TYPE_CLASSES'
838: and pci.ci_type_id = pcit.ci_type_id
839: and pl.lookup_code = pcit.ci_type_class_code

Line 899: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_UTILS.ChangeCIStatus');

895: x_msg_data := '';
896:
897: -- Initialize the Error Stack
898: IF P_PA_DEBUG_MODE = 'Y' THEN
899: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_UTILS.ChangeCIStatus');
900: END IF;
901:
902: pa_debug.write_file('ChangeCiStatus: p_pa_debug_mode :'||p_pa_debug_mode);
903:

Line 935: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS');

931: IF (p_validate_only <> fnd_api.g_true AND x_return_status = 'S') THEN
932: -- debug_msg_s1 ('6 ' || x_return_status);
933:
934: IF P_PA_DEBUG_MODE = 'Y' THEN
935: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS');
936: END IF;
937:
938: pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS (
939: 1.0,

Line 938: pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS (

934: IF P_PA_DEBUG_MODE = 'Y' THEN
935: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS');
936: END IF;
937:
938: pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS (
939: 1.0,
940: p_init_msg_list,
941: p_commit,
942: p_validate_only,

Line 952: pa_debug.write_file('ChangeCiStatus: after call to pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS');

948: x_msg_count,
949: x_msg_data
950: );
951: IF P_PA_DEBUG_MODE = 'Y' THEN
952: pa_debug.write_file('ChangeCiStatus: after call to pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS');
953: END IF;
954:
955:
956: --Bug # 4618856 - if statement is added to check the return status

Line 1041: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

1037:
1038: ROLLBACK;
1039:
1040: x_return_status := 'U';
1041: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1042: p_procedure_name => 'ChangeCIStatus',
1043: p_error_text => SUBSTRB(SQLERRM,1,240));
1044:
1045: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 1170: pa_control_items ci

1166:
1167: SELECT ci_type_class_code, approval_required_flag
1168: INTO l_type, l_approval_required
1169: FROM pa_ci_types_b cit,
1170: pa_control_items ci
1171: WHERE ci.ci_id = p_ci_id
1172: and cit.ci_type_id = ci.ci_type_id;
1173:
1174: IF l_type IN ('CHANGE_ORDER', 'CHANGE_REQUEST') THEN

Line 1206: ,pa_control_items ci

1202:
1203: select
1204: resolution_required_flag into l_resolution_required
1205: from pa_ci_types_b cit
1206: ,pa_control_items ci
1207: where ci.ci_id = p_ci_id
1208: and cit.ci_type_id = ci.ci_type_id;
1209:
1210: return l_resolution_required;

Line 1225: ,pa_control_items ci

1221: cursor get_resolution_info is
1222: select
1223: resolution_required_flag, resolution_code_id, resolution
1224: from pa_ci_types_b cit
1225: ,pa_control_items ci
1226: where ci.ci_id = p_ci_id
1227: and cit.ci_type_id = ci.ci_type_id;
1228:
1229: l_has_resolution varchar2(1) := 'Y';

Line 1231: l_res_code pa_control_items.resolution_code_id%TYPE;

1227: and cit.ci_type_id = ci.ci_type_id;
1228:
1229: l_has_resolution varchar2(1) := 'Y';
1230: l_res_required pa_ci_types_vl.resolution_required_flag%TYPE;
1231: l_res_code pa_control_items.resolution_code_id%TYPE;
1232: l_res_comment pa_control_items.resolution%TYPE;
1233: BEGIN
1234: if p_ci_id is NULL then
1235: return NULL;

Line 1232: l_res_comment pa_control_items.resolution%TYPE;

1228:
1229: l_has_resolution varchar2(1) := 'Y';
1230: l_res_required pa_ci_types_vl.resolution_required_flag%TYPE;
1231: l_res_code pa_control_items.resolution_code_id%TYPE;
1232: l_res_comment pa_control_items.resolution%TYPE;
1233: BEGIN
1234: if p_ci_id is NULL then
1235: return NULL;
1236: end if;

Line 1264: ,pa_control_items ci

1260:
1261: select
1262: ci_type_class_code into l_type_class_code
1263: from pa_ci_types_b cit
1264: ,pa_control_items ci
1265: where ci.ci_id = p_ci_id
1266: and cit.ci_type_id = ci.ci_type_id;
1267:
1268: return l_type_class_code;

Line 1288: from pa_control_items ci

1284: BEGIN
1285: IF p_CI_id is not NULL then
1286: select ps.project_system_status_code
1287: into l_ci_system_status
1288: from pa_control_items ci
1289: ,pa_project_statuses ps
1290: where ci_id = p_ci_id
1291: and ps.project_status_code = nvl(ci.status_code,' ');
1292: END IF ;

Line 1438: from pa_control_items

1434: is
1435: cursor c_non_draft_ci is
1436: select
1437: ci_id
1438: from pa_control_items
1439: ,pa_project_statuses
1440: where pa_control_items.project_id = p_project_id
1441: and pa_control_items.status_code = pa_project_statuses.project_status_code
1442: and pa_project_statuses.project_system_status_code <> 'CI_DRAFT';

Line 1440: where pa_control_items.project_id = p_project_id

1436: select
1437: ci_id
1438: from pa_control_items
1439: ,pa_project_statuses
1440: where pa_control_items.project_id = p_project_id
1441: and pa_control_items.status_code = pa_project_statuses.project_status_code
1442: and pa_project_statuses.project_system_status_code <> 'CI_DRAFT';
1443:
1444: publishedCI c_non_draft_ci%rowtype;

Line 1441: and pa_control_items.status_code = pa_project_statuses.project_status_code

1437: ci_id
1438: from pa_control_items
1439: ,pa_project_statuses
1440: where pa_control_items.project_id = p_project_id
1441: and pa_control_items.status_code = pa_project_statuses.project_status_code
1442: and pa_project_statuses.project_system_status_code <> 'CI_DRAFT';
1443:
1444: publishedCI c_non_draft_ci%rowtype;
1445: hasNonDraftCI VARCHAR2(1) := 'Y';

Line 1489: FROM pa_control_items

1485: tmp NUMBER;
1486: BEGIN
1487: SELECT 1
1488: INTO tmp
1489: FROM pa_control_items
1490: WHERE project_id = p_project_id
1491: AND ( ( p_task_id IS NOT NULL
1492: AND object_type='PA_TASKS'
1493: AND object_id=p_task_id)

Line 1532: FROM pa_control_items ci,

1528: tmp NUMBER;
1529: BEGIN
1530: SELECT 1
1531: INTO tmp
1532: FROM pa_control_items ci,
1533: pa_class_codes cc
1534: WHERE cc.class_category = p_class_category
1535: AND cc.class_code = p_class_code
1536: AND ( ci.classification_code_id = cc.class_code_id

Line 1689: if pa_control_items_utils.CheckCIActionAllowed(

1685: -- this logic NOT executed for CREATE or LIST page
1686: if p_ci_id is NOT NULL
1687: AND p_status_control is not null then
1688: l_ci_status := getCIStatus(p_ci_id) ;
1689: if pa_control_items_utils.CheckCIActionAllowed(
1690: 'CONTROL_ITEM',
1691: l_ci_status ,
1692: p_status_control ) <> 'Y' then
1693: return 'N';

Line 1717: from pa_control_items pci, pa_ci_types_b pctb

1713: merged the similar select for change order/request/issue using the bind variable p_item_type*/
1714: if (p_item_type = 'ISSUE' or p_item_type = 'CHANGE_ORDER' or p_item_type = 'CHANGE_REQUEST') then
1715: select count(*)
1716: into tot_num
1717: from pa_control_items pci, pa_ci_types_b pctb
1718: where pci.project_id = p_project_id
1719: and pci.object_type = p_object_type
1720: and pci.object_id = p_object_id
1721: and pci.ci_type_id = pctb.ci_type_id

Line 1732: from pa_control_items pci, pa_ci_types_b pctb

1728:
1729: elsif (p_item_type = 'CHANGE') then
1730: select count(*)
1731: into tot_num
1732: from pa_control_items pci, pa_ci_types_b pctb
1733: where pci.project_id = p_project_id
1734: and pci.object_type = p_object_type
1735: and pci.object_id = p_object_id
1736: and pci.ci_type_id = pctb.ci_type_id

Line 1747: -- from pa_control_items pci, pa_ci_types_b pctb

1743:
1744: -- elsif (p_item_type = 'CHANGE_ORDER') then
1745: -- select count(*)
1746: -- into tot_num
1747: -- from pa_control_items pci, pa_ci_types_b pctb
1748: -- where pci.project_id = p_project_id
1749: -- and pci.object_type = p_object_type
1750: -- and pci.object_id = p_object_id
1751: -- and pci.ci_type_id = pctb.ci_type_id

Line 1762: -- from pa_control_items pci, pa_ci_types_b pctb

1758:
1759: -- elsif (p_item_type = 'CHANGE_REQUEST') then
1760: -- select count(*)
1761: -- into tot_num
1762: -- from pa_control_items pci, pa_ci_types_b pctb
1763: -- where pci.project_id = p_project_id
1764: -- and pci.object_type = p_object_type
1765: -- and pci.object_id = p_object_id
1766: -- and pci.ci_type_id = pctb.ci_type_id

Line 1795: pa_control_items ci

1791: cursor c_wf_type is
1792: SELECT ps.workflow_item_type,
1793: ps.workflow_process
1794: FROM pa_project_statuses ps,
1795: pa_control_items ci
1796: WHERE ci.ci_id = p_ci_id
1797: and ci.status_code = ps.project_status_code
1798: and ps.enable_wf_flag = 'Y'
1799: and ps.wf_success_status_code is NOT NULL

Line 1836: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

1832: EXCEPTION
1833: WHEN OTHERS THEN
1834:
1835: x_return_status := 'U';
1836: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1837: p_procedure_name => 'GetDiagramUrl',
1838: p_error_text => SUBSTRB(SQLERRM,1,240));
1839:
1840: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 1856: pa_control_items ci

1852: cursor c_wf_type is
1853: SELECT ps.workflow_item_type,
1854: ps.workflow_process
1855: FROM pa_project_statuses ps,
1856: pa_control_items ci
1857: WHERE ci.ci_id = p_ci_id
1858: and ci.status_code = ps.project_status_code
1859: and ps.enable_wf_flag = 'Y'
1860: and ps.wf_success_status_code is NOT NULL

Line 1904: pa_control_items_workflow.cancel_workflow

1900: OPEN get_prev_status(p_ci_id);
1901: FETCH get_prev_status INTO l_prev_status, l_curr_status;
1902: CLOSE get_prev_status;
1903:
1904: pa_control_items_workflow.cancel_workflow
1905: (l_wf_item_type,
1906: l_item_key,
1907: x_msg_count,
1908: x_msg_data,

Line 1911: /* call pa_control_items_utils.changecistatus api to revert the status;

1907: x_msg_count,
1908: x_msg_data,
1909: x_return_status);
1910:
1911: /* call pa_control_items_utils.changecistatus api to revert the status;
1912: PA_CONTROL_ITEMS_UTILS.ChangeCIStatus (
1913: p_init_msg_list => FND_API.G_TRUE
1914: ,p_validate_only => FND_API.G_FALSE
1915: ,p_ci_id => p_ci_id

Line 1912: PA_CONTROL_ITEMS_UTILS.ChangeCIStatus (

1908: x_msg_data,
1909: x_return_status);
1910:
1911: /* call pa_control_items_utils.changecistatus api to revert the status;
1912: PA_CONTROL_ITEMS_UTILS.ChangeCIStatus (
1913: p_init_msg_list => FND_API.G_TRUE
1914: ,p_validate_only => FND_API.G_FALSE
1915: ,p_ci_id => p_ci_id
1916: ,p_status => l_prev_status

Line 1924: pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS (

1920: ,x_msg_count => x_msg_count
1921: ,x_msg_data => x_msg_data);
1922: */
1923:
1924: pa_control_items_pvt.UPDATE_CONTROL_ITEM_STATUS (
1925: p_api_version => 1.0
1926: ,p_init_msg_list => FND_API.G_TRUE
1927: ,p_validate_only => FND_API.G_FALSE
1928: ,p_ci_id => p_ci_id

Line 1956: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

1952: EXCEPTION
1953: WHEN OTHERS THEN
1954:
1955: x_return_status := 'U';
1956: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1957: p_procedure_name => 'AbortWorkflow',
1958: p_error_text => SUBSTRB(SQLERRM,1,240));
1959:
1960: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 2059: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

2055: WHEN FND_API.G_EXC_ERROR THEN
2056: x_return_status := 'E';
2057: WHEN OTHERS THEN
2058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2059: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2060: p_procedure_name => 'ADD_STATUS_CHANGE_COMMENT',
2061: p_error_text => SUBSTRB(SQLERRM,1,240));
2062: RAISE;
2063: END ADD_STATUS_CHANGE_COMMENT;

Line 2083: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

2079:
2080: EXCEPTION
2081: WHEN OTHERS THEN
2082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2083: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2084: p_procedure_name => 'DELETE_OBJ_STATUS_CHANGES',
2085: p_error_text => SUBSTRB(SQLERRM,1,240));
2086: RAISE;
2087: END DELETE_OBJ_STATUS_CHANGES;

Line 2110: FROM pa_control_items pci

2106: IS
2107: CURSOR get_ci_info
2108: IS
2109: SELECT pci.status_code, pci.project_id
2110: FROM pa_control_items pci
2111: WHERE ci_id = p_ci_id;
2112:
2113:
2114: CURSOR get_status_name(l_code varchar2)

Line 2123: FROM pa_lookups pl, pa_control_items pci, pa_ci_types_b pcit

2119:
2120: CURSOR get_control_item_type
2121: IS
2122: SELECT pl.meaning,pl.lookup_code
2123: FROM pa_lookups pl, pa_control_items pci, pa_ci_types_b pcit
2124: WHERE
2125: pl.lookup_type = 'PA_CI_TYPE_CLASSES'
2126: and pci.ci_type_id = pcit.ci_type_id
2127: and pl.lookup_code = pcit.ci_type_class_code

Line 2185: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_UTILS.ChangeCIStatus');

2181: x_start_wf := l_start_wf;
2182:
2183: -- Initialize the Error Stack
2184: IF P_PA_DEBUG_MODE = 'Y' THEN
2185: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_UTILS.ChangeCIStatus');
2186: END IF;
2187:
2188: pa_debug.write_file('ChangeCiStatusValidate: p_pa_debug_mode :'||p_pa_debug_mode);
2189:

Line 2577: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

2573:
2574: ROLLBACK;
2575:
2576: x_return_status := 'U';
2577: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2578: p_procedure_name => 'ChangeCIStatus',
2579: p_error_text => SUBSTRB(SQLERRM,1,240));
2580:
2581: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 2625: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_UTILS.ChangeCIStatus');

2621: x_msg_data := '';
2622:
2623: -- Initialize the Error Stack
2624: IF P_PA_DEBUG_MODE = 'Y' THEN
2625: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_UTILS.ChangeCIStatus');
2626: END IF;
2627:
2628: pa_debug.write_file('ChangeCiStatusValidate: p_pa_debug_mode :'||p_pa_debug_mode);
2629:

Line 2641: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.change_included_cr_status');

2637: IF l_next_sys_status = 'CI_CANCELED' THEN
2638: -- set included CR status to APPROVED
2639:
2640: IF P_PA_DEBUG_MODE = 'Y' THEN
2641: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.change_included_cr_status');
2642: END IF;
2643:
2644: pa_control_items_pvt.change_included_cr_status
2645: (p_ci_id,

Line 2644: pa_control_items_pvt.change_included_cr_status

2640: IF P_PA_DEBUG_MODE = 'Y' THEN
2641: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.change_included_cr_status');
2642: END IF;
2643:
2644: pa_control_items_pvt.change_included_cr_status
2645: (p_ci_id,
2646: x_return_status,
2647: x_msg_count,
2648: x_msg_data

Line 2652: pa_debug.write_file('ChangeCiStatus: after call to pa_control_items_pvt.change_included_cr_status');

2648: x_msg_data
2649: );
2650:
2651: IF P_PA_DEBUG_MODE = 'Y' THEN
2652: pa_debug.write_file('ChangeCiStatus: after call to pa_control_items_pvt.change_included_cr_status');
2653: END IF;
2654:
2655: ----- call delete included items api here
2656:

Line 2658: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.delete_all_included_crs');

2654:
2655: ----- call delete included items api here
2656:
2657: IF P_PA_DEBUG_MODE = 'Y' THEN
2658: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.delete_all_included_crs');
2659: END IF;
2660:
2661: pa_control_items_pvt.delete_all_included_crs
2662: (p_validate_only => 'F',

Line 2661: pa_control_items_pvt.delete_all_included_crs

2657: IF P_PA_DEBUG_MODE = 'Y' THEN
2658: pa_debug.write_file('ChangeCiStatus: before call to pa_control_items_pvt.delete_all_included_crs');
2659: END IF;
2660:
2661: pa_control_items_pvt.delete_all_included_crs
2662: (p_validate_only => 'F',
2663: p_init_msg_list => 'F',
2664: p_ci_id => p_ci_id,
2665: x_return_status => x_return_status,

Line 2670: pa_debug.write_file('ChangeCiStatus: after call to pa_control_items_pvt.delete_all_included_crs');

2666: x_msg_count => x_msg_count,
2667: x_msg_data => x_msg_data);
2668:
2669: IF P_PA_DEBUG_MODE = 'Y' THEN
2670: pa_debug.write_file('ChangeCiStatus: after call to pa_control_items_pvt.delete_all_included_crs');
2671: END IF;
2672:
2673: -- cancel open actions
2674: IF (l_curr_sys_status = 'CI_WORKING' and p_validate_only <> fnd_api.g_true AND x_return_status = 'S') then

Line 2743: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',

2739:
2740: ROLLBACK;
2741:
2742: x_return_status := 'U';
2743: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2744: p_procedure_name => 'ChangeCIStatus',
2745: p_error_text => SUBSTRB(SQLERRM,1,240));
2746:
2747: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 2753: END PA_CONTROL_ITEMS_UTILS;

2749:
2750: END PostChangeCIStatus;
2751:
2752:
2753: END PA_CONTROL_ITEMS_UTILS;