[Home] [Help]
108: 'P_PROCEDURE',
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:
128: fnd_message.set_token (
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:
142: WHEN OTHERS
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 (
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;
184:
185: ELSIF (p_address_id <> fnd_api.g_miss_num)
186: THEN
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)
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
207: END IF;
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;
234: WHEN OTHERS
235: THEN
236: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
237: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
238: fnd_msg_pub.add;
239: RETURN FALSE;
240: END;
241:
242: PROCEDURE validate_distance (
253: IF p_distance_units < 0
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;
281: THEN
282: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_LOOKUP');
283: fnd_message.set_token ('P_LOOKUP_CODE', p_lookup_code);
284: fnd_message.set_token ('P_LOOKUP_TYPE', p_lookup_type);
285: fnd_msg_pub.add;
286: RETURN FALSE;
287: WHEN TOO_MANY_ROWS
288: THEN
289: RETURN TRUE;
290: WHEN OTHERS
291: THEN
292: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
293: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
294: fnd_msg_pub.add;
295: RETURN FALSE;
296: END;
297:
298: PROCEDURE validate_contact_point (
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
397: THEN
398: x_return_status := fnd_api.g_ret_sts_unexp_error;
399: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
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;
403: END;
404:
405: FUNCTION get_owner (p_object_type_code IN VARCHAR2, p_object_id IN NUMBER)
508: EXCEPTION
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
542: Fetch c_dup_contact Into l_dup_contact;
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;
590: fnd_message.set_token (
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:
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
640: AND p_currency_code IS NULL)
641: THEN
642: x_return_status := fnd_api.g_ret_sts_unexp_error;
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
647: AND p_currency_code IS NOT NULL)
648: THEN
649: IF NOT fnd_api.to_boolean (
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
685: l_result := fnd_api.g_true;
686: END IF;
687:
739: IF c_object_code%NOTFOUND
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:
754: IF c_object_type_name%NOTFOUND
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:
791: IF c_reference_codes%NOTFOUND
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:
836: IF c_assigned_by_id%NOTFOUND
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:
851: IF c_assigned_by_name%NOTFOUND
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:
884: fnd_message.set_token (
885: 'JTF_TASK_INVALID_DEPENDS_ID',
886: p_dependency_id
887: );
888: fnd_msg_pub.add;
889: CLOSE c_dependency;
890: RETURN FALSE;
891: ELSE
892: CLOSE c_dependency;
959: fnd_message.set_token (
960: 'P_TASK_TEMPLATE_GROUP_ID',
961: l_task_template_group_id
962: );
963: fnd_msg_pub.add;
964: CLOSE c_task_template_group;
965: END IF;
966:
967: RAISE fnd_api.g_exc_unexpected_error;
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;
997: END IF;
998: END;
999:
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;
1022: END;
1023:
1024: PROCEDURE get_object_details (
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;
1059: ELSE
1060: OPEN c_task_object_details;
1061: FETCH c_task_object_details INTO x_source_object_code;
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;
1070: END IF;
1071: END;
1072:
1102: IF c_party_site_id%NOTFOUND
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:
1117: IF c_party_site_number%NOTFOUND
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:
1159: IF c_party_id%NOTFOUND
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:
1177: fnd_message.set_token (
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:
1219: IF c_cust_account_id%NOTFOUND
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:
1234: IF c_cust_account_number%NOTFOUND
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:
1393: ELSIF NOT ( l_object_code IS NOT NULL AND
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) ***********************/
1428: l_tag := p_object_id;
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:
1479: -- removing the validation for p_object_name
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
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;
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;
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;
1503:
1504: -----------
1505: ----------- Validate Task
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;
1546: ELSIF --- if the task id is null, then ignore
1547: (p_task_number IS NOT NULL)
1548: THEN
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;
1559: END IF;
1560:
1561: x_task_id := l_task_id;
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;
1603: ELSIF --- if the task id is null, then ignore
1604: (p_task_number IS NOT NULL)
1605: THEN
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;
1616: END IF;
1617:
1618: x_task_id := l_task_id;
1640: IF c_dependency_type_code%NOTFOUND
1641: THEN
1642: fnd_message.set_name ('JTF', 'JTF_TASK_INVALID_DEPENDS_CODE');
1643: fnd_message.set_token ('P_DEPENDENCY_CODE', p_dependency_code);
1644: fnd_msg_pub.add;
1645: l_result := FALSE;
1646: ELSE
1647: l_result := TRUE;
1648: END IF;
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)
1720: THEN
1721: x_return_status := fnd_api.g_ret_sts_unexp_error;
1722: fnd_message.set_name ('JTF', 'JTF_TASK_MISSING_UOM');
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)
1726: THEN
1727: IF l_effort < g_minimum_effort
1728: THEN
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;
1734:
1735: IF NOT fnd_api.to_boolean (jtf_task_utl.validate_time_uom(l_effort_uom))
1736: THEN
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;
1742: ELSE
1743: NULL;
1744: END IF;
1781: IF c_task_type_id%NOTFOUND
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;
1795: IF c_task_type_name%NOTFOUND
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;
1845: IF c_task_status_id%NOTFOUND
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:
1860: IF c_task_status_name%NOTFOUND
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:
1922: IF c_task_priority_id%NOTFOUND
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:
1941: fnd_message.set_token (
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:
1987: IF c_date_type_id%NOTFOUND
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;
2001: IF c_date_type_name%NOTFOUND
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;
2051: IF c_terr_id%NOTFOUND
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:
2066: IF c_terr_name%NOTFOUND
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:
2121: OR (p_terr_id IS NOT 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;
2134: AND ( p_terr_id IS NULL
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:
2148: IF c_owner%NOTFOUND
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;
2211:
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;
2224:
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;
2281: -- Bug 3128054 fixed by TSINGHAL removed dbms messages
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:
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;
2330: END;
2331:
2332: x_owner_id := l_owner_id;
2337: x_owner_id := NULL;
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
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;
2357: END;
2358:
2359: -----------------------------------------------------------
2389: IF c_timezone_id%NOTFOUND
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;
2403: IF c_timezone_name%NOTFOUND
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;
2446: OR ( l_p_source_object_code IS NULL
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
2456: THEN
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:
2472: OR ( l_p_source_object_id IS NULL
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
2482: THEN
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
2531: -- OR ( 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:
2624: OR (l_alarm_interval IS NULL)
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:
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;
2644: RAISE fnd_api.g_exc_unexpected_error;
2645: END IF;
2646:
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;
2661: RAISE fnd_api.g_exc_unexpected_error;
2662: END IF;
2663: --END IF;
2668: OR (l_alarm_interval 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;
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
2754: x_return_status := fnd_api.g_ret_sts_unexp_error;
2755: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
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;
2759: END;
2760:
2761: -----------------------------
2788: OR ( x_owner_id IS NULL
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;
2946:
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;
2966:
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;
2986:
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;
3015: WHEN NO_DATA_FOUND
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: -----------------------------
3113: THEN
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;
3152: EXCEPTION
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: -----
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;
3259: x_return_status := fnd_api.g_ret_sts_unexp_error;
3260: END IF;
3261: END IF;
3262: END IF;
3270: THEN
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: ************************************************************************************/
3362: IF c_task_owner%NOTFOUND
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;
3374: IF c_resource%NOTFOUND
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;
3411: IF c_grant%NOTFOUND
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
3421: END IF; -- Check 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;
3481: CLOSE c_grant;
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:
3554: OR p_cust_account_id IS NOT NULL) THEN
3555: -- cannot validate if there is no customer
3556: -- return a warning message
3557: fnd_message.set_name ('JTF', 'JTF_TASK_NO_PARTY');
3558: fnd_msg_pub.add;
3559: RETURN;
3560: END IF;
3561:
3562: IF p_party_site_id IS NOT NULL
3569: 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:
3588: THEN
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:
3605: l_msg_data varchar2(240); -- Fix bug 2540772
3606:
3607: BEGIN
3608: if p_category_id is null then
3609: fnd_msg_pub.initialize ;
3610: fnd_message.set_name('JTF','JTF_CAL_COMMON_CATEGORY');
3611: fnd_msg_pub.add ;
3612: l_msg_data := substrb(fnd_msg_pub.get( 1 , 'F' ),1,240); -- Fixed for bug 2540722
3613: else
3607: BEGIN
3608: if p_category_id is null then
3609: fnd_msg_pub.initialize ;
3610: fnd_message.set_name('JTF','JTF_CAL_COMMON_CATEGORY');
3611: fnd_msg_pub.add ;
3612: l_msg_data := substrb(fnd_msg_pub.get( 1 , 'F' ),1,240); -- Fixed for bug 2540722
3613: else
3614: select perz_data_desc
3615: into l_msg_data
3608: if p_category_id is null then
3609: fnd_msg_pub.initialize ;
3610: fnd_message.set_name('JTF','JTF_CAL_COMMON_CATEGORY');
3611: fnd_msg_pub.add ;
3612: l_msg_data := substrb(fnd_msg_pub.get( 1 , 'F' ),1,240); -- Fixed for bug 2540722
3613: else
3614: select perz_data_desc
3615: into l_msg_data
3616: from jtf_perz_data
3714: EXCEPTION
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: -----
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;
3758: x_return_status := fnd_api.g_ret_sts_unexp_error;
3759: END IF;
3760: END IF;
3761: END IF;
3765: WHEN OTHERS
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: -------------
4320: when others
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 (
4575: when others
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