SQL insert into 2 tables in one query

Question

I have the following query in SQLRPGLE for DB2:

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

I would like this query to be run in 2 libraries as in FIRST/ITEMS2 and SECOND/ITEMS2

where FIRST and SECOND are the library names. Can this be achieved in one query?

For those who have no understanding of iSeries: The above insert statement would be similar to having a insert query for 2 tables.

Answer 1

The INSERT statement does not support inserting into multiple tables.

However you could create a trigger on FIRST/ITEMS2 to automatically insert/update/delete the record into SECOND/ITEMS2 .

See the CREATE TRIGGER statement for more information.

Answer 2

If this will be run often, consider making the INSERT into a stored procedure, and then setting the target schema via SET SCHEMA:

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

Answer 3

You could create a QMQuery like this

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

Then

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

Answer 4