Wrox Home  
Search P2P Archive for: Go

  Return to Index  

asp_databases thread: paging thru recordsets


Message #1 by "spencer" <solopress_@h...> on Thu, 30 Nov 2000 15:41:19 -0000
   this is my code for a search engine on a car site im implementing does

anyone know how i can add code to show only 10 records from 300 per page

then page thru to 300 like most of the search engies ie showing 10 records

from 300 click to show 11 to 20 etc

Dim strcarname

   strcarname = Trim(Request("carname"))



   Dim strSQL

   strSQL = "SELECT car_desc,car_import FROM car WHERE car_desc LIKE '" &_

          strcarname & "%' ORDER BY car_desc" 



   Dim objRS

   set objRS =Server.CreateObject("ADODB.Recordset")

   objRS.Open strSQL, objConn 



   If objRS.EOF then

      Response.Write "There are no cars that match that keyword " & _

                      UCase(strcarname) 



   Else

        Response.Write "Your car results " &_

                       UCase(strcarname) & ";<br>"%></font></td>

        

    <td bgcolor="#576685"> <font color="#FFFFFF">Our Price <%  Do while not objRS.EOF

        Response.Write "<TR><TD>" & objRS("car_desc")&"</TD>" 



        Response.Write "<TD>" & FormatCurrency (objRS("car_import"))&"</TD></TR>"

      

          objRS.MoveNext

        Loop

       End If



    objRS.close

    set objRS = Nothing



   Set objConn = Nothing

%>

Message #2 by Robert Chartier <rchartierh@a...> on Thu, 30 Nov 2000 10:49:38 -0500
Recordset Paging

http://www.aspfree.com/devlinks/search.asp?file404=;&catid=123







At 10:41 AM 11/30/00, you wrote:

>    this is my code for a search engine on a car site im implementing does

>anyone know how i can add code to show only 10 records from 300 per page

>then page thru to 300 like most of the search engies ie showing 10 records

>from 300 click to show 11 to 20 etc

>Dim strcarname

>    strcarname = Trim(Request("carname"))

>

>    Dim strSQL

>    strSQL = "SELECT car_desc,car_import FROM car WHERE car_desc LIKE '" &_

>           strcarname & "%' ORDER BY car_desc"

>

>    Dim objRS

>    set objRS =Server.CreateObject("ADODB.Recordset")

>    objRS.Open strSQL, objConn

>

>    If objRS.EOF then

>       Response.Write "There are no cars that match that keyword " & _

>                       UCase(strcarname)

>

>    Else

>         Response.Write "Your car results " &_

>                        UCase(strcarname) & ";<br>"%></font></td>

>

>     <td bgcolor="#576685"> <font color="#FFFFFF">Our Price <%  Do while 

> not objRS.EOF

>         Response.Write "<TR><TD>" & objRS("car_desc")&"</TD>"

>

>         Response.Write "<TD>" & FormatCurrency 

> (objRS("car_import"))&"</TD></TR>"

>

>           objRS.MoveNext

>         Loop

>        End If

>

>     objRS.close

>     set objRS = Nothing

>

>    Set objConn = Nothing

>%>

>



Robert Chartier

Author, AspFree.com

xxx-xxx-xxxx

rchartierh@a...

http://www.aspfree.com/devlinks

http://www.aspfree.com/authors/robert

http://www.aspalliance.com/nothingmn



Message #3 by <nickm@s...> on Thu, 30 Nov 2000 11:02:33 -0500
HOWTO: Page Through a Recordset from ASP



----------------------------------------------------------------------------

----

The information in this article applies to:



ActiveX Data Objects (ADO), versions 2.0, 2.1 SP2, 2.5, 2.6

Active Server Pages

Microsoft Internet Information Server versions 4.0, 5.0



----------------------------------------------------------------------------

----





SUMMARY

This article describes how to use the PageSize, PageCount, and AbsolutePage

properties of an ADO recordset and what cursor types must be used to get

Recordset Paging to work.







MORE INFORMATION

This sample code demonstrates using Recordset Paging against the Adventure

Works Access database.



The code Assumes the system DSN named AdvWorks is pointing to the Adventure

Works Access 97 database.



<%@ EnableSessionState=False Language=VBScript %>

<%

set conn = Server.CreateObject("ADODB.Connection")

conn.Open "DSN=AdvWorks"



set rs = Server.CreateObject("ADODB.Recordset")

rs.CursorLocation = 3  ' adUseClient

rs.Open "Select * from Employees", conn

rs.PageSize = 2

intPageCount = rs.PageCount



Select Case Request("Action")

 case "<<"

  intpage = 1

 case "<"

  intpage = Request("intpage")-1

  if intpage < 1 then intpage = 1

 case ">"

  intpage = Request("intpage")+1

  if intpage > intPageCount then intpage = IntPageCount

 Case ">>"

  intpage = intPageCount

 case else

  intpage = 1

end select

%>

<HTML>

<HEAD>

<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">

<TITLE>ASP & ADO Paging</TITLE>

</HEAD>

<BODY bgColor=White text=Black>



<%

rs.AbsolutePage = intPage

For intRecord = 1 To rs.PageSize

 Response.Write "Record number: " & intRecord & " "

 Response.Write rs.Fields("FirstName") & " "

 Response.Write rs.Fields("LastName") & "<br>"

 rs.MoveNext

If rs.EOF Then Exit For



Next



rs.Close

set rs = Nothing

conn.Close

set conn = nothing

%>

<form name="MovePage" action="default.asp" method="post">

<input type="hidden" name="intpage" value="<%=intpage%>">

<input type="submit" name="action" value="<<">

<input type="submit" name="action" value="<">

<input type="submit" name="action" value=">">

<input type="submit" name="action" value=">>">

Page: <%=Intpage & " of " & intpagecount%>

</form>

</BODY>

</HTML>



When using Recordset Paging against SQL Server, you can use a server side

cursor. However, you must use either a Static or a Keyset cursor type.

Otherwise, no data will be returned. If you use a client side cursor, all

cursor types will work, but only a static cursor is returned.



When using Recordset Paging against Microsoft Access, you must use a client

side cursor. Any cursor type will work, but again only a static cursor is

returned. A server side cursor will not return any data.



When using Recordset Paging against Oracle, you can use a server side

cursor, but if you do, you must use a Static or Keyset cursor type.

Otherwise, no data will be returned. If you use a client side cursor, all

cursor types will work, but only a keyset cursor is returned.



Message #4 by Imar Spaanjaars <Imar@S...> on Thu, 30 Nov 2000 17:27:28 +0100
Hi there,



Check out the following articles on ASPToday and 4GuysfromRolla.

They both deal with the subject you are looking for (paging):



http://www.asptoday.com/articles/20000605.htm



and



http://www.4guysfromrolla.com/webtech/121298-1.shtml



HtH



Imar





At 03:41 PM 11/30/2000 +0000, you wrote:

>    this is my code for a search engine on a car site im implementing does

>anyone know how i can add code to show only 10 records from 300 per page

>then page thru to 300 like most of the search engies ie showing 10 records

>from 300 click to show 11 to 20 etc

>Dim strcarname

>    strcarname = Trim(Request("carname"))

>

>    Dim strSQL

