Re: SQL pre-compiler & the new Template keyword -- RPG400-L

Ok, template looks ok.

d TD_CalTypeId...
d e ds ExtName(CALTYPIDP)
d Qualified
d Template

Not sure why the first definition is compiling. It shouldn't because you are
specifying Qualified again. It should be.

d dsCaltypId...
d ds LikeDs(TD_CalTypeId)
d Dim(MAX_READ)

The third one is defined correctly but I don't think SQL supports Array of
records yet. Try making it a multiple occurance data structure.

d dsCalTypId...
d ds LikeDs(TD_CalTypeId)
d Occurs(MAX_READ)

On Wed, Apr 6, 2011 at 10:28 AM, Kurt Anderson <kurt.anderson@xxxxxxxxxxxxxx

wrote:

Alan, that's good to hear.
I guess my next step is to see if we can get the latest PTF cume (we are
never up to date on them). But even so, I found a handout by Barbara Morris
stating that the SQL Precompiler, " Supports all the new features in ILE RPG
V6R1." Which means I either have a code issue, or I need to open a PMR.

I'll give some more detail (as it turns out the caveat I previously
mentioned wasn't exactly what's happening in my situation).

I have a copybook with the following D-spec.
// Shared Templates
D dsTmpl_CalTypTID...
D E DS Qualified Template
D ExtName( 'CALTYPTIDP' )

In the service program module, I have the following code, which does
compile:
D ds_CalTypTID E DS ExtName( CalTypTIDP ) Qualified
D Dim( MAX_BLOCK_READ )

However what I want is this, which does not compile (due to SQL below).
The Verifier says this is ok for the rest of the RPG code.
D ds_CalTypTID DS LikeDS( dsTmpl_CalTypTID )
D Dim( MAX_BLOCK_READ )

The SQL that uses this DS based on a Template that is failing in the
pre-compile is this:
Exec SQL
Fetch CalTypTIDPCursor FOR :epMaxRead ROWS into :ds_CalTypTID;

Precompiler listing:
DS_CALTYPTID 53
DS_CALTYPTID **** 1098

SQL5011 30 1098 Position 59 Host structure array DS_CALTYPTID not
defined or not usable.

Thanks,

Kurt Anderson
Sr. Programmer/Analyst
CustomCall Data Systems

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Alan Campin
Sent: Tuesday, April 05, 2011 3:46 PM
To: RPG programming on the IBM i / System i
Subject: Re: SQL pre-compiler & the new Template keyword

Yep.

On Tue, Apr 5, 2011 at 2:15 PM, Kurt Anderson
<kurt.anderson@xxxxxxxxxxxxxx<mailto:kurt.anderson@xxxxxxxxxxxxxx>>wrote:

Interesting. I suppose one caveat is that these are procedure
parameters defined like template data structure subfields. Are you doing

that as well?

Thanks,
Kurt

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Alan Campin
Sent: Tuesday, April 05, 2011 2:40 PM
To: RPG programming on the IBM i / System i
Subject: Re: SQL pre-compiler & the new Template keyword

It was at V6R1. I do it all the time

On Tue, Apr 5, 2011 at 10:53 AM, Kurt Anderson <
kurt.anderson@xxxxxxxxxxxxxx<mailto:kurt.anderson@xxxxxxxxxxxxxx>

wrote:

Does anyone know if we can expect the SQL pre-compiler to be updated
any time soon to allow for the use of variables that have been
defined like a variable/DS that has the Template keyword specified?
We use the Template keyword a lot. Most of our file encapsulated
service programs include a template of the file in the copybook that
the service program uses for defining pretty much all variables
related to the file (and for prototypes, which is why it's in the

copybook).

I'm taking a stab at creating a file encapsulated service program
using SQL instead of native I/O and quickly discovered that the SQL
pre-compiler is not a fan of templates.

I'm at IBM i 6.1.

Thanks,
Kurt Anderson
Sr. Programmer/Analyst
CustomCall Data Systems
--
This is the RPG programming on the IBM i / System i (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx<mailto:

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<mailto:

RPG400-L-request@xxxxxxxxxxxx> Before posting, please take

a moment to review the archives at

http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx<mailto:

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<mailto:

RPG400-L-request@xxxxxxxxxxxx> Before posting, please take a

moment to review the archives at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx<mailto:

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<mailto:

RPG400-L-request@xxxxxxxxxxxx> Before posting, please take a

moment to review the archives at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx<mailto:
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<mailto:
RPG400-L-request@xxxxxxxxxxxx>
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.

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