Searching Schemas

[Kelly Burgess]

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