《Oracle PLSQL程序设计(第5版)》一一2.6 在其他语言中调用PLSQL

    xiaoxiao2023-09-07  157

    本节书摘来自异步社区出版社《Oracle PL/SQL程序设计(第5版)》一书中的第2章,第2.6节,作者:【美】Steven Feuerstein , Bill Pribyl,更多章节内容可以访问云栖社区“异步社区”公众号查看。

    2.6 在其他语言中调用PL/SQL

    Oracle PL/SQL程序设计(第5版)总有一天,你会在从C、Java、Perl、PHP或其他语言中调用PL/SQL。虽然这是一个很合理的需求,如果你曾经做过跨语言的开发工作,你一定熟知要把各种语言专有的数据类型糅合在一起─尤其是那些复合数据类型,比如数组、记录或者对象类型─的复杂性,更不用说不同的参数语法或者厂商对所谓“标准”应用编程接口(API)的扩展,比如微软的ODBC(Open Database Connectivity)。

    我会用几个简短的例子演示一下如何从外部调用PL/SQL程序。假设我写一个PL/SQL函数,这个函数接收一个字符串类型的ISBN参数,然后返回对应的图书名称:

    /* File on web: booktitle.fun */ FUNCTION booktitle (isbn_in IN VARCHAR2)   RETURN VARCHAR2 IS   l_title books.title%TYPE;   CURSOR icur IS SELECT title FROM books WHERE isbn = isbn_in; BEGIN   OPEN icur;   FETCH icur INTO l_title;   CLOSE icur;   RETURN l_title; END;

    如果是在SQL/Plus中,我可以用好几种方法来调用它,最短代码的方式可能是这样的:

    SQL> EXEC DBMS_OUTPUT.PUT_LINE(booktitle('0-596-00180-0')) Learning Oracle PL/SQL PL/SQL procedure successfully completed.

    接下来看该如何在下面这些环境中调用这个函数:

    C语言、使用Oracle的Pro*C;Java语言,使用JDBC;Perl,使用Perl DBI和DBD::Oracle;PHP;PL/SQL Server Pages。这些例子纯粹是演示性的——比如,用户名和密码都是硬编码的,程序也仅仅是显示输出。而且,我也不会解释每一行代码。这些例子只是要让你了解,不同的语言环境中会遇到的问题模式。

    2.6.1 C:使用Oracle的预编译器(Pro*C)

    Oracle至少提供了两种不同的C语言接口:一个叫做OCI(Oracle Call Interface),这主要是科学家的领域,另一个就是ProC。OCI提供了上百个函数,就算只是一个SQL查询请求,也需要编写像打开、解析、绑定、定义、执行、提取结果等这些低层次的代码。即便是最简单的OCI程序也需要近200行长的代码,我还是演示一个ProC的例子吧。Pro*C是一个预编译的技术,你可以编写一个同时包括C、SQL、PL/SQL的混合源代码文件。通过在Oracle的proc程序中运行下面代码,输出的是C代码。

    /* File on web: callbooktitle.pc */ #include <stdio.h> #include <string.h> EXEC SQL BEGIN DECLARE SECTION;    VARCHAR uid[20];    VARCHAR pwd[20];    VARCHAR isbn[15];    VARCHAR btitle[400]; EXEC SQL END DECLARE SECTION; EXEC SQL INCLUDE SQLCA.H; int sqlerror(); int main() {    /* VARCHARs actually become a struct of a char array and a length */    strcpy((char *)uid.arr,"scott");    uid.len = (short) strlen((char *)uid.arr);    strcpy((char *)pwd.arr,"tiger");    pwd.len = (short) strlen((char *)pwd.arr);    /* this is a cross between an exception and a goto */    EXEC SQL WHENEVER SQLERROR DO sqlerror();    /* connect and then execute the function */    EXEC SQL CONNECT :uid IDENTIFIED BY :pwd;    EXEC SQL EXECUTE       BEGIN          :btitle := booktitle('0-596-00180-0');       END;    END-EXEC;    /* show me the money */    printf("%s\n", btitle.arr);    /* Disconnect from ORACLE. */    EXEC SQL COMMIT WORK RELEASE;    exit(0); } sqlerror() {    EXEC SQL WHENEVER SQLERROR CONTINUE;    printf("\n% .70s \n", sqlca.sqlerrm.sqlerrmc);    EXEC SQL ROLLBACK WORK RELEASE;    exit(1); }

    正像你看到的那样,ProC并不是一个追求纯粹的语言家所支持的,你也不想和这种方式生成的C代码搅合在一起。然而,很多企业发现ProC(或者像Pro*Cobol等Oracle支持的语言)是位于像Visual Basic(太笨重和缓慢的一个语言)和OCI(太难了)中间的一个比较合适的选择。

    从Oracle自己的文档中,可以找到关于Pro*C的最好信息。

    2.6.2 Java:使用JDBC

    就像对C语言一样,Oracle对于Java开发也提供了几种连接到数据库的方法。其中嵌入的SQL方法叫做SQLJ,和Oracle的其他预编译技术类似,是调试器友好的。另一种更流行的和专门针对Java的技术叫做JDBC,名字其实不能代表任何东西,不过经常被解释成“Java Database Connectivity”。

    /* File on web: Book.java */ import java.sql.*; public class Book {   public static void main(String[] args) throws SQLException   {   //初始化驱动,然后尝试创建一个连接   DriverManager.registerDriver (new oracle.jdbc.driver.OracleDriver ());   Connection conn =     DriverManager.getConnection("jdbc:oracle:thin:@localhost:1521:o92",                   "scott", "tiger");     // prepareCall中使用了ANSI92的“call”语法     CallableStatement cstmt = conn.prepareCall("{? = call booktitle(?)}");     // 设置绑定变量和参数     cstmt.registerOutParameter(1, Types.VARCHAR);     cstmt.setString(2, "0-596-00180-0");     // 现在执行语句,得到结果,关闭连接,打印结果     cstmt.executeUpdate();     String bookTitle = cstmt.getString(1);     conn.close();     System.out.println(bookTitle);   } }

    这个例子使用的是瘦驱动(Thin Driver),这种驱动除了有些通讯性能上有些开销外,还是有很好的兼容性和易于安装的(在Java的库中已经包括了所有网络协议)。另一种方法是使用OCI驱动,不过别担心,还没有那些编程需要用到它,除了它的名字。

    2.6.3 Perl:使用Perl DBI和DBD::Oracle

    Perl可以说是所有开源语言之母,也是许多系统管理社区最偏爱的。现在的版本是5.10,基本上它可以完成任何任务,可以在任何地方运行。并且它有一个漂亮的自动配置工具CPAN(Comprehensive Perl Archive Network),它是社区提供的模块的安装纽带,比如DBI(DataBase Interface)和对应的Oracle驱动DBD::Oracle。

    /* File on web: callbooktitle.pl */ #!/usr/bin/perl use strict; use DBI qw(:sql_types); # either make the connection or die my $dbh = DBI->connect(    'dbi:Oracle:o92',    'scott',    'tiger',    {       RaiseError => 1,       AutoCommit => 0    } ) || die "Database connection not made: $DBI::errstr"; my $retval; # make parse call to Oracle, get statement handle eval {    my $func = $dbh->prepare(q{       BEGIN           :retval := booktitle(isbn_in => :bind1);       END;    }); # bind the parameters and execute    $func->bind_param(":bind1", "0-596-00180-0");    $func->bind_param_inout(":retval", \$retval, SQL_VARCHAR);    $func->execute; }; if( $@ ) {    warn "Execution of stored procedure failed: $DBI::errstr\n";    $dbh->rollback; } else {   print "Stored procedure returned: $retval\n"; } # don't forget to disconnect $dbh->disconnect;

    Perl属于那种为了追求简单,不惜牺牲阅读性的语言。Perl不是一个特别快速和小巧的语言,不过还是有些编译版本至少能够解决速度的问题。

    更多关于Perl和Oracle的信息,可以参考Alligator Descartes的Programming the Perl DBI(O’Reilly出品)。还有许多关于Perl语言优秀的书籍,包括在线信息http://www.perl.com(一个属于O’Reilly的站点)、http://www.perl.org和http://www.cpan.org。

    2.6.4 PHP:使用Oracle扩展

    如果你属于使用免费的并且广为流行的Web服务器Apache一族,你可能也会乐意使用同样免费并且广为流行的编程语言PHP。PHP除了可以用于构建动态网页,也可以用于构建GUI应用,或者命令行方式的程序。正如你所期待的,Oracle是可以和PHP一起工作的数据库之一。实际上Oracle公司是Zend的合作伙伴,以提供一个带有PHP的Oracle数据库发行版1。

    下面的例子使用了PHP中被称作OCI8的函数家族,不要让这个名字中的8把你愚弄了,其实它可以和从Oracle 7到Oracle 11g的各个版本一起工作。

    /* File on web: callbooktitle.php */ <?PHP    // Initiate the connection to the o92 database    $conn = OCILogon ("scott", "tiger", "o92");    // Make parse call to Oracle, get statement identity    $stmt = OCIParse($conn,       "begin :res := booktitle('0-596-00180-0'); end;");    // Show any errors    if (!$stmt) {       $err = OCIError();       echo "Oops, you broke it: ".$err["message"];       exit;    }    // Bind 200 characters of the variable $result to placeholder :res    OCIBindByName($stmt, "res", &$result, 200);    // Execute    OCIExecute($stmt);    // Stuff the value into the variable    OCIResult($stmt,$result);    // Display on stdout    echo "$result\n";    // Relax    OCILogoff($conn); ?>

    要在命令行运行这个命令,应该这样:

    **$ php callbooktitle.phpLearning Oracle PL/SQL**需要说明的是,缺省情况下这些OCI函数在PHP中是没有的,不过让系统管理员重构一个带有Oracle扩展的PHP并不困难。

    更多关于PHP的信息,请看http://www.php.net或者随便一本Oracle出版的关于这个主题的图书。关于PHP针对Oracle的技巧,请访问Oracle Technology Network网站(http://otn.oracle.cm)。

    2.6.5 PL/SQL Server Pages

    尽管PL/SQL Server Pages(PSP)环境是Oracle专有的,我觉得还是应该提一下,因为这是一个快速的运行Web页面的方法。PSP是另一种预编译技术,它让你可以在HTML页面中嵌入PL/SQL代码。

    /* File on web: favorite_plsql_book.psp */ <%@ page language="PL/SQL" %> <%@ plsql procedure="favorite_plsql_book" %> <HTML>   <HEAD>     <TITLE>My favorite book about PL/SQL</TITLE>   </HEAD>   <BODY>     <%= booktitle( '0-596-00180-0') %>   </BODY> </HTML>

    <%= %>块意味着“把这一部分当作PL/SQL代码处理,然后把结果返回给页面”。如果正确的安装到Web服务器上并连接到Oracle数据库,这个页面的效果如图2-3所示。

    就快速地整合数据驱动的Web站点而言,PL/SQL Server Pages提供了一个好方法,这一点也是我喜欢它的原因。

    要了解更多有关PL/SQL Server Pages的信息,参看Learning Oracle PL/SQL(O’Reilly出版),也是由本书作者所著。

    2.6.6 其他

    你已经看到如何在SQL*Plus以及其他的一些常见环境、编程语言中使用PL/SQL了。你还可以在许多其他地方和方式使用PL/SQL。

    嵌入到COBOL或者FORTRAN,并用Oracle的预编译处理。在Visual Basic中通过某种ODBC调用。从Ada编程语言中通过一种叫做SQL*Module的技术调用。作为Oracle数据库的事件触发器自动执行,比如当表被更新时自动执行。在数据库内部,利用DBMS_SCHEDULER包定期重复执行。TimesTen数据库:Oracle公司收购的一个内存数据库产品。其内容也可以通过PL/SQL代码操作,就像在关系数据库一样。幸运或不幸的是,我无法在本书覆盖所有的主题。

    相关资源:ORACLE PLSQL程序设计
    最新回复(0)