Skip to content

A
acs-subsite
Commit 8c0a8547 authored by Malte Sussdorff's avatar Malte Sussdorff
Browse files
Options

- Malte

parent 9b7c53b7
Pipeline #99 failed with stages
      Expand all Hide whitespace changes
      Inline Side-by-side
      Showing with 493 additions and 0 deletions
      tcl/email-image-procs-oracle.xql 0 → 100644
      View file @ 8c0a8547
      <?xml version="1.0"?>
      <queryset>
      <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
      <fullquery name="email_image::new_item.lob_size">
      <querytext>
      update cr_revisions
      set content_length = dbms_lob.getlength(content)
      where revision_id = :revision_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::new_item.lob_content">
      <querytext>
      update cr_revisions
      set content = empty_blob()
      where revision_id = :revision_id
      returning content into :1
      </querytext>
      </fullquery>
      <fullquery name="email_image::edit_email_image.lob_size">
      <querytext>
      update cr_revisions
      set content_length = dbms_lob.getlength(content)
      where revision_id = :revision_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::edit_email_image.lob_content">
      <querytext>
      update cr_revisions
      set content = empty_blob()
      where revision_id = :revision_id
      returning content into :1
      </querytext>
      </fullquery>
      <fullquery name="email_image::add_relation.add_relation">
      <querytext>
      begin
      :1 := acs_rel.new (
      rel_type => 'email_image_rel',
      object_id_one => :user_id,
      object_id_two => :item_id);
      end;
      </querytext>
      </fullquery>
      </queryset>
      tcl/email-image-procs-postgresql.xql 0 → 100644
      View file @ 8c0a8547
      <?xml version="1.0"?>
      <queryset>
      <rdbms><type>postgresql</type><version>7.1</version></rdbms>
      <fullquery name="email_image::new_item.lob_size">
      <querytext>
      update cr_revisions
      set content_length = lob_length(lob)
      where revision_id = :revision_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::new_item.lob_content">
      <querytext>
      update cr_revisions
      set mime_type = :mime_type,
      lob = [set __lob_id [db_string get_lob_id "select empty_lob()"]]
      where revision_id = :revision_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::edit_email_image.lob_size">
      <querytext>
      update cr_revisions
      set content_length = lob_length(lob)
      where revision_id = :revision_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::edit_email_image.lob_content">
      <querytext>
      update cr_revisions
      set mime_type = :mime_type,
      lob = [set __lob_id [db_string get_lob_id "select empty_lob()"]]
      where revision_id = :revision_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::add_relation.add_relation">
      <querytext>
      select acs_rel__new (
      null,
      'email_image_rel',
      :user_id,
      :item_id,
      null,
      null,
      null
      )
      </querytext>
      </fullquery>
      </queryset>
      tcl/email-image-procs.tcl 0 → 100644
      View file @ 8c0a8547
      This diff is collapsed.
      tcl/email-image-procs.xql 0 → 100644
      View file @ 8c0a8547
      <?xml version="1.0"?>
      <queryset>
      <fullquery name="email_image::get_email.get_email">
      <querytext>
      select email
      from cc_users
      where user_id = :user_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::get_priv_email.get_private_email">
      <querytext>
      select priv_email
      from users
      where user_id = :user_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::get_folder_id.check_folder_name">
      <querytext>
      select folder_id from cr_folders
      where label = 'Email_Images'
      </querytext>
      </fullquery>
      <fullquery name="email_image::get_related_item_id.get_rel_item">
      <querytext>
      select object_id_two from acs_rels
      where rel_type = 'email_image_rel' and object_id_one = :user_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::update_private_p.update_users">
      <querytext>
      update users
      set priv_email = :level
      where user_id = :user_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::new_item.update_cr_items">
      <querytext>
      update cr_items
      set live_revision = :revision_id
      where item_id = :item_id
      </querytext>
      </fullquery>
      <fullquery name="email_image::edit_email_image.update_cr_items">
      <querytext>
      update cr_items
      set live_revision = :revision_id
      where item_id = :item_id
      </querytext>
      </fullquery>
      </queryset>
      Markdown is supported
      0% or
      You are about to add 0 people to the discussion. Proceed with caution.
      Finish editing this message first!
      Please register or to comment