Re: SQL5011 with multi row fetch and integer type in Data structure

That was a little off. The final "Good" was a typo on the declaration. It
should show that I can use integer when fetching one row at a time:
Good:
D C1arr DS qualified INZ
D PROD 35
D DESC 50
D ITYP 2
D TotInd 3u 0
D Market 5
D Sales 19 7
exec sql fetch C1 into :C1arr;




From: darren@xxxxxxxxx
To: "midrange-RPG RPG message board" <rpg400-l@xxxxxxxxxxxx>
Date: 10/28/2014 02:23 PM
Subject: SQL5011 with multi row fetch and integer type in Data structure
Sent by: "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>




I have the following declaration and then fetch statement. When I define
TOTIND as a 3u 0 (meaning unsigned integer) or a 3i0 (signed integer), the
compiler gives me SQL5011. But, if I define TOTIND as 3p 0 (packed 3,0) it
compiles fine. Does anyone know what rule I'm breaking by using an integer
here? The declare statement is going to be feeding a GROUPING(FIELD)
function into this variable. Also, if I don't use multi fetch, instead
just fetching 1 row at a time, its fine.

Fails:
D C1arr DS qualified dim(100) INZ
D PROD 35
D DESC 50
D ITYP 2
D TotInd 3u 0
D Market 5
D Sales 19 7
D
exec sql fetch C1 for 100 rows into :C1arr;

Good:
D C1arr DS qualified dim(100) INZ
D PROD 35
D DESC 50
D ITYP 2
D TotInd 3p 0
D Market 5
D Sales 19 7
D
exec sql fetch C1 for 100 rows into :C1arr;


Good:
D C1arr DS qualified dim(100) INZ
D PROD 35
D DESC 50
D ITYP 2
D TotInd 3p 0
D Market 5
D Sales 19 7
D

exec sql fetch C1 into :C1arr;

--
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.