The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID in OUT NOCOPY VARCHAR2,
X_COLUMN_RULE_ID in NUMBER,
X_COLUMNS_METADATA_ID in NUMBER,
X_OBJECT_TYPE in VARCHAR2,
X_OBJECT_ATTRIBUTE in VARCHAR2,
X_AK_REGION_CODE in VARCHAR2,
X_AK_ATTRIBUTE_CODE in VARCHAR2,
X_ACTIVITY_TYPE_CODE in VARCHAR2,
X_HTML_FORM_PARAM in VARCHAR2,
X_DB_TABLE_NAME in VARCHAR2,
X_DB_COLUMN_NAME in VARCHAR2,
X_SYSTEM_STATUS_CODE in VARCHAR2,
X_RULE_TYPE in VARCHAR2,
X_SEEDED_FLAG in VARCHAR2,
X_SECURITY_GROUP_ID in NUMBER,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_APPLICATION_ID in NUMBER,
X_CREATION_DATE in DATE,
X_CREATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
)is
begin
insert into AMS_COLUMN_RULES (
COLUMN_RULE_ID,
COLUMNS_METADATA_ID,
OBJECT_TYPE,
OBJECT_ATTRIBUTE,
AK_REGION_CODE,
AK_ATTRIBUTE_CODE,
ACTIVITY_TYPE_CODE,
HTML_FORM_PARAM,
DB_TABLE_NAME,
DB_COLUMN_NAME,
SYSTEM_STATUS_CODE,
RULE_TYPE,
SEEDED_FLAG,
--SECURITY_GROUP_ID,
OBJECT_VERSION_NUMBER,
APPLICATION_ID ,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE
) values (
X_COLUMN_RULE_ID,
X_COLUMNS_METADATA_ID,
X_OBJECT_TYPE,
X_OBJECT_ATTRIBUTE,
X_AK_REGION_CODE,
X_AK_ATTRIBUTE_CODE,
X_ACTIVITY_TYPE_CODE,
X_HTML_FORM_PARAM,
X_DB_TABLE_NAME,
X_DB_COLUMN_NAME,
X_SYSTEM_STATUS_CODE,
X_RULE_TYPE,
X_SEEDED_FLAG,
--X_SECURITY_GROUP_ID,
X_OBJECT_VERSION_NUMBER,
X_APPLICATION_ID,
X_LAST_UPDATED_BY,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_LOGIN,
X_LAST_UPDATE_DATE
);
end INSERT_ROW;
cursor c1 is select
COLUMNS_METADATA_ID,
OBJECT_TYPE,
OBJECT_ATTRIBUTE,
AK_REGION_CODE,
AK_ATTRIBUTE_CODE,
ACTIVITY_TYPE_CODE,
HTML_FORM_PARAM,
DB_TABLE_NAME,
DB_COLUMN_NAME,
SYSTEM_STATUS_CODE,
RULE_TYPE,
SEEDED_FLAG,
SECURITY_GROUP_ID,
OBJECT_VERSION_NUMBER,
APPLICATION_ID,
COLUMN_RULE_ID
from AMS_COLUMN_RULES
where COLUMN_RULE_ID = X_COLUMN_RULE_ID
for update of COLUMN_RULE_ID nowait;
procedure UPDATE_ROW (
X_COLUMN_RULE_ID in NUMBER,
X_COLUMNS_METADATA_ID in NUMBER,
X_OBJECT_TYPE in VARCHAR2,
X_OBJECT_ATTRIBUTE in VARCHAR2,
X_AK_REGION_CODE in VARCHAR2,
X_AK_ATTRIBUTE_CODE in VARCHAR2,
X_ACTIVITY_TYPE_CODE in VARCHAR2,
X_HTML_FORM_PARAM in VARCHAR2,
X_DB_TABLE_NAME in VARCHAR2,
X_DB_COLUMN_NAME in VARCHAR2,
X_SYSTEM_STATUS_CODE in VARCHAR2,
X_RULE_TYPE in VARCHAR2,
X_SEEDED_FLAG in VARCHAR2,
X_SECURITY_GROUP_ID in NUMBER,
X_OBJECT_VERSION_NUMBER in NUMBER,
X_APPLICATION_ID in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
update AMS_COLUMN_RULES set
COLUMNS_METADATA_ID = X_COLUMNS_METADATA_ID,
OBJECT_TYPE = X_OBJECT_TYPE,
OBJECT_ATTRIBUTE = X_OBJECT_ATTRIBUTE,
AK_REGION_CODE = X_AK_REGION_CODE,
AK_ATTRIBUTE_CODE = X_AK_ATTRIBUTE_CODE,
ACTIVITY_TYPE_CODE = X_ACTIVITY_TYPE_CODE,
HTML_FORM_PARAM = X_HTML_FORM_PARAM,
DB_TABLE_NAME = X_DB_TABLE_NAME,
DB_COLUMN_NAME = X_DB_COLUMN_NAME,
SYSTEM_STATUS_CODE = X_SYSTEM_STATUS_CODE,
RULE_TYPE = X_RULE_TYPE,
SEEDED_FLAG = X_SEEDED_FLAG,
--SECURITY_GROUP_ID = X_SECURITY_GROUP_ID,
OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
APPLICATION_ID = X_APPLICATION_ID ,
COLUMN_RULE_ID = X_COLUMN_RULE_ID,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where COLUMN_RULE_ID = X_COLUMN_RULE_ID;
end UPDATE_ROW;
procedure DELETE_ROW (
X_COLUMN_RULE_ID in NUMBER
) is
begin
delete from AMS_COLUMN_RULES
where COLUMN_RULE_ID = X_COLUMN_RULE_ID;
end DELETE_ROW;
select object_version_number, column_rule_id
from AMS_COLUMN_RULES
where OBJECT_TYPE = X_OBJECT_TYPE
and OBJECT_ATTRIBUTE = X_OBJECT_ATTRIBUTE
and nvl(ACTIVITY_TYPE_CODE,0) = nvl(X_ACTIVITY_TYPE_CODE, 0)
and HTML_FORM_PARAM = X_HTML_FORM_PARAM
and APPLICATION_ID = X_APPLICATION_ID
and nvl(SYSTEM_STATUS_CODE, 0)= nvl(X_SYSTEM_STATUS_CODE, 0)
and RULE_TYPE =X_RULE_TYPE
and COLUMNS_METADATA_ID = X_COLUMNS_METADATA_ID;
select 'x'
from AMS_COLUMN_RULES
where OBJECT_TYPE = X_OBJECT_TYPE
and OBJECT_ATTRIBUTE = X_OBJECT_ATTRIBUTE
and nvl(ACTIVITY_TYPE_CODE, 0) = nvl(X_ACTIVITY_TYPE_CODE, 0)
and HTML_FORM_PARAM = X_HTML_FORM_PARAM
and APPLICATION_ID = X_APPLICATION_ID
and nvl(SYSTEM_STATUS_CODE, 0)= nvl(X_SYSTEM_STATUS_CODE, 0)
and RULE_TYPE =X_RULE_TYPE
and COLUMNS_METADATA_ID = X_COLUMNS_METADATA_ID;
select AMS_COLUMN_RULES_S.nextval
from dual;
select 'x'
from AMS_COLUMN_RULES
where COLUMN_RULE_ID = id_in;
AMS_COLUMN_RULES_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_COLUMN_RULE_ID => l_colrule_id,
X_COLUMNS_METADATA_ID => X_COLUMNS_METADATA_ID,
X_OBJECT_TYPE => X_OBJECT_TYPE,
X_OBJECT_ATTRIBUTE => X_OBJECT_ATTRIBUTE,
X_AK_REGION_CODE => X_AK_REGION_CODE,
X_AK_ATTRIBUTE_CODE => X_AK_ATTRIBUTE_CODE,
X_ACTIVITY_TYPE_CODE => X_ACTIVITY_TYPE_CODE,
X_HTML_FORM_PARAM => X_HTML_FORM_PARAM,
X_DB_TABLE_NAME => X_DB_TABLE_NAME,
X_DB_COLUMN_NAME => X_DB_COLUMN_NAME,
X_SYSTEM_STATUS_CODE => X_SYSTEM_STATUS_CODE,
X_RULE_TYPE => X_RULE_TYPE,
X_SEEDED_FLAG => X_SEEDED_FLAG,
X_SECURITY_GROUP_ID => X_SECURITY_GROUP_ID,
X_OBJECT_VERSION_NUMBER => X_OBJECT_VERSION_NUMBER,
X_APPLICATION_ID => X_APPLICATION_ID,
X_CREATION_DATE => sysdate,
X_CREATED_BY => l_user_id,
X_LAST_UPDATE_DATE => sysdate,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => 0
);
AMS_COLUMN_RULES_PKG.UPDATE_ROW(
X_COLUMN_RULE_ID => l_colrule_id,
X_COLUMNS_METADATA_ID => X_COLUMNS_METADATA_ID,
X_OBJECT_TYPE => X_OBJECT_TYPE,
X_OBJECT_ATTRIBUTE => X_OBJECT_ATTRIBUTE,
X_AK_REGION_CODE => X_AK_REGION_CODE,
X_AK_ATTRIBUTE_CODE => X_AK_ATTRIBUTE_CODE,
X_ACTIVITY_TYPE_CODE => X_ACTIVITY_TYPE_CODE,
X_HTML_FORM_PARAM => X_HTML_FORM_PARAM,
X_DB_TABLE_NAME => X_DB_TABLE_NAME,
X_DB_COLUMN_NAME => X_DB_COLUMN_NAME,
X_SYSTEM_STATUS_CODE => X_SYSTEM_STATUS_CODE,
X_RULE_TYPE => X_RULE_TYPE,
X_SEEDED_FLAG => X_SEEDED_FLAG,
X_SECURITY_GROUP_ID => X_SECURITY_GROUP_ID,
X_OBJECT_VERSION_NUMBER => l_obj_verno,
X_APPLICATION_ID => X_APPLICATION_ID,
X_LAST_UPDATE_DATE => sysdate,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => 0
);