tblLPRFixtureLocation_list.lStopRec = tblLPRFixtureLocation_list.lStartRec + tblLPRFixtureLocation_list.lDisplayRecs - 1 ' Set the last record to display
End If
If tblLPRFixtureLocation.CurrentAction = "gridadd" AndAlso tblLPRFixtureLocation_list.lStopRec = -1 Then
<% If tblLPRFixtureLocation_list.Pager Is Nothing Then tblLPRFixtureLocation_list.Pager = New cNumericPager(tblLPRFixtureLocation_list.lStartRec, tblLPRFixtureLocation_list.lDisplayRecs, tblLPRFixtureLocation_list.lTotalRecs, tblLPRFixtureLocation_list.lRecRange) %>
<% If tblLPRFixtureLocation_list.Pager.RecordCount > 0 Then %>
<% If tblLPRFixtureLocation_list.Pager.FirstButton.Enabled Then %>
<% For Each PagerItem As cPagerItem In tblLPRFixtureLocation_list.Pager.Items %>
<% If PagerItem.Enabled Then %><a href="<%= tblLPRFixtureLocation_list.PageUrl %>start=<%= PagerItem.Start %>"><% End If %><%= PagerItem.Text %><% If PagerItem.Enabled Then %></a><% End If %>
<% Next %>
<% If tblLPRFixtureLocation_list.Pager.NextButton.Enabled Then %>
<% If tblLPRFixtureLocation_list.Pager.ButtonCount > 0 Then %> <% End If %>
Records <%= tblLPRFixtureLocation_list.Pager.FromIndex %> to <%= tblLPRFixtureLocation_list.Pager.ToIndex %> of <%= tblLPRFixtureLocation_list.Pager.RecordCount %>
<% Else %>
<% If Security.CanList Then %>
<% If tblLPRFixtureLocation_list.sSrchWhere = "0=101" Then %>
Please enter search criteria
<% Else %>
No records found
<% End If %>
<% Else %>
You do not have the right permission to view the page
<% End If %>
<% End If %>
</span>
</td>
<% If tblLPRFixtureLocation_list.lTotalRecs > 0 Then %>