RE: Command with Return Variables -- HELP !!

Two things:
 
1) Use a global MONMSG rather than after each assignment.  For global MONMSG, 
just put the command (with no EXEC() between the DCL and the first "operation."
 
2) Move to another language.  One of the first things I do in order to improve 
performance is to look for CL programs in the way, and convert them to 
something less costly.  (Usually, I prefer MI, but RPG/COBOL/C... are all fine.)
 
HTH

________________________________

From: midrange-l-bounces@xxxxxxxxxxxx on behalf of Mike savino
Sent: Fri 10-Sep-04 1:52 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Command with Return Variables -- HELP !!



I have a command with many Return Variables. Most of the time that the
command is used, only several of the return variable Parms will be supplied.
For example, Sometimes it will be ParmA and ParmC and other times ParmB and
ParmD, etc. with no particular pattern or frequency.
So the missing parms are passed to the CPP as Null Pointers (I think). The
CPP, which is a CL Program, currently tries to stuff a value in all the
Parameters that can be returned, whether they were passed or not. If the
Parameter was not passed, this results in message MCH3601 "Pointer not set
for location referenced". The Program monitors for this message after every
assignment and the correct return values are passed back to the command. It
works, but it's Ugly.

It's also slow. And I think that the fact that this message is being thrown
and then trapped about 15-20 times is what's causing the Performance
issue.... I'm sure it couldn't possibly be my code. ;)

My question is whether or not there's a more elegant way to do this within
CL. Is there a way to Test the parameter before doing the assignment? Or any
other little trick that anyone's aware of to prevent the error.

Thanks,

Mike

_________________________________________________________________
Check out Election 2004 for up-to-date election news, plus voter tools and
more! http://special.msn.com/msn/election2004.armx

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.





This message is for the designated recipient only and may contain privileged, 
proprietary, or otherwise private information.  If you have received it in 
error, please notify the sender immediately and delete the original.  Any other 
use of the email by you is prohibited.