Question

我在SQLRPGLE for DB2中有以下查询：

    INSERT INTO ITEMS2 (PROGRAM, VLDFILE, VLDFLD, 
    SELFILE, SELFLD) VALUES(:SCAPP   , 'CSTMR', 'CYC',
    'BYC', 'BYCC');

我希望此查询能够在FIRST / ITEMS2和SECOND / ITEMS2中的2个库中运行

其中FIRST和SECOND是库名。这可以在一个查询中实现吗？

对于那些不了解iSeries的人：上面的insert语句类似于对2个表进行插入查询。

Answer 1

INSERT语句不支持插入多个表。

但是，您可以在FIRST/ITEMS2上创建触发器，以自动将记录插入/更新/删除到SECOND/ITEMS2。

有关详细信息，请参阅CREATE TRIGGER声明。

Answer 2

如果经常运行，请考虑将INSERT插入存储过程，然后通过SET SCHEMA设置目标模式：

set schema=first;
call my_insert_proc(:scapp);
set schema=second;
call my_insert_proc(:scapp);

Answer 3

您可以像这样创建一个QMQuery

    INSERT INTO &LIB/ITEMS2 
             (PROGRAM, VLDFILE, VLDFLD, SELFILE, SELFLD)
      VALUES (&SCAPP, 'CSTMR',  'CYC',  'BYC',   'BYCC');

然后

STRQMQRY myQmQry  SETVAR(('LIB' 'FIRSTLIB')('SCAPP' &VAR))
STRQMQRY myQmQry  SETVAR(('LIB' 'SECONDLIB')('SCAPP' &VAR))

Answer 4