Pro*C中CLOB的使用

xiaoxiao2021-03-01  1

#include <stdio.h> #include <string.h> #include <stdlib.h> /* 包含OCI头文件 */ #include <oci.h>

/* 包含SQLCA头文件 */ #include <sqlca.h>

void connect(); void sql_error(); void init_clob(); void read_clob(); void write_clob();

int main() { char action; /* 安装错误处理句柄 */ exec sql whenever sqlerror do sql_error();

/* 连接到数据库 */ connect();

for( ; ; ) { printf("\nI:插入雇员,"); printf("A:添加简历,"); printf("S:检索简历,"); printf("X:退出."); printf("输出入操作:");

scanf("%c" , &action); getchar();

switch(action) { case 'i': case 'I': /* 添加雇员,初始化clob列 */ init_clob(); break;

case 'a': case 'A': /* 添加简历,修改clob列 */ write_clob(); break;

case 's': case 'S': /* 检索简历,读取clob列 */ read_clob(); break;

case 'x': case 'X': /* 提交事务,断开连接 */ exec sql commit work release; return 0;

default: continue; } }

return 0; }

void connect() { EXEC SQL BEGIN DECLARE SECTION; /* 定义宿主变量 */ char username[20] , password[20]; EXEC SQL END DECLARE SECTION; /* 输入用户名、口令和网络服务名 */ printf("输入用户名:"); gets(username);

printf("输入口令:"); gets(password);

/* 连接到数据库 */ exec sql connect :username identified by :password; }

void sql_error() { /* 显示SQL错误信息 */ printf("%.*s\n" , sqlca.sqlerrm.sqlerrml , sqlca.sqlerrm.sqlerrmc); }

void init_clob() { EXEC SQL BEGIN DECLARE SECTION; /* 定义宿主变量 */ int id; char name[10]; EXEC SQL END DECLARE SECTION; /* 为输入宿主变量输入数据 */ printf("请输入雇员ID号:"); scanf("%d" , &id); getchar();

printf("请输入雇员名:"); gets(name);

/* 插入数据并初始化clob列 */ exec sql insert into lobexample values(:id , :name , empty_clob());

/* 提交事务 */ exec sql commit; }

void read_clob() { EXEC SQL BEGIN DECLARE SECTION; /* 定义clob定位符 */ OCIClobLocator* c1;

/* 定义宿主变量 */ int id , amount; char buf[1024]; EXEC SQL END DECLARE SECTION; /* 为输入宿主变量输入数据 */ printf("请输入雇员ID号:"); scanf("%d" , &id); getchar();

/* 为clob定位符分配内存 */ exec sql allocate :c1;

/* 取得clob定位符 */ exec sql select resume into :c1 from lobexample where id = :id;

/* 获得clob列数据的长度 */ exec sql lob describe :c1 get length into :amount;

/* clob列数据-> 缓冲区*/ exec sql lob read :amount from :c1 into :buf;

/* 释放clob定位符占用的内存 */ exec sql free :c1;

/* 显示clob列数据 */ printf("简历:%.*s\n" , amount , buf); }

void write_clob() { EXEC SQL BEGIN DECLARE SECTION; /* 定义clob定位符 */ OCIClobLocator* c1;

/* 定义宿主变量 */ int id , amount , offset; char buf[1024]; EXEC SQL END DECLARE SECTION; /* 为输入宿主变量输入数据 */ printf("请输入雇员ID号:"); scanf("%d" , &id); getchar();

printf("请输入雇员简历:"); gets(buf); amount = strlen(buf);

/* 为clob定位符分配内存 */ exec sql allocate :c1;

/* 取得clob定位符 */ exec sql select resume into :c1 from lobexample where id = :id for update;

/* 获得clob列数据长度 */ exec sql lob describe :c1 get length into :offset;

/* 缓冲区->clob列数据 */ offset = offset + 1; exec sql lob write :amount from :buf into :c1 at :offset;

/* 释放clob定位符占用的内存 */ exec sql free :c1;

/* 提交事务 */ exec sql commit;

}

运行结果:

转载请注明原文地址: https://www.6miu.com/read-3850250.html

最新回复(0)