infoobject count stops at 1000, how to increase?

[cmmrfrds]

When I retrieve an infoobject it stops at a count of 1000. Is there a setting to increase this count?

Set aResult = objInfoStore.Query(infoStr)

Debug.Print "result Count = "; aResult.ResultCount
Debug.Print " Count = "; aResult.Count

The resultcount is 1751, but it only brings back 1000 objects.

 

[cmmrfrds]

I found the answer buried in the documentation of the SDK. Adding a TOP 2000 to the query expands the limit. Now, I need the Path but it says the item does not appear in the collection. The other properties are available but not the Path. Any ideas?

infoStr = "Select TOP 2000 SI_UPDATE_TS, SI_NAME, SI_DESCRIPTION, SI_PATH From CI_INFOOBJECTS where "
infoStr = infoStr & "SI_PROGID='CrystalEnterprise.Report' and SI_INSTANCE=0"

Set aResult = objInfoStore.Query(infoStr)

Debug.Print "info Name = "; aResult(indx).Title
Debug.Print "info Desc = "; aResult(indx).Description
Debug.Print "date Item = "; aResult(indx).Properties.Item("SI_UPDATE_TS")
Debug.Print "path Item = "; aResult(indx).Properties.Item("SI_PATH")

 

[jrennatc]

The only way I've been successful at obtaining the path to a report is by using the parent id to query the parent object until you reach the top level.

'***********************************************************
'Get the path
'***********************************************************
Dim path
path = ""
Dim parentfolderid
parentfolderid = rsrow.ParentID

Dim tempobj
Set tempobj = iStore.Query("SELECT SI_ID, SI_NAME,
SI_PARENTID FROM CI_INFOOBJECTS WHERE SI_ID=" &
parentFolderID)
parentfolderid = tempObj.Item(1).ParentID
path = "/" + tempObj.Item(1).Title + path

Do While parentFolderID <> 0
Set tempObj = iStore.Query("SELECT SI_PATH,
SI_NAME FROM CI_INFOOBJECTS WHERE SI_ID="
&parentFolderID)
path = "/" + tempObj.Item(1).Title + path
parentFolderId = tempObj.Item(1).parentid
Loop

path = "Home" & path

 

[cmmrfrds]

Thank you. What I ended up doing was to just get the 1 parent folder and the current folder names. This was sufficient for my extract. I pulled out this information along with last modified date, owner name, creation date, title and loaded into an Access Table. This table sure makes it easier to find and report on the CE10 reports since we have over 1500 reports.