103:
104:
105: IF l_task_id IS NULL
106: THEN
107: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_TASK');
108: fnd_msg_pub.add;
109: x_return_status := fnd_api.g_ret_sts_unexp_error;
110: RAISE fnd_api.g_exc_unexpected_error;
111: END IF;
150:
151:
152: IF l_object_type_code IS NULL
153: THEN
154: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_OBJECT_CODE');
155: fnd_msg_pub.add;
156: x_return_status := fnd_api.g_ret_sts_unexp_error;
157: RAISE fnd_api.g_exc_unexpected_error;
158: END IF;
168:
169:
170: IF c_references%NOTFOUND
171: THEN
172: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
173: fnd_message.set_token('P_OBJECT_CODE',p_object_type_code);
174: fnd_msg_pub.add;
175: RAISE fnd_api.g_exc_unexpected_error;
176: END IF;
169:
170: IF c_references%NOTFOUND
171: THEN
172: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
173: fnd_message.set_token('P_OBJECT_CODE',p_object_type_code);
174: fnd_msg_pub.add;
175: RAISE fnd_api.g_exc_unexpected_error;
176: END IF;
177:
185: Made Object Name as a mandatory parameter.
186:
187: IF p_object_name IS NULL
188: THEN
189: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_OBJECT_NAME');
190: fnd_msg_pub.add;
191: RAISE fnd_api.g_exc_unexpected_error;
192: END IF;
193:
215: IF p_object_id IS NOT NULL
216: THEN
217: IF l_object_id <> p_object_id
218: THEN
219: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_ID');
220: fnd_message.set_token('P_OBJECT_ID', p_object_id );
221: fnd_msg_pub.add;
222: RAISE fnd_api.g_exc_unexpected_error;
223: END IF;
216: THEN
217: IF l_object_id <> p_object_id
218: THEN
219: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_ID');
220: fnd_message.set_token('P_OBJECT_ID', p_object_id );
221: fnd_msg_pub.add;
222: RAISE fnd_api.g_exc_unexpected_error;
223: END IF;
224: END IF;
232: FETCH c_reference_codes INTO x;
233:
234: IF c_reference_codes%NOTFOUND
235: THEN
236: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_REFER_CODE');
237: fnd_msg_pub.add;
238: RAISE fnd_api.g_exc_unexpected_error;
239: END IF;
240: END IF;
311:
312: if c_references%isopen then
313: close c_references ;
314: end if;
315: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
316: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code );
317: fnd_message.set_token('P_OBJECT_NAME', p_object_name );
318: fnd_msg_pub.add;
319: x_return_status := fnd_api.g_ret_sts_unexp_error;
312: if c_references%isopen then
313: close c_references ;
314: end if;
315: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
316: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code );
317: fnd_message.set_token('P_OBJECT_NAME', p_object_name );
318: fnd_msg_pub.add;
319: x_return_status := fnd_api.g_ret_sts_unexp_error;
320:
313: close c_references ;
314: end if;
315: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
316: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code );
317: fnd_message.set_token('P_OBJECT_NAME', p_object_name );
318: fnd_msg_pub.add;
319: x_return_status := fnd_api.g_ret_sts_unexp_error;
320:
321: WHEN OTHERS
322: THEN
323: if c_references%isopen then
324: close c_references ;
325: end if;
326: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
327: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
328: x_return_status := fnd_api.g_ret_sts_unexp_error;
329: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
330: END;
323: if c_references%isopen then
324: close c_references ;
325: end if;
326: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
327: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
328: x_return_status := fnd_api.g_ret_sts_unexp_error;
329: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
330: END;
331: -------------------------------------------------
375: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
376: EXCEPTION
377: WHEN Resource_Locked then
378: ROLLBACK TO lock_references_pub;
379: fnd_message.set_name ('JTF', 'JTF_TASK_RESOURCE_LOCKED');
380: fnd_message.set_token ('P_LOCKED_RESOURCE', 'References');
381: fnd_msg_pub.add;
382: x_return_status := fnd_api.g_ret_sts_unexp_error;
383: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
376: EXCEPTION
377: WHEN Resource_Locked then
378: ROLLBACK TO lock_references_pub;
379: fnd_message.set_name ('JTF', 'JTF_TASK_RESOURCE_LOCKED');
380: fnd_message.set_token ('P_LOCKED_RESOURCE', 'References');
381: fnd_msg_pub.add;
382: x_return_status := fnd_api.g_ret_sts_unexp_error;
383: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
384: WHEN fnd_api.g_exc_unexpected_error
388: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
389: WHEN OTHERS
390: THEN
391: ROLLBACK TO lock_references_pub;
392: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
393: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
394: fnd_msg_pub.add;
395: x_return_status := fnd_api.g_ret_sts_unexp_error;
396: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
389: WHEN OTHERS
390: THEN
391: ROLLBACK TO lock_references_pub;
392: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
393: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
394: fnd_msg_pub.add;
395: x_return_status := fnd_api.g_ret_sts_unexp_error;
396: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
397: END;
437:
438: IF c_references%NOTFOUND
439: THEN
440:
441: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
442: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code);
443: fnd_msg_pub.add;
444: RAISE fnd_api.g_exc_unexpected_error;
445: END IF;
438: IF c_references%NOTFOUND
439: THEN
440:
441: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
442: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code);
443: fnd_msg_pub.add;
444: RAISE fnd_api.g_exc_unexpected_error;
445: END IF;
446:
466: IF p_object_id IS NOT NULL
467: THEN
468: IF p_object_id <> l_object_id
469: THEN
470: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
471: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code );
472: fnd_message.set_token('P_OBJECT_NAME', p_object_name );
473: fnd_msg_pub.add;
474: x_return_status := fnd_api.g_ret_sts_unexp_error;
467: THEN
468: IF p_object_id <> l_object_id
469: THEN
470: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
471: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code );
472: fnd_message.set_token('P_OBJECT_NAME', p_object_name );
473: fnd_msg_pub.add;
474: x_return_status := fnd_api.g_ret_sts_unexp_error;
475: RAISE fnd_api.g_exc_unexpected_error;
468: IF p_object_id <> l_object_id
469: THEN
470: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
471: fnd_message.set_token('P_OBJECT_TYPE_CODE',p_object_type_code );
472: fnd_message.set_token('P_OBJECT_NAME', p_object_name );
473: fnd_msg_pub.add;
474: x_return_status := fnd_api.g_ret_sts_unexp_error;
475: RAISE fnd_api.g_exc_unexpected_error;
476: END IF;
485:
486: WHEN OTHERS
487: THEN
488:
489: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
490: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
491: x_return_status := fnd_api.g_ret_sts_unexp_error;
492: END;
493: */
486: WHEN OTHERS
487: THEN
488:
489: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
490: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
491: x_return_status := fnd_api.g_ret_sts_unexp_error;
492: END;
493: */
494:
584: END IF;
585:
586: IF l_task_reference_id IS NULL
587: THEN
588: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_REFER');
589: fnd_msg_pub.add;
590: x_return_status := fnd_api.g_ret_sts_unexp_error;
591: RAISE fnd_api.g_exc_unexpected_error;
592: END IF;
595: FETCH c_task_reference INTO task_references;
596:
597: IF c_task_reference%NOTFOUND
598: THEN
599: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_REFER');
600: fnd_message.set_token('P_TASK_REFERENCE_ID',p_task_reference_id);
601: fnd_msg_pub.add;
602: x_return_status := fnd_api.g_ret_sts_unexp_error;
603: RAISE fnd_api.g_exc_unexpected_error;
596:
597: IF c_task_reference%NOTFOUND
598: THEN
599: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_REFER');
600: fnd_message.set_token('P_TASK_REFERENCE_ID',p_task_reference_id);
601: fnd_msg_pub.add;
602: x_return_status := fnd_api.g_ret_sts_unexp_error;
603: RAISE fnd_api.g_exc_unexpected_error;
604: END IF;
642: );
643:
644: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
645: THEN
646: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_REFER_DETAILS');
647: fnd_msg_pub.add;
648: x_return_status := fnd_api.g_ret_sts_unexp_error;
649: RAISE fnd_api.g_exc_unexpected_error;
650: END IF;
756:
757: WHEN OTHERS
758: THEN
759: ROLLBACK TO update_task_reference_pub;
760: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
761: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
762: fnd_msg_pub.add;
763: x_return_status := fnd_api.g_ret_sts_unexp_error;
764: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
757: WHEN OTHERS
758: THEN
759: ROLLBACK TO update_task_reference_pub;
760: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
761: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
762: fnd_msg_pub.add;
763: x_return_status := fnd_api.g_ret_sts_unexp_error;
764: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
765: if c_task_reference%isopen then
849: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
850: WHEN OTHERS
851: THEN
852: ROLLBACK TO delete_task_reference_pub;
853: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
854: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
855: fnd_msg_pub.add;
856: x_return_status := fnd_api.g_ret_sts_unexp_error;
857: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
850: WHEN OTHERS
851: THEN
852: ROLLBACK TO delete_task_reference_pub;
853: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
854: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
855: fnd_msg_pub.add;
856: x_return_status := fnd_api.g_ret_sts_unexp_error;
857: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
858: END;