function readOnly(count){ }
Starting November 20, the site will be set to read-only. On December 4, 2023,
forum discussions will move to the Trailblazer Community.
+ Start a Discussion
AhlomonAhlomon 

How to get more than 2000 rows back in my function?

I know my SQL should return about 3500 rows back, but the code below returns only 2000 rows back.
What I have to do to get all 3500 rows back?
 
 
================================================================
Private Function GetTSR() As Boolean
        Dim qr As sforce.QueryResult
        Dim queryString As String
      
        queryString = "Select Id,Name,CreatedDate,CreatedById,Status__c,Service_Date__c,Hr__c from IS_TSR__c"
        Try
            qr = binding.query(queryString)
            If Not qr.records Is Nothing Then
                Dim i As Integer
                For i = 0 To qr.records.Length - 1
                    Dim tsr_data As sforce.IS_TSR__c
                    tsr_data = qr.records(i)

                    TSR_ID_arr.Add(tsr_data.Id.ToString)
                    TSR_NAME_arr.Add(tsr_data.Name.ToString)
                    TSR_CREATION_DATE_arr.Add(tsr_data.CreatedDate.ToString)
                    TSR_CREATED_BY_ID_arr.Add(tsr_data.CreatedById.ToString)
                    TSR_STATUS_arr.Add(tsr_data.Status__c.ToString)
                    TSR_RUN_DATE_arr.Add(tsr_data.Service_Date__c.ToString)
                    TSR_TIME_SPENT_arr.Add(tsr_data.Hr__c.ToString)
                    '*******************************************************************************************************
                    Console.WriteLine(TSR_ID_arr.Item(i).ToString & "|" & TSR_NAME_arr.Item(i).ToString & "|" & _
                                      TSR_CREATION_DATE_arr.Item(i).ToString & "|" & TSR_CREATED_BY_ID_arr.Item(i).ToString & "|" & _
                                      TSR_STATUS_arr.Item(i).ToString & "|" & TSR_RUN_DATE_arr.Item(i).ToString & "|" & _
                                      TSR_TIME_SPENT_arr.Item(i).ToString & "|" & entryDt)
                    '*******************************************************************************************************
                Next
                GetTSR = True
                Console.WriteLine("Finished ==> GetTSRData")
            Else
                GetTSR = False
            End If
            Return GetTSR
        Catch ex As Exception
            strMessage = strMessage & vbCrLf & ex.Message & vbCrLf & ex.StackTrace & "<BR>"
        Finally
        End Try
    End Function
werewolfwerewolf
2000 is the maximum size for a single query batch.  Look in the API docs for the queryMore function.  That's what you need.