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

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 functionsif [ -f ~/.bashrc ]; then        . ~/.bashrcfi# User specific environment and startup programsORACLE_BASE=/mydatafile2/app/oracle; export ORACLE_BASEORACLE_SID=ORCL;export ORACLE_SID#ORACLE_SID=AUXY;export ORACLE_SIDORACLE_HOME=$ORACLE_BASE/oracle/product/10.2.0/db_1;export ORACLE_HOMEPATH=$PATH:$HOME/bin:$ORACLE_HOME/bin; export PATHLD_LIBRARY_PATH=$ORACLE_HOME/lib:/usr/lib:/usr/local/lib;export LD_LIBRARY_PATHNLS_LANG=american_america.ZHS16GBK;export NLS_LANGexport PATHunset USERNAME[oracle@guohui6 oracle]$

查看oracle 用户的登录环境

代码

[oracle@guohui6 oracle]$ iduid=501(oracle) gid=501(oinstall) groups=501(oinstall),502(dba)[oracle@guohui6 oracle]$ envREMOTEHOST=192.169.1.7HOSTNAME=guohui6SHELL=/bin/bashTERM=vt100HISTSIZE=1000NLS_LANG=american_america.ZHS16GBKQTDIR=/usr/lib/qt-3.1OLDPWD=/home/oracle/backuprestor101/proc_codeUSER=oracleLD_LIBRARY_PATH=/mydatafile2/app/oracle/oracle/product/10.2.0/db_1/lib:/usr/lib:/usr/local/libLS_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=ORCLORACLE_BASE=/mydatafile2/app/oracleMAIL=/var/spool/mail/oraclePATH=/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/binINPUTRC=/etc/inputrcPWD=/home/oracleLANG=en_US.UTF-8LAMHELPFILE=/etc/lam/lam-helpfileSSH_ASKPASS=/usr/libexec/openssh/gnome-ssh-askpassSHLVL=1HOME=/home/oracleLOGNAME=oracleLESSOPEN=|/usr/bin/lesspipe.sh %sORACLE_HOME=/mydatafile2/app/oracle/oracle/product/10.2.0/db_1G_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/binLD_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@orclSQL*Plus: Release 10.2.0.1.0 - Production on Mon Jul 5 01:16:36 2010Copyright (c) 1982, 2005, Oracle.  All rights reserved.Connected to:Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - ProductionWith the Partitioning, OLAP and Data Mining optionsSQL>

我们将用 scott用户对数据库进行连接并查找表里面的数据。

代码 main.pc 如下

代码

#include <stdio.h>#include <string.h>#include <stdlib.h>#include <sqlca.h>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=%sn",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.pcPro*C/C++: Release 10.2.0.1.0 - Production on Mon Jul 5 01:27:37 2010Copyright (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]$ ./tespprocconnect sucess!userid=50,username=SUPPORTuserid=10,username=ACCOUNTINGuserid=20,username=RESEARCHuserid=30,username=SALESuserid=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。
原文链接: https://www.cnblogs.com/kelantas/archive/2010/07/05/1771045.html

欢迎关注

微信关注下方公众号，第一时间获取干货硬货；公众号内回复【pdf】免费获取数百本计算机经典书籍