[Home] [Help]
805: -- END mrajput
806:
807: --LDENG
808: IF (l_clear_phase_flag = 'Y') THEN
809: UPDATE PA_PROJ_ELEMENTS
810: SET phase_version_id = null
811: WHERE project_id = p_project_id
812: AND phase_version_id IS NOT NULL;
813: end if;
901:
902: if p_validate_only <> FND_API.G_TRUE then
903: BEGIN
904: SELECT 'x' INTO l_dummy
905: FROM pa_proj_elements
906: WHERE proj_element_id = p_proj_element_id
907: FOR UPDATE OF record_version_number NOWAIT;
908: EXCEPTION
909: when TIMEOUT_ON_RESOURCE then
931: END;
932: else
933: BEGIN
934: SELECT 'x' INTO l_dummy
935: FROM pa_proj_elements
936: WHERE proj_element_id = p_proj_element_id;
937: EXCEPTION
938: when NO_DATA_FOUND then
939: if p_calling_module = 'FORM' then
959: raise FND_API.G_EXC_ERROR;
960: end if;
961:
962: if p_validate_only <> FND_API.G_TRUE then
963: UPDATE PA_PROJ_ELEMENTS
964: SET name = p_structure_name,
965: record_version_number = record_version_number + 1,
966: last_update_date = SYSDATE,
967: last_updated_by = FND_GLOBAL.USER_ID,