OPNQRYF Bug
August 21, 2002 Timothy Prickett Morgan
Hey, Ted:
Well I thought that the code below was working for us:
OVRDBF FILE(file) SHARE(*YES) OPNQRYF FILE(file) RCDSLT(fld1 = 'A') RTVMBRD FILE(file) NBRCURRCD(&RECS) IF COND(&RECS *GT 0) THEN(DO) CALL PGMA ENDDO
|
But, I just did some testing and it looks like we’ve been using buggy code as you do need the CPYFRMQRYF to retrieve the correct number of records selected in the query .
Thanks for the article and for setting me straight.
— Rob
Sponsored By WORKSRIGHT SOFTWARE
|
|
On June 30, 2002,
On July 1, 2002, We have the solution! CASS certify your mailing names and addresses and presort your outgoing mail and save. Our CASS certification software ensures that your address files have valid ZIP Code and address information. Our presort software ensures that you can properly prepare you mail for delivery to your Post Office. WorksRight Software, Inc. is the number-one source for iSeries and AS/400 CASS, presort, ZIP Code, and area code software and data.
Visit our Web site – www.worksright.com – to learn more about our CASS and presorting software, or contact WorksRight Software, Inc., phone 601-856-8337, |
