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



Has anyone seen this?


**************************
THIS CODE SNIPPET:
**************************


        DCL        VAR(&AND) TYPE(*CHAR) LEN(4) VALUE('*AND') +
                     /* QRYSLT string connector (*AND) */

   CHGVAR  VAR(&QRYSLT) VALUE('SBCRED *EQ "C" +
           *AND SBSKU *NE "*" *AND SBSQTY *NE 0 +
           *AND SBPRIC *NE 0 *AND SBSTAT *NE +
           "DELETED" *AND SASTAT *EQ "CLOSED"')

   CHGVAR     VAR(&QRYSLT) VALUE(&QRYSLT *BCAT &AND *BCAT +
                ('SADATE *EQ %CURDATE '))

   CHGVAR     VAR(&QRYSLT) VALUE(&QRYSLT *BCAT &AND *BCAT +
                &SASTOR)

   CHGVAR     VAR(&QRYSLT) VALUE(&QRYSLT *BCAT '"' *CAT +
                &WHSE *CAT '"')

***************************
GETS TURNED INTO THIS:
***************************

       8000 - OVRDBF FILE(BLOUTAB1) SHARE(*YES)

       9000 - OPNQRYF FILE((BLOUTAB1)) QRYSLT('SBCRED *EQ "C" *AND SBSKU
*NE
       "*" *AND SBSQTY *NE 0 *AND SBPRIC *NE 0 *AND SBSTAT *NE "DELETED"
AND
       SASTAT *EQ "CLOSED"  AND SADATE *EQ %CURDATE  AND SASTOR *EQ
"02"')
       KEYFLD((SASTOR) (SBCREA) (SBSKU) (SBSKUX))

***********************
PRODUCING THIS:
************************

     Missing operator in expression on QRYSLT parameter.

     Error occurred during processing of command.


Note the missing "*" on the last two " AND" statements


THIS WORKED IN CL, but not in CLLE

V5r1 w/database group ptfs, and latest CUM (probably the 2nd latest CUM)



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.