>    strSQL = "SELECT car_desc,car_import FROM car WHERE car_desc LIKE '" &_

>           strcarname & "%' ORDER BY car_desc"

>

>    Dim objRS

>    set objRS =Server.CreateObject("ADODB.Recordset")

>    objRS.Open strSQL, objConn

>

>    If objRS.EOF then

>       Response.Write "There are no cars that match that keyword " & _

>                       UCase(strcarname)

>

>    Else

>         Response.Write "Your car results " &_

>                        UCase(strcarname) & ";<br>"%></font></td>

>

>     <td bgcolor="#576685"> <font color="#FFFFFF">Our Price <%  Do while 

> not objRS.EOF

>         Response.Write "<TR><TD>" & objRS("car_desc")&"</TD>"

>

>         Response.Write "<TD>" & FormatCurrency 

> (objRS("car_import"))&"</TD></TR>"

>

>           objRS.MoveNext

>         Loop

>        End If

>

>     objRS.close

>     set objRS = Nothing

>

>    Set objConn = Nothing

>%>

>

Message #5 by "Dallas Martin" <dmartin@z...> on Thu, 30 Nov 2000 11:49:37 -0500
This is a multi-part message in MIME format.



------=_NextPart_000_0018_01C05AC3.9D5BB710

Content-Type: text/plain;

	charset="iso-8859-1"

Content-Transfer-Encoding: 7bit



Goto:



http://www.asp101.com/articles/recordsetpaging/index.asp



Also, there are many other ways to implement paging.



I've written code using the "SELECT TOP n" syntax

with a "WHERE " clause to filter the selected records.

i.e. "WHERE id between " & start_id & " AND " & end_id

Alas, you have to keep track of the start_id and end_id values.



Attached is another example I got from www.aspcode.com



Dallas Martin



----- Original Message -----

From: "spencer" <solopress_@h...>

To: "ASP Databases" <asp_databases@p...>

Sent: Thursday, November 30, 2000 10:41 AM

Subject: [asp_databases] paging thru recordsets





>    this is my code for a search engine on a car site im implementing does

> anyone know how i can add code to show only 10 records from 300 per page

> then page thru to 300 like most of the search engies ie showing 10 records

> from 300 click to show 11 to 20 etc

> Dim strcarname

>    strcarname = Trim(Request("carname"))

>

>    Dim strSQL

>    strSQL = "SELECT car_desc,car_import FROM car WHERE car_desc LIKE '" &_

>           strcarname & "%' ORDER BY car_desc"

>

>    Dim objRS

>    set objRS =Server.CreateObject("ADODB.Recordset")

>    objRS.Open strSQL, objConn

>

>    If objRS.EOF then

>       Response.Write "There are no cars that match that keyword " & _

>                       UCase(strcarname)

>

>    Else

>         Response.Write "Your car results " &_

>                        UCase(strcarname) & ";<br>"%></font></td>

>

>     <td bgcolor="#576685"> <font color="#FFFFFF">Our Price <%  Do while

not objRS.EOF

>         Response.Write "<TR><TD>" & objRS("car_desc")&"</TD>"

>

>         Response.Write "<TD>" & FormatCurrency

(objRS("car_import"))&"</TD></TR>"

>

>           objRS.MoveNext

>         Loop

>        End If

>

>     objRS.close

>     set objRS = Nothing

>

>    Set objConn = Nothing

> %>

>

> ---

> FREE SOFTWARE DEVELOPMENT CODE, CONTENT, AND

> INSIGHTS IN YOUR INBOX!

> Get the latest and best C++, Visual C++, Java, Visual Basic, and XML tips,

tools, and

> developments from the experts.  Sign up for one or more of EarthWeb?s

> FREE IT newsletters at http://www.earthweb.com today!




$subst('Email.Unsub')



------=_NextPart_000_0018_01C05AC3.9D5BB710

Content-Type: application/x-zip-compressed;

	name="300.zip"

Content-Transfer-Encoding: base64

Content-Disposition: attachment;

	filename="300.zip"



UEsDBBQAAAAIAGtkJim9nP2zkQQAAMQLAAAMAAAAbmF2aWdhdGUuYXNwvVZbb+JGFH52pPyHU1ds

kt0ASZrkoYtpCbAbJAIsoGxXWika7DGerj1DZ8ZQVPW/98zY2EAuG7VSecDjme98537Gjcqv0Cd8

npI59e5vJr5kCw2V5uFBowLD0bQ3HED3t1G/1+5Ns+0fqtUfGffjNKAQsph6LgnEcqZquOlWqznk

8MC5pZICU6AjCr5AtBbAyZLNicZ1JEU6j+yhpL6QgQLGgYAms5jWUHzCkkVMT2EtUggE18ApDQyH

jhj/BmQmUg0Rq4ZriMWc+WCEviDYJxzoknLwU6VFwhSFSKwgIXxdqDKkK4KkyBcwtYjJ2qg31iww

EoaqpzOW/Fg9JiHS+GG9zERjovRG3kYCY3E7veubmNx2Wx3zvOtOWzBo3XU992N30B23psOxC210

kHLtuXfMl0KJUMM9UymJYaLTgAm4rp25Rry+4bkZdr6Y56j5hs/U4n2jPsqShqYHLAEx+x1JOfU1

E9xxjsoXc4SrEjemfjdZOAgaW88mVOcYSFUW802Mctd3ZNsi5fpF6ZDx4BXhs6nPqTn9Uz9kyAff

Kji6J5IZhGGMRBzs185OBnIa3HtQmkhr35ME9pTxOSyEYll4wh1mBM/oJgDoz1aZbCkxip/VQXnw

rzWgDhbCmP6RUqVrn1Iq1xMtke7YLZxzT6DhwZmR4oh3igPvHF9prOju7vfY3lkxzBkLncMDwN/G

Ra9AwTu4tNapLN9b9eXBhMollbW2pNjrQ1sMx2ZMBLOaX+DcE5Q+6mXOzmgcY4HEjGNKqMmhjjZx

CghWBlHZuEHIN5wnP3/FFpYYNAyiFnL9dTNZakkwQ94di2rlMvPWczvj3n137P1V9lvL96lS0JEM

TYfjt4bo5O/3nZtP3sva3EfqhgubhzwyWXu9HJW8FKi2QSmELBO4isamnd5CKAW2BkmoglXWOQFG

Tq+oQcGbstxx7QLBDG52bWOc7ph5en56kVspladea5xUz1vlPqXB3hqhkAkQu+vxFc6DGlELSKiO

RODN0QQj74UyOUe004gumjAic9M10/ymGG+sgEYdjw1q2rrpd+FzrzO99a7OKnAzHHcwqefQ7vb7

k1Gr3Rt8zN9GrU7HvhlBlBzbp9PQAaxYoCPv4qzSbESXTYx6LNaUQq9jFF02G3Ud7IN/ysEfmMSw

DtD070L7JEfusTbquS25TY2KeQkE4MxjcVk/te7wg6UeU7UQXNHaZ8nwInVRVdNkuUAeu70OTgSs

AKvEhSfEnKfErDcmD9vSr9Vp/HudrHE4OyqduxNLOsCRb7ZjIRbmycKynpvedTHdHjMSiCQNPWOR

