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