702:
703: BEGIN
704: SAVEPOINT FormFunctionObsoleteUpdate;
705: IF (p_func_name IS NULL OR p_func_name = '') THEN
706: FND_MESSAGE.SET_NAME('BIS','BIS_INV_FORM_FUNC_VAL');
707: FND_MSG_PUB.ADD;
708: RAISE FND_API.G_EXC_ERROR;
709: END IF;
710:
708: RAISE FND_API.G_EXC_ERROR;
709: END IF;
710:
711: IF (p_obsolete IS NULL OR (p_obsolete <> 'Y' AND p_obsolete <> 'N')) THEN
712: FND_MESSAGE.SET_NAME('BIS','BIS_PMF_INVALID_OBSOLETE_FLAG');
713: FND_MSG_PUB.ADD;
714: RAISE FND_API.G_EXC_ERROR;
715: END IF;
716:
775: BEGIN
776: FND_MSG_PUB.Initialize;
777: x_msg_data := '';
778: IF (p_functionName IS NULL OR p_functionName = '') THEN
779: FND_MESSAGE.SET_NAME('BIS','BIS_INV_FORM_FUNC_VAL');
780: FND_MSG_PUB.ADD;
781: RAISE FND_API.G_EXC_ERROR;
782: END IF;
783: x_return_status := FND_API.G_RET_STS_SUCCESS;
783: x_return_status := FND_API.G_RET_STS_SUCCESS;
784: l_parent_obj_table := BIS_RSG_PUB_API_PKG.GetParentObjects(p_functionName,'PORTLET','PAGE',l_ret_status,l_msg_data);
785:
786: IF ((l_ret_status IS NOT NULL) AND (l_ret_status <> FND_API.G_RET_STS_SUCCESS)) THEN
787: FND_MESSAGE.SET_NAME('BIS',l_msg_data);
788: FND_MSG_PUB.ADD;
789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
790: ELSE
791: IF (l_parent_obj_table.COUNT > 0) THEN
795: l_dep_obj_list := l_dep_obj_list ||'
796: EXIT WHEN l_index = l_parent_obj_table.last;
797: l_index := l_parent_obj_table.next(l_index);
798: END LOOP;
799: FND_MESSAGE.SET_NAME('BIS','BIS_HTML_PORTLET_DELETE');
800: FND_MESSAGE.SET_TOKEN('PORTLET', p_user_functionName);
801: FND_MESSAGE.SET_TOKEN('DEP_OBJ_LIST',l_dep_obj_list);
802: FND_MSG_PUB.ADD;
803: END IF;
804: END IF;
797: l_index := l_parent_obj_table.next(l_index);
798: END LOOP;
799: FND_MESSAGE.SET_NAME('BIS','BIS_HTML_PORTLET_DELETE');
800: FND_MESSAGE.SET_TOKEN('PORTLET', p_user_functionName);
801: FND_MESSAGE.SET_TOKEN('DEP_OBJ_LIST',l_dep_obj_list);
802: FND_MSG_PUB.ADD;
803: END IF;
804: END IF;
805: FND_MSG_PUB.Count_And_Get