W3Qm1tcv5cjb6Y7qtUFaD9yRpEsmUuVmZpNs196p9g+uNpWXBTIbi2a1b0YpY//cLR9s9+GIxt7J

yOydWT0vfULgcYHE0XoCzT10iXUeXY6wTw2JCOAqQ/+XcFlziliZDD0XJ/P62C6E7ESvuIz+T7PA

LXPoZFYUSSxWFdt8dTtS7IeWmVhNcBzzUWWkymJtx8I6sT/fuTCfpvNDOyO3QThey7O9m2mXa+cW

LWTsBK1vvvjKRf5t+Q9QSwMEFAAAAAgAWWEmKZyoCsU1MwAAACACAAwAAABOYXZpZ2F0ZS5tZGLs

XQ10G9WVvjMay7JsS4rj/Dl/ip1ACLEjyY5jBwKWZTuJseMkzg8Bk8S25ERxbHktJRACRITSpj1b

oAttEza7sD3LAmVbSktPKb9n2S1LE3Zhd3tOt+eQUrpstxTCcs6WlkMh2nvfmyeNNP6RHWMH8r7x

eK7ez733/cybd9978wYUgPZYZ3+wczDobg7F3A31gE7ww35L1+68F7e+/eiewbqr4eRtD9yTuPN+

708OPX3W8+wbr/xV9y/e+scHmv70lWc3LIq9u+qj0yc/6vy3pb95svYru/9v7uHqzZ+88cRrh6cH

9rqfqLz3vUPXr1x9y7LXP7zlhG3h8U9sJz7233Hq9p5dX//wtS8vvnPPSwsvbfj3914NnU3k/nPT

39w0s+Ds2+VdP9tiBaiq8ICEhISEhISEhISEhITExGCFAvK4iA9FCToVvS6o8IzzoJPb//RPUcgN

wIKnhmdORt15S4MxIJIPkIcxtDU7Tz5+9s26kUNL+19CQkJCQkJCQkJCQmJioSiXnbcNKY8xHxMJ

58eJ8UNVfplPTErQMt+BNvd0nWmmiu3TIB+mseEAOgGDKlbuVWwIJugC4pXHRg7I5i9KBmAeNsYj

3cNGHhqTSx5cDzsGZR45GR5F6KGRR26SFfcoQR528rCzIQujjHMKi8GRikFS88mjEJkZYwziyTxc

yCyNVVT3cGISjR6NIoYD1UuL0QlcKzUpnHsEUas88rAmE+jjMRRdXSUZg6urCXULqAwyMpGxymcD

NSmPfSjDQh6WjEykYnBAACLQj0cIuiGGaW1AZWN4duEZRddi3SWEIQfxP6dTrlthAJPBaTs0wX6k

92DMmUhHWIww/u6HDejeh780WI/hNWiBgyid/jfCTRh7EP1d7HcrxgvCAeQUwlSSy0b0jaAcW5KL

HdrgRqb1IMbaiK4kqR/5EPeZsBlDEd0PPRizhaVxD8zOcG+HvUzHGHLeAodQQgjuyKVMV1RQEglI

JPrZ/zD7r/+5WL0DeP2uw+rtLCcpDlAENZE4nEjclUi8nkFPY9XeGEcULitguhVZ6WqK8Esi5cd+

8vybbUqzyJk80OiG4bcZlTqr2ja6H1lddlDFZZW3gHxYbbVTteF1itJmJaFG8ePEZszcCKrnxiLu

Z0V8CMaCmViTBa/8UcK6Xtg48+3/eUGhTIrrgbdBPfhHjDUybPh4FPLVYcIIueJq9OPyeeXdp99g

Y8FMXT5VHGONMGJ0+eMHpj+Z/8ON9Y4kP4i3/uAw8bIBVmCWfmrP6DpqBB2HdC126TmwC8tgMzYY

zVgPA3ijZ4sSbCATBoweg5fT/bmcHp/UFFyYfnqEErts5S/Bc76e/nT5N2LzMDYUjyP9y0A85XjT

ljmBcA75UHrYAxKAPVrpdi0AaqaoMaKmidIO2N/gzzB6XFHPYgbQPQEwC8/ZeM4BKiOAuXjOw3M+

ngvwXIinG89FeJbiWYbnYl32JXi9FM+leF6mu2WeEhMD5cATcYWVvAKeZap6Tx4MFFvXWaBUheBb

mqY2xELHorEcuBKgTi3eZ1WL16j2XLVeKbblWIvy1KJZvX+s1e6DArX5StWOzeFgPBoLRvaHrlLn

YBcjhi1MBOLUTyjE5/kStQMsyzrWHvZ44h6fp6rSUw62+ZoWALvqUIo8niqovrXMV+Ep80BZYHXH

9vUbNsCWjvZD0Vioz1bp67B0+ypi+6GrrK2l0e0/ALFIX2csHOmfDjtBRemv+hva3A31V1G/1A+P

NEBbXKmHwIl4bsXdcUULKA3enIDXo5XXWAJ+v8dT/WCDr9FfpQS8lgBsHIzsGezsc0NTeH8o2hGI

bOzri/Rr1ujR1o66zmCkoy8aV32q9+iG1nD3YCQKkZ6Y298dC8PB0LXuhs5YJ7jbuvaFumNRcPsq

vO6WcNf3BjsHD8XXgeI8+soxvE+OWr5d7VKTj8pXOvso6xPU5aPzLS3VPFO5qPAR3q8dsBYOg4cd

PjyrsL1ognLdxZNGBUxuxgPzF27Fu60KKvBXGdTiGYDVKIG3RGvxvx9uAy+6BPB3Kx5t2HHhLq3Y

jQmwcO26C2+9xbVapxqRqsDuZwseZegSxppwADs/+/Ger2ed1jA+ad1699ONMQfw2M9cqZsaZp3B

KBjhUEQ+VGH4JjwCqL2fpXQl/qrFoxx18uBZjxSFoXzi+eBnIT1Qia4edq5i+VCr54PHkA/UF9jD

Ort9TMcw6+ZGWfpJQ/LHssfqTP2mNrz2MPcQhkj/1Yr55Ee+ASanDXOjHuUMxcWPLt1MClYdXSvi

3ZXslbgxdhh/D7JOZXov7akh60gleM6rjvhMebMdy38DHluQbkcdosyk6ENJPnQRdzvlFsWNIdWF

cSndjSyNeL+if5+hjI1YoKSnQqTEa0qFl1E1aW6ihKux3vlQnh/TIVLhzbqEA0y/vom0/8/H9ieo

yqP0xIU2hVsdq3S+pKL1CSA7CFZgK9KusRZDGCxFGHS63iVNmtHcwCXvdHNVGcr4ZC3QcPZ4Xrrl

y01ifDYrVlbjW/Hp38SMuL3MAAzrBivlsyutXpNhZMXatB7LLWmkDYtiK++TEH2MyRzJEDNLMhpN

oj9D/QnqA32S4DaM7GN8duFPtqL8iSSGSrLFeOyJy4H3lQn8idaX8ezKHgW03gd4n3s4+SPZcwGU

