[轉]ORACLE的ProC用法講解


 

 pro*c是高級的用法,OCI是oracle的基礎用法

如何編譯.pc文件: proc code=cpp  parse=none iname=filename.pc oname=filename.cpp

一, 首先要包涵頭文件#include 這個頭文件

二,  在聲明宿主變量之前一定要先定義struct sqlca sqlca;這個變量。

三, 所有與oracle數據庫SQL語句有關的變量必須在前面聲明為宿主變量分配空間才可以使用,

宿主變量只能是oracle支持的數據類型,一般是基本類型的,結構體類型。只有宿主變量才可以和SQL還有函數中的其他變量之間相互通信。

例子:

 EXEC SQL BEGIN DECLARE SECTION; //開始申明
 char strsql[512]={0};

 EXEC SQL END DECLARE SECTION;   //結束申明

 

四,靜態SQL語句之查一條記錄的模式,通過宿主變量接收申sql語句所查到的結果

 舉例:INTO :TotalRecord, :TotalMoney ,接收結果,proc中用:綁定變量

EXEC SQL  select count(B.msisdn) ,sum(B.payamount)
     INTO :TotalRecord, :TotalMoney
     from OM_MPAY_USER_INFO A , OM_MPAY B
      WHERE  A.msisdn = B.msisdn and A.region=trim(:areacode)  and B.pay_date = :sqltime;

 

五,查詢多條記錄一般我們使用動態SQL語句,結合游標來收集多條記錄的結果,其次要注意的是循環得到結構。

舉例:sprintf(strsql,"select *from mytable ")

    EXEC SQL PREPARE SqlCountRegion FROM :strsql; //或者活動區
    EXEC SQL DECLARE CurRegion CURSOR FOR SqlCountRegion; //對活動區申請游標
    EXEC SQL OPEN CurRegion;  //打開游標,打開游標的同時可以用using對其賦值

   do{
        EXEC SQL FETCH CurRegion INTO :regionnum ; //循環捕捉游標中變量的值
        if (sqlca.sqlcode ==1403) 

          break;
        cout<<regionnum<<endl;

 }while(1);

 EXEC SQL CLOSE CurRegion; //關閉游標
 EXEC SQL rollback work release; //回滾數據關閉釋放所有資源和鏈接

 

六,捕捉異常錯誤和停止程序

//下面的意思是發生錯誤異常的時候跳轉到標記處執行標記后面的語句

EXEC SQL whenever sqlerror  goto errinfo;

errinfo:
 printf("   sqlca.sqlcode=%d, sqlca.errm=%s\n",sqlca.sqlcode, sqlca.sqlerrd);

 EXEC SQL  whenever sqlerror stop; //發生異常的時候推出整個程序,關閉所有連接釋放所有資源

  return sqlca.sqlcode;

 

七, proc中的SQL語句不要加分號(;) ,注釋如果是C++工程使用如果是C++使用//或者,在oracle中的注釋是--,   oracle數據庫中的數據如果數據字節不足位數,默認用空格補全,宿主變量的空間要大於數據庫的字段空間。

對於結構的特殊含義處理:sqlca.sqlcode ==1403 表示結束了查找循環,這個在動態sql語句中比較重要,

sqlca.sqlcode == -1405 表示查詢值為空的時候報的錯誤,這個最好留給返回值待程序處理,

sqlca.sqlcode == -1480 表示在sql語句中傳入的變量時空值一般就是傳值失敗,可能是空間的大小問題。

 

八, 關於Proc中特殊的SQL語句,如,delete ,update,alter,insert into 等數據變動性操作的時候,

要注意2點,可以再宿主變量區申請復雜的結構類型的指針,用指針將參數外部的數據綁定到sql語句中,接下來就是提交事物,操作完變動性數據之后就是commint提交事物,進行回滾。

例子:

int GetDBRecode( struct buf * tempbuf)

{

EXEC SQL BEGIN DECLARE SECTION; //開始申明
 char strsql[512]={0};

 struct buf * temp=  tempbuf;

 EXEC SQL END DECLARE SECTION;   //結束申明

 exec sql insert into mytable( name, sex, num)values( :temp->name, :temp->sex, :temp->num)

if( sqlca.sqlcode  )

{

       printf("判斷是否執行成功");

}

}

 

                             例子講解

//#include
//#include

