× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: SQL Statement
  • From: "R. Bruce Hoffman, Jr." <rbruceh@xxxxxxxxxxxxx>
  • Date: Wed, 9 Feb 2000 15:49:15 -0500

Don't really see any particular reason related to the statement.  That is if
you have the OPEN, the FETCH and the CLOSE in addition to the CURSOR
declaration.

===========================================================
R. Bruce Hoffman, Jr.
 -- IBM Certified AS/400 Professional System Administrator
 -- IBM Certified AS/400 Professional Network Administrator

"The sum of all human knowledge is a fixed constant.
    It's the population that keeps growing!"

-----Original Message-----
From: Gade_R_Reddy@consecofinance.com <Gade_R_Reddy@consecofinance.com>
To: RPG400-L@midrange.com <RPG400-L@midrange.com>
Date: Wednesday, February 09, 2000 3:35 PM
Subject: SQL Statement


>
>Hi,
>
>I have an SQL statement which run perfectly in runsqlstm on the command
>line but fails in  my SQLRPGLE program.
>
>Here is the statement.
>
>  Select AGNTID, EMPNAM, LONAPP, QUOTDT, QTPREM
>    From AGPRPEZM
>    left outer join AGPRPEZD on
>               AGPRPEZM.QUOTID  = AGPRPEZD.QUOTID
>    left outer join AGPRPT05 on
>               AGNTID = EMPNUM
>    Where APPYDT  = '2000-02-07'
>          and (SRCTYP = 9 OR SRCTYP = 10 OR SRCTYP = 11 OR
>               SRCTYP = 12 OR SRCTYP = 20)
>          Order by AGNTID
>
>
>My APPYDT field is L data type in the physical file.
>
>When i run on the command line it returns me 6 records but in my RPG
progam, it return zeros. ( have this SQL statement as Cursor in the program)
>
>Any suggestions please.
>
>Thanks.
>Gade.
>
>+---
>| This is the RPG/400 Mailing List!
>| To submit a new message, send your mail to RPG400-L@midrange.com.
>| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
>| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator:
david@midrange.com
>+---
>

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.