RE: SQLRPG

Thanks for the help.
I've tried the code in another member containing only the SQL code and the host variable definitions.
Here's my SEU screen :

.....CL0N01N02N03Factor1+++OpcdeFactor2+++ResultLenDHHiLoEqComments++++
************** Début des données ************************************
C MOVE *ON *INLR
C MOVE *BLANK WNORF 7
C Z-ADD0 WCLTNO 90
C/EXEC SQL
C+ SELECT DNORF INTO : WNORF
C+ FROM DOSCLT
C+ WHERE DCLTNO = : OCLTNO AND
C+ DDOSAN = ' ' AND
C+ DDOSTY = 'R'
C+ FETCH FIRST ROW ONLY
C/END-EXEC
*************** Fin des données *************************************


And here's an extract from the compiler listing :

Colonnes . . : 1 71 Examen
SEU==>
000.40 100 C/EXEC SQL
000.41 * 5001 5001-**.. . . .
000.42 * 5006 5006-*. . . .
000.43 * 5007 5007-** . . .
000.44 * 5007 5007-**. .
000.45 * 5006 5006-* .
000.46 * 5015 5015-*****
000.47 200 C+ SELECT DNORF INTO : WNO
000.48 * 5001 5001-** . .. .. . .
000.49 * 5007 5007-**.. .. . .
000.50 * 5006 5006-*. .. . .
000.51 * 5007 5007-**.. . .
000.52 * 5006 5006-*. . .
000.53 * 5007 5007-**. .
000.54 * 5008 5008-**********.
000.55 * 5014 5014-*****

The compiler doesn't seem to like what I've put in positions 7 and 8.

As for CCSID, QCCSID and my job CCSID are set to 65535. I don't have this problem with SQLRPGLE.


-----Message d'origine-----
De : rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Simon Coulter
Envoyé : mercredi 1 octobre 2008 22:28
À : RPG programming on the AS400 / iSeries
Objet : Re: SQLRPG

What you haven't shown us is the section from the compiler listing showing the error and line number AND the lines in that area of the source (with line numbers). Probably something silly like a blank line or odd character but SEU should have caught those in RPG source.

Wouldn't be a CCSID issue perhaps? Source not in CCSID 37 and variant character in position 7 or 8?

Regards,
Simon Coulter.