The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(*) INTO l_count
FROM MTL_EAM_LOCATIONS
WHERE location_codes = p_location_codes
and creation_organization_id = p_organization_id;
SELECT COUNT(*) INTO l_count
FROM MTL_EAM_LOCATIONS
WHERE LOCATION_CODES = P_LOCATION_CODES AND
CREATION_ORGANIZATION_ID = P_CREATION_ORGANIZATION_ID;
PROCEDURE insert_asset_areas
( p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
p_commit IN VARCHAR2 := FND_API.G_FALSE ,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ,
p_location_codes IN varchar2,
p_start_date IN date:=null,
p_end_date IN date:=null,
p_organization_id IN number,
p_description IN varchar2:=null,
p_creation_organization_id IN number
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'insert_asset_areas';
SAVEPOINT insert_asset_areas;
INSERT INTO MTL_EAM_LOCATIONS
(
LOCATION_ID,
LOCATION_CODES,
START_DATE ,
END_DATE ,
ORGANIZATION_ID,
DESCRIPTION ,
CREATION_ORGANIZATION_ID,
CREATED_BY ,
CREATION_DATE ,
LAST_UPDATE_LOGIN ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY
)
VALUES
(
WIP_EAM_LOCATIONS_S.NEXTVAL,
P_LOCATION_CODES ,
P_START_DATE ,
P_END_DATE ,
P_ORGANIZATION_ID,
P_DESCRIPTION ,
P_ORGANIZATION_ID,
fnd_global.user_id,
sysdate,
fnd_global.login_id,
sysdate ,
fnd_global.user_id
);
ROLLBACK TO insert_asset_areas;
ROLLBACK TO insert_asset_areas;
ROLLBACK TO insert_asset_areas;
END insert_asset_areas;
PROCEDURE update_asset_areas
( p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
p_commit IN VARCHAR2 := FND_API.G_FALSE ,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ,
p_location_id IN number,
p_location_codes IN varchar2,
p_start_date IN date:=null,
p_end_date IN date:=null,
p_organization_id IN number,
p_description IN varchar2:=null,
p_creation_organization_id IN number
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'update_asset_areas';
SAVEPOINT update_asset_areas;
SELECT COUNT(*) INTO l_count
FROM MTL_EAM_LOCATIONS
WHERE CREATION_ORGANIZATION_ID = P_CREATION_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID;
SELECT COUNT(*) INTO l_count
FROM MTL_EAM_LOCATIONS
WHERE CREATION_ORGANIZATION_ID = P_CREATION_ORGANIZATION_ID
AND LOCATION_ID <> P_LOCATION_ID
AND LOCATION_CODES = P_LOCATION_CODES;
UPDATE MTL_EAM_LOCATIONS
SET
LOCATION_CODES = P_LOCATION_CODES ,
START_DATE = P_START_DATE ,
END_DATE = P_END_DATE ,
--ORGANIZATION_ID = P_ORGANIZATION_ID , -- not for update
DESCRIPTION = P_DESCRIPTION ,
--CREATION_ORGANIZATION_ID = P_CREATION_ORGANIZATION_ID, --not to be updated as it is pk
LAST_UPDATE_LOGIN = fnd_global.login_id ,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = fnd_global.user_id
where
LOCATION_ID = P_LOCATION_ID;
ROLLBACK TO update_asset_areas;
ROLLBACK TO update_asset_areas;
ROLLBACK TO update_asset_areas;
END update_asset_areas;