The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_row (
X_rowid IN OUT NOCOPY VARCHAR2,
X_table_map_object_id IN OUT NOCOPY NUMBER,
X_tm_object_type IN VARCHAR2,
X_table_map_id IN NUMBER,
X_object_id IN NUMBER,
X_creation_date IN DATE,
X_created_by IN NUMBER,
X_org_id IN NUMBER
) IS
CURSOR c IS SELECT rowid FROM cn_table_map_objects
WHERE table_map_object_id = x_table_map_object_id
AND org_id = X_org_id;
SELECT cn_table_map_objects_s.NEXTVAL
INTO x_table_map_object_id
FROM dual;
INSERT INTO cn_table_map_objects (
table_map_object_id,
tm_object_type,
table_map_id,
object_id,
created_by,
creation_date,
org_id,
object_version_number
) VALUES (
x_table_map_object_id,
x_tm_object_type,
x_table_map_id,
x_object_id,
x_created_by,
x_creation_date,
X_org_id,
1);
END insert_row;
CURSOR c1 IS SELECt
tm_object_type,
table_map_id,
object_id
FROM cn_table_map_objects
WHERE table_map_object_id = x_table_map_object_id
FOR UPDATE OF table_map_object_id NOWAIT;
PROCEDURE update_row (
X_table_map_object_id IN NUMBER,
X_tm_object_type in VARCHAR2,
X_table_map_id IN NUMBER,
X_object_id IN NUMBER,
X_last_update_date IN DATE,
X_last_updated_by IN NUMBER,
X_last_update_login IN NUMBER,
x_org_id IN NUMBER,
x_object_version_number IN OUT NOCOPY NUMBER
) IS
-- Added Cursor For R12 MOAC
CURSOR l_ovn_csr IS
SELECT object_version_number
FROM cn_table_map_objects
WHERE table_map_id = X_table_map_id
AND org_id = x_org_id;
UPDATE cn_table_map_objects SET
tm_object_type = x_tm_object_type,
table_map_id = x_table_map_id,
object_id = x_object_id,
last_update_date = x_last_update_date,
last_updated_by = x_last_updated_by,
last_update_login = x_last_update_login,
object_version_number = l_object_version_number + 1
WHERE table_map_object_id = x_table_map_object_id
AND org_id = x_org_id;
END update_row;
PROCEDURE delete_row (
X_table_map_object_id IN NUMBER,
X_ORG_ID IN NUMBER
) IS
BEGIN
DELETE FROM cn_table_map_objects
WHERE table_map_object_id = x_table_map_object_id
AND org_id = X_ORG_ID;
END delete_row;
x_LAST_UPDATE_DATE in varchar2,
x_LAST_UPDATED_BY in varchar2,
x_CREATION_DATE in varchar2,
x_CREATED_BY in varchar2,
x_LAST_UPDATE_LOGIN in varchar2,
x_SECURITY_GROUP_ID in varchar2,
x_OBJECT_VERSION_NUMBER in varchar2,
x_APPLICATION_SHORT_NAME in varchar2,
x_OWNER in varchar2)
IS
USER_ID NUMBER;
update cn_table_map_objects_all set
ORG_ID = to_number(x_ORG_ID),
TM_OBJECT_TYPE = x_TM_OBJECT_TYPE,
TABLE_MAP_ID = to_number(x_TABLE_MAP_ID),
OBJECT_ID = to_number(x_OBJECT_ID),
LAST_UPDATE_DATE = to_date(x_LAST_UPDATE_DATE, 'DD-MM-YYYY'),
LAST_UPDATED_BY = to_number(x_LAST_UPDATED_BY),
CREATION_DATE = to_date(x_CREATION_DATE, 'DD-MM-YYYY'),
CREATED_BY = to_number(x_CREATED_BY),
LAST_UPDATE_LOGIN = to_number(x_LAST_UPDATE_LOGIN),
SECURITY_GROUP_ID = to_number(x_SECURITY_GROUP_ID),
OBJECT_VERSION_NUMBER = to_number(x_OBJECT_VERSION_NUMBER)
where TABLE_MAP_OBJECT_ID = x_TABLE_MAP_OBJECT_ID
and ORG_ID = x_ORG_ID;
-- Insert new record to CN_OBJECTS_TABLE table
insert into cn_table_map_objects_all
(TABLE_MAP_OBJECT_ID,
ORG_ID,
TM_OBJECT_TYPE,
TABLE_MAP_ID,
OBJECT_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
SECURITY_GROUP_ID,
OBJECT_VERSION_NUMBER
)
values
(to_number(x_TABLE_MAP_OBJECT_ID),
to_number(x_ORG_ID),
x_TM_OBJECT_TYPE,
to_number(x_TABLE_MAP_ID),
to_number(x_OBJECT_ID),
to_date(x_LAST_UPDATE_DATE, 'DD-MM-YYYY'),
to_number(x_LAST_UPDATED_BY),
to_date(x_CREATION_DATE, 'DD-MM-YYYY'),
to_number(x_CREATED_BY),
to_number(x_LAST_UPDATE_LOGIN),
to_number(x_SECURITY_GROUP_ID),
to_number(x_OBJECT_VERSION_NUMBER)
);
x_LAST_UPDATE_DATE in varchar2,
x_LAST_UPDATED_BY in varchar2,
x_CREATION_DATE in varchar2,
x_CREATED_BY in varchar2,
x_LAST_UPDATE_LOGIN in varchar2,
x_SECURITY_GROUP_ID in varchar2,
x_OBJECT_VERSION_NUMBER in varchar2,
x_APPLICATION_SHORT_NAME in varchar2,
x_OWNER in varchar2)
IS
BEGIN
if (x_upload_mode = 'NLS') then
--CN_TABLE_MAP_OBJECTS_PKG.TRANSLATE_ROW(x_owner);
x_LAST_UPDATE_DATE,
x_LAST_UPDATED_BY,
x_CREATION_DATE,
x_CREATED_BY,
x_LAST_UPDATE_LOGIN,
x_SECURITY_GROUP_ID,
x_OBJECT_VERSION_NUMBER,
x_APPLICATION_SHORT_NAME,
x_OWNER);