Re: Local Procedures

[Bob Helm <Bob.Helm@MEDIWARE.COM>]

I think it should be:

begin-procedure NEWLY_HIRED LOCAL(:$NEWHIRE)

but don't hold me to it..

Hope it helps.

B
The Programmer formerly known as Bob
Mediware Information Systems Inc.
(913) 307-1045
Bob.Helm@Mediware.com


This message has been sent using 100% recycled electrons





-----Original Message-----
From: Ken Boettger [mailto:BoettgeK@CWU.EDU]
Sent: Friday, April 05, 2002 5:28 PM
To: SQR-USERS@list.iex.net
Subject: Local Procedures


When I add "LOCAL" to the following procedure I generate a "bad argument
list" error.  When I remove LOCAL, everything works fine.  What am I doing
wrong?



      begin-procedure NEWLY_HIRED(:$NEWHIRE)

             LET $NEWHIRE = 'Y'

      end-procedure NEWLY_HIRED



The above works, what follows does not

      begin-procedure NEWLY_HIRED(:$NEWHIRE) LOCAL

              LET $NEWHIRE = 'Y'

      end-procedure NEWLY_HIRED


The call is simply DO ($NEWHIRE).

-Ken