RE: sql weirdness...

If you sign off and sign back on again the first call to the program should
result in the cursor being opened and the rows being read from the cursor
correctly. However, it appears that your code doesn't close the cursor once
all rows have been read from the cursor. Subsequent calls to the program
will therefore result in the cursor not being opened (as it is already open)
and no rows from the cursor being read as the last row in the cursor has
already been read.

Ensure you close the cursor once all rows have been read. Alternatively,
monitor for the cursor already being open and close and reopen if necessary.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Yivi
Sent: 14 November 2005 07:00
To: RPG programming on the AS400 / iSeries
Subject: Re: sql weirdness...

There seems to be some sort of problem opening the cursor.
SQLSTATE/SQLCODE is 24502/-502 (*The cursor identified in an OPEN statement
is already open.)*  But I don't understand how can it be open. There is only
one call over the
ALFOF2 cursor, and it's at the top of the program.
 Could it collide with the F specification for the ALFOFGAN2 file? But I
need that line so I can use LIKEREC in the ALF2 data-structure...
I tried usropning ALFOFGAN2, making sure that I didn't open it until after
the SQL cursor call, but the results are the same

Thanks for all the advice so far.
Any additional clues?
 Regards,
 I.-
--
This is the RPG programming on the AS400 / 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.
****************************************************************************

This e-mail is confidential, intended only for the named recipient(s) above,
and may well also be legally privileged. If you have received it in error,
you are on notice of its status. Please notify us immediately by reply
e-mail and then delete this message from your system. Please do not copy it
or use it for any purposes, or disclose its contents to any other person: to
do so could be a breach of confidence. Please contact us on +44 (0) 1329
224000 or email postmaster@xxxxxxxxxxxxxxxxxxxxxxx if you need assistance.
Thank you for your co-operation.

****************************************************************************