512: /*========================================================================
513:
514: PROCEDURE NAME: handle_error
515:
516: PURPOSE: Standard error handler as per Business object API standards
517:
518: ========================================================================*/
519: PROCEDURE
520: handle_error
625: /*========================================================================
626:
627: PROCEDURE NAME: api_post_call
628:
629: PURPOSE: Implements standard API post call process, as per business
630: object API standards
631:
632: ========================================================================*/
633: PROCEDURE
626:
627: PROCEDURE NAME: api_post_call
628:
629: PURPOSE: Implements standard API post call process, as per business
630: object API standards
631:
632: ========================================================================*/
633: PROCEDURE
634: api_post_call
717: /*========================================================================
718:
719: PROCEDURE NAME: api_header
720:
721: PURPOSE: Standard API header as per Business object API standards
722:
723: ========================================================================*/
724: PROCEDURE
725: api_header
741: l_statement VARCHAR2(32767);
742: --}
743: BEGIN
744: --{
745: -- Standard Start of API Savepoint
746: --
747: l_location := '0010';
748: --
749: l_savepoint_name := SUBSTR(p_package_name,1,18)
767: --
768: EXECUTE IMMEDIATE l_statement;
769: --
770: --
771: -- Standard call to check for call compatibility
772: --
773: l_location := '0040';
774: --
775: IF NOT FND_API.Compatible_API_Call
827: /*========================================================================
828:
829: PROCEDURE NAME: api_footer
830:
831: PURPOSE: Standard API footer as per Business object API standards
832:
833: ========================================================================*/
834: PROCEDURE
835: api_footer
846: BEGIN
847: --{
848: --
849: --
850: -- Standard check of p_commit
851: --
852: l_location := '0010';
853: --
854: IF FND_API.to_Boolean( p_commit )
860: --}
861: END IF;
862: --
863: --
864: -- Standard call to get message count
865: -- and if count is 1, get message info
866: --
867: l_location := '0030';
868: --
1119: --}
1120: BEGIN
1121: --{
1122: --
1123: -- Standard API Header
1124: --
1125: l_location := '0010';
1126: --
1127: vea_tpa_util_pvt.api_header
1164: --
1165: --} API Body
1166: --
1167: --
1168: -- Standard API Footer
1169: --
1170: l_location := '0040';
1171: --
1172: vea_tpa_util_pvt.api_footer
1263: --}
1264: BEGIN
1265: --{
1266: --
1267: -- Standard API Header
1268: --
1269: l_location := '0010';
1270: --
1271: vea_tpa_util_pvt.api_header
1291: --
1292: --} API Body
1293: --
1294: --
1295: -- Standard API Footer
1296: --
1297: l_location := '0030';
1298: --
1299: vea_tpa_util_pvt.api_footer
1456: RETURN;
1457: END IF;
1458: --
1459: --
1460: -- Standard API Header
1461: --
1462: l_location := '0020';
1463: --
1464: vea_tpa_util_pvt.api_header
1524: --
1525: --} API Body
1526: --
1527: --
1528: -- Standard API Footer
1529: --
1530: l_location := '0070';
1531: --
1532: vea_tpa_util_pvt.api_footer
1644: RETURN;
1645: END IF;
1646: --
1647: --
1648: -- Standard API Header
1649: --
1650: l_location := '0020';
1651:
1652:
1821: --
1822: --} API Body
1823: --
1824: --
1825: -- Standard API Footer
1826: --
1827: l_location := '0180';
1828: --
1829: vea_tpa_util_pvt.api_footer