db2存储过程

Posted 2023-05-09

参考技术A CREATE OR REPLACE PROCEDURE PROCEDURE_NAME(IN FILED FILE_TYPE|OUT FIELD FIELD_TYPE|INOUT FIELD_TYPE)

  BEGIN

   [DECLARE I INT DEFAULT 1;]

   [可以写循环：

    REPEAT 

    UNTIL (...)

    END REPEAT;

   ]

   ...

  END

  @

  CREATE OR REPLACE PROCEDURE INSERTDATA(

  IN COUNTS INT

  )  

  BEGIN

   DECLARE I INT DEFAULT 1;

   REPEAT

    insert into ESBTLOG(UUID, UUID_POS, MSG_ID, ESB_CODE, CLI_ID, CLI_ID_BOCS, SERV_ID, SERV_TRAN_CODE, SERV_TCODE, ESB_RET_CODE, ERR_MSG, TRACE_NO, TRAN_DATE, TRAN_TIME, TXN_STATUS, JOURNAL_NO, EXT_UUID, TXN_TOKEN, NODE_NAME, TRAN_BEGIN_TIME, TRAN_END_TIME, SP1_BEGIN_TIME, SP1_END_TIME, USER_BOCS, WKSTATION, RET_TRAN_DATE, RET_TRAN_TIME, RET_AC_DATE, RET_TRACE_NO, AP_TRACE_NO, BR_NO, TM_SMP)

    values('141114B0000R', '0-0-0-0-25', '414d51204553422e514d312020202020afab9e5810880020', 'BOCI060460', '520', '14', '-', '-', '000000', '2020001003', 'Send To client error.QM:CAPAQ01 QUEUE:ESB.CAP.RES.LQ1', '530000U1KQUMT', '20180730', '095310', 'E', '-', '-', '-', 'ESB.QM2', '2018-12-11-09.51.16.398765', '2018-12-11-09.51.16.398765', '2018-12-11-09.51.16.398765', '2018-12-11-09.51.16.398765', '4980261', '994', '-', '-', '-', '-', '-', '51604', '2018-12-11-09.51.16.398765');

    SET I = I + 1;

   UNTIL (I > COUNTS)

   END REPEAT;

  END

  @

注意：写存储过程需要以一个符号结尾，此处用的是@符号

db2 "select * from SYSCAT.PROCEDURES where PROCNAME='INSERTDATA'"

    db2 "drop procedure INSERTDATA2SIPTLOG(INT,VARCHAR())"

注意：要将参数带进去

    db2 -td@ -vf filename （该文件需以@符号结尾）.

-td选项让命令行处理程序使用@作为语句终止字符；-v选项让命令处理程序将命令文本回显到标准输出；-f让命令行处理程序从指定文件读取命令输入

db2 存储过程迁移方法

    大家在迁移数据库时，存储过程一般也要迁移过去，但一般有两个问题：

1. 非常多存储过程有先后关系（存储过程调用存储过程），假设存储过程数量少，还能手动操作。假设量大，那真是要疯了。

2. 存储过程过大（行数过多），导致异常

这边有个方法，也许能够解决问题。

一. 导出存储过程

EXPORT TO G:/PROCUDURE/procudure.del OF del MODIFIED BY LOBSINFILE
SELECT ‘SET CURRENT SCHEMA ‘||rtrim(procschema)||‘@‘||chr(10)||‘SET CURRENT PATH = SYSIBM,SYSFUN,SYSPROC,‘||rtrim(procschema)||‘ @‘||chr(10)||text||chr(10)||‘@‘||chr(10)
FROM syscat.procedures WHERE PROCSCHEMA  = ‘ILS‘ ORDER BY create_time ;

运行以上导出语句，则是把schema为ils以下的存储过程导出为文件，由于有ORDER BY create_time。所以导出的顺序也是依照原有存储过程的顺序建立的。

运行完了，应该在G:/PROCUDURE看到两个文件

1. procudure.del

2. procudure.del.001.lob

如图：

会出现procudure.del.001.lob这个文件，由于我这边有存储过程太大(使用MODIFIED BY LOBSINFILE)。所以导出为lob文件，这样不easy出错。

二. 导入存储过程

下一步当然是在其它db以下导入存储过程啦：

1. 命令行下进入到G:/PROCUDURE

2. 连接到要导入的db：  connect to ilsdb user xxx用户 using  xxxpassword

3. db2 [email protected] -vf procudure.del.001.lob

ok。顺便看看log。有没有报错。

有报错，在运行一次（尽管是依照创建时间排序的，但不能保证有人后期改动过父存储过程，导致创建时间不正确）。

导入过程见图：

打开后输入下面命令