$OS 8.1.7.2 $sendall

[Mike Rowan]

My thanks to all who contributed to this conversation. In the end I adopted
Mayada's solution, which is what I was attempting to construct for myself.
It was a foggier morning than I would like!

John, the reason for E and e is that they do different things to different
objects.  I will, however change the flags to %Enable and %enable, and so
on for visible.

On Wed, Jun 10, 2020 at 1:59 AM John Boehme <john at integralservices.biz>
wrote:

> Hi Mike,
>
> Something like this:
>
> void $enableFields( item ref pParent )
>
>       Do
>
> pParent.$objs.$sendall($sendallref.$enabled.$assign(pEDmode>0),pos('E',$ref.
> $userinfo)) ## enable/disable in the current container
>       Do
>
> pParent.$objs.$sendall($sendallref.$enabled.$assign(pEDmode>0),pos('e',$ref.
> $userinfo))
>       # Travel through container objects.
>       Do
>
> pParent.$objs.$sendall($cinst.$enableFields($sendallref),pos($sendallref.$ob
> jtype,'complexgrid,scrollbox,pagepane,tabpane,groupbox,subwindow'))
>
> First call to the method would be:
>
> Do $cinst.$enabledFields( $cinst )
>
> $cinst=the window making the call.
>
> Just as a note, I would try and change the double-sendall for "E" and "e"
> to
> one line. You're basically looping through all the objects twice the
> current
> way.
> Maybe something like: pos('E',upp($sendallref.$userinfo))
>
> Good luck. Hope this helps.
>
> John Boehme
> 940-597-3046
>
> -----Original Message-----
> From: omnisdev-en [mailto:omnisdev-en-bounces at lists.omnis-dev.com] On
> Behalf
> Of Mike Rowan
> Sent: Monday, June 8, 2020 7:06 PM
> To: OmnisDev List - English
> Subject: $OS 8.1.7.2 $sendall
>
> Hi
> I hope we are all well.
>
> I need to tidy up a sendall problem.
>
> I have a method in my superclass window, $enable.
>
> It runs the following lines on enter fields where the $userinfo is either E
> or e.
> pEDmode is a parameter to cause enabling or disabling.
>
> Do
>
> $cinst.$objs.$sendall($ref.$enabled.$assign(pEDmode>0),pos('E',$ref.$userinf
> o))
> Returns %R
> Do
>
> $cinst.$objs.$sendall($ref.$enabled.$assign(pEDmode=0),pos('e',$ref.$userinf
> o))
> Returns %R
>
> but this does not enable entry fields in subwindows, tab panes etc.
>
> I need a nested sendall perhaps but what I have tried does not work.  Can
> anyone advise?
>
> Ever grateful.
> _____________________________________________________________
> Manage your list subscriptions at http://lists.omnis-dev.com Start a new
> message -> mailto:omnisdev-en at lists.omnis-dev.com
>
> _____________________________________________________________
> Manage your list subscriptions at http://lists.omnis-dev.com
> Start a new message -> mailto:omnisdev-en at lists.omnis-dev.com
>