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/acs-service-contract-procs-oracle.xql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs-oracle.xql 9 May 2018 10:11:45 -0000 1.5 +++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs-oracle.xql 14 Jun 2018 16:43:50 -0000 1.6 @@ -1,53 +1,12 @@ -oracle8.1.6 + oracle8.1.6 - - - -select acs_sc_binding.exists_p(:contract,:impl) from dual - - - - - - select impl_alias, impl_pl - from acs_sc_impl_aliases - where impl_contract_name = :contract - and impl_operation_name = :operation - and impl_name = :impl - - - - - - - select - operation_desc, - nvl(operation_iscachable_p,'f') as operation_iscachable_p, - operation_nargs, - operation_inputtype_id, - operation_outputtype_id - from acs_sc_operations - where contract_name = :contract - and operation_name = :operation - - - - - - - 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 = :msg_type_id - order by element_pos asc - - - - + + + select acs_sc_binding.exists_p(:contract,:impl) from dual + + +