Linux 环境下Oracle PRO*C程序的编写简单范例

butter7372

　　Linux 环境下PRO*C程序的编写简单范例
　　Oracle 数据库版本 10.2.1.0  
　　Linux 版本 Red Hat Enterprise AS3
　　环境介绍：oracle 数据库和服务均安装到 linux 主机上
　　oracle 用户的环境变量设置如下
　　


代码



[oracle@guohui6 oracle]$ cat .bash_profile
# .bash_profile

# Get the aliases and functions
if [ -f ~/.bashrc ]; then
        . ~/.bashrc
fi
# User specific environment and startup programs

ORACLE_BASE=/mydatafile2/app/oracle; export ORACLE_BASE
ORACLE_SID=ORCL;export ORACLE_SID
#ORACLE_SID=AUXY;export ORACLE_SID
ORACLE_HOME=$ORACLE_BASE/oracle/product/10.2.0/db_1;export ORACLE_HOME
PATH=$PATH:$HOME/bin:$ORACLE_HOME/bin; export PATH
LD_LIBRARY_PATH=$ORACLE_HOME/lib:/usr/lib:/usr/local/lib;
export LD_LIBRARY_PATH
NLS_LANG=american_america.ZHS16GBK;export NLS_LANG
export PATH
unset USERNAME
[oracle@guohui6 oracle]$
　　
　　查看oracle 用户的登录环境
　　


代码



[oracle@guohui6 oracle]$ id
uid=501(oracle) gid=501(oinstall) groups=501(oinstall),502(dba)
[oracle@guohui6 oracle]$ env
REMOTEHOST=192.169.1.7
HOSTNAME=guohui6
SHELL=/bin/bash
TERM=vt100
HISTSIZE=1000
NLS_LANG=american_america.ZHS16GBK
QTDIR=/usr/lib/qt-3.1
OLDPWD=/home/oracle/backuprestor101/proc_code
USER=oracle
LD_LIBRARY_PATH=/mydatafile2/app/oracle/oracle/product/10.2.0/db_1/lib:/usr/lib:/usr/local/lib
LS_COLORS=no=00:fi=00:di=01;34:ln=01;36:pi=40;33:so=01;35:bd=40;33;01:cd=40;33;01:or=01;05;37;41:mi=01;05;37;41:ex=01;32:*.cmd=01;32:*.exe=01;32:*.com=01;32:*.btm=01;32:*.bat=01;32:*.sh=01;32:*.csh=01;32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.bz2=01;31:*.bz=01;31:*.tz=01;31:*.rpm=01;31:*.cpio=01;31:*.jpg=01;35:*.gif=01;35:*.bmp=01;35:*.xbm=01;35:*.xpm=01;35:*.png=01;35:*.tif=01;35:
ORACLE_SID=ORCL
ORACLE_BASE=/mydatafile2/app/oracle
MAIL=/var/spool/mail/oracle
PATH=/usr/kerberos/bin:/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/home/oracle/bin:/mydatafile2/app/oracle/oracle/product/10.2.0/db_1/bin
INPUTRC=/etc/inputrc
PWD=/home/oracle
LANG=en_US.UTF-8
LAMHELPFILE=/etc/lam/lam-helpfile
SSH_ASKPASS=/usr/libexec/openssh/gnome-ssh-askpass
SHLVL=1
HOME=/home/oracle
LOGNAME=oracle
LESSOPEN=|/usr/bin/lesspipe.sh %s
ORACLE_HOME=/mydatafile2/app/oracle/oracle/product/10.2.0/db_1
G_BROKEN_FILENAMES=1
_=/bin/env
[oracle@guohui6 oracle]$
　　注意:LD_LIBRARY_PATH 变量的设置,PATH环境变量的设置
　　


代码



PATH=/usr/kerberos/bin:/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/home/oracle/bin:/mydatafile2/app/oracle/oracle/product/10.2.0/db_1/bin
LD_LIBRARY_PATH=/mydatafile2/app/oracle/oracle/product/10.2.0/db_1/lib:/usr/lib:/usr/local/lib
　　
　　
　　如果设置得不对，将无法正确的调用 proc 预编译工具，也无法正确的链接 proc 预编译需要使用的头文件。
　　
　　确保数据库连接和tnsnames.ora,listener.ora 文件的正确配置。（这里就不再多说了！）
　　


代码



[oracle@guohui6 oracle]$ sqlplus scott/tiger@orcl
SQL*Plus: Release 10.2.0.1.0 - Production on Mon Jul 5 01:16:36 2010
Copyright (c) 1982, 2005, Oracle.  All rights reserved.

Connected to:
Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - Production
With the Partitioning, OLAP and Data Mining options
SQL>
　　
　　
　　我们将用 scott用户对数据库进行连接并查找表里面的数据。
　　代码 main.pc 如下
　　


代码



#include
#include
#include
#include
int main(int argc,char* argv[])
{
        EXEC SQL BEGIN DECLARE SECTION;
                char *uid = "scott/tiger@ORCL";
                long userid=0;
                char username[51]="";
                EXEC SQL VAR username IS STRING(51);
        EXEC SQL END DECLARE SECTION;
        EXEC SQL CONNECT :uid;
        if(sqlca.sqlcode == 0)
                printf("connect sucess!\n");
        else
                printf("connect fail!\n");
         EXEC SQL DECLARE cur_user CURSOR FOR SELECT DEPTNO, DNAME FROM DEPT;
         EXEC SQL OPEN cur_user;
         while(1){
          userid=0;
          strcpy(username,"");
          EXEC SQL FETCH cur_user INTO  :userid, :username;
          if( sqlca.sqlcode == 1403) break;
          printf("userid=%ld,username=%s\n",userid,username);
         }
         EXEC SQL CLOSE cur_user;
         // EXEC SQL COMMIT WORK RELEASE;
         EXEC SQL ROLLBACK WORK RELEASE;
         return 0;

}
　　这里用 scott 用户对数据库发起连接，并查询 dept 表中的数据并打印出来。
　　
　　第一步：预编译
　　


代码



[oracle@guohui6 proc_code]$ proc main.pc
Pro*C/C++: Release 10.2.0.1.0 - Production on Mon Jul 5 01:27:37 2010
Copyright (c) 1982, 2005, Oracle.  All rights reserved.
System default option values taken from: /mydatafile2/app/oracle/oracle/product/10.2.0/db_1/precomp/admin/pcscfg.cfg
[oracle@guohui6 proc_code]$
　　
　　
　　第二步：编译预编译生成的文件 main.c
　　




[oracle@guohui6 proc_code]$ gcc -o tespproc main.c -I $ORACLE_HOME/precomp/public -L $ORACLE_HOME/lib -lclntsh

[oracle@guohui6 proc_code]$
　　
　　
　　测试执行
　　


代码



[oracle@guohui6 proc_code]$ ./tespproc
connect sucess!
userid=50,username=SUPPORT
userid=10,username=ACCOUNTING
userid=20,username=RESEARCH
userid=30,username=SALES
userid=40,username=OPERATIONS
[oracle@guohui6 proc_code]$
　　
　　
　　执行成功
　　备注:
　　编译错误oracle proc PCC-S-02015：
　　运行proc main.pc生成c文件时可能会产生这个错误，请检查文件$(ORACLE_HOME)/precomp/admin/pcscfg.cfg，在/usr/lib/下查找未找到的"stddef.h"文件,将找到的路径添加到pcscfg.cfg。