45: SAVEPOINT create_ci_impact;
46: END IF;
47:
48: IF p_init_msg_list = 'T' THEN
49: fnd_msg_pub.initialize;
50: END IF;
51:
52: x_return_status := 'S';
53: x_msg_count := 0;
95: x_msg_count => x_msg_count,
96: x_msg_data => x_msg_data
97: );
98: END IF;
99: x_msg_count := FND_MSG_PUB.Count_Msg;
100: IF x_msg_count = 1 THEN
101: pa_interface_utils_pub.get_messages ( p_encoded => 'T'
102: ,p_msg_index => 1
103: ,p_data => x_msg_data
114: ROLLBACK TO create_ci_impact;
115: END IF;
116:
117: x_return_status := 'U';
118: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PUB',
119: p_procedure_name => 'CREATE_CI_IMPACT',
120: p_error_text => SUBSTRB(SQLERRM,1,240));
121:
122: fnd_msg_pub.count_and_get(p_count => x_msg_count,
118: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PUB',
119: p_procedure_name => 'CREATE_CI_IMPACT',
120: p_error_text => SUBSTRB(SQLERRM,1,240));
121:
122: fnd_msg_pub.count_and_get(p_count => x_msg_count,
123: p_data => x_msg_data);
124: END create_ci_impact;
125:
126: PROCEDURE delete_ci_impact (
146: SAVEPOINT delete_ci_impact;
147: END IF;
148:
149: IF p_init_msg_list = 'T' THEN
150: fnd_msg_pub.initialize;
151: END IF;
152:
153: x_return_status := 'S';
154: x_msg_count := 0;
171:
172: );
173: END IF;
174:
175: x_msg_count := FND_MSG_PUB.Count_Msg;
176: IF x_msg_count = 1 THEN
177: pa_interface_utils_pub.get_messages ( p_encoded => 'T'
178: ,p_msg_index => 1
179: ,p_data => x_msg_data
192: ROLLBACK TO delete_ci_impact;
193: END IF;
194:
195: x_return_status := 'U';
196: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT',
197: p_procedure_name => 'DELETE_CI_IMPACT',
198: p_error_text => SUBSTRB(SQLERRM,1,240));
199:
200: fnd_msg_pub.count_and_get(p_count => x_msg_count,
196: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT',
197: p_procedure_name => 'DELETE_CI_IMPACT',
198: p_error_text => SUBSTRB(SQLERRM,1,240));
199:
200: fnd_msg_pub.count_and_get(p_count => x_msg_count,
201: p_data => x_msg_data);
202: END delete_ci_impact;
203:
204: PROCEDURE update_ci_impact (
256: SAVEPOINT update_ci_impact;
257: END IF;
258:
259: IF p_init_msg_list = 'T' THEN
260: fnd_msg_pub.initialize;
261: END IF;
262:
263: x_return_status := 'S';
264: x_msg_count := 0;
339:
340:
341: END IF;
342:
343: x_msg_count := FND_MSG_PUB.Count_Msg;
344: IF x_msg_count = 1 THEN
345: pa_interface_utils_pub.get_messages ( p_encoded => 'T'
346: ,p_msg_index => 1
347: ,p_data => x_msg_data
369: ROLLBACK TO update_ci_impact;
370: END IF;
371:
372: x_return_status := 'U';
373: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PUB',
374: p_procedure_name => 'UPDATE_CI_IMPACT',
375: p_error_text => SUBSTRB(SQLERRM,1,240));
376:
377: fnd_msg_pub.count_and_get(p_count => x_msg_count,
373: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PUB',
374: p_procedure_name => 'UPDATE_CI_IMPACT',
375: p_error_text => SUBSTRB(SQLERRM,1,240));
376:
377: fnd_msg_pub.count_and_get(p_count => x_msg_count,
378: p_data => x_msg_data);
379: END update_ci_impact;
380:
381: END PA_CI_IMPACTS_pub;