× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Terri,

Check the COMMIT parameter on your compile command. The default is *CHG,
which uses commitment control and therefore requires journalling. If you
change the parameter value to *NONE, I think it will resolve your problem.


John Taylor


> -----Original Message-----
> From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
> Behalf Of THarteau@felkerbrothers.com
> Sent: Friday, December 20, 2002 7:15 AM
> To: RPG400-L@midrange.com
> Subject: SQL Problem
>
>
> Hi,
>       I have been using SQL for a bit now and was getting pretty confident
> about it. Now I'm getting an error I don't understand. I have the
> following
> statement in an RPG program to update all the records that meet the
> criteria:
>       C/EXEC SQL
>       C+ UPDATE FLTL03 SET TFWSID = :WSIDJ, LTSTS = '1S'
>       C+  WHERE TFWSID = :WSIDS AND LTSTS = '  '
>       C/END-EXEC
>
> Its not working.  I am getting SQL error code 7008. We don't journal any
> files, and this is the only place in the program I use this file.  This is
> in my test environment.  I was using the physical file first, and that
> didn't work either. Any ideas on how to make this work?
>
> This is my job log:
>       Query options retrieved file QAQQINI in library QUSRSYS.
>       **** Starting optimizer debug message for query .
>       Query options used to build the OS/400 query access plan.
>       All access paths were considered for file FLTL03.
>       Additional access path reason codes were used.
>       Arrival sequence access was used for file FLTL03.
>       Member FLTL03 not journaled to journal *N.
>       FLTL03 in V64BPCSTF not valid for operation.
>       SQLCOD = -000007008.
>
> The details in my job log for the error code are:
>       Message type . . . . . :   Information
>       CCSID  . . . . . . . . :   65535
>
>       From program . . . . . . . . . :   QTENPTS
>         From library . . . . . . . . :     QSYS
>         From module  . . . . . . . . :     TESDMSG
>         From procedure . . . . . . . :     Process_Error_Code
>         From statement . . . . . . . :     7
>
>       To program . . . . . . . . . . :   QTESTOPH
>         To library . . . . . . . . . :     QSYS
>         To module  . . . . . . . . . :     QTESTOPH
>         To procedure . . . . . . . . :     main
>         To statement . . . . . . . . :     199
>
>
> <===================================================>



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.