//#include"CssCheckBill.h"

//#include

int main()

{

struct sqlca sqlca; //必須要有
 EXEC SQL BEGIN DECLARE SECTION;
 char strsql[512]={0};
 char user[20]={0};
 char pwd[20] ={0};
 char dbname[20]={0};
 char regionnum[7];

 char TotalMoney[15]={0};

 char  TotalRecord[15]={0};
 EXEC SQL END DECLARE SECTION;

 

strcpy(user,"user");
 strcpy(pwd,"pwd");
 strcpy(dbname,"dbname");
 //這句是連接數據庫的操作
 EXEC SQL CONNECT :user IDENTIFIED BY :pwd USING :dbname;

 

EXEC SQL  select count(B.msisdn) ,sum(B.payamount)
     INTO :TotalRecord, :TotalMoney   //INTO綁定變量
     from OM_MPAY_USER_INFO A , OM_MPAY B
      WHERE  A.msisdn = B.msisdn and A.region=trim(:areacode)  and B.pay_date = :sqltime;

//設置捕獲異常信息標志
 EXEC SQL  whenever sqlerror goto ORA_ERR;
 if(0 >=  ::snprintf(strsql,sizeof(strsql), "select distinct(region) from OM_MPAY_USER_INFO where region is not null" ))
 {
  printf("%s snprintf  create sql  fail !\n", __FUNCTION__);
         return -1;
 }

//動態游標方式獲取查詢結果
 EXEC SQL PREPARE SqlCountRegion FROM :strsql;
  EXEC SQL DECLARE CurRegion CURSOR FOR SqlCountRegion; //CURSOR FOR 可以直接跟SQL語句
 EXEC SQL OPEN CurRegion;

 do{
  EXEC SQL FETCH CurRegion INTO :regionnum ;
  if (sqlca.sqlcode ==1403
        break;
  printf("regionnum=%s,   len=%d\n",regionnum, strlen(regionnum));
    DelStrRightBlack( regionnum );

 }while(1);

//關閉異常捕獲信息

 EXEC SQL  whenever sqlerror stop;
 EXEC SQL CLOSE
 CurRegion;

//設置回滾事物
 EXEC SQL rollback work release;
 return sqlca.sqlcode;
ORA_ERR:
 printf("sqlca.sqlcode=%d, sqlca.sqlerrp=%s\n",sqlca.sqlcode, sqlca.sqlerrp);
 return sqlca.sqlcode;

return 0 ;

}
總結了一下PRO*C中存儲過程調用,普通SQL語句游標執行,動態SQL語句游標執行的方法;

PRO*C中常用SQL及游標、存儲過程使用匯總:

1) exec sql select c1,c2 into :v1,v2 from table_a;

2) exec sql insert into table_a(v1,v2) select b.v1,b.v2 from table_b b where 1=2;

3) exec sql insert into table_a(v1,v2) select b.v1,b.v2 from table_b b where 1=2;

存儲過程調用
4) exec sql call procedure_a(:v1,:v2);
5) sprintf(sta,"select v1,v2 into :v1,v2 from table_a where v3=%s",v3);
exec sql execute immediate :sta;

--普通SQL語句游標執行
6)exec sql declare cur1 cursor for
select v1,v2,v3 from table_a where 1=2;
exec sql open cur1;
do{
exec sql fetch cur1 into :v1,:v2,:v3;
if(sqlca.sqlcode==-1403) break;
....

}while(1) ;
exec sql close cur1;

--動態SQL語句游標執行
7)> sprintf(sta,"select c1,c2,c3 from table_a where c1=%s and c2=:v1 and c3=:v2",v1);
exec sql prepare select_msg from :sta;
exec sql declare cur1 cursor for select_msg;
exec sql open cur1 using :v1,:v2; //打開游標的時候使用using來傳迪綁定的變量
do{
exec sql fetch cur1 into :c1,:c2,:c3;
if(sqlca.sqlcode==1403)break;
....
}while(1);
exec sql close cur1;

 

其他情況的proc講解

Pro*C/C++編程講解:

