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 @@ </querytext> </fullquery> +<fullquery name="acs_sc_get_alias.get_alias"> +<querytext> + 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 +</querytext> +</fullquery> + + +<fullquery name="acs_sc_proc.get_operation_definition"> +<querytext> + 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 +</querytext> +</fullquery> + + <fullquery name="acs_sc_proc.operation_inputtype_element"> <querytext> 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 "\n<b>acs-service-contract operation. Call via acs_sc_call.</b>\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 <b>$element_name</b> - $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 @@ <?xml version="1.0"?> - +<!-- used in elements-display.adp ... ugh --> <queryset> <rdbms><type>oracle</type><version>8.1.6</version></rdbms> 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 @@ <?xml version="1.0"?> - +<!-- used in elements-display.adp ... ugh --> <queryset> <rdbms><type>postgresql</type><version>7.1</version></rdbms> 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 @@ <?xml version="1.0"?> <queryset> +<rdbms><type>oracle</type><version>8.1.6</version></rdbms> + <fullquery name="template::data::transform::party_search.search_persons"> <querytext> 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 @@ <?xml version="1.0"?> <queryset> +<rdbms><type>postgresql</type><version>7.1</version></rdbms> <fullquery name="template::data::transform::party_search.search_persons"> <querytext> 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 @@ <?xml version="1.0"?> <queryset> +<rdbms><type>postgresql</type><version>7.1</version></rdbms> <fullquery name="order_select"> <querytext> 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 @@ <?xml version="1.0"?> <queryset> +<rdbms><type>oracle</type><version>8.1.6</version></rdbms> <fullquery name="select_entries"> <querytext> 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 @@ <?xml version="1.0"?> <queryset> -<rdbms><type>postgresql</type><version>7.1</version></rdbms> +<rdbms><type>oracle</type><version>8.1.6</version></rdbms> <fullquery name="select_items"> <querytext> 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 @@ <?xml version="1.0"?> <queryset> +<rdbms><type>postgresql</type><version>7.1</version></rdbms> <fullquery name="style_select_data"> <querytext>