Antwort von Herrn Lichte:
Das von mir beschriebene Problem habe ich gelöst und möchte es nachfolgend dem interessierten Leser in Form eines allgemein gehaltenen Beispiel-Skripts mitteilen. Das Skript erstellt aus allen Datensätzen mit Namen ‘Datensatz’ eine Liste mit Ordnername, Maximalwerten und Minimalwerten. Dieses Grundmuster kann nun nach Bedarf angepasst werden.
[code]
Dim List
Dim Path
Dim DataSet
Dim Result1
Dim Result2
Dim RetVal
List =..Objects({ “.*.fld”}).Names
Path = ..FullName : “\\”
For Each Row i in List Do
DataSet=$Path : List[i] : “\Datensatz.dat”$
Result1 = Result1 : GlobalMaximum(DataSet[1], EVENT_EXTRACT)
Result2 = Result2 : GlobalMinimum(DataSet[1], EVENT_EXTRACT)
List[i]=StringReplace(List[i], “.FLD”, “”)
End
RetVal=[ List, Result1, Result2]
[/code]
Gruß U. Lichte
