RUS  ENG 

Алексей Демин (Все сообщения пользователя)

Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 След.
Наименование слоя в переменную в SQL запросе
 
Дмитрий Озеров, подскажите пожалуйста, еще по этой теме. Мне нужно сделать поиск в выделенной области в нескольких слоях.
Что то типа такого. Еще пробовал использовать charindex вместо like.
Код
SEL ECT z.sys, z.[Наименование], z.[Категория строения]
fr om [zdaniya_soorujeniya_trial_1] as z, sa
where z.geometry.within([sa].geometry)
and z.[Наименование] like '%билей%'

UNI ON 
(sel ect x.sys, x.[Наименование узла], x.[Адрес узла ввода]
fr om [Electronnaya_model_PEM_trial_1] as x, sa
where x.geometry.within([sa].geometry) and x.typeid = 3
and x.[Наименование узла] like '%билей%')

UNI ON 
(sel ect c.sys, c.[Наименование узла], c.[Адрес узла ввода]
fr om [ts_sushp_zim] as c, sa
wh ere c.geometry.within([sa].geometry) and c.typeid = 3
and c.[Наименование узла] like '%билей%')
Проблемы тут 2:
1) Нужно в 3-х местах исправлять строку поиска ( '%билей%' ), каждый раз для нового поиска. Я хочу естественно делать это один раз. Пробовал делать так:

Код
Declare @qwe char(100);
set @qwe = 'билей';
SEL ECT z.sys, z.[Наименование], z.[Категория строения]
fr om [zdaniya_soorujeniya_trial_1] as z, sa
where z.geometry.within([sa].geometry)
and z.[Наименование] like @qwe

Это не работает. Const тоже пробовал. Как позже выяснилось, если просто написать:
Код
Declare @qwe char(100);
set @qwe = 'билей';
SEL ECT @qwe
В ответе будет - билей. Но вот если написать допустим

Код
Declare @qwe char(100);
set @qwe = 'билей';
SEL ECT @qwe, z.sys
fr om [layer] as z

в ответе помимо сисов выдаст столбец '@qwe'. Это и есть первая проблема, не понимаю как это работает.

2) Допустим можно потерпеть и исправлять строку для поиска в трех местах, ответ выдает правильно, но тут нюанс. Если в ответе нажимать на сисы, для перемещения экрана на объект - работает почему то с одним слоем, причем не активным. В данном случае, если из примера, то [zdaniya_soorujeniya_trial_1]. Если на сисы этого слоя нажимать - экран перемещает, если из других слоев то не перемещает.
WayTree. Дерево путей. Связанные по направлению
 
Большое спасибо!
WayTree. Дерево путей. Связанные по направлению
 
