Re: anyone using PROGRAM STATUS clause inSPECIAL-NAMES?

What information is it that you want to access? Perhaps there's a better
way to get at that information as you're not really interested in program
status due to error conditions.

Bruce Vining




"Michael Rosinger" <mrosinger@xxxxxxxxx>
Sent by: cobol400-l-bounces@xxxxxxxxxxxx
04/17/2007 10:00 AM
Please respond to
COBOL Programming on the iSeries/AS400 <cobol400-l@xxxxxxxxxxxx>


To
cobol400-l@xxxxxxxxxxxx
cc

Subject
Re: [COBOL400-L] anyone using PROGRAM STATUS clause inSPECIAL-NAMES?






"Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx> wrote in message
news:mailman.3101.1176816271.2544.cobol400-l@xxxxxxxxxxxxxxx

I suppose a hard-coded divide by zero in your startup routine isn't a

huge

impact on a long-running program. If it's a sub-program that you call
over
and over again it might be a little uglier.

Your point is well-taken - for a main program it isn't a big deal but for
a
sub-routine I would have to set up a first-time-through-switch to only do
it
the first iteration.
I really don't like "hacks" like that but if that is my only option I will

do so. I just can't believe that there is not a proper way to get that
area
populated other than forcing a "fake" error.