RE: SQL equivalent of query needed

It should do -  either create a new query or use an existing one
and this function creates the SQL equivalent statements.

Heres one I just rolled (from a customers existing Query)

H QM4 05 Q 01 E V W E R 01 03 05/07/03 12:47

V 1001 050 A matt N Q summary for cutting all F cutall1

V 5001 004 *HEX

SELECT

  ALL       T01.PICOMP, T01.PIMSPR, T01.PSMTYP, T01.MCDESC, T01.MODEL,
T01.QTY, 
            T01.PIBWEK, T01.PIBDAY, T01.PIBSEQ, T01.PIBDAT, T01.PILWEK,

            T01.PILDAY, T01.PILSEQ, T01.PISPEC, T03.PDES35,

            SUBSTR(T03.PDES35,6,12) AS TICK, T01.PIWIDE, T01.PIBCOD,
T01.PMBHGT 
,           T01.T, T01.PSPC5, T01.MSQLTD, T01.PSPC6, T01.MSQLTD01

  FROM      JIMLIB/NONQLT1 T01,

            MSPDTA/PRDSPCK T02,

            MSPDTA/JBAINPL0 T03

  WHERE     T01.PISPEC = T02.PSSPEC

    AND     T02.PSTIC5 = T03.PNUM35

  ORDER BY  016 ASC, 005 ASC, 017 ASC

Mike 

                Does that work for Query/400?

                > -------- Original Message --------
                > Subject: RE: SQL equivalent of query needed
                > From: "Barton, Mike" <Mike.Barton@xxxxxxxxxxxxxxxxx>
                > Date: Mon, March 07, 2005 7:24 am
                > To: "'Midrange Systems Technical Discussion'"
<midrange-l@xxxxxxxxxxxx>
                > 
                > Murali
                >       I'm no expert on SQL but....
                > 
                > Since u have a query in existence, u can use the RTVQMQRY
command
                > 
                > Create a source file first then:
                > RTVQMQRY QMQRY(QRYLIB/QRY) SRCFILE(YOURLIB/QMQSRC)
ALWQRYDFN(*YES)
                > 
                > This will extract an SQL equivalent.
                > 
                > HTH
                > 
                > Mike
                > 

###########################################

This message has been scanned by F-Secure Anti-Virus for Microsoft Exchange.
For more information, connect to http://www.F-Secure.com/

**********************************************************************
This communication and the information it contains: - (a) Is intended for the 
person(s) or organisation(s) named above and for no other person(s) or 
organisation(s). Access to this mail by anyone else is unauthorised. (b) Is 
confidential, and may be legally privileged or otherwise protected in law. 
Unauthorised use, circulation, copying or disclosure of any part of this 
communication may be unlawful. (c) May be susceptible to interference, and 
should not be assumed that it has come in its original form and/or from the 
stated sender or PinkRoccade UK accepts no responsibility for information, 
errors or omissions in this e-mail or use or misuse thereof or any act done or 
omitted to be done in connection with this communication. If you are not the 
intended recipient, please inform postmaster@xxxxxxxxxxxxxxxxx immediately and 
delete it and all copies from your system.

www.pinkroccade.co.uk
**********************************************************************