如何在z / OS中编写DB2命令脚本?

问题描述 投票:4回答:4

在中型系统(AS / 400,IBM i等)上使用DB2 25年后,我现在的任务是成为大型机(z / OS)上DB2的数据库管理员。我为这里的“菜鸟问题”道歉,但我仍然围绕着大型机。

目前,每天早上,我使用“DB2命令”屏幕中的DISPLAY命令手动检查多个表空间的状态:

EG

Cmd 1       ===>       -DISPLAY DB(DN*) SPACENAM(*) USE LOCKS LIMIT(*)
Cmd 2       ===>       -DISPLAY DB(DP*) SPACENAM(*) USE LOCKS LIMIT(*)

这会在屏幕上显示几页输出,在每个屏幕显示后暂停。如果任何表空间处于无效状态,我可以对此做些什么。

最后,我想发布几个这样的DISPLAY语句,将输出定向到输出数据集。然后,我可以手动检查该数据集,也可以编写程序来解析输出数据集并报告(或修复)任何异常。

对于所有大型机DB2 DBA来说,这可能非常简单,但是如何编写这些命令的脚本呢?我使用REXX吗?如果是这样,怎么样?

谢谢你的帮助!

戴夫

db2 mainframe zos rexx db2-zos
4个回答
2
投票

最简单的方法是将TSO终端控制程序下的命令作为批处理作业运行。

这可能看起来像这样(JOB卡省略):

 //*----------------------------------------------                 
 //DISDB    EXEC PGM=IKJEFT01,DYNAMNBR=20                          
 //*----------------------------------------------                 
 //STEPLIB   DD DISP=SHR,DSN=DB2.DSNLOAD                           
 //SYSPRINT DD SYSOUT=*                                            
 //SYSTSPRT DD DISP=SHR,DSN=YOUR.OUTPUT.DATASET                                            
 //SYSTSIN  DD *                                                   
   DSN SYSTEM(DBSYS)                                                
   -DISPLAY DB(DN*) SPACENAM(*) USE LOCKS LIMIT(*)                                                  
   -DISPLAY DB(DP*) SPACENAM(*) USE LOCKS LIMIT(*)                 
 //                                                                

唯一的问题是SYSTSPRT将包含你的输入命令,产生的输出和一些其他杂乱的混合,但它基本上是零努力实现。


2
投票

您说您在DB2命令屏幕中手动发出命令。在z / OS中,我认为在TSO中有类似的菜单。在TSO中发出DB2I命令,您将看到一个菜单,其中包含选项7 DB2命令。这是手动方式。

如果要批量运行一系列命令,即编写脚本,请提交运行DSN TSO命令的作业。

//jobname JOB ...
//STEP01  EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSYOUT=*
//SYSTSIN  DD *
 DSN SYSTEM(subsysid)
 -dis db(...) ....
... more commmands
/*

输出将写入DD SYSTSPRT。

除非您想以编程方式解释命令的结果,否则无需编写REXX脚本。

HTH


1
投票

一个非常基本的REXX解决方案:

/* REXX*/                                                   
DB2NAME = 'DSN'        /* <== change db2name here */                                     
"DELSTACK"                                                  
QUEUE "-DISPLAY DB(DN*) SPACENAM(*) USE LOCKS LIMIT(*)"  
QUEUE "-DISPLAY DB(DP*) SPACENAM(*) USE LOCKS LIMIT(*)"
QUEUE "END"                                                 
X = OUTTRAP(IN.)                                            
"DSN SYSTEM("!!DB2NAME!!")"                                 
X = OUTTRAP(OFF)                                            
DO I = 1 TO IN.0                                            
  SAY IN.I                                                  
END                                                         

0
投票

您可以编写rexx脚本来构建与Db2子系统的连接,然后执行相同的命令。让我找到示例并发送给您..这是您可以用来从REXX ADDRESS连接到DB2的命令DSNREXX'CONNECT'' DB01'


0
投票

如果有用户喜欢unix shell,你可以使用命令行处理器和db2提供的存储过程。

.profile片段设置环境变量:

# DB2 CLP
export JAVA_HOME=/usr/lpp/java/java180/J8.0_64
export CLASSPATH=$CLASSPATH:/usr/lpp/db2/db2c10/base/lib/clp.jar
export JCCJAR=$JCCJAR:/usr/lpp/db2/db2c10/jdbc/classes
export CLASSPATH=$CLASSPATH:$JCCJAR/db2jcc4.jar
export CLASSPATH=$CLASSPATH:$JCCJAR/db2jcc_license_cisuz.jar
export CLASSPATH=$CLASSPATH:$JCCJAR/db2jcc_license_cu.jar
export PATH=$PATH:$JAVA_HOME:$JAVA_HOME/bin
export CLPPROPERTIESFILE=~/clp.properties
# alias to allow using shorter db2clp versis long path.
alias  db2clp="/usr/lpp/java/java180/J8.0/bin/java com.ibm.db2.clp.db2"

示例clp.properties文件。注意 - 我使用hash作为SQL终止字符。这允许我创建本机存储过程,在过程中使用分号作为行终止符,以及过程终止符代码的散列。

#Specify the value as ON/OFF or leave them blank
DisplaySQLCA=ON
AutoCommit=OFF
InputFilename=
OutputFilename=
DisplayOutput=ON
StopOnError=OFF
TerminationChar=#
Echo=ON
StripHeaders=OFF
MaxLinesFromSelect=ALL
MaxColumnWidth=132
IsolationLevel=UR

text.sql包含:

CONNECT TO localhost:446/STLEC1
CALL SYSPROC.ADMIN_COMMAND_DB2 ('-DISPLAY BPOOL(BP0)', 40, NULL, NULL,?, ?, ?, ?, ?, ?, ?, ?) #

通过shell命令批量执行CLP:

export IBM_DB_UID=your-userid-here
export IBM_DB_PM=your-password-here
db2clp -f text.sql -u $IBM_DB_UID/$IBM_DB_PWD

您可以将结果捕获到文件并在输出上使用python,node或unix命令。

有用的链接:命令行处理器:https://www.ibm.com/support/knowledgecenter/en/SSEPEK_12.0.0/comref/src/tpc/db2z_commandlineprocessor.html

与Db2一起提供的程序:https://www.ibm.com/support/knowledgecenter/en/SSEPEK_12.0.0/sqlref/src/tpc/db2z_suppliedstoredprocedures.html

© www.soinside.com 2019 - 2024. All rights reserved.