[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_meta_object_types(p_obj_name IN VARCHAR2, p_parent_name IN VARCHAR2) IS
parentId NUMBER := null;
INSERT INTO IES_META_OBJECT_TYPES (type_id, type_name, parent_id, created_by)
SELECT ies_meta_object_types_s.nextval, p_obj_name, parentId, 1
FROM dual
WHERE NOT EXISTS (SELECT 1
FROM ies_meta_object_types
WHERE type_name = p_obj_name);
end insert_meta_object_types;
Procedure insert_meta_obj_type_props(p_obj_name IN VARCHAR2, p_prop_name IN VARCHAR2) IS
objId NUMBER;
INSERT INTO IES_META_OBJ_TYPE_PROPERTIES
(typeprop_id, created_by, objtype_id, property_id)
SELECT ies_meta_obj_type_properties_s.nextval, 1, objId, propId
FROM dual
WHERE NOT EXISTS (SELECT 1
FROM IES_META_OBJ_TYPE_PROPERTIES
WHERE objType_id = objId
AND property_id = propId);
end insert_meta_obj_type_props;
Procedure insert_meta_prop_lookups(p_prop_name IN VARCHAR2, p_prop_key IN NUMBER, p_prop_val IN VARCHAR2) IS
propId NUMBER;
INSERT INTO IES_META_PROPERTY_LOOKUPS
(prop_lookup_id, property_id, lookup_key, lookup_value, created_by)
SELECT ies_meta_property_lookups_s.nextval, propId, p_prop_key, p_prop_val, 1
FROM dual
WHERE NOT EXISTS (SELECT 1
FROM IES_META_PROPERTY_LOOKUPS
WHERE lookup_key = p_prop_key
AND lookup_value = p_prop_val
AND property_id = propId);
end insert_meta_prop_lookups;
Procedure insert_meta_props(p_prop_name IN VARCHAR2, p_datatype IN VARCHAR2) IS
dataTypeId NUMBER;
INSERT INTO IES_META_PROPERTIES (property_id, name, datatype_id, created_by)
SELECT ies_meta_properties_s.nextval, p_prop_name, datatypeId, 1
FROM dual
WHERE NOT EXISTS (SELECT 1
FROM IES_META_PROPERTIES
WHERE name = p_prop_name
AND datatype_id = datatypeId);
end insert_meta_props;
Procedure insert_meta_prop_datatypes(p_datatype IN VARCHAR2) IS
begin
INSERT INTO IES_META_PROP_DATATYPES (type_id, type_name, created_by)
SELECT ies_meta_prop_datatypes_s.nextval, p_datatype, 1
FROM dual
WHERE NOT EXISTS (SELECT 1
FROM IES_META_PROP_DATATYPES
WHERE type_name = p_datatype);
end insert_meta_prop_datatypes;
Procedure insert_meta_relationship_types(p_type_name IN VARCHAR2) IS
begin
insert_meta_relationship_types(p_type_name, 0);
end insert_meta_relationship_types;
Procedure insert_meta_relationship_types(p_type_name IN VARCHAR2, list_relationship IN NUMBER) IS
begin
INSERT INTO IES_META_RELATIONSHIP_TYPES (type_id, type_name, created_by, list_relationship)
SELECT ies_meta_relationship_types_s.nextval, p_type_name, 1 , list_relationship
FROM dual
WHERE NOT EXISTS (SELECT 1
FROM IES_META_RELATIONSHIP_TYPES
WHERE type_name = p_type_name);
end insert_meta_relationship_types;
SELECT property_id
INTO propId
FROM ies_meta_properties
WHERE name = p_prop_name;
SELECT type_id
INTO objId
FROM ies_meta_object_types
WHERE type_name = p_obj_name;
SELECT type_id
INTO datatypeId
FROM ies_meta_prop_datatypes
WHERE type_name = p_datatype;