Index: openacs-4/packages/download/tcl/download-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/tcl/download-procs-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,90 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="download_file_downloader.download_insert"> + <querytext> + + insert into download_downloads ( + download_id, + user_id, + revision_id, + download_date, + download_ip, + download_hostname, + user_agent, + reason_id, + reason) + values + (:download_id, + :user_id, + :revision_id, + sysdate, + :download_ip, + :download_hostname, + :user_agent, + :reason_id, + :reason_other) + + </querytext> +</fullquery> + + +<fullquery name="download_file_downloader.version_write"> + <querytext> + select content + from cr_revisions + where revision_id = $revision_id + </querytext> +</fullquery> + + +<fullquery name="download_insert_revision.revision_new"> + <querytext> + + declare + v_revision_id integer; + begin + v_revision_id := content_revision.new( + item_id => :archive_id, + title => :filename, + description => :version_name, + revision_id => :revision_id, + mime_type => :mime_type, + creation_user => :user_id, + creation_ip => :creation_ip + ); + + insert into download_archive_revisions (revision_id, approved_p) values + (v_revision_id, :approved_p); + end; + + </querytext> +</fullquery> + + +<fullquery name="download_insert_revision.content_add"> + <querytext> + + update cr_revisions + set content = empty_blob() + where revision_id = :revision_id + returning content into :1 + + </querytext> +</fullquery> + + +<fullquery name="download_insert_revision.make_live"> + <querytext> + + begin + content_item.set_live_revision(:revision_id); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/tcl/download-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/tcl/download-procs-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,94 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="download_file_downloader.download_insert"> + <querytext> + + insert into download_downloads ( + download_id, + user_id, + revision_id, + download_date, + download_ip, + download_hostname, + user_agent, + reason_id, + reason) + values + (:download_id, + :user_id, + :revision_id, + current_timestamp, + :download_ip, + :download_hostname, + :user_agent, + :reason_id, + :reason_other) + + </querytext> +</fullquery> + + +<fullquery name="download_file_downloader.version_write"> + <querytext> + FIX ME LOB +select content + from cr_revisions + where revision_id = $revision_id + </querytext> +</fullquery> + + +<fullquery name="download_insert_revision.revision_new"> + <querytext> + FIX ME PLSQL + + declare + v_revision_id integer; + begin + v_revision_id := content_revision__new( + item_id => :archive_id, + title => :filename, + description => :version_name, + revision_id => :revision_id, + mime_type => :mime_type, + creation_user => :user_id, + creation_ip => :creation_ip + ); + + insert into download_archive_revisions (revision_id, approved_p) values + (v_revision_id, :approved_p); + end; + + </querytext> +</fullquery> + + +<fullquery name="download_insert_revision.content_add"> + <querytext> + FIX ME LOB + + update cr_revisions + set content = empty_blob() + where revision_id = :revision_id + returning content into :1 + + </querytext> +</fullquery> + + +<fullquery name="download_insert_revision.make_live"> + <querytext> + FIX ME PLSQL + + begin + content_item__set_live_revision(:revision_id); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/tcl/download-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/tcl/download-procs.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,115 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="download_repository_info.repository_info"> + <querytext> + + select repository_id, title, description, help_text from download_repository_obj where parent_id = :package_id + + </querytext> +</fullquery> + + +<fullquery name="download_repository_info.type_info"> + <querytext> + + select count(*) from download_archive_types where repository_id = :repository_id + + </querytext> +</fullquery> + + +<fullquery name="download_metadata_widget.download_metadata_choices"> + <querytext> + select choice_id, label + from download_metadata_choices + where metadata_id = :metadata_id + order by sort_order + </querytext> +</fullquery> + + +<fullquery name="download_file_downloader.download_count"> + <querytext> + select count(*) from download_downloads where download_id = :download_id + </querytext> +</fullquery> + + +<fullquery name="download_file_downloader.file_type"> + <querytext> + + select mime_type + from cr_revisions + where revision_id = :revision_id + </querytext> +</fullquery> + + +<fullquery name="download_maybe_create_new_mime_type.mime_type_exists"> + <querytext> + + select count(*) from cr_mime_types + where mime_type = :mime_type + </querytext> +</fullquery> + + +<fullquery name="download_maybe_create_new_mime_type.new_mime_type"> + <querytext> + + insert into cr_mime_types + (mime_type, file_extension) + values + (:mime_type, :extension) + </querytext> +</fullquery> + + +<fullquery name="download_validate_metadata.metadata"> + <querytext> + + select + dam.metadata_id, + dam.pretty_name, + dam.data_type, + dam.required_p + from download_archive_metadata dam + where dam.repository_id = :repository_id and + dam.computed_p = 'f' and + (dam.archive_type_id = :archive_type_id or + dam.archive_type_id is null) + order by sort_key + + </querytext> +</fullquery> + + +<fullquery name="download_insert_metadata.survsimp_question_info_list"> + <querytext> + + select + dam.metadata_id, + dam.data_type + from download_archive_metadata dam + where dam.repository_id = :repository_id and + dam.computed_p = 'f' and + (dam.archive_type_id = :archive_type_id or + dam.archive_type_id is null) + order by sort_key + + </querytext> +</fullquery> + + +<fullquery name="download_insert_metadata.metadata_inserts"> + <querytext> + + insert into download_revision_data(revision_id, metadata_id, $answer_column) + values ( :revision_id, :metadata_id, :response ) + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/all-metadata.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/all-metadata.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/all-metadata.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,17 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="metadata"> + <querytext> + + select dam.pretty_name, + dam.data_type + from download_archive_metadata dam + where dam.linked_p = 't' and + dam.metadata_id = :metadata_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-add-2-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add-2-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-add-2-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,48 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="archive_new"> + <querytext> + + declare + v_archive_id integer; + v_archive_desc_id integer; + v_name cr_items.name%TYPE; + begin + v_name := 'Download Archive Desc for ' || :archive_id; + + v_archive_desc_id := content_item.new ( + content_type => 'cr_download_archive_desc', + item_id => :archive_desc_id, + name => v_name, + title => :summary, + description => :description, + mime_type => :description_format, + parent_id => :repository_id, + context_id => :repository_id, + creation_user => :user_id, + creation_ip => :creation_ip, + is_live => 't' + ); + insert into download_archive_descs (archive_desc_id) values (content_item.get_live_revision(v_archive_desc_id)); + + v_archive_id := content_item.new( + content_type => 'cr_download_archive', + item_id => :archive_id, + name => :archive_name, + parent_id => :repository_id, + context_id => :repository_id, + creation_user => :user_id, + creation_ip => :creation_ip + ); + + insert into download_archives (archive_id, archive_type_id, archive_desc_id) values (v_archive_id, :archive_type_id, content_item.get_live_revision(v_archive_desc_id)); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-add-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add-2-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-add-2-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,49 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="archive_new"> + <querytext> + FIX ME PLSQL + + declare + v_archive_id integer; + v_archive_desc_id integer; + v_name cr_items.name%TYPE; + begin + v_name := 'Download Archive Desc for ' || :archive_id; + + v_archive_desc_id := content_item__new ( + content_type => 'cr_download_archive_desc', + item_id => :archive_desc_id, + name => v_name, + title => :summary, + description => :description, + mime_type => :description_format, + parent_id => :repository_id, + context_id => :repository_id, + creation_user => :user_id, + creation_ip => :creation_ip, + is_live => 't' + ); + insert into download_archive_descs (archive_desc_id) values (content_item__get_live_revision(v_archive_desc_id)); + + v_archive_id := content_item__new( + content_type => 'cr_download_archive', + item_id => :archive_id, + name => :archive_name, + parent_id => :repository_id, + context_id => :repository_id, + creation_user => :user_id, + creation_ip => :creation_ip + ); + + insert into download_archives (archive_id, archive_type_id, archive_desc_id) values (v_archive_id, :archive_type_id, content_item__get_live_revision(v_archive_desc_id)); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-add.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-add.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,22 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="metadata"> + <querytext> + + select + dam.metadata_id, + dam.pretty_name, + dam.data_type + from download_archive_metadata dam + where dam.repository_id = :repository_id and + dam.computed_p = 'f' and + (dam.archive_type_id = :archive_type_id or + dam.archive_type_id is null) + order by sort_key + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-version-add-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-version-add-2.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,11 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="get_archive_type"> + <querytext> + select archive_type_id from download_archives where archive_id = :archive_id + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-version-add-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-version-add-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,25 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="archive_info_select"> + <querytext> + + select da.archive_name, + da.archive_type_id, + da.summary, + da.description, + da.description_type, + u.last_name || ', ' || u.first_names as creation_user_name, + da.creation_user, + to_char(da.creation_date,'Mon DD, YYYY') as creation_date + from download_archives_obj da, cc_users u + where da.archive_id = :archive_id + and u.user_id = da.creation_user + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-version-add-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-version-add-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,25 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="archive_info_select"> + <querytext> + + select da.archive_name, + da.archive_type_id, + da.summary, + da.description, + da.description_type, + u.last_name || ', ' || u.first_names as creation_user_name, + da.creation_user, + to_char(da.creation_date,'Mon DD, YYYY') as creation_date + from download_archives_obj da, cc_users u + where da.archive_id = :archive_id + and u.user_id = da.creation_user + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/archive-version-add.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/archive-version-add.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,22 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="metadata"> + <querytext> + + select + dam.metadata_id, + dam.pretty_name, + dam.data_type + from download_archive_metadata dam + where dam.repository_id = :repository_id and + dam.computed_p = 'f' and + (dam.archive_type_id = :archive_type_id or + dam.archive_type_id is null) + order by sort_key + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/download-verify-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/download-verify-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/download-verify-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,27 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="revision_info_select"> + <querytext> + +select da.archive_id, + da.repository_id as repository_id, + da.archive_name, + da.summary, + dar.revision_id, + dar.file_name, + dar.version_name, + dbms_lob.getlength(dar.content) as file_size +from download_archives_obj da, + download_arch_revisions_obj dar +where da.archive_id = dar.archive_id and + dar.revision_id = :revision_id + $approval + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/download-verify-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/download-verify-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/download-verify-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,27 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="revision_info_select"> + <querytext> + +select da.archive_id, + da.repository_id as repository_id, + da.archive_name, + da.summary, + dar.revision_id, + dar.file_name, + dar.version_name, + dbms_lob__getlength(dar.content) as file_size +from download_archives_obj da, + download_arch_revisions_obj dar +where da.archive_id = dar.archive_id and + dar.revision_id = :revision_id + $approval + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/index-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/index-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,26 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="my_revisions"> + <querytext> + + select da.archive_name, + dar.version_name, + dar.revision_id, + dar.approved_p, + nvl(dar.approved_comment, 'No comment') approved_comment, + to_char(dar.creation_date,'Mon DD, YYYY') as creation_date + from download_arch_revisions_obj dar, download_archives_obj da + where da.repository_id = :repository_id and + dar.archive_id = da.archive_id and + approved_p != 't' and + dar.creation_user = :user_id + order by creation_date + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/index-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/index-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,26 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="my_revisions"> + <querytext> + + select da.archive_name, + dar.version_name, + dar.revision_id, + dar.approved_p, + coalesce(dar.approved_comment, 'No comment') approved_comment, + to_char(dar.creation_date,'Mon DD, YYYY') as creation_date + from download_arch_revisions_obj dar, download_archives_obj da + where da.repository_id = :repository_id and + dar.archive_id = da.archive_id and + approved_p != 't' and + dar.creation_user = :user_id + order by creation_date + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/index.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/index.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,39 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="archive_type"> + <querytext> + + select archive_type_id as at_id, pretty_name from download_archive_types where repository_id = :repository_id + + </querytext> +</fullquery> + + +<fullquery name="metadata"> + <querytext> + + select dam.metadata_id, + dam.pretty_name, + dam.data_type, + dam.linked_p + from download_archive_metadata dam + where dam.mainpage_p = 't' and + dam.repository_id = :repository_id and + (dam.archive_type_id = :archive_type_id or dam.archive_type_id is null) + order by sort_key + + </querytext> +</fullquery> + + +<fullquery name="types_select"> + <querytext> + + select archive_type_id, pretty_name, description from download_archive_types where repository_id = :repository_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-archive-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-archive-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-archive-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,44 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="archive_info_select"> + <querytext> + + select da.archive_name, + da.summary, + da.description, + da.description_type, + u.last_name || ', ' || u.first_names as creation_user_name, + da.creation_user, + to_char(da.creation_date,'Mon DD, YYYY') as creation_date + from download_archives_obj da, cc_users u + where da.archive_id = :archive_id + and u.user_id = da.creation_user + + </querytext> +</fullquery> + + +<fullquery name="rep_get_revisions"> + <querytext> + + select dar.file_name, + dar.version_name, + dar.revision_id, + u.last_name || ', ' || u.first_names as creation_user_name, + dar.creation_user, + to_char(dar.creation_date,'Mon DD, YYYY') as creation_date + + from download_arch_revisions_obj dar, cc_users u + where dar.archive_id = :archive_id + and approved_p = 't' and + u.user_id = dar.creation_user + order by version_name + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-archive-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-archive-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-archive-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,44 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="archive_info_select"> + <querytext> + + select da.archive_name, + da.summary, + da.description, + da.description_type, + u.last_name || ', ' || u.first_names as creation_user_name, + da.creation_user, + to_char(da.creation_date,'Mon DD, YYYY') as creation_date + from download_archives_obj da, cc_users u + where da.archive_id = :archive_id + and u.user_id = da.creation_user + + </querytext> +</fullquery> + + +<fullquery name="rep_get_revisions"> + <querytext> + + select dar.file_name, + dar.version_name, + dar.revision_id, + u.last_name || ', ' || u.first_names as creation_user_name, + dar.creation_user, + to_char(dar.creation_date,'Mon DD, YYYY') as creation_date + + from download_arch_revisions_obj dar, cc_users u + where dar.archive_id = :archive_id + and approved_p = 't' and + u.user_id = dar.creation_user + order by version_name + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-archive.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-archive.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-archive.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,16 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="pending_count_select"> + <querytext> + + select count(*) + from download_arch_revisions_obj dar + where dar.archive_id = :archive_id + and approved_p is null + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-metadata.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-metadata.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-metadata.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,32 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="metadata"> + <querytext> + + select dam.pretty_name, + dam.data_type + from download_archive_metadata dam + where dam.linked_p = 't' and + dam.metadata_id = :metadata_id + + </querytext> +</fullquery> + + +<fullquery name="archives"> + <querytext> + + select da.archive_name, + da.archive_id, + count(dar.revision_id) as num_versions + from download_arch_revisions_obj dar, download_archives_obj da + where dar.archive_id = da.archive_id and + dar.revision_id in (select revision_id from download_revision_data where $answer_column = :value and metadata_id = :metadata_id) + group by da.archive_name, da.archive_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-revision-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-revision-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-revision-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,41 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="revision_info_select"> + <querytext> + +select da.archive_id, + dat.pretty_name as archive_type, + da.archive_type_id, + da.archive_name, + da.summary, + da.description, + da.description_type, + dar.revision_id, + dar.file_name, + dar.version_name, + dar.version_name, + dbms_lob.getlength(dar.content) as file_size, + (select count(*) from download_downloads where revision_id = dar.revision_id) as downloads, + dar.approved_p, + u.last_name || ', ' || u.first_names as creation_user_name, + dar.creation_user, + dar.creation_date + $metadata_selects +from download_archives_obj da, + download_archive_types dat, + download_arch_revisions_obj dar, + cc_users u +where da.repository_id = :repository_id and + dat.archive_type_id = da.archive_type_id and + da.archive_id = dar.archive_id and + dar.revision_id = :revision_id and + dar.creation_user = u.user_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-revision-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-revision-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-revision-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,41 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="revision_info_select"> + <querytext> + +select da.archive_id, + dat.pretty_name as archive_type, + da.archive_type_id, + da.archive_name, + da.summary, + da.description, + da.description_type, + dar.revision_id, + dar.file_name, + dar.version_name, + dar.version_name, + dbms_lob__getlength(dar.content) as file_size, + (select count(*) from download_downloads where revision_id = dar.revision_id) as downloads, + dar.approved_p, + u.last_name || ', ' || u.first_names as creation_user_name, + dar.creation_user, + dar.creation_date + $metadata_selects +from download_archives_obj da, + download_archive_types dat, + download_arch_revisions_obj dar, + cc_users u +where da.repository_id = :repository_id and + dat.archive_type_id = da.archive_type_id and + da.archive_id = dar.archive_id and + dar.revision_id = :revision_id and + dar.creation_user = u.user_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/one-revision.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-revision.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/one-revision.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,26 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="get_archive_type"> + <querytext> + select archive_type_id from download_arch_revisions_obj dar, download_archives da where dar.archive_id = da.archive_id and dar.revision_id = :revision_id + </querytext> +</fullquery> + + +<fullquery name="metadata"> + <querytext> + + select dam.metadata_id, + dam.pretty_name, + dam.data_type + from download_archive_metadata dam + where dam.repository_id = :repository_id and + (dam.archive_type_id = :archive_type_id or dam.archive_type_id is null) + order by sort_key + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/approve-or-reject-2-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-2-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/approve-or-reject-2-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,36 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="version_approve"> + <querytext> + + update download_archive_revisions + set approved_p = :approved_p, + approved_comment = :approved_comment, + approved_user = :user_id, + approved_date = sysdate + where revision_id = :revision_id + + </querytext> +</fullquery> + + +<fullquery name="sendmail"> + <querytext> + + begin + :1 := nt.post_request( + party_from => :user_id, + party_to => :creation_user, + expand_group => 'f', + subject => :subject, + message => :body); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/approve-or-reject-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-2-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/approve-or-reject-2-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,37 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="version_approve"> + <querytext> + + update download_archive_revisions + set approved_p = :approved_p, + approved_comment = :approved_comment, + approved_user = :user_id, + approved_date = current_timestamp + where revision_id = :revision_id + + </querytext> +</fullquery> + + +<fullquery name="sendmail"> + <querytext> + FIX ME PLSQL + + begin + :1 := nt__post_request( + party_from => :user_id, + party_to => :creation_user, + expand_group => 'f', + subject => :subject, + message => :body); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/approve-or-reject-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/approve-or-reject-2.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,29 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="creation_email_select"> + <querytext> + + select da.archive_name, + dar.creation_user, + dar.version_name + from download_arch_revisions_obj dar, download_archives_obj da + where da.archive_id = dar.archive_id and dar.revision_id = :revision_id + + </querytext> +</fullquery> + + +<fullquery name="approving_user_select"> + <querytext> + + select email as approving_email, + first_names || ' ' || last_name as approving_name + from cc_users + where user_id = :user_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/approve-or-reject-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/approve-or-reject-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,31 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="revision_info_select"> + <querytext> + +select da.repository_id as repository_id, + da.archive_name, + da.summary, + dar.revision_id, + dar.file_name, + dar.version_name, + dbms_lob.getlength(dar.content) as file_size, + case when da.latest_revision = dar.revision_id then 't' else 'f' end as current_version_p, + dar.creation_user, + dar.creation_date, + u.last_name || ', ' || u.first_names as creation_user_name +from download_archives_obj da, + download_arch_revisions_obj dar, + cc_users u +where da.archive_id = dar.archive_id and + dar.revision_id = :revision_id and + u.user_id = dar.creation_user + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/approve-or-reject-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/approve-or-reject-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,31 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="revision_info_select"> + <querytext> + +select da.repository_id as repository_id, + da.archive_name, + da.summary, + dar.revision_id, + dar.file_name, + dar.version_name, + dbms_lob__getlength(dar.content) as file_size, + case when da.latest_revision = dar.revision_id then 't' else 'f' end as current_version_p, + dar.creation_user, + dar.creation_date, + u.last_name || ', ' || u.first_names as creation_user_name +from download_archives_obj da, + download_arch_revisions_obj dar, + cc_users u +where da.archive_id = dar.archive_id and + dar.revision_id = :revision_id and + u.user_id = dar.creation_user + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/report-one-user.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-one-user.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/report-one-user.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,13 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="name_select"> + <querytext> + select u.last_name, u.first_names + from cc_users u + where u.user_id = :user_id + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/report-version-downloads.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-version-downloads.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/report-version-downloads.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,37 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="name_select"> + <querytext> + + select da.archive_name from download_archives_obj da where da.archive_id = :archive_id + + </querytext> +</fullquery> + + +<fullquery name="count_select"> + <querytext> + select count(*) +from download_downloads d, download_arch_revisions_obj dar +where dar.archive_id = :archive_id and + d.revision_id = dar.revision_id + [ad_dimensional_sql $dimensional where] + + </querytext> +</fullquery> + + +<fullquery name="count_select"> + <querytext> + select count(*) +from download_downloads d, download_arch_revisions_obj dar +where dar.archive_id = :archive_id and + d.revision_id = dar.revision_id + [ad_dimensional_sql $dimensional where] + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-ae-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-ae-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-ae-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,41 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="todo_insert"> + <querytext> + + declare + the_id integer; + begin + the_id := download_rep.new(repository_id => :repository_id, + title => :title, + description => :description, + help_text => :help_text, + creation_user => :user_id, + parent_id => :package_id, + context_id => :package_id); + end; + + </querytext> +</fullquery> + + +<fullquery name="repository_edit"> + <querytext> + + begin + download_rep.edit(repository_id => :repository_id, + title => :title, + description => :description, + help_text => :help_text, + modifying_user => :user_id + ); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-ae-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-ae-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-ae-postgresql.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,42 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="todo_insert"> + <querytext> + FIX ME PLSQL + + declare + the_id integer; + begin + the_id := download_rep__new(repository_id => :repository_id, + title => :title, + description => :description, + help_text => :help_text, + creation_user => :user_id, + parent_id => :package_id, + context_id => :package_id); + end; + + </querytext> +</fullquery> + + +<fullquery name="repository_edit"> + <querytext> + + begin + download_rep__edit(repository_id => :repository_id, + title => :title, + description => :description, + help_text => :help_text, + modifying_user => :user_id + ); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-ae.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-ae.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-ae.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,20 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="repository_info"> + <querytext> + + select title, description, help_text from download_repository_obj where repository_id = :repository_id + + </querytext> +</fullquery> + + +<fullquery name="rep_count_get"> + <querytext> + select count(*) from download_repository_obj where repository_id = :repository_id + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-metadata-delete.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-delete.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-metadata-delete.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,13 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="metadata_delete"> + <querytext> + + delete from download_archive_metadata where metadata_id = :metadata_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-metadata-edit-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-edit-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-metadata-edit-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,31 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="metadata_select"> + <querytext> + + select + dam.metadata_id, + dam.repository_id, + dam.archive_type_id, + nvl(dat.pretty_name, 'All') as archive_name, + dam.sort_key, + dam.pretty_name, + dam.data_type, + dam.required_p, + dam.linked_p, + dam.mainpage_p, + dam.computed_p + from download_archive_metadata dam, download_archive_types dat + where dam.repository_id = :repository_id and + dam.metadata_id = :metadata_id and + dam.archive_type_id = dat.archive_type_id(+) + order by archive_type_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-metadata-edit.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-edit.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-metadata-edit.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,85 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="metadata_select"> + <querytext> + FIX ME OUTER JOIN + + select + dam.metadata_id, + dam.repository_id, + dam.archive_type_id, + coalesce(dat.pretty_name, 'All') as archive_name, + dam.sort_key, + dam.pretty_name, + dam.data_type, + dam.required_p, + dam.linked_p, + dam.mainpage_p, + dam.computed_p + from download_archive_metadata dam, download_archive_types dat + where dam.repository_id = :repository_id and + dam.metadata_id = :metadata_id and + dam.archive_type_id = dat.archive_type_id(+) + order by archive_type_id + + </querytext> +</fullquery> + + +<fullquery name="choices"> + <querytext> + + select label from download_metadata_choices where metadata_id = :metadata_id + + </querytext> +</fullquery> + + +<fullquery name="archiv_types"> + <querytext> + + select pretty_name, archive_type_id from download_archive_types where repository_id = $repository_id + </querytext> +</fullquery> + + +<fullquery name="metadata_update"> + <querytext> + + update download_archive_metadata set + archive_type_id = :archive_type_id, + sort_key = :sort_key, + pretty_name = :pretty_name, + data_type = :data_type, + required_p = :required_p, + linked_p = :linked_p, + mainpage_p = :mainpage_p, + computed_p = :computed_p + where metadata_id = :metadata_id and + repository_id = :repository_id + + </querytext> +</fullquery> + + +<fullquery name="choices_delete"> + <querytext> + + delete from download_metadata_choices where metadata_id = :metadata_id + + </querytext> +</fullquery> + + +<fullquery name="choice_insert"> + <querytext> + + insert into download_metadata_choices (choice_id, metadata_id, label, sort_order) + values (download_md_choice_id_sequence.nextval, :metadata_id, :choice, :count) + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-metadata-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-metadata-oracle.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,30 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="metadata_select"> + <querytext> + + select + dam.metadata_id, + dam.repository_id, + dam.archive_type_id, + nvl(dat.pretty_name, 'All') as archive_name, + dam.sort_key, + dam.pretty_name, + dam.data_type, + dam.required_p, + dam.linked_p, + dam.mainpage_p, + dam.computed_p + from download_archive_metadata dam, download_archive_types dat + where dam.repository_id = :repository_id and + dam.archive_type_id = dat.archive_type_id(+) + order by archive_type_id, sort_key + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-metadata.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-metadata.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,77 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="archiv_types"> + <querytext> + + select pretty_name, archive_type_id from download_archive_types where repository_id = $repository_id + </querytext> +</fullquery> + + +<fullquery name="metadata_insert"> + <querytext> + + insert into download_archive_metadata ( + metadata_id, + repository_id, + archive_type_id, + sort_key, + pretty_name, + data_type, + required_p, + linked_p, + mainpage_p, + computed_p) + values ( + :metadata_id, + :repository_id, + :archive_type_id, + :sort_key, + :pretty_name, + :data_type, + :required_p, + :linked_p, + :mainpage_p, + :computed_p) + + </querytext> +</fullquery> + + +<fullquery name="choice_insert"> + <querytext> + + insert into download_metadata_choices (choice_id, metadata_id, label, sort_order) + values (download_md_choice_id_sequence.nextval, :metadata_id, :choice, :count) + + </querytext> +</fullquery> + + +<fullquery name="metadata_select"> + <querytext> + FIX ME OUTER JOIN + + select + dam.metadata_id, + dam.repository_id, + dam.archive_type_id, + coalesce(dat.pretty_name, 'All') as archive_name, + dam.sort_key, + dam.pretty_name, + dam.data_type, + dam.required_p, + dam.linked_p, + dam.mainpage_p, + dam.computed_p + from download_archive_metadata dam, download_archive_types dat + where dam.repository_id = :repository_id and + dam.archive_type_id = dat.archive_type_id(+) + order by archive_type_id, sort_key + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-reasons-delete.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons-delete.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-reasons-delete.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,13 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="reason_delete"> + <querytext> + + delete from download_reasons where download_reason_id = :download_reason_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-reasons-edit.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons-edit.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-reasons-edit.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,21 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="edit_info"> + <querytext> + select download_reason_id, reason from download_reasons where download_reason_id = :download_reason_id + </querytext> +</fullquery> + + +<fullquery name="edit_reason"> + <querytext> + + update download_reasons set reason = :reason + where download_reason_id = :download_reason_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-reasons.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-reasons.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,22 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="repository_reasons_insert"> + <querytext> + + insert into download_reasons (download_reason_id, repository_id, reason) values (:download_reason_id, :repository_id, :reason) + + </querytext> +</fullquery> + + +<fullquery name="reasons_select"> + <querytext> + + select download_reason_id, reason from download_reasons where repository_id = :repository_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-types-delete.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types-delete.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-types-delete.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,13 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="type_delete"> + <querytext> + + delete from download_archive_types where repository_id = :repository_id and archive_type_id = :archive_type_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-types-edit.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types-edit.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-types-edit.xql 10 May 2001 20:51:30 -0000 1.1 @@ -0,0 +1,21 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="edit_info"> + <querytext> + select archive_type_id, pretty_name, description from download_archive_types where archive_type_id = :archive_type_id + </querytext> +</fullquery> + + +<fullquery name="edit_type"> + <querytext> + + update download_archive_types set pretty_name = :pretty_name, description = :description + where archive_type_id = :archive_type_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/repository-types.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/repository-types.xql 10 May 2001 20:51:31 -0000 1.1 @@ -0,0 +1,22 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="repository_types_insert"> + <querytext> + + insert into download_archive_types (archive_type_id, repository_id, pretty_name, description) values (:archive_type_id, :repository_id, :pretty_name, :description) + + </querytext> +</fullquery> + + +<fullquery name="types_select"> + <querytext> + + select archive_type_id, pretty_name, description from download_archive_types where repository_id = :repository_id + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/spam-users-2-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/Attic/spam-users-2-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/spam-users-2-oracle.xql 10 May 2001 20:51:31 -0000 1.1 @@ -0,0 +1,22 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>oracle</type><version>8.1.6</version></rdbms> + +<fullquery name="sendmail"> + <querytext> + + begin + :1 := nt.post_request( + party_from => :user_id, + party_to => :to_user_id, + expand_group => 'f', + subject => :subject, + message => :msgbody); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/spam-users-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/Attic/spam-users-2-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/spam-users-2-postgresql.xql 10 May 2001 20:51:31 -0000 1.1 @@ -0,0 +1,23 @@ +<?xml version="1.0"?> + +<queryset> + <rdbms><type>postgresql</type><version>7.1</version></rdbms> + +<fullquery name="sendmail"> + <querytext> + FIX ME PLSQL + + begin + :1 := nt__post_request( + party_from => :user_id, + party_to => :to_user_id, + expand_group => 'f', + subject => :subject, + message => :msgbody); + end; + + </querytext> +</fullquery> + + +</queryset> Index: openacs-4/packages/download/www/admin/spam-users.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/spam-users.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/download/www/admin/spam-users.xql 10 May 2001 20:51:31 -0000 1.1 @@ -0,0 +1,11 @@ +<?xml version="1.0"?> +<queryset> + +<fullquery name="user_select"> + <querytext> + select u.email, u.user_id, u.user_name from ($sql_query) u + </querytext> +</fullquery> + + +</queryset>