HWQDQ4Pj0sFlsKfHI984MDRe+XR/0305HvnSnrm4UVpoL7Rfvy4Sjbkbb4qF+oOhQff6/p7IDYX2

S9Z5OLxrDlfWVPoaqqs85YGmWk+51xtoKq9prKos93j8nkCt1+vxrPTfesW2+sYrkrE8hVRvPm2I

p/f5QA0DvwHUfTDWJYAEzdWq9+4asCWRkJCQkJCQmCzQ4/uvnfc7FbCoyjvUS4VCNd3YzewmtNuw

x2tL9iBmYNCZGVNS6tDT1Qqf88/JXAyAlIXPfIuJeh4jB7vY+tR+ukeumNpPDSXorM6dU+x8+YBq

8hh5jCFzPj6BMYrQsoux2UoaETugT3fTJPUAm3CNshFGGl+yJae7Myey7cnpWK+B9g0xZkAT2YN4

pXEMfYTCNPt8M/vfg//nWLmFEcIYtzONhxmhYOVQapJmTlkOzEIOsydqyvczjZsw7XGWAzbFDgmw

0WQa1hGr5u/uDkWjFm1bvf+Pv3ZBjrY93O+t/ofbdLLSl3vEBRattbP7B993YfZjuOrvlLnApm0c

jNCYvdc+y4V8+OzFvbspTCwUjVU9Rhz8DW0N9VGMqCYSinJlRgkUqDRqYGVzsQ6VXFyqhUpLHa6k

qIaMpZ+/vmFN6eEmr6+2psZTVV5btaqyvKrRs6q81te4qjyw0tdYU1Nfs8pbW3UrWkAbOvtCa0pJ

efyxLrR/IBDpj4VuihETDzptCw1Gw5H+QKRvoDMW7tofqvStKa2srfT5fGjnYIBA69o1pYGqQHW1

v97T6F/laWw0nhiiYWP9mtKamhq/r7qy1reKn+i+NrCmtCpQ1djoq6yp9jU1VFfS6fFJu+zitsvk

uNzFPS63GeUO6Au5piL97WzGLYw6jF8+jRfSOOF45IvlcWOt9wJF+jqbkdKfieXAxy4JmUsGx5oH

xdj60Tgpdc5cw4QZKf3n+5qoppc/9QGnDRNmJPn1WPMj59Fq2seR/+cM4SxYArTS6jzKf8ztXzmk

yj+A935Un31dy+riAayN2deCEj3/aUx8OPkj5b9It3GeeyPrl2dXF92GdW7jkT8RGGv+TzQ+y/In

c53pwBF72VSuMxXyjX5jXWdKMpL2/2l68kC5ZVT7Pwf1pA4mnSUYdO5wS1IzMOy6AH19e7oHCA/z

anXd/M8xvT2QNP+VoT1SIwm6lZ/QPawZgxJJDw4DK+Wc4mCtC61AOYDtXD+22rTKo4utPnCwVTcp

Pxe2Ozez9R7pLkZ7fDFzob5LD7P+aSl3N7PsjfGGD2XkNS8Zan/aGqe9rFeSXPkw9Np0pOdZ+ayl

+vpdh4+yBFMcbcQ48618ljM9jnXEOAusvJeXijPMMvikX/KNkyH8ksjwG0teZ5+LhnZJ2v/S/p9A

SPv//CDtf2n/S/tf2v/jhbT/pf0/Wvql/f/p4nzkS/t/3Pa/ouzIFc4L2f5/Xue7jocdXY75jv8s

vLdwQ2Fe4T8VHClYXfBB/vfye/MvyX/TftK+3V5k/5e8Y3mBvHO2H9tithW23+U+lDt84y0xVThy

N/1ra+5rbm5t3dTb29O8dVMvVR6HLeXV0tyrOyrcsT0Y3s0d8rjD7mBbZKcexs6dwpt2NvftCHb1

bt/Rwz1U4dETDPdxp3zu1Nsa3tGjOxXoTgd7kQNzKeQuqIcQwdRWjuzGQFztYMv1m1p1BtOMnnqE

nJSbMaiWct4b2RTeoYe2ppzNqcjlnl3Nu/XQReSgHuGK7Gw+GIz0MXcHdycubS3MxcJdeiO7dzeH

D+7oag8yZyd3jvRuCrdtat/RtamNObtK5jNR+PxbIIiFgnCzOLQvBxFo15UUCsIhCKcgXEfuYYVd

skgQpYIoAwkJic8B3KOGyAIT8oS2wecKYx4rk8gOw/Vlx4T4qCGyQHzUEFlgImy++KghssSE5O2E

MLlQUDdqiCxQN2oICYmJQd2oIbJA3aghRoSmfKFg+FbARo2eSp0GN1E2vMSBdSIUIupYEBc51LEg

0v6/0DC8/e/Kyv7PN9v/jjHY/8LYN9j/hSb73zk2+992gdj/07O1//OGtv/tic87JnNc9p7uZm31

7yZ/XFbIFVej32Ts/ze6/PEjm/3/RpIv9/+T+/8RLffLuDgh9/+T+//J/f/k/n9D1ZGLef8/0i3d

J2pIbwfGpJR2sBWFnPahlFSahytjSvdB5HEt/hZrYtLLmcrfx57L+vy/phwoHK5rq2o2l7suDoqR

GCasxIWJI/yCNiiw/pjDToTKLHtgPTO00YF1z9AyB9ZHQwsfWEcWLXNgvU+HiwgbM3rjPLpGhIWZ

3nEe3UpEDrOg46z/hpZ6nHXMuAmtCMOeoiv63LVD1Weq0XjmapTM1tUomSOIEkHMFcQ8XbGSxbpi

JUt0xUouF8RyQZTrqpZcJohlus4lFYJYIQiPnooSryB8gqgkAvumJZcI4lJBLCUCu6clVYJYKYhq

MaUvZ/slhkSuxqyWRMIJp84UYOdSMTr9dM7d0443z9/11W890vWD91+t9OWta7njD633/774vrLY

oWuqf/3epYEvtT3/9O5lD6rfevmZxjfnBK51X/dE0dcWVfyi++hPzxXe9ZLluRd/3/Xwsb8r+u+z

L5Xf9+J0ZWd79NEn75kiseqPYHvPc/Pu+2DByYMDmWJPpzQhay9xLk054TTJygmxBuXIlCWT9FSm

k3WyleNf5XUYldPMymlToxwfNbIalVPNypHTlslXTjUrZ5lITVqgeRqr2NjEY18rp3I7+/Bx7Yzr

2ZWnmnp8AyDevTH21NP7bafPtID5aMb+XD4kaKhkRlJQ5eOuy4+cebOuqmjWz76rf2lZbEFEjFZo

UOeYxxKP3Vw6lqcdyzjTOmSKT9Y46unMjxdd+cISYiquFHkrW+1P685DzC7pZ2/UnT7jJ3NeF9DA

jpq0ozolIDcp4JUXnmeMxZUit7OXIPt0o0R8tef0meMoQMlOgDUp4Ab7CyuJcVdi+v+KbDHmdwuK

OcTWrsdQRJVhrr51s4+NM8WhCK7B0PS2CX1SqJtZnXwVPB+ftbM/Fcv1xVyo0+by+F+Em/FYnXbU

