73: p_return_status := FND_API.G_RET_STS_ERROR;
74: return FALSE;
75: WHEN OTHERS THEN
76: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
77: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
78: SUBSTR (SQLERRM, 1, 240) );
79: FND_MSG_PUB.Add;
80: return FALSE;
81: end FLOW_EXISTS;
75: WHEN OTHERS THEN
76: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
77: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
78: SUBSTR (SQLERRM, 1, 240) );
79: FND_MSG_PUB.Add;
80: return FALSE;
81: end FLOW_EXISTS;
82:
83: --=======================================================
146: p_return_status := FND_API.G_RET_STS_ERROR;
147: return FALSE;
148: WHEN OTHERS THEN
149: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
150: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
151: SUBSTR (SQLERRM, 1, 240) );
152: FND_MSG_PUB.Add;
153: return FALSE;
154: end PAGE_EXISTS;
148: WHEN OTHERS THEN
149: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
150: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
151: SUBSTR (SQLERRM, 1, 240) );
152: FND_MSG_PUB.Add;
153: return FALSE;
154: end PAGE_EXISTS;
155:
156: --=======================================================
223: p_return_status := FND_API.G_RET_STS_ERROR;
224: return FALSE;
225: WHEN OTHERS THEN
226: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
228: SUBSTR (SQLERRM, 1, 240) );
229: FND_MSG_PUB.Add;
230: return FALSE;
231: end PAGE_REGION_EXISTS;
225: WHEN OTHERS THEN
226: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
227: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
228: SUBSTR (SQLERRM, 1, 240) );
229: FND_MSG_PUB.Add;
230: return FALSE;
231: end PAGE_REGION_EXISTS;
232:
233: --=======================================================
304: p_return_status := FND_API.G_RET_STS_ERROR;
305: return FALSE;
306: WHEN OTHERS THEN
307: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
308: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
309: SUBSTR (SQLERRM, 1, 240) );
310: FND_MSG_PUB.Add;
311: return FALSE;
312: end PAGE_REGION_ITEM_EXISTS;
306: WHEN OTHERS THEN
307: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
308: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
309: SUBSTR (SQLERRM, 1, 240) );
310: FND_MSG_PUB.Add;
311: return FALSE;
312: end PAGE_REGION_ITEM_EXISTS;
313:
314: --=======================================================
391: p_return_status := FND_API.G_RET_STS_ERROR;
392: return FALSE;
393: WHEN OTHERS THEN
394: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
395: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
396: SUBSTR (SQLERRM, 1, 240) );
397: FND_MSG_PUB.Add;
398: return FALSE;
399: end REGION_RELATION_EXISTS;
393: WHEN OTHERS THEN
394: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
395: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
396: SUBSTR (SQLERRM, 1, 240) );
397: FND_MSG_PUB.Add;
398: return FALSE;
399: end REGION_RELATION_EXISTS;
400:
401: --=======================================================
501:
502: -- Initialize the message table if requested.
503:
504: if p_init_msg_tbl then
505: FND_MSG_PUB.initialize;
506: end if;
507:
508: savepoint start_create_flow;
509:
514: p_api_version_number => 1.0,
515: p_return_status => l_return_status,
516: p_flow_application_id => p_flow_application_id,
517: p_flow_code => p_flow_code) then
518: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
519: FND_MESSAGE.SET_NAME('AK','AK_FLOW_EXISTS');
520: FND_MSG_PUB.Add;
521: end if;
522: raise FND_API.G_EXC_ERROR;
516: p_flow_application_id => p_flow_application_id,
517: p_flow_code => p_flow_code) then
518: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
519: FND_MESSAGE.SET_NAME('AK','AK_FLOW_EXISTS');
520: FND_MSG_PUB.Add;
521: end if;
522: raise FND_API.G_EXC_ERROR;
523: end if;
524:
724: p_api_version_number => 1.0,
725: p_return_status => l_return_status,
726: p_flow_application_id => p_flow_application_id,
727: p_flow_code => p_flow_code) then
728: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
729: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FLOW_FAILED');
730: FND_MSG_PUB.Add;
731: end if;
732: raise FND_API.G_EXC_ERROR;
726: p_flow_application_id => p_flow_application_id,
727: p_flow_code => p_flow_code) then
728: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
729: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FLOW_FAILED');
730: FND_MSG_PUB.Add;
731: end if;
732: raise FND_API.G_EXC_ERROR;
733: end if;
734:
767:
768: -- /** commit the insert **/
769: -- commit;
770:
771: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
772: FND_MESSAGE.SET_NAME('AK','AK_FLOW_CREATED');
773: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
774: ' ' || p_flow_code);
775: FND_MSG_PUB.Add;
771: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
772: FND_MESSAGE.SET_NAME('AK','AK_FLOW_CREATED');
773: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
774: ' ' || p_flow_code);
775: FND_MSG_PUB.Add;
776: end if;
777:
778: p_return_status := FND_API.G_RET_STS_SUCCESS;
779:
776: end if;
777:
778: p_return_status := FND_API.G_RET_STS_SUCCESS;
779:
780: FND_MSG_PUB.Count_And_Get (
781: p_count => p_msg_count,
782: p_data => p_msg_data);
783:
784:
783:
784:
785: EXCEPTION
786: WHEN VALUE_ERROR THEN
787: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
788: FND_MESSAGE.SET_NAME('AK','AK_FLOW_VALUE_ERROR');
789: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
790: ' ' || p_flow_code);
791: FND_MSG_PUB.Add;
787: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
788: FND_MESSAGE.SET_NAME('AK','AK_FLOW_VALUE_ERROR');
789: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
790: ' ' || p_flow_code);
791: FND_MSG_PUB.Add;
792: end if;
793: p_return_status := FND_API.G_RET_STS_ERROR;
794: rollback to start_create_flow;
795: FND_MSG_PUB.Count_And_Get (
791: FND_MSG_PUB.Add;
792: end if;
793: p_return_status := FND_API.G_RET_STS_ERROR;
794: rollback to start_create_flow;
795: FND_MSG_PUB.Count_And_Get (
796: p_count => p_msg_count,
797: p_data => p_msg_data);
798: WHEN FND_API.G_EXC_ERROR THEN
799: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
795: FND_MSG_PUB.Count_And_Get (
796: p_count => p_msg_count,
797: p_data => p_msg_data);
798: WHEN FND_API.G_EXC_ERROR THEN
799: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
800: FND_MESSAGE.SET_NAME('AK','AK_FLOW_NOT_CREATED');
801: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
802: ' ' || p_flow_code);
803: FND_MSG_PUB.Add;
799: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
800: FND_MESSAGE.SET_NAME('AK','AK_FLOW_NOT_CREATED');
801: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
802: ' ' || p_flow_code);
803: FND_MSG_PUB.Add;
804: end if;
805: p_return_status := FND_API.G_RET_STS_ERROR;
806: rollback to start_create_flow;
807: FND_MSG_PUB.Count_And_Get (
803: FND_MSG_PUB.Add;
804: end if;
805: p_return_status := FND_API.G_RET_STS_ERROR;
806: rollback to start_create_flow;
807: FND_MSG_PUB.Count_And_Get (
808: p_count => p_msg_count,
809: p_data => p_msg_data);
810:
811: WHEN OTHERS THEN
810:
811: WHEN OTHERS THEN
812: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
813: rollback to start_create_flow;
814: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
815: SUBSTR (SQLERRM, 1, 240) );
816: FND_MSG_PUB.Add;
817: FND_MSG_PUB.Count_And_Get (
818: p_count => p_msg_count,
812: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
813: rollback to start_create_flow;
814: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
815: SUBSTR (SQLERRM, 1, 240) );
816: FND_MSG_PUB.Add;
817: FND_MSG_PUB.Count_And_Get (
818: p_count => p_msg_count,
819: p_data => p_msg_data);
820: end CREATE_FLOW;
813: rollback to start_create_flow;
814: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
815: SUBSTR (SQLERRM, 1, 240) );
816: FND_MSG_PUB.Add;
817: FND_MSG_PUB.Count_And_Get (
818: p_count => p_msg_count,
819: p_data => p_msg_data);
820: end CREATE_FLOW;
821:
930:
931: -- Initialize the message table if requested.
932:
933: if p_init_msg_tbl then
934: FND_MSG_PUB.initialize;
935: end if;
936:
937: savepoint start_create_page;
938:
945: p_flow_application_id => p_flow_application_id,
946: p_flow_code => p_flow_code,
947: p_page_application_id => p_page_application_id,
948: p_page_code => p_page_code) then
949: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
950: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_EXISTS');
951: FND_MSG_PUB.Add;
952: end if;
953: raise FND_API.G_EXC_ERROR;
947: p_page_application_id => p_page_application_id,
948: p_page_code => p_page_code) then
949: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
950: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_EXISTS');
951: FND_MSG_PUB.Add;
952: end if;
953: raise FND_API.G_EXC_ERROR;
954: end if;
955:
1163: p_flow_application_id => p_flow_application_id,
1164: p_flow_code => p_flow_code,
1165: p_page_application_id => p_page_application_id,
1166: p_page_code => p_page_code) then
1167: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1168: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FLOW_PAGE_FAILED');
1169: FND_MSG_PUB.Add;
1170: end if;
1171: raise FND_API.G_EXC_ERROR;
1165: p_page_application_id => p_page_application_id,
1166: p_page_code => p_page_code) then
1167: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1168: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FLOW_PAGE_FAILED');
1169: FND_MSG_PUB.Add;
1170: end if;
1171: raise FND_API.G_EXC_ERROR;
1172: end if;
1173:
1253: p_copy_redo_flag => p_copy_redo_flag
1254: );
1255: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1256: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1257: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1258: raise FND_API.G_EXC_ERROR;
1259: end if;
1260: end if;
1261: end if;
1259: end if;
1260: end if;
1261: end if;
1262:
1263: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1264: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_CREATED');
1265: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1266: ' ' || p_flow_code ||
1267: ' ' || to_char(p_page_application_id) ||
1265: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1266: ' ' || p_flow_code ||
1267: ' ' || to_char(p_page_application_id) ||
1268: ' ' || p_page_code);
1269: FND_MSG_PUB.Add;
1270: end if;
1271:
1272: p_return_status := FND_API.G_RET_STS_SUCCESS;
1273:
1270: end if;
1271:
1272: p_return_status := FND_API.G_RET_STS_SUCCESS;
1273:
1274: FND_MSG_PUB.Count_And_Get (
1275: p_count => p_msg_count,
1276: p_data => p_msg_data);
1277:
1278: EXCEPTION
1276: p_data => p_msg_data);
1277:
1278: EXCEPTION
1279: WHEN VALUE_ERROR THEN
1280: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1281: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_VALUE_ERROR');
1282: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1283: ' ' || p_flow_code ||
1284: ' ' || to_char(p_page_application_id) ||
1282: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1283: ' ' || p_flow_code ||
1284: ' ' || to_char(p_page_application_id) ||
1285: ' ' || p_page_code);
1286: FND_MSG_PUB.Add;
1287: end if;
1288: p_return_status := FND_API.G_RET_STS_ERROR;
1289: rollback to start_create_page;
1290: FND_MSG_PUB.Count_And_Get (
1286: FND_MSG_PUB.Add;
1287: end if;
1288: p_return_status := FND_API.G_RET_STS_ERROR;
1289: rollback to start_create_page;
1290: FND_MSG_PUB.Count_And_Get (
1291: p_count => p_msg_count,
1292: p_data => p_msg_data);
1293: WHEN FND_API.G_EXC_ERROR THEN
1294: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1290: FND_MSG_PUB.Count_And_Get (
1291: p_count => p_msg_count,
1292: p_data => p_msg_data);
1293: WHEN FND_API.G_EXC_ERROR THEN
1294: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1295: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_NOT_CREATED');
1296: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1297: ' ' || p_flow_code ||
1298: ' ' || to_char(p_page_application_id) ||
1296: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1297: ' ' || p_flow_code ||
1298: ' ' || to_char(p_page_application_id) ||
1299: ' ' || p_page_code);
1300: FND_MSG_PUB.Add;
1301: end if;
1302: p_return_status := FND_API.G_RET_STS_ERROR;
1303: rollback to start_create_page;
1304: FND_MSG_PUB.Count_And_Get (
1300: FND_MSG_PUB.Add;
1301: end if;
1302: p_return_status := FND_API.G_RET_STS_ERROR;
1303: rollback to start_create_page;
1304: FND_MSG_PUB.Count_And_Get (
1305: p_count => p_msg_count,
1306: p_data => p_msg_data);
1307: WHEN OTHERS THEN
1308: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1306: p_data => p_msg_data);
1307: WHEN OTHERS THEN
1308: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1309: rollback to start_create_page;
1310: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1311: SUBSTR (SQLERRM, 1, 240) );
1312: FND_MSG_PUB.Add;
1313: FND_MSG_PUB.Count_And_Get (
1314: p_count => p_msg_count,
1308: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1309: rollback to start_create_page;
1310: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1311: SUBSTR (SQLERRM, 1, 240) );
1312: FND_MSG_PUB.Add;
1313: FND_MSG_PUB.Count_And_Get (
1314: p_count => p_msg_count,
1315: p_data => p_msg_data);
1316: end CREATE_PAGE;
1309: rollback to start_create_page;
1310: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1311: SUBSTR (SQLERRM, 1, 240) );
1312: FND_MSG_PUB.Add;
1313: FND_MSG_PUB.Count_And_Get (
1314: p_count => p_msg_count,
1315: p_data => p_msg_data);
1316: end CREATE_PAGE;
1317:
1442:
1443: -- Initialize the message table if requested.
1444:
1445: if p_init_msg_tbl then
1446: FND_MSG_PUB.initialize;
1447: end if;
1448:
1449: savepoint start_create_page_region;
1450:
1459: p_page_application_id => p_page_application_id,
1460: p_page_code => p_page_code,
1461: p_region_application_id => p_region_application_id,
1462: p_region_code => p_region_code) then
1463: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1464: FND_MESSAGE.SET_NAME('AK','AK_PAGE_REGION_EXISTS');
1465: FND_MSG_PUB.Add;
1466: end if;
1467: raise FND_API.G_EXC_ERROR;
1461: p_region_application_id => p_region_application_id,
1462: p_region_code => p_region_code) then
1463: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1464: FND_MESSAGE.SET_NAME('AK','AK_PAGE_REGION_EXISTS');
1465: FND_MSG_PUB.Add;
1466: end if;
1467: raise FND_API.G_EXC_ERROR;
1468: end if;
1469:
1758: p_copy_redo_flag => p_copy_redo_flag
1759: );
1760: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1761: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1762: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1763: raise FND_API.G_EXC_ERROR;
1764: end if;
1765: end if;
1766: end if;
1802: p_copy_redo_flag => p_copy_redo_flag
1803: );
1804: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1805: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1806: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1807: raise FND_API.G_EXC_ERROR;
1808: end if;
1809: end if;
1810: end if;
1808: end if;
1809: end if;
1810: end if;
1811:
1812: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1813: FND_MESSAGE.SET_NAME('AK','AK_OBJECT_CREATED');
1814: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1815: ' ' || p_flow_code ||
1816: ' ' || to_char(p_page_application_id) ||
1816: ' ' || to_char(p_page_application_id) ||
1817: ' ' || p_page_code ||
1818: ' ' || to_char(p_region_application_id) ||
1819: ' ' || p_region_code);
1820: FND_MSG_PUB.Add;
1821: end if;
1822:
1823: p_return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1821: end if;
1822:
1823: p_return_status := FND_API.G_RET_STS_SUCCESS;
1824:
1825: FND_MSG_PUB.Count_And_Get (
1826: p_count => p_msg_count,
1827: p_data => p_msg_data);
1828:
1829: EXCEPTION
1827: p_data => p_msg_data);
1828:
1829: EXCEPTION
1830: WHEN VALUE_ERROR THEN
1831: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1832: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_VALUE_ERROR');
1833: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1834: ' ' || p_flow_code ||
1835: ' ' || to_char(p_page_application_id) ||
1835: ' ' || to_char(p_page_application_id) ||
1836: ' ' || p_page_code ||
1837: ' ' || to_char(p_region_application_id) ||
1838: ' ' || p_region_code);
1839: FND_MSG_PUB.Add;
1840: end if;
1841: p_return_status := FND_API.G_RET_STS_ERROR;
1842: rollback to start_create_page_region;
1843: FND_MSG_PUB.Count_And_Get (
1839: FND_MSG_PUB.Add;
1840: end if;
1841: p_return_status := FND_API.G_RET_STS_ERROR;
1842: rollback to start_create_page_region;
1843: FND_MSG_PUB.Count_And_Get (
1844: p_count => p_msg_count,
1845: p_data => p_msg_data);
1846: WHEN FND_API.G_EXC_ERROR THEN
1847: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1843: FND_MSG_PUB.Count_And_Get (
1844: p_count => p_msg_count,
1845: p_data => p_msg_data);
1846: WHEN FND_API.G_EXC_ERROR THEN
1847: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1848: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_NOT_CREATED');
1849: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
1850: ' ' || p_flow_code ||
1851: ' ' || to_char(p_page_application_id) ||
1851: ' ' || to_char(p_page_application_id) ||
1852: ' ' || p_page_code ||
1853: ' ' || to_char(p_region_application_id) ||
1854: ' ' || p_region_code);
1855: FND_MSG_PUB.Add;
1856: end if;
1857: p_return_status := FND_API.G_RET_STS_ERROR;
1858: rollback to start_create_page_region;
1859: FND_MSG_PUB.Count_And_Get (
1855: FND_MSG_PUB.Add;
1856: end if;
1857: p_return_status := FND_API.G_RET_STS_ERROR;
1858: rollback to start_create_page_region;
1859: FND_MSG_PUB.Count_And_Get (
1860: p_count => p_msg_count,
1861: p_data => p_msg_data);
1862: WHEN OTHERS THEN
1863: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1861: p_data => p_msg_data);
1862: WHEN OTHERS THEN
1863: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1864: rollback to start_create_page_region;
1865: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1866: SUBSTR (SQLERRM, 1, 240) );
1867: FND_MSG_PUB.Add;
1868: FND_MSG_PUB.Count_And_Get (
1869: p_count => p_msg_count,
1863: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1864: rollback to start_create_page_region;
1865: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1866: SUBSTR (SQLERRM, 1, 240) );
1867: FND_MSG_PUB.Add;
1868: FND_MSG_PUB.Count_And_Get (
1869: p_count => p_msg_count,
1870: p_data => p_msg_data);
1871: end CREATE_PAGE_REGION;
1864: rollback to start_create_page_region;
1865: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1866: SUBSTR (SQLERRM, 1, 240) );
1867: FND_MSG_PUB.Add;
1868: FND_MSG_PUB.Count_And_Get (
1869: p_count => p_msg_count,
1870: p_data => p_msg_data);
1871: end CREATE_PAGE_REGION;
1872:
1982:
1983: -- Initialize the message table if requested.
1984:
1985: if p_init_msg_tbl then
1986: FND_MSG_PUB.initialize;
1987: end if;
1988:
1989: savepoint start_create_link;
1990:
2001: p_region_application_id => p_region_application_id,
2002: p_region_code => p_region_code,
2003: p_attribute_application_id => p_attribute_application_id,
2004: p_attribute_code => p_attribute_code) then
2005: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2006: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_EXISTS');
2007: FND_MSG_PUB.Add;
2008: end if;
2009: raise FND_API.G_EXC_ERROR;
2003: p_attribute_application_id => p_attribute_application_id,
2004: p_attribute_code => p_attribute_code) then
2005: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2006: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_EXISTS');
2007: FND_MSG_PUB.Add;
2008: end if;
2009: raise FND_API.G_EXC_ERROR;
2010: end if;
2011:
2234:
2235: -- /** commit the insert **/
2236: -- commit;
2237:
2238: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
2239: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_CREATED');
2240: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2241: ' ' || p_flow_code ||
2242: ' ' || to_char(p_page_application_id) ||
2244: ' ' || to_char(p_region_application_id) ||
2245: ' ' || p_region_code ||
2246: ' ' || to_char(p_attribute_application_id)||
2247: ' ' || p_attribute_code);
2248: FND_MSG_PUB.Add;
2249: end if;
2250:
2251: p_return_status := FND_API.G_RET_STS_SUCCESS;
2252:
2249: end if;
2250:
2251: p_return_status := FND_API.G_RET_STS_SUCCESS;
2252:
2253: FND_MSG_PUB.Count_And_Get (
2254: p_count => p_msg_count,
2255: p_data => p_msg_data);
2256:
2257: EXCEPTION
2255: p_data => p_msg_data);
2256:
2257: EXCEPTION
2258: WHEN VALUE_ERROR THEN
2259: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2260: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_VALUE_ERROR');
2261: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2262: ' ' || p_flow_code ||
2263: ' ' || to_char(p_page_application_id) ||
2265: ' ' || to_char(p_region_application_id) ||
2266: ' ' || p_region_code ||
2267: ' ' || to_char(p_attribute_application_id)||
2268: ' ' || p_attribute_code);
2269: FND_MSG_PUB.Add;
2270: end if;
2271: p_return_status := FND_API.G_RET_STS_ERROR;
2272: rollback to start_create_link;
2273: FND_MSG_PUB.Count_And_Get (
2269: FND_MSG_PUB.Add;
2270: end if;
2271: p_return_status := FND_API.G_RET_STS_ERROR;
2272: rollback to start_create_link;
2273: FND_MSG_PUB.Count_And_Get (
2274: p_count => p_msg_count,
2275: p_data => p_msg_data);
2276: WHEN FND_API.G_EXC_ERROR THEN
2277: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2273: FND_MSG_PUB.Count_And_Get (
2274: p_count => p_msg_count,
2275: p_data => p_msg_data);
2276: WHEN FND_API.G_EXC_ERROR THEN
2277: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2278: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_NOT_CREATED');
2279: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2280: ' ' || p_flow_code ||
2281: ' ' || to_char(p_page_application_id) ||
2283: ' ' || to_char(p_region_application_id) ||
2284: ' ' || p_region_code ||
2285: ' ' || to_char(p_attribute_application_id)||
2286: ' ' || p_attribute_code);
2287: FND_MSG_PUB.Add;
2288: end if;
2289: p_return_status := FND_API.G_RET_STS_ERROR;
2290: rollback to start_create_link;
2291: FND_MSG_PUB.Count_And_Get (
2287: FND_MSG_PUB.Add;
2288: end if;
2289: p_return_status := FND_API.G_RET_STS_ERROR;
2290: rollback to start_create_link;
2291: FND_MSG_PUB.Count_And_Get (
2292: p_count => p_msg_count,
2293: p_data => p_msg_data);
2294: WHEN OTHERS THEN
2295: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2293: p_data => p_msg_data);
2294: WHEN OTHERS THEN
2295: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2296: rollback to start_create_link;
2297: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2298: SUBSTR (SQLERRM, 1, 240) );
2299: FND_MSG_PUB.Add;
2300: FND_MSG_PUB.Count_And_Get (
2301: p_count => p_msg_count,
2295: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2296: rollback to start_create_link;
2297: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2298: SUBSTR (SQLERRM, 1, 240) );
2299: FND_MSG_PUB.Add;
2300: FND_MSG_PUB.Count_And_Get (
2301: p_count => p_msg_count,
2302: p_data => p_msg_data);
2303: end CREATE_PAGE_REGION_ITEM;
2296: rollback to start_create_link;
2297: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2298: SUBSTR (SQLERRM, 1, 240) );
2299: FND_MSG_PUB.Add;
2300: FND_MSG_PUB.Count_And_Get (
2301: p_count => p_msg_count,
2302: p_data => p_msg_data);
2303: end CREATE_PAGE_REGION_ITEM;
2304:
2407:
2408: -- Initialize the message table if requested.
2409:
2410: if p_init_msg_tbl then
2411: FND_MSG_PUB.initialize;
2412: end if;
2413:
2414: savepoint start_create_relation;
2415:
2427: p_to_page_appl_id => p_to_page_appl_id,
2428: p_to_page_code => p_to_page_code,
2429: p_to_region_appl_id => p_to_region_appl_id,
2430: p_to_region_code => p_to_region_code) then
2431: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2432: FND_MESSAGE.SET_NAME('AK','AK_RELATION_EXISTS');
2433: FND_MSG_PUB.Add;
2434: end if;
2435: raise FND_API.G_EXC_ERROR;
2429: p_to_region_appl_id => p_to_region_appl_id,
2430: p_to_region_code => p_to_region_code) then
2431: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2432: FND_MESSAGE.SET_NAME('AK','AK_RELATION_EXISTS');
2433: FND_MSG_PUB.Add;
2434: end if;
2435: raise FND_API.G_EXC_ERROR;
2436: end if;
2437:
2645:
2646: -- /** commit the insert **/
2647: -- commit;
2648:
2649: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
2650: FND_MESSAGE.SET_NAME('AK','AK_RELATION_CREATED');
2651: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2652: ' ' || p_flow_code ||
2653: ' ' || p_foreign_key_name ||
2658: ' ' || to_char(p_to_page_appl_id) ||
2659: ' ' || p_to_page_code ||
2660: ' ' || to_char(p_to_region_appl_id) ||
2661: ' ' || p_to_region_code);
2662: FND_MSG_PUB.Add;
2663: end if;
2664:
2665: p_return_status := FND_API.G_RET_STS_SUCCESS;
2666:
2663: end if;
2664:
2665: p_return_status := FND_API.G_RET_STS_SUCCESS;
2666:
2667: FND_MSG_PUB.Count_And_Get (
2668: p_count => p_msg_count,
2669: p_data => p_msg_data);
2670:
2671: EXCEPTION
2669: p_data => p_msg_data);
2670:
2671: EXCEPTION
2672: WHEN VALUE_ERROR THEN
2673: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2674: FND_MESSAGE.SET_NAME('AK','AK_RELATION_VALUE_ERROR');
2675: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2676: ' ' || p_flow_code ||
2677: ' ' || p_foreign_key_name ||
2682: ' ' || to_char(p_to_page_appl_id) ||
2683: ' ' || p_to_page_code ||
2684: ' ' || to_char(p_to_region_appl_id) ||
2685: ' ' || p_to_region_code);
2686: FND_MSG_PUB.Add;
2687: end if;
2688: p_return_status := FND_API.G_RET_STS_ERROR;
2689: rollback to start_create_relation;
2690: FND_MSG_PUB.Count_And_Get (
2686: FND_MSG_PUB.Add;
2687: end if;
2688: p_return_status := FND_API.G_RET_STS_ERROR;
2689: rollback to start_create_relation;
2690: FND_MSG_PUB.Count_And_Get (
2691: p_count => p_msg_count,
2692: p_data => p_msg_data);
2693: WHEN FND_API.G_EXC_ERROR THEN
2694: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2690: FND_MSG_PUB.Count_And_Get (
2691: p_count => p_msg_count,
2692: p_data => p_msg_data);
2693: WHEN FND_API.G_EXC_ERROR THEN
2694: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2695: FND_MESSAGE.SET_NAME('AK','AK_RELATION_NOT_CREATED');
2696: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2697: ' ' || p_flow_code ||
2698: ' ' || p_foreign_key_name ||
2703: ' ' || to_char(p_to_page_appl_id) ||
2704: ' ' || p_to_page_code ||
2705: ' ' || to_char(p_to_region_appl_id) ||
2706: ' ' || p_to_region_code);
2707: FND_MSG_PUB.Add;
2708: end if;
2709: p_return_status := FND_API.G_RET_STS_ERROR;
2710: rollback to start_create_relation;
2711: FND_MSG_PUB.Count_And_Get (
2707: FND_MSG_PUB.Add;
2708: end if;
2709: p_return_status := FND_API.G_RET_STS_ERROR;
2710: rollback to start_create_relation;
2711: FND_MSG_PUB.Count_And_Get (
2712: p_count => p_msg_count,
2713: p_data => p_msg_data);
2714: WHEN OTHERS THEN
2715: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2713: p_data => p_msg_data);
2714: WHEN OTHERS THEN
2715: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2716: rollback to start_create_relation;
2717: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2718: SUBSTR (SQLERRM, 1, 240) );
2719: FND_MSG_PUB.Add;
2720: FND_MSG_PUB.Count_And_Get (
2721: p_count => p_msg_count,
2715: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2716: rollback to start_create_relation;
2717: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2718: SUBSTR (SQLERRM, 1, 240) );
2719: FND_MSG_PUB.Add;
2720: FND_MSG_PUB.Count_And_Get (
2721: p_count => p_msg_count,
2722: p_data => p_msg_data);
2723: end CREATE_REGION_RELATION;
2716: rollback to start_create_relation;
2717: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2718: SUBSTR (SQLERRM, 1, 240) );
2719: FND_MSG_PUB.Add;
2720: FND_MSG_PUB.Count_And_Get (
2721: p_count => p_msg_count,
2722: p_data => p_msg_data);
2723: end CREATE_REGION_RELATION;
2724:
2781:
2782: -- Initialize the message table if requested.
2783:
2784: if p_init_msg_tbl then
2785: FND_MSG_PUB.initialize;
2786: end if;
2787:
2788: savepoint start_delete_flow;
2789:
2794: p_api_version_number => 1.0,
2795: p_return_status => l_return_status,
2796: p_flow_application_id => p_flow_application_id,
2797: p_flow_code => p_flow_code) then
2798: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2799: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
2800: FND_MSG_PUB.Add;
2801: end if;
2802: raise FND_API.G_EXC_ERROR;
2796: p_flow_application_id => p_flow_application_id,
2797: p_flow_code => p_flow_code) then
2798: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2799: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
2800: FND_MSG_PUB.Add;
2801: end if;
2802: raise FND_API.G_EXC_ERROR;
2803: end if;
2804:
2813: open l_get_pages_csr;
2814: fetch l_get_pages_csr into l_page_application_id, l_page_code;
2815: if l_get_pages_csr%found then
2816: close l_get_pages_csr;
2817: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2818: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FLOW_PG');
2819: FND_MSG_PUB.Add;
2820: end if;
2821: raise FND_API.G_EXC_ERROR;
2815: if l_get_pages_csr%found then
2816: close l_get_pages_csr;
2817: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2818: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FLOW_PG');
2819: FND_MSG_PUB.Add;
2820: end if;
2821: raise FND_API.G_EXC_ERROR;
2822: end if;
2823: close l_get_pages_csr;
2860: where flow_application_id = p_flow_application_id
2861: and flow_code = p_flow_code;
2862:
2863: if (sql%notfound) then
2864: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2865: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
2866: FND_MSG_PUB.Add;
2867: end if;
2868: raise FND_API.G_EXC_ERROR;
2862:
2863: if (sql%notfound) then
2864: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2865: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
2866: FND_MSG_PUB.Add;
2867: end if;
2868: raise FND_API.G_EXC_ERROR;
2869: end if;
2870:
2872: where flow_application_id = p_flow_application_id
2873: and flow_code = p_flow_code;
2874:
2875: if (sql%notfound) then
2876: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2877: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
2878: FND_MSG_PUB.Add;
2879: end if;
2880: raise FND_API.G_EXC_ERROR;
2874:
2875: if (sql%notfound) then
2876: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2877: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
2878: FND_MSG_PUB.Add;
2879: end if;
2880: raise FND_API.G_EXC_ERROR;
2881: end if;
2882:
2882:
2883: --
2884: -- Load success message
2885: --
2886: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2887: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DELETED');
2888: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2889: ' ' || p_flow_code);
2890: FND_MSG_PUB.Add;
2886: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
2887: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DELETED');
2888: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2889: ' ' || p_flow_code);
2890: FND_MSG_PUB.Add;
2891: end if;
2892:
2893: p_return_status := FND_API.G_RET_STS_SUCCESS;
2894:
2891: end if;
2892:
2893: p_return_status := FND_API.G_RET_STS_SUCCESS;
2894:
2895: FND_MSG_PUB.Count_And_Get (
2896: p_count => p_msg_count,
2897: p_data => p_msg_data);
2898:
2899: EXCEPTION
2897: p_data => p_msg_data);
2898:
2899: EXCEPTION
2900: WHEN FND_API.G_EXC_ERROR THEN
2901: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2902: FND_MESSAGE.SET_NAME('AK','AK_FLOW_NOT_DELETED');
2903: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2904: ' ' || p_flow_code);
2905: FND_MSG_PUB.Add;
2901: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2902: FND_MESSAGE.SET_NAME('AK','AK_FLOW_NOT_DELETED');
2903: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
2904: ' ' || p_flow_code);
2905: FND_MSG_PUB.Add;
2906: end if;
2907: p_return_status := FND_API.G_RET_STS_ERROR;
2908: rollback to start_delete_flow;
2909: FND_MSG_PUB.Count_And_Get (
2905: FND_MSG_PUB.Add;
2906: end if;
2907: p_return_status := FND_API.G_RET_STS_ERROR;
2908: rollback to start_delete_flow;
2909: FND_MSG_PUB.Count_And_Get (
2910: p_count => p_msg_count,
2911: p_data => p_msg_data);
2912: WHEN OTHERS THEN
2913: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2911: p_data => p_msg_data);
2912: WHEN OTHERS THEN
2913: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2914: rollback to start_delete_flow;
2915: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2916: SUBSTR (SQLERRM, 1, 240) );
2917: FND_MSG_PUB.Add;
2918: FND_MSG_PUB.Count_And_Get (
2919: p_count => p_msg_count,
2913: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2914: rollback to start_delete_flow;
2915: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2916: SUBSTR (SQLERRM, 1, 240) );
2917: FND_MSG_PUB.Add;
2918: FND_MSG_PUB.Count_And_Get (
2919: p_count => p_msg_count,
2920: p_data => p_msg_data);
2921: end DELETE_FLOW;
2914: rollback to start_delete_flow;
2915: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2916: SUBSTR (SQLERRM, 1, 240) );
2917: FND_MSG_PUB.Add;
2918: FND_MSG_PUB.Count_And_Get (
2919: p_count => p_msg_count,
2920: p_data => p_msg_data);
2921: end DELETE_FLOW;
2922:
2995:
2996: -- Initialize the message table if requested.
2997:
2998: if p_init_msg_tbl then
2999: FND_MSG_PUB.initialize;
3000: end if;
3001:
3002: savepoint start_delete_page;
3003:
3010: p_flow_application_id => p_flow_application_id,
3011: p_flow_code => p_flow_code,
3012: p_page_application_id => p_page_application_id,
3013: p_page_code => p_page_code) then
3014: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3015: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
3016: FND_MSG_PUB.Add;
3017: end if;
3018: raise FND_API.G_EXC_ERROR;
3012: p_page_application_id => p_page_application_id,
3013: p_page_code => p_page_code) then
3014: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3015: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
3016: FND_MSG_PUB.Add;
3017: end if;
3018: raise FND_API.G_EXC_ERROR;
3019: end if;
3020:
3029: open l_get_page_regions_csr;
3030: fetch l_get_page_regions_csr into l_region_application_id, l_region_code;
3031: if l_get_page_regions_csr%found then
3032: close l_get_page_regions_csr;
3033: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3034: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PG_PGREG');
3035: FND_MSG_PUB.Add;
3036: end if;
3037: raise FND_API.G_EXC_ERROR;
3031: if l_get_page_regions_csr%found then
3032: close l_get_page_regions_csr;
3033: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3034: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PG_PGREG');
3035: FND_MSG_PUB.Add;
3036: end if;
3037: raise FND_API.G_EXC_ERROR;
3038: end if;
3039: close l_get_page_regions_csr;
3043: open l_check_primary_csr;
3044: fetch l_check_primary_csr into l_dummy;
3045: if l_check_primary_csr%found then
3046: close l_check_primary_csr;
3047: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3048: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_PPG_FLOW');
3049: FND_MSG_PUB.Add;
3050: end if;
3051: raise FND_API.G_EXC_ERROR;
3045: if l_check_primary_csr%found then
3046: close l_check_primary_csr;
3047: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3048: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_PPG_FLOW');
3049: FND_MSG_PUB.Add;
3050: end if;
3051: raise FND_API.G_EXC_ERROR;
3052: end if;
3053: close l_check_primary_csr;
3110: --
3111: -- issue a warning asking the user to re-assign a primary page
3112: -- to this flow
3113: --
3114: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3115: FND_MESSAGE.SET_NAME('AK','AK_ASSIGN_PRIMARY_PG_FLOW');
3116: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3117: ' ' || p_flow_code);
3118: FND_MSG_PUB.Add;
3114: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3115: FND_MESSAGE.SET_NAME('AK','AK_ASSIGN_PRIMARY_PG_FLOW');
3116: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3117: ' ' || p_flow_code);
3118: FND_MSG_PUB.Add;
3119: end if;
3120: end if;
3121: close l_check_primary_csr;
3122: end if;
3131: and page_application_id = p_page_application_id
3132: and page_code = p_page_code;
3133:
3134: if (sql%notfound) then
3135: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3136: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
3137: FND_MSG_PUB.Add;
3138: end if;
3139: raise FND_API.G_EXC_ERROR;
3133:
3134: if (sql%notfound) then
3135: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3136: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
3137: FND_MSG_PUB.Add;
3138: end if;
3139: raise FND_API.G_EXC_ERROR;
3140: end if;
3141:
3145: and page_application_id = p_page_application_id
3146: and page_code = p_page_code;
3147:
3148: if (sql%notfound) then
3149: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3150: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
3151: FND_MSG_PUB.Add;
3152: end if;
3153: raise FND_API.G_EXC_ERROR;
3147:
3148: if (sql%notfound) then
3149: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3150: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
3151: FND_MSG_PUB.Add;
3152: end if;
3153: raise FND_API.G_EXC_ERROR;
3154: end if;
3155:
3155:
3156: --
3157: -- Load success message
3158: --
3159: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
3160: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DELETED');
3161: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3162: ' ' || p_flow_code ||
3163: ' ' || to_char(p_page_application_id) ||
3161: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3162: ' ' || p_flow_code ||
3163: ' ' || to_char(p_page_application_id) ||
3164: ' ' || p_page_code);
3165: FND_MSG_PUB.Add;
3166: end if;
3167:
3168: p_return_status := FND_API.G_RET_STS_SUCCESS;
3169:
3166: end if;
3167:
3168: p_return_status := FND_API.G_RET_STS_SUCCESS;
3169:
3170: FND_MSG_PUB.Count_And_Get (
3171: p_count => p_msg_count,
3172: p_data => p_msg_data);
3173:
3174: EXCEPTION
3172: p_data => p_msg_data);
3173:
3174: EXCEPTION
3175: WHEN FND_API.G_EXC_ERROR THEN
3176: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3177: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_NOT_DELETED');
3178: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3179: ' ' || p_flow_code ||
3180: ' ' || to_char(p_page_application_id) ||
3178: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3179: ' ' || p_flow_code ||
3180: ' ' || to_char(p_page_application_id) ||
3181: ' ' || p_page_code);
3182: FND_MSG_PUB.Add;
3183: end if;
3184: p_return_status := FND_API.G_RET_STS_ERROR;
3185: rollback to start_delete_page;
3186: FND_MSG_PUB.Count_And_Get (
3182: FND_MSG_PUB.Add;
3183: end if;
3184: p_return_status := FND_API.G_RET_STS_ERROR;
3185: rollback to start_delete_page;
3186: FND_MSG_PUB.Count_And_Get (
3187: p_count => p_msg_count,
3188: p_data => p_msg_data);
3189: WHEN OTHERS THEN
3190: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: p_data => p_msg_data);
3189: WHEN OTHERS THEN
3190: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3191: rollback to start_delete_page;
3192: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3193: SUBSTR (SQLERRM, 1, 240) );
3194: FND_MSG_PUB.Add;
3195: FND_MSG_PUB.Count_And_Get (
3196: p_count => p_msg_count,
3190: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3191: rollback to start_delete_page;
3192: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3193: SUBSTR (SQLERRM, 1, 240) );
3194: FND_MSG_PUB.Add;
3195: FND_MSG_PUB.Count_And_Get (
3196: p_count => p_msg_count,
3197: p_data => p_msg_data);
3198: end DELETE_PAGE;
3191: rollback to start_delete_page;
3192: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3193: SUBSTR (SQLERRM, 1, 240) );
3194: FND_MSG_PUB.Add;
3195: FND_MSG_PUB.Count_And_Get (
3196: p_count => p_msg_count,
3197: p_data => p_msg_data);
3198: end DELETE_PAGE;
3199:
3314:
3315: -- Initialize the message table if requested.
3316:
3317: if p_init_msg_tbl then
3318: FND_MSG_PUB.initialize;
3319: end if;
3320:
3321: savepoint start_delete_page_region;
3322:
3331: p_page_application_id => p_page_application_id,
3332: p_page_code => p_page_code,
3333: p_region_application_id => p_region_application_id,
3334: p_region_code => p_region_code) then
3335: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3336: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_DOES_NOT_EXIST');
3337: FND_MSG_PUB.Add;
3338: end if;
3339: raise FND_API.G_EXC_ERROR;
3333: p_region_application_id => p_region_application_id,
3334: p_region_code => p_region_code) then
3335: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3336: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_DOES_NOT_EXIST');
3337: FND_MSG_PUB.Add;
3338: end if;
3339: raise FND_API.G_EXC_ERROR;
3340: end if;
3341:
3350: open l_get_items_csr;
3351: fetch l_get_items_csr into l_attribute_appl_id, l_attribute_code;
3352: if l_get_items_csr%found then
3353: close l_get_items_csr;
3354: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3355: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PGREG_ITEM');
3356: FND_MSG_PUB.Add;
3357: end if;
3358: raise FND_API.G_EXC_ERROR;
3352: if l_get_items_csr%found then
3353: close l_get_items_csr;
3354: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3355: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PGREG_ITEM');
3356: FND_MSG_PUB.Add;
3357: end if;
3358: raise FND_API.G_EXC_ERROR;
3359: end if;
3360: close l_get_items_csr;
3365: fetch l_get_from_relations_csr into l_foreign_key_name,
3366: l_page_appl_id, l_page_code, l_region_appl_id, l_region_code;
3367: if l_get_from_relations_csr%found then
3368: close l_get_from_relations_csr;
3369: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3370: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PGREG_REL');
3371: FND_MSG_PUB.Add;
3372: end if;
3373: raise FND_API.G_EXC_ERROR;
3367: if l_get_from_relations_csr%found then
3368: close l_get_from_relations_csr;
3369: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3370: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PGREG_REL');
3371: FND_MSG_PUB.Add;
3372: end if;
3373: raise FND_API.G_EXC_ERROR;
3374: end if;
3375: close l_get_from_relations_csr;
3380: fetch l_get_to_relations_csr into l_foreign_key_name,
3381: l_page_appl_id, l_page_code, l_region_appl_id, l_region_code;
3382: if l_get_to_relations_csr%found then
3383: close l_get_to_relations_csr;
3384: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3385: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PGREG_REL');
3386: FND_MSG_PUB.Add;
3387: end if;
3388: raise FND_API.G_EXC_ERROR;
3382: if l_get_to_relations_csr%found then
3383: close l_get_to_relations_csr;
3384: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3385: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_PGREG_REL');
3386: FND_MSG_PUB.Add;
3387: end if;
3388: raise FND_API.G_EXC_ERROR;
3389: end if;
3390: close l_get_to_relations_csr;
3394: open l_get_child_regions_csr;
3395: fetch l_get_child_regions_csr into l_region_appl_id, l_region_code;
3396: if l_get_child_regions_csr%found then
3397: close l_get_child_regions_csr;
3398: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3399: FND_MESSAGE.SET_NAME('AK','EXISTING_CHILDREN_PAGE_REGIONS');
3400: FND_MSG_PUB.Add;
3401: end if;
3402: raise FND_API.G_EXC_ERROR;
3396: if l_get_child_regions_csr%found then
3397: close l_get_child_regions_csr;
3398: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3399: FND_MESSAGE.SET_NAME('AK','EXISTING_CHILDREN_PAGE_REGIONS');
3400: FND_MSG_PUB.Add;
3401: end if;
3402: raise FND_API.G_EXC_ERROR;
3403: end if;
3404: close l_get_child_regions_csr;
3408: open l_check_primary_csr;
3409: fetch l_check_primary_csr into l_dummy;
3410: if l_check_primary_csr%found then
3411: close l_check_primary_csr;
3412: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3413: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_PPGREG_PG');
3414: FND_MSG_PUB.Add;
3415: end if;
3416: raise FND_API.G_EXC_ERROR;
3410: if l_check_primary_csr%found then
3411: close l_check_primary_csr;
3412: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3413: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_PPGREG_PG');
3414: FND_MSG_PUB.Add;
3415: end if;
3416: raise FND_API.G_EXC_ERROR;
3417: end if;
3418: close l_check_primary_csr;
3580: --
3581: -- issue a warning asking the user to re-assign a primary page
3582: -- to this flow
3583: --
3584: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3585: FND_MESSAGE.SET_NAME('AK','AK_ASSIGN_PRIMARY_PGREG_PG');
3586: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3587: ' ' || p_flow_code ||
3588: ' ' || to_char(p_page_application_id) ||
3586: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3587: ' ' || p_flow_code ||
3588: ' ' || to_char(p_page_application_id) ||
3589: ' ' || p_page_code);
3590: FND_MSG_PUB.Add;
3591: end if;
3592: end if;
3593: close l_check_primary_csr;
3594: end if;
3605: and region_application_id = p_region_application_id
3606: and region_code = p_region_code;
3607:
3608: if (sql%notfound) then
3609: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3610: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_DOES_NOT_EXIST');
3611: FND_MSG_PUB.Add;
3612: end if;
3613: raise FND_API.G_EXC_ERROR;
3607:
3608: if (sql%notfound) then
3609: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3610: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_DOES_NOT_EXIST');
3611: FND_MSG_PUB.Add;
3612: end if;
3613: raise FND_API.G_EXC_ERROR;
3614: end if;
3615:
3615:
3616: --
3617: -- Load success message
3618: --
3619: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
3620: FND_MESSAGE.SET_NAME('AK','AK_PAGE_REGION_DELETED');
3621: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3622: ' ' || p_flow_code ||
3623: ' ' || to_char(p_page_application_id) ||
3623: ' ' || to_char(p_page_application_id) ||
3624: ' ' || p_page_code ||
3625: ' ' || to_char(p_region_application_id) ||
3626: ' ' || p_region_code);
3627: FND_MSG_PUB.Add;
3628: end if;
3629:
3630: p_return_status := FND_API.G_RET_STS_SUCCESS;
3631:
3628: end if;
3629:
3630: p_return_status := FND_API.G_RET_STS_SUCCESS;
3631:
3632: FND_MSG_PUB.Count_And_Get (
3633: p_count => p_msg_count,
3634: p_data => p_msg_data);
3635:
3636: EXCEPTION
3634: p_data => p_msg_data);
3635:
3636: EXCEPTION
3637: WHEN FND_API.G_EXC_ERROR THEN
3638: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3639: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_NOT_DELETED');
3640: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3641: ' ' || p_flow_code ||
3642: ' ' || to_char(p_page_application_id) ||
3642: ' ' || to_char(p_page_application_id) ||
3643: ' ' || p_page_code ||
3644: ' ' || to_char(p_region_application_id) ||
3645: ' ' || p_region_code);
3646: FND_MSG_PUB.Add;
3647: end if;
3648: p_return_status := FND_API.G_RET_STS_ERROR;
3649: rollback to start_delete_page_region;
3650: FND_MSG_PUB.Count_And_Get (
3646: FND_MSG_PUB.Add;
3647: end if;
3648: p_return_status := FND_API.G_RET_STS_ERROR;
3649: rollback to start_delete_page_region;
3650: FND_MSG_PUB.Count_And_Get (
3651: p_count => p_msg_count,
3652: p_data => p_msg_data);
3653: WHEN OTHERS THEN
3654: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3652: p_data => p_msg_data);
3653: WHEN OTHERS THEN
3654: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3655: rollback to start_delete_page_region;
3656: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3657: SUBSTR (SQLERRM, 1, 240) );
3658: FND_MSG_PUB.Add;
3659: FND_MSG_PUB.Count_And_Get (
3660: p_count => p_msg_count,
3654: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3655: rollback to start_delete_page_region;
3656: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3657: SUBSTR (SQLERRM, 1, 240) );
3658: FND_MSG_PUB.Add;
3659: FND_MSG_PUB.Count_And_Get (
3660: p_count => p_msg_count,
3661: p_data => p_msg_data);
3662: end DELETE_PAGE_REGION;
3655: rollback to start_delete_page_region;
3656: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3657: SUBSTR (SQLERRM, 1, 240) );
3658: FND_MSG_PUB.Add;
3659: FND_MSG_PUB.Count_And_Get (
3660: p_count => p_msg_count,
3661: p_data => p_msg_data);
3662: end DELETE_PAGE_REGION;
3663:
3723:
3724: -- Initialize the message table if requested.
3725:
3726: if p_init_msg_tbl then
3727: FND_MSG_PUB.initialize;
3728: end if;
3729:
3730: savepoint start_delete_region_item;
3731:
3742: p_region_application_id => p_region_application_id,
3743: p_region_code => p_region_code,
3744: p_attribute_application_id => p_attribute_application_id,
3745: p_attribute_code => p_attribute_code) then
3746: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3747: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DOES_NOT_EXIST');
3748: FND_MSG_PUB.Add;
3749: end if;
3750: raise FND_API.G_EXC_ERROR;
3744: p_attribute_application_id => p_attribute_application_id,
3745: p_attribute_code => p_attribute_code) then
3746: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3747: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DOES_NOT_EXIST');
3748: FND_MSG_PUB.Add;
3749: end if;
3750: raise FND_API.G_EXC_ERROR;
3751: end if;
3752:
3782: and attribute_application_id = p_attribute_application_id
3783: and attribute_code = p_attribute_code;
3784:
3785: if (sql%notfound) then
3786: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3787: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DOES_NOT_EXIST');
3788: FND_MSG_PUB.Add;
3789: end if;
3790: raise FND_API.G_EXC_ERROR;
3784:
3785: if (sql%notfound) then
3786: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3787: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DOES_NOT_EXIST');
3788: FND_MSG_PUB.Add;
3789: end if;
3790: raise FND_API.G_EXC_ERROR;
3791: end if;
3792:
3792:
3793: --
3794: -- Load success message
3795: --
3796: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
3797: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DELETED');
3798: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3799: ' ' || p_flow_code ||
3800: ' ' || to_char(p_page_application_id) ||
3802: ' ' || to_char(p_region_application_id) ||
3803: ' ' || p_region_code ||
3804: ' ' || to_char(p_attribute_application_id)||
3805: ' ' || p_attribute_code);
3806: FND_MSG_PUB.Add;
3807: end if;
3808:
3809: p_return_status := FND_API.G_RET_STS_SUCCESS;
3810:
3807: end if;
3808:
3809: p_return_status := FND_API.G_RET_STS_SUCCESS;
3810:
3811: FND_MSG_PUB.Count_And_Get (
3812: p_count => p_msg_count,
3813: p_data => p_msg_data);
3814:
3815: EXCEPTION
3813: p_data => p_msg_data);
3814:
3815: EXCEPTION
3816: WHEN FND_API.G_EXC_ERROR THEN
3817: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3818: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_NOT_DELETED');
3819: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
3820: ' ' || p_flow_code ||
3821: ' ' || to_char(p_page_application_id) ||
3823: ' ' || to_char(p_region_application_id) ||
3824: ' ' || p_region_code ||
3825: ' ' || to_char(p_attribute_application_id)||
3826: ' ' || p_attribute_code);
3827: FND_MSG_PUB.Add;
3828: end if;
3829: p_return_status := FND_API.G_RET_STS_ERROR;
3830: rollback to start_delete_region_item;
3831: FND_MSG_PUB.Count_And_Get (
3827: FND_MSG_PUB.Add;
3828: end if;
3829: p_return_status := FND_API.G_RET_STS_ERROR;
3830: rollback to start_delete_region_item;
3831: FND_MSG_PUB.Count_And_Get (
3832: p_count => p_msg_count,
3833: p_data => p_msg_data);
3834: WHEN OTHERS THEN
3835: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3833: p_data => p_msg_data);
3834: WHEN OTHERS THEN
3835: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3836: rollback to start_delete_region_item;
3837: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3838: SUBSTR (SQLERRM, 1, 240) );
3839: FND_MSG_PUB.Add;
3840: FND_MSG_PUB.Count_And_Get (
3841: p_count => p_msg_count,
3835: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3836: rollback to start_delete_region_item;
3837: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3838: SUBSTR (SQLERRM, 1, 240) );
3839: FND_MSG_PUB.Add;
3840: FND_MSG_PUB.Count_And_Get (
3841: p_count => p_msg_count,
3842: p_data => p_msg_data);
3843: end DELETE_PAGE_REGION_ITEM;
3836: rollback to start_delete_region_item;
3837: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3838: SUBSTR (SQLERRM, 1, 240) );
3839: FND_MSG_PUB.Add;
3840: FND_MSG_PUB.Count_And_Get (
3841: p_count => p_msg_count,
3842: p_data => p_msg_data);
3843: end DELETE_PAGE_REGION_ITEM;
3844:
3925:
3926: -- Initialize the message table if requested.
3927:
3928: if p_init_msg_tbl then
3929: FND_MSG_PUB.initialize;
3930: end if;
3931:
3932: savepoint start_delete_relation;
3933:
3947: p_to_page_appl_id => p_to_page_appl_id,
3948: p_to_page_code => p_to_page_code,
3949: p_to_region_appl_id => p_to_region_appl_id,
3950: p_to_region_code => p_to_region_code) then
3951: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3952: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
3953: FND_MSG_PUB.Add;
3954: end if;
3955: raise FND_API.G_EXC_ERROR;
3949: p_to_region_appl_id => p_to_region_appl_id,
3950: p_to_region_code => p_to_region_code) then
3951: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3952: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
3953: FND_MSG_PUB.Add;
3954: end if;
3955: raise FND_API.G_EXC_ERROR;
3956: end if;
3957:
3966: open l_get_items_csr;
3967: fetch l_get_items_csr into l_attribute_application_id, l_attribute_code;
3968: if l_get_items_csr%found then
3969: close l_get_items_csr;
3970: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3971: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_REL_ITEM');
3972: FND_MSG_PUB.Add;
3973: end if;
3974: raise FND_API.G_EXC_ERROR;
3968: if l_get_items_csr%found then
3969: close l_get_items_csr;
3970: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3971: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_REL_ITEM');
3972: FND_MSG_PUB.Add;
3973: end if;
3974: raise FND_API.G_EXC_ERROR;
3975: end if;
3976: close l_get_items_csr;
4026: and to_region_appl_id = p_to_region_appl_id
4027: and to_region_code = p_to_region_code;
4028:
4029: if (sql%notfound) then
4030: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4031: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
4032: FND_MSG_PUB.Add;
4033: end if;
4034: raise FND_API.G_EXC_ERROR;
4028:
4029: if (sql%notfound) then
4030: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4031: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
4032: FND_MSG_PUB.Add;
4033: end if;
4034: raise FND_API.G_EXC_ERROR;
4035: end if;
4036:
4036:
4037: --
4038: -- Load success message
4039: --
4040: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) then
4041: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DELETED');
4042: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4043: ' ' || p_flow_code ||
4044: ' ' || p_foreign_key_name ||
4049: ' ' || to_char(p_to_page_appl_id) ||
4050: ' ' || p_to_page_code ||
4051: ' ' || to_char(p_to_region_appl_id) ||
4052: ' ' || p_to_region_code);
4053: FND_MSG_PUB.Add;
4054: end if;
4055:
4056: p_return_status := FND_API.G_RET_STS_SUCCESS;
4057:
4054: end if;
4055:
4056: p_return_status := FND_API.G_RET_STS_SUCCESS;
4057:
4058: FND_MSG_PUB.Count_And_Get (
4059: p_count => p_msg_count,
4060: p_data => p_msg_data);
4061:
4062: EXCEPTION
4060: p_data => p_msg_data);
4061:
4062: EXCEPTION
4063: WHEN FND_API.G_EXC_ERROR THEN
4064: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4065: FND_MESSAGE.SET_NAME('AK','AK_RELATION_NOT_DELETED');
4066: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4067: ' ' || p_flow_code ||
4068: ' ' || p_foreign_key_name ||
4073: ' ' || to_char(p_to_page_appl_id) ||
4074: ' ' || p_to_page_code ||
4075: ' ' || to_char(p_to_region_appl_id) ||
4076: ' ' || p_to_region_code);
4077: FND_MSG_PUB.Add;
4078: end if;
4079: p_return_status := FND_API.G_RET_STS_ERROR;
4080: rollback to start_delete_relation;
4081: FND_MSG_PUB.Count_And_Get (
4077: FND_MSG_PUB.Add;
4078: end if;
4079: p_return_status := FND_API.G_RET_STS_ERROR;
4080: rollback to start_delete_relation;
4081: FND_MSG_PUB.Count_And_Get (
4082: p_count => p_msg_count,
4083: p_data => p_msg_data);
4084: WHEN OTHERS THEN
4085: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4083: p_data => p_msg_data);
4084: WHEN OTHERS THEN
4085: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4086: rollback to start_delete_relation;
4087: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4088: SUBSTR (SQLERRM, 1, 240) );
4089: FND_MSG_PUB.Add;
4090: FND_MSG_PUB.Count_And_Get (
4091: p_count => p_msg_count,
4085: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4086: rollback to start_delete_relation;
4087: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4088: SUBSTR (SQLERRM, 1, 240) );
4089: FND_MSG_PUB.Add;
4090: FND_MSG_PUB.Count_And_Get (
4091: p_count => p_msg_count,
4092: p_data => p_msg_data);
4093: end DELETE_REGION_RELATION;
4086: rollback to start_delete_relation;
4087: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4088: SUBSTR (SQLERRM, 1, 240) );
4089: FND_MSG_PUB.Add;
4090: FND_MSG_PUB.Count_And_Get (
4091: p_count => p_msg_count,
4092: p_data => p_msg_data);
4093: end DELETE_REGION_RELATION;
4094:
4189:
4190: -- Initialize the message table if requested.
4191:
4192: if p_init_msg_tbl then
4193: FND_MSG_PUB.initialize;
4194: end if;
4195:
4196: savepoint start_update_flow;
4197:
4203: --
4204: open l_get_row_csr;
4205: fetch l_get_row_csr into l_flows_rec;
4206: if (l_get_row_csr%notfound) then
4207: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4208: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
4209: FND_MSG_PUB.Add;
4210: end if;
4211: close l_get_row_csr;
4205: fetch l_get_row_csr into l_flows_rec;
4206: if (l_get_row_csr%notfound) then
4207: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4208: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
4209: FND_MSG_PUB.Add;
4210: end if;
4211: close l_get_row_csr;
4212: raise FND_API.G_EXC_ERROR;
4213: end if;
4218: --
4219: open l_get_tl_row_csr(l_lang);
4220: fetch l_get_tl_row_csr into l_flows_tl_rec;
4221: if (l_get_tl_row_csr%notfound) then
4222: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4223: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
4224: FND_MSG_PUB.Add;
4225: end if;
4226: close l_get_tl_row_csr;
4220: fetch l_get_tl_row_csr into l_flows_tl_rec;
4221: if (l_get_tl_row_csr%notfound) then
4222: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4223: FND_MESSAGE.SET_NAME('AK','AK_FLOW_DOES_NOT_EXIST');
4224: FND_MSG_PUB.Add;
4225: end if;
4226: close l_get_tl_row_csr;
4227: raise FND_API.G_EXC_ERROR;
4228: end if;
4402: LAST_UPDATE_LOGIN = l_last_update_login
4403: where FLOW_APPLICATION_ID = p_flow_application_id
4404: and FLOW_CODE = p_flow_code;
4405: if (sql%notfound) then
4406: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4407: FND_MESSAGE.SET_NAME('AK','AK_FLOW_UPDATE_FAILED');
4408: FND_MSG_PUB.Add;
4409: end if;
4410: raise FND_API.G_EXC_ERROR;
4404: and FLOW_CODE = p_flow_code;
4405: if (sql%notfound) then
4406: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4407: FND_MESSAGE.SET_NAME('AK','AK_FLOW_UPDATE_FAILED');
4408: FND_MSG_PUB.Add;
4409: end if;
4410: raise FND_API.G_EXC_ERROR;
4411: end if;
4412:
4420: where FLOW_APPLICATION_ID = p_flow_application_id
4421: and FLOW_CODE = p_flow_code
4422: and l_lang in (LANGUAGE, SOURCE_LANG);
4423: if (sql%notfound) then
4424: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4425: FND_MESSAGE.SET_NAME('AK','AK_FLOW_UPDATE_FAILED');
4426: FND_MSG_PUB.Add;
4427: end if;
4428: raise FND_API.G_EXC_ERROR;
4422: and l_lang in (LANGUAGE, SOURCE_LANG);
4423: if (sql%notfound) then
4424: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4425: FND_MESSAGE.SET_NAME('AK','AK_FLOW_UPDATE_FAILED');
4426: FND_MSG_PUB.Add;
4427: end if;
4428: raise FND_API.G_EXC_ERROR;
4429: end if;
4430:
4430:
4431: -- /** commit the update **/
4432: -- commit;
4433:
4434: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
4435: FND_MESSAGE.SET_NAME('AK','AK_FLOW_UPDATED');
4436: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4437: ' ' || p_flow_code);
4438: FND_MSG_PUB.Add;
4434: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
4435: FND_MESSAGE.SET_NAME('AK','AK_FLOW_UPDATED');
4436: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4437: ' ' || p_flow_code);
4438: FND_MSG_PUB.Add;
4439: end if;
4440:
4441: end if;
4442: p_return_status := FND_API.G_RET_STS_SUCCESS;
4440:
4441: end if;
4442: p_return_status := FND_API.G_RET_STS_SUCCESS;
4443:
4444: FND_MSG_PUB.Count_And_Get (
4445: p_count => p_msg_count,
4446: p_data => p_msg_data);
4447:
4448: EXCEPTION
4446: p_data => p_msg_data);
4447:
4448: EXCEPTION
4449: WHEN VALUE_ERROR THEN
4450: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4451: FND_MESSAGE.SET_NAME('AK','AK_FLOW_VALUE_ERROR');
4452: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4453: ' ' || p_flow_code);
4454: FND_MSG_PUB.Add;
4450: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4451: FND_MESSAGE.SET_NAME('AK','AK_FLOW_VALUE_ERROR');
4452: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4453: ' ' || p_flow_code);
4454: FND_MSG_PUB.Add;
4455: end if;
4456: rollback to start_update_flow;
4457: p_return_status := FND_API.G_RET_STS_ERROR;
4458: FND_MSG_PUB.Count_And_Get (
4454: FND_MSG_PUB.Add;
4455: end if;
4456: rollback to start_update_flow;
4457: p_return_status := FND_API.G_RET_STS_ERROR;
4458: FND_MSG_PUB.Count_And_Get (
4459: p_count => p_msg_count,
4460: p_data => p_msg_data);
4461: WHEN FND_API.G_EXC_ERROR THEN
4462: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4458: FND_MSG_PUB.Count_And_Get (
4459: p_count => p_msg_count,
4460: p_data => p_msg_data);
4461: WHEN FND_API.G_EXC_ERROR THEN
4462: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4463: FND_MESSAGE.SET_NAME('AK','AK_FLOW_NOT_UPDATED');
4464: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4465: ' ' || p_flow_code);
4466: FND_MSG_PUB.Add;
4462: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4463: FND_MESSAGE.SET_NAME('AK','AK_FLOW_NOT_UPDATED');
4464: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4465: ' ' || p_flow_code);
4466: FND_MSG_PUB.Add;
4467: end if;
4468: p_return_status := FND_API.G_RET_STS_ERROR;
4469: rollback to start_update_flow;
4470: FND_MSG_PUB.Count_And_Get (
4466: FND_MSG_PUB.Add;
4467: end if;
4468: p_return_status := FND_API.G_RET_STS_ERROR;
4469: rollback to start_update_flow;
4470: FND_MSG_PUB.Count_And_Get (
4471: p_count => p_msg_count,
4472: p_data => p_msg_data);
4473: WHEN OTHERS THEN
4474: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4472: p_data => p_msg_data);
4473: WHEN OTHERS THEN
4474: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4475: rollback to start_update_flow;
4476: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4477: SUBSTR (SQLERRM, 1, 240) );
4478: FND_MSG_PUB.Add;
4479: FND_MSG_PUB.Count_And_Get (
4480: p_count => p_msg_count,
4474: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4475: rollback to start_update_flow;
4476: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4477: SUBSTR (SQLERRM, 1, 240) );
4478: FND_MSG_PUB.Add;
4479: FND_MSG_PUB.Count_And_Get (
4480: p_count => p_msg_count,
4481: p_data => p_msg_data);
4482: end UPDATE_FLOW;
4475: rollback to start_update_flow;
4476: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4477: SUBSTR (SQLERRM, 1, 240) );
4478: FND_MSG_PUB.Add;
4479: FND_MSG_PUB.Count_And_Get (
4480: p_count => p_msg_count,
4481: p_data => p_msg_data);
4482: end UPDATE_FLOW;
4483:
4590:
4591: -- Initialize the message table if requested.
4592:
4593: if p_init_msg_tbl then
4594: FND_MSG_PUB.initialize;
4595: end if;
4596:
4597: savepoint start_update_page;
4598:
4604: --
4605: open l_get_row_csr;
4606: fetch l_get_row_csr into l_pages_rec;
4607: if (l_get_row_csr%notfound) then
4608: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4609: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
4610: FND_MSG_PUB.Add;
4611: end if;
4612: close l_get_row_csr;
4606: fetch l_get_row_csr into l_pages_rec;
4607: if (l_get_row_csr%notfound) then
4608: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4609: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
4610: FND_MSG_PUB.Add;
4611: end if;
4612: close l_get_row_csr;
4613: raise FND_API.G_EXC_ERROR;
4614: end if;
4619: --
4620: open l_get_tl_row_csr(l_lang);
4621: fetch l_get_tl_row_csr into l_pages_tl_rec;
4622: if (l_get_tl_row_csr%notfound) then
4623: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4624: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
4625: FND_MSG_PUB.Add;
4626: end if;
4627: close l_get_tl_row_csr;
4621: fetch l_get_tl_row_csr into l_pages_tl_rec;
4622: if (l_get_tl_row_csr%notfound) then
4623: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
4624: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_DOES_NOT_EXIST');
4625: FND_MSG_PUB.Add;
4626: end if;
4627: close l_get_tl_row_csr;
4628: raise FND_API.G_EXC_ERROR;
4629: end if;
4806: and FLOW_CODE = p_flow_code
4807: and PAGE_APPLICATION_ID = p_page_application_id
4808: and PAGE_CODE = p_page_code;
4809: if (sql%notfound) then
4810: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4811: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_UPDATE_FAILED');
4812: FND_MSG_PUB.Add;
4813: end if;
4814: raise FND_API.G_EXC_ERROR;
4808: and PAGE_CODE = p_page_code;
4809: if (sql%notfound) then
4810: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4811: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_UPDATE_FAILED');
4812: FND_MSG_PUB.Add;
4813: end if;
4814: raise FND_API.G_EXC_ERROR;
4815: end if;
4816:
4826: and PAGE_APPLICATION_ID = p_page_application_id
4827: and PAGE_CODE = p_page_code
4828: and l_lang in (LANGUAGE, SOURCE_LANG);
4829: if (sql%notfound) then
4830: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4831: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_UPDATE_FAILED');
4832: FND_MSG_PUB.Add;
4833: end if;
4834: raise FND_API.G_EXC_ERROR;
4828: and l_lang in (LANGUAGE, SOURCE_LANG);
4829: if (sql%notfound) then
4830: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4831: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_UPDATE_FAILED');
4832: FND_MSG_PUB.Add;
4833: end if;
4834: raise FND_API.G_EXC_ERROR;
4835: end if;
4836:
4860: p_pass => p_pass,
4861: p_copy_redo_flag => p_copy_redo_flag);
4862: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4863: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4864: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4865: raise FND_API.G_EXC_ERROR;
4866: end if;
4867: end if;
4868: end if;
4866: end if;
4867: end if;
4868: end if;
4869:
4870: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
4871: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_UPDATED');
4872: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4873: ' ' || p_flow_code ||
4874: ' ' || to_char(p_page_application_id) ||
4872: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4873: ' ' || p_flow_code ||
4874: ' ' || to_char(p_page_application_id) ||
4875: ' ' || p_page_code);
4876: FND_MSG_PUB.Add;
4877: end if;
4878:
4879: end if;
4880: p_return_status := FND_API.G_RET_STS_SUCCESS;
4878:
4879: end if;
4880: p_return_status := FND_API.G_RET_STS_SUCCESS;
4881:
4882: FND_MSG_PUB.Count_And_Get (
4883: p_count => p_msg_count,
4884: p_data => p_msg_data);
4885:
4886: EXCEPTION
4884: p_data => p_msg_data);
4885:
4886: EXCEPTION
4887: WHEN VALUE_ERROR THEN
4888: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4889: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_VALUE_ERROR');
4890: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4891: ' ' || p_flow_code ||
4892: ' ' || to_char(p_page_application_id) ||
4890: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4891: ' ' || p_flow_code ||
4892: ' ' || to_char(p_page_application_id) ||
4893: ' ' || p_page_code);
4894: FND_MSG_PUB.Add;
4895: end if;
4896: rollback to start_update_page;
4897: p_return_status := FND_API.G_RET_STS_ERROR;
4898: FND_MSG_PUB.Count_And_Get (
4894: FND_MSG_PUB.Add;
4895: end if;
4896: rollback to start_update_page;
4897: p_return_status := FND_API.G_RET_STS_ERROR;
4898: FND_MSG_PUB.Count_And_Get (
4899: p_count => p_msg_count,
4900: p_data => p_msg_data);
4901: WHEN FND_API.G_EXC_ERROR THEN
4902: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4898: FND_MSG_PUB.Count_And_Get (
4899: p_count => p_msg_count,
4900: p_data => p_msg_data);
4901: WHEN FND_API.G_EXC_ERROR THEN
4902: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4903: FND_MESSAGE.SET_NAME('AK','AK_FLOW_PAGE_NOT_UPDATED');
4904: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4905: ' ' || p_flow_code ||
4906: ' ' || to_char(p_page_application_id) ||
4904: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
4905: ' ' || p_flow_code ||
4906: ' ' || to_char(p_page_application_id) ||
4907: ' ' || p_page_code);
4908: FND_MSG_PUB.Add;
4909: end if;
4910: p_return_status := FND_API.G_RET_STS_ERROR;
4911: rollback to start_update_page;
4912: FND_MSG_PUB.Count_And_Get (
4908: FND_MSG_PUB.Add;
4909: end if;
4910: p_return_status := FND_API.G_RET_STS_ERROR;
4911: rollback to start_update_page;
4912: FND_MSG_PUB.Count_And_Get (
4913: p_count => p_msg_count,
4914: p_data => p_msg_data);
4915: WHEN OTHERS THEN
4916: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4914: p_data => p_msg_data);
4915: WHEN OTHERS THEN
4916: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4917: rollback to start_update_page;
4918: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4919: SUBSTR (SQLERRM, 1, 240) );
4920: FND_MSG_PUB.Add;
4921: FND_MSG_PUB.Count_And_Get (
4922: p_count => p_msg_count,
4916: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4917: rollback to start_update_page;
4918: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4919: SUBSTR (SQLERRM, 1, 240) );
4920: FND_MSG_PUB.Add;
4921: FND_MSG_PUB.Count_And_Get (
4922: p_count => p_msg_count,
4923: p_data => p_msg_data);
4924: end UPDATE_PAGE;
4917: rollback to start_update_page;
4918: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4919: SUBSTR (SQLERRM, 1, 240) );
4920: FND_MSG_PUB.Add;
4921: FND_MSG_PUB.Count_And_Get (
4922: p_count => p_msg_count,
4923: p_data => p_msg_data);
4924: end UPDATE_PAGE;
4925:
5055:
5056: -- Initialize the message table if requested.
5057:
5058: if p_init_msg_tbl then
5059: FND_MSG_PUB.initialize;
5060: end if;
5061:
5062: savepoint start_update_page_region;
5063:
5069: --
5070: open l_get_row_csr;
5071: fetch l_get_row_csr into l_regions_rec;
5072: if (l_get_row_csr%notfound) then
5073: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5074: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_DOES_NOT_EXIST');
5075: FND_MSG_PUB.Add;
5076: end if;
5077: close l_get_row_csr;
5071: fetch l_get_row_csr into l_regions_rec;
5072: if (l_get_row_csr%notfound) then
5073: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5074: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_DOES_NOT_EXIST');
5075: FND_MSG_PUB.Add;
5076: end if;
5077: close l_get_row_csr;
5078: raise FND_API.G_EXC_ERROR;
5079: end if;
5411: and PAGE_CODE = p_page_code
5412: and REGION_APPLICATION_ID = p_region_application_id
5413: and REGION_CODE = p_region_code;
5414: if (sql%notfound) then
5415: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5416: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_UPDATE_FAILED');
5417: FND_MSG_PUB.Add;
5418: end if;
5419: raise FND_API.G_EXC_ERROR;
5413: and REGION_CODE = p_region_code;
5414: if (sql%notfound) then
5415: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5416: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_UPDATE_FAILED');
5417: FND_MSG_PUB.Add;
5418: end if;
5419: raise FND_API.G_EXC_ERROR;
5420: end if;
5421:
5449: p_copy_redo_flag => p_copy_redo_flag
5450: );
5451: if (l_return_status = FND_API.G_RET_STS_ERROR) or
5452: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
5453: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5454: raise FND_API.G_EXC_ERROR;
5455: end if;
5456: end if;
5457: end if;
5455: end if;
5456: end if;
5457: end if;
5458:
5459: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
5460: FND_MESSAGE.SET_NAME('AK','AK_PAGE_REGION_UPDATED');
5461: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
5462: ' ' || p_flow_code ||
5463: ' ' || to_char(p_page_application_id) ||
5463: ' ' || to_char(p_page_application_id) ||
5464: ' ' || p_page_code ||
5465: ' ' || to_char(p_region_application_id) ||
5466: ' ' || p_region_code);
5467: FND_MSG_PUB.Add;
5468: end if;
5469:
5470: end if;
5471: p_return_status := FND_API.G_RET_STS_SUCCESS;
5469:
5470: end if;
5471: p_return_status := FND_API.G_RET_STS_SUCCESS;
5472:
5473: FND_MSG_PUB.Count_And_Get (
5474: p_count => p_msg_count,
5475: p_data => p_msg_data);
5476:
5477: EXCEPTION
5475: p_data => p_msg_data);
5476:
5477: EXCEPTION
5478: WHEN VALUE_ERROR THEN
5479: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5480: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_VALUE_ERROR');
5481: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
5482: ' ' || p_flow_code ||
5483: ' ' || to_char(p_page_application_id) ||
5483: ' ' || to_char(p_page_application_id) ||
5484: ' ' || p_page_code ||
5485: ' ' || to_char(p_region_application_id) ||
5486: ' ' || p_region_code);
5487: FND_MSG_PUB.Add;
5488: end if;
5489: rollback to start_update_page_region;
5490: p_return_status := FND_API.G_RET_STS_ERROR;
5491: FND_MSG_PUB.Count_And_Get (
5487: FND_MSG_PUB.Add;
5488: end if;
5489: rollback to start_update_page_region;
5490: p_return_status := FND_API.G_RET_STS_ERROR;
5491: FND_MSG_PUB.Count_And_Get (
5492: p_count => p_msg_count,
5493: p_data => p_msg_data);
5494: WHEN FND_API.G_EXC_ERROR THEN
5495: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5491: FND_MSG_PUB.Count_And_Get (
5492: p_count => p_msg_count,
5493: p_data => p_msg_data);
5494: WHEN FND_API.G_EXC_ERROR THEN
5495: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5496: FND_MESSAGE.SET_NAME('AK','AK_PG_REGION_NOT_UPDATED');
5497: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
5498: ' ' || p_flow_code ||
5499: ' ' || to_char(p_page_application_id) ||
5499: ' ' || to_char(p_page_application_id) ||
5500: ' ' || p_page_code ||
5501: ' ' || to_char(p_region_application_id) ||
5502: ' ' || p_region_code);
5503: FND_MSG_PUB.Add;
5504: end if;
5505: p_return_status := FND_API.G_RET_STS_ERROR;
5506: rollback to start_update_page_region;
5507: FND_MSG_PUB.Count_And_Get (
5503: FND_MSG_PUB.Add;
5504: end if;
5505: p_return_status := FND_API.G_RET_STS_ERROR;
5506: rollback to start_update_page_region;
5507: FND_MSG_PUB.Count_And_Get (
5508: p_count => p_msg_count,
5509: p_data => p_msg_data);
5510: WHEN OTHERS THEN
5511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5509: p_data => p_msg_data);
5510: WHEN OTHERS THEN
5511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5512: rollback to start_update_page_region;
5513: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
5514: SUBSTR (SQLERRM, 1, 240) );
5515: FND_MSG_PUB.Add;
5516: FND_MSG_PUB.Count_And_Get (
5517: p_count => p_msg_count,
5511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5512: rollback to start_update_page_region;
5513: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
5514: SUBSTR (SQLERRM, 1, 240) );
5515: FND_MSG_PUB.Add;
5516: FND_MSG_PUB.Count_And_Get (
5517: p_count => p_msg_count,
5518: p_data => p_msg_data);
5519: end UPDATE_PAGE_REGION;
5512: rollback to start_update_page_region;
5513: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
5514: SUBSTR (SQLERRM, 1, 240) );
5515: FND_MSG_PUB.Add;
5516: FND_MSG_PUB.Count_And_Get (
5517: p_count => p_msg_count,
5518: p_data => p_msg_data);
5519: end UPDATE_PAGE_REGION;
5520:
5620:
5621: -- Initialize the message table if requested.
5622:
5623: if p_init_msg_tbl then
5624: FND_MSG_PUB.initialize;
5625: end if;
5626:
5627: savepoint start_update_item;
5628:
5634: --
5635: open l_get_row_csr;
5636: fetch l_get_row_csr into l_items_rec;
5637: if (l_get_row_csr%notfound) then
5638: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5639: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DOES_NOT_EXIST');
5640: FND_MSG_PUB.Add;
5641: end if;
5642: close l_get_row_csr;
5636: fetch l_get_row_csr into l_items_rec;
5637: if (l_get_row_csr%notfound) then
5638: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5639: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_DOES_NOT_EXIST');
5640: FND_MSG_PUB.Add;
5641: end if;
5642: close l_get_row_csr;
5643: raise FND_API.G_EXC_ERROR;
5644: end if;
5768: -- - either to_page or to_url_attribute must be specified,
5769: --
5770: if (l_items_rec.to_page_code is null) and
5771: (l_items_rec.to_url_attribute_code is null) then
5772: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5773: FND_MESSAGE.SET_NAME('AK','AK_NO_LINK_SELECTED');
5774: FND_MSG_PUB.Add;
5775: end if;
5776: raise FND_API.G_EXC_ERROR;
5770: if (l_items_rec.to_page_code is null) and
5771: (l_items_rec.to_url_attribute_code is null) then
5772: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5773: FND_MESSAGE.SET_NAME('AK','AK_NO_LINK_SELECTED');
5774: FND_MSG_PUB.Add;
5775: end if;
5776: raise FND_API.G_EXC_ERROR;
5777: end if;
5778:
5787: (l_items_rec.to_url_attribute_code <> FND_API.G_MISS_CHAR) ) or
5788: ( (l_items_rec.to_url_attribute_appl_id is not null) and
5789: (l_items_rec.to_url_attribute_appl_id <> FND_API.G_MISS_NUM) ) ) then
5790: l_error := TRUE;
5791: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5792: FND_MESSAGE.SET_NAME('AK','AK_TWO_LINK_SELECTED');
5793: FND_MSG_PUB.Add;
5794: end if;
5795: raise FND_API.G_EXC_ERROR;
5789: (l_items_rec.to_url_attribute_appl_id <> FND_API.G_MISS_NUM) ) ) then
5790: l_error := TRUE;
5791: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
5792: FND_MESSAGE.SET_NAME('AK','AK_TWO_LINK_SELECTED');
5793: FND_MSG_PUB.Add;
5794: end if;
5795: raise FND_API.G_EXC_ERROR;
5796: end if;
5797:
5854: and REGION_CODE = p_region_code
5855: and ATTRIBUTE_APPLICATION_ID = p_attribute_application_id
5856: and ATTRIBUTE_CODE = p_attribute_code;
5857: if (sql%notfound) then
5858: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5859: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_UPDATE_FAILED');
5860: FND_MSG_PUB.Add;
5861: end if;
5862: raise FND_API.G_EXC_ERROR;
5856: and ATTRIBUTE_CODE = p_attribute_code;
5857: if (sql%notfound) then
5858: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5859: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_UPDATE_FAILED');
5860: FND_MSG_PUB.Add;
5861: end if;
5862: raise FND_API.G_EXC_ERROR;
5863: end if;
5864:
5864:
5865: -- /** commit the update **/
5866: -- commit;
5867:
5868: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
5869: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_UPDATED');
5870: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
5871: ' ' || p_flow_code ||
5872: ' ' || to_char(p_page_application_id) ||
5874: ' ' || to_char(p_region_application_id) ||
5875: ' ' || p_region_code ||
5876: ' ' || to_char(p_attribute_application_id)||
5877: ' ' || p_attribute_code);
5878: FND_MSG_PUB.Add;
5879: end if;
5880:
5881: end if;
5882: p_return_status := FND_API.G_RET_STS_SUCCESS;
5880:
5881: end if;
5882: p_return_status := FND_API.G_RET_STS_SUCCESS;
5883:
5884: FND_MSG_PUB.Count_And_Get (
5885: p_count => p_msg_count,
5886: p_data => p_msg_data);
5887:
5888: EXCEPTION
5886: p_data => p_msg_data);
5887:
5888: EXCEPTION
5889: WHEN VALUE_ERROR THEN
5890: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5891: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_VALUE_ERROR');
5892: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
5893: ' ' || p_flow_code ||
5894: ' ' || to_char(p_page_application_id) ||
5896: ' ' || to_char(p_region_application_id) ||
5897: ' ' || p_region_code ||
5898: ' ' || to_char(p_attribute_application_id)||
5899: ' ' || p_attribute_code);
5900: FND_MSG_PUB.Add;
5901: end if;
5902: rollback to start_update_item;
5903: p_return_status := FND_API.G_RET_STS_ERROR;
5904: FND_MSG_PUB.Count_And_Get (
5900: FND_MSG_PUB.Add;
5901: end if;
5902: rollback to start_update_item;
5903: p_return_status := FND_API.G_RET_STS_ERROR;
5904: FND_MSG_PUB.Count_And_Get (
5905: p_count => p_msg_count,
5906: p_data => p_msg_data);
5907: WHEN FND_API.G_EXC_ERROR THEN
5908: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5904: FND_MSG_PUB.Count_And_Get (
5905: p_count => p_msg_count,
5906: p_data => p_msg_data);
5907: WHEN FND_API.G_EXC_ERROR THEN
5908: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5909: FND_MESSAGE.SET_NAME('AK','AK_PG_REG_ITEM_NOT_UPDATED');
5910: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
5911: ' ' || p_flow_code ||
5912: ' ' || to_char(p_page_application_id) ||
5916: ' ' || to_char(p_attribute_application_id)||
5917: ' ' || p_attribute_code ||
5918: ' ' || p_to_page_code ||
5919: ' ' || p_to_url_attribute_code);
5920: FND_MSG_PUB.Add;
5921: end if;
5922: p_return_status := FND_API.G_RET_STS_ERROR;
5923: rollback to start_update_item;
5924: FND_MSG_PUB.Count_And_Get (
5920: FND_MSG_PUB.Add;
5921: end if;
5922: p_return_status := FND_API.G_RET_STS_ERROR;
5923: rollback to start_update_item;
5924: FND_MSG_PUB.Count_And_Get (
5925: p_count => p_msg_count,
5926: p_data => p_msg_data);
5927: WHEN OTHERS THEN
5928: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5926: p_data => p_msg_data);
5927: WHEN OTHERS THEN
5928: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5929: rollback to start_update_item;
5930: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
5931: SUBSTR (SQLERRM, 1, 240) );
5932: FND_MSG_PUB.Add;
5933: FND_MSG_PUB.Count_And_Get (
5934: p_count => p_msg_count,
5928: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5929: rollback to start_update_item;
5930: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
5931: SUBSTR (SQLERRM, 1, 240) );
5932: FND_MSG_PUB.Add;
5933: FND_MSG_PUB.Count_And_Get (
5934: p_count => p_msg_count,
5935: p_data => p_msg_data);
5936: end UPDATE_PAGE_REGION_ITEM;
5929: rollback to start_update_item;
5930: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
5931: SUBSTR (SQLERRM, 1, 240) );
5932: FND_MSG_PUB.Add;
5933: FND_MSG_PUB.Count_And_Get (
5934: p_count => p_msg_count,
5935: p_data => p_msg_data);
5936: end UPDATE_PAGE_REGION_ITEM;
5937:
6039:
6040: -- Initialize the message table if requested.
6041:
6042: if p_init_msg_tbl then
6043: FND_MSG_PUB.initialize;
6044: end if;
6045:
6046: savepoint start_update_relation;
6047:
6051: --** retrieve ak_flow_region_relations row if it exists **
6052: open l_get_row_csr;
6053: fetch l_get_row_csr into l_relations_rec;
6054: if (l_get_row_csr%notfound) then
6055: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
6056: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
6057: FND_MSG_PUB.Add;
6058: end if;
6059: close l_get_row_csr;
6053: fetch l_get_row_csr into l_relations_rec;
6054: if (l_get_row_csr%notfound) then
6055: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
6056: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
6057: FND_MSG_PUB.Add;
6058: end if;
6059: close l_get_row_csr;
6060: raise FND_API.G_EXC_ERROR;
6061: end if;
6224: and to_page_code = p_to_page_code
6225: and to_region_appl_id = p_to_region_appl_id
6226: and to_region_code = p_to_region_code;
6227: if (sql%notfound) then
6228: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
6229: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
6230: FND_MESSAGE.SET_TOKEN('OBJECT','EC_FLOW_REGION_RELATIONSHIP', TRUE);
6231: FND_MSG_PUB.Add;
6232: end if;
6227: if (sql%notfound) then
6228: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
6229: FND_MESSAGE.SET_NAME('AK','AK_RELATION_DOES_NOT_EXIST');
6230: FND_MESSAGE.SET_TOKEN('OBJECT','EC_FLOW_REGION_RELATIONSHIP', TRUE);
6231: FND_MSG_PUB.Add;
6232: end if;
6233: raise FND_API.G_EXC_ERROR;
6234: end if;
6235:
6235:
6236: -- /** commit the update **/
6237: -- commit;
6238:
6239: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
6240: FND_MESSAGE.SET_NAME('AK','AK_RELATION_UPDATED');
6241: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
6242: ' ' || p_flow_code ||
6243: ' ' || p_foreign_key_name ||
6248: ' ' || to_char(p_to_page_appl_id) ||
6249: ' ' || p_to_page_code ||
6250: ' ' || to_char(p_to_region_appl_id) ||
6251: ' ' || p_to_region_code);
6252: FND_MSG_PUB.Add;
6253: end if;
6254:
6255: end if;
6256: p_return_status := FND_API.G_RET_STS_SUCCESS;
6254:
6255: end if;
6256: p_return_status := FND_API.G_RET_STS_SUCCESS;
6257:
6258: FND_MSG_PUB.Count_And_Get (
6259: p_count => p_msg_count,
6260: p_data => p_msg_data);
6261:
6262: EXCEPTION
6260: p_data => p_msg_data);
6261:
6262: EXCEPTION
6263: WHEN VALUE_ERROR THEN
6264: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6265: FND_MESSAGE.SET_NAME('AK','AK_RELATION_VALUE_ERROR');
6266: FND_MESSAGE.SET_TOKEN('OBJECT', 'EC_FLOW_REGION_RELATIONSHIP',TRUE);
6267: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
6268: ' ' || p_flow_code ||
6274: ' ' || to_char(p_to_page_appl_id) ||
6275: ' ' || p_to_page_code ||
6276: ' ' || to_char(p_to_region_appl_id) ||
6277: ' ' || p_to_region_code);
6278: FND_MSG_PUB.Add;
6279: end if;
6280: rollback to start_update_relation;
6281: p_return_status := FND_API.G_RET_STS_ERROR;
6282: FND_MSG_PUB.Count_And_Get (
6278: FND_MSG_PUB.Add;
6279: end if;
6280: rollback to start_update_relation;
6281: p_return_status := FND_API.G_RET_STS_ERROR;
6282: FND_MSG_PUB.Count_And_Get (
6283: p_count => p_msg_count,
6284: p_data => p_msg_data);
6285: WHEN FND_API.G_EXC_ERROR THEN
6286: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6282: FND_MSG_PUB.Count_And_Get (
6283: p_count => p_msg_count,
6284: p_data => p_msg_data);
6285: WHEN FND_API.G_EXC_ERROR THEN
6286: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6287: FND_MESSAGE.SET_NAME('AK','AK_RELATION_NOT_UPDATED');
6288: FND_MESSAGE.SET_TOKEN('OBJECT', 'EC_FLOW_REGION_RELATIONSHIP',TRUE);
6289: FND_MESSAGE.SET_TOKEN('KEY', to_char(p_flow_application_id) ||
6290: ' ' || p_flow_code ||
6296: ' ' || to_char(p_to_page_appl_id) ||
6297: ' ' || p_to_page_code ||
6298: ' ' || to_char(p_to_region_appl_id) ||
6299: ' ' || p_to_region_code);
6300: FND_MSG_PUB.Add;
6301: end if;
6302: p_return_status := FND_API.G_RET_STS_ERROR;
6303: rollback to start_update_relation;
6304: FND_MSG_PUB.Count_And_Get (
6300: FND_MSG_PUB.Add;
6301: end if;
6302: p_return_status := FND_API.G_RET_STS_ERROR;
6303: rollback to start_update_relation;
6304: FND_MSG_PUB.Count_And_Get (
6305: p_count => p_msg_count,
6306: p_data => p_msg_data);
6307: WHEN OTHERS THEN
6308: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6306: p_data => p_msg_data);
6307: WHEN OTHERS THEN
6308: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6309: rollback to start_update_relation;
6310: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
6311: SUBSTR (SQLERRM, 1, 240) );
6312: FND_MSG_PUB.Add;
6313: FND_MSG_PUB.Count_And_Get (
6314: p_count => p_msg_count,
6308: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6309: rollback to start_update_relation;
6310: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
6311: SUBSTR (SQLERRM, 1, 240) );
6312: FND_MSG_PUB.Add;
6313: FND_MSG_PUB.Count_And_Get (
6314: p_count => p_msg_count,
6315: p_data => p_msg_data);
6316: FND_MSG_PUB.Count_And_Get (
6309: rollback to start_update_relation;
6310: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
6311: SUBSTR (SQLERRM, 1, 240) );
6312: FND_MSG_PUB.Add;
6313: FND_MSG_PUB.Count_And_Get (
6314: p_count => p_msg_count,
6315: p_data => p_msg_data);
6316: FND_MSG_PUB.Count_And_Get (
6317: p_count => p_msg_count,
6312: FND_MSG_PUB.Add;
6313: FND_MSG_PUB.Count_And_Get (
6314: p_count => p_msg_count,
6315: p_data => p_msg_data);
6316: FND_MSG_PUB.Count_And_Get (
6317: p_count => p_msg_count,
6318: p_data => p_msg_data);
6319: end UPDATE_REGION_RELATION;
6320:
6440: WHEN FND_API.G_EXC_ERROR THEN
6441: p_return_status := FND_API.G_RET_STS_ERROR;
6442: WHEN OTHERS THEN
6443: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6444: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
6445: SUBSTR (SQLERRM, 1, 240) );
6446: FND_MSG_PUB.Add;
6447:
6448: end CHECK_DISPLAY_SEQUENCE;
6442: WHEN OTHERS THEN
6443: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6444: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
6445: SUBSTR (SQLERRM, 1, 240) );
6446: FND_MSG_PUB.Add;
6447:
6448: end CHECK_DISPLAY_SEQUENCE;
6449:
6450: end AK_FLOW_PVT;