|
midrange.com
If you decide to use journaling and leave commitment control on, make sure you
do a commit before exiting your program. Any
uncommitted updates at the end of your program will be rolled back.
Seth
Phil Groschwitz
<sublime78ska@yah To: RPG400-L@midrange.com
oo.com> cc:
Sent by: Subject: Re:
owner-rpg400-l@mi
drange.com
04/22/01 04:53 PM
Please respond to
RPG400-L
Either journal the file or set commitment control to
none. I think it is a compile parameter COMMIT(*NONE)
or you can code it in the program.
Phil
--- "Lafferty, Susan" <SLafferty@DoanePetCare.com>
wrote:
> Question:
>
> I am trying to do an UPDATE in embedded SQL. I am
> getting the error message
> below. We do not use journaling. Do I have to do
> journaling to use the
> UPDATE?
>
> Thank you,
>
> Susan Lafferty
>
> Message . . . . : DOBKKP1W in DPCFILES#T not valid
> for operation.
>
> Cause . . . . . : The reason code is 3:
>
> -- Code 1 -- DOBKKP1W has no members.
>
> -- Code 2 -- DOBKKP1W has been saved with
> storage free.
>
> -- Code 3 -- DOBKKP1W is not journaled, or you
> do not have authority
> to
>
> the journal. Files with an RI constraint action
> of CASCADE, SET NULL,
> or
>
> SET DEFAULT must be journaled to the same
> journal.
>
> -- Code 4 and 5 -- DOBKKP1W is in or is being
> created into a
> production
>
> library but the user is in debug mode with
> UPDPROD(*NO).
>
> -- Code 6 -- a collection is being created,
> but the user is in debug
> mode
>
> with UPDPROD(*NO).
>
> -- Code 7 -- a based-on table used in the
> creation of the view is not
>
> valid because it is a program described table or
> is in a temporary
> library.
>
> -- Code 8 -- a user attempted to create an
> object but the based-on
> table
>
> resides in an Auxiliary Storage Pool (ASP) which
> is different than the
> ASP
>
> where the object is being created.
>
> -- Code 9 -- the index is currently held or is
> not valid.
>
> -- Code 10 -- a constraint is being added but
> the table is not valid.
> The
>
> table either has a maximum member value greater
> than one, is a source
> file,
> is in QTEMP, is not in the same ASP as the parent
> or dependent table, is
> not
>
> write, update, or delete capable, is not an
> externally described file,
> or
>
> has a parent table that does not have a member.
>
> -- Code 11 -- a distributed table is being
> created in library QTEMP,
> or a
>
> view is being created over greater than one
> distributed table.
>
> -- Code 12 -- a table could not be created in
> QTEMP, QSYS or QSYS2
> because
>
> it contains a column of type datalink having the
> FILE LINK CONTROL
> option.
>
> -- Code 13 -- a table could not be created in
> the collection as the
> table
>
> contains a datalink column and the collection
> contains a data
> dictionary.
>
> -- Code 14 -- a datalink or lob column could
> not be added because the
> file
>
> is not a SQL table.
>
> Recovery . . . : A list of corrective actions
> follow:
>
> -- If code 1, add a member to DOBKKP1W (ADDPFM
> command).
>
> -- If code 2, restore DOBKKP1W (RSTOBJ
> command).
>
> -- If code 3, start journaling on DOBKKP1W
> (STRJRNPF command), or get
>
> access to the journal.
>
> -- If this is reason code 4, 5, or 6, perform
> a CHGDBG command with
>
> UPDPROD(*YES).
>
> -- If code 7, remove table names which
> identify files in QTEMP or to
>
> program described files.
>
> -- If code 8, use tables in the same ASP.
>
> -- If code 9, use the edit rebuild of access
> path (EDTRBDAP) command
> and
>
> change the sequence of the access path from HELD
> to 1-99 or *OPN, or
> rebuild
>
> or delete the unique index or constraint.
>
> -- If code 10, specify tables that are valid
> for the constraint.
>
> -- If code 11, specify a library other than
> QTEMP, or create the view
> over
>
> only one distributed table.
>
> -- If code 12, specify a library other than
> QTEMP, QSYS or QSYS2 on
>
> create.
>
> -- If code 13, specify a library that does not
> contain a data
> dictionary
>
> or get rid of all datalink columns.
>
> -- If code 14, specify a SQL table for adding
> the datalink or lob
> column
>
> * * * * * E N D O F L I S T I N
> G * * * * *
>
>
>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to
> RPG400-L@midrange.com.
> | To subscribe to this list send email to
> RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to
> RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list
> owner/operator: david@midrange.com
> +---
__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
