× 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.



Are you checking the value of SQLSTATE when you finish the insert? Looked at
the underlying messages in the job log? Turned on debug when you run to see
the deatails?


On Thu, Mar 25, 2010 at 2:49 PM, DeLong, Eric <EDeLong@xxxxxxxxxxxxxxx>wrote:

Commitment Control... Most likely you only need to tell the compiler to
use COMMIT NONE.

Try getting used to using the SQL option block.
/FREE
EXEC SQL
Set Option
DatFmt = *Iso,
Naming = *Sys,
Commit = *None,
UsrPrf = *User,
DynUsrPrf = *User,
CloSqlCsr = *EndActGrp;

Hth,
-Eric

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Dave Petrosky
Sent: Thursday, March 25, 2010 3:15 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Imbedded SQL and Date


I tried both suggestions:

Making todaysDate as :todaysDate

And changing:

todaysDate = %dec(date()); to todaysDate = %dec(date() : ISO);

Neither work.

I combined them for the heck of it and it still didn't work. When I run
the program through debug, I see the value for totalDays that I expect
(20100325) but I still write no rows. I have checked the data in the
file and I know I should write rows (like I said in the original
message, interactively, this works).


David M. Petrosky
Programmer/Analyst
Maines Paper & Food Service, Inc.
101 Broome Corporate Parkway
Conklin, NY 13748
(office) 607-251-7378
dave.petrosky@xxxxxxxxxx
www.maines.net


--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



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.