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



No, I had a few mis-placed quotes. The correct qryslt
statement looks like this;

 QRYSLT('LSTCHG *GE ' *CAT &BEGUPD *CAT +
 ' *AND LSTCHG *LE ' *CAT &ENDUPD *CAT +
 ' *AND RECTYP = "M" ')

Thanks for the speedy responses.  Boy, this list sure
does make life easier.

Rich
--- Finucci Domenico <Domenico.Finucci@Fiditalia.it>
wrote:
> Good morning, Richard.
> Does your file have two formats  with same fields ?
> Sincerely
> Domenico Finucci
> Fiditalia , Milano, 02- 4301-2494
>
>
> -----Messaggio originale-----
> Da: Richard Reeve [mailto:richreeve@yahoo.com]
> Inviato: luned́ 3 dicembre 2001 16.49
> A: midrange-l@midrange.com
> Oggetto: OPNQRYF problem
>
>
> All,
>
>      I am attempting an open query in a CL.  It
> compiles fine, but when I run the CL I get the
> following message/joblog;
>
>  Operand for *NL function not valid.
>
>  Error occurred during processing of command.
>
>  Function check. CPF9899 unmonitored by MEHLD04J at
> statement 800,
>    instruction X'002C'.
>
>  CPF9899 received by MEHLD04J at 800. (C D I R)
>
>  CPF9899 received by MEHLD04J at 800. (C D I R)
>
>
> the CL is as follows;
>  BEGIN:         PGM
>
>   DCL        VAR(&BEGUPD    ) TYPE(*CHAR) LEN(07)
>
>   DCL        VAR(&ENDUPD    ) TYPE(*CHAR) LEN(07)
>
>   DCLF       FILE(EXHMAS)
>
>   RTVDTAARA  DTAARA(BACKBRIDGE (51 7))
> RTNVAR(&BEGUPD)
>
>   RTVDTAARA  DTAARA(BACKBRIDGE (58 7))
> RTNVAR(&ENDUPD)
>
>   OVRDBF     FILE(EXHMAS) TOFILE(EXHMAS) SHARE(*YES)
>
>   OPNQRYF    FILE((EXHMAS)) FORMAT(EXHMAS REXHMAS) +
>
>                           QRYSLT('LSTCHG *GE "' *CAT
>                &BEGUPD + *CAT '" *AND LSTCHG *LE "'
>                *CAT + &ENDUPD *CAT '" *AND RECTYP
>                = "M" ')
>
>
>              CALL PGM(MEHLD04I)
>  END:        ENDPGM
>
> Any ideas about what I am doing wrong?
>
>
> =====
>
>
> __________________________________________________
> Do You Yahoo!?
> Buy the perfect holiday gifts at Yahoo! Shopping.
> http://shopping.yahoo.com
> _______________________________________________
> This is the Midrange Systems Technical Discussion
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit:
>
http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> or email: MIDRANGE-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/midrange-l.
> _______________________________________________
> This is the Midrange Systems Technical Discussion
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit:
>
http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> or email: MIDRANGE-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/midrange-l.
>


=====


__________________________________________________
Do You Yahoo!?
Buy the perfect holiday gifts at Yahoo! Shopping.
http://shopping.yahoo.com


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

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.