6Coq0+gOJlFOC+x4imeuuPI8oIrBX0o8faYCzMfyVCXQRmFlfE/l9Jmh7LOKFDNLkln1zZyJuBKz

9JduRmWmjqhZ+htEozJTRtQs9TrW6TPLwXwsSzGCEbUa+b2C02fqwHxclWJOLTO/I7/x+I8YU3El

sa1pJWt+3TQKp95oAPNRn1baWQjYhPnKd0kPMaY1YD6q00o9C6Y08NDI2PnAfHjSyj0Ldult3ag6

Ilx0U6sjMqUXGU+f6cC2AvS2gt96Q949dTzpTl4bhmI7UkFdCeZjdVomjMDY/PrUqTeqwHz40m6A

ERhuAbEbPrEascnQFG+BBYbGkPZ/1oTEhQDd/neW6Pa/c65u/zvnCWK+IBYIYiERdDO4BbFIEKWC

KNPNdediQSwRxCWCuFQ3151LBXGZIJYJ4nIi8OHpXC6IckFUCGIFEdhTcHoE4RWETxCVurXvBEEU

CKJIN/udiiAKdWvfqQrCIQinbu07LYJwCWKaPq7hnCWI2YKYQwQ2Ms5VgqgRRK1u5Ds1QeQIYrog

inX732nTjXynVRC5gpghiJm6te/ME4RdEKNNkktISEhISEhISEhIXMzQFLdDGz2YhISEhISEhISE

hISEhITEZxhk/+eMHkxCQkJCQkJCQkJCQkJCQuIzDGn/f76hr/932PT1/3wjAFVsBGARGwFoYiOA

HLERgFVsBJArNgKwsY0A4tm9/+8EsVP/KK/9g4SExIWB1LvuxztNb93/5UOev33qqn0/P3v1jXVP

/2b9l9Z+tSZ+ec0t8848eOChg98+FXS/v+jqFf/6nUcO5OYfW7VlWuS6Y3e88+M/BZ4uXnrnFzrj

H2xt2Ppfj/W0fOO597/+9Lv+/Xvtf56z57GbZ+8u+sR5621bv3/FT57a8V3X4w+b3ro/0Wl66/54

ppN1spUTb90blNPMymlToxxf0Gc1KqealRNv3U+ycqpZOcvUaGIxa0IvVdI2FMfNTpOsnBBrUM7G

XlZWjMrlmp0QLsfkZyYXC0NpYkgCvexmbF2cKafJ1Ncg9kS6Jucw448Hk070aj6rD2YnQ0ThNMlJ

SCqX0kQz66uZ9dWmRl/NrK/FrK/FrK9lavS1DKmvcxinyVfOqZia0cz6q5rzVzXnrzo1+aua81cx

66uY9VWmRl/FrC9/sT+tFMCcBDAnAaYmCWBKgrT/JSQkJCQ+bdA+WqfY3k3zYBvbOysMQcOOOpv1

HaCG9qW90m7CXzOhTd/NqJ9tmyP8C/QddWNstyMHCxVkdD0cgqKM320Yw5HcFq0VrwPIOcB2GKZN

x/phO5Mfg70Z7ik+s9Pc17HwQabXTLYnWtSw31ZKR745FentwPidBt8itsXZANuBrJVtBtSLMvju

ap0sb2J6ztCOTi62ddSfIU1fWaCd1xaAH/3oW+Q3wnVMwwi0MH32sHTMA/pOeJTthk17nQWY1BgL

tx8Ww1b8RTsLR1gq+G7FA4w37XzFdbTBWgy3HjktUKhM+b5neaCoKnWQ8tAaz****wD5VvgV2F9x

bKUQP3e9WeH7wztrv/Yfa/6i8cv3sX2EjRvUEVKb1HEsfu2b5156+4P13/zk4+3Vzb+9IXcIPpTn

HLXdSzc9/2xT3d+fPVG87KklJ4YK3cPyinZa3oVp4dI4fvnyrxoGlz/WcOzDzj0nXacsQ8Xez8ok

Pe5sUPKmY1lkhl0PZJfT1w00Vi8KAJCnBrQvPtE24KM0lGF5lGGCUWaib2OMaPu5YhhKfcH4ZTv7

iIKZMf5TnIJwEYE9PwttStXHnIrQSRHSMzPxFiadPrZQBObkC9mLCiZCdmYRyOZCNheyuZDNxRia

C/qqSxzc+uaUqW8+hDK+wjSDybUmpdOfQgw8jIEdW48wxFjrUqB/WmAvuxMdyXreick6pNcmzsjF

Nv+0MXGU8AX4W8F7uwnD0n3EP1FxDXKiuMvQV4VSaGetEm8jaPN+uh8H2N1Ywe6tPtZtqmB6laRt

RbmNhRJ3mh3bqQOsRQuyj/AIrYr0XUk9UINcVuK1gKb9MesfQHdF8ebxEXmqMD90Bp35zicduxwu

xzP/z961AMdRpOd/Zmdfo92dlfy2DCwW5mEsefWwLHHYp92V5Edky2DZxkaA15Js62xphSS/JLB0

NnWFrQScC5VYqYPYuIBcihQc+MAQnxGV8DLc4ZA7LnUHwVCQgpALhqRInCJW+u+Z3pnd2ZceaLHd

36g1/3T3dv/d093Tj7//dm9wn3cddi10/UfO0ZyGHHvOSfku+a7TsrzFCQz6mUD2x+z9cpu8QV4i

n3H+wvk3zr8Q1UUSTfXife/lwYnycged/yfmHvJ8Vdfju9BtjLpvOTg4ODg4LmH40vrIAONyQu8l

dgiQlN7LWGHUpO/6Ufeic//1YdXg3h30ju7J9NAP9IyHHnp6ECKk1UOPPTWBLitu8Frf/wJZfONJ

escf66OtgZ7rJKhyqfFBmhMEVAkF1FR936Hnf4OBsTv+OLWG9YGeKjBfBg3rtpSBG/WrD/Sk0Zxv

TRlUrH76gZ40+umlNHwZ1fCnDcySMrBYNfxpAxNTBqZrzh/oSaM5X4iW58WT1QDYHQNKfDLEQE8A

oMqiFZw0BzdAyggSnwwx0DNEIhAziwCbQrW4z3z3ORowu+MQJf2JHAM9adTzW5NGgGlLr///4O6M

9f+niiBW///B3Rnr/08VKNP/f3B3xvr/UwUXm7NpeYSo/v9UgaL+/4Ee1P8vaSUiY/3/iYJN9aIy

1v+fKGCz/v+DuzPW/58oQKP+/4O7UzZ8gvAnVlUODnPnD8rvlNeU48pR5QGlV9mqrFGCynzlhCfg

Oe1e7a5yv+F6znXMNc81w/VozoM59+RYc76SP5Dfkl+Qg/J8eZbslH/s7HNud653fuR423HS8VNH

ieMqh8tx3r7PHrE32pfZ37G9ZHvS9uSreA3aZtuUZOdac3BwcHBMJCQ6CEC52IM9UYk2ZnXgVMXR

