AW: Searching Schemas

[Phil (OmnisList)]

OK, Wow,

Hadn't seen the '+' used in this way before... not that its required, 
but interesting.

regards
Phil Potter
Based in Chester in the UK.

On 27/01/2021 10:19, Udo Sonnabend | WigaSoft AG wrote:
> Hi Kelly
>
> The REAL - One Liner ;-))))
>
> Quit method pick(#L1.$define(#S1)+$libs.$sendall($sendallref.$schemas.$sendall($sendallref.$objs.$sendall(#L1.$add($sendallref.$class().$name),$sendallref.$name='ClientNo')))>0,'',#L1)
>
> Greetings from Switzerland
> Udo.
>
> PS: I sent this to him private, but intended to see this "academic" approach for the list too. Weird Omnis.... 😉
>
> WigaSoft AG
> Udo Sonnabend
> Entwickler
>
> Oberstrasse 222 | Postfach 51 | CH-9014 St. Gallen
> Telefon +41 71 274 51 31 | www.wigasoft.ch<http://www.wigasoft.ch/> | U.Sonnabend at wigasoft.ch<mailto:U.Sonnabend at wigasoft.ch>
>
>
> Diese Mitteilung kann persönliche, vertrauliche oder rechtlich geschützte Informationen enthalten und ist nur für die Verwendung durch den beabsichtigten Empfänger bestimmt. Auf Vertraulichkeit oder Rechte wird aufgrund von Fehlübertragungen nicht verzichtet. Wenn Sie nicht der beabsichtigte Empfänger dieser Mitteilung sind, dürfen Sie diese in keiner Form verwenden, verbreiten oder kopieren. Haben Sie diese Mitteilung irrtümlich erhalten, dann löschen Sie diese und allfällige Kopien und benachrichtigen Sie bitte unverzüglich den Absender – besten Dank.
>
> P Bitte denken Sie an die Umwelt, bevor Sie dieses Mail drucken. Think before print!
>
> ________________________________
> Von: omnisdev-en <omnisdev-en-bounces at lists.omnis-dev.com> im Auftrag von Mike Matthews - Omnis <omnis at lineal.co.uk>
> Gesendet: Mittwoch, 27. Januar 2021 10:42
> An: OmnisDev List - English <omnisdev-en at lists.omnis-dev.com>
> Betreff: Re: Searching Schemas
>
> Beautiful work!
>
> Now what does it mean? It's like being back at school, it’s not the answer that is important, it’s the working out that gets you 90% of the marks. :)
>
> Mike Matthews
>
> Lineal Software Solutions
> Commercial House, The Strand<x-apple-data-detectors://1/1> Barnstaple, Devon, EX31 1EU<x-apple-data-detectors://1/1>
>
> omnis at lineal.co.uk<mailto:mike.matthews at lineal.co.uk>
>
> www.lineal.co.uk<http://www.lineal.co.uk/>
>
> www.sqlworks.co.uk<http://www.sqlworks.co/>
>
>
>
> On 27 Jan 2021, at 09:09, Kelly Burgess <kellyb at montana.com<mailto:kellyb at montana.com>> wrote:
>
> A one-liner version just for exercise.
>
> Do schemaList.$define(schemaName)
> +$clib.$schemas.$sendall(schemaName.$assign($sendallref.$name)
>    +$ref.$objs.$sendall(schemaList.$add(schemaName),$ref.$name=pColumnName))
> Quit method schemaList
>
> Kelly
>
> On Jan 26, 2021, at 2:37 PM, Kelly Burgess <kellyb at montana.com<mailto:kellyb at montana.com>> wrote:
>
> Hi Dawid,
>
> Here's another approach - pass in pColumnName, get a list back.  I'm still wondering if you could flatten all that into a one-liner with a $sendall...
>
> Kelly
>
>
> Do schemaList.$define(schemaName)
> Do $clib.$schemas.$first() Returns schemaRef
> While schemaRef
> Do schemaRef.$objs.$findname(pColumnName) Returns colRef
> If colRef
> Do schemaList.$add(schemaRef.$name)
> End If
> Do $clib.$schemas.$next(schemaRef) Returns schemaRef
> End While
> Quit method schemaList
>
>
>
> _____________________________________________________________
> Manage your list subscriptions at https://linkprotect.cudasvc.com/url?a=http%3a%2f%2flists.omnis-dev.com&c=E,1,5VeIlOo5XrXdmY4CvidZp_To3ljG3u8Q6HrksTV6Ol5TUyITgXfB4Ww23ap0Hcnsh0RlRA9bDFZ9jIuGYtiWg662OIplFED03NGDGZQJrKZ6-0s0DhPgSZcEXg,,&typo=1
> 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
> _____________________________________________________________
> Manage your list subscriptions at http://lists.omnis-dev.com
> Start a new message -> mailto:omnisdev-en at lists.omnis-dev.com