INFORMIX-4GL实用手册（四）(1)

来源：pcdog.com整理 作者： 出处：综艺读书 2006-03-13 

关 键 词：数据库  服务器  存储  powerbuilder  os  

下一页 1 2 3 

Informix-SPL(过程)语法详解

Informix数据库用户一般都熟悉的使用SQL语句进行简单的查询和统计，而在Informix-Online的数据库服务器中提供了用结构化查询语言SQL语句和流程控制存储语言SPL创建存储例程，以减少Informix的处理。存储例程是SQL语句和SPL的集合。它们存放在数据库中，SQL语句会被分析.优化,在例程的执行中,高速缓存中会有一执行规划,使后续操作的执行速度很快。而单独的SQL语句只有在执行时才会被优化，并且存储例程可以被不同的开发工具调用（4GL、ESQL/C、POWERBUILDER.DELPHI），在SELECT语句中也调用过程。例程调试简单，不必重新编译应有软件包。在例程创建时Informix查询处理器会分析它，并产生一执行规划，永久存放于SPROCEDURES.SYSPROBODY.和SYSPROPLAN中,其后例程按此规划执行,由于大部分查询处理已经完成,存储例程可以在瞬间执行完毕。由于存储例程所具有的优越性，它已成为进行Informix数据库核心开发的有力工具，掌握它对Informix的开发人员有积极意义，现将我在实际工作中使用的语法和例子详解于下,疏漏和错误请来信指教。

1.创建和执行例程

①.创建例程语法：

CRAETEPROCEDURE[OWNER.]PROCEDURE_NAME(参数1参数类型=[DEFAULT],参数2参数类型=[DEFAULT],参数n参数类型=[DEFAULT])

RETURNING值1类型,值2类型,值n类型；

<......>语句体；ENDRPOCEDURE

例程大小不可超过64K,这包括所有的SQL.SPL.空格.跳格符,例程名最多18个字符,并在数据库中唯一存在,语句间用";"分隔,例程只能在当前数据库中创建,例程创建后是一标准

执行模板块，可在不同的应有中对其调用,这对开发不同版本的应用将更为便利。例：

createprocedure"test".upwage()

definerev_rev_item_codevarchar(2,0);

definerev_p_rev_datedate;

defineacc_rec_prem_nodecimal(8,2);definerev_p_rev_amtdecimal(10,2);definerev_I_info_branchvarchar(6,0);definerev_I_info_appl_nodecimal(8,0);definerev_I_info_datedate;definerev_o_rev_datedate;

definerev_o_rev_amtdecimal(10,2);

defineacc_ac_rev_amntdecimal(10,2);

defineacc_rec_prem_datedate;

beginwork;

foreachcur_revforselectI_info_appl_branch,I_info_appl_no,I_info_date,

o_rev_date,o_rev_amtintorev_I_info_branch,

rev_I_info_appl_no,rev_I_info_date,rev_o_rev_date,rev_o_rev_amtfromrev_rec_tblwhere

(rev_item_code="PS")andp_rev_dateisnulland

p_rev_amt=0and(I_info_appl_noisnotnullor

I_info_dateisnotnull);

selectmax(rec_prem_acc_no)intoacc_rec_prem_nofromrec_prem_accwhereI_info_appl_branch=rev_I_info_branch

andI_info_appl_no=rev_I_info_appl_no

andI_info_date=rev_I_info_date

ando_rev_date=rev_o_rev_date

andrev_item_code="PS"and

ac_rev_amnt=rev_o_rev_amt;

selectdate(rec_prem_date)intoacc_rec_prem_date

fromrec_prem_accwhereI_info_appl_branch=rev_I_info_branch

andI_info_appl_no=rev_I_info_appl_no

andI_info_date=rev_I_info_date

ando_rev_date=rev_o_rev_date

andrev_item_code="PS"and

ac_rev_amnt=rev_o_rev_amtand

rec_prem_acc_no=acc_rec_prem_no;

selectac_rev_amntintoacc_ac_rev_amnt

fromrec_prem_acc

whereI_info_appl_branch=rev_I_info_branch

andI_info_appl_no=rev_I_info_appl_no

andI_info_date=rev_I_info_date

ando_rev_date=rev_o_rev_date

andrev_item_code="PS"

andrec_prem_acc_no=acc_rec_prem_no

andac_rev_amnt=rev_o_rev_amt;

ifacc_ac_rev_amntisnulloracc_rec_prem_dateisnullthen

continueforeach;

endif;

updaterev_rec_tbl

setp_rev_date=acc_rec_prem_date,

p_rev_amt=acc_ac_rev_amnt

whereI_info_appl_branch=rev_I_info_branch

andI_info_date=rev_I_info_date

andI_info_appl_no=rev_I_info_appl_no

ando_rev_date=rev_o_rev_date;

endforeach;

commitwork;

endprocedure;

②.执行例程语法：

A):在dbaccess中

EXECUTEPROCEDUREDBNAME@SERVER_NAME:例程名(参数1,参数2,.....)用这种方法可对例程进行调试。

B):在Informix-4GL中

PREPAREPREPSTATTEMENTFROM"EXECUTEPROCEDUREDBNAME@SERVER_NAME:例程名（?,?,?,...）

DECLAREP_CURSSURSORFORPREPSTMT

OPENP_CURSUSING参数1,参数2,....

FETCHP_CURSINTO返回值1，返回值2，...

CLOSEP_CURS

当应用程序不支持EXECUTPROCEDURE语法,则需使用PREPARE命令,如INFORMIX-4GL中,而使用INFORMIX-NEWEAR则无此限制,需注意的是PREPARE语句中变量用?号代替,其个数要与例程的参数个数和类型一致,返回值也是一样。

C):在Informix-ESQL/C中

EXECSQLEXECUTEPROCEDURE例程名(参数1,参数2,...)INTO（返回值1，返回值2,...）在EC5.0或更高版本可使用EXECUTEPROCEDURE语法,在ESQL/C中宿主变量用于想存储例程传递值,同时也接收返回值.

D):在POWERBUILDER中

DECLARE逻辑名PROCEDUREFOR例程名(:参数1,:参数2:...)INTO:返回值1,:返回值2,..USING事物名

EXEC例程名(:参数1,:参数2,.....)

PB要求为例程制定逻辑名,以后的SQL语句将以逻辑名为准指向后台数据库例程,当例程即便没有参数也必须有小扩号. 更多内容请看informix  informix基础专题，或进入讨论组讨论。

下一页 1 2 3 

【收藏此文】【大 中 小】【打印】【关闭】

较早的文章：INFORMIX-4GL实用手册（三）

较新的文章：datetime类型简介