Página 1 de 1

Interceptar Error en DataSet

Publicado: Mar Sep 06, 2005 12:35 pm
por Xevi
This is a multi-part message in MIME format.
------=_NextPart_000_000A_01C5B2DF.7B33CA50
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_000B_01C5B2DF.7B33CA50"
------=_NextPart_001_000B_01C5B2DF.7B33CA50
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
=BFComo puedo anticiparme a este error??
Si el DataSet que intento acceder NO es accesible por alguna =
circunstancia...
Me salta este error y el programa sigue... cuando lo que deber=EDa es no =
continuar y retornar a un Form anterior..
Vaya... que necesito como el
If DbUseArea()
Return
Else
....
....
EndIf
Un Saludo,
Xevi.
------=_NextPart_001_000B_01C5B2DF.7B33CA50
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.2900.2722" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2><IMG height=3D166 =
src=3D"cid:000501c5b2ce$b7a88950$[email=0ac8a8c0@Xevi]0ac8a8c0@Xevi[/email]"=20
width=3D421 v:shapes=3D"_x0000_i1025"></FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>=BFComo puedo anticiparme a este =
error??</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Si el DataSet que intento acceder NO es accesible =
por alguna=20
circunstancia...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Me salta este error y el programa sigue... cuando =
lo que=20
deber=EDa es no continuar y retornar a un Form =
anterior..</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Vaya... que necesito como el</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>If DbUseArea()</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>ÂÂ Return</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Else</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>EndIf</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Un Saludo,</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Xevi.</FONT></SPAN></DIV></BODY></HTML>
------=_NextPart_001_000B_01C5B2DF.7B33CA50--
------=_NextPart_000_000A_01C5B2DF.7B33CA50
Content-Type: image/jpeg;
name="clip_image002.jpg"
Content-Transfer-Encoding: base64
Content-ID: <000501c5b2ce$b7a88950$[email=0ac8a8c0@Xevi]0ac8a8c0@Xevi[/email]>
/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBP ZmZpY2X/2wBDAAoH
BwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEEx NDk7Pj4+JS5ESUM8
SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7 Ozs7Ozs7Ozs7Ozs7
Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCACmAaUDASIAAhEBAxEB/8QAGwABAAMB AQEBAAAAAAAAAAAA
AAQFBgEDAgf/xABPEAABAwMBAwUMBwUGBAUFAAABAAIDBAUREgYhMRNBUZTS FBUWFyI2UlRhkpOy
BzJVcXSR0SM1c4GDJCUzQqGxRlZiZCZEY3KzQ0WEwtP/xAAaAQEAAwEBAQAA AAAAAAAAAAAAAQID
BAUG/8QANREAAgAEAgcGBgIDAQEAAAAAAAECAwQRE1ISFCExUVORBRUyNHGx M0FhocHRcvAiQ+Ej
gf/dAAQAKP/aAAwDAQACEQMRAD8A/U0RFgWCIiAIiIAiIgCIiAIiIAiIgCIi AIiIAiIgCIiAIiIA
iIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIDzqJ4q WmlqJ3aIomF73dAA
yVgqj6SKmWoPcVNTxQf5eXDnOd7dxGPuV99IBI2HuOOOI/8A5Gr8wstrqrtK 6Ckax8rIzJpc8NJA
44zxPsX0HZVJImS4ps5Xs7bdx5tdOmwNQy3vNm3b64Eb+4v5RP7S+jt7XdNF 8J/aWRqbdVUdDTVk
7WMjqsmIFw1EDidPEBeFNTS1r5GxOjHJxuldreGjS3jjPE+xeyqCia0tFWPL 1mqvbSZtPD6u6aL4
T+0nh9XdNF8J/aWKraGpt7aZ1SGtFVA2eLDgcsOcH2cFF1e1Wh7Oo4ldQol1 NSnZxG/8Pq7povhP
7SeH1d00Xwn9pYHJ6VZU1kqKqilrI6uhEMDWvmL6lrTEHHA1DmydyrHQUUCv FCkWhn1UbtDE2azw
+rumi+E/tJ4fV3TRfCf2lmZtl7pDAZW9zzYgFTohmD3mI8HgDeW+1U2r/qSC hopivBCmIp9VBsii
aN/4fV3TRfCf2k8Pq7povhP7Sw1TT1FHII6mN0Ty0PDXbjpO8H+amW2xV91g dPTiJsTXiPlJpWxt
c8jOkE8TjmSKgooYdJwqxCn1TdlE7mt8Pq7povhP7SeH1d00Xwn9pYKRr4pX Rv3PaS0jPAhektNU
QRQzSxOZHO0uicRueAcEj+at3dSZERrNTmNz4fV3TRfCf2k8Pq7povhP7SwG rfjKavap7spMhGtV
GY3/AIfV3TRfCf2k8Pq7povhP7SwGr/qTV7U7spMg1qozG/8Pq7povhP7SeH 1d00Xwn9pYHJ6Uye
lO7aTINaqMxvvD6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb7w+rumi +E/tJ4fV3TRfCf2l
gcnpTJ6U7tpMg1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6UyelO7aTINaqMx/ /9C18Pq7povhP7Se
H1d00Xwn9pYHJ6Uyelfa920mQ+b1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6U yelO7aTINaqMxvvD
6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb3w/rumi+E/tJ4f13TRfCf 2lgcnpKZPSU7spMg
1qozm+8P67povhP7SeH9d00Xwn9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0n h/XdNF8J/aWByekp
k9JTuykyDWqjOb7w/rumi+E/tJ4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P6 7povhP7SeH9d00Xw
n9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0nh/XdNF8J/aWByekpk9JTuykyD WqjOb7w/rumi+E/t
J4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P67povhP7S54f3A72tpD90Dz/8A ssCXEL9KsuG2630c
E3cvK08Ti4PLAXObkk44kled2jLpKKWo8K93bgehQQVFXG4cS1lfcQjt/cxw jperydpcb9JFXBM0
1VNTyxc7WNdG77wSSFYthvMtzfQctUxPj3yPfO4MY30ic8FldoJpKuy3Luid 1T3MYnRPc4u0kv0k
gnmIXlU1bST50Ml09tJ2vf8A4j1p3Zk+TKimqfe221j9Uoa2nuVDDW0r9cE7 A9jsY3L3WQ+i0k7D
w59Zm+Za9edPlqXNigXybIhd4UwiIsiTO7fjOxNx+6P/AORq/Ptk4Gm7wVL6 yOjipf20kr3huGjm
GeJPDC/QtvgTsVcABk4j3D+I1fmUFqu8kTHstFZJG4AtcIHEEcxG5fV9juHU 404rXb9keRXp4sLS
vY2FYbdetpaG9OrxHBVQkRwue1kkTmg4YQc6QTzr0raik5QyyvtrBJZJuWay VkgEw+rv5zv485WU
Fqu/E2Wuz09zu/RcNouuMd5K3qzv0XU6aU7JTVZK3y/f9sc6nzE23L3muopq J1LSytlpXVjbLTRw
ukkjBaWvcZG+XkA4I4j7lWVFzgpKPaGppIqCnmlq6dkEbXMmGDufoON/Endw VGbRdzxstdv/AO3d
+id6Lvu/uWt3cP7O7d/ophpZKbeKtv7T4/T3DnzWl/5/21jzro6juS3tllp3 MbAeSbFjW1ur/Pjf
n71Ltz4odk9oY5JWMfKynbG1zgC88rnAHOvDvTeM57zV3V3fohtF3PGy1xx/ 27v0XbG5MUvQ01vv
8uNznhxYY9LRf9VjUsqqShudvvU1ZDyNFY44jGyVrnySkOGjQDnPlArzhio4 Nj56aKopJXd7RJHL
POwPE+clrWYyMdJ47lmu8921au8lbnp7mdn/AGQ2e7k5NlrT/wDju/RcTppX NX24t8fqdCnzF/r/
ALs/RqaqaKr2kmrX1sUj4rZCaSLuiONsjseWHO/y4PT/ACUyWWmde6ymkbZ6 ix1MkTpY+6GNMTuT
GZG/zH3/AJrFd57vv/uSt38f7O7f/oud57t9iVvVnfoo1WT8pq3W/u0nWJnz lv8Av/w1dFLZoLA1
tBFRz0wdUtnjnmjidINR5M5cNX1cEaVQ3+plrLFs611Qx4jpXtkY1zciTVuy Bv4fyUM2i7njZa0/
fTu/RO9F3znvLXZ6e53fotZcmTBHpuYntv8AL6/X6lI5s2KHRUu2yxpWzUMW yETIYaKZhoXtmjkm
jjcJ87nbxrJG7AG5R5K2B132XoA+k7ljgpZanS1m6TUQ7Wfu5iqI2i7k5Nlr SR/27v0TvRd9/wDc
tdv4/wBnd+ihSJKibxFtbe/ivUOdNcKWh8jSW+4Ctq7xPFNbWVbatsdO+Zsb Y+5myu1ac+SfJxv4
lRa25UVLbL3JajSNE9zbHT5Y1xdEW4cWA78ZzvCpe893xp7yVuOjud36J3ou +7+5a7dw/s7t3+ih
U8lO+IrbOHyt9fp92S5823w+P3uV3IkDGCnJHoVj3pvH2NXdXd+id6bx9jV3 V3fovSx5OZdUcWHN
ysruSPQnJHoVj3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY9 6bx9jV3V3fonem8f
Y1d1d36Jjycy6oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuq GHNysruSPQnJHoVj
3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY96bx9jV3V3fone m8fY1d1d36Jjycy6
oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuqGHNysreTKcmVZ d6bz9i1/V3Lnem8/
Ytf1dyY8nMuqGHNysruTKcmVY96bz9i1/V3J3pvP2LX9XcmPJzLqhhzcrK7k ynJlWPem8/Ytf1dy
d6bz9i1/V3Jjycy6oYc3Kyu5MpyZVj3pvP2LX9Xcnem8/Ytf1dyY8nMuqGHN ysruTKcmVY96bz9i
1/V3J3pvP2LX9XcmPJzLqhhzcrK7kynJlWPem8/Ytf1dyd6bz9i1/V3Jjycy 6oYc3Kyu5MpyZVj3
pvP2LX9Xcnem8/Ytf1dyY8nMuqGHNysrXRexbejYKmS30ZljiD6OAF8hw1vk BZl1ovJ/+zV3V3fo
rNkdwkiiFXs7d3SxRiMPgGgOaNwyCw7wF4Xbsp1ciGGS02nfelssz3OxJ6pZ 0UU5NJq26+26NjU3
O33OnfYhWSxR6AyOskdulcM7n/8AT0LC17cWe8Q5a4sbCMtOQcScylGnmIwd nL/j/wB4/wD5qJW0
1xFBPBSbPXOFk2DNJUNLzpbvAGGgAZ3r5+h7Oqoa2XNmaKULzLd1Peqe0KTV JkqU23F9Hv4mz+i8
Y2JiH/czfMtasl9GBzsVER6zN8y1qpWeZmer9zz5fgR//9H9TREWBYodt/NC u/p/O1T7Cf8Aw9bv
wsfyhQNt/NCu/p/O1T7D5vW78LH8oXa/JL+T9kYL479PyWGUyuL5keI2Fx/k vPjjhlwuOLcjoW0+
8plV9Zc+4KqkZMz9hUv5LlQf8N5+rn2Hh9+FPWVNUQVMpTZe5ktNOzO5TK4i 6Cp3KZUS4V4oY4w2
IzVE7+TghB0mR+CcZO4AAEk8wB4ryFwqG07W1VIymrphIKamE3Kcq5rNWNQA CAsMplUE20VU2htd
VS2xtYLgWRZbUiMMlIOW7wdwLXDPsUi7bQU9tpawAg1tPTOmbDI1wa8hurSH 4wfuBzx6EsC3ymVS
UO01HNAw1srIJnzSxhjQ5waGyOYC44w3Oni4gcehffhDSzVtHHRyRz08s7qe eYZ/ZyYOhv3lwI9i
WBcZTKq6a7zVjxUU9E02vys10lQ1nkjOXBhGdORxJHSujaK0up31Aq/IY4NI MTw8k8MMxqI3HeAR
uPQUsCzymVSQ7U0M1RPA3LHQ1McGZQ5jXB4aQ7JbjPl/VO/dvwuz7S0fJRy0 krJY21EbKlz2uZyc
TiRygyBqGrSMjI3pYF1lMqhqdqoqN80tRRyNoYppYO6GvBc6WNrnOGjjjyHY OeYdKT7TPo6Cvnq7
XKyehhZO6CKVsmqN5Ia7VgAfVdkcwHOlgX2Uyqqru8tJV3GB1M15paQVUDQ/ SZ2jPKb94GDgfzUC
HbGN5qWz0D4XwUArGt5UO5T9nyhYDjiGkb/algaTKZVTT3epr5Wm327l6UOD JJ31Aj0u/wAwDcEu
08ObeD96hUu09dWyQwwWIumkE7iw1jRhsUgjJB07yXE4Hs9qWBo8plVdVfII dnn3mnjdURBoLY86
C4l4ZpOeBDjg/cVDrNqDbpqeC4Uncs7qhjJow4zaYnNeQ9hYPK8pmMY3b/vS wNBlMqki2iiq7/Bb
qR8boX04mc8seXPzrAAwMMILDkPwd+BvCmTXq2wVbqWWqayVoy7LXaRuzgux pBx/lzn2JYE/KZUK
23i33cE0NRyuAHYLHMJB4EBwBI9o3L5N7tjaeGoNZHyU8TpYnYPlsaQCRu37 3AY4nIwgJ+Uyqw7Q
2kcjqq9PLjLdUT24GcZdkeQM87sDcvSvvVutlRHT1lQY5ZGF7WiN7vJBwXHS DgZ5zhAT8plV0t/t
UM0kUlawOiYXvdhxYABqPlAaScb8A59i9RdaF1uNxbUtNIOEoBw7fjdzuyeG M55soCZlMqm8KbYa
+npmyPcyohfIJRG/ySxwBa5uMtPlZycbvvC9fCWzchFO2va6KX6j2Mc4Eelu G5u/6x3e3clgWmUy
vF1VA2oipzK3lZ2OfG0b9bW41EfdqH5qAdpbMGCTu5pjMPLa2xvLQzGclwGB u34O/hu3oC1ymVDq
brRUjp2zTHVT6OVayNz3N1507mgnfg/kos20lrYHNhq4ZpWhjiwOIw15ABJw cfW/PdxSwLbKZUOk
u1vrqqSmpqkSSR8RpcA4ZwS0kYcPa3I4dKrqe/yRWetu905CKkhmljiELXud hkjmeVx3ktHAYGUs
C9ymVS2baelvFoqbm2CeCKlDi9r2HJDW6iRkDO/UPvaVFqto68W2rmhoYIKm mo+7msnkMjJIMOxv
bjS4lvDfhLA0mUyviN/KRMfjGpodj7wvpAdymVxEB3Kj137uqv4Enyle68K7 93VX8CT5SrQeJEPc
Zf6LfMaD8RN8y16yH0W+Y0H4ib5lr1vWeYj9X7kQeFBERcxYodt/NCu/p/O1 T7D5vW78LH8oUDbf
zQrv6fztU+w+b1u/Cx/KF2vyS/k/ZGC+O/T8k9V10qJmU1U+maHy08L3saeD nhpIH5qbPMIIXSHm
4e0qBGSwAO3ucdT18f27V4ctSYd72v0/6ehIl6W0xewtzu+2ez10hvkmsawI ZQwMLTjO7HQcELbW
G4PuNrY6fAqoXGGob0SN3H89xHsKpNk6AWe2SwNfG/8AtUjgY3Bw05w3h/04 UoP707SMmziluYET
zzNlH1HfzGW/klBWytemyZatBE/8bbrpflfewmS2oFEaJERfRnMQ7jQGtbDJ FKIamlk5WnkLdTWu
wWnU3nBBIP37iClNDcw+mkq6yme6J7jIIactEjS3DQNTiWkHfkHfwUxEBRUN lnbRUtJKeSjttydN
AThxliGotzjgTrP5cFBuuxT7nWyzGsgaHuleJXwF041xuZp16saG6twxwAGV q0U3BlPAaHunlnSU
s5kJ5Uz0utzW8q+QcnvwD5ZB1BwOBuU2eyz0mz0FPSYqKqjqxVxDAaJH8qXY O/hh55+ZXyJcGYrd
imVUsEDamJlDT62x4hPdDY3teCwSasacvJ3tJ3DK+WbGmKkcyLvZFOXM0SR0 bm8npDgHNIfqEnlH
ytWBzDeVqUS7BnpNlpHwPpDcXSU0lRFUyOlZqmdI1rWuJdnG8NHNxJPsXnPs zUuttQ2WpZUTxULa
WkbFHyYLY3B7A7JOSXNaCRgYzuC0qJdgzkuy8twgdT1lW1lLNJLVOijj/asm lY5rxrJILRrdgYzw
3nn+6rZ2urLfco5rhTirr6eOm5RlO4RsjYTjydWS7ynb844bloEUXBS3W211 VWQyQPi5Sehmo6mU
tyyMOGoODc53uGMZ4KDPsbJUWiqpX3BjaqaOFsdQ2E4iLIuSJ06t+Wk7s8/s WoRTcFTS2uutsjY7
fV07aNz+Ukimgc92o736XBwwCd+8HBPRuUGi2du9BNDPBdaPloxUNLnUjiC2 WUSbhr3EOB45GMbl
pEUXB//S3FXs9JJZ3WqkreRpjCGtEkes8ryokMhORx3jAwN6+Kqw3Cqqobk+ 4U3fOGZj2ydzu5EM
aHgMDNWeMhOS7/RXyLC5YqLNYnWmrqap1Tyz6pg5QBmka+UkkcRv4ZkOBzY4 lQ6rZCGoulVWB1KO
6nmVz302uZrywN8l2cBu4HhnjvWjRLgrqG0miraep5cP5C3R0WnTjOl2dX8+ hVB2SqTHBTPqqGop
KOnfBTQ1FI52Q5zHZkw8aiNAxjG/etQiXBmzspUmmlp3XV0ra2BsFa+drpJH NDnOGhxduxrcPK1b
gPbn3u9suVdfOUpZIYaaW3SU08ksZeTqeDhoDhg4ycnIV6iXBmZ9j3S0UltZ XNbQ63zRgxZlbK6M
syXZwW+UTjAPtVxX2zuy1R0bJBE6ExPifpy0PjcHNyOjLRkDG7nU5EuCgZs5 Usqp67u6I1dY2VlU
eRPJlrwwHQNWWkcm3iTz/wAuzbNy9zQRUtXFGRbhbpy+EuD4sby0AjS7jxyP Yr5EuCrrLTO51DNb
6mOGeihdAwzxmRjmODQcgFpz5A356dyqYdiS2mFJJXNjgNIKeU0sbo31BEYY HS5cWuxxG7I3b+nV
IlwZufZmvrKmerrK6jmmmMeYTSu7ncGNcBrZry4+VkbxghfNv2O7hs9RQd2M cZzTnW2HAbyTg7AG
eBx07lpkU3BT2qxS2+qpXy1bJYKCF8FIxsZa4McWk6zkhx8lvADnVcyw1V0s U9oqxVW8MrZZeVZK
A2ojdK92PIdnBBHHGCtSii4K232OGh2f7z8vNIx8TmSSPeXOc54w9w1Zxkkn HAEqqr7NcILRX4b3
xq57f3ugjpmCINjAdpc7W7ecneQf5LTolwfELSyCNjuLWNB+8BfaIgCIiALw rv3dVfwJPlK914V3
7uqv4EnylWg8SIe4y/0W+Y0H4ib5lr1kPot8xoPxE3zLXres8xH6v3Ig8KCI i5ixQ7b+aFd/T+dq
n2Hzet34WP5QoG2/mhXf0/nap9h83rd+Fj+ULtfkl/J+yMF8d+n5Pi9yPgpm 1GkuhiOqQNBJ/ILN
1G0dvqqaaBz52CaNzC5kT8tyMZG7jvW2TA9EfkvnqjsqRUTcWNu/0a/R3QT4 oIdFI/Mtlu9GytBJ
SwTzzuldqe8wvAOOG7G44/2U2+bQ0dXZaiFjJ3y6P2LWQv1a85bjd0r9AwPR H5JgdA/JTF2XIjnq
ojiicV096+XohjxKHRSViNbZaie2Us1XGY6h8LXSsPM7G9SURem9rMCFcrpH bBTh1PU1MlTIYooq
Zgc5xDS48SN2GldiutG98MM0raSqmHk0lQ9rJuOB5GTxxzKDtLaJbsyg5Okp axtLUmWSnqpCxjwY
3N4gHeC4HhzKHUbO1dXS3MmCjppqump4YGMeXCHky7OHaQcYIxgKQX1RX0VJ LHDU1lPBJL/hslla
1z9+NwJ3712SvooWyPlrKeNsP+IXStAZv079+7eCN/PuVFfqCur9oZ2UtFDJ FU2p1O6eZxaIS6R2
9vknLgDnGR96+YNmZ6KjYYY6WapiuUlYWvJa2oaQ5rQ92DggOzwO8fzQF+6v omup2urKdpqv8AGV
uZv/AG7/ACuI4dK4240D4ppW11M6OnOJniZpER6HHPk/zVDb9n6+3zyP5Oln FYwtlLnkGky+R37P
yTqxyuP8v1B07odFsfV0kMLgyIzUnI6BJVySipDDk5yMRg8cAOx0psBd0e01 sq2zyOqIYIYZXxie
Sdgjk0uLQQ7PPg/qp/fCldIxkUzJi6Uwkxva7Q8NLiHb9xwOHFZej2Trxeor hVR0TGd1Gd8DHl4a
NUh0jLRn645hzrxk2Ir5qalpzUwRBlEyCV7CSdYjnaXDcM/4rd/HcU2A1RvF qFMKk3SiEBdoEpqG
aC7jjOcZ9i5HebfLXz0IqoxPBG2Vwc8DUxzdQc3fvAHE8AqS2bLy090pK2en hY2KUulidUvqSRyT
mghzwBxdwwMdJ5vCm2Tr4KCrpC6mcatjMy6jmMseXNaN29rhgE5GOgpsBqYa 2kqIo5YKqCWOV2mN
8cgc17ugEHedx3exQ7hemW6upqR1BXTvqjpidBE1zS7BJGS4bwGkqNR2urZV vrJqaiY6esZO6Fri
9tO1sRZmN2B5ROOYbnFTq2ikqblaqlhaGUdQ+WQE7yDG5m7+bgoBBO1VKKSe tNvuPckGsGo5Buhx
a7QQ3ysnLhgbl9T7U0FLT8rVRVUD21DKeSGSIcpG54JaXAEgNwCc53BVx2Mg 8HqqnZTUrLnUGTNU
3IJDpS763H6px96kSbMyd0siD21VIa1tTI+qe58z26HsMbic6gA4YyeGR7VO wEw7TW0VtbRtdLJN
R6AQxmoTOfnDYznyjkEHowc8CvQ3tjYWOfb69s8jiI6QxN5Z4HFwbqxpGeJI VW3ZWSir4aqhkY40
cUZhEp3zSgy6y8gbtQlO8c+/B4Ga6nuz6mG69y0jK2KN9OabulxjfE4tdnXo yHAtH+UjH35AHrDt
Hbp7lS29j5BPVMc5upmAwtOCx+fquzuxzrxi2ppaiejigoLhIK5hfDI2Fugt BAcSdW7GRnd+ahHZ
WpfWVFbJPGJ54nShzCRyVTygc3Tu+qA0DPHeelSbRZKyiZY+6HQl9BSzxTiM nBfIWkacjhuPFNgJ
Fv2lobgxsnJ1FJG+A1Eb6pgY2SIYy8HJ3DLc5xxC4/aaihp5Z6mCrpmMZyjO Wh0mdmcZYM7+IODg
4PBVdDsa+ntcdFNUvlE1AaOpL5XP5DI3uh1cASAC3cNwO7G/2vVlu9+onMqh RwzU7Hin5ORxbM9w
wXOyPIGM7hqOTx3b2wFpdL3T2iqjgqYal3KRSyiSKMOY1sY1Oyc9H+684tpb ZJT0tQZXxx1UL5ma
24LQwtBa4cQ7LwNPHKg3i3Xu8vge+looCKeqikAqnOwZWaWkeQM4xv4KNPsj VS3SKRlRFHSRwCQD
eSyq1ROJDeGgmIE78kuKbAWsu0TYIWSz2i6RB88cDQ+BuXOecN/zcM4H8wuQ 7UUMsb5nw1cEDeUD
JpogGTFhOoMIJyfJOAcZwvKviv1wp4GvoKCKSGtgnwKxzg5rHaj/APT3HcB/ P2KG3Z66VFoFpqRS
xQwSyzRSxyl7pXlzywEFo0ga9/HhuTYCa/aukhpIaupoLjSwTyRxxPmgaA7W CQdzjuABJJ4Betdt
LS0L5W9yVtTyM7Kd7qeIOAe8NLBvcOOtoB+9VlDs3O2joaKa1W2kgp545JxD MZBUARvY7ILBx1D/
AFX1R7N3KGhq6eoqIpXPuVPPDIXkudDEYwNZx9ctj5t2U2At4b0yorBTQ0Fd IWuayaRsTdEDyAdL
zq3EAjOAeK+6q701OIxE2WtllyWQ0gEj3Abi7iBgHdknjuUOrtdTVX+GsZR0 lMIZmO7uZKTO+Nu8
sLdIGHbx9bh+S+Y7ZXUT4K6kpqLupsL6eSma8xwlhkLwWuwSDk78g5yeCA9R tLS91up5aOuh5N0b
JpZIgGQvkALGuIcTk6mjcDvK9aO9x11U+KGgrhEyWSJ1U+Joh1MJDvK1Zxlp HBVr9nayor6q6TPa
yokmhmZSCoc6neWMALXjAB8oZDsZBDTzYXhT2G6UbLmKWgtsNVWGoLbgJyZP 2jnOaHNLMbsgceZN
gLSPaWjnttVXwQVczKR5bJGyIcoWgZ1gEjLCN4dz43L4ZtRDMYWw2q6SyTQC obGyBuoRk4Dj5e7P
MotFsxVW01kMNxfU01TbRSAVDWBzXsBbH9Vo8kNc7POvip2fqxXW6qFuoLga S3xU2Kid0fJyMOdT
cMOf9E2As6e/w1M8rW0VayCGSSOSrkja2FhZkOy7VnAIIzhecm09FBTTVFRB WQRxxGVnKw6TUMHE
xjO/mODg4PDjiLFsfQTUtw7tpoBV10tQ41MYy9rJS7GCecB2F53myXa/299P WdyQvgje2B0UjiJX
uaWanZHkDSTuGTkjfu3tgJs+1NBS0z5qqCrgfHNHDJA+IcowvzpJAJGkgE5z zFS6W80dZdqq2wOc
+akY173gfs3B3DS7n9vQquXZmQVAjZIKmldWRVMklXI58xa0FpjJOdTcHdnh khSbTYG2i5Okgfqp
+42w5cfLc/lHOLjgY4OG/wBibALftPQ1lLFU1EkNBHNGxzO6KljS5zmhxaBn mBbv9vDptDVUwrBR
mohFS5uoQcoOUI6dPHCyth2Qq7bUtkqzSytbSviwPK8oxwtB3jpid+YXxbtj q2kngdJKx72GKXuj
umQiJ7I2twItwdvbnUTz7wmwGqjuFFNHJJFW08jInaJHMlaQx3DBOdx9hXzX 3AUAYO5aqqkfnEdN
HqdgcSckADeOfnWdotnLnBVVU80NJKZaeOItnqXzMle2UPc8tLRo3ZIaM4OF e3qnqaulMENJSVsM
mRLBVPLA7nB1AHgRwxv6RjeAp73QVdbBSU8rpH1FL3XG4MOkxZAzk8/lDcpF d+7qr+BJ8pVXSWu5
Ut2tkj3xVEFJb3Uss7pCJHvJadQbjGPIHPz+zfaV37uqv4EnylTD4kQ9x//T 0n0W+Y0H4ib5lr1k
Pot8xoPxE3zLXq1Z5iP1fuIPCgiIuYsUO2/mhXf0/nap9h83rd+Fj+UKBtv5 oV39P52qfYfN63fh
Y/lC7X5JfyfsjBfHfp+SeiIuI3CIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiJkd IQBE3dITd0hCQibu
kJkdI/NAETI6R+aZHSPzQBEyOkfmmR0hCAiIgCIiAIiIAiIgCIiAIiIAiIgC IiAIiIAvCu/d1V/A
k+Ur3XhXfu6q/gSfKVaDxIh7jL/Rb5jQfiJvmWvWQ+i3zGg/ETfMtet6zzEf q/ciDwoIiLmLFDtv
5oV39P52qfYfN63fhY/lCgbb+aFd/T+dqn2Hzet34WP5Qu1+SX8n7IwXx36f knoiLiNwiIgCIiAI
iIAiIgCIiAIiIAiIgCIiA6BkgLKWCzUe0FNLVV2HzavKcWNcSTnnOT0YG4bl q2/WH3qg2Fd/dM28
7pMcfaVvKbUMTX0/JnGk4kmf/9TfnYmznOI2j+jHu4+z2j8vvXj4K7OurXUI kh7qEfKmAMj1hhJA
djGcZIGfZ960Qdv4rEuotpe/DrzHRU7HSV0jAA93LthLeSaDluNAIEuM43q2 JHxKaEPAu/Aiz5/w
h8Fn6Lg2Is43mIED/wBFns9nsP5qgqaS4yWujZDHdoHB395l0c0rpJNHFjQ8 Et1Z+oQOG7C86MXF
10qIM3Sa6wPpAyZznCKNulhkDwHcmCW6txB4jnTEj4jQh4Ggg2OsVRDHNAI5 ontDmvZFGQ8bt4IH
A4P5/cvvwIs4AzEPgx+z2ew/ms73vrqTZaitsFHcYDBkVEjGTTP5ZrQAGND2 5jOT5QOkFo3b1ebJ
U9zEVTW3h9X3XK5gDJ3Ya0clGXFreAy/Vn2g4xvyxI+JOhDwPXwJs2P8NvwY /wBFW3a0UdhqqGWh
AZJJMwZDGtOOUY0jdjIw8jGDzcOfX6lmtr3ftbYM8alm7P8A6satBHFFFZsr FDCldIvjxK4uniVx
chsEREAREQBERAEREAREQBERAEREAREQBeFd+7qr+BJ8pXuvCu/d1V/Ak+Uq 0HiRD3GX+i3zGg/E
TfMtesh9FvmNB+Im+Za9b1nmI/V+5EHhQREXMWKHbfzQrv6fztU+w+b1u/Cx /KFA2480K7+n87VO
sLmjZ+3Ze0f2aPnHohdz8kv5P2Rh/vfp+SwRc1s9NvvBNbPTb7wXDZm51FzW z02+8E1s9NvvBLMH
UXNbPTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHU XNbPTb7wTWz02+8E
swdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Es wfQODlZdmzV4oXyM
td6jp6d7shj43aufjg45/wDZabWz02+8E1s9NvvBaQRxQbisUKZnTZ9qj/xH B8N/t9vt/wBAhtG1
R/4ig+G/2+32/wCy0Wtnpt94JrZ6bfeC0x4+C6L9EaC4/czvejar/mKD4b/1 XG2XadrnOG0FOHOI
LiIn5djHHp4LR62em33gmtnpt94Jjx8F0X6I0Fx+5nRZ9qh/xHB8N/s9vs/1 Kd59qv8AmOD4b/1W
i1s9NvvBNbPTb7wTHj4Lov0NBcfuZ3vPtV/zHD8N/wCqR7O3WorIJbteI6mG CQSBjI3A5Dg4AZOB
vA/JaLWz02+8E1s9NvvBRjx8F0Q0Ed50XNbPTb7wTWz02+8FhZmh1FzWz02+ 8E1s9NvvBLMHUXNb
PTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbP Tb7wTWz02+8EswdR
c1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Eswf/V /U14V37uqv4Enyle
2tnpt94Lwrns73VXlt/wJP8AMPRKzgX+SJe4zH0W+Y0H4ib5lr1kPot8xoPx E3zLXras8xH6v3Ig
8KCIi5ixCvFqp73ap7bVukbDOAHGN2l24g7j94WZ8VdhP/m7p1kdlbNFvLqZ 0paMETSKxQQxb0Yv
xV2D1u59ZHZTxVWD1q59ZHZW0Raa9U8x9SuFL4GL8VVg9aufWR2U8VVg9auf WR2VtETXqnmPqMKX
wMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTxVWD1q 59ZHZW0RNeqeY+ow
pfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdlPFVYP Wrn1kdlbRE16p5j6
jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR2U8VV g9aufWR2VtETXqnm
PqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTx VWD1q59ZHZW0RNeq
eY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdl PFVYPWrn1kdlbRE1
6p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR 2U8VVg9aufWR2VtE
TXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59 ZHZTxVWD1q59ZHZW
0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWr n1kdlPFVYPWrn1kd
lbRE16p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9 aufWR2U8VVg9aufW
R2VtETXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVW D1q59ZHZTxVWD1q5
9ZHZW0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/F VYPWrn1kdlPFVs+f
/NXPrI7K2iJr1TzH1GFL4FfYrJSbPWtltonSuhY9zwZXBzsuOTvwFYIi5Yon E3E97NFsCIigBERA
EREAREQBERAEREAREQBERAEREAREQBERAf/W/U0RFgWCIiAIiIAiIgCIiAIi IAiIgCIiAIiIAiIg
CIiAIiIAiIgCIiAIiIAiIgCIiA//2Q==
------=_NextPart_000_000A_01C5B2DF.7B33CA50--

