44: SAVEPOINT create_ci_impact;
45: END IF;
46:
47: IF p_init_msg_list = 'T' THEN
48: fnd_msg_pub.initialize;
49: END IF;
50:
51: x_return_status := 'S';
52: x_msg_count := 0;
90: ROLLBACK TO create_ci_impact;
91: END IF;
92: END IF;
93:
94: fnd_msg_pub.count_and_get(p_count => x_msg_count,
95: p_data => x_msg_data);
96:
97: pa_debug.reset_err_stack;
98:
102: ROLLBACK TO create_ci_impact;
103: END IF;
104:
105: x_return_status := 'U';
106: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PVT',
107: p_procedure_name => 'CREATE_CI_IMPACT',
108: p_error_text => SUBSTRB(SQLERRM,1,240));
109:
110: fnd_msg_pub.count_and_get(p_count => x_msg_count,
106: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PVT',
107: p_procedure_name => 'CREATE_CI_IMPACT',
108: p_error_text => SUBSTRB(SQLERRM,1,240));
109:
110: fnd_msg_pub.count_and_get(p_count => x_msg_count,
111: p_data => x_msg_data);
112: END create_ci_impact;
113:
114: PROCEDURE delete_ci_impact (
133: SAVEPOINT delete_ci_impact;
134: END IF;
135:
136: IF p_init_msg_list = 'T' THEN
137: fnd_msg_pub.initialize;
138: END IF;
139:
140: x_return_status := 'S';
141: x_msg_count := 0;
174: ROLLBACK TO delete_ci_impact;
175: END IF;
176: END IF;
177:
178: fnd_msg_pub.count_and_get(p_count => x_msg_count,
179: p_data => x_msg_data);
180:
181: pa_debug.reset_err_stack;
182:
186: ROLLBACK TO delete_ci_impact;
187: END IF;
188:
189: x_return_status := 'U';
190: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT',
191: p_procedure_name => 'DELETE_CI_IMPACT',
192: p_error_text => SUBSTRB(SQLERRM,1,240));
193:
194: fnd_msg_pub.count_and_get(p_count => x_msg_count,
190: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACT',
191: p_procedure_name => 'DELETE_CI_IMPACT',
192: p_error_text => SUBSTRB(SQLERRM,1,240));
193:
194: fnd_msg_pub.count_and_get(p_count => x_msg_count,
195: p_data => x_msg_data);
196: END delete_ci_impact;
197:
198:
262: SAVEPOINT update_ci_impact;
263: END IF;
264:
265: IF p_init_msg_list = 'T' THEN
266: fnd_msg_pub.initialize;
267: END IF;
268:
269: x_return_status := 'S';
270: x_msg_count := 0;
364: ROLLBACK TO update_ci_impact;
365: END IF;
366: END IF;
367:
368: fnd_msg_pub.count_and_get(p_count => x_msg_count,
369: p_data => x_msg_data);
370:
371: pa_debug.reset_err_stack;
372:
385: ROLLBACK TO update_ci_impact;
386: END IF;
387:
388: x_return_status := 'U';
389: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PVT',
390: p_procedure_name => 'UPDATE_CI_IMPACT',
391: p_error_text => SUBSTRB(SQLERRM,1,240));
392:
393: fnd_msg_pub.count_and_get(p_count => x_msg_count,
389: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CI_IMPACTS_PVT',
390: p_procedure_name => 'UPDATE_CI_IMPACT',
391: p_error_text => SUBSTRB(SQLERRM,1,240));
392:
393: fnd_msg_pub.count_and_get(p_count => x_msg_count,
394: p_data => x_msg_data);
395: END update_ci_impact;
396:
397: END PA_CI_IMPACTS_pvt;