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

1、Linux环境下PRO*C程序的编写简单例Oracle数抵库版本10. 2.1.0Linux 版本 Red Hat Enterpr ise AS3环境介绍：oracle数据库和服务均安装到linux主机上一.oracle用户的环境变量设置如下：oracleguohui6 oracle$ cat bash_profile# bash_profi le# Get the a I i ases and functionsif -f /bashrc ; then / bashrcfi# User specific envi ronment and startup programsORACLE_BASE

2、=/mydataf i Ie2/app/oracIe; export ORACLE_BASE0RACLE_SID二ORCL;export ORACLE_SID#ORACLE_SID二AUXY;export ORACLE.SIDORACLE_HOME=$ORACLE_BASE/oracIe/product/10. 2. 0/db_1;export ORACLE.HOME PATH=$PATH:$HOME/b i n:$ORACLE_HOME/b i n; export PATHLD_LIBRARY_PATH二$ORACLE_HOME/Iib:/usr/lib:/usr/local/lib; ex

3、port LD_LIBRARY_PATHNLS_LANG=amer i can_amer ica. ZHS16GBK;export NLS_LANG export PATHunset USERNAMEoracleguohui6 oracle$二.查看oracle用户的登录环境：oracIeguohui6 oracle$ iduid=501 (oracle) gid=501 (oinsta11) groups=501 (oinstaII), 502(dba) oracleguohui6 oracle$ envREM0TEH0ST=192. 169. 1.7HOSTNAME=guohui 6SHE

4、LL=/bin/bashTERM二vt100HISTSIZE=1000NLS_LANG=amer i can_amer ica. ZHS16GBKQTDIR=/usr/lib/qt-3. 10LDPWD=/home/oracIe/backuprestor101/proc_code页脚USER=oracleLD_LIBRARY_PATH=/mydataf iIe2/app/oracIe/oracIe/product/10. 2. 0/db_1/lib:/usr/l ib :/usr/local/l ibLS_C0L0RS=no=00:fi=00:di=01;34:ln=01;36:pi=40;3

5、3: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:*. =01;32:*. bt m=01;32:* bat=01;32:* sh=01;32:* csh=01;32：* tar=01;31:* tgz=01;31:* arj=01;31: *. taz=01;31:* Izh=01;31:* zip=01;31:* z=01;31:* Z=01;31:* gz=01;31:* bz2=01;31: *. bz=01;31tz=01;31rpm

6、=01;31cpio=01;31:*. jpg=01;35:*. gif=01;35:*. bmp=01 ;35:*. xbm=01;35:*. xpm=01;35:png=01;35:t i f=01;35:ORACLE.SID二ORCLORACLE_BASE=/mydatafi Ie2/app/oracleMAIL=/var/spool/mai I/oraclePATH二/usr/kerberos/bi n:/usr/1 ocal/bin:/bin:/usr/b in:/usr/X11R6/bin:/home/oracle /bin:/mydataf iIe2/app/oracIe/ora

7、cIe/product/10. 2. 0/db_1/binINPUTRC=/etc/inputrcPWD二/home/oracIeLANG二en_US UTF-8LAMHELPFILE=/etc/lam/Iam-heIpfiIeSSH_ASKPASS=/us r/1i bexec/openssh/gnome-ssh-askpassSHLVL=1HOME二/home/oracIeLOGNAME=oracIeLESSOPEN=|/usr/b i n/1essp i pe. sh %sORACLE_HOME=/mydataf i Ie2/app/oracIe/oracIe/product/10. 2

8、. 0/db_1 G_BR0KEN_FILENAMES=1_=/b i n/envoracIeguohui6 oracle$注意:LD_LI BRARY_PATH变量的设莊，PATH环境变量的设饪PATH=/usr/kerberos/bin：/usr/Iocal/bin：/bin：/usr/bin：/usr/X11R6/bin：/home/oracIe/bin:/mydatafiIe2/app/or acle/oracle/product/10. 2. 0/db_1/bi nLD_LIBRARY_PATH=/mydataf iIe2/app/oracIe/oracIe/product/10.

9、2. 0/db_1/lib:/usr/lib:/usr/local/lib如果设莊得不对，将无确的调用proc预编译工具，也无确的proc预编译需妥使用的头文件。确保数据库连接和tnsnames. ora, I istener. ora丈件的正确配j。（这里就不再多说了！） 代码oracleguohui6 oracle$ sqlplus scott/tigerorclSQL*Plus: Release 10. 2. 0. 1.0 一 Production on Mon Jul 5 01:16:36 2010页脚Copyr ight (c) 1982, 2005, Oracle. Al I r

10、ights reserved.Connected to:Oracle Database 10g Enterpr i se Edition Release 10. 2. 0.1.0 - ProductionWith the Partitioning, OLAP and Data Mining optionsSQL我们将用scott用户对数据库进行连接并查找表里面的数据。代码main, pc如下代码#include #i ncIudestr i ngh #include #inc Iude int main(intargc, char* argv)EXEC SQL BEGIN DECLARE SE

11、CT I ON；char *uid = Hscott/1igerORCL;long user id=0;char username51=;EXEC SQL VAR username IS STRING(51);EXEC SQL END DECLARE SECTION;EXEC SQL CONNECT :uid;if (sqlca.sqlcode = 0)pr i rrtf (Mconnect sucess! nM);pr i ntf (connect fail!rT);EXEC SQL DECLARE cur_user CURSOR FOR SELECT DEPTNO, DNAME FROM

12、DEPT;EXEC SQL OPEN cur_user;whi le(1) user id=0;strcpy (username,”);EXEC SQL FETCH cur_user INTO :user id, :username; if( sqlca.sqlcode = 1403) break;页脚pr intf(user id二Id, username二sn,user id,username);EXEC SQL CLOSE cur_user;/ EXEC SQL COMM IT WORK RELEASE;EXEC SQL ROLLBACK WORK RELEASE;return 0;这里

13、用scott用户对数据库发起连接，并查询dept表中的数据并打印出来。第一步：预編译代码oracleguohui6 proc_code$ proc ma in. pcPro*C/C+: Release 10. 2. 0. 1.0 - Product ion on Mon Jul 5 01:27:37 2010Copyr ight (c) 1982, 2005, Oracle. Al I r ights reserved.SystemdefauItoptionvaluestakenfrom:/mydatafi Ie2/app/oracle/oracle/product/10 2. 0/db_1/

14、precomp/admin/pcscfg cfgoracleguohui6 proc_code$第二步：编译预编译生成的文件main.coracleguohui6 proccodeS gcc -o tespproc main, c -I $0RACLE_H0ME/precomp/public -L $ORACLE_HOME/1ib -I clntshoracleguohui6 proc_code$渕试执行代码oracleguohui6 proc_code$ /tespprocconnect sucess!页脚 user i d=50, username二SUPPORT user id=10, username=ACCOUNTI NG user i d=20, username二RESEARCH user id=30,username二SALESuser i