OutputCurveLength

// Outputes attributes (length in this case) of a feature to the console

// Let myGS (OpenBodyFeature)
Let myList (List)
Let myFeature (Curve)
Let myLength (Length)
Let sID (String)
Let i (Integer)

myList = myGS.Query("Curve" , "")
Notify("Extracting features: " , myList.Size() )

Trace(1,"Report Run: " + DateFormat("%H:%M"))

i = 1
for i while i <= myList.Size() {
	myFeature = myList.GetItem(i)
	sID = myFeature.Name()
	myLength = length(myFeature)
	Trace(1, "# : #", sID , myLength)

	i = i + 1
}