Hilfe für Script

Hallo Forum,

ich scheitere grade wiederholt an einem Script für eine Suche:
Aus dem View heraus sollen zwei Felder in einer Attributtabelle nach einzugebenden Texten abgefragt werden.
Sprich: zuerst sollen Eingaben gemacht werden für Ort und Straße, und die sollen dann in der Tabelle gefunden werden (jede Straße gibt es in jedem Ort nur einmal). Anschließend soll auf die Straße gezoomt werden.

Hier mein Code (soweit ich komme):

'find.street
theView = av.getactivedoc
theThemelist = theView.getactivethemes
theTheme = theThemelist.get(0)
theFTab = theTheme.getFTab
aField = theFTab.FindField("Ort","Betextung1")

eingabefelder = {"Ort", "Straße"}
standardwerte = {"",""}

key = MsgBox.MultiInput( "Welche Straße suchen Sie?", "", eingabefelder, standardwerte)


if (key <> Nil) then
rec = theFTab.Find(key)
if (rec = Nil) then
MsgBox.Warning("Keine Treffer.","")
else
b = theFTab.GetVTab.GetSelection
b.ClearAll
b.Set(rec)
theFTab.GetVTab.UpdateSelection
'theFTab.ShowRow(theFTab.ConvertRecordToRow(rec))
end
end

av.GetProject.SetModified(true)
theView = av.GetActiveDoc
r = Rect.MakeEmpty
for each t in theView.GetActiveThemes
if (t.CanSelect) then
r = r.UnionWith(t.GetSelectedExtent)
end
end
if (r.IsEmpty) then
return nil
elseif ( r.ReturnSize = (0@0) ) then
theView.GetDisplay.PanTo(r.ReturnOrigin)
else
theView.GetDisplay.SetExtent(r.Scale(1.1))
end


Ich schätze, ich habe die Übergabe der Eingabe-Werte noch nicht richtig geregelt, kann das aber nicht ausprobieren, weil ich immer die Fehlermeldung "Funktion FIND ist unbekannt" erhalte.

Könnt Ihr mir weiterhelfen?

Danke im Vorraus,
Maggie