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