[Home] [Help]
145:
146: -- Initialize message list if p_init_msg_list is set to TRUE.
147: IF fnd_api.to_boolean (p_init_msg_list)
148: THEN
149: fnd_msg_pub.initialize;
150: END IF;
151:
152: -- Debug Message
153: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
149: fnd_msg_pub.initialize;
150: END IF;
151:
152: -- Debug Message
153: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
154: THEN
155: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
156: fnd_message.set_name ('PROC_NAME', l_api_name);
157: fnd_msg_pub.add;
153: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
154: THEN
155: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
156: fnd_message.set_name ('PROC_NAME', l_api_name);
157: fnd_msg_pub.add;
158: END IF;
159:
160: -- Initialize API return status to success
161: x_return_status := fnd_api.g_ret_sts_success;
217: RAISE fnd_api.g_exc_error;
218: END IF;
219:
220: -- Debug Message
221: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
222: THEN
223: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
224: fnd_message.set_name ('PROC_NAME', l_api_name);
225: fnd_msg_pub.add;
221: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
222: THEN
223: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
224: fnd_message.set_name ('PROC_NAME', l_api_name);
225: fnd_msg_pub.add;
226: END IF;
227:
228: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
229:
224: fnd_message.set_name ('PROC_NAME', l_api_name);
225: fnd_msg_pub.add;
226: END IF;
227:
228: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
229:
230: -- Standard check for p_commit
231: IF fnd_api.to_boolean (p_commit)
232: THEN
239: THEN
240: --dbms_ourtput.put_line('create_terrtype PVT: FND_API.G_EXC_ERROR');
241: ROLLBACK TO create_terrtype_pvt;
242: x_return_status := fnd_api.g_ret_sts_error;
243: fnd_msg_pub.count_and_get (
244: p_count => x_msg_count,
245: p_data => x_msg_data
246: );
247: WHEN fnd_api.g_exc_unexpected_error
248: THEN
249: --dbms_ourtput.put_line('create_terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
250: ROLLBACK TO create_terrtype_pvt;
251: x_return_status := fnd_api.g_ret_sts_unexp_error;
252: fnd_msg_pub.count_and_get (
253: p_count => x_msg_count,
254: p_data => x_msg_data
255: );
256: WHEN OTHERS
257: THEN
258: --dbms_ourtput.put_line('create_terrtype PVT: OTHERS - ' || SQLERRM);
259: ROLLBACK TO create_terrtype_pvt;
260: x_return_status := fnd_api.g_ret_sts_unexp_error;
261: fnd_msg_pub.count_and_get (
262: p_count => x_msg_count,
263: p_data => x_msg_data
264: );
265: --
340:
341: -- Initialize message list if p_init_msg_list is set to TRUE.
342: IF fnd_api.to_boolean (p_init_msg_list)
343: THEN
344: fnd_msg_pub.initialize;
345: END IF;
346:
347: -- Debug Message
348: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
344: fnd_msg_pub.initialize;
345: END IF;
346:
347: -- Debug Message
348: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
349: THEN
350: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
351: fnd_message.set_name ('PROC_NAME', l_api_name);
352: fnd_msg_pub.add;
348: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
349: THEN
350: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
351: fnd_message.set_name ('PROC_NAME', l_api_name);
352: fnd_msg_pub.add;
353: END IF;
354:
355: -- Initialize API return status to success
356: x_return_status := fnd_api.g_ret_sts_success;
436: RAISE fnd_api.g_exc_error;
437: END IF;
438:
439: -- Debug Message
440: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
441: THEN
442: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
443: fnd_message.set_name ('PROC_NAME', l_api_name);
444: fnd_msg_pub.add;
440: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
441: THEN
442: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
443: fnd_message.set_name ('PROC_NAME', l_api_name);
444: fnd_msg_pub.add;
445: END IF;
446:
447: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
448:
443: fnd_message.set_name ('PROC_NAME', l_api_name);
444: fnd_msg_pub.add;
445: END IF;
446:
447: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
448:
449: -- Standard check for p_commit
450: IF fnd_api.to_boolean (p_commit)
451: THEN
459: THEN
460: --dbms_ourtput.put_line('Update_Terrtype PVT: FND_API.G_EXC_ERROR');
461: ROLLBACK TO update_terrtype_pvt;
462: x_return_status := fnd_api.g_ret_sts_error;
463: fnd_msg_pub.count_and_get (
464: p_count => x_msg_count,
465: p_data => x_msg_data
466: );
467: WHEN fnd_api.g_exc_unexpected_error
468: THEN
469: --dbms_ourtput.put_line('Update_Terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
470: ROLLBACK TO update_terrtype_pvt;
471: x_return_status := fnd_api.g_ret_sts_unexp_error;
472: fnd_msg_pub.count_and_get (
473: p_count => x_msg_count,
474: p_data => x_msg_data
475: );
476: WHEN OTHERS
477: THEN
478: --dbms_ourtput.put_line('Update_Terrtype PVT: OTHERS - ' || SQLERRM);
479: ROLLBACK TO update_terrtype_pvt;
480: x_return_status := fnd_api.g_ret_sts_unexp_error;
481: fnd_msg_pub.count_and_get (
482: p_count => x_msg_count,
483: p_data => x_msg_data
484: );
485: --
579:
580: -- Initialize message list if p_init_msg_list is set to TRUE.
581: IF fnd_api.to_boolean (p_init_msg_list)
582: THEN
583: fnd_msg_pub.initialize;
584: END IF;
585:
586: -- Debug Message
587: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
583: fnd_msg_pub.initialize;
584: END IF;
585:
586: -- Debug Message
587: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
588: THEN
589: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
590: fnd_message.set_name ('PROC_NAME', l_api_name);
591: fnd_msg_pub.add;
587: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
588: THEN
589: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
590: fnd_message.set_name ('PROC_NAME', l_api_name);
591: fnd_msg_pub.add;
592: END IF;
593:
594: -- Initialize API return status to success
595: x_return_status := fnd_api.g_ret_sts_success;
689: RAISE fnd_api.g_exc_error;
690: END IF;
691:
692: -- Debug Message
693: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
694: THEN
695: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
696: fnd_message.set_name ('PROC_NAME', l_api_name);
697: fnd_msg_pub.add;
693: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
694: THEN
695: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
696: fnd_message.set_name ('PROC_NAME', l_api_name);
697: fnd_msg_pub.add;
698: END IF;
699:
700: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
701:
696: fnd_message.set_name ('PROC_NAME', l_api_name);
697: fnd_msg_pub.add;
698: END IF;
699:
700: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
701:
702: -- Standard check for p_commit
703: IF fnd_api.to_boolean (p_commit)
704: THEN
711: THEN
712: --dbms_ourtput.put_line('Delete_Terrtype PVT: FND_API.G_EXC_ERROR');
713: ROLLBACK TO delete_territory_pvt;
714: x_return_status := fnd_api.g_ret_sts_error;
715: fnd_msg_pub.count_and_get (
716: p_count => x_msg_count,
717: p_data => x_msg_data
718: );
719: WHEN fnd_api.g_exc_unexpected_error
720: THEN
721: --dbms_ourtput.put_line('Delete_Terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
722: ROLLBACK TO delete_territory_pvt;
723: x_return_status := fnd_api.g_ret_sts_unexp_error;
724: fnd_msg_pub.count_and_get (
725: p_count => x_msg_count,
726: p_data => x_msg_data
727: );
728: WHEN OTHERS
729: THEN
730: --dbms_ourtput.put_line('Delete_Terrtype PVT: OTHERS - ' || SQLERRM);
731: ROLLBACK TO delete_territory_pvt;
732: x_return_status := fnd_api.g_ret_sts_unexp_error;
733: fnd_msg_pub.count_and_get (
734: p_count => x_msg_count,
735: p_data => x_msg_data
736: );
737: END delete_terrtype;
837:
838: -- Initialize message list if p_init_msg_list is set to TRUE.
839: IF fnd_api.to_boolean (p_init_msg_list)
840: THEN
841: fnd_msg_pub.initialize;
842: END IF;
843:
844: -- Debug Message
845: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
841: fnd_msg_pub.initialize;
842: END IF;
843:
844: -- Debug Message
845: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
846: THEN
847: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
848: fnd_message.set_name ('PROC_NAME', l_api_name);
849: fnd_msg_pub.add;
845: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
846: THEN
847: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
848: fnd_message.set_name ('PROC_NAME', l_api_name);
849: fnd_msg_pub.add;
850: END IF;
851:
852: -- Initialize API return status to success
853: x_return_status := fnd_api.g_ret_sts_success;
893:
894: --
895: IF (c_getterrtype%NOTFOUND)
896: THEN
897: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
898: THEN
899: --dbms_ourtput.put_line('De-Activate Terrtype PVT: C_GetTerrType%NOTFOUND');
900: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
901: fnd_message.set_token ('TABLE_NAME', 'JTF_TERR_TYPES');
899: --dbms_ourtput.put_line('De-Activate Terrtype PVT: C_GetTerrType%NOTFOUND');
900: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_UPDT_TARGET');
901: fnd_message.set_token ('TABLE_NAME', 'JTF_TERR_TYPES');
902: fnd_message.set_token ('PK_ID', TO_CHAR (p_terrtype_id));
903: fnd_msg_pub.add;
904: END IF;
905:
906: RAISE fnd_api.g_exc_error;
907: END IF;
942: );
943: x_return_status := fnd_api.g_ret_sts_success;
944:
945: -- Debug Message
946: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
947: THEN
948: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
949: fnd_message.set_name ('PROC_NAME', l_api_name);
950: fnd_msg_pub.add;
946: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
947: THEN
948: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
949: fnd_message.set_name ('PROC_NAME', l_api_name);
950: fnd_msg_pub.add;
951: END IF;
952:
953: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
954:
949: fnd_message.set_name ('PROC_NAME', l_api_name);
950: fnd_msg_pub.add;
951: END IF;
952:
953: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
954:
955: -- Standard check for p_commit
956: IF fnd_api.to_boolean (p_commit)
957: THEN
963: THEN
964: --dbms_ourtput.put_line('De-Activate_Terrtype PVT: FND_API.G_EXC_ERROR');
965: ROLLBACK TO deactivate_territory_pvt;
966: x_return_status := fnd_api.g_ret_sts_error;
967: fnd_msg_pub.count_and_get (
968: p_count => x_msg_count,
969: p_data => x_msg_data
970: );
971: WHEN fnd_api.g_exc_unexpected_error
972: THEN
973: --dbms_ourtput.put_line('De-Activate_Terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
974: ROLLBACK TO deactivate_territory_pvt;
975: x_return_status := fnd_api.g_ret_sts_unexp_error;
976: fnd_msg_pub.count_and_get (
977: p_count => x_msg_count,
978: p_data => x_msg_data
979: );
980: WHEN OTHERS
982: --dbms_ourtput.put_line('De-Activate_Terrtype PVT: OTHERS - ' || SQLERRM);
983: ROLLBACK TO deactivate_territory_pvt;
984: x_return_status := fnd_api.g_ret_sts_unexp_error;
985:
986: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
987: THEN
988: fnd_msg_pub.add_exc_msg (
989: g_pkg_name,
990: 'Error inside Deactivate_TerrType' || SQLERRM
984: x_return_status := fnd_api.g_ret_sts_unexp_error;
985:
986: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
987: THEN
988: fnd_msg_pub.add_exc_msg (
989: g_pkg_name,
990: 'Error inside Deactivate_TerrType' || SQLERRM
991: );
992: END IF;
1130:
1131: -- Initialize message list if p_init_msg_list is set to TRUE.
1132: IF fnd_api.to_boolean (p_init_msg_list)
1133: THEN
1134: fnd_msg_pub.initialize;
1135: END IF;
1136:
1137: -- Debug Message
1138: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1134: fnd_msg_pub.initialize;
1135: END IF;
1136:
1137: -- Debug Message
1138: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1139: THEN
1140: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1141: fnd_message.set_name ('PROC_NAME', l_api_name);
1142: fnd_msg_pub.add;
1138: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1139: THEN
1140: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1141: fnd_message.set_name ('PROC_NAME', l_api_name);
1142: fnd_msg_pub.add;
1143: END IF;
1144:
1145: -- Initialize API return status to success
1146: x_return_status := fnd_api.g_ret_sts_success;
1355: RAISE fnd_api.g_exc_error;
1356: END IF;
1357:
1358: -- Debug Message
1359: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1360: THEN
1361: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
1362: fnd_message.set_name ('PROC_NAME', l_api_name);
1363: fnd_msg_pub.add;
1359: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1360: THEN
1361: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
1362: fnd_message.set_name ('PROC_NAME', l_api_name);
1363: fnd_msg_pub.add;
1364: END IF;
1365:
1366: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1367:
1362: fnd_message.set_name ('PROC_NAME', l_api_name);
1363: fnd_msg_pub.add;
1364: END IF;
1365:
1366: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1367:
1368: -- Standard check for p_commit
1369: IF fnd_api.to_boolean (p_commit)
1370: THEN
1380: THEN
1381: --dbms_output.put_line('Copy_Terrtype PVT: FND_API.G_EXC_ERROR' || SQLERRM);
1382: ROLLBACK TO copy_terrtype_pvt;
1383: x_return_status := fnd_api.g_ret_sts_error;
1384: fnd_msg_pub.count_and_get (
1385: p_count => x_msg_count,
1386: p_data => x_msg_data
1387: );
1388: WHEN fnd_api.g_exc_unexpected_error
1389: THEN
1390: --dbms_output.put_line('Copy_Terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR' || SQLERRM);
1391: ROLLBACK TO copy_terrtype_pvt;
1392: x_return_status := fnd_api.g_ret_sts_unexp_error;
1393: fnd_msg_pub.count_and_get (
1394: p_count => x_msg_count,
1395: p_data => x_msg_data
1396: );
1397: WHEN OTHERS
1398: THEN
1399: --dbms_output.put_line('Copy_Terrtype PVT: OTHERS - ' || SQLERRM);
1400: ROLLBACK TO copy_terrtype_pvt;
1401: x_return_status := fnd_api.g_ret_sts_unexp_error;
1402: fnd_msg_pub.count_and_get (
1403: p_count => x_msg_count,
1404: p_data => x_msg_data
1405: );
1406: END copy_terrtype;
1476: BEGIN
1477: --dbms_ourtput.put_line('Create_TerrType_Header PVT: Entering API');
1478:
1479: -- Debug Message
1480: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1481: THEN
1482: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1483: fnd_message.set_name ('PROC_NAME', l_api_name);
1484: fnd_msg_pub.add;
1480: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1481: THEN
1482: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1483: fnd_message.set_name ('PROC_NAME', l_api_name);
1484: fnd_msg_pub.add;
1485: END IF;
1486:
1487: -- Initialize API return status to success
1488: x_return_status := fnd_api.g_ret_sts_success;
1574: END IF;
1575:
1576: --
1577: -- Debug Message
1578: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1579: THEN
1580: fnd_message.set_name ('JTF', 'Create TerrType Header: End');
1581: fnd_msg_pub.add;
1582: END IF;
1577: -- Debug Message
1578: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1579: THEN
1580: fnd_message.set_name ('JTF', 'Create TerrType Header: End');
1581: fnd_msg_pub.add;
1582: END IF;
1583: --dbms_ourtput.put_line('Create_TerrType_Header PVT: Exiting API');
1584: EXCEPTION
1585: WHEN fnd_api.g_exc_error
1585: WHEN fnd_api.g_exc_error
1586: THEN
1587: --dbms_ourtput.put_line('Create_TerrType_Header PVT: FND_API.G_EXC_ERROR');
1588: x_return_status := fnd_api.g_ret_sts_error;
1589: fnd_msg_pub.count_and_get (
1590: p_count => x_msg_count,
1591: p_data => x_msg_data
1592: );
1593: WHEN fnd_api.g_exc_unexpected_error
1593: WHEN fnd_api.g_exc_unexpected_error
1594: THEN
1595: --dbms_ourtput.put_line('Create_TerrType_Header PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1596: x_return_status := fnd_api.g_ret_sts_unexp_error;
1597: fnd_msg_pub.count_and_get (
1598: p_count => x_msg_count,
1599: p_data => x_msg_data
1600: );
1601: WHEN OTHERS
1601: WHEN OTHERS
1602: THEN
1603: --dbms_ourtput.put_line('Create_TerrType_Header PVT: OTHERS - ' || SQLERRM);
1604: x_return_status := fnd_api.g_ret_sts_unexp_error;
1605: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1606: THEN
1607: fnd_msg_pub.add_exc_msg (
1608: g_pkg_name,
1609: 'Error inside create_terrtype_header ' || sqlerrm);
1603: --dbms_ourtput.put_line('Create_TerrType_Header PVT: OTHERS - ' || SQLERRM);
1604: x_return_status := fnd_api.g_ret_sts_unexp_error;
1605: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1606: THEN
1607: fnd_msg_pub.add_exc_msg (
1608: g_pkg_name,
1609: 'Error inside create_terrtype_header ' || sqlerrm);
1610: END IF;
1611: END create_terrtype_header;
1674:
1675: -- Initialize message list if p_init_msg_list is set to TRUE.
1676: IF fnd_api.to_boolean (p_init_msg_list)
1677: THEN
1678: fnd_msg_pub.initialize;
1679: END IF;
1680:
1681: -- Debug Message
1682: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1678: fnd_msg_pub.initialize;
1679: END IF;
1680:
1681: -- Debug Message
1682: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1683: THEN
1684: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1685: fnd_message.set_name ('PROC_NAME', l_api_name);
1686: fnd_msg_pub.add;
1682: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1683: THEN
1684: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1685: fnd_message.set_name ('PROC_NAME', l_api_name);
1686: fnd_msg_pub.add;
1687: END IF;
1688:
1689: -- Initialize API return status to success
1690: x_return_status := fnd_api.g_ret_sts_success;
1692: -- VAalidate
1693: IF (p_validation_level >= fnd_api.g_valid_level_full)
1694: THEN
1695: -- Debug message
1696: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1697: THEN
1698: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
1699: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Record');
1700: fnd_msg_pub.add;
1696: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1697: THEN
1698: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
1699: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Record');
1700: fnd_msg_pub.add;
1701: END IF;
1702:
1703: --
1704: -- Invoke validation procedures
1766: x_terrtype_id := l_terrtype_id;
1767: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_success;
1768:
1769: -- Debug Message
1770: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1771: THEN
1772: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
1773: fnd_message.set_name ('PROC_NAME', l_api_name);
1774: fnd_msg_pub.add;
1770: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1771: THEN
1772: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
1773: fnd_message.set_name ('PROC_NAME', l_api_name);
1774: fnd_msg_pub.add;
1775: END IF;
1776:
1777: -- Standard check for p_commit
1778: IF fnd_api.to_boolean (p_commit)
1780: COMMIT WORK;
1781: END IF;
1782:
1783: -- Standard call to get message count and if count is 1, get message info.
1784: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
1785: --dbms_ourtput.put_line('Create_TerrType_Record PVT: Exiting API');
1786: EXCEPTION
1787: WHEN fnd_api.g_exc_error
1788: THEN
1788: THEN
1789: --dbms_output.put_line('HELLO create_terrtype PVT: FND_API.G_EXC_ERROR');
1790: ROLLBACK TO create_terr_rec_pvt;
1791: x_return_status := fnd_api.g_ret_sts_error;
1792: fnd_msg_pub.count_and_get (
1793: p_count => x_msg_count,
1794: p_data => x_msg_data
1795: );
1796: WHEN fnd_api.g_exc_unexpected_error
1797: THEN
1798: --dbms_output.put_line('create_terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
1799: ROLLBACK TO create_terr_rec_pvt;
1800: x_return_status := fnd_api.g_ret_sts_unexp_error;
1801: fnd_msg_pub.count_and_get (
1802: p_count => x_msg_count,
1803: p_data => x_msg_data
1804: );
1805: WHEN OTHERS
1808: x_return_status := fnd_api.g_ret_sts_unexp_error;
1809: ROLLBACK TO create_terr_rec_pvt;
1810: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_unexp_error;
1811:
1812: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1813: THEN
1814: fnd_msg_pub.add_exc_msg (
1815: g_pkg_name,
1816: 'Insert_Territory_Type_Record'
1810: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_unexp_error;
1811:
1812: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
1813: THEN
1814: fnd_msg_pub.add_exc_msg (
1815: g_pkg_name,
1816: 'Insert_Territory_Type_Record'
1817: );
1818: END IF;
1887:
1888: -- Initialize message list if p_init_msg_list is set to TRUE.
1889: IF fnd_api.to_boolean (p_init_msg_list)
1890: THEN
1891: fnd_msg_pub.initialize;
1892: END IF;
1893:
1894: -- Debug Message
1895: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1891: fnd_msg_pub.initialize;
1892: END IF;
1893:
1894: -- Debug Message
1895: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1896: THEN
1897: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1898: fnd_message.set_name ('PROC_NAME', l_api_name);
1899: fnd_msg_pub.add;
1895: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
1896: THEN
1897: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
1898: fnd_message.set_name ('PROC_NAME', l_api_name);
1899: fnd_msg_pub.add;
1900: END IF;
1901:
1902: FOR l_counter IN 1 .. l_terrtypeusgs_tbl_count
1903: LOOP
1909:
1910: IF (p_validation_level >= fnd_api.g_valid_level_full)
1911: THEN
1912: -- Debug message
1913: IF fnd_msg_pub.check_msg_level (
1914: fnd_msg_pub.g_msg_lvl_debug_low
1915: )
1916: THEN
1917: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
1910: IF (p_validation_level >= fnd_api.g_valid_level_full)
1911: THEN
1912: -- Debug message
1913: IF fnd_msg_pub.check_msg_level (
1914: fnd_msg_pub.g_msg_lvl_debug_low
1915: )
1916: THEN
1917: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
1918: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Usage');
1915: )
1916: THEN
1917: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
1918: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Usage');
1919: fnd_msg_pub.add;
1920: END IF;
1921:
1922: --
1923: -- Invoke validation procedures
1976: x_terrtypeusgs_out_tbl (l_counter).terr_type_usg_id := NULL;
1977: x_terrtypeusgs_out_tbl (l_counter).return_status :=
1978: x_return_status;
1979:
1980: IF fnd_msg_pub.check_msg_level (
1981: fnd_msg_pub.g_msg_lvl_unexp_error
1982: )
1983: THEN
1984: fnd_msg_pub.add_exc_msg (
1977: x_terrtypeusgs_out_tbl (l_counter).return_status :=
1978: x_return_status;
1979:
1980: IF fnd_msg_pub.check_msg_level (
1981: fnd_msg_pub.g_msg_lvl_unexp_error
1982: )
1983: THEN
1984: fnd_msg_pub.add_exc_msg (
1985: g_pkg_name,
1980: IF fnd_msg_pub.check_msg_level (
1981: fnd_msg_pub.g_msg_lvl_unexp_error
1982: )
1983: THEN
1984: fnd_msg_pub.add_exc_msg (
1985: g_pkg_name,
1986: 'Others exception in Insert_Territory_Type_Usages'
1987: );
1988: END IF;
2007: x_return_status := fnd_api.g_ret_sts_error;
2008: END IF;
2009: END LOOP;
2010:
2011: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2012: THEN
2013: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2014: fnd_message.set_name ('PROC_NAME', l_api_name);
2015: fnd_msg_pub.add;
2011: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2012: THEN
2013: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2014: fnd_message.set_name ('PROC_NAME', l_api_name);
2015: fnd_msg_pub.add;
2016: END IF;
2017:
2018: --
2019: -- Standard check for p_commit
2022: COMMIT WORK;
2023: END IF;
2024:
2025: -- Standard call to get message count and if count is 1, get message info.
2026: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
2027: --
2028: --dbms_ourtput.put_line('Create_TerrType_Usages PVT: Exiting API');
2029: --
2030:
2098:
2099: -- Initialize message list if p_init_msg_list is set to TRUE.
2100: IF fnd_api.to_boolean (p_init_msg_list)
2101: THEN
2102: fnd_msg_pub.initialize;
2103: END IF;
2104:
2105: -- Debug Message
2106: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2102: fnd_msg_pub.initialize;
2103: END IF;
2104:
2105: -- Debug Message
2106: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2107: THEN
2108: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2109: fnd_message.set_name ('PROC_NAME', l_api_name);
2110: fnd_msg_pub.add;
2106: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2107: THEN
2108: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2109: fnd_message.set_name ('PROC_NAME', l_api_name);
2110: fnd_msg_pub.add;
2111: END IF;
2112:
2113: -- Initialize API return status to success
2114: x_return_status := fnd_api.g_ret_sts_success;
2115:
2116: IF (p_validation_level >= fnd_api.g_valid_level_full)
2117: THEN
2118: -- Debug message
2119: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2120: THEN
2121: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
2122: fnd_message.set_token ('PROC_NAME', 'Validate_Territory_Usage');
2123: fnd_msg_pub.add;
2119: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2120: THEN
2121: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
2122: fnd_message.set_token ('PROC_NAME', 'Validate_Territory_Usage');
2123: fnd_msg_pub.add;
2124: END IF;
2125:
2126: -- Invoke validation procedures
2127: validate_type_qtype_usage (
2169: l_typequaltype_usg_id;
2170: -- If successful then save the success status for the record
2171: x_typequaltypeusgs_out_rec.return_status := fnd_api.g_ret_sts_success;
2172:
2173: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2174: THEN
2175: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2176: fnd_message.set_name ('PROC_NAME', l_api_name);
2177: fnd_msg_pub.add;
2173: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2174: THEN
2175: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2176: fnd_message.set_name ('PROC_NAME', l_api_name);
2177: fnd_msg_pub.add;
2178: END IF;
2179:
2180: -- Standard check for p_commit
2181: IF fnd_api.to_boolean (p_commit)
2183: COMMIT WORK;
2184: END IF;
2185:
2186: -- Standard call to get message count and if count is 1, get message info.
2187: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
2188: --dbms_ourtput.put_line('Create_TerrTypeQualType_Usage REC: Exiting API');
2189: EXCEPTION
2190: WHEN fnd_api.g_exc_error
2191: THEN
2191: THEN
2192: --dbms_ourtput.put_line('create_terrtype PVT: FND_API.G_EXC_ERROR');
2193: ROLLBACK TO create_type_qtype_usg_pvt;
2194: x_return_status := fnd_api.g_ret_sts_error;
2195: fnd_msg_pub.count_and_get (
2196: p_count => x_msg_count,
2197: p_data => x_msg_data
2198: );
2199: WHEN fnd_api.g_exc_unexpected_error
2200: THEN
2201: --dbms_ourtput.put_line('create_terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2202: ROLLBACK TO create_type_qtype_usg_pvt;
2203: x_return_status := fnd_api.g_ret_sts_unexp_error;
2204: fnd_msg_pub.count_and_get (
2205: p_count => x_msg_count,
2206: p_data => x_msg_data
2207: );
2208: WHEN OTHERS
2214: x_typequaltypeusgs_out_rec.type_qual_type_usg_id := NULL;
2215: x_typequaltypeusgs_out_rec.return_status := x_return_status;
2216:
2217: --
2218: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
2219: THEN
2220: fnd_msg_pub.add_exc_msg (
2221: g_pkg_name,
2222: 'Create_TerrTypeQualType_Usage' || SQLERRM
2216:
2217: --
2218: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
2219: THEN
2220: fnd_msg_pub.add_exc_msg (
2221: g_pkg_name,
2222: 'Create_TerrTypeQualType_Usage' || SQLERRM
2223: );
2224: END IF;
2300:
2301: -- Initialize message list if p_init_msg_list is set to TRUE.
2302: IF fnd_api.to_boolean (p_init_msg_list)
2303: THEN
2304: fnd_msg_pub.initialize;
2305: END IF;
2306:
2307: -- Debug Message
2308: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2304: fnd_msg_pub.initialize;
2305: END IF;
2306:
2307: -- Debug Message
2308: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2309: THEN
2310: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2311: fnd_message.set_name ('PROC_NAME', l_api_name);
2312: fnd_msg_pub.add;
2308: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2309: THEN
2310: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2311: fnd_message.set_name ('PROC_NAME', l_api_name);
2312: fnd_msg_pub.add;
2313: END IF;
2314:
2315: -- Initialize API return status to success
2316: x_return_status := fnd_api.g_ret_sts_success;
2377: x_return_status := fnd_api.g_ret_sts_error;
2378: END IF;
2379: END LOOP;
2380:
2381: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2382: THEN
2383: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2384: fnd_message.set_name ('PROC_NAME', l_api_name);
2385: fnd_msg_pub.add;
2381: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2382: THEN
2383: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2384: fnd_message.set_name ('PROC_NAME', l_api_name);
2385: fnd_msg_pub.add;
2386: END IF;
2387:
2388: -- Standard check for p_commit
2389: IF fnd_api.to_boolean (p_commit)
2391: COMMIT WORK;
2392: END IF;
2393:
2394: -- Standard call to get message count and if count is 1, get message info.
2395: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
2396: --dbms_ourtput.put_line('Create_TerrTypeQualType_Usage TBL: Exiting API');
2397: --
2398:
2399: END create_terrtypequaltype_usage;
2464:
2465: -- Initialize message list if p_init_msg_list is set to TRUE.
2466: IF fnd_api.to_boolean (p_init_msg_list)
2467: THEN
2468: fnd_msg_pub.initialize;
2469: END IF;
2470:
2471: -- Debug Message
2472: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2468: fnd_msg_pub.initialize;
2469: END IF;
2470:
2471: -- Debug Message
2472: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2473: THEN
2474: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2475: fnd_message.set_name ('PROC_NAME', l_api_name);
2476: fnd_msg_pub.add;
2472: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2473: THEN
2474: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2475: fnd_message.set_name ('PROC_NAME', l_api_name);
2476: fnd_msg_pub.add;
2477: END IF;
2478:
2479: -- Initialize API return status to success
2480: x_return_status := fnd_api.g_ret_sts_success;
2482: -- Check the validation level
2483: IF (p_validation_level >= fnd_api.g_valid_level_full)
2484: THEN
2485: -- Debug message
2486: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2487: THEN
2488: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
2489: fnd_message.set_token ('PROC_NAME', 'validate_qualifier');
2490: fnd_msg_pub.add;
2486: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2487: THEN
2488: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
2489: fnd_message.set_token ('PROC_NAME', 'validate_qualifier');
2490: fnd_msg_pub.add;
2491: END IF;
2492:
2493: --
2494: -- Invoke validation procedures
2545: -- If successful then save the success status for the record
2546: x_terrtypequal_out_rec.return_status := fnd_api.g_ret_sts_success;
2547:
2548: --
2549: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2550: THEN
2551: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2552: fnd_message.set_name ('PROC_NAME', l_api_name);
2553: fnd_msg_pub.add;
2549: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2550: THEN
2551: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
2552: fnd_message.set_name ('PROC_NAME', l_api_name);
2553: fnd_msg_pub.add;
2554: END IF;
2555:
2556: -- Standard check for p_commit
2557: IF fnd_api.to_boolean (p_commit)
2559: COMMIT WORK;
2560: END IF;
2561:
2562: -- Standard call to get message count and if count is 1, get message info.
2563: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
2564:
2565: --dbms_ourtput.put_line('Create_TerrType_Qualifier PVT: Exiting API');
2566: EXCEPTION
2567: WHEN fnd_api.g_exc_error
2568: THEN
2569: --dbms_output.put_line('GOODBYE create_terrtype PVT: FND_API.G_EXC_ERROR');
2570: ROLLBACK TO create_terr_type_qual_pvt;
2571: x_return_status := fnd_api.g_ret_sts_error;
2572: fnd_msg_pub.count_and_get (
2573: p_count => x_msg_count,
2574: p_data => x_msg_data
2575: );
2576: WHEN fnd_api.g_exc_unexpected_error
2577: THEN
2578: --dbms_output.put_line('create_terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
2579: ROLLBACK TO create_terr_type_qual_pvt;
2580: x_return_status := fnd_api.g_ret_sts_unexp_error;
2581: fnd_msg_pub.count_and_get (
2582: p_count => x_msg_count,
2583: p_data => x_msg_data
2584: );
2585: WHEN OTHERS
2591: x_terrtypequal_out_rec.terr_type_qual_id := NULL;
2592: x_terrtypequal_out_rec.return_status := x_return_status;
2593:
2594: --
2595: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
2596: THEN
2597: fnd_msg_pub.add_exc_msg (
2598: g_pkg_name,
2599: 'Error create_terrtype_qualifier ' || SQLERRM
2593:
2594: --
2595: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
2596: THEN
2597: fnd_msg_pub.add_exc_msg (
2598: g_pkg_name,
2599: 'Error create_terrtype_qualifier ' || SQLERRM
2600: );
2601: END IF;
2675:
2676: -- Initialize message list if p_init_msg_list is set to TRUE.
2677: IF fnd_api.to_boolean (p_init_msg_list)
2678: THEN
2679: fnd_msg_pub.initialize;
2680: END IF;
2681:
2682: -- Debug Message
2683: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2679: fnd_msg_pub.initialize;
2680: END IF;
2681:
2682: -- Debug Message
2683: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2684: THEN
2685: fnd_message.set_name ('JTF', 'Create_Type_Qual PVT: Start');
2686: fnd_msg_pub.add;
2687: END IF;
2682: -- Debug Message
2683: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2684: THEN
2685: fnd_message.set_name ('JTF', 'Create_Type_Qual PVT: Start');
2686: fnd_msg_pub.add;
2687: END IF;
2688:
2689: -- Initialize API return status to success
2690: x_return_status := fnd_api.g_ret_sts_success;
2751: x_return_status := fnd_api.g_ret_sts_error;
2752: END IF;
2753: END LOOP;
2754:
2755: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2756: THEN
2757: fnd_message.set_name ('JTF', 'Create_Type_Qual PVT: End');
2758: fnd_msg_pub.add;
2759: END IF;
2754:
2755: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2756: THEN
2757: fnd_message.set_name ('JTF', 'Create_Type_Qual PVT: End');
2758: fnd_msg_pub.add;
2759: END IF;
2760:
2761: -- Standard check for p_commit
2762: IF fnd_api.to_boolean (p_commit)
2764: COMMIT WORK;
2765: END IF;
2766:
2767: -- Standard call to get message count and if count is 1, get message info.
2768: fnd_msg_pub.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2769:
2770: --dbms_ourtput.put_line('Create_TerrType_Qualifier TBL: Exiting API');
2771: --
2772:
2869:
2870: -- Initialize message list if p_init_msg_list is set to TRUE.
2871: IF fnd_api.to_boolean (p_init_msg_list)
2872: THEN
2873: fnd_msg_pub.initialize;
2874: END IF;
2875:
2876: -- Debug Message
2877: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2873: fnd_msg_pub.initialize;
2874: END IF;
2875:
2876: -- Debug Message
2877: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2878: THEN
2879: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2880: fnd_message.set_name ('PROC_NAME', l_api_name);
2881: fnd_msg_pub.add;
2877: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2878: THEN
2879: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
2880: fnd_message.set_name ('PROC_NAME', l_api_name);
2881: fnd_msg_pub.add;
2882: END IF;
2883:
2884: -- Initialize API return status to SUCCESS
2885: x_return_status := fnd_api.g_ret_sts_success;
2922: --
2923: --dbms_ourtput.put_line('Update_TerrType_Record PVT: After fetch');
2924: IF (c_getterrtype%NOTFOUND)
2925: THEN
2926: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
2927: THEN
2928: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
2929: fnd_message.set_token ('INFO', 'TERRITORY_TYPE', FALSE);
2930: fnd_msg_pub.add;
2926: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
2927: THEN
2928: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
2929: fnd_message.set_token ('INFO', 'TERRITORY_TYPE', FALSE);
2930: fnd_msg_pub.add;
2931: END IF;
2932:
2933: RAISE fnd_api.g_exc_error;
2934: END IF;
2939: -- VAalidate
2940: IF (p_validation_level >= fnd_api.g_valid_level_full)
2941: THEN
2942: -- Debug message
2943: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2944: THEN
2945: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
2946: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Record');
2947: fnd_msg_pub.add;
2943: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
2944: THEN
2945: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
2946: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Record');
2947: fnd_msg_pub.add;
2948: END IF;
2949:
2950: --
2951: -- Invoke validation procedures
3001: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_success;
3002: x_return_status := fnd_api.g_ret_sts_success;
3003:
3004: -- Debug Message
3005: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3006: THEN
3007: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3008: fnd_message.set_name ('PROC_NAME', l_api_name);
3009: fnd_msg_pub.add;
3005: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3006: THEN
3007: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3008: fnd_message.set_name ('PROC_NAME', l_api_name);
3009: fnd_msg_pub.add;
3010: END IF;
3011:
3012: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3013:
3008: fnd_message.set_name ('PROC_NAME', l_api_name);
3009: fnd_msg_pub.add;
3010: END IF;
3011:
3012: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3013:
3014: -- Standard check for p_commit
3015: IF fnd_api.to_boolean (p_commit)
3016: THEN
3024: ROLLBACK TO update_terrtype_pvt;
3025: x_return_status := fnd_api.g_ret_sts_error;
3026: x_terrtype_out_rec.terr_type_id := p_terrtype_rec.terr_type_id;
3027: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_unexp_error;
3028: fnd_msg_pub.count_and_get (
3029: p_count => x_msg_count,
3030: p_data => x_msg_data
3031: );
3032: WHEN fnd_api.g_exc_unexpected_error
3035: --dbms_ourtput.put_line('create_terrtype PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
3036: x_return_status := fnd_api.g_ret_sts_unexp_error;
3037: x_terrtype_out_rec.terr_type_id := p_terrtype_rec.terr_type_id;
3038: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_unexp_error;
3039: fnd_msg_pub.count_and_get (
3040: p_count => x_msg_count,
3041: p_data => x_msg_data
3042: );
3043: WHEN OTHERS
3047: x_return_status := fnd_api.g_ret_sts_unexp_error;
3048: x_terrtype_out_rec.terr_type_id := p_terrtype_rec.terr_type_id;
3049: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_unexp_error;
3050:
3051: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3052: THEN
3053: fnd_msg_pub.add_exc_msg (
3054: g_pkg_name,
3055: 'Error inside Update_TerrType_Record ' || SQLERRM
3049: x_terrtype_out_rec.return_status := fnd_api.g_ret_sts_unexp_error;
3050:
3051: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3052: THEN
3053: fnd_msg_pub.add_exc_msg (
3054: g_pkg_name,
3055: 'Error inside Update_TerrType_Record ' || SQLERRM
3056: );
3057: END IF;
3134:
3135: -- Initialize message list if p_init_msg_list is set to TRUE.
3136: IF fnd_api.to_boolean (p_init_msg_list)
3137: THEN
3138: fnd_msg_pub.initialize;
3139: END IF;
3140:
3141: -- Debug Message
3142: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3138: fnd_msg_pub.initialize;
3139: END IF;
3140:
3141: -- Debug Message
3142: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3143: THEN
3144: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
3145: fnd_message.set_name ('PROC_NAME', l_api_name);
3146: fnd_msg_pub.add;
3142: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3143: THEN
3144: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
3145: fnd_message.set_name ('PROC_NAME', l_api_name);
3146: fnd_msg_pub.add;
3147: END IF;
3148:
3149: -- Initialize API return status to SUCCESS
3150: x_return_status := fnd_api.g_ret_sts_success;
3163: l_ref_terrtypeusgs_rec.source_id;
3164:
3165: IF (c_getterrtypeusage%NOTFOUND)
3166: THEN
3167: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
3168: THEN
3169: --dbms_ourtput.put_line('Update_TerrType_Usages REC: C_GetTerrTypeUsage%NOTFOUND');
3170: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
3171: fnd_message.set_token ('INFO', 'TERRITORY_TYPE_USAGE', FALSE);
3168: THEN
3169: --dbms_ourtput.put_line('Update_TerrType_Usages REC: C_GetTerrTypeUsage%NOTFOUND');
3170: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
3171: fnd_message.set_token ('INFO', 'TERRITORY_TYPE_USAGE', FALSE);
3172: fnd_msg_pub.add;
3173: END IF;
3174:
3175: RAISE fnd_api.g_exc_error;
3176: END IF;
3179:
3180: IF (p_validation_level >= fnd_api.g_valid_level_full)
3181: THEN
3182: -- Debug message
3183: IF fnd_msg_pub.check_msg_level (
3184: fnd_msg_pub.g_msg_lvl_debug_low
3185: )
3186: THEN
3187: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3180: IF (p_validation_level >= fnd_api.g_valid_level_full)
3181: THEN
3182: -- Debug message
3183: IF fnd_msg_pub.check_msg_level (
3184: fnd_msg_pub.g_msg_lvl_debug_low
3185: )
3186: THEN
3187: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3188: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Usage');
3185: )
3186: THEN
3187: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3188: fnd_message.set_token ('PROC_NAME', 'Validate_TerrType_Usage');
3189: fnd_msg_pub.add;
3190: END IF;
3191:
3192: --
3193: -- Invoke validation procedures
3226: x_terrtypeusgs_out_rec.return_status := fnd_api.g_ret_sts_success;
3227: x_return_status := fnd_api.g_ret_sts_success;
3228:
3229: -- Debug Message
3230: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3231: THEN
3232: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3233: fnd_message.set_name ('PROC_NAME', l_api_name);
3234: fnd_msg_pub.add;
3230: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3231: THEN
3232: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3233: fnd_message.set_name ('PROC_NAME', l_api_name);
3234: fnd_msg_pub.add;
3235: END IF;
3236:
3237: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3238:
3233: fnd_message.set_name ('PROC_NAME', l_api_name);
3234: fnd_msg_pub.add;
3235: END IF;
3236:
3237: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3238:
3239: -- Standard check for p_commit
3240: IF fnd_api.to_boolean (p_commit)
3241: THEN
3250: x_terrtypeusgs_out_rec.terr_type_usg_id :=
3251: p_terrtypeusgs_rec.terr_type_id;
3252: x_terrtypeusgs_out_rec.return_status :=
3253: fnd_api.g_ret_sts_unexp_error;
3254: fnd_msg_pub.count_and_get (
3255: p_count => x_msg_count,
3256: p_data => x_msg_data
3257: );
3258: WHEN fnd_api.g_exc_unexpected_error
3263: x_terrtypeusgs_out_rec.terr_type_usg_id :=
3264: p_terrtypeusgs_rec.terr_type_id;
3265: x_terrtypeusgs_out_rec.return_status :=
3266: fnd_api.g_ret_sts_unexp_error;
3267: fnd_msg_pub.count_and_get (
3268: p_count => x_msg_count,
3269: p_data => x_msg_data
3270: );
3271: WHEN OTHERS
3277: p_terrtypeusgs_rec.terr_type_id;
3278: x_terrtypeusgs_out_rec.return_status :=
3279: fnd_api.g_ret_sts_unexp_error;
3280:
3281: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3282: THEN
3283: fnd_msg_pub.add_exc_msg (
3284: g_pkg_name,
3285: 'Error inside Update_Territory_Usages ' || SQLERRM
3279: fnd_api.g_ret_sts_unexp_error;
3280:
3281: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3282: THEN
3283: fnd_msg_pub.add_exc_msg (
3284: g_pkg_name,
3285: 'Error inside Update_Territory_Usages ' || SQLERRM
3286: );
3287: END IF;
3479:
3480: -- Initialize message list if p_init_msg_list is set to TRUE.
3481: IF fnd_api.to_boolean (p_init_msg_list)
3482: THEN
3483: fnd_msg_pub.initialize;
3484: END IF;
3485:
3486: -- Debug Message
3487: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3483: fnd_msg_pub.initialize;
3484: END IF;
3485:
3486: -- Debug Message
3487: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3488: THEN
3489: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
3490: fnd_message.set_name ('PROC_NAME', l_api_name);
3491: fnd_msg_pub.add;
3487: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3488: THEN
3489: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
3490: fnd_message.set_name ('PROC_NAME', l_api_name);
3491: fnd_msg_pub.add;
3492: END IF;
3493:
3494: -- Initialize API return status to SUCCESS
3495: x_return_status := fnd_api.g_ret_sts_success;
3507: l_ref_typequaltypeusgs_rec.qual_type_usg_id;
3508:
3509: IF (c_gettypequaltypeusgs%NOTFOUND)
3510: THEN
3511: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
3512: THEN
3513: --dbms_ourtput.put_line('Update_TerrTypeQualType_Usage REC: C_GetTypeQualTypeUsgs%NOTFOUND');
3514: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
3515: fnd_message.set_token ('INFO', 'TERRITORY', FALSE);
3512: THEN
3513: --dbms_ourtput.put_line('Update_TerrTypeQualType_Usage REC: C_GetTypeQualTypeUsgs%NOTFOUND');
3514: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
3515: fnd_message.set_token ('INFO', 'TERRITORY', FALSE);
3516: fnd_msg_pub.add;
3517: END IF;
3518:
3519: RAISE fnd_api.g_exc_error;
3520: END IF;
3523:
3524: IF (p_validation_level >= fnd_api.g_valid_level_full)
3525: THEN
3526: -- Debug message
3527: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3528: THEN
3529: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3530: fnd_message.set_token ('PROC_NAME', 'Validate_Territory_Usage');
3531: fnd_msg_pub.add;
3527: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3528: THEN
3529: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3530: fnd_message.set_token ('PROC_NAME', 'Validate_Territory_Usage');
3531: fnd_msg_pub.add;
3532: END IF;
3533:
3534: -- Invoke validation procedures
3535: validate_type_qtype_usage (
3566: x_typequaltypeusgs_out_rec.return_status := fnd_api.g_ret_sts_success;
3567: x_return_status := fnd_api.g_ret_sts_success;
3568:
3569: -- Debug Message
3570: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3571: THEN
3572: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3573: fnd_message.set_name ('PROC_NAME', l_api_name);
3574: fnd_msg_pub.add;
3570: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3571: THEN
3572: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3573: fnd_message.set_name ('PROC_NAME', l_api_name);
3574: fnd_msg_pub.add;
3575: END IF;
3576:
3577: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3578:
3573: fnd_message.set_name ('PROC_NAME', l_api_name);
3574: fnd_msg_pub.add;
3575: END IF;
3576:
3577: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3578:
3579: -- Standard check for p_commit
3580: IF fnd_api.to_boolean (p_commit)
3581: THEN
3589: x_return_status := fnd_api.g_ret_sts_error;
3590: x_typequaltypeusgs_out_rec.type_qual_type_usg_id :=
3591: p_typequaltypeusgs_rec.type_qual_type_usg_id;
3592: x_typequaltypeusgs_out_rec.return_status := fnd_api.g_ret_sts_error;
3593: fnd_msg_pub.count_and_get (
3594: p_count => x_msg_count,
3595: p_data => x_msg_data
3596: );
3597: WHEN fnd_api.g_exc_unexpected_error
3602: x_typequaltypeusgs_out_rec.type_qual_type_usg_id :=
3603: p_typequaltypeusgs_rec.type_qual_type_usg_id;
3604: x_typequaltypeusgs_out_rec.return_status :=
3605: fnd_api.g_ret_sts_unexp_error;
3606: fnd_msg_pub.count_and_get (
3607: p_count => x_msg_count,
3608: p_data => x_msg_data
3609: );
3610: WHEN OTHERS
3616: p_typequaltypeusgs_rec.type_qual_type_usg_id;
3617: x_typequaltypeusgs_out_rec.return_status :=
3618: fnd_api.g_ret_sts_unexp_error;
3619:
3620: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3621: THEN
3622: fnd_msg_pub.add_exc_msg (
3623: g_pkg_name,
3624: 'Update error inside Update_TerrTypeQualType_Usage'
3618: fnd_api.g_ret_sts_unexp_error;
3619:
3620: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3621: THEN
3622: fnd_msg_pub.add_exc_msg (
3623: g_pkg_name,
3624: 'Update error inside Update_TerrTypeQualType_Usage'
3625: );
3626: END IF;
3818:
3819: -- Initialize message list if p_init_msg_list is set to TRUE.
3820: IF fnd_api.to_boolean (p_init_msg_list)
3821: THEN
3822: fnd_msg_pub.initialize;
3823: END IF;
3824:
3825: -- Debug Message
3826: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3822: fnd_msg_pub.initialize;
3823: END IF;
3824:
3825: -- Debug Message
3826: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3827: THEN
3828: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
3829: fnd_message.set_name ('PROC_NAME', l_api_name);
3830: fnd_msg_pub.add;
3826: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3827: THEN
3828: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
3829: fnd_message.set_name ('PROC_NAME', l_api_name);
3830: fnd_msg_pub.add;
3831: END IF;
3832:
3833: -- Initialize API return status to SUCCESS
3834: x_return_status := fnd_api.g_ret_sts_success;
3851: l_ref_terrtypequal_rec.in_use_flag;
3852: --
3853: IF (c_getterrqualifier%NOTFOUND)
3854: THEN
3855: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
3856: THEN
3857: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
3858: fnd_message.set_token ('INFO', 'TERRITORY_TYPE_QUALIFIER', FALSE);
3859: fnd_msg_pub.add;
3855: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
3856: THEN
3857: fnd_message.set_name ('JTF', 'API_MISSING_UPDATE_TARGET');
3858: fnd_message.set_token ('INFO', 'TERRITORY_TYPE_QUALIFIER', FALSE);
3859: fnd_msg_pub.add;
3860: END IF;
3861:
3862: RAISE fnd_api.g_exc_error;
3863: END IF;
3868: -- Check the validation level
3869: IF (p_validation_level >= fnd_api.g_valid_level_full)
3870: THEN
3871: -- Debug message
3872: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3873: THEN
3874: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3875: fnd_message.set_token ('PROC_NAME', 'validate_qualifier');
3876: fnd_msg_pub.add;
3872: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3873: THEN
3874: fnd_message.set_name ('JTF', 'JTF_TERR_VALIDATE_MSG');
3875: fnd_message.set_token ('PROC_NAME', 'validate_qualifier');
3876: fnd_msg_pub.add;
3877: END IF;
3878:
3879: --
3880: -- Invoke validation procedures
3918: x_terrtypequal_out_rec.return_status := fnd_api.g_ret_sts_success;
3919: x_return_status := fnd_api.g_ret_sts_success;
3920:
3921: -- Debug Message
3922: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3923: THEN
3924: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3925: fnd_message.set_name ('PROC_NAME', l_api_name);
3926: fnd_msg_pub.add;
3922: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
3923: THEN
3924: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
3925: fnd_message.set_name ('PROC_NAME', l_api_name);
3926: fnd_msg_pub.add;
3927: END IF;
3928:
3929: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3930:
3925: fnd_message.set_name ('PROC_NAME', l_api_name);
3926: fnd_msg_pub.add;
3927: END IF;
3928:
3929: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
3930:
3931: -- Standard check for p_commit
3932: IF fnd_api.to_boolean (p_commit)
3933: THEN
3943: x_terrtypequal_out_rec.terr_type_qual_id :=
3944: p_terrtypequal_rec.terr_type_qual_id;
3945: x_terrtypequal_out_rec.return_status :=
3946: fnd_api.g_ret_sts_unexp_error;
3947: fnd_msg_pub.count_and_get (
3948: p_count => x_msg_count,
3949: p_data => x_msg_data
3950: );
3951: WHEN fnd_api.g_exc_unexpected_error
3956: x_terrtypequal_out_rec.terr_type_qual_id :=
3957: p_terrtypequal_rec.terr_type_qual_id;
3958: x_terrtypequal_out_rec.return_status :=
3959: fnd_api.g_ret_sts_unexp_error;
3960: fnd_msg_pub.count_and_get (
3961: p_count => x_msg_count,
3962: p_data => x_msg_data
3963: );
3964: WHEN OTHERS
3970: p_terrtypequal_rec.terr_type_qual_id;
3971: x_terrtypequal_out_rec.return_status :=
3972: fnd_api.g_ret_sts_unexp_error;
3973:
3974: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3975: THEN
3976: fnd_msg_pub.add_exc_msg (
3977: g_pkg_name,
3978: 'Error inside Update_TerrType_Qualifer ' || SQLERRM
3972: fnd_api.g_ret_sts_unexp_error;
3973:
3974: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
3975: THEN
3976: fnd_msg_pub.add_exc_msg (
3977: g_pkg_name,
3978: 'Error inside Update_TerrType_Qualifer ' || SQLERRM
3979: );
3980: END IF;
4151:
4152: -- Initialize message list if p_init_msg_list is set to TRUE.
4153: IF fnd_api.to_boolean (p_init_msg_list)
4154: THEN
4155: fnd_msg_pub.initialize;
4156: END IF;
4157:
4158: -- Debug Message
4159: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4155: fnd_msg_pub.initialize;
4156: END IF;
4157:
4158: -- Debug Message
4159: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4160: THEN
4161: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4162: fnd_message.set_name ('PROC_NAME', l_api_name);
4163: fnd_msg_pub.add;
4159: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4160: THEN
4161: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4162: fnd_message.set_name ('PROC_NAME', l_api_name);
4163: fnd_msg_pub.add;
4164: END IF;
4165:
4166: --Initialize the return status to success
4167: x_return_status := fnd_api.g_ret_sts_success;
4182: --Prepare message token
4183: fnd_message.set_name ('ITEMS_DELETED', l_row_count);
4184:
4185: --Add message to API message list
4186: fnd_msg_pub.add;
4187:
4188: -- Debug Message
4189: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4190: THEN
4185: --Add message to API message list
4186: fnd_msg_pub.add;
4187:
4188: -- Debug Message
4189: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4190: THEN
4191: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4192: fnd_message.set_name ('PROC_NAME', l_api_name);
4193: fnd_msg_pub.add;
4189: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4190: THEN
4191: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4192: fnd_message.set_name ('PROC_NAME', l_api_name);
4193: fnd_msg_pub.add;
4194: END IF;
4195:
4196: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4197:
4192: fnd_message.set_name ('PROC_NAME', l_api_name);
4193: fnd_msg_pub.add;
4194: END IF;
4195:
4196: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4197:
4198: -- Standard check for p_commit
4199: IF fnd_api.to_boolean (p_commit)
4200: THEN
4206: THEN
4207: --dbms_ourtput.put_line('Delete_TerrType_Record PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
4208: ROLLBACK TO delete_terr_record_pvt;
4209: x_return_status := fnd_api.g_ret_sts_unexp_error;
4210: fnd_msg_pub.count_and_get (
4211: p_count => x_msg_count,
4212: p_data => x_msg_data
4213: );
4214:
4217: --dbms_ourtput.put_line('Delete_TerrType_Record PVT: OTHERS - ' || SQLERRM);
4218: ROLLBACK TO delete_terr_record_pvt;
4219: x_return_status := fnd_api.g_ret_sts_unexp_error;
4220:
4221: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4222: THEN
4223: fnd_msg_pub.add_exc_msg (
4224: g_pkg_name,
4225: 'Error inside Delete_TerrType_Record ' || SQLERRM
4219: x_return_status := fnd_api.g_ret_sts_unexp_error;
4220:
4221: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4222: THEN
4223: fnd_msg_pub.add_exc_msg (
4224: g_pkg_name,
4225: 'Error inside Delete_TerrType_Record ' || SQLERRM
4226: );
4227: END IF;
4286:
4287: -- Initialize message list if p_init_msg_list is set to TRUE.
4288: IF fnd_api.to_boolean (p_init_msg_list)
4289: THEN
4290: fnd_msg_pub.initialize;
4291: END IF;
4292:
4293: -- Debug Message
4294: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4290: fnd_msg_pub.initialize;
4291: END IF;
4292:
4293: -- Debug Message
4294: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4295: THEN
4296: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4297: fnd_message.set_name ('PROC_NAME', l_api_name);
4298: fnd_msg_pub.add;
4294: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4295: THEN
4296: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4297: fnd_message.set_name ('PROC_NAME', l_api_name);
4298: fnd_msg_pub.add;
4299: END IF;
4300:
4301: --Initialize the return status to success
4302: x_return_status := fnd_api.g_ret_sts_success;
4318:
4319: --Prepare message token
4320: fnd_message.set_name ('ITEMS_DELETED', l_row_count);
4321: --Add message to API message list
4322: fnd_msg_pub.add;
4323:
4324: -- Debug Message
4325: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4326: THEN
4321: --Add message to API message list
4322: fnd_msg_pub.add;
4323:
4324: -- Debug Message
4325: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4326: THEN
4327: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4328: fnd_message.set_name ('PROC_NAME', l_api_name);
4329: fnd_msg_pub.add;
4325: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4326: THEN
4327: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4328: fnd_message.set_name ('PROC_NAME', l_api_name);
4329: fnd_msg_pub.add;
4330: END IF;
4331:
4332: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4333:
4328: fnd_message.set_name ('PROC_NAME', l_api_name);
4329: fnd_msg_pub.add;
4330: END IF;
4331:
4332: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4333:
4334: -- Standard check for p_commit
4335: IF fnd_api.to_boolean (p_commit)
4336: THEN
4344: THEN
4345: --dbms_ourtput.put_line('Delete_TerrType_Usages PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
4346: ROLLBACK TO delete_terrtype_usgs_pvt;
4347: x_return_status := fnd_api.g_ret_sts_unexp_error;
4348: fnd_msg_pub.count_and_get (
4349: p_count => x_msg_count,
4350: p_data => x_msg_data
4351: );
4352: WHEN OTHERS
4354: --dbms_ourtput.put_line('Delete_TerrType_Usages PVT: OTHERS - ' || SQLERRM);
4355: ROLLBACK TO delete_terrtype_usgs_pvt;
4356: x_return_status := fnd_api.g_ret_sts_unexp_error;
4357:
4358: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4359: THEN
4360: fnd_msg_pub.add_exc_msg (
4361: g_pkg_name,
4362: 'Error inside Delete_TerrType_Usages ' || SQLERRM
4356: x_return_status := fnd_api.g_ret_sts_unexp_error;
4357:
4358: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4359: THEN
4360: fnd_msg_pub.add_exc_msg (
4361: g_pkg_name,
4362: 'Error inside Delete_TerrType_Usages ' || SQLERRM
4363: );
4364: END IF;
4425:
4426: -- Initialize message list if p_init_msg_list is set to TRUE.
4427: IF fnd_api.to_boolean (p_init_msg_list)
4428: THEN
4429: fnd_msg_pub.initialize;
4430: END IF;
4431:
4432: -- Debug Message
4433: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4429: fnd_msg_pub.initialize;
4430: END IF;
4431:
4432: -- Debug Message
4433: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4434: THEN
4435: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4436: fnd_message.set_name ('PROC_NAME', l_api_name);
4437: fnd_msg_pub.add;
4433: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4434: THEN
4435: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4436: fnd_message.set_name ('PROC_NAME', l_api_name);
4437: fnd_msg_pub.add;
4438: END IF;
4439:
4440: --Initialize the return status to success
4441: x_return_status := fnd_api.g_ret_sts_success;
4459:
4460: --Prepare message token
4461: fnd_message.set_name ('ITEMS_DELETED', l_row_count);
4462: --Add message to API message list
4463: fnd_msg_pub.add;
4464:
4465: -- Debug Message
4466: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4467: THEN
4462: --Add message to API message list
4463: fnd_msg_pub.add;
4464:
4465: -- Debug Message
4466: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4467: THEN
4468: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4469: fnd_message.set_name ('PROC_NAME', l_api_name);
4470: fnd_msg_pub.add;
4466: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4467: THEN
4468: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4469: fnd_message.set_name ('PROC_NAME', l_api_name);
4470: fnd_msg_pub.add;
4471: END IF;
4472:
4473: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4474:
4469: fnd_message.set_name ('PROC_NAME', l_api_name);
4470: fnd_msg_pub.add;
4471: END IF;
4472:
4473: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4474:
4475: -- Standard check for p_commit
4476: IF fnd_api.to_boolean (p_commit)
4477: THEN
4484: THEN
4485: --dbms_ourtput.put_line('Delete_TerrTypeQualType_Usage PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
4486: ROLLBACK TO delete_typequaltypeusg_pvt;
4487: x_return_status := fnd_api.g_ret_sts_unexp_error;
4488: fnd_msg_pub.count_and_get (
4489: p_count => x_msg_count,
4490: p_data => x_msg_data
4491: );
4492: WHEN OTHERS
4494: --dbms_ourtput.put_line('Delete_TerrTypeQualType_Usage PVT: OTHERS - ' || SQLERRM);
4495: ROLLBACK TO delete_typequaltypeusg_pvt;
4496: x_return_status := fnd_api.g_ret_sts_unexp_error;
4497:
4498: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4499: THEN
4500: fnd_msg_pub.add_exc_msg (
4501: g_pkg_name,
4502: 'Error inside Delete_TerrTypeQualType_Usage ' || SQLERRM
4496: x_return_status := fnd_api.g_ret_sts_unexp_error;
4497:
4498: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4499: THEN
4500: fnd_msg_pub.add_exc_msg (
4501: g_pkg_name,
4502: 'Error inside Delete_TerrTypeQualType_Usage ' || SQLERRM
4503: );
4504: END IF;
4565:
4566: -- Initialize message list if p_init_msg_list is set to TRUE.
4567: IF fnd_api.to_boolean (p_init_msg_list)
4568: THEN
4569: fnd_msg_pub.initialize;
4570: END IF;
4571:
4572: -- Debug Message
4573: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4569: fnd_msg_pub.initialize;
4570: END IF;
4571:
4572: -- Debug Message
4573: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4574: THEN
4575: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4576: fnd_message.set_name ('PROC_NAME', l_api_name);
4577: fnd_msg_pub.add;
4573: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4574: THEN
4575: fnd_message.set_name ('JTF', 'JTF_TERR_START_MSG');
4576: fnd_message.set_name ('PROC_NAME', l_api_name);
4577: fnd_msg_pub.add;
4578: END IF;
4579:
4580: --Initialize the return status to success
4581: x_return_status := fnd_api.g_ret_sts_success;
4597:
4598: --Prepare message token
4599: fnd_message.set_name ('ITEMS_DELETED', l_row_count);
4600: --Add message to API message list
4601: fnd_msg_pub.add ();
4602:
4603: -- Debug Message
4604: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4605: THEN
4600: --Add message to API message list
4601: fnd_msg_pub.add ();
4602:
4603: -- Debug Message
4604: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4605: THEN
4606: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4607: fnd_message.set_name ('PROC_NAME', l_api_name);
4608: fnd_msg_pub.add;
4604: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_debug_low)
4605: THEN
4606: fnd_message.set_name ('JTF', 'JTF_TERR_END_MSG');
4607: fnd_message.set_name ('PROC_NAME', l_api_name);
4608: fnd_msg_pub.add;
4609: END IF;
4610:
4611: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4612:
4607: fnd_message.set_name ('PROC_NAME', l_api_name);
4608: fnd_msg_pub.add;
4609: END IF;
4610:
4611: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4612:
4613: -- Standard check for p_commit
4614: IF fnd_api.to_boolean (p_commit)
4615: THEN
4622: THEN
4623: --dbms_ourtput.put_line('Delete_TerrType_Qualifier PVT: FND_API.G_EXC_UNEXPECTED_ERROR');
4624: ROLLBACK TO delete_terrtypequal_pvt;
4625: x_return_status := fnd_api.g_ret_sts_unexp_error;
4626: fnd_msg_pub.count_and_get (
4627: p_count => x_msg_count,
4628: p_data => x_msg_data
4629: );
4630: WHEN OTHERS
4632: --dbms_ourtput.put_line('Delete_TerrType_Qualifier PVT: OTHERS - ' || SQLERRM);
4633: ROLLBACK TO delete_terrtypequal_pvt;
4634: x_return_status := fnd_api.g_ret_sts_unexp_error;
4635:
4636: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4637: THEN
4638: fnd_msg_pub.add_exc_msg (
4639: g_pkg_name,
4640: 'Delete error inside Delete_TerrType_Qualifier'
4634: x_return_status := fnd_api.g_ret_sts_unexp_error;
4635:
4636: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error)
4637: THEN
4638: fnd_msg_pub.add_exc_msg (
4639: g_pkg_name,
4640: 'Delete error inside Delete_TerrType_Qualifier'
4641: );
4642: END IF;
4663: --
4664: IF (p_terr_type_rec.name IS NULL) OR
4665: (p_terr_type_rec.name = fnd_api.g_miss_char)
4666: THEN
4667: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4668: THEN
4669: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4670: fnd_message.set_token ('COL_NAME', 'NAME');
4671: fnd_msg_pub.add;
4667: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4668: THEN
4669: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4670: fnd_message.set_token ('COL_NAME', 'NAME');
4671: fnd_msg_pub.add;
4672: END IF;
4673:
4674: x_return_status := fnd_api.g_ret_sts_error;
4675: END IF;
4678: --
4679: IF (p_terr_type_rec.application_short_name IS NULL)
4680: OR (p_terr_type_rec.application_short_name = fnd_api.g_miss_char)
4681: THEN
4682: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4683: THEN
4684: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4685: fnd_message.set_token ('COL_NAME', 'APPLICATION_SHORT_NAME');
4686: fnd_msg_pub.add;
4682: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4683: THEN
4684: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4685: fnd_message.set_token ('COL_NAME', 'APPLICATION_SHORT_NAME');
4686: fnd_msg_pub.add;
4687: END IF;
4688:
4689: x_return_status := fnd_api.g_ret_sts_error;
4690: END IF;
4693: --
4694: IF (p_terr_type_rec.enabled_flag IS NULL)
4695: OR (p_terr_type_rec.enabled_flag = fnd_api.g_miss_char)
4696: THEN
4697: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4698: THEN
4699: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4700: fnd_message.set_token ('COL_NAME', 'ENABLED_FLAG');
4701: fnd_msg_pub.add;
4697: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4698: THEN
4699: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4700: fnd_message.set_token ('COL_NAME', 'ENABLED_FLAG');
4701: fnd_msg_pub.add;
4702: END IF;
4703:
4704: x_return_status := fnd_api.g_ret_sts_error;
4705: END IF;
4707: /* -- Check for ORG_ID - Not Required: ORG_ID is NULLable
4708: IF (p_terr_type_rec.org_id IS NULL)
4709: OR (p_terr_type_rec.org_id = fnd_api.g_miss_num)
4710: THEN
4711: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4712: THEN
4713: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4714: fnd_message.set_token ('COL_NAME', 'ORG_ID');
4715: fnd_msg_pub.add;
4711: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4712: THEN
4713: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4714: fnd_message.set_token ('COL_NAME', 'ORG_ID');
4715: fnd_msg_pub.add;
4716: END IF;
4717:
4718: x_return_status := fnd_api.g_ret_sts_error;
4719: END IF;
4722: --Check created by
4723: IF ( p_terr_type_rec.created_by IS NULL
4724: OR p_terr_type_rec.created_by = fnd_api.g_miss_num)
4725: THEN
4726: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4727: THEN
4728: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4729: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
4730: fnd_msg_pub.add;
4726: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4727: THEN
4728: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4729: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
4730: fnd_msg_pub.add;
4731: END IF;
4732:
4733: x_return_status := fnd_api.g_ret_sts_error;
4734: END IF;
4736: --Check creation date
4737: IF ( p_terr_type_rec.creation_date IS NULL
4738: OR p_terr_type_rec.creation_date = fnd_api.g_miss_date)
4739: THEN
4740: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4741: THEN
4742: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4743: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
4744: fnd_msg_pub.add;
4740: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4741: THEN
4742: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4743: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
4744: fnd_msg_pub.add;
4745: END IF;
4746:
4747: x_return_status := fnd_api.g_ret_sts_error;
4748: END IF;
4750: -- Validate last updated by
4751: IF ( p_terr_type_rec.last_updated_by IS NULL
4752: OR p_terr_type_rec.last_updated_by = fnd_api.g_miss_num)
4753: THEN
4754: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4755: THEN
4756: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4757: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
4758: fnd_msg_pub.add;
4754: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4755: THEN
4756: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4757: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
4758: fnd_msg_pub.add;
4759: END IF;
4760:
4761: x_return_status := fnd_api.g_ret_sts_error;
4762: END IF;
4764: -- Check last update date
4765: IF ( p_terr_type_rec.last_update_date IS NULL
4766: OR p_terr_type_rec.last_update_date = fnd_api.g_miss_date)
4767: THEN
4768: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4769: THEN
4770: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4771: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
4772: fnd_msg_pub.add;
4768: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4769: THEN
4770: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4771: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
4772: fnd_msg_pub.add;
4773: END IF;
4774:
4775: x_return_status := fnd_api.g_ret_sts_error;
4776: END IF;
4778: --Check last update login
4779: IF ( p_terr_type_rec.last_update_login IS NULL
4780: OR p_terr_type_rec.last_update_login = fnd_api.g_miss_num)
4781: THEN
4782: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4783: THEN
4784: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4785: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
4786: fnd_msg_pub.add;
4782: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4783: THEN
4784: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4785: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
4786: fnd_msg_pub.add;
4787: END IF;
4788:
4789: x_return_status := fnd_api.g_ret_sts_error;
4790: END IF;
4790: END IF;
4791:
4792: -- Since the message stack is already set
4793: --
4794: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4795: EXCEPTION
4796: --
4797: WHEN fnd_api.g_exc_error
4798: THEN
4799: --dbms_output.put_line (
4800: -- 'Validate_TerrType_Header: FND_API.G_EXC_ERROR'
4801: --);
4802: x_return_status := fnd_api.g_ret_sts_error;
4803: fnd_msg_pub.count_and_get (
4804: p_count => x_msg_count,
4805: p_data => x_msg_data
4806: );
4807: WHEN fnd_api.g_exc_unexpected_error
4809: --dbms_output.put_line (
4810: -- 'Validate_TerrType_Header: FND_API.G_EXC_UNEXPECTED_ERROR'
4811: --);
4812: x_return_status := fnd_api.g_ret_sts_unexp_error;
4813: fnd_msg_pub.count_and_get (
4814: p_count => x_msg_count,
4815: p_data => x_msg_data
4816: );
4817: WHEN OTHERS
4819: --dbms_output.put_line (
4820: -- 'Validate_TerrType_Header: OTHERS - ' || SQLERRM
4821: --);
4822: x_return_status := fnd_api.g_ret_sts_unexp_error;
4823: fnd_msg_pub.count_and_get (
4824: p_count => x_msg_count,
4825: p_data => x_msg_data
4826: );
4827: --
4881: -- 'Validate_Qualifier: NO_DATA_FOUND Exception'
4882: --);
4883: x_return_status := fnd_api.g_ret_sts_error;
4884: fnd_message.set_name ('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
4885: fnd_msg_pub.add;
4886: fnd_msg_pub.count_and_get (
4887: p_count => x_msg_count,
4888: p_data => x_msg_data
4889: );
4882: --);
4883: x_return_status := fnd_api.g_ret_sts_error;
4884: fnd_message.set_name ('JTF', 'JTF_TERR_DISABLED_TERR_QUAL');
4885: fnd_msg_pub.add;
4886: fnd_msg_pub.count_and_get (
4887: p_count => x_msg_count,
4888: p_data => x_msg_data
4889: );
4890: END;
4892: /* -- Check for ORG_ID - not required: ORG_ID is NULLable
4893: IF ( p_terrtypequal_rec.org_id IS NULL
4894: OR p_terrtypequal_rec.org_id = fnd_api.g_miss_num)
4895: THEN
4896: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4897: THEN
4898: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4899: fnd_message.set_token ('COL_NAME', 'ORG_ID');
4900: fnd_msg_pub.add;
4896: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4897: THEN
4898: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4899: fnd_message.set_token ('COL_NAME', 'ORG_ID');
4900: fnd_msg_pub.add;
4901: END IF;
4902:
4903: x_return_status := fnd_api.g_ret_sts_error;
4904: END IF;
4907: --Check created by
4908: IF ( p_terrtypequal_rec.created_by IS NULL
4909: OR p_terrtypequal_rec.created_by = fnd_api.g_miss_num)
4910: THEN
4911: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4912: THEN
4913: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4914: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
4915: fnd_msg_pub.add;
4911: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4912: THEN
4913: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4914: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
4915: fnd_msg_pub.add;
4916: END IF;
4917:
4918: x_return_status := fnd_api.g_ret_sts_error;
4919: END IF;
4921: --Check creation date
4922: IF ( p_terrtypequal_rec.creation_date IS NULL
4923: OR p_terrtypequal_rec.creation_date = fnd_api.g_miss_date)
4924: THEN
4925: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4926: THEN
4927: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4928: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
4929: fnd_msg_pub.add;
4925: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4926: THEN
4927: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4928: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
4929: fnd_msg_pub.add;
4930: END IF;
4931:
4932: x_return_status := fnd_api.g_ret_sts_error;
4933: END IF;
4935: -- Validate last updated by
4936: IF ( p_terrtypequal_rec.last_updated_by IS NULL
4937: OR p_terrtypequal_rec.last_updated_by = fnd_api.g_miss_num)
4938: THEN
4939: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4940: THEN
4941: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4942: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
4943: fnd_msg_pub.add;
4939: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4940: THEN
4941: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4942: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
4943: fnd_msg_pub.add;
4944: END IF;
4945:
4946: x_return_status := fnd_api.g_ret_sts_error;
4947: END IF;
4949: -- Check last update date
4950: IF ( p_terrtypequal_rec.last_update_date IS NULL
4951: OR p_terrtypequal_rec.last_update_date = fnd_api.g_miss_date)
4952: THEN
4953: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4954: THEN
4955: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4956: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
4957: fnd_msg_pub.add;
4953: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4954: THEN
4955: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4956: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
4957: fnd_msg_pub.add;
4958: END IF;
4959:
4960: x_return_status := fnd_api.g_ret_sts_error;
4961: END IF;
4963: --Check last update login
4964: IF ( p_terrtypequal_rec.last_update_login IS NULL
4965: OR p_terrtypequal_rec.last_update_login = fnd_api.g_miss_num)
4966: THEN
4967: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4968: THEN
4969: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4970: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
4971: fnd_msg_pub.add;
4967: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
4968: THEN
4969: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
4970: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
4971: fnd_msg_pub.add;
4972: END IF;
4973:
4974: x_return_status := fnd_api.g_ret_sts_error;
4975: END IF;
4974: x_return_status := fnd_api.g_ret_sts_error;
4975: END IF;
4976:
4977: --
4978: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
4979: --dbms_output.put_line ('Validate_Qualifier: Exiting API');
4980: EXCEPTION
4981: --
4982: WHEN OTHERS
4983: THEN
4984: --dbms_output.put_line ('Validate_Qualifier: Others Exception');
4985: x_return_status := fnd_api.g_ret_sts_unexp_error;
4986: fnd_message.set_name ('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4987: fnd_msg_pub.add;
4988: fnd_msg_pub.count_and_get (
4989: p_count => x_msg_count,
4990: p_data => x_msg_data
4991: );
4984: --dbms_output.put_line ('Validate_Qualifier: Others Exception');
4985: x_return_status := fnd_api.g_ret_sts_unexp_error;
4986: fnd_message.set_name ('JTF', 'JTF_TERR_UNEXPECTED_ERROR');
4987: fnd_msg_pub.add;
4988: fnd_msg_pub.count_and_get (
4989: p_count => x_msg_count,
4990: p_data => x_msg_data
4991: );
4992: --
5036: --);
5037: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5038: fnd_message.set_token ('TABLE_NAME', 'JTF_TERR_TYPES');
5039: fnd_message.set_token ('COLUMN_NAME', 'TERR_TYPE_ID');
5040: fnd_msg_pub.add;
5041: x_return_status := fnd_api.g_ret_sts_error;
5042: END IF;
5043:
5044: --dbms_output.put_line (
5058: 'JTF_SOURCES'
5059: ) <>
5060: fnd_api.g_true
5061: THEN
5062: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5063: THEN
5064: --dbms_output.put_line ('Validate_Territory_Usage: FND_MSG_PUB.ADD');
5065: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5066: fnd_message.set_token ('TABLE_NAME', 'JTF_SOURCES');
5060: fnd_api.g_true
5061: THEN
5062: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5063: THEN
5064: --dbms_output.put_line ('Validate_Territory_Usage: FND_MSG_PUB.ADD');
5065: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5066: fnd_message.set_token ('TABLE_NAME', 'JTF_SOURCES');
5067: fnd_message.set_token ('COLUMN_NAME', 'SOURCE_ID');
5068: fnd_msg_pub.add;
5064: --dbms_output.put_line ('Validate_Territory_Usage: FND_MSG_PUB.ADD');
5065: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5066: fnd_message.set_token ('TABLE_NAME', 'JTF_SOURCES');
5067: fnd_message.set_token ('COLUMN_NAME', 'SOURCE_ID');
5068: fnd_msg_pub.add;
5069: END IF;
5070:
5071: x_return_status := fnd_api.g_ret_sts_error;
5072: END IF;
5074: /* -- Check for ORG_ID - Not Required: ORG_ID is NULLable
5075: IF (p_terrtypeusgs_rec.org_id IS NULL)
5076: OR (p_terrtypeusgs_rec.org_id = fnd_api.g_miss_num)
5077: THEN
5078: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5079: THEN
5080: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5081: fnd_message.set_token ('COL_NAME', 'ORG_ID');
5082: fnd_msg_pub.add;
5078: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5079: THEN
5080: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5081: fnd_message.set_token ('COL_NAME', 'ORG_ID');
5082: fnd_msg_pub.add;
5083: END IF;
5084:
5085: x_return_status := fnd_api.g_ret_sts_error;
5086: END IF;
5089: --Check created by
5090: IF ( p_terrtypeusgs_rec.created_by IS NULL
5091: OR p_terrtypeusgs_rec.created_by = fnd_api.g_miss_num)
5092: THEN
5093: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5094: THEN
5095: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5096: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
5097: fnd_msg_pub.add;
5093: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5094: THEN
5095: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5096: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
5097: fnd_msg_pub.add;
5098: END IF;
5099:
5100: x_return_status := fnd_api.g_ret_sts_error;
5101: END IF;
5103: --Check creation date
5104: IF ( p_terrtypeusgs_rec.creation_date IS NULL
5105: OR p_terrtypeusgs_rec.creation_date = fnd_api.g_miss_date)
5106: THEN
5107: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5108: THEN
5109: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5110: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
5111: fnd_msg_pub.add;
5107: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5108: THEN
5109: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5110: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
5111: fnd_msg_pub.add;
5112: END IF;
5113:
5114: x_return_status := fnd_api.g_ret_sts_error;
5115: END IF;
5117: -- Validate last updated by
5118: IF ( p_terrtypeusgs_rec.last_updated_by IS NULL
5119: OR p_terrtypeusgs_rec.last_updated_by = fnd_api.g_miss_num)
5120: THEN
5121: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5122: THEN
5123: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5124: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
5125: fnd_msg_pub.add;
5121: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5122: THEN
5123: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5124: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
5125: fnd_msg_pub.add;
5126: END IF;
5127:
5128: x_return_status := fnd_api.g_ret_sts_error;
5129: END IF;
5131: -- Check last update date
5132: IF ( p_terrtypeusgs_rec.last_update_date IS NULL
5133: OR p_terrtypeusgs_rec.last_update_date = fnd_api.g_miss_date)
5134: THEN
5135: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5136: THEN
5137: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5138: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
5139: fnd_msg_pub.add;
5135: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5136: THEN
5137: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5138: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
5139: fnd_msg_pub.add;
5140: END IF;
5141:
5142: x_return_status := fnd_api.g_ret_sts_error;
5143: END IF;
5145: --Check last update login
5146: IF ( p_terrtypeusgs_rec.last_update_login IS NULL
5147: OR p_terrtypeusgs_rec.last_update_login = fnd_api.g_miss_num)
5148: THEN
5149: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5150: THEN
5151: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5152: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
5153: fnd_msg_pub.add;
5149: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5150: THEN
5151: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5152: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
5153: fnd_msg_pub.add;
5154: END IF;
5155:
5156: x_return_status := fnd_api.g_ret_sts_error;
5157: END IF;
5156: x_return_status := fnd_api.g_ret_sts_error;
5157: END IF;
5158:
5159: --
5160: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
5161: EXCEPTION
5162: --
5163: WHEN fnd_api.g_exc_error
5164: THEN
5163: WHEN fnd_api.g_exc_error
5164: THEN
5165: --dbms_output.put_line ('Validate_TerrType_Usage: FND_API.G_EXC_ERROR');
5166: x_return_status := fnd_api.g_ret_sts_error;
5167: fnd_msg_pub.count_and_get (
5168: p_count => x_msg_count,
5169: p_data => x_msg_data
5170: );
5171: WHEN fnd_api.g_exc_unexpected_error
5173: --dbms_output.put_line (
5174: -- 'Validate_TerrType_Usage: FND_API.G_EXC_UNEXPECTED_ERROR'
5175: --);
5176: x_return_status := fnd_api.g_ret_sts_unexp_error;
5177: fnd_msg_pub.count_and_get (
5178: p_count => x_msg_count,
5179: p_data => x_msg_data
5180: );
5181: WHEN OTHERS
5183: --dbms_output.put_line (
5184: -- 'Validate_TerrType_Usage: OTHERS - ' || SQLERRM
5185: --);
5186: x_return_status := fnd_api.g_ret_sts_unexp_error;
5187: fnd_msg_pub.count_and_get (
5188: p_count => x_msg_count,
5189: p_data => x_msg_data
5190: );
5191: --
5234: EXCEPTION
5235: WHEN NO_DATA_FOUND
5236: THEN
5237: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_TERR_QTYPE');
5238: fnd_msg_pub.add;
5239: RAISE fnd_api.g_exc_unexpected_error;
5240: END;
5241:
5242: -- Validate the territory Id
5260: --dbms_output.put_line (
5261: -- 'Validate_Foreign_Key: l_status <> FND_API.G_TRUE'
5262: --);
5263:
5264: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5265: THEN
5266: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5267: fnd_message.set_token ('TABLE_NAME', 'JTF_TERR_TYPES');
5268: fnd_message.set_token ('COLUMN_NAME', 'TERR_TYPE_ID');
5265: THEN
5266: fnd_message.set_name ('JTF', 'JTF_TERR_INVALID_FOREIGN_KEY');
5267: fnd_message.set_token ('TABLE_NAME', 'JTF_TERR_TYPES');
5268: fnd_message.set_token ('COLUMN_NAME', 'TERR_TYPE_ID');
5269: fnd_msg_pub.add;
5270: END IF;
5271:
5272: x_return_status := fnd_api.g_ret_sts_error;
5273: END IF;
5278: /* -- Check for ORG_ID - Not Required: ORG_ID is NULLable
5279: IF (p_type_qualtypeusgs_rec.org_id IS NULL)
5280: OR (p_type_qualtypeusgs_rec.org_id = fnd_api.g_miss_num)
5281: THEN
5282: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5283: THEN
5284: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5285: fnd_message.set_token ('COL_NAME', 'ORG_ID');
5286: fnd_msg_pub.add;
5282: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5283: THEN
5284: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5285: fnd_message.set_token ('COL_NAME', 'ORG_ID');
5286: fnd_msg_pub.add;
5287: END IF;
5288:
5289: x_return_status := fnd_api.g_ret_sts_error;
5290: END IF;
5293: --Check created by
5294: IF ( p_type_qualtypeusgs_rec.created_by IS NULL
5295: OR p_type_qualtypeusgs_rec.created_by = fnd_api.g_miss_num)
5296: THEN
5297: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5298: THEN
5299: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5300: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
5301: fnd_msg_pub.add;
5297: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5298: THEN
5299: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5300: fnd_message.set_token ('COL_NAME', 'CREATED_BY');
5301: fnd_msg_pub.add;
5302: END IF;
5303:
5304: x_return_status := fnd_api.g_ret_sts_error;
5305: END IF;
5307: --Check creation date
5308: IF ( p_type_qualtypeusgs_rec.creation_date IS NULL
5309: OR p_type_qualtypeusgs_rec.creation_date = fnd_api.g_miss_date)
5310: THEN
5311: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5312: THEN
5313: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5314: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
5315: fnd_msg_pub.add;
5311: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5312: THEN
5313: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5314: fnd_message.set_token ('COL_NAME', 'CREATION_DATE');
5315: fnd_msg_pub.add;
5316: END IF;
5317:
5318: x_return_status := fnd_api.g_ret_sts_error;
5319: END IF;
5321: -- Validate last updated by
5322: IF ( p_type_qualtypeusgs_rec.last_updated_by IS NULL
5323: OR p_type_qualtypeusgs_rec.last_updated_by = fnd_api.g_miss_num)
5324: THEN
5325: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5326: THEN
5327: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5328: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
5329: fnd_msg_pub.add;
5325: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5326: THEN
5327: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5328: fnd_message.set_token ('COL_NAME', 'LAST_UPDATED_BY');
5329: fnd_msg_pub.add;
5330: END IF;
5331:
5332: x_return_status := fnd_api.g_ret_sts_error;
5333: END IF;
5335: -- Check last update date
5336: IF ( p_type_qualtypeusgs_rec.last_update_date IS NULL
5337: OR p_type_qualtypeusgs_rec.last_update_date = fnd_api.g_miss_date)
5338: THEN
5339: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5340: THEN
5341: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5342: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
5343: fnd_msg_pub.add;
5339: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5340: THEN
5341: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5342: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_DATE');
5343: fnd_msg_pub.add;
5344: END IF;
5345:
5346: x_return_status := fnd_api.g_ret_sts_error;
5347: END IF;
5349: --Check last update login
5350: IF ( p_type_qualtypeusgs_rec.last_update_login IS NULL
5351: OR p_type_qualtypeusgs_rec.last_update_login = fnd_api.g_miss_num)
5352: THEN
5353: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5354: THEN
5355: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5356: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
5357: fnd_msg_pub.add;
5353: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error)
5354: THEN
5355: fnd_message.set_name ('JTF', 'JTF_TERR_MISSING_COL_VALUE');
5356: fnd_message.set_token ('COL_NAME', 'LAST_UPDATE_LOGIN');
5357: fnd_msg_pub.add;
5358: END IF;
5359:
5360: x_return_status := fnd_api.g_ret_sts_error;
5361: END IF;
5360: x_return_status := fnd_api.g_ret_sts_error;
5361: END IF;
5362:
5363: --
5364: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
5365: EXCEPTION
5366: --
5367: WHEN fnd_api.g_exc_error
5368: THEN
5369: --dbms_output.put_line (
5370: -- 'Validate_Type_Qtype_Usage: FND_API.G_EXC_ERROR'
5371: --);
5372: x_return_status := fnd_api.g_ret_sts_error;
5373: fnd_msg_pub.count_and_get (
5374: p_count => x_msg_count,
5375: p_data => x_msg_data
5376: );
5377: WHEN fnd_api.g_exc_unexpected_error
5379: --dbms_output.put_line (
5380: -- 'Validate_Type_Qtype_Usage: FND_API.G_EXC_UNEXPECTED_ERROR'
5381: --);
5382: x_return_status := fnd_api.g_ret_sts_unexp_error;
5383: fnd_msg_pub.count_and_get (
5384: p_count => x_msg_count,
5385: p_data => x_msg_data
5386: );
5387: WHEN OTHERS
5389: --dbms_output.put_line (
5390: -- 'Validate_Type_Qtype_Usage: OTHERS - ' || SQLERRM
5391: --);
5392: x_return_status := fnd_api.g_ret_sts_unexp_error;
5393: fnd_msg_pub.count_and_get (
5394: p_count => x_msg_count,
5395: p_data => x_msg_data
5396: );
5397: --
5429: x_return_status := fnd_api.g_ret_sts_success;
5430: END IF;
5431:
5432: --
5433: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
5434: EXCEPTION
5435: --
5436: WHEN fnd_api.g_exc_error
5437: THEN
5435: --
5436: WHEN fnd_api.g_exc_error
5437: THEN
5438: x_return_status := fnd_api.g_ret_sts_error;
5439: fnd_msg_pub.count_and_get (
5440: p_count => x_msg_count,
5441: p_data => x_msg_data
5442: );
5443: WHEN OTHERS
5444: THEN
5445: x_return_status := fnd_api.g_ret_sts_unexp_error;
5446: fnd_message.set_name ('JTF', 'JTF_TERR_UNKNOWN_ERROR');
5447: fnd_message.set_name ('P_TEXT', SQLERRM);
5448: fnd_msg_pub.add;
5449: fnd_msg_pub.count_and_get (
5450: p_count => x_msg_count,
5451: p_data => x_msg_data
5452: );
5445: x_return_status := fnd_api.g_ret_sts_unexp_error;
5446: fnd_message.set_name ('JTF', 'JTF_TERR_UNKNOWN_ERROR');
5447: fnd_message.set_name ('P_TEXT', SQLERRM);
5448: fnd_msg_pub.add;
5449: fnd_msg_pub.count_and_get (
5450: p_count => x_msg_count,
5451: p_data => x_msg_data
5452: );
5453: --