Step 1:  Analyze your Query/400 query for conversion to SQL with ANZQRY.
Step 2:  CRTSRCPF FILE(MYLIB/QQMQRYSRC)
Step 3:  RTVQMQRY QMQRY(MYLIB/MYQUERY) SRCFILE(MYLIB/QQMQRYSRC) 
ALWQRYDFN(*YES)
Step 4:  Add distinct with:  EDTF FILE(MYLIB/QQMQRYSRC) MBR(MYQUERY)
Step 5:  "Compile" query with:  CRTQMQRY QMQRY(MYLIB/MYQUERY) 
SRCFILE(MYLIB/QQMQRYSRC) SRCMBR(MYQUERY)
Step 6:  Execute query with:  STRQMQRY QMQRY(MYLIB/MYQUERY)
For more information:
http://publib.boulder.ibm.com/infocenter/iseries/v6r1m0/index.jsp?topic=/rzatc/sc415703.pdf
Rob Berendt
As an Amazon Associate we earn from qualifying purchases.
	
 
This mailing list archive is Copyright 1997-2025 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.