Fisheye: Tag 1.1.30.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-service-contract/tcl/acs-service-contract-init-oracle.xql'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.2.22.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-service-contract/tcl/acs-service-contract-init-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff? 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.26.2.1 -r1.26.2.2 --- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl 10 Sep 2015 08:21:33 -0000 1.26.2.1 +++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl 2 Jan 2016 17:50:12 -0000 1.26.2.2 @@ -91,7 +91,7 @@ @author Neophytos Demetriou } { - return [db_string binding_exists_p {*SQL*}] + return [db_string binding_exists_p {}] } @@ -126,7 +126,7 @@ if {![set exists_p]} {return ""} - db_0or1row get_alias {*SQL*} + db_0or1row get_alias {} return [list $impl_alias $impl_pl] @@ -160,22 +160,22 @@ error "ACS-SC: Cannot find alias for $proc_name" } - if {![db_0or1row get_operation_definition {*SQL*}]} { + if {![db_0or1row get_operation_definition {}]} { 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::invoke.\n\n$operation_desc\n\n" - db_foreach operation_inputtype_element {*SQL*} { + db_foreach operation_inputtype_element {} { 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 {*SQL*} { + db_foreach operation_outputtype_element {} { append docblock "\n@return $element_name - $element_msg_type_name" if { $element_msg_type_isset_p } { append docblock " \[\]" Index: openacs-4/packages/acs-service-contract/tcl/contract-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/contract-procs.tcl,v diff -u -r1.6.2.1 -r1.6.2.2 --- openacs-4/packages/acs-service-contract/tcl/contract-procs.tcl 10 Sep 2015 08:21:33 -0000 1.6.2.1 +++ openacs-4/packages/acs-service-contract/tcl/contract-procs.tcl 2 Jan 2016 17:50:12 -0000 1.6.2.2 @@ -192,13 +192,7 @@ } { Get a list of names of operations for the contract. } { - return [db_list select_operations { - select o.operation_name - from acs_sc_operations o, - acs_sc_contracts c - where c.contract_name = :contract_name - and o.contract_id = c.contract_id - }] + return [db_list select_operations {}] } Index: openacs-4/packages/acs-service-contract/tcl/msg-type-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/msg-type-procs-oracle.xql,v diff -u -r1.3 -r1.3.24.1 --- openacs-4/packages/acs-service-contract/tcl/msg-type-procs-oracle.xql 30 Sep 2003 12:10:03 -0000 1.3 +++ openacs-4/packages/acs-service-contract/tcl/msg-type-procs-oracle.xql 2 Jan 2016 17:50:12 -0000 1.3.24.1 @@ -13,16 +13,6 @@ end; - - - - begin - acs_sc_msg_type.del( - msg_type_id => :msg_type_id - ); - end; - - Fisheye: Tag 1.1.30.1 refers to a dead (removed) revision in file `openacs-4/packages/acs-service-contract/www/binding-uninstall-postgresql.xql'. Fisheye: No comparison available. Pass `N' to diff?