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语句作用的行数   
} 

 [code="java"]/*
    功能：演示了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>
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;


}