Index: openacs-4/packages/rss-support/tcl/rss-generation-service-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/tcl/rss-generation-service-procs-oracle.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/rss-support/tcl/rss-generation-service-procs-oracle.xql 28 Aug 2003 09:41:58 -0000 1.3 +++ openacs-4/packages/rss-support/tcl/rss-generation-service-procs-oracle.xql 15 Nov 2017 11:08:17 -0000 1.4 @@ -18,34 +18,12 @@ - - - update rss_gen_subscrs - set lastbuild = sysdate, - last_ttb = :last_ttb $extra_sql - where subscr_id = :subscr_id - - - select acs_sc_contract.get_id('RssGenerationSubscriber') from dual - - - - select impl_id - from acs_sc_impls i - where impl_contract_name = 'RssGenerationSubscriber' - and not exists (select 1 - from acs_sc_bindings b - where b.impl_id = i.impl_id - and b.contract_id = :contract_id) - - - begin Index: openacs-4/packages/rss-support/tcl/rss-generation-service-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/tcl/rss-generation-service-procs-postgresql.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/rss-support/tcl/rss-generation-service-procs-postgresql.xql 17 May 2003 11:22:12 -0000 1.2 +++ openacs-4/packages/rss-support/tcl/rss-generation-service-procs-postgresql.xql 15 Nov 2017 11:08:17 -0000 1.3 @@ -21,39 +21,16 @@ - - - update rss_gen_subscrs - set lastbuild = now(), - last_ttb = :last_ttb $extra_sql - where subscr_id = :subscr_id - - - - select acs_sc_contract__get_id('RssGenerationSubscriber') - - - select impl_id - from acs_sc_impls i - where impl_contract_name = 'RssGenerationSubscriber' - and not exists (select 1 - from acs_sc_bindings b - where b.impl_id = i.impl_id - and b.contract_id = :contract_id) - - - select acs_sc_binding__new($contract_id,$impl_id) - Index: openacs-4/packages/rss-support/tcl/rss-generation-service-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/tcl/rss-generation-service-procs.xql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/rss-support/tcl/rss-generation-service-procs.xql 17 May 2003 11:22:12 -0000 1.2 +++ openacs-4/packages/rss-support/tcl/rss-generation-service-procs.xql 15 Nov 2017 11:08:17 -0000 1.3 @@ -2,6 +2,27 @@ + + + update rss_gen_subscrs + set lastbuild = CURRENT_TIMESTAMP, + last_ttb = :last_ttb $extra_sql + where subscr_id = :subscr_id + + + + + + select impl_id + from acs_sc_impls i + where impl_contract_name = 'RssGenerationSubscriber' + and not exists (select 1 + from acs_sc_bindings b + where b.impl_id = i.impl_id + and b.contract_id = :contract_id) + + + select i.impl_name, @@ -24,7 +45,6 @@ - select s.summary_context_id, @@ -36,5 +56,4 @@ -