loRecordDetails = CREATEOBJECT("Empty") ADDPROPERTY(loRecordDetails,"Name","") SELECT Customer SCAN FOR lSelect loRecordDetails.Name = Customer.Name loSelectedCustomerCollection.Add(loRecordDetails) ENDSCANNot a factor in being unable to release the collection but I don't think you're achieving what you want here - you are just adding multiple references to the same object into the collection. Try:
SELECT Customer SCAN FOR lSelect loRecordDetails = CREATEOBJECT("Empty") ADDPROPERTY(loRecordDetails,"Name","") loRecordDetails.Name = Customer.Name loSelectedCustomerCollection.Add(loRecordDetails) ENDSCANHTH,