Re: Embedded SQL Insert error

["Brian Johnson" <brian.johnson.mn@xxxxxxxxx>]

The first step is to see what constraints exist:

DSPFD TYPE(*CST)

If you are unfamiliar with constraints, you could start with the help
for command ADDPFCST.  Further reading can be found in Infocenter:

http://publib.boulder.ibm.com/infocenter/iseries/v5r4/topic/dbp/rbaforzahfcoa.htm

On 10/18/07, Fleming, Greg (ED) <GFLEMING@xxxxxxxxxxxxxxxxxxxx> wrote:
> 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.