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

本文涉及的产品
RDS SQL Server Serverless,2-4RCU 50GB 3个月
推荐场景:
云数据库 RDS SQL Server,基础系列 2核4GB
简介:

本节书摘来自异步社区出版社《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.orghttp://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.php
Learning 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所示。
image

就快速地整合数据驱动的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代码操作,就像在关系数据库一样。
幸运或不幸的是,我无法在本书覆盖所有的主题。

相关实践学习
使用SQL语句管理索引
本次实验主要介绍如何在RDS-SQLServer数据库中,使用SQL语句管理索引。
SQL Server on Linux入门教程
SQL Server数据库一直只提供Windows下的版本。2016年微软宣布推出可运行在Linux系统下的SQL Server数据库,该版本目前还是早期预览版本。本课程主要介绍SQLServer On Linux的基本知识。 相关的阿里云产品:云数据库RDS&nbsp;SQL Server版 RDS SQL Server不仅拥有高可用架构和任意时间点的数据恢复功能,强力支撑各种企业应用,同时也包含了微软的License费用,减少额外支出。 了解产品详情:&nbsp;https://www.aliyun.com/product/rds/sqlserver
相关文章
|
13天前
|
SQL Oracle 关系型数据库
如何在 Oracle 中配置和使用 SQL Profiles 来优化查询性能?
在 Oracle 数据库中,SQL Profiles 是优化查询性能的工具,通过提供额外统计信息帮助生成更有效的执行计划。配置和使用步骤包括:1. 启用自动 SQL 调优;2. 手动创建 SQL Profile,涉及收集、执行调优任务、查看报告及应用建议;3. 验证效果;4. 使用 `DBA_SQL_PROFILES` 视图管理 Profile。
|
4月前
|
SQL Oracle 关系型数据库
SQL语言的主要标准及其应用技巧
SQL(Structured Query Language)是数据库领域的标准语言,广泛应用于各种数据库管理系统(DBMS)中,如MySQL、Oracle、SQL Server等
124 9
|
4月前
|
SQL 关系型数据库 MySQL
Go语言项目高效对接SQL数据库:实践技巧与方法
在Go语言项目中,与SQL数据库进行对接是一项基础且重要的任务
126 11
|
4月前
|
SQL 监控 Oracle
Oracle SQL性能优化全面指南
在数据库管理领域,Oracle SQL性能优化是确保数据库高效运行和数据查询速度的关键
|
4月前
|
SQL 存储 Oracle
Oracle数据库SQL语句详解与应用指南
在数字化时代,数据库已成为各类企业和组织不可或缺的核心组件。Oracle数据库作为业界领先的数据库管理系统之一,广泛应用于各种业务场景。掌握Oracle数据库的SQL语句是数据库管理员、开发人员及运维人员的基本技能。本文将详细介绍Oracle数据库SQL语句的基本概念、语法、应用及最佳实践。一、Or
125 3
|
4月前
|
SQL Oracle 关系型数据库
Oracle SQL:了解执行计划和性能调优
Oracle SQL:了解执行计划和性能调优
116 1
|
6月前
|
SQL 关系型数据库 MySQL
|
6月前
|
SQL 存储 大数据
SQL 语言发展史简直太震撼啦!从诞生到现代数据处理,见证一场奇妙的演变之旅,快来感受!
【8月更文挑战第31天】SQL(结构化查询语言)自20世纪70年代由IBM研究员E.F. Codd提出以来,已成为现代数据处理不可或缺的一部分。它最初简化了层次和网状模型中复杂的存储与检索问题,通过基本的SELECT、FROM和WHERE关键字实现了数据查询。80年代,SQL在商业数据库中广泛应用,引入了GROUP BY、HAVING和ORDER BY等功能,增强了数据分析能力。90年代,互联网和企业信息化推动了SQL的进一步优化与扩展,支持分布式数据库和数据仓库等技术。
123 0
|
存储 SQL 关系型数据库
PostgreSQL 10.1 手册_部分 II. SQL 语言_第 12 章 全文搜索_12.9. GIN 和 GiST 索引类型
12.9. GIN 和 GiST 索引类型 有两种索引可以被用来加速全文搜索。注意全文搜索并非一定需要索引,但是在一个定期会被搜索的列上,通常需要有一个索引。 CREATE INDEX name ON table USING GIN(column); 创建一个基于 GIN(通用倒排索引)的索引。
1644 0
|
SQL 关系型数据库 PostgreSQL
PostgreSQL 10.1 手册_部分 II. SQL 语言_第 11 章 索引_11.2. 索引类型
11.2. 索引类型 PostgreSQL提供了多种索引类型: B-tree、Hash、GiST、SP-GiST 、GIN 和 BRIN。每一种索引类型使用了 一种不同的算法来适应不同类型的查询。
1389 0

推荐镜像

更多