Re: SQL0314-Position 41 Host variable EXCHANGE not unique.

Yes it is a drag.

I am sure it's defined elsewhere.  However I thought this was not a 
problem.  Because these routines have been in place for quite some time 
now.  It was last regenerated 3/31/04 and it wasn't a problem then.

I'd better just open a problem.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





<eulersid-400@xxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
02/17/2005 04:48 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: SQL0314-Position 41 Host variable EXCHANGE not unique.






It's a drag the way the pre-compiler gives up on the first variable the 
way it does. 
 
Are you sure the variable exchange isn't defined elsewhere in the program? 
 Host variable names have global scope in the module being created, even 
if the variable itself only has local scope. 
 
Cheers,
Eric Filson

rob@xxxxxxxxx wrote:
I thought this was fixed. In fact, I'm pretty darned sure local support 
for variables was added. Because parts of this program have been in place 
for quite a spell now.

However now I am getting 
SQL0314-Position 41 Host variable EXCHANGE not unique.
on some of my local variables. Another drag is, you fix one, and then it 
reports another variable.

CRTSQLRPGI OBJ(ROUTINES/SRVPGM) 
SRCFILE(ROUTINES/QRPGLESRC)
COMMIT(*NONE) 
OBJTYPE(*MODULE) 
TGTRLS(*CURRENT) 
DBGVIEW(*SOURCE) 

WRKPTFGRP
PTF Group Level Status 
SF99530 5032 Installed 
SF99529 38 Installed 
SF99503 3 Installed 
SF99295 2 Installed 
SF99287 7 Installed 
SF99282 3 Unknown 
SF99269 4 Installed 
SF99185 4 Installed 
SF99173 1 Not applicable
SF99139 1 Installed 
SF99099 2 Installed 


Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com

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