FindItem Method

Visual LANSA Feature

FindItem Method

FindItem calls the OnFind method on the Design Interface for each item.

Each Tree item is called in sequence, receiving the value to be tested and returning a boolean result.  Once a positive result is returned, the Find will end.  It can be started again from the item that returns the result.

Mthroutine Name(Search)
Define_Com Class(#Prim_Tree.TreeItem) Name(#FoundItem) Reference(*dynamic)
Begin_Loop
#FoundItem <= #Tree.FindItem( #Search #FoundItem )
Leave If(#FoundItem *Is *null)
End_Loop
Endroutine