1、宿主變量的聲明

  在PROC中,在SQL語句中用到的變量稱為宿主變量。他們應在EXEC SQL BEGIN DECLARE SECTION;與EXEC SQL EDN DECLARE SECTION; 之間聲明,如上面所示,在聲明宿主變量時應注意以下幾點:


  (1) 在數據庫表中定義為VARCHAR2,VARCHAR,CHAR的字段,在PROC中可聲明為CHAR,但長度應為它們在表中定義的長度加1,因為PROC中CHAR型變量用做結尾。

  如:ENAME在表中的定義為ename varchar2(10),在PROC中可定義為:

  EXEC SQL BEGIN DECLARE SECTION;

  char ename[11];

  EXEC SQL END DECLARE SECTION;

  常見錯誤說明:

  如果插入的字符串長度大於10,如:EXEC SQL INSERT INTO EMP(ENAME) VALUES(‘12345678901’);會出現以下錯誤:

  error:ORA-01480: STR 賦值變量缺少空后綴。

  如果定義為:

  EXEC SQL BEGIN DECLARE SECTION;

  char ename[15];

  EXEC SQL END DECLARE SECTION;

  當插入的字符串長度大於10,小於15時,如:EXEC SQL INSERT INTO EMP(ENAME) VALUES(‘12345678901’);會出現以下錯誤:

  error:ORA-01401: 插入的值對於列過大。

  當插入的字符串長度大於15,如:EXEC SQL INSERT INTO EMP(ENAME) VALUES('12345678901234');會出現以下錯誤:

  error:ORA-01401:STR 賦值變量缺少空后綴。


  (2) 從SQL語句中取字段的值到宿主變量中時,PROC不會自動給宿主變量去掉右空格。而是以在DECLARE SECTION 中定義的長度為准(與 表中定義的無關)不足補右空格.如果不注意這一點,在PROC中進行字符串操作時(如比較相等)會出錯。如:

  EXEC SQL BEGIN DECLARE SECTION;

  char ename[10];

  EXEC SQL END DECLARE SECTION;

  如果ENAME在表中的值為''abc'',則取出的值為''abc '';

  可用語句EXEC SQL VAR重定義CHAR型變量。這樣宿主變量會自動去掉右空格。如下:

  EXEC SQL BEGIN DECLARE SECTION;

  char ename[11];

  EXEC SQL VAR ac_ename IS STRING(11);

  EXEC SQL END DECLARE SECTION;

  如果ENAME在表中的值為''abc'',則取出的值為''abc'';


  (3) 對浮點型的變量,為保證精度,最好是聲明成DOUBLE型的.因為DOUBLE型的精度比FLOAT型高很多.

  (4) 整型可聲明為LONG型(對較長的整型,而且所用的平台支持的話,如在SUN平台上,可聲明為LONG LONG型).


  (5) DATE型的處理:DATE型一般聲明為CHAR(20)。


  往表中插入DATE型數據時,一般用TO_DATE()函數進行類型轉換,取出值時一般用TO_CHAR()函數進行類型轉換.

  EXEC SQL select to_char(hiredate,''yyyy/mm/dd hh24:mi:ss'') into :ac_hire_date from EMP where empno=1234;

  EXEC SQL insert into EMP(EMPNO,HIREDATE) values(123,to_date(:ac_hiredate,''yyyy/mm/dd hh24:mi:ss'');


2、宿主變量的作用范圍

  如果宿主變量在所有的函數之外聲明,則他們是全局變量。在使用之前要注意把變量的值初始化,宿主變量也可以在某個函數的內部定義。這時他們是局部變量。一般都習慣把宿主變量聲明為全局變量。


3、數據庫的連接與斷開

  數據庫的連接有以下兩種方法:

  (1)

  strcpy(vc_user.arr,"scott/tiger");

  vc_user.len=11;

  exec sql connect :vc_user;

  (2)

  strcpy(user,"scott");

  strcpy(pass,"tiger");

  exec sql connect :user identified by :pass;

  注意:在有些平台上兩種都可以,在有些平台上只能用第一種方法.

  在PROC程序中,要記住用EXEC SQL ROLLBACK WORK RELEASE;斷開與數據庫的連接,並釋放相關的數據庫資源。

4、PROC中的NULL值的處理

  如果某一字段取出的值是NULL,會報:sqlcode=-1405, sqlerr=ORA-01405: 讀取的列值為 NULL並且相應的宿主變量的值不會被改變,為執行該SQL語句之前的值. 常用的處理NULL值的方法有:

  (1)采用指示器變量,此時不會有-1405錯誤,當必須是所以為NULL的字段都有相應的指示器變量,如果某一字段沒有指示器變量,但取出的值為NULL值,則仍然會有-1405錯誤.當取出的值是NULL時,相應的指示器變量變量為-1,可根據指示器變量的值做響應的處理。


  (2)如果字段較多,可取字段到一個結構體中及與該結構體對應的指示器結構體中.如上面的例子中可定義結構體:

  struct str_emp{

  long al_empno;

  char ac_ename;

  char ac_hiredate;

  double af_sal;

  };

  struct str_emp_ind{

  long al_empno;

  char ac_ename;

  char ac_hiredate;

  double af_sal;

  };


  struct str_emp str_emp;

  strcut str_emp_ind str_emp_ind;


  在取之前可用memset(&str_emp,0,sizeof(str_emp)).清空該結構體,這樣如果是字符型的NULL,會為"",整型的NULL會為0,

  浮點型的會為0.00。此時不會有-1405錯誤。

  (3)也可采用NVL()函數:舉例如下:

  EXEC SQL DECLARE authors CURSOR FOR

  SELECT EMPNO, NVL(ENAME,chr(0)),nvl(to_char(HIREDATE,''yyyy/mm/dd hh24:mi:ss''),chr(0)),NVL(SAL,0) FROM EMP;

  這樣也不會有-1405錯誤不,當取出的值是NULL時,自動用NVL()中指定的值代替.

  CHR(0)也可直接用''''代替,如下:

  SELECT EMPNO, NVL(ENAME,''''),nvl(to_char(HIREDATE,''yyyy/mm/dd hh24:mi:ss''),''''),NVL(SAL,0) FROM EMP;

5、PROC中的錯誤的處理

  所有的SQL語句都有可能出錯.所以都要加以判斷,但每個SQL語句后都加錯誤判斷,太麻煩,可用一個函數如sql_error()來進行錯誤處理,


  方法:

  (1)定義ql_error()函數。

   (2)在開頭加上EXEC SQL WHENEVER SQLERROR DO sql_error();這樣當發生sqlca.sqlcode <0 的錯誤時,程序自動轉到sql_error()中執行. 注意:對sqlca.sqlcode >0的錯誤如 sqlca.sqlcode =1403 是不會轉到sql_error()中執行的.

  另外:在UNIX下,可以用OERR 來查找錯誤的描述。如: ora ORA -1405 查找錯誤號為-1405的描述.

  

6、PROC中調用存儲過程的方法

  要把存儲過程放在EXEC SQL EXECUTE 和 END-EXEC;之間,如下所示:

  

  其中:al_empno,ac_ename 為輸入參數,l_return,l_errno,c_errtext 為輸出參數。

  al_empno=8888;

  strcpy(ac_ename,"ABCD");

  EXEC SQL EXECUTE

  BEGIN

  up_db_emp(:al_empno,:ac_ename,:l_return,:l_errno,:c_errtext);

  END;

  END-EXEC;

  if (l_return != 0)

  {

  printf("調用UP_PB_EMP存儲過程出錯,errno=%ld,errtext=%sn",l_errno,c_errtext);

  }

  

7、PROC的命令行選項:PROC編譯器有很多的命令行選項,在命令行下直接不帶參數運行PROC,會列出所有的命令行選項來,並有說明。

  (1)儲存過程:編譯儲存過程是要帶上用戶名及密碼

 proc USERID=scott/tiger sqlcheck=SEMANTICS ireclen=512 iname=test.cpp

  (2)PARSE=NONE 對非SQL代碼不進行語法分析,默認對非SQL代碼也進行語法分析.

  在RED HAD6.3上的ORACLE8.1.5中用PROC時,會提示:/USR/INCLUDE/STDIO.H 及其他的.H文件中有錯. 可把PARSE=NONE加上,就好了.


8、注意加上:EXEC ORACLE OPTION (RELEASE_CURSOR = YES);

  RELEASE_CURSOR=YES 使PROC 在執行完后釋放與嵌入SQL有關資源,保證在該PROC程序執行完后,ORACLE不會鎖住數據庫資源,如鎖表等。


  如果在PROC中用到ORACA,還要在程序頭加上:

  EXEC ORACLE OPTION (ORACA=YES);

 

 

原文地址:http://blog.sina.com.cn/s/blog_9b0604b40101kueq.html


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM