This is a multi-part message in MIME format.
------=_NextPart_000_003A_01C816EA.30E0DB20
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_003B_01C816EA.30E0DB20"
------=_NextPart_001_003B_01C816EA.30E0DB20
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
--=20
Ignacio Ortiz de Z=FA=F1iga
http://www.xailer.com
"Israel Solis" <
isolis@sanroms.com> escribi=F3 en el mensaje =
news:[email=
47200416@ozsrv2.ozlan.local...]
47200416@ozsrv2.ozlan.local...[/email]
Hola
Se me presenta un error con TDbfDataSet al conectarse al servidor ADS
Mi aplicaci=F3n abre TODAS las bases de datos al arrancar, utilizando =
simplemente DbUseArea() y todo sin problemas.
Pero tambi=E9n utilizo TADSDataSource con TDbfDataSet para manejar =
DataControls en el manejo de cat=E1logos.
Si la aplicaci=F3n se conecta con servidor ADS LOCAL todo funciona =
perfectamente tanto en ruta de acceso a las bases de datos local como en =
red.
El problema est=E1 al conectarse el ADS REMOTO, es decir, a una ruta =
de red donde se encuentra activo un servidor ADS
Todas las bases que abro desde un principio con DbUseArea() se realiza =
sin problema alguno, pero al hacerlo via TDbfDataSet marca error
EL ERROR:
Al abrir cat=E1logos (TDbBrowse en ventanas MDI) me marca el error:
------------------------- Informaci=F3n del compilador =
--------------------------
Versi=F3n Xailer: Xailer 1.7.6 Version 1.76
Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode Version: 9
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Informaci=F3n detallada del error =
-----------------------
Subsistema: ADSADT
C=F3digo de error: 8026
Estado: .T.
Descripci=F3n: Error de apertura
Operaci=F3n:=20
Argumentos:=20
Fichero: cLealTestBancos.adt
C=F3digo error SO: 0
Pila de llamadas:
DBUSEAREA (0)
TDBFDATASET:OPEN (239)
(b)XDBFDATASET:XDATASET (36)
TDBFDATASET:_LOPEN (0)
TFRMBANCOS:DBFBANCOSCREATE (66)
TDBFDATASET:ONCREATE (0)
TDATASET:CREATE (225)
TDBFDATASET:CREATE (177)
* * * * MI CODIGO...
En mi PRG de arranque tengo...
// ADS...
REQUEST ADS, DBFCDX, DBFFPT
REQUEST ADSKeyNo, ADSKeyCount
REQUEST HB_Lang_ES
REQUEST HB_CODEPAGE_ESWIN
RddRegister("ADS", 1)
RddSetDefault("ADS")
ADSSetServerType(nADSServerType) // Tipo de conexi=F3n leida desde =
INI, por default: 3 =3D Local y Remota
ADSSetFileType(3) =20
En mi Forma principal tengo...
en Menu.Xfm
WITH OBJECT ::oAdsDatSrcMain :=3D TAdsDataSource():New( Self )
:cConnect :=3D ".Data"
:nFileType :=3D afADT
:nServerType :=3D asANY
:lConnected :=3D .T.
:OnCreate :=3D "AdsDatSrcMainCreate"
:Create()
END
en Menu.Prg
METHOD AdsDatSrcMainCreate( oSender ) CLASS tFrmMain
oSender:cConnect :=3D SetIni("RutaDBFs") // Ruta de conex=F3n a las =
Bases de datos, le=EDda desde un INI: cLealTest
RETURN Nil
En mi forma del cat=E1logo que intento abrir y marca error:
en Bancos.Xfm
WITH OBJECT ::oDbfBancos :=3D TDbfDataSet():New( Self )
:cName :=3D "Bancos"
:OnCreate :=3D "DbfBancosCreate"
:Create()
END
en Bancos.Prg
METHOD DbfBancosCreate( oSender ) CLASS TFrmBancos
WITH OBJECT oSender
:oDataSource :=3D Application:oMainForm:oAdsDatSrcMain // =
DataSource declarado en la forma prinipal: Menu.Xfm
:lOpen :=3D .T.
END WITH
RETURN Nil
ARCHIVOS EXTERNOS:
Ace32.Dll
AdsLoc32.Dll
Axcws32.Dll
(todos son versi=F3n 7.10)
XailerxHarbourAce32.Lib
XailerxHarbourRddAds.Lib
Que puede estar pasando? donde est=E1 mi error?
MIL GRACIAS
Israel
------=_NextPart_001_003B_01C816EA.30E0DB20
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.6000.16544" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><IMG alt=3D"" hspace=3D0 =
src=3D"cid:003501c816d9$6d510640$
0202fea9@ozlan.local"=20
align=3Dbaseline border=3D0></DIV>
<DIV><BR>-- <BR>Ignacio Ortiz de Z=FA=F1iga<BR><A=20
href=3D"http://www.xailer.com">http://www.xailer.com</A></DIV>
<DIV>Â</DIV>
<DIV>Â</DIV>
<BLOCKQUOTE dir=3Dltr=20
style=3D"PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; =
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV>"Israel Solis" <<A=20
href=3D"mailto:
isolis@sanroms.com">
isolis@sanroms.com</A>> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:
47200416@ozsrv2.ozlan.local">news:
47200416@ozsrv2.ozlan.loca=
l</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Hola</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Se me presenta un error con =
TDbfDataSet al=20
conectarse al servidor ADS</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>
<DIV><FONT face=3DArial size=3D2>Mi aplicaci=F3n abre TODAS las bases =
de datos al=20
arrancar, utilizando simplemente DbUseArea() y todo sin=20
problemas.</FONT></DIV>
<DIV>Â</DIV>
<DIV>Pero tambi=E9n utilizo TADSDataSource con TDbfDataSet para =
manejar=20
DataControls en el manejo de cat=E1logos.</DIV>
<DIV>Â</DIV>
<DIV>Si la aplicaci=F3n se conecta con servidor ADS LOCAL todo =
funciona=20
perfectamente tanto en ruta de acceso a las bases de datosÂlocal =
como en=20
red.</DIV>
<DIV>Â</DIV>
<DIV>Â</DIV>
<DIV>El problema est=E1 al conectarse el ADS REMOTO, es decir, a una =
ruta de red=20
donde se encuentra activo un servidor ADS</DIV>
<DIV>Â</DIV>
<DIV>Todas las bases que abro desde un principio con DbUseArea() se =
realiza=20
sin problema alguno, pero al hacerlo via TDbfDataSet marca=20
error</FONT></DIV></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2><STRONG>EL =
ERROR:</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT><FONT face=3DArial=20
size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Al abrir cat=E1logos (TDbBrowse en =
ventanas MDI) me=20
marca el error:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>------------------------- =
Informaci=F3n del=20
compilador --------------------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Versi=F3n Xailer: Xailer 1.7.6 =
Version=20
1.76<BR>Compilador: xHarbour build 0.99.80 Intl. (SimpLex) PCode =
Version:=20
9<BR>Compilador C/C++: Borland C++ 5.5.1<BR>Plataforma: Windows XP=20
Professional 5.01.2600 Service Pack 2</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>----------------------- Informaci=F3n =
detallada del=20
error -----------------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Subsistema: ADSADT<BR>C=F3digo de =
error:=20
8026<BR>Estado: .T.<BR>Descripci=F3n: Error de=20
apertura<BR>Operaci=F3n:Â<BR>Argumentos:Â <BR>Fichero: <A=20
=
href=3D"file://cLealTestBancos.adt">cLealTestBancos.adt</A><BR>C=F3=
digo=20
error SO: 0</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Pila de llamadas:<BR>Â DBUSEAREA =
(0)<BR>Â TDBFDATASET:OPEN (239)<BR>Â (b)XDBFDATASET:XDATASET =
(36)<BR>Â TDBFDATASET:_LOPEN (0)<BR>Â =
TFRMBANCOS:DBFBANCOSCREATE=20
(66)<BR>Â TDBFDATASET:ONCREATE (0)<BR>Â TDATASET:CREATE=20
(225)<BR>Â TDBFDATASET:CREATE (177)<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2><STRONG>* * * *Â MI=20
CODIGO...</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2><U>En mi PRG de arranque=20
tengo...</U></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT><FONT face=3DArial=20
size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Â // ADS...<BR>Â REQUEST =
ADS, DBFCDX,=20
DBFFPT<BR>Â REQUEST ADSKeyNo, ADSKeyCount<BR>Â REQUEST=20
HB_Lang_ES<BR>Â REQUEST HB_CODEPAGE_ESWIN<BR>Â =
RddRegister("ADS",=20
1)<BR>Â RddSetDefault("ADS")<BR>Â =
ADSSetServerType(nADSServerType)=20
<FONT color=3D#808080>//ÂTipo deÂconexi=F3n leida desde INI, =
por=20
default: 3 =3D Local y Remota</FONT><BR>Â =
ADSSetFileType(3)ÂÂ=20
</FONT><FONT face=3DArial size=3D2></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2><U>En mi Forma principal=20
tengo...</U></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2>en=20
Menu<STRONG>.Xfm</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>ÂÂ WITH OBJECT =
::oAdsDatSrcMain :=3D=20
TAdsDataSource():New( Self )<BR>ÂÂÂÂÂ =
:cConnect :=3D=20
".Data"<BR>ÂÂÂÂÂ :nFileType :=3D=20
afADT<BR>ÂÂÂÂÂ :nServerType :=3D=20
asANY<BR>ÂÂÂÂÂ :lConnected :=3D=20
.T.<BR>ÂÂÂÂÂ :OnCreate :=3D=20
"AdsDatSrcMainCreate"<BR>ÂÂÂÂÂ=20
:Create()<BR>ÂÂ END<BR></FONT></DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2>en=20
Menu<STRONG>.Prg</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>METHOD AdsDatSrcMainCreate( oSender ) =
CLASS=20
tFrmMain<BR>Â oSender:cConnect :=3D SetIni("RutaDBFs") <FONT=20
color=3D#808080>// Ruta de conex=F3n a las Bases de datos, le=EDda =
desde un INI:=20
</FONT><A href=3D"file://cLealTest"><FONT=20
color=3D#808080>cLealTest</FONT></A><BR>RETURN =
Nil<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2><U>En mi forma del cat=E1logo que =
intento abrir y=20
marca error:</U></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2>en=20
Bancos<STRONG>.Xfm</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>ÂÂ WITH OBJECT ::oDbfBancos =
:=3D=20
TDbfDataSet():New( Self )<BR>ÂÂÂÂÂ :cName =
:=3D=20
"Bancos"<BR>ÂÂÂÂÂ :OnCreate :=3D=20
"DbfBancosCreate"<BR>ÂÂÂÂÂ =
:Create()<BR>ÂÂ=20
END<BR></FONT></DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2>en=20
Bancos<STRONG>.Prg</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>METHOD DbfBancosCreate( oSender ) =
CLASS=20
TFrmBancos<BR>ÂÂ WITH OBJECT=20
oSender<BR>ÂÂÂÂÂ :oDataSource :=3D=20
Application:oMainForm:oAdsDatSrcMain <FONT color=3D#808080>// =
DataSource=20
declarado en la forma prinipal:=20
Menu.Xfm<BR></FONT>ÂÂÂÂÂ :lOpen :=3D=20
.T.<BR>ÂÂ END WITH<BR>RETURN Nil<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2><STRONG>ARCHIVOS =
EXTERNOS:</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Ace32.Dll</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>AdsLoc32.Dll</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Axcws32.Dll</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>(todos son versi=F3n =
7.10)</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial =
size=3D2>XailerxHarbourAce32.Lib</FONT></DIV>
<DIV><FONT face=3DArial =
size=3D2>XailerxHarbourRddAds.Lib</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial color=3D#008080 size=3D2><STRONG>Que puede =
estar pasando?=20
donde est=E1 mi error?</STRONG></FONT></DIV>
<DIV><FONT face=3DArial color=3D#008080=20
size=3D2><STRONG></STRONG></FONT>Â</DIV>
<DIV><FONT face=3DArial color=3D#008080=20
size=3D2><STRONG></STRONG></FONT>Â</DIV>
<DIV><FONT face=3DArial color=3D#008080 size=3D2><STRONG>MIL=20
GRACIAS</STRONG></FONT></DIV>
<DIV><FONT face=3DArial color=3D#008080=20
size=3D2><STRONG></STRONG></FONT>Â</DIV>
<DIV><FONT face=3DArial color=3D#008080=20
size=3D2><STRONG>Israel</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2><STRONG></STRONG></FONT>Â</DIV>
<DIV><FONT face=3DArial=20
size=3D2><STRONG></STRONG></FONT>Â</DIV></BLOCKQUOTE ></BODY></HTML>
------=_NextPart_001_003B_01C816EA.30E0DB20--
------=_NextPart_000_003A_01C816EA.30E0DB20
Content-Type: image/png;
name="2007-07-12_163726.png"
Content-Transfer-Encoding: base64
Content-ID: <003501c816d9$6d510640$
0202fea9@ozlan.local>
iVBORw0KGgoAAAANSUhEUgAAAqgAAAChCAIAAACEStrqAAAABmJLR0QAAAAA AAD5Q7t/AAAACXBI
WXMAAA7EAAAOxAGVKw4bAAAfQ0lEQVR4nO1dO44kR5KN8/QVeII+APXWKbfM kVsaoTHSAByBwqBB
YQSCGGEECj0KT7HYCyz2BL6+7Vu2lvZ396iqzIr38FDwtHj2cY+ItMjIrMyj tf8AQRAEQfDN87//
6z9ba0eqA0EQBEHwDRCNHwRBEAQvRDR+EARBELwQ0fhBEARB8ELMG/9vv/37 w4ef373783H8qf/t
424Rmh9//Md33/2lC/rfPhZbv37944cf/h5H+Pz5n+/f/7ULOvugPwxKWuaI HzCNcA+sV9uXOtUs
hN1xAYnF1SvKlrkQfzwnkOPUYfaS5IUtTHOBj7IyYNs+JDbdX5dJ4+/H8WjY nN3CO3dv6kLQLZsR
Oj99+jWtfpY6i2Aa4R5Yqfann/41lj2NNhV23wUkFlevKFvmQvxxlU+8w/am j/+FaS7w/lcGJG4e
Epvur8uk8X///d/G3Mbr+P53POz2Ifjy5Xd+iNPVbrcPAVlGhN7OxSlBEcbl ggh4Lvk5aTKNcA+s
VFvRgK/Lx91H91/5a1X4WnnBBW7urE3312XS+PXchIVerI9OL7p4+3bpMK6C 0whprfss7iqSff78
z/G64f37vwb2wf4ig79b0R9WYposhqL7ij0gv8tCAjHfvnf4fUgRWYj5Q3qn RryVs+AySFt7PV+/
/iHiaPY66Rp0eNGVJTF4v4kc+eL3mMPIl46ORr4ys5G9WfBZ933nrZ531I11 2K9Z0CujOTuRBMKx
lY9bb4L8eB5v9vW9PAJ2i5hFcDCbFepq6wV7SyEY59150phaGcE3cO7Un7jq Tzv6BNSMl87LK96n
LhZvLkL9LJ5l0vjpLn1/dm7f3q0fD7t9COioJReanhdTLPeI0NeXJjmagee+ w3RPCxlNf9zh8OzN
ebfi48df0piaC6GO2zXX7o31DEE6TLk4yHI83bxZc2nsmBnkd0fNBaG7RIL8 /NGLxo9AXdhY/PGQ
DmbTshZZU8yaL1EcSsj2axZMyyCOnSiM5Lhw3Hqn1aAOSG//xQeztutprhVM NJ+F47ynPGkMBisj
+AbOnfoT19TTjj4BBdOlC/IWD9R4EabO4lkmjZ/u7Y8rO3Hfvlmnk7aYAYMu dXxrBkHRyzRzBVOg
IseFiGen+xzd3i2ddJDRFaLnK7gWijTBfhn9lY5IuuClpRYuPMsolQ7EHRc6 nUbxfIKHc8zQKTE+
F0LnEsXsZ9GwjCdNOsb0aojFp/JGZFoTeh2zHFmQH/ZDoGfthRKy/ZoFgzKK +72tHrdiguPdPaqf
LHTMUAGzB7O2zBbsLYVgkHfnSaO+MoJv4Nyp7+tgN1VOQMF06XRe3d2mim9s EdLV22T+qf5eNH9N
Jm5l6LULVpPfXdGXPOOIoX121gw5KZdJLfPuvAk7XQ+RnY4S+qSC5yu4Foo0 dPToSRH7XuhrGzQe
8dC7u7XmQrfOdPFmtTxCL9t8aqCYwkWvhlh8Sj3OTHoaJdlyZEFa7WDWXigh 269Z0Cujvt/b6nEr
7PSB38Aiii8ezNoyVXCwFIJB3p0njYWVEVsf99whpvs62E2VE1CQtnpLV8lb L14sQrp6m8wbP733
MNjHvEQ9z2DmFIdXT/qvt+8mPMeLfsplUss8d2GneWkx3fjyfM8KJYymhv/P pJ54JcLpLoGRyN9m
O74dPOLGJt8qmMYfF7Xj9tpIxO9V7kQ2KwyMXiht36w5jr9W6vJxa9orlqmD WVuWC/ZmUcxLXCug
YuF8A+dOm9/X2ljRCNaXLjYuFM/tnuMmk8ZPNxzErX7vjWHTMki3Dd7d/i9f PcI+i5E92ZRdGHdS
V0KlGrpZ1Nf/48dfgg+XLWdZcAmMxF6qPnP4BajYxJnG70tBm8bgB/Z5pZ3I nKasGErbN2uO46+V
uuZVjyYsswdzsZgFzcJc6sEr0eJ63sC5s7CvtbGiEawvXRBzrXhu1zSrneUL fbiPrhhE1w8inDVD
zmLkdGcI+9rFu8nlUMKoNXTh5d0kTCOkmgWXwCj45cvv/cwR7zoV3QMBnYp0 isZXpfXIqayyMqZ9
s+Y4/lqpy8etaU8tsweztiwX7M2imJe4VkDFovnQ587Cvl7TmJxdOmFcK75Y 2w6f/d/5Gnv7R3f9
pj4kQtcWZ72ZwVlczdmdMfV2XZx6KpTW0CdCdTph+ar+iS5+WNFUXBbe4xfU V80UUx9dQWFE86w+
JbKOU3mPv5Jip+Y4vpku1Uwdt3EBFYt4mB7M2rJcsDeLYl7iWgEVS8BHPHeE rLKvtbFyAsYsvliP
NcXiW2H1Nrn4BT50aFKn/+B8gQ+fqvk/JyIC3T56+Q/3pTvDs9Mx9L7wAd24 wqlQ79UnVGmFdTo6
RYeG9pQ3a7PgfZeFT/VT5eOkpQNGfzJ5HEKVyyBOOqqP23+m2o9M5LMWu/UI V8+z79QcxzfTpZqp
4zYuoGKZPZi1ZblgbxbFvMS1AioWzjdw7izsa22snIBeXm/pKnnXim+F1dvk s39lr/m/qmKqWnPW
9AS9SkRJusLY3pxpmu94pUXWQ4ldw++R8CNsHDr8FBXuY2+KCs2CY03Fpal/ qE3PQDrlBOniXcc8
bo/SOD6/NtXX1zuRgzh838WhTPtOzXF8M11FUz9u4wIqlvRg1se/jrlWsGms V865UEDFwvkGzp10
X5txtDE9AQXTpavkXSveLPgIz+JZ5p/q/1r4iZ2+FuNM6w1bfG+Rvm4wp0r/ NPhefXjyRHqViJK8
neHZBz/f/s4QP7VS37VQv7FfBOHPF+3bFRvdraGrqB9vvweKTlrzmdEsONZU XAbpKW+UbWrEdD48
/VLU4X/7GC2aOErT+MNR3Ks8JTInzfpD+M19wsuzL9ccxzfTVTStfNzGBRQt 8cGsj38z+0LB3izq
le8UULEIvoFzZ+qJKwgen4Ca8dIV8y4Uz32LZ/Es88YPgs/NcWR7zx0gCILg iUTjB1+UdIVL1850
N0zctABBEASfg2j84IuSPrwp+O7dn78+zw80gCAIgpxo/OBL89OnX/m3Yn33 3V/6a310fRAEwZch
Gj8IgiAIXoho/CAIgiB4IaLxgyAIguCFiMYPgiAIghciGj8IgiAIXoho/CAI giB4IaLxgyAIguCF
iMYPgiAIghdi0vj5TwjQT/WMHxvgsi9ffuc/hyV+bYLs9KMyPc74LZ/uOH6E oFv07/CKnzcQW3sK
/j0w5o9PgCAIgiDIWW38+kf2qBPTTwUL0s/0eUH0r1Ly3+XTW9+zn52l31cW FD9vBYIgCIIgZ7Xx
96Y7vlSV+jH9ltp4UU49m37ukAQUZPwQYb8gEBbq4uRCmo8ff2nsd1zoakP8 qjFdfOAX3kAQBEEw
YLXxp79D3L61fP77wSSgh/RzwoFlPKR7+CIpvegn/fiFY69+EARBEAQ5q40/ NvYX6Lzfe40/iOC5
eDH5u/vHtwsC/jYBCIIgCIImT2j8dB/+3bs/f/z4C93q1108COu5aA5Bz6Iv NXoBeI8fBEEQBAOe
0PjHe/yHf98+bfMVF5NfvvzeLzWogAPv8YMgCIJgyBMav3j49esfaRdPLXQn ny4mYurbDCAIgiAI
ap7Q+OkF93iXnf9DvxcktdCn+sfH/ulD+/2CQCQd9/b7S//xEK/4QRAEQTDg CY2f3uMniv+1S9u8
aTHfwqcbANTpBfEePwiCIAgGPKHxN/UVe3S3f7xer7R5MxH/58AeStz2H98D SBcZ+OY+EARBEEyJ
7+oHQRAEwQsRjR8EQRAEL0Q0fhAEQRC8ENH4QRAEQfBCROMHQRAEwQsRjR8E QRAEL0Q0fhAEQRC8
ENH4QRAEQfBCROMHQRAEwQsRjR8EQRAEL0Q0fhAEQRC8ENH4QRAEQfBCROMH QRAEwQsRjR8EQRAE
L0Q0fhAEQfAEmr+urgVpnPshzSid2in84Ye/jx+a73/7ONV7JaWlovGDIAiC u/zpp39Rd+xjU5M2
pFl++fL799//LZUt8/SCA75//9fvvvvLb7/9u48/ffq1502nhsYPgiAIvhr7 K9TRq/pf79Vq2pBm
eXrAF45P/Pjxl57o8+d/psoK07LR+EEQBMFdjnvUX7/+Me5U8039aqC/lu1d bTSk/jJdvJwdlwvd
3l/vjnFnd6E7B+TYI3eOBnnc3oH3fEf87vXjj/8QHfHDh5+Hpfddc1JeBx32 Hra/TNcP27dGPhaE
R9YyYi84aNW8DG/c1DqTXU8TjR8EQRDc4rjP3xtMe2oz1HfHnYBPn34dg9GQ Rp/rVwl9PK4VuqV9
u909HHsXP9gFxHDsQUz7GHu+ZgHcPjplvyzQ8zrYtYXuuOK6hB6OK4weedyx p8hCphNpu97qjaem
icYPgiAIbnF0l/FCfDQYenE5XviOMTWkoRnvCHDf9u1t++7bu3il24l+afqa BWj7uPIQFPE9u3jI
X77zyF40selwrjPi8dQ00fhBEATBLfJX8M3vdqIhdXaXMRjGcUHw4cPP41V7 2u34eM2XU8+raA8e
emPBcbFCC1gMUh+LaaLxgyAIguukRis4PqDuvRId98PHu/LiZvi548pLYY9c H9jFw4VX/GM1+If7
KlNbniYaPwiCILjO8Yn0T59+Jct4b3vc7af3mPVn646nSwR6pTu6VL9iGBHS bqc7nPZN3/weFy4n
3uqP3+PX0Qb7i/4+Bf7vfCQeVxJ9k1hDczpCY04TjR8EQRBcJ7UlsohWOj5U rz9tPnoS/9+/rhl3
/sfFhNnh+HjEHB+S93yb/3F3uhToAl4/8Xi6NCHqGvTD9vSp/lFMIBPkX+Dz 4cPPdANgTK1PYfxD
hFdGvM58mmj8IAiC4CWYtt6LEI0fBEEQfLPsL4LH2xDjPsT4n8OLE40fBEEQ fLP86ad/jTcjglv6
VyMaPwiCIAheiGj8IAiCIHghovGDIAiC4IWIxg+CIAiCFyIaPwiCIAheiGj8 IAiCIHghovGDIAiC
4IWIxg+CIAiCFyIaPwiCIAheiGj8IAiCIHghovGDIAiC4IWIxg+CIAiCF+L/ NX4AAAAAAK4AesUP
AAAAAMDbBxo/AAAAAFwIaPwAAAAAcCGg8QMAAADAhYDGDwAAAAAXAho/AAAA AFwIaPwAAAAAcCGg
8QMAAADAhYDGDwAAAAAXAho/AAAAAFwIaPwAAAAAcCGg8QMAAADAhYDGDwAA AAAXAho/AAAAAFwI
aPwAAAAAcCGg8QMAAADAhZA0/sOCJz4LaymWvfS8No3ADmZXclZfxGbY2H0z OPBaC0h5X6sAwp1U
EjwBHrcw3blYW7wIabQ1pGFTwQMhb/zepnvA5tEgXMbDTePbxgvMcTbFrD7A 5uFEMA8PLdjBfoSH
xmtN/6y8+3EoghlqP34FwROgLiA9HdKn03jK+0hXsp63rnwtoPHLh5vGt40X mONsill9gM3DiWAe
Hlqwg/0ID43Xmv5ZeffjxF1wP36KOK/emp4O6dNpPOV9pCtZz1tXvhbWGz/f W2LPHU8wxaaAQ+xg
TymCeOIgl1buGwWEUhcTl91uw2p3gSC+JxDugVg/FI4iAv0V6cwayCLswqLH 9Sye0tTXw2qQr7bz
Tbq2ZsXXlZgaYeEuqVJ7maFEnMZScGOsb7fQcerZzXHFXaAoaLcT5AP+MC0g TleJ0KxKYnGQ0XMh
u+cSGINcGpRLG01LJXh9RmQxM3J9HIHLtObekDd+Db7JHHP3ooAj9dJKT1zJ RTBlh3VMBEYBLzI3
BmWn7hz1+M2PkFarjUIQp47DchctM8dTWUyBVnpirxKOuNrGIptzCfTCqJWm wHQXY9MYe+3MgkOU
Z9bPxZWtFYFpjAVeecVSPSNHKo5XQMuCcSzw5mV6mcbjCVrGUS81XT2tbLde wep5peoZaUctTit8
deSNv7IpHcd7VKDutZlXWMbDTaOAN9n6cVOci0DqlVY7VcOmoFiY/uv51o0c a8ULpEGaChgXk1bC
UfdKV8A0BqHqqTnSJTLF5rpN5TWxMP20/jRmxa4F9fjpqnKk81ozBnmDUgVM WYp4RmnYoLxAPFXh
q+AVGn9jO7VZOHGvHLcI3OnhplFAa0QxXJAatbtAGj+OkIoPqzA+rgjqYYVR //V8d7IEYzMsx2Eh
Dqg31R0XvLRSQG81vQ4V/wizHH66ylhH4w+1zHRvDkwvvlWP9aDNTNwrJrB7 YdP43pgjLjtNERuD
TYeFQJ9u4pogYGzk8ARiXC/+TvA6jd8Ua+P+Xol3gNg6Hm4aBaYqrBtNpF5r ESqCNF08i2Je/dfz
3ckSjKcWUFiCgBVNxZgK0vo5Zhezrvfsac3a6LmbSAurC+oF1I2evV5A7DIl nvLSRr21GCSeV7pJ
C+IZTU2zHiGt8NXxCo2/vtZ1pTeOIwjLeLhpFPCqiiusKzmmvOrVttvIzyFI Cws09YBplrWwgYXb
0+DtNtHCXEyvNBTHVK7UMdDH4mY5erMruouxqVxYk7UCplajvgLaNxhroxnf 89L22KVi4XZva7xJ
CNIZpdNMVzLNdZ/IG78GbeIy06suEFvFoKkIZEzFaS4t2DRyCDspyS6iBcrG 0jUHcfyWRUjF5kNu
FFu9sa5BhxIoRuZjEc0bC5dYHBSZVn4weF60Na5EBxFesVEk5TAF2qgFU3rT HoyPwpqQMi1GQMc3
BTyIWUkrF6A1gZjr0wKEnj/0MrYwfnNS0CYv+HEL01cbyR4nNcdCI+J4XmmR xQjtNpdX2J0AX9l7
77jzAwi4f+AQAt4qcGyvAY3/HuFdWgJAETiEgCsAx/Ya0PjvFMHdJwCoAIcQ AAAm0PgBAAAA4EJA
4wcAAACACwGNHwAAAAAuhLzxn/424bnR7hbBupH9mZZCfLDrmbKci4cosoK1 iSx76TfyN43Xwf6s
NyNsut8VTpyLPkQrSmAK+f/xe5umcFacCl4yl4diDUXZLCjsM8UHToF4gguU JoTLeLhpfBQsV7u5
5gJxhDR+KrhzPFP98dPXuXvwskDjfxYUayjKZoHG/xDYfAqrt/O68VGwXO3m mgug8WeSFaDxvwCi
xn88oTnLTZv0kwg36oeesvkxtcCMEOfSEbx0Io5GINA1CCXfJAbaGMTxQI6m 3sxl6r2xMMYVFo0i
VMvCcgTR1rzE31TMwV3IsSmIgJ5Y5+Wb9MNNo4BQ6mListttWO3uIc6rH2oX MY4dhVLINGirSCeC
iyCmpZULqBtjwVFOSkpToB9WQnGjBy4WejNpKtPQAgol/qbiB0X1Fb+edrtd 8VRZN5oCrkwjaGPz
UxSnwFEXxBWmsnpJHKaX3uop60nTCmeNelOlBj32CpvySguOI8/WoMVmXo6D wZQdag1jo4AXmRuD
slN3D6mjMNazpI71CGleL1QcoR6qXmq79aonTQV1oykwEStF/OJcOCoV1qfz oNht/LFRb/WUm7ut
FSKsCVKkRWpjMEiNzQnOkU5k2NP4adKpCEWlqC2tgaPulVabjuO1bX4E05im 0BGERazbmlFgbY51
o4edlTFnZ4pnI88K0ho2Q9XdW5Y0NXLUveoz5VibdT3XlFcqflA8fOPnMAV6 nAoai9wc6Lxia6AM
BoExzshhRtACM2nzC2gKaYWeV6A8bmszxUFAEa0t1VAZB8VogVdDPDaLNF3o 4aZRQGtEMVyQGrW7
BxGhmJc/9FJ4jjyyTscRRAiKTAVxKG40ZcdtLhLosWfUoUTMWLBg9OAVoI1e Ll0qhylIw7bbFO3B
8fCNvy5IU6TRTGMsiAsoysQ4RbwvyJ6uQ1rAlKBoFLWlE9+v3DSm43htmx/B NE6lMLfqfbpgFJiq
sG5Msbx09DDdO944rTP1io2poD73ZypVb/XGm0YPJ1ZlYi1sm0lx/3jexn+W kWNqr5wrMJWpQCuD
QWoUYxNmBE+jH6YFmMZ6hLoxGGujucKpV7uNEAs8MUcazTSmKXQEYRkPN40C XlVxhXWlh3NXxtu0
ENkT1KdcEcwqxdg0xmHr8deqSkvlML30Vm+c5prySsUPimrjb0+7PN3xXCks RaU59oxxLi7wCvDG
Io4AbTU1Zj26ADOjuZULuKVZ8CKYGm4R8ZtVldhqiheM3tgUC9BW0gTRhNdy DUFYLTDFPGBQhsjL
cTCcZeQQdlKSXUQLlI2lawxmajOvGV+LTQvfZDqmdXIcDMLYbhenIhAyU8nF WimMsYAip6FMAbdz
vXAMQpkuHLEgSCo0XnxT4I1T8YMi/+Y+4E3iDRy7wP0jPcxSwQKeI+abARYH aGj8lwXOf+CZMPXa
KBUs4DlivhlgcYCGxn9BxDfBAGAf+u7oy+BVkj4WsD5AQ+MHAAAAgEsBjR8A AAAALgQ0fgAAAAC4
EF6u8dN7S+abTPfzztNLVvKSuc7Cq9ccH0j3gFcpLE76KiWlOP50aGZON6jr 60qC57JT8HPjPnd0
ihPLPjFUijvvZQFeofEHlvvHuTWfG+1l8Oo132fjP7GYhVDDJXBciCmwHyHA cvtcdqzADK6Nz1oD
RyXRs+6mFFPZp8QxeKgTw6ZA48+Bxq9xbrSXwavXjMavgcb/HEDjn8VU9ilx DDT+WeSN/3hCbKSn
HlPZ2HJwpTByl0rwVBCEigXmVlMsLB4obzHXKcZUoI1HeT8KLBSgc3l5tVdz KqGYnrvWm/HjCMKo
H3rKxuKLmIHeE3NNu81Ldr5Jl9GcjNzX0wgLd0mVAmY31TfStXGM60Yvjmks Nn5zE43rFZLFU2r9
/8tqK08aMgpB0ctU6of0tyjmXmTheq4Um4oRtHvgJTLqCIFX3UUIBHQEzziF ua/sjY1aUNxaMZoC
rqzHTwWVrcHYRFxhPVfdyFH3Suusx08FIleQ1zR6iWJ3IdbjNMK+MZ1COuZI 9ZRRb61XWMkSuIux
gO5/euwZtcAzxnFiI4fXg8+qMFUK1FdeCMx9l3rFSm6cEgde5laONK+Zi8Pz 2qw2dTHF2qtlYWcx
0fhNYzrJwLjgIsam8axQ9UQVLCwFx2ZVqXFz0TjSXKYxTREvmpYF47qxHqG+ bvWYFXGgCbJvzoWj
7uVF+N9Nf7rZVG/DqTLuryamlGau5gQ5yyhQX/ni4TFr1Fs9QZsJm5ZtGk+M sBa2uDUY143eIqd4
442fw3QXW3WoYKsp8GAG4QMOrgyMpuxwiil6CUFgFNChPAG3VMbCUQ84PN9h 90LVI2i76TVr5PAE
nlgj8D2e1sGMkDoueGmlhm78nKZGG4sd1G2ftYwaxbwnGgXqK28qhVfR2FgK b2tjKBZTN3KkNRy3
kP6TeYvVmknTmAK65opXijfe+GOlaY+9UncP9aWIXUxBmp1jIWm9Ek/AkYaN BQv1e1iLsFBqauRI
l8UTC0uQvaKpGFNBugsGdONPNdpY7KBrcUylsKRBzjIK1Fd+fyfGYdP4qbhu 5JjKZSL1qgs2d4GH
tKopTDT+4mzrxgUXMebGnfimYM3dQ1xhWklRKcamcSFUPT4v1RS0QtjiCtQT TYnTCHFVpjI1cqQF
BBZur8TZn8vCsmgEjX+hL9Ybv7n19MZfzFKfi8DU/jrLq24UgoUIpjtHJa8p 4EYznelVr7boIsax
IPWq4ORP9ZtjIeYDbWwzwYVReLUsVCowt8aCplJw41Quri8qzdRTXsE4TkGb YkExl/DiRj3gEMa4
ZlNQiWBWxceBe5CLu4iHnlIbuf1g8LxoK/fSYrMqLfaMIqmA2U15d/SM9WYp jF5wz0Ur4wpFELPs
hQm6JTFoI7dUxnUvM6NW8k1coMVxrqbCiq3aS2hMd1IKgRDrCAeD6ZVuNccc OoJnnELe+B8CO0tw
Osxi7qpCAHhW4GgnmK3a699Aimc6tJ4p7N0Cjf98oPEDF0Tl5YuAeOkMFpmt 61vDMX9ozeKZwt4t
0PhfCPdfIQBs4nhCJrwQzD59wea9iec+tJ4v8n3ijTR+AAAAAAAqQOMHAAAA gAsBjR8AAAAALoSJ
xn/iuyBxqBMTnYtDwRTEXu358QJZXiAFYS3XmhcAAMCbx8oX+KSIlWNroKkn 8rAfwYTZ1PVYyOKH
D4TNyqfc1w48AAAAIAUa/wROafym5SGwWfaU+9qBBwAAAKSIGv/xBHpIxlim NULfrGdz8tKCIDiJ
Y42wcJdUybcGFl6Ap/EsZPfq1IkqdWqlV3CaVz8UStPouZuWwLexLJUILSzG MwbjIBEAAMBjYe4V
Pz3UA88okD7PUha9NdYLo1aaAtNdjAOjsPBonsa0NCd7fcocgVIHnMobGL2q YqMYewIznSnWxnox
dSMAAMDjYq7xm2NtDJ4fKwFFnHqutIC6l5dUQG81vVKLZzQFlToD5XG7qoFG IFUuFNMyL29cj5DG
N431RAAAAI+FExr/waC3chwWtIswHuVcpnHKSytFHHPcrNReMabFM7Zy8cIl UB63q3rcguu1xYtm
jkUEbyu3c0E8no2gZdq4lggAAOCxsNv4UyOHtlfiVDQVYypIn9aFIM4ShDUT pcZ0dkVlWp5AJdqy
0UO8tm0yQtG4lggAAOCxcFrjP75BK7WLaU8TtUKu1FgvuzKFoM4glBm5OdE2 6wwqjMcLRrPCStnx
FLxxPULdvW4EAAB4XOSNP30GJI35dG+6mPaDwfMyc2mxDiK8YqNIyrcGFuHL 43M0H6aGxyEL39oU
UqWZIjXyh6Y9NprRuIUjyCU0QYRYGRtj98NJCgAAcP+Y+Oa+two8iZ8FrCQA AMD946KNH6/ezgJW
EgAA4LFw0cbfshvFQB1YSQAAgAfCdRs/AAAAAFwQaPwAAAAAcCGMxv8/NlYB 8m2lquUAAAAASUVO
RK5CYII=
------=_NextPart_000_003A_01C816EA.30E0DB20--
Attached files