Pro*C 中嵌入pl/sql块

/* 包含C头文件 */
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
/* 包含SQLCA头文件 */
EXEC SQL INCLUDE sqlca;
EXEC SQL INCLUDE sqlda;

int main()
{
    EXEC SQL BEGIN DECLARE SECTION;
    int  money;
    char answerbuff[200];
    int flag;

    char username[10],password[10],server[10];
    EXEC SQL END DECLARE SECTION;

    /*
     * 定义输入宿主变量:接收用户名、口令和网络服务名
     *
     */
       strcpy(username,"data_center");
    strcpy(password,"data_center");
    strcpy(server,"oradf1"); /*这里填写的是数据库的SID*/

    /* 连接到数据库 */
    EXEC SQL CONNECT :username IDENTIFIED BY :password USING :server;
    if (sqlca.sqlcode==0)
        printf("连接成功!/n");
    else
        /* 显示连接错误消息 */
        printf("%.*s/n", sqlca.sqlerrm.sqlerrml,
                sqlca.sqlerrm.sqlerrmc);
    /*初始化*/
    money=0;
    flag=0; /*用天判断是否找到数据*/

    /*执行plsql块*/
    EXEC SQL EXECUTE
        BEGIN
        SELECT salary INTO :money FROM plsqltest WHERE name='ht';
        :flag:=1;
    EXCEPTION
        WHEN NO_DATA_FOUND THEN
        :answerbuff:='数据没有找到';
    END;
    END-EXEC;

    /*输出结果*/
    if (flag==0)
        printf("%s/n",answerbuff);
    else
        printf("总工资是：%d/n",money);

}

 

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

编译方法：
1. 如果在PC源程序中内嵌了PL/SQL块， SQLCHECK应该SEMANTICS或是 FULL
2. 当SQLCHECK的值是SEMANTICS或是 FULL时，必须设置USERID
proc  PARSE=NONE include=-I/opt/oracle/product/10.2.0/precomp/public include=-I/opt/oracle/product/10.2.0/rdbms/public  sqlcheck=full USERID=data_center/data_center@oradf1  iname=test.pc

gcc的一些选项，不加这些，有时会报错。
gcc  -L/opt/oracle/product/10.2.0/lib -lclntsh -ldl -lm -lnsl  -o test test.c

 

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

创建表：
create table PLSQLTEST
(
 salary NUMBER,
 NAME   VARCHAR2(10)
 );

insert into plsqltest (salary, NAME)
    values (1000, 'xym');
insert into plsqltest (salary, NAME)
    values (2000, 'ht');
    commit;