Nevermind. I reckon I need to turn commit control off.
D'oh.
|-----Original Message-----
|From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-
|bounces@xxxxxxxxxxxx] On Behalf Of Fleming, Greg (ED)
|Sent: Thursday, October 18, 2007 6:01 PM
|To: Midrange Systems Technical Discussion
|Subject: Embedded SQL Insert error
|
|I'm getting a weird error. I'm doing a fairly straightforward insert
|operation from an SQLRPGLE program, and the job log says the file is
not
|valid for the operation.
|
|The reason code is:
|
| 3 -- MKREOW not journaled, or no authority to the journal. Files
with
|an
|
|RI constraint action of CASCADE, SET NULL, or SET DEFAULT must be
|journaled
|
|to the same journal.
|
|
|What the heck is an RI constraint action ?
|
|The weird thing is that I can run the same insert statement from
|QuantumDB into the same file, and it works fine.
|
|To make sure it wasn't my SQL statement, I made another program with a
|much simpler statement, just inserting hard-coded values into the file.
|Same error:
|
|Here's the simple version:
|
| DMain PR ExtPgm('MK645AR2')
|
| DMain PI
|
| /Free
|
| Exec SQL
|
| Insert into MKREOW
|
| Select 'A',1,12345678,'2007-12-21',12345678,'EFL2A','PLN','A',14
|
| From OEORDT;
|
|
| *InLR = *On;
|
| /End-Free
|
|Thanks
|
|Greg Fleming
|
|Senior Programmer/Analyst
|
|Everglades Direct, Inc.
|
|
|
|--
|This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
|list
|To post a message email: MIDRANGE-L@xxxxxxxxxxxx
|To subscribe, unsubscribe, or change list options,
|visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
|or email: MIDRANGE-L-request@xxxxxxxxxxxx
|Before posting, please take a moment to review the archives
|at
http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.