Attached files

Interceptar Error en DataSet

Publicado: Mar Sep 06, 2005 1:52 pm
por ignacio
This is a multi-part message in MIME format.
------=_NextPart_000_0012_01C5B2EA.3DDAD490
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0013_01C5B2EA.3DDAD490"
------=_NextPart_001_0013_01C5B2EA.3DDAD490
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Xevi,=20
Propiedad oDataSet:lDisplayErrors, que se inicializa al valor que tenga =
oDataSource:lDisplayErrors.
Si quieres puedes utilizar oDataSource:lAbortOnErrors a .T. y =
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido errores con los m=E9todos del DataSource:
IsError(), LastError(), DelErrors(), GetErrors(), ShowErrorList()
Saludos,
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431d70f1@ozsrvnegro.ozlan.local...]431d70f1@ozsrvnegro.ozlan.local...[/email]
=BFComo puedo anticiparme a este error??
Si el DataSet que intento acceder NO es accesible por alguna =
circunstancia...
Me salta este error y el programa sigue... cuando lo que deber=EDa es =
no continuar y retornar a un Form anterior..
Vaya... que necesito como el
If DbUseArea()
Return
Else
...
...
EndIf
Un Saludo,
Xevi.
------=_NextPart_001_0013_01C5B2EA.3DDAD490
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.2900.2722" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#e6feff>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>Propiedad oDataSet:lDisplayErrors, que se inicializa al valor que =
tenga=20
oDataSource:lDisplayErrors.</DIV>
<DIV>Â</DIV>
<DIV>Si quieres puedes utilizarÂoDataSource:lAbortOnErrors a =
..T. y=20
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido=20
errores con los m=E9todos del DataSource:</DIV>
<DIV>Â</DIV>
<DIV>IsError(), LastError(), DelErrors(), GetErrors(), =
ShowErrorList()</DIV>
<DIV>Â</DIV>
<DIV>Saludos,</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>"Xevi" <<A =
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>>=20
escribi=F3 en el mensaje <A=20
=
href=3D"news:431d70f1@ozsrvnegro.ozlan.local">news:431d70f1@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2><IMG height=3D166=20
src=3D"cid:000d01c5b2d9$7a4d2290$0e00000a@ozlan.local" width=3D421=20
v:shapes=3D"_x0000_i1025"></FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>=BFComo puedo anticiparme a este =
error??</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Si el DataSet que intento acceder NO es =
accesible por alguna=20
circunstancia...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Me salta este error y el programa sigue... =
cuando lo que=20
deber=EDa es no continuar y retornar a un Form =
anterior..</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Vaya... que necesito como el</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>If DbUseArea()</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>ÂÂ Return</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Else</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>EndIf</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Un Saludo,</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial =
size=3D2>Xevi.</FONT></SPAN></DIV></BLOCKQUOTE></BODY> </HTML>
------=_NextPart_001_0013_01C5B2EA.3DDAD490--
------=_NextPart_000_0012_01C5B2EA.3DDAD490
Content-Type: image/jpeg;
name="clip_image002.jpg"
Content-Transfer-Encoding: base64
Content-ID: <000d01c5b2d9$7a4d2290$0e00000a@ozlan.local>
/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBP ZmZpY2X/2wBDAAoH
BwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEEx NDk7Pj4+JS5ESUM8
SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7 Ozs7Ozs7Ozs7Ozs7
Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCACmAaUDASIAAhEBAxEB/8QAGwABAAMB AQEBAAAAAAAAAAAA
AAQFBgEDAgf/xABPEAABAwMBAwUMBwUGBAUFAAABAAIDBAUREgYhMRNBUZTS FBUWFyI2UlRhkpOy
BzJVcXSR0SM1c4GDJCUzQqGxRlZiZCZEY3KzQ0WEwtP/xAAaAQEAAwEBAQAA AAAAAAAAAAAAAQID
BAUG/8QANREAAgAEAgcGBgIDAQEAAAAAAAECAwQRE1ISFCExUVORBRUyNHGx M0FhocHRcvAiQ+Ej
gf/dAAQAKP/aAAwDAQACEQMRAD8A/U0RFgWCIiAIiIAiIgCIiAIiIAiIgCIi AIiIAiIgCIiAIiIA
iIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIDzqJ4q WmlqJ3aIomF73dAA
yVgqj6SKmWoPcVNTxQf5eXDnOd7dxGPuV99IBI2HuOOOI/8A5Gr8wstrqrtK 6Ckax8rIzJpc8NJA
44zxPsX0HZVJImS4ps5Xs7bdx5tdOmwNQy3vNm3b64Eb+4v5RP7S+jt7XdNF 8J/aWRqbdVUdDTVk
7WMjqsmIFw1EDidPEBeFNTS1r5GxOjHJxuldreGjS3jjPE+xeyqCia0tFWPL 1mqvbSZtPD6u6aL4
T+0nh9XdNF8J/aWKraGpt7aZ1SGtFVA2eLDgcsOcH2cFF1e1Wh7Oo4ldQol1 NSnZxG/8Pq7povhP
7SeH1d00Xwn9pYHJ6VZU1kqKqilrI6uhEMDWvmL6lrTEHHA1DmydyrHQUUCv FCkWhn1UbtDE2azw
+rumi+E/tJ4fV3TRfCf2lmZtl7pDAZW9zzYgFTohmD3mI8HgDeW+1U2r/qSC hopivBCmIp9VBsii
aN/4fV3TRfCf2k8Pq7povhP7Sw1TT1FHII6mN0Ty0PDXbjpO8H+amW2xV91g dPTiJsTXiPlJpWxt
c8jOkE8TjmSKgooYdJwqxCn1TdlE7mt8Pq7povhP7SeH1d00Xwn9pYKRr4pX Rv3PaS0jPAhektNU
QRQzSxOZHO0uicRueAcEj+at3dSZERrNTmNz4fV3TRfCf2k8Pq7povhP7SwG rfjKavap7spMhGtV
GY3/AIfV3TRfCf2k8Pq7povhP7SwGr/qTV7U7spMg1qozG/8Pq7povhP7SeH 1d00Xwn9pYHJ6Uye
lO7aTINaqMxvvD6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb7w+rumi +E/tJ4fV3TRfCf2l
gcnpTJ6U7tpMg1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6UyelO7aTINaqMx/ /9C18Pq7povhP7Se
H1d00Xwn9pYHJ6Uyelfa920mQ+b1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6U yelO7aTINaqMxvvD
6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb3w/rumi+E/tJ4f13TRfCf 2lgcnpKZPSU7spMg
1qozm+8P67povhP7SeH9d00Xwn9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0n h/XdNF8J/aWByekp
k9JTuykyDWqjOb7w/rumi+E/tJ4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P6 7povhP7SeH9d00Xw
n9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0nh/XdNF8J/aWByekpk9JTuykyD WqjOb7w/rumi+E/t
J4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P67povhP7S54f3A72tpD90Dz/8A ssCXEL9KsuG2630c
E3cvK08Ti4PLAXObkk44kled2jLpKKWo8K93bgehQQVFXG4cS1lfcQjt/cxw jperydpcb9JFXBM0
1VNTyxc7WNdG77wSSFYthvMtzfQctUxPj3yPfO4MY30ic8FldoJpKuy3Luid 1T3MYnRPc4u0kv0k
gnmIXlU1bST50Ml09tJ2vf8A4j1p3Zk+TKimqfe221j9Uoa2nuVDDW0r9cE7 A9jsY3L3WQ+i0k7D
w59Zm+Za9edPlqXNigXybIhd4UwiIsiTO7fjOxNx+6P/AORq/Ptk4Gm7wVL6 yOjipf20kr3huGjm
GeJPDC/QtvgTsVcABk4j3D+I1fmUFqu8kTHstFZJG4AtcIHEEcxG5fV9juHU 404rXb9keRXp4sLS
vY2FYbdetpaG9OrxHBVQkRwue1kkTmg4YQc6QTzr0raik5QyyvtrBJZJuWay VkgEw+rv5zv485WU
Fqu/E2Wuz09zu/RcNouuMd5K3qzv0XU6aU7JTVZK3y/f9sc6nzE23L3muopq J1LSytlpXVjbLTRw
ukkjBaWvcZG+XkA4I4j7lWVFzgpKPaGppIqCnmlq6dkEbXMmGDufoON/Endw VGbRdzxstdv/AO3d
+id6Lvu/uWt3cP7O7d/ophpZKbeKtv7T4/T3DnzWl/5/21jzro6juS3tllp3 MbAeSbFjW1ur/Pjf
n71Ltz4odk9oY5JWMfKynbG1zgC88rnAHOvDvTeM57zV3V3fohtF3PGy1xx/ 27v0XbG5MUvQ01vv
8uNznhxYY9LRf9VjUsqqShudvvU1ZDyNFY44jGyVrnySkOGjQDnPlArzhio4 Nj56aKopJXd7RJHL
POwPE+clrWYyMdJ47lmu8921au8lbnp7mdn/AGQ2e7k5NlrT/wDju/RcTppX NX24t8fqdCnzF/r/
ALs/RqaqaKr2kmrX1sUj4rZCaSLuiONsjseWHO/y4PT/ACUyWWmde6ymkbZ6 ix1MkTpY+6GNMTuT
GZG/zH3/AJrFd57vv/uSt38f7O7f/oud57t9iVvVnfoo1WT8pq3W/u0nWJnz lv8Av/w1dFLZoLA1
tBFRz0wdUtnjnmjidINR5M5cNX1cEaVQ3+plrLFs611Qx4jpXtkY1zciTVuy Bv4fyUM2i7njZa0/
fTu/RO9F3znvLXZ6e53fotZcmTBHpuYntv8AL6/X6lI5s2KHRUu2yxpWzUMW yETIYaKZhoXtmjkm
jjcJ87nbxrJG7AG5R5K2B132XoA+k7ljgpZanS1m6TUQ7Wfu5iqI2i7k5Nlr SR/27v0TvRd9/wDc
tdv4/wBnd+ihSJKibxFtbe/ivUOdNcKWh8jSW+4Ctq7xPFNbWVbatsdO+Zsb Y+5myu1ac+SfJxv4
lRa25UVLbL3JajSNE9zbHT5Y1xdEW4cWA78ZzvCpe893xp7yVuOjud36J3ou +7+5a7dw/s7t3+ih
U8lO+IrbOHyt9fp92S5823w+P3uV3IkDGCnJHoVj3pvH2NXdXd+id6bx9jV3 V3fovSx5OZdUcWHN
ysruSPQnJHoVj3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY9 6bx9jV3V3fonem8f
Y1d1d36Jjycy6oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuq GHNysruSPQnJHoVj
3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY96bx9jV3V3fone m8fY1d1d36Jjycy6
oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuqGHNysreTKcmVZ d6bz9i1/V3Lnem8/
Ytf1dyY8nMuqGHNysruTKcmVY96bz9i1/V3J3pvP2LX9XcmPJzLqhhzcrK7k ynJlWPem8/Ytf1dy
d6bz9i1/V3Jjycy6oYc3Kyu5MpyZVj3pvP2LX9Xcnem8/Ytf1dyY8nMuqGHN ysruTKcmVY96bz9i
1/V3J3pvP2LX9XcmPJzLqhhzcrK7kynJlWPem8/Ytf1dyd6bz9i1/V3Jjycy 6oYc3Kyu5MpyZVj3
pvP2LX9Xcnem8/Ytf1dyY8nMuqGHNysrXRexbejYKmS30ZljiD6OAF8hw1vk BZl1ovJ/+zV3V3fo
rNkdwkiiFXs7d3SxRiMPgGgOaNwyCw7wF4Xbsp1ciGGS02nfelssz3OxJ6pZ 0UU5NJq26+26NjU3
O33OnfYhWSxR6AyOskdulcM7n/8AT0LC17cWe8Q5a4sbCMtOQcScylGnmIwd nL/j/wB4/wD5qJW0
1xFBPBSbPXOFk2DNJUNLzpbvAGGgAZ3r5+h7Oqoa2XNmaKULzLd1Peqe0KTV JkqU23F9Hv4mz+i8
Y2JiH/czfMtasl9GBzsVER6zN8y1qpWeZmer9zz5fgR//9H9TREWBYodt/NC u/p/O1T7Cf8Aw9bv
wsfyhQNt/NCu/p/O1T7D5vW78LH8oXa/JL+T9kYL479PyWGUyuL5keI2Fx/k vPjjhlwuOLcjoW0+
8plV9Zc+4KqkZMz9hUv5LlQf8N5+rn2Hh9+FPWVNUQVMpTZe5ktNOzO5TK4i 6Cp3KZUS4V4oY4w2
IzVE7+TghB0mR+CcZO4AAEk8wB4ryFwqG07W1VIymrphIKamE3Kcq5rNWNQA CAsMplUE20VU2htd
VS2xtYLgWRZbUiMMlIOW7wdwLXDPsUi7bQU9tpawAg1tPTOmbDI1wa8hurSH 4wfuBzx6EsC3ymVS
UO01HNAw1srIJnzSxhjQ5waGyOYC44w3Oni4gcehffhDSzVtHHRyRz08s7qe eYZ/ZyYOhv3lwI9i
WBcZTKq6a7zVjxUU9E02vys10lQ1nkjOXBhGdORxJHSujaK0up31Aq/IY4NI MTw8k8MMxqI3HeAR
uPQUsCzymVSQ7U0M1RPA3LHQ1McGZQ5jXB4aQ7JbjPl/VO/dvwuz7S0fJRy0 krJY21EbKlz2uZyc
TiRygyBqGrSMjI3pYF1lMqhqdqoqN80tRRyNoYppYO6GvBc6WNrnOGjjjyHY OeYdKT7TPo6Cvnq7
XKyehhZO6CKVsmqN5Ia7VgAfVdkcwHOlgX2Uyqqru8tJV3GB1M15paQVUDQ/ SZ2jPKb94GDgfzUC
HbGN5qWz0D4XwUArGt5UO5T9nyhYDjiGkb/algaTKZVTT3epr5Wm327l6UOD JJ31Aj0u/wAwDcEu
08ObeD96hUu09dWyQwwWIumkE7iw1jRhsUgjJB07yXE4Hs9qWBo8plVdVfII dnn3mnjdURBoLY86
C4l4ZpOeBDjg/cVDrNqDbpqeC4Uncs7qhjJow4zaYnNeQ9hYPK8pmMY3b/vS wNBlMqki2iiq7/Bb
qR8boX04mc8seXPzrAAwMMILDkPwd+BvCmTXq2wVbqWWqayVoy7LXaRuzgux pBx/lzn2JYE/KZUK
23i33cE0NRyuAHYLHMJB4EBwBI9o3L5N7tjaeGoNZHyU8TpYnYPlsaQCRu37 3AY4nIwgJ+Uyqw7Q
2kcjqq9PLjLdUT24GcZdkeQM87sDcvSvvVutlRHT1lQY5ZGF7WiN7vJBwXHS DgZ5zhAT8plV0t/t
UM0kUlawOiYXvdhxYABqPlAaScb8A59i9RdaF1uNxbUtNIOEoBw7fjdzuyeG M55soCZlMqm8KbYa
+npmyPcyohfIJRG/ySxwBa5uMtPlZycbvvC9fCWzchFO2va6KX6j2Mc4Eelu G5u/6x3e3clgWmUy
vF1VA2oipzK3lZ2OfG0b9bW41EfdqH5qAdpbMGCTu5pjMPLa2xvLQzGclwGB u34O/hu3oC1ymVDq
brRUjp2zTHVT6OVayNz3N1507mgnfg/kos20lrYHNhq4ZpWhjiwOIw15ABJw cfW/PdxSwLbKZUOk
u1vrqqSmpqkSSR8RpcA4ZwS0kYcPa3I4dKrqe/yRWetu905CKkhmljiELXud hkjmeVx3ktHAYGUs
C9ymVS2baelvFoqbm2CeCKlDi9r2HJDW6iRkDO/UPvaVFqto68W2rmhoYIKm mo+7msnkMjJIMOxv
bjS4lvDfhLA0mUyviN/KRMfjGpodj7wvpAdymVxEB3Kj137uqv4Enyle68K7 93VX8CT5SrQeJEPc
Zf6LfMaD8RN8y16yH0W+Y0H4ib5lr1vWeYj9X7kQeFBERcxYodt/NCu/p/O1 T7D5vW78LH8oUDbf
zQrv6fztU+w+b1u/Cx/KF2vyS/k/ZGC+O/T8k9V10qJmU1U+maHy08L3saeD nhpIH5qbPMIIXSHm
4e0qBGSwAO3ucdT18f27V4ctSYd72v0/6ehIl6W0xewtzu+2ez10hvkmsawI ZQwMLTjO7HQcELbW
G4PuNrY6fAqoXGGob0SN3H89xHsKpNk6AWe2SwNfG/8AtUjgY3Bw05w3h/04 UoP707SMmziluYET
zzNlH1HfzGW/klBWytemyZatBE/8bbrpflfewmS2oFEaJERfRnMQ7jQGtbDJ FKIamlk5WnkLdTWu
wWnU3nBBIP37iClNDcw+mkq6yme6J7jIIactEjS3DQNTiWkHfkHfwUxEBRUN lnbRUtJKeSjttydN
AThxliGotzjgTrP5cFBuuxT7nWyzGsgaHuleJXwF041xuZp16saG6twxwAGV q0U3BlPAaHunlnSU
s5kJ5Uz0utzW8q+QcnvwD5ZB1BwOBuU2eyz0mz0FPSYqKqjqxVxDAaJH8qXY O/hh55+ZXyJcGYrd
imVUsEDamJlDT62x4hPdDY3teCwSasacvJ3tJ3DK+WbGmKkcyLvZFOXM0SR0 bm8npDgHNIfqEnlH
ytWBzDeVqUS7BnpNlpHwPpDcXSU0lRFUyOlZqmdI1rWuJdnG8NHNxJPsXnPs zUuttQ2WpZUTxULa
WkbFHyYLY3B7A7JOSXNaCRgYzuC0qJdgzkuy8twgdT1lW1lLNJLVOijj/asm lY5rxrJILRrdgYzw
3nn+6rZ2urLfco5rhTirr6eOm5RlO4RsjYTjydWS7ynb844bloEUXBS3W211 VWQyQPi5Sehmo6mU
tyyMOGoODc53uGMZ4KDPsbJUWiqpX3BjaqaOFsdQ2E4iLIuSJ06t+Wk7s8/s WoRTcFTS2uutsjY7
fV07aNz+Ukimgc92o736XBwwCd+8HBPRuUGi2du9BNDPBdaPloxUNLnUjiC2 WUSbhr3EOB45GMbl
pEUXB//S3FXs9JJZ3WqkreRpjCGtEkes8ryokMhORx3jAwN6+Kqw3Cqqobk+ 4U3fOGZj2ydzu5EM
aHgMDNWeMhOS7/RXyLC5YqLNYnWmrqap1Tyz6pg5QBmka+UkkcRv4ZkOBzY4 lQ6rZCGoulVWB1KO
6nmVz302uZrywN8l2cBu4HhnjvWjRLgrqG0miraep5cP5C3R0WnTjOl2dX8+ hVB2SqTHBTPqqGop
KOnfBTQ1FI52Q5zHZkw8aiNAxjG/etQiXBmzspUmmlp3XV0ra2BsFa+drpJH NDnOGhxduxrcPK1b
gPbn3u9suVdfOUpZIYaaW3SU08ksZeTqeDhoDhg4ycnIV6iXBmZ9j3S0UltZ XNbQ63zRgxZlbK6M
syXZwW+UTjAPtVxX2zuy1R0bJBE6ExPifpy0PjcHNyOjLRkDG7nU5EuCgZs5 Usqp67u6I1dY2VlU
eRPJlrwwHQNWWkcm3iTz/wAuzbNy9zQRUtXFGRbhbpy+EuD4sby0AjS7jxyP Yr5EuCrrLTO51DNb
6mOGeihdAwzxmRjmODQcgFpz5A356dyqYdiS2mFJJXNjgNIKeU0sbo31BEYY HS5cWuxxG7I3b+nV
IlwZufZmvrKmerrK6jmmmMeYTSu7ncGNcBrZry4+VkbxghfNv2O7hs9RQd2M cZzTnW2HAbyTg7AG
eBx07lpkU3BT2qxS2+qpXy1bJYKCF8FIxsZa4McWk6zkhx8lvADnVcyw1V0s U9oqxVW8MrZZeVZK
A2ojdK92PIdnBBHHGCtSii4K232OGh2f7z8vNIx8TmSSPeXOc54w9w1Zxkkn HAEqqr7NcILRX4b3
xq57f3ugjpmCINjAdpc7W7ecneQf5LTolwfELSyCNjuLWNB+8BfaIgCIiALw rv3dVfwJPlK914V3
7uqv4EnylWg8SIe4y/0W+Y0H4ib5lr1kPot8xoPxE3zLXres8xH6v3Ig8KCI i5ixQ7b+aFd/T+dq
n2Hzet34WP5QoG2/mhXf0/nap9h83rd+Fj+ULtfkl/J+yMF8d+n5Pi9yPgpm 1GkuhiOqQNBJ/ILN
1G0dvqqaaBz52CaNzC5kT8tyMZG7jvW2TA9EfkvnqjsqRUTcWNu/0a/R3QT4 oIdFI/Mtlu9GytBJ
SwTzzuldqe8wvAOOG7G44/2U2+bQ0dXZaiFjJ3y6P2LWQv1a85bjd0r9AwPR H5JgdA/JTF2XIjnq
ojiicV096+XohjxKHRSViNbZaie2Us1XGY6h8LXSsPM7G9SURem9rMCFcrpH bBTh1PU1MlTIYooq
Zgc5xDS48SN2GldiutG98MM0raSqmHk0lQ9rJuOB5GTxxzKDtLaJbsyg5Okp axtLUmWSnqpCxjwY
3N4gHeC4HhzKHUbO1dXS3MmCjppqump4YGMeXCHky7OHaQcYIxgKQX1RX0VJ LHDU1lPBJL/hslla
1z9+NwJ3712SvooWyPlrKeNsP+IXStAZv079+7eCN/PuVFfqCur9oZ2UtFDJ FU2p1O6eZxaIS6R2
9vknLgDnGR96+YNmZ6KjYYY6WapiuUlYWvJa2oaQ5rQ92DggOzwO8fzQF+6v omup2urKdpqv8AGV
uZv/AG7/ACuI4dK4240D4ppW11M6OnOJniZpER6HHPk/zVDb9n6+3zyP5Oln FYwtlLnkGky+R37P
yTqxyuP8v1B07odFsfV0kMLgyIzUnI6BJVySipDDk5yMRg8cAOx0psBd0e01 sq2zyOqIYIYZXxie
Sdgjk0uLQQ7PPg/qp/fCldIxkUzJi6Uwkxva7Q8NLiHb9xwOHFZej2Trxeor hVR0TGd1Gd8DHl4a
NUh0jLRn645hzrxk2Ir5qalpzUwRBlEyCV7CSdYjnaXDcM/4rd/HcU2A1RvF qFMKk3SiEBdoEpqG
aC7jjOcZ9i5HebfLXz0IqoxPBG2Vwc8DUxzdQc3fvAHE8AqS2bLy090pK2en hY2KUulidUvqSRyT
mghzwBxdwwMdJ5vCm2Tr4KCrpC6mcatjMy6jmMseXNaN29rhgE5GOgpsBqYa 2kqIo5YKqCWOV2mN
8cgc17ugEHedx3exQ7hemW6upqR1BXTvqjpidBE1zS7BJGS4bwGkqNR2urZV vrJqaiY6esZO6Fri
9tO1sRZmN2B5ROOYbnFTq2ikqblaqlhaGUdQ+WQE7yDG5m7+bgoBBO1VKKSe tNvuPckGsGo5Buhx
a7QQ3ysnLhgbl9T7U0FLT8rVRVUD21DKeSGSIcpG54JaXAEgNwCc53BVx2Mg 8HqqnZTUrLnUGTNU
3IJDpS763H6px96kSbMyd0siD21VIa1tTI+qe58z26HsMbic6gA4YyeGR7VO wEw7TW0VtbRtdLJN
R6AQxmoTOfnDYznyjkEHowc8CvQ3tjYWOfb69s8jiI6QxN5Z4HFwbqxpGeJI VW3ZWSir4aqhkY40
cUZhEp3zSgy6y8gbtQlO8c+/B4Ga6nuz6mG69y0jK2KN9OabulxjfE4tdnXo yHAtH+UjH35AHrDt
Hbp7lS29j5BPVMc5upmAwtOCx+fquzuxzrxi2ppaiejigoLhIK5hfDI2Fugt BAcSdW7GRnd+ahHZ
WpfWVFbJPGJ54nShzCRyVTygc3Tu+qA0DPHeelSbRZKyiZY+6HQl9BSzxTiM nBfIWkacjhuPFNgJ
Fv2lobgxsnJ1FJG+A1Eb6pgY2SIYy8HJ3DLc5xxC4/aaihp5Z6mCrpmMZyjO Wh0mdmcZYM7+IODg
4PBVdDsa+ntcdFNUvlE1AaOpL5XP5DI3uh1cASAC3cNwO7G/2vVlu9+onMqh RwzU7Hin5ORxbM9w
wXOyPIGM7hqOTx3b2wFpdL3T2iqjgqYal3KRSyiSKMOY1sY1Oyc9H+684tpb ZJT0tQZXxx1UL5ma
24LQwtBa4cQ7LwNPHKg3i3Xu8vge+looCKeqikAqnOwZWaWkeQM4xv4KNPsj VS3SKRlRFHSRwCQD
eSyq1ROJDeGgmIE78kuKbAWsu0TYIWSz2i6RB88cDQ+BuXOecN/zcM4H8wuQ 7UUMsb5nw1cEDeUD
JpogGTFhOoMIJyfJOAcZwvKviv1wp4GvoKCKSGtgnwKxzg5rHaj/APT3HcB/ P2KG3Z66VFoFpqRS
xQwSyzRSxyl7pXlzywEFo0ga9/HhuTYCa/aukhpIaupoLjSwTyRxxPmgaA7W CQdzjuABJJ4Betdt
LS0L5W9yVtTyM7Kd7qeIOAe8NLBvcOOtoB+9VlDs3O2joaKa1W2kgp545JxD MZBUARvY7ILBx1D/
AFX1R7N3KGhq6eoqIpXPuVPPDIXkudDEYwNZx9ctj5t2U2At4b0yorBTQ0Fd IWuayaRsTdEDyAdL
zq3EAjOAeK+6q701OIxE2WtllyWQ0gEj3Abi7iBgHdknjuUOrtdTVX+GsZR0 lMIZmO7uZKTO+Nu8
sLdIGHbx9bh+S+Y7ZXUT4K6kpqLupsL6eSma8xwlhkLwWuwSDk78g5yeCA9R tLS91up5aOuh5N0b
JpZIgGQvkALGuIcTk6mjcDvK9aO9x11U+KGgrhEyWSJ1U+Joh1MJDvK1Zxlp HBVr9nayor6q6TPa
yokmhmZSCoc6neWMALXjAB8oZDsZBDTzYXhT2G6UbLmKWgtsNVWGoLbgJyZP 2jnOaHNLMbsgceZN
gLSPaWjnttVXwQVczKR5bJGyIcoWgZ1gEjLCN4dz43L4ZtRDMYWw2q6SyTQC obGyBuoRk4Dj5e7P
MotFsxVW01kMNxfU01TbRSAVDWBzXsBbH9Vo8kNc7POvip2fqxXW6qFuoLga S3xU2Kid0fJyMOdT
cMOf9E2As6e/w1M8rW0VayCGSSOSrkja2FhZkOy7VnAIIzhecm09FBTTVFRB WQRxxGVnKw6TUMHE
xjO/mODg4PDjiLFsfQTUtw7tpoBV10tQ41MYy9rJS7GCecB2F53myXa/299P WdyQvgje2B0UjiJX
uaWanZHkDSTuGTkjfu3tgJs+1NBS0z5qqCrgfHNHDJA+IcowvzpJAJGkgE5z zFS6W80dZdqq2wOc
+akY173gfs3B3DS7n9vQquXZmQVAjZIKmldWRVMklXI58xa0FpjJOdTcHdnh khSbTYG2i5Okgfqp
+42w5cfLc/lHOLjgY4OG/wBibALftPQ1lLFU1EkNBHNGxzO6KljS5zmhxaBn mBbv9vDptDVUwrBR
mohFS5uoQcoOUI6dPHCyth2Qq7bUtkqzSytbSviwPK8oxwtB3jpid+YXxbtj q2kngdJKx72GKXuj
umQiJ7I2twItwdvbnUTz7wmwGqjuFFNHJJFW08jInaJHMlaQx3DBOdx9hXzX 3AUAYO5aqqkfnEdN
HqdgcSckADeOfnWdotnLnBVVU80NJKZaeOItnqXzMle2UPc8tLRo3ZIaM4OF e3qnqaulMENJSVsM
mRLBVPLA7nB1AHgRwxv6RjeAp73QVdbBSU8rpH1FL3XG4MOkxZAzk8/lDcpF d+7qr+BJ8pVXSWu5
Ut2tkj3xVEFJb3Uss7pCJHvJadQbjGPIHPz+zfaV37uqv4EnylTD4kQ9x//T 0n0W+Y0H4ib5lr1k
Pot8xoPxE3zLXq1Z5iP1fuIPCgiIuYsUO2/mhXf0/nap9h83rd+Fj+UKBtv5 oV39P52qfYfN63fh
Y/lC7X5JfyfsjBfHfp+SeiIuI3CIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiJkd IQBE3dITd0hCQibu
kJkdI/NAETI6R+aZHSPzQBEyOkfmmR0hCAiIgCIiAIiIAiIgCIiAIiIAiIgC IiAIiIAvCu/d1V/A
k+Ur3XhXfu6q/gSfKVaDxIh7jL/Rb5jQfiJvmWvWQ+i3zGg/ETfMtet6zzEf q/ciDwoIiLmLFDtv
5oV39P52qfYfN63fhY/lCgbb+aFd/T+dqn2Hzet34WP5Qu1+SX8n7IwXx36f knoiLiNwiIgCIiAI
iIAiIgCIiAIiIAiIgCIiA6BkgLKWCzUe0FNLVV2HzavKcWNcSTnnOT0YG4bl q2/WH3qg2Fd/dM28
7pMcfaVvKbUMTX0/JnGk4kmf/9TfnYmznOI2j+jHu4+z2j8vvXj4K7OurXUI kh7qEfKmAMj1hhJA
djGcZIGfZ960Qdv4rEuotpe/DrzHRU7HSV0jAA93LthLeSaDluNAIEuM43q2 JHxKaEPAu/Aiz5/w
h8Fn6Lg2Is43mIED/wBFns9nsP5qgqaS4yWujZDHdoHB395l0c0rpJNHFjQ8 Et1Z+oQOG7C86MXF
10qIM3Sa6wPpAyZznCKNulhkDwHcmCW6txB4jnTEj4jQh4Ggg2OsVRDHNAI5 ontDmvZFGQ8bt4IH
A4P5/cvvwIs4AzEPgx+z2ew/ms73vrqTZaitsFHcYDBkVEjGTTP5ZrQAGND2 5jOT5QOkFo3b1ebJ
U9zEVTW3h9X3XK5gDJ3Ya0clGXFreAy/Vn2g4xvyxI+JOhDwPXwJs2P8NvwY /wBFW3a0UdhqqGWh
AZJJMwZDGtOOUY0jdjIw8jGDzcOfX6lmtr3ftbYM8alm7P8A6satBHFFFZsr FDCldIvjxK4uniVx
chsEREAREQBERAEREAREQBERAEREAREQBeFd+7qr+BJ8pXuvCu/d1V/Ak+Uq 0HiRD3GX+i3zGg/E
TfMtesh9FvmNB+Im+Za9b1nmI/V+5EHhQREXMWKHbfzQrv6fztU+w+b1u/Cx /KFA2480K7+n87VO
sLmjZ+3Ze0f2aPnHohdz8kv5P2Rh/vfp+SwRc1s9NvvBNbPTb7wXDZm51FzW z02+8E1s9NvvBLMH
UXNbPTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHU XNbPTb7wTWz02+8E
swdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Es wfQODlZdmzV4oXyM
td6jp6d7shj43aufjg45/wDZabWz02+8E1s9NvvBaQRxQbisUKZnTZ9qj/xH B8N/t9vt/wBAhtG1
R/4ig+G/2+32/wCy0Wtnpt94JrZ6bfeC0x4+C6L9EaC4/czvejar/mKD4b/1 XG2XadrnOG0FOHOI
LiIn5djHHp4LR62em33gmtnpt94Jjx8F0X6I0Fx+5nRZ9qh/xHB8N/s9vs/1 Kd59qv8AmOD4b/1W
i1s9NvvBNbPTb7wTHj4Lov0NBcfuZ3vPtV/zHD8N/wCqR7O3WorIJbteI6mG CQSBjI3A5Dg4AZOB
vA/JaLWz02+8E1s9NvvBRjx8F0Q0Ed50XNbPTb7wTWz02+8FhZmh1FzWz02+ 8E1s9NvvBLMHUXNb
PTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbP Tb7wTWz02+8EswdR
c1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Eswf/V /U14V37uqv4Enyle
2tnpt94Lwrns73VXlt/wJP8AMPRKzgX+SJe4zH0W+Y0H4ib5lr1kPot8xoPx E3zLXras8xH6v3Ig
8KCIi5ixCvFqp73ap7bVukbDOAHGN2l24g7j94WZ8VdhP/m7p1kdlbNFvLqZ 0paMETSKxQQxb0Yv
xV2D1u59ZHZTxVWD1q59ZHZW0Raa9U8x9SuFL4GL8VVg9aufWR2U8VVg9auf WR2VtETXqnmPqMKX
wMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTxVWD1q 59ZHZW0RNeqeY+ow
pfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdlPFVYP Wrn1kdlbRE16p5j6
jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR2U8VV g9aufWR2VtETXqnm
PqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTx VWD1q59ZHZW0RNeq
eY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdl PFVYPWrn1kdlbRE1
6p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR 2U8VVg9aufWR2VtE
TXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59 ZHZTxVWD1q59ZHZW
0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWr n1kdlPFVYPWrn1kd
lbRE16p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9 aufWR2U8VVg9aufW
R2VtETXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVW D1q59ZHZTxVWD1q5
9ZHZW0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/F VYPWrn1kdlPFVs+f
/NXPrI7K2iJr1TzH1GFL4FfYrJSbPWtltonSuhY9zwZXBzsuOTvwFYIi5Yon E3E97NFsCIigBERA
EREAREQBERAEREAREQBERAEREAREQBERAf/W/U0RFgWCIiAIiIAiIgCIiAIi IAiIgCIiAIiIAiIg
CIiAIiIAiIgCIiAIiIAiIgCIiA//2Q==
------=_NextPart_000_0012_01C5B2EA.3DDAD490--