Заполнение группы работает долго. Можно как то иначе сделать? В смысле без цикла с добавлением в группу объектов по одному.
[IMG WIDTH=438 HEIGHT=222]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAbYAAADeCAYAAABR2SXzAAAgAElEQVR4Xu2dXYss3XXf13wAIzAGCyFCDE+fwDAkvtBF6Ma6kcA5c2SYi2RIQHFjENMXcjgDZkAXHSOcCRgGwwy2LmYQhCaCwCg4Bx6dmRgMvkj6EIEuYjMMZKZBwQgRYwKyv8B47dpV1bted1X1y1RV/87N85xTb3v99qr932vt3bX2/vb///2LbPnPx8//VH784x/LV7/61S0/mcdBAAIQgEDfCewhbH3vYuyDAAQgsFsEELbd6m+shQAEINB7Aghb77sYAyEAAQjsFgGEbbf6G2shAAEI9J4Awtb7LsZACEAAArtFAGHbrf7GWghAAAK9J4Cw9b6LMRACEIDAbhFA2Harv7EWAhCAQO8JIGy972IMhAAEILBbBF5N2L72ta/tFmmshQAEIACBrRB4FWH7lV/+pa0Yx0MgAAEIQGD3CLyKsO0eZiyGAAQgAIFtEUDYtkWa50AAAhCAwFYIIGxbwcxDIAABCEBgWwQQtm2R5jkQgAAEILAVAnvXP/rLrddj24plPAQCEIAABHaSAMK2k92O0RCAAAT6S6BA2P5a/vz3fkt++H9Cw//JmfzBH31TfnUdHH7+A/nDkwv56TrvuY52cQ8IQAACEOgFgaywhcLz5e/+pXzzK6GN+m9//vNvytejvzcxHUFrQo1rIAABCECgJoGUsNlI7f/9G0fUat4w//RN3XctjeMmEIAABCDQIwJJYQuiqp/KN3707+WgyMgo8gqP/0YqsgvSjJlj/1N+8I2/kC9+60l++P2/Co7+2rc+l+8c/SP9P3PsWr5485/l618yRzx/Tzz/X8q/C9padk3y2N98+Lfy+98X+Vfh8x7+5J/JH//3yNh/Gv97j/oYUyAAAQjsFIGssP2RyO8UrqcZkfi2SCRmgcj8mXwlEImSY2LX1SQhZtF96ghb6tyf/Af5w5+NVSD/ukQc3Wv0/3/vWn6ma4dBm4N2RUKebsdO+QHGQgACEOgNgXoRW05EZyKe//3PNXX5pWy0V3bMRE7/Sf6jR5RSEVwokFFEGPTCv/ieXP+uBIL7PxLdEkVfS8H64p+atn5PhTmMEBG23jgyhkAAAhCICNRbY2sqbF+xqchfd1KczYUtL1VaIRX53d+Un/yvfyzfCURwmfq0qUmbHhUhFcmrAQEIQKDrBLK7IjW9N/nuf5X02pndFZmXbnRTeek05VKETPT2oy+762pNU5Hflp/FKc0Iv0/YTDSXjeC+/iW7qeUnv2HalU5ndr1raT8EIACB3SSQ/zu21AYRcX9zljiWinDKjgUbPJbpwuTmkXQaMa8zwo0i6bbFqciiDSj2uUsxTKYm//in0W/0WGPbzVcAqyEAgb4R6MiXR7KpzL51BPZAAAIQgMB6CCBs6+HIXSAAAQhAoCUEOiJsLaFFMyAAAQhAoPUEELbWdxENhAAEIACBOgT2fvGLX1C2pg4xzoUABCAAgVYT2Jv9l88RtlZ3EY2DAAQgAIE6BAJh++1//Y0613AuBCAAAQhAoLUEELbWdg0NgwAEIACBJgQQtibUuAYCEIAABFpLAGFrbdfQMAhAAAIQaEIgFrbF4l6eP36Q89sbkeNnmb//LHm/xZWMBqfyKf7XE7l7uZa30d99x2Uh91cXcn56E9xjeHIps+v34j7lfjKSwxv7hOHJnR5/mzjexECugQAEIACB3SKQjdjuJzJ6OssXtos3Mlexyf1jhK3k+OJqJGOZ6n3t9ff693OZLZ+jz90735fnmYqdUTsV2vvnt/K24HG71U1YCwEIQAACVQlsTdjSDUoLmxG+izdzWermvUxGT3I9f1/VFs6DAAQgAAEISD1hc1ORQ01FzjQVGeUS06nI9PEA9kKuRgM51WyjSTUmor9ExGbSlmM5PD1IpjvpMAhAAAIQgICHQHVhS9/Ik3qUsuMLFbiLsdzuO6lII3satQ2M6ukfswZ38PAoR3NnHY/uhAAEIAABCGxM2MSXKvQcN8I3FpkXphp996dvIQABCEAAAlkClSO2q9FIbo+Tmz8OH6fyEi6KVTn+OJ3pGlqwM0TuJwM5lLv4epuolHAXpDk+lqejuYR7Teg7CEAAAhCAQCUCsbDdT/Z0q33qmuGlvMQRlaYPVWxO4+346e36nuNh+nF5fWo7/71GcIf25wRDXZ+buut3lUzhJAhAAAIQgIDkbB6BCgQgAAEIQKDDBPjySIc7j6ZDAAIQgECWAMKGV0AAAhCAQK8IIGy96k6MgQAEIAABhA0fgAAEIACBXhFA2HrVnRgDAQhAAAIIGz4AAQhAAAK9IoCw9ao7MQYCEIAABKywfeFz2Uv/Ojv3I8YA210C9gf4tw+f5FPwEetLOZZbkTP9OkyqdF8zRukf+J+IPOwHn1yLviF6cvfiVH9o9pT6V+mn3fYOxX67YCiXz3N599H5pullTu3Cmg9xv5GavNQ+bz18ixtV+PzEBxpqGtXg9MXVRMZaD/LTp6EML5PfkW1wOy7ZYQLLQqOpsjEL/dr+QOujLb88ssOUMF0/cTaSD0fRJ9EUiH5JZjIey/6s+sB7NZrIm4KPWgdli7Q+33U4ii/0SzTj8+W3RLNljdbfKYXty61RqPbvXciRW2y3YZNsrUI7kJsvAH04sgJuPlMnNfg2fHxwmduG8B8833Jd5Wk516YZ698ncv0KE5k128XtXoVAqbCNPxwFpWWuRntaakZnj5cHchtWwNYpu1zqZ6/i2aQWBp2MdWYblth2K2Tb63W+685uTZmaIEpcVuJ2K2hHNCrN0jPVu5eza9O+6PmipXKib1suPyGmdt1p7BF+zqt4xpyKKHQ2O9VoIq6DGtuTuoOx+d3HsPp4OAOXqBq5MyMv4RdUSghKBuVfL2PLN8ky/ERawuZlhfLafEs/WG1GxuL+X7Y/ycbt26gQ7Uw/DpoXAFrhO5aH07CKu8koJESyvH+i/jY+ONU7BZXco3vk+o/SjCLEuFLFQMVsIDcBU0nWC1Qhnpyfhv4/lJPLqYp06B3O/aN7xlFSKipyhc2lVdr+QJlK+Fc4vhS252wdxHT7VXLsu5uOKI3YKx/nna46qpl3/8mN/n3VQzI3tt+XPYwHoEttxe1y4lXVP+O+NWOZte/NRfguOX0Vjx/m32bif7/LxodNh+RVO6FH5yWELSoZY+1LOq0Rh9sD/T7kWVjhOqitdhHPwK8mE3l3fb0clIwjXWih0GstFBp8yf9RhyUJz7fXPh48yH7kzOHX/mcqFsFnkp1ZbCXe6RfBnQEWVBJwX6ZMRJCaQWZmz8GL8qSZONveYOxw25y63nv/Mn7hvROFWEvaFwyamiUcHuhHq6PKravwLaqq7nRMaf+H55VFbPbD2GM514Ep+F6opjqXvhaVNNL6fM+2BqDpu3On7FGV/tGLdEB+0HtP9d5GQO/1qfrfsAML2xf5jxnAxrdyoJ58pv8/TlSMX2gQ+1l8r4xAZRgm358IZZGwBcdL2u/j7zueSEfmpSADcbuVY5MaDSZm4f8nZiFrFjbfZMrxv2xGQd/Pwbnsh6lcn/1xma0znbDoBP3hWCdAj/oh9nB8ykbPtvpI9P773u+88WFPA4dool1pjOOkygQKIzY7A1THCFMheWmRuDMHUUSRfm4YjUUDw/RRRtqZs/3zIPXiOo4VP5N5WUHY3EKorjCnZuRRNPnszBJLHbNg9pieZfqELTlxcCLYgojBjcDy1kHcCDjun2czeIsKwL6cuwPvKnwTg7K75qT9bWa4Z0/hjLWg/ysJW/LadCp8Hf1jhGH0dBak/PL+FAtvOIip/w7Ufy8fNEd6rNkLce6lfCfjKGIzH/IWOZi6a4IpIStoi0/Yctvv8x/f8cSkLCdii2DpmDAaHC4zB2tZW7U3z43YKgtbhRJZibEhMmiZLXKzCqYI8kwnhEnN1vHJeZ+skM7jVKnv/UTYKmvSWk4sFrZUlFAqbG8rOFbopEG68eFYnlXAXGGxHa+Lx1Gq08za6yzMZ8THGUhSEVs023eFdR0Dp0/YiiMuf+0534ww6J+pSak6s+pERLECX6+w+9tv+rc8Ykv7sxHQD/Ea1jr6p7mwRRkGTb/p+tfZk66JaUQsx9EGB9NWnQTezbTMkh0Oc9cEYzEzLJbZDtfyRsK2am3EhLAVq1Uw2TARbyDaznrrGoaijN21UpHJ6CnbnAr+6TyvKFsUi5mZyKdE1/d+ZnzCRN9EbGvwnPxblEdsOjuTcJ3Bl4q0YrGs15Z4XIVUYBQhar2aoGbbyqlIM5Bqm4JdeyZ14jhibWELBuXUQr6TivwYHjO5+GjhPz2I+hy/lF/eQJlJRabWMdMDQxiBN+VrhXM5cAdCFfGNU4MF/R86g8vQTmI0QtfFKpMSTAtDugK7j1/VVGR5xLbs42T7bP+bJOTUrOsZ9rrGdOCuwWmqfaZrziataTa+XOh6myQitmBoCwTN5OQT0Z7zsjQTtig1W8y/in9FG1ii5rgTEZve1lRwUE7KCIVN1yWj3+apSNPfk4/v4s1D6YjINwIabuf7y/Ys1N8vNKUY9YHP/qS/qR06YGQ3RlmB3De7gVObenz+acc3nahF68K5wrYCPx+gHTtevN0/FTHZgW0qj+fhBpHMzwHSi7e6ZVfXeGaaphrHaYBo3S61hTrcvKErtfZFcRZam28eMes0d87mF6dndQ3h5EDTRsEebl3o153lN+Gic/C8eHHcjRqLNyfEC/tRCsNpv4k6Z5p4jdKQZfdPLn6H/Oz2uNLrj28HdvNItFHETT05qcLGfG0MkqjHF3DTCMUWjrXHi9ofn6FcxioIwT6XhP9YYdPV/rgfguPhIOCmeZr0jzqUs2V/6Qdp3zIRSX77jEvqBoKHqD5hKMTOVny3jSbVPd2/Fd2PlN2uH/iGmS+qQLiDTWZzgZMmq9R+H//i465/Jcc/24aBx/+W4hZxdttefUQ1k4mBZmwC96iTrcnzTw0rLxMTsRI+6ffFvHNRf6TWG4N+dgosB57v4eO+/xkazuaupZ8241eddP/PrPwD7W1uPe4/dizcWQIVNuLsLJvWGh6mMmdvklFXxfbmpqXNtaQjKxKsf1olYYu3y9upFL9tq8+ZK3acQLJC/XZ+eL3jyNdofhSJmizFcsPIGh/ArdZMoJKwrfmZ3A4CEIAABCCwMQII28bQcmMIQAACEHgNAgjba1DnmRCAAAQgsDECCNvG0HJjCEAAAhB4DQII22tQ55kQgAAEILAxAgjbxtByYwhAAAIQeA0C1GN7Depde2b6x8P6kw/zSbR6nwosrrdWCUfqR+9F33usdK8VTkp/4WKFW9W4NPUDc+9PbsLzC89LHs/7zmHQOPf6lvAvgpb4SVJ4Uv0fedfoEk5tNQHqsbW6e9rVuMyHams0L/iRakm9taq3qv2ptao31vPqfcuyxo3XdWr4abrpwW2yxEvu/X3fR0wez3At+AzeJvmvgindd21t5yo2cm11AtRjM1UAqMdWyWNWFbaxVkIrqrfmrScWtrBwwPLVI8t88sup1xXXx0tiSHxyyxuxFH9yLYqIhvbbbctPihUUXS3qjPgLFvrJt8w3LxP2mx8ST0XOtWyURtbBH8/xJdeSr/ub2xSVkyrkH0WHJ/rFtButcaafi7rTpplPq+XU1Gtazy3NrP4khXpulQaBjpxEPbaw3pLvI6ZVPrLb/Ov+5oPCJfXswgHl1eqxhc68irD56q357I/ep6KB1Xe9r16XuX+VwbDw+SUfyY7qCy4/IpytJ+cfL9yyN+YjvR+dWoAm+tIP7AYfKA5UzH63U6tovATC5jue/N5h2deFGvF3arm9+2i+B2nKKmml1otk6RfT7rUIW63KAJa8zz98/kU9N78Hb/MM6rFVETZv2ZZwUuwpNNrZemxrEbakWyfqrVWoF1YqbN7rfWk5e/fGwlbBP3wTJ+9Lb74xGVa0Xw7E4eed8r4/6aYSfccTkViDiM3HP9WWqFxL4TcUvTDKT6h/3wplt6jntmKvbPdy6rFtUdg6W4+tQNjqDyCuc7v11qoJTxCL5KbCfNf76nW1X9iS35oMOUZfhvcJl+94IdfsYNSI/1aFLb8yefmw6vMPn38FAONCpEVRLfXctidu1GOrImzBbH6367FFUcJTyCsSmYRYF6aS/PXWvPWywneibNAorAeo1/rqddmIrbgeW2nE6PGPKBVZlkq29y9KxeUNvO4A7ks1+o7nTxjyIthG/CsL2xpSkQ3SkNa3qee2PdnZ/JOox0Y9tri8faG7ZWqFLc9M1jQrqsdVXm8tGtSL67nl11MzBdyWdc389ciudN3pNKy7Z8pAJ+t1mf0VZfXitA5hBlDy+e79h7pVfqrrW6bmmq9eV2k9s0Sar6CeoakLZ9bRtLCmNS/cPHKof4+27OdtHgmPPx/fxvX+kiZG9q3CX5fStABdwM5EmEcftB7dTVBvLapTtvSh1eq55U+2qg6iqXqD1HOrCq6V51X+gTb12FrZfzQKAhBoPQHquW27iyoJG/XYtt0tPA8CEOgPAeq5bbsvKwnbthvF8yAAAQhAAAJNCSBsTclxHQQgAAEItJIAwtbKbqFREIAABCDQlADC1pQc10EAAhCAQCsJIGyt7BYaBQEIQAACTQkgbE3JcR0EIAABCLSSAMLWym6hURCAAAQg0JQAwtaUHNdBAAIQgEArCSBsrewWGgUBCEAAAk0JIGxNyXEdBCAAAQi0kgDC1spuoVEQgAAEINCUAMLWlBzXQQACEIBAKwkgbK3sFhoFAQhAAAJNCSBsTclxHQQgAAEItJIAwtbKbqFREIAABCDQlADC1pQc10EAAhCAQCsJIGyt7BYaBQEIQAACTQkgbE3JcR0EIAABCLSSAMLWym6hURCAAAQg0JQAwtaUHNdBAAIQgEArCSBsrewWGgUBCEAAAk0JIGxNyXEdBCAAAQi0kgDC1spuoVEQgAAEINCUAMLWlBzXQQACEIBAKwkgbK3sFhoFAQhAAAJNCSBsTclxHQQgAAEItJJARtjuJ3tyeNPKttIoCAQEhpfPMn//GTQgAAEI5BLIFbbz/e4OHEaYu9x+n5/23T7s9xHgOAQg4COAsPkItew4wtbviUvL3I3mQKCTBBC2jnUbwoawdcxlaS4Etk4AYds68tUeiLAhbKt5EFdDoP8EELaO9THChrB1zGVpLgS2TgBh2zry1R6IsCFsq3kQV0Og/wQQto71McKGsHXMZWkuBLZOAGHbOvLVHoiwIWyreRBXQ6D/BBC2jvUxwoawdcxlaS4Etk4AYds68tUeiLAhbKt5EFdDoP8EELaO9THChrB1zGVpLgS2TmCNwraQq8lYTm8+BUYMTy5ldv1etv1Fv+YDfzva7/OAvtu3Oft9d+Y4BCDQFwJrEjYVhdFATg/u5Pn6rYrZQu4nAzl8OJG7+bW83SKtZgN/e9rvQ9V3+zZjv++uHIcABPpEYC3CtrgayeD2WJ7nboRmxeL2OPqgcjYimp69l7cmpLufyF5BSYGXl5davJsM/L72z2Qsg1MbiWb+nNzJnRzmVEQYysndXFTnwz9J++0/DuXlZf7q9k0fdRKSqeiQav/iXibjQwkDchOSy91MJy2p/gu+vP/uo4wGpxIQUz4vRx9etX9rAeZkCECg8wTWImxBqRsd3l+Wo3gAZvnvIpM9HRR1kEtEdDc6OL7o4GiE7Xw/EMbn+F6DQBjfzzcvbP72G3VKC7Vr31vHVqtkyXuGEaFcLsU/FPNtCHcV+9LnJP6+uAqE6uDuWYXaJpeDycCpyOXzXEwFmcwzAvukFf3b+bcUAyAAgVoEtiNswYw9HOTi5mkEYP9RrqUnwpaKek40erk2o34gDLdyHIqARWDsP5frLURslYWtoP1WxPIj1hPTf6rl+XX82jFxqfVGcDIEINB5AmsRNl8qb/7molzYnEW4okG4KulNpCJtUctsxOa2KdNuFbOJitm+ETPJE7aqFiXP25R9Ze1/99EI24GNvgqaXRqxOde8Rv82I81VEIBAVwmsRdhs9FGSasw9PtZ1nexg+ToDn6/9QfIttWaYFZxEOjYRpaU3p0T3G2uqdfNrbP7+yUkluu0PhFnXzOJUstLQVONYF+YO3IjNTUe7qUiEravjA+2GQCcJrEnYzLivEcr4NN5ckNnur5sPri7Olz8HGF7KdBZuHgkyc9kNJMFGhCBaqv6nSUQT3L2k/dlUXJhiC5uVn4Yz+yvuZB6vO2Y3jxhGc/1JRJ0/m7CvUvszm0eGMjw4Dn7SEayLhmnMoM+CCD3+B7uu+Nr9Wwcy50IAAp0msD5hCyMauxRjdtTN5OxJdxM+TjObSjZJrPHA35L2+9j03b7N2e+7M8chAIG+EFibsJnU1CCzZzy95X3z2JoO/G1pv49Q3+3blP2++3IcAhDoD4G1CVtbkDQd+NvSfl87+m4f9vsIcBwCEPARQNh8hFp2HGHjW5Etc0maA4HWEUDYWtcl5Q1C2BC2jrkszYXA1gkgbFtHvtoDETaEbTUP4moI9J8AwtaxPkbYELaOuSzNhcDWCSBsW0e+2gMRNoRtNQ/iagj0nwDC1rE+RtgQto65LM2FwNYJIGxbR77aAxE2hG01D+JqCPSfAMLWsT5G2BC2jrkszYXA1gkgbFtHvtoDETaEbTUP4moI9J9ArrAVFLPuPw0s7ASBJh/H7oRhNBICEFgLASK2tWDc3k2I2IjYtudtPAkC3SSAsHWs3xA2hK1jLktzIbB1Agjb1pGv9kCEDWFbzYO4GgL9J4CwdayPETaErWMuS3MhsHUCCNvWka/2QIQNYVvNg7gaAv0ngLB1rI8RNoStYy5LcyGwdQII29aRr/ZAhA1hW82DuBoC/SeAsHWsjxE2hK1jLktzIbB1Agjb1pGv9kCEDWFbzYO4GgL9J4CwdayPETaErWMuS3MhsHUCCNvWka/2QIQNYVvNg7gaAv0nUFvYFvdXMj4/lU+fFM7wUp7n7+WzSpzuZTI6lBtznQzl5HIm1+/dKxdyf3Uh56c3Etz65FJm11XvvWxA04F/sbiX548f5Pz2RuT4WeaJtlUyUBZXExnr9Z8+DRXNLHUPn/3VntHUvip3L2+/7w7+/rufjOTQOoD2753279uKvrN6//paz3EIQKA/BGoJmxn4LuRIzt7pgFRNzWJSV6ORPE5VzN7qhYuFXI3H+ve5/t2esrgayVimKgb2H+717+eSFgc/+JUH/vuJjJ7O6gtb+jr9+0SuY/t89vsts2esbF/Rgzzt97XP2396/73zfXme6WTF+I5OJO6f38rbsP9994+Ob8z+qg3gPAhAoPUEqgvb4komF2/kOlKiFU0zA+HFm6WwpW/XNWEz0cjT2VziQE95jZTXvICXz/5i/dlMKq5u+33dn+6/rL0mgn2Sa4346/xB2OrQ4lwI7CaB6sJmZvQf9uXg4dSmE4cncje7FhOA1f5jBv2xyCyTxtRIbjSQU72/SVUViULZ81Ye+BpGbLnCoDbO8wbuQvv9JFe2r+ARtdpf2MyS/ktEbCZtOZbD0wO5e1Ef8psdn7Ep+2s0gVMhAIGWE6gsbGbGPVDFWdbC0kHs6qO8e19zHcxEfuNHOZqXDGgmVXkxltv97qQiKwtDFftLnGZTA3vl9ldx6IL+i3zI3MKsoR48ePwg51mbsr+KWZwDAQh0g0A9Ybs9lhcnAskMhh6bg80Jj0fVNg2EUU1uxLPJgb9xxLYnH45e4jU1XTTMpCJr2V8YWW0qFelvfy2X9vYfqchaPDkZAhCoTKCysOlqf5AmfJw+hxtAdGAaP8lZIp24kMneQG5E05SJFJNeO9HNIhqBRTsh02suic0V+qz7yUAO5U5eaq7prTyjLxW2IvuUt4nEPr6L7TOi/+EoWkP021+1x1a2r+hBpe2PLiq2v0r/LfQ2NnNt+ncsT8on3CtU1fzNbZ6p3AJOhAAE2k6ghrCZ8ciIWbhlP3eNTY/v6fG0sJnZ+0B/IpCicXLnRjg2/Xj6StvBjWAc6k7/xB/9OYMboeqexHz7wotMRDbQnyuYP8uUrRU9r/0VPWVjwhY0s6D9cdtK7A/Tj4X9pz8TGR1aHxiq70wbrs9u0v6KXcBpEIBAywnUE7aWG2Oa1/eBr+/2+Vxs1+338eE4BCAggrB1zAt2fWDfdfs75q40FwKvQgBhexXszR+66wP7rtvf3HO4EgK7QwBh61hf7/rAvuv2d8xdaS4EXoUAwvYq2Js/dNcH9l23v7nncCUEdocAwtaxvt71gX3X7e+Yu9JcCLwKAYTtVbA3f+iuD+y7bn9zz+FKCOwOAYStY3296wP7rtvfMXeluRB4FQII26tgb/7QXR/Yd93+5p7DlRDYHQIIW8f6etcH9l23v2PuSnMh8CoEELZXwd78obs+sO+6/c09hyshsDsEELaO9fWuD+y7bn/H3JXmQuBVCOQKW+ZjwK/SNB4KgXwCiQ9MAwkCEIBAikBG2CAEAQhAAAIQ6DIBhK3LvUfbIQABCEAgQwBhwykgAAEIQKBXBBC2XnUnxkAAAhCAAMKGD0AAAhCAQK8IIGy96k6MgQAEIAABhA0fgAAEIACBXhFA2HrVnRgDAQhAAAIIGz4AAQhAAAK9IoCw9ao7MQYCEIAABBA2fAACEIAABHpFwArbFz6XvfQHIocncje7lref9cpejGlC4H6S9I/hpTzP30tV11hcjWRw+in7ZL3Pi95nO38WcjUZy+mNbcfw5ETkYV/m8fMXcq/HD+PjlzK7Dm1c0f6q9i2uJjK+vZFPn4YyvJzJ/H1VwlWfwHkQ2A0CccRmBp+LN3O5fmsNX+jLPDjf3+LAsxvAu2zl/WQkT2dzaTLeGv8aizNYL65kNBZHWDZLJvBvff512PjF/ZWMz5fPN7ad709VTOwLEPj/ocjdi07uwqatYr/XOn3e6OlsKWb694lcx++j93pOgAAEYgKlwjb+cCRzVbqr0Z6c6izy8vJAbk91RmmnvHKpEeQxc0oAAAdHSURBVF08yC3uZTI+lHDCq4eXM157vV5y+Zx4cW2UqJFhOHiYgSOaMUctPLl78b/cZpAcnNp2xX+0vc92EI6eLyd38hIqtyl/YoNUPe/uWG4P09eHx8J76FCXnPFrtDHV2X406Ol0Pxv1mrsbm999DNsXtkmi9i7bqCNpIT+J7cu/XsaWb5JlaF/C5oZ81zCwL4XtWSajJ7l2IzWn/4L+1iHd+kZFPlaKEhGXglfPupX9mfUB+/ypzFS4MnGQef7Fm8DX3T9pMfYL20ImewO5cXy66liTuXdBm4rvV25/Nf8yLmTeEdE+Mu+y5f/mIvQlJ8KO3x/zbzPx+3fZ+9FkplQVLOftJIGEsCXTRc6gomiMONweqFidaXomGBl0oB9dyJu5ndFeTSby7vp6OWiYgfpCBzBN5wQD8/hRjvU8e7699vHgQfajCCCcwc/CFFdmhu/rnvRA4M6AC6IDdzBJR6xGqNwZ9NVoJBIOknYcNUL0JGdOSi7R5tT13vuX8TOPS0XUZe0LUn+3KgsHGoHEIbiNkBrz1Tb4B/aSYddNR+alIANxu5VjM5EIhD/8/1CFSv0rbNuHI43Ioty56Z/Buew7ExOTajzXmZeZAwQTr8iX09FSZEbq3/32r1nYakS0pm1l9vv4Be+oEfczFTWdoD4cP8v0cRxH6Bn/F+WrE5TI/33+GbwybtRuhE4nztFE0/d6cxwCdQgURmx24NaBIRzMs47tDLaDvIjJNCOMxiJhmT7KSJ15tn8epKXcF8eK3woDbyZqc2f7yfZF0eSzk1orfTELZs/pgc4nbOl1pjiCzY04HX7hoFB4fTDxCIX32UQ7mkJ73pdzNwpZle8ahM2mInMitshj1edGmv/75EZqdkTMichdPnaQTUSBnrfATbUXTqJqC1udVy95bm7EVlnYPPZ7+SUZDzVqm+mEKBHZpt4BK6TO0kXOOmq6bh7C1tw/uLIegWJhS0UJpcL2tsKLFb6kQbrx4TjYfOAKix2/dPE8SnWaWbWbuvTZlREfJ6JMRWx2PSUprNsQNncNMxlx+Qdm34w46J+pSak6UU8qvbYS3xxhy7SppI+qROB2XetBhkORg6kTfYXRQbFwJaMHn6vY43rN3gc5MmnwkomLO3jnTWQSfVrtwblnmdTehyMn7V4rFemz3+9fccSmglbUV7GYmYlsSnR9/mnfb2cdn4htBW/hUh+B8ojNrp4Ha1y+VGR68T3x4AqpwChClHBAqzIQZp6RGsivVMA0V2JTW86LWFvY9EFlqciPYbRk1iLiwalmKrKUX3pQCMbldKo0tY6ZHhjDCLwx30rCVpyKy+vPq9EkTmXb9OlBuBPXDMQ2HRbtDPTxMcJwvr88f6H2XmhKTabGf42Iafbhbibv41Rlcl0tff97bc/hrZ2ARZGLX9iapyKNsEw+vos3t6QjIt+LXG6/TSO7m2My90v4i9qhL0yUrVmeawVyX9cuE2n5Cv5p32+dSIRLF8GadCYVuQI/HyCO7xSB4u3+qYjJRgRTeTwPN4hkfg6QXrzWLcu6xjM7e5JxvLEjSg+agUbvE6Bebt7QlWo7kDkLzc03j5h1lDtn84vTr2ZjwcGp3ISbR8zO75tw10ty84IbNRZvHokW0uMUjtN+E3XONPEapRHL7u9uNzdhS8DPzipKrz++HdjNI9FGETf1ZP5N+8BsrmnMt2Dh3xBN9k/Ur8sNQdFMPXe7f5iqHnjss+JW4F9xyizZP4bfpU6SrJBZYdPHxf1sNj/dRYNs4BrpnwOUbPd3XKmK/VVHFBNRDzRjEbwVdbIVOe1P2m/tK/Kvz9L+Ynwu6vPUemgwAXmcJtbG3J9z5Pm36/8ZFs7mJttPZlxI+k9VfpwHgYhA5R9o56UiwQiBPhEIorTE7+2GKtxuSrRP1taxJUxlzt4ko66KtyhMWZOOrEiQ0+oSqCRs8XZ5O5Xkt211KXM+BDpNIIqkjNAvN4x02iQa32sClYSt1wQwDgIQgAAEekUAYetVd2IMBCAAAQhYYfu/+qvM8M/e3/03qEAAAhCAAAQ6SwBh62zX0XAIQAACEMgjgLDhFxCAAAQg0CsCCFuvuhNjIAABCEAAYcMHIAABCECgVwQQtl51J8ZAAAIQgADChg9AAAIQgECvCCBsvepOjIEABCAAAYQNH4AABCAAgV4RQNh61Z0YAwEIQAACCBs+AAEIQAACvSKAsPWqOzEGAhCAAAQQNnwAAhCAAAR6RQBh61V3YgwEIAABCCBs+AAEIAABCPSKAMLWq+7EGAhAAAIQoNAoPgABCEAAAr0igLD1qjsxBgIQgAAEEDZ8AAIQgAAEekUAYetVd2IMBCAAAQggbPgABCAAAQj0igDC1qvuxBgIQAACEEDY8AEIQAACEOgVAYStV92JMRCAAAQggLDhAxCAAAQg0CsCCFuvuhNjIAABCEAAYcMHIAABCECgVwQQtl51J8ZAAAIQgADChg9AAAIQgECvCPwDsbOA5BLhuNkAAAAASUVORK5CYII=[/IMG]
Изменено: Алексей Демин - 03.02.2025 17:22:48
WayTree. Дерево путей. Связанные по направлению
 
