源码：xx.pc

/*
功能：演示了Oracle非滚动游标操作
定义游标时注意事项：
1. DECLARE CURSOR语句必须是使用游标的第一条语句
2. 游标名称是一个标识符，而不是宿主变量，其长度是可以任意的，但只有前31个字符有效
3. 游标所对应的SELECT语句不能包含INTO子句
4. 游标语句(DECLARE,OPEN,FETCH,CLOSE)必须在同一个预编译单元内
*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <sqlca.h>
#pragma comment(lib, "orasql10.lib")
int connect();
void cursor();
void sql_error();
void main()
{
EXEC SQL WHENEVER SQLERROR DO sql_error();	// 安装错误处理句柄
if(connect() == 0)
{
cursor();
EXEC SQL COMMIT RELEASE;
}
else
printf("连接失败\n");
}
int connect()					// connect to oracle database
{
char username[10], password[10], server[10];
strcpy(username, "scott");
strcpy(password, "zzb888888");
strcpy(server, "orcl");
EXEC SQL CONNECT :username IDENTIFIED BY :password USING :server;
if(sqlca.sqlcode == 0)
return 0;
else
return sqlca.sqlcode;
}
void sql_error()				// print error infomation
{
printf("%.*s\n", sqlca.sqlerrm.sqlerrml, sqlca.sqlerrm.sqlerrmc);
}
void cursor()					// 游标操作
{
int dno, eno;				// 定义宿主变量
char name[10];
float salary;
printf("输入部门号：");
scanf("%d", &dno);
EXEC SQL DECLARE emp_cursor CURSOR FOR Select empno, ename, sal from emp where deptno=:dno;	// 定义游标
EXEC SQL OPEN emp_cursor;	// 打开游标
EXEC SQL WHENEVER NOT FOUND DO break;	// 游标数据提取完毕后退出循环
for(; ;)
{
EXEC SQL FETCH emp_cursor into :eno, :name, :salary;	// 循环提取数据
printf("name = %s(%d), salary = %.2f\n", name, strlen(name), salary);
}
EXEC SQL CLOSE emp_cursor;	// 关闭游标
printf("sqlca.sqlerrd[2] = %d\n", sqlca.sqlerrd[2]);		// sqlca.sqlerrd[2]存放着Select语句作用的行数
}

运行结果：

输入部门号：20
name = SMITH    (9), salary = 800.00
name = JONES    (9), salary = 2975.00
name = SCOTT    (9), salary = 3000.00
name = ADAMS    (9), salary = 1100.00
name = FORD     (9), salary = 3000.00
sqlca.sqlerrd[2] = 5