Attached files

Interceptar Error en DataSet

Publicado: Mar Sep 06, 2005 3:57 pm
por Xevi
This is a multi-part message in MIME format.
------=_NextPart_000_0020_01C5B2FB.BF942660
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0021_01C5B2FB.BF942660"
------=_NextPart_001_0021_01C5B2FB.BF942660
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Ignacio,
Me estoy peleando, pero no consigo que "cierre" el Form...
Tengo el=20
oDataSource:lAbortOnErrors a .T.
Pero donde pongo el TRY...CATCH...END para que cuando se produzca un =
error "cierre" el Form...
Lo he probado en FormInitialize, pero en CATCH le mando ::Close()... y =
si bien me vuelve al Form Padre, pero no me cierra el Form Hijo.
Un Saludo,
Xevi.
"Ignacio Ortiz de Z=FA=F1iga" <InvalidAccount@ozs.com> escribi=F3 en =
el mensaje news:431d8305$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,=20
Propiedad oDataSet:lDisplayErrors, que se inicializa al valor que =
tenga oDataSource:lDisplayErrors.
Si quieres puedes utilizar oDataSource:lAbortOnErrors a .T. y =
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido errores con los m=E9todos del DataSource:
IsError(), LastError(), DelErrors(), GetErrors(), ShowErrorList()
Saludos,
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431d70f1@ozsrvnegro.ozlan.local...]431d70f1@ozsrvnegro.ozlan.local...[/email]
=BFComo puedo anticiparme a este error??
Si el DataSet que intento acceder NO es accesible por alguna =
circunstancia...
Me salta este error y el programa sigue... cuando lo que deber=EDa =
es no continuar y retornar a un Form anterior..
Vaya... que necesito como el
If DbUseArea()
Return
Else
...
...
EndIf
Un Saludo,
Xevi.
------=_NextPart_001_0021_01C5B2FB.BF942660
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.2900.2722" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#e6feff>
<DIV><FONT face=3DArial size=3D2>Ignacio,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Me estoy peleando, pero no consigo que =
"cierre" el=20
Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Tengo el </FONT></DIV>
<DIV>oDataSource:lAbortOnErrors a .T.</DIV>
<DIV>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Pero donde pongo el TRY...CATCH...END =
para que=20
cuando se produzca un error "cierre" el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Lo he probado en FormInitialize, pero =
en CATCH le=20
mando ::Close()... y si bien me vuelve al Form Padre, pero no me cierra =
el Form=20
Hijo.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</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>"Ignacio Ortiz de Z=FA=F1iga" <<A=20
href=3D"mailto:InvalidAccount@ozs.com">InvalidAccount@ozs.com</A>> =
escribi=F3=20
en el mensaje <A=20
=
href=3D"news:431d8305$1@ozsrvnegro.ozlan.local">news:431d8305$[email=1@ozsrvnegr]1@ozsrvnegr[/email]=
o.ozlan.local</A>...</DIV>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>Propiedad oDataSet:lDisplayErrors, que se inicializa al valor que =
tenga=20
oDataSource:lDisplayErrors.</DIV>
<DIV>Â</DIV>
<DIV>Si quieres puedes utilizarÂoDataSource:lAbortOnErrors =
a .T. y=20
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido=20
errores con los m=E9todos del DataSource:</DIV>
<DIV>Â</DIV>
<DIV>IsError(), LastError(), DelErrors(), GetErrors(), =
ShowErrorList()</DIV>
<DIV>Â</DIV>
<DIV>Saludos,</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>"Xevi" <<A=20
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:431d70f1@ozsrvnegro.ozlan.local">news:431d70f1@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2><IMG height=3D166=20
src=3D"cid:001b01c5b2ea$fc069b70$[email=0ac8a8c0@Xevi]0ac8a8c0@Xevi[/email]" width=3D421=20
v:shapes=3D"_x0000_i1025"></FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>=BFComo puedo anticiparme a este =
error??</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Si el DataSet que intento acceder NO es =
accesible por=20
alguna circunstancia...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Me salta este error y el programa sigue... =
cuando lo que=20
deber=EDa es no continuar y retornar a un Form =
anterior..</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Vaya... que necesito como =
el</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>If DbUseArea()</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>ÂÂ Return</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Else</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>EndIf</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Un Saludo,</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial=20
size=3D2>Xevi.</FONT></SPAN></DIV></BLOCKQUOTE></BLOCKQUOTE ></BODY></HTML=
>
------=_NextPart_001_0021_01C5B2FB.BF942660--
------=_NextPart_000_0020_01C5B2FB.BF942660
Content-Type: image/jpeg;
name="clip_image002.jpg"
Content-Transfer-Encoding: base64
Content-ID: <001b01c5b2ea$fc069b70$[email=0ac8a8c0@Xevi]0ac8a8c0@Xevi[/email]>
/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBP ZmZpY2X/2wBDAAoH
BwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEEx NDk7Pj4+JS5ESUM8
SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7 Ozs7Ozs7Ozs7Ozs7
Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCACmAaUDASIAAhEBAxEB/8QAGwABAAMB AQEBAAAAAAAAAAAA
AAQFBgEDAgf/xABPEAABAwMBAwUMBwUGBAUFAAABAAIDBAUREgYhMRNBUZTS FBUWFyI2UlRhkpOy
BzJVcXSR0SM1c4GDJCUzQqGxRlZiZCZEY3KzQ0WEwtP/xAAaAQEAAwEBAQAA AAAAAAAAAAAAAQID
BAUG/8QANREAAgAEAgcGBgIDAQEAAAAAAAECAwQRE1ISFCExUVORBRUyNHGx M0FhocHRcvAiQ+Ej
gf/dAAQAKP/aAAwDAQACEQMRAD8A/U0RFgWCIiAIiIAiIgCIiAIiIAiIgCIi AIiIAiIgCIiAIiIA
iIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIDzqJ4q WmlqJ3aIomF73dAA
yVgqj6SKmWoPcVNTxQf5eXDnOd7dxGPuV99IBI2HuOOOI/8A5Gr8wstrqrtK 6Ckax8rIzJpc8NJA
44zxPsX0HZVJImS4ps5Xs7bdx5tdOmwNQy3vNm3b64Eb+4v5RP7S+jt7XdNF 8J/aWRqbdVUdDTVk
7WMjqsmIFw1EDidPEBeFNTS1r5GxOjHJxuldreGjS3jjPE+xeyqCia0tFWPL 1mqvbSZtPD6u6aL4
T+0nh9XdNF8J/aWKraGpt7aZ1SGtFVA2eLDgcsOcH2cFF1e1Wh7Oo4ldQol1 NSnZxG/8Pq7povhP
7SeH1d00Xwn9pYHJ6VZU1kqKqilrI6uhEMDWvmL6lrTEHHA1DmydyrHQUUCv FCkWhn1UbtDE2azw
+rumi+E/tJ4fV3TRfCf2lmZtl7pDAZW9zzYgFTohmD3mI8HgDeW+1U2r/qSC hopivBCmIp9VBsii
aN/4fV3TRfCf2k8Pq7povhP7Sw1TT1FHII6mN0Ty0PDXbjpO8H+amW2xV91g dPTiJsTXiPlJpWxt
c8jOkE8TjmSKgooYdJwqxCn1TdlE7mt8Pq7povhP7SeH1d00Xwn9pYKRr4pX Rv3PaS0jPAhektNU
QRQzSxOZHO0uicRueAcEj+at3dSZERrNTmNz4fV3TRfCf2k8Pq7povhP7SwG rfjKavap7spMhGtV
GY3/AIfV3TRfCf2k8Pq7povhP7SwGr/qTV7U7spMg1qozG/8Pq7povhP7SeH 1d00Xwn9pYHJ6Uye
lO7aTINaqMxvvD6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb7w+rumi +E/tJ4fV3TRfCf2l
gcnpTJ6U7tpMg1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6UyelO7aTINaqMx/ /9C18Pq7povhP7Se
H1d00Xwn9pYHJ6Uyelfa920mQ+b1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6U yelO7aTINaqMxvvD
6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb3w/rumi+E/tJ4f13TRfCf 2lgcnpKZPSU7spMg
1qozm+8P67povhP7SeH9d00Xwn9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0n h/XdNF8J/aWByekp
k9JTuykyDWqjOb7w/rumi+E/tJ4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P6 7povhP7SeH9d00Xw
n9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0nh/XdNF8J/aWByekpk9JTuykyD WqjOb7w/rumi+E/t
J4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P67povhP7S54f3A72tpD90Dz/8A ssCXEL9KsuG2630c
E3cvK08Ti4PLAXObkk44kled2jLpKKWo8K93bgehQQVFXG4cS1lfcQjt/cxw jperydpcb9JFXBM0
1VNTyxc7WNdG77wSSFYthvMtzfQctUxPj3yPfO4MY30ic8FldoJpKuy3Luid 1T3MYnRPc4u0kv0k
gnmIXlU1bST50Ml09tJ2vf8A4j1p3Zk+TKimqfe221j9Uoa2nuVDDW0r9cE7 A9jsY3L3WQ+i0k7D
w59Zm+Za9edPlqXNigXybIhd4UwiIsiTO7fjOxNx+6P/AORq/Ptk4Gm7wVL6 yOjipf20kr3huGjm
GeJPDC/QtvgTsVcABk4j3D+I1fmUFqu8kTHstFZJG4AtcIHEEcxG5fV9juHU 404rXb9keRXp4sLS
vY2FYbdetpaG9OrxHBVQkRwue1kkTmg4YQc6QTzr0raik5QyyvtrBJZJuWay VkgEw+rv5zv485WU
Fqu/E2Wuz09zu/RcNouuMd5K3qzv0XU6aU7JTVZK3y/f9sc6nzE23L3muopq J1LSytlpXVjbLTRw
ukkjBaWvcZG+XkA4I4j7lWVFzgpKPaGppIqCnmlq6dkEbXMmGDufoON/Endw VGbRdzxstdv/AO3d
+id6Lvu/uWt3cP7O7d/ophpZKbeKtv7T4/T3DnzWl/5/21jzro6juS3tllp3 MbAeSbFjW1ur/Pjf
n71Ltz4odk9oY5JWMfKynbG1zgC88rnAHOvDvTeM57zV3V3fohtF3PGy1xx/ 27v0XbG5MUvQ01vv
8uNznhxYY9LRf9VjUsqqShudvvU1ZDyNFY44jGyVrnySkOGjQDnPlArzhio4 Nj56aKopJXd7RJHL
POwPE+clrWYyMdJ47lmu8921au8lbnp7mdn/AGQ2e7k5NlrT/wDju/RcTppX NX24t8fqdCnzF/r/
ALs/RqaqaKr2kmrX1sUj4rZCaSLuiONsjseWHO/y4PT/ACUyWWmde6ymkbZ6 ix1MkTpY+6GNMTuT
GZG/zH3/AJrFd57vv/uSt38f7O7f/oud57t9iVvVnfoo1WT8pq3W/u0nWJnz lv8Av/w1dFLZoLA1
tBFRz0wdUtnjnmjidINR5M5cNX1cEaVQ3+plrLFs611Qx4jpXtkY1zciTVuy Bv4fyUM2i7njZa0/
fTu/RO9F3znvLXZ6e53fotZcmTBHpuYntv8AL6/X6lI5s2KHRUu2yxpWzUMW yETIYaKZhoXtmjkm
jjcJ87nbxrJG7AG5R5K2B132XoA+k7ljgpZanS1m6TUQ7Wfu5iqI2i7k5Nlr SR/27v0TvRd9/wDc
tdv4/wBnd+ihSJKibxFtbe/ivUOdNcKWh8jSW+4Ctq7xPFNbWVbatsdO+Zsb Y+5myu1ac+SfJxv4
lRa25UVLbL3JajSNE9zbHT5Y1xdEW4cWA78ZzvCpe893xp7yVuOjud36J3ou +7+5a7dw/s7t3+ih
U8lO+IrbOHyt9fp92S5823w+P3uV3IkDGCnJHoVj3pvH2NXdXd+id6bx9jV3 V3fovSx5OZdUcWHN
ysruSPQnJHoVj3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY9 6bx9jV3V3fonem8f
Y1d1d36Jjycy6oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuq GHNysruSPQnJHoVj
3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY96bx9jV3V3fone m8fY1d1d36Jjycy6
oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuqGHNysreTKcmVZ d6bz9i1/V3Lnem8/
Ytf1dyY8nMuqGHNysruTKcmVY96bz9i1/V3J3pvP2LX9XcmPJzLqhhzcrK7k ynJlWPem8/Ytf1dy
d6bz9i1/V3Jjycy6oYc3Kyu5MpyZVj3pvP2LX9Xcnem8/Ytf1dyY8nMuqGHN ysruTKcmVY96bz9i
1/V3J3pvP2LX9XcmPJzLqhhzcrK7kynJlWPem8/Ytf1dyd6bz9i1/V3Jjycy 6oYc3Kyu5MpyZVj3
pvP2LX9Xcnem8/Ytf1dyY8nMuqGHNysrXRexbejYKmS30ZljiD6OAF8hw1vk BZl1ovJ/+zV3V3fo
rNkdwkiiFXs7d3SxRiMPgGgOaNwyCw7wF4Xbsp1ciGGS02nfelssz3OxJ6pZ 0UU5NJq26+26NjU3
O33OnfYhWSxR6AyOskdulcM7n/8AT0LC17cWe8Q5a4sbCMtOQcScylGnmIwd nL/j/wB4/wD5qJW0
1xFBPBSbPXOFk2DNJUNLzpbvAGGgAZ3r5+h7Oqoa2XNmaKULzLd1Peqe0KTV JkqU23F9Hv4mz+i8
Y2JiH/czfMtasl9GBzsVER6zN8y1qpWeZmer9zz5fgR//9H9TREWBYodt/NC u/p/O1T7Cf8Aw9bv
wsfyhQNt/NCu/p/O1T7D5vW78LH8oXa/JL+T9kYL479PyWGUyuL5keI2Fx/k vPjjhlwuOLcjoW0+
8plV9Zc+4KqkZMz9hUv5LlQf8N5+rn2Hh9+FPWVNUQVMpTZe5ktNOzO5TK4i 6Cp3KZUS4V4oY4w2
IzVE7+TghB0mR+CcZO4AAEk8wB4ryFwqG07W1VIymrphIKamE3Kcq5rNWNQA CAsMplUE20VU2htd
VS2xtYLgWRZbUiMMlIOW7wdwLXDPsUi7bQU9tpawAg1tPTOmbDI1wa8hurSH 4wfuBzx6EsC3ymVS
UO01HNAw1srIJnzSxhjQ5waGyOYC44w3Oni4gcehffhDSzVtHHRyRz08s7qe eYZ/ZyYOhv3lwI9i
WBcZTKq6a7zVjxUU9E02vys10lQ1nkjOXBhGdORxJHSujaK0up31Aq/IY4NI MTw8k8MMxqI3HeAR
uPQUsCzymVSQ7U0M1RPA3LHQ1McGZQ5jXB4aQ7JbjPl/VO/dvwuz7S0fJRy0 krJY21EbKlz2uZyc
TiRygyBqGrSMjI3pYF1lMqhqdqoqN80tRRyNoYppYO6GvBc6WNrnOGjjjyHY OeYdKT7TPo6Cvnq7
XKyehhZO6CKVsmqN5Ia7VgAfVdkcwHOlgX2Uyqqru8tJV3GB1M15paQVUDQ/ SZ2jPKb94GDgfzUC
HbGN5qWz0D4XwUArGt5UO5T9nyhYDjiGkb/algaTKZVTT3epr5Wm327l6UOD JJ31Aj0u/wAwDcEu
08ObeD96hUu09dWyQwwWIumkE7iw1jRhsUgjJB07yXE4Hs9qWBo8plVdVfII dnn3mnjdURBoLY86
C4l4ZpOeBDjg/cVDrNqDbpqeC4Uncs7qhjJow4zaYnNeQ9hYPK8pmMY3b/vS wNBlMqki2iiq7/Bb
qR8boX04mc8seXPzrAAwMMILDkPwd+BvCmTXq2wVbqWWqayVoy7LXaRuzgux pBx/lzn2JYE/KZUK
23i33cE0NRyuAHYLHMJB4EBwBI9o3L5N7tjaeGoNZHyU8TpYnYPlsaQCRu37 3AY4nIwgJ+Uyqw7Q
2kcjqq9PLjLdUT24GcZdkeQM87sDcvSvvVutlRHT1lQY5ZGF7WiN7vJBwXHS DgZ5zhAT8plV0t/t
UM0kUlawOiYXvdhxYABqPlAaScb8A59i9RdaF1uNxbUtNIOEoBw7fjdzuyeG M55soCZlMqm8KbYa
+npmyPcyohfIJRG/ySxwBa5uMtPlZycbvvC9fCWzchFO2va6KX6j2Mc4Eelu G5u/6x3e3clgWmUy
vF1VA2oipzK3lZ2OfG0b9bW41EfdqH5qAdpbMGCTu5pjMPLa2xvLQzGclwGB u34O/hu3oC1ymVDq
brRUjp2zTHVT6OVayNz3N1507mgnfg/kos20lrYHNhq4ZpWhjiwOIw15ABJw cfW/PdxSwLbKZUOk
u1vrqqSmpqkSSR8RpcA4ZwS0kYcPa3I4dKrqe/yRWetu905CKkhmljiELXud hkjmeVx3ktHAYGUs
C9ymVS2baelvFoqbm2CeCKlDi9r2HJDW6iRkDO/UPvaVFqto68W2rmhoYIKm mo+7msnkMjJIMOxv
bjS4lvDfhLA0mUyviN/KRMfjGpodj7wvpAdymVxEB3Kj137uqv4Enyle68K7 93VX8CT5SrQeJEPc
Zf6LfMaD8RN8y16yH0W+Y0H4ib5lr1vWeYj9X7kQeFBERcxYodt/NCu/p/O1 T7D5vW78LH8oUDbf
zQrv6fztU+w+b1u/Cx/KF2vyS/k/ZGC+O/T8k9V10qJmU1U+maHy08L3saeD nhpIH5qbPMIIXSHm
4e0qBGSwAO3ucdT18f27V4ctSYd72v0/6ehIl6W0xewtzu+2ez10hvkmsawI ZQwMLTjO7HQcELbW
G4PuNrY6fAqoXGGob0SN3H89xHsKpNk6AWe2SwNfG/8AtUjgY3Bw05w3h/04 UoP707SMmziluYET
zzNlH1HfzGW/klBWytemyZatBE/8bbrpflfewmS2oFEaJERfRnMQ7jQGtbDJ FKIamlk5WnkLdTWu
wWnU3nBBIP37iClNDcw+mkq6yme6J7jIIactEjS3DQNTiWkHfkHfwUxEBRUN lnbRUtJKeSjttydN
AThxliGotzjgTrP5cFBuuxT7nWyzGsgaHuleJXwF041xuZp16saG6twxwAGV q0U3BlPAaHunlnSU
s5kJ5Uz0utzW8q+QcnvwD5ZB1BwOBuU2eyz0mz0FPSYqKqjqxVxDAaJH8qXY O/hh55+ZXyJcGYrd
imVUsEDamJlDT62x4hPdDY3teCwSasacvJ3tJ3DK+WbGmKkcyLvZFOXM0SR0 bm8npDgHNIfqEnlH
ytWBzDeVqUS7BnpNlpHwPpDcXSU0lRFUyOlZqmdI1rWuJdnG8NHNxJPsXnPs zUuttQ2WpZUTxULa
WkbFHyYLY3B7A7JOSXNaCRgYzuC0qJdgzkuy8twgdT1lW1lLNJLVOijj/asm lY5rxrJILRrdgYzw
3nn+6rZ2urLfco5rhTirr6eOm5RlO4RsjYTjydWS7ynb844bloEUXBS3W211 VWQyQPi5Sehmo6mU
tyyMOGoODc53uGMZ4KDPsbJUWiqpX3BjaqaOFsdQ2E4iLIuSJ06t+Wk7s8/s WoRTcFTS2uutsjY7
fV07aNz+Ukimgc92o736XBwwCd+8HBPRuUGi2du9BNDPBdaPloxUNLnUjiC2 WUSbhr3EOB45GMbl
pEUXB//S3FXs9JJZ3WqkreRpjCGtEkes8ryokMhORx3jAwN6+Kqw3Cqqobk+ 4U3fOGZj2ydzu5EM
aHgMDNWeMhOS7/RXyLC5YqLNYnWmrqap1Tyz6pg5QBmka+UkkcRv4ZkOBzY4 lQ6rZCGoulVWB1KO
6nmVz302uZrywN8l2cBu4HhnjvWjRLgrqG0miraep5cP5C3R0WnTjOl2dX8+ hVB2SqTHBTPqqGop
KOnfBTQ1FI52Q5zHZkw8aiNAxjG/etQiXBmzspUmmlp3XV0ra2BsFa+drpJH NDnOGhxduxrcPK1b
gPbn3u9suVdfOUpZIYaaW3SU08ksZeTqeDhoDhg4ycnIV6iXBmZ9j3S0UltZ XNbQ63zRgxZlbK6M
syXZwW+UTjAPtVxX2zuy1R0bJBE6ExPifpy0PjcHNyOjLRkDG7nU5EuCgZs5 Usqp67u6I1dY2VlU
eRPJlrwwHQNWWkcm3iTz/wAuzbNy9zQRUtXFGRbhbpy+EuD4sby0AjS7jxyP Yr5EuCrrLTO51DNb
6mOGeihdAwzxmRjmODQcgFpz5A356dyqYdiS2mFJJXNjgNIKeU0sbo31BEYY HS5cWuxxG7I3b+nV
IlwZufZmvrKmerrK6jmmmMeYTSu7ncGNcBrZry4+VkbxghfNv2O7hs9RQd2M cZzTnW2HAbyTg7AG
eBx07lpkU3BT2qxS2+qpXy1bJYKCF8FIxsZa4McWk6zkhx8lvADnVcyw1V0s U9oqxVW8MrZZeVZK
A2ojdK92PIdnBBHHGCtSii4K232OGh2f7z8vNIx8TmSSPeXOc54w9w1Zxkkn HAEqqr7NcILRX4b3
xq57f3ugjpmCINjAdpc7W7ecneQf5LTolwfELSyCNjuLWNB+8BfaIgCIiALw rv3dVfwJPlK914V3
7uqv4EnylWg8SIe4y/0W+Y0H4ib5lr1kPot8xoPxE3zLXres8xH6v3Ig8KCI i5ixQ7b+aFd/T+dq
n2Hzet34WP5QoG2/mhXf0/nap9h83rd+Fj+ULtfkl/J+yMF8d+n5Pi9yPgpm 1GkuhiOqQNBJ/ILN
1G0dvqqaaBz52CaNzC5kT8tyMZG7jvW2TA9EfkvnqjsqRUTcWNu/0a/R3QT4 oIdFI/Mtlu9GytBJ
SwTzzuldqe8wvAOOG7G44/2U2+bQ0dXZaiFjJ3y6P2LWQv1a85bjd0r9AwPR H5JgdA/JTF2XIjnq
ojiicV096+XohjxKHRSViNbZaie2Us1XGY6h8LXSsPM7G9SURem9rMCFcrpH bBTh1PU1MlTIYooq
Zgc5xDS48SN2GldiutG98MM0raSqmHk0lQ9rJuOB5GTxxzKDtLaJbsyg5Okp axtLUmWSnqpCxjwY
3N4gHeC4HhzKHUbO1dXS3MmCjppqump4YGMeXCHky7OHaQcYIxgKQX1RX0VJ LHDU1lPBJL/hslla
1z9+NwJ3712SvooWyPlrKeNsP+IXStAZv079+7eCN/PuVFfqCur9oZ2UtFDJ FU2p1O6eZxaIS6R2
9vknLgDnGR96+YNmZ6KjYYY6WapiuUlYWvJa2oaQ5rQ92DggOzwO8fzQF+6v omup2urKdpqv8AGV
uZv/AG7/ACuI4dK4240D4ppW11M6OnOJniZpER6HHPk/zVDb9n6+3zyP5Oln FYwtlLnkGky+R37P
yTqxyuP8v1B07odFsfV0kMLgyIzUnI6BJVySipDDk5yMRg8cAOx0psBd0e01 sq2zyOqIYIYZXxie
Sdgjk0uLQQ7PPg/qp/fCldIxkUzJi6Uwkxva7Q8NLiHb9xwOHFZej2Trxeor hVR0TGd1Gd8DHl4a
NUh0jLRn645hzrxk2Ir5qalpzUwRBlEyCV7CSdYjnaXDcM/4rd/HcU2A1RvF qFMKk3SiEBdoEpqG
aC7jjOcZ9i5HebfLXz0IqoxPBG2Vwc8DUxzdQc3fvAHE8AqS2bLy090pK2en hY2KUulidUvqSRyT
mghzwBxdwwMdJ5vCm2Tr4KCrpC6mcatjMy6jmMseXNaN29rhgE5GOgpsBqYa 2kqIo5YKqCWOV2mN
8cgc17ugEHedx3exQ7hemW6upqR1BXTvqjpidBE1zS7BJGS4bwGkqNR2urZV vrJqaiY6esZO6Fri
9tO1sRZmN2B5ROOYbnFTq2ikqblaqlhaGUdQ+WQE7yDG5m7+bgoBBO1VKKSe tNvuPckGsGo5Buhx
a7QQ3ysnLhgbl9T7U0FLT8rVRVUD21DKeSGSIcpG54JaXAEgNwCc53BVx2Mg 8HqqnZTUrLnUGTNU
3IJDpS763H6px96kSbMyd0siD21VIa1tTI+qe58z26HsMbic6gA4YyeGR7VO wEw7TW0VtbRtdLJN
R6AQxmoTOfnDYznyjkEHowc8CvQ3tjYWOfb69s8jiI6QxN5Z4HFwbqxpGeJI VW3ZWSir4aqhkY40
cUZhEp3zSgy6y8gbtQlO8c+/B4Ga6nuz6mG69y0jK2KN9OabulxjfE4tdnXo yHAtH+UjH35AHrDt
Hbp7lS29j5BPVMc5upmAwtOCx+fquzuxzrxi2ppaiejigoLhIK5hfDI2Fugt BAcSdW7GRnd+ahHZ
WpfWVFbJPGJ54nShzCRyVTygc3Tu+qA0DPHeelSbRZKyiZY+6HQl9BSzxTiM nBfIWkacjhuPFNgJ
Fv2lobgxsnJ1FJG+A1Eb6pgY2SIYy8HJ3DLc5xxC4/aaihp5Z6mCrpmMZyjO Wh0mdmcZYM7+IODg
4PBVdDsa+ntcdFNUvlE1AaOpL5XP5DI3uh1cASAC3cNwO7G/2vVlu9+onMqh RwzU7Hin5ORxbM9w
wXOyPIGM7hqOTx3b2wFpdL3T2iqjgqYal3KRSyiSKMOY1sY1Oyc9H+684tpb ZJT0tQZXxx1UL5ma
24LQwtBa4cQ7LwNPHKg3i3Xu8vge+looCKeqikAqnOwZWaWkeQM4xv4KNPsj VS3SKRlRFHSRwCQD
eSyq1ROJDeGgmIE78kuKbAWsu0TYIWSz2i6RB88cDQ+BuXOecN/zcM4H8wuQ 7UUMsb5nw1cEDeUD
JpogGTFhOoMIJyfJOAcZwvKviv1wp4GvoKCKSGtgnwKxzg5rHaj/APT3HcB/ P2KG3Z66VFoFpqRS
xQwSyzRSxyl7pXlzywEFo0ga9/HhuTYCa/aukhpIaupoLjSwTyRxxPmgaA7W CQdzjuABJJ4Betdt
LS0L5W9yVtTyM7Kd7qeIOAe8NLBvcOOtoB+9VlDs3O2joaKa1W2kgp545JxD MZBUARvY7ILBx1D/
AFX1R7N3KGhq6eoqIpXPuVPPDIXkudDEYwNZx9ctj5t2U2At4b0yorBTQ0Fd IWuayaRsTdEDyAdL
zq3EAjOAeK+6q701OIxE2WtllyWQ0gEj3Abi7iBgHdknjuUOrtdTVX+GsZR0 lMIZmO7uZKTO+Nu8
sLdIGHbx9bh+S+Y7ZXUT4K6kpqLupsL6eSma8xwlhkLwWuwSDk78g5yeCA9R tLS91up5aOuh5N0b
JpZIgGQvkALGuIcTk6mjcDvK9aO9x11U+KGgrhEyWSJ1U+Joh1MJDvK1Zxlp HBVr9nayor6q6TPa
yokmhmZSCoc6neWMALXjAB8oZDsZBDTzYXhT2G6UbLmKWgtsNVWGoLbgJyZP 2jnOaHNLMbsgceZN
gLSPaWjnttVXwQVczKR5bJGyIcoWgZ1gEjLCN4dz43L4ZtRDMYWw2q6SyTQC obGyBuoRk4Dj5e7P
MotFsxVW01kMNxfU01TbRSAVDWBzXsBbH9Vo8kNc7POvip2fqxXW6qFuoLga S3xU2Kid0fJyMOdT
cMOf9E2As6e/w1M8rW0VayCGSSOSrkja2FhZkOy7VnAIIzhecm09FBTTVFRB WQRxxGVnKw6TUMHE
xjO/mODg4PDjiLFsfQTUtw7tpoBV10tQ41MYy9rJS7GCecB2F53myXa/299P WdyQvgje2B0UjiJX
uaWanZHkDSTuGTkjfu3tgJs+1NBS0z5qqCrgfHNHDJA+IcowvzpJAJGkgE5z zFS6W80dZdqq2wOc
+akY173gfs3B3DS7n9vQquXZmQVAjZIKmldWRVMklXI58xa0FpjJOdTcHdnh khSbTYG2i5Okgfqp
+42w5cfLc/lHOLjgY4OG/wBibALftPQ1lLFU1EkNBHNGxzO6KljS5zmhxaBn mBbv9vDptDVUwrBR
mohFS5uoQcoOUI6dPHCyth2Qq7bUtkqzSytbSviwPK8oxwtB3jpid+YXxbtj q2kngdJKx72GKXuj
umQiJ7I2twItwdvbnUTz7wmwGqjuFFNHJJFW08jInaJHMlaQx3DBOdx9hXzX 3AUAYO5aqqkfnEdN
HqdgcSckADeOfnWdotnLnBVVU80NJKZaeOItnqXzMle2UPc8tLRo3ZIaM4OF e3qnqaulMENJSVsM
mRLBVPLA7nB1AHgRwxv6RjeAp73QVdbBSU8rpH1FL3XG4MOkxZAzk8/lDcpF d+7qr+BJ8pVXSWu5
Ut2tkj3xVEFJb3Uss7pCJHvJadQbjGPIHPz+zfaV37uqv4EnylTD4kQ9x//T 0n0W+Y0H4ib5lr1k
Pot8xoPxE3zLXq1Z5iP1fuIPCgiIuYsUO2/mhXf0/nap9h83rd+Fj+UKBtv5 oV39P52qfYfN63fh
Y/lC7X5JfyfsjBfHfp+SeiIuI3CIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiJkd IQBE3dITd0hCQibu
kJkdI/NAETI6R+aZHSPzQBEyOkfmmR0hCAiIgCIiAIiIAiIgCIiAIiIAiIgC IiAIiIAvCu/d1V/A
k+Ur3XhXfu6q/gSfKVaDxIh7jL/Rb5jQfiJvmWvWQ+i3zGg/ETfMtet6zzEf q/ciDwoIiLmLFDtv
5oV39P52qfYfN63fhY/lCgbb+aFd/T+dqn2Hzet34WP5Qu1+SX8n7IwXx36f knoiLiNwiIgCIiAI
iIAiIgCIiAIiIAiIgCIiA6BkgLKWCzUe0FNLVV2HzavKcWNcSTnnOT0YG4bl q2/WH3qg2Fd/dM28
7pMcfaVvKbUMTX0/JnGk4kmf/9TfnYmznOI2j+jHu4+z2j8vvXj4K7OurXUI kh7qEfKmAMj1hhJA
djGcZIGfZ960Qdv4rEuotpe/DrzHRU7HSV0jAA93LthLeSaDluNAIEuM43q2 JHxKaEPAu/Aiz5/w
h8Fn6Lg2Is43mIED/wBFns9nsP5qgqaS4yWujZDHdoHB395l0c0rpJNHFjQ8 Et1Z+oQOG7C86MXF
10qIM3Sa6wPpAyZznCKNulhkDwHcmCW6txB4jnTEj4jQh4Ggg2OsVRDHNAI5 ontDmvZFGQ8bt4IH
A4P5/cvvwIs4AzEPgx+z2ew/ms73vrqTZaitsFHcYDBkVEjGTTP5ZrQAGND2 5jOT5QOkFo3b1ebJ
U9zEVTW3h9X3XK5gDJ3Ya0clGXFreAy/Vn2g4xvyxI+JOhDwPXwJs2P8NvwY /wBFW3a0UdhqqGWh
AZJJMwZDGtOOUY0jdjIw8jGDzcOfX6lmtr3ftbYM8alm7P8A6satBHFFFZsr FDCldIvjxK4uniVx
chsEREAREQBERAEREAREQBERAEREAREQBeFd+7qr+BJ8pXuvCu/d1V/Ak+Uq 0HiRD3GX+i3zGg/E
TfMtesh9FvmNB+Im+Za9b1nmI/V+5EHhQREXMWKHbfzQrv6fztU+w+b1u/Cx /KFA2480K7+n87VO
sLmjZ+3Ze0f2aPnHohdz8kv5P2Rh/vfp+SwRc1s9NvvBNbPTb7wXDZm51FzW z02+8E1s9NvvBLMH
UXNbPTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHU XNbPTb7wTWz02+8E
swdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Es wfQODlZdmzV4oXyM
td6jp6d7shj43aufjg45/wDZabWz02+8E1s9NvvBaQRxQbisUKZnTZ9qj/xH B8N/t9vt/wBAhtG1
R/4ig+G/2+32/wCy0Wtnpt94JrZ6bfeC0x4+C6L9EaC4/czvejar/mKD4b/1 XG2XadrnOG0FOHOI
LiIn5djHHp4LR62em33gmtnpt94Jjx8F0X6I0Fx+5nRZ9qh/xHB8N/s9vs/1 Kd59qv8AmOD4b/1W
i1s9NvvBNbPTb7wTHj4Lov0NBcfuZ3vPtV/zHD8N/wCqR7O3WorIJbteI6mG CQSBjI3A5Dg4AZOB
vA/JaLWz02+8E1s9NvvBRjx8F0Q0Ed50XNbPTb7wTWz02+8FhZmh1FzWz02+ 8E1s9NvvBLMHUXNb
PTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbP Tb7wTWz02+8EswdR
c1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Eswf/V /U14V37uqv4Enyle
2tnpt94Lwrns73VXlt/wJP8AMPRKzgX+SJe4zH0W+Y0H4ib5lr1kPot8xoPx E3zLXras8xH6v3Ig
8KCIi5ixCvFqp73ap7bVukbDOAHGN2l24g7j94WZ8VdhP/m7p1kdlbNFvLqZ 0paMETSKxQQxb0Yv
xV2D1u59ZHZTxVWD1q59ZHZW0Raa9U8x9SuFL4GL8VVg9aufWR2U8VVg9auf WR2VtETXqnmPqMKX
wMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTxVWD1q 59ZHZW0RNeqeY+ow
pfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdlPFVYP Wrn1kdlbRE16p5j6
jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR2U8VV g9aufWR2VtETXqnm
PqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTx VWD1q59ZHZW0RNeq
eY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdl PFVYPWrn1kdlbRE1
6p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR 2U8VVg9aufWR2VtE
TXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59 ZHZTxVWD1q59ZHZW
0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWr n1kdlPFVYPWrn1kd
lbRE16p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9 aufWR2U8VVg9aufW
R2VtETXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVW D1q59ZHZTxVWD1q5
9ZHZW0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/F VYPWrn1kdlPFVs+f
/NXPrI7K2iJr1TzH1GFL4FfYrJSbPWtltonSuhY9zwZXBzsuOTvwFYIi5Yon E3E97NFsCIigBERA
EREAREQBERAEREAREQBERAEREAREQBERAf/W/U0RFgWCIiAIiIAiIgCIiAIi IAiIgCIiAIiIAiIg
CIiAIiIAiIgCIiAIiIAiIgCIiA//2Q==
------=_NextPart_000_0020_01C5B2FB.BF942660--

