Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to pass value of parameters from UI to BIZ to DA
Message
 
 
To
19/01/2008 13:33:36
Dragan Nedeljkovich (Online)
Now officially retired
Zrenjanin, Serbia
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01283283
Message ID:
01283302
Views:
10
>>The only way I see passing the values of from UI to BIZ to DA is by passing them as parameters when instantiating BIZ class and respectively DA class. But the number of this properties/parameters would be too many and kludgy. So I am looking for a better way.
>
>No, there's only one parameter - the object itself.
>
>You'll need something like this (in metacode):
>
>
*-- the new object's .init
>lparameters toParent
>n=amembers(aPr, toParent, "UC")
>for i=1 to n
>   lcProp=aPr[i]
>   do case
>      case inlist(lcProp, "name" ... and any other property we want to skip)
>*-- do nothing
>      case {any other exception}
>*-- do nothing
>      case pemstatus(this, lcProp, 5)
>         this.addproperty(lcprop, getpem(toParent, lcProp))
>   endcase
>endfor
>
>Not eactly sure of the aPr array, may need to look at what exactly does aMembers do for various parameters - this is just to get you started, but shouldn't need much work.

Dragan,

I understand what you are suggesting. I think it should work. Thank you very much for your help.
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform