In the below (QC10) code, I'm trying to get all bug history. "lst1.Count" indicates there are several thousand items, but the line "action = ar.action" fails where i>30. It seems that no matter what filter criteria I set, I can only get 30 records. Any ideas?

<font class="small">Code:</font><hr /><pre>Set arf = tdc.AuditRecordFactory

Dim TestFilter 'As TDAPIOLELib.TDFilter
Set TestFilter = arf.filter

TestFilter.filter("AU_ENTITY_TYPE") = "BUG"

Set lst1 = TestFilter.NewList
For i = 1 To lst1.Count
Dim ar 'As AuditRecord
Set ar = lst1.Item(i)
action = ar.action
MsgBox action
next</pre><hr />