OpenACS

maltes
committed
MAIN:maltes:20051023125850
on 23 Oct 05
Minor style change
/tcl/apm-install-procs-oracle.xql (+2 -46)
1 1 <?xml version="1.0"?>
2 2
3 3 <queryset>
4 4    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
5 5
6   <fullquery name="apm_package_install.package_instantiate_mount">     
7         <querytext>
8        
9                   declare
10                       instance_id   apm_packages.package_id%TYPE;
11                   begin
12                       instance_id := apm_package.new(
13                                     instance_name => :package_name,
14                                     package_key => :package_key,
15                                     context_id => acs.magic_object_id('default_context')
16                                     );
17                   end;
18              
19         </querytext>
20   </fullquery>
21  
22    
23 6 <fullquery name="apm_package_install_version.version_insert">     
24 7       <querytext>
25 8      
26 9                 begin
27 10                 :1 := apm_package_version.new(
28 11                         version_id => :version_id,
29 12                         package_key => :package_key,
30 13                         version_name => :version_name,
31 14                         version_uri => :version_uri,
32 15                         summary => :summary,
33 16                         description_format => :description_format,
34 17                         description => :description,
35 18                         release_date => :release_date,
36 19                         vendor => :vendor,
37 20                         vendor_uri => :vendor_uri,
  21                         auto_mount => :auto_mount,
38 22                         installed_p => 't',
39 23                         data_model_loaded_p => 't'
40 24                       );
41 25                 end;
42 26            
43 27       </querytext>
44 28 </fullquery>
45 29
46 30  
47 31 <fullquery name="apm_package_delete.apm_package_delete">     
48 32       <querytext>
49 33      
50 34         begin
51 35             apm_package_type.drop_type(
52 36                 package_key => :package_key,
53 37                 cascade_p => 't'
54 38             );
55 39         end;
56 40    
57 41       </querytext>
 
142 126             end;                                         
143 127         
144 128       </querytext>
145 129 </fullquery>
146 130
147 131  
148 132 <fullquery name="apm_version_update.apm_version_update">     
149 133       <querytext>
150 134      
151 135         begin
152 136         :1 := apm_package_version.edit(
153 137                                  version_id => :version_id,
154 138                                  version_name => :version_name,
155 139                                  version_uri => :version_uri,
156 140                                  summary => :summary,
157 141                                  description_format => :description_format,
158 142                                  description => :description,
159 143                                  release_date => :release_date,
160 144                                  vendor => :vendor,
161 145                                  vendor_uri => :vendor_uri,
  146                                  auto_mount => :auto_mount,
162 147                                  installed_p => 't',
163 148                                  data_model_loaded_p => 't'                             
164 149                                  );
165 150         end;
166 151    
167 152       </querytext>
168 153 </fullquery>
169 154
170    
171   <fullquery name="apm_package_instantiate_and_mount.package_instantiate_and_mount">     
172         <querytext>
173        
174               declare
175                       main_site_id  site_nodes.node_id%TYPE;
176                       instance_id   apm_packages.package_id%TYPE;
177                       node_id       site_nodes.node_id%TYPE;
178               begin
179                       main_site_id := site_node.node_id('/');
180                  
181                       instance_id := apm_package.new(
182                                     package_key => :package_key,
183                                     context_id => main_site_id
184                                     );
185  
186                       node_id := site_node.new(
187                                parent_id => main_site_id,
188                                name => :package_key,
189                                directory_p => 't',
190                                pattern_p => 't',
191                                object_id => instance_id
192                             );
193               end;
194              
195         </querytext>
196   </fullquery>
197  
198    
199 155 <fullquery name="apm_version_upgrade.apm_version_upgrade">     
200 156       <querytext>
201 157      
202 158         begin
203 159             apm_package_version.upgrade(version_id => :version_id);
204 160         end;
205 161
206 162    
207 163       </querytext>
208 164 </fullquery>
209 165
210 166  
211 167 <fullquery name="apm_upgrade_for_version_p.apm_upgrade_for_version_p">     
212 168       <querytext>
213 169      
214 170         begin
215 171             :1 := apm_package_version.upgrade_p(
216 172                       path => :path,
217 173                       initial_version_name => :initial_version_name,
218 174                       final_version_name => :final_version_name