edv/DISPO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Änderungen AMBAR

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-04-04 08:17:02 +02:00
parent 3c0da09315
commit e386fa6655
39 changed files with 1937 additions and 1490 deletions
Download Patch File Download Diff File Expand all files Collapse all files

110
DISPO.sln
View File

@@ -1,7 +1,7 @@

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 15
VisualStudioVersion = 15.0.27703.2047
# Visual Studio Version 17
VisualStudioVersion = 17.8.34316.72
MinimumVisualStudioVersion = 10.0.40219.1
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPO", "UID\DISPO.vbproj", "{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}"
ProjectSection(ProjectDependencies) = postProject
@@ -11,56 +11,136 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPO", "UID\DISPO.vbproj",
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPOUpdater", "DISPOUpdater\DISPOUpdater.vbproj", "{F3128F98-87CF-4D7E-8008-43148BD814E1}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "SDL", "..\SDL\SDL\SDL\SDL.vbproj", "{289BCD77-BC00-4BA1-95ED-A79176D99525}"
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAG_PROG_ALLGEMEIN", "..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj", "{A3B497BD-842C-4A2B-B398-ED1976849DF1}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAG_PROG_ALLGEMEIN", "..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj", "{A3B497BD-842C-4A2B-B398-ED1976849DF1}"
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "SDL", "..\..\SDL\SDL\SDL\SDL.vbproj", "{289BCD77-BC00-4BA1-95ED-A79176D99525}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Gemeinsames", "..\AVISO\Aviso\Gemeinsames\Gemeinsames.vbproj", "{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}"
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DAKOSY_Worker_lib", "..\..\ADMIN\ADMIN\DAKOSY_Worker\DAKOSY_Worker_lib.vbproj", "{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TELOTEC_Worker_lib", "..\..\ADMIN\ADMIN\TELOTEK_Worker_lib\TELOTEC_Worker_lib.vbproj", "{5B947A66-009A-4BB6-B925-F84A01045095}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "MDM_Worker_lib", "..\..\ADMIN\ADMIN\MDM_Worker\MDM_Worker_lib.vbproj", "{2E4DBC09-E57B-4AC5-8554-6117D71F993B}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Parkzeit", "..\..\Parkzeit\Parkzeit\Parkzeit\Parkzeit.vbproj", "{E4190547-B222-4AE3-A0BE-A44EAEE70335}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Gemeinsames", "..\..\AVISO\Aviso\Gemeinsames\Gemeinsames.vbproj", "{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Debug|x64 = Debug|x64
Debug|x86 = Debug|x86
Release|Any CPU = Release|Any CPU
Release|x64 = Release|x64
Release|x86 = Release|x86
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Any CPU.Build.0 = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|x64.ActiveCfg = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|x64.Build.0 = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|x86.ActiveCfg = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|x86.Build.0 = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Any CPU.ActiveCfg = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Any CPU.Build.0 = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|x64.ActiveCfg = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|x64.Build.0 = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|x86.ActiveCfg = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|x86.Build.0 = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|Any CPU.Build.0 = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|x64.ActiveCfg = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|x64.Build.0 = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|x86.ActiveCfg = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|x86.Build.0 = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|Any CPU.ActiveCfg = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|Any CPU.Build.0 = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|x64.ActiveCfg = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|x64.Build.0 = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|x86.ActiveCfg = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|x86.Build.0 = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Any CPU.Build.0 = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x86.ActiveCfg = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x86.Build.0 = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Any CPU.ActiveCfg = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Any CPU.Build.0 = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x86.ActiveCfg = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x86.Build.0 = Release|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.Build.0 = Debug|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x64.ActiveCfg = Debug|x64
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x64.Build.0 = Debug|x64
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x86.ActiveCfg = Debug|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x86.Build.0 = Debug|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Any CPU.ActiveCfg = Release|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Any CPU.Build.0 = Release|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x64.ActiveCfg = Release|x64
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x64.Build.0 = Release|x64
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x86.ActiveCfg = Release|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x86.Build.0 = Release|Any CPU
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Any CPU.ActiveCfg = Debug|x86
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|Any CPU.Build.0 = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x64.ActiveCfg = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x64.Build.0 = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x86.ActiveCfg = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Debug|x86.Build.0 = Debug|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Any CPU.ActiveCfg = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|Any CPU.Build.0 = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x64.ActiveCfg = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x64.Build.0 = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x86.ActiveCfg = Release|Any CPU
{289BCD77-BC00-4BA1-95ED-A79176D99525}.Release|x86.Build.0 = Release|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|Any CPU.Build.0 = Debug|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x64.ActiveCfg = Debug|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x64.Build.0 = Debug|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x86.ActiveCfg = Debug|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Debug|x86.Build.0 = Debug|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|Any CPU.ActiveCfg = Release|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|Any CPU.Build.0 = Release|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x64.ActiveCfg = Release|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x64.Build.0 = Release|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x86.ActiveCfg = Release|Any CPU
{50E8E49B-4FD9-4DD4-B159-BDC2B7D0E94F}.Release|x86.Build.0 = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|Any CPU.Build.0 = Debug|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x64.ActiveCfg = Debug|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x64.Build.0 = Debug|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x86.ActiveCfg = Debug|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Debug|x86.Build.0 = Debug|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Any CPU.ActiveCfg = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Any CPU.Build.0 = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x64.ActiveCfg = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x64.Build.0 = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.ActiveCfg = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Any CPU.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x64.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x64.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x86.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x86.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Any CPU.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Any CPU.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x64.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x64.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x86.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x86.Build.0 = Release|Any CPU
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Debug|Any CPU.ActiveCfg = Debug|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Debug|Any CPU.Build.0 = Debug|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Debug|x64.ActiveCfg = Debug|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Debug|x64.Build.0 = Debug|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Debug|x86.ActiveCfg = Debug|x86
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Debug|x86.Build.0 = Debug|x86
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Release|Any CPU.ActiveCfg = Release|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Release|Any CPU.Build.0 = Release|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Release|x64.ActiveCfg = Release|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Release|x64.Build.0 = Release|x64
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Release|x86.ActiveCfg = Release|x86
{E4190547-B222-4AE3-A0BE-A44EAEE70335}.Release|x86.Build.0 = Release|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Any CPU.ActiveCfg = Debug|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|Any CPU.Build.0 = Debug|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x64.ActiveCfg = Debug|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x64.Build.0 = Debug|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x86.ActiveCfg = Debug|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x86.Build.0 = Debug|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|Any CPU.ActiveCfg = Release|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|Any CPU.ActiveCfg = Release|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|Any CPU.Build.0 = Release|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x64.ActiveCfg = Release|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x64.Build.0 = Release|x64
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x86.ActiveCfg = Release|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x86.Build.0 = Release|x86
EndGlobalSection

38
UID/DISPO.vbproj
View File

@@ -11,7 +11,7 @@
<AssemblyName>DISPO</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.7</TargetFrameworkVersion>
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
<IsWebBootstrapper>false</IsWebBootstrapper>
<TargetFrameworkProfile>
</TargetFrameworkProfile>
@@ -358,11 +358,9 @@
<Compile Include="frmHistory.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmMain.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmMain.Designer.vb">
<DependentUpon>frmMain.vb</DependentUpon>
<Compile Include="old_frmMain.vb" />
<Compile Include="old_frmMain.Designer.vb">
<DependentUpon>old_frmMain.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="frmMitarbDetails.Designer.vb">
@@ -393,6 +391,7 @@
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
<DesignTime>True</DesignTime>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
@@ -573,8 +572,8 @@
<EmbeddedResource Include="frmHistory.resx">
<DependentUpon>frmHistory.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmMain.resx">
<DependentUpon>frmMain.vb</DependentUpon>
<EmbeddedResource Include="old_frmMain.resx">
<DependentUpon>old_frmMain.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmMitarbDetails.resx">
<DependentUpon>frmMitarbDetails.vb</DependentUpon>
@@ -784,6 +783,8 @@
<None Include="Resources\Firmen30_2.png" />
<None Include="Resources\Auftrag_30.png" />
<None Include="Resources\aviso_messenger.png" />
<None Include="Resources\ambar_simple.png" />
<None Include="Resources\DispoAMBAR.jpg" />
<Content Include="Resources\Info.txt" />
<None Include="Resources\lorry_motion.jpg" />
<None Include="Resources\lorry_motion.png" />
@@ -796,18 +797,9 @@
<None Include="Resources\saveas20.png" />
<None Include="Resources\links20.png" />
<None Include="Resources\Print20x20.png" />
<None Include="Resources\QS.jpg" />
<Content Include="uid.ico" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\..\SDL\SDL\SDL\SDL.vbproj">
<Project>{289bcd77-bc00-4ba1-95ed-a79176d99525}</Project>
<Name>SDL</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
<Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
<Name>VERAG_PROG_ALLGEMEIN</Name>
</ProjectReference>
</ItemGroup>
<ItemGroup>
<PublishFile Include="es\Microsoft.ReportViewer.Common.resources">
<Visible>False</Visible>
@@ -1603,6 +1595,16 @@
<ItemGroup>
<WCFMetadata Include="Connected Services\" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\..\SDL\SDL\SDL\SDL.vbproj">
<Project>{289bcd77-bc00-4ba1-95ed-a79176d99525}</Project>
<Name>SDL</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
<Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
<Name>VERAG_PROG_ALLGEMEIN</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.

32
UID/DataSet1.Designer.vb generated
View File

@@ -28,7 +28,7 @@ Partial Public Class DataSet1
Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.BeginInit
@@ -40,7 +40,7 @@ Partial Public Class DataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context, false)
If (Me.IsBinarySerialized(info, context) = true) Then
@@ -72,7 +72,7 @@ Partial Public Class DataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.BrowsableAttribute(true), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -85,7 +85,7 @@ Partial Public Class DataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
Get
@@ -94,7 +94,7 @@ Partial Public Class DataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
Get
@@ -103,7 +103,7 @@ Partial Public Class DataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub InitializeDerivedDataSet()
Me.BeginInit
Me.InitClass
@@ -111,7 +111,7 @@ Partial Public Class DataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataSet
Dim cln As DataSet1 = CType(MyBase.Clone,DataSet1)
cln.InitVars
@@ -120,19 +120,19 @@ Partial Public Class DataSet1
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function ShouldSerializeTables() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function ShouldSerializeRelations() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
Me.Reset
@@ -153,7 +153,7 @@ Partial Public Class DataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -162,18 +162,18 @@ Partial Public Class DataSet1
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Overloads Sub InitVars()
Me.InitVars(true)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Overloads Sub InitVars(ByVal initTable As Boolean)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitClass()
Me.DataSetName = "DataSet1"
Me.Prefix = ""
@@ -183,7 +183,7 @@ Partial Public Class DataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
Me.InitVars
@@ -191,7 +191,7 @@ Partial Public Class DataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
Dim ds As DataSet1 = New DataSet1()
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()

6
UID/My Project/Application.Designer.vb generated
View File

@@ -34,5 +34,11 @@ Namespace My
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DISPO.frmLogin
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
Me.MinimumSplashScreenDisplayTime = 0
Return MyBase.OnInitialize(commandLineArgs)
End Function
End Class
End Namespace

4
UID/My Project/AssemblyInfo.vb
View File

@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: AssemblyVersion("1.2.0.1")>
<Assembly: AssemblyFileVersion("1.2.0.1")>
<Assembly: NeutralResourcesLanguage("")>

39
UID/My Project/Resources.Designer.vb generated
View File

@@ -70,6 +70,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property ambar_simple() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("ambar_simple", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
@@ -216,6 +226,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property DispoAMBAR() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("DispoAMBAR", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Version 1.0.4.0 (02.05.2016)
''' - diverse Korrekturen (DB)
@@ -324,6 +344,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property QS() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("QS", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
@@ -423,14 +453,5 @@ Namespace My.Resources
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die 1.0.10.9 ähnelt.
'''</summary>
Friend ReadOnly Property Version() As String
Get
Return ResourceManager.GetString("Version", resourceCulture)
End Get
End Property
End Module
End Namespace

12
UID/My Project/Resources.resx
View File

@@ -151,9 +151,6 @@
<data name="uid" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uid.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Version" xml:space="preserve">
<value>1.0.10.9</value>
</data>
<data name="del" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\del.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -228,4 +225,13 @@
<data name="aviso_messenger" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\aviso_messenger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ambar_simple" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ambar_simple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="DispoAMBAR" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\DispoAMBAR.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="QS" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\QS.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>

2
UID/My Project/Settings.Designer.vb generated
View File

@@ -15,7 +15,7 @@ Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "16.2.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.8.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase

8
UID/Reports/Auswertung/frmAuswertung.vb
View File

@@ -115,6 +115,12 @@ Public Class frmAuswertung
cbStandort.SelectedItem = "4819 - Verag Neuhaus"
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
cbStandort.Items.Clear()
cbStandort.Items.Add("5701 - AMBAR")
cbStandort.SelectedIndex = 0
End If
PanJahr.Enabled = False
PanMonat.Enabled = True
@@ -267,6 +273,8 @@ Public Class frmAuswertung
filialnr = "4807"
ElseIf cbStandort.SelectedItem = "4819 - Verag Neuhaus" Then
filialnr = "4819"
ElseIf cbStandort.SelectedItem.ToString.StartsWith("5701") Then
filialnr = "5701"
End If
Return filialnr

6
UID/Reports/Auswertung/rptAuswertung.vb
View File

@@ -40,4 +40,10 @@ Public Class rptAuswertung
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As Object, e As EventArgs) Handles Me.ReportStart
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
Picture1.Image = My.Resources.ambar_simple
End If
End Sub
End Class

4
UID/Reports/Auswertung/rptAuswertungLandscape.vb
View File

@@ -66,5 +66,9 @@ Public Class rptAuswertungLandscape
ElseIf frmAuswertung.Suchauswertung Then
txtUeberschrift.Text = "Suchauswertung"
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
Picture1.Image = My.Resources.ambar_simple
End If
End Sub
End Class

12
UID/Reports/TransportAuftrag/rptTransportauftrag.vb
View File

@@ -56,6 +56,18 @@ Public Class rptTransportauftrag
"Abrechnungspartner: " & vbCrLf &
"VERAG Spedition AG in" & vbCrLf &
"A-4975 Suben, Nr. 100"
ElseIf Standort = "5701" Or Standort = "AMBAR" Then
FilialNr = "5701"
txtVerag.Text = "AMBAR Logistic Services GmbH"
txtVeragAnschrift.Text = "Reichenhallerstrasse 62" & vbCrLf &
"D 83435 Bad Reichenhall" & vbCrLf &
"Tel. +49 8651 99624911 " & vbCrLf &
"dispo@ambarlog.com" & vbCrLf &
"UID: DE309105428" & vbCrLf
Picture1.Image = My.Resources.ambar_simple
TextBox2.Text = TextBox2.Text.Replace("Österreichischen", "Deutschen")
End If
txtFrachtposition.Text = FilialNr & "/" & FrachtPostHeader.Substring(1)

1
UID/Reports/frmPrintActiveReports.vb
View File

@@ -32,6 +32,7 @@ Public Class frmPrintActiveReports
Dim report As New rptTransportauftrag
report.Standort = Standort
report.printTrip = printTrip
report.Printauftrag = printauftrag
' report.CMR = CMR
Viewer1.LoadDocument(report)

BIN
UID/Resources/DispoAMBAR.jpg Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 398 KiB

BIN
UID/Resources/QS.jpg Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 297 KiB

BIN
UID/Resources/ambar_simple.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 79 KiB

254
UID/UIDDataSet.Designer.vb generated
View File

@@ -30,7 +30,7 @@ Partial Public Class UIDDataSet
Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.BeginInit
@@ -42,7 +42,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context, false)
If (Me.IsBinarySerialized(info, context) = true) Then
@@ -77,7 +77,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false), _
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
Public ReadOnly Property tblData() As tblDataDataTable
@@ -87,7 +87,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.BrowsableAttribute(true), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -100,7 +100,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
Get
@@ -109,7 +109,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
Get
@@ -118,7 +118,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub InitializeDerivedDataSet()
Me.BeginInit
Me.InitClass
@@ -126,7 +126,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataSet
Dim cln As UIDDataSet = CType(MyBase.Clone,UIDDataSet)
cln.InitVars
@@ -135,19 +135,19 @@ Partial Public Class UIDDataSet
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function ShouldSerializeTables() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function ShouldSerializeRelations() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
Me.Reset
@@ -171,7 +171,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -180,13 +180,13 @@ Partial Public Class UIDDataSet
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Overloads Sub InitVars()
Me.InitVars(true)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Overloads Sub InitVars(ByVal initTable As Boolean)
Me.tabletblData = CType(MyBase.Tables("tblData"),tblDataDataTable)
If (initTable = true) Then
@@ -197,7 +197,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitClass()
Me.DataSetName = "UIDDataSet"
Me.Prefix = ""
@@ -209,13 +209,13 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function ShouldSerializetblData() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
Me.InitVars
@@ -223,7 +223,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
Dim ds As UIDDataSet = New UIDDataSet()
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
@@ -272,7 +272,7 @@ Partial Public Class UIDDataSet
Return type
End Function
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Delegate Sub tblDataRowChangeEventHandler(ByVal sender As Object, ByVal e As tblDataRowChangeEvent)
'''<summary>
@@ -306,7 +306,7 @@ Partial Public Class UIDDataSet
Private columnletzter_benutzer As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.TableName = "tblData"
@@ -316,7 +316,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub New(ByVal table As Global.System.Data.DataTable)
MyBase.New
Me.TableName = table.TableName
@@ -334,14 +334,14 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context)
Me.InitVars
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
Get
Return Me.columnId
@@ -349,7 +349,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property deaktColumn() As Global.System.Data.DataColumn
Get
Return Me.columndeakt
@@ -357,7 +357,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property kuerzelColumn() As Global.System.Data.DataColumn
Get
Return Me.columnkuerzel
@@ -365,7 +365,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property firmaColumn() As Global.System.Data.DataColumn
Get
Return Me.columnfirma
@@ -373,7 +373,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property uidColumn() As Global.System.Data.DataColumn
Get
Return Me.columnuid
@@ -381,7 +381,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property eoriColumn() As Global.System.Data.DataColumn
Get
Return Me.columneori
@@ -389,7 +389,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property infoColumn() As Global.System.Data.DataColumn
Get
Return Me.columninfo
@@ -397,7 +397,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property de_vz_vmColumn() As Global.System.Data.DataColumn
Get
Return Me.columnde_vz_vm
@@ -405,7 +405,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property de_fisk_vmColumn() As Global.System.Data.DataColumn
Get
Return Me.columnde_fisk_vm
@@ -413,7 +413,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property at_vzfisk_vmColumn() As Global.System.Data.DataColumn
Get
Return Me.columnat_vzfisk_vm
@@ -421,7 +421,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property letzter_benutzerColumn() As Global.System.Data.DataColumn
Get
Return Me.columnletzter_benutzer
@@ -429,7 +429,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
Public ReadOnly Property Count() As Integer
Get
@@ -438,33 +438,33 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Default ReadOnly Property Item(ByVal index As Integer) As tblDataRow
Get
Return CType(Me.Rows(index),tblDataRow)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblDataRowChanging As tblDataRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblDataRowChanged As tblDataRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblDataRowDeleting As tblDataRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblDataRowDeleted As tblDataRowChangeEventHandler
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overloads Sub AddtblDataRow(ByVal row As tblDataRow)
Me.Rows.Add(row)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overloads Function AddtblDataRow(ByVal deakt As Boolean, ByVal kuerzel As String, ByVal firma As String, ByVal uid As String, ByVal eori As String, ByVal info As String, ByVal de_vz_vm As String, ByVal de_fisk_vm As String, ByVal at_vzfisk_vm As String, ByVal letzter_benutzer As String) As tblDataRow
Dim rowtblDataRow As tblDataRow = CType(Me.NewRow,tblDataRow)
Dim columnValuesArray() As Object = New Object() {Nothing, deakt, kuerzel, firma, uid, eori, info, de_vz_vm, de_fisk_vm, at_vzfisk_vm, letzter_benutzer}
@@ -474,13 +474,13 @@ Partial Public Class UIDDataSet
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function FindById(ByVal Id As Integer) As tblDataRow
Return CType(Me.Rows.Find(New Object() {Id}),tblDataRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataTable
Dim cln As tblDataDataTable = CType(MyBase.Clone,tblDataDataTable)
cln.InitVars
@@ -488,13 +488,13 @@ Partial Public Class UIDDataSet
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
Return New tblDataDataTable()
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub InitVars()
Me.columnId = MyBase.Columns("Id")
Me.columndeakt = MyBase.Columns("deakt")
@@ -510,7 +510,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitClass()
Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnId)
@@ -554,25 +554,25 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function NewtblDataRow() As tblDataRow
Return CType(Me.NewRow,tblDataRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
Return New tblDataRow(builder)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function GetRowType() As Global.System.Type
Return GetType(tblDataRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e)
If (Not (Me.tblDataRowChangedEvent) Is Nothing) Then
@@ -581,7 +581,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanging(e)
If (Not (Me.tblDataRowChangingEvent) Is Nothing) Then
@@ -590,7 +590,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleted(e)
If (Not (Me.tblDataRowDeletedEvent) Is Nothing) Then
@@ -599,7 +599,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleting(e)
If (Not (Me.tblDataRowDeletingEvent) Is Nothing) Then
@@ -608,13 +608,13 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub RemovetblDataRow(ByVal row As tblDataRow)
Me.Rows.Remove(row)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
@@ -689,14 +689,14 @@ Partial Public Class UIDDataSet
Private tabletblData As tblDataDataTable
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
MyBase.New(rb)
Me.tabletblData = CType(Me.Table,tblDataDataTable)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property Id() As Integer
Get
Return CType(Me(Me.tabletblData.IdColumn),Integer)
@@ -707,7 +707,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property deakt() As Boolean
Get
Return CType(Me(Me.tabletblData.deaktColumn),Boolean)
@@ -718,7 +718,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property kuerzel() As String
Get
Try
@@ -733,7 +733,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property firma() As String
Get
Try
@@ -748,7 +748,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property uid() As String
Get
Try
@@ -763,7 +763,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property eori() As String
Get
Try
@@ -778,7 +778,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property info() As String
Get
Try
@@ -793,7 +793,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property de_vz_vm() As String
Get
Try
@@ -808,7 +808,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property de_fisk_vm() As String
Get
Try
@@ -823,7 +823,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property at_vzfisk_vm() As String
Get
Try
@@ -838,7 +838,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property letzter_benutzer() As String
Get
Try
@@ -853,109 +853,109 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IskuerzelNull() As Boolean
Return Me.IsNull(Me.tabletblData.kuerzelColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub SetkuerzelNull()
Me(Me.tabletblData.kuerzelColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsfirmaNull() As Boolean
Return Me.IsNull(Me.tabletblData.firmaColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub SetfirmaNull()
Me(Me.tabletblData.firmaColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsuidNull() As Boolean
Return Me.IsNull(Me.tabletblData.uidColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub SetuidNull()
Me(Me.tabletblData.uidColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IseoriNull() As Boolean
Return Me.IsNull(Me.tabletblData.eoriColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub SeteoriNull()
Me(Me.tabletblData.eoriColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsinfoNull() As Boolean
Return Me.IsNull(Me.tabletblData.infoColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub SetinfoNull()
Me(Me.tabletblData.infoColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Isde_vz_vmNull() As Boolean
Return Me.IsNull(Me.tabletblData.de_vz_vmColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setde_vz_vmNull()
Me(Me.tabletblData.de_vz_vmColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Isde_fisk_vmNull() As Boolean
Return Me.IsNull(Me.tabletblData.de_fisk_vmColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setde_fisk_vmNull()
Me(Me.tabletblData.de_fisk_vmColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Isat_vzfisk_vmNull() As Boolean
Return Me.IsNull(Me.tabletblData.at_vzfisk_vmColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setat_vzfisk_vmNull()
Me(Me.tabletblData.at_vzfisk_vmColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Isletzter_benutzerNull() As Boolean
Return Me.IsNull(Me.tabletblData.letzter_benutzerColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setletzter_benutzerNull()
Me(Me.tabletblData.letzter_benutzerColumn) = Global.System.Convert.DBNull
End Sub
@@ -964,7 +964,7 @@ Partial Public Class UIDDataSet
'''<summary>
'''Row event argument class
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Class tblDataRowChangeEvent
Inherits Global.System.EventArgs
@@ -973,7 +973,7 @@ Partial Public Class UIDDataSet
Private eventAction As Global.System.Data.DataRowAction
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New(ByVal row As tblDataRow, ByVal action As Global.System.Data.DataRowAction)
MyBase.New
Me.eventRow = row
@@ -981,7 +981,7 @@ Partial Public Class UIDDataSet
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property Row() As tblDataRow
Get
Return Me.eventRow
@@ -989,7 +989,7 @@ Partial Public Class UIDDataSet
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property Action() As Global.System.Data.DataRowAction
Get
Return Me.eventAction
@@ -1023,14 +1023,14 @@ Namespace UIDDataSetTableAdapters
Private _clearBeforeFill As Boolean
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.ClearBeforeFill = true
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
Get
If (Me._adapter Is Nothing) Then
@@ -1041,7 +1041,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
Get
If (Me._connection Is Nothing) Then
@@ -1071,7 +1071,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
Get
Return Me._transaction
@@ -1099,7 +1099,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
Get
If (Me._commandCollection Is Nothing) Then
@@ -1110,7 +1110,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property ClearBeforeFill() As Boolean
Get
Return Me._clearBeforeFill
@@ -1121,7 +1121,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitAdapter()
Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
@@ -1244,15 +1244,15 @@ Namespace UIDDataSetTableAdapters
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = My.Settings.connToUID 'Global.UID.My.MySettings.Default.connToUID
Me._connection.ConnectionString = VERAG_PROG_ALLGEMEIN.SQL.GetDISPOConnectionString
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitCommandCollection()
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
@@ -1263,7 +1263,7 @@ Namespace UIDDataSetTableAdapters
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
Public Overloads Overridable Function Fill(ByVal dataTable As UIDDataSet.tblDataDataTable) As Integer
@@ -1276,7 +1276,7 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
Public Overloads Overridable Function GetData() As UIDDataSet.tblDataDataTable
@@ -1287,35 +1287,35 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataTable As UIDDataSet.tblDataDataTable) As Integer
Return Me.Adapter.Update(dataTable)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataSet As UIDDataSet) As Integer
Return Me.Adapter.Update(dataSet, "tblData")
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(dataRows)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
Public Overloads Overridable Function Delete(ByVal Original_Id As Integer, ByVal Original_deakt As Boolean, ByVal Original_kuerzel As String, ByVal Original_firma As String, ByVal Original_uid As String, ByVal Original_eori As String, ByVal Original_info As String, ByVal Original_de_vz_vm As String, ByVal Original_de_fisk_vm As String, ByVal Original_at_vzfisk_vm As String, ByVal Original_letzter_benutzer As String) As Integer
@@ -1400,7 +1400,7 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
Public Overloads Overridable Function Insert(ByVal deakt As Boolean, ByVal kuerzel As String, ByVal firma As String, ByVal uid As String, ByVal eori As String, ByVal info As String, ByVal de_vz_vm As String, ByVal de_fisk_vm As String, ByVal at_vzfisk_vm As String, ByVal letzter_benutzer As String) As Integer
@@ -1466,7 +1466,7 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update( _
@@ -1620,7 +1620,7 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update( _
@@ -1669,7 +1669,7 @@ Namespace UIDDataSetTableAdapters
Private _connection As Global.System.Data.IDbConnection
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property UpdateOrder() As UpdateOrderOption
Get
Return Me._updateOrder
@@ -1680,7 +1680,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
"ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
"a", "System.Drawing.Design.UITypeEditor")> _
@@ -1694,7 +1694,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property BackupDataSetBeforeUpdate() As Boolean
Get
Return Me._backupDataSetBeforeUpdate
@@ -1705,7 +1705,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
Public Property Connection() As Global.System.Data.IDbConnection
Get
@@ -1724,7 +1724,7 @@ Namespace UIDDataSetTableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
Public ReadOnly Property TableAdapterInstanceCount() As Integer
Get
@@ -1740,7 +1740,7 @@ Namespace UIDDataSetTableAdapters
'''Update rows in top-down order.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function UpdateUpdatedRows(ByVal dataSet As UIDDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow), ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tblDataTableAdapter) Is Nothing) Then
@@ -1759,7 +1759,7 @@ Namespace UIDDataSetTableAdapters
'''Insert rows in top-down order.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function UpdateInsertedRows(ByVal dataSet As UIDDataSet, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tblDataTableAdapter) Is Nothing) Then
@@ -1777,7 +1777,7 @@ Namespace UIDDataSetTableAdapters
'''Delete rows in bottom-up order.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function UpdateDeletedRows(ByVal dataSet As UIDDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tblDataTableAdapter) Is Nothing) Then
@@ -1795,7 +1795,7 @@ Namespace UIDDataSetTableAdapters
'''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function GetRealUpdatedRows(ByVal updatedRows() As Global.System.Data.DataRow, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Global.System.Data.DataRow()
If ((updatedRows Is Nothing) _
OrElse (updatedRows.Length < 1)) Then
@@ -1821,7 +1821,7 @@ Namespace UIDDataSetTableAdapters
'''Update all changes to the dataset.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overridable Function UpdateAll(ByVal dataSet As UIDDataSet) As Integer
If (dataSet Is Nothing) Then
Throw New Global.System.ArgumentNullException("dataSet")
@@ -1956,13 +1956,13 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overridable Sub SortSelfReferenceRows(ByVal rows() As Global.System.Data.DataRow, ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
If (Not (Me._connection) Is Nothing) Then
Return true
@@ -1980,7 +1980,7 @@ Namespace UIDDataSetTableAdapters
'''<summary>
'''Update Order Option
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Enum UpdateOrderOption
InsertUpdateDelete = 0
@@ -1991,7 +1991,7 @@ Namespace UIDDataSetTableAdapters
'''<summary>
'''Used to sort self-referenced table's rows
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Class SelfReferenceComparer
Inherits Object
Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
@@ -2001,7 +2001,7 @@ Namespace UIDDataSetTableAdapters
Private _childFirst As Integer
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
MyBase.New
Me._relation = relation
@@ -2013,7 +2013,7 @@ Namespace UIDDataSetTableAdapters
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function GetRoot(ByVal row As Global.System.Data.DataRow, ByRef distance As Integer) As Global.System.Data.DataRow
Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing))
Dim root As Global.System.Data.DataRow = row
@@ -2052,7 +2052,7 @@ Namespace UIDDataSetTableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Compare(ByVal row1 As Global.System.Data.DataRow, ByVal row2 As Global.System.Data.DataRow) As Integer Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow).Compare
If Object.ReferenceEquals(row1, row2) Then
Return 0

232
UID/UIDDataSet1.Designer.vb generated
View File