179Y/chnkYVdn+97esPvf35+ysP7vrm647Y11leve2LVydyX37yhsrn62Oz2VU8tvt/2sFteZgt2

Vx6oe6LjzR3eOXObFnz1wKT9Q99/d+2zj325qffumq/LH/r0ncKhNZFp3TdOzwu/8vwLpx7tiI92

QOcEBxMovnawLypIx6yYL4PVRPJriPagzonNzK/NzK8tO/zazPxazfxazfxas8Ov1cyvZOZXMvMr

ZYdfycyvxcyvxcyvJTv8Wsz8imZ+RTO/Ynb4Fc384qAUhxuGxgvMVjjwM/7QYDXBTRyL1tDEMXHy

2FKjZCF/BW2HRGz+KhP9JVD0zUuGF2ZNZmWb6HcomTmRssMJjuMaJj5aMTvRgra7KCvRQlwTQzkx

1GK2LyCuYgtmK9ywYWheWQ0biK10cb7Y7sOB2DJnjjHeSoy3EgUnTiTAF8Sst+lz4QL9f4Hcaim5

EsV1qMiO6pRL7rmqV/aT3PXRsbxTAmCzCocVCR2EqAMTN8ANbWzqQ6IiQvvtVA5jeBiS/Ym5VKCB

4gD9v944gYDSMjRoiUbngQDU08lBFK7YDbq0wmUD3G8PffXL25bXLd92yzbMFnUTPvS13nLn8rb1

zZu2rVu/WXUQVQfi907NK/290Ldx285ty1dodlbdrrnu9ltWtKnWkm69NXJL63rNNz3ITqTW9XXU

hhUMDg4ODo7M4EvrIwPw9X8zJmD9//KECJcUhPRe0qI/rY948PE/H/9nPv6H7Iz/s5BauGTH/3G+

vtXxvyBcQcf/CAv8nbJTKY4+i5LD66vqByGOAI6LBpq6PiVKuBiRpynwUwRGuDVNforICA8jFE23

n2JhhJcRTMnf2M+3z+RYe+PkQYjuNVO39/io/BfKrvmouJkP1B11rbCFPu2k4k+74NJC8tzoNIgF

Xi45wieWjOC5YQTPDSNYblxJjBuM8/wqcB4dH+8EfRD3hnZH+1KNPn1KioY1nABoH79L9/KDBZdL

cMep2rkrfcp7Y9/7H1Yd/c+Z+/9JE2fWM2kwPF+CKknbNZlGuF6JBmotXfeTp/7wYVXllNvpPTMR

5sFwGgljfddC3s0vzUGu2R25SyzlPRgOoBC2loI0Qtj2aARvvXSKBszu+OPEUt6D4cMkAiGzCGzR

CO6QX1qAATf/6W//kYmRJ9t3MRgej30XYr76+zT7LvStB+tPqJnL7moe6FLig+E0uxikNEEZNx4M

hjPeeFDeowbC7hhY7MaDtIGJKTmL3V+RNjAhJWf6LobBcJpdDJCSq9S7UwbDVWC+DLtTdPn/P3/q

eRoou2O06eX/DzdlLP+fKoJY+f/DTRnL/6cKlMn/H27KWP4/VXCxzVJaHiEq/58qUJT/Hwyj/D/b

hJ6x/H+iYNUXpeG7M2d8Ir2XFJCEb9zJ1gRwtJ/EieMiAY7SCSZRQsCJOm38PwW0Yf80Rox6/N9P

l5WUaYyYPm4zAhoxNdXUAB//q+Djfz7GM4LnhhE8N4xgucHH/xMBC+g5HttK3611zfdcRl+t5N8s

/gXnX3AOHTw3jOC5YcR4fcEF4Y+iMoEC3A6o/2/Is80zy/Oae7MbxgJN/9/1AEv/Pg9+OfjMriMr

X7Qdn/WirWPdi7anyd0Gz9LWa5QaNt6pEDFp2Ms4tLJS3BiqFM/VVYpDKyrFh/65ghtuuLkMzNnq

StbCZQ2JBj8TBV+W01/1b5B/hrwHpBlPzG34gr7lymj/XUL8kkY2IAi4Ac8BjrN7xf7P94osr/Az

z+iJfMnPSoKA/YITUCE+/WJv1usXBwcHBwfHpYwv4JwAggN+/WkF1WKJog452p1+hHEnvQ3Xc1Us

fV0dAwuaMfYLQXt2GmQVdJdHlL9UBLDEj/9j4EPRCaAdAQdoskWZdwVEOPN27tmjP5v5YbzLYtKv

uTDsBOPWfeQ+KuetnqRA7S5o/OKew2GOiwr/R4ykvUM0OB9k0545Ln3cChFy4fJFjXZw0B4YCaaC

NVrn003/Hir4n9+enjYkoL8hzU4986UjKsc3UuSBKGCZdcHIRq+atlmDIOLo4CLjQqwvWIeSxe91

fkXTze5Gt1gRzZHDS+JnX5fRxM/qPa/vlyewDIitoE5jiD8g/z4esdyk5DWKc44MrFfEkR3ESnWP

HNj+4MFqxvJk8pOi/YmVdx85MP748mzykyL+tRCEQKIfZQiHIX5PEj/R+BeffS8+/hD59jRTteKd

o02/aURh8pMi/anl59PDN07x64rVR4bJhvjlJH5YvP2zrm7+ZVz8/iS/yRSS9v5xHdawBzYGqeIP

0sPkRtpq6pBJ/ydd/sfjgsFfiNR9PAgPD7FbQvtiO+jGhkwxk6Qfz5pjY79EflK9fwvgAZadY+n/

pS1/8UAGWP9Prf+xJw+OBFO194+bEpLFf+bVf6D1nt2NbgHDUYHICcsH9JRk/J9w/z+MCpnPFMwc

RT5j6EwPES9n41fO8iAxWPlK9J1JVs4yxVjf/3AccMzG+g34XnEeAr+f2DZhBxTbU0V7xsKPs2t5

wOclLlaMQz8rWoYmQWL4d7ydtPyvIiPtelgONaQlaoBdpBUaGSaPovxj2WctbGz8I4eXfOdZPcg0

fhzSXa3lwl1avb9rlJyQ+i+gCqWRpB/5fcSu0sZ5BqzfbJ7RbnDD/hv2oXAuB+s/tgesDWD1H989

8oF7tbFtnQZAzzKeAUD3/+J2XtxJeAWogndXAZ0jp8erzSamgJhriJlDzLXEXAdU/A1uIAaP5L2R

mHnEFBJTBLy9GS9M5Dwj62djORrSOuV8njG784yIi3meaVn1otm9NcHQgtrK8mBhRWmwurC4uLqs

MFC+sKbQ7w/6q/1lFcFQbfm9s93yynBby6LZK8M7W7eEu1uIxdKW7R2hSHt3y+5uDMhPrNa2dHa1

RtpDkbaOcHfrpu0tpSWLZpdWlpaUlPj96CG0Ysmi2bXB2sqaitqFNQtrg0ZD3KtXBYl7eW1ZzYLa

UHHQHype6K9WDXFdEiKOxbWlNSX+hTWlaGoriLVbvn1ppKvbV7O7u6W9uaXTt6x9c+QOt3ztUr+K