Attached files

Interceptar Error en DataSet

Publicado: Mar Sep 06, 2005 4:36 pm
por ignacio
This is a multi-part message in MIME format.
------=_NextPart_000_000E_01C5B301.126D0140
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_000F_01C5B301.126D0140"
------=_NextPart_001_000F_01C5B301.126D0140
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Xevi,=20
TRY
oDataSet:lOpen :=3D .t.
CATCH
oDataSet:DelErrors()
oForm:End()
return nil
END
Saludos
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431da05f@ozsrvnegro.ozlan.local...]431da05f@ozsrvnegro.ozlan.local...[/email]
Ignacio,
Me estoy peleando, pero no consigo que "cierre" el Form...
Tengo el=20
oDataSource:lAbortOnErrors a .T.
Pero donde pongo el TRY...CATCH...END para que cuando se produzca un =
error "cierre" el Form...
Lo he probado en FormInitialize, pero en CATCH le mando ::Close()... y =
si bien me vuelve al Form Padre, pero no me cierra el Form Hijo.
Un Saludo,
Xevi.
"Ignacio Ortiz de Z=FA=F1iga" <InvalidAccount@ozs.com> escribi=F3 en =
el mensaje news:431d8305$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,=20
Propiedad oDataSet:lDisplayErrors, que se inicializa al valor que =
tenga oDataSource:lDisplayErrors.
Si quieres puedes utilizar oDataSource:lAbortOnErrors a .T. y =
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido errores con los m=E9todos del DataSource:
IsError(), LastError(), DelErrors(), GetErrors(), ShowErrorList()
Saludos,
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431d70f1@ozsrvnegro.ozlan.local...]431d70f1@ozsrvnegro.ozlan.local...[/email]
=BFComo puedo anticiparme a este error??
Si el DataSet que intento acceder NO es accesible por alguna =
circunstancia...
Me salta este error y el programa sigue... cuando lo que deber=EDa =
es no continuar y retornar a un Form anterior..
Vaya... que necesito como el
If DbUseArea()
Return
Else
...
...
EndIf
Un Saludo,
Xevi.
------=_NextPart_001_000F_01C5B301.126D0140
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.2900.2722" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#e6feff>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>TRY</DIV>
<DIV>ÂÂÂ oDataSet:lOpen :=3D .t.</DIV>
<DIV>CATCH</DIV>
<DIV>ÂÂÂ oDataSet:DelErrors()</DIV>
<DIV>ÂÂÂ oForm:End()</DIV>
<DIV>ÂÂÂ return nil</DIV>
<DIV>END</DIV>
<DIV>Â</DIV>
<DIV>Saludos</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>"Xevi" <<A =
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>>=20
escribi=F3 en el mensaje <A=20
=
href=3D"news:431da05f@ozsrvnegro.ozlan.local">news:431da05f@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Ignacio,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Me estoy peleando, pero no consigo =
que "cierre"=20
el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Tengo el </FONT></DIV>
<DIV>oDataSource:lAbortOnErrors a .T.</DIV>
<DIV>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Pero donde pongo el TRY...CATCH...END =
para que=20
cuando se produzca un error "cierre" el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Lo he probado en FormInitialize, pero =
en CATCH le=20
mando ::Close()... y si bien me vuelve al Form Padre, pero no me =
cierra el=20
Form Hijo.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</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>"Ignacio Ortiz de Z=FA=F1iga" <<A=20
=
href=3D"mailto:InvalidAccount@ozs.com">InvalidAccount@ozs.com</A>> =
escribi=F3=20
en el mensaje <A=20
=
href=3D"news:431d8305$1@ozsrvnegro.ozlan.local">news:431d8305$[email=1@ozsrvnegr]1@ozsrvnegr[/email]=
o.ozlan.local</A>...</DIV>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>Propiedad oDataSet:lDisplayErrors, que se inicializa al valor =
que tenga=20
oDataSource:lDisplayErrors.</DIV>
<DIV>Â</DIV>
<DIV>Si quieres puedes =
utilizarÂoDataSource:lAbortOnErrors a .T.=20
y simplemente haz un TRY..CATCH o por el contrario controlar si se =
han=20
producido errores con los m=E9todos del DataSource:</DIV>
<DIV>Â</DIV>
<DIV>IsError(), LastError(), DelErrors(), GetErrors(), =
ShowErrorList()</DIV>
<DIV>Â</DIV>
<DIV>Saludos,</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>"Xevi" <<A=20
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:431d70f1@ozsrvnegro.ozlan.local">news:431d70f1@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2><IMG height=3D166=20
src=3D"cid:000901c5b2f0$4edd0550$0e00000a@ozlan.local" width=3D421 =
v:shapes=3D"_x0000_i1025"></FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>=BFComo puedo anticiparme a este=20
error??</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Si el DataSet que intento acceder NO es =
accesible por=20
alguna circunstancia...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Me salta este error y el programa sigue... =
cuando lo que=20
deber=EDa es no continuar y retornar a un Form=20
anterior..</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Vaya... que necesito como =
el</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>If DbUseArea()</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>ÂÂ Return</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Else</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>EndIf</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Un Saludo,</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial=20
size=3D2>Xevi.</FONT></SPAN></DIV></BLOCKQUOTE></BLOCKQUOTE ></BLOCKQUOTE>=
</BODY></HTML>
------=_NextPart_001_000F_01C5B301.126D0140--
------=_NextPart_000_000E_01C5B301.126D0140
Content-Type: image/jpeg;
name="clip_image002.jpg"
Content-Transfer-Encoding: base64
Content-ID: <000901c5b2f0$4edd0550$0e00000a@ozlan.local>
/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBP ZmZpY2X/2wBDAAoH
BwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEEx NDk7Pj4+JS5ESUM8
SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7 Ozs7Ozs7Ozs7Ozs7
Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCACmAaUDASIAAhEBAxEB/8QAGwABAAMB AQEBAAAAAAAAAAAA
AAQFBgEDAgf/xABPEAABAwMBAwUMBwUGBAUFAAABAAIDBAUREgYhMRNBUZTS FBUWFyI2UlRhkpOy
BzJVcXSR0SM1c4GDJCUzQqGxRlZiZCZEY3KzQ0WEwtP/xAAaAQEAAwEBAQAA AAAAAAAAAAAAAQID
BAUG/8QANREAAgAEAgcGBgIDAQEAAAAAAAECAwQRE1ISFCExUVORBRUyNHGx M0FhocHRcvAiQ+Ej
gf/dAAQAKP/aAAwDAQACEQMRAD8A/U0RFgWCIiAIiIAiIgCIiAIiIAiIgCIi AIiIAiIgCIiAIiIA
iIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIDzqJ4q WmlqJ3aIomF73dAA
yVgqj6SKmWoPcVNTxQf5eXDnOd7dxGPuV99IBI2HuOOOI/8A5Gr8wstrqrtK 6Ckax8rIzJpc8NJA
44zxPsX0HZVJImS4ps5Xs7bdx5tdOmwNQy3vNm3b64Eb+4v5RP7S+jt7XdNF 8J/aWRqbdVUdDTVk
7WMjqsmIFw1EDidPEBeFNTS1r5GxOjHJxuldreGjS3jjPE+xeyqCia0tFWPL 1mqvbSZtPD6u6aL4
T+0nh9XdNF8J/aWKraGpt7aZ1SGtFVA2eLDgcsOcH2cFF1e1Wh7Oo4ldQol1 NSnZxG/8Pq7povhP
7SeH1d00Xwn9pYHJ6VZU1kqKqilrI6uhEMDWvmL6lrTEHHA1DmydyrHQUUCv FCkWhn1UbtDE2azw
+rumi+E/tJ4fV3TRfCf2lmZtl7pDAZW9zzYgFTohmD3mI8HgDeW+1U2r/qSC hopivBCmIp9VBsii
aN/4fV3TRfCf2k8Pq7povhP7Sw1TT1FHII6mN0Ty0PDXbjpO8H+amW2xV91g dPTiJsTXiPlJpWxt
c8jOkE8TjmSKgooYdJwqxCn1TdlE7mt8Pq7povhP7SeH1d00Xwn9pYKRr4pX Rv3PaS0jPAhektNU
QRQzSxOZHO0uicRueAcEj+at3dSZERrNTmNz4fV3TRfCf2k8Pq7povhP7SwG rfjKavap7spMhGtV
GY3/AIfV3TRfCf2k8Pq7povhP7SwGr/qTV7U7spMg1qozG/8Pq7povhP7SeH 1d00Xwn9pYHJ6Uye
lO7aTINaqMxvvD6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb7w+rumi +E/tJ4fV3TRfCf2l
gcnpTJ6U7tpMg1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6UyelO7aTINaqMx/ /9C18Pq7povhP7Se
H1d00Xwn9pYHJ6Uyelfa920mQ+b1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6U yelO7aTINaqMxvvD
6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb3w/rumi+E/tJ4f13TRfCf 2lgcnpKZPSU7spMg
1qozm+8P67povhP7SeH9d00Xwn9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0n h/XdNF8J/aWByekp
k9JTuykyDWqjOb7w/rumi+E/tJ4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P6 7povhP7SeH9d00Xw
n9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0nh/XdNF8J/aWByekpk9JTuykyD WqjOb7w/rumi+E/t
J4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P67povhP7S54f3A72tpD90Dz/8A ssCXEL9KsuG2630c
E3cvK08Ti4PLAXObkk44kled2jLpKKWo8K93bgehQQVFXG4cS1lfcQjt/cxw jperydpcb9JFXBM0
1VNTyxc7WNdG77wSSFYthvMtzfQctUxPj3yPfO4MY30ic8FldoJpKuy3Luid 1T3MYnRPc4u0kv0k
gnmIXlU1bST50Ml09tJ2vf8A4j1p3Zk+TKimqfe221j9Uoa2nuVDDW0r9cE7 A9jsY3L3WQ+i0k7D
w59Zm+Za9edPlqXNigXybIhd4UwiIsiTO7fjOxNx+6P/AORq/Ptk4Gm7wVL6 yOjipf20kr3huGjm
GeJPDC/QtvgTsVcABk4j3D+I1fmUFqu8kTHstFZJG4AtcIHEEcxG5fV9juHU 404rXb9keRXp4sLS
vY2FYbdetpaG9OrxHBVQkRwue1kkTmg4YQc6QTzr0raik5QyyvtrBJZJuWay VkgEw+rv5zv485WU
Fqu/E2Wuz09zu/RcNouuMd5K3qzv0XU6aU7JTVZK3y/f9sc6nzE23L3muopq J1LSytlpXVjbLTRw
ukkjBaWvcZG+XkA4I4j7lWVFzgpKPaGppIqCnmlq6dkEbXMmGDufoON/Endw VGbRdzxstdv/AO3d
+id6Lvu/uWt3cP7O7d/ophpZKbeKtv7T4/T3DnzWl/5/21jzro6juS3tllp3 MbAeSbFjW1ur/Pjf
n71Ltz4odk9oY5JWMfKynbG1zgC88rnAHOvDvTeM57zV3V3fohtF3PGy1xx/ 27v0XbG5MUvQ01vv
8uNznhxYY9LRf9VjUsqqShudvvU1ZDyNFY44jGyVrnySkOGjQDnPlArzhio4 Nj56aKopJXd7RJHL
POwPE+clrWYyMdJ47lmu8921au8lbnp7mdn/AGQ2e7k5NlrT/wDju/RcTppX NX24t8fqdCnzF/r/
ALs/RqaqaKr2kmrX1sUj4rZCaSLuiONsjseWHO/y4PT/ACUyWWmde6ymkbZ6 ix1MkTpY+6GNMTuT
GZG/zH3/AJrFd57vv/uSt38f7O7f/oud57t9iVvVnfoo1WT8pq3W/u0nWJnz lv8Av/w1dFLZoLA1
tBFRz0wdUtnjnmjidINR5M5cNX1cEaVQ3+plrLFs611Qx4jpXtkY1zciTVuy Bv4fyUM2i7njZa0/
fTu/RO9F3znvLXZ6e53fotZcmTBHpuYntv8AL6/X6lI5s2KHRUu2yxpWzUMW yETIYaKZhoXtmjkm
jjcJ87nbxrJG7AG5R5K2B132XoA+k7ljgpZanS1m6TUQ7Wfu5iqI2i7k5Nlr SR/27v0TvRd9/wDc
tdv4/wBnd+ihSJKibxFtbe/ivUOdNcKWh8jSW+4Ctq7xPFNbWVbatsdO+Zsb Y+5myu1ac+SfJxv4
lRa25UVLbL3JajSNE9zbHT5Y1xdEW4cWA78ZzvCpe893xp7yVuOjud36J3ou +7+5a7dw/s7t3+ih
U8lO+IrbOHyt9fp92S5823w+P3uV3IkDGCnJHoVj3pvH2NXdXd+id6bx9jV3 V3fovSx5OZdUcWHN
ysruSPQnJHoVj3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY9 6bx9jV3V3fonem8f
Y1d1d36Jjycy6oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuq GHNysruSPQnJHoVj
3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY96bx9jV3V3fone m8fY1d1d36Jjycy6
oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuqGHNysreTKcmVZ d6bz9i1/V3Lnem8/
Ytf1dyY8nMuqGHNysruTKcmVY96bz9i1/V3J3pvP2LX9XcmPJzLqhhzcrK7k ynJlWPem8/Ytf1dy
d6bz9i1/V3Jjycy6oYc3Kyu5MpyZVj3pvP2LX9Xcnem8/Ytf1dyY8nMuqGHN ysruTKcmVY96bz9i
1/V3J3pvP2LX9XcmPJzLqhhzcrK7kynJlWPem8/Ytf1dyd6bz9i1/V3Jjycy 6oYc3Kyu5MpyZVj3
pvP2LX9Xcnem8/Ytf1dyY8nMuqGHNysrXRexbejYKmS30ZljiD6OAF8hw1vk BZl1ovJ/+zV3V3fo
rNkdwkiiFXs7d3SxRiMPgGgOaNwyCw7wF4Xbsp1ciGGS02nfelssz3OxJ6pZ 0UU5NJq26+26NjU3
O33OnfYhWSxR6AyOskdulcM7n/8AT0LC17cWe8Q5a4sbCMtOQcScylGnmIwd nL/j/wB4/wD5qJW0
1xFBPBSbPXOFk2DNJUNLzpbvAGGgAZ3r5+h7Oqoa2XNmaKULzLd1Peqe0KTV JkqU23F9Hv4mz+i8
Y2JiH/czfMtasl9GBzsVER6zN8y1qpWeZmer9zz5fgR//9H9TREWBYodt/NC u/p/O1T7Cf8Aw9bv
wsfyhQNt/NCu/p/O1T7D5vW78LH8oXa/JL+T9kYL479PyWGUyuL5keI2Fx/k vPjjhlwuOLcjoW0+
8plV9Zc+4KqkZMz9hUv5LlQf8N5+rn2Hh9+FPWVNUQVMpTZe5ktNOzO5TK4i 6Cp3KZUS4V4oY4w2
IzVE7+TghB0mR+CcZO4AAEk8wB4ryFwqG07W1VIymrphIKamE3Kcq5rNWNQA CAsMplUE20VU2htd
VS2xtYLgWRZbUiMMlIOW7wdwLXDPsUi7bQU9tpawAg1tPTOmbDI1wa8hurSH 4wfuBzx6EsC3ymVS
UO01HNAw1srIJnzSxhjQ5waGyOYC44w3Oni4gcehffhDSzVtHHRyRz08s7qe eYZ/ZyYOhv3lwI9i
WBcZTKq6a7zVjxUU9E02vys10lQ1nkjOXBhGdORxJHSujaK0up31Aq/IY4NI MTw8k8MMxqI3HeAR
uPQUsCzymVSQ7U0M1RPA3LHQ1McGZQ5jXB4aQ7JbjPl/VO/dvwuz7S0fJRy0 krJY21EbKlz2uZyc
TiRygyBqGrSMjI3pYF1lMqhqdqoqN80tRRyNoYppYO6GvBc6WNrnOGjjjyHY OeYdKT7TPo6Cvnq7
XKyehhZO6CKVsmqN5Ia7VgAfVdkcwHOlgX2Uyqqru8tJV3GB1M15paQVUDQ/ SZ2jPKb94GDgfzUC
HbGN5qWz0D4XwUArGt5UO5T9nyhYDjiGkb/algaTKZVTT3epr5Wm327l6UOD JJ31Aj0u/wAwDcEu
08ObeD96hUu09dWyQwwWIumkE7iw1jRhsUgjJB07yXE4Hs9qWBo8plVdVfII dnn3mnjdURBoLY86
C4l4ZpOeBDjg/cVDrNqDbpqeC4Uncs7qhjJow4zaYnNeQ9hYPK8pmMY3b/vS wNBlMqki2iiq7/Bb
qR8boX04mc8seXPzrAAwMMILDkPwd+BvCmTXq2wVbqWWqayVoy7LXaRuzgux pBx/lzn2JYE/KZUK
23i33cE0NRyuAHYLHMJB4EBwBI9o3L5N7tjaeGoNZHyU8TpYnYPlsaQCRu37 3AY4nIwgJ+Uyqw7Q
2kcjqq9PLjLdUT24GcZdkeQM87sDcvSvvVutlRHT1lQY5ZGF7WiN7vJBwXHS DgZ5zhAT8plV0t/t
UM0kUlawOiYXvdhxYABqPlAaScb8A59i9RdaF1uNxbUtNIOEoBw7fjdzuyeG M55soCZlMqm8KbYa
+npmyPcyohfIJRG/ySxwBa5uMtPlZycbvvC9fCWzchFO2va6KX6j2Mc4Eelu G5u/6x3e3clgWmUy
vF1VA2oipzK3lZ2OfG0b9bW41EfdqH5qAdpbMGCTu5pjMPLa2xvLQzGclwGB u34O/hu3oC1ymVDq
brRUjp2zTHVT6OVayNz3N1507mgnfg/kos20lrYHNhq4ZpWhjiwOIw15ABJw cfW/PdxSwLbKZUOk
u1vrqqSmpqkSSR8RpcA4ZwS0kYcPa3I4dKrqe/yRWetu905CKkhmljiELXud hkjmeVx3ktHAYGUs
C9ymVS2baelvFoqbm2CeCKlDi9r2HJDW6iRkDO/UPvaVFqto68W2rmhoYIKm mo+7msnkMjJIMOxv
bjS4lvDfhLA0mUyviN/KRMfjGpodj7wvpAdymVxEB3Kj137uqv4Enyle68K7 93VX8CT5SrQeJEPc
Zf6LfMaD8RN8y16yH0W+Y0H4ib5lr1vWeYj9X7kQeFBERcxYodt/NCu/p/O1 T7D5vW78LH8oUDbf
zQrv6fztU+w+b1u/Cx/KF2vyS/k/ZGC+O/T8k9V10qJmU1U+maHy08L3saeD nhpIH5qbPMIIXSHm
4e0qBGSwAO3ucdT18f27V4ctSYd72v0/6ehIl6W0xewtzu+2ez10hvkmsawI ZQwMLTjO7HQcELbW
G4PuNrY6fAqoXGGob0SN3H89xHsKpNk6AWe2SwNfG/8AtUjgY3Bw05w3h/04 UoP707SMmziluYET
zzNlH1HfzGW/klBWytemyZatBE/8bbrpflfewmS2oFEaJERfRnMQ7jQGtbDJ FKIamlk5WnkLdTWu
wWnU3nBBIP37iClNDcw+mkq6yme6J7jIIactEjS3DQNTiWkHfkHfwUxEBRUN lnbRUtJKeSjttydN
AThxliGotzjgTrP5cFBuuxT7nWyzGsgaHuleJXwF041xuZp16saG6twxwAGV q0U3BlPAaHunlnSU
s5kJ5Uz0utzW8q+QcnvwD5ZB1BwOBuU2eyz0mz0FPSYqKqjqxVxDAaJH8qXY O/hh55+ZXyJcGYrd
imVUsEDamJlDT62x4hPdDY3teCwSasacvJ3tJ3DK+WbGmKkcyLvZFOXM0SR0 bm8npDgHNIfqEnlH
ytWBzDeVqUS7BnpNlpHwPpDcXSU0lRFUyOlZqmdI1rWuJdnG8NHNxJPsXnPs zUuttQ2WpZUTxULa
WkbFHyYLY3B7A7JOSXNaCRgYzuC0qJdgzkuy8twgdT1lW1lLNJLVOijj/asm lY5rxrJILRrdgYzw
3nn+6rZ2urLfco5rhTirr6eOm5RlO4RsjYTjydWS7ynb844bloEUXBS3W211 VWQyQPi5Sehmo6mU
tyyMOGoODc53uGMZ4KDPsbJUWiqpX3BjaqaOFsdQ2E4iLIuSJ06t+Wk7s8/s WoRTcFTS2uutsjY7
fV07aNz+Ukimgc92o736XBwwCd+8HBPRuUGi2du9BNDPBdaPloxUNLnUjiC2 WUSbhr3EOB45GMbl
pEUXB//S3FXs9JJZ3WqkreRpjCGtEkes8ryokMhORx3jAwN6+Kqw3Cqqobk+ 4U3fOGZj2ydzu5EM
aHgMDNWeMhOS7/RXyLC5YqLNYnWmrqap1Tyz6pg5QBmka+UkkcRv4ZkOBzY4 lQ6rZCGoulVWB1KO
6nmVz302uZrywN8l2cBu4HhnjvWjRLgrqG0miraep5cP5C3R0WnTjOl2dX8+ hVB2SqTHBTPqqGop
KOnfBTQ1FI52Q5zHZkw8aiNAxjG/etQiXBmzspUmmlp3XV0ra2BsFa+drpJH NDnOGhxduxrcPK1b
gPbn3u9suVdfOUpZIYaaW3SU08ksZeTqeDhoDhg4ycnIV6iXBmZ9j3S0UltZ XNbQ63zRgxZlbK6M
syXZwW+UTjAPtVxX2zuy1R0bJBE6ExPifpy0PjcHNyOjLRkDG7nU5EuCgZs5 Usqp67u6I1dY2VlU
eRPJlrwwHQNWWkcm3iTz/wAuzbNy9zQRUtXFGRbhbpy+EuD4sby0AjS7jxyP Yr5EuCrrLTO51DNb
6mOGeihdAwzxmRjmODQcgFpz5A356dyqYdiS2mFJJXNjgNIKeU0sbo31BEYY HS5cWuxxG7I3b+nV
IlwZufZmvrKmerrK6jmmmMeYTSu7ncGNcBrZry4+VkbxghfNv2O7hs9RQd2M cZzTnW2HAbyTg7AG
eBx07lpkU3BT2qxS2+qpXy1bJYKCF8FIxsZa4McWk6zkhx8lvADnVcyw1V0s U9oqxVW8MrZZeVZK
A2ojdK92PIdnBBHHGCtSii4K232OGh2f7z8vNIx8TmSSPeXOc54w9w1Zxkkn HAEqqr7NcILRX4b3
xq57f3ugjpmCINjAdpc7W7ecneQf5LTolwfELSyCNjuLWNB+8BfaIgCIiALw rv3dVfwJPlK914V3
7uqv4EnylWg8SIe4y/0W+Y0H4ib5lr1kPot8xoPxE3zLXres8xH6v3Ig8KCI i5ixQ7b+aFd/T+dq
n2Hzet34WP5QoG2/mhXf0/nap9h83rd+Fj+ULtfkl/J+yMF8d+n5Pi9yPgpm 1GkuhiOqQNBJ/ILN
1G0dvqqaaBz52CaNzC5kT8tyMZG7jvW2TA9EfkvnqjsqRUTcWNu/0a/R3QT4 oIdFI/Mtlu9GytBJ
SwTzzuldqe8wvAOOG7G44/2U2+bQ0dXZaiFjJ3y6P2LWQv1a85bjd0r9AwPR H5JgdA/JTF2XIjnq
ojiicV096+XohjxKHRSViNbZaie2Us1XGY6h8LXSsPM7G9SURem9rMCFcrpH bBTh1PU1MlTIYooq
Zgc5xDS48SN2GldiutG98MM0raSqmHk0lQ9rJuOB5GTxxzKDtLaJbsyg5Okp axtLUmWSnqpCxjwY
3N4gHeC4HhzKHUbO1dXS3MmCjppqump4YGMeXCHky7OHaQcYIxgKQX1RX0VJ LHDU1lPBJL/hslla
1z9+NwJ3712SvooWyPlrKeNsP+IXStAZv079+7eCN/PuVFfqCur9oZ2UtFDJ FU2p1O6eZxaIS6R2
9vknLgDnGR96+YNmZ6KjYYY6WapiuUlYWvJa2oaQ5rQ92DggOzwO8fzQF+6v omup2urKdpqv8AGV
uZv/AG7/ACuI4dK4240D4ppW11M6OnOJniZpER6HHPk/zVDb9n6+3zyP5Oln FYwtlLnkGky+R37P
yTqxyuP8v1B07odFsfV0kMLgyIzUnI6BJVySipDDk5yMRg8cAOx0psBd0e01 sq2zyOqIYIYZXxie
Sdgjk0uLQQ7PPg/qp/fCldIxkUzJi6Uwkxva7Q8NLiHb9xwOHFZej2Trxeor hVR0TGd1Gd8DHl4a
NUh0jLRn645hzrxk2Ir5qalpzUwRBlEyCV7CSdYjnaXDcM/4rd/HcU2A1RvF qFMKk3SiEBdoEpqG
aC7jjOcZ9i5HebfLXz0IqoxPBG2Vwc8DUxzdQc3fvAHE8AqS2bLy090pK2en hY2KUulidUvqSRyT
mghzwBxdwwMdJ5vCm2Tr4KCrpC6mcatjMy6jmMseXNaN29rhgE5GOgpsBqYa 2kqIo5YKqCWOV2mN
8cgc17ugEHedx3exQ7hemW6upqR1BXTvqjpidBE1zS7BJGS4bwGkqNR2urZV vrJqaiY6esZO6Fri
9tO1sRZmN2B5ROOYbnFTq2ikqblaqlhaGUdQ+WQE7yDG5m7+bgoBBO1VKKSe tNvuPckGsGo5Buhx
a7QQ3ysnLhgbl9T7U0FLT8rVRVUD21DKeSGSIcpG54JaXAEgNwCc53BVx2Mg 8HqqnZTUrLnUGTNU
3IJDpS763H6px96kSbMyd0siD21VIa1tTI+qe58z26HsMbic6gA4YyeGR7VO wEw7TW0VtbRtdLJN
R6AQxmoTOfnDYznyjkEHowc8CvQ3tjYWOfb69s8jiI6QxN5Z4HFwbqxpGeJI VW3ZWSir4aqhkY40
cUZhEp3zSgy6y8gbtQlO8c+/B4Ga6nuz6mG69y0jK2KN9OabulxjfE4tdnXo yHAtH+UjH35AHrDt
Hbp7lS29j5BPVMc5upmAwtOCx+fquzuxzrxi2ppaiejigoLhIK5hfDI2Fugt BAcSdW7GRnd+ahHZ
WpfWVFbJPGJ54nShzCRyVTygc3Tu+qA0DPHeelSbRZKyiZY+6HQl9BSzxTiM nBfIWkacjhuPFNgJ
Fv2lobgxsnJ1FJG+A1Eb6pgY2SIYy8HJ3DLc5xxC4/aaihp5Z6mCrpmMZyjO Wh0mdmcZYM7+IODg
4PBVdDsa+ntcdFNUvlE1AaOpL5XP5DI3uh1cASAC3cNwO7G/2vVlu9+onMqh RwzU7Hin5ORxbM9w
wXOyPIGM7hqOTx3b2wFpdL3T2iqjgqYal3KRSyiSKMOY1sY1Oyc9H+684tpb ZJT0tQZXxx1UL5ma
24LQwtBa4cQ7LwNPHKg3i3Xu8vge+looCKeqikAqnOwZWaWkeQM4xv4KNPsj VS3SKRlRFHSRwCQD
eSyq1ROJDeGgmIE78kuKbAWsu0TYIWSz2i6RB88cDQ+BuXOecN/zcM4H8wuQ 7UUMsb5nw1cEDeUD
JpogGTFhOoMIJyfJOAcZwvKviv1wp4GvoKCKSGtgnwKxzg5rHaj/APT3HcB/ P2KG3Z66VFoFpqRS
xQwSyzRSxyl7pXlzywEFo0ga9/HhuTYCa/aukhpIaupoLjSwTyRxxPmgaA7W CQdzjuABJJ4Betdt
LS0L5W9yVtTyM7Kd7qeIOAe8NLBvcOOtoB+9VlDs3O2joaKa1W2kgp545JxD MZBUARvY7ILBx1D/
AFX1R7N3KGhq6eoqIpXPuVPPDIXkudDEYwNZx9ctj5t2U2At4b0yorBTQ0Fd IWuayaRsTdEDyAdL
zq3EAjOAeK+6q701OIxE2WtllyWQ0gEj3Abi7iBgHdknjuUOrtdTVX+GsZR0 lMIZmO7uZKTO+Nu8
sLdIGHbx9bh+S+Y7ZXUT4K6kpqLupsL6eSma8xwlhkLwWuwSDk78g5yeCA9R tLS91up5aOuh5N0b
JpZIgGQvkALGuIcTk6mjcDvK9aO9x11U+KGgrhEyWSJ1U+Joh1MJDvK1Zxlp HBVr9nayor6q6TPa
yokmhmZSCoc6neWMALXjAB8oZDsZBDTzYXhT2G6UbLmKWgtsNVWGoLbgJyZP 2jnOaHNLMbsgceZN
gLSPaWjnttVXwQVczKR5bJGyIcoWgZ1gEjLCN4dz43L4ZtRDMYWw2q6SyTQC obGyBuoRk4Dj5e7P
MotFsxVW01kMNxfU01TbRSAVDWBzXsBbH9Vo8kNc7POvip2fqxXW6qFuoLga S3xU2Kid0fJyMOdT
cMOf9E2As6e/w1M8rW0VayCGSSOSrkja2FhZkOy7VnAIIzhecm09FBTTVFRB WQRxxGVnKw6TUMHE
xjO/mODg4PDjiLFsfQTUtw7tpoBV10tQ41MYy9rJS7GCecB2F53myXa/299P WdyQvgje2B0UjiJX
uaWanZHkDSTuGTkjfu3tgJs+1NBS0z5qqCrgfHNHDJA+IcowvzpJAJGkgE5z zFS6W80dZdqq2wOc
+akY173gfs3B3DS7n9vQquXZmQVAjZIKmldWRVMklXI58xa0FpjJOdTcHdnh khSbTYG2i5Okgfqp
+42w5cfLc/lHOLjgY4OG/wBibALftPQ1lLFU1EkNBHNGxzO6KljS5zmhxaBn mBbv9vDptDVUwrBR
mohFS5uoQcoOUI6dPHCyth2Qq7bUtkqzSytbSviwPK8oxwtB3jpid+YXxbtj q2kngdJKx72GKXuj
umQiJ7I2twItwdvbnUTz7wmwGqjuFFNHJJFW08jInaJHMlaQx3DBOdx9hXzX 3AUAYO5aqqkfnEdN
HqdgcSckADeOfnWdotnLnBVVU80NJKZaeOItnqXzMle2UPc8tLRo3ZIaM4OF e3qnqaulMENJSVsM
mRLBVPLA7nB1AHgRwxv6RjeAp73QVdbBSU8rpH1FL3XG4MOkxZAzk8/lDcpF d+7qr+BJ8pVXSWu5
Ut2tkj3xVEFJb3Uss7pCJHvJadQbjGPIHPz+zfaV37uqv4EnylTD4kQ9x//T 0n0W+Y0H4ib5lr1k
Pot8xoPxE3zLXq1Z5iP1fuIPCgiIuYsUO2/mhXf0/nap9h83rd+Fj+UKBtv5 oV39P52qfYfN63fh
Y/lC7X5JfyfsjBfHfp+SeiIuI3CIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiJkd IQBE3dITd0hCQibu
kJkdI/NAETI6R+aZHSPzQBEyOkfmmR0hCAiIgCIiAIiIAiIgCIiAIiIAiIgC IiAIiIAvCu/d1V/A
k+Ur3XhXfu6q/gSfKVaDxIh7jL/Rb5jQfiJvmWvWQ+i3zGg/ETfMtet6zzEf q/ciDwoIiLmLFDtv
5oV39P52qfYfN63fhY/lCgbb+aFd/T+dqn2Hzet34WP5Qu1+SX8n7IwXx36f knoiLiNwiIgCIiAI
iIAiIgCIiAIiIAiIgCIiA6BkgLKWCzUe0FNLVV2HzavKcWNcSTnnOT0YG4bl q2/WH3qg2Fd/dM28
7pMcfaVvKbUMTX0/JnGk4kmf/9TfnYmznOI2j+jHu4+z2j8vvXj4K7OurXUI kh7qEfKmAMj1hhJA
djGcZIGfZ960Qdv4rEuotpe/DrzHRU7HSV0jAA93LthLeSaDluNAIEuM43q2 JHxKaEPAu/Aiz5/w
h8Fn6Lg2Is43mIED/wBFns9nsP5qgqaS4yWujZDHdoHB395l0c0rpJNHFjQ8 Et1Z+oQOG7C86MXF
10qIM3Sa6wPpAyZznCKNulhkDwHcmCW6txB4jnTEj4jQh4Ggg2OsVRDHNAI5 ontDmvZFGQ8bt4IH
A4P5/cvvwIs4AzEPgx+z2ew/ms73vrqTZaitsFHcYDBkVEjGTTP5ZrQAGND2 5jOT5QOkFo3b1ebJ
U9zEVTW3h9X3XK5gDJ3Ya0clGXFreAy/Vn2g4xvyxI+JOhDwPXwJs2P8NvwY /wBFW3a0UdhqqGWh
AZJJMwZDGtOOUY0jdjIw8jGDzcOfX6lmtr3ftbYM8alm7P8A6satBHFFFZsr FDCldIvjxK4uniVx
chsEREAREQBERAEREAREQBERAEREAREQBeFd+7qr+BJ8pXuvCu/d1V/Ak+Uq 0HiRD3GX+i3zGg/E
TfMtesh9FvmNB+Im+Za9b1nmI/V+5EHhQREXMWKHbfzQrv6fztU+w+b1u/Cx /KFA2480K7+n87VO
sLmjZ+3Ze0f2aPnHohdz8kv5P2Rh/vfp+SwRc1s9NvvBNbPTb7wXDZm51FzW z02+8E1s9NvvBLMH
UXNbPTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHU XNbPTb7wTWz02+8E
swdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Es wfQODlZdmzV4oXyM
td6jp6d7shj43aufjg45/wDZabWz02+8E1s9NvvBaQRxQbisUKZnTZ9qj/xH B8N/t9vt/wBAhtG1
R/4ig+G/2+32/wCy0Wtnpt94JrZ6bfeC0x4+C6L9EaC4/czvejar/mKD4b/1 XG2XadrnOG0FOHOI
LiIn5djHHp4LR62em33gmtnpt94Jjx8F0X6I0Fx+5nRZ9qh/xHB8N/s9vs/1 Kd59qv8AmOD4b/1W
i1s9NvvBNbPTb7wTHj4Lov0NBcfuZ3vPtV/zHD8N/wCqR7O3WorIJbteI6mG CQSBjI3A5Dg4AZOB
vA/JaLWz02+8E1s9NvvBRjx8F0Q0Ed50XNbPTb7wTWz02+8FhZmh1FzWz02+ 8E1s9NvvBLMHUXNb
PTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbP Tb7wTWz02+8EswdR
c1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Eswf/V /U14V37uqv4Enyle
2tnpt94Lwrns73VXlt/wJP8AMPRKzgX+SJe4zH0W+Y0H4ib5lr1kPot8xoPx E3zLXras8xH6v3Ig
8KCIi5ixCvFqp73ap7bVukbDOAHGN2l24g7j94WZ8VdhP/m7p1kdlbNFvLqZ 0paMETSKxQQxb0Yv
xV2D1u59ZHZTxVWD1q59ZHZW0Raa9U8x9SuFL4GL8VVg9aufWR2U8VVg9auf WR2VtETXqnmPqMKX
wMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTxVWD1q 59ZHZW0RNeqeY+ow
pfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdlPFVYP Wrn1kdlbRE16p5j6
jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR2U8VV g9aufWR2VtETXqnm
PqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTx VWD1q59ZHZW0RNeq
eY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdl PFVYPWrn1kdlbRE1
6p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR 2U8VVg9aufWR2VtE
TXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59 ZHZTxVWD1q59ZHZW
0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWr n1kdlPFVYPWrn1kd
lbRE16p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9 aufWR2U8VVg9aufW
R2VtETXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVW D1q59ZHZTxVWD1q5
9ZHZW0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/F VYPWrn1kdlPFVs+f
/NXPrI7K2iJr1TzH1GFL4FfYrJSbPWtltonSuhY9zwZXBzsuOTvwFYIi5Yon E3E97NFsCIigBERA
EREAREQBERAEREAREQBERAEREAREQBERAf/W/U0RFgWCIiAIiIAiIgCIiAIi IAiIgCIiAIiIAiIg
CIiAIiIAiIgCIiAIiIAiIgCIiA//2Q==
------=_NextPart_000_000E_01C5B301.126D0140--

