40: BEGIN
41:
42: SAVEPOINT Get_User_Id_Clob_Pvt ;
43:
44: IF NOT FND_API.Compatible_API_Call ( l_api_version,
45: p_api_version,
46: l_api_name,
47: G_PKG_NAME )
48: THEN
45: p_api_version,
46: l_api_name,
47: G_PKG_NAME )
48: THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
50: END IF;
51:
52:
53: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
50: END IF;
51:
52:
53: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
54: FND_MSG_PUB.initialize ;
55: END IF;
56:
57: x_return_status := FND_API.G_RET_STS_SUCCESS ;
53: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
54: FND_MSG_PUB.initialize ;
55: END IF;
56:
57: x_return_status := FND_API.G_RET_STS_SUCCESS ;
58:
59: --
60: -- Get the Business Area ID for the object in question
61: --
76:
77: -- API Body
78:
79: ZPB_AW.INITIALIZE_USER(p_api_version => 1.0,
80: p_init_msg_list => FND_API.G_FALSE,
81: p_validation_level => p_validation_level,
82: x_return_status => x_return_status,
83: x_msg_count => x_msg_count,
84: x_msg_data => x_msg_data,
83: x_msg_count => x_msg_count,
84: x_msg_data => x_msg_data,
85: p_user => p_object_user_id,
86: p_business_area_id => l_business_area_id,
87: p_attach_readwrite => FND_API.G_FALSE);
88:
89:
90: ZPB_DATA_COLLECTION_UTIL_PVT.get_dc_owners(
91: p_object_id => l_master_object_id,
111: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
112: p_data => x_msg_data );
113: EXCEPTION
114:
115: WHEN FND_API.G_EXC_ERROR THEN
116:
117: ROLLBACK TO Get_User_Id_Clob_Pvt ;
118: x_return_status := FND_API.G_RET_STS_ERROR;
119: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
114:
115: WHEN FND_API.G_EXC_ERROR THEN
116:
117: ROLLBACK TO Get_User_Id_Clob_Pvt ;
118: x_return_status := FND_API.G_RET_STS_ERROR;
119: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
120: p_data => x_msg_data );
121:
122: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
118: x_return_status := FND_API.G_RET_STS_ERROR;
119: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
120: p_data => x_msg_data );
121:
122: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
123:
124: ROLLBACK TO Get_User_Id_Clob_Pvt ;
125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
126: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
121:
122: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
123:
124: ROLLBACK TO Get_User_Id_Clob_Pvt ;
125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
126: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
127: p_data => x_msg_data );
128:
129: WHEN OTHERS THEN
128:
129: WHEN OTHERS THEN
130:
131: ROLLBACK TO Get_User_Id_Clob_Pvt ;
132: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
133:
134: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
135: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
136: l_api_name);
213: BEGIN
214:
215: SAVEPOINT Populate_Approvers ;
216:
217: IF NOT FND_API.Compatible_API_Call ( l_api_version,
218: p_api_version,
219: l_api_name,
220: G_PKG_NAME )
221: THEN
218: p_api_version,
219: l_api_name,
220: G_PKG_NAME )
221: THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
223: END IF;
224:
225:
226: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
223: END IF;
224:
225:
226: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
227: FND_MSG_PUB.initialize ;
228: END IF;
229:
230: x_return_status := FND_API.G_RET_STS_SUCCESS ;
226: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
227: FND_MSG_PUB.initialize ;
228: END IF;
229:
230: x_return_status := FND_API.G_RET_STS_SUCCESS ;
231:
232: -- Initialize the parameters
233:
234: -- API Body
254: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
255: p_data => x_msg_data );
256: EXCEPTION
257:
258: WHEN FND_API.G_EXC_ERROR THEN
259:
260: ROLLBACK TO Populate_Approvers ;
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
257:
258: WHEN FND_API.G_EXC_ERROR THEN
259:
260: ROLLBACK TO Populate_Approvers ;
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
263: p_data => x_msg_data );
264:
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
263: p_data => x_msg_data );
264:
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266:
267: ROLLBACK TO Populate_Approvers ;
268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
269: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
264:
265: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
266:
267: ROLLBACK TO Populate_Approvers ;
268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
269: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
270: p_data => x_msg_data );
271:
272: WHEN OTHERS THEN
271:
272: WHEN OTHERS THEN
273:
274: ROLLBACK TO Populate_Approvers ;
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
276:
277: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
278: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
279: l_api_name);
637: BEGIN
638:
639: Generate_Template(
640: p_api_version => 1.0,
641: p_init_msg_list => FND_API.G_TRUE,
642: p_commit => FND_API.G_FALSE,
643: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
644: x_return_status => l_return_status,
645: x_msg_count => l_msg_count,
638:
639: Generate_Template(
640: p_api_version => 1.0,
641: p_init_msg_list => FND_API.G_TRUE,
642: p_commit => FND_API.G_FALSE,
643: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
644: x_return_status => l_return_status,
645: x_msg_count => l_msg_count,
646: x_msg_data => l_msg_data,
639: Generate_Template(
640: p_api_version => 1.0,
641: p_init_msg_list => FND_API.G_TRUE,
642: p_commit => FND_API.G_FALSE,
643: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
644: x_return_status => l_return_status,
645: x_msg_count => l_msg_count,
646: x_msg_data => l_msg_data,
647: --
648: p_task_id => p_task_id,
649: p_ac_id => p_ac_id,
650: p_instance_id => p_instance_id);
651:
652: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
653: raise FND_API.G_EXC_ERROR;
654: END IF;
655:
656: retcode := '0';
649: p_ac_id => p_ac_id,
650: p_instance_id => p_instance_id);
651:
652: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
653: raise FND_API.G_EXC_ERROR;
654: END IF;
655:
656: retcode := '0';
657: COMMIT;
658: RETURN;
659:
660: EXCEPTION
661:
662: WHEN FND_API.G_EXC_ERROR THEN
663: retcode := '2' ;
664: errbuf:=substr(sqlerrm, 1, 255);
665:
666: WHEN OTHERS THEN
760: BEGIN
761:
762: SAVEPOINT Generate_Template_Pvt ;
763:
764: IF NOT FND_API.Compatible_API_Call ( l_api_version,
765: p_api_version,
766: l_api_name,
767: G_PKG_NAME )
768: THEN
765: p_api_version,
766: l_api_name,
767: G_PKG_NAME )
768: THEN
769: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
770: END IF;
771:
772:
773: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
769: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
770: END IF;
771:
772:
773: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
774: FND_MSG_PUB.initialize ;
775: END IF;
776:
777: x_return_status := FND_API.G_RET_STS_SUCCESS ;
773: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
774: FND_MSG_PUB.initialize ;
775: END IF;
776:
777: x_return_status := FND_API.G_RET_STS_SUCCESS ;
778:
779: -- Initialize the parameters
780:
781: -- API Body
1295: --COMMIT WORK;
1296:
1297: EXCEPTION
1298:
1299: WHEN FND_API.G_EXC_ERROR THEN
1300:
1301: ROLLBACK TO Generate_Template_Pvt ;
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1298:
1299: WHEN FND_API.G_EXC_ERROR THEN
1300:
1301: ROLLBACK TO Generate_Template_Pvt ;
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1304: p_data => x_msg_data );
1305:
1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1304: p_data => x_msg_data );
1305:
1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1307:
1308: ROLLBACK TO Generate_Template_Pvt ;
1309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1310: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1305:
1306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1307:
1308: ROLLBACK TO Generate_Template_Pvt ;
1309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1310: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1311: p_data => x_msg_data );
1312: WHEN OTHERS THEN
1313:
1311: p_data => x_msg_data );
1312: WHEN OTHERS THEN
1313:
1314: ROLLBACK TO Generate_Template_Pvt ;
1315: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1316:
1317: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1318: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1319: l_api_name);
1354: BEGIN
1355: --
1356: Auto_Distribute(
1357: p_api_version => 1.0,
1358: p_init_msg_list => FND_API.G_TRUE,
1359: p_commit => FND_API.G_FALSE,
1360: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1361: x_return_status => l_return_status,
1362: x_msg_count => l_msg_count,
1355: --
1356: Auto_Distribute(
1357: p_api_version => 1.0,
1358: p_init_msg_list => FND_API.G_TRUE,
1359: p_commit => FND_API.G_FALSE,
1360: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1361: x_return_status => l_return_status,
1362: x_msg_count => l_msg_count,
1363: x_msg_data => l_msg_data,
1356: Auto_Distribute(
1357: p_api_version => 1.0,
1358: p_init_msg_list => FND_API.G_TRUE,
1359: p_commit => FND_API.G_FALSE,
1360: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1361: x_return_status => l_return_status,
1362: x_msg_count => l_msg_count,
1363: x_msg_data => l_msg_data,
1364: --
1364: --
1365: p_task_id => p_task_id,
1366: p_template_id => p_template_id);
1367:
1368: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1369: raise FND_API.G_EXC_ERROR;
1370: end if;
1371:
1372: retcode := '0';
1365: p_task_id => p_task_id,
1366: p_template_id => p_template_id);
1367:
1368: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1369: raise FND_API.G_EXC_ERROR;
1370: end if;
1371:
1372: retcode := '0';
1373: COMMIT;
1374: RETURN;
1375:
1376: EXCEPTION
1377:
1378: WHEN FND_API.G_EXC_ERROR THEN
1379: retcode := '2' ;
1380: errbuf:=substr(sqlerrm, 1, 255);
1381:
1382: WHEN OTHERS THEN
1500: BEGIN
1501:
1502: SAVEPOINT Auto_Distribute_Pvt ;
1503:
1504: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1505: p_api_version,
1506: l_api_name,
1507: G_PKG_NAME )
1508: THEN
1505: p_api_version,
1506: l_api_name,
1507: G_PKG_NAME )
1508: THEN
1509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1510: END IF;
1511:
1512:
1513: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1509: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1510: END IF;
1511:
1512:
1513: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1514: FND_MSG_PUB.initialize ;
1515: END IF;
1516:
1517: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1513: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
1514: FND_MSG_PUB.initialize ;
1515: END IF;
1516:
1517: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1518:
1519: -- Initialize the parameters
1520: l_amt := 255;
1521: l_ind := 1;
1770: p_data => x_msg_data );
1771:
1772: EXCEPTION
1773:
1774: WHEN FND_API.G_EXC_ERROR THEN
1775:
1776: ROLLBACK TO Auto_Distribute_Pvt ;
1777: x_return_status := FND_API.G_RET_STS_ERROR;
1778: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1773:
1774: WHEN FND_API.G_EXC_ERROR THEN
1775:
1776: ROLLBACK TO Auto_Distribute_Pvt ;
1777: x_return_status := FND_API.G_RET_STS_ERROR;
1778: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1779: p_data => x_msg_data );
1780:
1781: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1777: x_return_status := FND_API.G_RET_STS_ERROR;
1778: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1779: p_data => x_msg_data );
1780:
1781: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1782:
1783: ROLLBACK TO Auto_Distribute_Pvt ;
1784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1785: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1780:
1781: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1782:
1783: ROLLBACK TO Auto_Distribute_Pvt ;
1784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1785: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1786: p_data => x_msg_data );
1787:
1788: WHEN OTHERS THEN
1787:
1788: WHEN OTHERS THEN
1789:
1790: ROLLBACK TO Auto_Distribute_Pvt ;
1791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1792:
1793: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1794: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
1795: l_api_name);
1837: BEGIN
1838:
1839: Manual_Distribute(
1840: p_api_version => 1.0,
1841: p_init_msg_list => FND_API.G_TRUE,
1842: p_commit => FND_API.G_FALSE,
1843: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1844: x_return_status => l_return_status,
1845: x_msg_count => l_msg_count,
1838:
1839: Manual_Distribute(
1840: p_api_version => 1.0,
1841: p_init_msg_list => FND_API.G_TRUE,
1842: p_commit => FND_API.G_FALSE,
1843: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1844: x_return_status => l_return_status,
1845: x_msg_count => l_msg_count,
1846: x_msg_data => l_msg_data,
1839: Manual_Distribute(
1840: p_api_version => 1.0,
1841: p_init_msg_list => FND_API.G_TRUE,
1842: p_commit => FND_API.G_FALSE,
1843: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1844: x_return_status => l_return_status,
1845: x_msg_count => l_msg_count,
1846: x_msg_data => l_msg_data,
1847: --
1852: p_deadline_date => FND_DATE.CANONICAL_TO_DATE(p_deadline_date),
1853: p_overwrite_cust => p_overwrite_cust,
1854: p_overwrite_data => p_overwrite_data);
1855:
1856: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1857: raise FND_API.G_EXC_ERROR;
1858: END IF;
1859:
1860: retcode := '0';
1853: p_overwrite_cust => p_overwrite_cust,
1854: p_overwrite_data => p_overwrite_data);
1855:
1856: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1857: raise FND_API.G_EXC_ERROR;
1858: END IF;
1859:
1860: retcode := '0';
1861: COMMIT;
1862: RETURN;
1863:
1864: EXCEPTION
1865:
1866: WHEN FND_API.G_EXC_ERROR THEN
1867: retcode := '2' ;
1868: errbuf:=substr(sqlerrm, 1, 255);
1869:
1870: WHEN OTHERS THEN
1991:
1992: BEGIN
1993: SAVEPOINT Manual_Distribute_Pvt ;
1994:
1995: IF NOT FND_API.Compatible_API_Call ( l_api_version,
1996: p_api_version,
1997: l_api_name,
1998: G_PKG_NAME )
1999: THEN
1997: l_api_name,
1998: G_PKG_NAME )
1999: THEN
2000:
2001: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2002: END IF;
2003:
2004: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2005: FND_MSG_PUB.initialize ;
2000:
2001: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2002: END IF;
2003:
2004: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2005: FND_MSG_PUB.initialize ;
2006: END IF;
2007:
2008: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2004: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2005: FND_MSG_PUB.initialize ;
2006: END IF;
2007:
2008: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2009:
2010: -- Initialize the parameters
2011: l_resp_key := null;
2012: l_count := 0;
2243: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2244: p_data => x_msg_data );
2245: EXCEPTION
2246:
2247: WHEN FND_API.G_EXC_ERROR THEN
2248:
2249: ROLLBACK TO Manual_Distribute_Pvt ;
2250: x_return_status := FND_API.G_RET_STS_ERROR;
2251: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2246:
2247: WHEN FND_API.G_EXC_ERROR THEN
2248:
2249: ROLLBACK TO Manual_Distribute_Pvt ;
2250: x_return_status := FND_API.G_RET_STS_ERROR;
2251: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2252: p_data => x_msg_data );
2253:
2254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2250: x_return_status := FND_API.G_RET_STS_ERROR;
2251: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2252: p_data => x_msg_data );
2253:
2254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2255:
2256: ROLLBACK TO Manual_Distribute_Pvt ;
2257: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2258: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2253:
2254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2255:
2256: ROLLBACK TO Manual_Distribute_Pvt ;
2257: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2258: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2259: p_data => x_msg_data );
2260:
2261: WHEN OTHERS THEN
2260:
2261: WHEN OTHERS THEN
2262:
2263: ROLLBACK TO Manual_Distribute_Pvt ;
2264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2265:
2266: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2267: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
2268: l_api_name);
2319: BEGIN
2320:
2321: SAVEPOINT Set_Template_Recipient ;
2322:
2323: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2324: p_api_version,
2325: l_api_name,
2326: G_PKG_NAME )
2327: THEN
2324: p_api_version,
2325: l_api_name,
2326: G_PKG_NAME )
2327: THEN
2328: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2329: END IF;
2330:
2331:
2332: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2328: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2329: END IF;
2330:
2331:
2332: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2333: FND_MSG_PUB.initialize ;
2334: END IF;
2335:
2336: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2332: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2333: FND_MSG_PUB.initialize ;
2334: END IF;
2335:
2336: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2337:
2338: -- Initialize the parameters
2339: l_exp_days := 7;
2340:
2356: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2357: p_data => x_msg_data );
2358: EXCEPTION
2359:
2360: WHEN FND_API.G_EXC_ERROR THEN
2361:
2362: ROLLBACK TO Set_Template_Recipient ;
2363: x_return_status := FND_API.G_RET_STS_ERROR;
2364: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2359:
2360: WHEN FND_API.G_EXC_ERROR THEN
2361:
2362: ROLLBACK TO Set_Template_Recipient ;
2363: x_return_status := FND_API.G_RET_STS_ERROR;
2364: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2365: p_data => x_msg_data );
2366:
2367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2363: x_return_status := FND_API.G_RET_STS_ERROR;
2364: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2365: p_data => x_msg_data );
2366:
2367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2368:
2369: ROLLBACK TO Set_Template_Recipient ;
2370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2371: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2366:
2367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2368:
2369: ROLLBACK TO Set_Template_Recipient ;
2370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2371: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2372: p_data => x_msg_data );
2373:
2374: WHEN OTHERS THEN
2373:
2374: WHEN OTHERS THEN
2375:
2376: ROLLBACK TO Set_Template_Recipient ;
2377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2378:
2379: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2380: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
2381: l_api_name);
2741: BEGIN
2742:
2743: SAVEPOINT Complete_Review_Pvt ;
2744:
2745: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2746: p_api_version,
2747: l_api_name,
2748: G_PKG_NAME )
2749: THEN
2746: p_api_version,
2747: l_api_name,
2748: G_PKG_NAME )
2749: THEN
2750: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2751: END IF;
2752:
2753:
2754: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2750: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2751: END IF;
2752:
2753:
2754: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2755: FND_MSG_PUB.initialize ;
2756: END IF;
2757:
2758: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2754: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2755: FND_MSG_PUB.initialize ;
2756: END IF;
2757:
2758: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2759:
2760: -- Initialize the parameters
2761:
2762: -- API Body
2812: p_data => x_msg_data );
2813: COMMIT WORK;
2814: EXCEPTION
2815:
2816: WHEN FND_API.G_EXC_ERROR THEN
2817:
2818: ROLLBACK TO Complete_Review_Pvt ;
2819: x_return_status := FND_API.G_RET_STS_ERROR;
2820: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2815:
2816: WHEN FND_API.G_EXC_ERROR THEN
2817:
2818: ROLLBACK TO Complete_Review_Pvt ;
2819: x_return_status := FND_API.G_RET_STS_ERROR;
2820: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2821: p_data => x_msg_data );
2822:
2823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2819: x_return_status := FND_API.G_RET_STS_ERROR;
2820: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2821: p_data => x_msg_data );
2822:
2823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2824:
2825: ROLLBACK TO Complete_Review_Pvt ;
2826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2827: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2822:
2823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2824:
2825: ROLLBACK TO Complete_Review_Pvt ;
2826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2827: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2828: p_data => x_msg_data );
2829:
2830: WHEN OTHERS THEN
2829:
2830: WHEN OTHERS THEN
2831:
2832: ROLLBACK TO Complete_Review_Pvt ;
2833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2834:
2835: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2836: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
2837: l_api_name);
2874: BEGIN
2875:
2876: SAVEPOINT Delete_Template_Pvt ;
2877:
2878: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2879: p_api_version,
2880: l_api_name,
2881: G_PKG_NAME )
2882: THEN
2879: p_api_version,
2880: l_api_name,
2881: G_PKG_NAME )
2882: THEN
2883: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2884: END IF;
2885:
2886:
2887: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2883: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2884: END IF;
2885:
2886:
2887: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2888: FND_MSG_PUB.initialize ;
2889: END IF;
2890:
2891: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2887: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2888: FND_MSG_PUB.initialize ;
2889: END IF;
2890:
2891: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2892:
2893: -- Initialize the parameters
2894:
2895: -- API Body
2897: UPDATE zpb_dc_objects
2898: SET delete_instance_measures_flag = 'Y'
2899: WHERE ac_instance_id = p_analysis_cycle_instance_id;
2900:
2901: IF FND_API.To_Boolean ( p_commit ) THEN
2902: COMMIT WORK;
2903: END iF;
2904:
2905: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2905: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2906: p_data => x_msg_data );
2907: EXCEPTION
2908:
2909: WHEN FND_API.G_EXC_ERROR THEN
2910:
2911: ROLLBACK TO Delete_Template_Pvt ;
2912: x_return_status := FND_API.G_RET_STS_ERROR;
2913: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2908:
2909: WHEN FND_API.G_EXC_ERROR THEN
2910:
2911: ROLLBACK TO Delete_Template_Pvt ;
2912: x_return_status := FND_API.G_RET_STS_ERROR;
2913: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2914: p_data => x_msg_data );
2915:
2916: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2912: x_return_status := FND_API.G_RET_STS_ERROR;
2913: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2914: p_data => x_msg_data );
2915:
2916: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2917:
2918: ROLLBACK TO Delete_Template_Pvt ;
2919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2920: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2915:
2916: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2917:
2918: ROLLBACK TO Delete_Template_Pvt ;
2919: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2920: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2921: p_data => x_msg_data );
2922:
2923: WHEN OTHERS THEN
2922:
2923: WHEN OTHERS THEN
2924:
2925: ROLLBACK TO Delete_Template_Pvt ;
2926: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2927:
2928: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2929: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
2930: l_api_name);
2983: BEGIN
2984:
2985: SAVEPOINT Set_Submit_Ntf_Recipients;
2986:
2987: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2988: p_api_version,
2989: l_api_name,
2990: G_PKG_NAME )
2991: THEN
2988: p_api_version,
2989: l_api_name,
2990: G_PKG_NAME )
2991: THEN
2992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2993: END IF;
2994:
2995:
2996: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
2993: END IF;
2994:
2995:
2996: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2997: FND_MSG_PUB.initialize ;
2998: END IF;
2999:
3000: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2996: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
2997: FND_MSG_PUB.initialize ;
2998: END IF;
2999:
3000: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3001:
3002: -- Initialize the parameters
3003: l_exp_days := 7;
3004: l_amt := 255;
3084: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3085: p_data => x_msg_data );
3086: EXCEPTION
3087:
3088: WHEN FND_API.G_EXC_ERROR THEN
3089:
3090: ROLLBACK TO Set_Submit_Ntf_Recipients ;
3091: x_return_status := FND_API.G_RET_STS_ERROR;
3092: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3087:
3088: WHEN FND_API.G_EXC_ERROR THEN
3089:
3090: ROLLBACK TO Set_Submit_Ntf_Recipients ;
3091: x_return_status := FND_API.G_RET_STS_ERROR;
3092: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3093: p_data => x_msg_data );
3094:
3095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3091: x_return_status := FND_API.G_RET_STS_ERROR;
3092: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3093: p_data => x_msg_data );
3094:
3095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3096:
3097: ROLLBACK TO Set_Submit_Ntf_Recipients;
3098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3099: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3094:
3095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3096:
3097: ROLLBACK TO Set_Submit_Ntf_Recipients;
3098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3099: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3100: p_data => x_msg_data );
3101:
3102: WHEN OTHERS THEN
3101:
3102: WHEN OTHERS THEN
3103:
3104: ROLLBACK TO Set_Submit_Ntf_Recipients ;
3105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3106:
3107: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3108: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
3109: l_api_name);
3143: BEGIN
3144:
3145: SAVEPOINT Set_Source_Type;
3146:
3147: IF NOT FND_API.Compatible_API_Call ( l_api_version,
3148: p_api_version,
3149: l_api_name,
3150: G_PKG_NAME )
3151: THEN
3148: p_api_version,
3149: l_api_name,
3150: G_PKG_NAME )
3151: THEN
3152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3153: END IF;
3154:
3155:
3156: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
3152: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3153: END IF;
3154:
3155:
3156: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
3157: FND_MSG_PUB.initialize ;
3158: END IF;
3159:
3160: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3156: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
3157: FND_MSG_PUB.initialize ;
3158: END IF;
3159:
3160: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3161:
3162: -- Initialize the parameters
3163:
3164: -- API Body
3173: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3174: p_data => x_msg_data );
3175: EXCEPTION
3176:
3177: WHEN FND_API.G_EXC_ERROR THEN
3178:
3179: ROLLBACK TO Set_Source_Type ;
3180: x_return_status := FND_API.G_RET_STS_ERROR;
3181: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3176:
3177: WHEN FND_API.G_EXC_ERROR THEN
3178:
3179: ROLLBACK TO Set_Source_Type ;
3180: x_return_status := FND_API.G_RET_STS_ERROR;
3181: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3182: p_data => x_msg_data );
3183:
3184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3180: x_return_status := FND_API.G_RET_STS_ERROR;
3181: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3182: p_data => x_msg_data );
3183:
3184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3185:
3186: ROLLBACK TO Set_Source_Type ;
3187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3183:
3184: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3185:
3186: ROLLBACK TO Set_Source_Type ;
3187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
3189: p_data => x_msg_data );
3190:
3191: WHEN OTHERS THEN
3190:
3191: WHEN OTHERS THEN
3192:
3193: ROLLBACK TO Set_Source_Type ;
3194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3195:
3196: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3197: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME,
3198: l_api_name);