Fisheye: Tag 1.1.10.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-admin/www/apm/version-fs-scan.xql'.
Fisheye: No comparison available. Pass `N' to diff?
Index: openacs-4/packages/acs-service-contract/tcl/acs-service-contract-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/acs-service-contract-init.tcl,v
diff -u -r1.4 -r1.4.4.1
--- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-init.tcl 16 Oct 2002 15:10:04 -0000 1.4
+++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-init.tcl 3 Dec 2003 22:19:05 -0000 1.4.4.1
@@ -9,7 +9,7 @@
acs_sc_log SCDebug "ACS_SC_PROC: checking binding exists for contract $impl_contract_name impl $impl_name"
- set binding_exists_p [db_string binding_exists_p {select acs_sc_binding__exists_p(:impl_contract_name,:impl_name)}]
+ set binding_exists_p [db_string binding_exists_p {*SQL*}]
if $binding_exists_p {
acs_sc_proc $impl_contract_name $impl_operation_name $impl_name
Index: openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/Attic/acs-service-contract-procs-oracle.xql,v
diff -u -r1.1 -r1.1.10.1
--- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs-oracle.xql 9 Oct 2001 04:57:37 -0000 1.1
+++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs-oracle.xql 3 Dec 2003 22:19:05 -0000 1.1.10.1
@@ -10,6 +10,35 @@
+
+
+ select
+ element_name,
+ acs_sc_msg_type.get_name(element_msg_type_id) as element_msg_type_name,
+ element_msg_type_isset_p,
+ element_pos
+ from acs_sc_msg_type_elements
+ where msg_type_id = :operation_outputtype_id
+ order by element_pos asc
+
+
+
+
+
+
+ select
+ operation_desc,
+ operation_iscachable_p,
+ operation_nargs,
+ operation_inputtype_id,
+ operation_outputtype_id
+ from acs_sc_operations
+ where contract_name = :contract
+ and operation_name = :operation
+
+
+
+
select
Index: openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl,v
diff -u -r1.19.2.1 -r1.19.2.2
--- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl 14 Nov 2003 09:36:22 -0000 1.19.2.1
+++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl 3 Dec 2003 22:19:05 -0000 1.19.2.2
@@ -77,7 +77,7 @@
@author Neophytos Demetriou
} {
- return [db_string binding_exists_p {select acs_sc_binding__exists_p(:contract,:impl)}]
+ return [db_string binding_exists_p {*SQL*}]
}
@@ -107,18 +107,12 @@
} {
# LARS
set exists_p [acs_sc_binding_exists_p $contract $impl]
-
+
#set exists_p [util_memoize "acs_sc_binding_exists_p $contract $impl"]
-
+
if ![set exists_p] {return ""}
- db_0or1row get_alias {
- select impl_alias, impl_pl
- from acs_sc_impl_aliases
- where impl_contract_name = :contract
- and impl_operation_name = :operation
- and impl_name = :impl
- }
+ db_0or1row get_alias {*SQL*}
return [list $impl_alias $impl_pl]
@@ -151,50 +145,22 @@
error "ACS-SC: Cannot find alias for $proc_name"
}
- if {![db_0or1row get_operation_definition {
- select
- operation_desc,
- operation_iscachable_p,
- operation_nargs,
- operation_inputtype_id,
- operation_outputtype_id
- from acs_sc_operations
- where contract_name = :contract
- and operation_name = :operation
- }]} {
+ if {![db_0or1row get_operation_definition {*SQL*}]} {
ns_log warning "ACS-SC: operation definition not found for contract $contract operation $operation"
return 0
}
append docblock "\nacs-service-contract operation. Call via acs_sc_call.\n\n$operation_desc\n\n"
- db_foreach operation_inputtype_element {
- select
- element_name,
- acs_sc_msg_type__get_name(element_msg_type_id) as element_msg_type_name,
- element_msg_type_isset_p,
- element_pos
- from acs_sc_msg_type_elements
- where msg_type_id = :operation_inputtype_id
- order by element_pos asc
- } {
+ db_foreach operation_inputtype_element {*SQL*} {
lappend arguments "$element_name"
append docblock "\n@param $element_name $element_msg_type_name"
if { $element_msg_type_isset_p } {
append docblock " \[\]"
}
}
- db_foreach operation_outputtype_element {
- select
- element_name,
- acs_sc_msg_type__get_name(element_msg_type_id) as element_msg_type_name,
- element_msg_type_isset_p,
- element_pos
- from acs_sc_msg_type_elements
- where msg_type_id = :operation_outputtype_id
- order by element_pos asc
- } {
+ db_foreach operation_outputtype_element {*SQL*} {
append docblock "\n@return $element_name - $element_msg_type_name"
if { $element_msg_type_isset_p } {
append docblock " \[\]"
Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/elements-display-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/Attic/elements-display-oracle.xql,v
diff -u -r1.1 -r1.1.10.1
--- openacs-4/packages/acs-subsite/www/admin/rel-segments/elements-display-oracle.xql 11 Aug 2001 21:31:03 -0000 1.1
+++ openacs-4/packages/acs-subsite/www/admin/rel-segments/elements-display-oracle.xql 3 Dec 2003 22:19:05 -0000 1.1.10.1
@@ -1,5 +1,5 @@
-
+
oracle8.1.6
Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/elements-display-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/Attic/elements-display-postgresql.xql,v
diff -u -r1.1 -r1.1.10.1
--- openacs-4/packages/acs-subsite/www/admin/rel-segments/elements-display-postgresql.xql 11 Aug 2001 21:31:03 -0000 1.1
+++ openacs-4/packages/acs-subsite/www/admin/rel-segments/elements-display-postgresql.xql 3 Dec 2003 22:19:05 -0000 1.1.10.1
@@ -1,5 +1,5 @@
-
+
postgresql7.1
Fisheye: Tag 1.2.10.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-subsite/www/user/basic-info-update-2.xql'.
Fisheye: No comparison available. Pass `N' to diff?
Index: openacs-4/packages/acs-templating/tcl/widget-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/Attic/widget-procs-oracle.xql,v
diff -u -r1.3 -r1.3.2.1
--- openacs-4/packages/acs-templating/tcl/widget-procs-oracle.xql 12 Oct 2003 18:03:22 -0000 1.3
+++ openacs-4/packages/acs-templating/tcl/widget-procs-oracle.xql 3 Dec 2003 22:19:05 -0000 1.3.2.1
@@ -1,6 +1,8 @@
+oracle8.1.6
+
select (first_names || ' ' || last_name) as name, pe.person_id from persons pe, parties pa
Index: openacs-4/packages/acs-templating/tcl/widget-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/Attic/widget-procs-postgresql.xql,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/packages/acs-templating/tcl/widget-procs-postgresql.xql 10 Oct 2003 08:23:23 -0000 1.2
+++ openacs-4/packages/acs-templating/tcl/widget-procs-postgresql.xql 3 Dec 2003 22:19:05 -0000 1.2.2.1
@@ -1,5 +1,6 @@
+postgresql7.1
Index: openacs-4/packages/ecommerce/www/admin/orders/one-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/orders/one-postgresql.xql,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/packages/ecommerce/www/admin/orders/one-postgresql.xql 30 Nov 2002 17:31:38 -0000 1.2
+++ openacs-4/packages/ecommerce/www/admin/orders/one-postgresql.xql 3 Dec 2003 22:19:05 -0000 1.2.2.1
@@ -1,5 +1,6 @@
+postgresql7.1
Index: openacs-4/packages/logger/www/admin/entries-table-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/entries-table-oracle.xql,v
diff -u -r1.1 -r1.1.6.1
--- openacs-4/packages/logger/www/admin/entries-table-oracle.xql 8 May 2003 13:56:04 -0000 1.1
+++ openacs-4/packages/logger/www/admin/entries-table-oracle.xql 3 Dec 2003 22:19:05 -0000 1.1.6.1
@@ -1,6 +1,7 @@
+oracle8.1.6
Index: openacs-4/packages/news-aggregator-portlet/www/news-aggregator-portlet-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator-portlet/www/news-aggregator-portlet-oracle.xql,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/packages/news-aggregator-portlet/www/news-aggregator-portlet-oracle.xql 28 Aug 2003 09:41:58 -0000 1.2
+++ openacs-4/packages/news-aggregator-portlet/www/news-aggregator-portlet-oracle.xql 3 Dec 2003 22:19:05 -0000 1.2.2.1
@@ -1,7 +1,7 @@
-postgresql7.1
+oracle8.1.6
Index: openacs-4/packages/wp-slim/www/style-list-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/style-list-postgresql.xql,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/packages/wp-slim/www/style-list-postgresql.xql 28 Aug 2003 09:42:00 -0000 1.2
+++ openacs-4/packages/wp-slim/www/style-list-postgresql.xql 3 Dec 2003 22:19:06 -0000 1.2.2.1
@@ -1,6 +1,7 @@
+postgresql7.1