[Home] [Help]
TYPE BODY: SYS.DMBATIMP
Source
1 TYPE BODY dmbatimp IS
2
3 STATIC FUNCTION ODCITablePrepare (
4 sctx IN OUT dmbatimp,
5 tf_info SYS.ODCITabFuncInfo,
6 qkn_ptr IN RAW,
7 heap_ptr IN RAW,
8 query_sequence IN CLOB,
9 seqdb_cursor SYS_REFCURSOR,
10 subsequence_from IN PLS_INTEGER,
11 subsequence_to IN PLS_INTEGER,
12 translation_type IN STRING,
13 genetic_code IN PLS_INTEGER,
14 filter_low_complexity IN PLS_INTEGER,
15 mask_lower_case IN PLS_INTEGER,
16 sub_matrix IN STRING,
17 expect_value IN NUMBER,
18 open_gap_cost IN PLS_INTEGER,
19 extend_gap_cost IN PLS_INTEGER,
20 word_size IN PLS_INTEGER,
21 x_dropoff IN PLS_INTEGER,
22 final_x_dropoff IN PLS_INTEGER
23 ) RETURN PLS_INTEGER
24 IS
25 PRAGMA AUTONOMOUS_TRANSACTION;
26 BEGIN
27 RETURN dmbatimp.dmbatPrepareStub (
28 sctx,
29 tf_info,
30 qkn_ptr,
31 heap_ptr,
32 query_sequence,
33 seqdb_cursor,
34 subsequence_from,
35 subsequence_to,
36 translation_type,
37 genetic_code,
38 filter_low_complexity,
39 mask_lower_case,
40 sub_matrix,
41 expect_value,
42 open_gap_cost,
43 extend_gap_cost,
44 word_size,
45 x_dropoff,
46 final_x_dropoff);
47 END;
48
49 STATIC FUNCTION dmbatPrepareStub (
50 sctx IN OUT dmbatimp,
51 tf_info SYS.ODCITabFuncInfo,
52 qkn_ptr IN RAW,
53 heap_ptr IN RAW,
54 query_sequence IN CLOB,
55 seqdb_cursor SYS_REFCURSOR,
56 subsequence_from IN PLS_INTEGER,
57 subsequence_to IN PLS_INTEGER,
58 translation_type IN STRING,
59 genetic_code IN PLS_INTEGER,
60 filter_low_complexity IN PLS_INTEGER,
61 mask_lower_case IN PLS_INTEGER,
62 sub_matrix IN STRING,
63 expect_value IN NUMBER,
64 open_gap_cost IN PLS_INTEGER,
65 extend_gap_cost IN PLS_INTEGER,
66 word_size IN PLS_INTEGER,
67 x_dropoff IN PLS_INTEGER,
68 final_x_dropoff IN PLS_INTEGER
69 ) RETURN PLS_INTEGER
70 IS
71 LANGUAGE C
72 LIBRARY DMBLAST_LIB
73 NAME "dmba_t_prepare"
74 WITH CONTEXT
75 PARAMETERS (
76 context,
77 sctx,
78 sctx INDICATOR STRUCT,
79 tf_info,
80 tf_info INDICATOR STRUCT,
81 query_sequence OCILobLocator,
82 query_sequence INDICATOR sb2,
83 seqdb_cursor,
84 subsequence_from UB4,
85 subsequence_from INDICATOR,
86 subsequence_to SB4,
87 subsequence_to INDICATOR,
88 translation_type,
89 translation_type INDICATOR,
90 genetic_code UB1,
91 genetic_code INDICATOR,
92 filter_low_complexity UB1,
93 filter_low_complexity INDICATOR,
94 mask_lower_case UB1,
95 mask_lower_case INDICATOR,
96 sub_matrix,
97 sub_matrix INDICATOR,
98 expect_value,
99 expect_value INDICATOR,
100 open_gap_cost UB2,
101 open_gap_cost INDICATOR,
102 extend_gap_cost UB2,
103 extend_gap_cost INDICATOR,
104 word_size UB1,
105 word_size INDICATOR,
106 x_dropoff UB2,
107 x_dropoff INDICATOR,
108 final_x_dropoff UB2,
109 final_x_dropoff INDICATOR,
110 qkn_ptr OCIRaw,
111 heap_ptr OCIRaw,
112 RETURN INT
113 );
114
115 STATIC FUNCTION ODCITableStart (
116 sctx IN OUT dmbatimp,
117 rws_ptr IN RAW,
118 query_sequence IN CLOB,
119 seqdb_cursor SYS_REFCURSOR,
120 subsequence_from IN PLS_INTEGER,
121 subsequence_to IN PLS_INTEGER,
122 translation_type IN STRING,
123 genetic_code IN PLS_INTEGER,
124 filter_low_complexity IN PLS_INTEGER,
125 mask_lower_case IN PLS_INTEGER,
126 sub_matrix IN STRING,
127 expect_value IN NUMBER,
128 open_gap_cost IN PLS_INTEGER,
129 extend_gap_cost IN PLS_INTEGER,
130 word_size IN PLS_INTEGER,
131 x_dropoff IN PLS_INTEGER,
132 final_x_dropoff IN PLS_INTEGER
133 ) RETURN NUMBER
134 IS
135 PRAGMA AUTONOMOUS_TRANSACTION;
136 BEGIN
137 RETURN dmbatimp.dmbatStartStub (
138 sctx,
139 rws_ptr,
140 query_sequence,
141 seqdb_cursor,
142 subsequence_from,
143 subsequence_to,
144 translation_type,
145 genetic_code,
146 filter_low_complexity,
147 mask_lower_case,
148 sub_matrix,
149 expect_value,
150 open_gap_cost,
151 extend_gap_cost,
152 word_size,
153 x_dropoff,
154 final_x_dropoff);
155 END;
156
157 STATIC FUNCTION dmbatStartStub (
158 sctx IN OUT dmbatimp,
159 rws_ptr IN RAW,
160 query_sequence IN CLOB,
161 seqdb_cursor SYS_REFCURSOR,
162 subsequence_from IN PLS_INTEGER,
163 subsequence_to IN PLS_INTEGER,
164 translation_type IN STRING,
165 genetic_code IN PLS_INTEGER,
166 filter_low_complexity IN PLS_INTEGER,
167 mask_lower_case IN PLS_INTEGER,
168 sub_matrix IN STRING,
169 expect_value IN NUMBER,
170 open_gap_cost IN PLS_INTEGER,
171 extend_gap_cost IN PLS_INTEGER,
172 word_size IN PLS_INTEGER,
173 x_dropoff IN PLS_INTEGER,
174 final_x_dropoff IN PLS_INTEGER
175 ) RETURN NUMBER
176 IS
177 LANGUAGE C
178 LIBRARY DMBLAST_LIB
179 NAME "dmba_t_start"
180 WITH CONTEXT
181 PARAMETERS (
182 context,
183 sctx,
184 sctx INDICATOR STRUCT,
185 query_sequence OCILobLocator,
186 query_sequence INDICATOR sb2,
187 seqdb_cursor,
188 subsequence_from UB4,
189 subsequence_from INDICATOR,
190 subsequence_to SB4,
191 subsequence_to INDICATOR,
192 translation_type,
193 translation_type INDICATOR,
194 genetic_code UB1,
195 genetic_code INDICATOR,
196 filter_low_complexity UB1,
197 filter_low_complexity INDICATOR,
198 mask_lower_case UB1,
199 mask_lower_case INDICATOR,
200 sub_matrix,
201 sub_matrix INDICATOR,
202 expect_value,
203 expect_value INDICATOR,
204 open_gap_cost UB2,
205 open_gap_cost INDICATOR,
206 extend_gap_cost UB2,
207 extend_gap_cost INDICATOR,
208 word_size UB1,
209 word_size INDICATOR,
210 x_dropoff UB2,
211 x_dropoff INDICATOR,
212 final_x_dropoff UB2,
213 final_x_dropoff INDICATOR,
214 rws_ptr OCIRaw,
215 RETURN OCINumber
216 );
217
218 MEMBER FUNCTION ODCITableFetch (
219 self IN OUT dmbatimp,
220 nrows IN NUMBER,
221 outset OUT dmbaos
222 ) RETURN NUMBER
223 IS
224 PRAGMA AUTONOMOUS_TRANSACTION;
225 BEGIN
226 RETURN self.dmbatFetchStub (nrows, outset);
227 END;
228
229 MEMBER FUNCTION dmbatFetchStub (
230 self IN OUT dmbatimp,
231 nrows IN NUMBER,
232 outset OUT dmbaos
233 ) RETURN NUMBER
234 AS
235 LANGUAGE C
236 LIBRARY DMBLAST_LIB
237 NAME "dmba_t_fetch"
238 WITH CONTEXT
239 PARAMETERS (
240 context,
241 self,
242 self INDICATOR STRUCT,
243 nrows,
244 nrows INDICATOR,
245 outset,
246 outset INDICATOR,
247 RETURN OCINumber
248 );
249
250 MEMBER FUNCTION ODCITableClose (
251 self IN dmbatimp
252 ) RETURN NUMBER
253 IS
254 PRAGMA AUTONOMOUS_TRANSACTION;
255 BEGIN
256 RETURN self.dmbatCloseStub();
257 END;
258
259 MEMBER FUNCTION dmbatCloseStub (
260 self IN dmbatimp
261 ) RETURN NUMBER
262 AS
263 LANGUAGE C
264 LIBRARY DMBLAST_LIB
265 NAME "dmba_t_close"
266 WITH CONTEXT
267 PARAMETERS (
268 context,
269 self,
270 self INDICATOR STRUCT,
271 RETURN OCINumber
272 );
273 END;