Index: openacs-4/contrib/obsolete-packages/acs-workflow/sql/oracle/sample-article-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/sql/oracle/sample-article-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/obsolete-packages/acs-workflow/sql/oracle/sample-article-create.sql 9 Oct 2001 00:03:15 -0000 1.2 +++ openacs-4/contrib/obsolete-packages/acs-workflow/sql/oracle/sample-article-create.sql 16 Oct 2001 01:36:19 -0000 1.3 @@ -169,6 +169,7 @@ v_object_name varchar2(4000); v_transition_name wf_transitions.transition_name%TYPE; v_name varchar2(1000); + v_request_id integer; begin select to_char(ta.deadline,'Mon fmDDfm, YYYY HH24:MI:SS'), acs_object.name(c.object_id), @@ -225,8 +226,6 @@ show errors - - update wf_context_transition_info set notification_callback = 'wf_article_callback.notification' where workflow_key = 'article_wf' Index: openacs-4/packages/acs-content-repository/sql/oracle/content-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/oracle/content-create.sql,v diff -u -r1.7 -r1.8 --- openacs-4/packages/acs-content-repository/sql/oracle/content-create.sql 14 Oct 2001 21:02:27 -0000 1.7 +++ openacs-4/packages/acs-content-repository/sql/oracle/content-create.sql 16 Oct 2001 01:36:19 -0000 1.8 @@ -365,26 +365,6 @@ 4000 character limit. '; - --- (DanW - OpenACS) Added cleanup trigger to log file items that need --- to be cleaned up from the CR. - -create or replace trigger cr_cleanup_cr_files_del_trg -before delete on cr_revisions -for each row -begin - insert into cr_files_to_delete ( - path, storage_area_key - ) select blob_to_string(r.content), i.storage_area_key - from cr_items i, cr_revisions r - where i.item_id = r.item_id - and r.revision_id = :old.revision_id - and i.storage_type = 'file'; - -end cr_cleanup_cr_files_del_trg; -/ -show errors - -------------------------------------------------------------- -- CONTENT PUBLISHING -------------------------------------------------------------- @@ -761,8 +741,29 @@ into HTML (or plain text) prior to insertion into the repository. '; +-- (DanW - OpenACS) Added cleanup trigger to log file items that need +-- to be cleaned up from the CR. +-- DRB: moved here because the package "content" needs to be defined +-- before this trigger is created. +create or replace trigger cr_cleanup_cr_files_del_trg +before delete on cr_revisions +for each row +begin + insert into cr_files_to_delete ( + path, storage_area_key + ) select content.blob_to_string(r.content), i.storage_area_key + from cr_items i, cr_revisions r + where i.item_id = r.item_id + and r.revision_id = :old.revision_id + and i.storage_type = 'file'; + +end cr_cleanup_cr_files_del_trg; +/ +show errors + + prompt *** Compiling documentation package... @@ doc-package @@ -842,5 +843,3 @@ end; / show errors - - Index: openacs-4/packages/ref-timezones/sql/oracle/ref-timezones-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ref-timezones/sql/oracle/ref-timezones-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/ref-timezones/sql/oracle/ref-timezones-create.sql 15 Oct 2001 19:33:38 -0000 1.2 +++ openacs-4/packages/ref-timezones/sql/oracle/ref-timezones-create.sql 16 Oct 2001 01:36:19 -0000 1.3 @@ -121,26 +121,15 @@ function utc_to_local ( -- Returns utc_time converted to local time - tz in timezones.tz%TYPE, + tz_id in timezones.tz_id%TYPE, utc_time in date ) return date; - function utc_to_local ( - -- Returns utc_time converted to local time - tz_id in timezones.tz_id%TYPE, - utc_time in date - ) return date; - function local_to_utc ( tz_id in timezones.tz_id%TYPE, local_time in date ) return date; - function local_to_utc ( - tz in timezones.tz%TYPE, - local_time in date - ) return date; - -- The following provide access to the current offset information function get_offset ( @@ -150,41 +139,23 @@ local_time in date default sysdate ) return integer; - function get_offset ( - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return integer; - - function get_rawoffset ( -- Gets the timezone offset NOT modified for DST tz_id in timezones.tz_id%TYPE, local_time in date default sysdate ) return integer; - function get_rawoffset ( - -- Gets the timezone offset NOT modified for DST - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return integer; - function get_abbrev ( -- Returns abbreviation for the coversion rule tz_id in timezones.tz_id%TYPE, local_time in date default sysdate ) return varchar; - function get_abbrev ( - -- Returns abbreviation for the coversion rule - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return varchar; - function get_zone_offset ( -- Returns the relative offset between two zones at a -- particular UTC time. - tz_this in timezones.tz%TYPE, - tz_other in timezones.tz%TYPE, + tz_this in timezones.tz_id%TYPE, + tz_other in timezones.tz_id%TYPE, utc_time in date default sysdate ) return integer; @@ -196,30 +167,16 @@ local_time in date default sysdate ) return char; - function isdst_p ( - -- Returns 't' if timezone is currently using DST - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return char; - - -- Special formatting functions function get_date ( -- Returns a formatted date with timezone info appended tz_id in timezones.tz_id%TYPE, local_time in date, - format in varchar default 'yyyy-mm-ss hh24:mi:ss' + format in varchar default 'yyyy-mm-ss hh24:mi:ss', + append_timezone_p in char default 't' ) return varchar; - function get_date ( - -- Returns a formatted date with timezone info appended - tz in timezones.tz%TYPE, - local_time in date, - format in varchar default 'yyyy-mm-ss hh24:mi:ss' - ) return varchar; - - end timezone; / show errors @@ -317,17 +274,6 @@ return utc_time; end utc_to_local; - function utc_to_local ( - tz in timezones.tz%TYPE, - utc_time in date - ) return date - is - begin - return utc_to_local(get_id(tz), utc_time); - end; - - - function local_to_utc ( tz_id in timezones.tz_id%TYPE, local_time in date @@ -347,15 +293,6 @@ return local_time; end; - function local_to_utc ( - tz in timezones.tz%TYPE, - local_time in date - ) return date - is - begin - return local_to_utc(get_id(tz),local_time); - end; - function get_offset ( tz_id in timezones.tz_id%TYPE, local_time in date default sysdate @@ -375,16 +312,6 @@ return 0; end; - function get_offset ( - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return integer - is - begin - return get_offset(get_id(tz),local_time); - end; - - function get_rawoffset ( tz_id in timezones.tz_id%TYPE, local_time in date default sysdate @@ -405,15 +332,6 @@ return 0; end; - function get_rawoffset ( - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return integer - is - begin - return get_rawoffset(get_id(tz),local_time); - end; - function get_abbrev ( tz_id in timezones.tz_id%TYPE, local_time in date default sysdate @@ -432,29 +350,26 @@ return 'GMT'; end; - function get_abbrev ( - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return varchar - is - begin - return get_abbrev(get_id(tz),local_time); - end; - function get_date ( -- Returns a formatted date with timezone info appended tz_id in timezones.tz_id%TYPE, local_time in date, - format in varchar default 'yyyy-mm-ss hh24:mi:ss' + format in varchar default 'yyyy-mm-ss hh24:mi:ss', + append_timezone_p in char default 't' ) return varchar is v_date varchar(1000); begin - select to_char(local_time,format) || ' ' || abbrev into v_date - from timezone_rules - where tz_id = get_date.tz_id - and local_time between local_start and local_end - and rownum = 1; + if append_timezone_p = 't' then + select to_char(local_time,format) || ' ' || abbrev into v_date + from timezone_rules + where tz_id = get_date.tz_id + and local_time between local_start and local_end + and rownum = 1; + else + select to_char(local_time,format) into v_date + from dual; + end if; return v_date; exception @@ -463,17 +378,6 @@ return v_date; end; - function get_date ( - tz in timezones.tz%TYPE, - local_time in date, - format in varchar default 'yyyy-mm-ss hh24:mi:ss' - ) return varchar - is - begin - return get_date(get_id(tz),local_time,format); - end; - - function isdst_p ( -- Returns 't' if timezone is currently using DST tz_id in timezones.tz_id%TYPE, @@ -494,18 +398,9 @@ return 'f'; end; - function isdst_p ( - tz in timezones.tz%TYPE, - local_time in date default sysdate - ) return char - is - begin - return isdst_p (get_id(tz),local_time); - end; - function get_zone_offset ( - tz_this in timezones.tz%TYPE, - tz_other in timezones.tz%TYPE, + tz_this in timezones.tz_id%TYPE, + tz_other in timezones.tz_id%TYPE, utc_time in date default sysdate ) return integer is Index: openacs-4/packages/wp-slim/wp-slim.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/wp-slim.info,v diff -u -r1.4 -r1.5 --- openacs-4/packages/wp-slim/wp-slim.info 9 Oct 2001 20:08:58 -0000 1.4 +++ openacs-4/packages/wp-slim/wp-slim.info 16 Oct 2001 01:36:19 -0000 1.5 @@ -16,7 +16,7 @@ Paul Konigsberg Haolan Qin Wimpy Point allows users to collaborate and share online presentations. - 2001-01-26 00:00:00-08 + 2001-01-26 ArsDigita Corporation Ported (Jack). Fixed several bugs. Added new features (e.g. versioning and authorization).