476:
477: -- Initialize message list if p_init_msg_list is set to TRUE.
478: IF Fnd_Api.to_Boolean( p_init_msg_list )
479: THEN
480: Fnd_Msg_Pub.initialize;
481: END IF;
482:
483: -- Initialize API return status to success
484: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
603: COMMIT WORK;
604: END IF;
605:
606: -- Standard call to get message count and if count is 1, get message info.
607: Fnd_Msg_Pub.Count_And_Get(
608: p_count => x_msg_count,
609: p_data => x_msg_data );
610:
611: EXCEPTION
612: WHEN Fnd_Api.G_EXC_ERROR THEN
613: ROLLBACK TO CREATE_PERZ_QUERY_PVT;
614: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
615:
616: Fnd_Msg_Pub.Count_And_Get(
617: p_count => x_msg_count,
618: p_data => x_msg_data );
619:
620: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
621: ROLLBACK TO CREATE_PERZ_QUERY_PVT;
622: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
623: --x_return_status := SQLCODE||SUBSTR(SQLERRM,1,100);
624:
625: Fnd_Msg_Pub.Count_And_Get(
626: p_count => x_msg_count,
627: p_data => x_msg_data );
628:
629: WHEN OTHERS THEN
630: ROLLBACK TO CREATE_PERZ_QUERY_PVT;
631: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
632:
633: --x_return_status := SQLCODE||SUBSTR(SQLERRM,1,100);
634: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
635: THEN
636: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
637: END IF;
638:
632:
633: --x_return_status := SQLCODE||SUBSTR(SQLERRM,1,100);
634: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
635: THEN
636: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
637: END IF;
638:
639: Fnd_Msg_Pub.Count_And_Get
640: ( p_count => x_msg_count,
635: THEN
636: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
637: END IF;
638:
639: Fnd_Msg_Pub.Count_And_Get
640: ( p_count => x_msg_count,
641: p_data => x_msg_data );
642:
643: END Create_perz_query;
716:
717: -- Initialize message list if p_init_msg_list is set to TRUE.
718: IF Fnd_Api.to_Boolean( p_init_msg_list )
719: THEN
720: Fnd_Msg_Pub.initialize;
721: END IF;
722:
723: -- Initialize API return status to success
724: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
835: ROLLBACK TO UPDATE_PERZ_QUERY_PVT;
836: --x_return_status := FND_API.G_RET_STS_ERROR ;
837: x_return_status := SQLCODE||SUBSTR(SQLERRM,1,100);
838:
839: Fnd_Msg_Pub.Count_And_Get(
840: p_count => x_msg_count,
841: p_data => x_msg_data );
842:
843: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
844: -- dbms_output.put_line('stop 2 ');
845: ROLLBACK TO UPDATE_PERZ_QUERY_PVT;
846: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
847:
848: Fnd_Msg_Pub.Count_And_Get(
849: p_count => x_msg_count,
850: p_data => x_msg_data );
851:
852: WHEN OTHERS THEN
854: ROLLBACK TO UPDATE_PERZ_QUERY_PVT;
855: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
856: --x_return_status := SQLCODE||SUBSTR(SQLERRM,1,100);
857:
858: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
859: THEN
860: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
861: END IF;
862:
856: --x_return_status := SQLCODE||SUBSTR(SQLERRM,1,100);
857:
858: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
859: THEN
860: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
861: END IF;
862:
863: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
864: p_data => x_msg_data );
859: THEN
860: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
861: END IF;
862:
863: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
864: p_data => x_msg_data );
865:
866:
867: END update_perz_query;
894:
895: -- Initialize message list if p_init_msg_list is set to TRUE.
896: IF Fnd_Api.to_Boolean( p_init_msg_list )
897: THEN
898: Fnd_Msg_Pub.initialize;
899: END IF;
900:
901: -- Initialize API return status to success
902: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
944:
945: ROLLBACK TO DELETE_PERZ_QUERY_PVT;
946: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
947:
948: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
949: p_data => x_msg_data );
950:
951: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
952: --dbms_output.put_line('stop 2 ');
952: --dbms_output.put_line('stop 2 ');
953: ROLLBACK TO DELETE_PERZ_QUERY_PVT;
954: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
955:
956: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
957: p_data => x_msg_data );
958:
959: WHEN OTHERS THEN
960: --dbms_output.put_line('stop 3 ');
960: --dbms_output.put_line('stop 3 ');
961: ROLLBACK TO DELETE_PERZ_QUERY_PVT;
962: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
963:
964: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
965: THEN
966: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
967: END IF;
968:
962: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
963:
964: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
965: THEN
966: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
967: END IF;
968:
969: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
970: p_data => x_msg_data );
965: THEN
966: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
967: END IF;
968:
969: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
970: p_data => x_msg_data );
971:
972:
973: END Delete_perz_query;
1075:
1076: -- Initialize message list if p_init_msg_list is set to TRUE.
1077: IF Fnd_Api.to_Boolean( p_init_msg_list )
1078: THEN
1079: Fnd_Msg_Pub.initialize;
1080: END IF;
1081: -- Initialize API return status to success
1082: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1083:
1267:
1268: WHEN Fnd_Api.G_EXC_ERROR THEN
1269: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
1270:
1271: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
1272: p_data => x_msg_data );
1273:
1274: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1275: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1273:
1274: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1275: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1276:
1277: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
1278: p_data => x_msg_data );
1279:
1280: WHEN OTHERS THEN
1281: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1279:
1280: WHEN OTHERS THEN
1281: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1282:
1283: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1284: THEN
1285: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1286: END IF;
1287:
1281: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1282:
1283: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1284: THEN
1285: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1286: END IF;
1287:
1288: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
1289: p_data => x_msg_data );
1284: THEN
1285: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1286: END IF;
1287:
1288: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
1289: p_data => x_msg_data );
1290:
1291:
1292: END get_perz_query_summary;
1374:
1375: -- Initialize message list if p_init_msg_list is set to TRUE.
1376: IF Fnd_Api.to_Boolean( p_init_msg_list )
1377: THEN
1378: Fnd_Msg_Pub.initialize;
1379: END IF;
1380:
1381: -- Initialize API return status to success
1382: x_return_status := Fnd_Api.G_RET_STS_SUCCESS ;
1535: WHEN Fnd_Api.G_EXC_ERROR THEN
1536: -- dbms_output.put_line('stop 1 ');
1537: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
1538:
1539: Fnd_Msg_Pub.Count_And_Get
1540: ( p_count => x_msg_count,
1541: p_data => x_msg_data );
1542:
1543:
1544: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1545: --dbms_output.put_line('stop 2 ');
1546: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1547:
1548: Fnd_Msg_Pub.Count_And_Get
1549: ( p_count => x_msg_count,
1550: p_data => x_msg_data );
1551:
1552:
1553: WHEN OTHERS THEN
1554: --dbms_output.put_line('stop 3 ');
1555: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1556:
1557: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1558: THEN
1559: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1560: END IF;
1561:
1555: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1556:
1557: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1558: THEN
1559: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1560: END IF;
1561:
1562:
1563: Fnd_Msg_Pub.Count_And_Get
1559: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1560: END IF;
1561:
1562:
1563: Fnd_Msg_Pub.Count_And_Get
1564: ( p_count => x_msg_count,
1565: p_data => x_msg_data );
1566:
1567:
1628:
1629: -- Initialize message list if p_init_msg_list is set to TRUE.
1630: IF Fnd_Api.to_Boolean( p_init_msg_list )
1631: THEN
1632: Fnd_Msg_Pub.initialize;
1633: END IF;
1634:
1635: -- Initialize API return status to success
1636: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1767: COMMIT WORK;
1768: END IF;
1769:
1770: -- Standard call to get message count and if count is 1, get message info.
1771: Fnd_Msg_Pub.Count_And_Get( p_count => x_msg_count,
1772: p_data => x_msg_data );
1773:
1774: EXCEPTION
1775:
1778:
1779: ROLLBACK TO SAVE_PERZ_QUERY_PVT;
1780: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
1781:
1782: Fnd_Msg_Pub.Count_And_Get
1783: ( p_count => x_msg_count,
1784: p_data => x_msg_data );
1785:
1786: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1786: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1787: -- dbms_output.put_line('stop 2 ');
1788: ROLLBACK TO SAVE_PERZ_QUERY_PVT;
1789: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1790: Fnd_Msg_Pub.Count_And_Get
1791: ( p_count => x_msg_count,
1792: p_data => x_msg_data );
1793:
1794:
1796: -- dbms_output.put_line('stop 3 ');
1797: ROLLBACK TO SAVE_PERZ_QUERY_PVT;
1798: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1799:
1800: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1801: THEN
1802: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1803: END IF;
1804:
1798: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
1799:
1800: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
1801: THEN
1802: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1803: END IF;
1804:
1805: Fnd_Msg_Pub.Count_And_Get
1806: ( p_count => x_msg_count,
1801: THEN
1802: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1803: END IF;
1804:
1805: Fnd_Msg_Pub.Count_And_Get
1806: ( p_count => x_msg_count,
1807: p_data => x_msg_data );
1808:
1809: