DB2 9存储过程的规划和实施技巧

　当前位置：首页 >> 网管 >> 数据库 >> DB2 >> DB2 9存储过程的规划和实施技巧

DB2 9存储过程的规划和实施技巧

来源：赛迪网　作者：　发布时间：2008-07-31

　　为通用情况准备的存储过程

　　另外，我们为大多数的存储过程准备了一套运行环境，所准备的启动作业如下所示，其中 NUMTCB 可以根据系统资源情况来定，一般推荐可以设置为 40 或 60。

　　清单 4. 通用情况下存储过程对应的 STC 作业

//DB11WLM2 PROC APPLENV=DB11WLM2,DB2SSN=DSN,RGN=0K,NUMTCB=40
　　//IEFPROC EXEC PGM=DSNX9WLM,REGION=&RGN,TIME=NOLIMIT,
　　// PARM='&DB2SSN,&NUMTCB,&APPLENV'
　　//STEPLIB DD DISP=SHR,DSN=prefix.SCEERUN
　　//* DD DISP=SHR,DSN=prefix.SDFHEXCI For CICS
　　// DD DISP=SHR,DSN=prefix.SDSNEXIT
　　// DD DISP=SHR,DSN=prefix.SDSNLOAD
　　//* DD DISP=SHR,DSN=prefix.SCSQLOAD For MQ
　　//* DD DISP=SHR,DSN=prefix.SCSQAUTH For MQ
　　//* DD DISP=SHR,DSN=prefix.SCSQANLE For MQ
　　//*SYSIN DD SYSOUT=* For Debugger and XML
　　//*SYSPRINT DD SYSOUT=*
　　//*WSERROR DD PATH='/tmp/wsc.err', For WEB_SERVICES
　　//* PATHOPTS=(ORDWR,OCREAT,OAPPEND),
　　//* PATHMODE=(SIRUSR,SIWUSR,SIRGRP,SIWGRP,SIROTH,SIWOTH)

　　REXX 语言编写的存储过程

　　对于由 REXX 语言写的存储过程来说，启动作业同其他类型的存储过程是不同的。见下面的例子。需要特别提出的是，REXX 类型的存储过程的 NUMTCB 应该设为 1。

　　清单5. REXX 存储过程对应的STC作业

//DB11WLMR PROC APPLENV=DB11WLM_REXX,DB2SSN=DSN,RGN=0K,NUMTCB=1
　　//IEFPROC EXEC PGM=DSNX9WLM,REGION=&RGN,TIME=NOLIMIT,
　　// DYNAMNBR=5, <== Allow for Dyn Allocs
　　// PARM='&DB2SSN,1,&APPLENV' <== Use 1, not NUMTCB
　　//*
　　//NUMTCB@1 SET NUMTCB= <== Null NUMTCB symbol
　　//*
　　//* Include SDSNEXIT to use Secondary Authids (DSN3@ATH DSN3@SGN exits)
　　//STEPLIB DD DISP=SHR,DSN=prefix.RUNLIB.LOAD
　　// DD DISP=SHR,DSN=CBC!!.SCCNCMP <== C Compiler
　　// DD DISP=SHR,DSN=prefix.SCEERUN <== LE runtime
　　// DD DISP=SHR,DSN=prefix.SDSNEXIT
　　// DD DISP=SHR,DSN=prefix.SDSNLOAD
　　//SYSEXEC DD DISP=SHR,DSN=DSN!!0.SDSNCLST <== Location of DSNTPSMP
　　//SYSTSPRT DD SYSOUT=*
　　//CEEDUMP DD SYSOUT=*
　　//SYSPRINT DD SYSOUT=*
　　//SYSABEND DD DUMMY
　　//DSNTRACE DD SYSOUT=*
　　//*
　　//**** Data sets required by the SQL Procedures Processor
　　//SQLDBRM DD DISP=SHR, <== DBRM Library
　　// DSN=DSN!!0.DBRMLIB.DATA
　　//SQLCSRC DD DISP=SHR, <== Generated C Source
　　// DSN=DSN!!0.SRCLIB.DATA
　　//SQLLMOD DD DISP=SHR, <== Application Loadlib
　　// DSN=DSN!!0.RUNLIB.LOAD
　　//SQLLIBC DD DISP=SHR, <== C header files
　　// DSN=CEE!!.SCEEH.H
　　// DD DISP=SHR,
　　// DSN=CEE!!.SCEEH.SYS.H
　　// DD DISP=SHR, <== Debug header file
　　// DSN=DSN!!0.SDSNC.H
　　//SQLLIBL DD DISP=SHR, <== Linkedit includes
　　// DSN=CEE!!.SCEELKED
　　// DD DISP=SHR,
　　// DSN=DSN!!0.SDSNLOAD
　　//SYSMSGS DD DISP=SHR, <== Prelinker msg file
　　// DSN=CEE!!.SCEEMSGP(EDCPMSGE)
　　//*
　　//**** DSNTPSMP Configuration File - CFGTPSMP (optional)
　　//* A site provided sequential dataset or member, used to
　　//* define customized operation of DSNTPSMP in this APPLENV.
　　//*CFGTPSMP DD DISP=SHR,DSN=
　　//*
　　//**** Workfiles required by the SQL Procedures Processor
　　//SQLSRC DD UNIT=SYSALLDA,SPACE=(23440,(20,20)),
　　// DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
　　//SQLPRINT DD UNIT=SYSALLDA,SPACE=(23476,(20,20)),
　　// DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
　　//SQLTERM DD UNIT=SYSALLDA,SPACE=(23476,(20,20)),
　　// DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
　　//SQLOUT DD UNIT=SYSALLDA,SPACE=(23476,(20,20)),
　　// DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
　　//SQLCPRT DD UNIT=SYSALLDA,SPACE=(23476,(20,20)),
　　// DCB=(RECFM=VB,LRECL=137,BLKSIZE=23476)
　　//SQLUT1 DD UNIT=SYSALLDA,SPACE=(23440,(20,20)),
　　// DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
　　//SQLUT2 DD UNIT=SYSALLDA,SPACE=(23440,(20,20)),
　　// DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)
　　//SQLCIN DD UNIT=SYSALLDA,SPACE=(32000,(20,20))
　　//SQLLIN DD UNIT=SYSALLDA,SPACE=(3200,(30,30)),
　　// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
　　//SQLDUMMY DD DUMMY
　　//SYSMOD DD UNIT=SYSALLDA,SPACE=(23440,(20,20)),
　　// DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440)

（责任编辑：IORI）

阅读次数：

共4页: 上一页 [1] 2 [3] [4] 下一页

上一篇：黑客发动攻击提速逾80%攻击与缺陷披露同步下一篇：思科Nexus 5000交换机测评：无缝连接以太网和FC

[收藏] [推荐] [评论(0条)] [返回顶部] [打印本页] [关闭窗口]