4kW9pRWlJdXlZf7CUG2ln6QyVFtYUVNWSlIZ8Icqi4v9/gWBe7+3Nljzveiv/O5kY+/xgrDvZ/2C

tpveP1cUDzmhY7JtqQX2idD8sYSKymcBy/FHrdiGV4mTbaK8YZEo28V2YbLDlucUxLyDtV/eZAXX

HHH5zaJMetWdJDeaI9tbFoszSL3ohmZSSbbDkRbyBdoMcxpJeZ3buKSXJLFko7+s1F8IDkkK2UEW

PUKe319Wfi8UlBT5C/wFIbipcd2ylSsbGmH1nq7ulrbSEmhc3VBdX1dT4itqqAsWgMMXgB3dkTby

wiPXtsOdIE6FH24JVFfVVwcXk6G8I7CKFO36fiEIocE7+u0P9gtSSKgutoaKHf7CCksoEPD7q8qr

S2oCZUKoWLCEVnVGtnSG28BX27q9pasxdCTS1hZpl2xd+1b0N4abI41tXf0iFC8oat6+vWAFtDZ1

Rroim0kzHGjqbt3Zchv4qsPdYV/9JvhBS1N3l6+kCIp9da2bOsOdU/f0LwVB2fcr8tHN3WdRznnF

ZBMcGaCZjr5GD8co+l84rvjRWCp9HEYa/1iAbW10/N8g160N1KE16RadgTNVyrDnmOfYr4zXPaOp

gZr8P/np9B/mQfPhZ3aRPpuzn9Ao/493fP7Xc4Kfy/9zww03ozNc/v9ikf9HPVqnBRQjmwVrqe6s

VvLt1lUf3aqtFSZ2bQA8w6WbjHrqNW1G7XS0xdxdZBzUSn7VTbdUe6ivZkoHSb8+L+65nvzCE92c

voLcO0jIIdpBQ6Vj7bCOxt8NW+Ps9XCmx9gvpf6bKV9TQd2qq68/6jyqYzXk20N+Hza45lEVZx1U

A9kKuma1jcShalcL07zp1nIGt4176bgLt5C30s3CzXAlBIgbrvnsgg2UwwjUUX620HTMovPUXSQG

VDi1h3KvjpcxFdfAGvLUSniO0FSE6Hx6Bw0bv80qjw5YQvzhaT0zae9HleFzgiDS04FIt4gMZQnx

MUCODd4D+S3PGvTRcf6Vz3+x/9e5j++Fp88sPfk12rFj5lkJiVcV0Bn3G3uCcDDPVdydge9amle4

VsDiUtGVwW/r6Bsx/nI6CM5J5D3sjPO5DHAkgX0miZYJMq632AmNNQNph6Y+CjPLiZnFAtoVF9A9

NCCcgsoDM+tpgyX/BIURuJiLOp8tqJOrjVrlESuBxb07Lu4eGjdOMXghPunjEzNvDnhzwJsD3hzE

xbwnLmZsJnC2vB9mxkiSrKVFmhVEmVTjHbTCN9O5dlYU8zSlnH6oIKEsIHcXar0jHP6VrGr2vJ6G

7dNmMbfTIq8q4YhdUZ1iCNVJJ/y0NsxPA5BJi9RKvG2nGRKgtXYrrd2eaN0JE0b3wB8bAppO2fPS

rER9Hlu0qK8l9gKpwUGSzFsJcyhKtZX+XmUUW5Y9xBVkEW6KakZtoKxuBTYRjhnUQdscVfzFR15d

K+Gklbo1kwyJX///nfKaclw5qjyg9CpblTVKUJmvnPAEPKfdq91V7jdcz7mOuea5ZrgezXkw554c

a85X8gfyW/ILclCeL8+SnfKPnX3O7c71ODuSuFNq7Lkm9PAtYyzxvxVuw1yiOyrQfCzpE0BYokT4

X1L2GkmT2KvpLMXCUUZeRi0URvWYGqmQyc54lUE53AsF5F5EngqgkpgQed2N2jrbEvI/AHuhmNiE

yPMKctWToqTarCDFIkT9rdZs1FU6di/XqBpCFZEGvI5cBcQGC8sO+lnxEdcwrWFNhFY/VT7yy46Y

esLUlhrhEVg+lBH/teQKEe4DNKULyFMluQoJT35igoRCP5hPaj4EqE8/lBJbPzULaT5UavngN+QD

1tAt5D+2RD7tk49FHdPfSj+4EfIUIdUD14fqyX0ztW8hPmKfcP4f9wCHaDz1JDeCJJ5EoRhbIZ/G

lS9m7kqtaJsoX/GrUScSlpFS8I+pjJSY8mYdef8rydVAaHVlAyt9G4mphNo04HQw4bOG/rZBS69q

49MasIjWNVHfsRFXCrGpYCkpNqWimFIVMXbsDZcTHkpIfAGSDpaK4ozfsNqstlHeYl26DOltJL/E

ifdGwBUylS4mpbCIUNg9Sv6OMd07SRi3gS+6thf7nvH9qzyneuP44cepSkkUwEbuDnL3iHobhP/V

pYPhMUJvj3Qo59RWTxAcIt9DxTE8vBvoVj4ChyDDMLhQYIF8vWxSoKmppavLIq0NBv77Iy9YpXWt

7cXlL+/VyNISe58XLNKKcNOzz3hBQn/lf1vgBYe0qjOCqzzF8jQvCaerG5e9/mwjurCFs89oKIHq

+upgF/mxiCXyZogtkS4RV2Js+JEdVmuIV7Rg/Uhactk+QQ4ODg4ODo7UQDEpbf3fIfyEavlrJB/Y

9TZV9FE7qgb++oNekclRrcwBGXKoNf3aziD3GarTFM2LvD66nx8Hx+rw//3gBYE6CPTSHXqKNAeR

XrpDDmgOFnrpDuL9moNEL93h+Ceag5VeusMnvZqDjV66Q6+oOdjpZYjjuObgoFeCOJzqFROHhA4y

vdBBk0olPKpz0C10Uqo45qkk5qk05qks5mlBzFN5zNPCmKeKmKdK8MTE7ic5cBedqd1vp/Nvw8Of

DA8fHx4m3azeOFqcoQq89orHPzlA06K/W9Bl9CR1/mMyHaS1AjunB4/I2QP69EoW14a5ufQNX//n

+v/GAq7/zwyu/4+Dg4ODg2PikAX9f/8e3e9vofL/cGY81v8/crztOOn4qaPEcZXD5Thv32eP2Bvt

y9jQmIODg4OD49KARI8yRx0qB3tcOL0KikQPH6dWfSarAbOvA6cqjr7+xepHPoss7Pp839Mbfv/z

81Me3vfN1R23rbG+et0Tq07mvvzmDZXN1cdmt696avH9tofd8jJbsLvyQN0THW/u8M6Z27Tgqwcm

7R/6/rtrn33sy029d9d8Xf7Qp+8UDq2JTOu+cXpe+JXnXzj1aIeJOZ0Tq5lfq5lfa3b4tZr5lcz8

