Re: Imbedded SQL and Date

[Alan Campin <alan0307d@xxxxxxxxx>]

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.