RE: Suppressing QMQRY interactive message displayed

Try CHGJOB STSMSG(*NONE) before the command and put it back after.

-----Original Message-----
From:   Laskosky, Matt [SMTP:MLaskosk@kmart.com]
Sent:   Wednesday, January 10, 2001 12:07 PM
To:     'RPG400-L@midrange.com'
Subject:        Suppressing QMQRY interactive message displayed

Hi All,

I am using SQL to populate a file interactively and I would like to suppress
the message that appears as the SQL statement is executed so the user will
not be aware that the SQL is executing.  The reason I desire to suppress
this message is that I believe that its display is causing some problems for
earlier versions of EPClient and I need to circumvent this problem. I am
aware that the user will experience a few moments where the system is
inhibited and that the SQL message my give some comfort to them in seeing
that a process is in progress but I am willing to forego this indulgence in
order to accomplish my goal. 

The interactive message displayed is formatted as:  "Query running. 1480
records selected, 425527 processed."

The statement used to execute the SQL statement is: STRQMQRY
QMQRY(KIP115Q) SETVAR((FRDATE &FRDATE) (TODATE &TODATE))

The SQL statement is: INSERT INTO QTEMP/HSF001W SELECT * FROM HSF001N2 WHERE
HSDATE > &FRDATE  AND HSDATE < &TODATE

Any help is greatly appreciated.

Thanks.
        Matt Laskosky
        Dynamic Information Services Corporation
        DynamicISC@Hotmail.com <mailto:DynamicISC@Hotmail.com> 





+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---