SmZ+pezwK5n5tZj5tZj5tWSHX4uZX9HMr2jmV8wOv6KZX4HKtQhRKzvt+sZbobyr8YcGq4lMgiHa

AZ0TPO/YXGqULOSvgNFeiM9fajXxb5rqZTG8MGsyK9tEv0PJzImUHU5U1SUTHq2YndQSeD1ZiXb8

4IBxwJgCkYQm9/QkblH9f7FEEt8c30X09dOJoXxKkJqaLyBBWop8EQlSnvMtSJDGM19CgvQK861I

kO5svg0JUr7y7Ug4CeFAQiaEE4kcQshIuAiRg4SbEC4kPIRwI6EQwoME+djlK0jkEsKLRB4hcpGY

RIg8JEhDmj8JiSmEmNwHlB9lPhKEH8XPiGJGlDCiVEugwlKquBiRpyVZYWlX3FraFZYJiocRipYb

CssWxcuIXC0VyjRGTGfEDCRIPVLKGLGg70Ga84rECCsjJjFiMhLIoQMJZMzGCDsjpjBiat8hQChO

RsiMGIPqFA4ODg4ODg4ODg6OyweCcH10/D8FzipDyhGlX9moVCk+BZSzniHPEU+/Z6OnyuPzgOes

e8h9xN3v3ujW5P91ic4M1//fsb1ke9I2aJttlCfn+NbQp96UmUjgmDMfCRxzzmLEFYy4khFXIYFj

Th8jrmbEbEYUIIED5msYMYcR1zLiOiRw5Hw9I25gxFxG3MgG+fMYUciIogTj//6sDvL5kJ7jcoNE

FQ5N9KqPXY/WsDgWXWLX1yOZlWE9kllN8CoVX//n6/+XxPp/Lq16+DUT4EXp8XdRJ9u/BNU7tggN

gEeqoaqVYsJ2EZiveaCpaM6ltQLwSwv3HXr+NxgEu2NQqU+IG+ipAvO1WA/cljJwdVvPrXQHZFo+

rSmDij3JcKAnkSaeIj0wKQ1fxmMJ0wZmSRlY7NkLaQMTUwamHyQx0DMPzNdcPSAUtcB+Tk7/4slq

AOyOAa2hCsc6NWWFrdBO1Y0N9AQAqizasRWqNu+KmKtcjaCKCjynimA11bLIdpwy/WcDPUMkAjGz

CFD4Qi3kM999jgbM7riire8KG6V2clqkCInbo20JL5l8XHOo7EAq90lp3PPSuOemcfemcVfSuHvS

uP9/e2fz20YRBfCZ2Y2/vWuqtqiCwP4FUSmoOBVCCQQhaBJBEwWBKsKEtWIn9ho5cUlaqYkEAtFy

4MCh1164cEGUA2pRxYELPVUcECdUceBQEOTKZZeZ2Z141nY8VhGx07zfauzxvNmZ3dnZXb/d92by

GnlOI89q5BmNPK2RpzTypEae0MhHNHJTIzc0cqKR455ygqtiZtFPcejjzY9WHrUcCo6xtOMszBqs

IkNUxgOfAgnzaZCi7BIZN6W/OG7ziI/GAuClCB96HApcFI0FgJHRJgjHzOw24GXnQJQfiIqw9GPf

CYL1tjgZDaduWt+5RLZFDfp1jNFwqie+Tk9v+F2ZbD1FJn6G+6LzlwcAABgKFEVcsXD8/x8JdK0W

9H/Q/0H/B/v/+MbF7NO3wf4f7P8Pr/3//P5XSwZTLRqY/X/Bih9uuSXKWSzeUcaTxLvJziQfxS6v

8gy7Gj/p2nKNiL9mllpWqHy2F9+eRNqTMP5Z6P8cE92yL9hP2X9GKXvY//cTQcBwsBV+PTTv/9GQ

2/+f3k8bgd3IK8jdfQaWRiZrs5GEmNaUfRriqV6KfaYTfGMt3qI8oByXJPh1JJMQ0/OgHEqwz2RC

NewBAAAAAAAAgIPNtjZHH0xoc/QD1mfR818KMfGX+cf3kIFKf/DheinrH47Uih2pAztS9XWkoutI

/39H+v870v/fkf7/jvT/d6T/vyP9/x3p/+/kum4JAAAHjqSJ+P1hAPb/slqw/4f3//D+f1/t/x8R

J19oHC1nZVdnZ2/NzK61Ewf7f7D/P8T2/90r4Ps2E+uf6kTaZdE31tCVDU0FZl8VvM6aqiQ6XEkU

WkSdy+lYd+ujUDlZzpWNU6hzORnrcH0UF29Z7TYyCrxvkJ6FTrFCr148z3qEGfWIM2Lpeg2YCHed

ezuwk6Nbsb0O1HOoczkTa4QeBcuL4JKwZg8P0jOoczkVO/t6FNhy0OJF9bzwgf7/cAP6PwAAAAAA

AAAAAMDB+AVL6v959Kt9275uf2gv2y/ZT9rY/s36wfrC+sRasWbb1mNKIU6BmfDQsyU8AISFiMkV

960g9hv3WhcAAAAAAAAAAODBMMTgcIG/UFlt0Frgn6Pr5bp7HHHPeYKShhgIMPDnml6lGviv1tfK

laNslUiYFcJztNxkwqkGvVBxj7WkGSGdpZvUC/yZurdcoYo0HdY7tjA2Nxb403SjRj2l3lS0WV7d

DfyztLZUrSgrJ4V0hpZprUZZhsmLLNpoum7FG0UFmSsRllHyVul6aa0c+K816Bp1TwgbJZFjROSY

FDt3tskqKR3l7rah0Az3rr5UYds/V/GWy8quG+GaK3STNQt1SytUWZOEjVZvsiYJ/Jept9ysbj7a

2jkcyum7ZV70fMlzm9VV2jghc2A8lppemJzmRwij51OunbW/sRatgnUr/1b+n9y13LO5v7LXs/PZ

ZPa7zGJm8U4mcyMtXiVj0mP8f8SziGEKCgjd/egIcq99/T6LposfH0HvvXEzwb/579938MkHtLD5

qUjE7rPw2ew4eefFcbIzPU6+nxknn/9ShAABwiEI96bGCRowwQBxBrz/E/fRY3fZceBxuU1SFvit

B8Rq+jDRbtI4CDD+G/GH6ql7l8n2H5eJbCtx74/i+3mQb5gY89vzt6hIvrp5aa+q79yWowx1PwV4

estW/LBiRAHgQEuoQGuoQGuoQGuoQGuoyNZ4Ivr2maL/pvI2l999+c+3UeuPw4/RN09/Oor/C1BL

AQIUABQAAAAIAGtkJim9nP2zkQQAAMQLAAAMAAAAAAAAAAEAIAC2gQAAAABuYXZpZ2F0ZS5hc3BQ

SwECFAAUAAAACABZYSYpnKgKxTUzAAAAIAIADAAAAAAAAAAAACAAtoG7BAAATmF2aWdhdGUubWRi

UEsFBgAAAAACAAIAdAAAABo4AAAAAA==



------=_NextPart_000_0018_01C05AC3.9D5BB710--




  Return to Index