Re: Where Clause

You have to use "group by" clause to be able to use sum function.




                                                                                
             "Douglas W. Palme"                                                 
             <dpalme@xxxxxxxxxxx                                                
             >                                                               To 
             Sent by:                    "RPG Group" <rpg400-l@xxxxxxxxxxxx>    
             rpg400-l-bounces@mi                                             cc 
             drange.com                                                         
                                                                        Subject 
                                         Where Clause                           
             07/12/05 04:09 PM                                                  
                                                                                
                                                                                
              Please respond to                                                 
             RPG programming on                                                 
             the AS400 / iSeries                                                
             <rpg400-l@midrange.                                                
                    com>                                                        
                                                                                
                                                                                




I have setup a test sqlrpgle program with the following in the c spec and I
am immediately getting a compiler error about the where clause not expected
valid tokens from, into:

any suggestions would be appreciated.

 C/EXEC SQL
 C+ DECLARE CUSTCURSOR CURSOR
 C+ FOR SELECT ILNINV#A, ILNSOLDTO, ILNSTK,
 C+ ILNDESC, SUM(ILNEPRICE), SUM(ILNEUAVCST),
 C+ SUM(ILNEPRICE) - SUM(ILNEUAVCST) AS MARGIN,
 C+ FROM IMPILN00
 C+ WHERE ILNVDATE >= :SDATE AND
 C+ ILNINVDATE <= :EDATE GROUP BY ILNINV#A,
 C+ ILNSOLDTO, ILNSTK, ILNDESC ORDER BY MARGIN DESC
 C/END-EXEC

If you bought, it was hauled by a truck - somewhere, sometime.

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