📄 statement_8c-source.html
字号:
<a name="l00300"></a>00300 {<a name="l00301"></a>00301 <span class="comment">/* is it a pl/sql table bind ? */</span> <a name="l00302"></a>00302 <a name="l00303"></a>00303 <span class="keywordflow">if</span> (stmt-><a class="code" href="struct_o_c_i___statement.html#9cf69f367c58d7d808cdb799704f684c">type</a> == OCI_CST_BEGIN || stmt-><a class="code" href="struct_o_c_i___statement.html#9cf69f367c58d7d808cdb799704f684c">type</a> == OCI_CST_DECLARE)<a name="l00304"></a>00304 is_pltbl = TRUE;<a name="l00305"></a>00305 }<a name="l00306"></a>00306 <span class="keywordflow">else</span><a name="l00307"></a>00307 nbelem = stmt-><a class="code" href="struct_o_c_i___statement.html#aa532ff3069ec7aaf47fa63a23ece8d0">nb_iters</a>;<a name="l00308"></a>00308 <a name="l00309"></a>00309 <span class="comment">/* allocate bind array if necessary */</span><a name="l00310"></a>00310 <a name="l00311"></a>00311 <span class="keywordflow">if</span> (stmt-><a class="code" href="struct_o_c_i___statement.html#5979eb260642a37f1326551ddb6046a9">binds</a> == NULL)<a name="l00312"></a>00312 {<a name="l00313"></a>00313 stmt-><a class="code" href="struct_o_c_i___statement.html#5979eb260642a37f1326551ddb6046a9">binds</a> = (OCI_Bind **) OCI_MemAlloc(OCI_IPC_BIND_ARRAY, <a name="l00314"></a>00314 <span class="keyword">sizeof</span>(*stmt-><a class="code" href="struct_o_c_i___statement.html#5979eb260642a37f1326551ddb6046a9">binds</a>), <a name="l00315"></a>00315 OCI_BIND_MAX, TRUE);<a name="l00316"></a>00316 }<a name="l00317"></a>00317 <a name="l00318"></a>00318 res = (stmt-><a class="code" href="struct_o_c_i___statement.html#5979eb260642a37f1326551ddb6046a9">binds</a> != NULL);<a name="l00319"></a>00319 }<a name="l00320"></a>00320 <a name="l00321"></a>00321 <span class="comment">/* allocate bind object */</span><a name="l00322"></a>00322 <a name="l00323"></a>00323 <span class="keywordflow">if</span> (res == TRUE)<a name="l00324"></a>00324 {<a name="l00325"></a>00325 bnd = (OCI_Bind *) OCI_MemAlloc(OCI_IPC_BIND, <span class="keyword">sizeof</span>(*bnd), 1, TRUE);<a name="l00326"></a>00326 <a name="l00327"></a>00327 res = (bnd != NULL);<a name="l00328"></a>00328 }<a name="l00329"></a>00329 <a name="l00330"></a>00330 <span class="comment">/* allocate indicators array */</span><a name="l00331"></a>00331 <a name="l00332"></a>00332 <span class="keywordflow">if</span> (res == TRUE)<a name="l00333"></a>00333 {<a name="l00334"></a>00334 bnd->buf.inds = (<span class="keywordtype">void</span> *) OCI_MemAlloc(OCI_IPC_INDICATOR_ARRAY, <span class="keyword">sizeof</span>(sb2), <a name="l00335"></a>00335 nbelem, TRUE);<a name="l00336"></a>00336 <a name="l00337"></a>00337 res = (bnd->buf.inds != NULL);<a name="l00338"></a>00338 }<a name="l00339"></a>00339 <a name="l00340"></a>00340 <span class="comment">/* check need for PL/SQL table extra infos */</span><a name="l00341"></a>00341 <a name="l00342"></a>00342 <span class="keywordflow">if</span> ((res == TRUE) && (is_pltbl == TRUE))<a name="l00343"></a>00343 {<a name="l00344"></a>00344 bnd->nbelem = nbelem;<a name="l00345"></a>00345 pnbelem = &bnd->nbelem;<a name="l00346"></a>00346 <a name="l00347"></a>00347 <span class="comment">/* allocate array of element sizes */</span><a name="l00348"></a>00348 <a name="l00349"></a>00349 bnd->plsizes = (ub2 *) OCI_MemAlloc(OCI_IPC_PLS_SIZE_ARRAY, <span class="keyword">sizeof</span>(ub2), <a name="l00350"></a>00350 nbelem, FALSE);<a name="l00351"></a>00351 <a name="l00352"></a>00352 <span class="keywordflow">if</span> (bnd->plsizes != NULL)<a name="l00353"></a>00353 {<a name="l00354"></a>00354 <span class="keywordflow">for</span>(i = 0; i < nbelem; i++)<a name="l00355"></a>00355 bnd->plsizes[i] = (ub2) size;<a name="l00356"></a>00356 <a name="l00357"></a>00357 res = TRUE;<a name="l00358"></a>00358 }<a name="l00359"></a>00359 <span class="keywordflow">else</span><a name="l00360"></a>00360 res = FALSE;<a name="l00361"></a>00361 <a name="l00362"></a>00362 <span class="comment">/* allocate array of returned codes */</span><a name="l00363"></a>00363 <a name="l00364"></a>00364 <span class="keywordflow">if</span> (res == TRUE)<a name="l00365"></a>00365 {<a name="l00366"></a>00366 bnd->plrcds = (ub2 *) OCI_MemAlloc(OCI_IPC_PLS_RCODE_ARRAY, <a name="l00367"></a>00367 <span class="keyword">sizeof</span>(ub2), nbelem, TRUE);<a name="l00368"></a>00368 <a name="l00369"></a>00369 res = (bnd->plrcds != NULL);<a name="l00370"></a>00370 }<a name="l00371"></a>00371 }<a name="l00372"></a>00372 <a name="l00373"></a>00373 <span class="comment">/* for handle based datatypes, we need to allocate an array of handles for</span><a name="l00374"></a>00374 <span class="comment"> bind calls because OCILIB uses external arrays of OCILIB Objects */</span><a name="l00375"></a>00375 <a name="l00376"></a>00376 <span class="keywordflow">if</span> ((res == TRUE) && (mode == OCI_BIND_INPUT))<a name="l00377"></a>00377 {<a name="l00378"></a>00378 <span class="keywordflow">if</span> (type != OCI_CDT_RAW && <a name="l00379"></a>00379 type != OCI_CDT_LONG && <a name="l00380"></a>00380 type != OCI_CDT_CURSOR &&<a name="l00381"></a>00381 <a name="l00382"></a>00382 #ifndef OCI_CHECK_DATASTRINGS<a name="l00383"></a>00383 <a name="l00384"></a>00384 type != OCI_CDT_TEXT && <a name="l00385"></a>00385 <a name="l00386"></a>00386 #endif<a name="l00387"></a>00387 (type != OCI_CDT_NUMERIC || code == SQLT_VNU)<a name="l00388"></a>00388 )<a name="l00389"></a>00389 {<a name="l00390"></a>00390 bnd->alloc = TRUE;<a name="l00391"></a>00391 <a name="l00392"></a>00392 bnd->buf.data = (<span class="keywordtype">void</span> **) OCI_MemAlloc(OCI_IPC_BUFF_ARRAY, size, nbelem,<a name="l00393"></a>00393 TRUE);<a name="l00394"></a>00394 <a name="l00395"></a>00395 <a name="l00396"></a>00396 res = (bnd->buf.data != NULL);<a name="l00397"></a>00397 }<a name="l00398"></a>00398 <span class="keywordflow">else</span><a name="l00399"></a>00399 bnd->buf.data = (<span class="keywordtype">void</span> **) data;<a name="l00400"></a>00400 }<a name="l00401"></a>00401 <a name="l00402"></a>00402 <span class="comment">/* initialize bind object */</span><a name="l00403"></a>00403 <a name="l00404"></a>00404 <span class="keywordflow">if</span> (res == TRUE)<a name="l00405"></a>00405 { <a name="l00406"></a>00406 <span class="comment">/* initialize bind attributes */</span><a name="l00407"></a>00407 <a name="l00408"></a>00408 bnd->stmt = stmt;<a name="l00409"></a>00409 bnd->input = (<span class="keywordtype">void</span> **) data;<a name="l00410"></a>00410 bnd-><a class="code" href="struct_o_c_i___statement.html#9cf69f367c58d7d808cdb799704f684c">type</a> = type;<a name="l00411"></a>00411 bnd->size = size;<a name="l00412"></a>00412 bnd->name = mtsdup(name);<a name="l00413"></a>00413 bnd->code = (ub2) code;<a name="l00414"></a>00414 bnd->mode = (ub1) mode;<a name="l00415"></a>00415 bnd->subtype = (ub1) subtype;<a name="l00416"></a>00416 <a name="l00417"></a>00417 <span class="comment">/* initialize buffer */</span><a name="l00418"></a>00418 <a name="l00419"></a>00419 bnd->buf.count = nbelem;<a name="l00420"></a>00420 bnd->buf.sizelen = <span class="keyword">sizeof</span>(ub2);<a name="l00421"></a>00421 <a name="l00422"></a>00422 <span class="comment">/* if we bind an OCI_Long or any outut bind, we need to change the </span><a name="l00423"></a>00423 <span class="comment"> execution mode to provide data at execute time */</span><a name="l00424"></a>00424 <a name="l00425"></a>00425 <span class="keywordflow">if</span> (bnd->type == OCI_CDT_LONG)<a name="l00426"></a>00426 {<a name="l00427"></a>00427 stmt-><a class="code" href="struct_o_c_i___statement.html#f66fea62f75b943c334283cd346fb729">long_size</a> = size;<a name="l00428"></a>00428 exec_mode = OCI_DATA_AT_EXEC;<a name="l00429"></a>00429 }<a name="l00430"></a>00430 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (bnd->mode == OCI_BIND_OUTPUT)<a name="l00431"></a>00431 {<a name="l00432"></a>00432 exec_mode = OCI_DATA_AT_EXEC;<a name="l00433"></a>00433 }<a name="l00434"></a>00434 }<a name="l00435"></a>00435 <a name="l00436"></a>00436 <span class="comment">/* OCI binding */</span><a name="l00437"></a>00437 <a name="l00438"></a>00438 <span class="keywordflow">if</span> (res == TRUE)<a name="l00439"></a>00439 {<a name="l00440"></a>00440 <span class="keywordflow">if</span> (stmt-><a class="code" href="struct_o_c_i___statement.html#5824dd74344da1512bc07b20fcfc75e8">bind_mode</a> == OCI_BIND_BY_POS)<a name="l00441"></a>00441 {<a name="l00442"></a>00442 <span class="keywordtype">int</span> index = (int) mtstol(&bnd->name[1], NULL, 10);<a name="l00443"></a>00443 <a name="l00444"></a>00444 OCI_CALL1<a name="l00445"></a>00445 (<a name="l00446"></a>00446 res, stmt-><a class="code" href="struct_o_c_i___statement.html#338ddf58debd7de6ab9355f1e75d78f6">con</a>, stmt,<a name="l00447"></a>00447 <a name="l00448"></a>00448 OCIBindByPos(stmt-><a class="code" href="struct_o_c_i___statement.html#e526a309495dc7d8bcb747b2771de6b9">stmt</a>, (OCIBind **) &bnd->buf.handle,<a name="l00449"></a>00449 stmt-><a class="code" href="struct_o_c_i___statement.html#338ddf58debd7de6ab9355f1e75d78f6">con</a>-><a class="code" href="struct_o_c_i___connection.html#573a359867139990b1b0f50aa7a86175">err</a>, (ub4) index, (<span class="keywordtype">void</span> *) bnd->buf.data,<a name="l00450"></a>00450 bnd->size, bnd->code, bnd->buf.inds, bnd->plsizes, <a name="l00451"></a>00451 bnd->plrcds, (ub4) (is_pltbl == TRUE ? nbelem : 0),<a name="l00452"></a>00452 pnbelem, exec_mode)<a name="l00453"></a>00453 )<a name="l00454"></a>00454 }<a name="l00455"></a>00455 <span class="keywordflow">else</span><a name="l00456"></a>00456 {⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -