Index: openacs-4/packages/news-aggregator/tcl/news-aggregator-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/tcl/Attic/news-aggregator-procs-oracle.xql,v
diff -u -r1.2.4.2 -r1.2.4.3
--- openacs-4/packages/news-aggregator/tcl/news-aggregator-procs-oracle.xql 6 Mar 2005 11:37:59 -0000 1.2.4.2
+++ openacs-4/packages/news-aggregator/tcl/news-aggregator-procs-oracle.xql 17 Aug 2005 09:18:32 -0000 1.2.4.3
@@ -23,33 +23,30 @@
begin
- :1 := na_source.new (
+ :1 := na_item.new (
source_id => :source_id,
- package_id => :package_id,
- feed_url => :feed_url,
link => :link,
title => :title,
description => :description,
- creation_user => :owner_id,
- creation_ip => :creation_ip
+ creation_date => sysdate,
+ deleted_p => '0'
);
-
+ end;
+
begin
- :1 := na_source.new (
+ :1 := na_item.new (
source_id => :source_id,
- package_id => :package_id,
- feed_url => :feed_url,
link => :link,
title => :title,
description => :description,
- creation_user => :owner_id,
- creation_ip => :creation_ip
+ creation_date => sysdate,
+ deleted_p => '0'
);
- end
+ end;