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



Steven wrote:

>I am trying to test if the OPNQRYF file
>produced has no records from the
>selection criteria.
>
>I can do this by using the DSPFD to an
>OUTFILE and then using DCLF and RCVF
>to read the 1st record which will contain
>the &field MBNRCD , to inform me
>if there are indeed 0 records.

Well there is another way.
I used to have the CL format a "plain language" string to pass to the HLL.
This string embodies the selection criteria.  In the HLL, print a page with
the plain language text.  This way the end user knew their request was
processed but produced no records.

CHGVAR &QRY 'Customer number' *cat &custA
CHGVAR &QRYSLT 'CUNO *EQ' *cay &custA
OPNQRYF...
CALL HLL (&QRY)
in the HLL you'd have an output page showing the selection criteria.

If you can't change the parameter list, use the LDA to pass the value.
  --buck


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.