RE: Message queue is full...

My way -

D Not_Numeric S N


/free
Not_Numeric = %check('0123456789':charfield) > 0;

Francis Lapeyre
IS Dept. Programmer/Analyst
Stewart Enterprises, Inc.
E-mail: flapeyre@xxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Rick.Chevalier@xxxxxxxxxxxxxxx
Sent: Monday, May 14, 2007 11:01 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Message queue is full...


Charles,

Do you have to use MONITOR? Could what you want to do be done with operations?
Test for blanks with IF, numeric with TESTN. This would prevent the error
from occurring in the firs place.

Just at thought.

Rick

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Charles St-Laurent
Sent: Monday, May 14, 2007 8:50 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Message queue is full...

Hi!

I will try to receive the error in my on-error block... It seems that it is the
only real solution in my case...

Charles


<rob@xxxxxxxxx> a écrit dans le message de
news:OFC30A6E7D.D52474B2-ON852572DB.0049AA5F-852572DB.0049E512@xxxxxxxxxxxx

One of the drawbacks on monitor, in which the possibility of numerous
errors is high, is just what you cited. A method commonly used when
errors are smaller, but you still do not want them cluttering the job
log (since you've already handled them) is to use the api to receive a
message from the job message queue in he on-error logic to remove the
clutter. If that sounds like the ticket, respond back and someone may post a
sample.

Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Charles St-Laurent" <dringpiece@xxxxxxxxxxx> Sent by:
rpg400-l-bounces@xxxxxxxxxxxx
05/14/2007 08:06 AM
Please respond to
RPG programming on the AS400 / iSeries

<rpg400-l@xxxxxxxxxxxx>

To
rpg400-l@xxxxxxxxxxxx
cc

Fax to

Subject
Message queue is full...






Hi!

I run a program that detects decimal errors in files that I converted
from
S/36 environment to native externally described files. The way my
program works is simple: I trap the decimal errors with MONITOR
blocks. The only problem is: with big files, my program generates many
"decimal error"
messages in the background and sometimes I received a message saying
that the message queue is full.

The way I temporary patched my application is to launch it with *WRAP
parameter for my message queue but I do believe that it is not the
best solution. Is there any way to launch my program without changing
deeply my code and without generating this message? Or at least, can I
delete this message each time it is generated in my message queue?

Thanks in advance for your answers
Charles



--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/rpg400-l.

Privileged and Confidential. This e-mail, and any attachments there to, is
intended only for use by the addressee(s) named herein and may contain
privileged or confidential information. If you have received this e-mail in
error, please notify me immediately by a return e-mail and delete this e-mail.
You are hereby notified that any dissemination, distribution or copying of this
e-mail and/or any attachments thereto, is strictly prohibited.