Re: A Mystery SQL Problem

I'm guessing you checked the obvious, changes to the year between the two statements.
There was a remark on the midrange list yesterday about non-displayable data not being returned from a statement. I wonder if that could be the issue?

Joni

From: Marvin Radding
Sent: Friday, 2 December, 23:21
Subject: A Mystery SQL Problem
To: RPG programming on the IBM i (AS/400 and iSeries)

I have a real mystery. I am having problems with an SQL INSERT. I am performing maintenance on a file and then extracting from that file and inserting the new records into another file. Here is the code: exec sql (SELECT count(*) into :count FROM ahpovrp WHERE ROEFDT = :effective_year); exec sql INSERT INTO MMNYOVRP (SELECT * FROM ahpovrp WHERE ROEFDT = :effective_year ORDER BY rocomp, rostcd, roplan, robenp); When I execute the first SQL statement, COUNT is 100; but when the second statement the file MMNYOVRP contains 140 records. I don't understand how this can be. Any ideas? Commitment control is off. The file I extract from is closed at this point. Marvin Notice: This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. This message may also contain Protected Health Information (PHI) and must be treated confidentially and handled in accordance with HIPAA and other federal and state privacy laws. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately and delete this e-mail (and any accompanying attachments). -- This is the RPG programming on the IBM i (AS/400 and iSeries) (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. Please contact support@xxxxxxxxxxxx for any subscription related questions.