I am having a problem getting EXPOSE to work. The following is a test a
ran:
Code:
/** ooRexx test of expose **/
fld1="123456"
fld2=copies("C",20)
myclass = .tclass~new
myclass~testmethod
fld3=fld1||fld2
say fld3
return
::class tclass
::method testmethod public
expose fld1 fld2
fld1="abcdef"
fld2="123456789ZZZ"
::requires ooDialog.cls
Results of test:
Z:\>testexpose
123456CCCCCCCCCCCCCCCCCCCC
------------------------------------------------------------------------------
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