@@ -30,7 +30,7 @@ Partial Public Class UIDDataSet1
Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.BeginInit
@@ -42,7 +42,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context, false)
If (Me.IsBinarySerialized(info, context) = true) Then
@@ -77,7 +77,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false), _
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
Public ReadOnly Property tblUser() As tblUserDataTable
@@ -87,7 +87,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.BrowsableAttribute(true), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -100,7 +100,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
Get
@@ -109,7 +109,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
Get
@@ -118,7 +118,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub InitializeDerivedDataSet()
Me.BeginInit
Me.InitClass
@@ -126,7 +126,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataSet
Dim cln As UIDDataSet1 = CType(MyBase.Clone,UIDDataSet1)
cln.InitVars
@@ -135,19 +135,19 @@ Partial Public Class UIDDataSet1
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function ShouldSerializeTables() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function ShouldSerializeRelations() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
Me.Reset
@@ -171,7 +171,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -180,13 +180,13 @@ Partial Public Class UIDDataSet1
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Overloads Sub InitVars()
Me.InitVars(true)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Overloads Sub InitVars(ByVal initTable As Boolean)
Me.tabletblUser = CType(MyBase.Tables("tblUser"),tblUserDataTable)
If (initTable = true) Then
@@ -197,7 +197,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitClass()
Me.DataSetName = "UIDDataSet1"
Me.Prefix = ""
@@ -209,13 +209,13 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function ShouldSerializetblUser() As Boolean
Return false
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
Me.InitVars
@@ -223,7 +223,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
Dim ds As UIDDataSet1 = New UIDDataSet1()
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
@@ -272,7 +272,7 @@ Partial Public Class UIDDataSet1
Return type
End Function
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Delegate Sub tblUserRowChangeEventHandler(ByVal sender As Object, ByVal e As tblUserRowChangeEvent)
'''<summary>
@@ -300,7 +300,7 @@ Partial Public Class UIDDataSet1
Private columnmit_niederlassung As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.TableName = "tblUser"
@@ -310,7 +310,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub New(ByVal table As Global.System.Data.DataTable)
MyBase.New
Me.TableName = table.TableName
@@ -328,14 +328,14 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context)
Me.InitVars
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_idColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_id
@@ -343,7 +343,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_usernameColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_username
@@ -351,7 +351,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_pwdColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_pwd
@@ -359,7 +359,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_vnameColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_vname
@@ -367,7 +367,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_nnameColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_nname
@@ -375,7 +375,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_berechtigungColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_berechtigung
@@ -383,7 +383,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_infoColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_info
@@ -391,7 +391,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property mit_niederlassungColumn() As Global.System.Data.DataColumn
Get
Return Me.columnmit_niederlassung
@@ -399,7 +399,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
Public ReadOnly Property Count() As Integer
Get
@@ -408,33 +408,33 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Default ReadOnly Property Item(ByVal index As Integer) As tblUserRow
Get
Return CType(Me.Rows(index),tblUserRow)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblUserRowChanging As tblUserRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblUserRowChanged As tblUserRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblUserRowDeleting As tblUserRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Event tblUserRowDeleted As tblUserRowChangeEventHandler
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overloads Sub AddtblUserRow(ByVal row As tblUserRow)
Me.Rows.Add(row)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overloads Function AddtblUserRow(ByVal mit_username As String, ByVal mit_pwd As String, ByVal mit_vname As String, ByVal mit_nname As String, ByVal mit_berechtigung As Integer, ByVal mit_info As String, ByVal mit_niederlassung As String) As tblUserRow
Dim rowtblUserRow As tblUserRow = CType(Me.NewRow,tblUserRow)
Dim columnValuesArray() As Object = New Object() {Nothing, mit_username, mit_pwd, mit_vname, mit_nname, mit_berechtigung, mit_info, mit_niederlassung}
@@ -444,13 +444,13 @@ Partial Public Class UIDDataSet1
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function FindBymit_id(ByVal mit_id As Integer) As tblUserRow
Return CType(Me.Rows.Find(New Object() {mit_id}),tblUserRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataTable
Dim cln As tblUserDataTable = CType(MyBase.Clone,tblUserDataTable)
cln.InitVars
@@ -458,13 +458,13 @@ Partial Public Class UIDDataSet1
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
Return New tblUserDataTable()
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub InitVars()
Me.columnmit_id = MyBase.Columns("mit_id")
Me.columnmit_username = MyBase.Columns("mit_username")
@@ -477,7 +477,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitClass()
Me.columnmit_id = New Global.System.Data.DataColumn("mit_id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnmit_id)
@@ -511,25 +511,25 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function NewtblUserRow() As tblUserRow
Return CType(Me.NewRow,tblUserRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
Return New tblUserRow(builder)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Function GetRowType() As Global.System.Type
Return GetType(tblUserRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e)
If (Not (Me.tblUserRowChangedEvent) Is Nothing) Then
@@ -538,7 +538,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanging(e)
If (Not (Me.tblUserRowChangingEvent) Is Nothing) Then
@@ -547,7 +547,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleted(e)
If (Not (Me.tblUserRowDeletedEvent) Is Nothing) Then
@@ -556,7 +556,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleting(e)
If (Not (Me.tblUserRowDeletingEvent) Is Nothing) Then
@@ -565,13 +565,13 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub RemovetblUserRow(ByVal row As tblUserRow)
Me.Rows.Remove(row)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence()
@@ -646,14 +646,14 @@ Partial Public Class UIDDataSet1
Private tabletblUser As tblUserDataTable
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
MyBase.New(rb)
Me.tabletblUser = CType(Me.Table,tblUserDataTable)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_id() As Integer
Get
Return CType(Me(Me.tabletblUser.mit_idColumn),Integer)
@@ -664,7 +664,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_username() As String
Get
Try
@@ -679,7 +679,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_pwd() As String
Get
Try
@@ -694,7 +694,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_vname() As String
Get
Try
@@ -709,7 +709,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_nname() As String
Get
Try
@@ -724,7 +724,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_berechtigung() As Integer
Get
Try
@@ -739,7 +739,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_info() As String
Get
Try
@@ -754,7 +754,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property mit_niederlassung() As String
Get
Try
@@ -769,85 +769,85 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_usernameNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_usernameColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_usernameNull()
Me(Me.tabletblUser.mit_usernameColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_pwdNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_pwdColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_pwdNull()
Me(Me.tabletblUser.mit_pwdColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_vnameNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_vnameColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_vnameNull()
Me(Me.tabletblUser.mit_vnameColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_nnameNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_nnameColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_nnameNull()
Me(Me.tabletblUser.mit_nnameColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_berechtigungNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_berechtigungColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_berechtigungNull()
Me(Me.tabletblUser.mit_berechtigungColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_infoNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_infoColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_infoNull()
Me(Me.tabletblUser.mit_infoColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Ismit_niederlassungNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_niederlassungColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub Setmit_niederlassungNull()
Me(Me.tabletblUser.mit_niederlassungColumn) = Global.System.Convert.DBNull
End Sub
@@ -856,7 +856,7 @@ Partial Public Class UIDDataSet1
'''<summary>
'''Row event argument class
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Class tblUserRowChangeEvent
Inherits Global.System.EventArgs
@@ -865,7 +865,7 @@ Partial Public Class UIDDataSet1
Private eventAction As Global.System.Data.DataRowAction
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New(ByVal row As tblUserRow, ByVal action As Global.System.Data.DataRowAction)
MyBase.New
Me.eventRow = row
@@ -873,7 +873,7 @@ Partial Public Class UIDDataSet1
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property Row() As tblUserRow
Get
Return Me.eventRow
@@ -881,7 +881,7 @@ Partial Public Class UIDDataSet1
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property Action() As Global.System.Data.DataRowAction
Get
Return Me.eventAction
@@ -915,14 +915,14 @@ Namespace UIDDataSet1TableAdapters
Private _clearBeforeFill As Boolean
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New()
MyBase.New
Me.ClearBeforeFill = true
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
Get
If (Me._adapter Is Nothing) Then
@@ -933,7 +933,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
Get
If (Me._connection Is Nothing) Then
@@ -963,7 +963,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
Get
Return Me._transaction
@@ -991,7 +991,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
Get
If (Me._commandCollection Is Nothing) Then
@@ -1002,7 +1002,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property ClearBeforeFill() As Boolean
Get
Return Me._clearBeforeFill
@@ -1013,7 +1013,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitAdapter()
Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
@@ -1115,14 +1115,14 @@ Namespace UIDDataSet1TableAdapters
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = My.Settings.connToUID 'Global.UID.My.MySettings.Default.connToUID
Me._connection.ConnectionString = VERAG_PROG_ALLGEMEIN.SQL.GetDISPOConnectionString
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitCommandCollection()
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
@@ -1133,7 +1133,7 @@ Namespace UIDDataSet1TableAdapters
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
Public Overloads Overridable Function Fill(ByVal dataTable As UIDDataSet1.tblUserDataTable) As Integer
@@ -1146,7 +1146,7 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
Public Overloads Overridable Function GetData() As UIDDataSet1.tblUserDataTable
@@ -1157,35 +1157,35 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataTable As UIDDataSet1.tblUserDataTable) As Integer
Return Me.Adapter.Update(dataTable)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataSet As UIDDataSet1) As Integer
Return Me.Adapter.Update(dataSet, "tblUser")
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(dataRows)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
Public Overloads Overridable Function Delete(ByVal Original_mit_id As Integer, ByVal Original_mit_username As String, ByVal Original_mit_pwd As String, ByVal Original_mit_vname As String, ByVal Original_mit_nname As String, ByVal Original_mit_berechtigung As Global.System.Nullable(Of Integer), ByVal Original_mit_info As String, ByVal Original_mit_niederlassung As String) As Integer
@@ -1255,7 +1255,7 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
Public Overloads Overridable Function Insert(ByVal mit_username As String, ByVal mit_pwd As String, ByVal mit_vname As String, ByVal mit_nname As String, ByVal mit_berechtigung As Global.System.Nullable(Of Integer), ByVal mit_info As String, ByVal mit_niederlassung As String) As Integer
@@ -1310,7 +1310,7 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update( _
@@ -1432,7 +1432,7 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update(ByVal mit_username As String, ByVal mit_pwd As String, ByVal mit_vname As String, ByVal mit_nname As String, ByVal mit_berechtigung As Global.System.Nullable(Of Integer), ByVal mit_info As String, ByVal mit_niederlassung As String, ByVal Original_mit_id As Integer, ByVal Original_mit_username As String, ByVal Original_mit_pwd As String, ByVal Original_mit_vname As String, ByVal Original_mit_nname As String, ByVal Original_mit_berechtigung As Global.System.Nullable(Of Integer), ByVal Original_mit_info As String, ByVal Original_mit_niederlassung As String) As Integer
@@ -1460,7 +1460,7 @@ Namespace UIDDataSet1TableAdapters
Private _connection As Global.System.Data.IDbConnection
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property UpdateOrder() As UpdateOrderOption
Get
Return Me._updateOrder
@@ -1471,7 +1471,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
"ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
"a", "System.Drawing.Design.UITypeEditor")> _
@@ -1485,7 +1485,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property BackupDataSetBeforeUpdate() As Boolean
Get
Return Me._backupDataSetBeforeUpdate
@@ -1496,7 +1496,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
Public Property Connection() As Global.System.Data.IDbConnection
Get
@@ -1515,7 +1515,7 @@ Namespace UIDDataSet1TableAdapters
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
Public ReadOnly Property TableAdapterInstanceCount() As Integer
Get
@@ -1531,7 +1531,7 @@ Namespace UIDDataSet1TableAdapters
'''Update rows in top-down order.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function UpdateUpdatedRows(ByVal dataSet As UIDDataSet1, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow), ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tblUserTableAdapter) Is Nothing) Then
@@ -1550,7 +1550,7 @@ Namespace UIDDataSet1TableAdapters
'''Insert rows in top-down order.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function UpdateInsertedRows(ByVal dataSet As UIDDataSet1, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tblUserTableAdapter) Is Nothing) Then
@@ -1568,7 +1568,7 @@ Namespace UIDDataSet1TableAdapters
'''Delete rows in bottom-up order.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function UpdateDeletedRows(ByVal dataSet As UIDDataSet1, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tblUserTableAdapter) Is Nothing) Then
@@ -1586,7 +1586,7 @@ Namespace UIDDataSet1TableAdapters
'''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function GetRealUpdatedRows(ByVal updatedRows() As Global.System.Data.DataRow, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Global.System.Data.DataRow()
If ((updatedRows Is Nothing) _
OrElse (updatedRows.Length < 1)) Then
@@ -1612,7 +1612,7 @@ Namespace UIDDataSet1TableAdapters
'''Update all changes to the dataset.
'''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Overridable Function UpdateAll(ByVal dataSet As UIDDataSet1) As Integer
If (dataSet Is Nothing) Then
Throw New Global.System.ArgumentNullException("dataSet")
@@ -1747,13 +1747,13 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overridable Sub SortSelfReferenceRows(ByVal rows() As Global.System.Data.DataRow, ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
If (Not (Me._connection) Is Nothing) Then
Return true
@@ -1771,7 +1771,7 @@ Namespace UIDDataSet1TableAdapters
'''<summary>
'''Update Order Option
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Enum UpdateOrderOption
InsertUpdateDelete = 0
@@ -1782,7 +1782,7 @@ Namespace UIDDataSet1TableAdapters
'''<summary>
'''Used to sort self-referenced table's rows
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Class SelfReferenceComparer
Inherits Object
Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
@@ -1792,7 +1792,7 @@ Namespace UIDDataSet1TableAdapters
Private _childFirst As Integer
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
MyBase.New
Me._relation = relation
@@ -1804,7 +1804,7 @@ Namespace UIDDataSet1TableAdapters
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Function GetRoot(ByVal row As Global.System.Data.DataRow, ByRef distance As Integer) As Global.System.Data.DataRow
Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing))
Dim root As Global.System.Data.DataRow = row
@@ -1843,7 +1843,7 @@ Namespace UIDDataSet1TableAdapters
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function Compare(ByVal row1 As Global.System.Data.DataRow, ByVal row2 As Global.System.Data.DataRow) As Integer Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow).Compare
If Object.ReferenceEquals(row1, row2) Then
Return 0

2
UID/app.config
View File

@@ -30,4 +30,4 @@
<endpoint address="http://localhost:8733/Design_Time_Addresses/RKSVCompleteServer/Service1/" binding="basicHttpBinding" bindingConfiguration="BasicHttpBinding_IRKSVWcf" contract="RKSVServer.IRKSVWcf" name="BasicHttpBinding_IRKSVWcf"/>
</client>
</system.serviceModel>
<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7"/></startup></configuration>
<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/></startup></configuration>

13
UID/cSqlDb.vb
View File

@@ -49,6 +49,7 @@ Public Class cEntry
Property kd_info As String = ""
Property kd_tarifInfo As String = ""
Property kd_rolle As String = ""
Property kd_AVISOfirma As String = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Property kdoez As cOeffnungszeiten
Property kd_FMZOLL_KdNr As Object = Nothing
@@ -97,6 +98,7 @@ Public Class cEntry
Me.kd_isRefNr = dr.Item("kd_isRefNr")
If Not dr.Item("kd_refNr") Is DBNull.Value Then Me.kd_refNr = dr.Item("kd_refNr")
Me.kd_info = dr.Item("kd_info")
Me.kd_AVISOfirma = dr.Item("kd_AVISOfirma")
If Not dr.Item("kd_tarifInfo") Is Nothing And Not dr.Item("kd_tarifInfo") Is DBNull.Value Then Me.kd_tarifInfo = dr.Item("kd_tarifInfo") Else Me.kd_tarifInfo = ""
If Not dr.Item("kd_rolle") = vbNullString Then Me.kd_rolle = dr.Item("kd_rolle") Else Me.kd_rolle = 0
If dr.Item("kd_FMZOLL_KdNr") IsNot DBNull.Value Then Me.kd_FMZOLL_KdNr = dr.Item("kd_FMZOLL_KdNr") Else Me.kd_FMZOLL_KdNr = Nothing
@@ -1059,6 +1061,7 @@ Public Class cOptionenDAL
daten.kd_isRefNr = dr.Item("kd_isRefNr")
If Not dr.Item("kd_refNr") Is DBNull.Value Then daten.kd_refNr = dr.Item("kd_refNr")
daten.kd_info = dr.Item("kd_info")
daten.kd_AVISOfirma = dr.Item("kd_AVISOfirma")
If Not dr.Item("kd_tarifInfo") Is Nothing And Not dr.Item("kd_tarifInfo") Is DBNull.Value Then daten.kd_tarifInfo = dr.Item("kd_tarifInfo") Else daten.kd_tarifInfo = ""
If Not dr.Item("kd_rolle") = vbNullString Then daten.kd_rolle = dr.Item("kd_rolle") Else daten.kd_rolle = 0
If dr.Item("kd_FMZOLL_KdNr") IsNot DBNull.Value Then daten.kd_FMZOLL_KdNr = dr.Item("kd_FMZOLL_KdNr") Else daten.kd_FMZOLL_KdNr = Nothing
@@ -1371,8 +1374,8 @@ Public Class cOptionenDAL
Public Function insertKunden(ByVal d As cEntry) As Integer
Dim oez_id As Integer = insertOeffnungszeiten(d.kdoez)
Dim sql = "INSERT INTO tblKunden " &
"(kd_firma, kd_str, kd_strnr, kd_plz, kd_ort, kd_land,kd_anspr1_vn,kd_anspr1_nn,kd_anspr2_vn,kd_anspr2_nn,kd_tel,kd_fax,kd_email,kd_homepage,kd_TIMOCOM,kd_oez_id,kd_neutralisierung,kd_aviso,kd_isRefNr,kd_refNr,kd_info,kd_tarifInfo,kd_rolle,kd_FMZOLL_KdNr) VALUES " &
"(@kd_firma,@kd_str,@kd_strnr,@kd_plz,@kd_ort,@kd_land,@kd_anspr1_vn,@kd_anspr1_nn,@kd_anspr2_vn,@kd_anspr2_nn,@kd_tel,@kd_fax,@kd_email,@kd_homepage,@kd_TIMOCOM,@kd_oez_id,@kd_neutralisierung,@kd_aviso,@kd_isRefNr,@kd_refNr,@kd_info,@kd_tarifInfo,@kd_rolle,@kd_FMZOLL_KdNr)"
"(kd_firma, kd_str, kd_strnr, kd_plz, kd_ort, kd_land,kd_anspr1_vn,kd_anspr1_nn,kd_anspr2_vn,kd_anspr2_nn,kd_tel,kd_fax,kd_email,kd_homepage,kd_TIMOCOM,kd_oez_id,kd_neutralisierung,kd_aviso,kd_isRefNr,kd_refNr,kd_info,kd_tarifInfo,kd_rolle,kd_FMZOLL_KdNr,kd_AVISOfirma) VALUES " &
"(@kd_firma,@kd_str,@kd_strnr,@kd_plz,@kd_ort,@kd_land,@kd_anspr1_vn,@kd_anspr1_nn,@kd_anspr2_vn,@kd_anspr2_nn,@kd_tel,@kd_fax,@kd_email,@kd_homepage,@kd_TIMOCOM,@kd_oez_id,@kd_neutralisierung,@kd_aviso,@kd_isRefNr,@kd_refNr,@kd_info,@kd_tarifInfo,@kd_rolle,@kd_FMZOLL_KdNr,@kd_AVISOfirma)"
Using conn As SqlConnection = cSqlDb.GetNewOpenConnection()
Using cmd As New SqlCommand(sql, conn)
@@ -1398,6 +1401,7 @@ Public Class cOptionenDAL
cmd.Parameters.AddWithValue("@kd_isRefNr", d.kd_isRefNr)
cmd.Parameters.AddWithValue("@kd_refNr", d.kd_refNr)
cmd.Parameters.AddWithValue("@kd_info", d.kd_info)
cmd.Parameters.AddWithValue("@kd_AVISOfirma", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA)
cmd.Parameters.AddWithValue("@kd_tarifInfo", d.kd_tarifInfo)
cmd.Parameters.AddWithValue("@kd_rolle", d.kd_rolle)
cmd.Parameters.AddWithValue("@kd_FMZOLL_KdNr", If(d.kd_FMZOLL_KdNr, DBNull.Value))
@@ -1473,7 +1477,7 @@ Public Class cOptionenDAL
Dim hAuswahl As String = ""
'Änderung
Dim sql = "UPDATE tblKunden " &
"SET kd_firma=@kd_firma, kd_str=@kd_str, kd_strnr=@kd_strnr, kd_plz=@kd_plz, kd_ort=@kd_ort, kd_land=@kd_land, kd_anspr1_vn=@kd_anspr1_vn, kd_anspr1_nn=@kd_anspr1_nn, kd_anspr2_vn=@kd_anspr2_vn, kd_anspr2_nn=@kd_anspr2_nn, kd_tel=@kd_tel, kd_fax=@kd_fax, kd_email=@kd_email, kd_homepage=@kd_homepage, kd_TIMOCOM=@kd_TIMOCOM, kd_neutralisierung=@kd_neutralisierung, kd_aviso=@kd_aviso, kd_isRefNr=@kd_isRefNr,kd_refNr=@kd_refNr,kd_info=@kd_info, kd_tarifInfo=@kd_tarifInfo ,kd_rolle=@kd_rolle, kd_FMZOLL_KdNr=@kd_FMZOLL_KdNr " &
"SET kd_firma=@kd_firma, kd_str=@kd_str, kd_strnr=@kd_strnr, kd_plz=@kd_plz, kd_ort=@kd_ort, kd_land=@kd_land, kd_anspr1_vn=@kd_anspr1_vn, kd_anspr1_nn=@kd_anspr1_nn, kd_anspr2_vn=@kd_anspr2_vn, kd_anspr2_nn=@kd_anspr2_nn, kd_tel=@kd_tel, kd_fax=@kd_fax, kd_email=@kd_email, kd_homepage=@kd_homepage, kd_TIMOCOM=@kd_TIMOCOM, kd_neutralisierung=@kd_neutralisierung, kd_aviso=@kd_aviso, kd_isRefNr=@kd_isRefNr,kd_refNr=@kd_refNr,kd_info=@kd_info, kd_tarifInfo=@kd_tarifInfo ,kd_rolle=@kd_rolle, kd_FMZOLL_KdNr=@kd_FMZOLL_KdNr, kd_AVISOfirma=@kd_AVISOfirma " &
" WHERE kd_id=@kd_id"
Using conn As SqlConnection = cSqlDb.GetNewOpenConnection()
Using cmd As New SqlCommand(sql, conn)
@@ -1498,6 +1502,7 @@ Public Class cOptionenDAL
cmd.Parameters.AddWithValue("@kd_isRefNr", d.kd_isRefNr)
cmd.Parameters.AddWithValue("@kd_refNr", d.kd_refNr)
cmd.Parameters.AddWithValue("@kd_info", d.kd_info)
cmd.Parameters.AddWithValue("@kd_AVISOfirma", d.kd_AVISOfirma)
cmd.Parameters.AddWithValue("@kd_tarifInfo", d.kd_tarifInfo)
cmd.Parameters.AddWithValue("@kd_rolle", d.kd_rolle)
cmd.Parameters.AddWithValue("@kd_id", d.kd_id)
@@ -1943,7 +1948,7 @@ Public Class cFrachtkostenSQL
Public Function getAllFirmen() As List(Of cFrachtkostenFirmen)
'falls ID mitgegeben, dann diese laden, ansonsten den anderen Wert suchen
Dim sql As String = "SELECT kd_firma, kd_id FROM tblKunden "
Dim sql As String = "SELECT kd_firma, kd_id FROM tblKunden WHERE kd_AVISOfirma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' "
Dim daten As New List(Of cFrachtkostenFirmen)
Try
Using conn As SqlConnection = cSqlDb.GetNewOpenConnection()

16
UID/frmAuftragNEU.vb
View File

@@ -106,6 +106,15 @@ Public Class frmAuftragNEU
End Sub
Private Sub frmAuftrag_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
cboFilialenNr.fillWithSQL("SELECT FilialenNr, cast(FilialenNr as varchar(4)) + ' ' + Grenzstelle FROM Filialen WHERE Fil_Status='A' AND FilialenNr=5701 ORDER BY FilialenNr ", True, "FMZOLL", True)
cboFilialenNr.changeItem("5701")
cboFirma.Items.Clear()
cboFirma.Items.Add("AMBAR")
cboFirma.SelectedIndex = 0
Else
cboFilialenNr.fillWithSQL("SELECT FilialenNr, cast(FilialenNr as varchar(4)) + ' ' + Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", True, "FMZOLL", True)
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_niederlassung
@@ -116,6 +125,11 @@ Public Class frmAuftragNEU
cboFirma.SelectedIndex = 0
cboFirma2.SelectedIndex = 0
End If
cboAuftragsart.Items.Clear()
cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("HANDLING", "HANDLING"))
cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TRANSPORT", "TRANSPORT"))
@@ -1817,6 +1831,8 @@ Public Class frmAuftragNEU
cboFirma.SelectedItem = "VERAG AG"
ElseIf cboFilialenNr.SelectedItem.value = "4819" Then
cboFirma.SelectedItem = "VERAG GmbH"
ElseIf cboFilialenNr.SelectedItem.value = "5701" Then
cboFirma.SelectedItem = "AMBAR"
End If
cboFirma2.SelectedItem = cboFirma.SelectedItem
End Sub

115
UID/frmDetails.Designer.vb generated
View File

@@ -28,6 +28,8 @@ Partial Class frmDetails
Me.btnCancel = New System.Windows.Forms.Button()
Me.tabKunde = New System.Windows.Forms.TabControl()
Me.tab1Allg = New System.Windows.Forms.TabPage()
Me.txtTIMOCOM = New System.Windows.Forms.TextBox()
Me.Label16 = New System.Windows.Forms.Label()
Me.btnVERAGKDLaden = New System.Windows.Forms.Button()
Me.Label15 = New System.Windows.Forms.Label()
Me.kdFirma = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
@@ -133,8 +135,7 @@ Partial Class frmDetails
Me.Label14 = New System.Windows.Forms.Label()
Me.btnSave = New System.Windows.Forms.Button()
Me.cboRolle = New DISPO.MyComboBox(Me.components)
Me.Label16 = New System.Windows.Forms.Label()
Me.txtTIMOCOM = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.tabKunde.SuspendLayout()
Me.tab1Allg.SuspendLayout()
Me.GroupBox1.SuspendLayout()
@@ -181,6 +182,7 @@ Partial Class frmDetails
'
'tab1Allg
'
Me.tab1Allg.Controls.Add(Me.Button1)
Me.tab1Allg.Controls.Add(Me.txtTIMOCOM)
Me.tab1Allg.Controls.Add(Me.Label16)
Me.tab1Allg.Controls.Add(Me.btnVERAGKDLaden)
@@ -272,27 +274,44 @@ Partial Class frmDetails
Me.tab1Allg.Text = "Allgemein"
Me.tab1Allg.UseVisualStyleBackColor = True
'
'txtTIMOCOM
'
Me.txtTIMOCOM.Location = New System.Drawing.Point(116, 360)
Me.txtTIMOCOM.Name = "txtTIMOCOM"
Me.txtTIMOCOM.Size = New System.Drawing.Size(296, 20)
Me.txtTIMOCOM.TabIndex = 516
'
'Label16
'
Me.Label16.AutoSize = True
Me.Label16.Location = New System.Drawing.Point(12, 366)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(61, 13)
Me.Label16.TabIndex = 515
Me.Label16.Text = "TIMOCOM:"
'
'btnVERAGKDLaden
'
Me.btnVERAGKDLaden.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnVERAGKDLaden.Location = New System.Drawing.Point(287, 342)
Me.btnVERAGKDLaden.Location = New System.Drawing.Point(112, 36)
Me.btnVERAGKDLaden.Name = "btnVERAGKDLaden"
Me.btnVERAGKDLaden.Size = New System.Drawing.Size(125, 23)
Me.btnVERAGKDLaden.TabIndex = 513
Me.btnVERAGKDLaden.Text = "VERAG KD laden"
Me.btnVERAGKDLaden.Text = "AVISO KD laden"
Me.btnVERAGKDLaden.UseVisualStyleBackColor = True
'
'Label15
'
Me.Label15.AutoSize = True
Me.Label15.Location = New System.Drawing.Point(12, 373)
Me.Label15.Location = New System.Drawing.Point(8, 15)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(63, 13)
Me.Label15.Size = New System.Drawing.Size(58, 13)
Me.Label15.TabIndex = 512
Me.Label15.Text = "VERAG-Kd:"
Me.Label15.Text = "AVISO-Kd:"
'
'kdFirma
'
Me.kdFirma._AlleFirmenCLUSTER = False
Me.kdFirma._AllowSetValue = True
Me.kdFirma._autoSizeGross = False
Me.kdFirma._display_Name1 = False
@@ -300,19 +319,22 @@ Partial Class frmDetails
Me.kdFirma._displayFullName = False
Me.kdFirma._displayWoelflKd = False
Me.kdFirma._hideIfListEmpty = True
Me.kdFirma._loadKdData = False
Me.kdFirma._loadKdData = True
Me.kdFirma._searchName1 = True
Me.kdFirma._UseFIRMA = ""
Me.kdFirma._ValueKdAndName = True
Me.kdFirma.dgvpos = "LEFT"
Me.kdFirma.KdName = ""
Me.kdFirma.KdNr = "-1"
Me.kdFirma.kdNrField = Nothing
Me.kdFirma.KdNrNullInt = Nothing
Me.kdFirma.Location = New System.Drawing.Point(116, 371)
Me.kdFirma.Location = New System.Drawing.Point(112, 13)
Me.kdFirma.Name = "kdFirma"
Me.kdFirma.nurAktive = True
Me.kdFirma.searchActive = True
Me.kdFirma.Size = New System.Drawing.Size(296, 20)
Me.kdFirma.TabIndex = 511
Me.kdFirma.TIMER_SEARCH = True
Me.kdFirma.usrcntl = Nothing
'
'GroupBox1
@@ -363,7 +385,7 @@ Partial Class frmDetails
'Label27
'
Me.Label27.AutoSize = True
Me.Label27.Location = New System.Drawing.Point(303, 99)
Me.Label27.Location = New System.Drawing.Point(305, 152)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(59, 13)
Me.Label27.TabIndex = 124
@@ -372,7 +394,7 @@ Partial Class frmDetails
'Label26
'
Me.Label26.AutoSize = True
Me.Label26.Location = New System.Drawing.Point(154, 99)
Me.Label26.Location = New System.Drawing.Point(156, 152)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(49, 13)
Me.Label26.TabIndex = 123
@@ -380,14 +402,14 @@ Partial Class frmDetails
'
'txtAnspr2_nn
'
Me.txtAnspr2_nn.Location = New System.Drawing.Point(261, 141)
Me.txtAnspr2_nn.Location = New System.Drawing.Point(263, 194)
Me.txtAnspr2_nn.Name = "txtAnspr2_nn"
Me.txtAnspr2_nn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr2_nn.TabIndex = 9
'
'txtAnspr2_vn
'
Me.txtAnspr2_vn.Location = New System.Drawing.Point(110, 141)
Me.txtAnspr2_vn.Location = New System.Drawing.Point(112, 194)
Me.txtAnspr2_vn.Name = "txtAnspr2_vn"
Me.txtAnspr2_vn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr2_vn.TabIndex = 8
@@ -871,7 +893,7 @@ Partial Class frmDetails
'
Me.Label12.AutoSize = True
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label12.Location = New System.Drawing.Point(10, 182)
Me.Label12.Location = New System.Drawing.Point(12, 235)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(51, 13)
Me.Label12.TabIndex = 69
@@ -880,7 +902,7 @@ Partial Class frmDetails
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(10, 284)
Me.Label8.Location = New System.Drawing.Point(12, 337)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(62, 13)
Me.Label8.TabIndex = 68
@@ -888,7 +910,7 @@ Partial Class frmDetails
'
'txtHomepage
'
Me.txtHomepage.Location = New System.Drawing.Point(114, 281)
Me.txtHomepage.Location = New System.Drawing.Point(116, 334)
Me.txtHomepage.Name = "txtHomepage"
Me.txtHomepage.Size = New System.Drawing.Size(296, 20)
Me.txtHomepage.TabIndex = 13
@@ -896,7 +918,7 @@ Partial Class frmDetails
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.Location = New System.Drawing.Point(10, 258)
Me.Label11.Location = New System.Drawing.Point(12, 311)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(39, 13)
Me.Label11.TabIndex = 66
@@ -904,7 +926,7 @@ Partial Class frmDetails
'
'txtEmail
'
Me.txtEmail.Location = New System.Drawing.Point(114, 255)
Me.txtEmail.Location = New System.Drawing.Point(116, 308)
Me.txtEmail.Name = "txtEmail"
Me.txtEmail.Size = New System.Drawing.Size(296, 20)
Me.txtEmail.TabIndex = 12
@@ -912,7 +934,7 @@ Partial Class frmDetails
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Location = New System.Drawing.Point(10, 232)
Me.Label7.Location = New System.Drawing.Point(12, 285)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(27, 13)
Me.Label7.TabIndex = 64
@@ -920,7 +942,7 @@ Partial Class frmDetails
'
'txtFax
'
Me.txtFax.Location = New System.Drawing.Point(114, 229)
Me.txtFax.Location = New System.Drawing.Point(116, 282)
Me.txtFax.Name = "txtFax"
Me.txtFax.Size = New System.Drawing.Size(296, 20)
Me.txtFax.TabIndex = 11
@@ -928,7 +950,7 @@ Partial Class frmDetails
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(10, 206)
Me.Label6.Location = New System.Drawing.Point(12, 259)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(46, 13)
Me.Label6.TabIndex = 62
@@ -936,14 +958,14 @@ Partial Class frmDetails
'
'txtTel
'
Me.txtTel.Location = New System.Drawing.Point(114, 203)
Me.txtTel.Location = New System.Drawing.Point(116, 256)
Me.txtTel.Name = "txtTel"
Me.txtTel.Size = New System.Drawing.Size(296, 20)
Me.txtTel.TabIndex = 10
'
'txtStrNr
'
Me.txtStrNr.Location = New System.Drawing.Point(351, 39)
Me.txtStrNr.Location = New System.Drawing.Point(353, 92)
Me.txtStrNr.Name = "txtStrNr"
Me.txtStrNr.Size = New System.Drawing.Size(55, 20)
Me.txtStrNr.TabIndex = 2
@@ -951,7 +973,7 @@ Partial Class frmDetails
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(6, 144)
Me.Label10.Location = New System.Drawing.Point(8, 197)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(103, 13)
Me.Label10.TabIndex = 58
@@ -959,7 +981,7 @@ Partial Class frmDetails
'
'txtAnspr1_nn
'
Me.txtAnspr1_nn.Location = New System.Drawing.Point(261, 115)
Me.txtAnspr1_nn.Location = New System.Drawing.Point(263, 168)
Me.txtAnspr1_nn.Name = "txtAnspr1_nn"
Me.txtAnspr1_nn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr1_nn.TabIndex = 7
@@ -967,7 +989,7 @@ Partial Class frmDetails
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Location = New System.Drawing.Point(6, 118)
Me.Label5.Location = New System.Drawing.Point(8, 171)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(97, 13)
Me.Label5.TabIndex = 55
@@ -975,7 +997,7 @@ Partial Class frmDetails
'
'txtAnspr1_vn
'
Me.txtAnspr1_vn.Location = New System.Drawing.Point(110, 115)
Me.txtAnspr1_vn.Location = New System.Drawing.Point(112, 168)
Me.txtAnspr1_vn.Name = "txtAnspr1_vn"
Me.txtAnspr1_vn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr1_vn.TabIndex = 6
@@ -984,14 +1006,14 @@ Partial Class frmDetails
'
Me.cbxLand.FormattingEnabled = True
Me.cbxLand.Items.AddRange(New Object() {"AT", "DE", "HR", "IT", "RO", "SRB", "TR"})
Me.cbxLand.Location = New System.Drawing.Point(110, 64)
Me.cbxLand.Location = New System.Drawing.Point(112, 117)
Me.cbxLand.Name = "cbxLand"
Me.cbxLand.Size = New System.Drawing.Size(55, 21)
Me.cbxLand.TabIndex = 5
'
'txtOrt
'
Me.txtOrt.Location = New System.Drawing.Point(232, 65)
Me.txtOrt.Location = New System.Drawing.Point(234, 118)
Me.txtOrt.Name = "txtOrt"
Me.txtOrt.Size = New System.Drawing.Size(174, 20)
Me.txtOrt.TabIndex = 4
@@ -999,7 +1021,7 @@ Partial Class frmDetails
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(6, 68)
Me.Label3.Location = New System.Drawing.Point(8, 121)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(90, 13)
Me.Label3.TabIndex = 41
@@ -1007,7 +1029,7 @@ Partial Class frmDetails
'
'txtPlz
'
Me.txtPlz.Location = New System.Drawing.Point(171, 65)
Me.txtPlz.Location = New System.Drawing.Point(173, 118)
Me.txtPlz.Name = "txtPlz"
Me.txtPlz.Size = New System.Drawing.Size(55, 20)
Me.txtPlz.TabIndex = 3
@@ -1015,7 +1037,7 @@ Partial Class frmDetails
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(6, 42)
Me.Label2.Location = New System.Drawing.Point(8, 95)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(63, 13)
Me.Label2.TabIndex = 39
@@ -1023,7 +1045,7 @@ Partial Class frmDetails
'
'txtStr
'
Me.txtStr.Location = New System.Drawing.Point(110, 39)
Me.txtStr.Location = New System.Drawing.Point(112, 92)
Me.txtStr.Name = "txtStr"
Me.txtStr.Size = New System.Drawing.Size(235, 20)
Me.txtStr.TabIndex = 1
@@ -1032,7 +1054,7 @@ Partial Class frmDetails
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(6, 16)
Me.Label1.Location = New System.Drawing.Point(8, 69)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(41, 13)
Me.Label1.TabIndex = 37
@@ -1041,7 +1063,7 @@ Partial Class frmDetails
'txtFirma
'
Me.txtFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtFirma.Location = New System.Drawing.Point(110, 13)
Me.txtFirma.Location = New System.Drawing.Point(112, 66)
Me.txtFirma.Name = "txtFirma"
Me.txtFirma.Size = New System.Drawing.Size(296, 20)
Me.txtFirma.TabIndex = 0
@@ -1202,21 +1224,15 @@ Partial Class frmDetails
Me.cboRolle.Size = New System.Drawing.Size(295, 21)
Me.cboRolle.TabIndex = 511
'
'Label16
'Button1
'
Me.Label16.AutoSize = True
Me.Label16.Location = New System.Drawing.Point(10, 313)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(61, 13)
Me.Label16.TabIndex = 515
Me.Label16.Text = "TIMOCOM:"
'
'txtTIMOCOM
'
Me.txtTIMOCOM.Location = New System.Drawing.Point(114, 307)
Me.txtTIMOCOM.Name = "txtTIMOCOM"
Me.txtTIMOCOM.Size = New System.Drawing.Size(296, 20)
Me.txtTIMOCOM.TabIndex = 516
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Location = New System.Drawing.Point(283, 36)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(125, 23)
Me.Button1.TabIndex = 517
Me.Button1.Text = "AVISO KD öffnen >>"
Me.Button1.UseVisualStyleBackColor = True
'
'frmDetails
'
@@ -1368,4 +1384,5 @@ Partial Class frmDetails
Friend WithEvents btnVERAGKDLaden As System.Windows.Forms.Button
Friend WithEvents txtTIMOCOM As TextBox
Friend WithEvents Label16 As Label
Friend WithEvents Button1 As Button
End Class

40
UID/frmDetails.vb
View File

@@ -23,7 +23,7 @@ Public Class frmDetails
Private Sub frmDetails_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
If valueChanged = False Or closeOK Then
If mainForm = "frmMain" Then
frmMain.Enabled = True : frmMain.Tabelle_anzeigen()
'frmMain.Enabled = True 'frmMain.Tabelle_anzeigen()
ElseIf mainForm = "frmSearch" Then
frmSearch.Tabelle_anzeigen()
End If
@@ -32,7 +32,7 @@ Public Class frmDetails
Select Case MsgBox("Wollen Sie die geänderten Daten verwerfen?", vbQuestion Or vbYesNo Or vbDefaultButton2, "Änderung verwerfen?")
Case vbYes
If mainForm = "frmMain" Then
frmMain.Enabled = True : frmMain.Tabelle_anzeigen()
'frmMain.Enabled = True ' frmMain.Tabelle_anzeigen()
ElseIf mainForm = "frmSearch" Then
frmSearch.Tabelle_anzeigen()
End If
@@ -142,6 +142,7 @@ Public Class frmDetails
binddata(txtHomepage, "Text", bindingDATA.bindingSource, "kd_homepage")
binddata(txtTIMOCOM, "Text", bindingDATA.bindingSource, "kd_TIMOCOM")
Dim kdnr = (bindingDATA.bindingdataTable.Rows(0).Item("kd_FMZOLL_KdNr"))
kdFirma.KdNr = If(kdnr Is DBNull.Value, -1, kdnr)
@@ -604,7 +605,7 @@ Public Class frmDetails
If txtFirma.Text = "" Then
MsgBox("Bitte geben Sie ein Kürzel an!") : val = False
ElseIf cOptionenDAL.insertKunden(entry) Then
frmMain.Tabelle_anzeigen()
'frmMain.Tabelle_anzeigen()
closeOK = True
Me.Close()
End If
@@ -718,7 +719,7 @@ Public Class frmDetails
If txtFirma.Text = "" Then
MsgBox("Bitte geben Sie ein Kürzel an!") : val = False
ElseIf cOptionenDAL.updateKunden(k) Then
frmMain.Tabelle_anzeigen()
'frmMain.Tabelle_anzeigen()
closeOK = True
Me.Close()
End If
@@ -1059,5 +1060,36 @@ Public Class frmDetails
End If
End Sub
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
If kdFirma.KdNrNullInt IsNot Nothing Then
showKd(kdFirma.KdNrNullInt)
End If
End Sub
Public Sub showKd(kdnr, Optional TopMost = False)
'For Each frm As Form In Application.OpenForms.Item("frmKundenUebersichtZOLL") Is Nothing
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("WARENORT", "AVISO") Then Exit Sub
For Each openForm In Application.OpenForms()
If TypeOf (openForm) Is SDL.frmKundenUebersichtZOLL Then
CType(openForm, SDL.frmKundenUebersichtZOLL).BringToFront()
If TopMost Then CType(openForm, SDL.frmKundenUebersichtZOLL).TopMost = True
CType(openForm, SDL.frmKundenUebersichtZOLL).KdSearchBox1.KdNr = kdnr
Exit Sub
End If
Next
'If False Then
' If Not Application.OpenForms.Item("frmKundenUebersichtZOLL") Is Nothing Then
' Application.OpenForms.Item("frmKundenUebersichtZOLL").BringToFront()
' Exit Sub
' End If
'End If
'' Next
Dim zoll As New SDL.frmKundenUebersichtZOLL(kdnr)
If zoll IsNot Nothing Then zoll.Show() : zoll.BringToFront()
End Sub
End Class

2
UID/frmFrachtkosten.vb
View File

@@ -234,7 +234,7 @@ Public Class frmFrachtkosten
cFrachtkosten.frtkst_provision = txtFirmaProvision.Text
cFrachtkostenSQL.setFrachtkosten(cFrachtkosten)
End If
frmMain.Tabelle_anzeigen()
'frmMain.Tabelle_anzeigen()
End Sub
Private Sub dgvFrachtkosten_CellLeave(sender As Object, e As DataGridViewCellEventArgs) Handles dgvFrachtkosten.CellValidated

5
UID/frmFrachtkostenNew.vb
View File

@@ -4,7 +4,7 @@
Public frachtfirma_id As Integer = -1
Private Sub frmFrachtkostenNew_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed
frmMain.BringToFront()
frmMainV2.BringToFront()
End Sub
Private Sub frmFrachtkostenNew_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim firmen As List(Of cFrachtkostenFirmen) = cFrachtkostenSQL.getAllFirmen()
@@ -25,6 +25,7 @@
End Sub
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
Dim cFrachtkosten As New cFrachtkosten
Dim oItem As MyListItem = CType(cboFirmen.SelectedItem, MyListItem)
If cboFirmen.Items.Count > 0 AndAlso cboFirmen.SelectedIndex >= 0 AndAlso IsNumeric(oItem.Value) Then
@@ -34,7 +35,7 @@
cFrachtkosten.frtkst_provision = txtFirmaProvision.Text
If cFrachtkostenSQL.setFrachtkosten(cFrachtkosten) Then Me.Close()
End If
frmMain.Tabelle_anzeigen()
'frmMain.Tabelle_anzeigen()
End Sub
Private Sub cboFirmen_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboFirmen.SelectedIndexChanged

131
UID/frmLogin.vb
View File

@@ -1,4 +1,9 @@
Public Class frmLogin
Imports System.IO
Imports SDL
Imports System.Net.Sockets
Imports VERAG_PROG_ALLGEMEIN
Public Class frmLogin
Public ConnStrInfo As String
Public ConnStr As String
' Public USRNAME As String
@@ -6,42 +11,109 @@
Private UID As New cOptionenDAL
Private SDL As New SDL.cOptionenDAL
Private ADMIN As New cADMIN
Private Version As String = My.Resources.Version
Private Version As String = Application.ProductVersion
Public sAppPath As String = Application.StartupPath
Public firma As String = "VERAG"
Public TESTSYSTEM As Boolean = False
Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
If SDL.checkLogin(txtUser.Text, txtPwd.Text, "DISPO") Then
If CBool(ADMIN.checkLogin(txtUser.Text, txtPwd.Text, firma,,, "DISPO")) Then
loginOK()
Else
' MsgBox("Benutzername oder Kennwort ist falsch!", MsgBoxStyle.Exclamation, "Fehler bei Anmeldung")
lblAlertTxt.Visible = True
End If
'If SDL.checkLogin(txtUser.Text, txtPwd.Text, "DISPO") Then
' VERAG_PROG_ALLGEMEIN.cAllgemein.PROGNAME = "DISPO"
' VERAG_PROG_ALLGEMEIN.cAllgemein.PROGVERSION = My.Resources.Version
' VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGIN()
' AddHandler frmMain.FormClosed, Sub()
' VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGOUT()
' Me.Close()
' End Sub
' 'frmMain.Show()
' frmMainV2.Show()
' Me.Hide()
'Else
' lblAlertTxt.Visible = True
'End If
End Sub
Private Sub loginOK()
'Prüfen, ob sich eein WO Nutzer in den Firmen-Login schmuggeln möchte:
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("WARENORT", "AVISO") Then
If Not VERAG_PROG_ALLGEMEIN.cAllgemein.WARENORT_ZUGANG Then
MsgBox("Keine Berechtigung!")
Exit Sub
End If
End If
' MsgBox(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA)
'Prüfen, ob Passwort erneuert werden muss
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_PasswortChanged Is Nothing Then
Dim f As New frmChangePWD(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER)
f.txtPwdOld.Text = txtpwd.Text
f.txtPwdNew1.Focus()
If f.ShowDialog() <> DialogResult.OK Then
Exit Sub
End If
End If
VERAG_PROG_ALLGEMEIN.cAllgemein.PROGNAME = "DISPO"
VERAG_PROG_ALLGEMEIN.cAllgemein.PROGVERSION = My.Resources.Version
VERAG_PROG_ALLGEMEIN.cAllgemein.PROGVERSION = Application.ProductVersion
VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGIN()
AddHandler frmMain.FormClosed, Sub()
VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGOUT()
Me.Close()
End Sub
'AddHandler frmMain.FormClosed, Sub()
' VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGOUT()
' Me.Close()
' End Sub
'frmMain.Show()
frmMainV2.Show()
Me.Hide()
Else
lblAlertTxt.Visible = True
End If
End Sub
Me.Hide()
cGlobal.AngemeldeterUser = cGlobal.AktiverMitarbeiter.Mitarbeiter
End Sub
Private Sub frmLogin_Load(sender As Object, e As EventArgs) Handles Me.Load
'If sAppPath Like "*\bin\Debug" Then
' txtUser.Text = "sebastian"
' txtPwd.Text = "verag#3"
'End If
Dim pfadDatei As String = Application.StartupPath & "\Standort.txt"
firma = "VERAG"
If File.Exists(pfadDatei) Then
Dim fs As New FileStream(pfadDatei, FileMode.Open, FileAccess.Read)
Dim strmReader As New StreamReader(fs)
firma = strmReader.ReadLine
If firma = "AMBAR" Then firma = "AMBAR"
If firma = "NEU" Then firma = "VERAG"
strmReader.Close()
End If
initstart()
If TESTSYSTEM Then lblTestsystem.Visible = True
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = TESTSYSTEM
'Dim tmp As String
lblVersion.Text = lblVersion.Text & " " & My.Resources.Version
lblVersion.Text = lblVersion.Text & " " & Application.ProductVersion
Me.Show()
txtUser.Focus()
lblAlertTxt.Visible = False
@@ -102,7 +174,27 @@
txtPwd.Text = "verag#3"
End If
End If
If e.Modifiers = Keys.Control And e.KeyCode = Keys.A Then
Panel2.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor
lblVersion.ForeColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor
Label3.ForeColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor
Select Case firma
Case "VERAG" : firma = "AMBAR"
Case "AMBAR" : firma = "VERAG"
End Select
VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = firma
' firma = If(firma = "VERAG", "ATILLA", If(firma = "ATILLA", "IMEX", "VERAG"))
initstart()
e.Handled = True
End If
End Sub
Sub initstart()
@@ -117,6 +209,17 @@
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = TESTSYSTEM
Select Case firma
Case "VERAG"
PictureBox1.Image = My.Resources.Verag_AG_Logo
Case "AMBAR"
PictureBox1.Image = My.Resources.ambar_simple
End Select
VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = firma
' txtSachbear.Text = ""
'txtKennwort.Text = ""

1052
UID/frmMain.vb
View File

File diff suppressed because it is too large Load Diff

3
UID/frmMain/frmMainV2.vb
View File

@@ -49,7 +49,8 @@ Public Class frmMainV2
End Sub
Private Sub frmMainV2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
lblVersion.Text = "Version: " & My.Resources.Version
lblVersion.Text = "Version: " & Application.ProductVersion
cUserSettings.load()
ShowChat()
btnAuftraege.PerformClick()

19
UID/frmMain/usrcntlAuftraege.vb
View File

@@ -80,8 +80,14 @@ where "
cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TRANSPORT", "TRANSPORT"))
cboAuftragsart.changeItem("ALLE")
cboFiliale.Items.Clear()
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Case "AMBAR"
cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("AMBAR", "5701"))
cboFiliale.changeItem("5701") : Niederlassung = "5701"
Case Else
cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", ""))
cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUBEN", "4807"))
cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEUHAUS", "4819"))
@@ -90,6 +96,17 @@ where "
Case "NEU" : cboFiliale.changeItem("4819") : Niederlassung = "4819"
Case Else : cboFiliale.changeItem("4807") : Niederlassung = "4807"
End Select
End Select
'cboFiliale.Items.Clear()
'cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", ""))
'cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUBEN", "4807"))
'cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEUHAUS", "4819"))
'Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_niederlassung
' Case "NEU" : cboFiliale.changeItem("4819") : Niederlassung = "4819"
' Case Else : cboFiliale.changeItem("4807") : Niederlassung = "4807"
'End Select
DateBIS.Value = Now()
DateVON.Value = Now.AddYears(-1).AddDays(1)

3
UID/frmMain/usrcntlFirmen.vb
View File

@@ -223,6 +223,9 @@ Public Class usrcntlFirmen
If cboLand.SelectedItem IsNot "" And cboLand.SelectedItem IsNot "-" And cboLand.SelectedItem IsNot Nothing Then
where &= " AND kd_land = '" & cboLand.SelectedItem & "'"
End If
where &= " AND kd_AVISOfirma= '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'"
'Else
' If cboRolle._value IsNot "-1" And cboRolle._value IsNot "" Then
' where &= " WHERE kd_rolle = '" & cboRolle._value & "'"

2
UID/frmMain/usrcntlFrachtkosten.vb
View File

@@ -22,7 +22,7 @@ Public Class usrcntlFrachtkosten
End Sub
Public Sub showDGVFrachtkosten()
Dim where As String = ""
Dim where As String = " AND frtkst_AVISOfirma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' "
Dim search As String = ""
Dim start As Long = (DateTime.Now - New DateTime(1970, 1, 1)).TotalMilliseconds

2
UID/frmMitarbeiter.vb
View File

@@ -15,7 +15,7 @@ Public Class frmMitarbeiter
tmp = "Provider=SQLOLEDB;Server=DEVELOPER\DEVSQL;Database=UID;"
ConnStr = frmMain.ConnStr
' ConnStr = old_frmMain.ConnStr
Try
' Me.Size = My.Settings.frmMainSize

9
UID/frmSearch.vb
View File

@@ -31,7 +31,7 @@ Public Class frmSearch
'je nach Auswahl SQL anpassen
hSQL = "SELECT " & top & " kd_id, kd_firma, (kd_str + ' ' + kd_strnr) as strasse, (kd_plz + ' - ' + kd_ort) as ort, kd_land,kd_firma, kd_str, kd_strnr, kd_land, kd_plz, kd_ort, (kd_anspr1_vn + ' ' + kd_anspr1_nn) as anspr,kd_isRefNr,kd_refNr FROM tblKunden "
Dim search As String = txtSuche.Text
Dim where As String = ""
Dim where As String = " WHERE kd_AVISOfirma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'"
If txtSuche.Text <> "" Then
'where += " kd_firma LIKE '%" & search & "%'"
@@ -44,14 +44,15 @@ Public Class frmSearch
Dim or_txt As String = ""
For i As Integer = 0 To cnt - 1 Step 1
If arr(i) <> "" Then search = arr(i).Trim
If i > 0 Then where += " AND "
where += " ( kd_firma LIKE '%" & search & "%' OR kd_str LIKE '%" & search & "%' OR kd_strnr LIKE '%" & search & "%' OR kd_plz LIKE '%" & search & "%' OR kd_ort LIKE '%" & search & "%' OR kd_land LIKE '%" & search & "%' OR kd_anspr1_vn LIKE '%" & search & "%' OR kd_anspr1_nn LIKE '%" & search & "%' OR kd_anspr2_vn LIKE '%" & search & "%' OR kd_anspr2_nn LIKE '%" & search & "%' OR kd_tel LIKE '%" & search & "%' OR kd_fax LIKE '%" & search & "%' OR kd_email LIKE '%" & search & "%' OR kd_homepage LIKE '%" & search & "%' ) "
' If i > 0 Then where += " AND "
where += " AND ( kd_firma LIKE '%" & search & "%' OR kd_str LIKE '%" & search & "%' OR kd_strnr LIKE '%" & search & "%' OR kd_plz LIKE '%" & search & "%' OR kd_ort LIKE '%" & search & "%' OR kd_land LIKE '%" & search & "%' OR kd_anspr1_vn LIKE '%" & search & "%' OR kd_anspr1_nn LIKE '%" & search & "%' OR kd_anspr2_vn LIKE '%" & search & "%' OR kd_anspr2_nn LIKE '%" & search & "%' OR kd_tel LIKE '%" & search & "%' OR kd_fax LIKE '%" & search & "%' OR kd_email LIKE '%" & search & "%' OR kd_homepage LIKE '%" & search & "%' ) "
Next
where = " WHERE " & where
'where = " WHERE " & where
End If
' MsgBox(hSQL + where)
dgvUID.DataSource = UID.AnzeigeTabelle(hSQL + where)

58
UID/frmTransportauftrag.Designer.vb generated
View File

@@ -283,7 +283,7 @@ Partial Class frmTransportauftrag
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 79.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 58.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 69.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 89.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 90.0!))
Me.TableLayoutPanel1.Controls.Add(Me.txt12_4, 6, 3)
Me.TableLayoutPanel1.Controls.Add(Me.txt11_4, 5, 3)
Me.TableLayoutPanel1.Controls.Add(Me.txt10_4, 4, 3)
@@ -325,42 +325,42 @@ Partial Class frmTransportauftrag
'
'txt12_4
'
Me.txt12_4.Location = New System.Drawing.Point(403, 69)
Me.txt12_4.Location = New System.Drawing.Point(402, 69)
Me.txt12_4.Name = "txt12_4"
Me.txt12_4.Size = New System.Drawing.Size(66, 20)
Me.txt12_4.TabIndex = 27
'
'txt11_4
'
Me.txt11_4.Location = New System.Drawing.Point(334, 69)
Me.txt11_4.Location = New System.Drawing.Point(333, 69)
Me.txt11_4.Name = "txt11_4"
Me.txt11_4.Size = New System.Drawing.Size(63, 20)
Me.txt11_4.TabIndex = 26
'
'txt10_4
'
Me.txt10_4.Location = New System.Drawing.Point(276, 69)
Me.txt10_4.Location = New System.Drawing.Point(275, 69)
Me.txt10_4.Name = "txt10_4"
Me.txt10_4.Size = New System.Drawing.Size(52, 20)
Me.txt10_4.TabIndex = 25
'
'txt9_4
'
Me.txt9_4.Location = New System.Drawing.Point(197, 69)
Me.txt9_4.Location = New System.Drawing.Point(196, 69)
Me.txt9_4.Name = "txt9_4"
Me.txt9_4.Size = New System.Drawing.Size(73, 20)
Me.txt9_4.TabIndex = 24
'
'txt8_4
'
Me.txt8_4.Location = New System.Drawing.Point(109, 69)
Me.txt8_4.Location = New System.Drawing.Point(108, 69)
Me.txt8_4.Name = "txt8_4"
Me.txt8_4.Size = New System.Drawing.Size(82, 20)
Me.txt8_4.TabIndex = 23
'
'txt7_4
'
Me.txt7_4.Location = New System.Drawing.Point(61, 69)
Me.txt7_4.Location = New System.Drawing.Point(60, 69)
Me.txt7_4.Name = "txt7_4"
Me.txt7_4.Size = New System.Drawing.Size(42, 20)
Me.txt7_4.TabIndex = 22
@@ -369,40 +369,40 @@ Partial Class frmTransportauftrag
'
Me.txt6_4.Location = New System.Drawing.Point(3, 69)
Me.txt6_4.Name = "txt6_4"
Me.txt6_4.Size = New System.Drawing.Size(52, 20)
Me.txt6_4.Size = New System.Drawing.Size(51, 20)
Me.txt6_4.TabIndex = 21
'
'txt12_3
'
Me.txt12_3.Location = New System.Drawing.Point(403, 49)
Me.txt12_3.Location = New System.Drawing.Point(402, 49)
Me.txt12_3.Name = "txt12_3"
Me.txt12_3.Size = New System.Drawing.Size(66, 20)
Me.txt12_3.TabIndex = 20
'
'txt10_3
'
Me.txt10_3.Location = New System.Drawing.Point(276, 49)
Me.txt10_3.Location = New System.Drawing.Point(275, 49)
Me.txt10_3.Name = "txt10_3"
Me.txt10_3.Size = New System.Drawing.Size(52, 20)
Me.txt10_3.TabIndex = 18
'
'txt9_3
'
Me.txt9_3.Location = New System.Drawing.Point(197, 49)
Me.txt9_3.Location = New System.Drawing.Point(196, 49)
Me.txt9_3.Name = "txt9_3"
Me.txt9_3.Size = New System.Drawing.Size(73, 20)
Me.txt9_3.TabIndex = 17
'
'txt8_3
'
Me.txt8_3.Location = New System.Drawing.Point(109, 49)
Me.txt8_3.Location = New System.Drawing.Point(108, 49)
Me.txt8_3.Name = "txt8_3"
Me.txt8_3.Size = New System.Drawing.Size(82, 20)
Me.txt8_3.TabIndex = 16
'
'txt7_3
'
Me.txt7_3.Location = New System.Drawing.Point(61, 49)
Me.txt7_3.Location = New System.Drawing.Point(60, 49)
Me.txt7_3.Name = "txt7_3"
Me.txt7_3.Size = New System.Drawing.Size(42, 20)
Me.txt7_3.TabIndex = 15
@@ -411,47 +411,47 @@ Partial Class frmTransportauftrag
'
Me.txt6_3.Location = New System.Drawing.Point(3, 49)
Me.txt6_3.Name = "txt6_3"
Me.txt6_3.Size = New System.Drawing.Size(52, 20)
Me.txt6_3.Size = New System.Drawing.Size(51, 20)
Me.txt6_3.TabIndex = 14
'
'txt12_2
'
Me.txt12_2.Location = New System.Drawing.Point(403, 26)
Me.txt12_2.Location = New System.Drawing.Point(402, 26)
Me.txt12_2.Name = "txt12_2"
Me.txt12_2.Size = New System.Drawing.Size(66, 20)
Me.txt12_2.TabIndex = 13
'
'txt11_2
'
Me.txt11_2.Location = New System.Drawing.Point(334, 26)
Me.txt11_2.Location = New System.Drawing.Point(333, 26)
Me.txt11_2.Name = "txt11_2"
Me.txt11_2.Size = New System.Drawing.Size(63, 20)
Me.txt11_2.TabIndex = 12
'
'txt10_2
'
Me.txt10_2.Location = New System.Drawing.Point(276, 26)
Me.txt10_2.Location = New System.Drawing.Point(275, 26)
Me.txt10_2.Name = "txt10_2"
Me.txt10_2.Size = New System.Drawing.Size(52, 20)
Me.txt10_2.TabIndex = 11
'
'txt9_2
'
Me.txt9_2.Location = New System.Drawing.Point(197, 26)
Me.txt9_2.Location = New System.Drawing.Point(196, 26)
Me.txt9_2.Name = "txt9_2"
Me.txt9_2.Size = New System.Drawing.Size(73, 20)
Me.txt9_2.TabIndex = 10
'
'txt8_2
'
Me.txt8_2.Location = New System.Drawing.Point(109, 26)
Me.txt8_2.Location = New System.Drawing.Point(108, 26)
Me.txt8_2.Name = "txt8_2"
Me.txt8_2.Size = New System.Drawing.Size(82, 20)
Me.txt8_2.TabIndex = 9
'
'txt7_2
'
Me.txt7_2.Location = New System.Drawing.Point(61, 26)
Me.txt7_2.Location = New System.Drawing.Point(60, 26)
Me.txt7_2.Name = "txt7_2"
Me.txt7_2.Size = New System.Drawing.Size(42, 20)
Me.txt7_2.TabIndex = 8
@@ -460,47 +460,47 @@ Partial Class frmTransportauftrag
'
Me.txt6_2.Location = New System.Drawing.Point(3, 26)
Me.txt6_2.Name = "txt6_2"
Me.txt6_2.Size = New System.Drawing.Size(52, 20)
Me.txt6_2.Size = New System.Drawing.Size(51, 20)
Me.txt6_2.TabIndex = 7
'
'txt12_1
'
Me.txt12_1.Location = New System.Drawing.Point(403, 3)
Me.txt12_1.Location = New System.Drawing.Point(402, 3)
Me.txt12_1.Name = "txt12_1"
Me.txt12_1.Size = New System.Drawing.Size(66, 20)
Me.txt12_1.TabIndex = 6
'
'txt11_1
'
Me.txt11_1.Location = New System.Drawing.Point(334, 3)
Me.txt11_1.Location = New System.Drawing.Point(333, 3)
Me.txt11_1.Name = "txt11_1"
Me.txt11_1.Size = New System.Drawing.Size(63, 20)
Me.txt11_1.TabIndex = 5
'
'txt10_1
'
Me.txt10_1.Location = New System.Drawing.Point(276, 3)
Me.txt10_1.Location = New System.Drawing.Point(275, 3)
Me.txt10_1.Name = "txt10_1"
Me.txt10_1.Size = New System.Drawing.Size(52, 20)
Me.txt10_1.TabIndex = 4
'
'txt9_1
'
Me.txt9_1.Location = New System.Drawing.Point(197, 3)
Me.txt9_1.Location = New System.Drawing.Point(196, 3)
Me.txt9_1.Name = "txt9_1"
Me.txt9_1.Size = New System.Drawing.Size(73, 20)
Me.txt9_1.TabIndex = 3
'
'txt8_1
'
Me.txt8_1.Location = New System.Drawing.Point(109, 3)
Me.txt8_1.Location = New System.Drawing.Point(108, 3)
Me.txt8_1.Name = "txt8_1"
Me.txt8_1.Size = New System.Drawing.Size(82, 20)
Me.txt8_1.TabIndex = 2
'
'txt7_1
'
Me.txt7_1.Location = New System.Drawing.Point(61, 3)
Me.txt7_1.Location = New System.Drawing.Point(60, 3)
Me.txt7_1.Name = "txt7_1"
Me.txt7_1.Size = New System.Drawing.Size(42, 20)
Me.txt7_1.TabIndex = 1
@@ -509,12 +509,12 @@ Partial Class frmTransportauftrag
'
Me.txt6_1.Location = New System.Drawing.Point(3, 3)
Me.txt6_1.Name = "txt6_1"
Me.txt6_1.Size = New System.Drawing.Size(52, 20)
Me.txt6_1.Size = New System.Drawing.Size(51, 20)
Me.txt6_1.TabIndex = 0
'
'txt11_3
'
Me.txt11_3.Location = New System.Drawing.Point(334, 49)
Me.txt11_3.Location = New System.Drawing.Point(333, 49)
Me.txt11_3.Name = "txt11_3"
Me.txt11_3.Size = New System.Drawing.Size(63, 20)
Me.txt11_3.TabIndex = 19

0
UID/frmMain.Designer.vb → UID/old_frmMain.Designer.vb generated
View File

0
UID/frmMain.resx → UID/old_frmMain.resx
View File

1059
UID/old_frmMain.vb Normal file
View File

File diff suppressed because it is too large Load Diff

4
UID/rptAktendeckelDISPO.vb
View File

@@ -273,6 +273,10 @@ Public Class rptAktendeckelDISPO
Private Sub rptAktendeckelDISPO_ReportStart(sender As Object, e As EventArgs) Handles Me.ReportStart
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
Picture.Image = My.Resources.DispoAMBAR
End If
Dim sumAuftraggeber As Double = 0
sumAuftraggeber += If(IsNumeric(Me.txtAuftraggeber_Entladung.Text), Me.txtAuftraggeber_Entladung.Text, 0)
sumAuftraggeber += If(IsNumeric(Me.txtAuftraggeber_Lagerung.Text), Me.txtAuftraggeber_Lagerung.Text, 0)

94
UID/rptTransportauftrag.rdlc
View File

@@ -3476,6 +3476,100 @@ wfcGKMmuRZPrv1GhNsd6SmEHlZY7v4Hw4UD5bMxyIzrs0r+qU9T1dNwzd74zSIYKOLf6MshHw2WzPs/A
He0/rE74M32+S7K4poQ0HudtIkC9+/abfNrDlN8VS5cuNVcBvP4GAEA4y5ytJ0+ht+7Ney2ZNPqMladRgWNQa1J09qfq/Ftqc9YWDbeQI/05Swyc562dMCcCXhd88jiSooxFvhoz7NItuJ+HtO0467r2mZG4LIfzO2076XW2pb3mhJpxXdn1lBSDSgAABBLv0rPISEehddMVsqNpeX0Aax3nsZIfw3jc0V9ScB3l2eb6DJ4DFnLUmiFU1Pppa1w2A0pJ8+mTRy3jQMBrRJa03JYGltK24+6MP6vhkc/Z6rQs6ymF/J5J26cKteNrX8nO70QYVAIAICAdWIpfWRgosBgDLv36NlVbT6kKM5UsdP5bN8nzXTYLEVtucxYX6baSo9ZrPI3AbS/rgcy+AHkc8fy3FgbpB1y4mWljObfjrOs6yUwT/XuzDdD5rqc0HjAvIY24bF4lZj2lDDCoBABAMYbjDtFIwM9svYqU9ulyUYuF5qXH2Xoa6zPtvccVu46Nti19dWOey2f2Qo9jplLZctSambnE5T9raSBue1kOZCa9EWykLH+iG8545qsFmvP5Lr9ZS62fvybH/Cc9dxoZ/71OBkJ9B3caBVxT8vxubD20WOayWaevN0A+q/YQ7lHY/Q0AgOKMxR0j7STpDkdpdnCbjt7MjbhH7xqXRrfnsVpdT6nHWHkaxo9huK0ux1yYwcIeg23O2npKPUbPyzXukV3hWpHVedJw+Q1mdAfMY9Kd86wN0Ldu9ofj77Llnt8T7VrfW40OjnkiZf57cqrrTs73gQ6/m4v43i3yu7HVd2n/3rFyzbTaDygMu78BAFDEF/DCFTP978VtnZ0kA00Tkzpew2QagEHt17hOd0QaaLvOjdQ5ec3RwUI/f9WqVZ3esLcGyfo7uIFvDRJOV78z7dCpg09LOK1QBxZ3f2NQCQAAAAAAAImxphIAAAAAAAASY1AJAAAAAAAAiTGoBAAAAAAAgMQYVAIAAAAAAEBi
DCoBAAAAAAAgsf8vwACzvB4PfnEdHAAAAABJRU5ErkJggg==</ImageData>
</EmbeddedImage>
<EmbeddedImage Name="AmbarLogo">
<MIMEType>image/jpeg</MIMEType>
<ImageData>/9j/4AAQSkZJRgABAQAAAQABAAD/2wCEAAYGBgYHBgcICAcKCwoLCg8ODAwODxYQERAREBYiFRkVFRkVIh4kHhweJB42KiYmKjY+NDI0PkxERExfWl98fKcBBgYGBgcGBwgIBwoLCgsKDw4MDA4PFhAREBEQFiIVGRUVGRUiHiQeHB4kHjYqJiYqNj40MjQ+TERETF9aX3x8p//CABEIA4QGQAMBIgACEQEDEQH/xAAxAAEAAwEBAQAAAAAAAAAAAAAAAwUGBAIBAQEAAwEBAAAAAAAAAAAAAAAAAgMEBQH/2gAMAwEAAhADEAAAAtUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD59AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD59AABDJ6IkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIkoiSiJKIZopQAAAAAAADz68+gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKWKUAAAAAAAA8+vPoAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAililAAAAAAAAPPrz6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIpYpQAAAAAAADz68+gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADm6cfrCQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUsUoAAAAAAAB59efQAAAAAAAAAAAAAAAAAAAAPh9cvo6HL6OhD5OhAJ3NMewAAAAAAAAY/WZPWEgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIpYpQAAAAAAADz68+gAAAAAAAAAAAAAAAAAAA8+CVycp2UvvhPHn4JpIvZAD52cnQaeTk6wAAAAAAADH6zJ6wkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABFLFKAAAAAAAAefXn0AAAAAAAAAAAAHz4enPGdis5y7+Z2E0vjLxmmgz4uOePpOOJ8PH2yhOLt4pCzq/YhS/B7iSr9+Zem/Hc9Xj3n2h5MAAAAAADH6zJ6wkAAAAAAAAAAAAAAAAAAAAAAAAAAAAV/myiyVvZ57MIXAAAAAAAAAAAAAAAAAAAAAAARSxSgAAAAAAAHn159AAAAAAAAAjJHDAWUFVzlxBTxFnDwieLz7PBZlf5tKwk7qv2dPH1fSHzNGffUCVc3n5JOmPz0LKeX11TShx+7HpKae8nhZWWPpTrCNgAAAAAAAGP1mT1hIAAAAAAAAAAAAAAAAAAAAAAAAAAADNRSxdDhLqluq77AY+sAAAAAAAAAAAAAAAAAAAAAABFLFKAAAAAAAAefXn0AAAAAACAn4uOA6+XhgOzm8
j59B8ltCmk9wFzxcYJe4r+r1xHdBzzW5oXTLbm5vdj1++Ukt/NGdF0Wqu/inmQt8+iMwegAAAAAAAAAAY/WZPWEgAAAAAAAAAAAAAAAAAAAAAAAAAAAM1FLF0OEuqW6rvsBj6wAAAAAAAAAAAAAAAAAAAAAAEUsUoAAAAAAAB59efQAAAAAfKwl4o60n5voAH08rmqJIvIHwdqU9VjotzQz9VndlqO61+1aOef6q0h5IAfD68Rk7z6AAAAAAAAAAAAMfrMnrCQAAAAAAAAAAAAAAAAAAAAAAAAAAAGaili6HCXVLdV32Ax9YAAAAAAAAAAAAAAAAAAAAAACKWKUAAAAAAAA8+vPoAAAAHCQ8XuqAAAJb6h9EvF9AD786Tvqe/wA2Z/Nx0y+xCrUQ15bKHmNLDnPPi956odvPEPvvo7Spn5RZdFKNF0ZX6axl+j1oFP1naAAAAAAADH6zJ6wkAAAAAAeaWdNvwVLTg7PHMnT1T1x7e9uVkq0aZw92beHkwBWyrseKm8aMFjDyLaOqXgFzYZb7XfqVRb5twRtPNJOi44Klpw9njmWU9U1e89vO7KyVaNM4O/NvDyeaili6PCdHOO1xIz7XEO37wi07M+jZqmauM+ztFWoAAr6m7JeclUuyd/zhTrtOqhRs1TMWtGuyFOsAAjpbKLnhqGjD3+eJOrtt83oKtPUMvRAAAililAAAAAAAAPPrz6AAAAPNP2V5wQ/PoAA++bspvllWgADr5Jjttq2w9h2DyYgKjg+/PAAAAnLjrj+es9Ha1XgAAB9+DTzUt16AAAAAAAx+syesJAAAAAIZM3bmRmzlD0eVhNC6pWfH7GATqWVajPVKu0w9gUXsfnGbeQEonV1wtqlvB5KvevM6XRznupio48+1GaMI9Hl3zwtqVtyHILKVjXIz1SptsPXzUUsW/jjrORZoW1izFYs/LyuSxTqD3yzt8rcZt9kM3QUX3h18wL8Z964y41t5hbVurlsqD2PX
f5Xro134ydNyTZy7K8mvmD0eXbNC2s0HFZ1aZBm6AAAEUsUoAAAAAAAB59efQAAABV1vfXnGAAD5pc1oSmg7+AAAfPotVdalx6o7s+0ltmTyPAAAC6qdKVljndEesxq6MrgAAAetPlrcth6AAAAAAx+syesJAAAACNGn4TocUdwvDF1ghcBx0umiuyZp686+Z90eb7q9HdRzQ+wHudXq9l95OoFOoBR3idOVdnHt5ASiOuMvV59YusELwIKHS+LcuYe/GzltFne2u/nilinSu6S8r0dwx9UABwd72vL+dDn9vK+ffiynT8nLx5t8I04HR80dOqOQx9MEkMz2Od59VnNfMgF2W3s8xeZOjU8xqwCy89+XJi6wQuAAAAAililAAAAAAAAPPrz6AAAAKTmkkeVAegAO/g+FtVfPoAAAngFz44LIVnr34idkhXrWUpWgkM560orp+ijOXT5jTk0E71k/mng8Z9e+ClW/gq3r4fJJozToJ/QAAAAAGP1mT1hIAAABWWdFbl4ht5XrTUt5l6IZ9wAAFXU6bM7OUF2UBcU+po1/Rk6gAAHjM6mg0YOQauf901Hf5egGfeAABXU2py2vlvvxfk9+Dz1e0V5Vp7hj6oAACmueedGdG/jgCTz296Tn9sPJgAOXqewyr346HESRgPfJNNTXOTpBRtAAAAAAililAAAAAAAAPPrz6AAAAKB3Uc6PXPb1ML/gAAB6Onk1VeUoAAPk0QuIq+yOmLih8d8fIOqOEe/PwANPmNOTD0AA+fRlh41I9AAAAAAAY/WZPWEgAAAFBf0N2PjGzmWdvTXOLqhVqAAAZXVZXTzw04AGqyuqzdAM28AABSXdJdl4Bs5VhdUt1i6oVagAAGW1OW0YPg1c8BdUttVotBi64AAD598exzA6PCAdXLPGejHP7gAAAGd5+jn6HDCUALO3qbbF1gq0gAAAAARSxSgAAAAAAAHn159AAAAEeZ1VfbmqZ6/uhZWrCujb9AAB
Ppsl0FjTa2uKMAAAllX6+fPsZh56AAA0+Y05MPQAAGWHjUj0AAAAAABj9Zk9YSAAAAU9xyWUUA3ceXS5W6z7bAZekAAAyuqyunnhpwANVldVm6AZt4AACku6S7LwDZyrC6pbrF1Qq1AAAMtqctowfBq55ND566+Q91Tl6uf2g8mAA4O/N3ZYRs5RPD5L59+PY6j1TXODshC4AADO8/Rz9DhhKAFpbVVri6wVaQAAAAAIpYpQAAAAAAADz68+gAAAACmp9hn78Pvn47ajZT/erkS+gAAn0eV9l/neziPpJKuOXr9Tphl57C3PW/LCvz7ghYAAA0+Y05MPQB45PYdyp+TqrXz7Gepik5vJU3mJv4sqJ66NFldVm3hn3AAAY/WZPWEgAAAAeZuHQZ/dyH34sovO7K9WbdoHFLRs6HOe9CAT5XR5zRhDRiAarK6rN0AzbwAAFJd0l2XgGzlWF1S3WLqhVqAAAZbU5bRg+DVz7mnvYM+6oGjD70Ob+136lVWGTpSniFntX1V2abkNXNHV6s+O5YuplUke3lLeoRnqmessvR73Ohd0Of6ToPpR880O7jhKAFra1dph64V6AAAAAAIpYpQAAAAAAADz68+gAAAABFKeZfm0uf0YrGu8WufdTJoQAAAWhyLGu3cb1eUPp7b0999o1Z/xNFGz4KdQ+zr+PSdPl6HnS5ztL5SeS2rOD5fk9eS3MHvgEnXwIWBOsBqsrqs3QDNvAAAx+syesJAAAAAK2ySryq8pdvJ8idQAAAAADVZXVZugGbeAAApLukuy8A2cqwuqW6xdUKtQAADLanLaMHwauffdnH2YOzR8Oqqb8dWNGIAAAdXkotG9Y+oFWmHPaeO3LmXRz7OYHsQAAAAALezrLPD1wr0AAAAAARSxSgAAAAAAAHn159AAAAAACrtEq8j9s6q7La1Ulhn3U6SMAAWdZ9NfnriWzNnEke3leryh+wt0lDa9Wffm+eef2HONXOD3wAAAAAAA
AABqsrqs3QDNvAAAx+syesJAAAAAAPn08qeDSrsuVanxZRmWl8++ZxoxnGiGdaMZxo/pm9VFLTqCrSAAApLtOnKtUuyUt0U6whcAAAy2pWZsq1S3Px9hn3B5OGqu1lGX86qK3Lmmi9SjnOq/Qt4u0o1h5MABxdr2FBy6lfkyrTeZV5tpPnvmcaMZxoxnGjGcaT744bMz7gjaAAAAABFLFKAAAAAAAAefXn0AAAAAAAKS7+TpyE/ZV2UW1V09lG2ne/AABJp8pMaSh0Md2TPvXnXzHfwIz9Wtfe5elm3rzs5Qe+AAAAAAAAAANVldVm6AZt4AAGP1mT1hIAAAAAY42IAAAAAAAAAD59AAAAAAAAAAAAAAAAAAAADhpDUsd5NmzWlAAABESsnrAAZA17x7B8PrH7AAAAAililAAAAAAAAPPrz6AAAAAAAAPNHfeZ05DrmrbKLer6eujbTpIwADo02R6S/otHBdjoXrzr5q7pPsLNBUyd1OumXz2NCvhQr4UK+FD40PPKNK9ebsge+AAAANVldVm6AZt4AAGP1mT1hIAAAADmz9pzl6A5/ZKAeD25eg9Z7QxFZcAc3QfeeXMGp+wTmR0ksoIyRz9AAOY6QDmOl59B8+hzynsAGase+UHk9ObpADm6D6A55CQCssMmS6KX2Pn0U9wB8jJUcgQyHqusaIj0NR3HS+fSLK39YaMDj7Kc4NPR3gAAABFLFKAAAAAAAAefXn0AAAAAAAAAeKHQ+LKMh2+66VVzV9PXTspk0IAB06XIdZe0ejjuyZ5PBr5oexAAAAAAAPXTGfItfULagW5wGqyuqzdAM28AADH6zJ6wkAAAABnu+k058zfq8Kjk19YLPO9RzRT35n67S0ppcfp6E02XvKYl6LoZrlvOI+WFjTnDpqWQ5Ofo0JmLC3Dz6ryl6I9MU9h0ZM+9Fh1mX1VBaHLxS95V8+wzZfTccRUW/BYmf1+buDirfWpM1Nfjkz/i9K3i1FAaOi
sM8dzQSAFPDDYlmcR2MlEbOn66g5eqzsTG2HJpCi5NjjDZ5fUY06ZtGMfrc3cHDw++851iK7jvM8aKwjkAAAAIpYpQAAAAAAADz68+gAAAAAAAAACOg0cVmfI933glC6rJ+ynXSunlPoAOjQ5b6bHgr7f2FNBqIr8ebXPNbnr3VHOqFI98jSeiF2dMLKqS7+VaODt46+rVoYM58rv00md1Xscu0PnVzaBfih1PP0U6gq1AAAY/WZPWEgAAAHn1xGb1ud0Rk9hjdcSU9nmCyrdPlDUdHFOVvmvuyCGGxLDP3HSZDW5XTlN1VV+dWb0mQNBT6TNF321VqHL1D595im49dkTR5vRZ0sF76KC6inMpqsprxR3lYeKuK9LGlu8yd0NlWHVa0V6Obz6M138OsKFf8AKTVdjOY/RV/UWgM13qc1zlnPeN0FKavI6vKmr9uMzWxzGnOfOW/IW2fteUvilKvT0l0ZXY5XVgEeUv6s0gAAAAIpYpQAAAAAAADz68+gAAAAAAAAAACGh0kVmbI9vrglG6r/AH2066T72cR9AAB091QND05Ua/3jRs2MGxhyg0HFWCWIAAHdxyWZ7Top+y3NefYZs28EgAAAMfrMnrCQAAACtshVWoUtZrRmL3qCrtBluq/5zK6/L6szt9IM1BrBUW4Z/k1Y56LShx9gyjVirtAZjTjJ29qFHeDJS6gV83UKK9Bz9AzuiBmdMEE4y0etFJdhQ8GtGXuu4U9VrRntCACluhk/mtGct+wcldeBXWIqbYKjo7xV0+sGUsLsOHuFLdABVrQAAAAARSxSgAAAAAAAHn159AAAAAAAAAAAAEVBpIrM+R7fdfKu64vndTspPvfXn0AAAAD750ZnV5RgA+vPiX3fkj99NlZRU2Fp7qvhmKdYPQAAAAMfrMnrCQAAAAAAAEXF2U530nbYnjvAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKWKUAAAAAAAA8+vPo
AAAAAAAAAAAAAiodHHZnyHZLXTruuWPuo2Un2xrgAAABLENRFnrmVdP87PN+OGSxsfY1Nl1qdQV6AAAAAAAAMfrMnrCQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUsUoAAAAAAAB59efQAAAAAAAAAAAAABHQ6KOzPkeqavnXcwctjRspVrVnwA+H16ksoikk7LsnF0W/Z5Kt7/ajYEbAAAAAAAAAAMfrMnrCQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUsUoAAAAAAAB59efQAAAAAAAAAAAAAAB4odD4soyMvXwzpto66yo2VfjvguyxSdFjbnq++1913wTlGoEgAAAAAAAAAAAMfrMnrCQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUsUoAAAAAAAB59efQAAAAAAAAAAAAAAAB4otB4nRlvVp3X46iy7VOv59K7wegAAAAAAAAAAAAAY/WZPWEgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIpYpQAAAAAAADz68+gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADH6ykvj6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKWKUAAAAAAAA8+vPoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAililAAAAAAAAPPrz6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIpYpQAAAAAAADz68+gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKWKUAAAAAAAA8+vPoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAililAAAAAAAAPPrz6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIpYpQAAAAAAADz68+gAAAAAACDNyd5SetjGc/ZFKAAAAAAAMlrcgaXq5IzvY/YA5TqPh9YzVHSAAAAAAAAAChrNj5Mg1/gyc0WgLAAADKavJmh9efpmtfjtiAAAAAAAAAGf+l+AAAAAAAAADM2tRbFkAAAAAAAAAAAAAAAAAAAAAAAAAACKWKUAAAAAAAA8+vPoAAAAAAAyd5DRmyUdyez4fWN6jUMn8NahmCppjXsh1GlPh9ZvlNdkPcJp+vkE0uU0J6oubwbFldMfJcbrz2Zs0jH/AA2KivQrKY1jJxGxUt0AAAAAKW2yJ1ajm6QcB3sh9NcyOkOrJ6zJmh+/PpmNjjtiFHWmuZHXBzZs1rJDWoPRKychqGVgNi8+gpPhdqKQuitLJj/pr2V1QVVKa9keg0z59AAAAMvbVNsWQBmTTMnEbFw9wc+cNWyvg1rPaEOPOmuZL0at4hOll/Bq2f8ARfKa5CvqDTmaNKy0RrmO0x1nEdvzJyGpZC5LYAAAAAAEUsUoAAAAAAAB59efQAAAAAAA5ukZ3g2NMdvXm9IY3W5LZijvOIqb7M3hntdj5TW5eLyX0HviI9NT3AyGvyBpAZ7WZPWFdV2lWaUGM2GP2BU8f3uLb59GQ0lLYiptq003J1xGU2GN2QA8U9ObD3jNSdQBylP9r9cewMfq8iaXuCqqtLkjZZPWZM0P359MxscdsTG6ytqDXqW6MrdZyU11RU/Ds0Wa0pjNRl9kfc5o+EhtMxdG
d1Of0xQyRyFxj9LQGk6Ai9e+IzmtyEprcxD5L2yqLcHGdLHjZqe4AMvbVNsWQDxmzT09Z5OnSZnSmVt6DZirtKsrdNmdGZPSZeY1tFX/AAsrekvDIa3JbMUN9QktzTXJX09xTmozOmzJ13dZZlH46eU0GO0udNH1hQyRyF0AAAAAACKWKUAAAAAAAA8+vPoAAAAAAA5+jMwGtp+HlOzR8vUY3Z4zuNLUc1edd756jIa/O8xq1BymporP2U9/j+00eQl5zTgz2syesK6ru8wbFQX5jNhj9gUnm7ypr2a8Ed/T6Uq62yrTTRSxGS2WN2QAAAAy1xnS6ucj6NYyfs1OM2dMWc2R7SyovGgO/J6zJmh+/PpmNjjtiPOW6zh0mZ1plNHBRGvUERpFLdGM2WN2R9BkZ+2rL/vChkjkLPK7HOmiZPqNFDmtWY/X5/lNWoOY1Di7QAAADL21TAa9k5Cx4rbOmwreHkJdNj9CZvXU3Aa2p4OY6NNmdMY3WV1Qa5QQGmjrbIyGzxmzFDfcBxXmO7ywqYZjUZnTZks7Ossyp5erlLfL7HMGnZX2TzVVqXQAAAAAAIpYpQAAAAAAADz68+gAAAAAABy9Q4uz6Hz78Mbqsrszj6/oAc3SOLq9gDzydo8xzACGYHN0jl6ggnADj99IA+RygCCcAAAAPEc4gTiD7MAIYO0efQOfoAHN0hHzdo8ewRyDhm6ABBOADx7AHj76AHN47AA5+gcXV7AAAAAEXmcQfZggnHJ1hx9PsIZhDwWubPujpboRSjh6JgBBOAHP46x8jlCOQfPofPPsAQSexQT1d2WIAAAAAAIpYpQAAAAAAADz68+gAAAAAAAAB8+jGbOGYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAApK/VxmXaiQ8+gAAAAAAAAAAZvSDKx6n0ZzTAAAAAAABFLFKAAAAAAAAefXn0AAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARSxSgAAAAAAAHn159AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEUsUoAAAAAAAB59efQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABFLFKAAAAAHn6fQAefSAnQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkImQiZCJkI+ywzAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAH/xAAC/9oADAMBAAIAAwAAACEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQggAAQAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAgRy3kGGAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAgAgizWU2233X4kkAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAgUAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAzRG331XnUW1pXgTrAAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAD/APAAAAAAAAAAAAAAAAAAAAAAAAoAAAAAAAAAAAAAAAEI9BhR9d58t9YpARhAAAAAAAAAAAAUAAAAAAAAAAAAAAAAAAAAAAAAAAAA/wDwAAAAAAAAAAAAAAAAAAAAAAAKAAAAAAAAAAAAAAAHMQReQRcVLGUQABBCAAAAAAAAAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAP8A8AAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAR0EEGFEFWroAwR48+c88owgAAAAAAABQAAAAAAb36w8oAAGcz7woA/wB8eqCA9s++ssHAAANP9cOAAAAd9sAAAAoAAAAAAAAAAAAAcJBBZJBBBfAEX/8A/wD+x/8A/wD/AMAAAAAAABQAAAAA777Dr30ID/3XD6yV7rXL20P33zzvf2kBX3ff328Fr7rrkAAACgAAAAAAAAAAAABAEEG0
EEFHGAD/AP8A/wDeoL//AP8A+wAAAAAAFAAAAA/vggAJvnH+gAAAv/fwwAE9uf8A4AAANv1X3AMBFD2Pz0EAAAAACgAAAAAAAAAAAAAIEEEUkEEEFl//AL/GurAzz733AAAAAAAUAAAAH9RAAAAV997AAAAj9TAAAAfteuAAAAX996BAAAD2/wDQQAAAAAAKAAAAAAAAAAAAAMzQQQQTQQQcZf8A99/+sAABBcAAAAAAABQAAAAP2MAAABT32gAAABT2oAAABb330AAAAD330AAAABb32AAAAAAACgAAAAAAAAAAAACQMUEEEEAkEFLb/wD/AP6wAAAFwAAAAAAAFAAAAFPTgAAAFffaAAAAFPagAAAFvfbSQAAEPcLYQAAAFvfYQAAAAAAKAAAAAAAAAAAAAAA75QQQVTSh+vP/AP8A/rAACKeaPNoAAAAUAAAAB89vLEFV99oAAAAU9qAAAAW9Y99FHF/8T/vDAIJe99qAAAAAAAoAAAAAAAAAAAAAAC0wBBBBRecTT/8AM89zrHvfbvfaAAAAFAAAAAAdfffffffaAAAAFPagAAAFvacfffffOQNvPffffffawAAAAAAKAAAAAAAAAAAAAAAAKVAQQVd/3RHn/ffffffffffaAAAAFAAAAAAAosdcPMPaAAAAEc4QAAAE84gMV9AIgAAAkesMMNM4wAAAAAAKAAAAAAAAAAAAAAAAATkSQQZYfv0PvffffffffffaAAAAFAAAAABAAAAAAAAAACAAAAAAAAAAAAAAAAAAAACBCAAAACAACAAAAAAKAAAAAAAAAAAAAAAAAIjbSQQQX9u1RjjjiNvffffaAAAAFAAAAACABAADBIBAACBAAAABACAAAEBAAAACAEEEADAAAACMAACAAAAKAAAAAAAAAAAAAAAAAAMB1SQQeWvPfffffffcsffaAAAAFAAAAAOAILIEYEEDRBEMECJKELcQPKOIPAbAAEBBFCKdRAAKcOYAAAAK
AAAAAAAAAAAAAAAAAAABwERQQQbqvveNfb4LPf8A4MAAABQAAAATgghkyAyCRBCigBBWEgRBCHDQBQUTDAB0RCiQhyACjAAwAAAACgAAAAAAAAAAAAAAAAAAACNLWUEFEGGQwjGEEE8eMAAAABQAAABCCAABDgACBAAACBAAABCACBBBCCCCAABACDBCABBACABAAAAACgAAAAAAAAAAAAAAAAAAAABaf2UEEEEF00EMVjuIAAAAABQAAAAAAAAwQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAACLSWkEEEFFlG4EAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAUySUEUAqDEAAAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAClYbwCMAAAAAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAACZ8KEAAAAAAAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
CgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAABRAAAAAAAABQwAQAwAAAAAAAAACQwUAABCSgAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAB0AQAQgAwQRmyDkSQAwAAAAAAAAAyAQwwBSgAAwAwwwAjwQwgAQgAAAAAAQQAwggAAAAwgwQQwBQwAAAAAACgAAAAAAAAAAAAAAABCRQADgFXigSgBQBQFDG1CgBCQADUAyDQBSjkAEChBQCgBCCBFWgDAgAAARQSBSjFFBAADxSBBgCgAAAAAACgAAAAAAAAAAAAAAAAxDwUyCUwSAmgAQhRwhjwCgAAABCgBADkBShCwgAAAAWACAgjkggAAAAES1gi0iikwABCj1QABQwUAAAAAACgAAAAAAAAAAAAAAABABRAABAACBACAACAAADACAAAAAAAACAAAACCBCAAAAACAAAAAAAAAACAAACBCQgCAAACDACAAACwAAAAAACgAAAAAAAAAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACDAAAAAAAAAAABCSAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
CgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAQwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwygAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/xAAC/9oADAMBAAIAAwAAABDzzzjzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzTzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzyzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzyHzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzDzDjjzzzzzzzzwHzzzzzzzzzzzzzzzzzzzzzzzzzzzzz
zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzjzEVAHjTzzzzzzzwHzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzjUEGBzwjwCxG3/zzzzzzzwHzzzzzzzzzzzzzzzzzzzzzzzzzzzzT3zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzjWyywghTwzbu61J5/wA88888888B8888888888888888888888888888+q88888888888888888888888888888888888888888d8AhU8co+9SS1uM/888888888888B8888888888888888888888888888+q8888888888888888888888888888888888888884VRBB4wF8jlOs88888888888888888B8888888888888888888888888888+q888888888888888888888888888888888888884shBBYwBRSGc49nu+W+un5488888888B8888884s/P4388+nPsq/8/Ots5+88uMMfN+8845uc8U8885NuZ8888888888888888885oBBMgBBVZ88u/8A/wDuxb//APPc8888888B88888wd6209vUv8A/cctvnf+v9vbtfOMstfPevJPd99PWPdXvvpvPPPPPPPPPPPPPPPPPMQQQSCAQUTEOX//AP8AaXv/AP8A/wDq8888888B8888/wDOLPPLdmfOhPPCP/e3vPLv+vvPPPH8LUfb3/PP/d/fzfPPPPPPPPPPPPPPPPPPPFgQQRKAQQUaMtpjp/3vJjlt5lPPPPPPAfPPPOfdfPPPFvfbPPPPOfTfPPPFfXufPPPOvff3/PPLP7PX/PPPPPPPPPPPPPPPPPPPPM5AQQQZAQQcVJrjr/8A7zzzj7zzzzzzzwHzzzyr3Xzzzz/3
3zzzzzz3/wA888q99v8APPPLfff/ADzzzxX31fzzzzzzzzzzzzzzzzzzzzyqqwEEFC0kEFD3/wD/AP8A7zzyj7zzzzzzzwHzzzz323zzzz733zzzzzz3/wA888q9/wDP/PPLPdrfvPPPFffVPPPPPPPPPPPPPPPPPPPPPPOy7AQQRLDeua//AP8A/wDvPPrt5v8Az3zzzwHzzzz1a1r7vTf33zzzzzz3/wA888q9a9My66+5/wDLvf8APVb33/zzzzzzzzzzzzzzzzzzzzzyw3kkEEFSGJcjoc00ncv722pX3zzzzwHzzzzy7D3333333zzzzzz3/wA888q9tb99995U8L+9999999U88888888888888888888888v8ZBBBQT0/QSd9999999999988888B88888898/wCMvt+PvPPPPsv/ADzzyvL/AMM25H/888Ps+xyy/wC/fPPPPPPPPPPPPPPPPPPPPPPPDdJCQQREfqbmvfffffffffffPPPPAfPPPPPfPPPPPPPPPPPPPPPPPPPPPNPPPPPPPPPffPPPPNfPdPNfPPPPPPPPPPPPPPPPPPPPPGGzCQQZAfqz6wwwwfvfffffPPPPAfPPPPNfOPONOHPIXHeNPPPOPMPPOEeNOOPMPKRfLPNOPVdIfPHfPPPPPPPPPPPPPPPPPPPPPPGXrCQQfDMrTTTTXfffKlffPPPPAfPPPPPfXcVSDcRZKZbbeKccbaPNSXQWTdBTfDfNZbXGBXSZAVHPPPPPPPPPPPPPPPPPPPPPPPPPP1DQQQCgxcuON8lhiMM1fPPPAfPPPPLQcUPCZfdSfdfPOKHCXZaQDSXcQAdVfFMPQTFdRbNVfIXPPPPPPPPPPPPPPPPPPPPPPPPPK7DLAQQYMKfUUIQQFfn/ADzzzwHzzzyzy33xmV01y12w3yy3z0zzyywy1x211zzx10zxx333zzxzzzzzzzzzzzzzzzzzzzzzzzzzzzwgPyQEEEEE
iwEZx55zzzzzzwHzzzzzzzyGFzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzmWSQEEEEEWUQdzzzzzzzzwHzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzuymQEQ82MzzzzzzzzzzzwHzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxjNHgIx/wA888888888888B88888888888888888888888888888888888888888888888888888888888888888888888888888888bb89888888888888888B888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888N8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
8888888888888888888888888888888888888888888888888888888888888888888888888888888888888885ZU8888888981w498888888888NJIc885p988888888818888888888d88888888888888888888888888888888888888888888M44x50x901Y4xkxtx9051888888lt8J1pp9xx9dw558954d1518888898498118tFw51055px41V888888888888888888888888sJhFp94AxVt99B894sUoMV8pB88A8x85pptA0klVF5RVppc8AgV8B88989dZBpBAw9NpVV9VVp8V888888888888888888888888VhJUpt85FRs99109V9lp8V8888hZx9Ropp5l1B58VsE8pd9t05888888xQ59ItV41d99dU9VV514888888888888888888888888c8oVc8888ccs8ssMsc8c88888888s8M8888s88sss8s8css88888888c8sM8899s88888cs8c8M188888888888888888888888888sR88888888888888888888888888888888888888888888888888888888VZ88888888888tZ88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888488888888888888888888888
888888888888888888888888888888888888888888888888888888888888888888888808888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888/8QARhEAAQMCAQYGDggHAAMAAAAAAQIDBAAFERASITFBURMUIGGBkQYVIjAyNFRxcoKSobHBM0BEUFJTYNEWIzVCQ2JzoLCy/9oACAECAQE/AP8AwBGYUp/6NpRG
86BUe0NMDhpTgITpzdlPrSt5xSRoKiR9zC1T1AEMaCPxCnrfMYbK3GsEjbiD97Nw5TvgMrPPhTdkmq8LMT5zSLAP8j56BQtVsZ0uLx9JWFcas8bwAgnmGNPX7Yyz0qqRLkSDi44TzbPudn6Fr0BV58Qc9JPx+8gCTgASaj2iY9gSkIG9VN2WIyMX3SfOc0Vxu0RdDaUk/wCoxpy//ls+0acvM5epQT5hS5cpzwnlnpoknWfupn6Fr0BV58Qc9JPx+8YNqekgLWcxvftNF+2W4ZqAFL5tJ6TT96lOYhvBsc2k04644cVrKjzn7vZ+ha9AVefEHPST8fvC2RmnXFuvEBpoYmpt1dexQ1ihv3n65Dt8iUcUDBG1Z1UxZYjYGeC4efQKEOIkYCO37IpcGGsYGO30DD4VIsTKgSwsoO46RUiM9HXmOoIPuOWNEfkrzWkY7zsFR7EwgAvKKzuGgUiBDQMBHb6Rj8aVBhqGBjt+yBT9jjLBLRLZ6xUqFIiqwcTo2KGo5IdukSjikYI2rOqmLLDbAzwXDz6BSYcROqO37IpcGGsYGO30JAqRYmVAlhZQdx0ipEZ6OvMdRgdm45GfoWvQFONtuJKVoCk7iMa4jD8ma9kVxGH5M17IriMLyZv2RTtnguDQgoO9JqZZ5DAK0fzEc2sciJZpDwCnDwaefXTVmgtjSgrO9RrtfCww4u31U7Z4Lg0NlB3pNSrK+0Cpo8Indt5EO2yJWkDNR+I/KmbJDR4ec4ec4D3UIEIDxZv2avMaO1ECm2UJPCAYgAfXA8sMFoeCVYn65a7dxpZWv6JJ0853UlKUpCUgADUBRIAJJwFLucBBwL6ejE/Cmp0R44NvJJ3ajkkRmpLRbcTiNh2jnFS4rkV4tr6DvFQIS5b2aNCRpUrcKZZaYbDbaQEjI7cITRwW+nHcNPwpF0gLOAfT0gj40CCAQcRTjaHUKQtIKTrBpFjwlnOViwNI3nmpKUpSEpAAGoCiQBiaXc4D
ZwL6ejE/CmrjCdOCH048+j45JEdqQ2W3E4g9YqZEcivFtWka0neKZ+ha9AU682ygrcUEpG2u2cDyhNds4HlCaFzgE4cYTSVpWkKSoEHaDjku1sGCpDKedaR8clrtiWkpeeTi4dKQf7cjr7LIxccSkc5rtrb8cOHHUabeadTi2tKhzHHJc7Yl9JdaGDo1j8WS1W0SDwro/lg6B+I0AAAAMAKJABJOApVxgpOBkI6Dj8Ku82K/FCGnQo54OH3u22pxxCE61EAdNMMoYZQ0nUkU++2w0pxZwSKmT35SznHBGxA1ZbfdnGVJbeUVN7zpKaBBAIOINXaKH4qlAd233Q+Yq3xRGjIRh3R0q85okJBJOAAxJq4XVyQpSGiUte9WWFPfiLGBxRtQaZebeaS4g4pUMjzzbLSnFnBKRU24PylHElKNiBlt90cjqShwlTXvT5qBCgCDiCMQausUPxVEDu0d0n5imfoWvQFXrxFXpJ5EeU/HXnNLI3jYagTkS2s4aFjwk5I9rCbmvEfykYLT06hkudyEUcG3gXSPZFOOOOLK1qKlHacjbrjSwttZSobRVsuQlDg3MA6B7QyXS3kzGi2NDysDzKpppDTaG0DBKRgKkyG4zKnFnQNm81LnPylErVgnYgah9VcTgroH3JZWwuckn+xJV8sl+fJdbZB0JGcfOeTZXy5EzCdLZw6Mt8fLcZLYOlw4HzDk2F857rB1EZwyX6Qc5pgHQBnK5NjfLkZTZOls+45AAkADUBV78RV6aeTbHyxMaOOhRzVeY5VKCUlR1AYmn3lPPLcVrUceQw8pl5txOtKgaSQoAjURiKKUkpJGlJxHwyX18qkIa2ITj0n6s+1nxY76d2YvmI+5LD445/yPxGS9AiernSnk9j+qT50fPL2Q/ZfX+XJsfj3qHJe/Hj6CeT2P65PqfPLeE4293mKT7+SyCXmwNZWMspJVGfA1ltQHVyo/i7P/ADT8Mt58fc9FPw+rWyS2krjvfRO6
PMamxFxXig6UnSk7x3qNCkSs7gk45usk062tpakLTgoax9YtbwanNEnQo5p6cl8ilxtL6RiUaFebk9j+qT50fPL2Q/ZfX+XJsfj3qHJe/Hj6CeT2P65PqfPIhaVgkbFEHzinmkutLbVqUkin2VsOrbWMCk8izRC7JDpHcN6enIHEFakBQzkgEjz5LhFVFkrRh3J0oPNyY/i7P/NPwy3n+oO+ZPw+rxXET45ivH+Ykfy1U60tpxSFjBSTgeWxClSElTbRIG2oCIrTy2pjWCjqKtQpy3vRV8NCUeds7RU17h5K3M0pJwxB2HvDUaQ99G0pXOBQtE8jHgveKct81rSphWHNpqOgLkNIUNBWARQYZAADSMBzCuBa/LT1Vfmm0KjlKACQrHDmw73bpglR0knu06FiiAamWQKJXHISfwHV0UqBNSSDGc6Ek/CuJzPJnfYNcUl+Tu+yasTTrYkZ7ak4lOGIIy9kP2X1/lybH496hyXvx4+gnk9j+uT6nzyRZgauUphZwStw5vMrJPt7UtH4VjwVfI0/bpbBOc0SPxJ0iktOKOCUKJ3AVEs0h0gujg0c/hGmWW2W0ttpwSKddQy2txZwSkYmmbktE8yFalnBQ/1pKkrSFJIIIxBqVFZlN5jg8x2ipFmltE5ieETvGvqriUzyZ32DXE5fkzvsGuKSvJ3fZNMAhhoEaQhPwy3j+oPer8B9XQtSFpUk4EHEGnkIuUXhkAB9sYKG/l21SDCYzNiAD5xU+A3Lb3LHgqqJcHoTnF5IOaNu6row4uSp1tBU2oAhSRiKIIpiFJkaWmyRv1Cu0k7cjrrtJO3I667STtyOuhZJuI0I66i2eMyAVjhFc+qgABgBhlciMOKStTYzkkEK26MvZD9l9f5d7iynYzocQfONhFRJrEpGKDgrak6x3jsh+y+v8uTY/HvUOS9+PH0E8nsf1yfU+eS4ePSP+hq23dKwlqQrBWoLOo+fkuutsoK3FhKRtNXG5KlqzU4h
oHQN/Ocltuaox4NzEtHrTTbjbqAtCgpJ2jvF3/qL/q//ACPrEWS5GeS4jpG8VMiNS2uNxdf96OVbZ6ormCtLatY3c9JUlaQpJxBGg1OgNy29OhY8FVR5Um2vFp1JKMdKfmKlORZ8yM20NvdKwwpCENpCUgAAYAd87Ifsvr/LviFqQoKSogjURTF8lNgBxKXB1Gk39nawseYg0L/F2tO+6u30P8t3qH712+h/lu9Q/eu30T8t3qH712+i/lO9Qq5z25nA5iFDMztfPyYEoRX+EKSruSMK/iBvydXXU+UJUguhJT3IGHJttwTD4XFsqz8NR3V/EDfk6uupLoefdcAwzlE4ZI1zlxgAlecn8KtIpu/t/wCRhQ9E40b9Ew0Nu9Q/enr+4Rg0yE86jjT8l99Wc64VHkMSX46s5pwppq/ujQ6yFc6ThQv8ba057q7fRPy3eofvXb6H+W71D967fQ/y3eofvXb6J+W71D967fxfynPdU2QmRKcdSCArDQeYYfWYU1yI7nJ0pPhJ31OhNyG+NxdIOlaRyrXcjHUGnDi0T7NAhQBBxBqVEZlN5qx5jtFBlVuntcIcUg448xpKgoAg4g987Ifsvr/L9HQZzkRzEaUHwk1Pgocb43F0oOlSRyrXcywQ06cWzqP4aBBAIOg1NhNy281WhQ8FW6kC6wO5COEbGraK7bzPIle+u28zyJXvrtvM8iV767bzPIle+mbs6VgOxFpTvAJoEEAjldkP2X1/l+j4E9cVze2fCTVwgIKONRtLatKgNnKtt1MfBp3Et7DtTTbjbiQpCgoHaO8uSGWhi44lPnNdtoZcQhCipSlADAZeyH7L6/y/SFvnqirzVaWleEKuFvCU8Zj900rSQNnKYkvx1YtLI+FMX46A810ppu7QXP8ALm+cYUmVGVqeQemuFa/GnrovMjW4nrp25wm9bwPMNNPX5A0NNE86qeus13/JmjcnRRJJxJJNNOFt1CwMc1QNC+xMBilYPmrt
5D3L6qus9qWprg0kBGOk8/6Rt9wVGVmL7ppWsbquFuSE8Yjd00rSQNnf41qlv4HNzE71Uq12+O0eHeOO/HDqFOBAWQhRUnYcMP0nb7guKrNV3TR1irhb0ZvGY2ltWkgbO9obW4oJQkqO4VGsb68C8rMG7WaxtVvGxSx6yqk3t9zENANjfrNLWtaipaiTvP6Vt9wXFXmq0tK1pqfb0FHGYuls6SBs7wxEkPnBtsnn2UxZEIGfJc6BoFLuUCIkojoCj/rq6TUm6S38Rn5qdyf0zb7guKvA6Wz4San29Ckcai6UHSpI2cmNa5b+BCM1O9VItsCInPkLCjz6uqn722gZkZrpOgU/LkSDi44TzbP05AnriLwOls+Emp9vQtHGoulB0qSKQha1BKUkncKjWSQ5gXTwad2s1m2u368FL9pVSb4+vEMpCBv1mluLcUVLUVHef0/AnuRHN7Z8JNKudvjpJYQCpWkhIw66k3WW/iArMTuT/wCmu//EAE4RAAECBAIEBgsNBwQCAwAAAAECAwAEBREGEBIgMUETISJRYXEWMDVAUoGDkZKxwRQVMjRCRVBTVGJyc9EjYIKTorLCM1XS4UOQRHSg/9oACAEDAQE/AP8A2jnd+6wv247v3QtFotHFrTVXp0oDw0ygHwQbnzCJ3FExOK9zU1lQK+LTPwvFEm0tqVYbWbqS2kKPSB2k7u/VYjoqFKSqbAIJB5C/0iVrdLm3gyxM6ayCQNFQ2dY+jbRbXuImKrTpe/CzTaTzXuYfxfSm/gcK51C3rh7Gy9jMmOtSoViOvzXEw1b8Dd497sUT/wDqqdAPhr0RErgwXCpqZvzpR+piSpklIpswyEneraT2o7u/Zr40/wDmK9cYU7tM/gX6voq0W11KSkFSlAAbzE7iily1wlZeXzI2eeHsWVSZVoSkuE9Q01R72YmqHG8twJPhqsPNEvgs7X5vxIEMYUpDXwm1uH7yoZplPZtwco0n+EQEgbAB207u/Zr4
0/8AmK9cYU7tM/gX6vpGr4llZAlpoB1/m3J64EpiCuKC3lFDR2aXJT4hElhKnsWL5U8rp4kwzLsMJ0WmkIH3RbvI7u/Zr40/+Yr1xhTu0z+Bfq+kMQT8wwy1LyoJmJg6KLbQIpGG5eVAemQHX9vHxhJztFotqWi0W7Ud2vVK3JU0WcVpOkcTadsTmLKm+SGSlhPMkXPnMLqlSWSVTr/8xUNViqtG6Z57xrKh5jEjjGabITNtBxO9aeSqJKflZ5kOy7oWN/OOgjOfqUnINacw4B4KdqldQidxjOOEiVbS0nco8pUOViqum6p5/wASyn1Q3V6o2bpnn/Gsn1xJYvqDRAmEoeT6Kop1Wkqii7DnKHwkHiUMqpXJKmizitN3c2nb4+aJzFlUfJDRSwnmSLnzmF1SpLJKp18+UVDVXqjRumef8ayR5jEjjGbbITNth1O9SeSqJKflJ5nhZdwKG8bx1jKa+NP/AJivXDL7zDgcZcUhY2KSbGPfiq/b5j0zHvxVft8x6ZgViqg/H3/TMS2KauyeU6l0cy0+0RS8USU4UtujgXTsBPJPUdSpYqkZUqbYHDuDmNkDxxM4qq7x5LqWhzISPWbwa1Viq/u570jEviisMnjeDg5lpHssYpuLJOZIbmE8As7yboMAgi4zqlfkaddCiXHfq0+3miaxbVHiQ0UMp+6LnzmFVqrKNzPP+JZEYVn56YqS0PTTrieBUbKUSL3He51VSjSptEyRdaWyhPRc9uPaDu1sQ1wU5oNMkGYWOL7g5zDji3FqWtRUpRuSTckwlKlEBIJJ2AQ1h6supCkyS7feIT/cREzSKnKpKnpRxKd6rXA8YykZ+ZkZhLzC7EbRuUOYxTKizUZVD7fFuWnelXNFZqzVMleENlOK4m0c5/QRNTcxNvqefcKlqylqJVZlIU1JrKTsJskH0rQ7h6stJKlSSyPukK/tJhSVJJSoEEbQYYfel3UOtLKFpNwRDuMCaaNBFps8k+CPvQta
3FqWtRUpRuSTckwAVEAAknYIZw/WXkhSJJYB8IhH9xETFDq0ukqck12G0psv+2+UlPTMi+l5heiobRuI5jFLqTNRlEvN8R2LRvSqJr40/wDmK9cS0q/NOhphsrWQSAOiOx6s/Yl+cR2PVn7EvziFUCspBJknPFYw4240socQpChtSoWOWGa+vTRJTS7g8TSz/acsRYhXMrXKyq7Mg2WofLP6ZS0nNTStFhhbh36IvaDhuthN/cZ9JP6w/LTEuvQeZW2rmUCMsP4hXJrRLTKyZcmwJ2t/9QCCAQYxJXTIo9zS6v26xxq8AfrClKUoqUSSTck7TCUqUQEgknYBDdDq7idJMk7bpGj64wzSqhKVFTj8upCCyoXNtpI7zGodcapyGqe0HdqvvIYZdeWbJQkqPUInZt2cmnZhw8par9Q3CJOUenJlthlN1rPiHSYpVFk6a2NBIU7blOnaermGdbw0xNoW9KoDb4F7DiSuFJUlRSoEEGxBjDNRMnUUIUqzT1kK69xit1Ez9Qdcv+zSdFv8IhKVLUlKQSokAAbSTFEw4xJIQ9MIC5g8fHxhHQM6rRZSpNnTSEugcl0bR184iblXpSYcYeTZaDY5Ssq9NzDbDKbrWbCKTQ5SmtgpSFvW5Tp2+LmGdcw6xPIW6wkImB4gvoMLSpClJUCFJJBB2giMN1EyVRbSVWaeIQv2GJr40/8AmK9cYT7sN/lr1J2nyk80W5hoKG47x1GKzSHaZM6BOk2vjbXz9B6RAJBBBsRE7iFS8PMlK/2712l9Gj8I5YfoJqKy89cS6T41nmEMsMsNpbZbShA2JAtk/LsTDZbebStB3ERiCgGnKDzN1S6j40HmOWHa0kUqYS+bmVRcdKNwiZmHZl915w3WtRJiQkX5+aRLsjjVtO5I3kxTKPJ05sBpAK7cpw/CPerCwtFx4Sh5j2y8Xi8XyOV4vF+1Hdq4rfLVIWkf+RxKPb7MsGySUy782Rylq0E/hGriyTDFT4RI
sl5Gl/FsOeEZJL9QW+oXDCbj8StmrjOSSW5ebA4wrg1dIPGMsGSSQ3MTihxk8GjqHGdXF8klioIfSLB9Nz+JO3JSlLUpSjckkmMJd2EflL1cQSSZulzAtdTaS4jrTmhCnFoQnaogDrMSks3KSzLDY5KEgak7Kom5R9hexxBHUdxhaFIWpKhYpJBHSIS4tAWEqsFpsrpFwfZlg6TQiSdmSOW6uw/CnvaSmA1UZ2SWbEq4VvpSrbrX1rRbUPbju1cZ9zGf/sp/tOWE1A0ZsDc4sHVxt8KQ6nPZngj5w8l/lq4u7keWRlhLuOn81erjfZT/ACvszwusJrUt0hY/pOrNFKZV8q2BtRPmzpy0oqEmtWxL7ZPUFa098dmvzl+vPCncZn8a/X3tiCQfWlqdlSRMS/GLb0xSam1UZVLqeJY4nEcx1SIvqVCrSNP4P3Q4QV7ABcww+zMModaWFIULgjVPbju1cRSpmaRMpSLqQAsfw5YQqSWX3JNxVg6bo/Hq42+FIdTnszwR84eS/wAtXF3cjyyMsJdx0/mr1cb7Kf5X2ZOtLaKQofCQlQ6lC8SswuWmWX0fCbWFDxRKTTM3LNvtKuhYvqYqqSJaQVLpV+1fFrcyN5yUw6llDxQQhalJSrnKduVFqSKhINuX/aJAS4OZQ1Z747NfnL9eeFu4sv8AiX/ce96iw7RZ8VGVTdhw2fbGwXiXmGpllt5pWkhYuDqkQInKvTpJYQ/MJSo7tpisu1GYlWpmlzV0JuVBG0wzW5WpNe5KsgA7EvgWKTFIlPckgyxphYTeyhvBNxqnOZqElK/68w2joJ44OJ6MDb3QfRMMVulPkBE43fmJ0fXE88puRmXWyLpaUpJ6hCpyaUoqVMOEnadIx7pmfr3PSMYMmH3UTqXHVKCS2Ugm9r31Tu1SAQQRFdpaqdPLSAeCWSpo9HN4oBIIINiIpWLlNpS1PJKwNjqdvjEN1mkuJChPMWPOsJPmMe+tM+3y38xMe+dN
+3S/8xMYxmZd9UjwLzblg5fRUFW2Z4I+cPJf5auLu5HlkZYS7jp/NXq432U/yvsyqVLVMUGnzbSbraYSFjnR/wBZUatzFMcIA02VHlt+0RJ1ymTiQW5lKVeAs6KoXMMNp0lvISnnKgBFSxVIyyVJliH3ej4A6zE1NPzb63nllS1HjMS0u7MvtstJutarARNUFlyjIkUW0m03Qr7/AP3Dja2nFtrSUqSSFA7QRFOqUzT3w6wroUk7FDmMSOKaZMpAdXwC94Xs8Rj31pf2+W/mJj30pn26X/mJj3yp322X/mJicIVOTJBBBdWQR154X7iSnWv+897utNvNrbcSFJULEGJV1ygVH3K8SZN5V21+CYBBsRs1q6h1NXnOEvcuEi/gnZFGrD1NfuLqaUeWj2iKnRJWqsCdp6k6ahcjYFfoYw5OMNU9uWeeSh5tSgpCzYjjgEEXBuInatISIAmJgBXg7VR2XUfwnfQjsuo/hO+hBxdR/Cd9CDi6kAGxd9GKjiifmipLJ4FvmT8I9ZhSlKJKiSTvObFSnWG1toeVwa0lKkE3Fjngj5w8l/lqndrVGny9QllMPDpSobUnnEVOkTdNd0XU3QTyHB8FXaMEfOHkv8tXF3cjyyMsJdx0/mr1cb7Kf5X2ZUXjpEj+SmK9hlxpS5mSQVNnjU0Nqero1ZeWfmXUtMtqWs7AIoVCbprZccsqYWOUdyRzDKvYeRUAX2LJmAPEvrh+Xel3VNPNqQsbQe0YY7hyflP7z3xUqezUJVbDg6Uq3pMUmqTFMmfe2omydjTh2a1foqaixpoAD6ByTzjmMONrbWpC0lKkmxBij1h+mvXTymlHloidp1Pr0qmYl1gO24l+xUU1ioUWlz70wvYP2bd7gHZeHXXHnFuOKKlqNyT2zBHzh5L/AC1Tu13G23UKQ4hKknalQuDE5hCnPEqZWtkncOUnzGF4Km/kTbR6wRBwZUd0xLnxqHsjsMqn10t6Sv8AjHYZVPrpb0lf
8Y7DKn9fLekr/jAwZUftEv51fpGHqK/SxM8K6hfC6FtG/Fo31azTVVGS4BLgQdMKuRfZHYU/9tR6JijU5VOkhLqcCzpk3Att1a9RXKqJbQeS3weltF76Vo7Cn/tqPRMSEsZWTl2CoKLaAm/PbKoUCmzxK1taDh+WjiMP4KfBPATiCNwWkj1XhODKlfjflwOtR9kSuC2UkGZmlL+6gaMSkjKSTehLspQN9tp6zqTkhJzqNCYZSsbido6jEzguXUSZeaWjoWNKFYLn78mZYI6biDgypbn5fzq/SOwyqfXS3pK/4x2GVT66W9JX/GOwyp/Xy3nV+kDBdQ3zDHnV+kUmSXI09iWWoKUjSuRs41E981aksVKXKF8Sx8Be8GKPVn5J/wB7KjxFJs04dUiMQ0ATyC+wAH0jjHhiFJUhRSoEEGxBinVOapz4cZVxfKQdioVMt12izAZBSspsUHcoccKSpCilQIINiD2zBHzh5L/LVO7WA+gLRbWOQ76rFIYqTGieS6n4C4otYeYe97ajdLqTZtZ36pEYhw+JxKpmWTZ8DlJ8OFJKVFKgQQbERSas/TX9NvlIVxLQdhh44crNnFO8A+dt+Sf0MdjFM3VZP9Mdi9N/3ZP9Mdi9N/3ZP9Mdi9N/3ZP9MTOGpZLRMvUmlrHyVEC8KSUqIO0HWwR84eS/y1Tu1t2sMx3sIJ1hByGzIQe+K1RmqkzcWS+gchfsMUOsupd97qhdL6DZCj8rVIivYcTO3flgEv7xuXDzDzDim3W1IWNoI7SxJzcwbMsOL6hHY1U0suPOoS2hCCo3PHxZ4I+cPJf5ap3ax2Rsi8b8xAi8bsjtyvkY25GN0A5mNkXjZAgRfLdlaBti+QgReDlxd91uioqLWmjkzCByF8/QYodcWtfuCeuiYQdEE/K1SInKdJzqNGYZSvmO8dRibwYCSZWZt91f6iH8NVhn/wCPpjnQQYXT55s2XKuj+Ax7nf8AqV+iYTKzKjZLDh6kmJeg
VZ/4MqoDnVyYlcGPGxmZlKehAvEphulS1iGNNXOvjhDaEJASkADcImmA/LvMk2C0FN+uFYPqYUQlbJG43jsPqvhM+lGHKNMUxEwXlpKnCniTu0b6p3axgwIG3LdG7IxugQNsHMQIucjAyEb4ORi5yOzLdkIGRjdG7Iwch33XKG3UEcK1ZEwgclWy/QYoddWpfuCf5EwjkhR+VrWi0Wi0Wi2ZIAuTE/iSmSd08Jwq/BRxw3iKuT0yn3HKjQB+Da/nMMqdU0guoCFkcpIN7ax3a94vleDlfK8XyvnfK+vfK8Xi+peL6t4v9AVuht1BvhG7ImEDkq5+gxRK45wnuCoXQ+g2So/K6D2g5vPssIK3XEoSN6jaJ/GEmzdMqgvK8LYmLYjrZ49JDJ/gREhhGSZsqZUXlc2xMNMtMoCG0JQkbABbXO7tPFHF+4lbojVRb00WQ+gchfP0GKJW3Uu+99Quh9JslSt/Qe0TlSkpJN330p6NpPiicxg86rg5CX6lKFz4hDNBrVUWHZ15SEnwzc+JMSGHabJ2UGuEX4a+PtR3fufWqI1UWtJNkPpHIX7DFFrbrbvvdUbpeSbIWrf0HVn8RUySuku8IsfIRxw9iCtVNZakmShJ8DjPjMSeEX3VcLPzBudqUm58ZiTpkjJJswwlJ8Lao+Pth3fuhWqKzUmriyX0jkL9hii1t5l73uqN0upOihZ39Bh11plBW4tKUjeTYRP4vkmLplkl5fPsTBXiOtmw0kNH+BESGEJRqyppZdV4I4kwywywgIabShI3AW7cd37o1mjM1Jncl5I5C/YYbw9XJ5YE28UoRyQVm/EOYRIYbpsnZRb4VwfKX7BAAAsO8Du/9UN+0jIjMjtd4vqiN8HtVu17vo3aM7RbK0WytA1SMrZWi2uIOVotAjfBi2VotlaLZWztlaLa27O2VotlaLZWi2paLZWi3fQORgQdsGBG+DAyMbsjG7I7IGzI5WgjM5DIQI3wY252gwYEHbBj
dAzMAQcrZ7tQwYEHK0HbBgQY3QIMboGW7vm0AZGAIMbYtkRAyMDZkcrQY3ZHVEWi0CLRsgRvgxaDG2LZHU3QItlti2tui0DZFoMbYtBjbFsjAgiN0CDG6BFo3d+H6aEHtu7vw/TN4v2wRf8A/F//AP/EAGAQAAEDAgICCBAICQoFBAICAwECAwQABQYRBxITFCExUVWV0xAgIjAyNTZAQVJhcXN0srM0QnJ1gZGxtBUWIzNUYpKToRdQU2BwgoPB0dIkQ4SiwkVjlKMl4kRkkLDh/9oACAEBAAE/AOmufa2d6u57Jpn8y18gf2azvh1p9O57pXeUpkvxn2Qci42pOfBrDKkJ1UJTwAD+zV+OXX4jgUAGXFKI4c0FP+f/APks2a9/oMP/AOUvmqbdu5WgOQ4iUZjWKZC1EDyAtjpZ8sQoEuUUawYYW6U72eokqypq44qdabdTZLfktIUM56+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK2
7iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27
iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+YrbuLOJLdygvmK27iziS3coL5itu4s4kt3KC+Ypq73lq4QI0+1xmUSnFoQtqUp4hSGy5ugtI8XvLEXc/efUJHuzUD4DE9Cj2f7Nbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9n+zW8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ/s1vHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2f7Nbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9n+zW8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ/s1vHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2f7Nbx24wz66992c7yxF3P3n1CR7s1A
+AxPQo9n+o72kPBrD7zDl3QHGnFtrGxuHJSDkRuJqNIZlR2ZDCwtp1tK21DeUlQzB/rbeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/1HuHba8fOk3366wp3L2D5si+6H9bbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9n+o9w7bXj50m+/XWFO5ewfNkX3Q/rbeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/zUtaUJKlHIAZk05jPDDLhQ7dmEqHgJNR8W4ck65YujC9UZnI0MZYXz3buxTuN8LqAAuzFRcQ2aX8HntObhPUml4tw4y4Uu3RlJG+DX484U42Yo45wtluXZihjHDKiEi7MEmo1wiSs9gfQvLg7zuHba8fOk3366wp3L2D5si+6H9bbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9n+ajkavGFbJd0nbURBV44GSqu+CE2O7RnrfNJRrflEK+Kmp6mVzpCmewKzl0LJeZFmnplsq3gQoHeINYpvH4XeiyNqBjqN4fG8vRNYVxHOt01pjZCppZyAPgNW2UZcRt4jInf7yuHba8fOk3366wp3L2D5si+6H9bbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9n+ZioCnJTLYzU4kDz09fbcyCS8CfJUzGcBH0eUCpmkaI12Cm6m6SZa8wxr1cL5cZ5VsruSVb4Fbg6FnVbE3FlVy1trJOagnfJFYkurN1uhfYbDbCUhDSPIOihLjiwhtBWo7wAptliyNGXMUDJy/IsjweU1gd557DkNbw6teau8rh22vHzpN9+usKdy9g+bIvuh/W28duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ7/AMxw0qQyg5KcSPppy5wm999NPYitjXZPVIxxZ2R+eT9dSNJ1sbzCKlaVFq3Gm1VJ0h3Z4EJSR5zT2Krw6fzoTTt0uLvZy1/XRdLh3XFLNbG5lrbC4E+MU7nQwzhH8Nx1SVzW2GkK
yUDQsuAbQnXlzttKB3gc6nuRnJr64reowVnUT5KOVA5nJIJPkqPa7jI7COoDxlbgpVttsMa0+enP+jb3TTmIktgs2qIGvBrkZrNRrc+87tiasqVnnqndz89YOUVWKL3lcO214+dJvv11hTuXsHzZF90P623jtxhn1177s53liLufvPqEj3ZqB8BiehR7PfGdKebQM1LSPOcqdvluaJSX0Z+AUvEdvAUUa68uAU9itARmhjVP66qlY4Q32TzKPMc6k6REA5JkKV8kVIx/JWSUNrPnVT2MLu6TkoJp29XV0nWlK+ilyH19m+s+dVbij4TWQA3qtOCrzdYjUqOEBpzeJNDRmhOWz3llHCARV1hswZ70Zl8PIRvOcNW96MxMZdktbKyD1aOGhjWwRhlEw80PlirxjaTcoTsPaMZlpfiDdpKVK3EoUfMKYi3ZSCllDyUHfAJSKTYJu+5sbflUoUbfb2fhF0bHkRu0ZeHGOxbdfPl3BRxKtPUw4DTfAdXM05Jv87MKdWlPBnqimrGM9Z53WNMxmGBk22BVlsUy6yEobQQ3n1ayNwCrdAbhRWmG+wQkDvK4dtrx86TffrrCncvYPmyL7ofzzN0koiTJMb8FFWwurb1tmyz1Tl4tfypI4oP7/wD/AFr+VJHFB/f/AP61hjEYv8eQ6IpZ2JwJyK9fPMeYfzjeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs96E0/NjR0lTzyEDympGK7a3mGyt1X6gp3FM5z8zECBwrNSb/NAXti4ob8idzKpWJrYns5Lr6hwmnsY5E7XiAeU0/iW7vZ5OhA8lOS5jv5yS4r6a1RvmsxTEKZIy2CM45nvaqc6Whba1IWkpUDkQd8VZIVvmzdinS9rs5Z7JRTo5tuRzdlrH0isR32zXCMiPb7WmPqqz2TwnoM3y6xmEx2ZziGk7yAaBnyVEhT7hNNYfuqxnsAbTwqOVGyR2hnKubKPIk5mirDEfsn3Xz5KN/tLP
we1g+VZr8Zbk4co0VpHyUUqViOSSC84nydjQtk945uvn6TnTdjRlmtw503a4aCDqZ+ekMtI3EtpFZEneqBhq8TiNijKCfGVuCrXgBhopXNd1z4gqHBjx2ghlsNoHgHedw7bXj50m+/XWFO5ewfNkX3Q/nm+durp6297Z6OjDtfcfTp9n+cbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nvHMVMukCGkqfkIT5M92pGLgrMQ4y18C1bgqXebo+CXpgZRwIqXerQwSpx4vL8+dSMYL3osYAcJqTfbrI7J8pHAmlKWs5rWpR8poADoDdOSQSeAU7b57LAfdiuIaO8sjIUc8tyrbNwNAgsvvRy/LCBrI8tSNJRZyRbbY02jKpMhyTJekOdm4sqV5zRyPlpi3zXyAzGWfLlTOFLgoBTziGh5aVasOwxnKuGufFTS79h6LuRLfsh4V07i26u9RGYQ0P1U0tV9mbrjzmR4TlSLI4pX5V/6qbs0RPZAqNIhRUZarKQayA8FAE7wzNNxJTpybYWT5AajYXvcgZoiKA8tRdH9zc1S86hAqJo9t7e6+8tdQ7BaoeWwxEA5b5GdIQkDIDId63DttePnSb79dYU7l7B82RfdD+eb526unrb3tno6MO19x9On2f5xvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2evrcSkEkgAVc8aQIzxYioVJeByIRvCpV6vM0brgjNnfSndV9dS7naoJJde2Rzz66qmYukuZpjNBA8ZVSJsySSXn1q8me5WQ6OdA51aY8STco7MtzY2FqyWvgpy9YHsGaIcUSn0jLWyzFYhxlOvbBjLYQ1HCwpKR5OgchUW3T5ZAZjqI8Y7gqLg9ZAXLkBI8IFOPYXtA+K44P71TMcPkakNhLY8BpyVe7gc1uOZH6BTdkWd117d4BTdqiI+Jn5TSW0Iy1UgeYUEqO8Caj2a6SCA1EcOfhyqLga9P7q0ob85qPo5GQL8zzhIqNgOy
NEFSVrPlNR8OWhhQLcNrPhIpERhvsGkJ8woIrLvi4dtrx86TffrrCncvYPmyL7ofzzfO3V09be9s9HRh2vuPp0+z/ON47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez166X2FbUkOL1ncupaTuqNTpl1u685TxYZ8DDZ9o1LvNrtaShsJUvxU/5mp+IbhMzAXsaPFTWWZzOZPCelttpuN0f2KGwpw+E+AVDwXYrI0mVfJiCobux51iKXbJdzU7bWtjj6uQTWVBIFEgVb7NOnnNtBSjwrVUTD1sgI2WQQsjfUveq4YwgxAW4iAsj6BUq9Xm6LIC1hJ8CdwUxZVq6p9w+YbppiFGY7BsZ8O+aAzOQFRLJdJf5mI4foyqHo/uLu6+6hsVEwDamdUvKW6fDwVFsdqijJmG2POM6S0hO8kCsqy79uHba8fOk3366wp3L2D5si+6H883zt1dPW3vbPR0Ydr7j6dPs/zjeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs9cUtKQSo5Ab5q6YoLwdYtp3UqyU+R1I81S5UWEFSZLubit9at1SqumJJczNtjNpr+JrLdz8PS59CyYkudjD4hFA2XstYZ1OnTLg+XpbynFnhO4OiTVlw1rBEianyoaq7X2Ham9jSElwDcbG8Kl3O53d5Q1iR4o3EiotnaRkp4654PBSEJSAEpAHAKgWO53BQDEZZT4xGQq3aO1nJUyR50IqFhe0QwNSKknhVu0ltKBklIA/mO4dtrx86TffrrCncvYPmyL7ofzzfO3V09be9s9HRh2vuPp0+z/ADjeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs9bdeQy2pxxYSlIzJNXe9vXdamWCpuEDkVbynf8A/lXS9RbW1sTaQXcupQN4eepUuRMeLr7hUr+A6aNHflvoYYbK3FnIAVZtG8NqGqRe3QDl2IOQTVxZjsXCU1Hc12UOEIVwjpDWGbMlzKa+nMA/k0msR34W5rY2
iC+sfsio8J+c4p6QtQB3fKqmmUNpCG0ADgFWnCd0uJCtTYm/HVVqwVaoeqXEbM5wqpthttICEhKRwCsusKcSkZqUBUu/WthOS5jaeHdpjEdlfOTc9o03JZd7BxKvMaz75uHba8fOk3366wp3L2D5si+6H883zt1dPW3vbPR0Ydr7j6dPs/zjeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs9aUpKUkkgADdNX+5qusjYGnf8Agm+zy/5quDzVfL0i3tBpnIvqGSR4opa1uLU44oqWo7pPTWWxzr1K2vFAzHZKO8BUC02HB1uMh9SS6E9U4eyUeAVijGU6+OltCi3FG8geHz9LDjKly2WB8ZQz81OragQlKAyQy3uUy25c5bs2RmUlR1Bw1bbVLuL6WYzRPCfAKseDIMAJdfAee8u8KQhISAAAOlzFOyo7QzW6hI8pqTieyR+zmtk8AOdStIdna3GkuOGpOkuRuiPEA8pNScd35/eeSgeQVIvV0kElyY6fJrVm46sAkqUTkKuFvlW58MvpyUUhQ8xpmfNZILUlxPmUajYwv0fLVllXyhnUbSRdG8tlZbXUbSVDUAH4y0eao2NbC/8A/wAnU+XuVGulsk5FE1o+QGgtJ3lA96XDttePnSb79dYU7l7B82RfdDr92xVZLXrpflJU6k5FpHVLqdpPdzIg29IHgU8c/wCCakY7xK8c0y0tDwJbQkAfXmaOL8Sk5m6PfwpOM8TJ/wDU3D50pNQ9JF8ZAD7bD44SkpV/CrbpHtEjVTLacjLO+ezRUaVGlNB2O8h1B3lIII6zLnwYLevJkNso4VnKrjpKtjOsmHGckK8Cj+TRUrSTfXQQy3HY8oSVK/7qVjXE6j2yWPMlFDGmJx/6mv8AZTUXSLiFk/lSw+P10ZexlUDSdFWdWdBW3+u2dcVbr1a7mjWhy23dzMpByUPOk7vT3XFljtesl6UlboOWxN9Wqp2k93WIg29IT4FPH/JNP47xM6Tl
MS2PAlCEgCl4uxIvfuj30ZCk4yxMnLK5ufSEmoeke/MZB5LD44VJ1VfWmrbpJtT+qiay5GV43ZoqLLiy2g7GfbdR4yFBQ6W+durp6297Z6NoxJdrO063CeShLigpWaAr7a/H/E/6U3+6RX4/4n/Sm/3SK/H/ABP+lN/ukV+P+J/0pv8AdIr8f8T/AKU3+6RSNIWJUqBL7S/IWxUfSfcARti3sL+QpSPt1qt+kGwy1JQ6pyMo/wBIOp+sUy80+2lxpxK0K3lJIIPWXnmWG1OvOJQhO+pRAAq4aQbBEUUNrckqH9ENz6zT+lCaSdgtzKODXWV/ZlT2kXEbnYmO18hv/cTTekPEiCCXWF+RTY/ypjSfcQRs9vjr+QVI+3WqBpFsUkpQ+HYyj4VjWR9aajS40toOx30OoPxkKCh1q54usNt1kuy0rcBI2Nvq1VM0n5Kyh27NPjOq/wAk0/pGxE6eo2u18hvP2ia/H/E/6U3+6RX4/wCJ/wBKb/dIrB9zmXSytypawp0uLBIAG4D1m8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ61iy6OjUt0ZQC3h+VPit1cZzFrglQA3Bqtp4TTzrr7q3XFZrUcz09lvU2zTBJiq+UnwKFX7EE6+SdmkKISOxbG8Omwm0F3Jaz8RBrFa1/g1LSd91wCrBYn7lIbjMjJtAGsrwAVarPFtkZDLCAOFXhJ6S8XmHaYpkSVZDeAG+TUnSYjLKPBPnUqpOkG+PAhGxNjyCpOIL1Jz2Wc6RwBWVOS5TpzW+tXnUaOZ3z0uC7T+Ebw2VD8mz1aq0iWfZYrc5tPVNbi/k9MlxxPYrUPMaj3u7Rstimuj6ajY8vzOWs4lz5QqNpLdGW2IYPyatWOLVcJDbGSm1r3tah3hcO214+dJvv11hTuXsHzZF90Ou3W8W+0Ri7KdCR4EjdUo8CRV+x1dLmVtRyY0fxUHq1edVEknp7fdJ9tfD0SQtpXkO4fON41h3H8WaU
R7iEsPncDg/Nr/06Za0NoUtaglKRmSTkABWItIaElce1AKO8X1b390VLmy5rynpL63XDvqUc+nbddaWlba1IWN5STkRVg0iSo5QzdAXmv6YdmmosuNMYQ/HdS42sZhST0bve7dZ42zS3cvEQN1Sz5BV9xvdboVtsqMaOfiIPVH5SusQLjOt74eiSFtLHhSd/zjw1h3SDHlFuNcwGXTkA8OwV5+DpL526unrb3tnrltvFytbuyQ5K2z4U76T5xWHcewrgUR5wTHfO4FfEX0ylJSkqUQABmSaxBpDjxyuPbEh5YzBePYD5PDVwutwuTxdmSVuq8p3B5hvDp4U+bBeDsWQ40sHfScvrqwaRkLKGLsgIO8H0D2xTbiHEJWhYUlQzCgcwR018xFbbIyC+5m4R1DSd1Zq+Yyu92KkbJsDB3mmz7R6bR73NM+mc6zeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs9ZmyG4sd19w5JQkk0h5yS49MdPVvqJ8yBvCr9cDNnqAP5NvqUjp40WTLeDMdpTjh3kin40mOsofYW2oHIhQy6fB5G3JA4UViBObMY+AOZfXWF7S1brWyABruAKWfP0hrHt427dNrIVm1H3P73WsD2kQLQl1acnHuqPmqXHamxH2F5FC0kGrlCdgTn4zg3W1kdZacU06hxByUlQIrD92FztMd4K3dXJQ8o7wuHba8fOk3366wp3L2D5si+6HXMRYjiWOJmrJby/zbQO6auVzm3OUuTLdK1q+pI4APAOt4Rxs5BUiFcFlcYnJDh32/9U0lSVJCkkEEZgjoypUeJHdkPuBDbac1KNYnxdLvThabzaiJPUt+FflX1uwYhnWSUHGFazaj+UaPYqH+Rq0XaHdoTcqMvNJ3FJO+hXhBrEeIoljiaxyW8vcbaB3TVxuUy5SlyZbpW4r6gOADwDreEsaPWxSIk5RXEJyCt9TX+qaQtC0JWhQUlQBBBzBB6F87dXT1t72z17B+NlxF
NwLi4VME5NvHfb8h8lAggEHoyZLEVhx99wIbQnNSjWJ8Xyru4phglqGDuI8K/KrreGsVzbI8EHN2Ko9WyTveVFQZ0WfFbkxnAtpYzB/yPSYqxYzZmtgj6q5ahuJO8geMqpUqRLfcfkOqccWc1KPT6Pe5pn0znWbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nrONZZERiGk7shwBXyRV7l7Ttryk7hI1E0M989Ma0WWdAYfubgBUs6iK0mXVEi6ogtpGTIzWfL0+HpQjXRoqPUr6k1cYu2YjzQ7LLNHnG6Kwbek3O0tpXuPsfk3U+VPSYkuyLbapEjMZhOSBwqNOOKccWtRzUokk+frOHLYq53aOxl1OtrL8wq8TG7XaH3RkNjbyR5/BWFlrescZ1w5qWMyfPWka0arjNwbTv9S51rR3d9gmOQXD1Du6jz94XDttePnSb79dYU7l7B82RfdDrd3usW0QHpLx3EDcHhUrwJFXO5y7pMdlSV6y1/UkeADydJHjSJTqWo7K3XFbyUAqNQNHd+kp13y1GHAs5q+pNJ0WvZbt2QD5GT/rT+jG6ISSzNjueRQUirjh29W0FUqC4hHjjqk/WnpcA4pLa0WqY51Cvg61HePidAkAEk5AVi/EqrtK2BhWURlR1P11eP0tswjfrlqKaiFttW8671CaZ0Xyz+eubSPkNlf2lNL0Wqy6i7gnysZD2qn6Or9GTrMFqSOBByV9SqkxZMV1TUhlbTg30rBSekw9f5Vjmh9rNTatx1rPILFXS5y7pNdlyV6y1n6EjwJHkHSMsPPuJbZaW4s7yUgqJ+gVb9Ht/ljWeS3GT/7hzV9Sab0WrI/KXcA+RnP7VCntF0kfmbo2r5TRT9hNXPBl/t2upUXZm077jJ1x/rRBHSYCxQYzyLXLX+RcOTCj8RR+L5j0L526unrb3tno4fwlMvrDzzEhpsNrCCF51/Jjdf06L/3V/Jjdf06L/wB1fyY3X9Oi/wDdX8mN
1/Tov/dX8mN1/Tov/dUnRtfGmytp6M8R8QKIJ+sVcLPdLaoJmQ3WuAkdSfMRudLgDE5Vq2mWv1ZZ9jo4wxMq6yjGjrIiNK3P/cV43SJSpSglIJJ3gKtuBcQzsiY4joIz13jq/wABmab0XSCOrurY8zRP+Yp3RfOAOxXJlXykFNXHB2ILfrqXDLjad9xrqxRBByPSYUxK9ZJo1yTEcOTyP/MeUU06262hxtQUhaQpKhvEHoYmxAzZLep7cU+vNLKOFX+gqTIflPuPvuFbjiipSj4T0keNJlOhqOy46s7yUJKj/CoeAcSST1TDbA4XV/5JzNDRjdvDOi/91fyY3X9Oi/8AdWGLO9Z7SiG84hawtas0Z5dV1m8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ6ziV4vYhabI3GWCR5zWMXjqRWvATmenV2J81aOQBhaLWJ1LViO6FZOey9PughSTug5irLcUzoLa8/wAogZLFbafsN0RdI6SWV5Jktj2qg3FibEZejqCm1pBBHR0h3jbE5EFteaGd1flUetaPLRsEJc5xOS3jkj5IrSPdfzFvQr9ddYN7nYXyavVqTPtclhe+pHU+en2VsPutLGSkKIPWYclyJKZfbOSm1hQq1TW58GPJQcwtAPX7h22vHzpN9+usKdy9g+bIvuh1vHV9NyuhjNK/IRSUDyr+MekwxgyVeMpD5LMTxvjL+TVutNutjIahxkNp8JG+fKT0t/wHbZ6FvQwmLIyJ3OwWfKKuFumW6UuNKaLbifqI4RwjooWpCkqSohSSCCNwgisJ3v8ADFoaeWRszZ2N75Q8P01pDvpiQkW5leTsgZucKW+ktVpm3WWmNEaKlndUfAkcKjWH8F2y0oQ46hL8rfLqhmEn9QdLcbTbrmwWZcZDifATvjyg74rE+DZdmKn2Cp6H4/xkfL6fDOD5l7IeWSzEByLnhV5EVa7LbbUyG4cZKPGXvrV5z0t/wfa7whS9QMyfA8gb/wAo
VdrRNtMtUaU3kobqVDsVDhHRBIOYrB9/F2tCS6vOQxkh7hPAr6avnbq6etve2ejox7UzvWv/ABHTrQhxCkLSFJIyIIzBFYh0exJCVv2sBl3ws/EVUmM/FfcYfaU24g5KQoZEHotOuMuodbUUrQoKSob4I3Qaw5eEXe0x5Q1QvLVdSPirFaQr8YUFNvZVk9JHVngb6Sw4dnXt/UZGo0k/lHj2Kf8AU1ZMMWmztjYGQt3LJTy91Z6W94StF4SpTjQaf8DzYAV9PDV+w7cLJI1JCdZtR/JvJ7FXSaOb+SF2l9W8Ctg+0miQASTkKxVfF3i7OuhX5FslDI8GqPD9PSYbwO/PSiVP1mWDkUI3lrH+QqDboNvZDUSOhpHAkb/nPXbx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nrN4cCsUzhwMprGI/LRD053q0YTG3rAWAeqacIIrSPbFQ7+p8DqJCc+sWq5OW6UHBuoO4tPkptxiUwFoIW04mrPdn8LTg24VLtj6v3SjUd9p9pDrawpChmFA5g1ebii3W6TKWewQdXz1IfckPuvLOalrKj9PWbZBXPnx4yB2awD5qbQzb4CUjIIZa+wVeZ6rhcpMgnslnLzVg3uehfJo1pBtG1bgmY2nJD/ZfKHWtHN4/O29xX6zfX7h22vHzpN9+usKdy9g+bIvuh1rFN1NqskuSg/lMghv5S9wHpMF4Y/DMpT8gHajKhrfrq8WkpSlISkAADIAbgAHT4kw/FvcFTbgCXkAll3wpP8AoalRX4kl2O+gocbUUrSfAR0cBXcW+87E4oBmSnUUT4FDdSav1zVdLtLllRKVrIbz8CBuJ6MKG/NlMxmEazjiglIrD9hi2SChhoAuHddd8K1dOtCHEKQtIUlQIUkjMEGsYYaNlnBbIJiPElo+KfEPS4Tw6q8zSp0ERWSC6fG4EU22202httAShIASkDIADp8QWSJeYC2H9xQ3WnPChVToUiDLfivp1XWllKh0
cDXY2++soUsBqTk0vznsTV87dXT1t72z0dGQ/wDwcs8M1XsJ6zi7CzV4iF1hATMaT1B8ceIaUlSFKSoEKBIIO+COjo7vAiT34brgS0+2VjPwLbGdX25rut2lzDvLX1A4EDcA6Ngssi9XFqK1mE77q/EQN81b4EW3RGo0dsIbQOnnwItwiOxpLYW2sbo/zFX+yv2W4uRXN1PZNr8ZB6MKW9ClsSWTk40sLT9FYsv6EYUQ+wsa05CUI8yxmrpMCYWTPc/CMxGbDasmkHecUPD5h1+8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ6wauzurjWa2T2TQrF7BVEYd8RfWNH1+atN1cbkOhDD6ciTvAitIOJ7NdY6IcX8o62vPZfB1mx3pdvd2N0ksLO6PFpaWJUcg5OMuCrPepeFpQYkFTttcV1Kt8tVj3EDMwRosV0Lay2RRB6wELO8hR+ikQpbnYR3D5kmsA4ffYcdnSmSg5ZNg1j267TtJYQrJx85fR0MG9z0L5PQxVaUXS2PMIHVgZoPlFPMusOracQUqSciD1m1T12+exJQewWM/NVufbkxWn0HMLSCOvXDttePnSb79dYU7l7B82RfdDrWk+crWt8IL3MlPLT/2p6MeO7JkMsNJ1nHFpQgcJUchVpt7NrtsaI2MktoGf6yvCT1nSXaUNuRbk2ANf8k75xug9EEggg5EdJo1syQ2/dHUdUSW2fMOyPWcQ2hF3tUmKUjXKc2ifAsbxpaFIWpChkpJII4COilKlKCUgkk5ACsO2hu0WmPFSBr6us6eFZ3+s6SrMFMsXRpPVIIbe8x7E9FC1IWlaTkpJBB8oqbJMqZJkFORddW4Rwaxz6OjPtDK9eX7COtaRLKmHcW5zScm5WeuANwOJ6fAlnTb7K2+pI2aUA4o8CfijrOPbQmbZFvoRm7F/KJ+T8bpH7g8/AhRFdhGLmr/AIhz6NtguXCfFiNnJTzgRnwZ75qJFZhxmY7KAlttASke
QdfvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2esGsZu7Uxow/wCAgA1c4olwH2uFOaa1SklJ3wcj05ANAAdZyqyXxyAsNO5qYJ/Zr/h5cf4rjLgqREdjqWC2oISdw+DKoNmudwbDkWOXEH4wprAuI3MjtZKfOoU1o6vK+zcaRTWjJ7/mXBP0IpnRpAH52W6rzDKmsC4fbA/IqV8o01hewNb0FqhAszB6hhlP0CjJtLQ/PMJ+qnL/AGVoHOcz9dYuvSbrdVLaVmy2NVHQwb3PQvk9G54cs09zXejJUrxvDS8B4fX/AMlY8xpzR1Yz2Knh/epeja3nsJTgpejNHxJ/1pp3RrKSCUzkHzpqQyWH3WScyhRST5qZaW86htAzUo5CnMIX9G/DJ81OYevTfZQXv2awQ1JYw5EbkpUlwFeYVvgZ7nXrh22vHzpN9+usKdy9g+bIvuh1rHzxdxNKGf5tDaB9WfRwBCTKxEytW8w2p36d4daxXBE3D9wa1c1JaLiPlN9V09lhog2mDGSkJ2NlIV8rLNR61jOEiHiOchCckrIcA+WMz0cFQTMxHCGWaWiXleZHWrzCE+1Topy/KsqAJ8CvAen0ZH/8JLHBMV7CetY5hGXhuXknNTJS8P7m/wDw6a2RTMuMOMB+dfQg+YmgAAAOsuNocbW2sZpUkpI8hqfFVDmyYyjmWnVIz4dU5Z9No2jIdvrrqgCWY6inzqIT3heO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs9YNaUYixMS+PFCh9FWGeJtuaXnmtA1VViW3bUmbMgfk3d3zHrIBJyAJPAKg4Jvs2CuYlsIQlJOS980QUrUlQIKTkQesWi9SLa5lurYPZIqNKjTWNkaIWhQ3U/wCRpsXLD0pU21EqYJzejeD6Ke0mQjEYXHjKW6odWk7moac0l3A9hDaFPaRL65vBpPmFLxviJe9L1fMKcxff3N+YqnL9eHOymu/XS581fZSXT/eNF1077ij9
PSYN7noXyesPD8mvzGrp2xl+lV9tWntnD9Kmh2I83eFw7bXj50m+/XWFO5ewfNkX3Q61jbuouXykewOjowA/Cc88EYe11qR8He9Gr7O8dI3dF/0zfR0bd0Dnqi/aT1o7xpz84v5R6bRevOBcUcD6T9aetXxIVZrkk7xiuez02CgDie2/LX7B63ifuhuvrS+m0Y9tZ3q3/kO8Lx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nrOkO3F2C1ICcyg5HzGrLOVaLmWXCdgdNToTE+Itle8oZoVUqK9DkLYdGSkn6x1iHKXDlsyUpCi2oHVO8aw5fol6tzTzOSVZZLRwGseYJ2UuXKA2NffdbHhrdBIIII3x1iBcJVveDjCtz4yfAatl3jXFvNshLg7Js1fGGmpp2NATrJBIHD1vBvc9C+T1h782rzGrp2xl+lV9tWntnD9Kmk9iPN3hcO214+dJvv11hTuXsHzZF90OtY5QUYnn+XYyP2B0dG0hLd9daJA2WMoDykEHrUj4O96NX2d46Ru6L/AKZvo6Nu6Bz1RftJ60d405+cX8o9NoueGyXRnPdKW1gdaxM+iPYLm4pQH/DrSPOoZDpsMyhEv9seOWQfSkk+AL6knreKO6G6+tL6bRh2yn+rj2u8Lx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nrNzhImw34695aCKvdpWh5+M4MnGlEA1he9lX/AAEpWS07iCavloTcGCUjJ9HYnh8lKStC1IWkpWk5KHWLBiCXZJqH2iS3n1aOEVaLvDvEFEhhYUlQ6ocBrG+BSdkuFuR5XGhW6CQRkRvjrDTrrLiXGllKxvEU7cXbhqOOpAWlOqSPDl1vBvc9C+T1h782rzGrp2xl+lV9tWntnD9Kmk9iPN3hcO214+dJvv11hTuXsHzZF90OtaTIex3aLJA3HmMj8pB6Nnnm3XSHMyJDToUoDfKd4im1ocQhaCClQBB4QesyPg73o1fZ3jpG7ov+
mb6Ojbugc9UX7SetHeNOfnF/KPTYLuSLdiCKtw5Nu5srPy97+PWtJVzS1bmICezfWFq8iEdMlRSoKByIOYNWK5oulqiSwRmtA1wPAsbih1rFHdDdfWl9Now7YXH0Cfa7wvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2etYzw4JrJlx0fl2x1Q8YVcIiwoPtZpdb3/orD18RcWA24rJ9A+usQ2TbSDKYTk8kdUPGFDwgjIjfHWMOYjmWKYl1oksk/lG6s95g3iGh+M4FAjqk+EVjPAIllc62pCXd9bfgVTrTjLq2nUFK0nIg9MAVKAHhpNvTq7qjnTbBZBSeHreDe56F8nrD35tXmNXTtjL9Kr7atPbOH6VNJ7EeboawrWTw1rJ4RWsnhrWHWrh22vHzpN9+usKdy9g+bIvuh1rSDbDMsReQjNyKsOf3N5XSaPsRofjC1yF5OtAlkn4yODzjrMj4O96NX2d46Ru6L/pm+jo27oHPVF+0nrR3jTn5xfyj0XraRY4lwTvKkOMr84AUOkwTiNN1t4jvL/wCKYSAvhWnwL6xNmR4UV2TIWENtpzUavl2eu9zfmObgUckJ8VA3h0bDZnrzOMVpQTk0tZUd4ZDc/jTiFtrWhaSFJUQoHwEdHAWI026WqDJXlHfVmk+BDnWsUd0N19aX02i/4bcvQo+3vC8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ60U79Y0w1tZxU6Mj8ks/lEjwGpCHoElMuOcgDmcqtF2auUYOJIDg7NNYjsfZTIqPSIH20DmOsWC/zLJLDrCzqE9WjwGsPYkt98ihxhwBY7NB3xWMcGW+5sOS0KSw+2kkr3gqt4qHASOikFSgB4aEBvV7I51YcMQrk4pt65hhz4gKd+rnhG8WoFRTthgbziKd63g3uehfJ6w9+bV5jV07Yy/Sq+2rT2zh+lTQ7EearzcRb7c/JIzKE7gqViG7yXluKlrGZ3gcgK/DN0/THfrr8M3T
9Md+uvwzdP0x366gYlu0OQhwSVrGe6lRzBFI3us3DttePnSb79dYU7l7B82RfdDrTrSHW1tuJCkLSUqHCDV9tTlpukmIsHJKs2zwoO8ei066y4hxpakLSc0qSciCKwzjyNMS3FuSksyN4O7yHP8AQ0CCAQenkfB3vRq+zvHSN3Rf9M30dG3dA56ov2k9aO8ac/OL+UejhW1t3XBEuIs5Fb7hQeBYAIp5pxl1xpxBStCilSTvgjowJ0q3y2pUZwodbOYP+RrDmKYN8YySQ3JSPyjJP8U8I6adPiQI65Ep5LbaRvn7BwmsU4pkXx8JSC3FbP5Nvh/WV0mjuzGHbVznUAOSuw4Q2K0hWMw7iJ7STsMk9XwJc6TCOOQhLUC6Obg3G5B+xdJUlSQpJBBGYI6xijuhuvrS+m0XfCbp6Nr7T3heO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs9blR2nmVtLSFIUCFCsT4fXa5a0FObDmZQaZekWachxsnUJ3P9DVvnMT4oebyII6tPBWIbGYylSo6c2lHNaR8U0OsWu5y7XLRJjOFKhvjhFYgxxdL1HRH/Mt/HCT2VDepttbitVIoW85dnWG8GRLu2vXuQbeG82BV0wdd7Skry2wwPjp3x5xSSQQQciKw/jR6Lqx52brO9rHfFY4iWwGLNhBID2etq73W8G9z0L5PSy58OICp99CB5TUvHdnYzDZW6fIKd0jqzybhfWa/lFfIIVCT9dSiX5Lz29rrKsvPVs6i4RVKOSQ6nM0w606hJS4kpy8BrGeX4BleYdKN8eek7w6zcO214+dJvv11hTuXsHzZF90Ot43w4btBD7CQZUcEp4Vp8KaIIOR6SzYuvNp1UNPbKyNzYXM1JHm4KgaR7I+n/ikOxleYuJ+tNfj7hf9OV+6XX4+YX/Tj+6XX494X/Tj+7XQxzhj9P8A+xdDG2GeME/sqp/GOGlx3ki5IzKFADVV3jpG7ov+mb6Ojbugc9UX7Set
HeNOfnF/KPR0cdzx9ac+wVpCw2oKN2jN5jekge30jLzzDqHWXFIWk5pUk5EVZtJMhlIbubBeAyydbyC/pFQ8XYdl5BFxaSeBw7H7VJmRFJ1kyWinhCwRUrElhiA7Nco4I30pWFq+pNXXSVDbC0W6Op5Xgdc6lFXS8XG6vl6Y+VnM6qd5KfMOkwrYF3q5JQoZR2slPK8ni+c0lKUJSlIASBkAN4AVdbZGukF6I+OoWN/wpPgIq62yVa5z0SQnJaDuHwKT4FDpLNim8WfqY7+s1/ROdUioOk23OaiZkN1k+FSCFpr8fcL/AKcr90uvx8wv+nH90uvx7wv+nH92uhjnDH6f/wBi6GN8M8YD9hVDGmGeMkfsqq/yGZN6uL7KwttyQtSFcIJ6bRaOru58jI9rvC8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ65erWxdIjrDoG6OpPAavNoXGfehyUbo3j/mKtlwlWWdqKOaDv8Ck0w/HmRw4jJbaxuir7ZVQHS80CWFn9nrTbbjriW20lSlHIAUbbJtyyxJb1HcgSngzGY6EaS/FeQ8yspWk5gisN4kj3ePsTuQfSOrQfDWI8EsyguTASG3t8t/FVT7D0d1bTrZQtJyKTTzrpaS2VkoBzA63hJwpw9CA8Toawq6X63WxBL7w1vAgb9XXHk6QVIiJ2FHD8an5UmQsredWsnfJPTQ7tcYSgpiStPkz3Kk4wXcLRIhy0AOEDVWKHSDfFJ3h1m4dtrx86TffrrCncvYPmyL7odcxtg5S1OXO3tEqOZfZT7ae/NI3dF/0zfR0bd0Dnqi/aT1o7xpz84v5R6OjjuePrTn2CloQ4hSFpCkqBBBGYINYvwk7Z3jJjgqhrVuHwtk/FPXLRaJl2lpjxkZnfWr4qE8Jqy2eJZ4CIrA3BurWd9auE9HFGG417h5HJEhsEsu/5HyGp0CXAkuRpTRbcRvg/aO8dFn/AKz/ANP/AOfeF47cYZ9de+7Od5Yi
7n7z6hI92agfAYnoUez1zKsV4eRdIhcbSBIbGaTw+Sp8APpWy6ChxBOqeA1ZLzItUosvA6meS0/5iv8AhpcbwLZcFXqzuW1/NOZYWepVwdZ0XW1iVcJslxIJjpRqededY/tjiJqZyRmhwAKPAQOjFlPxH0PMrKVpOYIrDWJWLswELIRISOqTw+UViDDUO7tFWQQ+B1Lg+w1dbXMt8hTEhspUN4+AjhFaqhWR6ABNBrhNbEK2IVsQrYhWxCrfjS5QYjUZttspQMhnX8oN2/omqfx5e3W1ISW0Z+ECnn3n3C464pajvknrw3xSd4dZuHba8fOk3366wp3L2D5si+6HXcU4DanF2Zbsm3zura3kL/0NSYsiI8tmQyttxO+lQyI760jd0X/TN9HRt3QOeqL9pPWjvGnPzi/lHo6OO54+tOfYOg42262ttxCVoUMlJUMwQaxNgF+MVyrWC4zvqY31o+TwiiCCQRkR1nD+FLlenEqQjY42fVPq3vMnhNWeyQLPFDEVvLwrWeyWeEnpb9hy33tjUkJKXE/m3k9kmr5hq52Vw7O3rMk9S8nsT/oe8NFm9ef8D/z7wvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2eumsb4aUQbjGb9KkfbVwgiWgEbjqOxPD5DWHr8uC8Y8nPYyclDxTTrUeXGKF5LaWncNXa1PW2RqndaV2C+saLrk1GucuMtQG2EIy86KucKLPiuRnEAoUKvlmkWmYtlwZpO6hXCOjGkvxX0PMrKVpOYIrC+KI11Qlt5QQ+kdUnxqvVng3dgtOt+DqVjfBq92GZaJBQ6nNsnqHBvGo8hcdwOJCSR4CMwaMh92SreOso7gGQFJTkO+Bvik7w6zcO214+dJvv11hTuXsHzZF90OvXSy227NBuZHSvLsVbyk+Yirro0mNkrt0lLqP6NzqVVNs11gqWJMF5vV31FJ1frG53xpG7ov8Apm+jo27oHPVF+0nrR3jTn5xfyj0dHHc8
fWnPsHSXvCNovAK3Gtiey3Hm8gfp4aumj6+RCtUYJlNDwo3F/smn40iOvUfZcbV4q0lJ/j0iUqWoJSkkneAGZNWzBmILjkpEQtI8d7qBVn0eWuEQ7NXtpwHMAjJsfRSUpSkJSAABkANwDp1oQ4goWkKSRkQRmDV40dWyWVOQXDFcJJKd9urjgvEMAayoheR47PV/w36cbcaWUOIUlQ30qGRHXdFu9ePOx/594Xjtxhn1177s53liLufvPqEj3ZqB8BiehR7PXnEJcSUqAIIyINYvwoYTi5cRObJOa0j4tXGBs6dkbADqf+4VhvEBjqEWSTqZ5bvxTUqKxMjlp0BSFDcP+Yq521+2yC24M0HsF+A9PHkPRn23mllK0KBSRWEMTs3yCnWUBJbADiKvdmjXaIpl0ZKHYL8INXK3SbdKXHfQQQdw+AjosvOsOodaWULScwRWFcZNTkCNJKUSN4E7y6nwI1wjLYkNhSFCsSw3bXc3oCFa+R6kjfINSMOps9kjPPDOVJIJ/VTwd8jfFJ3h1m4dtrx86TffrrCncvYPmyL7od4vWSzvkl23RlnhLaaXhTDizmbVH+hOr9lLwhhpe/a2fozFHA+Fjv20fvHP9a/EXCvFv/2u/wC6vxFwrxb/APa7/uo4Ewrxd/8Aa7/uoYEwrxef3rn+6vxFwrxb/wDa7/ur8RsLcWj965/uoYJwvxan9tf+tDBmGOLG/wBpdJwlhtO9a2PpBPW37fAkL13ojDisstZbaVH+Nfga0cWxP3KK/A1o4tifuUUxAgx167ERhtWWWshCUnL6Ot/ge0cWxf3SK/A1o4tifuUV+BrRxbE/coplhhhGoy0htOeeqhISP4dM8wy+goeaQtPiqAUP40/hLDcgZLtbA+QC37GVHAWFifgKh5nXP9aZwZhhlQUi2Nn5alrH1KJqNb4ET4PEZa8qEBPXX4sWSkJfYbcHAtIV9tO4Ww66MlWqN9CNX2aGC8MZ9rEftL/1o4Kw
ud+2I+hax/nX4i4V4tH71z/dX4i4V4t/+13/AHV+IuFeLf8A7Xf91fiJhXi3/wC13/dX4i4V4t/+13/dX4jYV4tH71z/AHUMEYW4tT+8c/1oYLwxxYj9tf8ArQwfhob1ra/jUG1263hwQ4rbIXlragyzy7wvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2evvNNuoUhaQoKGRBrFeFV29xUqMkmOo7o8SrjA1832dxwb48asM4h1QIklXU7yVHfSamwo82OWXkgpI3DweUVcrc/bny25upPYL4R09pusu1TWpUdZCkndHgIrDt/iXyCh9ogLAycR4UmsQ2CPeIpSQEvJGaF1NhSIMlxh9BStJ6KVKSoKSSCN0EVF0gTottW04xszyU5Icz+2rDs16xTHXKOutbuuqtIjB2nEcA6lK8u+Rvik7w6zcO214+dJvv11hTuXsHzZF90P6muSorfZyGk+dQFNyGHfzbyFfJUD3/eO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs94PModbU24gFKhkQaxVhdy2uqkMJJjKP7NXCAcy+wOqHZJ4aw1iILCYkpXkQs/YamwmJrCmXk5g7x4KuVsftz+xujNB7BfgPT2G+zLLORIYUcvjo8ChVlvUO8QkSY698dUnwpNYjw6xd45IAS+kdQupcR+G+th9BStJyI6TCymY2IITyshmrVJ89Xu2ouduejnfIzSeA1LiPw5DjDyClaDkQe+Bvik7w6zcO214+dJvv11hTuXsHzZF90Oty30xokh9W800tZ8yRnWzSpUnddWpx1zh31KNRWEx4rDCexbbSgeZIy63KmRIbJelSG2WxvrWoJH8ah3KBOZL0SU0+3nlrNqChn1ifeLVbigTZ7DBV2IcWEk026262lxtaVoUAUqScwQfCCO95lwgW9rZJcpphGeWs4oJFRJkSYyl6LIbebO8tCgofw7xxTpEttlLkWKBJljMFIPUNn9Y1dsZ4juql7NPcQ
2r/ktHUQBTcSY8krRHdWPGCSRQLjStwqSoHzEVY9IeIbU4kOyFS2N4tvEk/Qqor+2IzD+oU7I2leqd8awzyPWMYTDCwxd3wspUI6kpPlX1ArDjL02/WuPrLIXKbzGfgBzPSE5AmrlcH5lxmSS6rN59a9/wAY51hqJtPD9qY3c0xWyr5ShmejepogWifLyz2GOtYHCQKjCVLlMsIcUXHnUoTunfWcqYaSyy00neQgJHmAy6zeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs94yY7T7S2nUhSFDIg1ijDLtqfLrSSqMs7h8Wp8FSFGQwPKpIrDeIkvJTFlLyUNxCzUyGxMYUw+nNJ3jwVc7W/bXy2vdQewXwjp8OYil2Oal1pRLZP5RvwEVabtDu0NEmM4ClQ3R4QaxNhpi7MFaAEyEjqVcPkNSYz8V9bLyClaTkQeiFFKgoHIg5isLYqYnsojSVhMhIy+XV8w3Cu7eaxqugdS4KuGDbxDUdVrZUeBSaNruQ34bv7Jr8GXH9Ee/ZNfgy4/oj37Jr8GXH9Ee/ZNfgy4/oj37Jr8GXH9Ee/ZNfgy4/oj37Jr8GXH9Ee/ZNG23D9Ee/ZNKStCtVSSDwHro3xSd4dZuHba8fOk3366wp3L2D5si+6HW9IU1UTCdxKTkp0Ja/eHI1gqGmZim0tKGaQ+HD/hjX65pRlz3cSKYe1gw00jYB4CCMyqtENvnIXcJqgtMZxtKEcC1A9LivGUHDW1UvMLecezIQggZJTVjugu1rizwwtkPJKkoUQSBnl0LzKnS7rMdm6wfU8rXSrfSQex+itHdvnQMMR25YUla3FrShW+hCt4d76RJU5/FM5EnWCWiEMpO8EVolgTo1vuEl4LSy+tGwpPh1Qc194aRMbrt6VWq3O5SVp/LOjfaSfAPKaw3hq44imlpjqW0nN59W8gH7TVhwPYLMhBRGS8+BuvugKV9HBQAAyAqfZrXcWS1MhMvJPjJGY8xq+6KgmYw
9a1kx1vJDzKjutoJ3Sk0kBIAAyAGQ6xpamFmwRo4Vls8kZjhSgZ1oshh/FAdKcxHjuL8xPUdJi6YYWGbu+lWqoRlpSeAr6kVZ4YnXaBFPYvSG0K8xO7QAAyHR0mz9qYVkNjspLiGh7RrAcAzsVW1HxW1l1XmbGfWrx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nvKVGZksuMuoCkKGRBrE2G3bS+VIBVHWepVweQ1PhKZUZDAOWeakj7RWHMRIfSiLJXkreQs1LiMymVMvpBSf4VdbS/bX8ldU0T1C+nwziWXYpqXEEqZUcnG6tdziXSG3JjOBSFD6qxNhlm7MFxsBMhI6lXD5DUiM9FeWy8gpWk5EHopUpCgpKiCN4irRjqdESlqUnZmx4fjComNrI+BrOls8ChQxHYlDPbbVfjDYv0tqvxhsX6W1X4w2L9Lar8YbF+ltV+MNi/S2q/GGxfpbVfjDYv0tqvxgsX6W1V6bwtdGiDJZbd+KtNSWNgfca1wsJOQUN49cG+KTvDrNw7bXj50m+/XWFO5ewfNkX3Q63pgmlMG1wwdxx5bp/uDIe1WiKGHb3OkkfmY2Q87h6D77EdtTjzqG0DfUshIH0mpWPsIxV6i7q2o/8AtpU4PrQDVuxdhu5FKYt0ZUtRyCFEoUfoXl0k7E+H7eVplXOO2pO+jWzX+yMzTekbBy1BIumXnacA9mod/sk4hMW5RnVHeSlwFX1dCVeMKPK1JU63LKCRk4tslJHnplTSmm1NFJbKQUFPYlJ3ssqkSY8VpTsh5tpsb61qCQPpNO6QsHtOls3RJPCltak/WBVuvNquaCqFNZf4QhQJHnFfjDh9pSkuXaGlaSQUl5IIIrFl7Ve75Kl/8rPUZHA2neq03rDsG1wYhvMHNlhCD+WRvpFbdhmLtvbLW19XW2XWGplw50i5YUky2yiVbnJClAIIU2pZJ3gOjcMU4etxWJV0YQpO+gK1l/UnM1Fx/hGS5qIuqEn/
ANxK2x9agKZeZfbS6y4hxChmlSSCD5iOjKlxYjRdkvttNjfWtQSPrNL0h4PQ7sZugJ4Q24U/WBVvu1suSCuFMZfA39RQJHn6EmVGitF2Q+202N9a1BI+s1I0hYQYcLarqlR4UIWsfWkVbsQWW6fArgw8cs9UKyUB5Und6Eu522AUJlTWGCvPV2RYRnlwZ1EnQpranIslp5AVkVNrCgDwZincb4UiytrO3RvZN45BSkjzqAIoYnw5xzC/fIptxDjaHG1hSFJCkqBzBB3iOhMudug6m25jDGvnq7IsIzy4M6iXe1zSsRZzDxQM1BtYVkPLlT95whIUlT8+2OKG8VrbURQyyGW90J1+sttzEy4R2SB2KljW+qmtImD3HNQXQA8Km3Ej6yKiTYc1rZYslp5GeWs2oKH8OhKmRIbWyypDTKPGcUEj+NPaQ8HsuFs3RJPChtax9YFW6+Wi6fAZ7L5yzISrqh5x0CQKl42wpAVqvXVor4GwXfYBq24sw7c1JREubK1neQSULP0LyPRxJeG7LZZc5WWaEZNpPxlncAppubd7mlAJckynt8+FSzvmrDZIditjMRgdiM1q8K1nfUellzYcJsOSpLTKCrVCnFBIz4MzUO82ma4Wok+O8sJzKG3AogcOQq54sw7a1FMu5NJWDkUJzWsecJzNWvFmHrssIh3Fpbh3mzmhZ8wVl0LhjXC9uXqSLo1r55FKM3CPPqA1asRWS7/AZ7TqssygHJY86Tkehpcl694gRAdxmMV/S4a0U7TgW26XCW80yhx5DSVuKCR1Azp/SFhBl0tquqSeFDa1j6wKt16tNzBMKcy/kMyEKzI846GlmaWcPMRwr4RJSD5UoBVWjKEJWK461bzDTjv8NXpNME/NVrgg+O8v2RWiGAXLncZx3mWA2PO4f9E9avHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2e85sJiWwth9AUhQyIrEeHH7RIO4VMKPULqdCUwsvsdjnmpI8H
lFYdxEmQhEaSvq95Cz4akxmZLKmXkBSSKu9nftrueRUyo9Svp8MYnl2KYFJJUwo/lG6tlziXOI3JjOBSFD6qxPhhq6sl1oBMlI3D41SYz8V5bLzZStJyIPTbtbtbtbtbtbtbtbtbvXRvik7w6zcO214+dJvv11hTuXsHzZF90Ot6VZhfxMGQrMR4yE5eVWa60SQw1Y5ckpyL8nf4UoFYpxNDw7b9mWNd1e4y0DkVmrjd79iWckPLdfcUr8mygHVT8lIprRni1xorMRtH6qnU51c7VcbTKMabHUy6BnkfCOEEVowxRKuLL9tmOFx1hAW04d8o3iDTzzTDTjrq0obQkqUpRyAA8JrFekOfcnHItucXHh72sNxx2rLgHEd4bS+2wllle84+SnOrpovvFugSZi50NSGG1OLGawck1CjrkzYrDfZuvIQnzqOVTpDcG2yZDh/Jx2FLV5QgZ0229LlobSM3HnQkeVSzUyXFsVkU86cmokcDz6oyAHnq53a9YquqE5LcW4vJiOjsUeb/ADNHRdisMhzYo+f9Hso1q0dYduttxBOXNhuMqaiFKSreJWfAav2Br/a4ki5TTH1AsFWq5molaqtVslXWexCihJddJCczkNwZkmv5KsU//wBT97WMwLJo+Yt6lDZChiOMt4kbqq0ewVTMWW7czSyVPK8yBTrrbLa3HVpQhCSpSlHIADwmsWaQJ1yddjW51TEMHLWTuLd/0FWvBWJbqyl+NAVsSt5ayEA/XU7AGK4TS3V24rQnfLSgv+ArRBGkhN2eWtYbCkNhsk5a++Tl0L3do1mtcma92LSMwnxlHcA+k1OuF9xXdkg67zriiGmU9igeSl6LsVpZDgaYJ8QO9VWjLDt0t17uTk6I4wWmA2Aobiis57hrGGLI2HIAVkFyXcww1/5HyCnpGIsV3Ld2aW+reQnsUD7Eiv5McWbDsm12c/E2Ua1ET7XOIOyR5LC/MpKhWD74b5YYstZBeGaHwPHTWmFw
GfaW+BhxX1mrVfLo3ZnrHbmnC7Lkla1N5lRTqgagApzAWLm0a5tDpHkUhR+oGrpAct1wlQ3OzZcKD5xWCntmwpZlcEYI/Y6mlKSlJUogADMk7gArGWIHb/e3HUFRYbOxR0eTh86qtFobwngm4yngBLcjKW4eBShkhFWeEqfdYERO+9IbR9BNAACsb6RX9mdt1nd1EIzS7JG+TwIq14bxDfS49FiOvDPNTyzkCflK3zUjRxi5hBVtAOZDPJDiSa0XwZqcUupXszOwR1qdbOaMz2IChWMcYMYdiBDQS5MdB2Js7w/XVWWIsVXE5B6W+f2UD7Eil6McWJZ2Ta7JPiB0a1NOz7XOC0KcYksL8ykqG+DWGLyLzYoU9WqFrRk6BvBaTkqsdYyk3KY9AiPFEJpRQdU/niN8nyVb9G+KJ0ZL4YbZSpIUkOr1VEGouB8RQ73bG5cBexrlNguIIWjIKzOZHR0v3Mldutqd4Avr9lNaJrVti8yZ6gCmK1kn5bvQeeZYbU486htCd9SiEgecmvw7ZONYf75Ffh2ycaw/3yKjy4kpJVHkNOpByJbWFAH6K0wzDnaYYV47qk/wFWmbdo7jzVtU6HZCNiOxDNZTnnkMt2k6N8XLYU8YSQd/ULidc0C/GfBBW262vypUlST/AAIq44xxRidMa2xGnB+TSlxDPZOq3ipR8CalaPMUxYTkt2GnUQkqWkOJKwBUCdJgTGJcdwodaWFJINRn0SI7L6OxcbSseZQzrHMvbeK7s5rZhL2xj/DARVpwliS8soVFhOFgHqVrOojd4M6m6MsUxGC8GmHshmUNLzV9RAqHMmW6W3IjOrZfaVuEbhBHgNYZvCb1ZIU7cC1oycA3gtO4RWlyVndbfEB3Go5X9LhrD+Jbhh9996ElkrdQEEuJ1shX8q2KeCJ+6NfyrYp4In7o1/KtingifujV+v8APv0xMqaW9dLYbAQNUZAk1oogFjDrsk78mSoj5KOp61eO3GGfXXvu
zneWIu5+8+oSPdmoHwGJ6FHs96T4MadHcjvoCkKFYhw+/aZKkKGsyrsF1NhLjL2djPU3yB8U1h3ESZCERpKxr7yF0+w0+0tp5AUhW+KvNletzhWgFTCjuK4OnwtiiXYpYIJUws/lG6ttzh3OKiRGcCkKH1VfMOQrs0ddIQ6OxcFXfD9xtbhDzZKPA4N495MxpL5AaaWrzCoWDb3KyJZ2NJ8K6i6Ov0iX9CRV5wxbbVZJbrSSpzIdUrpRvik7w6zcO214+dJvv11hTuXsHzZF90Ot4lmGbf7pIKs9eSvI/qpOQrBsRMHCtpby1f8Ahw4rzudXWMr4u9X6XIC82UKLbHyE1o7wwzarS1MdaG3JSAtRO+hB3kjoaX4zRtFukH84iXqDzLQSfZrRYXPxrRq721ndetKuIHEbBZ2VFIUkOv5H9lNaNcKtXaY7PloCo8ZQCUHeW50NJswRsJyUa2RfdbaHtGtHsMysW23qc0tKU6ryBArSLPTDwnPGfVP6rKP7xrAsAzsVWtvwId2VXmbGtWlUuDCuSd4y2gusDXyFZL+3KmIJaU2psrAzLZV8aodwgzmEvxZLbzat5SFA9DS7NS3aIETPq3pBX/dbFaKIKn8RuycupjxlH6V9SOhphnJztMIHdGu8v2RWiCCVzbnNO820hoedZzrSve1x2ItpZXkXk7I/8gHIJrRvhdm8XFyVKQFRouXUHeWs7w6LbDDSnVNtISXFayyBkVKyyzPQ0tKeGHIwR2Bmo1/2VVgG/wACx3svzU/knWS1sgGZbzIOdRZ0OYwl+NIbdbVvKQoEUSEgknIAZk1iW9O3q8ypiydQq1Wk+K2neFYSveCbBammRcmi+tIU+5qKzK6/H/CPGqP2VVpCudsud/21AeS42qOgLWARmoVojSoYelk7xmq9hNaT5xlYqeb8EZltoe2farRRYmmrc9dXEguvrKG/IhHQ0lxBHxbMUN55Dbv1pyrRhLD+E47fhYedb/jr/wCd
aUMSGBbU2theT8tJ2TyNVo2w1t+ebnIRnHiq6gHeW7/+taVJwj4ZDHxpMhCPoT1daM4CpeK4znxYza3leyParSPf3LTYS2wrJ+WrYkEHIpTvqUKwdh/8P3tmKs5MoBceP6iaYYZjstsstpQ2hIShCRkAB0HkxI5emrQhKktHXdyAOondyJ4BV8uz94usqc7ubIvqU+BCBvJFYZv+B7Da2orNzbK8gXnNRWa11+P+EeNUfsqrHk+23HEciVAcStpbbeagMs1AZVo9D7eBJS0ZlZVJU39VRXksymHlthwIcSpSDvKCTnkaseJ7NemErhyUa+QKmVHJaPOOk0lSlv4umpO8yhptP7IVWiBoCzXJ3xpYT+ygdDSYZS8NmNGjOvLffQkhtBWQlPVV+A71xXM/crpaFtrUhaClaSQpJGRBHgIrRnFREwow5l1ch1x1XsitJcwycWSkZ5hhttoe1Wiy1xmLBt8sI2d91z8r4dRJyy6GJX2n8Q3d1rsFzXik8I1jWArPGtuHIK0sBD8hlLry/jK1t0VNebZhyXXOwQ0tSvMBSEKWtKEjMqIA85oBFttIBUAiLF3T5G00pTsmSpRzU465n5SpRqFHTFhRY6RklplCAPIkZdDH8ViLi26NsjJJWhZHlWgKNaKAsYZcJ3jLXlWO5hl4suy9bMId2If4YCawpo5tF1sMSdLdkpdeCjklQAyCiBR0TYc/SJn7aaOibDn6RM/bTS9FGG0JKjImZAeOmn9i2Z3Ys9j1zqZ7p1c9zOsKQPwfh21xiMlCOlS/lL6o9avHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2e9bjbo9wirYfQClX8DV+sUi0yVNOJzbV2C/ARUyEuKsvM/m88yB8WsO4iTIQiNKX1e8hdONodbU24kKQoZEGr1YnLesutAqjk/s9Ph/ElwscgLYWS2T1bZ3jWH8WWu9No2N0Id+M2rfqQ0w+2W1NhSDvg+GrrgGHJ1nIRLS/F301
cMMXeCTrxypPjJ3RRBSciCD1yLbJ8sgMRnF+UCoGAbm/kX1paH1moOBrPGAU9m6ocO9Tlyw7aEEF6O1l8UZZ0dI+HtmDSHFk+AkZCl4ldfUhLKAEqI6qsUMOv2CQltJJ1Aa3ukQCpSQBmSaRvdZuHba8fOk3366wp3L2D5si+6HWrzI2jZ7hKzyLMZxY84FQY6pc6LHG+88hH7ZyrEkn8H4bubzQCS1EWEeQkZCrdG23cIUYnLZn22/21AUkBIAAyAGQ6Gl+4oKrZb0rzUNZ5af4JrRBb3DNuU8o6hDIZSryqIUaxTO2/iK6yPAqSsJ+Sg6orAUIQ8KWxOQzdb2Y+dw59DTDNGdphhfjuqT/AAFaH4ZVOuksp3EMoaB+Wc60wTgI1rhDfU4t1XmSMhWiKAXLtPm/FZYCPpdNXS3xLlAfhymwtp1ORH2EeUViDRnercpx2EDMjjxfzoHlTVru9xtEtMiG+tpxJ3QN5Q4FDwisP3RN2s0GeEamzNZlPAoHI1panJfv0aKk/B4wz+Us51ohglu2XGYR+efDafM2OhpMnCViuShO9HbQ1/DWNaK4Co2GdnVvyX1rHmT1FY+kqkYtupJJCHA2PMhIFaMWG2cJRlgAF511aj5lavS3e1Q7tb34UtGs04PpB8BHlFX/AEbXy2FbsVG3I4zOaOzA8qas97uVllpkwn1IUCNZPxVjgUKvN5EvAEu4tAo2eDvcBX1Bq1W1+63GNBYKA68rJJWchvZ1/JNiT+nhftq/21/JNiT+nhftq/21/JNiT+nhftq/21hWzrsdgiQnSguNhZcKd4qUomr5NVPvNxlk57LIWoebPcrCsFMDDtqjgZERkKV8pY1lfxPQ0vwyi622V4HY6kfS2a0W3KPCw7enX16rcd/ZV+Yop9y4YrxGSlP5WU7kgeBCB/kkVZ7VGtFtjQY6ckNIAz8Y+FR85rS9MQZtsgp322VOr/vnIezWh6CrO6ziNzqGU+0a0uSVLv0N
jPqWogI861GtD0ZAhXaTl1SnkN/QkZ9HSBIWxhG6KScipCUfQtQTVmtMm8XJiBHUhLrutkVnJPUpKq/kmxJ/Twv21f7a/kmxJ/Twv21f7a/kmxJ/Twv21f7aw3aVWmxQYDmqVNN5Ly3iokqNYq0XuuPvTLMUZLJUqKep/YNPx7ha5pbeQ7HkNKB8KVJPgIrRziiVe7e+zMJXIilILvjoVvE9HSNHcZxfcSoZBwNrR5QUAVofmtGJdIRUAsOpdA4QoZdF51LLLrijklCCo+YDOpL7kmS8+s5rdcUtR4So5mrNERAtFvijcDMZtB84G6au0szbpOlFWezSHF5+RSs6w1D2lYLXGKdUojI1h+sRmau0pEG1zpSjklmOtf7IzqMw7LlsMNjNx51KE+dZypltLTTbad5CQkeYDKsezzBwpc1jsnEBkf4h1TWEIO38S2pg9js4WrzN9Wa0gTDEwnclBWRcQGh5dkORrBcPbmKbQ1q5gSA4fM31fQWtDaFLWoJSkEqJ3gBV+uJud5nzMyQ8+oo+TvJ/hWG4RsmFIjTg1FMxlOvZ+BRzWqn3XJD7rqzmtxZUo8JUc6tMVEK1QYqRklmO2j9kZdHFU82/Dt0kg5KTHWEfKX1Iq0wjPukGGP8AnyG28+AKORNAAAAbw61eO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs97XW1xrjFXHfSCCNw+EGr3ZZFqlLYeTmg9irwKFTIa4i9mZzLZO6B8WsO4iQ+ERZK8lbyF0tCVJKFpBSRug1fLAuGVSI4KmDvjwpoHMdMy88w4lxpxSFDeIORqxaS58QIano2dsfH+NVpxdZbkgBiUgKO+lW4a6had8EGpmHrTNz2aKjPhAyNS9HttWSWH1oqTo9uKCdheQsU/g++tf/wAbW81LsF5RvwXv2SaNpugO7Bkfu1V+DLl+gyP3aqFruZ3oMj92qm7BeXOxgvfSkio2Cb2/lrNBseU1E0dIGRkyj5kVFwtY
IAClNIJHxlmp2LMN2sFOzt5j4rYq5aVDupgxP7y6uOLr9cCrZZi0pPxU7lLW44c1rUo+U51lVjvkqBKZSpeuyVjWSfBTKkPMNqGRSpANSsDWSS6XS3qk7+rX8n1j4FV/J9Y+BVfye2PgVUPBtmgvh1trWWN4q8FAZdZuHba8fOk3366wp3L2D5si+6HWtJ8va+FH0BWRfebaHtn2a0dw9tYtt+acwzrun+6KxXCdnYcusdoZrXGVqjhKd0CmHnI77TzZyW2tK0ngKTmKw/iO13uG07FfRshT1bJI10Hyir7iuy2Rha5MpBdA6lhBBcVVwm3HEd7W9sZW/IcCW207uQ3gkeasKWBuw2aPD3C72byh4XFb9XFh2PPlsOg67b60q84NYFxRapdhgRVy2m5MdoMqaWoJOSBkCM6u2MMPWppan57Slp/5TZC1k+YVizEKsQ3dc3YdjQEBttOeZ1U1otimNhgvHfkSFrHmT1FaUZyZOKFsp3ozCGz5z1daJoBYw+/KVvyZJI+SgZVAx5YZVxmQXHtrusvrbGykBLmqcs0mnpDDDKnnXUIbSM1LUQEgViSbGn3+5SoyQGnX1FGQyzHD9NYRgO27DdriujJxDGaxwFZKiKxtI2xiu8L8WQW/3fUVo4Q0jCFv1FA5lwr8iis0SACTV3mCfdZ0sbz0ha0+ZRzFYbgqgWC1xVDJTcZAX8ojM1jqMuNiu7JUD1b2yDzLGdaMsU21FrTapT6GXmnFFrXOQWlZzqTPgxW9kkS2WkeMtYSP41+P1mfvES2QCZTrzoQVp3G0jfJz6Npx3Yp0uTDW8I7zTy2wHCAHMlZApNSJMeMwt995DbSBmpajkAKvcpmderhJjIybekrU2MstxRqfZn2NGzlvIzdbgAqA8ZJDhFWi4LtlzhzUDMsOpXlwgb4qz3q2XeIiRCkocSQCpIPVIJ8ChUmZEhtFyTIbZQN9S1BI/jTePbNKvMS1wCqS465kp1O42kAEmsRz
lQLDdJSDktuMso+URkKtMMTrpBineekNoPmUcjQAAAAyA6Gl9jWtNtf8SUU/tppi5y2LfMgtryZkrbU7wnYs8h5t2tF+GNpQjdpLeT8hOTP6rXQ0hT0zcV3BSDmhopZH9wZGtGcAxMKx1kZKkOLdPsitLMZbeIY7+R1HYicj5UE1owxNBtjsuBNeS0h9QW24o5JCgMiDS5kRDWzLkNJbyz1ysBP11d9ImH4BDUZ3bj6txKGTmnM8K60gxnJOEbmlCSSlKHPoQoKNYfuv4IvUGfqlQZdzUBvlJ3FVabpbrnETIhSUOoIGZSd1JPgUPAalzoUJvZJUlplHjOKCR/GouO7RPvbFrgBT5WVa728hISCavGM7TZrxGt80qRsrWvs2+lGZyAVUeVGlMpeYeQ62reWhQUD9IrSrdbfNusNmK4hxcdtYeWnhUexrRDbnmrfcJyxkh9xKEeUN9HSzYXHWo13ZSVbENif8id8Kqx3qZZLizNinq0bikneWk76TVm0h4buTILktMV7Iazbx1fqNKxLh1KQo3iFl6ZFYxx/YjaZ8GDKL77zKmwpsdQArcO7WGISZ2IbVGUnNC5SNccKQczWKZe0cOXZ9KtUpirCT5VDVFWSJt28W6NqlQdktpI8hVu9DSXOTFwpKRnkqQtDSfaNYAhKmYstgAzDSy8ryBsZ9DS9PLdtt0If858uK8zYrRNAD9/kylb0aMcvlOHKtMEwJt1riBW64+pwj5Ay/zrRJFDl+lPnL8lFIHnWafkMRmlOvvIbQnfUshIH0mseaQGJjDtrtThU2rcffG4FDxUVo+wqu7XBM6Q3/AMHGWD6RY3k1j6YYmE7ooHIrbDX7whNYVhpm4jtLChmlUpBUOFKTrHpNK84sYcajp35MlKT8lHVVo1gbbxXFWexjoW8foGQ63eO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs973m0RLpGWw6j5KvCDV6skq1yFMPozSexV4FCpkNcVeyt
ZlvPMjwprD2IkvJRGlL3d5C6UAQUqAII3R4DV9w+Y5VJiAls7q0eLQOfTpUpBBSog8Iq3Yuv1vy2KYopHxV9UKg6VpSMhKhpX5Umoekuwv5B3ZGj5RUfFlgkZak5v6TSLjAc7CS2fMqg60rsVpP00CiiU05JjNjNbyB5zUvE9jijN2c15ganaTbKxmGEOOmrhpQurwIisIZH7VTb/d5yiZExxWfgzyFEk756ay4/vNrjpYBS6hPY62+KgaT5j2YkRNXgUDVrx9Gkv7FKBaBPUq8FMuocSFpWFJIzBHXLh22vHzpN9+usKdy9g+bIvuh1rSdaL5dhbGYENx5tBcW5q5b+4BWjLDF0tc24SbhCWwSyltoq8pzPQxfozmGU9NsyErbcJUuNvFB/UpeH780spVapgUP/AGV1bMB4ouJzTAWyjwuP/kxWFMDW7DyS8VbPLIyLxGQT5EDoY30dyLlMcuVrKNmc3XmVHLWPCk0vBWK0O7EbNJz8ic0/WKtGiu8Pq2S5uIiMgZkBQW5UkMiS8GNYtbIrY89/Vz3M6w3CVAsFrirGS24yAscCiMzWIMKYsuN7uUsWh4pdkLKOx7HPIVhW2LteH7bEcGTiGQXBwLV1RFX/AANiaDLecVDXJQtxRDrAK88+EDdFN2LEb5Sym2TlbuQSWl5Vg/Rm/HlNTryEZtkKbjAhW7wr6GO8H3hm+TJsaG4/HkulwFoFZSVbpCgKhYfxQ8sMxrdOGsfEUhP0k5Codsm2rBO0mWSuWiEsagIJLzgJP8TVuwFiZc+Il+1uoaLyA4slOSU57p6GOcFDELTciMtKJjKMk57zifFNTMK4jhOlt61Ssx4UtlaT5inMVEwriOY4G2bTKzPhU2UJ+tWQrBOjuXaZ7NyuLyNlbCtRlG7kVDLMnoKCikhJyOW4avOBsT259ZXCckIKjk6yC4D5wN0U1YMRyVIZRbJqt3IAtrAH11g3Rs7ClNz7xqa7ZzaYBCgDwqPQxVoy
nsyXZNnb2ZhRKixnktHkHCKFkxAw5uWychQ4Glg1Cwdiy6OblukfLfzbH1rrBejw2OYi4TJKXJAQQhtA6hBVWkCLdZuHnIdvirecedQFhPgQk61YGwbe4uJIkq4W9xllkLXmrLsssh0ceWqRdMNSo8Zkuv67a20jhCqw9o9vL92ji5wVsREnXdKiOqA+KMqSkJSEpAAAyAHQm4OxfLmyZKrO9m88tZ3U/GOdWeD+D7VAh55liOhBPlSMjWLMLxcQWzYFr2N1s6zLuWeRq54LxLbXSh22vLHgWykuIP0ppjDeIH1hDdomEk/0KgKw1oyubcyNMui0MpadQ4GQQtaik55GloStCkKAKVAgg+EGsT6MbnFkOv2lsyIxzIaB/KI8nlpNlxAyvqbbOQryNLBqDgrFl0XmLe+nhW/+T9usFYBOH5JmyZQdkqaKAlAyQjOtI2EL9cLoq5RGhIZ2FCdjR2aNWk2XEKCUJts5Oe+A0sVh/Rpe7i425ObMONvkr/OEeRNQoUaDEZixmwhppAShI6Ljbbra23EJWhQIUlQzBB8BFYj0UyQ8t+yrStsn4OtWRT5lGpGGcQxnFIdtEsEcDSlD6xTeHb+6oBFpmk+hXVu0ZYpllBdYbjIO+XVjMDzJrDGj22WF9Exby5EpGeq4epSnMZHIVpEhXSfh/alvjLeW4+jXSnxE7tYDwje4OJI0ufb1stMtuEKVl2RTq9DSdarzdY9tj2+E4+lLi1uFOW4cgBWjTC13tlzmy58RbGTAbb1st0qPQ0kWPEV4vMcw7c67HZjgBQyyKlEk1ozw7Ns8Cc7OjqZffeACFeIgVpDwjiC93FmVCQ2602wEBBWEqzzJO/T2GMSRXCldpmJUPCltSh9aaaw5iea4lCbZNWfBroUB9aqw/ooluOJdvLoaaGR2BtWa1ec1EiRocdqPHaS202nJKE7wFaS7bd7na4UW3xXHv+I13AnwBKa0eYRvEC/7buEBbKGmF6ilZdmr
c6TSbaL/AHeXb2oMB15lltSipOWWus1oywxcrU/cZVwiKZWpCG2gr61dbvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2e+LtaI1ziqZfR8lXhBq9WSTa5KmXkZoPYq8ChUyEuKvZWgdj8I8WsPYiS6lEaUvyIcP2GiPAQCDV+w9qa8qGnqd9bdA59a3a1l+Ma13PHP11sjnjq+utkc8dX11rr8Y1mTv8AWBmd4U1DdXukZCm4bSN0jM00y44oIbbKifABnVqwPdJmqt7Jhvy75qz2Zu1x9iQ6tflUeuXDttePnSb79dYU7l7B82RfdDvTHd5RasOTFZjZX0lloeVdYUtRuuILfF+JsoW58hG6f6sXjtxhn1177s53liLufvPqEj3ZqB8BiehR7PfN2tMS5xlMPpz8VXhSavljk2qSpl5OaD2K/ARUyEuMsutA6hOZHBWHcRBxKIspfkQ4fsPQv2Hs9aXDTu762+vMRpMgqDDK3Mt/VGdKSpCilQII3wenShazklJNNQFHdWcqbYab3k1Dt02asIjsLWfIKtej51Wquc8E/qJq3WK2wEgMR0gj4xGZrLrtw7bXj50m+/XWFO5ewfNkX3Q7xxLefwHZZE9LSXC2UAIJyCipQFQ9LtlcyEqDJZPhKcnBUvSthplrNhMl9fihGp9ZVWJcS3DEU8PyOpQnMMsp3kA1o3wou0QVz5bZTLkjcSd9Df8AVi8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ76ulri3KMth9AIO8fCDV9sUm0yVNOpzbPYL8BFTYK4yi8yDqE5qTwVh3EaVpRFlL8jaz9h6F+w8HgqVETksbq0cNbuZBBBG4QetmsBQbIi1ociKQ46tP5UnfBrGeAky0rnW5IS8BmpvxqdZeYcU282ULG+k9I2w64epTTUBI3VnOkNoTuJTVsw3dbiRsTCgnx1bgq14Ahsaq5iy6rxR2NRocaKgIYZShI8AHeFw7bXj50m+/XWFO
5ewfNkX3Q7xxZhsYitqYZlqY1XQ4CE6wJAIyIp7RHfUqOxzYi08JKk0xoivilgPToiE8I1l1h3R3ZLM4mQvOVITkUrcG4g8KU/1ZvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2e+7pa41xirYfQCCNw+EGr7YZNpkqbdTm2rsF+AipsFUdReZB1N9SeCsOYjS4ERZS/IhZ+w1uir7h9MkKkxU5OgZqT4FUc0kpUCCDkQet2a9zrNJD8VfnT4DWGcVwb7GSUkIfA6ts1i3BMa8tKeYAblDePgVVwtsy3SVRpLRSsfxpuI6vfGQpqG0jdO6aaaWtQQ2gkneAFWzBV1m5KdTsKOFW/VqwZaYISot7K4PjLpDYQAEgADvK4dtrx86TffrrCncvYPmyL7of1tvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2e/LnbYtxjLYfQCkjcPhBq/2CTaZBQ4nWaV2C/AanQFsEvsZlO+pPB5RWHMSJWERpS/Ihdb1XywImgvsAJfG+PAqlpWhakLSUrSciD1uFKmRH0vRHFIcBzBFRtIskW9AdiAyQMirPcq63aXdX9lkkEjeAG9UWBLlrCGGVrPkFWvR/Ic1VznQgeInfq22K2W9IDEdIPjHdJrId6XDttePnSb79dYU7l7B82RfdD+tt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez37cbdGuEZbEhAKT/AAq/2CTaJJSoFTR7BdT7cWyX443N9SB9orDuJRkiNKXubyVnwVwEHzGr1Y2bggutgIkAbh8anmXWHVNOoKVjfB6whlxzsUmmoAG6s5+SkNoTuJTVuw/dLioBmOrV8c7gFWrR/FaCVzXC6rxBuCosGLEQEMMpQPIMu97h22vHzpN9+usKdy9g+bIvuh/W28duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ7+uNujT4y2H0BSVD6qxBh+TaJBBBUyo9Qup9uKSX448qkCsO4lLYTGlKz
b3grwpoEFIUkgg7xFXazx7k1u5JeT2K6lRX4j6mX0ZKH1HpWojrngyFNQmkbp3TTbalEJQkk+AAVasGXWdqrWjYWz4VVa8F2mFkpaNmXwqpDCUJASAkDwAd83DttePnSb79dYU7l7B82RfdD+tt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez3/PgR50dbD7YUhQrEOHpNnkncKmVHqF1PthUS/HGS/jI4fKKw9iVcUhiQSWf4pptaHUJW2oKSRmCKuNsjXFgtujJXxV+EVPt0m3vFt5O58VfgIpKVKOSRnTUFxW6s5Cm4zTe8mosGVLcCI7KlqPgAq16Ppbuqua5sSfFG/Vrw5a7eAGY6c/CtQzNZDvu4dtrx86TffrrCncvYPmyL7of1tvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2f5gnQI82Mth9AUlQrEOHpNnkHcKmFHqF1cLbs2bzAydG+nwKqw4hegr2J3MtZ5KQd8V+EoRZS6l4FKhmKudwZmNFnYQU+AmkNIQMkpFW+w3S4KAYjqyPxjuCrVo+YRqrmulZ8RNRLdEhthEdhDafIO/rh22vHzpN9+usKdy9g+bIvuh/W28duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ/mGdBjzGFsPoCkKFYiw5ItEgqGamFHqF07Djuvh5TY1/tpDajkhCCeAAVa8H3afkot7E34y6tWCrVC1VugvODwqpphtCAEJCUjwAZVl3/cO214+dJvv11hTuXsHzZF90P623jtxhn1177s53liLufvPqEj3ZqB8BiehR7P8xTIbExhbD7YUhQoaOnNur13tWPnmnhIq24btVvSNijgqHx1bpoAAb38xXDttePnSb79dYU7l7B82RfdD+tt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez/Ue4dtrx86TffrrCncvYPmyL7of1tvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2f6jztFeKXJ9w
fbdt2xvTH3kazywcnXCsZgINWSG5AstshulJXHhstLI3iW0BJy/rbeO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/2a3jtxhn1177s53liLufvPqEj3ZqB8BiehR7P9mt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez/ZreO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/2a3jtxhn1177s53liLufvPqEj3ZqB8BiehR7P9mt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez/ZreO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/2a3jtxhn1177s53liLufvPqEj3ZqB8BiehR7P9mt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez/ZreO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs94qlxUK1VSGgrgKgDQIO8f7I7x24wz66992c7yxF3P3n1CR7s1A+AxPQo9nr+LMUxMOQA4sa77mYZaB3zwnyVecWX28uEyZiw3nuMoJS2OhFnzobiXI0p5lY3ihZT9laN7zcrvZX3p8gvOIklAUQAcgkHvG9S5QvFzAkOgCW98Y+Oa0crWvCNvUtRUSp3dPpD0GJ8GQ4ttiWy4tHZJQsKKfOB0y58FD6Y65bCXlbzRWkLPmHe2ld99vEkcIdWkbRb3iR8ddbcl/pDv7Zrbkv9Id/bNbcl/pDv7Zrbkv8ASHf2zVhh3K83WNBakPDXVmtWuepQN8002lppttOeSEhIz4B0+JZUkYjvYD7gAuEgABR/pDWjda14RgqWoklb3vDWkRa0YOuqkKII2H3yagS5RnRAZDv55Hxjw96PvsR2y4+6htA31LUEgfSaZfZfbS4y6hxB3lIIUD9I71xxJkoxZd0pfcADwyAUfFFaJXHHLFOK1qUdun2E/wA73jtxhn1177s53liLufvPqEj3ZqB8BiehR7PX8eXR244nuBUvNDDhYbHAG60a4OgSYYu89lLx
U4RHbVupATuFRFJZZSjUS0gJ8UAZVcsKYeuSCmTbGCfHSnUX9acjVgw/DsEeTHiOOFlx8uALOZGYAy7xvfbm5+uPe2a0bdx9v+U97w1pRdmsYZG1ioIXIQl9Q8Qg1b35kebGdhqWl9LidjKN/WpOeqM9/KiQASTkBvmrPj+xXi5NQIqZOyua2qVIAT1AKuhelSmrPcVxE5vojOFofrhJypbji1qWtalLJzKicyTWBpUx7CtuclqWp0oVkV75QCQnvWTbLbLcDkmDHeWBkFONpWcuDMivwBYuKYX7hFfgCxcUwv3CKuUDDVugSZj9qhBtlsrV+QRVxmbdnSJOxNthxZUG0JCUpHgAArRjhv8AB1rNxfRlIlgFIO+lrrGJu6S+fOMn3hrRp3HwPlve8NaR+4y6/wCB75NQPh8T06Pa700qvzFYl2J1S9hQwgsp8G7vmtE788X55loqMZUdReHgHAe9cd91149MPZFaIe0M/wBePsJ/ne8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ6/iZhcfEV4aVviY6foKiRWi69RJNiTbtcCRGUrNB31IUcwodOq72pK9RVxihXAXUg0haFpCkKCgd4g5jpHpEdhOs8822OFagn7aautseVqtT4yzwJdST0rtztrKtV2dHQeBTiUn+JpmTHfGbLzbg4UKCvsq99ubn6497ZrRt3H2/5T3vDTzLL7S2nW0rQoZKQoZgjyg1Ewzh6DJ2zFtjDboOYWE7o+TwdDHVyTb8L3FeeS3W9hR53NytG3dlbfM97pXRdwlhp6Ttly0Ri7nmTqbhPlFABIAAAAGQHReuNvYOT01hs8C3Ep+2mZ0KR+ZlMufIWFfZ0rrzLKNd11CE8KiAP401c7a8rVanR1q4EuJJ69pVxJsz7dmYX1DRC5HlX4E1gnDqr7e2mlpzjs5OPnwao+L9NJASAAAABkAOitaEJKlqCRwk5CvwzaNbV/CUTPg2ZFIWhaQpCgoHwg5j
o4m7pL584yfeGtGncfA+W97w1pH7jLr/AIHvk1A+HxPTo9rovXO2sK1Xp0dtXApxKT/E0zIjvjNl5twcKFBX2dFSkpBKiABvk1+GLRrav4Si58GyopC0LSFJUFA7xBzHSPPssIK3nUNoG+pRCR9ZpiVFkAlh9t0cKFBX2dNcrNarohKJ0Np8J7HXG6PMat9otdrbKIURphJ39QZZ+c9Fx1ppOs44lCeFRAFJu9pWrVTcYpPAHUmgQQCD0XpDDCdZ55DY4VKCR/Gm7ra3Varc+Ms8CXUk9cx33XXj0w9kVoh7Qz/Xj7CekJAGZpd3tKDku4xUngLqRTMiO+M2Xm3BwpUFfZ0hIFLu9pbVqruMVJ4C6kU1OhPbjUplfyVhX2dItxDaSpawkDwk5CheLSpWqLjFKuAOooEKAIIIPSPyY0ZOs++20nhWoJH8aZkR30a7LyHE8KFBQ/h1l+fBjHJ+Wy0eBawn7aYlRZAzYfbcHChQV9nSKWlCSpSgAN8k5CjebODkblEB9MimpMd78082v5Kgr7O8Lx24wz66992c7yxF3P3n1CR7s1A+AxPQo9nr+kfBUiW6bvbmStzVykNJ3zl8cVHkyYj6HmHVtOoPUrSSlQNWTSxcI4S1dIwkoAA2VvJDlWbEtlvTRXClpWR2TZ6lafOD0L32mufqb3sGtld/pFfXV0xTiG/bFF13NiCAhEZkHJQHCBuqNP4YxFHZLz1olobAzKi0rcqzYgu1lfS7CkrQArNTZOba/lJrCeJI2ILWmQ2nUdR1D7fir6GNdITkJ9222lQDqM0vP7+oeBFH8KXaUVZSJb6vlOrNTLLeIKAuXbpTKfGcaUkfWawvjy62R9tDzq5EPcC2lnMpH6hNRpTEqOzIZWFtuIC0KHhChmKnzotuhvSpDgQ00nWUaxNj+8Xl5aGHVxYm6EtIVkVD9cirfYL1chrQrc+8nxkoOr9dPWzElhdS+uNLiKG86AUj9oU66486464oqWtR
UpXCScya0bdx9v8AlPe8NaSSRhGcQfjte2Kww44cSWQFau2Ef2xWkSHNmYadZhsOuul5shDYJVkDU+z3uC0lydBlMtlWqFOoUkE/TUOLLlyEMRGXHXlZ6qGwSo5DM5AV+LGK+KLh+6XVmaeZwzAbeQpDiIDaVpVuEKCKU67mfyit/hrDZJw7Zfm+P7sVcrjEtcF+XJWENNJzJrEeP71eHVpZeXFi7oS22SCR+uaiWq6TszEgSX/RtqX9gp6NPgPJ2Zh+O6DmNdKm1DyjOsH6R5sN9qHdni9FUcg8rdW35z4RQIIBBzFaXlKTarZkT8KPs1Yr9LstxRNZyWtKFpAWTlmpOVPv3/EMouLEqY7wISpernwBO9UmJLhu7HJjusuD4riShX1GtHONZhnN2m4Pl1t3MMOLOakr8UnrmJr6zYrPJmryKwNVpHjOHeFPvvypDjzqyt11ZUpR3ypVYGw6LHZG0OJAkPZOP+fwJ+jo41xw3YUpiREpcmLGe72LY4TU+63W6vhcuU8+snqQTmBn4o3hSrDfEtbKq1TA345ZXlVrvd1tD4chS3GiFZqQD1KsvGTWC8Xs4jhrC0BuWz+eQN4jwKT0MTd0l8+cZPvDWjTuPgfLe94a0j9xl1/wPfJqB8PienR7XQx7juc7OftlufLLDKihxxByUtY3wDUKy3i4pUuJb5L6RvqQ2VCi3ebNJCy3KhvDeJCmlVAWtyDEWs5qUygk8JIrGOLo2HISckhyU7mGWv8AyV5Ku1/vF7fK5kpxzNWaWh2Cfkpr8Xb/ALCXvwRN2PxthXlVov13ssgOQpK28lZqbPYK+UmsI4ojYgtYfACH2yEPtcCuEeQ1iuHtjDV3bHZCI4pPnQNYVhu5qgX+1yVukIRJRrkneQTkqsWYll4huSykr2q2ohhryeMfKawpbVXC9tQVAp2diQkZ5jdDSik/QRSly4sgpUtaHWnMiM91KkmrLdUXKzwZqQAXmUqIG8FeEdDSzey5
OiWxl05Mp2R4Dx1b1aKLS5Juci5OlRRGRqI8q11pcWtOIYWSj8AR7xdaH1rVOu+aifyLfQxxj/8ABLirdbQlUofnXCMw3UudcrpIC5L70h072sSo+YCnLLeW29kctktKPGLKwKw7iG9WqdGRFmOIbLyQpknNBzPinoY2x+u3vOW21kbOncee3w2eBPlpSrpdpRUdsS31fKcXUyyXmEjXlW2UyjxnGlJH1msMY6u1jebQt1b8TcCmVnPJP6hO9UKXHmRGJMdYW06gLQrhB61jvuuvHph7IrRD2hn+vH2E9JjO6XeZiG6Q1Sn3GkSlobZBOqAk5DqRSML4jcbLibNNKfQrpl+bb5Ou047HfbOWYJQpNaPMXvXyM9FmEGWwAdf+kR0MVYqhYchBaxsj7mYaZByKvKeAVecU3y9ur21LXsajuMIJS2PoqLg3FEtoOM2iQUHeKgEe1lVzsF6tAbXOgusBZyQo7xPnFaPL5eF4lt8NdwfXHWHAptaypOQQT0MbY2aw80iPHQlya4nNKT2KE8Kqn3S7XiQFSpD0hwqOqjdIBPgSkU7h6/Ms7M5aZqG/HLKwKseKLzY3kqiSVbGD1TCiS2r6Kw5fot+tbU1jcz6lxvPMoWN8VpDjF/CVxI7JrUcB+SoVgy9ptGIYsp91QZAWl3zFNX++z7/cXJDpWUAkNNDdDaK0VbIjFC0nMAw3Mx9IrS0tab/EyUfgafaNaHlrVIvOaifybP2q6GllRGGo5BPw9v2F1gNxw4utAK1fnVewehpEWtOL7kAsgfkvdirdi67WyzP26G5sezPlxb2+sAgDJNJtV8nBcpMCa+CSpTobWvPylVRpUyDIDsd5xl1B7JJKVCsBYpXf7YsSMttxyEu/rg7y+hjXHjNh/wCEiJS7NUMyD2LQ4VVPu16vcgbZkvyVqV1De6RmfFSKbwNixxAWmzvgfrZJP1E1Ott0s8lDcth2M9lrJz3DlwgitFN3uk565sy5rz6G22yg
OKKsiSev3jtxhn1177s53liLufvPqEj3ZqB8BiehR7PeF/wJYb2VOLZLEgnMvtbij5xvGr5ozv8Abgt2MkTGR4W+zA8qajyJMOQh5h1bTzas0qSSlSSKwFi83+EtmSQJscDX/XT49XvtLdPU3vYPQwnYLZaLVFMVgBx1lC3HTurUSM+hpSw1GgPx7pFQEIkLKHkD+k3wqtGV0XCxMyxmdjloLSh5QM0msWXVVpw9cJiFZOJb1Wz+us6oqFFfuNwjxkEl2Q8lGZ3d1Z3zVkscCyQW4sRoAADXX8ZavCpVLQhxCkLSFJUMiCMwQaxxZG7LiKVHZQEsLAdZTwJXWie4uSLDIirPwV/JHyVjOtLt3cSYFrQ5klSS+6n+CawHhxF9vQS+nOMwnZHhw8CabbbabS22hKEJACUpGQAHgAFLQlaSlSQpJGRBGYNXdtDd1uLaEhKEynUpSN4AKNaNu4+3/Ke94a0l9yE75bXtisL90tj+cI/vB0NLnc9D9eT7Cq0bd2Vt8z3uldB78y78g0rfNYa7nLJ83x/ditLt4cL8G1NuEICNmdTwknJNYBw01fbxlIGcaOkOOjxuBNNMtMtobabShCQAlKRkAB4ABV1tNvucJyLMYS42oeHfB4QfARV4trtrukyC4c1MulOfCPAa0c3Ry44XjbKsrcjrUwT5Eb38DWmDtTbPWj7NYRtcW7YigQpWtsLilFYByJCElWVRIcWEwhiKwhppAyShAyArSLaWJ+GZjqkDZYo2VtfhGW+Ktjxj3KE8N9uQ2v8AZUD0ky62uCpCZk+NHUoZpDrqUEjyaxr8ZsN8eW7/AOS3/rX4zYb48t3/AMlv/Wo8mNKZQ9HfbdaVnquNqCknI5HIjpdJGIzdbwYbK840MlA4FObyjWjXD237r+EHkZsQ1Ap4FO+DoyX0R47z6+xbbUs+ZIzq5T37jPkzHzm484Vq8mfgHkFaPsKRLZaY055kKmSWwsqUN1CVbyR0NKOGYhgG
8sNhDza0h/IdmlRyBNYOuq7XiO3vgnUU6GnBwocOXQxN3SXz5xk+8NaNO4+B8t73hrSP3GXX/A98moHw+J6dHtUc8jlUgOJfeDmeuFqCs9/POsJXC0yrBB2gtGo2yhCmxvoWBuhQp6Ow+0tp5pDiFDJSVgKBHlBpCEoQlCQAlIAAHgArF13cu2IJ8gr1kBwttcAQg5CtG2FokO1MXR9pK5UlOugkdg2d4DoaWLBGbZjXdhtKFl3Yn8vjZjNJrRfcXYuJkMA9RKaWhY8qRrg1OQFwpSTvKZWD9I6GALDFt2HobxYTtiU2HXF+EhW6kVqIzB1RmN41pLs34OxG4+23kzMTsqeDX3l1ojuwdgTbasnWYXsqPkLp55thl151QShtBUpR3gEjMmrxcXbpdJk1zsnnSoDgHgH0CsH2cWbD8OMfzhTsj3y17pFaXe6GF6gj3i60PfDrv6FusQ3M2qyXCcACplklIO8VHcFLW/KkKWoqcddXmTvlSlGsJYUg2G3NDYkmUtAL7pG7n4o8g6F3wrZLsUuPxUB9BSUvoGqsapzrEtzVarDcZqMtdpk6mfjq3E1GYkXCcywk6z0h4JBV4VLO+asNgt9jgNRYrSQQBsjmXVLV4VE0pKVpKVJBSRkQd0GseWRizYhfYjjJl1AebT4oV4K0ST3H7LMirWSIz/UeRLg6MmVFiMl6TIaZbBAK3FBCRn5TX4zYb48t3/yW/wDWvxmw3x5bv/kt/wCtQ7nbZ+ybTnR5Gplr7E4lzVz3s9UnpMd91149MPZFaIe0M/14+wnpGLdAjuvOsxWkOOrK3FhIClKPhJrMcNaW7XGDUC5tBAWXCy6R4cxmmtGz62sXQgDkHEOIV5tUmiQASaxVenL1e5coqJaCihgHwNp3q0ZYTiohIvMtlK3nSdrhXxEDcz856GmDtVa/WlezWjruxtf+L7pVLWlCFLUcgkEk+QVeLk9dLnLmvHNTzhV5h4B9ArAmFotntMd9bSTM
fbC3XCN1IVuhA6GlWwRoU2LcY6EoEoqS6kDIa6fDWiKe6i6zoOt+TdY2TL9ZBrFwzwxefU3fs6GFbDEtFliMIYSHVNpW8rwqWRWojPPVGfDlWlzugiepp9o1oc+E3r0bP2q6GlruZj+vt+wusBd11o9Kr2D0NI3dhcv8L3YrRbhy1z0y7hLZDy2HghtCt1A3M8+hpatLEa4wZ7SAkyULS4AN9TdaJHlJxFJbBOS4aiR5lCrtcEW22zJqxmGGVLy4chvVNmSJ0x+VIWVuvLKlHymsEYUi2S2tPOtAzHUBTyyN1OfxB0NLnb6F6mPaNaHfhl49C11+8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ7y0s2GKwIl2YbCFuu7E9lvKOWaTWjqU7HxbbwhRAd121jhBSTV77S3T1N72D0LV2sgerNeyOhpSS2cKOlW+JDRRWECRiiy5fpjX21pWUoYZSAdwym86YQ+t1KWErLnxQgEq+jKtrX/APoZ37K62tf/AOhnfsrpy33hw5rhy1HhLazWiONKjs3kPsON5rYy10lPjVpRWpWLXwd5LDQFaHQgC9rO/wDkB7XRvfbm5+uPe2a0bdx9v+U97w1pL7kJ3y2vbFYX7pbH84R/eDoaXO56H68n2FVo27srb5nvdK6D35l35BpW+aw13OWT5vj+7FaSlqVi6aCd5DQH7NaHUI2G8r+Prsj2ujpHCBjC5avA17sVofKvwZdB4BJR7NaYO1Ns9aPs1o67sbX/AIvu1dDGHctevU3KjfCGfSJ+3pNMPbG1err9ro6OO4y1f4/vldJj3En4Esqw0vKVIzbZ8nCqosV+ZJZjsIK3XVhKE8JNYdsrFktEaE1lmhObi8sitZ3yeji9xbeF70pByO03B9YypIBUkHezpsANoA3gkdDGKELwtegve2o4fpAzFRiRIZI3w4nL6+hibukvnzjJ94a0adx8D5b3vDWkfuMuv+B75NQPh8T06Pa6GO9Hst6W
/dLUjZNkJW+x4QrhRTEm52mWVNOPxZDZyOWaFDyEVhnSnKQ61GvIDjZOW2UjJaflCnXUriLcaUFAtFSFA5g7mYI6CI181E6jM3VyGrkleWVbWv8A/Qzv2V0uFe3E6q401Q4ChZrA8C4M4rtLjkR9CQ6c1KQoAZpNSvgz/o1fZ0LF2ktXqbHsDoaTbKJ2HVSW0Euw1bIPkby6wJdvwXiaC4pzVaeVsLvmcrSddzAw4thHZzF7F5kb6q0f2X8K4kjBY/JR/wAu5/c3h0NLvdDC9QR7xdaHvh139C3Wk4qbwlICfjvNA+bPOsNJCsQ2gHe24z7XSaUVLGE3gneL7QVTKXlOoDIWXCepCcyrPyZVta//ANDO/ZXW1r//AEM79ldOW+8OHNcOWo8JbWa0RxpUZ287Ow60FJYy10lOeRV0dJ3chL9Kz7fR0N/+vf8ATf8An0mO+668emHsitEPaGf68fYT0b7eoditr0yQdxG4lI31KO8kVeseYiurjn/FrjsneZZJQAPKRumo2H8TT0pcZt0x1KhmF6qsiPOauVivttYS5OgvstFYSFLHUlVaPO7C1+dz2DV7eVHst0eT2TcN5Y86UE9CzsIj2m3MoACW4rSR9CR0NMHaq1+tK9mtHXdja/8AF90qsULWjDd6UgkEQX/YPQ2tf/6Cd+yutrX/APoZ37K6cg3pwAORZigOFCzWjWDOYxVHW7FebRsLoJUggb1Ys7mbz6m77NDfHR0ud0ET1NPtGtDnwm9ejZ+1XQ0tdzMf19v2F1gLuutHpVewehpG7sLl/he7FaH+1Nz9aHsdDTH8Hsvy3/sTWifuoc9Sc9pNaTH1tYRmBJ/OONIPmKqsbaXb1bG1DMKlsg+YrHR0udvoXqY9o1od+GXj0LXX7x24wz66992c7yxF3P3n1CR7s1A+AxPQo9nr7ONrKLvLtUp0Rn2XSgFZyQvzGgQQCDmD0NLl5YWiFam3ApaHNmdA+LuEJrRrBdlYriOJ
HUR0LdWfo1avfaW6epvewehau1kD1Zr2R0NLl6YU3DtLa83A5s73k3MkitHFuXNxVDWOwjBTy/oGQrH1vVPwrcUI7NtIeT/hnM1Zriu2XWDNTn+QeSsgeFPhH0ioUyNOisyozgW06kKQodGPJjyUFbDyHEhRSSk5jMb4rS5BLV7hy/ivxtX+82a0VXhiFeZEN45CY2kIP66Og44202txxaUISCVKUcgAPCTV2dbdulwdbUFIXJdUlQ8IKiQa0bdx9v8AlPe8NaS+5Cd8tr2xWF+6Wx/OEf3g6Glzueh+vJ9hVaNyBjG2+Z73Sug9+Zd+QaVvmsNdzlk+b4/uxWlm3KYvkaYANSQwB/ebrRbe2LfeX4j6glMxCUpUTkAtG8Og44hptbjiglCQSpROQAHhNYmuiLrfrhNQMkOOnU+QnqRWjC3Kh4XbcWghUl5b30diK0wdqbZ60fZrR13Y2v8Axfdq6GMO5a9epuVG+EM+kT9vWlrShKlrUEpSCSTuAAVjHEKr9e35IJ2BH5NgfqDw+c1opw3rLcvUhG4nNuMPaX0l0ibdtk6L/TR3G/20kU42tpxba0lK0qKVJO4QRuEGsG3xq9WGI8FgvNoDb44Fp6GlC8Mw8PLhhzJ+WoJCf1EnNRrDFuXcr/bYyd4vpUvyIR1SuhibukvnzjJ94a0adx8D5b3vDWkfuMuv+B75NQPh8T06Pa6DL7L7SXWXUONqGaVpIIPmIq7WG03hktToiHOBWWSx5lCr9bU2u8z4KXNdLLxSlXkrR1Jdk4RgF06xRsjY+SlRAq929Vtu8+GQRsL60p+TnuGtHl+j3PD8VjX/AOIiIDTiPInsT0dtRts7W2ZGzahXsefVaoOWeVSvgz/o1fZ0LH2ktXqbPsDoOtIeacaWM0LSUqHCCMjV4tztpu0yEonNh4pB3iRvg1i/Eir69bVf0MNtK+DZVDNZFaL7LtCwGWsZOzVBfmQncT0NLvdDC9QR7xdaHvh139C3
WOIKp2FbqyhBUsNBxIG/m2QuoUpyHMjSmwCtl1DiQeFJzq13GNc4EeZHWFNuoCh5Cd8HyjoSpkWI3skh9DSMwAVkDMnwCsbQFz8LXVhCCpYa10gb+bZC6tc5VuuUOYkZlh5DmW9nqneq3TYs+ExKjOBbTqApJHRjy4soOFh5DgQsoWUHMBQ3SOtY77rrx6YeyK0Q9oZ/rx9hPR0xPrDVmY+IpTyz505CtG9thz8TspkpCkstLdSg7ylJ6Gl15kWCGyXE7IZyFBHhICF1o87sLX53PYNXGOJNvmRzvOsOI/aSRSkqSopUMiDkRWELq1dMPW99CgVJZS24OBaBkehpemxFRrdES8gvpeK1Ng5kDKtHXdja/wDF90qpTCJEZ9hYzS42pCvMoZVJjuRpDzDqcltOKQocBScjWE7/ABrzZIr6FjZUISh9HhC0joolxnH3I6HkKdbAK0A5lIO9mKxZ3M3n1N32aG+OjpdQRfYSvAYg/go1ogltt3W5Rj2TrCVJ/wAM9DS3KjixRYxdTsxmIWG/DqhKgTWAu660elV7B6GkbuwuX+F7sVof7U3P1oex0NMfwey/Lf8AsTWifuoc9Sc9pNaQYapeErklPZNpS6P7igTUCTtSdEk5Z7C8hzL5BzqLJZlxmZDCwpt1AWhXCD0NKk2JKxAylh9DhajhDmqc8lZk5Vod+GXj0LXX7x24wz66992c7yxF3P3n1CR7s1A+AxPQo9nr+P4E2Pia5POx3ENPO6zayOpUMqtuJL7a9UQ7i+2kbyM9ZH7KsxUrSFi6SyWl3IpSd8obQg/WBUePOuMsNstuvvuq3hmpSifCawNhMYetylP6plv5F0+KPAir32lunqb3sHoWfSLiS1MNsB1t9pG4lLySogcAIINTdK+I30FDDUaPmOySkqV/3UyzcLrOCG0uyZLyvKpSifCTWB8KjD1sJfyMt/JTx4OBAogGscYIl2eW9LiMlcBxRUCkZ7Dn8VVWLFd7sRVt
KTk2rfaWNZFHS3iItBIiwgrxtRf+6rpjDEt6OxPzXNRW4GWhqA5+RO/WjqDLg4XjtSmFtLLri9RYyOSjWMMOIxBZ3IwKUvoOuws+BQ/1qXDm22WtiQ04y+0reO4QR4RUPSZiqKwhkvsvBIyCnUZqq6YmxJiFxDD8h10KOSWGk5JJ+Snfp9h2O+6w6gpcbWpC0nwKSciK0bdx9v8AlPe8NaS+5Cd8tr2xWF+6Wx/OEf3g6GkS0u3PDMgMglxhQeSnh1d+oE6Tb5jEuMvUdZWFINL0t4jLYSmLCCvCrUX/ALqd+DuejP2UrfNYa7nLJ83x/disU4eYxBaXYayEuA6zLniLFXS0XG0S1R5jC2nEncPgV5UmrdpHxTBYQyJLbyUjIbMjWNXrG+Ir0zsEmUEsnfaaTqA+esHYKm36U2682puCg5uOHc1/1UU22hptDaEhKEpCUpG8ANwCtMHam2etH2a0dd2Nr/xfdq6GMO5a9epuVG+EM+kT9vWtKOJDBtyLWwvJ+WnNwjfS0P8Ad0GMQXyO0hlm6S220DJKEuqAAr8Z8R8czf3y6/GfEfHM398urfiTEC58NCrvNKVPtggvKyIKuhpEwPIMly7W1krQvdkMoGZCvHFWq83OzydsQZK2V+HgV5FA7ho6VMVFGrrRQfGDVSZV0vU/XeW7JkunIDLMnyACsA4QVY465cwDbjwyy39iRwdDE3dJfPnGT7w1o07j4Hy3veGtI/cZdf8AA98moHw+J6dHtUvsFeY1bcQX2wyXBElOskLOu0oZpz8qVUrSvics6gbhhXjhs5+1TLM+6z9RtC35Mh0nhKlKOZJrDtpTZ7LCgAglpvqyPCtRzUa0i4LeuoTc4CNaU2nJ1vwuIHB5RUOdcbTMD0Z12O+2cj4D5lA/Yaj6WcRtoydYhunxihQ9k1P0k4pmNKbEluOg7+wI1T9ZzNaKYlzXep1xfaeLS4ikbOv46ytJ3zUr4M/6NX2dCx9pLV6mz7A6
Olyz7HMhXRG88nYXPlI3RVhta7td4UFJI2Z0BR4EDdUaabQ00htCQEISEpA8AG4Ohpd7oYXqCPeLrQ98Ou/oW+hjrBUmzzHZcVorguKKgU7uxE/FNWTE97salbRlFCFdk2oBSD9BpzSlixackux0eVLVR5V7vt4iF1yRLd2ZJy3Vaoz3chvAdDHWCJVqlvTobJXBcUVHVGewk+A+SrHii9WJZMGSQg9k0oayD9FHS3iLYshFghfjai/91XTGeJrxk09NWEHc2JkagP7O6a0ZW+bBw2USmFtKclLcSlYyOqQB1rHfddePTD2RUO8XWC2puJPkMIKtYpbcUkE8O5X4z4j45m/vl1ZsR392721ty7TFIXLZSpJeUQQVitJlgkXWzNPxkFbsRZXqAZlSFdllVuuEu2TmZkVzUeaVmk09pYxKtoIQ1DbV4VhBJ/iadjYhvbc26uofkIZTm68d4DPeFWy5SrXPjzYqgHWVZpzGY4CDWBcaXLEc2a1KYYbQyylSQ2Dvk+UmtImDJUSc/dYTJXFeOu6EjMtL/wBDVmxDd7I6pyBKU3rdknIKQrzg1L0kYskslrbiGgRkS22EqqXbbsmIi5S2XQ2+6Upcc33FZZk7u6a0dd2Nr/xfdq6GkbBMiQ+u725krUR/xLSd8kfHFWu8XSzStnhSFsuA5KHgPkUDTWlvEaGylcaEtXjFCx9iquWkPFNwbLZmBhB3wwnU/jv1onhXFlV1lyWHUofDYQ4sEa5BJNYs7mbz6m77NDfHR0nYeeulqZlxmyt6ISSkb6m1b9QZ0u3y2pUV5TTzas0qFOaUsVra1A5HQfHDW7Upq8TmHbrJ2Z1vZA2p9e8VHMgAmsBd11o9Kr2D0NI3dhcv8L3YrQ/2pufrQ9joaY/g9l+W/wDYmtE/dQ56k57SacbQ62ttxIUhSSlSSMwQd8GsX4Rm2Ca6Q2pcJayWXgNwDxVVZcX3+yNlqFLyaJ/NLAWkebOrjjzFVzRsC5pQ
lXxWUhBP0jdq4Wq4W4sCZHUyp5vZEJVuK1ScsyPBWh34ZePRNdfvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2evvsMSGltPNIcbUMlIWApJ84NTNHmEpZKjbg0rhaWpFNaLsJoXmpl9zyKdNWyyWm1JUmDCaYzACikbp853z0L32lunqb3sHoDCOHLpbobku2tKcVHaJcTmhZOqN8ppGjDCSV6xjPKHil1WVWyyWm1JUmDCaY1hkopG6fOeiQCCCMwan4AwpNJUu2pbVwskt/wABTei7CaFZqZkL8inTVtw3YbWQqHb2WlAZa+Wa/wBo5no3Sw2e7pCZ8Jp7IZBRGSh5iKOi7Ceya2wyMvE2U5VasO2S0fAYDTKssisDNZHlUczUjBuGJL7r71qZW66srWo55lSjmTUGBDt8ZEaIylplGeqgbwzOZqdAh3CMuNLZS6yogqQreORzFR8G4YjPtPs2plDrSwtChnmFJOYPRuej7C9xeU8uGWnFHNSmlFGdQtHOE4iwvaJeUP6ZZWKIBBBG5X4jYS4nY/jTDLUdlplpAS22gIQkbwSkZAdCbbLfPZ2GZFaeRwLSDT+jHCTy9ZMZ5ryIdOX8c6g6PsJwiFC3B1XC8oufwO5SUpSkJSAABkAN4dC52a2XVttufFQ+hCtZIVnuGoWFMO2+S3Ki21pp1vPVWM8xmMuhJjMSo7rD7YW04kpWk7xBoYHwmkgi0MAjz9auWGrFdHw/OgNvOhAQFKz7EV+IuEuJ2P41+IuEuJ2P41+IuEuJ2P41+IuEuJ2P403gnCra0LRaGQpJBB3dwjo3PBuGrmtbkm2tlxRzLiM0KJ4SU0jRbhNKwS1IUPFLpq14estpzMGA0ySMioDNRHyjmejKwDhKXJfkv2zWdecU44rZnRmpZzJyCqtlsg2uG3DhM7EwgkpRrFWWsczuqJNXK2wrnCdhzGtkYcy10ZlOeqQobqSDvim9HmDm3ELRa8lJIIOzO/7uhdcL
2G7Eqm29pxeWWyDNK/rTX8luE9fW2KR8nZTlVqw/ZrOk7RhNskjIq31EeVRzPRumF7BdVFc23NOLI7PdSv605GjoswoVZhuSPIHaiYHwpAyLVraUvxnSXPboAAZClJCklJGYIyNfiLhLidj+NNNNstNtNpCUISEpSPAAMgOjcLbAuUcx5sdDzWsFaiuEVbsM2G2SDIhW9pl3VKddOeeR6Nzw5Y7q+h+dAbecSgIClZ5hIOeVWzD9mtK3VwITbCnAAspz3QOgpIUCCAQRkQan6PsJzSVG3BpXCyoo/gNymNGGEmlZqjvO+Rbp/wDHKrfabZbGyiFDaYSd/UTln5+jPwFhScSpdtQ2s/GaJb/gKb0XYTQrMtSF+QumrbhmwWtQXCtrLSwMgvLWX+0rM9bmYRw3NkuyZNsacecOa1nPMmvxFwlxOx/GvxFwlxOx/GmcF4WZdbdbtLKVoUFJUM9wjoXXA2Gbo6p5+CEuqJKnGiUEk1E0a4TjOBZiLe8jrhIpuNGajiO2y2hkJ1Q2EgJA4Mql6NMJyXi6IrjWe+lpwhNWbDlmsiFCBES2VDJaySpSvOT0JeDMLTFqW9aGNYnMlALfsZVDwZheEtK2LSwFJOYKgXCCPlk1phdAhWlrhecV9QrRgwXcXRV/0TLy/rTqdG54Pw3dFrXKtrRcVvuJzQs+cpoaLMKa2epJ82y1b8F4Yt6krYtbOuk5ha83CD5159CRHZksOsPIC23ElK0neIO+K/EbCXE7H8ekumBcMXNxTr8AIdUSS40S2ST4TlUPRthOK4HDEW8RvB1ZUKl2a1zISIT8NtcZBBS1lkkau9kBUPCOG4UlqTGtjTbzZzQsZ5joTcJ4dnyVyZVtadeXlrLOeZyGVWyz2y1NuNwIqGELVrKCc909C6WS1XYNCfEQ+GySjWz3M6t2GbFa5BkQre2y6UFOsnPePQcbbdbU24hKkKBCkqGYIPgIp/AmEn1Zrs7I+QVI9girdhmwWxxL
kO2MNuDeXlmsfSrM1pbWDiKKjghp/io1oca6q9u+RhPtdfvHbjDPrr33ZzvLEXc/efUJHuzUD4DE9Cj2e9L32lunqb3sHoWrtZA9Wa9kf1x2RsL1NdOvlnq57uXD0CQASTkK0iYiYvN6CIruvFjI1EKG8pR7JQrRBbnDKuVwKOoDQYSfKSFHvcOIUpSQtJKTkoA7o6EqXGhx3JEh1LbTaSpSlHIAVia8fhq+TZw1ghxeTYO+EJGQrRVb1xLA9KXvynypPyEdT1+8duMM+uvfdnO8sRdz959Qke7NQPgMT0KPZ70vfaW6epvewehau1kD1Zr2R/XHS8XEXW1rTmP+GVkofKqLizEsRISzd5QTwFZUPqVVwxRiC4tFqXc33Gzvo1tVJ84TViw1dr4+lERg7Hnkt5QIbRVissSyWxiFH7FAzUs761HfUe99ITr7GMp62lrbOTRCkkp+IKj4yxTHSEt3iTkPGVr+1nVxvt4uhG3p77wG8lSupHmG9WFMEXO+vtLW2tmFvreIy1hwIqPHZjMNMMoCG20BCEjeAHX7x24wz66992c7yxF3P3n1CR7s1A+AxPQo9nvR1tDra23EhSFpKVA+EHcIr8SMJ8TR6QhDaEoQMkpAAHAB/XFxpp1BQ42laTvhQBFP4Twy+c3LNDz4Q0E+zUfCmGoxzas8QHhLYV7VIQhCQlCQlI3gBkB3w/FiyU6r8dp1PAtIUP407g/C7qs1WWJ/dbCfZqLhrD8Q5sWmIg+NsSSfrPeN47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez/ZreO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/2a3jtxhn1177s53liLufvPqEj3ZqB8BiehR7P9mt47cYZ9de+7Od5Yi7n7z6hI92agfAYnoUez/ZreO3GGfXXvuzneWIu5+8+oSPdmoHwGJ6FHs/2a3jtxhn1177s53liLufvPqEj3ZqB8BiehR7P9mt47cYZ9de+7Od
5Yi7n7z6hI92agfAYnoUez/ZreO3GGfXXvuznXBGvvGUT/4qudpqPeUuILk+MpAI1kiMpJI4AdkPS3CIJsCZFK9TZ2HGtbLPLXSU50zbsWtNNtpvluyQgJGdvXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1
tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1t
LF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9bSxdx5beT18/W0sXceW3k9fP1tLF3Hlt5PXz9NWi9uXC3yZ91iPNxXFrS2zEUySpbZb3VF1fjf/68T//Z</ImageData>
</EmbeddedImage>
</EmbeddedImages>
<Language>de-AT</Language>
<rd:ReportUnitType>Cm</rd:ReportUnitType>