937:
938: BEGIN
939:
940: IF p_init_msg_list = FND_API.G_TRUE THEN
941: fnd_msg_pub.initialize;
942: END IF;
943:
944: x_msg_count := 0;
945: x_msg_data := '';
1093: COMMIT;
1094:
1095: END IF;
1096:
1097: x_msg_count := FND_MSG_PUB.Count_Msg;
1098:
1099: IF x_msg_count = 1 THEN
1100: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE
1101: ,p_msg_index => 1
1115:
1116: ROLLBACK;
1117:
1118: x_return_status := 'U';
1119: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1120: p_procedure_name => 'ChangeCIStatus',
1121: p_error_text => SUBSTRB(SQLERRM,1,240));
1122:
1123: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1119: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1120: p_procedure_name => 'ChangeCIStatus',
1121: p_error_text => SUBSTRB(SQLERRM,1,240));
1122:
1123: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1124: p_data => x_msg_data);
1125:
1126: END;
1127:
1928: EXCEPTION
1929: WHEN OTHERS THEN
1930:
1931: x_return_status := 'U';
1932: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1933: p_procedure_name => 'GetDiagramUrl',
1934: p_error_text => SUBSTRB(SQLERRM,1,240));
1935:
1936: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1932: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
1933: p_procedure_name => 'GetDiagramUrl',
1934: p_error_text => SUBSTRB(SQLERRM,1,240));
1935:
1936: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1937: p_data => x_msg_data);
1938: END GetDiagramUrl;
1939:
1940:
2048: EXCEPTION
2049: WHEN OTHERS THEN
2050:
2051: x_return_status := 'U';
2052: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2053: p_procedure_name => 'AbortWorkflow',
2054: p_error_text => SUBSTRB(SQLERRM,1,240));
2055:
2056: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2052: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2053: p_procedure_name => 'AbortWorkflow',
2054: p_error_text => SUBSTRB(SQLERRM,1,240));
2055:
2056: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2057: p_data => x_msg_data);
2058: END AbortWorkflow;
2059:
2060:
2151: WHEN FND_API.G_EXC_ERROR THEN
2152: x_return_status := 'E';
2153: WHEN OTHERS THEN
2154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2155: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2156: p_procedure_name => 'ADD_STATUS_CHANGE_COMMENT',
2157: p_error_text => SUBSTRB(SQLERRM,1,240));
2158: RAISE;
2159: END ADD_STATUS_CHANGE_COMMENT;
2175:
2176: EXCEPTION
2177: WHEN OTHERS THEN
2178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2179: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2180: p_procedure_name => 'DELETE_OBJ_STATUS_CHANGES',
2181: p_error_text => SUBSTRB(SQLERRM,1,240));
2182: RAISE;
2183: END DELETE_OBJ_STATUS_CHANGES;
2269:
2270: BEGIN
2271:
2272: IF p_init_msg_list = FND_API.G_TRUE THEN
2273: fnd_msg_pub.initialize;
2274: END IF;
2275:
2276: x_msg_count := 0;
2277: x_msg_data := '';
2684:
2685: ROLLBACK;
2686:
2687: x_return_status := 'U';
2688: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2689: p_procedure_name => 'ChangeCIStatus',
2690: p_error_text => SUBSTRB(SQLERRM,1,240));
2691:
2692: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2688: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2689: p_procedure_name => 'ChangeCIStatus',
2690: p_error_text => SUBSTRB(SQLERRM,1,240));
2691:
2692: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2693: p_data => x_msg_data);
2694:
2695: END ChangeCIStatusValidate;
2696:
2724: l_next_sys_status := getSystemStatus(p_new_status);
2725:
2726:
2727: IF p_init_msg_list = FND_API.G_TRUE THEN
2728: fnd_msg_pub.initialize;
2729: END IF;
2730:
2731: x_msg_count := 0;
2732: x_msg_data := '';
2850:
2851: ROLLBACK;
2852:
2853: x_return_status := 'U';
2854: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2855: p_procedure_name => 'ChangeCIStatus',
2856: p_error_text => SUBSTRB(SQLERRM,1,240));
2857:
2858: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2854: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2855: p_procedure_name => 'ChangeCIStatus',
2856: p_error_text => SUBSTRB(SQLERRM,1,240));
2857:
2858: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2859: p_data => x_msg_data);
2860:
2861: END PostChangeCIStatus;
2862:
2877: l_msg_index_out NUMBER;
2878:
2879: BEGIN
2880: IF p_init_msg_list = FND_API.G_TRUE THEN
2881: fnd_msg_pub.initialize;
2882: END IF;
2883:
2884: x_msg_count := 0;
2885: x_msg_data := '';
2927: COMMIT;
2928:
2929: END IF;
2930:
2931: x_msg_count := FND_MSG_PUB.Count_Msg;
2932:
2933: IF x_msg_count = 1 THEN
2934: pa_interface_utils_pub.get_messages ( p_encoded => FND_API.G_TRUE
2935: ,p_msg_index => 1
2949:
2950: ROLLBACK;
2951:
2952: x_return_status := 'U';
2953: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2954: p_procedure_name => 'ChangeCIStatusWorking',
2955: p_error_text => SUBSTRB(SQLERRM,1,240));
2956:
2957: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2953: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_ITEMS_UTILS',
2954: p_procedure_name => 'ChangeCIStatusWorking',
2955: p_error_text => SUBSTRB(SQLERRM,1,240));
2956:
2957: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2958: p_data => x_msg_data);
2959:
2960: END ChangeCIStatusWorking;
2961: