Did you check the SQLCODE immediately after the fetch?
Didn't you get SQLCODE 30?
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] Im Auftrag von
rob@xxxxxxxxx
Gesendet: Friday, 05.2 2016 19:46
An: midrange-l@xxxxxxxxxxxx
Betreff: Select * into an external DS, and then adding columns
Scenario:
You have something like this:
D RCODS E DS EXTNAME(RCO)
C/EXEC SQL
C+ DECLARE C CURSOR FOR
C+ SELECT * FROM RCO
C+ WHERE CMPNY BETWEEN :
C+ W1LWCO AND :W1UPCO AND CRSTS = 'A'
C+ ORDER BY CMPNY FOR FETCH ONLY
C/END-EXEC
C/EXEC SQL
C+ OPEN C
C/END-EXEC
C/EXEC SQL
C+ FETCH C INTO :RCODS
C/END-EXEC
You add a column to the table, and do NOT recompile this program.
Therefore the external DS doesn't match.
ALTER TABLE RCO
ADD COLUMN ...
I thought (many releases ago) that this used to generate a mild warning.
Then it became a hard halt.
I just tried it with seclvl 0 logging and STRDBG running and no warning
whatsoever. The data came from the cursor and worked just fine.
Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail
to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
http://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
midrange.com