Attached files

Interceptar Error en DataSet

Publicado: Mar Sep 06, 2005 5:11 pm
por Xevi
This is a multi-part message in MIME format.
------=_NextPart_000_0010_01C5B306.0EE8F150
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0011_01C5B306.0EE8F150"
------=_NextPart_001_0011_01C5B306.0EE8F150
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Ignacio,
Mira, tengo esto...
METHOD NtxDataSource1Create( oSender ) CLASS TFrmControlIncidents
::oNtxDataSource1:cConnect :=3D oXevi:cRuta + oXevi:cCodiEmpresa
RETURN Nil
//---------------------------------------------------------- -------------=
-------
METHOD DbfDataSet1Create( oSender ) CLASS TFrmControlIncidents
::cIndexTemp :=3D xFileTemp( ".Ntx" )
TRY
WITH OBJECT ::oDbfDataSet1
:lOpen :=3D .T.
:AddTag( ::cIndexTemp, "Field->NUMERO + Field->INCIDENT", =
"Field->A =3D 'G'", ::cIndexTemp )
:aIdxFiles :=3D { "Incid01", "Incid02", "Incid03", "Incid04", =
"Incid05", ::cIndexTemp }
END
CATCH
Alert( "Error" )
::oDbfDataSet1:DelErrors()
::End()
END
RETURN Nil
Pero no hay forma de que pase por CATCH y me muestre el Alert... !!!
Me lanza este error...
***************************** Registro de errores =
*****************************
Fecha: 06/09/2005
Hora: 17:11:00
Memoria libre: 564136
Area actual: 1
------------------------- Informaci=F3n del compilador =
--------------------------
Versi=F3n Xailer: Xailer 0.99.4 Pre-release 4
Compilador: xHarbour build 0.99.50 Intl. (SimpLex) PCode Version: =
7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Home Edition 5.01.2600 Service Pack 2
----------------------- Informaci=F3n detallada del error =
-----------------------
Subsistema: XAILER
C=F3digo de error: 0
Estado: .F.
Descripci=F3n: C:TallerGestio01INCID.Dbf en uso por otro =
usuario
Operaci=F3n: INCID.Dbf
Argumentos:=20
Fichero:=20
C=F3digo error SO: 0
Pila de llamadas:
TNTXDATASOURCE:NEWERROR (323)
TDBFDATASET:NEWERROR (425)
TDBFDATASET:OPEN (208)
TDBFDATASET:CREATE (161)
TFRMCONTROLINCIDENTS:CREATEFORM (36)
TFRMCONTROLINCIDENTS:NEW (177)
XFRMCONTROLINCIDENTS (19)
(b)TFRMMENU:FORMCREATE (113)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (172)
TMENU:DOACTION (177)
TFRMMENU:WMCOMMAND (223)
RUNFORM (0)
TAPPLICATION:RUN (189)
MAIN (13)
Un Saludo,
Xevi.
"Ignacio Ortiz de Z=FA=F1iga" <InvalidAccount@ozs.com> escribi=F3 en =
el mensaje news:431da953$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,=20
TRY
oDataSet:lOpen :=3D .t.
CATCH
oDataSet:DelErrors()
oForm:End()
return nil
END
Saludos
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431da05f@ozsrvnegro.ozlan.local...]431da05f@ozsrvnegro.ozlan.local...[/email]
Ignacio,
Me estoy peleando, pero no consigo que "cierre" el Form...
Tengo el=20
oDataSource:lAbortOnErrors a .T.
Pero donde pongo el TRY...CATCH...END para que cuando se produzca un =
error "cierre" el Form...
Lo he probado en FormInitialize, pero en CATCH le mando ::Close()... =
y si bien me vuelve al Form Padre, pero no me cierra el Form Hijo.
Un Saludo,
Xevi.
"Ignacio Ortiz de Z=FA=F1iga" <InvalidAccount@ozs.com> escribi=F3 =
en el mensaje news:431d8305$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,=20
Propiedad oDataSet:lDisplayErrors, que se inicializa al valor que =
tenga oDataSource:lDisplayErrors.
Si quieres puedes utilizar oDataSource:lAbortOnErrors a .T. y =
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido errores con los m=E9todos del DataSource:
IsError(), LastError(), DelErrors(), GetErrors(), ShowErrorList()
Saludos,
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431d70f1@ozsrvnegro.ozlan.local...]431d70f1@ozsrvnegro.ozlan.local...[/email]
=BFComo puedo anticiparme a este error??
Si el DataSet que intento acceder NO es accesible por alguna =
circunstancia...
Me salta este error y el programa sigue... cuando lo que =
deber=EDa es no continuar y retornar a un Form anterior..
Vaya... que necesito como el
If DbUseArea()
Return
Else
...
...
EndIf
Un Saludo,
Xevi.
------=_NextPart_001_0011_01C5B306.0EE8F150
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.2900.2722" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#e6feff>
<DIV><FONT face=3DArial size=3D2>Ignacio,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Mira, tengo esto...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>METHOD NtxDataSource1Create( oSender ) =
CLASS=20
TFrmControlIncidents<BR>ÂÂ ::oNtxDataSource1:cConnect :=3D =
oXevi:cRuta +=20
oXevi:cCodiEmpresa<BR>RETURN Nil</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial=20
size=3D1> //---------------------------------------------------------- ----=
----------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>METHOD DbfDataSet1Create( oSender ) =
CLASS=20
TFrmControlIncidents<BR>ÂÂ ::cIndexTemp :=3D xFileTemp( ".Ntx" =
)</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>ÂÂ =
TRY<BR>ÂÂÂÂÂ=20
WITH OBJECT =
::oDbfDataSet1<BR> ÂÂÂÂÂÂ ÂÂ=20
:lOpen :=3D .T.<BR> ÂÂÂÂÂÂ ÂÂ =
:AddTag(=20
::cIndexTemp, "Field->NUMERO + Field->INCIDENT", "Field->A =3D =
'G'",=20
::cIndexTemp )<BR> ÂÂÂÂÂÂ ÂÂ =
:aIdxFiles :=3D=20
{ "Incid01", "Incid02", "Incid03", "Incid04", "Incid05", ::cIndexTemp=20
}<BR>ÂÂÂÂÂ END<BR>ÂÂ CATCH<BR>Alert( =
"Error"=20
)<BR>ÂÂÂÂÂ=20
::oDbfDataSet1:DelErrors()<BR>ÂÂÂÂÂ=20
::End()<BR>ÂÂ END<BR>RETURN Nil<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Pero no hay forma de que pase por CATCH =
y me=20
muestre el Alert... !!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Me lanza este error...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>***************************** Registro =
de errores=20
*****************************</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial=20
size=3D1> ÂÂÂÂÂÂ ÂÂÂÂ =
Fecha:=20
06/09/2005<BR> ÂÂÂÂÂÂ ÂÂÂ&nbsp=
;Â=20
Hora: 17:11:00<BR>ÂÂ Memoria libre: =
564136<BR>ÂÂÂÂ=20
Area actual: 1</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>------------------------- Informaci=F3n =
del=20
compilador --------------------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>Â Versi=F3n Xailer: Xailer 0.99.4 =
Pre-release=20
4<BR>ÂÂÂÂÂ Compilador: xHarbour build 0.99.50 =
Intl.=20
(SimpLex) PCode Version: 7<BR>Compilador C/C++: Borland C++=20
5.5.1<BR>ÂÂÂÂÂ Plataforma: Windows XP Home =
Edition=20
5.01.2600 Service Pack 2</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>----------------------- Informaci=F3n =
detallada del=20
error -----------------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>ÂÂÂÂÂ =
Subsistema:=20
XAILER<BR>ÂC=F3digo de error:=20
0<BR> ÂÂÂÂÂÂ ÂÂÂ Estado:=20
..F.<BR>ÂÂÂÂ Descripci=F3n: =
C:TallerGestio01INCID.Dbf en=20
uso por otro usuario<BR> ÂÂÂÂÂÂ =
Operaci=F3n:=20
INCID.Dbf<BR>ÂÂÂÂÂ Argumentos:=20
<BR> ÂÂÂÂÂÂ ÂÂ Fichero: =
<BR>ÂC=F3digo=20
error SO: 0</FONT></DIV>
<DIV><FONT size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>Pila de llamadas:<BR>Â =
TNTXDATASOURCE:NEWERROR=20
(323)<BR>Â TDBFDATASET:NEWERROR (425)<BR>Â TDBFDATASET:OPEN=20
(208)<BR>Â TDBFDATASET:CREATE (161)<BR>Â=20
TFRMCONTROLINCIDENTS:CREATEFORM (36)<BR>Â TFRMCONTROLINCIDENTS:NEW=20
(177)<BR>Â XFRMCONTROLINCIDENTS (19)<BR>Â =
(b)TFRMMENU:FORMCREATE=20
(113)<BR>Â TMENUITEM:ONCLICK (0)<BR>Â TMENU:DOACTION =
(172)<BR>Â=20
TMENU:DOACTION (177)<BR>Â TFRMMENU:WMCOMMAND (223)<BR>Â =
RUNFORM=20
(0)<BR>Â TAPPLICATION:RUN (189)<BR>Â MAIN (13)</FONT></DIV>
<DIV>Â</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>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></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>"Ignacio Ortiz de Z=FA=F1iga" <<A=20
href=3D"mailto:InvalidAccount@ozs.com">InvalidAccount@ozs.com</A>> =
escribi=F3=20
en el mensaje <A=20
=
href=3D"news:431da953$1@ozsrvnegro.ozlan.local">news:431da953$[email=1@ozsrvnegr]1@ozsrvnegr[/email]=
o.ozlan.local</A>...</DIV>
<DIV>Xevi, </DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV>TRY</DIV>
<DIV>ÂÂÂ oDataSet:lOpen :=3D .t.</DIV>
<DIV>CATCH</DIV>
<DIV>ÂÂÂ oDataSet:DelErrors()</DIV>
<DIV>ÂÂÂ oForm:End()</DIV>
<DIV>ÂÂÂ return nil</DIV>
<DIV>END</DIV>
<DIV>Â</DIV>
<DIV>Saludos</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>"Xevi" <<A=20
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:431da05f@ozsrvnegro.ozlan.local">news:431da05f@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Ignacio,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Me estoy peleando, pero no consigo =
que "cierre"=20
el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Tengo el </FONT></DIV>
<DIV>oDataSource:lAbortOnErrors a .T.</DIV>
<DIV>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Pero donde pongo el =
TRY...CATCH...END para que=20
cuando se produzca un error "cierre" el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Lo he probado en FormInitialize, =
pero en CATCH=20
le mando ::Close()... y si bien me vuelve al Form Padre, pero no me =
cierra=20
el Form Hijo.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</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>"Ignacio Ortiz de Z=FA=F1iga" <<A=20
=
href=3D"mailto:InvalidAccount@ozs.com">InvalidAccount@ozs.com</A>>=20
escribi=F3 en el mensaje <A=20
=
href=3D"news:431d8305$1@ozsrvnegro.ozlan.local">news:431d8305$[email=1@ozsrvnegr]1@ozsrvnegr[/email]=
o.ozlan.local</A>...</DIV>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>Propiedad oDataSet:lDisplayErrors, que se inicializa al valor =
que=20
tenga oDataSource:lDisplayErrors.</DIV>
<DIV>Â</DIV>
<DIV>Si quieres puedes =
utilizarÂoDataSource:lAbortOnErrors a=20
.T. y simplemente haz un TRY..CATCH o por el contrario controlar =
si se han=20
producido errores con los m=E9todos del DataSource:</DIV>
<DIV>Â</DIV>
<DIV>IsError(), LastError(), DelErrors(), GetErrors(),=20
ShowErrorList()</DIV>
<DIV>Â</DIV>
<DIV>Saludos,</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>"Xevi" <<A=20
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>> =
escribi=F3 en=20
el mensaje <A=20
=
href=3D"news:431d70f1@ozsrvnegro.ozlan.local">news:431d70f1@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2><IMG height=3D166=20
src=3D"cid:000b01c5b2f5$4b5b3f50$[email=0ac8a8c0@Xevi]0ac8a8c0@Xevi[/email]" width=3D421=20
v:shapes=3D"_x0000_i1025"></FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>=BFComo puedo anticiparme a este=20
error??</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Si el DataSet que intento acceder NO es =
accesible por=20
alguna circunstancia...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Me salta este error y el programa sigue... =
cuando lo=20
que deber=EDa es no continuar y retornar a un Form=20
anterior..</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Vaya... que necesito como =
el</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>If DbUseArea()</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>ÂÂ Return</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Else</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>EndIf</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Un Saludo,</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial=20
=
size=3D2>Xevi.</FONT></SPAN></DIV></BLOCKQUOTE></BLOCKQUOTE ></BLOCKQUOTE>=
</BLOCKQUOTE></BODY></HTML>
------=_NextPart_001_0011_01C5B306.0EE8F150--
------=_NextPart_000_0010_01C5B306.0EE8F150
Content-Type: image/jpeg;
name="clip_image002.jpg"
Content-Transfer-Encoding: base64
Content-ID: <000b01c5b2f5$4b5b3f50$[email=0ac8a8c0@Xevi]0ac8a8c0@Xevi[/email]>
/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBP ZmZpY2X/2wBDAAoH
BwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEEx NDk7Pj4+JS5ESUM8
SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7 Ozs7Ozs7Ozs7Ozs7
Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCACmAaUDASIAAhEBAxEB/8QAGwABAAMB AQEBAAAAAAAAAAAA
AAQFBgEDAgf/xABPEAABAwMBAwUMBwUGBAUFAAABAAIDBAUREgYhMRNBUZTS FBUWFyI2UlRhkpOy
BzJVcXSR0SM1c4GDJCUzQqGxRlZiZCZEY3KzQ0WEwtP/xAAaAQEAAwEBAQAA AAAAAAAAAAAAAQID
BAUG/8QANREAAgAEAgcGBgIDAQEAAAAAAAECAwQRE1ISFCExUVORBRUyNHGx M0FhocHRcvAiQ+Ej
gf/dAAQAKP/aAAwDAQACEQMRAD8A/U0RFgWCIiAIiIAiIgCIiAIiIAiIgCIi AIiIAiIgCIiAIiIA
iIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIDzqJ4q WmlqJ3aIomF73dAA
yVgqj6SKmWoPcVNTxQf5eXDnOd7dxGPuV99IBI2HuOOOI/8A5Gr8wstrqrtK 6Ckax8rIzJpc8NJA
44zxPsX0HZVJImS4ps5Xs7bdx5tdOmwNQy3vNm3b64Eb+4v5RP7S+jt7XdNF 8J/aWRqbdVUdDTVk
7WMjqsmIFw1EDidPEBeFNTS1r5GxOjHJxuldreGjS3jjPE+xeyqCia0tFWPL 1mqvbSZtPD6u6aL4
T+0nh9XdNF8J/aWKraGpt7aZ1SGtFVA2eLDgcsOcH2cFF1e1Wh7Oo4ldQol1 NSnZxG/8Pq7povhP
7SeH1d00Xwn9pYHJ6VZU1kqKqilrI6uhEMDWvmL6lrTEHHA1DmydyrHQUUCv FCkWhn1UbtDE2azw
+rumi+E/tJ4fV3TRfCf2lmZtl7pDAZW9zzYgFTohmD3mI8HgDeW+1U2r/qSC hopivBCmIp9VBsii
aN/4fV3TRfCf2k8Pq7povhP7Sw1TT1FHII6mN0Ty0PDXbjpO8H+amW2xV91g dPTiJsTXiPlJpWxt
c8jOkE8TjmSKgooYdJwqxCn1TdlE7mt8Pq7povhP7SeH1d00Xwn9pYKRr4pX Rv3PaS0jPAhektNU
QRQzSxOZHO0uicRueAcEj+at3dSZERrNTmNz4fV3TRfCf2k8Pq7povhP7SwG rfjKavap7spMhGtV
GY3/AIfV3TRfCf2k8Pq7povhP7SwGr/qTV7U7spMg1qozG/8Pq7povhP7SeH 1d00Xwn9pYHJ6Uye
lO7aTINaqMxvvD6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb7w+rumi +E/tJ4fV3TRfCf2l
gcnpTJ6U7tpMg1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6UyelO7aTINaqMx/ /9C18Pq7povhP7Se
H1d00Xwn9pYHJ6Uyelfa920mQ+b1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6U yelO7aTINaqMxvvD
6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb3w/rumi+E/tJ4f13TRfCf 2lgcnpKZPSU7spMg
1qozm+8P67povhP7SeH9d00Xwn9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0n h/XdNF8J/aWByekp
k9JTuykyDWqjOb7w/rumi+E/tJ4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P6 7povhP7SeH9d00Xw
n9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0nh/XdNF8J/aWByekpk9JTuykyD WqjOb7w/rumi+E/t
J4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P67povhP7S54f3A72tpD90Dz/8A ssCXEL9KsuG2630c
E3cvK08Ti4PLAXObkk44kled2jLpKKWo8K93bgehQQVFXG4cS1lfcQjt/cxw jperydpcb9JFXBM0
1VNTyxc7WNdG77wSSFYthvMtzfQctUxPj3yPfO4MY30ic8FldoJpKuy3Luid 1T3MYnRPc4u0kv0k
gnmIXlU1bST50Ml09tJ2vf8A4j1p3Zk+TKimqfe221j9Uoa2nuVDDW0r9cE7 A9jsY3L3WQ+i0k7D
w59Zm+Za9edPlqXNigXybIhd4UwiIsiTO7fjOxNx+6P/AORq/Ptk4Gm7wVL6 yOjipf20kr3huGjm
GeJPDC/QtvgTsVcABk4j3D+I1fmUFqu8kTHstFZJG4AtcIHEEcxG5fV9juHU 404rXb9keRXp4sLS
vY2FYbdetpaG9OrxHBVQkRwue1kkTmg4YQc6QTzr0raik5QyyvtrBJZJuWay VkgEw+rv5zv485WU
Fqu/E2Wuz09zu/RcNouuMd5K3qzv0XU6aU7JTVZK3y/f9sc6nzE23L3muopq J1LSytlpXVjbLTRw
ukkjBaWvcZG+XkA4I4j7lWVFzgpKPaGppIqCnmlq6dkEbXMmGDufoON/Endw VGbRdzxstdv/AO3d
+id6Lvu/uWt3cP7O7d/ophpZKbeKtv7T4/T3DnzWl/5/21jzro6juS3tllp3 MbAeSbFjW1ur/Pjf
n71Ltz4odk9oY5JWMfKynbG1zgC88rnAHOvDvTeM57zV3V3fohtF3PGy1xx/ 27v0XbG5MUvQ01vv
8uNznhxYY9LRf9VjUsqqShudvvU1ZDyNFY44jGyVrnySkOGjQDnPlArzhio4 Nj56aKopJXd7RJHL
POwPE+clrWYyMdJ47lmu8921au8lbnp7mdn/AGQ2e7k5NlrT/wDju/RcTppX NX24t8fqdCnzF/r/
ALs/RqaqaKr2kmrX1sUj4rZCaSLuiONsjseWHO/y4PT/ACUyWWmde6ymkbZ6 ix1MkTpY+6GNMTuT
GZG/zH3/AJrFd57vv/uSt38f7O7f/oud57t9iVvVnfoo1WT8pq3W/u0nWJnz lv8Av/w1dFLZoLA1
tBFRz0wdUtnjnmjidINR5M5cNX1cEaVQ3+plrLFs611Qx4jpXtkY1zciTVuy Bv4fyUM2i7njZa0/
fTu/RO9F3znvLXZ6e53fotZcmTBHpuYntv8AL6/X6lI5s2KHRUu2yxpWzUMW yETIYaKZhoXtmjkm
jjcJ87nbxrJG7AG5R5K2B132XoA+k7ljgpZanS1m6TUQ7Wfu5iqI2i7k5Nlr SR/27v0TvRd9/wDc
tdv4/wBnd+ihSJKibxFtbe/ivUOdNcKWh8jSW+4Ctq7xPFNbWVbatsdO+Zsb Y+5myu1ac+SfJxv4
lRa25UVLbL3JajSNE9zbHT5Y1xdEW4cWA78ZzvCpe893xp7yVuOjud36J3ou +7+5a7dw/s7t3+ih
U8lO+IrbOHyt9fp92S5823w+P3uV3IkDGCnJHoVj3pvH2NXdXd+id6bx9jV3 V3fovSx5OZdUcWHN
ysruSPQnJHoVj3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY9 6bx9jV3V3fonem8f
Y1d1d36Jjycy6oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuq GHNysruSPQnJHoVj
3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY96bx9jV3V3fone m8fY1d1d36Jjycy6
oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuqGHNysreTKcmVZ d6bz9i1/V3Lnem8/
Ytf1dyY8nMuqGHNysruTKcmVY96bz9i1/V3J3pvP2LX9XcmPJzLqhhzcrK7k ynJlWPem8/Ytf1dy
d6bz9i1/V3Jjycy6oYc3Kyu5MpyZVj3pvP2LX9Xcnem8/Ytf1dyY8nMuqGHN ysruTKcmVY96bz9i
1/V3J3pvP2LX9XcmPJzLqhhzcrK7kynJlWPem8/Ytf1dyd6bz9i1/V3Jjycy 6oYc3Kyu5MpyZVj3
pvP2LX9Xcnem8/Ytf1dyY8nMuqGHNysrXRexbejYKmS30ZljiD6OAF8hw1vk BZl1ovJ/+zV3V3fo
rNkdwkiiFXs7d3SxRiMPgGgOaNwyCw7wF4Xbsp1ciGGS02nfelssz3OxJ6pZ 0UU5NJq26+26NjU3
O33OnfYhWSxR6AyOskdulcM7n/8AT0LC17cWe8Q5a4sbCMtOQcScylGnmIwd nL/j/wB4/wD5qJW0
1xFBPBSbPXOFk2DNJUNLzpbvAGGgAZ3r5+h7Oqoa2XNmaKULzLd1Peqe0KTV JkqU23F9Hv4mz+i8
Y2JiH/czfMtasl9GBzsVER6zN8y1qpWeZmer9zz5fgR//9H9TREWBYodt/NC u/p/O1T7Cf8Aw9bv
wsfyhQNt/NCu/p/O1T7D5vW78LH8oXa/JL+T9kYL479PyWGUyuL5keI2Fx/k vPjjhlwuOLcjoW0+
8plV9Zc+4KqkZMz9hUv5LlQf8N5+rn2Hh9+FPWVNUQVMpTZe5ktNOzO5TK4i 6Cp3KZUS4V4oY4w2
IzVE7+TghB0mR+CcZO4AAEk8wB4ryFwqG07W1VIymrphIKamE3Kcq5rNWNQA CAsMplUE20VU2htd
VS2xtYLgWRZbUiMMlIOW7wdwLXDPsUi7bQU9tpawAg1tPTOmbDI1wa8hurSH 4wfuBzx6EsC3ymVS
UO01HNAw1srIJnzSxhjQ5waGyOYC44w3Oni4gcehffhDSzVtHHRyRz08s7qe eYZ/ZyYOhv3lwI9i
WBcZTKq6a7zVjxUU9E02vys10lQ1nkjOXBhGdORxJHSujaK0up31Aq/IY4NI MTw8k8MMxqI3HeAR
uPQUsCzymVSQ7U0M1RPA3LHQ1McGZQ5jXB4aQ7JbjPl/VO/dvwuz7S0fJRy0 krJY21EbKlz2uZyc
TiRygyBqGrSMjI3pYF1lMqhqdqoqN80tRRyNoYppYO6GvBc6WNrnOGjjjyHY OeYdKT7TPo6Cvnq7
XKyehhZO6CKVsmqN5Ia7VgAfVdkcwHOlgX2Uyqqru8tJV3GB1M15paQVUDQ/ SZ2jPKb94GDgfzUC
HbGN5qWz0D4XwUArGt5UO5T9nyhYDjiGkb/algaTKZVTT3epr5Wm327l6UOD JJ31Aj0u/wAwDcEu
08ObeD96hUu09dWyQwwWIumkE7iw1jRhsUgjJB07yXE4Hs9qWBo8plVdVfII dnn3mnjdURBoLY86
C4l4ZpOeBDjg/cVDrNqDbpqeC4Uncs7qhjJow4zaYnNeQ9hYPK8pmMY3b/vS wNBlMqki2iiq7/Bb
qR8boX04mc8seXPzrAAwMMILDkPwd+BvCmTXq2wVbqWWqayVoy7LXaRuzgux pBx/lzn2JYE/KZUK
23i33cE0NRyuAHYLHMJB4EBwBI9o3L5N7tjaeGoNZHyU8TpYnYPlsaQCRu37 3AY4nIwgJ+Uyqw7Q
2kcjqq9PLjLdUT24GcZdkeQM87sDcvSvvVutlRHT1lQY5ZGF7WiN7vJBwXHS DgZ5zhAT8plV0t/t
UM0kUlawOiYXvdhxYABqPlAaScb8A59i9RdaF1uNxbUtNIOEoBw7fjdzuyeG M55soCZlMqm8KbYa
+npmyPcyohfIJRG/ySxwBa5uMtPlZycbvvC9fCWzchFO2va6KX6j2Mc4Eelu G5u/6x3e3clgWmUy
vF1VA2oipzK3lZ2OfG0b9bW41EfdqH5qAdpbMGCTu5pjMPLa2xvLQzGclwGB u34O/hu3oC1ymVDq
brRUjp2zTHVT6OVayNz3N1507mgnfg/kos20lrYHNhq4ZpWhjiwOIw15ABJw cfW/PdxSwLbKZUOk
u1vrqqSmpqkSSR8RpcA4ZwS0kYcPa3I4dKrqe/yRWetu905CKkhmljiELXud hkjmeVx3ktHAYGUs
C9ymVS2baelvFoqbm2CeCKlDi9r2HJDW6iRkDO/UPvaVFqto68W2rmhoYIKm mo+7msnkMjJIMOxv
bjS4lvDfhLA0mUyviN/KRMfjGpodj7wvpAdymVxEB3Kj137uqv4Enyle68K7 93VX8CT5SrQeJEPc
Zf6LfMaD8RN8y16yH0W+Y0H4ib5lr1vWeYj9X7kQeFBERcxYodt/NCu/p/O1 T7D5vW78LH8oUDbf
zQrv6fztU+w+b1u/Cx/KF2vyS/k/ZGC+O/T8k9V10qJmU1U+maHy08L3saeD nhpIH5qbPMIIXSHm
4e0qBGSwAO3ucdT18f27V4ctSYd72v0/6ehIl6W0xewtzu+2ez10hvkmsawI ZQwMLTjO7HQcELbW
G4PuNrY6fAqoXGGob0SN3H89xHsKpNk6AWe2SwNfG/8AtUjgY3Bw05w3h/04 UoP707SMmziluYET
zzNlH1HfzGW/klBWytemyZatBE/8bbrpflfewmS2oFEaJERfRnMQ7jQGtbDJ FKIamlk5WnkLdTWu
wWnU3nBBIP37iClNDcw+mkq6yme6J7jIIactEjS3DQNTiWkHfkHfwUxEBRUN lnbRUtJKeSjttydN
AThxliGotzjgTrP5cFBuuxT7nWyzGsgaHuleJXwF041xuZp16saG6twxwAGV q0U3BlPAaHunlnSU
s5kJ5Uz0utzW8q+QcnvwD5ZB1BwOBuU2eyz0mz0FPSYqKqjqxVxDAaJH8qXY O/hh55+ZXyJcGYrd
imVUsEDamJlDT62x4hPdDY3teCwSasacvJ3tJ3DK+WbGmKkcyLvZFOXM0SR0 bm8npDgHNIfqEnlH
ytWBzDeVqUS7BnpNlpHwPpDcXSU0lRFUyOlZqmdI1rWuJdnG8NHNxJPsXnPs zUuttQ2WpZUTxULa
WkbFHyYLY3B7A7JOSXNaCRgYzuC0qJdgzkuy8twgdT1lW1lLNJLVOijj/asm lY5rxrJILRrdgYzw
3nn+6rZ2urLfco5rhTirr6eOm5RlO4RsjYTjydWS7ynb844bloEUXBS3W211 VWQyQPi5Sehmo6mU
tyyMOGoODc53uGMZ4KDPsbJUWiqpX3BjaqaOFsdQ2E4iLIuSJ06t+Wk7s8/s WoRTcFTS2uutsjY7
fV07aNz+Ukimgc92o736XBwwCd+8HBPRuUGi2du9BNDPBdaPloxUNLnUjiC2 WUSbhr3EOB45GMbl
pEUXB//S3FXs9JJZ3WqkreRpjCGtEkes8ryokMhORx3jAwN6+Kqw3Cqqobk+ 4U3fOGZj2ydzu5EM
aHgMDNWeMhOS7/RXyLC5YqLNYnWmrqap1Tyz6pg5QBmka+UkkcRv4ZkOBzY4 lQ6rZCGoulVWB1KO
6nmVz302uZrywN8l2cBu4HhnjvWjRLgrqG0miraep5cP5C3R0WnTjOl2dX8+ hVB2SqTHBTPqqGop
KOnfBTQ1FI52Q5zHZkw8aiNAxjG/etQiXBmzspUmmlp3XV0ra2BsFa+drpJH NDnOGhxduxrcPK1b
gPbn3u9suVdfOUpZIYaaW3SU08ksZeTqeDhoDhg4ycnIV6iXBmZ9j3S0UltZ XNbQ63zRgxZlbK6M
syXZwW+UTjAPtVxX2zuy1R0bJBE6ExPifpy0PjcHNyOjLRkDG7nU5EuCgZs5 Usqp67u6I1dY2VlU
eRPJlrwwHQNWWkcm3iTz/wAuzbNy9zQRUtXFGRbhbpy+EuD4sby0AjS7jxyP Yr5EuCrrLTO51DNb
6mOGeihdAwzxmRjmODQcgFpz5A356dyqYdiS2mFJJXNjgNIKeU0sbo31BEYY HS5cWuxxG7I3b+nV
IlwZufZmvrKmerrK6jmmmMeYTSu7ncGNcBrZry4+VkbxghfNv2O7hs9RQd2M cZzTnW2HAbyTg7AG
eBx07lpkU3BT2qxS2+qpXy1bJYKCF8FIxsZa4McWk6zkhx8lvADnVcyw1V0s U9oqxVW8MrZZeVZK
A2ojdK92PIdnBBHHGCtSii4K232OGh2f7z8vNIx8TmSSPeXOc54w9w1Zxkkn HAEqqr7NcILRX4b3
xq57f3ugjpmCINjAdpc7W7ecneQf5LTolwfELSyCNjuLWNB+8BfaIgCIiALw rv3dVfwJPlK914V3
7uqv4EnylWg8SIe4y/0W+Y0H4ib5lr1kPot8xoPxE3zLXres8xH6v3Ig8KCI i5ixQ7b+aFd/T+dq
n2Hzet34WP5QoG2/mhXf0/nap9h83rd+Fj+ULtfkl/J+yMF8d+n5Pi9yPgpm 1GkuhiOqQNBJ/ILN
1G0dvqqaaBz52CaNzC5kT8tyMZG7jvW2TA9EfkvnqjsqRUTcWNu/0a/R3QT4 oIdFI/Mtlu9GytBJ
SwTzzuldqe8wvAOOG7G44/2U2+bQ0dXZaiFjJ3y6P2LWQv1a85bjd0r9AwPR H5JgdA/JTF2XIjnq
ojiicV096+XohjxKHRSViNbZaie2Us1XGY6h8LXSsPM7G9SURem9rMCFcrpH bBTh1PU1MlTIYooq
Zgc5xDS48SN2GldiutG98MM0raSqmHk0lQ9rJuOB5GTxxzKDtLaJbsyg5Okp axtLUmWSnqpCxjwY
3N4gHeC4HhzKHUbO1dXS3MmCjppqump4YGMeXCHky7OHaQcYIxgKQX1RX0VJ LHDU1lPBJL/hslla
1z9+NwJ3712SvooWyPlrKeNsP+IXStAZv079+7eCN/PuVFfqCur9oZ2UtFDJ FU2p1O6eZxaIS6R2
9vknLgDnGR96+YNmZ6KjYYY6WapiuUlYWvJa2oaQ5rQ92DggOzwO8fzQF+6v omup2urKdpqv8AGV
uZv/AG7/ACuI4dK4240D4ppW11M6OnOJniZpER6HHPk/zVDb9n6+3zyP5Oln FYwtlLnkGky+R37P
yTqxyuP8v1B07odFsfV0kMLgyIzUnI6BJVySipDDk5yMRg8cAOx0psBd0e01 sq2zyOqIYIYZXxie
Sdgjk0uLQQ7PPg/qp/fCldIxkUzJi6Uwkxva7Q8NLiHb9xwOHFZej2Trxeor hVR0TGd1Gd8DHl4a
NUh0jLRn645hzrxk2Ir5qalpzUwRBlEyCV7CSdYjnaXDcM/4rd/HcU2A1RvF qFMKk3SiEBdoEpqG
aC7jjOcZ9i5HebfLXz0IqoxPBG2Vwc8DUxzdQc3fvAHE8AqS2bLy090pK2en hY2KUulidUvqSRyT
mghzwBxdwwMdJ5vCm2Tr4KCrpC6mcatjMy6jmMseXNaN29rhgE5GOgpsBqYa 2kqIo5YKqCWOV2mN
8cgc17ugEHedx3exQ7hemW6upqR1BXTvqjpidBE1zS7BJGS4bwGkqNR2urZV vrJqaiY6esZO6Fri
9tO1sRZmN2B5ROOYbnFTq2ikqblaqlhaGUdQ+WQE7yDG5m7+bgoBBO1VKKSe tNvuPckGsGo5Buhx
a7QQ3ysnLhgbl9T7U0FLT8rVRVUD21DKeSGSIcpG54JaXAEgNwCc53BVx2Mg 8HqqnZTUrLnUGTNU
3IJDpS763H6px96kSbMyd0siD21VIa1tTI+qe58z26HsMbic6gA4YyeGR7VO wEw7TW0VtbRtdLJN
R6AQxmoTOfnDYznyjkEHowc8CvQ3tjYWOfb69s8jiI6QxN5Z4HFwbqxpGeJI VW3ZWSir4aqhkY40
cUZhEp3zSgy6y8gbtQlO8c+/B4Ga6nuz6mG69y0jK2KN9OabulxjfE4tdnXo yHAtH+UjH35AHrDt
Hbp7lS29j5BPVMc5upmAwtOCx+fquzuxzrxi2ppaiejigoLhIK5hfDI2Fugt BAcSdW7GRnd+ahHZ
WpfWVFbJPGJ54nShzCRyVTygc3Tu+qA0DPHeelSbRZKyiZY+6HQl9BSzxTiM nBfIWkacjhuPFNgJ
Fv2lobgxsnJ1FJG+A1Eb6pgY2SIYy8HJ3DLc5xxC4/aaihp5Z6mCrpmMZyjO Wh0mdmcZYM7+IODg
4PBVdDsa+ntcdFNUvlE1AaOpL5XP5DI3uh1cASAC3cNwO7G/2vVlu9+onMqh RwzU7Hin5ORxbM9w
wXOyPIGM7hqOTx3b2wFpdL3T2iqjgqYal3KRSyiSKMOY1sY1Oyc9H+684tpb ZJT0tQZXxx1UL5ma
24LQwtBa4cQ7LwNPHKg3i3Xu8vge+looCKeqikAqnOwZWaWkeQM4xv4KNPsj VS3SKRlRFHSRwCQD
eSyq1ROJDeGgmIE78kuKbAWsu0TYIWSz2i6RB88cDQ+BuXOecN/zcM4H8wuQ 7UUMsb5nw1cEDeUD
JpogGTFhOoMIJyfJOAcZwvKviv1wp4GvoKCKSGtgnwKxzg5rHaj/APT3HcB/ P2KG3Z66VFoFpqRS
xQwSyzRSxyl7pXlzywEFo0ga9/HhuTYCa/aukhpIaupoLjSwTyRxxPmgaA7W CQdzjuABJJ4Betdt
LS0L5W9yVtTyM7Kd7qeIOAe8NLBvcOOtoB+9VlDs3O2joaKa1W2kgp545JxD MZBUARvY7ILBx1D/
AFX1R7N3KGhq6eoqIpXPuVPPDIXkudDEYwNZx9ctj5t2U2At4b0yorBTQ0Fd IWuayaRsTdEDyAdL
zq3EAjOAeK+6q701OIxE2WtllyWQ0gEj3Abi7iBgHdknjuUOrtdTVX+GsZR0 lMIZmO7uZKTO+Nu8
sLdIGHbx9bh+S+Y7ZXUT4K6kpqLupsL6eSma8xwlhkLwWuwSDk78g5yeCA9R tLS91up5aOuh5N0b
JpZIgGQvkALGuIcTk6mjcDvK9aO9x11U+KGgrhEyWSJ1U+Joh1MJDvK1Zxlp HBVr9nayor6q6TPa
yokmhmZSCoc6neWMALXjAB8oZDsZBDTzYXhT2G6UbLmKWgtsNVWGoLbgJyZP 2jnOaHNLMbsgceZN
gLSPaWjnttVXwQVczKR5bJGyIcoWgZ1gEjLCN4dz43L4ZtRDMYWw2q6SyTQC obGyBuoRk4Dj5e7P
MotFsxVW01kMNxfU01TbRSAVDWBzXsBbH9Vo8kNc7POvip2fqxXW6qFuoLga S3xU2Kid0fJyMOdT
cMOf9E2As6e/w1M8rW0VayCGSSOSrkja2FhZkOy7VnAIIzhecm09FBTTVFRB WQRxxGVnKw6TUMHE
xjO/mODg4PDjiLFsfQTUtw7tpoBV10tQ41MYy9rJS7GCecB2F53myXa/299P WdyQvgje2B0UjiJX
uaWanZHkDSTuGTkjfu3tgJs+1NBS0z5qqCrgfHNHDJA+IcowvzpJAJGkgE5z zFS6W80dZdqq2wOc
+akY173gfs3B3DS7n9vQquXZmQVAjZIKmldWRVMklXI58xa0FpjJOdTcHdnh khSbTYG2i5Okgfqp
+42w5cfLc/lHOLjgY4OG/wBibALftPQ1lLFU1EkNBHNGxzO6KljS5zmhxaBn mBbv9vDptDVUwrBR
mohFS5uoQcoOUI6dPHCyth2Qq7bUtkqzSytbSviwPK8oxwtB3jpid+YXxbtj q2kngdJKx72GKXuj
umQiJ7I2twItwdvbnUTz7wmwGqjuFFNHJJFW08jInaJHMlaQx3DBOdx9hXzX 3AUAYO5aqqkfnEdN
HqdgcSckADeOfnWdotnLnBVVU80NJKZaeOItnqXzMle2UPc8tLRo3ZIaM4OF e3qnqaulMENJSVsM
mRLBVPLA7nB1AHgRwxv6RjeAp73QVdbBSU8rpH1FL3XG4MOkxZAzk8/lDcpF d+7qr+BJ8pVXSWu5
Ut2tkj3xVEFJb3Uss7pCJHvJadQbjGPIHPz+zfaV37uqv4EnylTD4kQ9x//T 0n0W+Y0H4ib5lr1k
Pot8xoPxE3zLXq1Z5iP1fuIPCgiIuYsUO2/mhXf0/nap9h83rd+Fj+UKBtv5 oV39P52qfYfN63fh
Y/lC7X5JfyfsjBfHfp+SeiIuI3CIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiJkd IQBE3dITd0hCQibu
kJkdI/NAETI6R+aZHSPzQBEyOkfmmR0hCAiIgCIiAIiIAiIgCIiAIiIAiIgC IiAIiIAvCu/d1V/A
k+Ur3XhXfu6q/gSfKVaDxIh7jL/Rb5jQfiJvmWvWQ+i3zGg/ETfMtet6zzEf q/ciDwoIiLmLFDtv
5oV39P52qfYfN63fhY/lCgbb+aFd/T+dqn2Hzet34WP5Qu1+SX8n7IwXx36f knoiLiNwiIgCIiAI
iIAiIgCIiAIiIAiIgCIiA6BkgLKWCzUe0FNLVV2HzavKcWNcSTnnOT0YG4bl q2/WH3qg2Fd/dM28
7pMcfaVvKbUMTX0/JnGk4kmf/9TfnYmznOI2j+jHu4+z2j8vvXj4K7OurXUI kh7qEfKmAMj1hhJA
djGcZIGfZ960Qdv4rEuotpe/DrzHRU7HSV0jAA93LthLeSaDluNAIEuM43q2 JHxKaEPAu/Aiz5/w
h8Fn6Lg2Is43mIED/wBFns9nsP5qgqaS4yWujZDHdoHB395l0c0rpJNHFjQ8 Et1Z+oQOG7C86MXF
10qIM3Sa6wPpAyZznCKNulhkDwHcmCW6txB4jnTEj4jQh4Ggg2OsVRDHNAI5 ontDmvZFGQ8bt4IH
A4P5/cvvwIs4AzEPgx+z2ew/ms73vrqTZaitsFHcYDBkVEjGTTP5ZrQAGND2 5jOT5QOkFo3b1ebJ
U9zEVTW3h9X3XK5gDJ3Ya0clGXFreAy/Vn2g4xvyxI+JOhDwPXwJs2P8NvwY /wBFW3a0UdhqqGWh
AZJJMwZDGtOOUY0jdjIw8jGDzcOfX6lmtr3ftbYM8alm7P8A6satBHFFFZsr FDCldIvjxK4uniVx
chsEREAREQBERAEREAREQBERAEREAREQBeFd+7qr+BJ8pXuvCu/d1V/Ak+Uq 0HiRD3GX+i3zGg/E
TfMtesh9FvmNB+Im+Za9b1nmI/V+5EHhQREXMWKHbfzQrv6fztU+w+b1u/Cx /KFA2480K7+n87VO
sLmjZ+3Ze0f2aPnHohdz8kv5P2Rh/vfp+SwRc1s9NvvBNbPTb7wXDZm51FzW z02+8E1s9NvvBLMH
UXNbPTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHU XNbPTb7wTWz02+8E
swdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Es wfQODlZdmzV4oXyM
td6jp6d7shj43aufjg45/wDZabWz02+8E1s9NvvBaQRxQbisUKZnTZ9qj/xH B8N/t9vt/wBAhtG1
R/4ig+G/2+32/wCy0Wtnpt94JrZ6bfeC0x4+C6L9EaC4/czvejar/mKD4b/1 XG2XadrnOG0FOHOI
LiIn5djHHp4LR62em33gmtnpt94Jjx8F0X6I0Fx+5nRZ9qh/xHB8N/s9vs/1 Kd59qv8AmOD4b/1W
i1s9NvvBNbPTb7wTHj4Lov0NBcfuZ3vPtV/zHD8N/wCqR7O3WorIJbteI6mG CQSBjI3A5Dg4AZOB
vA/JaLWz02+8E1s9NvvBRjx8F0Q0Ed50XNbPTb7wTWz02+8FhZmh1FzWz02+ 8E1s9NvvBLMHUXNb
PTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbP Tb7wTWz02+8EswdR
c1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Eswf/V /U14V37uqv4Enyle
2tnpt94Lwrns73VXlt/wJP8AMPRKzgX+SJe4zH0W+Y0H4ib5lr1kPot8xoPx E3zLXras8xH6v3Ig
8KCIi5ixCvFqp73ap7bVukbDOAHGN2l24g7j94WZ8VdhP/m7p1kdlbNFvLqZ 0paMETSKxQQxb0Yv
xV2D1u59ZHZTxVWD1q59ZHZW0Raa9U8x9SuFL4GL8VVg9aufWR2U8VVg9auf WR2VtETXqnmPqMKX
wMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTxVWD1q 59ZHZW0RNeqeY+ow
pfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdlPFVYP Wrn1kdlbRE16p5j6
jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR2U8VV g9aufWR2VtETXqnm
PqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTx VWD1q59ZHZW0RNeq
eY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdl PFVYPWrn1kdlbRE1
6p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR 2U8VVg9aufWR2VtE
TXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59 ZHZTxVWD1q59ZHZW
0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWr n1kdlPFVYPWrn1kd
lbRE16p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9 aufWR2U8VVg9aufW
R2VtETXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVW D1q59ZHZTxVWD1q5
9ZHZW0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/F VYPWrn1kdlPFVs+f
/NXPrI7K2iJr1TzH1GFL4FfYrJSbPWtltonSuhY9zwZXBzsuOTvwFYIi5Yon E3E97NFsCIigBERA
EREAREQBERAEREAREQBERAEREAREQBERAf/W/U0RFgWCIiAIiIAiIgCIiAIi IAiIgCIiAIiIAiIg
CIiAIiIAiIgCIiAIiIAiIgCIiA//2Q==
------=_NextPart_000_0010_01C5B306.0EE8F150--

