RE: SQLCODE -104

Gary,

My apologies if this is something you already know.

The SQLCODE values are mapped to error messages in QSQLMSG.  You can get
additional information by combining 'SQL' with the value of SQLCODE without
the sign and displaying the message.  In your situation it would be dspmsgd
sql0104 msgf(qsqlmsg).

I know you already have your answer but maybe this will be helpful.

Rick


-----Original Message-----
From: Gary Kuznitz [mailto:docfxit@xxxxxxxxxxxx]
Sent: Monday, April 21, 2003 6:46 PM
To: Midrange Systems Technical Discussion
Subject: SQLCODE -104

Hi,

I'm trying to run SQL.  I'm getting an error saying:
Message . . . . :   RUN QUERY command failed with SQLCODE -
104.             
Cause . . . . . :   The SQLCODE is -104. The SQLSTATE is 42601.
The DB2 SQL 
  OS/400 message text for this error is: Token <END-OF-
STATEMENT> was not valid. Valid tokens: + - AS <IDENTIFIER>.


The source statements in a source member are:
SELECT                                                          + 
        COUNT(*) AS "NUMBER OF OBJECTS",                        + 
        SUM(CAST(ST_SIZE AS DEC(31))) AS "FILE SIZE",           + 
        SUM(CAST(ST_ALLOCSZ AS DEC(31))) AS "ALLOCATED
SIZE",   + 
        SUBSTR(DIRNAME,1,200) AS "DIRECTORY",                   + 
FROM                                                            + 
        QRYIFSLIB                                               + 
GROUP BY,                                                       + 
              SUBSTR(DIRNAME,1,200)                               

I created the above source object with:
CRTQMQRY QMQRY(GARY1/IFSLISTRUN)  +
SRCFILE(GARY1/QCLSRC) SRCMBR(IFSLISTQRY)

I am runing it in a cl pgm with:
STRQMQRY   QMQRY(GARY1/IFSLISTRUN)

Does anyone have any idea what might be causing this error?

TIA,

Gary Kuznitz
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo.cgi/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.