ex18_8c-example.html
来自「一个很好用的Linux/Unix下Oracle OCI开发接口封装库」· HTML 代码 · 共 85 行
HTML
85 行
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
<title>Example Documentation</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
</head><body>
<!-- Generated by Doxygen 1.2.18 -->
<center>
<a class="qindex" href="index.html">Main Page</a> <a class="qindex" href="modules.html">Modules</a> <a class="qindex" href="files.html">File List</a> <a class="qindex" href="globals.html">Globals</a> <a class="qindex" href="pages.html">Related Pages</a> <a class="qindex" href="examples.html">Examples</a> </center>
<hr><h1>ex18.c</h1> Example for selecting from a refcursor.
<p>
<div class="fragment"><pre><span class="comment">/* $Id: ex18_8c-example.html,v 1.1 2005/01/13 02:56:43 cvsroot Exp $ */</span>
<span class="preprocessor">#include <stdio.h></span>
<span class="preprocessor">#include <stdlib.h></span>
<span class="preprocessor">#include "examples.h"</span>
<span class="keywordtype">int</span> select_refcursor2(<a class="code" href="group__typedefs.html#a0">sqlo_db_handle_t</a> dbh, <span class="keywordtype">double</span> min_salary)
{
<a class="code" href="group__typedefs.html#a1">sqlo_stmt_handle_t</a> sth = <a class="code" href="group__constants.html#a5a49">SQLO_STH_INIT</a>;
<a class="code" href="group__typedefs.html#a1">sqlo_stmt_handle_t</a> st2h; <span class="comment">/* handle of the ref cursor */</span>
<span class="keywordtype">double</span> sal = min_salary;
<span class="keywordtype">int</span> status;
<span class="keywordtype">char</span> name[30];
<span class="keywordtype">double</span> salary;
<span class="keywordtype">short</span> nind, sind;
CONST <span class="keywordtype">char</span> * stmt =
<span class="stringliteral">"BEGIN\n"</span>
<span class="stringliteral">" OPEN :c1 FOR SELECT ENAME, SAL FROM EMP WHERE SAL >= :min_sal ORDER BY 2,1;\n"</span>
<span class="stringliteral">"END;\n"</span>;
<span class="comment">/* parse the statement */</span>
<span class="keywordflow">if</span> ( 0 <= (sth = <a name="a0"></a><a class="code" href="group__complex.html#a0">sqlo_prepare</a>(dbh, stmt))) {
<span class="comment">/* bind all variables */</span>
<span class="keywordflow">if</span> (<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> !=
(<a name="a1"></a><a class="code" href="group__complex.html#a1">sqlo_bind_by_name</a>(sth, <span class="stringliteral">":c1"</span>, <a class="code" href="group__constants.html#a6a85">SQLOT_RSET</a>, &st2h, 0, 0, 0)) ||
(<a class="code" href="group__complex.html#a1">sqlo_bind_by_name</a>(sth, <span class="stringliteral">":min_sal"</span>, <a class="code" href="group__constants.html#a6a57">SQLOT_FLT</a>, &sal, <span class="keyword">sizeof</span>(sal), 0, 0) ) ) {
error_exit(dbh, <span class="stringliteral">"sqlo_bind_by_name"</span>);
} <span class="keywordflow">else</span> {
<span class="comment">/* execute the PL/SQL block */</span>
<span class="keywordflow">if</span> (<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> != <a name="a2"></a><a class="code" href="group__complex.html#a8">sqlo_execute</a>(sth, 1))
error_exit(dbh, <span class="stringliteral">"sqlo_execute"</span>);
}
<span class="comment">/* execute the second cursor */</span>
<span class="keywordflow">if</span>(<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> != <a class="code" href="group__complex.html#a8">sqlo_execute</a>(st2h, 1))
error_exit(dbh, <span class="stringliteral">"sqlo_execute"</span>);
<span class="keywordflow">if</span> (<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> !=
( <a name="a3"></a><a class="code" href="group__complex.html#a5">sqlo_define_by_pos</a>(st2h, 1, <a class="code" href="group__constants.html#a6a58">SQLOT_STR</a>, name, <span class="keyword">sizeof</span>(name), &nind, 0, 0) ) ||
( <a class="code" href="group__complex.html#a5">sqlo_define_by_pos</a>(st2h, 2, <a class="code" href="group__constants.html#a6a57">SQLOT_FLT</a>, &salary, <span class="keyword">sizeof</span>(salary), &sind, 0, 0) ) )
{
error_exit(dbh, <span class="stringliteral">"sqlo_define_by_pos"</span>);
}
<span class="keywordflow">while</span> (<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> == (status = <a name="a4"></a><a class="code" href="group__easy.html#a6">sqlo_fetch</a>(st2h, 1))) {
printf(<span class="stringliteral">"Name=%-8s Salary= %6.2f\n"</span>, name, salary);
}
<span class="keywordflow">if</span> (status != <a class="code" href="group__constants.html#a3a32">SQLO_NO_DATA</a>)
error_exit(dbh, <span class="stringliteral">"sqlo_fetch(st2)"</span>);
<span class="keywordflow">if</span> (<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> != <a name="a5"></a><a class="code" href="group__easy.html#a13">sqlo_close</a>(sth))
error_exit(dbh, <span class="stringliteral">"sqlo_close(1)"</span>);
<span class="keywordflow">if</span> (<a class="code" href="group__constants.html#a3a25">SQLO_SUCCESS</a> != <a class="code" href="group__easy.html#a13">sqlo_close</a>(st2h))
error_exit(dbh, <span class="stringliteral">"sqlo_close(2)"</span>);
} <span class="keywordflow">else</span> {
error_exit(dbh, <span class="stringliteral">"sqlo_prepare"</span>);
}
<span class="keywordflow">return</span> 1;
}
<span class="comment">/* $Id: ex18_8c-example.html,v 1.1 2005/01/13 02:56:43 cvsroot Exp $ */</span>
</pre></div><hr><address style="align: right;"><small>Generated on Thu Aug 14 18:02:53 2003 for libsqlora8 by
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border=0
width=110 height=53></a>1.2.18 </small></address>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?