|
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.
As an Amazon Associate we earn from qualifying purchases.
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.