oracle8.1.6
select
attributes.attribute_id, attribute_name,
attributes.table_name,
attribute_label, type_label, object_type as subtype, datatype,
params.is_html, params.is_required,
widget, param,
nvl( (select param_type from cm_attribute_widget_params
where attribute_id = attributes.attribute_id
and param_id = params.param_id), 'literal' ) param_type,
nvl( (select param_source from cm_attribute_widget_params
where attribute_id = attributes.attribute_id
and param_id = params.param_id),
'onevalue' ) param_source,
nvl( (select value from cm_attribute_widget_params
where attribute_id = attributes.attribute_id
and param_id = params.param_id),
params.default_value ) value
from
(
select
aw.attribute_id, fwp.param,
aw.widget, decode(aw.is_required,'t','t',fwp.is_required) is_required,
fwp.param_id, fwp.default_value, fwp.is_html
from
cm_form_widget_params fwp, cm_attribute_widgets aw
where
fwp.widget = aw.widget
) params,
(
select
attr.attribute_id, attribute_name, sort_order,
attr.pretty_name as attribute_label, attr.datatype,
types.object_type, types.pretty_name as type_label,
tree_level, types.table_name
from
acs_attributes attr,
(
select
object_type, pretty_name, level as tree_level,
table_name
from
acs_object_types
where
object_type <> 'acs_object'
connect by
prior supertype = object_type
start with
object_type = :content_type
) types
where
attr.object_type = types.object_type
) attributes
where
attributes.attribute_id = params.attribute_id
to_char($attribute_name, 'YYYY MM DD HH24 MI SS')
as $attribute_name
select content_item.get_latest_revision(:item_id) from dual
select nvl(pretty_name,enum_value), enum_value
from acs_enum_values
where attribute_id = :attribute_id
order by sort_order
begin
:revision_id := content_revision.new(
title => :title,
description => :description,
mime_type => :mime_type,
text => ' ',
item_id => content_symlink.resolve(:item_id),
creation_ip => null,
creation_user => null
);
end;
select
types.table_name, types.id_column, attr.attribute_name,
attr.datatype
from
acs_attributes attr,
( select
object_type, table_name, id_column, level as inherit_level
from
acs_object_types
where
object_type <> 'acs_object'
and
object_type <> 'content_revision'
connect by
prior supertype = object_type
start with
object_type = :content_type) types
where
attr.object_type (+) = types.object_type
order by
types.inherit_level desc
select
types.table_name, types.id_column, attr.attribute_name,
attr.datatype
from
acs_attributes attr,
( select
object_type, table_name, id_column, level as inherit_level
from
acs_object_types
where
object_type not in ($sql_exclusion)
connect by
prior supertype = object_type
start with
object_type = :content_type) types
where
attr.object_type (+) = types.object_type
begin
:1 := content_item.new( [join $params ","] );
end;
select
storage_type, item_id
from
cr_items
where
item_id = (select
item_id
from
cr_revisions
where revision_id = :revision_id)
update cr_revisions
set filename =:file_path, content_length = :file_size
where revision_id = :revision_id
update cr_revisions
set content = empty_blob(),
content_length = [file size $tmpfile]
where revision_id = :revision_id
returning content into :1
update cr_revisions
set content = empty_blob(),
content_length = [file size $tmpfile]
where revision_id = :revision_id
returning content into :1
to_date(:$name, 'YYYY MM DD HH24 MI SS')
select
relation_tag as label, relation_tag as value
from
cr_type_children c
where
content_item.is_subclass(:parent_type, c.parent_type) = 't'
and
content_item.is_subclass(:content_type, c.child_type) = 't'
and
content_item.is_valid_child(:parent_id, c.child_type, relation_tag) = 't'
select content_item.get_title(:parent_id) from dual
to_char($attr, 'YYYY MM DD HH24 MI SS') as $attr
select
[join $args ","]
from
acs_attributes,
(
select
object_type ancestor, level as type_order
from
acs_object_types
connect by
prior supertype = object_type
start with
object_type = :content_type
) types
where
object_type = ancestor
order by type_order desc, sort_order
select content_item.get_latest_revision(:item_id) from dual
select
nvl(pretty_name,enum_value),
enum_value
from
acs_enum_values
where
attribute_id = :attribute_id
order by
sort_order
begin :1 := content_revision.new(
item_id => content_symlink.resolve(:item_id),
revision_id => :revision_id,
title => :title,
creation_ip => null,
creation_user => null $param_sql); end;
select
storage_type, item_id
from
cr_items
where
item_id = (select
item_id
from
cr_revisions
where revision_id = :revision_id)
update cr_revisions
set filename ='[cr_create_content_file $item_id $revision_id $tmpfile]',
content_length = [file size $tmpfile]
where revision_id = :revision_id
update cr_revisions
set content = empty_blob(),
content_length = [file size $tmpfile]
where revision_id = :revision_id
returning content into :1
update cr_revisions
set content = empty_blob(),
content_length = [file size $tmpfile]
where revision_id = :revision_id
returning content into :1
begin
content_revision.content_copy (
revision_id => :revision_id_src,
revision_id_dest => :revision_id_dest
);
end;