Re: Subprocedure global/local ?

Does G#AddMsgSF accepts CallStack/MessageQueue as a parameter for caller
to specific what callStack should the message to send to? If so,
passing the program name in this parameter should resolve you problem.

Note: I'm assuming that G#AddMsgSF is a customized version of QMHSNDPM
and also assuming that the value of SFLPGMQ is * or program name.


"Smith, Mike" <Mike_Smith@xxxxxxxxxxxxxxxx> wrote in message
news:<mailman.6644.1219842260.2545.rpg400-l@xxxxxxxxxxxx>...
I am trying to make myself use subprocedures more- rather than
subroutines. I have run into a little problem, and I'm not quite sure
what I need to do.

I have a procedure in a service program that is used for displaying
messages in display files. I use this all the time.

Now I have written a data entry program that has quite a bit of
validation. I have written another service program that has the
validation in it. Because there is a lot of validation I put all of
these within a subprocedure in my main program. Here is where the
problem occurs. My messages don't display. If I simply change the
subprocedure to a subroutine, my messages display.

PGM1
CALLP checkvalid

Pr checkvalid

C Eval PaverErr = valid_paver(cscrew)
C If PaverErr = *On
C Move 'RG1010 ' MSGID
C CallP G#AddMsgSF(MSGID:' ':
C 'RGCMSGF')
C EndIf


G#ADDMSGSF is in service program
Valid_paver is in a separate service program.
Checkvalid is subprocedure in main pgm

Any ideas on how to make this work.

Mike
----------