源码: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("连接失败
");
- }
-
- 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
", 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
", name, strlen(name), salary);
- }
- EXEC SQL CLOSE emp_cursor; // 关闭游标
-
- printf("sqlca.sqlerrd[2] = %d
", 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] = 5Oracle教程:使用滚动游标PL/SQL Developer 登陆分组管理 以及 保存用户名密码相关资讯 Oracle教程
- Oracle中纯数字的varchar2类型和 (07/29/2015 07:20:43)
- Oracle教程:Oracle中查看DBLink密 (07/29/2015 07:16:55)
- [Oracle] SQL*Loader 详细使用教程 (08/11/2013 21:30:36)
| - Oracle教程:Oracle中kill死锁进程 (07/29/2015 07:18:28)
- Oracle教程:ORA-25153 临时表空间 (07/29/2015 07:13:37)
- Oracle教程之管理安全和资源 (04/08/2013 11:39:32)
|
本文评论 查看全部评论 (0)