Добрый день. Есть необходимость нажатием макроса выводить в окно сообщений нагрузки связанных по направлению после узла. Написал вот такой макрос. Он хоть и работает, но на большом числе объектов - не достаточно быстро. Возможно существует способ более быстро решить данную задачу?
[CODE]Sub WayTree

Set Out = Zulu.OpenOutputChannel("Сообщения")


Out.Clear


Set L = Zulu.ActiveMapDoc.Layers.Active


L.Selection.Clear

CurrentSYS = L.CurrentID

Out.Put Cstr(CurrentSYS) + Chr(10)

set MWayTree = L.GetShortWayTreeEx(CInt(CurrentSYS),2)

Out.Put Cstr(MWayTree.Count) + Chr(10)

For i=0 to MWayTree.Count-1
   
   L.Selection.AddElem(MWayTree.Item(i))
   
   
   Next
   
Lname = L.UserName
Set Rslt = L.ExecSQL("CONST @Layer = '"+Lname+"'; "& vbLf & _
"SEL ECT Round(SUM([Расчетная нагрузка на отопление, Гкал/ч]),2) as Qот,"& vbLf & _
"Round(SUM([Расчетная нагрузка на ГВС, Гкал/ч]),2) as Qгвс,"& vbLf & _
"Round(SUM([Расчетная нагрузка на вентиляцию, Гкал/ч]),2) as Qвент"& vbLf & _
"fr om @Layer as L "& vbLf & _
"where geometry.selected()=1 and L.typeid=3")

Set r = Rslt.DataSet
Out.PrintDataSet r, 8 + &H100

L.Selection.Clear

End Sub
[/CODE]
Вычисление площади поверхности земли. TIN
 
Отлично. Большое спасибо!
Вычисление площади поверхности земли. TIN
 
Добрый день. Просто хочу уточнить. Вопрос остался тот же. Не появилось ли какого-то способа автоматизации функции "задать регион"? Или может быть появился другой способ расчета площади поверхности земли с учетом геодезических отметок слоя рельефа?
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
IntersectByRadius действительно оказался очень полезным. Часто бывает, что в площадном объекте лежит много маленьких участков, но этот метод как раз помогает, если добавить условие "если число объектов полностью попавших в радиус 2х метров <1 = истина". 2 метра радиус хорошо подходит. Ну это конечно, если в исходном слое есть узлы. В слое, где 8600 домов без метода IntersectByRadius, получалось 1800 домов, где были созданы лишние потребители, с этим методом их было меньше 20. Оставлю макрос на всякий случай.


[CODE]Sub create_obj_in_line

Set Out = Zulu.OpenOutputChannel("Сообщения")

Set L = CreateObject("ZuluLib.Layer")

Set Line_ob = CreateObject("ZuluLib.PolyLine")
Set objz = CreateObject("ZuluLib.ZPoint")
Out.Clear


L.Open "..."

Set Keys_uch = L.ElementKeys.SelectByType(7,0)

'L.StartSequentialWriteMode

For i = 1 To Keys_uch.Count
   
set Line_ob = L.Elements.getElement(Keys_uch.Item(i)).PolyLine    
Point_X = Line_ob.GetX(Line_ob.NumTops)
Point_y = Line_ob.GetY(Line_ob.NumTops)
sys_polygon = L.GetClosestElementByXY(Point_X+0.000002, Point_y, 0, False,objz)
If sys_polygon > 0 and L.Elements.GetElement(sys_polygon).TypeID=5 and L.IntersectByRadius(Point_X+0.000002,Point_y,0.00002,1,0).Count<1 Then
       L.AddSimpleSymbol Point_X+0.000002, Point_y, 0, 1, 300, 0
       'Out.Put Cstr(sys_polygon) + CHR(10)
       Out.Put Cstr(sys_polygon) + CHR(10)
end if


Next
   'L.FinishSequentialWriteMode

Out.Put "Готово"
End Sub
[/CODE]
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
Понял, спасибо!
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
Изначально пробовал в разных слоях - результат был тот же. Сейчас попробовал прибавлять к координатам небольшие значения, чтобы сместить точки - не помогло, результат не изменился. Посмотрел какие сисы он пишет в sys_polygon - действительно, пишет все подряд, не только полигоны, а что попало под 5 пикселей вокруг точки с учетом масштаба. Что делать с этим масштабом, где его указывать я не разобрался. За то нашел метод GetClosestElementByXY. С ним все работает как надо.
Изменено: Алексей Демин - 25.10.2024 19:26:01
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
Увы, работало только на тестовом слое ~500 объектов нормально. На "боевом" почему-то из ~7600 объектов проставляет то 1059, то 1060, то 1063 символа. По разному пытался сделать, но никак. Вот стоят рядом 2 одинаковых дома, в один ставит в другой не ставит.

Вот сам макрос
Sub create_obj_in_line

Set Out = Zulu.OpenOutputChannel("Сообщения")

Set L = CreateObject("ZuluLib.Layer")

Set Line_ob = CreateObject("ZuluLib.PolyLine")    
   
Out.Clear


L.Open "..."

Set Keys_uch = L.ElementKeys.SelectByType(7,0)



For i = 1 To Keys_uch.Count
   
   set Line_ob = L.Elements.getElement(Keys_uch.Item(i)).PolyLine        
   Point_X = Line_ob.GetX(Line_ob.NumTops)
   Point_y = Line_ob.GetY(Line_ob.NumTops)                    
   sys_polygon = L.ElemIDByXY(Point_X, Point_y)
   If sys_polygon <> -1 and L.Elements.GetElement(sys_polygon).TypeID=5 Then
       L.AddSimpleSymbol Point_X, Point_y, 0, 1, 200, 0
       Out.Put Cstr(sys_polygon) + CHR(10)
       end if


   Next
Out.Put "Готово"
End Sub

