pro*c 游标

*/
#include
#include
#include

#include
#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, "scott");
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;                    // 定义宿主变量
char name[10];
float salary;

// 定义游标变量
sql_cursor emp_cursor; // sql_cursor：是Proc*C/C++的伪类型

printf("请输入部门号：");
scanf("%d", &dno);

EXEC SQL ALLOCATE :emp_cursor; // 分配游标变量

EXEC SQL EXECUTE
BEGIN
OPEN :emp_cursor FOR Select ename, sal from emp where deptno=:dno;
END;
END-EXEC;

EXEC SQL WHENEVER NOT FOUND DO BREAK;   // 游标数据提取完毕后退出循环
while(1)
{
EXEC SQL FETCH :emp_cursor into :name, :salary;
printf("name = %s(%d), salary = %4.0f\n", name, strlen(name), salary);
}
EXEC SQL CLOSE :emp_cursor; // 关闭游标变量
EXEC SQL FREE :emp_cursor; // 释放游标变量

printf("sqlca.sqlerrd[2] = %d\n", sqlca.sqlerrd[2]);        // sqlca.sqlerrd[2]存放着Select语句作用的行数
}

/*
    功能：演示了Oracle滚动游标变量的使用

    定义游标时注意事项：
    1. DECLARE CURSOR语句必须是使用游标的第一条语句
    2. 游标名称是一个标识符，而不是宿主变量，其长度是可以任意的，但只有前31个字符有效
    3. 游标所对应的SELECT语句不能包含INTO子句
    4. 游标语句(DECLARE,OPEN,FETCH,CLOSE)必须在同一个预编译单元内



 

非滚动游标：

[code]#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <sqlca.h>
void connect();
void sql_err();void cursor();
void main()
{
EXEC SQL WHENEVER SQLERROR  DO sql_err();
connect();
cursor();
EXEC SQL COMMIT RELEASE;
}

void sql_err()
{
//printf("%.*s\n",sqlca.sqlerrm.sqlerrml,,sqlca.sqlerrm.sqlerrmc);
}

void connect()/*数据库连接-本地数据库，不添加server*/
{
EXEC SQL BEGIN DECLARE SECTION;
VARCHAR oraCN[30];
EXEC SQL END DECLARE SECTION;
strcpy(oraCN.arr,"scott/Tiger@TEST_dist");
EXEC SQL CONNECT :oraCN;
}
void cursor()/*游标的标准使用方式，声明，打开，抓取，关闭*/
{
EXEC SQL BEGIN DECLARE SECTION;
int dno,eno;
char name[20];
float salary;
EXEC SQL END DECLARE SECTION;
printf("input dept no: ");
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 sql_err();
printf("a");
for(;;)
{
EXEC SQL FETCH emp_cursor INTO :eno,:name,:salary;
printf("employee:%s,salary:%f\n",name,salary);
}
EXEC SQL CLOSE emp_cursor;

}