×
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.
Chuck;
Our DBA (Yes we have a DB2/400 DBA) is a slacker. :) This problem is still in his queue, but keeps getting pushed down since the work around is to not use the new 6.1 syntax. He promised to package it up and get a PMR submitted this week, if time permits. :)
Duane Christen
FYI: The restore to the production box did not change the SQL package library in the service program object to the library in which the service program was restored. E.g.. Saved from PRDOBJ, restored to MCOBJECT the SQL package library was still PRDOBJ.
--
Duane Christen
Senior Software Engineer
(319) 790-7162
Duane.Christen@xxxxxxxxxx
Visit PAETEC.COM
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of CRPence
Sent: Monday, July 26, 2010 2:23 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Get Auto Increment Values After SQL Insert in the same command
On 26-Jul-2010 08:35, Christen, Duane wrote:
Pre 6.1 you would use this sql after the insert:
Exec SQL
values IDENTITY_VAL_LOCAL() into :EVTRANDID;
With 6.1 you can use:
Exec Sql
Select messageId
Into :logId
From Final Table (
Insert-Statement);
We had a problem with this. Our CMS system (Turnover) does a
save/restore on the program to move it to production. During the
restore to production something is lost, and the code then fails.
As far as I know this has not been fixed.
What is the APAR that was opened after reporting that issue?
That could be beneficial to others who might be interested, to obtain a PTF when one becomes available.
Regards, Chuck
--
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.