WAG - Is this is an RPG member type that you are trying to compile as
RPG-ILE?
My WAG doesn't sound right, but without seeing the compilation command it is
difficult to guess.
Can you show us the compile command and a little more of the code?
Paul
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxx> On Behalf Of Mike Wills
Sent: Thursday, August 16, 2018 11:23 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: SQLRPGLE Compile Error
Wow, I am really out of practice. I am having a compile error on a program
that I wrote quite a while ago. I am having issues getting it to compile.
I'm using free-format SQL and it appears like it's trying to compile this
into C specs. Thoughts as to where to look? This is program in production
and I need to make a minor change to.
031500
031500
031600 if sqlStt = SQL_SUCCESS;
031600
031700 //* exec sql
031700
031800 //* declare c1 cursor for sel;
031800
031900 //* exec sql
031900
032000 //* open c1;
032000
032000 C |Z-ADD -4
SQLER6 SQL 032000
======>aa b
*RNF5505 30 a 032000 Positions 6-7 are not blank in a free-format
calculation
specification.
*RNF5347 30 b 032000 An assignment operator is expected with the
EVAL operation.
*RNF5501 20 032000 The comment entry on a free-form calculation is
not valid.
*RNF5505 30 Positions 6-7 are not blank in a free-format
calculation
specification.
032000 C SQL_00008 |IFEQ 0
SQL 032000
======>aa
*RNF5505 30 a 032000 Positions 6-7 are not blank in a free-format
calculation
--
Mike Wills
http://mikewills.me
Ph: 507-933-0880
--
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:
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD
midrange.com