Вот как это выглядит
[IMG WIDTH=569 HEIGHT=367]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAjkAAAFvCAYAAACo1NoaAAAgAElEQVR4XuydB2BVRfbGv/Qe0nuoIXTpKojKuupaUNC1snZd9a+ya9lde+9lsaCuva6I4iooooIVRER6LwmEkkJ678nLf+a+JAQM5JVb3r3vuy77Xt6bOXPmdybcj7kzc3zaxAVeJEACJEACJEACJGAxAj4UORaLKLtDAiRAAiRAAiSgEKDI4UAgARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnfI2AjNWzoK/rx/8xJ+A9tdAX38E+gaIz33FZwEI8Q0U7+Vnfgj1DUZQ+/eyvCzX8SrrBSjf+cPfR7z62e10fO/n4+tteNlfEiABkxKgyDFp4Og2CXQQaGlrxT9Wv4Lkkf1hs9nQZmsTf8RrmyhhaxWfiTfij3xVPu/y6iO+8rHJcvI7eznlVVSWr7b2+q3itVXUlT/LS4opKaqkGJKvdjFl/7lDPMnPgsUfKZaCfYMUcSU/6yqiOsSUFGHdiS1GmQRIgATcIUCR4w491lWVgJyNsOo1a/wMzbrW2NqMO9a/rogcPa42RQBJsSS0kCJ8bBB/kXQjooRmkqJIlLPJwkI0+dt8O4WYXVyJ+u32pB35xy6mbGgRdbXk1pWVlceeWmNCr1h0568cc39b9aJaXbGsHSNjpDdUR39nKXL0jgzbOywBOWjTxwy0HKGC9bvwxKi/ihmOAE36VtfaiHvXv4XEkf00sW+EUXlTK1i3C8+Nu1Hz5pttLfjn2teQMkofkah5hzRoYN+aLN0EZ3fuVzTV4JEtHyBhRB8NemcNk0bHSG+Kjt4vKHL0jgzb8zqRU7xxD+4ddikiA0I1iX51cx0e3Py+pW4Aba02FG7ajZljbtCEWVejikjcIETiUdYRiWpDM/oGure2CK/s+RJRg5LV7ppl7BkdI71BUuToTZztuU3A0UHrdkM6Gyjdkod/ZJ6H+KBemrRcLv6V+/jW2Ygb3lsT+0YYtQmRU7JpL54Zc73mzVc21eKRrR8g3kL81IZm9A10Y/kuzC1ehvAB8Wp3zTL2jI6R3iAdvV9wJkfvyLA9r5vJKd+ajxv7n4W0UG3+gi5prMTT2+cidliaZUaXrbkFZdvy8dSoazXvU2ljFZ7a/rGl+KkNzegb6LKiTfimdj3Ce8eq3TXL2DM6RnqDpMjRmzjbc5uAo4PW7YZ0NlC5Yz+uSjsVAyJSNGl5f30Znt/5GaKHpGpi3wijLU0tqBbcHh95jebNF9SX4vnseYgZah1+akMz+gb6Rf5yrGzbjfCkaLW7Zhl7RsdIb5CO3i84k6N3ZNie183kVGcX4uKkyRjaS5tFk/niJj1r5zxriZzGZtRmF+PRo67S/DdmX10R/rOb6z2OBNroG+i7uxdhV3A5wuK1eeSr+SDToQGjY6RDFw9qgiJHb+Jsz20Cjg5atxvS2UDNrhKcGzcBo6IHaNKyFRdlNtc3oXF3OR4afrkmzLoa3Vmdj7dyF6FXZpLmbZm1AaNvoM9nfYqKGBtCosLNilBzv42OkeYdPKQBR+8XnMnROzJsz+tmcmr2lOLMyDE4Jm6IJtHPqSnAG/u+sdRNurmhCc05FXhg+GWaMOtqdHvVPryf/z0iByZq3pZZGzD6Bvrwlv/CJz0CgaFBZkWoud9Gx0jzDlLk6I2Y7alNwFFlrna7WturyS3DySHDcULCUZo0lVWdh3dzv0VkpnVu0k11jcC+Gtwz9C+aMOtqdGNFDj4uXIqIjATN2zJrA0bfQP+17jWxfTwF/oH+ZkWoud9Gx0jzDlLk6I2Y7alNwKoipzqvDCcEDMIpyWPVRqbY21q5F7P3/2ipm3RTbT188xpw15CLNWHW1ejasmx8VrYc4f202f2meQd0aMDIG2jHacfpo8VBoT46dNakTRgZIyOQOXq/4OMqI6LDNrsl4OigNRu+6oIyjPfph7NTJ2ji+ubK3Zizf4mlRE5jTT2CCprxr8EXaMKsq9HfSrbhi8rViOjL7cmHg23kDZSnHTv2K2BkjBzzUN1Sjt4vKHLU5U5rbhBwdNC60YQhVasLKzC8JQkX9p6sSfvrxUFp/ysRB6X1t85MRH1VHSKKbbhVHKKo9bWsWJzBUrNBnMESo3VTprVv5A3UigvrtRgIRsZIi/70ZNPR+wVFTk8k+b1uBBwdtLo5pFJDtSVV6F8fjcv7nqKSxYPNrCnLwryyFeJxS5wm9o0w2lBVi17Fvvh75jmaN/9j4Tp817AZEWmcyfHEmRyeduzYrwBFTvecKHIcGz8spQMBq4qcuvJqJFeF4rr+Z2pCUT5uWVC1GuF9rHOTrquoRXx5AG7MOFsTZl2NLi5YjSUt2xGRwpkcTxQ58rTjReK04zCednzE3wWKHIoczf+yZAPuEbCqyGmoFLMSpWJWYqA2sxLLizdjYfU6RFhJ5JTXIKkyGNcPmOLeoHKg9pd5K7C8bScikylyPFHk8LRjBwaxKEKRQ5Hj2EhhKcMIWFXkNFaLRbT7tVtE+7OypkSInN7WeVxVW1qF3rURuLrf6ZqPx89yf8Zqn32IZMqAw7I28gbK044d+xUwMkaOeahuKUfvF3xcpS53WnODgKOD1o0mDKnaVNfQfubLJZq0/1PhenyrrCmxzkxEbUkl+tVF44p+p2rCrKvROXt/wOaA/YhIYF4kT5zJ4WnHjv0KUORwJsexkcJShhGwqsiRKQoacsrw8IgrNGH73f41+LFpGyJSrSNyaoTIyayPxSV9T9aEWVej7+/+FlkhpQiPY14kTxQ5PO3YsV8BihyKHMdGCksZRsCqIqe1qRlVWUV4/KirNWG7KH8Vlth2WGpNSU1RBYY2J+Ki3n/QhFlXo2/s+gr7wmsQFhuheVtmbcDIGyhPO3Zs1BgZI8c8VLeUo/cLPq5SlzutuUHA0UHrRhOGVLW1tKJ4Sy7+Pfo6Tdq34sLZ6sJyjGpNw5/Tj9eEWVej/9n5BQp7NSI0mskfPW0mh6cdOz78KXI4k+P4aGFJQwhYVeSgDchbtxPPj7tRE67z837ByrbdlprJqVJOie6LqakTNWHW1egLOz5DeZzIcN0rTPO2zNqAUTdQnnbs+IgxKkaOe6huSUfvF5zJUZc7rblBwNFB60YThlXNW7sTM8f+H/x8fFX34X/7lmKdXy4iEq2zcFaKnIk+A3BG6jGq8zrU4DPb56Iu0Q/BEaGat2XWBoy6gfK0Y8dHjFExctxDdUs6er+gyFGXO625QcDRQetGE4ZV3b9hNx4RC49D/YNV90HuDtoSUIjwhCjVbRtlUIqcE3wzcWrKOM1deGLrh2hOCUZQeIjmbZm1AaNuoDzt2PERY1SMHPdQ3ZKO3i8octTlTmtuEHB00LrRhGFVSzbvw52DL0J0oPqLWz8Qu4O2W2x3kMzcPjlwMP6YNEbzmMndO769wxEQor4A1dx5nRow6gaqx2nHqx97GGPvulcnkto1Y1SMtOvRkS07er+gyDEqQmz3dwQcHbRmRFcmFh7fnHEukkLU3+b9Ts4i5ISWI8xCW6Crc8twcvAwnJg4UvNw37fxXQT1j0JAcJDmbfXUgKfecI26gX6R/6tYb5aDcA0PavRU5j2NlUO/NypGzvqpVnlH7xcUOWoRpx23CTg6aN1uyAADFdvzcV2fM9EnLFH11t/M+Qp7w6rFFuhI1W0bZbBmbylODR+JSfHDNXfh7g1vITwjAX5B/pq31VMDnnrDNeoGqsdpx57KvKexQpEzC+ljBvaIiSKnR0QsoBcBK4ucqh2FuCz1j8iMTFMd56s7F6CgV4OltkBX7ynFGRGjMCF+mOq8DjV4+/rXEZWZDL9AipzDwTZK5Ohx2jFFjua/Ypo04Oj9giJHE/w06goBRwetK7aNrlO9sxgXJkzC8Kh+qrvyUvbnKI5uRmiUdbZA1+wpwZTIcTg6brDqvA41+I+1ryBuWG/4+qm/881Z5z31hmuUyNHjtGNPZe7s2DEqRs76qVZ5R+8XFDlqEacdtwk4OmjdbsgAA9W7SzAt+miMjclUvfXnd3yKyvg2BEdaSOTkCF4xx2BMTM/T0e4CvXn1y0g+qh98fH3cNeV2fU+94Rp1A9XjtGNPZe7sYDIqRs76qVZ5R+8XFDlqEacdtwk4OmjdbsgAA3KNyWnhozBRg8cvz+74H6rifRASaZ1zXmp2FePPccdhZHR/zaMlx52nXEVfz0HCaRd5ijsH+TFr/Azd/VJiIw7ThIb605OZOwvciBg566Na5R29X1DkHELcJn6jbDYblNc28drWJt61oVW8V15trcp39vftn8nvRDn5k1JOvO8o3529A7alfXtbXevIuge129WeeN/U1ooW8V9H+zbRB5v4TPGh3Z6s39TWLGyLvyPa+yN9lp8rtjvL2dAi3stL2pN/o3T0Tb5vFWXlq72OvY9tNnsZtX+hHB20av2S6GlH7hY6KWgo/pA0SvVmn9r2MRqTAzQ758WIf+lWZxfhoqQTMKxXX9V5ebLBCx8+Dh/du8yTXbScb2RuzpA6+o8Tipwu8ZXQfOR/YtraV776iH8+tP8Lwrf9pFpfX+UbpZZ8Ly9ZzubTZq8r3stqslRH5Y5p8FZZpt2evZy0by+p2BHtNkOIFfmx8qHdlmK5y8+ynpQevvK1w8VOe3ZrSnn5meLogX8GdfRJaV/Kl3Z/pSF7F9vrd+mb3aC9n/aO+yB/bbY4wfcGVU/wtbLIkYfbHec7AKenqH+C72PiMDtbajACw7Q5zM4okTM9aTKG9Ord5TfU+m95w9U/xmSuP3M9W6TI6ULbyjdZtQdVgcjF9KRIOBnoq96OFD35633jrtpfjjG2NJyrQcLJR7Z8AKSHIzBUm3Ne9GYlx6rcjXZ52skYGJGq9tD1aHu84eofHjLXn7meLVLkUOS4NN4K1ufgsaOuQoi/ejdWK4ucmuIKDG5KwPTeJ7nE+0iVHtj0HgL6ycPsAlW3LQ0aIXIqd+zHNel/Qr/wZE365KlGecPVPzJkrj9zPVukyKHIcWm8FYpcTA+JXExhKuZisrLIqS2tQp/aSFzV7zSXeB+p0n2bxIm9faNFWgLriJyK7QW4Xhye2DssQXVenmyQN1z9o0Pm+jPXs0WKHIocl8Zb0cY9uG/YpYgMUG9Hj5VFTl1FDRLKg3BDxlku8T5SJXlib1hGPPyDAlS3bdRMTvnWPMwYMA0pIbGa9MlTjfKGq39kyFx/5nq2SJFDkePSeCvZtBd3DpkuEk6Gu1S/u0pWFjn1VbWIKG7DrZnnqcarw9Cd699ARGYS/DU6sdeIx1VS5Px9wDma5PpSPQAqGuQNV0WYDpoicwdBmbQYRQ5FjktDt3RzLv456HzEBfVyqb63iZzGmnr45zcIYXixarw6DMkD02IGp8A3QL1F4F2dNELkaDG+VAevgUHecDWA2oNJMtefuZ4tUuRQ5Lg03srEv7RvEVm1E4OjXarvbSKnqb4RrburcP/wS1Xj1WHoH2tEWoLh2qUlMELkaDFTqDp4DQzyhqsBVIoc/aF6UIsUORQ5Lg1H+Tjhb+JxQnJIjEv1vU3ktDQ2o25nCR4ZcaVqvDoM3bLmZSQN7wsfjXIvGSFy5Jqv+8WarwgV13ypDl4DgxQ5GkClyNEfqge1SJFDkePScKzYlo8b+p2NtNA4l+p7m8hpbW5F+bY8PDXqWtV4dRi6edVLSB7V/8BhjSq3YITIKRRHFDw88iqE+ql3RIHKWDQxR5GjCdYjGiVz/Znr2SJFDkWOS+Otcvt+XNvndPQJS3Sp/uFEjjzF2UccvSxflROb209m9ms/adpHvMrvZDIM+V45ZbrzpGl7nVYf8V1nffvJ0B2nNTf52lNY7Hz3Pxh45Y3K+87EjIo9+YH8I0697mKjw5795Gel0kF1O07Ktp8wLe2IM6m79EGm0SjctAfPjrlBNV4dhuSCbX9fP+UEbslJvionc7ezkv60CXeVk7zF+xbJQL6XfZD/E3XlW4Wn+FypJ17ladiy/Pp/P4HRt99l/77j1GvVe3GwwYL1u/DEyL8iyE+bHWMau++yed5wXUbnckUydxmdKSpS5FDkuDRQq8RhbVeJw9r6q3xYmz1vl03J/dX52p4zTCS8UHKHKd91ySPWKvJ2ydxaXet0vJd5uQ61I+u+/voMXHH1s0qdjnxk9bbGzvxjMmeXPXeZ3ZfGtpbOn+35vw7kMhPf2HOCKXnNZA4w6anMJ9aem6wjV5h4VTvfV0fwmmwtaLI1o1m03fHaLH6Wnzcr3x147Vqu3taEBvGno16DqNMibLSI8vJzmc8se/6bSD3zEqVfdg3np4gpP+VV5jDpEFRSTImet4skKaSkoJJiqkM8dRVRitBS6guRpWQ4sZeTwkqKnGfGXg9/Hz+XxqdZK/GGq3/kyFx/5nq2SJFDkePSeKsUx+5fYeJj9/kXm2Nhl8Jm+mMnYPZdSxRRIwVfV5HU1CpSxQoBeDgR1SGeGoVoqrM1iHJ2ASXFlRRhLUJESXuyvmxLlpevUmhpJQgd67kxpTgu9ecumT907efYur9EaXxIUhwGJXrX+Uz6U9evRYocihyXRltVViEuS/kjMiPTXKpvdCXeTByLwJqsZXhyzr9w+0VPYczA4xyrxFIuEzD7uCytKkJFTRkGpAx2mYGeFeuamjHlucdhixqJ2ki5vrANYVWlmJgSi3tOPQahgdZ+XGq2eLkyNihyKHJcGTeoyi7CX5JOFFmi+7hU3+hKZr+Z6MVv1mcP4udNizBpxKmYMe1+vZr12nbMOC7lzNv6nb9i8er5yuu5x1+B8064yhQxvGvBz/isxg8lGeMO8jdh51pMDWvCY1MmmaIfzjhp5ng508+OshQ5FDmujBtU7yzGhQmTMDyqn0v1ja5kxpuJ3syy87fg8dm3oaa+CuEhkbjj4mcwMHWY3m54VXtyXJrukqvt5SI0k11NvnHIi7wQORPO79bzfsvnIrXqIwTa7I+xLHOZNF6u8qfIochxaexU7yrGeXETMTJ6gEv1ja5EkdNzBHbmb8Pa7F8w96c3cf6JV2N0xkTTPIbouXcsoRYBs84MzFu/A49uLcLujGO6RdE3+zfcPSQO00YOUguVR9gxa7xchUeRQ5Hj0tipySnBtJhjMCZmoEv1ja5EkeN4BMjKcVbeXtJMazzmrd8uRE6JEDlHH0bkrBAiJ95yIqdrZ80UL1d/tyhyKHJcGjvVu0swNWo8xsWa8185vHE7HnaycpwVS5qHwPbCUlw3/2dsHnNGt04PW7MQr06dxJ1W5glpt55S5FDkuDSEq/eUYErkWBwTN8Sl+kZX4o3b8QiQleOsWNJcBOTC4/m1gSgaMPogx6288NhcEXLfW4ocihyXRlHN3lKcFj4KE+PNuRCVN27Hw05WjrNiSXMRkFvIH1m0Ar/kl4ot5PJsHB+xhbzEa7aQmytarnlLkUOR49LIqdlXilNCj8LxCSNcqm90Jd64HY8AWTnOiiXNSUA+uuJhgOaMXU9eU+RQ5PQ0Rrr9via3DCcFD8XkxFEu1Te6Em/cjkeArBxnxZIkQAKeRYAihyKnk0De2mzkrspSfk4bNxCpozMOO1qr8kpxUuBQnJR08LNszxreh/eGN27HI0VWjrNiSRIgAc8iQJHj5SKnSjyL/vjqmchavAbBvcJga25Pwhjgh4bKWgw8ZQwuePNWRIpjzrte1fllOMF/EE5JHutZI9pBb3jjdhCUKEZWjrNiSRIgAc8iQJHjxSJn1buL8dmNL6KloemIo9I/OBDnvHQTxl1+Sme5qoJSTPLNxGkp4z1rRDvoDW/cDoKiyHEcFEuSAAl4HAGKHC8VOVLgfHHrq8psjSOXnOU5a+Z1nUKnqqAMx/r0w5TUCY5U97gyFDmOh4SsHGfFkiRAAp5FgCLHC0WOfET1ZOZVPc7gHDpU5YzO7TveUh5dVe8vx9i23piWZsJcO5ydcOpvIYocp3CxMAmQgAcRoMjxQpHzxul3K2twXLnkGp1rvnoU1YXlGNmaivPST3DFjOF1eON2PARk5TgrliQBEvAsAhQ5Xihybvc/3a1R+GTLV6guKsfw5mRc2HuyW7aMqswbt+PkJatnb/gQKbG9Ha/EkiRAAiTgAQQocrxM5Mht4q+dfIfDa3EOHaNybc613z6BXmnxGNwYj+l9TvKAYey8CxQ5jjObt+w9yIzkt53/mOOVWJIESIAEPIAARY6XiZwVr3+FBbe9hqa6BpeGX2BoMKb8+1oMP+c4DKiPxmV9D+y4csmgQZUocpwDf+cbV+PMYy7EpBGnOleRpUmABEjAQAIUORQ5Tg0//wBfjDq9H/qPS+ys99G9y5yy4QmFKXKci8KGXSvx6oLH8dwNcxDgH+hcZZYmARIgAYMIUOR4mchR63FVdJ9EpFaH4dsPHgVFjkG/vTo3+8bCpxEYEITLTvmbzi2zORIgARJwjQBFjpeJHNldNRYe15XXILkyGN/Pfpwix7XfPdPVqm2oxi0vX4xbxdqcwelHmc5/OkwCJOB9BChyvFDkqLGFvL6iBnHlgVjy4ZMUOV7098b36xZgyfqFeODyl72o1+wqCZCAWQlQ5HihyFHjMEB5UnJUqS+WzXmGIsesv/0u+v3Eh//AUf3H4wyxEJkXCZAACXgyAYocLxQ5ssvupnVoqKpFRDHw60czKXI8+TdcA9/2FGbjnrevxbP/9yHieh1YgK5BUzRJAiRAAm4RoMjxUpHTIXRcTdDZWF2PkMIWrPz4OYoct34FzVl57k9vYH95HmZMu9+cHaDXJEACXkGAIseLRY7sunx09fHVM5U0D/KgP1tzq0LEN8BPOTBQprL0ibkAACAASURBVHG44M1blXxVXa+GmnoEFTRhzdwXKHK84q+K33fytlcuwYWT/4qjB5/opQTYbRIgAU8nQJHj5SKn6wCV28tzV2UpH6WNG4jU0RmHHb+NtfXwz2vAuk9epMjx9N9yjfxbteNnfPDtS0rKB14kQAIk4IkEKHIoclwal/LEZJ99ddjwv5dMJ3Jaba2Y/tgJmH3XEvj5+rnUf1ayE3h5/iOIjojDxSddTyQkQAIk4HEEKHIoclwalE31TbDtqcTmT18xnchZk7UMT875F26/6CmMGXicS/1nJTuB8uoS5eycey+dhQEpg4mFBEiABDyKAEUORY5LA7K5oQlNOeXY9tlrphM5sz57ED9vWqTkYeLCWZfCf1Clr1f+D6t3LMXdf3nOfWO0QAIkQAIqEqDIochxaThJkdOYU4btn71uKpGTnb8Fj8++DTX1VQgPicQdFz+DganDXGLASgcIPPT+DEwY+kecMnYasZAACZCAxxCgyKHIcWkwtjQ2oza7BNnz3zCVyNmZvw1rs3/B3J/exPknXo3RGRP5mMWlEXBwpay8zYp4fO7GOYgMjVLBIk2QAAmQgPsEKHIoclwaRS1NLajesR+7Pn/bVCKno7PMQu5S2I9YSe60qhH5ra6bcof6xmmRBEiABFwgQJFDkePCsAFaxXk65dvysOeLdylyXCJovUpy15pchHzVabdiVMax1usge0QCJGA6AhQ5FDkuDVpbSytKtuRi34L3KHJcImjNSsu3fI95y97Dk399x5odZK9IgARMRYAihyLHpQErRU7R5r3I+/K/FDkuEbRupec/vQ9p8f3w5+OvtG4n2TMSIAFTEKDIochxaaC22dqwf0MO8hd+QJHjEkHrVioqz8ffX74IT137LtKF2OFFAiRAAkYRoMihyHFp7LW1tSF/3U7s/+pDihyXCFq70hfLZ2NTzircOX2mtTvK3pEACXg0AYqcQ0RO2piBgJil6LjkjIX9ssFmA3zQBnF/h/3/5Kdt8BFvlZ/EZ/JjH/lWFO6oKW0onymf2z+VIqG9kvKq/KzY7vi8axnlmy7lAP82P/jK9rr4Y/fBXk/+59vmI3wTLSt+dbQr+tHumb1Jm/BNlrHXU74T/7N1+iPf25N2dvguy8j38r+ir+dQ5Hj0r7hxzv39pYuQIU5BnnHOA8Y5wZZJgAS8mgBFTpfwz1g5S7nh+/j6wFeRJRC5jXzF//vAz0d84qN8C1/xKn5Qysj38nN/8ZPvIWWUn5Uy9rqBPqJUez1pr6uNA5/7I0iUk/U62pSviiVRV/msvV1pV/lP2uymjPTdXlrUE++Vesp7v0NsHLB9aDt2G/a6XW34tts261Zss/ptpr+tflj3JV754jFMF3mtph53qZlcp68kQAIWIUCRY5FAGtUNs4oFs/ptVJxdaVeeKn39c1PR3NKkHLx43glXuWKGdUiABEjAZQIUOS6jY0VJwKxiwax+m23U3frKX5BXvFuZaVQWIif0N1sX6C8JkICJCVDkmDh4nuC6WcWCWf32hJg748Ozn9wDmS8sNDAcT1//njNVWZYESIAE3CZAkeM2Qu81IE+4nf7YCZh91xJlnY+ZLoocfaK1e3+WMnszc+5dGNx7JM6aMF2fhtkKCZAACQgCFDkcBi4TWJO1DE/O+Rduv+gpjBl4nMt2jKhIkaMv9X3FOfjXa5fj+RvmICE6Rd/G2RoJkIDXEqDI8drQu9/xWZ89iJ83LcKkEadixrT73TeoowWKHB1htzf1v6VvI1eInb+f+5D+jbNFEiABryRAkeOVYXe/03KdxeOzb4PcQRMeEok7Ln4GA1OHuW9YJwsUOTqBPqSZ21+/AtOOuwwThp5kjANslQRIwKsIUOR4VbjV6+zO/G1Ym/0L5v70prI9eHTGRAwQB7+Z5aLIMSZS67J/xVtfz8SzN3xounVcxhBjqyRAAu4QoMhxhx7rcgs5x4DTBF5d8ATCgyPwl5NvdLouK5AACZCAMwQocpyhxbK/I2DWGRGz+m2FIVhVV4GbRcqHO6f/21SPOK3Ann0gAW8jQJHjbRFXub9mFQtm9Vvl8BlmbvHqeVi+5Tvcd+ksw3xgwyRAAtYnQJFj/Rhr2kOzigWz+q1pMHU2/ugHN2Ns5vE4bfyfdW6ZzZEACXgLAYocb4m0Rv00q1gwq98ahdEQs3Lx+sPvz1AWIUdHxBniAxslARKwNgGKHGvHV/PemVUsmNVvzQOqcwMffv8KyqtLcMPUe3Rumc2RAAl4AwGKHG+IsoZ9NKtYMKvfGobSMNO3vHyxstNqXOYkw3xgwyRAAtYkQJFjzbjq1iuzigWz+q1bYHVs6LdtP+GjH1/Hv6//r46tsikS+D2B4sYKPLThfZzTexJOShxNRBYgQJFjgSAa2QWzigWz+m1krLVse9a8B5EUnSoOlrxGy2ZomwSOSOCVnQuwz68caLQh3iccF6ZPRnJILKmZmABFjomD5wmum1UsmNVvT4i5Fj6UVBbilv9cjEeufA19EjO0aII2SeCIBNaU7cAn+csQNSRZKddUXIPCfQWY0nsC/pQ4jvRMSoAix6SB8xS3zSoWzOq3p8RdCz8WrvgIG3atVPKg8SIBvQncs/FtBKZFIjgyrLPp5oZGNOVWIcInGH9JP4mzOnoHRYX2KHJUgOjNJswqFszqt9XH2gPv3oATRp6Bk0ZNsXpX2T8PIjA3bym2NuYiuE90t15xVseDguWkKxQ5TgJj8YMJmFUsmNVvq4+/bfs2YObcu5Szc8JEfiteJKA1gby6Ejy95WMkDusNv0D/wzbHWR2tI6GNfYocbbh6jVWzigWz+u0NA+u9xS+gqbkR15zxT2/oLvtoMIFnsz5FTbgNQQnhDnnCWR2HMHlMIYocjwmFOR0xq1gwq9/mHCXOed3c0oSbX74I1025E0Fh/bF1f4liYEhSHAYlcqeLczRZ+kgElpduwcKi3xCRmeQUKM7qOIXL0MIUOYbiN3/jZhULZvXb/CPGsR58t/YbPPfzFlQH9UdtpEz50IawqlJMTInFPaceg9DAAMcMsRQJHIZAs60F9254B2F9YxEUEeISJ87quIRN10oUObritl5jZhULZvXbeiOo+x7dteBnzKvxR3HG2IMKJOxci6lhTXhsCk9H9paxoFU/Z+/7HtmthQhO736xsaPtclbHUVLGlLOMyJFT3Hkle9A3aaAxJHtodXthqS7T7qVVRaioKcOAlMG6cDCrWDCr37oE1eBG5O/KtfN/xpYxZ3TrybA1C/Hq1El8dGVwnMzc/O7a/Zi1Yx7ixWJjXz9fVbrCWR1VMKpuxBIiZ+X2JXh30QuYLLaennfCVapDcsdgXVMzHlm0Ar/kl2o27d5qa8X6nb9i8er5yuu5x1+hGYdDxdp9r52Nj+5d5g4iQ+pS5BiC/bCN1jXUIK90D/JL9uKbbXlY2DwAeYO7n63pm/0b7h4Sh2kjB3lWJ+iNaQg8te0jNEb5Iihe3R18nNXxvCHgsMixtdlgEzdTeUO12cR7+XNbK9rEe+Uz8b7zc+X735eV33fUb5PlFZvys5bO9x12D5RtLyfK2tsSZdvbLyjbh5yC7cjZv0MhO7j3SGSmDe/8vqNsW7uvXdtX/G1vX752tSv7Kesc6GtXX2U/D/jU8V6Wlf515SA/Kwj4IwrST0ZJxsEnZsZlr0Ly3sWIb/zG/VHhI0y0uW/mSBbaEICSoJNQE5KBtvg+SoNyjYRvxXosuPlO062ROOfRqbh8ylNKl7mgVZ2x48hsqsw4bhczew68ivc19VVIjesj/vRFcWtvfNE4APsyj+3WsfQdv+C+YUkUOeqEzeus/FC0Dj+UbkB4ZoJmfeesjmZonTbco8jZkbsJ9759HXx9fOHr6wc/8cf+Xvzx8YOPeD3wWft3Xcsq5exlZR1Z1qf9+w47fr7+XWweXLaznfY2O8o2Njdgy+41KK7ar2w3ldeIfuNwVP+jO23JstI/e/td/G/3/UA/pF/Ch/ayPl187Wj/gK+yj/a+dOWg9OsQuztLKvF/X/yq+bS7HjM5co3E/NpAFA04OGmdFGvnhLeqvkZCPnaT/7pPT+jv9KA+UoWOmbVvc/YeJNa4oNU9zIfOphaU7jtIxOQLYSMfJ/v7BShiJiVWCpreSJHCRryPj7IfpS8vOVt4nXhctfkwj6syVnyKwS1fY+q4k3DymKkID4l0z3nW9hoCda2NuE8sNo7KSERgaLCm/easjqZ4HTZ+RJFTWVuO+965Xjz6uBLHjzjNYaN6F5Q3xF0F2xAREiVmc47Su/nDtjdv/Q48urUIuzOO6baMFtPuWqzJ6emmM+DX/2FiyGrEh4qzJgKCxZ8Q8ScIgeJ9sHgfKN53/TwosP17f/G9eC+/l+X8xA1w+751+H7tl8pjt7v/8hyG9R2jajylWPusxu93M2vx2asxomojzurfhNDgcIQFiT8hEcqBdPY/4eLzCISLPwH+gW75pEWM3HLIxcpNLY1YsuEbLNv4DbbsXadYiQqPEbMy1YiJiLeLmXYRkxrfVxEzEaG9HGrtcKK6Y+HxNWPjxePZz/DT+q9wyrhpQuxMQ3p8P4dss5D3Enh7zzfI86lEYKp+wpizOsaOtyOKnMdn34aM1CHMDOxijOat3y5ETokQOUcfRuSsEGsL4j1+2r0nsdZ7xwpck9SACb3D0djSgMamejSK2TXlVfwsZ9oaxPsm8b6hSf4syogbpL2cLN+A+qZaVNdXKo8aO67oiDgECSEUFCiFk3wV4si/XTyJzwK7iCR7Obt4spcT30vxJEWU/E6831fZiFu+WX/YmbVBKz/HFRkNiAioE7NI1agRf+Rskrxp1zVWo1a8rxXv5WUXQEL4BAnhI95LYSQFkBRCXQVSqBBL8nvpU07BDiwVgkDrdVM9DVdnF8FX11UqszJ5xbsPmp2RYi1YxEXGsqW1WWn25LHTcPmpfxPMg3py44jfH7yWTZ6N4yMej5b8bgu5fPy1ePU8fLtmHob0HqXM7IzoP96ttlnZmgR2VOXijV0LETssXcy6y2f8+l2c1dGP9aEtHVbkvP31TOUv9xnn3G+cdyZvuacZELPsEtFLrEkR8dVvH0MmakyL749b/vwwGpqFOOoikjrFkxRR4jspkpTvlXJCMHX5XIon5ft2cbW/KQVZidNQMOSEw4hOxxa0yrUndgHULnyUV/FH/L7UNta0C6MqIYzs7+WMaEHZXjS32IWAvKTwie+V0imQ7GIoUtNZJCkcpjz3OGxRI7tdBF8rjrfvXC8jFgB3PGKSAubAI6YDszPJsemd/dFqNtVRQdYm1ogtXmUXO8GBoYrYOeEoz519NvlfbaZ0/9Gts2GLC0RQjGMnG2vRSc7qaEH1yDa7FTnyRvPzpsV46IpXlDU0vFwncLjHI2Y670NvsSbFjlyYOjBtmOvgu6mpl1jrzulD1039afyfceJRp7fPEokZooNEkrqzSMrjt+BIPPrtusM8qluFlNzvkBmw+qBHTB2PmuSMmpkuuT5Izu7IjQmnjj1HETwhQQcyS5upL/RVHQLfFK7C8srtCB1g/InZnNVRJ6aOWvmdyFmT9Qtemv+wInDkv954uUfg4H89H37a3b1WtK/d0xoJMxzOprdYO1xU3FmT4+wsUsejtpJ6f2QHn4WcCed369bQNV/itanHW+rsmey8Lcq6nV82f4dTxGM0+SgtJba39r8sbMGjCFQ01eCBDe8hfnAqAkLce4yqZsc4q6MmzcPbOkjkyN0PcqHxjVPvxZiBE/XxwAtakWeyPHTt57ocBqgVTkfXSGjVvlp2rSDWXGHR07oqLRbBu+KnFnVKqgrFo6zPxKOs+cruSzmzo/aCdi38pk11CLyWsxBFAbUITFb3TBw1vOOsjhoUj2yjU+TI6XQpcCYNPwWnH32B9i17UQtWOnjO0TUSnhpeq4g1Z/ka+ajOWV+1Ki/XFkmhIwVPZFi0MrszcdjJWjVHux5AYHPlbry/91vEDE3zAG8O7wJndbQLT6fImfXZg8oiyCtPu1W71rzUspVEjlVCaHax5mwcPOVRnbN+a1X+160/KOt2CstylW3u/ZMHizN8/DubG5d5vMemiNGKiRXtPrDpPfgkhSIk2rjFxo5y5ayOo6ScK6eInLk/vYHsvK24c/q/navN0g4RoMhxCBMLaUzACovg1Ua0fd8GvPnVv7GnMLvTtDxv5+bzHkGaOH2Zl3kJfJ7/C9bW5SCkn/GLjZ2hyFkdZ2j1XNZnyYav2j5Z8ray0LiXmMLlpT4Bihz1mdKi8wSssgje+Z73XOPdRc+Lows+Vgr2SczA1affhkHpnnOwaM89YImuBIobK/DQhveRPKwP/IPcO7zTCLKc1VGPus8FD01se/jKV5WcT7y0IUCRow1XWnWegBUWwTvfa8dqyCS/P61fgLMmXCJexaFxvRKVdTvHDvmDYwZYymMIvLJzAfKDqhGebO5/uFeJxM6V+8swa/wMj2FrNkd6zF1ltg55or8UOZ4YFe/0iWPxyHHPyt3ceT7TL5u/VdbtVInDHE8ZZz9vR+be4uXZBNaU7cAn+csQNeRAPjTP9vjw3tXtLMH4yEycmdT9qflm7ZeeflPk6ECbNxYdILMJhwhwLDqE6aBCm0UiYLkra8Ou3xShIwVPXGSi84ZYQxcC92x8G4FpkQiONPcBkA0lNfAvb8Jdg6frws2qjWgmcmasnCWyjfuIjDMi64zIAG5/FT8rn3V9lVlpfNBeQmT2PlBeFFbq+fvILOX2ch22ZAZwiKPc7RnGFeudtgPkZ/I/8bn8Xn4rf5Zv7C111LN/5yeyigfCnkFdKdtus6ufB9nqUu5AeemPvZ2Ozzpen3jpctx90/uKP0pf2/09nM0D5Tq4HeJXm91Gh62OVzsTu/+H+mDVAcx+OUeAIsc5Xl1L55fuxbdiZkfO7kwc9kfxKOsckdtvqOsGWVN1AnPzlmJrYy6C+5j7MZWtuRUl23LxfwPOwoCIFNU5eZNBzUTO31e/hOQR/eyJ0NraFBEiNnIpN1/5KnSGIlKUr5TPZBH758r3SkmZrLGjvr1s53ftFeXP8q0ULnab7bY6bHcpZy9l90FWsts6vE35nWK33WZHeVk3AGK7aZd+oc2mWFZa6Ohbe8WsD8Wap4uuF91Tet/pr70/oo9CsCj96PTFXsa3E9MBPzvL2UvDdgjHjn7ZbUmf7P3jM1372PD2iyLH/RFQ31irzOwsEqcpJ8ekK+t2xg/qPh+a+63RgqME8kTutae3fIzEYb3hF3jgOABH63tSuca95cjwT8LF6VwP5m5cNBM5t6x+GYkj+sLXzz674M3X6scexti77jUMwb41WaYQOXL2j5e2BIq+noOE0y5yuxGKZjvCJRu+VgRPQ1OdeJQ1TTzKmqb8U4eX/gSezfoUNeE2BCV4/pk4R6JTX1mD5rwaPDziCo4kFYaRZiLnH2tfRdzQdPj6U+RQ5Dg2UqXISR8z0LHCLOUSAXfHoq21FUWb9mLmmP9zqX2rVtq4a6UidrbuXWcXO2J2x2yJTc0cm+WlW7Cw6DdEZCaZuRvKzHv5ljxMFzM4R0X1N3VfPMV5zUTOHevfQKQYcP4mnzZUI1Du3ljc9cFMMzkUOe5G+8j13R2LLU0tqNqxH0+MvEZbR01qfV9xjhA7Yt3Oqnk4ceTpyrqd/smDTNobc7jdbGvBvRveQVjfWARFhJjD6cN42ZhXiWRbJK7pe7qp++FJzmsmcu7e8BbCMuLFQUzccunujcXdAUOR4y5B69R3dyw2NzShcVc5HhpxuXWgaNCTmvoqe54ssW6nT0KGyIA+VSQ9Pq6zJbmuZ29Fg6mT9mqAzSWTs/d9j+zWQgSnm3uxcWNNPapyinD/sMsQHmBuseZSIDWqpJnIuW/jOwjuHwP/YPOdNqk2a3dvLO76Q5HjLkHr1Hd3LDbWNsAvrx53DbnYOlA07smP677EYiF4bGLGQT7KGjXwRJz/n+fRED4ETdEpYt9BG8KqSjExJRb3nHoMQgP5D0NHQ7K7dj9m7ZiHeLHY2OzrP6uzCnFq7FgcH8+DeR2NvyPlNBM5D25+H/59IhEQEuSIH5Yu4+6NxV04FDnuErROfXfHYkN1HcKL2nBr5p+tA0Wnnqzb+avYgi5md/J6YV/yZBRnjD2o5YSdazE1rAmPTZmkk0fmb+apbR+hMcoXQfERpu5MU2ENwmt9cfPAc03dD090XjOR8+iW2WhLD0VgaLAn9ltXn9y9sbjrLEWOuwStU9/dsVhXUYPEiiDl/A5ezhNYu3cvrpv/M3ImnN9t5aFrFuK1qZMwKNFcSSWdJ+F+jR+K1uGH0g0Iz0xw35gbFvLWZiN3VZZiIW3cQKSOznDKWot4BFywZQ/uGXEJEoPN/cjNqY7rVFgzkfP41g/RkhKMoHA+W3T3xuLuWKDIcZegdeq7OxZrSirRvz4aV/Q91TpQdOzJI/M/xCfVScgb3P1sTfLWpTgnRNzwpv0FAf581H+40NS1NuI+sdg4KiPRkH9Iy5xSH189E1mL1yC4Vxjk4X3y8g3wQ0NlLQaeMgYXvHkrIsUjyJ4upm7oiZB732smcp7Z/gnqEn0RHBHqnoes7TYBihy3EVrGgLsip7qwHCNaknFB78mmZVLZVIt71r+FSYkj8MfE0YgL6qVbX654+W5sjDoNezOP7bbN3lm/4oTmVaguXoyzjp2Osyf+RTnJndfBBN7e8w3yfCoRmBqpO5pV7y7GZze+CDkDc6RLrkc956WbMO7yUw5bjKkbtA+fZiLnOXEwU2VcG0JMnj9E+xBo3wJFjvaMvaWF6oIyHOvTH2emdn+TNgOHebm/YFXzTnGGlx+qiiowNnYgTk4cg+SQnv/V7U7/duRuwr/nv4jtAadj85gzujU1TDyuelU8rgpCGb5YPhubclaLrOjTMeVY9w9wdMd3T6q7oyoXb+wSWeKHpdtP1NfxkgLni1tfVWZrHLnkLM9ZM6/rVugwdYMjBN0vo5nIeTFrPkpimhEaZe7TJ91HbLwFihzjY2AVD2pyyzA5aAhOShptyi41tDbhTnGGV/zgdOV4C1uLDU3FNagsLkNGrzSckTgefcK0Sb75xsJnEBsZj5UVAzC/NhBFAw5m2N3C4535WxWxk5W3WZnZOe3o80zJXU2nH906G61xgQiO0ffeIh9RPZl5VY8zOIf2Vc7o3L7jrd89umLqBjVHxeFtaSZyXtm5APt7NSA0Wt+BqA82c7VCkWOueHmytzV7S3Fa+ChMjB/myW4e1rcvCn7FmvochByawFHkd2soqkZNcSXSwuJwesJ4DIxMU62PLa0tuPqZ0/HM9e8jTMwYPbJoBX4RN83aSDl75CO2kJcccQv5jtyNQux8iD2F2cojLJkN3RuvbwpXYXnldoQO0HbWrTu2b5x+t7IGx5VLrtG55qtHO6sydYMrFF2ro5nIeTPnK+wNq0FYrLm39rmG1bNqUeR4VjzM7E1NTjHOiZ2A0dHO7SDxlD7/c91r6CUXqx7haAspdurEAuv4oCicLmZ2hvbq47b78qyclTuW4p8XPNFpa3thqdOHAW7Zs1YRO/vLcoXYmY4/jJritm9mMVDRVIMHNrwnZuFSDTma5HZ/904hfrLlKwU1UzfoO+I0Eznv7V6MnSHlCIvTf2GYvgg9vzWKHM+PkVk8rM4uxvTkEzEksrdZXO70c3HhGiyr2orQ/o7NAtSX1ohHWdWI8AvGaWJmZ1SM68Lu4ff/JpJ3noNjh6iTVXpjzirlMVZ5dYkido4fcZrp4uGsw6/lLERRQC0Ck/X/h7PcJv7ayXc4vBbn0L7JtTnXfvuEsr2cqRucjbx75TUTObP3fI/tQcUIi9dv54J7KKxbmyLHurHVu2eVOwpxTfqf0C/cfIkQ7974FoL7xCAozLmzu+rLRVboohqxGDgAf0oci6NjBzuFfV/RLjw6+xa8cvN8p+o5Unht1nIsWPEh6hpqxQLlizFx2MmOVDNdmc2Vu/H+3m8RM1S9R4jOQFjx+ldYcNtraKprcKZaZ1l5XtyUf1+LURdPZuoGlwi6XkkzkfPJviVY75eHiEQebuR6eNSpSZGjDkdaAcpEhuS/Z5wjdiLFmArHzyWbsLhsHcIGxLnsd73YUdNaVAefllaclDAGJyYc5ZCt2d/9Ryk3/Y/aZW5fuX0pvvxVnE0mUkfIBcrHDJnskG9mKfTApvfgkxSKEIPWeKolcoZOHsPUDToPOs1EznyxTXOlz25EJpnrL0Od+evSHEWOLpi9opHiTXtF3qrpiA4014aC+8VN0i81DMEqHGkhU1vYhNiRyUonJ4zCKUljjhj765+birunP4v0hP6aj5Fft/6gPMYK8AvAFLH1fFym+VNEfJ7/C9bWicXi/Rx7zKgFZDUeV1350X3I7J/B1A1aBOgINjUTOQvzxO6BtmxEJhs3MHVm6bHNUeR4bGhM51jB+hw8NvIqhPiZJyfdqrLtmF+0AhED1T3+XyYrlTM7dTU1OD7xKOVRVqDvwck1pehYvOoz3HvpC7rGetkmcZ6LWKAcFhyunLMzKsO85xrNWDkLUeKJQESq67NwasB3d+HxTb+9wNQNagTCSRuaiZxFBauwtGUHIlI4k+NkTFQvTpGjOlKvNNgm9oXkrsnGC+NvEpue9T2EzR3gj4kUM80JAQjR6Myu5vpGtAixU1lRgYkJw3F60niE+dvX/Tz98R0Yn3k8Jo86050uuFx3yYavFLETHRGniJ0R/ca5bMuoikUNFfgo9yfsbyxFYEovww6YdWcLee/RffHywo9wZtLRRmH02nY1Eznf71+LH5u2IjyVIsfo0UWRY3QErNG+rbUVReJx1cwx2q0tUZvUpord+DD/B/QalKy26d/Za6lvQnNJHcpKSnBM4jAcHdIbD795Pd78x1fw9/PXvP0jNfD92i8UsZMUk6YsUB7ax3yHOa4u24FPc39GSHRyPQAAIABJREFUoMiHGJgSAb8AfZm6fBhgoD8uePxsJIhDAeUZR9607d/QQd/euGYiZ2nRRiyuExli0/m4yuhAU+QYHQFrtN/S1IKqHfvxxMhrTNOhZ7Z/jNoYX4ToeDpua1MzmotrsXf5T4gSe7L+efb9SAzxjA0Yi1fPU9bs9EnMUMROZtoI08RSOtomDm2cm78Ey/dvRmxKPAIT9N1O7kpah8m3nocXb3lMnL2Uj89/+S+q6ioxVYgdq+6E87QBpZnI+aV4M76uWYfw3hQ5RgedIsfoCFijfbnQtnFXOR4acbkpOiRzHMlEjtFDUw3xd/OrLyP5mD+i0ScQQ6L7KCkj0kLjDfHl0Ea//u0TfPHrbAxMHaY8xhqQMsQj/HLUiX11xcojrIoWsbU/VUjJcOeOBXC0ne7KOZOg86yHrsL5F12Ai9MPnI+0asfPQux8oJiWMztWWBzuDk+t62omcn4r2YYFVasQ3sfYxWJaAzSDfYocM0TJ832UC2398urF7qqLPd9Z4eEL2fNQGd6MoHh9/7Uv4VTl7ELejz9gyJVXo80m8mOJc3aqisvRJyJZETv9w7V/fOZIkBb8OkeZ2Rneb6yy9bxv0kBHqnlMGXk0wOdiJ29EdC8EiEMCff18dfFNPrr6+OqZSpoHedCfTLYpL98AP+XAQJnG4eznrkdwawAeHnFFtyvYftn8LeYLsRMZ2kuInUtMuV5KF9huNqKZyFlTloV5ZSsQ3o8ix80YuV2dIsdthDQgCMit0+FFbbg1888ez2NvbRFeFCInbrgxJzPnfD4PYckpSBh/8ELTBiF26oorkCTOGZIpIwZFphvO0iZEmJzVkWJn7MDjlK3n6fH9DPfLUQdk0tW5eUuwoWynkgQzKFbf4w3k9vLcVVmKu2njBiqnGjuTuuGHdQuUmZ2UuD44W7AflO7Y+UuO8vH2cpqJnPXlO/FJsVDYAzxjetabA02R483RV6/vdRU1SKwIwv8NOEs9oxpZemXXAhQF1SM4Sf9ZHFtzC9Y+/ThG3vIP+IeEdNvDhtJqkRC0CtEBEThNiJ0RUcaLiuaWJkXoyAXKE4adpMzsJMcaL8IcHSLZ1fn4OPdHNPraEJAaccT8ZI7adLWcK6kbvl4pHiEK/nKdlHyM1S8p09XmWa8LAc1EjjyGe07hUoocDxhuFDkeEAQLuFAjklb2r4/CFX3/5NG92V9fhqe3foSEo/rCx8eYre5S6Pg6sPunvkykjCiugdgvhNOSxmFsjPE3tvqmOuVmu0CInRNHnqEsUE6ISvHomHd1TuYoW5j7K2ITxcJkKXJ1HgKNNfVupW6QszqfL/9ArNU5XhE7KbHGzEaaJuA9OKqZyNletQ/vi62bkSofwGUV8Hr2gyJHT9rWbau6sBwjWlJwQe8TPbqT7+xZhH3+FQhKMk9y4LryatjE9nO/Vl+ckjgGE+OGGc64pr4KMiWFfJwiFyZnpo9AaFCY4pe8AXvy+p3K5lplYfIuMbsTkhKlazqI6qxCt1M3NDY3KEJTCp4/iDOW5Jqd2Eh1D7M0fIDp5IBmImenGFxv5S5Cr0zzJfLTib1uzVDk6Iba0g1VF5ThWJ/+ODPVc0/PLW+qxoMb3kPSiL7w9fczXTwaquqUU5TlNvSTEkbjpMRRhvfhv9++pNxwOy45s3DbBY8jLa6v4b715IB8ovBJ7hK0ibNq5Nk6/sEHn0jdU31nv28qrEF4ra9qqRuq6ysx5/tX8e2a+fjo3mXOusPygoBmImdPbSFe3b0QUYM9YxeBN0ebIsebo69e32tySzE5aChOSvLcg+Rm7/sB2W1FCE7tpV7HDbDUKBZ5txbXoaGuESeKlBGnitkdPx/jRNsnS97C3J/eVEj4+vgqj1Hk1vPwEHPMln1RsByLclchMTUJgYnarNNqEUcsFGzZo3rqhpfmPyIeFybj/BOvNmAkmr9JzUROXl0JXsz5HNGDzfMs1/zh7L4HFDlWjay+/arZW4rTwkdhYrzxj1K663ltSwPuXvcmEof1hl+gtv9i14t8U509P1Z1VTUmJY7AnxLGIsTfmLxh7y56AT+t/xL3XfYyvlszT7xfKHZiXawsUA4JCtULicvtaJ0eom5nCcZHZqqaumFTziq8uuAJvHDTXMPWl7kM3EMqaiZyChvK8WzW/xAzNM1Duuq9blDkeG/s1ex5TU4xzomdgNHRGWqaVc3WZ/nLsLFpH4LTo1Sz6SmGmhsaFbFTXlaBCYlDxY6scYgMsK+P0fPKyt2MgWl2kVtQuk/Zer588/fK4mQ5sxPgH6inOy61pUV6iIaSGviXN+GuwdNd8ulwle5/9wacNOossQD8dFXtepMxzUROSWMlnt4+F7HDKHKMHlAUOUZHwBrtV2cXY3ryiRgS6Xm7PVraWnHH2tcRnZmCgBDPv9G6OiJaGptRU1iB6pIKzBo/w1UzqtbLLc5R1uyszlqmzOrIR1lG7WpztGNqpoeQBwGWbMtVjlYYEKHekwuZb0xmk9c7g72jDM1STjORU9FUg0e3zka8QYdxmSUAevhJkaMHZeu3UbmjENek/wn9wj1vM8HC/N+wqj4bwX2tnxC4saAafVqjcVmfkz1q0O0uzFLEzqac1cqszpRjL/Io/7pzpjM9RKtIDyF2YbmSHqJxbzky/JMOSt3gbsflmUV/f+lCzJh2P4b0MX7xubv9MbK+ZiJHPh+/b+M7SBRnVfAylgBFjrH8rdJ62ZY8/D3jHCSL03o97bpj/RuI6B+PgFBj1qvoxkMkqNy/cQ/+NfgC5dRkT7x25m9VxE5W3mZlZue0o8/zRDcP8snV9BD1leKco7yaw6ZucLXjc354FRU1Zbj+rDtdNcF67QQ0EznyqO07172B5FH9CdtgAhQ5BgfAIs0Xb9or8lZNR3Sgvsfm94Tvx6L1+LFyE0L7Wz8ZcENhFeIaQnBDf88/dXpH7kbl9OQ9hdnKI6yTx0ztKZSGfu9seghnUjc407G8EiFiX7tcLDb+SJyNk+hMVZbthoBmIqfF1orb1r6ClJHtIkf8C0QePSmfhSqJPeT/KR+1ic/E2/bvlR/ktx3lxPf28vKzjnLtPyhHWdo6qnTa7bac+NBuuqs9xSDa5Kmo7e22N9LuYrvP7XVESXt1UdYfvvBrk+2LPnXxwd6PDl9t4lvZZ/urLH+gmQP9bJN97Ohz+6ss59vBq5OH4kE7K/lqg629T+2I2rl1lBNs2st7yvP7I/0Wzlg5S+FkP6TWR2xVtR9VKresyh7J5/wKcV97Ej57MXsZ+3eybkcdH7QqdewllXodZdvrdf7cYVe8NotYyiD7iDY7XpVR0GGniz0RIMVyk0+L3RulkN3PA63ae2z/TFhSXjv62P653Tml3O/bOriPdmsH7HX4KSAdYtfuQbsjwnDXNu08O9m187B3oWsf5AcH2itYn4PHRl6FED/Pmi25V8wYB6RHIjjC83f4dMTP1Vc5m3ZtvzM8JsGnI/3YsmetInb2l+UKsTNdHG43xZFqhpVxND2EK6kbHOnU85/ej94JA3DOpMscKc4yPRDQTOTIdpWbVucNRN6y7X9hy5vXQf+JL+SNrONGZC/n2+UmJwSC+E/+PS7LyavjVdrptNduV5YL9AlQ7HUt33EjtJeX34m6ipQAAkR5P8WWvd0Oux1+HfTa7qvymRQjh9Tp9KlruXZfuto+4Lvdh65tHFpO+t6dL0o5cQPryqC7cmb5TZA3X5sUnge92sWaTYg6Kf6UV/ttWnkvr47PDq3brT2RkLDTXmddKTBk212/O9gXe4kOP3rwU5T7vb0Dfja0Ndu/Fyq14z8pWJX3ihI+1BcIAdbSzsYucLv6Yv83gd2ndiuKAG4V/9k/k223t6TUFSOu3YbSluLHwXY76ij22u2/MP6mdsnoGSNqefFWfF26EmFecLJ6vch3FV4B3JZ5vmfAd9KLjWI7tHyMVV5dooid40ec5qQFfYsfSA8RJ9JDiPOA2gW/9MLd1A2H68m67F/x7qLn8ewNH+rbWQu3pqnIsTA3do0ESMADCDy85b+wJYUgpJf+26n17n7l9gJcnDIZwz0gmac7fV+btRwLVnyIuoZaZev5xGGetYC6a98Olx5CjdQN3TG8+62/4oxjLsBxw05xBzHrdiFAkcPhQAIkYEoC68t34pP9PyMi0/rrFhoqa+Gzvx73Dr3ElLHqzumV25fiy18/RIutRVmgfMyQyR7bN5ke4tPcpWiUpxME+SKpMRw3DVR3jdGiVZ9i9Y5luHP6vz2Wgxkdo8gxY9ToMwmQAJ7YNgcNcX4IjdbmmH5PQlwrzig6LXYsJsQN9SS3VPHl160/KI+xAvwCxAnK00Xyz0mq2NXCyNcFK/GlyHB+z4hLkBgcrVoTDU31+NuL5+OfFz6JgameeaK4ap3V2RBFjs7A2RwJkID7BLZW7sF7+75H9BDr58ZrrG1Aw55yPDriSvfBebAFefCdXKAcFhyunLMzKsNzE8GqjVEmQW1srsfVp/9DbdNeb48ix+uHAAGQgPkIzBQpY2p6tSE41rO2s2tBsn53GSaEZeLUpHFamPc4m0s2fKWIneiIOEXsjOhn7X7vLdqJe966FrNmzEWvMM88+8jjBokTDlHkOAGLRUmABIwnsKumAK/mfIlYL8iL11zfhLKsAjw16hpDs5AbEXWZ1kCKnaSYNGWB8tA+o41wQ/M2Z35yNzLEI6qzhaDjpT4Bihz1mdIiCZCAhgRezJ6P8vBmBMVbfxancV8Fhgak4c+pnrtORcNQK6YXr56nrNnpk5ihiJ3MtBFaN6mb/VU7fsac71/FM9e/r1ub3tYQRY63RZz9JQETE8itK8ZzOz5Fwog+Ju6FY663isSP+Rt34dFRV4uM49Y/6LAnKl//9omS9VwuzJWPsQakDOmpisd/f9srl+D8E6/GsUP+4PG+mtVBihyzRo5+k4AXEng95yvsDxTJFJOsv6PKUxNxGj3sFvw6R5nZGd5vrLL1vG/SQKNdcqn9B9+7CQ3NdXj86rdcqs9KjhGgyHGME0uRAAkYTKC4sRKPbf4AicP7wtfPfvK5ZS8TJOI0kr1NnFouZ3Wk2Bk78Dhl63l6fD8jXXKq7TcWPiMew32Gm899GBOGneRUXRZ2jgBFjnO8WJoESMAgAv/d+y1yfMoQlCKO2Lf4ZaZEnEaGormlSRE6coGyFAtyZic5Nt1Il3ps+5Mlb2HuT28iwD8Qr9w8H+Eh1h/PPULRsABFjoZwaZoESEA9AjIXXmR0L4QmRyEgWB49a92rdEsurut3pqkScRoZjfqmOkXsLBBi58SRZygLlBOiUrC9sBRb95corg1JisOgRGMz1W/buwEPvn+jyBVnQ2pcX8z8vw+MxOYVbVPkeEWY2UkSMD+BarF+4bvidfilaBNCw8LgGx9iyczjZk/EWdxQgYc2vo+z0yfilKSxug68mvoqRezMX/4JkHgx8ltjUd8rXvjQhrCqUkxMicU9px6D0MAAXf3q2tgD796Iwoo8ZKYOxy3nPWKYH97SMEWOt0Sa/SQBCxFYUrwB3xeuQ4ufDQGxYQiJtc5CZLMn4nx155fY61cOn6ZWRNiCcF7qCRgQkaLr6Lv100X4qikCJRkHHySYsHMtpoY14bEpxmzJlyks5i17H49e9Tr2Fe0y7aJpXYPpZmMUOW4CZHUSIAHjCGwo34VFxashZw/CYnshKCECPr4+xjnkZstmT8S5tjwbn+QvRa/B9nQbDSU1qCooxdjYTFyU/gfoERn5iOqv85Zi69gzu43GsDUL8erUSYY8uvrHK5fiopOu8+j8XG4OYY+rTpHjcSGhQyRAAs4S2F2zX4idNdhatgcx8THwiw2BvwnX7Zg9Eee9G99BQGoEgnuFdYbQJs77aS6oQmNNIy5IPwFHRfV3NrxOlZ+3fgce2JiPvMHHdVuvb/ZvuHtIHKaNHOSUXXcLfy4eo2Xnbcat5z3qrinWd4IARY4TsFiUBEjAswmUNVVhceEarCjeil69IuEbF4qg8BDPdrrdO7Mn4vw072dsatiL4L7d51+qr6xBfV4lMsSjq4tSJyM8QJu4vPrjD3h5XxvyhxzfbdxTt/2M2waE4dIJR+s2LipryzBj1vl45KrX0DthgG7tsiGAIoejgARIwHIEmm0t+KFwPZaUbICvvx/8EkIREuXZaSDMnIizoL4UT26eg4RhfeAf6H/Y8dQmvmkSQqeqrAJnpx6H4+OHqz727nzvXiypHYUd48/u1nbmb/OQWP5fXDzpbJx3wpXw8dH+zKU3v3oGQULUXXLyjar3lwaPTIAihyOEBEjA0gRWlW3Ht0VrUdVSh+A48SglTogdHz1WhziO1eyJOJ/P+gzVYS0ITHRsAXhjTT2axCOsWL8IXCzW6iQGRzsO6wglf9v2Ez5d+i58k6/C/NpAFA04OKlnx8LjmycNwP/EeTVb9qzDn4XQmSy2nWt1ZYlHVE9/dDteuGkuggO1mb3Syncr2KXIsUIU2QcSIIEeCWRV5+KbwtXIqS5AVFw0/OPC4HeEWYceDapYwMyJOFeWbsf8wuWIHJTkNJGmwhoU5hXgtPRjcGaS+4+P7nj9Kpx7/OUY3n8iHlm0Ar/kl6I2Up6N4yO2kJf8bgv55t1rIA/nk9d5J1yFYX3HON2Hnio8Pvs2jM08DqeOO7enovxeAwIUORpApUkSIAHPJbC/vgyLxSLlVUXbEBsbB7/4YASEBBvmsJkTcdrabLhn49sI7h3t8plFLQ1N4hFWFQJtvrhQrNVxdbv5olWfYm32ctx+0dOdsXT0MMAf1y8UMztvY2ifUWJm5ypxkKB9d5i717LNi7FwxcfKlnFexhCgyDGGO1slARIwmEBdS4NyuOCywk0ICg2BX1zwQbuC9HKvUTy26dMag8v6nKxXk6q181HuT9jRnI8gIXLcvdzZbt7c2iwW9p6n7FzKTHNtnU+bEGyfCKEjxY58hKXGep1bXr4Yl5/6d4zKONZdPKzvIgGKHBfBsRoJkIB1CCwr3ojvi9ejAc0IjA1HiFi7o8tl4kSceXUleGbbx0gY0lu1x36ubjf/6MfXUVFTiuum3OF22IoqClRZr/PZz+9hb9FO/P3cB932iQZcJ0CR4zo71iQBErAYgc0Vu5XzdvJrSxAZH40AsQVd7s7S6jJzIs6ZWf9DbVgbghLV37XmzHbzYiFK5PbsWTPmIl6lx0wy3u6s1ymtKsTfXrwQT137rshR1Uer4UO7DhCgyHEAEouQAAl4F4F9dUVYXLQG60uyERcfD19xuGBAiPpJQcu25OHafmeYLhHn8pItWFj8GyIynV9s7OhIcnS7+asLnkBUeCwunPxXR007Vc6V9TqvfPG48CkGF/3hOqfaYmH1CVDkqM+UFkmABCxCoKKpRmw/X4NfxeGC4eHh4rydEHG4YKgqvTNrIs7mtlbcu+EdhPWJQVCE9luij7TdfEfuJsz85G4xi/MJAvy0S7rpzHqdrWJb+qx5D+L5Gz9CgL/6wliVwedFRihyvCjY7CoJkIBrBOQuoh9FUtCfitajzd9HLFIWhwtGu/eYxqyJOGfv+wHZLYViR1WUazBdrNXddvMn5/wTozMm6LY925H1Og+//zccN/wUnDT6LBd7ympqEqDIUZMmbZEACViewDqRhHKROG+nrLkaoXEiKag4XNDZpKBmTcS5p7YQL2z/FHHDxGJjDdcqHW4Qdd1uPrw+BL+s+gJP/NV+zo2e1+HW68xe+jm+27waZ02YjiFJcYYkAdWTgxnaosgxQ5ToIwmQgMcR2Fmdr2RA31GRi5i4GPjHh4pdRo49MjFrIs5nts9FfS8fBMW7N4vlbjDldvOsj97DqDF/wq2TbtQlu3l3Pnes1xmYPhq728ZjWV4JWmLS4OsrDx8s/d3hg+72m/WdJ0CR4zwz1iABEiCBTgLFDRX4tngtfhOHC0ZHR4mkoCEIDDv84YJmTcS5pGgDFpetQ8TABMOjX7x6FSqzs5A+4TTdspsfrtNyvc5l73yAVSEZKMkYd1CxjjQSj02ZZDgzb3WAIsdbI89+kwAJqEqg0daM7wvXYqk4cycgKFDJgB4SFfa7NsyYiLOhtQn3bnwHkf3jERSm/WLjIwXG1tqKTS/PQv9zz0N4ahqc2W6uasDbjclTlf86bym2jj2zW/PD1izEq1Mn8dGVFvAdsEmR4wAkFiEBEiABZwisKNmqzO7UtjYiWDzakYlB5WXWRJzv7/1WPI4pRVBaL2cwaFI2f8mPaK6pQZ8zpnTad3S7uRYOzVu/A49uLcLujGO6Nd83+zfcPSQO00YO0qJ52uyBAEUOhwgJkAAJaERgW9VefC92ZO2qyReLlCNha2rFMUEZOCvVPMf87xS+/yf7C8QNTYevn69GpBwz29LQiA0zn8bwG25CYNTvd3dpld38SN7NW79diJwSIXK6TzDaN3uFEDnxFDmOhVj1UhQ5qiOlQRIgARI4mEB+fSl+EI+y5Hk7j466GpEB6py1owfnJ7bNQXO0v7KLzBMuKXT8g4OO6Ira2c2P1Jh8XHXd/J+xecwZ3Rbj4ypjRw1FjrH82ToJkAAJeCwBucbop/JNCBsY77E+Hs4xtbKbO9Lxuxb8jPm1gSgaMPqg4lx47Ag9bctQ5GjLl9ZJgARIwJQEalrqcf+GdxE9MAmBoYffLebpnXMnu7mjfatrasYji1bgl/xS1EbGimo+8C/NQ7+gGrxx2aUIdfBoAUfbYznHCVDkOM6KJUmABEjAawi8tfsb5PlWICjV+MXG7kJ3Nbu5s+3KR1db95co1QYlxmDON/djRL/xOO+EK501xfIqEaDIUQkkzZAACZCAVQjsqMrFGzlfIXZYGnx8fKzSLd23m5fXlOLh92fg9KMvwCljp1mGo5k6QpFjpmjRVxIgARLQgcCjWz+ALS4IQTGesdhYzS7rvd18b2E2HhRC59ozb8cxQyar2RXacoAARY4DkFiEBEiABLyFwDf7V+GXqm0IGxBn6S7rud18466VeGz2rbj/shcxuPdIS3P1tM5R5HhaROgPCZAACRhEoLKpFg9uehexmWkICAk0yAt9m63KK0VlYRlmjZ+hacPLNi3G+4tn4d5LZyE1ro+mbdH4AQIUORwNJEACJEACCoE3dn+FAr8qBKWYf7GxoyGtzynDmLD+OCtZ+wMaF674GD+s+1LM6MxCeEikoy6ynBsEKHLcgMeqJEACJGAVAlvF6czviB1VMUOttdj4SPFpKK8BCutx37BLdQvjRz+8hqz8LbjnL8/p1qY3N0SR483RZ99JgARIoJ3AQ1v+C8QHI9iCi427DXJbG0o35+KKvn/CkF69dR0Hry14Eg3N9fjbOQ/o2q43NkaR441RZ59JgARIoAuBr/b/hhVVOxBq8cXGXYPemFeJZFsvXNP3NEPGwjMf34n4qCRcfurfDWnfWxqlyPGWSLOfJEACJNANgbKmajy04T3EDxGLjXvICWUVgE11DSjP3o8HR1yOcP8QQ7rV0tqMB9+bgdEDJ+DcSZcb4oM3NEqR4w1RZh9JgARI4DAEXtm1ACWBdQhM9p6FsLVZxTgxZgROShhl6LgorSoShwX+DWdNnI4/jj7bUF+s2jhFjlUjy36RAAmQQA8ENlXk4IN93yN6aKrXsGoorkFwpQ3/GnSBR/R59/4dYkbnJtww9R6MH3SCR/hkJScocqwUTfaFBEiABJwg8MDm9+CTFIqQKOudbNwdBltLK4q37MXfMs9Fn7BEJ0hpW3T9zhV46qPbla3lmWkjtG3My6xT5HhZwNldEiABEpAE5uf9gnX1uxHSL8ZrgDTsrcBA/0RcnP4Hj+vz0o3f4MPvXxGHBb6A5Jh0j/PPrA5R5Jg1cvSbBEiABNwgMGPlLEQlxSAiJdYNK+ap2lBVh0Yhch4+6gr4+vh6pOMLfp0DKXbkjE5okHfMrmkdCIocrQnTPgmQAAl4IIGC+jL8d+93qEUjAtN6wT84wAO9VM+lym0FmJY8EeNjBqlnVANLcjYnR6zTuWv6TA2se59Jihzvizl7TAIkQAKdBBaKM3K+yf0NcWlJCIq35uxBU2E1ouoDcdOAqaaI/CtfPA65xfymafeZwl9PdpIix5OjQ99IgARIQAcCuXUl+GDvt2jwa0VAWiT8A60zq9PS0IyCLbtx74hLkRAcpQNNdZqQC5GTY9Jw6SnaJg5Vx1vPtUKR47mxoWckQAIkoCuBz/OX44eCtYhJT0RQbJiubWvVmJ4JONXsQ1NLo7K1XG4rn3acfrm11OyDJ9iiyPGEKNAHEiABEvAQAntqC8WszndoFpM5AakRpp7VMSIBp5phLK7cLw4LnIFzxInIfxg1RU3TXmOLIsdrQs2OkgAJkIDjBD7LX4al+zciOi3enLM6BibgdJxyzyV3FWxTZnRkMs+xmZN6rsASBxGgyOGAIAESIAES6JZATk2BmNX5Hq1BPghM7QW/AD/TkDI6AaeaoNZmL8fMuXeLreUvIiN1qJqmLW+LIsfyIWYHSYAESMA9AnNzl2JF8RZEpsUiOMbzd2B5QgJO94j/vvZPG77C3B/fEIcFzkJidIra5i1rjyLHsqFlx0iABEhAPQLZ1XnKrI5PiL+Y1YmEr7/nzup4SgJO9ejbLX2+fDZ+WrcQd//lOcRExqlt3pL2KHIsGVZ2igRIgAS0ITBn3w9YXZqFiNQYj5zV8bQEnGpH4d8f34nVWctw7vFX4PSjL0BYsOfPrKnNwBl7FDnO0GJZEiABEiABbK/ap8zq+IcGKqcl+/p5RpoET03AqeaQKa0qwg3Pn6OYlALn4StfQ2pcHzWbsJQtihxLhZOdIQESIAH9CMit5usrdiEsJQoh0RH6NXyYljw5AaeacP7xyiXYV5yDQekj8NAVr6hp2nK2KHIsF1J2iARIgAT0I7Clcg9mi1mdwPAQBIlZHR9fH/0a79KSTMDZsLccj/x/e2cXG0UZheE/3vabAAAGQElEQVS3lE5327Ld3dKWVsAC1VCEKokGGzSKhqBYuTCWQg0XRoIkijGomGqIxoCGG6LU+EOMiAiiQSgWBKlYLEWiDamkAaXAFroL/du2221Ztr84HSNBBdcy3+J8M+/c7nzvnvO8Nycn852T+6RhF3CKArNm6wrkjM/F4eMVyLvtQczLKxIlbTodFjmms5QJkQAJkMCNJTB4aVBb9nms8wwSxrphT77x05JlWcApwpnWQCNSnRlo7jivDQssuH8x7st9WIS06TRY5JjOUiZEAiRAAv8PgdpAPT5Xuzp2R6LW1UHMjenq9DQF4QrHS7OAU6Q7p84d14YFLi9YjenZeSKlTaHFIscUNjIJEiABEjAGgb7BfmxSuzp1XV6tq2NzJEQ1MFkXcIqEcqSuCut2vK4NC5yYMVmktPRaLHKkt5AJkAAJkIDxCNS0n8QXvh+QmDzqj65OlB5ZF3CKxlHxyy7sqNqoDQtMTR4jWl5aPRY50lrHwEmABEjA2ATCA71aV8dzoRH2sU7YRont6si+gFO0e6WHNqH6RKXW0VFGxouWl1KPRY6UtjFoEiABEpCHQHXbCWzzVmKUO1mblizkMckCTiEsrhDZVF6CxnYfVhSuES0tpR6LHCltY9AkQAIkIBeBC/1hfObdj7OhFq2rE69eOdfzmGkBpx4OVzv7bukbGBkbh6WPFouWlk6PRY50ljFgEiABEpCXwGH/cWz3HkTyaDeUzOsbIGjGBZyiHX1zy3JMGHMrFj6wVLS0VHoscqSyi8GSAAmQgPwEgn0hratzPtwGm/pRspI4vK6OWRdwinQ21NOtXi1fhnunzUH+3QtESkulxSJHKrsYLAmQAAmYh0CV/xh2NByEKy0FSsZ/6+qYfQGnSHcb273qsMDntG7OULFjxYdFjhVdZ84kQAIkYBACHb1d2Oz9Hs29Ae2quZJgu2ZkVljAKdqWOl+t1tEZ+hD59kkzRMsbXo9FjuEtYoAkQAIkYH4CB1prsVPt6qRkpEJJv3pXxyoLOEW7PXSt/L2dq7Sr5VnqdzpWeljkWMlt5koCJEACBibQ1hvUdmC19XVBGeeEYlcuR2ulBZzRsGh/zdco+3GLOixwHVIcadH4C0NqssgxpC0MigRIgASsS+C7lhqUNRxCamb65a6OlRZwRsv57epE5JqTh9WOTol2xdwKD4scK7jMHEmABEhAMgIt4QC2NlSgeTAI2GMxrt+JpZPyJctCTLhDwxQ/9ezDCzkFyErSt7Jh47530Bpowovz3xITnMFVWOQY3CCGRwIkQAJWJlDRXIPtDVVYOW0R0mxOy6HY21iN/WpnK86VACU4gOKcIsTr7MIMLfO0xdmxJP9l0/NkkWN6i5kgCZAACZCAjAQ+PvMt6sNNSLjZjVglDr2+Trj67Xhm0jzd6aza/DxuyZyCwllLdGsZWYBFjpHdYWwkQAIkQAKWIzC0AuMDzy50x/bBnuX6S/6hU37kJk3AYzfN1MWl+2JQu1o+645HMHfGfF1aRj7MIsfI7jA2EiABEiABSxHwhfxY79kNxWlXByT+c5npQF8/Ok40YuH4WZjuytbF5pz/rDoscBkWzV6GmVNn69Iy6mEWOUZ1hnGRAAmQAAlYisDRDg8+8exFylj1VtnoxGvmHu4KIeBpxoqcQoyxu3Ux+q3hqNrReRavFK3FtIl36dIy4mEWOUZ0hTGRAAmQAAlYikB58xHsOV8NZ1YqbI5rFzh/Qulp6caIQA9ezXlCN6effj2A9bvX4LVFJRifrq87pDsYwQIscgQDpRwJkAAJkAAJDIfAFu8BHAvWqx8YpyDuigGIkTR6GgLIjHHiqayHIr0a8ffyI6XY8/OX6rDAEriSUiK+L8sLLHJkcYpxkgAJkAAJmIrAwKVBvH+6DP7Bbu0D45jYEcPOr6uuCfe4p2JO+p3DPvv3A9sqN6C2vlpb/zAiZvix6A4gCgIscqIAlZIkQAIkQAIk8G8EWsOd+LB+N5AQC0VdTHq9T9/FXvjrzuHp7HxMdoy7XpnL5zbsXYuO7jYsf3y1bi0jCLDIMYILjIEESIAESMAyBOq6fPjo9DdwpLnVtRVJuvMOBy4g5AugeMoCJMdF/p4n0h++/dVKJNkdWDz3pUivGv733wGExaxV7BAh9wAAAABJRU5ErkJggg==[/IMG]
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
Да, это серьезно упростило дело. Спасибо. Все получилось.
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
А можете подсказать? Вот есть метод IsPointInContour method (ZGeometry), который проверяет попадание точки в полигон. А как его применить, чтобы не перебирать каждый полигон в цикле по сисам в отдельности. А то получается, что идет прохождение в цикле по всем участкам, берется 1 точка, а потом еще и проверяет в цикле по всем полигонам, боюсь такое будет очень долго работать. Может быть можно как-то получить 1 единый полигон, со все площадных объектов? Или еще как то?
Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
[QUOTE] написал:
[QUOTE] написал:
Добрый день. Столкнулся со следующей ситуацией. Есть слой с площадными объектами (домами), а так же есть слой с участками. Требуется на конце участка, который попал в площадной объект создать потребителя. Как создавать символьные объекты по координатам в VBS мне понятно, но не понятно как взять координаты начала или конца участка и можно ли вообще их как то получить?[/QUOTE]
Добрый день. Element.Polyline   [URL=https://politerm.com/zuludoc/zuluax/index.html#Element_PolyLine.html]https://politerm.com/zuludoc/zuluax/index.html#Element_PolyLine.html[/URL]

А у Polyline GetX, GetY, первой и послдней точки[/QUOTE]
Спасибо. Если я все верно понял

Function [B]GetX[/B](TopNum As Long) As Double

TopNum - номер вершины ломаной (нумерация с             единицы).

Для получения первой точки TopNum указываем 1. Для последней используем свойство NumTops.

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты
 
Добрый день. Столкнулся со следующей ситуацией. Есть слой с площадными объектами (домами), а так же есть слой с участками. Требуется на конце участка, который попал в площадной объект создать потребителя. Как создавать символьные объекты по координатам в VBS мне понятно, но не понятно как взять координаты начала или конца участка и можно ли вообще их как то получить?
Большой вес слоя
 
Вопрос снят. Нашел в БД поле BLOB, где были картинки.
Большой вес слоя
 
Добрый день. Попался в руки слой БД (sqlite файл) которого весит 1 гб. Привязанных фотографий нет, фрагментация 0%. Подскажите пожалуйста, как можно выяснить причину большого веса слоя?
sql запрос select в плагине или VBScript
 
А можете сказать, что значит 8 и &H100?
Изменено: Алексей Демин - 10.10.2024 16:32:19
sql запрос select в плагине или VBScript
 
Вот это уже очень даже хорошо, спасибо!
sql запрос select в плагине или VBScript
 
Большое спасибо! Полезная информация
sql запрос select в плагине или VBScript
 
Да, похоже сейчас это единственный вариант, но он имеет существенный минус - красивую таблицу там не собрать. Если бы там можно было сделать выравнивание столбцов то это бы еще куда не шло, но увы
sql запрос select в плагине или VBScript
 
А этот DataSet можно внутри внутри зулы показать? Или только сохранять его?
sql запрос select в плагине или VBScript
 
Добрый день. Возможно ли хоть каким-нибудь образом сделать SQL запрос с командой select в скрипте или плагине? Понимаю, что L.ExecSQL тут не подойдет. Но может быть существует команда, которая просто открывает окно sql запроса и команда, которая вставляет туда текст? В документации я не нашел.
Наименование слоя в переменную в SQL запросе
 
Спасибо большое! Теперь все понятно
Наименование слоя в переменную в SQL запросе
 
Я пробовал много разных вариантов, в том числе и так. Вот что получается в этом случае

Если писать без typeid, то работает. Но скорее всего потому, что from игнорируется. Ведь можно просто написать запрос из двух слов "select sys" и он так же выдаст все сисы.
Изменено: Алексей Демин - 02.10.2024 13:34:29
Наименование слоя в переменную в SQL запросе
 
Вроде бы все по инструкции делаю
Изменено: Алексей Демин - 02.10.2024 14:12:05
Страницы: 1 2 След.