IBM Rexx does not have an EXPOSE instruction, it has PROCEDURE EXPOSE,
which works the same way in Object Rexx (but, like IBM Rexx, only with
internal calls to a label).  There's no way to expose the caller's
variables to a method.  That would break all of the principles of object
encapsulation.

Rick


On Tue, Dec 17, 2013 at 9:39 AM, Sanford Geiger <sanford.gei...@live.com>wrote:

> Ok, but this is NOT how IBM Rexx works. Is there a way to make all
> variables in a program be made available to any routine or method?
>
>
>
>
>
> *From:* Rick McGuire [mailto:object.r...@gmail.com]
> *Sent:* Tuesday, December 17, 2013 9:34 AM
> *To:* Open Object Rexx Developer Mailing List
> *Subject:* Re: [Oorexx-devel] Problem Using EXPOSE
>
>
>
> Sorry, accidentally hit enter while in gmail, so the reply was sent early.
>
>
>
> myclass = .tclass~new
>
> myclass~testmethod2
>
>   fld3=fld1||fld2
>
>   say fld3
>
>    myclass~testmethod2
>
>
>
>   return
>
> ::class tclass
>
> ::method testmethod1
>
> expose fld1 fld2
>
> fld1="abcdef"
>
> fld2="123456789ZZZ"
>
>
>
> ::method testMethod2
>
>     expose fld1 fld2
>
>     say fld1||fld2
>
>
>
>  The values assigned to the instance variables in testmethod1 are
> available in testmethod2.
>
>
>
> Rick
>
>
>
>
>
> On Tue, Dec 17, 2013 at 9:30 AM, Rick McGuire <object.r...@gmail.com>
> wrote:
>
> Wow, there is so much wrong with this example that I don't even know where
> to start.  Expose exposes instance variables of an object, it does NOT give
> access to the caller's variables.  Methods of an object instance share
> access to those variables by using expose.  Here is a simple example of
> using expose based on your program:
>
>
>
>
>
>
>
> On Tue, Dec 17, 2013 at 9:21 AM, Sanford Geiger <sanford.gei...@live.com>
> wrote:
>
>
>
>   I am having a problem getting EXPOSE to work. The following is a test a
> ran:
>
>
>
>
>
> Code:
>
>      /**  ooRexx test of expose  **/
>
>
>
> myclass = .tclass~new
>
> myclass~testmethod
>
>   fld3=fld1||fld2
>
>   say fld3
>
>   return
>
> ::class tclass
>
> ::method testmethod1
>
> expose fld1 fld2
>
> fld1="abcdef"
>
> fld2="123456789ZZZ"
>
>
>
> ::method testMethod2
>
>     expose fld1 fld2
>
>
>
>
>
> ------------------------------------------------------------------------------
> Rapidly troubleshoot problems before they affect your business. Most IT
> organizations don't have a clear picture of how application performance
> affects their revenue. With AppDynamics, you get 100% visibility into your
> Java,.NET, & PHP application. Start your 15-day FREE TRIAL of AppDynamics
> Pro!
> http://pubads.g.doubleclick.net/gampad/clk?id=84349831&iu=/4140/ostg.clktrk
> _______________________________________________
> Oorexx-devel mailing list
> Oorexx-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
>
>
>
>
>
> ------------------------------------------------------------------------------
> Rapidly troubleshoot problems before they affect your business. Most IT
> organizations don't have a clear picture of how application performance
> affects their revenue. With AppDynamics, you get 100% visibility into your
> Java,.NET, & PHP application. Start your 15-day FREE TRIAL of AppDynamics
> Pro!
> http://pubads.g.doubleclick.net/gampad/clk?id=84349831&iu=/4140/ostg.clktrk
> _______________________________________________
> Oorexx-devel mailing list
> Oorexx-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
>
------------------------------------------------------------------------------
Rapidly troubleshoot problems before they affect your business. Most IT 
organizations don't have a clear picture of how application performance 
affects their revenue. With AppDynamics, you get 100% visibility into your 
Java,.NET, & PHP application. Start your 15-day FREE TRIAL of AppDynamics Pro!
http://pubads.g.doubleclick.net/gampad/clk?id=84349831&iu=/4140/ostg.clktrk
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to