Attached files

Interceptar Error en DataSet

Publicado: Mar Sep 06, 2005 7:36 pm
por ignacio
This is a multi-part message in MIME format.
------=_NextPart_000_0020_01C5B31A.44783F60
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_0021_01C5B31A.44783F60"
------=_NextPart_001_0021_01C5B31A.44783F60
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Xevi,=20
No entiendo nada :-o
Prueba esto:
TRY
MSGINFO( "Esto deber=EDa provocar un RTE" + 2 )
CATCH
MSGINFO( "ERROR" )
END
Tienes que ver un mensaje de Error y no un error de ejecuci=F3n.
Un saludo,=20
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431db1ab@ozsrvnegro.ozlan.local...]431db1ab@ozsrvnegro.ozlan.local...[/email]
Ignacio,
Mira, tengo esto...
METHOD NtxDataSource1Create( oSender ) CLASS TFrmControlIncidents
::oNtxDataSource1:cConnect :=3D oXevi:cRuta + oXevi:cCodiEmpresa
RETURN Nil
=
//---------------------------------------------------------- -------------=
-------
METHOD DbfDataSet1Create( oSender ) CLASS TFrmControlIncidents
::cIndexTemp :=3D xFileTemp( ".Ntx" )
TRY
WITH OBJECT ::oDbfDataSet1
:lOpen :=3D .T.
:AddTag( ::cIndexTemp, "Field->NUMERO + Field->INCIDENT", =
"Field->A =3D 'G'", ::cIndexTemp )
:aIdxFiles :=3D { "Incid01", "Incid02", "Incid03", "Incid04", =
"Incid05", ::cIndexTemp }
END
CATCH
Alert( "Error" )
::oDbfDataSet1:DelErrors()
::End()
END
RETURN Nil
Pero no hay forma de que pase por CATCH y me muestre el Alert... !!!
Me lanza este error...
***************************** Registro de errores =
*****************************
Fecha: 06/09/2005
Hora: 17:11:00
Memoria libre: 564136
Area actual: 1
------------------------- Informaci=F3n del compilador =
--------------------------
Versi=F3n Xailer: Xailer 0.99.4 Pre-release 4
Compilador: xHarbour build 0.99.50 Intl. (SimpLex) PCode =
Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Home Edition 5.01.2600 Service Pack 2
----------------------- Informaci=F3n detallada del error =
-----------------------
Subsistema: XAILER
C=F3digo de error: 0
Estado: .F.
Descripci=F3n: C:TallerGestio01INCID.Dbf en uso por otro =
usuario
Operaci=F3n: INCID.Dbf
Argumentos:=20
Fichero:=20
C=F3digo error SO: 0
Pila de llamadas:
TNTXDATASOURCE:NEWERROR (323)
TDBFDATASET:NEWERROR (425)
TDBFDATASET:OPEN (208)
TDBFDATASET:CREATE (161)
TFRMCONTROLINCIDENTS:CREATEFORM (36)
TFRMCONTROLINCIDENTS:NEW (177)
XFRMCONTROLINCIDENTS (19)
(b)TFRMMENU:FORMCREATE (113)
TMENUITEM:ONCLICK (0)
TMENU:DOACTION (172)
TMENU:DOACTION (177)
TFRMMENU:WMCOMMAND (223)
RUNFORM (0)
TAPPLICATION:RUN (189)
MAIN (13)
Un Saludo,
Xevi.
"Ignacio Ortiz de Z=FA=F1iga" <InvalidAccount@ozs.com> escribi=F3 en =
el mensaje news:431da953$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,=20
TRY
oDataSet:lOpen :=3D .t.
CATCH
oDataSet:DelErrors()
oForm:End()
return nil
END
Saludos
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431da05f@ozsrvnegro.ozlan.local...]431da05f@ozsrvnegro.ozlan.local...[/email]
Ignacio,
Me estoy peleando, pero no consigo que "cierre" el Form...
Tengo el=20
oDataSource:lAbortOnErrors a .T.
Pero donde pongo el TRY...CATCH...END para que cuando se produzca =
un error "cierre" el Form...
Lo he probado en FormInitialize, pero en CATCH le mando =
::Close()... y si bien me vuelve al Form Padre, pero no me cierra el =
Form Hijo.
Un Saludo,
Xevi.
"Ignacio Ortiz de Z=FA=F1iga" <InvalidAccount@ozs.com> =
escribi=F3 en el mensaje news:431d8305$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,=20
Propiedad oDataSet:lDisplayErrors, que se inicializa al valor =
que tenga oDataSource:lDisplayErrors.
Si quieres puedes utilizar oDataSource:lAbortOnErrors a .T. y =
simplemente haz un TRY..CATCH o por el contrario controlar si se han =
producido errores con los m=E9todos del DataSource:
IsError(), LastError(), DelErrors(), GetErrors(), =
ShowErrorList()
Saludos,
"Xevi" <xevicomas@terra.es> escribi=F3 en el mensaje =
news:[email=431d70f1@ozsrvnegro.ozlan.local...]431d70f1@ozsrvnegro.ozlan.local...[/email]
=BFComo puedo anticiparme a este error??
Si el DataSet que intento acceder NO es accesible por alguna =
circunstancia...
Me salta este error y el programa sigue... cuando lo que =
deber=EDa es no continuar y retornar a un Form anterior..
Vaya... que necesito como el
If DbUseArea()
Return
Else
...
...
EndIf
Un Saludo,
Xevi.
------=_NextPart_001_0021_01C5B31A.44783F60
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.2900.2722" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#e6feff>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>No entiendo nada :-o</DIV>
<DIV>Â</DIV>
<DIV>Prueba esto:</DIV>
<DIV>Â</DIV>
<DIV>ÂÂ TRY<BR>ÂÂÂÂÂ MSGINFO( "Esto =
deber=EDa=20
provocar un RTE" + 2 )<BR>ÂÂ =
CATCH<BR>ÂÂÂÂÂ=20
MSGINFO( "ERROR" )<BR>ÂÂ END<BR></DIV>
<DIV>Tienes que ver un mensaje de Error y no un error de =
ejecuci=F3n.</DIV>
<DIV>Â</DIV>
<DIV>Un saludo, </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>"Xevi" <<A =
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>>=20
escribi=F3 en el mensaje <A=20
=
href=3D"news:431db1ab@ozsrvnegro.ozlan.local">news:431db1ab@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Ignacio,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Mira, tengo esto...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>METHOD NtxDataSource1Create( oSender =
) CLASS=20
TFrmControlIncidents<BR>ÂÂ ::oNtxDataSource1:cConnect :=3D =
oXevi:cRuta=20
+ oXevi:cCodiEmpresa<BR>RETURN Nil</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial=20
=
size=3D1> //---------------------------------------------------------- ----=
----------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>METHOD DbfDataSet1Create( oSender ) =
CLASS=20
TFrmControlIncidents<BR>ÂÂ ::cIndexTemp :=3D xFileTemp( =
".Ntx"=20
)</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>ÂÂ=20
TRY<BR>ÂÂÂÂÂ WITH OBJECT=20
::oDbfDataSet1<BR> ÂÂÂÂÂÂ ÂÂ =
:lOpen :=3D=20
.T.<BR> ÂÂÂÂÂÂ ÂÂ :AddTag( =
::cIndexTemp,=20
"Field->NUMERO + Field->INCIDENT", "Field->A =3D 'G'", =
::cIndexTemp=20
)<BR> ÂÂÂÂÂÂ ÂÂ :aIdxFiles :=3D =
{=20
"Incid01", "Incid02", "Incid03", "Incid04", "Incid05", ::cIndexTemp=20
}<BR>ÂÂÂÂÂ END<BR>ÂÂ =
CATCH<BR>Alert(=20
"Error" )<BR>ÂÂÂÂÂ=20
::oDbfDataSet1:DelErrors()<BR>ÂÂÂÂÂ=20
::End()<BR>ÂÂ END<BR>RETURN Nil<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Pero no hay forma de que pase por =
CATCH y me=20
muestre el Alert... !!!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Me lanza este error...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>***************************** =
Registro de errores=20
*****************************</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial=20
size=3D1> ÂÂÂÂÂÂ ÂÂÂÂ =
Fecha:=20
=
06/09/2005<BR> ÂÂÂÂÂÂ ÂÂÂ&nbsp=
;Â=20
Hora: 17:11:00<BR>ÂÂ Memoria libre:=20
564136<BR>ÂÂÂÂ Area actual: 1</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>------------------------- =
Informaci=F3n del=20
compilador --------------------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>Â Versi=F3n Xailer: Xailer =
0.99.4 Pre-release=20
4<BR>ÂÂÂÂÂ Compilador: xHarbour build 0.99.50 =
Intl.=20
(SimpLex) PCode Version: 7<BR>Compilador C/C++: Borland C++=20
5.5.1<BR>ÂÂÂÂÂ Plataforma: Windows XP Home =
Edition=20
5.01.2600 Service Pack 2</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>----------------------- Informaci=F3n =
detallada del=20
error -----------------------</FONT></DIV>
<DIV><FONT face=3DArial size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>ÂÂÂÂÂ =
Subsistema:=20
XAILER<BR>ÂC=F3digo de error:=20
0<BR> ÂÂÂÂÂÂ ÂÂÂ Estado:=20
.F.<BR>ÂÂÂÂ Descripci=F3n: =
C:TallerGestio01INCID.Dbf en=20
uso por otro usuario<BR> ÂÂÂÂÂÂ =
Operaci=F3n:=20
INCID.Dbf<BR>ÂÂÂÂÂ Argumentos:=20
<BR> ÂÂÂÂÂÂ ÂÂ Fichero: =
<BR>ÂC=F3digo=20
error SO: 0</FONT></DIV>
<DIV><FONT size=3D1></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D1>Pila de llamadas:<BR>Â=20
TNTXDATASOURCE:NEWERROR (323)<BR>Â TDBFDATASET:NEWERROR =
(425)<BR>Â=20
TDBFDATASET:OPEN (208)<BR>Â TDBFDATASET:CREATE (161)<BR>Â=20
TFRMCONTROLINCIDENTS:CREATEFORM (36)<BR>Â =
TFRMCONTROLINCIDENTS:NEW=20
(177)<BR>Â XFRMCONTROLINCIDENTS (19)<BR>Â =
(b)TFRMMENU:FORMCREATE=20
(113)<BR>Â TMENUITEM:ONCLICK (0)<BR>Â TMENU:DOACTION =
(172)<BR>Â=20
TMENU:DOACTION (177)<BR>Â TFRMMENU:WMCOMMAND (223)<BR>Â =
RUNFORM=20
(0)<BR>Â TAPPLICATION:RUN (189)<BR>Â MAIN (13)</FONT></DIV>
<DIV>Â</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>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></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>"Ignacio Ortiz de Z=FA=F1iga" <<A=20
=
href=3D"mailto:InvalidAccount@ozs.com">InvalidAccount@ozs.com</A>> =
escribi=F3=20
en el mensaje <A=20
=
href=3D"news:431da953$1@ozsrvnegro.ozlan.local">news:431da953$[email=1@ozsrvnegr]1@ozsrvnegr[/email]=
o.ozlan.local</A>...</DIV>
<DIV>Xevi, </DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV>TRY</DIV>
<DIV>ÂÂÂ oDataSet:lOpen :=3D .t.</DIV>
<DIV>CATCH</DIV>
<DIV>ÂÂÂ oDataSet:DelErrors()</DIV>
<DIV>ÂÂÂ oForm:End()</DIV>
<DIV>ÂÂÂ return nil</DIV>
<DIV>END</DIV>
<DIV>Â</DIV>
<DIV>Saludos</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>"Xevi" <<A=20
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>> =
escribi=F3 en el=20
mensaje <A=20
=
href=3D"news:431da05f@ozsrvnegro.ozlan.local">news:431da05f@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><FONT face=3DArial size=3D2>Ignacio,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Me estoy peleando, pero no =
consigo que=20
"cierre" el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Tengo el </FONT></DIV>
<DIV>oDataSource:lAbortOnErrors a .T.</DIV>
<DIV>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Pero donde pongo el =
TRY...CATCH...END para=20
que cuando se produzca un error "cierre" el Form...</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Lo he probado en FormInitialize, =
pero en=20
CATCH le mando ::Close()... y si bien me vuelve al Form Padre, =
pero no me=20
cierra el Form Hijo.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</DIV>
<DIV><FONT face=3DArial size=3D2>Un Saludo,</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>Xevi.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT>Â</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>"Ignacio Ortiz de Z=FA=F1iga" <<A=20
=
href=3D"mailto:InvalidAccount@ozs.com">InvalidAccount@ozs.com</A>>=20
escribi=F3 en el mensaje <A=20
=
href=3D"news:431d8305$1@ozsrvnegro.ozlan.local">news:431d8305$[email=1@ozsrvnegr]1@ozsrvnegr[/email]=
o.ozlan.local</A>...</DIV>
<DIV>Xevi, </DIV>
<DIV>Â</DIV>
<DIV>Propiedad oDataSet:lDisplayErrors, que se inicializa al =
valor que=20
tenga oDataSource:lDisplayErrors.</DIV>
<DIV>Â</DIV>
<DIV>Si quieres puedes =
utilizarÂoDataSource:lAbortOnErrors a=20
.T. y simplemente haz un TRY..CATCH o por el contrario controlar =
si se=20
han producido errores con los m=E9todos del DataSource:</DIV>
<DIV>Â</DIV>
<DIV>IsError(), LastError(), DelErrors(), GetErrors(),=20
ShowErrorList()</DIV>
<DIV>Â</DIV>
<DIV>Saludos,</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>"Xevi" <<A=20
href=3D"mailto:xevicomas@terra.es">xevicomas@terra.es</A>> =
escribi=F3=20
en el mensaje <A=20
=
href=3D"news:431d70f1@ozsrvnegro.ozlan.local">news:431d70f1@ozsrvnegro.oz=
lan.local</A>...</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2><IMG height=3D166=20
src=3D"cid:001b01c5b309$80ecfe60$0e00000a@ozlan.local" =
width=3D421=20
v:shapes=3D"_x0000_i1025"></FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>=BFComo puedo anticiparme a este=20
error??</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Si el DataSet que intento acceder NO es =
accesible=20
por alguna circunstancia...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Me salta este error y el programa =
sigue... cuando lo=20
que deber=EDa es no continuar y retornar a un Form=20
anterior..</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Vaya... que necesito como =
el</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>If DbUseArea()</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>ÂÂ Return</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Else</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>...</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>EndIf</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2></FONT></SPAN>Â</DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial size=3D2>Un Saludo,</FONT></SPAN></DIV>
<DIV><SPAN=20
style=3D"FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; =
mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: ES; =
mso-fareast-language: ES; mso-bidi-language: AR-SA"><FONT=20
face=3DArial=20
=
size=3D2>Xevi.</FONT></SPAN></DIV></BLOCKQUOTE></BLOCKQUOTE ></BLOCKQUOTE>=
</BLOCKQUOTE></BLOCKQUOTE></BODY></HTML>
------=_NextPart_001_0021_01C5B31A.44783F60--
------=_NextPart_000_0020_01C5B31A.44783F60
Content-Type: image/jpeg;
name="clip_image002.jpg"
Content-Transfer-Encoding: base64
Content-ID: <001b01c5b309$80ecfe60$0e00000a@ozlan.local>
/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBP ZmZpY2X/2wBDAAoH
BwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEEx NDk7Pj4+JS5ESUM8
SDc9Pjv/2wBDAQoLCw4NDhwQEBw7KCIoOzs7Ozs7Ozs7Ozs7Ozs7Ozs7Ozs7 Ozs7Ozs7Ozs7Ozs7
Ozs7Ozs7Ozs7Ozs7Ozs7Ozv/wAARCACmAaUDASIAAhEBAxEB/8QAGwABAAMB AQEBAAAAAAAAAAAA
AAQFBgEDAgf/xABPEAABAwMBAwUMBwUGBAUFAAABAAIDBAUREgYhMRNBUZTS FBUWFyI2UlRhkpOy
BzJVcXSR0SM1c4GDJCUzQqGxRlZiZCZEY3KzQ0WEwtP/xAAaAQEAAwEBAQAA AAAAAAAAAAAAAQID
BAUG/8QANREAAgAEAgcGBgIDAQEAAAAAAAECAwQRE1ISFCExUVORBRUyNHGx M0FhocHRcvAiQ+Ej
gf/dAAQAKP/aAAwDAQACEQMRAD8A/U0RFgWCIiAIiIAiIgCIiAIiIAiIgCIi AIiIAiIgCIiAIiIA
iIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiIgCIiAIiIDzqJ4q WmlqJ3aIomF73dAA
yVgqj6SKmWoPcVNTxQf5eXDnOd7dxGPuV99IBI2HuOOOI/8A5Gr8wstrqrtK 6Ckax8rIzJpc8NJA
44zxPsX0HZVJImS4ps5Xs7bdx5tdOmwNQy3vNm3b64Eb+4v5RP7S+jt7XdNF 8J/aWRqbdVUdDTVk
7WMjqsmIFw1EDidPEBeFNTS1r5GxOjHJxuldreGjS3jjPE+xeyqCia0tFWPL 1mqvbSZtPD6u6aL4
T+0nh9XdNF8J/aWKraGpt7aZ1SGtFVA2eLDgcsOcH2cFF1e1Wh7Oo4ldQol1 NSnZxG/8Pq7povhP
7SeH1d00Xwn9pYHJ6VZU1kqKqilrI6uhEMDWvmL6lrTEHHA1DmydyrHQUUCv FCkWhn1UbtDE2azw
+rumi+E/tJ4fV3TRfCf2lmZtl7pDAZW9zzYgFTohmD3mI8HgDeW+1U2r/qSC hopivBCmIp9VBsii
aN/4fV3TRfCf2k8Pq7povhP7Sw1TT1FHII6mN0Ty0PDXbjpO8H+amW2xV91g dPTiJsTXiPlJpWxt
c8jOkE8TjmSKgooYdJwqxCn1TdlE7mt8Pq7povhP7SeH1d00Xwn9pYKRr4pX Rv3PaS0jPAhektNU
QRQzSxOZHO0uicRueAcEj+at3dSZERrNTmNz4fV3TRfCf2k8Pq7povhP7SwG rfjKavap7spMhGtV
GY3/AIfV3TRfCf2k8Pq7povhP7SwGr/qTV7U7spMg1qozG/8Pq7povhP7SeH 1d00Xwn9pYHJ6Uye
lO7aTINaqMxvvD6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb7w+rumi +E/tJ4fV3TRfCf2l
gcnpTJ6U7tpMg1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6UyelO7aTINaqMx/ /9C18Pq7povhP7Se
H1d00Xwn9pYHJ6Uyelfa920mQ+b1qozG+8Pq7povhP7SeH1d00Xwn9pYHJ6U yelO7aTINaqMxvvD
6u6aL4T+0nh9XdNF8J/aWByelMnpTu2kyDWqjMb3w/rumi+E/tJ4f13TRfCf 2lgcnpKZPSU7spMg
1qozm+8P67povhP7SeH9d00Xwn9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0n h/XdNF8J/aWByekp
k9JTuykyDWqjOb7w/rumi+E/tJ4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P6 7povhP7SeH9d00Xw
n9pYHJ6SmT0lO7KTINaqM5vvD+u6aL4T+0nh/XdNF8J/aWByekpk9JTuykyD WqjOb7w/rumi+E/t
J4f13TRfCf2lgcnpKZPSU7spMg1qozm+8P67povhP7S54f3A72tpD90Dz/8A ssCXEL9KsuG2630c
E3cvK08Ti4PLAXObkk44kled2jLpKKWo8K93bgehQQVFXG4cS1lfcQjt/cxw jperydpcb9JFXBM0
1VNTyxc7WNdG77wSSFYthvMtzfQctUxPj3yPfO4MY30ic8FldoJpKuy3Luid 1T3MYnRPc4u0kv0k
gnmIXlU1bST50Ml09tJ2vf8A4j1p3Zk+TKimqfe221j9Uoa2nuVDDW0r9cE7 A9jsY3L3WQ+i0k7D
w59Zm+Za9edPlqXNigXybIhd4UwiIsiTO7fjOxNx+6P/AORq/Ptk4Gm7wVL6 yOjipf20kr3huGjm
GeJPDC/QtvgTsVcABk4j3D+I1fmUFqu8kTHstFZJG4AtcIHEEcxG5fV9juHU 404rXb9keRXp4sLS
vY2FYbdetpaG9OrxHBVQkRwue1kkTmg4YQc6QTzr0raik5QyyvtrBJZJuWay VkgEw+rv5zv485WU
Fqu/E2Wuz09zu/RcNouuMd5K3qzv0XU6aU7JTVZK3y/f9sc6nzE23L3muopq J1LSytlpXVjbLTRw
ukkjBaWvcZG+XkA4I4j7lWVFzgpKPaGppIqCnmlq6dkEbXMmGDufoON/Endw VGbRdzxstdv/AO3d
+id6Lvu/uWt3cP7O7d/ophpZKbeKtv7T4/T3DnzWl/5/21jzro6juS3tllp3 MbAeSbFjW1ur/Pjf
n71Ltz4odk9oY5JWMfKynbG1zgC88rnAHOvDvTeM57zV3V3fohtF3PGy1xx/ 27v0XbG5MUvQ01vv
8uNznhxYY9LRf9VjUsqqShudvvU1ZDyNFY44jGyVrnySkOGjQDnPlArzhio4 Nj56aKopJXd7RJHL
POwPE+clrWYyMdJ47lmu8921au8lbnp7mdn/AGQ2e7k5NlrT/wDju/RcTppX NX24t8fqdCnzF/r/
ALs/RqaqaKr2kmrX1sUj4rZCaSLuiONsjseWHO/y4PT/ACUyWWmde6ymkbZ6 ix1MkTpY+6GNMTuT
GZG/zH3/AJrFd57vv/uSt38f7O7f/oud57t9iVvVnfoo1WT8pq3W/u0nWJnz lv8Av/w1dFLZoLA1
tBFRz0wdUtnjnmjidINR5M5cNX1cEaVQ3+plrLFs611Qx4jpXtkY1zciTVuy Bv4fyUM2i7njZa0/
fTu/RO9F3znvLXZ6e53fotZcmTBHpuYntv8AL6/X6lI5s2KHRUu2yxpWzUMW yETIYaKZhoXtmjkm
jjcJ87nbxrJG7AG5R5K2B132XoA+k7ljgpZanS1m6TUQ7Wfu5iqI2i7k5Nlr SR/27v0TvRd9/wDc
tdv4/wBnd+ihSJKibxFtbe/ivUOdNcKWh8jSW+4Ctq7xPFNbWVbatsdO+Zsb Y+5myu1ac+SfJxv4
lRa25UVLbL3JajSNE9zbHT5Y1xdEW4cWA78ZzvCpe893xp7yVuOjud36J3ou +7+5a7dw/s7t3+ih
U8lO+IrbOHyt9fp92S5823w+P3uV3IkDGCnJHoVj3pvH2NXdXd+id6bx9jV3 V3fovSx5OZdUcWHN
ysruSPQnJHoVj3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY9 6bx9jV3V3fonem8f
Y1d1d36Jjycy6oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuq GHNysruSPQnJHoVj
3pvH2NXdXd+id6bx9jV3V3fomPJzLqhhzcrK7kj0JyR6FY96bx9jV3V3fone m8fY1d1d36Jjycy6
oYc3Kyu5I9CckehWPem8fY1d1d36J3pvH2NXdXd+iY8nMuqGHNysreTKcmVZ d6bz9i1/V3Lnem8/
Ytf1dyY8nMuqGHNysruTKcmVY96bz9i1/V3J3pvP2LX9XcmPJzLqhhzcrK7k ynJlWPem8/Ytf1dy
d6bz9i1/V3Jjycy6oYc3Kyu5MpyZVj3pvP2LX9Xcnem8/Ytf1dyY8nMuqGHN ysruTKcmVY96bz9i
1/V3J3pvP2LX9XcmPJzLqhhzcrK7kynJlWPem8/Ytf1dyd6bz9i1/V3Jjycy 6oYc3Kyu5MpyZVj3
pvP2LX9Xcnem8/Ytf1dyY8nMuqGHNysrXRexbejYKmS30ZljiD6OAF8hw1vk BZl1ovJ/+zV3V3fo
rNkdwkiiFXs7d3SxRiMPgGgOaNwyCw7wF4Xbsp1ciGGS02nfelssz3OxJ6pZ 0UU5NJq26+26NjU3
O33OnfYhWSxR6AyOskdulcM7n/8AT0LC17cWe8Q5a4sbCMtOQcScylGnmIwd nL/j/wB4/wD5qJW0
1xFBPBSbPXOFk2DNJUNLzpbvAGGgAZ3r5+h7Oqoa2XNmaKULzLd1Peqe0KTV JkqU23F9Hv4mz+i8
Y2JiH/czfMtasl9GBzsVER6zN8y1qpWeZmer9zz5fgR//9H9TREWBYodt/NC u/p/O1T7Cf8Aw9bv
wsfyhQNt/NCu/p/O1T7D5vW78LH8oXa/JL+T9kYL479PyWGUyuL5keI2Fx/k vPjjhlwuOLcjoW0+
8plV9Zc+4KqkZMz9hUv5LlQf8N5+rn2Hh9+FPWVNUQVMpTZe5ktNOzO5TK4i 6Cp3KZUS4V4oY4w2
IzVE7+TghB0mR+CcZO4AAEk8wB4ryFwqG07W1VIymrphIKamE3Kcq5rNWNQA CAsMplUE20VU2htd
VS2xtYLgWRZbUiMMlIOW7wdwLXDPsUi7bQU9tpawAg1tPTOmbDI1wa8hurSH 4wfuBzx6EsC3ymVS
UO01HNAw1srIJnzSxhjQ5waGyOYC44w3Oni4gcehffhDSzVtHHRyRz08s7qe eYZ/ZyYOhv3lwI9i
WBcZTKq6a7zVjxUU9E02vys10lQ1nkjOXBhGdORxJHSujaK0up31Aq/IY4NI MTw8k8MMxqI3HeAR
uPQUsCzymVSQ7U0M1RPA3LHQ1McGZQ5jXB4aQ7JbjPl/VO/dvwuz7S0fJRy0 krJY21EbKlz2uZyc
TiRygyBqGrSMjI3pYF1lMqhqdqoqN80tRRyNoYppYO6GvBc6WNrnOGjjjyHY OeYdKT7TPo6Cvnq7
XKyehhZO6CKVsmqN5Ia7VgAfVdkcwHOlgX2Uyqqru8tJV3GB1M15paQVUDQ/ SZ2jPKb94GDgfzUC
HbGN5qWz0D4XwUArGt5UO5T9nyhYDjiGkb/algaTKZVTT3epr5Wm327l6UOD JJ31Aj0u/wAwDcEu
08ObeD96hUu09dWyQwwWIumkE7iw1jRhsUgjJB07yXE4Hs9qWBo8plVdVfII dnn3mnjdURBoLY86
C4l4ZpOeBDjg/cVDrNqDbpqeC4Uncs7qhjJow4zaYnNeQ9hYPK8pmMY3b/vS wNBlMqki2iiq7/Bb
qR8boX04mc8seXPzrAAwMMILDkPwd+BvCmTXq2wVbqWWqayVoy7LXaRuzgux pBx/lzn2JYE/KZUK
23i33cE0NRyuAHYLHMJB4EBwBI9o3L5N7tjaeGoNZHyU8TpYnYPlsaQCRu37 3AY4nIwgJ+Uyqw7Q
2kcjqq9PLjLdUT24GcZdkeQM87sDcvSvvVutlRHT1lQY5ZGF7WiN7vJBwXHS DgZ5zhAT8plV0t/t
UM0kUlawOiYXvdhxYABqPlAaScb8A59i9RdaF1uNxbUtNIOEoBw7fjdzuyeG M55soCZlMqm8KbYa
+npmyPcyohfIJRG/ySxwBa5uMtPlZycbvvC9fCWzchFO2va6KX6j2Mc4Eelu G5u/6x3e3clgWmUy
vF1VA2oipzK3lZ2OfG0b9bW41EfdqH5qAdpbMGCTu5pjMPLa2xvLQzGclwGB u34O/hu3oC1ymVDq
brRUjp2zTHVT6OVayNz3N1507mgnfg/kos20lrYHNhq4ZpWhjiwOIw15ABJw cfW/PdxSwLbKZUOk
u1vrqqSmpqkSSR8RpcA4ZwS0kYcPa3I4dKrqe/yRWetu905CKkhmljiELXud hkjmeVx3ktHAYGUs
C9ymVS2baelvFoqbm2CeCKlDi9r2HJDW6iRkDO/UPvaVFqto68W2rmhoYIKm mo+7msnkMjJIMOxv
bjS4lvDfhLA0mUyviN/KRMfjGpodj7wvpAdymVxEB3Kj137uqv4Enyle68K7 93VX8CT5SrQeJEPc
Zf6LfMaD8RN8y16yH0W+Y0H4ib5lr1vWeYj9X7kQeFBERcxYodt/NCu/p/O1 T7D5vW78LH8oUDbf
zQrv6fztU+w+b1u/Cx/KF2vyS/k/ZGC+O/T8k9V10qJmU1U+maHy08L3saeD nhpIH5qbPMIIXSHm
4e0qBGSwAO3ucdT18f27V4ctSYd72v0/6ehIl6W0xewtzu+2ez10hvkmsawI ZQwMLTjO7HQcELbW
G4PuNrY6fAqoXGGob0SN3H89xHsKpNk6AWe2SwNfG/8AtUjgY3Bw05w3h/04 UoP707SMmziluYET
zzNlH1HfzGW/klBWytemyZatBE/8bbrpflfewmS2oFEaJERfRnMQ7jQGtbDJ FKIamlk5WnkLdTWu
wWnU3nBBIP37iClNDcw+mkq6yme6J7jIIactEjS3DQNTiWkHfkHfwUxEBRUN lnbRUtJKeSjttydN
AThxliGotzjgTrP5cFBuuxT7nWyzGsgaHuleJXwF041xuZp16saG6twxwAGV q0U3BlPAaHunlnSU
s5kJ5Uz0utzW8q+QcnvwD5ZB1BwOBuU2eyz0mz0FPSYqKqjqxVxDAaJH8qXY O/hh55+ZXyJcGYrd
imVUsEDamJlDT62x4hPdDY3teCwSasacvJ3tJ3DK+WbGmKkcyLvZFOXM0SR0 bm8npDgHNIfqEnlH
ytWBzDeVqUS7BnpNlpHwPpDcXSU0lRFUyOlZqmdI1rWuJdnG8NHNxJPsXnPs zUuttQ2WpZUTxULa
WkbFHyYLY3B7A7JOSXNaCRgYzuC0qJdgzkuy8twgdT1lW1lLNJLVOijj/asm lY5rxrJILRrdgYzw
3nn+6rZ2urLfco5rhTirr6eOm5RlO4RsjYTjydWS7ynb844bloEUXBS3W211 VWQyQPi5Sehmo6mU
tyyMOGoODc53uGMZ4KDPsbJUWiqpX3BjaqaOFsdQ2E4iLIuSJ06t+Wk7s8/s WoRTcFTS2uutsjY7
fV07aNz+Ukimgc92o736XBwwCd+8HBPRuUGi2du9BNDPBdaPloxUNLnUjiC2 WUSbhr3EOB45GMbl
pEUXB//S3FXs9JJZ3WqkreRpjCGtEkes8ryokMhORx3jAwN6+Kqw3Cqqobk+ 4U3fOGZj2ydzu5EM
aHgMDNWeMhOS7/RXyLC5YqLNYnWmrqap1Tyz6pg5QBmka+UkkcRv4ZkOBzY4 lQ6rZCGoulVWB1KO
6nmVz302uZrywN8l2cBu4HhnjvWjRLgrqG0miraep5cP5C3R0WnTjOl2dX8+ hVB2SqTHBTPqqGop
KOnfBTQ1FI52Q5zHZkw8aiNAxjG/etQiXBmzspUmmlp3XV0ra2BsFa+drpJH NDnOGhxduxrcPK1b
gPbn3u9suVdfOUpZIYaaW3SU08ksZeTqeDhoDhg4ycnIV6iXBmZ9j3S0UltZ XNbQ63zRgxZlbK6M
syXZwW+UTjAPtVxX2zuy1R0bJBE6ExPifpy0PjcHNyOjLRkDG7nU5EuCgZs5 Usqp67u6I1dY2VlU
eRPJlrwwHQNWWkcm3iTz/wAuzbNy9zQRUtXFGRbhbpy+EuD4sby0AjS7jxyP Yr5EuCrrLTO51DNb
6mOGeihdAwzxmRjmODQcgFpz5A356dyqYdiS2mFJJXNjgNIKeU0sbo31BEYY HS5cWuxxG7I3b+nV
IlwZufZmvrKmerrK6jmmmMeYTSu7ncGNcBrZry4+VkbxghfNv2O7hs9RQd2M cZzTnW2HAbyTg7AG
eBx07lpkU3BT2qxS2+qpXy1bJYKCF8FIxsZa4McWk6zkhx8lvADnVcyw1V0s U9oqxVW8MrZZeVZK
A2ojdK92PIdnBBHHGCtSii4K232OGh2f7z8vNIx8TmSSPeXOc54w9w1Zxkkn HAEqqr7NcILRX4b3
xq57f3ugjpmCINjAdpc7W7ecneQf5LTolwfELSyCNjuLWNB+8BfaIgCIiALw rv3dVfwJPlK914V3
7uqv4EnylWg8SIe4y/0W+Y0H4ib5lr1kPot8xoPxE3zLXres8xH6v3Ig8KCI i5ixQ7b+aFd/T+dq
n2Hzet34WP5QoG2/mhXf0/nap9h83rd+Fj+ULtfkl/J+yMF8d+n5Pi9yPgpm 1GkuhiOqQNBJ/ILN
1G0dvqqaaBz52CaNzC5kT8tyMZG7jvW2TA9EfkvnqjsqRUTcWNu/0a/R3QT4 oIdFI/Mtlu9GytBJ
SwTzzuldqe8wvAOOG7G44/2U2+bQ0dXZaiFjJ3y6P2LWQv1a85bjd0r9AwPR H5JgdA/JTF2XIjnq
ojiicV096+XohjxKHRSViNbZaie2Us1XGY6h8LXSsPM7G9SURem9rMCFcrpH bBTh1PU1MlTIYooq
Zgc5xDS48SN2GldiutG98MM0raSqmHk0lQ9rJuOB5GTxxzKDtLaJbsyg5Okp axtLUmWSnqpCxjwY
3N4gHeC4HhzKHUbO1dXS3MmCjppqump4YGMeXCHky7OHaQcYIxgKQX1RX0VJ LHDU1lPBJL/hslla
1z9+NwJ3712SvooWyPlrKeNsP+IXStAZv079+7eCN/PuVFfqCur9oZ2UtFDJ FU2p1O6eZxaIS6R2
9vknLgDnGR96+YNmZ6KjYYY6WapiuUlYWvJa2oaQ5rQ92DggOzwO8fzQF+6v omup2urKdpqv8AGV
uZv/AG7/ACuI4dK4240D4ppW11M6OnOJniZpER6HHPk/zVDb9n6+3zyP5Oln FYwtlLnkGky+R37P
yTqxyuP8v1B07odFsfV0kMLgyIzUnI6BJVySipDDk5yMRg8cAOx0psBd0e01 sq2zyOqIYIYZXxie
Sdgjk0uLQQ7PPg/qp/fCldIxkUzJi6Uwkxva7Q8NLiHb9xwOHFZej2Trxeor hVR0TGd1Gd8DHl4a
NUh0jLRn645hzrxk2Ir5qalpzUwRBlEyCV7CSdYjnaXDcM/4rd/HcU2A1RvF qFMKk3SiEBdoEpqG
aC7jjOcZ9i5HebfLXz0IqoxPBG2Vwc8DUxzdQc3fvAHE8AqS2bLy090pK2en hY2KUulidUvqSRyT
mghzwBxdwwMdJ5vCm2Tr4KCrpC6mcatjMy6jmMseXNaN29rhgE5GOgpsBqYa 2kqIo5YKqCWOV2mN
8cgc17ugEHedx3exQ7hemW6upqR1BXTvqjpidBE1zS7BJGS4bwGkqNR2urZV vrJqaiY6esZO6Fri
9tO1sRZmN2B5ROOYbnFTq2ikqblaqlhaGUdQ+WQE7yDG5m7+bgoBBO1VKKSe tNvuPckGsGo5Buhx
a7QQ3ysnLhgbl9T7U0FLT8rVRVUD21DKeSGSIcpG54JaXAEgNwCc53BVx2Mg 8HqqnZTUrLnUGTNU
3IJDpS763H6px96kSbMyd0siD21VIa1tTI+qe58z26HsMbic6gA4YyeGR7VO wEw7TW0VtbRtdLJN
R6AQxmoTOfnDYznyjkEHowc8CvQ3tjYWOfb69s8jiI6QxN5Z4HFwbqxpGeJI VW3ZWSir4aqhkY40
cUZhEp3zSgy6y8gbtQlO8c+/B4Ga6nuz6mG69y0jK2KN9OabulxjfE4tdnXo yHAtH+UjH35AHrDt
Hbp7lS29j5BPVMc5upmAwtOCx+fquzuxzrxi2ppaiejigoLhIK5hfDI2Fugt BAcSdW7GRnd+ahHZ
WpfWVFbJPGJ54nShzCRyVTygc3Tu+qA0DPHeelSbRZKyiZY+6HQl9BSzxTiM nBfIWkacjhuPFNgJ
Fv2lobgxsnJ1FJG+A1Eb6pgY2SIYy8HJ3DLc5xxC4/aaihp5Z6mCrpmMZyjO Wh0mdmcZYM7+IODg
4PBVdDsa+ntcdFNUvlE1AaOpL5XP5DI3uh1cASAC3cNwO7G/2vVlu9+onMqh RwzU7Hin5ORxbM9w
wXOyPIGM7hqOTx3b2wFpdL3T2iqjgqYal3KRSyiSKMOY1sY1Oyc9H+684tpb ZJT0tQZXxx1UL5ma
24LQwtBa4cQ7LwNPHKg3i3Xu8vge+looCKeqikAqnOwZWaWkeQM4xv4KNPsj VS3SKRlRFHSRwCQD
eSyq1ROJDeGgmIE78kuKbAWsu0TYIWSz2i6RB88cDQ+BuXOecN/zcM4H8wuQ 7UUMsb5nw1cEDeUD
JpogGTFhOoMIJyfJOAcZwvKviv1wp4GvoKCKSGtgnwKxzg5rHaj/APT3HcB/ P2KG3Z66VFoFpqRS
xQwSyzRSxyl7pXlzywEFo0ga9/HhuTYCa/aukhpIaupoLjSwTyRxxPmgaA7W CQdzjuABJJ4Betdt
LS0L5W9yVtTyM7Kd7qeIOAe8NLBvcOOtoB+9VlDs3O2joaKa1W2kgp545JxD MZBUARvY7ILBx1D/
AFX1R7N3KGhq6eoqIpXPuVPPDIXkudDEYwNZx9ctj5t2U2At4b0yorBTQ0Fd IWuayaRsTdEDyAdL
zq3EAjOAeK+6q701OIxE2WtllyWQ0gEj3Abi7iBgHdknjuUOrtdTVX+GsZR0 lMIZmO7uZKTO+Nu8
sLdIGHbx9bh+S+Y7ZXUT4K6kpqLupsL6eSma8xwlhkLwWuwSDk78g5yeCA9R tLS91up5aOuh5N0b
JpZIgGQvkALGuIcTk6mjcDvK9aO9x11U+KGgrhEyWSJ1U+Joh1MJDvK1Zxlp HBVr9nayor6q6TPa
yokmhmZSCoc6neWMALXjAB8oZDsZBDTzYXhT2G6UbLmKWgtsNVWGoLbgJyZP 2jnOaHNLMbsgceZN
gLSPaWjnttVXwQVczKR5bJGyIcoWgZ1gEjLCN4dz43L4ZtRDMYWw2q6SyTQC obGyBuoRk4Dj5e7P
MotFsxVW01kMNxfU01TbRSAVDWBzXsBbH9Vo8kNc7POvip2fqxXW6qFuoLga S3xU2Kid0fJyMOdT
cMOf9E2As6e/w1M8rW0VayCGSSOSrkja2FhZkOy7VnAIIzhecm09FBTTVFRB WQRxxGVnKw6TUMHE
xjO/mODg4PDjiLFsfQTUtw7tpoBV10tQ41MYy9rJS7GCecB2F53myXa/299P WdyQvgje2B0UjiJX
uaWanZHkDSTuGTkjfu3tgJs+1NBS0z5qqCrgfHNHDJA+IcowvzpJAJGkgE5z zFS6W80dZdqq2wOc
+akY173gfs3B3DS7n9vQquXZmQVAjZIKmldWRVMklXI58xa0FpjJOdTcHdnh khSbTYG2i5Okgfqp
+42w5cfLc/lHOLjgY4OG/wBibALftPQ1lLFU1EkNBHNGxzO6KljS5zmhxaBn mBbv9vDptDVUwrBR
mohFS5uoQcoOUI6dPHCyth2Qq7bUtkqzSytbSviwPK8oxwtB3jpid+YXxbtj q2kngdJKx72GKXuj
umQiJ7I2twItwdvbnUTz7wmwGqjuFFNHJJFW08jInaJHMlaQx3DBOdx9hXzX 3AUAYO5aqqkfnEdN
HqdgcSckADeOfnWdotnLnBVVU80NJKZaeOItnqXzMle2UPc8tLRo3ZIaM4OF e3qnqaulMENJSVsM
mRLBVPLA7nB1AHgRwxv6RjeAp73QVdbBSU8rpH1FL3XG4MOkxZAzk8/lDcpF d+7qr+BJ8pVXSWu5
Ut2tkj3xVEFJb3Uss7pCJHvJadQbjGPIHPz+zfaV37uqv4EnylTD4kQ9x//T 0n0W+Y0H4ib5lr1k
Pot8xoPxE3zLXq1Z5iP1fuIPCgiIuYsUO2/mhXf0/nap9h83rd+Fj+UKBtv5 oV39P52qfYfN63fh
Y/lC7X5JfyfsjBfHfp+SeiIuI3CIiAIiIAiIgCIiAIiIAiIgCIiAIiIAiJkd IQBE3dITd0hCQibu
kJkdI/NAETI6R+aZHSPzQBEyOkfmmR0hCAiIgCIiAIiIAiIgCIiAIiIAiIgC IiAIiIAvCu/d1V/A
k+Ur3XhXfu6q/gSfKVaDxIh7jL/Rb5jQfiJvmWvWQ+i3zGg/ETfMtet6zzEf q/ciDwoIiLmLFDtv
5oV39P52qfYfN63fhY/lCgbb+aFd/T+dqn2Hzet34WP5Qu1+SX8n7IwXx36f knoiLiNwiIgCIiAI
iIAiIgCIiAIiIAiIgCIiA6BkgLKWCzUe0FNLVV2HzavKcWNcSTnnOT0YG4bl q2/WH3qg2Fd/dM28
7pMcfaVvKbUMTX0/JnGk4kmf/9TfnYmznOI2j+jHu4+z2j8vvXj4K7OurXUI kh7qEfKmAMj1hhJA
djGcZIGfZ960Qdv4rEuotpe/DrzHRU7HSV0jAA93LthLeSaDluNAIEuM43q2 JHxKaEPAu/Aiz5/w
h8Fn6Lg2Is43mIED/wBFns9nsP5qgqaS4yWujZDHdoHB395l0c0rpJNHFjQ8 Et1Z+oQOG7C86MXF
10qIM3Sa6wPpAyZznCKNulhkDwHcmCW6txB4jnTEj4jQh4Ggg2OsVRDHNAI5 ontDmvZFGQ8bt4IH
A4P5/cvvwIs4AzEPgx+z2ew/ms73vrqTZaitsFHcYDBkVEjGTTP5ZrQAGND2 5jOT5QOkFo3b1ebJ
U9zEVTW3h9X3XK5gDJ3Ya0clGXFreAy/Vn2g4xvyxI+JOhDwPXwJs2P8NvwY /wBFW3a0UdhqqGWh
AZJJMwZDGtOOUY0jdjIw8jGDzcOfX6lmtr3ftbYM8alm7P8A6satBHFFFZsr FDCldIvjxK4uniVx
chsEREAREQBERAEREAREQBERAEREAREQBeFd+7qr+BJ8pXuvCu/d1V/Ak+Uq 0HiRD3GX+i3zGg/E
TfMtesh9FvmNB+Im+Za9b1nmI/V+5EHhQREXMWKHbfzQrv6fztU+w+b1u/Cx /KFA2480K7+n87VO
sLmjZ+3Ze0f2aPnHohdz8kv5P2Rh/vfp+SwRc1s9NvvBNbPTb7wXDZm51FzW z02+8E1s9NvvBLMH
UXNbPTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHU XNbPTb7wTWz02+8E
swdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Es wfQODlZdmzV4oXyM
td6jp6d7shj43aufjg45/wDZabWz02+8E1s9NvvBaQRxQbisUKZnTZ9qj/xH B8N/t9vt/wBAhtG1
R/4ig+G/2+32/wCy0Wtnpt94JrZ6bfeC0x4+C6L9EaC4/czvejar/mKD4b/1 XG2XadrnOG0FOHOI
LiIn5djHHp4LR62em33gmtnpt94Jjx8F0X6I0Fx+5nRZ9qh/xHB8N/s9vs/1 Kd59qv8AmOD4b/1W
i1s9NvvBNbPTb7wTHj4Lov0NBcfuZ3vPtV/zHD8N/wCqR7O3WorIJbteI6mG CQSBjI3A5Dg4AZOB
vA/JaLWz02+8E1s9NvvBRjx8F0Q0Ed50XNbPTb7wTWz02+8FhZmh1FzWz02+ 8E1s9NvvBLMHUXNb
PTb7wTWz02+8EswdRc1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbP Tb7wTWz02+8EswdR
c1s9NvvBNbPTb7wSzB1FzWz02+8E1s9NvvBLMHUXNbPTb7wTWz02+8Eswf/V /U14V37uqv4Enyle
2tnpt94Lwrns73VXlt/wJP8AMPRKzgX+SJe4zH0W+Y0H4ib5lr1kPot8xoPx E3zLXras8xH6v3Ig
8KCIi5ixCvFqp73ap7bVukbDOAHGN2l24g7j94WZ8VdhP/m7p1kdlbNFvLqZ 0paMETSKxQQxb0Yv
xV2D1u59ZHZTxVWD1q59ZHZW0Raa9U8x9SuFL4GL8VVg9aufWR2U8VVg9auf WR2VtETXqnmPqMKX
wMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTxVWD1q 59ZHZW0RNeqeY+ow
pfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdlPFVYP Wrn1kdlbRE16p5j6
jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR2U8VV g9aufWR2VtETXqnm
PqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59ZHZTx VWD1q59ZHZW0RNeq
eY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWrn1kdl PFVYPWrn1kdlbRE1
6p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9aufWR 2U8VVg9aufWR2VtE
TXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVWD1q59 ZHZTxVWD1q59ZHZW
0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/FVYPWr n1kdlPFVYPWrn1kd
lbRE16p5j6jCl8DF+KqwetXPrI7KeKqwetXPrI7K2iJr1TzH1GFL4GL8VVg9 aufWR2U8VVg9aufW
R2VtETXqnmPqMKXwMX4qrB61c+sjsp4qrB61c+sjsraImvVPMfUYUvgYvxVW D1q59ZHZTxVWD1q5
9ZHZW0RNeqeY+owpfAxfiqsHrVz6yOyniqsHrVz6yOytoia9U8x9RhS+Bi/F VYPWrn1kdlPFVs+f
/NXPrI7K2iJr1TzH1GFL4FfYrJSbPWtltonSuhY9zwZXBzsuOTvwFYIi5Yon E3E97NFsCIigBERA
EREAREQBERAEREAREQBERAEREAREQBERAf/W/U0RFgWCIiAIiIAiIgCIiAIi IAiIgCIiAIiIAiIg
CIiAIiIAiIgCIiAIiIAiIgCIiA//2Q==
------=_NextPart_000_0020_01C5B31A.44783F60--

Attached files