The following lines contain the word 'select', 'insert', 'update' or 'delete':
FND_OBJECT_TABLESPACES_PKG.INSERT_ROW(
X_ROWID => l_row_id,
P_APPLICATION_ID => l_application_id,
P_OBJECT_NAME => P_OBJECT_NAME,
P_OBJECT_TYPE => P_OBJECT_TYPE,
P_TABLESPACE_TYPE => P_TABLESPACE_TYPE,
P_CUSTOM_TABLESPACE_TYPE => P_TABLESPACE_TYPE,
P_OBJECT_SOURCE => null ,
P_ORACLE_USERNAME => l_oracle_username,
P_CUSTOM_FLAG => 'C',
P_CREATION_DATE => sysdate,
P_CREATED_BY => G_USER_ID,
P_LAST_UPDATE_DATE => sysdate,
P_LAST_UPDATED_BY => G_USER_ID,
P_LAST_UPDATE_LOGIN => G_LOGIN_ID );
PROCEDURE UPDATE_OBJECT_TABLESPACES (
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
P_Commit IN VARCHAR2 := FND_API.G_FALSE,
P_application_short_name in varchar2,
P_object_name in varchar2,
P_tablespace_type in varchar2,
P_object_type in varchar2 := 'TABLE',
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2)
IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_OBJECT_TABLESPACES';
SAVEPOINT UPDATE_OBJECT_TABLESPACES_PUB;
P_Validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_application_short_name => p_APPLICATION_SHORT_NAME,
P_OBJECT_NAME => P_OBJECT_NAME,
P_OBJECT_TYPE => P_OBJECT_TYPE,
P_TABLESPACE_TYPE => P_TABLESPACE_TYPE,
x_application_id => l_application_id,
x_oracle_username => l_oracle_username,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
FND_OBJECT_TABLESPACES_PKG.UPDATE_ROW(
P_APPLICATION_ID => l_application_id,
P_OBJECT_NAME => p_OBJECT_NAME,
P_OBJECT_TYPE => p_OBJECT_TYPE,
P_TABLESPACE_TYPE => NULL,
P_CUSTOM_TABLESPACE_TYPE => p_TABLESPACE_TYPE,
P_OBJECT_SOURCE => NULL,
P_ORACLE_USERNAME => l_oracle_username,
P_CUSTOM_FLAG => 'C',
P_LAST_UPDATE_DATE => sysdate,
P_LAST_UPDATED_BY => G_USER_ID,
P_LAST_UPDATE_LOGIN => G_LOGIN_ID);
ROLLBACK TO UPDATE_OBJECT_TABLESPACES_PUB;
ROLLBACK TO UPDATE_OBJECT_TABLESPACES_PUB;
ROLLBACK TO UPDATE_OBJECT_TABLESPACES_PUB;
END UPDATE_OBJECT_TABLESPACES;
select 1
from fnd_tablespaces
where tablespace_type = p_tablespace_type;
select application_id
from fnd_application
where application_short_name = p_application_short_name;
select oracle_username
from fnd_product_installations fpi,
fnd_oracle_userid fou
where fpi.oracle_id = fou.oracle_id
and fpi.application_id = l_app_id;
select 1
from fnd_object_tablespaces
where application_id = l_app_id
and object_name = p_object_name;
select 1
from dba_tables dt
where dt.owner = l_oracle_user
AND dt.table_name = p_object_name
AND EXISTS (select 1 from fnd_oracle_userid fou
where fou.oracle_username = dt.owner
and read_only_flag IN ('E','A','U','K','M'))
AND NVL(dt.temporary, 'N') = 'N'
AND NVL(dt.iot_type, 'X') NOT IN ('IOT', 'IOT_OVERFLOW')
AND NOT EXISTS ( select ds.table_name
from all_snapshots ds
where ds.owner = dt.owner
and ds.table_name = dt.table_name)
AND NOT EXISTS ( select dsl.log_table
from all_snapshot_logs dsl
where dsl.log_owner = dt.owner
and dsl.log_table = dt.table_name)
AND NOT EXISTS ( select dqt.queue_table
from all_queue_tables dqt
where dqt.owner = dt.owner
and dqt.queue_table = dt.table_name)
AND dt.table_name NOT LIKE 'AQ$%'
AND dt.table_name NOT LIKE 'DR$%'
AND dt.table_name NOT LIKE 'RUPD$%'
AND dt.table_name NOT LIKE 'MDRT%$';
FND_MESSAGE.Set_Name('FND', 'OATM_NO_INSERT');
ELSIF (p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (p_OBJECT_NAME is not NULL AND p_OBJECT_NAME <> FND_API.G_MISS_CHAR)
THEN
OPEN c4(l_application_id);
FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');
FND_MESSAGE.Set_Name('FND', 'OATM_NO_UPDATE');