[Home] [Help]
84: v_cursorid INTEGER;
85: v_blockstr VARCHAR2(2000);
86: v_dummy INTEGER;
87: BEGIN
88: x_return_status := fnd_api.g_ret_sts_success;
89:
90: FOR i IN c1
91: LOOP
92: v_cursorid := DBMS_SQL.open_cursor;
109: i.hook_package || '.' || i.hook_api
110: );
111: /*-------------------------*/
112: fnd_msg_pub.add;
113: x_return_status := fnd_api.g_ret_sts_unexp_error;
114: RAISE fnd_api.g_exc_unexpected_error;
115: END IF;
116:
117: -- return an error to indicate that the hook failed, to fix bug #2231728
110: );
111: /*-------------------------*/
112: fnd_msg_pub.add;
113: x_return_status := fnd_api.g_ret_sts_unexp_error;
114: RAISE fnd_api.g_exc_unexpected_error;
115: END IF;
116:
117: -- return an error to indicate that the hook failed, to fix bug #2231728
118: -- record the package name in the error stack
115: END IF;
116:
117: -- return an error to indicate that the hook failed, to fix bug #2231728
118: -- record the package name in the error stack
119: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
120: THEN
121: fnd_message.set_name ('JTF', 'JTF_TASK_HOOK_RETURN_ERROR');
122: fnd_message.set_token (
123: 'P_PROCEDURE',
129: 'APPL_ID',
130: i.application_id
131: );
132: fnd_msg_pub.add;
133: x_return_status := fnd_api.g_ret_sts_unexp_error;
134: RAISE fnd_api.g_exc_unexpected_error;
135: END IF;
136:
137: END LOOP;
130: i.application_id
131: );
132: fnd_msg_pub.add;
133: x_return_status := fnd_api.g_ret_sts_unexp_error;
134: RAISE fnd_api.g_exc_unexpected_error;
135: END IF;
136:
137: END LOOP;
138: EXCEPTION
135: END IF;
136:
137: END LOOP;
138: EXCEPTION
139: WHEN fnd_api.g_exc_unexpected_error
140: THEN
141: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: WHEN OTHERS
143: THEN
137: END LOOP;
138: EXCEPTION
139: WHEN fnd_api.g_exc_unexpected_error
140: THEN
141: x_return_status := fnd_api.g_ret_sts_unexp_error;
142: WHEN OTHERS
143: THEN
144: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
145: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
143: THEN
144: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
145: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
146: fnd_msg_pub.add;
147: x_return_status := fnd_api.g_ret_sts_unexp_error;
148: END;
149:
150: PROCEDURE validate_location_id (
151: p_location_id IN NUMBER,
156: IS
157: Cursor C_Task Is
158: Select DECODE (
159: p_address_id,
160: fnd_api.g_miss_num,
161: address_id,
162: p_address_id
163: ) address_id,
164: DECODE (
162: p_address_id
163: ) address_id,
164: DECODE (
165: p_location_id,
166: fnd_api.g_miss_num,
167: location_id,
168: p_location_id
169: ) location_id
170: From JTF_TASKS_VL
170: From JTF_TASKS_VL
171: Where Task_Id=p_task_id;
172: V_task C_Task%Rowtype;
173: BEGIN
174: x_return_status := fnd_api.g_ret_sts_success;
175: IF (p_location_id IS NOT NULL And p_address_id IS NOT NULL)
176: THEN
177: IF (p_task_id IS NOT NULL)
178: THEN
175: IF (p_location_id IS NOT NULL And p_address_id IS NOT NULL)
176: THEN
177: IF (p_task_id IS NOT NULL)
178: THEN
179: IF ((p_location_id <> fnd_api.g_miss_num AND p_address_id <> fnd_api.g_miss_num))
180: THEN
181: fnd_message.set_name ('JTF', 'JTF_TASK_LOCATION_VALIDATION');
182: fnd_msg_pub.add;
183: x_return_status := fnd_api.g_ret_sts_unexp_error;
179: IF ((p_location_id <> fnd_api.g_miss_num AND p_address_id <> fnd_api.g_miss_num))
180: THEN
181: fnd_message.set_name ('JTF', 'JTF_TASK_LOCATION_VALIDATION');
182: fnd_msg_pub.add;
183: x_return_status := fnd_api.g_ret_sts_unexp_error;
184:
185: ELSIF (p_address_id <> fnd_api.g_miss_num)
186: THEN
187: Open C_Task;
181: fnd_message.set_name ('JTF', 'JTF_TASK_LOCATION_VALIDATION');
182: fnd_msg_pub.add;
183: x_return_status := fnd_api.g_ret_sts_unexp_error;
184:
185: ELSIF (p_address_id <> fnd_api.g_miss_num)
186: THEN
187: Open C_Task;
188: Fetch C_Task into V_task;
189: Close C_Task;
190: IF (V_Task.Location_Id IS NOT NULL AND V_Task.Address_Id IS NOT NULL)
191: THEN
192: fnd_message.set_name ('JTF', 'JTF_TASK_LOCATION_EXIST');
193: fnd_msg_pub.add;
194: x_return_status := fnd_api.g_ret_sts_unexp_error;
195: END IF;
196:
197: ELSIF (p_location_id <> fnd_api.g_miss_num)
198: THEN
193: fnd_msg_pub.add;
194: x_return_status := fnd_api.g_ret_sts_unexp_error;
195: END IF;
196:
197: ELSIF (p_location_id <> fnd_api.g_miss_num)
198: THEN
199: Open C_Task;
200: Fetch C_Task into V_task;
201: Close C_Task;
202: IF (V_Task.Location_Id IS NOT NULL AND V_Task.Address_Id IS NOT NULL)
203: THEN
204: fnd_message.set_name ('JTF', 'JTF_TASK_ADDRESS_EXIST');
205: fnd_msg_pub.add;
206: x_return_status := fnd_api.g_ret_sts_unexp_error;
207: END IF;
208: END IF;
209: ELSE
210: fnd_message.set_name ('JTF', 'JTF_TASK_LOCATION_VALIDATION');
208: END IF;
209: ELSE
210: fnd_message.set_name ('JTF', 'JTF_TASK_LOCATION_VALIDATION');
211: fnd_msg_pub.add;
212: x_return_status := fnd_api.g_ret_sts_unexp_error;
213: END IF;
214: END IF;
215: END validate_location_id;
216:
246: )
247: IS
248: BEGIN
249: -- to fix bug#2401431
250: x_return_status := fnd_api.g_ret_sts_success;
251: IF p_distance_units IS NOT NULL
252: THEN
253: IF p_distance_units < 0
254: THEN
254: THEN
255: fnd_message.set_name ('JTF', 'JTF_TASK_DISTANCE_UNITS');
256: fnd_message.set_token ('P_DISTANCE_TAG', p_distance_tag);
257: fnd_msg_pub.add;
258: x_return_status := fnd_api.g_ret_sts_unexp_error;
259: END IF;
260: END IF;
261: END;
262:
316: and tc.contact_id IN (pc.party_id, pc.subject_party_id);
317:
318: BEGIN
319:
320: x_return_status := fnd_api.g_ret_sts_success;
321:
322: --- for backward compatibility, the owner table name is defaulted to p_owner_table_name
323: IF p_owner_table_name = 'JTF_TASK_CONTACTS'
324: OR p_owner_table_name IS NULL
388:
389: EXCEPTION
390: WHEN NO_DATA_FOUND
391: THEN
392: x_return_status := fnd_api.g_ret_sts_unexp_error;
393: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_PHONE_ID');
394: fnd_message.set_token ('P_PHONE_ID', p_phone_id);
395: fnd_msg_pub.add;
396: WHEN OTHERS
394: fnd_message.set_token ('P_PHONE_ID', p_phone_id);
395: fnd_msg_pub.add;
396: WHEN OTHERS
397: THEN
398: x_return_status := fnd_api.g_ret_sts_unexp_error;
399: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
400: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
401: fnd_msg_pub.add;
402: END;
479: l_customer_id NUMBER;
480: x_return BOOLEAN := TRUE;
481: x CHAR;
482: BEGIN
483: x_return_status := fnd_api.g_ret_sts_success;
484:
485: BEGIN
486: IF p_contact_type_code = 'CUST'
487: THEN
509: WHEN NO_DATA_FOUND
510: THEN
511: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CONTACT');
512: fnd_msg_pub.add;
513: x_return_status := fnd_api.g_ret_sts_unexp_error;
514: RAISE fnd_api.g_exc_unexpected_error;
515: WHEN TOO_MANY_ROWS
516: THEN
517: NULL;
510: THEN
511: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CONTACT');
512: fnd_msg_pub.add;
513: x_return_status := fnd_api.g_ret_sts_unexp_error;
514: RAISE fnd_api.g_exc_unexpected_error;
515: WHEN TOO_MANY_ROWS
516: THEN
517: NULL;
518: END;
535: l_dup_contact VARCHAR2(10);
536:
537: Begin
538:
539: x_return_status := fnd_api.g_ret_sts_success;
540:
541: Open c_dup_contact;
542: Fetch c_dup_contact Into l_dup_contact;
543: If c_dup_contact%FOUND
543: If c_dup_contact%FOUND
544: Then
545: fnd_message.set_name ('JTF', 'JTF_TASK_DUPLICATE_CONTACT');
546: fnd_msg_pub.add;
547: x_return_status := fnd_api.g_ret_sts_unexp_error;
548: End If;
549:
550: Close c_dup_contact;
551:
576: WHERE template_group_name = p_task_template_group_name
577: AND trunc(NVL (end_date_active, SYSDATE)) >= trunc(SYSDATE)
578: AND trunc(NVL (start_date_active, SYSDATE)) <= trunc(SYSDATE);
579: BEGIN
580: x_return_status := fnd_api.g_ret_sts_success;
581:
582: IF p_task_template_group_id IS NOT NULL
583: THEN
584: OPEN c_task_template_group_id;
591: 'JTF_TASK_INVALID_TEMP_GROUP_ID',
592: p_task_template_group_id
593: );
594: fnd_msg_pub.add;
595: x_return_status := fnd_api.g_ret_sts_unexp_error;
596: RAISE fnd_api.g_exc_unexpected_error;
597: END IF;
598:
599: CLOSE c_task_template_group_id;
592: p_task_template_group_id
593: );
594: fnd_msg_pub.add;
595: x_return_status := fnd_api.g_ret_sts_unexp_error;
596: RAISE fnd_api.g_exc_unexpected_error;
597: END IF;
598:
599: CLOSE c_task_template_group_id;
600: ELSIF p_task_template_group_name IS NOT NULL
608: fnd_message.set_token (
609: 'JTF_TASK_INVALID_TEMP_GROUP_NAME',
610: p_task_template_group_name
611: );
612: x_return_status := fnd_api.g_ret_sts_unexp_error;
613: RAISE fnd_api.g_exc_unexpected_error;
614: END IF;
615:
616: CLOSE c_task_template_group_name;
609: 'JTF_TASK_INVALID_TEMP_GROUP_NAME',
610: p_task_template_group_name
611: );
612: x_return_status := fnd_api.g_ret_sts_unexp_error;
613: RAISE fnd_api.g_exc_unexpected_error;
614: END IF;
615:
616: CLOSE c_task_template_group_name;
617: END IF;
626: p_currency_code IN VARCHAR2
627: )
628: IS
629: BEGIN
630: x_return_status := fnd_api.g_ret_sts_success;
631:
632: IF ( p_costs IS NULL
633: AND p_currency_code IS NOT NULL)
634: THEN
631:
632: IF ( p_costs IS NULL
633: AND p_currency_code IS NOT NULL)
634: THEN
635: x_return_status := fnd_api.g_ret_sts_unexp_error;
636: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_COST');
637: fnd_message.set_token ('P_currency_code', p_currency_code);
638: fnd_msg_pub.add;
639: ELSIF ( p_costs IS NOT NULL
638: fnd_msg_pub.add;
639: ELSIF ( p_costs IS NOT NULL
640: AND p_currency_code IS NULL)
641: THEN
642: x_return_status := fnd_api.g_ret_sts_unexp_error;
643: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_CURRENCY_CODE');
644: fnd_message.set_token ('P_cOSTs', p_costs);
645: fnd_msg_pub.add;
646: ELSIF ( p_costs IS NOT NULL
645: fnd_msg_pub.add;
646: ELSIF ( p_costs IS NOT NULL
647: AND p_currency_code IS NOT NULL)
648: THEN
649: IF NOT fnd_api.to_boolean (
650: jtf_task_utl.currency_code (p_currency_code)
651: )
652: THEN
653: x_return_status := fnd_api.g_ret_sts_unexp_error;
649: IF NOT fnd_api.to_boolean (
650: jtf_task_utl.currency_code (p_currency_code)
651: )
652: THEN
653: x_return_status := fnd_api.g_ret_sts_unexp_error;
654: END IF;
655: ELSE
656: NULL;
657: END IF;
676: FETCH c_jtf_currencies INTO x;
677:
678: IF c_jtf_currencies%NOTFOUND
679: THEN
680: l_result := fnd_api.g_false;
681: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CURRENCY_CODE');
682: fnd_message.set_token ('P_CURRENCY_CODE', p_currency_code);
683: fnd_msg_pub.add;
684: ELSE
681: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CURRENCY_CODE');
682: fnd_message.set_token ('P_CURRENCY_CODE', p_currency_code);
683: fnd_msg_pub.add;
684: ELSE
685: l_result := fnd_api.g_true;
686: END IF;
687:
688: CLOSE c_jtf_currencies;
689: RETURN l_result;
728: WHERE object_user_code =
729: NVL (p_object_usage, object_user_code)));
730:
731: BEGIN
732: x_return_status := fnd_api.g_ret_sts_success;
733:
734: IF p_object_code IS NOT NULL
735: THEN
736: OPEN c_object_code;
740: THEN
741: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
742: fnd_message.set_token ('P_OBJECT_CODE', p_object_type_tag);
743: fnd_msg_pub.add;
744: x_return_status := fnd_api.g_ret_sts_unexp_error;
745: RAISE fnd_api.g_exc_unexpected_error;
746: END IF;
747:
748: CLOSE c_object_code;
741: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
742: fnd_message.set_token ('P_OBJECT_CODE', p_object_type_tag);
743: fnd_msg_pub.add;
744: x_return_status := fnd_api.g_ret_sts_unexp_error;
745: RAISE fnd_api.g_exc_unexpected_error;
746: END IF;
747:
748: CLOSE c_object_code;
749: ELSIF p_object_type_name IS NOT NULL
755: THEN
756: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
757: fnd_message.set_token ('P_TAG_NAME', p_object_type_tag);
758: fnd_msg_pub.add;
759: x_return_status := fnd_api.g_ret_sts_unexp_error;
760: RAISE fnd_api.g_exc_unexpected_error;
761: END IF;
762:
763: CLOSE c_object_type_name;
756: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_NAME');
757: fnd_message.set_token ('P_TAG_NAME', p_object_type_tag);
758: fnd_msg_pub.add;
759: x_return_status := fnd_api.g_ret_sts_unexp_error;
760: RAISE fnd_api.g_exc_unexpected_error;
761: END IF;
762:
763: CLOSE c_object_type_name;
764: END IF;
780: AND lookup_code = p_reference_code;
781:
782: x CHAR;
783: BEGIN
784: x_return_status := fnd_api.g_ret_sts_success;
785:
786: IF p_reference_code IS NOT NULL
787: THEN
788: OPEN c_reference_codes;
792: THEN
793: fnd_message.set_name ('JTF', 'JTF_TASK_REFERENCE_CODE');
794: fnd_message.set_token ('P_REFERENCE_CODE', p_reference_code);
795: fnd_msg_pub.add;
796: RAISE fnd_api.g_exc_unexpected_error;
797: END IF;
798: END IF;
799:
800: CLOSE c_reference_codes;
825: WHERE user_name = p_assigned_by_name
826: AND NVL (end_date, SYSDATE) >= SYSDATE
827: AND NVL (start_date, SYSDATE) <= SYSDATE;
828: BEGIN
829: x_return_status := fnd_api.g_ret_sts_success;
830:
831: IF p_assigned_by_id IS NOT NULL
832: THEN
833: OPEN c_assigned_by_id;
837: THEN
838: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_ASSIGNED_ID');
839: fnd_message.set_token ('P_ASSIGNED_BY_ID', p_assigned_by_id);
840: fnd_msg_pub.add;
841: x_return_status := fnd_api.g_ret_sts_unexp_error;
842: RAISE fnd_api.g_exc_unexpected_error;
843: END IF;
844:
845: CLOSE c_assigned_by_id;
838: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_ASSIGNED_ID');
839: fnd_message.set_token ('P_ASSIGNED_BY_ID', p_assigned_by_id);
840: fnd_msg_pub.add;
841: x_return_status := fnd_api.g_ret_sts_unexp_error;
842: RAISE fnd_api.g_exc_unexpected_error;
843: END IF;
844:
845: CLOSE c_assigned_by_id;
846: ELSIF p_assigned_by_name IS NOT NULL
852: THEN
853: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_ASSIGNED_NAME');
854: fnd_message.set_token ('P_ASSIGNED_BY_NAME', p_assigned_by_name);
855: fnd_msg_pub.add;
856: x_return_status := fnd_api.g_ret_sts_unexp_error;
857: RAISE fnd_api.g_exc_unexpected_error;
858: END IF;
859:
860: CLOSE c_assigned_by_name;
853: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_ASSIGNED_NAME');
854: fnd_message.set_token ('P_ASSIGNED_BY_NAME', p_assigned_by_name);
855: fnd_msg_pub.add;
856: x_return_status := fnd_api.g_ret_sts_unexp_error;
857: RAISE fnd_api.g_exc_unexpected_error;
858: END IF;
859:
860: CLOSE c_assigned_by_name;
861: END IF;
963: fnd_msg_pub.add;
964: CLOSE c_task_template_group;
965: END IF;
966:
967: RAISE fnd_api.g_exc_unexpected_error;
968: ELSE
969: CLOSE c_task_template_group;
970: RETURN l_task_template_group_id;
971: END IF;
981: x_return_status OUT NOCOPY VARCHAR2
982: )
983: IS
984: BEGIN
985: x_return_status := fnd_api.g_ret_sts_success;
986:
987: IF (p_start_date IS NOT NULL)
988: AND (p_end_date IS NOT NULL)
989: THEN
988: AND (p_end_date IS NOT NULL)
989: THEN
990: IF p_start_date > p_end_date
991: THEN
992: x_return_status := fnd_api.g_ret_sts_unexp_error;
993: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_DATES');
994: fnd_message.set_token ('P_DATE_TAG', p_date_tag);
995: fnd_msg_pub.add;
996: END IF;
1008: p_flag_value IN VARCHAR2
1009: )
1010: IS
1011: BEGIN
1012: x_return_status := fnd_api.g_ret_sts_success;
1013:
1014: IF NOT ( p_flag_value IN (jtf_task_utl.g_yes, jtf_task_utl.g_no)
1015: OR p_flag_value IS NULL)
1016: THEN
1013:
1014: IF NOT ( p_flag_value IN (jtf_task_utl.g_yes, jtf_task_utl.g_no)
1015: OR p_flag_value IS NULL)
1016: THEN
1017: x_return_status := fnd_api.g_ret_sts_unexp_error;
1018: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_FLAG');
1019: fnd_message.set_token ('P_FLAG_NAME', p_flag_name);
1020: fnd_msg_pub.add;
1021: END IF;
1041: WHERE task_template_group_id = (SELECT task_group_id
1042: FROM jtf_task_templates_b
1043: WHERE task_template_id = p_task_id);
1044: BEGIN
1045: x_return_status := fnd_api.g_ret_sts_success;
1046:
1047: IF p_template_flag = jtf_task_utl.g_yes
1048: THEN
1049: OPEN c_template_object_details;
1050: FETCH c_template_object_details INTO x_source_object_code;
1051:
1052: IF c_template_object_details%NOTFOUND
1053: THEN
1054: x_return_status := fnd_api.g_ret_sts_unexp_error;
1055: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TEMP_ID');
1056: fnd_message.set_token ('P_TASK_TEMPLATE_ID', p_task_id);
1057: fnd_msg_pub.add;
1058: END IF;
1061: FETCH c_task_object_details INTO x_source_object_code;
1062:
1063: IF c_task_object_details%NOTFOUND
1064: THEN
1065: x_return_status := fnd_api.g_ret_sts_unexp_error;
1066: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TASK_ID');
1067: fnd_message.set_token ('P_TASK_ID', p_task_id);
1068: fnd_msg_pub.add;
1069: END IF;
1091: SELECT party_site_id
1092: FROM hz_party_sites
1093: WHERE party_site_number = p_party_site_number;
1094: BEGIN
1095: x_return_status := fnd_api.g_ret_sts_success;
1096:
1097: IF p_party_site_id IS NOT NULL
1098: THEN
1099: OPEN c_party_site_id;
1103: THEN
1104: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SITE_ID');
1105: fnd_message.set_token ('P_PARTY_SITE_ID', p_party_site_id);
1106: fnd_msg_pub.add;
1107: x_return_status := fnd_api.g_ret_sts_unexp_error;
1108: RAISE fnd_api.g_exc_unexpected_error;
1109: END IF;
1110:
1111: CLOSE c_party_site_id;
1104: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SITE_ID');
1105: fnd_message.set_token ('P_PARTY_SITE_ID', p_party_site_id);
1106: fnd_msg_pub.add;
1107: x_return_status := fnd_api.g_ret_sts_unexp_error;
1108: RAISE fnd_api.g_exc_unexpected_error;
1109: END IF;
1110:
1111: CLOSE c_party_site_id;
1112: ELSIF p_party_site_number IS NOT NULL
1118: THEN
1119: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SITE_NUMBER');
1120: fnd_message.set_token ('P_PARTY_SITE_NUMBER', p_party_site_number);
1121: fnd_msg_pub.add;
1122: x_return_status := fnd_api.g_ret_sts_unexp_error;
1123: RAISE fnd_api.g_exc_unexpected_error;
1124: END IF;
1125:
1126: CLOSE c_party_site_number;
1119: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SITE_NUMBER');
1120: fnd_message.set_token ('P_PARTY_SITE_NUMBER', p_party_site_number);
1121: fnd_msg_pub.add;
1122: x_return_status := fnd_api.g_ret_sts_unexp_error;
1123: RAISE fnd_api.g_exc_unexpected_error;
1124: END IF;
1125:
1126: CLOSE c_party_site_number;
1127: END IF;
1148: SELECT party_id
1149: FROM hz_parties
1150: WHERE party_number = p_party_number;
1151: BEGIN
1152: x_return_status := fnd_api.g_ret_sts_success;
1153:
1154: IF p_party_id IS NOT NULL
1155: THEN
1156: OPEN c_party_id;
1160: THEN
1161: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_PARTY_ID');
1162: fnd_message.set_token ('P_PARTY_ID', p_party_id);
1163: fnd_msg_pub.add;
1164: x_return_status := fnd_api.g_ret_sts_unexp_error;
1165: RAISE fnd_api.g_exc_unexpected_error;
1166: END IF;
1167:
1168: CLOSE c_party_id;
1161: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_PARTY_ID');
1162: fnd_message.set_token ('P_PARTY_ID', p_party_id);
1163: fnd_msg_pub.add;
1164: x_return_status := fnd_api.g_ret_sts_unexp_error;
1165: RAISE fnd_api.g_exc_unexpected_error;
1166: END IF;
1167:
1168: CLOSE c_party_id;
1169: ELSIF p_party_number IS NOT NULL
1178: 'PARTY_NUMBER', -- Bug# 2120668
1179: p_party_number
1180: );
1181: fnd_msg_pub.add;
1182: x_return_status := fnd_api.g_ret_sts_unexp_error;
1183: RAISE fnd_api.g_exc_unexpected_error;
1184: END IF;
1185:
1186: CLOSE c_party_number;
1179: p_party_number
1180: );
1181: fnd_msg_pub.add;
1182: x_return_status := fnd_api.g_ret_sts_unexp_error;
1183: RAISE fnd_api.g_exc_unexpected_error;
1184: END IF;
1185:
1186: CLOSE c_party_number;
1187: END IF;
1208: SELECT cust_account_id
1209: FROM hz_cust_accounts
1210: WHERE account_number = p_cust_account_number;
1211: BEGIN
1212: x_return_status := fnd_api.g_ret_sts_success;
1213:
1214: IF p_cust_account_id IS NOT NULL
1215: THEN
1216: OPEN c_cust_account_id;
1220: THEN
1221: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CUST_ACCT_ID');
1222: fnd_message.set_token ('P_CUST_ACCOUNT_ID', p_cust_account_id);
1223: fnd_msg_pub.add;
1224: x_return_status := fnd_api.g_ret_sts_unexp_error;
1225: RAISE fnd_api.g_exc_unexpected_error;
1226: END IF;
1227:
1228: CLOSE c_cust_account_id;
1221: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CUST_ACCT_ID');
1222: fnd_message.set_token ('P_CUST_ACCOUNT_ID', p_cust_account_id);
1223: fnd_msg_pub.add;
1224: x_return_status := fnd_api.g_ret_sts_unexp_error;
1225: RAISE fnd_api.g_exc_unexpected_error;
1226: END IF;
1227:
1228: CLOSE c_cust_account_id;
1229: ELSIF p_cust_account_number IS NOT NULL
1235: THEN
1236: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CUST_ACCT_NUM'); -- Bug# 2120231
1237: fnd_message.set_token ('P_CUST_ACCOUNT_NUMBER', p_cust_account_number);
1238: fnd_msg_pub.add;
1239: x_return_status := fnd_api.g_ret_sts_unexp_error;
1240: RAISE fnd_api.g_exc_unexpected_error;
1241: END IF;
1242:
1243: CLOSE c_cust_account_number;
1236: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CUST_ACCT_NUM'); -- Bug# 2120231
1237: fnd_message.set_token ('P_CUST_ACCOUNT_NUMBER', p_cust_account_number);
1238: fnd_msg_pub.add;
1239: x_return_status := fnd_api.g_ret_sts_unexp_error;
1240: RAISE fnd_api.g_exc_unexpected_error;
1241: END IF;
1242:
1243: CLOSE c_cust_account_number;
1244: END IF;
1267: x_return_status => x_return_status,
1268: x_cust_account_id => x_cust_account_id
1269: );
1270:
1271: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1272: THEN
1273: x_return_status := fnd_api.g_ret_sts_unexp_error;
1274: RAISE fnd_api.g_exc_unexpected_error;
1275: END IF;
1269: );
1270:
1271: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1272: THEN
1273: x_return_status := fnd_api.g_ret_sts_unexp_error;
1274: RAISE fnd_api.g_exc_unexpected_error;
1275: END IF;
1276:
1277: jtf_task_utl.validate_party (
1270:
1271: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1272: THEN
1273: x_return_status := fnd_api.g_ret_sts_unexp_error;
1274: RAISE fnd_api.g_exc_unexpected_error;
1275: END IF;
1276:
1277: jtf_task_utl.validate_party (
1278: p_party_id => p_customer_id,
1280: x_return_status => x_return_status,
1281: x_party_id => x_customer_id
1282: );
1283:
1284: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1285: THEN
1286: x_return_status := fnd_api.g_ret_sts_unexp_error;
1287: RAISE fnd_api.g_exc_unexpected_error;
1288: END IF;
1282: );
1283:
1284: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1285: THEN
1286: x_return_status := fnd_api.g_ret_sts_unexp_error;
1287: RAISE fnd_api.g_exc_unexpected_error;
1288: END IF;
1289:
1290: jtf_task_utl.validate_party_site (
1283:
1284: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1285: THEN
1286: x_return_status := fnd_api.g_ret_sts_unexp_error;
1287: RAISE fnd_api.g_exc_unexpected_error;
1288: END IF;
1289:
1290: jtf_task_utl.validate_party_site (
1291: p_party_site_id => p_address_id,
1293: x_return_status => x_return_status,
1294: x_party_site_id => x_address_id
1295: );
1296:
1297: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1298: THEN
1299: x_return_status := fnd_api.g_ret_sts_unexp_error;
1300: RAISE fnd_api.g_exc_unexpected_error;
1301: END IF;
1295: );
1296:
1297: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1298: THEN
1299: x_return_status := fnd_api.g_ret_sts_unexp_error;
1300: RAISE fnd_api.g_exc_unexpected_error;
1301: END IF;
1302: /* removing fix for bug #1628560
1303: ----
1296:
1297: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1298: THEN
1299: x_return_status := fnd_api.g_ret_sts_unexp_error;
1300: RAISE fnd_api.g_exc_unexpected_error;
1301: END IF;
1302: /* removing fix for bug #1628560
1303: ----
1304: ---- Cross-validate customer/address/account
1309: p_cust_account_id => p_cust_account_id,
1310: x_return_status => x_return_status
1311: );
1312:
1313: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1314: THEN
1315: x_return_status := fnd_api.g_ret_sts_unexp_error;
1316: RAISE fnd_api.g_exc_unexpected_error;
1317: END IF;
1311: );
1312:
1313: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1314: THEN
1315: x_return_status := fnd_api.g_ret_sts_unexp_error;
1316: RAISE fnd_api.g_exc_unexpected_error;
1317: END IF;
1318: */
1319:
1312:
1313: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1314: THEN
1315: x_return_status := fnd_api.g_ret_sts_unexp_error;
1316: RAISE fnd_api.g_exc_unexpected_error;
1317: END IF;
1318: */
1319:
1320: END;
1360: sql_stmt VARCHAR2(2000);
1361: x NUMBER;
1362: l_tag VARCHAR2(2000);
1363: BEGIN
1364: x_return_status := fnd_api.g_ret_sts_success;
1365:
1366: /************* Comment out (Bug 2118130) *****************************
1367: --IF ( l_object_code IS NULL
1368: -- OR l_object_name IS NULL
1394: l_object_id IS NOT NULL)
1395: THEN
1396: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1397: fnd_msg_pub.add;
1398: x_return_status := fnd_api.g_ret_sts_unexp_error;
1399: RAISE fnd_api.g_exc_unexpected_error;
1400: END IF;
1401: /**** Make the statement clear (Bug 2118130) ***********************/
1402:
1395: THEN
1396: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1397: fnd_msg_pub.add;
1398: x_return_status := fnd_api.g_ret_sts_unexp_error;
1399: RAISE fnd_api.g_exc_unexpected_error;
1400: END IF;
1401: /**** Make the statement clear (Bug 2118130) ***********************/
1402:
1403: /************* Comment out (Bug 2118130) *****************************
1429: END IF;
1430:
1431: fnd_message.set_token ('P_OBJECT_CODE', l_tag);
1432: fnd_msg_pub.add;
1433: RAISE fnd_api.g_exc_unexpected_error;
1434: END IF;
1435:
1436: /************* Comment out (Bug 2118130) *****************************
1437: --IF p_object_name IS NULL
1438: -- OR p_object_id IS NULL
1439: --THEN
1440: -- fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1441: -- fnd_msg_pub.add;
1442: -- RAISE fnd_api.g_exc_unexpected_error;
1443: --END IF;
1444: *********************************************************************/
1445:
1446: -- SELECT DECODE (
1480: IF (l_object_id <> p_object_id)
1481: THEN
1482: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1483: fnd_msg_pub.add;
1484: x_return_status := fnd_api.g_ret_sts_unexp_error;
1485: RAISE fnd_api.g_exc_unexpected_error;
1486: END IF;
1487: EXCEPTION
1488: WHEN fnd_api.g_exc_unexpected_error
1481: THEN
1482: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1483: fnd_msg_pub.add;
1484: x_return_status := fnd_api.g_ret_sts_unexp_error;
1485: RAISE fnd_api.g_exc_unexpected_error;
1486: END IF;
1487: EXCEPTION
1488: WHEN fnd_api.g_exc_unexpected_error
1489: THEN
1484: x_return_status := fnd_api.g_ret_sts_unexp_error;
1485: RAISE fnd_api.g_exc_unexpected_error;
1486: END IF;
1487: EXCEPTION
1488: WHEN fnd_api.g_exc_unexpected_error
1489: THEN
1490: x_return_status := fnd_api.g_ret_sts_unexp_error;
1491: WHEN NO_DATA_FOUND
1492: THEN
1486: END IF;
1487: EXCEPTION
1488: WHEN fnd_api.g_exc_unexpected_error
1489: THEN
1490: x_return_status := fnd_api.g_ret_sts_unexp_error;
1491: WHEN NO_DATA_FOUND
1492: THEN
1493: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1494: fnd_msg_pub.add;
1491: WHEN NO_DATA_FOUND
1492: THEN
1493: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SOURCE_DTLS');
1494: fnd_msg_pub.add;
1495: x_return_status := fnd_api.g_ret_sts_unexp_error;
1496: WHEN OTHERS
1497: THEN
1498: x_return_status := fnd_api.g_ret_sts_unexp_error;
1499: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
1494: fnd_msg_pub.add;
1495: x_return_status := fnd_api.g_ret_sts_unexp_error;
1496: WHEN OTHERS
1497: THEN
1498: x_return_status := fnd_api.g_ret_sts_unexp_error;
1499: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
1500: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
1501: fnd_msg_pub.add;
1502: END;
1527: l_task_number jtf_tasks_b.task_number%TYPE;
1528: l_task_name jtf_tasks_vl.task_name%TYPE;
1529: done BOOLEAN := FALSE;
1530: BEGIN
1531: x_return_status := fnd_api.g_ret_sts_success;
1532:
1533: --- Assume correct task id is supplied
1534: IF p_task_id IS NOT NULL
1535: THEN
1537: FETCH c_task_id INTO l_task_id;
1538:
1539: IF c_task_id%NOTFOUND
1540: THEN
1541: x_return_status := fnd_api.g_ret_sts_unexp_error;
1542: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TASK_ID');
1543: fnd_message.set_token ('P_TASK_ID', p_task_id);
1544: fnd_msg_pub.add;
1545: END IF;
1550: FETCH c_task_number INTO l_task_id;
1551:
1552: IF c_task_number%NOTFOUND
1553: THEN
1554: x_return_status := fnd_api.g_ret_sts_unexp_error;
1555: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TASK_NUMBER');
1556: fnd_message.set_token ('P_TASK_NUMBER', p_task_number);
1557: fnd_msg_pub.add;
1558: END IF;
1584: l_task_number jtf_tasks_b.task_number%TYPE;
1585: l_task_name jtf_tasks_vl.task_name%TYPE;
1586: done BOOLEAN := FALSE;
1587: BEGIN
1588: x_return_status := fnd_api.g_ret_sts_success;
1589:
1590: --- Assume correct task id is supplied
1591: IF p_task_id IS NOT NULL
1592: THEN
1594: FETCH c_task_id INTO l_task_id;
1595:
1596: IF c_task_id%NOTFOUND
1597: THEN
1598: x_return_status := fnd_api.g_ret_sts_unexp_error;
1599: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TEMP_ID');
1600: fnd_message.set_token ('P_TASK_TEMPLATE_ID', p_task_id);
1601: fnd_msg_pub.add;
1602: END IF;
1607: FETCH c_task_number INTO l_task_id;
1608:
1609: IF c_task_number%NOTFOUND
1610: THEN
1611: x_return_status := fnd_api.g_ret_sts_unexp_error;
1612: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TEMP_NUMBER');
1613: fnd_message.set_token ('P_TASK_TEMPLATE_NUMBER', p_task_number);
1614: fnd_msg_pub.add;
1615: END IF;
1668: FETCH c_jtf_uom INTO x;
1669:
1670: IF c_jtf_uom%NOTFOUND
1671: THEN
1672: l_result := fnd_api.g_false;
1673: ELSE
1674: l_result := fnd_api.g_true;
1675: END IF;
1676:
1670: IF c_jtf_uom%NOTFOUND
1671: THEN
1672: l_result := fnd_api.g_false;
1673: ELSE
1674: l_result := fnd_api.g_true;
1675: END IF;
1676:
1677: CLOSE c_jtf_uom;
1678: RETURN l_result;
1693: IS
1694: l_effort number;
1695: l_effort_uom varchar2(3);
1696: BEGIN
1697: x_return_status := fnd_api.g_ret_sts_success;
1698:
1699: if (p_effort = fnd_api.g_miss_num)
1700: then
1701: l_effort := null;
1695: l_effort_uom varchar2(3);
1696: BEGIN
1697: x_return_status := fnd_api.g_ret_sts_success;
1698:
1699: if (p_effort = fnd_api.g_miss_num)
1700: then
1701: l_effort := null;
1702: else
1703: l_effort := p_effort;
1702: else
1703: l_effort := p_effort;
1704: end if;
1705:
1706: if (p_effort_uom = fnd_api.g_miss_char)
1707: then
1708: l_effort_uom := null;
1709: else
1710: l_effort_uom := p_effort_uom;
1711: end if;
1712:
1713: IF (l_effort IS NULL AND l_effort_uom IS NOT NULL)
1714: THEN
1715: x_return_status := fnd_api.g_ret_sts_unexp_error;
1716: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_QUANTITY');
1717: fnd_message.set_token ('P_TAG', p_tag);
1718: fnd_msg_pub.add;
1719: ELSIF (l_effort IS NOT NULL AND l_effort_uom IS NULL)
1717: fnd_message.set_token ('P_TAG', p_tag);
1718: fnd_msg_pub.add;
1719: ELSIF (l_effort IS NOT NULL AND l_effort_uom IS NULL)
1720: THEN
1721: x_return_status := fnd_api.g_ret_sts_unexp_error;
1722: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_UOM');
1723: fnd_message.set_token ('P_TAG', p_tag);
1724: fnd_msg_pub.add;
1725: ELSIF (l_effort IS NOT NULL AND l_effort_uom IS NOT NULL)
1725: ELSIF (l_effort IS NOT NULL AND l_effort_uom IS NOT NULL)
1726: THEN
1727: IF l_effort < g_minimum_effort
1728: THEN
1729: x_return_status := fnd_api.g_ret_sts_error;
1730: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_QUANTITY');
1731: fnd_message.set_token ('P_TAG', p_tag);
1732: fnd_msg_pub.add;
1733: END IF;
1731: fnd_message.set_token ('P_TAG', p_tag);
1732: fnd_msg_pub.add;
1733: END IF;
1734:
1735: IF NOT fnd_api.to_boolean (jtf_task_utl.validate_time_uom(l_effort_uom))
1736: THEN
1737: x_return_status := fnd_api.g_ret_sts_unexp_error;
1738: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_UOM');
1739: fnd_message.set_token ('P_UOM_CODE', l_effort_uom); -- Fix Bug 2118718
1733: END IF;
1734:
1735: IF NOT fnd_api.to_boolean (jtf_task_utl.validate_time_uom(l_effort_uom))
1736: THEN
1737: x_return_status := fnd_api.g_ret_sts_unexp_error;
1738: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_UOM');
1739: fnd_message.set_token ('P_UOM_CODE', l_effort_uom); -- Fix Bug 2118718
1740: fnd_msg_pub.add;
1741: END IF;
1770: WHERE name = p_task_type_name
1771: AND trunc(NVL (end_date_active, SYSDATE)) >= trunc(SYSDATE)
1772: AND trunc(NVL (start_date_active, SYSDATE)) <= trunc(SYSDATE);
1773: BEGIN
1774: x_return_status := fnd_api.g_ret_sts_success;
1775:
1776: IF p_task_type_id IS NOT NULL
1777: THEN
1778: OPEN c_task_type_id;
1782: THEN
1783: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TYPE_ID');
1784: fnd_message.set_token ('P_TASK_TYPE_ID', p_task_type_id);
1785: fnd_msg_pub.add;
1786: x_return_status := fnd_api.g_ret_sts_unexp_error;
1787: END IF;
1788:
1789: CLOSE c_task_type_id;
1790: ELSIF p_task_type_name IS NOT NULL
1796: THEN
1797: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TYPE_NAME');
1798: fnd_message.set_token ('P_TASK_TYPE_NAME', p_task_type_name);
1799: fnd_msg_pub.add;
1800: RAISE fnd_api.g_exc_unexpected_error;
1801: END IF;
1802:
1803: CLOSE c_task_type_name;
1804: END IF;
1834:
1835: l_type varchar2(10);
1836:
1837: BEGIN
1838: x_return_status := fnd_api.g_ret_sts_success;
1839:
1840: IF p_task_status_id IS NOT NULL
1841: THEN
1842: OPEN c_task_status_id;
1846: THEN
1847: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_ID');
1848: fnd_message.set_token ('P_TASK_STATUS_ID', p_task_status_id);
1849: fnd_msg_pub.add;
1850: x_return_status := fnd_api.g_ret_sts_unexp_error;
1851: RAISE fnd_api.g_exc_unexpected_error;
1852: END IF;
1853:
1854: CLOSE c_task_status_id;
1847: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_ID');
1848: fnd_message.set_token ('P_TASK_STATUS_ID', p_task_status_id);
1849: fnd_msg_pub.add;
1850: x_return_status := fnd_api.g_ret_sts_unexp_error;
1851: RAISE fnd_api.g_exc_unexpected_error;
1852: END IF;
1853:
1854: CLOSE c_task_status_id;
1855: ELSIF p_task_status_name IS NOT NULL
1861: THEN
1862: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_NAME');
1863: fnd_message.set_token ('P_TASK_STATUS_NAME', p_task_status_name);
1864: fnd_msg_pub.add;
1865: x_return_status := fnd_api.g_ret_sts_unexp_error;
1866: RAISE fnd_api.g_exc_unexpected_error;
1867: END IF;
1868:
1869: CLOSE c_task_status_name;
1862: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_NAME');
1863: fnd_message.set_token ('P_TASK_STATUS_NAME', p_task_status_name);
1864: fnd_msg_pub.add;
1865: x_return_status := fnd_api.g_ret_sts_unexp_error;
1866: RAISE fnd_api.g_exc_unexpected_error;
1867: END IF;
1868:
1869: CLOSE c_task_status_name;
1870: END IF;
1876: p_status_id => x_task_status_id,
1877: p_type => p_validation_type,
1878: x_return_status => x_return_status);
1879:
1880: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1881: THEN
1882: x_return_status := fnd_api.g_ret_sts_unexp_error;
1883: RAISE fnd_api.g_exc_unexpected_error;
1884: END IF;
1878: x_return_status => x_return_status);
1879:
1880: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1881: THEN
1882: x_return_status := fnd_api.g_ret_sts_unexp_error;
1883: RAISE fnd_api.g_exc_unexpected_error;
1884: END IF;
1885:
1886: END;
1879:
1880: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
1881: THEN
1882: x_return_status := fnd_api.g_ret_sts_unexp_error;
1883: RAISE fnd_api.g_exc_unexpected_error;
1884: END IF;
1885:
1886: END;
1887:
1911: WHERE name = p_task_priority_name
1912: AND trunc(NVL (end_date_active, SYSDATE)) >= trunc(SYSDATE)
1913: AND trunc(NVL (start_date_active, SYSDATE)) <= trunc(SYSDATE);
1914: BEGIN
1915: x_return_status := fnd_api.g_ret_sts_success;
1916: -- Bug Fix 2865490
1917: IF (p_task_priority_id IS NOT NULL) AND (p_task_priority_id <> fnd_api.g_miss_num)
1918: THEN
1919: OPEN c_task_priority_id;
1913: AND trunc(NVL (start_date_active, SYSDATE)) <= trunc(SYSDATE);
1914: BEGIN
1915: x_return_status := fnd_api.g_ret_sts_success;
1916: -- Bug Fix 2865490
1917: IF (p_task_priority_id IS NOT NULL) AND (p_task_priority_id <> fnd_api.g_miss_num)
1918: THEN
1919: OPEN c_task_priority_id;
1920: FETCH c_task_priority_id INTO x_task_priority_id;
1921:
1923: THEN
1924: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_PRIORITY_ID');
1925: fnd_message.set_token ('P_TASK_PRIORITY_ID', p_task_priority_id);
1926: fnd_msg_pub.add;
1927: x_return_status := fnd_api.g_ret_sts_unexp_error;
1928: RAISE fnd_api.g_exc_unexpected_error;
1929: END IF;
1930:
1931: CLOSE c_task_priority_id;
1924: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_PRIORITY_ID');
1925: fnd_message.set_token ('P_TASK_PRIORITY_ID', p_task_priority_id);
1926: fnd_msg_pub.add;
1927: x_return_status := fnd_api.g_ret_sts_unexp_error;
1928: RAISE fnd_api.g_exc_unexpected_error;
1929: END IF;
1930:
1931: CLOSE c_task_priority_id;
1932: -- Bug Fix 2865490
1929: END IF;
1930:
1931: CLOSE c_task_priority_id;
1932: -- Bug Fix 2865490
1933: ELSE IF (p_task_priority_name IS NOT NULL) AND (p_task_priority_name <> fnd_api.g_miss_char)
1934: THEN
1935: OPEN c_task_priority_name;
1936: FETCH c_task_priority_name INTO x_task_priority_id;
1937:
1942: 'P_TASK_PRIORITY_NAME',
1943: p_task_priority_name
1944: );
1945: fnd_msg_pub.add;
1946: x_return_status := fnd_api.g_ret_sts_unexp_error;
1947: RAISE fnd_api.g_exc_unexpected_error;
1948: END IF;
1949:
1950: CLOSE c_task_priority_name;
1943: p_task_priority_name
1944: );
1945: fnd_msg_pub.add;
1946: x_return_status := fnd_api.g_ret_sts_unexp_error;
1947: RAISE fnd_api.g_exc_unexpected_error;
1948: END IF;
1949:
1950: CLOSE c_task_priority_name;
1951: ELSE
1976: SELECT date_type_id
1977: FROM jtf_task_date_types_vl
1978: WHERE date_type = p_date_type;
1979: BEGIN
1980: x_return_status := fnd_api.g_ret_sts_success;
1981:
1982: IF p_date_type_id IS NOT NULL
1983: THEN
1984: OPEN c_date_type_id;
1988: THEN
1989: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_DATE_TYPE_ID');
1990: fnd_message.set_token ('P_DATE_TYPE_ID', p_date_type_id);
1991: fnd_msg_pub.add;
1992: x_return_status := fnd_api.g_ret_sts_unexp_error;
1993: END IF;
1994:
1995: CLOSE c_date_type_id;
1996: ELSIF p_date_type IS NOT NULL
2002: THEN
2003: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_DATE_TYPE_NAME');
2004: fnd_message.set_token ('P_DATE_TYPE', p_date_type);
2005: fnd_msg_pub.add;
2006: x_return_status := fnd_api.g_ret_sts_unexp_error;
2007: END IF;
2008:
2009: CLOSE c_date_type_name;
2010: END IF;
2040: WHERE name = p_terr_name
2041: AND trunc(NVL (end_date_active, SYSDATE)) >= trunc(SYSDATE)
2042: AND trunc(NVL (start_date_active, SYSDATE)) <= trunc(SYSDATE);
2043: BEGIN
2044: x_return_status := fnd_api.g_ret_sts_success;
2045:
2046: IF p_terr_id IS NOT NULL
2047: THEN
2048: OPEN c_terr_id;
2052: THEN
2053: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TERR_ID');
2054: fnd_message.set_token ('P_TERR_ID', p_terr_id);
2055: fnd_msg_pub.add;
2056: x_return_status := fnd_api.g_ret_sts_unexp_error;
2057: RAISE fnd_api.g_exc_unexpected_error;
2058: END IF;
2059:
2060: CLOSE c_terr_id;
2053: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TERR_ID');
2054: fnd_message.set_token ('P_TERR_ID', p_terr_id);
2055: fnd_msg_pub.add;
2056: x_return_status := fnd_api.g_ret_sts_unexp_error;
2057: RAISE fnd_api.g_exc_unexpected_error;
2058: END IF;
2059:
2060: CLOSE c_terr_id;
2061: ELSIF p_terr_name IS NOT NULL
2067: THEN
2068: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TERR_NAME');
2069: fnd_message.set_token ('P_TERR_NAME', p_terr_name);
2070: fnd_msg_pub.add;
2071: x_return_status := fnd_api.g_ret_sts_unexp_error;
2072: RAISE fnd_api.g_exc_unexpected_error;
2073: END IF;
2074:
2075: CLOSE c_terr_name;
2068: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TERR_NAME');
2069: fnd_message.set_token ('P_TERR_NAME', p_terr_name);
2070: fnd_msg_pub.add;
2071: x_return_status := fnd_api.g_ret_sts_unexp_error;
2072: RAISE fnd_api.g_exc_unexpected_error;
2073: END IF;
2074:
2075: CLOSE c_terr_name;
2076: END IF;
2074:
2075: CLOSE c_terr_name;
2076: END IF;
2077: EXCEPTION
2078: WHEN fnd_api.g_exc_unexpected_error
2079: THEN
2080: x_return_status := fnd_api.g_ret_sts_unexp_error;
2081: END;*/
2082:
2076: END IF;
2077: EXCEPTION
2078: WHEN fnd_api.g_exc_unexpected_error
2079: THEN
2080: x_return_status := fnd_api.g_ret_sts_unexp_error;
2081: END;*/
2082:
2083: -----------
2084: ----------- Validate Escalation
2098: SELECT person_id
2099: FROM per_all_people_f
2100: WHERE person_id = p_owner_id;
2101: BEGIN
2102: x_return_status := fnd_api.g_ret_sts_success;
2103: jtf_task_utl.validate_flag (
2104: p_api_name => NULL,
2105: p_init_msg_list => fnd_api.g_false,
2106: x_return_status => x_return_status,
2101: BEGIN
2102: x_return_status := fnd_api.g_ret_sts_success;
2103: jtf_task_utl.validate_flag (
2104: p_api_name => NULL,
2105: p_init_msg_list => fnd_api.g_false,
2106: x_return_status => x_return_status,
2107: p_flag_name => 'Escalation Flag',
2108: p_flag_value => p_escalation_flag
2109: );
2107: p_flag_name => 'Escalation Flag',
2108: p_flag_value => p_escalation_flag
2109: );
2110:
2111: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2112: THEN
2113: x_return_status := fnd_api.g_ret_sts_unexp_error;
2114: RAISE fnd_api.g_exc_unexpected_error;
2115: END IF;
2109: );
2110:
2111: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2112: THEN
2113: x_return_status := fnd_api.g_ret_sts_unexp_error;
2114: RAISE fnd_api.g_exc_unexpected_error;
2115: END IF;
2116:
2117: IF ( jtf_task_utl.to_boolean (p_escalation_flag) = FALSE
2110:
2111: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2112: THEN
2113: x_return_status := fnd_api.g_ret_sts_unexp_error;
2114: RAISE fnd_api.g_exc_unexpected_error;
2115: END IF;
2116:
2117: IF ( jtf_task_utl.to_boolean (p_escalation_flag) = FALSE
2118: OR p_escalation_flag IS NULL)
2122: OR (p_terr_name IS NOT NULL)
2123: THEN
2124: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_ESC_DTLS');
2125: fnd_msg_pub.add;
2126: x_return_status := fnd_api.g_ret_sts_unexp_error;
2127: RAISE fnd_api.g_exc_unexpected_error;
2128: ELSE
2129: RETURN;
2130: END IF;
2123: THEN
2124: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_ESC_DTLS');
2125: fnd_msg_pub.add;
2126: x_return_status := fnd_api.g_ret_sts_unexp_error;
2127: RAISE fnd_api.g_exc_unexpected_error;
2128: ELSE
2129: RETURN;
2130: END IF;
2131: END IF;
2135: OR p_terr_name IS NULL)
2136: THEN
2137: fnd_message.set_name ('JTF', 'OWNER_OR_TERRITORY');
2138: fnd_msg_pub.add;
2139: x_return_status := fnd_api.g_ret_sts_unexp_error;
2140: RAISE fnd_api.g_exc_unexpected_error;
2141: END IF;
2142:
2143: IF p_owner_id IS NOT NULL
2136: THEN
2137: fnd_message.set_name ('JTF', 'OWNER_OR_TERRITORY');
2138: fnd_msg_pub.add;
2139: x_return_status := fnd_api.g_ret_sts_unexp_error;
2140: RAISE fnd_api.g_exc_unexpected_error;
2141: END IF;
2142:
2143: IF p_owner_id IS NOT NULL
2144: THEN
2149: THEN
2150: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OWNER_ID');
2151: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2152: fnd_msg_pub.add;
2153: x_return_status := fnd_api.g_ret_sts_unexp_error;
2154: RAISE fnd_api.g_exc_unexpected_error;
2155: END IF;
2156: END IF;
2157:
2150: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OWNER_ID');
2151: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2152: fnd_msg_pub.add;
2153: x_return_status := fnd_api.g_ret_sts_unexp_error;
2154: RAISE fnd_api.g_exc_unexpected_error;
2155: END IF;
2156: END IF;
2157:
2158: IF ( p_terr_id IS NOT NULL
2164: x_return_status => x_return_status,
2165: x_terr_id => x_terr_id
2166: );
2167:
2168: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2169: THEN
2170: x_return_status := fnd_api.g_ret_sts_unexp_error;
2171: RAISE fnd_api.g_exc_unexpected_error;
2172: END IF;
2166: );
2167:
2168: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2169: THEN
2170: x_return_status := fnd_api.g_ret_sts_unexp_error;
2171: RAISE fnd_api.g_exc_unexpected_error;
2172: END IF;
2173: END IF;
2174:
2167:
2168: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2169: THEN
2170: x_return_status := fnd_api.g_ret_sts_unexp_error;
2171: RAISE fnd_api.g_exc_unexpected_error;
2172: END IF;
2173: END IF;
2174:
2175:
2173: END IF;
2174:
2175:
2176: EXCEPTION
2177: WHEN fnd_api.g_exc_unexpected_error
2178: THEN
2179: x_return_status := fnd_api.g_ret_sts_unexp_error;
2180: END;
2181: */
2175:
2176: EXCEPTION
2177: WHEN fnd_api.g_exc_unexpected_error
2178: THEN
2179: x_return_status := fnd_api.g_ret_sts_unexp_error;
2180: END;
2181: */
2182: --------------
2183: -------------- Validate Task Object Type
2201: FROM jtf_objects_vl
2202: WHERE name = p_object_type_name;
2203:
2204: BEGIN
2205: x_return_status := fnd_api.g_ret_sts_success;
2206:
2207: IF p_object_code IS NOT NULL
2208: THEN
2209: OPEN c_object_code;
2212: IF c_object_code%NOTFOUND
2213: THEN
2214: fnd_message.set_name ('JTF', 'invalid_object_type');
2215: fnd_msg_pub.add;
2216: x_return_status := fnd_api.g_ret_sts_unexp_error;
2217: END IF;
2218:
2219: CLOSE c_object_code;
2220: ELSIF p_object_type_name IS NOT NULL
2225: IF c_object_type_name%NOTFOUND
2226: THEN
2227: fnd_message.set_name ('JTF', 'invalid_object_type');
2228: fnd_msg_pub.add;
2229: x_return_status := fnd_api.g_ret_sts_unexp_error;
2230: END IF;
2231:
2232: CLOSE c_object_type_name;
2233: END IF;
2258: SELECT select_id, from_table, where_clause
2259: FROM jtf_objects_b
2260: WHERE object_code = l_owner_type_code;
2261: BEGIN
2262: x_return_status := fnd_api.g_ret_sts_success;
2263: jtf_task_utl.validate_object_type (
2264: p_object_code => p_owner_type_code,
2265: p_object_type_name => p_owner_type_name,
2266: p_object_type_tag => 'Owner',
2268: x_return_status => x_return_status,
2269: x_object_code => l_owner_type_code
2270: );
2271:
2272: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2273: THEN
2274: x_return_status := fnd_api.g_ret_sts_unexp_error;
2275: RAISE fnd_api.g_exc_unexpected_error;
2276: END IF;
2270: );
2271:
2272: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2273: THEN
2274: x_return_status := fnd_api.g_ret_sts_unexp_error;
2275: RAISE fnd_api.g_exc_unexpected_error;
2276: END IF;
2277:
2278: OPEN c_owner_type;
2271:
2272: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2273: THEN
2274: x_return_status := fnd_api.g_ret_sts_unexp_error;
2275: RAISE fnd_api.g_exc_unexpected_error;
2276: END IF;
2277:
2278: OPEN c_owner_type;
2279: FETCH c_owner_type INTO l_id_column, l_from_clause, l_where_clause;
2282: IF c_owner_type%NOTFOUND THEN
2283: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
2284: fnd_message.set_token ('P_OBJECT_CODE', 'Owner');
2285: fnd_msg_pub.add;
2286: x_return_status := fnd_api.g_ret_sts_unexp_error;
2287: RAISE fnd_api.g_exc_unexpected_error;
2288: END IF;
2289:
2290: -- SELECT DECODE (
2283: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OBJECT_CODE');
2284: fnd_message.set_token ('P_OBJECT_CODE', 'Owner');
2285: fnd_msg_pub.add;
2286: x_return_status := fnd_api.g_ret_sts_unexp_error;
2287: RAISE fnd_api.g_exc_unexpected_error;
2288: END IF;
2289:
2290: -- SELECT DECODE (
2291: -- l_where_clause,
2321: WHEN OTHERS
2322: THEN
2323: x_owner_id := NULL;
2324: x_owner_type_code := NULL;
2325: x_return_status := fnd_api.g_ret_sts_unexp_error;
2326: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OWNER_ID');
2327: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2328: fnd_msg_pub.add;
2329: RAISE fnd_api.g_exc_unexpected_error;
2325: x_return_status := fnd_api.g_ret_sts_unexp_error;
2326: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OWNER_ID');
2327: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2328: fnd_msg_pub.add;
2329: RAISE fnd_api.g_exc_unexpected_error;
2330: END;
2331:
2332: x_owner_id := l_owner_id;
2333: x_owner_type_code := l_owner_type_code;
2338: x_owner_type_code := NULL;
2339: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OWNER_ID');
2340: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2341: fnd_msg_pub.add;
2342: x_return_status := fnd_api.g_ret_sts_unexp_error;
2343: RAISE fnd_api.g_exc_unexpected_error;
2344: WHEN fnd_api.g_exc_unexpected_error
2345: THEN
2346: x_return_status := fnd_api.g_ret_sts_unexp_error;
2339: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_OWNER_ID');
2340: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2341: fnd_msg_pub.add;
2342: x_return_status := fnd_api.g_ret_sts_unexp_error;
2343: RAISE fnd_api.g_exc_unexpected_error;
2344: WHEN fnd_api.g_exc_unexpected_error
2345: THEN
2346: x_return_status := fnd_api.g_ret_sts_unexp_error;
2347: RAISE fnd_api.g_exc_unexpected_error;
2340: fnd_message.set_token ('P_OWNER_ID', p_owner_id);
2341: fnd_msg_pub.add;
2342: x_return_status := fnd_api.g_ret_sts_unexp_error;
2343: RAISE fnd_api.g_exc_unexpected_error;
2344: WHEN fnd_api.g_exc_unexpected_error
2345: THEN
2346: x_return_status := fnd_api.g_ret_sts_unexp_error;
2347: RAISE fnd_api.g_exc_unexpected_error;
2348: WHEN OTHERS
2342: x_return_status := fnd_api.g_ret_sts_unexp_error;
2343: RAISE fnd_api.g_exc_unexpected_error;
2344: WHEN fnd_api.g_exc_unexpected_error
2345: THEN
2346: x_return_status := fnd_api.g_ret_sts_unexp_error;
2347: RAISE fnd_api.g_exc_unexpected_error;
2348: WHEN OTHERS
2349: THEN
2350: x_owner_id := NULL;
2343: RAISE fnd_api.g_exc_unexpected_error;
2344: WHEN fnd_api.g_exc_unexpected_error
2345: THEN
2346: x_return_status := fnd_api.g_ret_sts_unexp_error;
2347: RAISE fnd_api.g_exc_unexpected_error;
2348: WHEN OTHERS
2349: THEN
2350: x_owner_id := NULL;
2351: x_owner_type_code := NULL;
2348: WHEN OTHERS
2349: THEN
2350: x_owner_id := NULL;
2351: x_owner_type_code := NULL;
2352: x_return_status := fnd_api.g_ret_sts_unexp_error;
2353: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
2354: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
2355: fnd_msg_pub.add;
2356: RAISE fnd_api.g_exc_unexpected_error;
2352: x_return_status := fnd_api.g_ret_sts_unexp_error;
2353: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
2354: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
2355: fnd_msg_pub.add;
2356: RAISE fnd_api.g_exc_unexpected_error;
2357: END;
2358:
2359: -----------------------------------------------------------
2360: -----------------------------------------------------------
2378: SELECT timezone_id
2379: FROM hz_timezones
2380: WHERE global_timezone_name = p_timezone_name;
2381: BEGIN
2382: x_return_status := fnd_api.g_ret_sts_success;
2383:
2384: IF p_timezone_id IS NOT NULL
2385: THEN
2386: OPEN c_timezone_id;
2390: THEN
2391: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TIMEZONE_ID');
2392: fnd_message.set_token ('P_TIMEZONE_ID', p_timezone_id);
2393: fnd_msg_pub.add;
2394: x_return_status := fnd_api.g_ret_sts_unexp_error;
2395: END IF;
2396:
2397: CLOSE c_timezone_id;
2398: ELSIF p_timezone_name IS NOT NULL
2404: THEN
2405: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_TIMEZONE_NAME');
2406: fnd_message.set_token ('P_TIMEZONE_NAME', p_timezone_name);
2407: fnd_msg_pub.add;
2408: x_return_status := fnd_api.g_ret_sts_unexp_error;
2409: END IF;
2410:
2411: CLOSE c_timezone_name;
2412: END IF;
2413: EXCEPTION
2414: WHEN OTHERS
2415: THEN
2416: x_timezone_id := NULL;
2417: x_return_status := fnd_api.g_ret_sts_unexp_error;
2418: END;
2419:
2420: -----------------------------------------------------------
2421: -----------------------------------------------------------
2434: l_source_object_id jtf_tasks_b.source_object_id%TYPE
2435: := p_source_object_id;
2436: l_p_source_object_id jtf_tasks_b.source_object_id%TYPE;
2437: BEGIN
2438: x_return_status := fnd_api.g_ret_sts_success;
2439: SELECT source_object_type_code, source_object_id
2440: INTO l_p_source_object_code, l_p_source_object_id
2441: FROM jtf_tasks_b
2442: WHERE task_id = p_parent_task_id;
2447: AND l_source_object_code IS NOT NULL)
2448: THEN
2449: fnd_message.set_name ('JTF', 'JTF_TASK_PARENT_TYPE_CODE');
2450: fnd_msg_pub.add;
2451: x_return_status := fnd_api.g_ret_sts_unexp_error;
2452: END IF;
2453:
2454: IF ( l_p_source_object_code IS NOT NULL
2455: AND l_source_object_code IS NOT NULL)
2457: IF l_p_source_object_code <> l_source_object_code
2458: THEN
2459: fnd_message.set_name ('JTF', 'JTF_TASK_PARENT_TYPE_CODE');
2460: fnd_msg_pub.add;
2461: x_return_status := fnd_api.g_ret_sts_unexp_error;
2462: END IF;
2463: END IF;
2464:
2465: SELECT source_object_id
2473: AND l_source_object_id IS NOT NULL)
2474: THEN
2475: fnd_message.set_name ('JTF', 'JTF_TASK_PARENT');
2476: fnd_msg_pub.add;
2477: x_return_status := fnd_api.g_ret_sts_unexp_error;
2478: END IF;
2479:
2480: IF ( l_p_source_object_id IS NOT NULL
2481: AND l_source_object_id IS NOT NULL)
2483: IF l_p_source_object_id <> l_source_object_id
2484: THEN
2485: fnd_message.set_name ('JTF', 'JTF_TASK_PARENT');
2486: fnd_msg_pub.add;
2487: x_return_status := fnd_api.g_ret_sts_unexp_error;
2488: END IF;
2489: END IF;
2490: EXCEPTION
2491: WHEN fnd_api.g_exc_unexpected_error
2487: x_return_status := fnd_api.g_ret_sts_unexp_error;
2488: END IF;
2489: END IF;
2490: EXCEPTION
2491: WHEN fnd_api.g_exc_unexpected_error
2492: THEN
2493: x_return_status := fnd_api.g_ret_sts_unexp_error;
2494: WHEN OTHERS
2495: THEN
2489: END IF;
2490: EXCEPTION
2491: WHEN fnd_api.g_exc_unexpected_error
2492: THEN
2493: x_return_status := fnd_api.g_ret_sts_unexp_error;
2494: WHEN OTHERS
2495: THEN
2496: x_return_status := fnd_api.g_ret_sts_unexp_error;
2497: END;
2492: THEN
2493: x_return_status := fnd_api.g_ret_sts_unexp_error;
2494: WHEN OTHERS
2495: THEN
2496: x_return_status := fnd_api.g_ret_sts_unexp_error;
2497: END;
2498:
2499: -----------------------------------------------------------
2500: -----------------------------------------------------------
2511: := p_notification_period;
2512: l_period_uom jtf_tasks_b.notification_period_uom%TYPE
2513: := p_notification_period_uom;
2514: BEGIN
2515: x_return_status := fnd_api.g_ret_sts_success;
2516: jtf_task_utl.validate_flag (
2517: x_return_status => x_return_status,
2518: p_flag_name => 'Notification
2519: Flag',
2519: Flag',
2520: p_flag_value => p_notification_flag
2521: );
2522:
2523: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2524: THEN
2525: RAISE fnd_api.g_exc_unexpected_error;
2526: END IF;
2527:
2521: );
2522:
2523: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2524: THEN
2525: RAISE fnd_api.g_exc_unexpected_error;
2526: END IF;
2527:
2528: ------- Commented out (Bug 2118464) -----------------
2529: --IF ( l_period IS NOT NULL
2532: -- AND l_period_uom IS NULL)
2533: --THEN
2534: -- fnd_message.set_name ('JTF', 'INVALID_EFFORT');
2535: -- fnd_msg_pub.add;
2536: -- x_return_status := fnd_api.g_ret_sts_unexp_error;
2537: --END IF;
2538: -----------------------------------------------------
2539:
2540: --------- Fixed bug 2137765 --------------------------
2556: p_effort => l_period,
2557: p_effort_uom => l_period_uom
2558: );
2559: -----------------------------------------------------
2560: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2561: THEN
2562: RAISE fnd_api.g_exc_unexpected_error;
2563: END IF;
2564: EXCEPTION
2558: );
2559: -----------------------------------------------------
2560: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2561: THEN
2562: RAISE fnd_api.g_exc_unexpected_error;
2563: END IF;
2564: EXCEPTION
2565: WHEN fnd_api.g_exc_unexpected_error
2566: THEN
2561: THEN
2562: RAISE fnd_api.g_exc_unexpected_error;
2563: END IF;
2564: EXCEPTION
2565: WHEN fnd_api.g_exc_unexpected_error
2566: THEN
2567: x_return_status := fnd_api.g_ret_sts_unexp_error;
2568: WHEN OTHERS
2569: THEN
2563: END IF;
2564: EXCEPTION
2565: WHEN fnd_api.g_exc_unexpected_error
2566: THEN
2567: x_return_status := fnd_api.g_ret_sts_unexp_error;
2568: WHEN OTHERS
2569: THEN
2570: x_return_status := fnd_api.g_ret_sts_unexp_error;
2571: END;
2566: THEN
2567: x_return_status := fnd_api.g_ret_sts_unexp_error;
2568: WHEN OTHERS
2569: THEN
2570: x_return_status := fnd_api.g_ret_sts_unexp_error;
2571: END;
2572:
2573: -----------------------------------------------------------
2574: -----------------------------------------------------------
2603: ----
2604: ----
2605:
2606: BEGIN
2607: x_return_status := fnd_api.g_ret_sts_success;
2608: jtf_task_utl.validate_flag (
2609: x_return_status => x_return_status,
2610: p_flag_name => 'Alarm Flag',
2611: p_flag_value => l_alarm_on
2610: p_flag_name => 'Alarm Flag',
2611: p_flag_value => l_alarm_on
2612: );
2613:
2614: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2615: THEN
2616: RAISE fnd_api.g_exc_unexpected_error;
2617: END IF;
2618:
2612: );
2613:
2614: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2615: THEN
2616: RAISE fnd_api.g_exc_unexpected_error;
2617: END IF;
2618:
2619: IF jtf_task_utl.to_boolean (p_alarm_on)
2620: THEN
2625: OR (l_alarm_interval_uom IS NULL)
2626: THEN
2627: fnd_message.set_name ('JTF', 'INVALID_ALARM_PARAMETERS');
2628: fnd_msg_pub.add;
2629: x_return_status := fnd_api.g_ret_sts_unexp_error;
2630: RAISE fnd_api.g_exc_unexpected_error;
2631: END IF;
2632:
2633: jtf_task_utl.validate_effort (
2626: THEN
2627: fnd_message.set_name ('JTF', 'INVALID_ALARM_PARAMETERS');
2628: fnd_msg_pub.add;
2629: x_return_status := fnd_api.g_ret_sts_unexp_error;
2630: RAISE fnd_api.g_exc_unexpected_error;
2631: END IF;
2632:
2633: jtf_task_utl.validate_effort (
2634: x_return_status => x_return_status,
2635: p_effort => l_alarm_start,
2636: p_effort_uom => l_alarm_start_uom
2637: );
2638:
2639: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2640: THEN
2641: -- fnd_message.set_name ('JTF', 'Invalid_ALARM');
2642: -- fnd_msg_pub.add;
2643: x_return_status := fnd_api.g_ret_sts_unexp_error;
2639: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2640: THEN
2641: -- fnd_message.set_name ('JTF', 'Invalid_ALARM');
2642: -- fnd_msg_pub.add;
2643: x_return_status := fnd_api.g_ret_sts_unexp_error;
2644: RAISE fnd_api.g_exc_unexpected_error;
2645: END IF;
2646:
2647: /*** Fixed Bug 2118582 ***********/
2640: THEN
2641: -- fnd_message.set_name ('JTF', 'Invalid_ALARM');
2642: -- fnd_msg_pub.add;
2643: x_return_status := fnd_api.g_ret_sts_unexp_error;
2644: RAISE fnd_api.g_exc_unexpected_error;
2645: END IF;
2646:
2647: /*** Fixed Bug 2118582 ***********/
2648: --IF is_not_null
2652: p_effort => l_alarm_interval,
2653: p_effort_uom => l_alarm_interval_uom
2654: );
2655:
2656: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2657: THEN
2658: -- fnd_message.set_name ('JTF', 'Invalid_ALARM');
2659: -- fnd_msg_pub.add;
2660: x_return_status := fnd_api.g_ret_sts_unexp_error;
2656: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
2657: THEN
2658: -- fnd_message.set_name ('JTF', 'Invalid_ALARM');
2659: -- fnd_msg_pub.add;
2660: x_return_status := fnd_api.g_ret_sts_unexp_error;
2661: RAISE fnd_api.g_exc_unexpected_error;
2662: END IF;
2663: --END IF;
2664: ELSE
2657: THEN
2658: -- fnd_message.set_name ('JTF', 'Invalid_ALARM');
2659: -- fnd_msg_pub.add;
2660: x_return_status := fnd_api.g_ret_sts_unexp_error;
2661: RAISE fnd_api.g_exc_unexpected_error;
2662: END IF;
2663: --END IF;
2664: ELSE
2665: IF (l_alarm_start IS NOT NULL)
2669: OR (l_alarm_interval_uom IS NOT NULL)
2670: THEN
2671: fnd_message.set_name ('JTF', 'INVALID_ALARM_PARAMETERS');
2672: fnd_msg_pub.add;
2673: x_return_status := fnd_api.g_ret_sts_unexp_error;
2674: END IF;
2675: END IF;
2676: END;
2677:
2680: FUNCTION g_miss_char
2681: RETURN VARCHAR2
2682: IS
2683: BEGIN
2684: RETURN fnd_api.g_miss_char;
2685: END;
2686:
2687: FUNCTION g_miss_date
2688: RETURN DATE
2687: FUNCTION g_miss_date
2688: RETURN DATE
2689: IS
2690: BEGIN
2691: RETURN fnd_api.g_miss_date;
2692: END;
2693:
2694: FUNCTION g_miss_number
2695: RETURN NUMBER
2694: FUNCTION g_miss_number
2695: RETURN NUMBER
2696: IS
2697: BEGIN
2698: RETURN fnd_api.g_miss_num;
2699: END;
2700:
2701: FUNCTION get_translated_lookup (
2702: p_lookup_type IN VARCHAR2,
2729: IS
2730: privelege_all_tasks VARCHAR2(1);
2731: l_resource_id NUMBER;
2732: BEGIN
2733: x_return_status := fnd_api.g_ret_sts_success;
2734: fnd_profile.get (p_profile_name, privelege_all_tasks);
2735:
2736: IF privelege_all_tasks = 'Y'
2737: OR privelege_all_tasks IS NULL
2745: WHERE user_id = fnd_global.user_id;
2746: EXCEPTION
2747: WHEN NO_DATA_FOUND
2748: THEN
2749: x_return_status := fnd_api.g_ret_sts_unexp_error;
2750: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_USER_MAPPING');
2751: fnd_msg_pub.add;
2752: WHEN OTHERS
2753: THEN
2750: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_USER_MAPPING');
2751: fnd_msg_pub.add;
2752: WHEN OTHERS
2753: THEN
2754: x_return_status := fnd_api.g_ret_sts_unexp_error;
2755: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
2756: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
2757: fnd_msg_pub.add;
2758: RAISE fnd_api.g_exc_unexpected_error;
2754: x_return_status := fnd_api.g_ret_sts_unexp_error;
2755: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
2756: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
2757: fnd_msg_pub.add;
2758: RAISE fnd_api.g_exc_unexpected_error;
2759: END;
2760:
2761: -----------------------------
2762: -----------------------------
2770: )
2771: AS
2772: profile_set BOOLEAN := TRUE;
2773: BEGIN
2774: x_return_status := fnd_api.g_ret_sts_success;
2775:
2776: BEGIN
2777: x_owner_type_code :=
2778: fnd_profile.VALUE ('JTF_TASK_DEFAULT_OWNER_TYPE');
2789: AND x_owner_type_code IS NOT NULL)
2790: THEN
2791: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_DEFAULT_OWNER');
2792: fnd_msg_pub.add;
2793: x_return_status := fnd_api.g_ret_sts_unexp_error;
2794: profile_set := FALSE;
2795: RETURN;
2796: END IF;
2797:
2941: x_return_status OUT NOCOPY VARCHAR2
2942: )
2943: IS
2944: BEGIN
2945: x_return_status := fnd_api.g_ret_sts_success;
2946:
2947: IF p_task_id IS NULL
2948: THEN
2949: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_TASK');
2947: IF p_task_id IS NULL
2948: THEN
2949: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_TASK');
2950: fnd_msg_pub.add;
2951: x_return_status := fnd_api.g_ret_sts_unexp_error;
2952: RAISE fnd_api.g_exc_unexpected_error;
2953: END IF;
2954: END;
2955:
2948: THEN
2949: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_TASK');
2950: fnd_msg_pub.add;
2951: x_return_status := fnd_api.g_ret_sts_unexp_error;
2952: RAISE fnd_api.g_exc_unexpected_error;
2953: END IF;
2954: END;
2955:
2956: -----------------------------
2961: x_return_status OUT NOCOPY VARCHAR2
2962: )
2963: IS
2964: BEGIN
2965: x_return_status := fnd_api.g_ret_sts_success;
2966:
2967: IF p_task_contact_id IS NULL
2968: THEN
2969: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_CONTACT');
2967: IF p_task_contact_id IS NULL
2968: THEN
2969: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_CONTACT');
2970: fnd_msg_pub.add;
2971: x_return_status := fnd_api.g_ret_sts_unexp_error;
2972: RAISE fnd_api.g_exc_unexpected_error;
2973: END IF;
2974: END;
2975:
2968: THEN
2969: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_CONTACT');
2970: fnd_msg_pub.add;
2971: x_return_status := fnd_api.g_ret_sts_unexp_error;
2972: RAISE fnd_api.g_exc_unexpected_error;
2973: END IF;
2974: END;
2975:
2976: -----------------------------
2981: x_return_status OUT NOCOPY VARCHAR2
2982: )
2983: IS
2984: BEGIN
2985: x_return_status := fnd_api.g_ret_sts_success;
2986:
2987: IF p_task_phone_id IS NULL
2988: THEN
2989: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_PHONE');
2987: IF p_task_phone_id IS NULL
2988: THEN
2989: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_PHONE');
2990: fnd_msg_pub.add;
2991: x_return_status := fnd_api.g_ret_sts_unexp_error;
2992: RAISE fnd_api.g_exc_unexpected_error;
2993: END IF;
2994: END;
2995:
2988: THEN
2989: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_PHONE');
2990: fnd_msg_pub.add;
2991: x_return_status := fnd_api.g_ret_sts_unexp_error;
2992: RAISE fnd_api.g_exc_unexpected_error;
2993: END IF;
2994: END;
2995:
2996: -----------------------------
3005: )
3006: IS
3007: l_application_id NUMBER;
3008: BEGIN
3009: x_return_status := fnd_api.g_ret_sts_success;
3010: SELECT application_id
3011: INTO l_application_id
3012: FROM fnd_application_vl
3013: WHERE application_id = p_application_id;
3016: THEN
3017: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_APPL_ID');
3018: fnd_message.set_token ('P_APPL_ID', p_application_id);
3019: fnd_msg_pub.add;
3020: x_return_status := fnd_api.g_ret_sts_unexp_error;
3021: WHEN TOO_MANY_ROWS
3022: THEN
3023: NULL;
3024: WHEN OTHERS
3025: THEN
3026: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
3027: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
3028: fnd_msg_pub.add;
3029: x_return_status := fnd_api.g_ret_sts_unexp_error;
3030: END;
3031:
3032: -----------------------------
3033: -----------------------------
3106: x_return_status OUT NOCOPY VARCHAR2
3107: )
3108: IS
3109: BEGIN
3110: x_return_status := fnd_api.g_ret_sts_success;
3111:
3112: IF p_owner_table_name IS NOT NULL
3113: THEN
3114: IF p_owner_table_name NOT IN ('JTF_TASKS_B', 'JTF_TASK_CONTACTS')
3114: IF p_owner_table_name NOT IN ('JTF_TASKS_B', 'JTF_TASK_CONTACTS')
3115: THEN
3116: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_PHONE_TABLE');
3117: fnd_msg_pub.add;
3118: x_return_status := fnd_api.g_ret_sts_unexp_error;
3119: END IF;
3120: END IF;
3121: END;
3122: -----
3131: l_profile_name varchar2(30);
3132:
3133:
3134: BEGIN
3135: x_return_status := fnd_api.g_ret_sts_success;
3136: -- to verify user's category
3137: IF p_category_id is not null THEN
3138: SELECT resource_id
3139: INTO l_resource_id
3153: WHEN no_data_found THEN
3154: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CATEGORY_ID');
3155: fnd_message.set_token ('P_CATEGORY_ID', p_category_id );
3156: fnd_msg_pub.add;
3157: x_return_status := fnd_api.g_ret_sts_unexp_error;
3158: END;
3159: -----
3160: -----
3161: /************************ Commented out and rewrote : Bug 2120569
3178:
3179:
3180: BEGIN
3181:
3182: x_return_status := fnd_api.g_ret_sts_success;
3183: IF fnd_profile.value('JTF_TASK_CHECK_SECURITY') = jtf_task_utl.g_yes_char
3184: THEN
3185:
3186: -- select the owner info from task table for this task id
3230: AND resource_id = l_rs_id;
3231:
3232:
3233: IF SQL%FOUND THEN
3234: x_return_status := fnd_api.g_ret_sts_success;
3235: ELSE
3236: -- check to see if the user has the privilege when private flag is set to 'N'
3237: IF l_private_flag = jtf_task_utl.g_no_char or l_private_flag is null
3238: THEN
3250: )
3251: AND function_name = jtf_task_utl.g_tasks_full_privelege;
3252:
3253: IF SQL%FOUND THEN
3254: x_return_status := fnd_api.g_ret_sts_success;
3255: ELSE
3256: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_USER_ID');
3257: fnd_message.set_token ('P_USER_ID', l_rs_id );
3258: fnd_msg_pub.add;
3255: ELSE
3256: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_USER_ID');
3257: fnd_message.set_token ('P_USER_ID', l_rs_id );
3258: fnd_msg_pub.add;
3259: x_return_status := fnd_api.g_ret_sts_unexp_error;
3260: END IF;
3261: END IF;
3262: END IF;
3263: END;
3271:
3272: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_SECURITY_CHK');
3273: fnd_message.set_token ('P_USER_ID', l_rs_id );
3274: fnd_msg_pub.add;
3275: x_return_status := fnd_api.g_ret_sts_unexp_error;
3276:
3277: END;
3278: ************************************************************************************/
3279: /******** Rewote : Bug 2120569 **********/
3352:
3353: rec_grant c_grant%ROWTYPE;
3354:
3355: BEGIN
3356: x_return_status := fnd_api.g_ret_sts_success;
3357:
3358: IF fnd_profile.value('JTF_TASK_CHECK_SECURITY') = jtf_task_utl.g_yes_char
3359: THEN
3360: OPEN c_task_owner;
3363: THEN
3364: fnd_message.set_name('JTF', 'JTF_TASK_INVALID_TASK_ID');
3365: fnd_message.set_token('P_TASK_ID', p_task_id);
3366: fnd_msg_pub.add;
3367: x_return_status := fnd_api.g_ret_sts_error;
3368: RAISE fnd_api.g_exc_error;
3369: END IF;
3370: CLOSE c_task_owner;
3371:
3364: fnd_message.set_name('JTF', 'JTF_TASK_INVALID_TASK_ID');
3365: fnd_message.set_token('P_TASK_ID', p_task_id);
3366: fnd_msg_pub.add;
3367: x_return_status := fnd_api.g_ret_sts_error;
3368: RAISE fnd_api.g_exc_error;
3369: END IF;
3370: CLOSE c_task_owner;
3371:
3372: OPEN c_resource;
3375: THEN
3376: fnd_message.set_name('JTF', 'JTF_TASK_MISSING_USER_MAPPING');
3377: fnd_message.set_token('P_USER_ID', l_user_id);
3378: fnd_msg_pub.add;
3379: x_return_status := fnd_api.g_ret_sts_error;
3380: RAISE fnd_api.g_exc_error;
3381: END IF;
3382: CLOSE c_resource;
3383:
3376: fnd_message.set_name('JTF', 'JTF_TASK_MISSING_USER_MAPPING');
3377: fnd_message.set_token('P_USER_ID', l_user_id);
3378: fnd_msg_pub.add;
3379: x_return_status := fnd_api.g_ret_sts_error;
3380: RAISE fnd_api.g_exc_error;
3381: END IF;
3382: CLOSE c_resource;
3383:
3384: IF p_session = 'UPDATE'
3412: THEN
3413: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_USER_ID');
3414: fnd_message.set_token ('P_USER_ID', rec_resource.resource_id);
3415: fnd_msg_pub.add;
3416: x_return_status := fnd_api.g_ret_sts_error;
3417: -- Don't raise any exception.
3418: -- This is not an exception, but insufficient privilege error.
3419: ELSE
3420: CLOSE c_grant;
3422: ELSE
3423: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_USER_ID');
3424: fnd_message.set_token ('P_USER_ID', rec_resource.resource_id);
3425: fnd_msg_pub.add;
3426: x_return_status := fnd_api.g_ret_sts_error;
3427: -- Don't raise any exception.
3428: -- This is not an exception, but insufficient privilege error.
3429: END IF;
3430: ELSE
3438: END IF; -- Check group
3439: END IF; -- p_session = UPDATE
3440: End IF; -- fnd_profile.value('JTF_TASK_CHECK_SECURITY') = Yes
3441: EXCEPTION
3442: WHEN fnd_api.g_exc_error
3443: THEN
3444: IF c_task_owner%ISOPEN THEN
3445: CLOSE c_task_owner;
3446: END IF;
3482: END IF;
3483: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_SECURITY_CHK');
3484: fnd_message.set_token ('P_TEXT', SQLCODE ||' '|| SQLERRM);
3485: fnd_msg_pub.add;
3486: x_return_status := fnd_api.g_ret_sts_unexp_error;
3487: RAISE;
3488: END;
3489:
3490: -----
3546:
3547: x varchar2(10);
3548:
3549: BEGIN
3550: x_return_status := fnd_api.g_ret_sts_success;
3551:
3552: IF p_party_id IS NULL
3553: AND (p_party_site_id IS NOT NULL
3554: OR p_cust_account_id IS NOT NULL) THEN
3570: CLOSE c_party_site;
3571: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SITE_ID');
3572: fnd_message.set_token ('P_PARTY_SITE_ID', p_party_site_id);
3573: fnd_msg_pub.add;
3574: x_return_status := fnd_api.g_ret_sts_unexp_error;
3575: RAISE fnd_api.g_exc_unexpected_error;
3576: END IF;
3577:
3578: CLOSE c_party_site;
3571: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_SITE_ID');
3572: fnd_message.set_token ('P_PARTY_SITE_ID', p_party_site_id);
3573: fnd_msg_pub.add;
3574: x_return_status := fnd_api.g_ret_sts_unexp_error;
3575: RAISE fnd_api.g_exc_unexpected_error;
3576: END IF;
3577:
3578: CLOSE c_party_site;
3579: END IF;
3589: CLOSE c_party_acct;
3590: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CUST_ACCT_ID');
3591: fnd_message.set_token ('P_CUST_ACCOUNT_ID', p_cust_account_id);
3592: fnd_msg_pub.add;
3593: x_return_status := fnd_api.g_ret_sts_unexp_error;
3594: RAISE fnd_api.g_exc_unexpected_error;
3595: END IF;
3596:
3597: CLOSE c_party_acct;
3590: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_CUST_ACCT_ID');
3591: fnd_message.set_token ('P_CUST_ACCOUNT_ID', p_cust_account_id);
3592: fnd_msg_pub.add;
3593: x_return_status := fnd_api.g_ret_sts_unexp_error;
3594: RAISE fnd_api.g_exc_unexpected_error;
3595: END IF;
3596:
3597: CLOSE c_party_acct;
3598: END IF;
3715: WHEN OTHERS THEN
3716: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
3717: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
3718: fnd_msg_pub.add;
3719: x_return_status := fnd_api.g_ret_sts_unexp_error;
3720: END;
3721: -----
3722: -----
3723: PROCEDURE validate_status (
3731: l_status_id number;
3732: l_usage varchar2(15);
3733:
3734: BEGIN
3735: x_return_status := fnd_api.g_ret_sts_unexp_error;
3736:
3737: SELECT task_status_id, task_status_flag, assignment_status_flag, usage
3738: INTO l_status_id, l_task_status_flag, l_assignment_status_flag, l_usage
3739: FROM jtf_task_statuses_b
3741:
3742: IF SQL%FOUND THEN
3743: IF p_type = 'TASK' AND l_task_status_flag = jtf_task_utl.g_yes_char
3744: THEN
3745: x_return_status := fnd_api.g_ret_sts_success;
3746: ELSE
3747: IF p_type = 'ASSIGNMENT' AND l_assignment_status_flag = jtf_task_utl.g_yes_char
3748: THEN
3749: x_return_status := fnd_api.g_ret_sts_success;
3745: x_return_status := fnd_api.g_ret_sts_success;
3746: ELSE
3747: IF p_type = 'ASSIGNMENT' AND l_assignment_status_flag = jtf_task_utl.g_yes_char
3748: THEN
3749: x_return_status := fnd_api.g_ret_sts_success;
3750: ELSE
3751: IF p_type = 'ESCALATION' AND l_usage = 'ESCALATION'
3752: THEN
3753: x_return_status := fnd_api.g_ret_sts_success;
3749: x_return_status := fnd_api.g_ret_sts_success;
3750: ELSE
3751: IF p_type = 'ESCALATION' AND l_usage = 'ESCALATION'
3752: THEN
3753: x_return_status := fnd_api.g_ret_sts_success;
3754: ELSE
3755: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_NAME');
3756: fnd_message.set_token ('P_TASK_STATUS_NAME', jtf_task_utl.get_status_name(l_status_id));
3757: fnd_msg_pub.add;
3754: ELSE
3755: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_NAME');
3756: fnd_message.set_token ('P_TASK_STATUS_NAME', jtf_task_utl.get_status_name(l_status_id));
3757: fnd_msg_pub.add;
3758: x_return_status := fnd_api.g_ret_sts_unexp_error;
3759: END IF;
3760: END IF;
3761: END IF;
3762: END IF;
3766: THEN
3767: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_STATUS_NAME');
3768: fnd_message.set_token ('P_TASK_STATUS_NAME', jtf_task_utl.get_status_name(l_status_id));
3769: fnd_msg_pub.add;
3770: x_return_status := fnd_api.g_ret_sts_unexp_error;
3771: END;
3772: -------------
3773: -------------
3774: function getURL ( p_web_function_name in varchar2 )
4148:
4149:
4150: BEGIN
4151:
4152: x_return_status := fnd_api.g_ret_sts_success;
4153:
4154: --/*
4155: if p_party_id is null then
4156: return;
4178: open c_type(p_task_id);
4179: fetch c_type into l_task_type;
4180: if c_type%NOTFOUND then
4181: close c_type;
4182: raise fnd_api.g_exc_unexpected_error;
4183: end if;
4184: close c_type;
4185: if l_task_type <> 22 then
4186: if p_reference_from in ('TASK', 'CONTACT', 'ASSIGNMENT') then
4188: fetch c_party into l_party_name,
4189: l_party_type;
4190: if c_party%NOTFOUND then
4191: close c_party;
4192: raise fnd_api.g_exc_unexpected_error;
4193: end if;
4194: close c_party;
4195: ---
4196: --- Create a reference for the party
4200: g_show_error_for_dup_reference := False;
4201:
4202: jtf_task_references_pvt.create_references (
4203: p_api_version => l_api_version,
4204: p_init_msg_list => fnd_api.g_false,
4205: p_commit => fnd_api.g_false,
4206: p_task_id => p_task_id,
4207: p_object_type_code => 'PARTY',
4208: p_object_name => l_party_name,
4201:
4202: jtf_task_references_pvt.create_references (
4203: p_api_version => l_api_version,
4204: p_init_msg_list => fnd_api.g_false,
4205: p_commit => fnd_api.g_false,
4206: p_task_id => p_task_id,
4207: p_object_type_code => 'PARTY',
4208: p_object_name => l_party_name,
4209: p_object_id => p_party_id,
4212: x_msg_data => x_msg_data,
4213: x_task_reference_id => l_reference_id
4214: );
4215:
4216: if (x_return_status = fnd_api.g_ret_sts_error) then
4217: raise fnd_api.g_exc_error;
4218: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4219: raise fnd_api.g_exc_unexpected_error;
4220: end if;
4213: x_task_reference_id => l_reference_id
4214: );
4215:
4216: if (x_return_status = fnd_api.g_ret_sts_error) then
4217: raise fnd_api.g_exc_error;
4218: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4219: raise fnd_api.g_exc_unexpected_error;
4220: end if;
4221:
4214: );
4215:
4216: if (x_return_status = fnd_api.g_ret_sts_error) then
4217: raise fnd_api.g_exc_error;
4218: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4219: raise fnd_api.g_exc_unexpected_error;
4220: end if;
4221:
4222: if l_party_type = 'PARTY_RELATIONSHIP' then
4215:
4216: if (x_return_status = fnd_api.g_ret_sts_error) then
4217: raise fnd_api.g_exc_error;
4218: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4219: raise fnd_api.g_exc_unexpected_error;
4220: end if;
4221:
4222: if l_party_type = 'PARTY_RELATIONSHIP' then
4223: ---
4229: fetch c_relation into l_object_id,
4230: l_subject_id;
4231: if c_relation%NOTFOUND then
4232: close c_relation;
4233: raise fnd_api.g_exc_unexpected_error;
4234: end if;
4235: close c_relation;
4236: ---
4237: --- Get the party details for the SUBJECT of the relationship
4240: fetch c_party into l_party_name,
4241: l_party_type;
4242: if c_party%NOTFOUND then
4243: close c_party;
4244: raise fnd_api.g_exc_unexpected_error;
4245: end if;
4246: close c_party;
4247:
4248: -- Added for Enhancement # 2102281
4249: g_show_error_for_dup_reference := False;
4250:
4251: jtf_task_references_pvt.create_references (
4252: p_api_version => l_api_version,
4253: p_init_msg_list => fnd_api.g_false,
4254: p_commit => fnd_api.g_false,
4255: p_task_id => p_task_id,
4256: p_object_type_code => 'PARTY',
4257: p_object_name => l_party_name,
4250:
4251: jtf_task_references_pvt.create_references (
4252: p_api_version => l_api_version,
4253: p_init_msg_list => fnd_api.g_false,
4254: p_commit => fnd_api.g_false,
4255: p_task_id => p_task_id,
4256: p_object_type_code => 'PARTY',
4257: p_object_name => l_party_name,
4258: p_object_id => l_subject_id,
4261: x_msg_data => x_msg_data,
4262: x_task_reference_id => l_reference_id
4263: );
4264:
4265: if (x_return_status = fnd_api.g_ret_sts_error) then
4266: raise fnd_api.g_exc_error;
4267: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4268: raise fnd_api.g_exc_unexpected_error;
4269: end if;
4262: x_task_reference_id => l_reference_id
4263: );
4264:
4265: if (x_return_status = fnd_api.g_ret_sts_error) then
4266: raise fnd_api.g_exc_error;
4267: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4268: raise fnd_api.g_exc_unexpected_error;
4269: end if;
4270: if p_reference_from in ('TASK', 'ASSIGNMENT') then
4263: );
4264:
4265: if (x_return_status = fnd_api.g_ret_sts_error) then
4266: raise fnd_api.g_exc_error;
4267: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4268: raise fnd_api.g_exc_unexpected_error;
4269: end if;
4270: if p_reference_from in ('TASK', 'ASSIGNMENT') then
4271: ---
4264:
4265: if (x_return_status = fnd_api.g_ret_sts_error) then
4266: raise fnd_api.g_exc_error;
4267: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4268: raise fnd_api.g_exc_unexpected_error;
4269: end if;
4270: if p_reference_from in ('TASK', 'ASSIGNMENT') then
4271: ---
4272: --- Get the party details for the OBJECT of the relationship
4275: fetch c_party into l_party_name,
4276: l_party_type;
4277: if c_party%NOTFOUND then
4278: close c_party;
4279: raise fnd_api.g_exc_unexpected_error;
4280: end if;
4281: close c_party;
4282:
4283: -- Added for Enhancement # 2102281
4284: g_show_error_for_dup_reference := False;
4285:
4286: jtf_task_references_pvt.create_references (
4287: p_api_version => l_api_version,
4288: p_init_msg_list => fnd_api.g_false,
4289: p_commit => fnd_api.g_false,
4290: p_task_id => p_task_id,
4291: p_object_type_code => 'PARTY',
4292: p_object_name => l_party_name,
4285:
4286: jtf_task_references_pvt.create_references (
4287: p_api_version => l_api_version,
4288: p_init_msg_list => fnd_api.g_false,
4289: p_commit => fnd_api.g_false,
4290: p_task_id => p_task_id,
4291: p_object_type_code => 'PARTY',
4292: p_object_name => l_party_name,
4293: p_object_id => l_object_id,
4296: x_msg_data => x_msg_data,
4297: x_task_reference_id => l_reference_id
4298: );
4299:
4300: if (x_return_status = fnd_api.g_ret_sts_error) then
4301: raise fnd_api.g_exc_error;
4302: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4303: raise fnd_api.g_exc_unexpected_error;
4304: end if;
4297: x_task_reference_id => l_reference_id
4298: );
4299:
4300: if (x_return_status = fnd_api.g_ret_sts_error) then
4301: raise fnd_api.g_exc_error;
4302: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4303: raise fnd_api.g_exc_unexpected_error;
4304: end if;
4305:
4298: );
4299:
4300: if (x_return_status = fnd_api.g_ret_sts_error) then
4301: raise fnd_api.g_exc_error;
4302: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4303: raise fnd_api.g_exc_unexpected_error;
4304: end if;
4305:
4306: elsif l_party_type not in ('ORGANIZATION', 'PERSON') then
4299:
4300: if (x_return_status = fnd_api.g_ret_sts_error) then
4301: raise fnd_api.g_exc_error;
4302: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4303: raise fnd_api.g_exc_unexpected_error;
4304: end if;
4305:
4306: elsif l_party_type not in ('ORGANIZATION', 'PERSON') then
4307: raise fnd_api.g_exc_unexpected_error;
4303: raise fnd_api.g_exc_unexpected_error;
4304: end if;
4305:
4306: elsif l_party_type not in ('ORGANIZATION', 'PERSON') then
4307: raise fnd_api.g_exc_unexpected_error;
4308: end if;
4309: end if;
4310: else
4311: ---
4310: else
4311: ---
4312: --- Invalid value for p_reference_from
4313: ---
4314: raise fnd_api.g_exc_unexpected_error;
4315: end if;
4316: end if;
4317:
4318: --*/
4321: then
4322: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
4323: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
4324: fnd_msg_pub.add;
4325: x_return_status := fnd_api.g_ret_sts_unexp_error;
4326: end;
4327:
4328: PROCEDURE delete_party_reference (
4329: p_reference_from in varchar2,
4369: and object_id = b_party_id;
4370:
4371: BEGIN
4372:
4373: x_return_status := fnd_api.g_ret_sts_success;
4374:
4375: --/*
4376: if p_party_id is null then
4377: return;
4399: open c_type(p_task_id);
4400: fetch c_type into l_task_type;
4401: if c_type%NOTFOUND then
4402: close c_type;
4403: raise fnd_api.g_exc_unexpected_error;
4404: end if;
4405: close c_type;
4406: if l_task_type <> 22 then
4407: if p_reference_from in ('TASK', 'CONTACT', 'ASSIGNMENT') then
4408: open c_party(p_party_id);
4409: fetch c_party into l_party_type;
4410: if c_party%NOTFOUND then
4411: close c_party;
4412: raise fnd_api.g_exc_unexpected_error;
4413: end if;
4414: close c_party;
4415: ---
4416: --- Find the reference to be deleted
4432: g_show_error_for_dup_reference := False;
4433:
4434: jtf_task_references_pvt.delete_references (
4435: p_api_version => l_api_version,
4436: p_init_msg_list => fnd_api.g_false,
4437: p_commit => fnd_api.g_false,
4438: p_object_version_number => l_object_version,
4439: p_task_reference_id => l_reference_id,
4440: x_return_status => x_return_status,
4433:
4434: jtf_task_references_pvt.delete_references (
4435: p_api_version => l_api_version,
4436: p_init_msg_list => fnd_api.g_false,
4437: p_commit => fnd_api.g_false,
4438: p_object_version_number => l_object_version,
4439: p_task_reference_id => l_reference_id,
4440: x_return_status => x_return_status,
4441: x_msg_count => x_msg_count,
4441: x_msg_count => x_msg_count,
4442: x_msg_data => x_msg_data
4443: );
4444:
4445: if (x_return_status = fnd_api.g_ret_sts_error) then
4446: raise fnd_api.g_exc_error;
4447: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4448: raise fnd_api.g_exc_unexpected_error;
4449: end if;
4442: x_msg_data => x_msg_data
4443: );
4444:
4445: if (x_return_status = fnd_api.g_ret_sts_error) then
4446: raise fnd_api.g_exc_error;
4447: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4448: raise fnd_api.g_exc_unexpected_error;
4449: end if;
4450: end if;
4443: );
4444:
4445: if (x_return_status = fnd_api.g_ret_sts_error) then
4446: raise fnd_api.g_exc_error;
4447: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4448: raise fnd_api.g_exc_unexpected_error;
4449: end if;
4450: end if;
4451:
4444:
4445: if (x_return_status = fnd_api.g_ret_sts_error) then
4446: raise fnd_api.g_exc_error;
4447: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4448: raise fnd_api.g_exc_unexpected_error;
4449: end if;
4450: end if;
4451:
4452: if l_party_type = 'PARTY_RELATIONSHIP' then
4459: fetch c_relation into l_object_id,
4460: l_subject_id;
4461: if c_relation%NOTFOUND then
4462: close c_relation;
4463: raise fnd_api.g_exc_unexpected_error;
4464: end if;
4465: close c_relation;
4466: ---
4467: --- Get the party details for the SUBJECT of the relationship
4469: open c_party(l_subject_id);
4470: fetch c_party into l_party_type;
4471: if c_party%NOTFOUND then
4472: close c_party;
4473: raise fnd_api.g_exc_unexpected_error;
4474: end if;
4475: close c_party;
4476: ---
4477: --- Find the reference to be deleted
4493: g_show_error_for_dup_reference := False;
4494:
4495: jtf_task_references_pvt.delete_references (
4496: p_api_version => l_api_version,
4497: p_init_msg_list => fnd_api.g_false,
4498: p_commit => fnd_api.g_false,
4499: p_object_version_number => l_object_version,
4500: p_task_reference_id => l_reference_id,
4501: x_return_status => x_return_status,
4494:
4495: jtf_task_references_pvt.delete_references (
4496: p_api_version => l_api_version,
4497: p_init_msg_list => fnd_api.g_false,
4498: p_commit => fnd_api.g_false,
4499: p_object_version_number => l_object_version,
4500: p_task_reference_id => l_reference_id,
4501: x_return_status => x_return_status,
4502: x_msg_count => x_msg_count,
4502: x_msg_count => x_msg_count,
4503: x_msg_data => x_msg_data
4504: );
4505:
4506: if (x_return_status = fnd_api.g_ret_sts_error) then
4507: raise fnd_api.g_exc_error;
4508: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4509: raise fnd_api.g_exc_unexpected_error;
4510: end if;
4503: x_msg_data => x_msg_data
4504: );
4505:
4506: if (x_return_status = fnd_api.g_ret_sts_error) then
4507: raise fnd_api.g_exc_error;
4508: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4509: raise fnd_api.g_exc_unexpected_error;
4510: end if;
4511: end if;
4504: );
4505:
4506: if (x_return_status = fnd_api.g_ret_sts_error) then
4507: raise fnd_api.g_exc_error;
4508: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4509: raise fnd_api.g_exc_unexpected_error;
4510: end if;
4511: end if;
4512:
4505:
4506: if (x_return_status = fnd_api.g_ret_sts_error) then
4507: raise fnd_api.g_exc_error;
4508: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4509: raise fnd_api.g_exc_unexpected_error;
4510: end if;
4511: end if;
4512:
4513: if p_reference_from in ('TASK', 'ASSIGNMENT') then
4517: open c_party(l_object_id);
4518: fetch c_party into l_party_type;
4519: if c_party%NOTFOUND then
4520: close c_party;
4521: raise fnd_api.g_exc_unexpected_error;
4522: end if;
4523: close c_party;
4524: ---
4525: --- Find the reference to be deleted
4541: g_show_error_for_dup_reference := False;
4542:
4543: jtf_task_references_pvt.delete_references (
4544: p_api_version => l_api_version,
4545: p_init_msg_list => fnd_api.g_false,
4546: p_commit => fnd_api.g_false,
4547: p_object_version_number => l_object_version,
4548: p_task_reference_id => l_reference_id,
4549: x_return_status => x_return_status,
4542:
4543: jtf_task_references_pvt.delete_references (
4544: p_api_version => l_api_version,
4545: p_init_msg_list => fnd_api.g_false,
4546: p_commit => fnd_api.g_false,
4547: p_object_version_number => l_object_version,
4548: p_task_reference_id => l_reference_id,
4549: x_return_status => x_return_status,
4550: x_msg_count => x_msg_count,
4550: x_msg_count => x_msg_count,
4551: x_msg_data => x_msg_data
4552: );
4553:
4554: if (x_return_status = fnd_api.g_ret_sts_error) then
4555: raise fnd_api.g_exc_error;
4556: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4557: raise fnd_api.g_exc_unexpected_error;
4558: end if;
4551: x_msg_data => x_msg_data
4552: );
4553:
4554: if (x_return_status = fnd_api.g_ret_sts_error) then
4555: raise fnd_api.g_exc_error;
4556: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4557: raise fnd_api.g_exc_unexpected_error;
4558: end if;
4559: end if;
4552: );
4553:
4554: if (x_return_status = fnd_api.g_ret_sts_error) then
4555: raise fnd_api.g_exc_error;
4556: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4557: raise fnd_api.g_exc_unexpected_error;
4558: end if;
4559: end if;
4560:
4553:
4554: if (x_return_status = fnd_api.g_ret_sts_error) then
4555: raise fnd_api.g_exc_error;
4556: elsif (x_return_status = fnd_api.g_ret_sts_unexp_error) then
4557: raise fnd_api.g_exc_unexpected_error;
4558: end if;
4559: end if;
4560:
4561: elsif l_party_type not in ('ORGANIZATION', 'PERSON') then
4558: end if;
4559: end if;
4560:
4561: elsif l_party_type not in ('ORGANIZATION', 'PERSON') then
4562: raise fnd_api.g_exc_unexpected_error;
4563: end if;
4564: end if;
4565: else
4566: ---
4565: else
4566: ---
4567: --- Invalid value for p_reference_from
4568: ---
4569: raise fnd_api.g_exc_unexpected_error;
4570: end if;
4571: end if;
4572:
4573: --*/
4576: then
4577: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
4578: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
4579: fnd_msg_pub.add;
4580: x_return_status := fnd_api.g_ret_sts_unexp_error;
4581: end;
4582:
4583: --Bug 2467222 for assignee category update
4584: --- update_task_assignee procedure begin
4597: BEGIN
4598: jtf_task_assignments_pvt.update_task_assignment (
4599: p_api_version => p_api_version,
4600: p_object_version_number => p_object_version_number,
4601: p_init_msg_list => fnd_api.g_false,
4602: p_commit => fnd_api.g_false,
4603: p_task_assignment_id => p_task_assignment_id,
4604: x_msg_data => x_msg_data,
4605: x_msg_count => x_msg_count,
4598: jtf_task_assignments_pvt.update_task_assignment (
4599: p_api_version => p_api_version,
4600: p_object_version_number => p_object_version_number,
4601: p_init_msg_list => fnd_api.g_false,
4602: p_commit => fnd_api.g_false,
4603: p_task_assignment_id => p_task_assignment_id,
4604: x_msg_data => x_msg_data,
4605: x_msg_count => x_msg_count,
4606: x_return_status => x_return_status,
4606: x_return_status => x_return_status,
4607: P_CATEGORY_ID => p_category_id
4608: );
4609:
4610: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
4611: THEN
4612: x_return_status := fnd_api.g_ret_sts_unexp_error;
4613: RAISE fnd_api.g_exc_unexpected_error;
4614: END IF;
4608: );
4609:
4610: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
4611: THEN
4612: x_return_status := fnd_api.g_ret_sts_unexp_error;
4613: RAISE fnd_api.g_exc_unexpected_error;
4614: END IF;
4615:
4616: END;
4609:
4610: IF NOT (x_return_status = fnd_api.g_ret_sts_success)
4611: THEN
4612: x_return_status := fnd_api.g_ret_sts_unexp_error;
4613: RAISE fnd_api.g_exc_unexpected_error;
4614: END IF;
4615:
4616: END;
4617: