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 Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 15 # Visual Studio Version 17
VisualStudioVersion = 15.0.27703.2047 VisualStudioVersion = 17.8.34316.72
MinimumVisualStudioVersion = 10.0.40219.1 MinimumVisualStudioVersion = 10.0.40219.1
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPO", "UID\DISPO.vbproj", "{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}" Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPO", "UID\DISPO.vbproj", "{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}"
ProjectSection(ProjectDependencies) = postProject ProjectSection(ProjectDependencies) = postProject
@@ -11,56 +11,136 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPO", "UID\DISPO.vbproj",
EndProject EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPOUpdater", "DISPOUpdater\DISPOUpdater.vbproj", "{F3128F98-87CF-4D7E-8008-43148BD814E1}" Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DISPOUpdater", "DISPOUpdater\DISPOUpdater.vbproj", "{F3128F98-87CF-4D7E-8008-43148BD814E1}"
EndProject 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 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 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 EndProject
Global Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU Debug|Any CPU = Debug|Any CPU
Debug|x64 = Debug|x64
Debug|x86 = Debug|x86 Debug|x86 = Debug|x86
Release|Any CPU = Release|Any CPU Release|Any CPU = Release|Any CPU
Release|x64 = Release|x64
Release|x86 = Release|x86 Release|x86 = Release|x86
EndGlobalSection EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution GlobalSection(ProjectConfigurationPlatforms) = postSolution
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|Any CPU.ActiveCfg = Debug|Any CPU {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|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.ActiveCfg = Debug|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Debug|x86.Build.0 = 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.ActiveCfg = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|Any CPU.Build.0 = 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.ActiveCfg = Release|Any CPU
{6EB4D3A4-3CF2-4651-9AF9-AD5F727DF403}.Release|x86.Build.0 = 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.ActiveCfg = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|Any CPU.Build.0 = 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.ActiveCfg = Debug|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Debug|x86.Build.0 = 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.ActiveCfg = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|Any CPU.Build.0 = 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.ActiveCfg = Release|Any CPU
{F3128F98-87CF-4D7E-8008-43148BD814E1}.Release|x86.Build.0 = 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.ActiveCfg = Debug|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|Any CPU.Build.0 = 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.ActiveCfg = Debug|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Debug|x86.Build.0 = 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.ActiveCfg = Release|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|Any CPU.Build.0 = 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.ActiveCfg = Release|Any CPU
{A3B497BD-842C-4A2B-B398-ED1976849DF1}.Release|x86.Build.0 = 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.ActiveCfg = Debug|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Debug|x86.Build.0 = 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.ActiveCfg = Release|x86
{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x86.Build.0 = Release|x86 {110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}.Release|x86.Build.0 = Release|x86
EndGlobalSection EndGlobalSection

38
UID/DISPO.vbproj
View File

@@ -11,7 +11,7 @@
<AssemblyName>DISPO</AssemblyName> <AssemblyName>DISPO</AssemblyName>
<FileAlignment>512</FileAlignment> <FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType> <MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.7</TargetFrameworkVersion> <TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
<IsWebBootstrapper>false</IsWebBootstrapper> <IsWebBootstrapper>false</IsWebBootstrapper>
<TargetFrameworkProfile> <TargetFrameworkProfile>
</TargetFrameworkProfile> </TargetFrameworkProfile>
@@ -358,11 +358,9 @@
<Compile Include="frmHistory.vb"> <Compile Include="frmHistory.vb">
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="frmMain.vb"> <Compile Include="old_frmMain.vb" />
<SubType>Form</SubType> <Compile Include="old_frmMain.Designer.vb">
</Compile> <DependentUpon>old_frmMain.vb</DependentUpon>
<Compile Include="frmMain.Designer.vb">
<DependentUpon>frmMain.vb</DependentUpon>
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="frmMitarbDetails.Designer.vb"> <Compile Include="frmMitarbDetails.Designer.vb">
@@ -393,6 +391,7 @@
<Compile Include="My Project\Application.Designer.vb"> <Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen> <AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon> <DependentUpon>Application.myapp</DependentUpon>
<DesignTime>True</DesignTime>
</Compile> </Compile>
<Compile Include="My Project\Settings.Designer.vb"> <Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen> <AutoGen>True</AutoGen>
@@ -573,8 +572,8 @@
<EmbeddedResource Include="frmHistory.resx"> <EmbeddedResource Include="frmHistory.resx">
<DependentUpon>frmHistory.vb</DependentUpon> <DependentUpon>frmHistory.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMain.resx"> <EmbeddedResource Include="old_frmMain.resx">
<DependentUpon>frmMain.vb</DependentUpon> <DependentUpon>old_frmMain.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMitarbDetails.resx"> <EmbeddedResource Include="frmMitarbDetails.resx">
<DependentUpon>frmMitarbDetails.vb</DependentUpon> <DependentUpon>frmMitarbDetails.vb</DependentUpon>
@@ -784,6 +783,8 @@
<None Include="Resources\Firmen30_2.png" /> <None Include="Resources\Firmen30_2.png" />
<None Include="Resources\Auftrag_30.png" /> <None Include="Resources\Auftrag_30.png" />
<None Include="Resources\aviso_messenger.png" /> <None Include="Resources\aviso_messenger.png" />
<None Include="Resources\ambar_simple.png" />
<None Include="Resources\DispoAMBAR.jpg" />
<Content Include="Resources\Info.txt" /> <Content Include="Resources\Info.txt" />
<None Include="Resources\lorry_motion.jpg" /> <None Include="Resources\lorry_motion.jpg" />
<None Include="Resources\lorry_motion.png" /> <None Include="Resources\lorry_motion.png" />
@@ -796,18 +797,9 @@
<None Include="Resources\saveas20.png" /> <None Include="Resources\saveas20.png" />
<None Include="Resources\links20.png" /> <None Include="Resources\links20.png" />
<None Include="Resources\Print20x20.png" /> <None Include="Resources\Print20x20.png" />
<None Include="Resources\QS.jpg" />
<Content Include="uid.ico" /> <Content Include="uid.ico" />
</ItemGroup> </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> <ItemGroup>
<PublishFile Include="es\Microsoft.ReportViewer.Common.resources"> <PublishFile Include="es\Microsoft.ReportViewer.Common.resources">
<Visible>False</Visible> <Visible>False</Visible>
@@ -1603,6 +1595,16 @@
<ItemGroup> <ItemGroup>
<WCFMetadata Include="Connected Services\" /> <WCFMetadata Include="Connected Services\" />
</ItemGroup> </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" /> <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it. <!-- 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. 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 Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.BeginInit Me.BeginInit
@@ -40,7 +40,7 @@ Partial Public Class DataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context, false) MyBase.New(info, context, false)
If (Me.IsBinarySerialized(info, context) = true) Then If (Me.IsBinarySerialized(info, context) = true) Then
@@ -72,7 +72,7 @@ Partial Public Class DataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.BrowsableAttribute(true), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -85,7 +85,7 @@ Partial Public Class DataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
Get Get
@@ -94,7 +94,7 @@ Partial Public Class DataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
Get Get
@@ -103,7 +103,7 @@ Partial Public Class DataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Protected Overrides Sub InitializeDerivedDataSet()
Me.BeginInit Me.BeginInit
Me.InitClass Me.InitClass
@@ -111,7 +111,7 @@ Partial Public Class DataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overrides Function Clone() As Global.System.Data.DataSet
Dim cln As DataSet1 = CType(MyBase.Clone,DataSet1) Dim cln As DataSet1 = CType(MyBase.Clone,DataSet1)
cln.InitVars cln.InitVars
@@ -120,19 +120,19 @@ Partial Public Class DataSet1
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function ShouldSerializeTables() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function ShouldSerializeRelations() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
Me.Reset Me.Reset
@@ -153,7 +153,7 @@ Partial Public Class DataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream() Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing)) Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -162,18 +162,18 @@ Partial Public Class DataSet1
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Friend Overloads Sub InitVars()
Me.InitVars(true) Me.InitVars(true)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Overloads Sub InitVars(ByVal initTable As Boolean)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitClass()
Me.DataSetName = "DataSet1" Me.DataSetName = "DataSet1"
Me.Prefix = "" Me.Prefix = ""
@@ -183,7 +183,7 @@ Partial Public Class DataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
Me.InitVars Me.InitVars
@@ -191,7 +191,7 @@ Partial Public Class DataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 ds As DataSet1 = New DataSet1()
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() 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() Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DISPO.frmLogin Me.MainForm = Global.DISPO.frmLogin
End Sub 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 Class
End Namespace End Namespace

4
UID/My Project/AssemblyInfo.vb
View File

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

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

@@ -70,6 +70,16 @@ Namespace My.Resources
End Get End Get
End Property 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> '''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary> '''</summary>
@@ -216,6 +226,16 @@ Namespace My.Resources
End Get End Get
End Property 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> '''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Version 1.0.4.0 (02.05.2016) ''' Sucht eine lokalisierte Zeichenfolge, die Version 1.0.4.0 (02.05.2016)
''' - diverse Korrekturen (DB) ''' - diverse Korrekturen (DB)
@@ -324,6 +344,16 @@ Namespace My.Resources
End Get End Get
End Property 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> '''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary> '''</summary>
@@ -423,14 +453,5 @@ Namespace My.Resources
Return CType(obj,System.Drawing.Bitmap) Return CType(obj,System.Drawing.Bitmap)
End Get End Get
End Property 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 Module
End Namespace End Namespace

12
UID/My Project/Resources.resx
View File

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

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

@@ -15,7 +15,7 @@ Option Explicit On
Namespace My Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ <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)> _ Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase 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" cbStandort.SelectedItem = "4819 - Verag Neuhaus"
End If 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 PanJahr.Enabled = False
PanMonat.Enabled = True PanMonat.Enabled = True
@@ -267,6 +273,8 @@ Public Class frmAuswertung
filialnr = "4807" filialnr = "4807"
ElseIf cbStandort.SelectedItem = "4819 - Verag Neuhaus" Then ElseIf cbStandort.SelectedItem = "4819 - Verag Neuhaus" Then
filialnr = "4819" filialnr = "4819"
ElseIf cbStandort.SelectedItem.ToString.StartsWith("5701") Then
filialnr = "5701"
End If End If
Return filialnr Return filialnr

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

@@ -40,4 +40,10 @@ Public Class rptAuswertung
End If End If
End Sub 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 End Class

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

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

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

@@ -56,6 +56,18 @@ Public Class rptTransportauftrag
"Abrechnungspartner: " & vbCrLf & "Abrechnungspartner: " & vbCrLf &
"VERAG Spedition AG in" & vbCrLf & "VERAG Spedition AG in" & vbCrLf &
"A-4975 Suben, Nr. 100" "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 End If
txtFrachtposition.Text = FilialNr & "/" & FrachtPostHeader.Substring(1) 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 Dim report As New rptTransportauftrag
report.Standort = Standort report.Standort = Standort
report.printTrip = printTrip report.printTrip = printTrip
report.Printauftrag = printauftrag report.Printauftrag = printauftrag
' report.CMR = CMR ' report.CMR = CMR
Viewer1.LoadDocument(report) 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 Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.BeginInit Me.BeginInit
@@ -42,7 +42,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context, false) MyBase.New(info, context, false)
If (Me.IsBinarySerialized(info, context) = true) Then If (Me.IsBinarySerialized(info, context) = true) Then
@@ -77,7 +77,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false), _
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _ Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
Public ReadOnly Property tblData() As tblDataDataTable Public ReadOnly Property tblData() As tblDataDataTable
@@ -87,7 +87,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.BrowsableAttribute(true), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -100,7 +100,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
Get Get
@@ -109,7 +109,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
Get Get
@@ -118,7 +118,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Protected Overrides Sub InitializeDerivedDataSet()
Me.BeginInit Me.BeginInit
Me.InitClass Me.InitClass
@@ -126,7 +126,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overrides Function Clone() As Global.System.Data.DataSet
Dim cln As UIDDataSet = CType(MyBase.Clone,UIDDataSet) Dim cln As UIDDataSet = CType(MyBase.Clone,UIDDataSet)
cln.InitVars cln.InitVars
@@ -135,19 +135,19 @@ Partial Public Class UIDDataSet
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function ShouldSerializeTables() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function ShouldSerializeRelations() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
Me.Reset Me.Reset
@@ -171,7 +171,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream() Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing)) Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -180,13 +180,13 @@ Partial Public Class UIDDataSet
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Friend Overloads Sub InitVars()
Me.InitVars(true) Me.InitVars(true)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Overloads Sub InitVars(ByVal initTable As Boolean)
Me.tabletblData = CType(MyBase.Tables("tblData"),tblDataDataTable) Me.tabletblData = CType(MyBase.Tables("tblData"),tblDataDataTable)
If (initTable = true) Then If (initTable = true) Then
@@ -197,7 +197,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitClass()
Me.DataSetName = "UIDDataSet" Me.DataSetName = "UIDDataSet"
Me.Prefix = "" Me.Prefix = ""
@@ -209,13 +209,13 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Private Function ShouldSerializetblData() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
Me.InitVars Me.InitVars
@@ -223,7 +223,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 ds As UIDDataSet = New UIDDataSet()
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
@@ -272,7 +272,7 @@ Partial Public Class UIDDataSet
Return type Return type
End Function 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) Public Delegate Sub tblDataRowChangeEventHandler(ByVal sender As Object, ByVal e As tblDataRowChangeEvent)
'''<summary> '''<summary>
@@ -306,7 +306,7 @@ Partial Public Class UIDDataSet
Private columnletzter_benutzer As Global.System.Data.DataColumn Private columnletzter_benutzer As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.TableName = "tblData" Me.TableName = "tblData"
@@ -316,7 +316,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Sub New(ByVal table As Global.System.Data.DataTable)
MyBase.New MyBase.New
Me.TableName = table.TableName Me.TableName = table.TableName
@@ -334,14 +334,14 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context) MyBase.New(info, context)
Me.InitVars Me.InitVars
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnId Return Me.columnId
@@ -349,7 +349,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property deaktColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columndeakt Return Me.columndeakt
@@ -357,7 +357,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property kuerzelColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnkuerzel Return Me.columnkuerzel
@@ -365,7 +365,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property firmaColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnfirma Return Me.columnfirma
@@ -373,7 +373,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property uidColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnuid Return Me.columnuid
@@ -381,7 +381,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property eoriColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columneori Return Me.columneori
@@ -389,7 +389,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property infoColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columninfo Return Me.columninfo
@@ -397,7 +397,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property de_vz_vmColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnde_vz_vm Return Me.columnde_vz_vm
@@ -405,7 +405,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property de_fisk_vmColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnde_fisk_vm Return Me.columnde_fisk_vm
@@ -413,7 +413,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property at_vzfisk_vmColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnat_vzfisk_vm Return Me.columnat_vzfisk_vm
@@ -421,7 +421,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property letzter_benutzerColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnletzter_benutzer Return Me.columnletzter_benutzer
@@ -429,7 +429,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false)> _
Public ReadOnly Property Count() As Integer Public ReadOnly Property Count() As Integer
Get Get
@@ -438,33 +438,33 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Default ReadOnly Property Item(ByVal index As Integer) As tblDataRow
Get Get
Return CType(Me.Rows(index),tblDataRow) Return CType(Me.Rows(index),tblDataRow)
End Get End Get
End Property 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 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 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 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 Public Event tblDataRowDeleted As tblDataRowChangeEventHandler
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Public Overloads Sub AddtblDataRow(ByVal row As tblDataRow)
Me.Rows.Add(row) Me.Rows.Add(row)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 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} 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 End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function FindById(ByVal Id As Integer) As tblDataRow
Return CType(Me.Rows.Find(New Object() {Id}),tblDataRow) Return CType(Me.Rows.Find(New Object() {Id}),tblDataRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overrides Function Clone() As Global.System.Data.DataTable
Dim cln As tblDataDataTable = CType(MyBase.Clone,tblDataDataTable) Dim cln As tblDataDataTable = CType(MyBase.Clone,tblDataDataTable)
cln.InitVars cln.InitVars
@@ -488,13 +488,13 @@ Partial Public Class UIDDataSet
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
Return New tblDataDataTable() Return New tblDataDataTable()
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Friend Sub InitVars()
Me.columnId = MyBase.Columns("Id") Me.columnId = MyBase.Columns("Id")
Me.columndeakt = MyBase.Columns("deakt") Me.columndeakt = MyBase.Columns("deakt")
@@ -510,7 +510,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitClass()
Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) Me.columnId = New Global.System.Data.DataColumn("Id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnId) MyBase.Columns.Add(Me.columnId)
@@ -554,25 +554,25 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function NewtblDataRow() As tblDataRow
Return CType(Me.NewRow,tblDataRow) Return CType(Me.NewRow,tblDataRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
Return New tblDataRow(builder) Return New tblDataRow(builder)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function GetRowType() As Global.System.Type
Return GetType(tblDataRow) Return GetType(tblDataRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e) MyBase.OnRowChanged(e)
If (Not (Me.tblDataRowChangedEvent) Is Nothing) Then If (Not (Me.tblDataRowChangedEvent) Is Nothing) Then
@@ -581,7 +581,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanging(e) MyBase.OnRowChanging(e)
If (Not (Me.tblDataRowChangingEvent) Is Nothing) Then If (Not (Me.tblDataRowChangingEvent) Is Nothing) Then
@@ -590,7 +590,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleted(e) MyBase.OnRowDeleted(e)
If (Not (Me.tblDataRowDeletedEvent) Is Nothing) Then If (Not (Me.tblDataRowDeletedEvent) Is Nothing) Then
@@ -599,7 +599,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleting(e) MyBase.OnRowDeleting(e)
If (Not (Me.tblDataRowDeletingEvent) Is Nothing) Then If (Not (Me.tblDataRowDeletingEvent) Is Nothing) Then
@@ -608,13 +608,13 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Public Sub RemovetblDataRow(ByVal row As tblDataRow)
Me.Rows.Remove(row) Me.Rows.Remove(row)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 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() 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 Private tabletblData As tblDataDataTable
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
MyBase.New(rb) MyBase.New(rb)
Me.tabletblData = CType(Me.Table,tblDataDataTable) Me.tabletblData = CType(Me.Table,tblDataDataTable)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property Id() As Integer
Get Get
Return CType(Me(Me.tabletblData.IdColumn),Integer) Return CType(Me(Me.tabletblData.IdColumn),Integer)
@@ -707,7 +707,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property deakt() As Boolean
Get Get
Return CType(Me(Me.tabletblData.deaktColumn),Boolean) Return CType(Me(Me.tabletblData.deaktColumn),Boolean)
@@ -718,7 +718,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property kuerzel() As String
Get Get
Try Try
@@ -733,7 +733,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property firma() As String
Get Get
Try Try
@@ -748,7 +748,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property uid() As String
Get Get
Try Try
@@ -763,7 +763,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property eori() As String
Get Get
Try Try
@@ -778,7 +778,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property info() As String
Get Get
Try Try
@@ -793,7 +793,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property de_vz_vm() As String
Get Get
Try Try
@@ -808,7 +808,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property de_fisk_vm() As String
Get Get
Try Try
@@ -823,7 +823,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property at_vzfisk_vm() As String
Get Get
Try Try
@@ -838,7 +838,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property letzter_benutzer() As String
Get Get
Try Try
@@ -853,109 +853,109 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function IskuerzelNull() As Boolean
Return Me.IsNull(Me.tabletblData.kuerzelColumn) Return Me.IsNull(Me.tabletblData.kuerzelColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub SetkuerzelNull()
Me(Me.tabletblData.kuerzelColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.kuerzelColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function IsfirmaNull() As Boolean
Return Me.IsNull(Me.tabletblData.firmaColumn) Return Me.IsNull(Me.tabletblData.firmaColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub SetfirmaNull()
Me(Me.tabletblData.firmaColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.firmaColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function IsuidNull() As Boolean
Return Me.IsNull(Me.tabletblData.uidColumn) Return Me.IsNull(Me.tabletblData.uidColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub SetuidNull()
Me(Me.tabletblData.uidColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.uidColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function IseoriNull() As Boolean
Return Me.IsNull(Me.tabletblData.eoriColumn) Return Me.IsNull(Me.tabletblData.eoriColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub SeteoriNull()
Me(Me.tabletblData.eoriColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.eoriColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function IsinfoNull() As Boolean
Return Me.IsNull(Me.tabletblData.infoColumn) Return Me.IsNull(Me.tabletblData.infoColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub SetinfoNull()
Me(Me.tabletblData.infoColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.infoColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Isde_vz_vmNull() As Boolean
Return Me.IsNull(Me.tabletblData.de_vz_vmColumn) Return Me.IsNull(Me.tabletblData.de_vz_vmColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setde_vz_vmNull()
Me(Me.tabletblData.de_vz_vmColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.de_vz_vmColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Isde_fisk_vmNull() As Boolean
Return Me.IsNull(Me.tabletblData.de_fisk_vmColumn) Return Me.IsNull(Me.tabletblData.de_fisk_vmColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setde_fisk_vmNull()
Me(Me.tabletblData.de_fisk_vmColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.de_fisk_vmColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Isat_vzfisk_vmNull() As Boolean
Return Me.IsNull(Me.tabletblData.at_vzfisk_vmColumn) Return Me.IsNull(Me.tabletblData.at_vzfisk_vmColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setat_vzfisk_vmNull()
Me(Me.tabletblData.at_vzfisk_vmColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.at_vzfisk_vmColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Isletzter_benutzerNull() As Boolean
Return Me.IsNull(Me.tabletblData.letzter_benutzerColumn) Return Me.IsNull(Me.tabletblData.letzter_benutzerColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setletzter_benutzerNull()
Me(Me.tabletblData.letzter_benutzerColumn) = Global.System.Convert.DBNull Me(Me.tabletblData.letzter_benutzerColumn) = Global.System.Convert.DBNull
End Sub End Sub
@@ -964,7 +964,7 @@ Partial Public Class UIDDataSet
'''<summary> '''<summary>
'''Row event argument class '''Row event argument class
'''</summary> '''</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 Public Class tblDataRowChangeEvent
Inherits Global.System.EventArgs Inherits Global.System.EventArgs
@@ -973,7 +973,7 @@ Partial Public Class UIDDataSet
Private eventAction As Global.System.Data.DataRowAction Private eventAction As Global.System.Data.DataRowAction
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Public Sub New(ByVal row As tblDataRow, ByVal action As Global.System.Data.DataRowAction)
MyBase.New MyBase.New
Me.eventRow = row Me.eventRow = row
@@ -981,7 +981,7 @@ Partial Public Class UIDDataSet
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property Row() As tblDataRow
Get Get
Return Me.eventRow Return Me.eventRow
@@ -989,7 +989,7 @@ Partial Public Class UIDDataSet
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property Action() As Global.System.Data.DataRowAction
Get Get
Return Me.eventAction Return Me.eventAction
@@ -1023,14 +1023,14 @@ Namespace UIDDataSetTableAdapters
Private _clearBeforeFill As Boolean Private _clearBeforeFill As Boolean
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.ClearBeforeFill = true Me.ClearBeforeFill = true
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
Get Get
If (Me._adapter Is Nothing) Then If (Me._adapter Is Nothing) Then
@@ -1041,7 +1041,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
Get Get
If (Me._connection Is Nothing) Then If (Me._connection Is Nothing) Then
@@ -1071,7 +1071,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
Get Get
Return Me._transaction Return Me._transaction
@@ -1099,7 +1099,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
Get Get
If (Me._commandCollection Is Nothing) Then If (Me._commandCollection Is Nothing) Then
@@ -1110,7 +1110,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property ClearBeforeFill() As Boolean
Get Get
Return Me._clearBeforeFill Return Me._clearBeforeFill
@@ -1121,7 +1121,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitAdapter()
Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() 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, "", "", "")) 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 End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), <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() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() 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 End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitCommandCollection()
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
@@ -1263,7 +1263,7 @@ Namespace UIDDataSetTableAdapters
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
Public Overloads Overridable Function Fill(ByVal dataTable As UIDDataSet.tblDataDataTable) As Integer Public Overloads Overridable Function Fill(ByVal dataTable As UIDDataSet.tblDataDataTable) As Integer
@@ -1276,7 +1276,7 @@ Namespace UIDDataSetTableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
Public Overloads Overridable Function GetData() As UIDDataSet.tblDataDataTable Public Overloads Overridable Function GetData() As UIDDataSet.tblDataDataTable
@@ -1287,35 +1287,35 @@ Namespace UIDDataSetTableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataTable As UIDDataSet.tblDataDataTable) As Integer Public Overloads Overridable Function Update(ByVal dataTable As UIDDataSet.tblDataDataTable) As Integer
Return Me.Adapter.Update(dataTable) Return Me.Adapter.Update(dataTable)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataSet As UIDDataSet) As Integer Public Overloads Overridable Function Update(ByVal dataSet As UIDDataSet) As Integer
Return Me.Adapter.Update(dataSet, "tblData") Return Me.Adapter.Update(dataSet, "tblData")
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(dataRows) Return Me.Adapter.Update(dataRows)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _ 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 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 End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _ 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 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 End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update( _ Public Overloads Overridable Function Update( _
@@ -1620,7 +1620,7 @@ Namespace UIDDataSetTableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update( _ Public Overloads Overridable Function Update( _
@@ -1669,7 +1669,7 @@ Namespace UIDDataSetTableAdapters
Private _connection As Global.System.Data.IDbConnection Private _connection As Global.System.Data.IDbConnection
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property UpdateOrder() As UpdateOrderOption
Get Get
Return Me._updateOrder Return Me._updateOrder
@@ -1680,7 +1680,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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"& _ Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
"ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _ "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
"a", "System.Drawing.Design.UITypeEditor")> _ "a", "System.Drawing.Design.UITypeEditor")> _
@@ -1694,7 +1694,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property BackupDataSetBeforeUpdate() As Boolean
Get Get
Return Me._backupDataSetBeforeUpdate Return Me._backupDataSetBeforeUpdate
@@ -1705,7 +1705,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false)> _
Public Property Connection() As Global.System.Data.IDbConnection Public Property Connection() As Global.System.Data.IDbConnection
Get Get
@@ -1724,7 +1724,7 @@ Namespace UIDDataSetTableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false)> _
Public ReadOnly Property TableAdapterInstanceCount() As Integer Public ReadOnly Property TableAdapterInstanceCount() As Integer
Get Get
@@ -1740,7 +1740,7 @@ Namespace UIDDataSetTableAdapters
'''Update rows in top-down order. '''Update rows in top-down order.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 Dim result As Integer = 0
If (Not (Me._tblDataTableAdapter) Is Nothing) Then If (Not (Me._tblDataTableAdapter) Is Nothing) Then
@@ -1759,7 +1759,7 @@ Namespace UIDDataSetTableAdapters
'''Insert rows in top-down order. '''Insert rows in top-down order.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 Dim result As Integer = 0
If (Not (Me._tblDataTableAdapter) Is Nothing) Then If (Not (Me._tblDataTableAdapter) Is Nothing) Then
@@ -1777,7 +1777,7 @@ Namespace UIDDataSetTableAdapters
'''Delete rows in bottom-up order. '''Delete rows in bottom-up order.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 Dim result As Integer = 0
If (Not (Me._tblDataTableAdapter) Is Nothing) Then 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 '''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() 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) _ If ((updatedRows Is Nothing) _
OrElse (updatedRows.Length < 1)) Then OrElse (updatedRows.Length < 1)) Then
@@ -1821,7 +1821,7 @@ Namespace UIDDataSetTableAdapters
'''Update all changes to the dataset. '''Update all changes to the dataset.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overridable Function UpdateAll(ByVal dataSet As UIDDataSet) As Integer
If (dataSet Is Nothing) Then If (dataSet Is Nothing) Then
Throw New Global.System.ArgumentNullException("dataSet") Throw New Global.System.ArgumentNullException("dataSet")
@@ -1956,13 +1956,13 @@ Namespace UIDDataSetTableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) 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)) Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
If (Not (Me._connection) Is Nothing) Then If (Not (Me._connection) Is Nothing) Then
Return true Return true
@@ -1980,7 +1980,7 @@ Namespace UIDDataSetTableAdapters
'''<summary> '''<summary>
'''Update Order Option '''Update Order Option
'''</summary> '''</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 Public Enum UpdateOrderOption
InsertUpdateDelete = 0 InsertUpdateDelete = 0
@@ -1991,7 +1991,7 @@ Namespace UIDDataSetTableAdapters
'''<summary> '''<summary>
'''Used to sort self-referenced table's rows '''Used to sort self-referenced table's rows
'''</summary> '''</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 Private Class SelfReferenceComparer
Inherits Object Inherits Object
Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow) Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
@@ -2001,7 +2001,7 @@ Namespace UIDDataSetTableAdapters
Private _childFirst As Integer Private _childFirst As Integer
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
MyBase.New MyBase.New
Me._relation = relation Me._relation = relation
@@ -2013,7 +2013,7 @@ Namespace UIDDataSetTableAdapters
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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)) Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing))
Dim root As Global.System.Data.DataRow = row Dim root As Global.System.Data.DataRow = row
@@ -2052,7 +2052,7 @@ Namespace UIDDataSetTableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 If Object.ReferenceEquals(row1, row2) Then
Return 0 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 Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.BeginInit Me.BeginInit
@@ -42,7 +42,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context, false) MyBase.New(info, context, false)
If (Me.IsBinarySerialized(info, context) = true) Then If (Me.IsBinarySerialized(info, context) = true) Then
@@ -77,7 +77,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false), _
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _ Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
Public ReadOnly Property tblUser() As tblUserDataTable Public ReadOnly Property tblUser() As tblUserDataTable
@@ -87,7 +87,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.BrowsableAttribute(true), _
Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)> _
Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
@@ -100,7 +100,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
Get Get
@@ -109,7 +109,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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)> _ Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)> _
Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
Get Get
@@ -118,7 +118,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Protected Overrides Sub InitializeDerivedDataSet()
Me.BeginInit Me.BeginInit
Me.InitClass Me.InitClass
@@ -126,7 +126,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overrides Function Clone() As Global.System.Data.DataSet
Dim cln As UIDDataSet1 = CType(MyBase.Clone,UIDDataSet1) Dim cln As UIDDataSet1 = CType(MyBase.Clone,UIDDataSet1)
cln.InitVars cln.InitVars
@@ -135,19 +135,19 @@ Partial Public Class UIDDataSet1
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function ShouldSerializeTables() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function ShouldSerializeRelations() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
Me.Reset Me.Reset
@@ -171,7 +171,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream() Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream()
Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing)) Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
@@ -180,13 +180,13 @@ Partial Public Class UIDDataSet1
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Friend Overloads Sub InitVars()
Me.InitVars(true) Me.InitVars(true)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Overloads Sub InitVars(ByVal initTable As Boolean)
Me.tabletblUser = CType(MyBase.Tables("tblUser"),tblUserDataTable) Me.tabletblUser = CType(MyBase.Tables("tblUser"),tblUserDataTable)
If (initTable = true) Then If (initTable = true) Then
@@ -197,7 +197,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitClass()
Me.DataSetName = "UIDDataSet1" Me.DataSetName = "UIDDataSet1"
Me.Prefix = "" Me.Prefix = ""
@@ -209,13 +209,13 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Private Function ShouldSerializetblUser() As Boolean
Return false Return false
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
Me.InitVars Me.InitVars
@@ -223,7 +223,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 ds As UIDDataSet1 = New UIDDataSet1()
Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType()
@@ -272,7 +272,7 @@ Partial Public Class UIDDataSet1
Return type Return type
End Function 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) Public Delegate Sub tblUserRowChangeEventHandler(ByVal sender As Object, ByVal e As tblUserRowChangeEvent)
'''<summary> '''<summary>
@@ -300,7 +300,7 @@ Partial Public Class UIDDataSet1
Private columnmit_niederlassung As Global.System.Data.DataColumn Private columnmit_niederlassung As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.TableName = "tblUser" Me.TableName = "tblUser"
@@ -310,7 +310,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Sub New(ByVal table As Global.System.Data.DataTable)
MyBase.New MyBase.New
Me.TableName = table.TableName Me.TableName = table.TableName
@@ -328,14 +328,14 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
MyBase.New(info, context) MyBase.New(info, context)
Me.InitVars Me.InitVars
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_idColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_id Return Me.columnmit_id
@@ -343,7 +343,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_usernameColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_username Return Me.columnmit_username
@@ -351,7 +351,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_pwdColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_pwd Return Me.columnmit_pwd
@@ -359,7 +359,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_vnameColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_vname Return Me.columnmit_vname
@@ -367,7 +367,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_nnameColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_nname Return Me.columnmit_nname
@@ -375,7 +375,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_berechtigungColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_berechtigung Return Me.columnmit_berechtigung
@@ -383,7 +383,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_infoColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_info Return Me.columnmit_info
@@ -391,7 +391,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property mit_niederlassungColumn() As Global.System.Data.DataColumn
Get Get
Return Me.columnmit_niederlassung Return Me.columnmit_niederlassung
@@ -399,7 +399,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false)> _
Public ReadOnly Property Count() As Integer Public ReadOnly Property Count() As Integer
Get Get
@@ -408,33 +408,33 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Default ReadOnly Property Item(ByVal index As Integer) As tblUserRow
Get Get
Return CType(Me.Rows(index),tblUserRow) Return CType(Me.Rows(index),tblUserRow)
End Get End Get
End Property 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 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 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 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 Public Event tblUserRowDeleted As tblUserRowChangeEventHandler
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Public Overloads Sub AddtblUserRow(ByVal row As tblUserRow)
Me.Rows.Add(row) Me.Rows.Add(row)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 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} 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 End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function FindBymit_id(ByVal mit_id As Integer) As tblUserRow
Return CType(Me.Rows.Find(New Object() {mit_id}),tblUserRow) Return CType(Me.Rows.Find(New Object() {mit_id}),tblUserRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overrides Function Clone() As Global.System.Data.DataTable
Dim cln As tblUserDataTable = CType(MyBase.Clone,tblUserDataTable) Dim cln As tblUserDataTable = CType(MyBase.Clone,tblUserDataTable)
cln.InitVars cln.InitVars
@@ -458,13 +458,13 @@ Partial Public Class UIDDataSet1
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
Return New tblUserDataTable() Return New tblUserDataTable()
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Friend Sub InitVars()
Me.columnmit_id = MyBase.Columns("mit_id") Me.columnmit_id = MyBase.Columns("mit_id")
Me.columnmit_username = MyBase.Columns("mit_username") Me.columnmit_username = MyBase.Columns("mit_username")
@@ -477,7 +477,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitClass()
Me.columnmit_id = New Global.System.Data.DataColumn("mit_id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) Me.columnmit_id = New Global.System.Data.DataColumn("mit_id", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnmit_id) MyBase.Columns.Add(Me.columnmit_id)
@@ -511,25 +511,25 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function NewtblUserRow() As tblUserRow
Return CType(Me.NewRow,tblUserRow) Return CType(Me.NewRow,tblUserRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
Return New tblUserRow(builder) Return New tblUserRow(builder)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overrides Function GetRowType() As Global.System.Type
Return GetType(tblUserRow) Return GetType(tblUserRow)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e) MyBase.OnRowChanged(e)
If (Not (Me.tblUserRowChangedEvent) Is Nothing) Then If (Not (Me.tblUserRowChangedEvent) Is Nothing) Then
@@ -538,7 +538,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanging(e) MyBase.OnRowChanging(e)
If (Not (Me.tblUserRowChangingEvent) Is Nothing) Then If (Not (Me.tblUserRowChangingEvent) Is Nothing) Then
@@ -547,7 +547,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleted(e) MyBase.OnRowDeleted(e)
If (Not (Me.tblUserRowDeletedEvent) Is Nothing) Then If (Not (Me.tblUserRowDeletedEvent) Is Nothing) Then
@@ -556,7 +556,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleting(e) MyBase.OnRowDeleting(e)
If (Not (Me.tblUserRowDeletingEvent) Is Nothing) Then If (Not (Me.tblUserRowDeletingEvent) Is Nothing) Then
@@ -565,13 +565,13 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Public Sub RemovetblUserRow(ByVal row As tblUserRow)
Me.Rows.Remove(row) Me.Rows.Remove(row)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 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() 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 Private tabletblUser As tblUserDataTable
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
MyBase.New(rb) MyBase.New(rb)
Me.tabletblUser = CType(Me.Table,tblUserDataTable) Me.tabletblUser = CType(Me.Table,tblUserDataTable)
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_id() As Integer
Get Get
Return CType(Me(Me.tabletblUser.mit_idColumn),Integer) Return CType(Me(Me.tabletblUser.mit_idColumn),Integer)
@@ -664,7 +664,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_username() As String
Get Get
Try Try
@@ -679,7 +679,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_pwd() As String
Get Get
Try Try
@@ -694,7 +694,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_vname() As String
Get Get
Try Try
@@ -709,7 +709,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_nname() As String
Get Get
Try Try
@@ -724,7 +724,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_berechtigung() As Integer
Get Get
Try Try
@@ -739,7 +739,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_info() As String
Get Get
Try Try
@@ -754,7 +754,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property mit_niederlassung() As String
Get Get
Try Try
@@ -769,85 +769,85 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_usernameNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_usernameColumn) Return Me.IsNull(Me.tabletblUser.mit_usernameColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_usernameNull()
Me(Me.tabletblUser.mit_usernameColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_usernameColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_pwdNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_pwdColumn) Return Me.IsNull(Me.tabletblUser.mit_pwdColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_pwdNull()
Me(Me.tabletblUser.mit_pwdColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_pwdColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_vnameNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_vnameColumn) Return Me.IsNull(Me.tabletblUser.mit_vnameColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_vnameNull()
Me(Me.tabletblUser.mit_vnameColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_vnameColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_nnameNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_nnameColumn) Return Me.IsNull(Me.tabletblUser.mit_nnameColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_nnameNull()
Me(Me.tabletblUser.mit_nnameColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_nnameColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_berechtigungNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_berechtigungColumn) Return Me.IsNull(Me.tabletblUser.mit_berechtigungColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_berechtigungNull()
Me(Me.tabletblUser.mit_berechtigungColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_berechtigungColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_infoNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_infoColumn) Return Me.IsNull(Me.tabletblUser.mit_infoColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_infoNull()
Me(Me.tabletblUser.mit_infoColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_infoColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Function Ismit_niederlassungNull() As Boolean
Return Me.IsNull(Me.tabletblUser.mit_niederlassungColumn) Return Me.IsNull(Me.tabletblUser.mit_niederlassungColumn)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub Setmit_niederlassungNull()
Me(Me.tabletblUser.mit_niederlassungColumn) = Global.System.Convert.DBNull Me(Me.tabletblUser.mit_niederlassungColumn) = Global.System.Convert.DBNull
End Sub End Sub
@@ -856,7 +856,7 @@ Partial Public Class UIDDataSet1
'''<summary> '''<summary>
'''Row event argument class '''Row event argument class
'''</summary> '''</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 Public Class tblUserRowChangeEvent
Inherits Global.System.EventArgs Inherits Global.System.EventArgs
@@ -865,7 +865,7 @@ Partial Public Class UIDDataSet1
Private eventAction As Global.System.Data.DataRowAction Private eventAction As Global.System.Data.DataRowAction
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Public Sub New(ByVal row As tblUserRow, ByVal action As Global.System.Data.DataRowAction)
MyBase.New MyBase.New
Me.eventRow = row Me.eventRow = row
@@ -873,7 +873,7 @@ Partial Public Class UIDDataSet1
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property Row() As tblUserRow
Get Get
Return Me.eventRow Return Me.eventRow
@@ -881,7 +881,7 @@ Partial Public Class UIDDataSet1
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public ReadOnly Property Action() As Global.System.Data.DataRowAction
Get Get
Return Me.eventAction Return Me.eventAction
@@ -915,14 +915,14 @@ Namespace UIDDataSet1TableAdapters
Private _clearBeforeFill As Boolean Private _clearBeforeFill As Boolean
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Public Sub New()
MyBase.New MyBase.New
Me.ClearBeforeFill = true Me.ClearBeforeFill = true
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
Get Get
If (Me._adapter Is Nothing) Then If (Me._adapter Is Nothing) Then
@@ -933,7 +933,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
Get Get
If (Me._connection Is Nothing) Then If (Me._connection Is Nothing) Then
@@ -963,7 +963,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
Get Get
Return Me._transaction Return Me._transaction
@@ -991,7 +991,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
Get Get
If (Me._commandCollection Is Nothing) Then If (Me._commandCollection Is Nothing) Then
@@ -1002,7 +1002,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property ClearBeforeFill() As Boolean
Get Get
Return Me._clearBeforeFill Return Me._clearBeforeFill
@@ -1013,7 +1013,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitAdapter()
Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
@@ -1115,14 +1115,14 @@ Namespace UIDDataSet1TableAdapters
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() 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 End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() Private Sub InitCommandCollection()
Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
@@ -1133,7 +1133,7 @@ Namespace UIDDataSet1TableAdapters
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)> _
Public Overloads Overridable Function Fill(ByVal dataTable As UIDDataSet1.tblUserDataTable) As Integer Public Overloads Overridable Function Fill(ByVal dataTable As UIDDataSet1.tblUserDataTable) As Integer
@@ -1146,7 +1146,7 @@ Namespace UIDDataSet1TableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)> _
Public Overloads Overridable Function GetData() As UIDDataSet1.tblUserDataTable Public Overloads Overridable Function GetData() As UIDDataSet1.tblUserDataTable
@@ -1157,35 +1157,35 @@ Namespace UIDDataSet1TableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataTable As UIDDataSet1.tblUserDataTable) As Integer Public Overloads Overridable Function Update(ByVal dataTable As UIDDataSet1.tblUserDataTable) As Integer
Return Me.Adapter.Update(dataTable) Return Me.Adapter.Update(dataTable)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataSet As UIDDataSet1) As Integer Public Overloads Overridable Function Update(ByVal dataSet As UIDDataSet1) As Integer
Return Me.Adapter.Update(dataSet, "tblUser") Return Me.Adapter.Update(dataSet, "tblUser")
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
Return Me.Adapter.Update(dataRows) Return Me.Adapter.Update(dataRows)
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _ 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 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 End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _ 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 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 End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
Public Overloads Overridable Function Update( _ Public Overloads Overridable Function Update( _
@@ -1432,7 +1432,7 @@ Namespace UIDDataSet1TableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _ 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 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 Private _connection As Global.System.Data.IDbConnection
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property UpdateOrder() As UpdateOrderOption
Get Get
Return Me._updateOrder Return Me._updateOrder
@@ -1471,7 +1471,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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"& _ Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
"ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _ "ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
"a", "System.Drawing.Design.UITypeEditor")> _ "a", "System.Drawing.Design.UITypeEditor")> _
@@ -1485,7 +1485,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Property BackupDataSetBeforeUpdate() As Boolean
Get Get
Return Me._backupDataSetBeforeUpdate Return Me._backupDataSetBeforeUpdate
@@ -1496,7 +1496,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false)> _
Public Property Connection() As Global.System.Data.IDbConnection Public Property Connection() As Global.System.Data.IDbConnection
Get Get
@@ -1515,7 +1515,7 @@ Namespace UIDDataSet1TableAdapters
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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.Browsable(false)> _
Public ReadOnly Property TableAdapterInstanceCount() As Integer Public ReadOnly Property TableAdapterInstanceCount() As Integer
Get Get
@@ -1531,7 +1531,7 @@ Namespace UIDDataSet1TableAdapters
'''Update rows in top-down order. '''Update rows in top-down order.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 Dim result As Integer = 0
If (Not (Me._tblUserTableAdapter) Is Nothing) Then If (Not (Me._tblUserTableAdapter) Is Nothing) Then
@@ -1550,7 +1550,7 @@ Namespace UIDDataSet1TableAdapters
'''Insert rows in top-down order. '''Insert rows in top-down order.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 Dim result As Integer = 0
If (Not (Me._tblUserTableAdapter) Is Nothing) Then If (Not (Me._tblUserTableAdapter) Is Nothing) Then
@@ -1568,7 +1568,7 @@ Namespace UIDDataSet1TableAdapters
'''Delete rows in bottom-up order. '''Delete rows in bottom-up order.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 Dim result As Integer = 0
If (Not (Me._tblUserTableAdapter) Is Nothing) Then 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 '''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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() 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) _ If ((updatedRows Is Nothing) _
OrElse (updatedRows.Length < 1)) Then OrElse (updatedRows.Length < 1)) Then
@@ -1612,7 +1612,7 @@ Namespace UIDDataSet1TableAdapters
'''Update all changes to the dataset. '''Update all changes to the dataset.
'''</summary> '''</summary>
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Public Overridable Function UpdateAll(ByVal dataSet As UIDDataSet1) As Integer
If (dataSet Is Nothing) Then If (dataSet Is Nothing) Then
Throw New Global.System.ArgumentNullException("dataSet") Throw New Global.System.ArgumentNullException("dataSet")
@@ -1747,13 +1747,13 @@ Namespace UIDDataSet1TableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) 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)) Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
If (Not (Me._connection) Is Nothing) Then If (Not (Me._connection) Is Nothing) Then
Return true Return true
@@ -1771,7 +1771,7 @@ Namespace UIDDataSet1TableAdapters
'''<summary> '''<summary>
'''Update Order Option '''Update Order Option
'''</summary> '''</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 Public Enum UpdateOrderOption
InsertUpdateDelete = 0 InsertUpdateDelete = 0
@@ -1782,7 +1782,7 @@ Namespace UIDDataSet1TableAdapters
'''<summary> '''<summary>
'''Used to sort self-referenced table's rows '''Used to sort self-referenced table's rows
'''</summary> '''</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 Private Class SelfReferenceComparer
Inherits Object Inherits Object
Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow) Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
@@ -1792,7 +1792,7 @@ Namespace UIDDataSet1TableAdapters
Private _childFirst As Integer Private _childFirst As Integer
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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) Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
MyBase.New MyBase.New
Me._relation = relation Me._relation = relation
@@ -1804,7 +1804,7 @@ Namespace UIDDataSet1TableAdapters
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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)) Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing))
Dim root As Global.System.Data.DataRow = row Dim root As Global.System.Data.DataRow = row
@@ -1843,7 +1843,7 @@ Namespace UIDDataSet1TableAdapters
End Function End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <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 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 If Object.ReferenceEquals(row1, row2) Then
Return 0 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"/> <endpoint address="http://localhost:8733/Design_Time_Addresses/RKSVCompleteServer/Service1/" binding="basicHttpBinding" bindingConfiguration="BasicHttpBinding_IRKSVWcf" contract="RKSVServer.IRKSVWcf" name="BasicHttpBinding_IRKSVWcf"/>
</client> </client>
</system.serviceModel> </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_info As String = ""
Property kd_tarifInfo As String = "" Property kd_tarifInfo As String = ""
Property kd_rolle As String = "" Property kd_rolle As String = ""
Property kd_AVISOfirma As String = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Property kdoez As cOeffnungszeiten Property kdoez As cOeffnungszeiten
Property kd_FMZOLL_KdNr As Object = Nothing Property kd_FMZOLL_KdNr As Object = Nothing
@@ -97,6 +98,7 @@ Public Class cEntry
Me.kd_isRefNr = dr.Item("kd_isRefNr") Me.kd_isRefNr = dr.Item("kd_isRefNr")
If Not dr.Item("kd_refNr") Is DBNull.Value Then Me.kd_refNr = dr.Item("kd_refNr") 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_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_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 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 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") daten.kd_isRefNr = dr.Item("kd_isRefNr")
If Not dr.Item("kd_refNr") Is DBNull.Value Then daten.kd_refNr = dr.Item("kd_refNr") 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_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_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 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 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 Public Function insertKunden(ByVal d As cEntry) As Integer
Dim oez_id As Integer = insertOeffnungszeiten(d.kdoez) Dim oez_id As Integer = insertOeffnungszeiten(d.kdoez)
Dim sql = "INSERT INTO tblKunden " & 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_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_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 conn As SqlConnection = cSqlDb.GetNewOpenConnection()
Using cmd As New SqlCommand(sql, conn) 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_isRefNr", d.kd_isRefNr)
cmd.Parameters.AddWithValue("@kd_refNr", d.kd_refNr) cmd.Parameters.AddWithValue("@kd_refNr", d.kd_refNr)
cmd.Parameters.AddWithValue("@kd_info", d.kd_info) 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_tarifInfo", d.kd_tarifInfo)
cmd.Parameters.AddWithValue("@kd_rolle", d.kd_rolle) cmd.Parameters.AddWithValue("@kd_rolle", d.kd_rolle)
cmd.Parameters.AddWithValue("@kd_FMZOLL_KdNr", If(d.kd_FMZOLL_KdNr, DBNull.Value)) cmd.Parameters.AddWithValue("@kd_FMZOLL_KdNr", If(d.kd_FMZOLL_KdNr, DBNull.Value))
@@ -1473,7 +1477,7 @@ Public Class cOptionenDAL
Dim hAuswahl As String = "" Dim hAuswahl As String = ""
'Änderung 'Änderung
Dim sql = "UPDATE tblKunden " & 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" " WHERE kd_id=@kd_id"
Using conn As SqlConnection = cSqlDb.GetNewOpenConnection() Using conn As SqlConnection = cSqlDb.GetNewOpenConnection()
Using cmd As New SqlCommand(sql, conn) 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_isRefNr", d.kd_isRefNr)
cmd.Parameters.AddWithValue("@kd_refNr", d.kd_refNr) cmd.Parameters.AddWithValue("@kd_refNr", d.kd_refNr)
cmd.Parameters.AddWithValue("@kd_info", d.kd_info) 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_tarifInfo", d.kd_tarifInfo)
cmd.Parameters.AddWithValue("@kd_rolle", d.kd_rolle) cmd.Parameters.AddWithValue("@kd_rolle", d.kd_rolle)
cmd.Parameters.AddWithValue("@kd_id", d.kd_id) cmd.Parameters.AddWithValue("@kd_id", d.kd_id)
@@ -1943,7 +1948,7 @@ Public Class cFrachtkostenSQL
Public Function getAllFirmen() As List(Of cFrachtkostenFirmen) Public Function getAllFirmen() As List(Of cFrachtkostenFirmen)
'falls ID mitgegeben, dann diese laden, ansonsten den anderen Wert suchen '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) Dim daten As New List(Of cFrachtkostenFirmen)
Try Try
Using conn As SqlConnection = cSqlDb.GetNewOpenConnection() Using conn As SqlConnection = cSqlDb.GetNewOpenConnection()

16
UID/frmAuftragNEU.vb
View File

@@ -106,6 +106,15 @@ Public Class frmAuftragNEU
End Sub End Sub
Private Sub frmAuftrag_Load(sender As Object, e As EventArgs) Handles MyBase.Load 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) 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 Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_niederlassung
@@ -116,6 +125,11 @@ Public Class frmAuftragNEU
cboFirma.SelectedIndex = 0 cboFirma.SelectedIndex = 0
cboFirma2.SelectedIndex = 0 cboFirma2.SelectedIndex = 0
End If
cboAuftragsart.Items.Clear() cboAuftragsart.Items.Clear()
cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("HANDLING", "HANDLING")) cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("HANDLING", "HANDLING"))
cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TRANSPORT", "TRANSPORT")) cboAuftragsart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TRANSPORT", "TRANSPORT"))
@@ -1817,6 +1831,8 @@ Public Class frmAuftragNEU
cboFirma.SelectedItem = "VERAG AG" cboFirma.SelectedItem = "VERAG AG"
ElseIf cboFilialenNr.SelectedItem.value = "4819" Then ElseIf cboFilialenNr.SelectedItem.value = "4819" Then
cboFirma.SelectedItem = "VERAG GmbH" cboFirma.SelectedItem = "VERAG GmbH"
ElseIf cboFilialenNr.SelectedItem.value = "5701" Then
cboFirma.SelectedItem = "AMBAR"
End If End If
cboFirma2.SelectedItem = cboFirma.SelectedItem cboFirma2.SelectedItem = cboFirma.SelectedItem
End Sub 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.btnCancel = New System.Windows.Forms.Button()
Me.tabKunde = New System.Windows.Forms.TabControl() Me.tabKunde = New System.Windows.Forms.TabControl()
Me.tab1Allg = New System.Windows.Forms.TabPage() 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.btnVERAGKDLaden = New System.Windows.Forms.Button()
Me.Label15 = New System.Windows.Forms.Label() Me.Label15 = New System.Windows.Forms.Label()
Me.kdFirma = New VERAG_PROG_ALLGEMEIN.KdSearchBox() Me.kdFirma = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
@@ -133,8 +135,7 @@ Partial Class frmDetails
Me.Label14 = New System.Windows.Forms.Label() Me.Label14 = New System.Windows.Forms.Label()
Me.btnSave = New System.Windows.Forms.Button() Me.btnSave = New System.Windows.Forms.Button()
Me.cboRolle = New DISPO.MyComboBox(Me.components) Me.cboRolle = New DISPO.MyComboBox(Me.components)
Me.Label16 = New System.Windows.Forms.Label() Me.Button1 = New System.Windows.Forms.Button()
Me.txtTIMOCOM = New System.Windows.Forms.TextBox()
Me.tabKunde.SuspendLayout() Me.tabKunde.SuspendLayout()
Me.tab1Allg.SuspendLayout() Me.tab1Allg.SuspendLayout()
Me.GroupBox1.SuspendLayout() Me.GroupBox1.SuspendLayout()
@@ -181,6 +182,7 @@ Partial Class frmDetails
' '
'tab1Allg 'tab1Allg
' '
Me.tab1Allg.Controls.Add(Me.Button1)
Me.tab1Allg.Controls.Add(Me.txtTIMOCOM) Me.tab1Allg.Controls.Add(Me.txtTIMOCOM)
Me.tab1Allg.Controls.Add(Me.Label16) Me.tab1Allg.Controls.Add(Me.Label16)
Me.tab1Allg.Controls.Add(Me.btnVERAGKDLaden) Me.tab1Allg.Controls.Add(Me.btnVERAGKDLaden)
@@ -272,27 +274,44 @@ Partial Class frmDetails
Me.tab1Allg.Text = "Allgemein" Me.tab1Allg.Text = "Allgemein"
Me.tab1Allg.UseVisualStyleBackColor = True 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 'btnVERAGKDLaden
' '
Me.btnVERAGKDLaden.FlatStyle = System.Windows.Forms.FlatStyle.Flat 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.Name = "btnVERAGKDLaden"
Me.btnVERAGKDLaden.Size = New System.Drawing.Size(125, 23) Me.btnVERAGKDLaden.Size = New System.Drawing.Size(125, 23)
Me.btnVERAGKDLaden.TabIndex = 513 Me.btnVERAGKDLaden.TabIndex = 513
Me.btnVERAGKDLaden.Text = "VERAG KD laden" Me.btnVERAGKDLaden.Text = "AVISO KD laden"
Me.btnVERAGKDLaden.UseVisualStyleBackColor = True Me.btnVERAGKDLaden.UseVisualStyleBackColor = True
' '
'Label15 'Label15
' '
Me.Label15.AutoSize = True 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.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.TabIndex = 512
Me.Label15.Text = "VERAG-Kd:" Me.Label15.Text = "AVISO-Kd:"
' '
'kdFirma 'kdFirma
' '
Me.kdFirma._AlleFirmenCLUSTER = False
Me.kdFirma._AllowSetValue = True Me.kdFirma._AllowSetValue = True
Me.kdFirma._autoSizeGross = False Me.kdFirma._autoSizeGross = False
Me.kdFirma._display_Name1 = False Me.kdFirma._display_Name1 = False
@@ -300,19 +319,22 @@ Partial Class frmDetails
Me.kdFirma._displayFullName = False Me.kdFirma._displayFullName = False
Me.kdFirma._displayWoelflKd = False Me.kdFirma._displayWoelflKd = False
Me.kdFirma._hideIfListEmpty = True 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._ValueKdAndName = True
Me.kdFirma.dgvpos = "LEFT" Me.kdFirma.dgvpos = "LEFT"
Me.kdFirma.KdName = "" Me.kdFirma.KdName = ""
Me.kdFirma.KdNr = "-1" Me.kdFirma.KdNr = "-1"
Me.kdFirma.kdNrField = Nothing Me.kdFirma.kdNrField = Nothing
Me.kdFirma.KdNrNullInt = 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.Name = "kdFirma"
Me.kdFirma.nurAktive = True Me.kdFirma.nurAktive = True
Me.kdFirma.searchActive = True Me.kdFirma.searchActive = True
Me.kdFirma.Size = New System.Drawing.Size(296, 20) Me.kdFirma.Size = New System.Drawing.Size(296, 20)
Me.kdFirma.TabIndex = 511 Me.kdFirma.TabIndex = 511
Me.kdFirma.TIMER_SEARCH = True
Me.kdFirma.usrcntl = Nothing Me.kdFirma.usrcntl = Nothing
' '
'GroupBox1 'GroupBox1
@@ -363,7 +385,7 @@ Partial Class frmDetails
'Label27 'Label27
' '
Me.Label27.AutoSize = True 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.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(59, 13) Me.Label27.Size = New System.Drawing.Size(59, 13)
Me.Label27.TabIndex = 124 Me.Label27.TabIndex = 124
@@ -372,7 +394,7 @@ Partial Class frmDetails
'Label26 'Label26
' '
Me.Label26.AutoSize = True 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.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(49, 13) Me.Label26.Size = New System.Drawing.Size(49, 13)
Me.Label26.TabIndex = 123 Me.Label26.TabIndex = 123
@@ -380,14 +402,14 @@ Partial Class frmDetails
' '
'txtAnspr2_nn '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.Name = "txtAnspr2_nn"
Me.txtAnspr2_nn.Size = New System.Drawing.Size(145, 20) Me.txtAnspr2_nn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr2_nn.TabIndex = 9 Me.txtAnspr2_nn.TabIndex = 9
' '
'txtAnspr2_vn '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.Name = "txtAnspr2_vn"
Me.txtAnspr2_vn.Size = New System.Drawing.Size(145, 20) Me.txtAnspr2_vn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr2_vn.TabIndex = 8 Me.txtAnspr2_vn.TabIndex = 8
@@ -871,7 +893,7 @@ Partial Class frmDetails
' '
Me.Label12.AutoSize = True 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.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.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(51, 13) Me.Label12.Size = New System.Drawing.Size(51, 13)
Me.Label12.TabIndex = 69 Me.Label12.TabIndex = 69
@@ -880,7 +902,7 @@ Partial Class frmDetails
'Label8 'Label8
' '
Me.Label8.AutoSize = True 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.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(62, 13) Me.Label8.Size = New System.Drawing.Size(62, 13)
Me.Label8.TabIndex = 68 Me.Label8.TabIndex = 68
@@ -888,7 +910,7 @@ Partial Class frmDetails
' '
'txtHomepage '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.Name = "txtHomepage"
Me.txtHomepage.Size = New System.Drawing.Size(296, 20) Me.txtHomepage.Size = New System.Drawing.Size(296, 20)
Me.txtHomepage.TabIndex = 13 Me.txtHomepage.TabIndex = 13
@@ -896,7 +918,7 @@ Partial Class frmDetails
'Label11 'Label11
' '
Me.Label11.AutoSize = True 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.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(39, 13) Me.Label11.Size = New System.Drawing.Size(39, 13)
Me.Label11.TabIndex = 66 Me.Label11.TabIndex = 66
@@ -904,7 +926,7 @@ Partial Class frmDetails
' '
'txtEmail '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.Name = "txtEmail"
Me.txtEmail.Size = New System.Drawing.Size(296, 20) Me.txtEmail.Size = New System.Drawing.Size(296, 20)
Me.txtEmail.TabIndex = 12 Me.txtEmail.TabIndex = 12
@@ -912,7 +934,7 @@ Partial Class frmDetails
'Label7 'Label7
' '
Me.Label7.AutoSize = True 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.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(27, 13) Me.Label7.Size = New System.Drawing.Size(27, 13)
Me.Label7.TabIndex = 64 Me.Label7.TabIndex = 64
@@ -920,7 +942,7 @@ Partial Class frmDetails
' '
'txtFax '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.Name = "txtFax"
Me.txtFax.Size = New System.Drawing.Size(296, 20) Me.txtFax.Size = New System.Drawing.Size(296, 20)
Me.txtFax.TabIndex = 11 Me.txtFax.TabIndex = 11
@@ -928,7 +950,7 @@ Partial Class frmDetails
'Label6 'Label6
' '
Me.Label6.AutoSize = True 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.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(46, 13) Me.Label6.Size = New System.Drawing.Size(46, 13)
Me.Label6.TabIndex = 62 Me.Label6.TabIndex = 62
@@ -936,14 +958,14 @@ Partial Class frmDetails
' '
'txtTel '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.Name = "txtTel"
Me.txtTel.Size = New System.Drawing.Size(296, 20) Me.txtTel.Size = New System.Drawing.Size(296, 20)
Me.txtTel.TabIndex = 10 Me.txtTel.TabIndex = 10
' '
'txtStrNr '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.Name = "txtStrNr"
Me.txtStrNr.Size = New System.Drawing.Size(55, 20) Me.txtStrNr.Size = New System.Drawing.Size(55, 20)
Me.txtStrNr.TabIndex = 2 Me.txtStrNr.TabIndex = 2
@@ -951,7 +973,7 @@ Partial Class frmDetails
'Label10 'Label10
' '
Me.Label10.AutoSize = True 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.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(103, 13) Me.Label10.Size = New System.Drawing.Size(103, 13)
Me.Label10.TabIndex = 58 Me.Label10.TabIndex = 58
@@ -959,7 +981,7 @@ Partial Class frmDetails
' '
'txtAnspr1_nn '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.Name = "txtAnspr1_nn"
Me.txtAnspr1_nn.Size = New System.Drawing.Size(145, 20) Me.txtAnspr1_nn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr1_nn.TabIndex = 7 Me.txtAnspr1_nn.TabIndex = 7
@@ -967,7 +989,7 @@ Partial Class frmDetails
'Label5 'Label5
' '
Me.Label5.AutoSize = True 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.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(97, 13) Me.Label5.Size = New System.Drawing.Size(97, 13)
Me.Label5.TabIndex = 55 Me.Label5.TabIndex = 55
@@ -975,7 +997,7 @@ Partial Class frmDetails
' '
'txtAnspr1_vn '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.Name = "txtAnspr1_vn"
Me.txtAnspr1_vn.Size = New System.Drawing.Size(145, 20) Me.txtAnspr1_vn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr1_vn.TabIndex = 6 Me.txtAnspr1_vn.TabIndex = 6
@@ -984,14 +1006,14 @@ Partial Class frmDetails
' '
Me.cbxLand.FormattingEnabled = True Me.cbxLand.FormattingEnabled = True
Me.cbxLand.Items.AddRange(New Object() {"AT", "DE", "HR", "IT", "RO", "SRB", "TR"}) 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.Name = "cbxLand"
Me.cbxLand.Size = New System.Drawing.Size(55, 21) Me.cbxLand.Size = New System.Drawing.Size(55, 21)
Me.cbxLand.TabIndex = 5 Me.cbxLand.TabIndex = 5
' '
'txtOrt '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.Name = "txtOrt"
Me.txtOrt.Size = New System.Drawing.Size(174, 20) Me.txtOrt.Size = New System.Drawing.Size(174, 20)
Me.txtOrt.TabIndex = 4 Me.txtOrt.TabIndex = 4
@@ -999,7 +1021,7 @@ Partial Class frmDetails
'Label3 'Label3
' '
Me.Label3.AutoSize = True 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.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(90, 13) Me.Label3.Size = New System.Drawing.Size(90, 13)
Me.Label3.TabIndex = 41 Me.Label3.TabIndex = 41
@@ -1007,7 +1029,7 @@ Partial Class frmDetails
' '
'txtPlz '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.Name = "txtPlz"
Me.txtPlz.Size = New System.Drawing.Size(55, 20) Me.txtPlz.Size = New System.Drawing.Size(55, 20)
Me.txtPlz.TabIndex = 3 Me.txtPlz.TabIndex = 3
@@ -1015,7 +1037,7 @@ Partial Class frmDetails
'Label2 'Label2
' '
Me.Label2.AutoSize = True 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.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(63, 13) Me.Label2.Size = New System.Drawing.Size(63, 13)
Me.Label2.TabIndex = 39 Me.Label2.TabIndex = 39
@@ -1023,7 +1045,7 @@ Partial Class frmDetails
' '
'txtStr '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.Name = "txtStr"
Me.txtStr.Size = New System.Drawing.Size(235, 20) Me.txtStr.Size = New System.Drawing.Size(235, 20)
Me.txtStr.TabIndex = 1 Me.txtStr.TabIndex = 1
@@ -1032,7 +1054,7 @@ Partial Class frmDetails
' '
Me.Label1.AutoSize = True 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.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.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(41, 13) Me.Label1.Size = New System.Drawing.Size(41, 13)
Me.Label1.TabIndex = 37 Me.Label1.TabIndex = 37
@@ -1041,7 +1063,7 @@ Partial Class frmDetails
'txtFirma '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.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.Name = "txtFirma"
Me.txtFirma.Size = New System.Drawing.Size(296, 20) Me.txtFirma.Size = New System.Drawing.Size(296, 20)
Me.txtFirma.TabIndex = 0 Me.txtFirma.TabIndex = 0
@@ -1202,21 +1224,15 @@ Partial Class frmDetails
Me.cboRolle.Size = New System.Drawing.Size(295, 21) Me.cboRolle.Size = New System.Drawing.Size(295, 21)
Me.cboRolle.TabIndex = 511 Me.cboRolle.TabIndex = 511
' '
'Label16 'Button1
' '
Me.Label16.AutoSize = True Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Label16.Location = New System.Drawing.Point(10, 313) Me.Button1.Location = New System.Drawing.Point(283, 36)
Me.Label16.Name = "Label16" Me.Button1.Name = "Button1"
Me.Label16.Size = New System.Drawing.Size(61, 13) Me.Button1.Size = New System.Drawing.Size(125, 23)
Me.Label16.TabIndex = 515 Me.Button1.TabIndex = 517
Me.Label16.Text = "TIMOCOM:" Me.Button1.Text = "AVISO KD öffnen >>"
' Me.Button1.UseVisualStyleBackColor = True
'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
' '
'frmDetails 'frmDetails
' '
@@ -1368,4 +1384,5 @@ Partial Class frmDetails
Friend WithEvents btnVERAGKDLaden As System.Windows.Forms.Button Friend WithEvents btnVERAGKDLaden As System.Windows.Forms.Button
Friend WithEvents txtTIMOCOM As TextBox Friend WithEvents txtTIMOCOM As TextBox
Friend WithEvents Label16 As Label Friend WithEvents Label16 As Label
Friend WithEvents Button1 As Button
End Class 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 Private Sub frmDetails_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
If valueChanged = False Or closeOK Then If valueChanged = False Or closeOK Then
If mainForm = "frmMain" Then If mainForm = "frmMain" Then
frmMain.Enabled = True : frmMain.Tabelle_anzeigen() 'frmMain.Enabled = True 'frmMain.Tabelle_anzeigen()
ElseIf mainForm = "frmSearch" Then ElseIf mainForm = "frmSearch" Then
frmSearch.Tabelle_anzeigen() frmSearch.Tabelle_anzeigen()
End If 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?") Select Case MsgBox("Wollen Sie die geänderten Daten verwerfen?", vbQuestion Or vbYesNo Or vbDefaultButton2, "Änderung verwerfen?")
Case vbYes Case vbYes
If mainForm = "frmMain" Then If mainForm = "frmMain" Then
frmMain.Enabled = True : frmMain.Tabelle_anzeigen() 'frmMain.Enabled = True ' frmMain.Tabelle_anzeigen()
ElseIf mainForm = "frmSearch" Then ElseIf mainForm = "frmSearch" Then
frmSearch.Tabelle_anzeigen() frmSearch.Tabelle_anzeigen()
End If End If
@@ -142,6 +142,7 @@ Public Class frmDetails
binddata(txtHomepage, "Text", bindingDATA.bindingSource, "kd_homepage") binddata(txtHomepage, "Text", bindingDATA.bindingSource, "kd_homepage")
binddata(txtTIMOCOM, "Text", bindingDATA.bindingSource, "kd_TIMOCOM") binddata(txtTIMOCOM, "Text", bindingDATA.bindingSource, "kd_TIMOCOM")
Dim kdnr = (bindingDATA.bindingdataTable.Rows(0).Item("kd_FMZOLL_KdNr")) Dim kdnr = (bindingDATA.bindingdataTable.Rows(0).Item("kd_FMZOLL_KdNr"))
kdFirma.KdNr = If(kdnr Is DBNull.Value, -1, kdnr) kdFirma.KdNr = If(kdnr Is DBNull.Value, -1, kdnr)
@@ -604,7 +605,7 @@ Public Class frmDetails
If txtFirma.Text = "" Then If txtFirma.Text = "" Then
MsgBox("Bitte geben Sie ein Kürzel an!") : val = False MsgBox("Bitte geben Sie ein Kürzel an!") : val = False
ElseIf cOptionenDAL.insertKunden(entry) Then ElseIf cOptionenDAL.insertKunden(entry) Then
frmMain.Tabelle_anzeigen() 'frmMain.Tabelle_anzeigen()
closeOK = True closeOK = True
Me.Close() Me.Close()
End If End If
@@ -718,7 +719,7 @@ Public Class frmDetails
If txtFirma.Text = "" Then If txtFirma.Text = "" Then
MsgBox("Bitte geben Sie ein Kürzel an!") : val = False MsgBox("Bitte geben Sie ein Kürzel an!") : val = False
ElseIf cOptionenDAL.updateKunden(k) Then ElseIf cOptionenDAL.updateKunden(k) Then
frmMain.Tabelle_anzeigen() 'frmMain.Tabelle_anzeigen()
closeOK = True closeOK = True
Me.Close() Me.Close()
End If End If
@@ -1059,5 +1060,36 @@ Public Class frmDetails
End If End If
End Sub 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 End Class

2
UID/frmFrachtkosten.vb
View File

@@ -234,7 +234,7 @@ Public Class frmFrachtkosten
cFrachtkosten.frtkst_provision = txtFirmaProvision.Text cFrachtkosten.frtkst_provision = txtFirmaProvision.Text
cFrachtkostenSQL.setFrachtkosten(cFrachtkosten) cFrachtkostenSQL.setFrachtkosten(cFrachtkosten)
End If End If
frmMain.Tabelle_anzeigen() 'frmMain.Tabelle_anzeigen()
End Sub End Sub
Private Sub dgvFrachtkosten_CellLeave(sender As Object, e As DataGridViewCellEventArgs) Handles dgvFrachtkosten.CellValidated 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 Public frachtfirma_id As Integer = -1
Private Sub frmFrachtkostenNew_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed Private Sub frmFrachtkostenNew_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed
frmMain.BringToFront() frmMainV2.BringToFront()
End Sub End Sub
Private Sub frmFrachtkostenNew_Load(sender As Object, e As EventArgs) Handles Me.Load Private Sub frmFrachtkostenNew_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim firmen As List(Of cFrachtkostenFirmen) = cFrachtkostenSQL.getAllFirmen() Dim firmen As List(Of cFrachtkostenFirmen) = cFrachtkostenSQL.getAllFirmen()
@@ -25,6 +25,7 @@
End Sub End Sub
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
Dim cFrachtkosten As New cFrachtkosten Dim cFrachtkosten As New cFrachtkosten
Dim oItem As MyListItem = CType(cboFirmen.SelectedItem, MyListItem) Dim oItem As MyListItem = CType(cboFirmen.SelectedItem, MyListItem)
If cboFirmen.Items.Count > 0 AndAlso cboFirmen.SelectedIndex >= 0 AndAlso IsNumeric(oItem.Value) Then If cboFirmen.Items.Count > 0 AndAlso cboFirmen.SelectedIndex >= 0 AndAlso IsNumeric(oItem.Value) Then
@@ -34,7 +35,7 @@
cFrachtkosten.frtkst_provision = txtFirmaProvision.Text cFrachtkosten.frtkst_provision = txtFirmaProvision.Text
If cFrachtkostenSQL.setFrachtkosten(cFrachtkosten) Then Me.Close() If cFrachtkostenSQL.setFrachtkosten(cFrachtkosten) Then Me.Close()
End If End If
frmMain.Tabelle_anzeigen() 'frmMain.Tabelle_anzeigen()
End Sub End Sub
Private Sub cboFirmen_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboFirmen.SelectedIndexChanged 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 ConnStrInfo As String
Public ConnStr As String Public ConnStr As String
' Public USRNAME As String ' Public USRNAME As String
@@ -6,42 +11,109 @@
Private UID As New cOptionenDAL Private UID As New cOptionenDAL
Private SDL As New SDL.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 sAppPath As String = Application.StartupPath
Public firma As String = "VERAG"
Public TESTSYSTEM As Boolean = False Public TESTSYSTEM As Boolean = False
Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click 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.PROGNAME = "DISPO"
VERAG_PROG_ALLGEMEIN.cAllgemein.PROGVERSION = My.Resources.Version VERAG_PROG_ALLGEMEIN.cAllgemein.PROGVERSION = Application.ProductVersion
VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGIN() VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGIN()
AddHandler frmMain.FormClosed, Sub() 'AddHandler frmMain.FormClosed, Sub()
VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGOUT() ' VERAG_PROG_ALLGEMEIN.cAllgemein.SESSION.LOGOUT()
Me.Close() ' Me.Close()
End Sub ' End Sub
'frmMain.Show() 'frmMain.Show()
frmMainV2.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 Private Sub frmLogin_Load(sender As Object, e As EventArgs) Handles Me.Load
'If sAppPath Like "*\bin\Debug" Then 'If sAppPath Like "*\bin\Debug" Then
' txtUser.Text = "sebastian" ' txtUser.Text = "sebastian"
' txtPwd.Text = "verag#3" ' txtPwd.Text = "verag#3"
'End If '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 If TESTSYSTEM Then lblTestsystem.Visible = True
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = TESTSYSTEM VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = TESTSYSTEM
'Dim tmp As String 'Dim tmp As String
lblVersion.Text = lblVersion.Text & " " & My.Resources.Version lblVersion.Text = lblVersion.Text & " " & Application.ProductVersion
Me.Show() Me.Show()
txtUser.Focus() txtUser.Focus()
lblAlertTxt.Visible = False lblAlertTxt.Visible = False
@@ -102,7 +174,27 @@
txtPwd.Text = "verag#3" txtPwd.Text = "verag#3"
End If End If
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 End Sub
Sub initstart() Sub initstart()
@@ -117,6 +209,17 @@
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = TESTSYSTEM 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 = "" ' txtSachbear.Text = ""
'txtKennwort.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 End Sub
Private Sub frmMainV2_Load(sender As Object, e As EventArgs) Handles MyBase.Load 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() cUserSettings.load()
ShowChat() ShowChat()
btnAuftraege.PerformClick() 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.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TRANSPORT", "TRANSPORT"))
cboAuftragsart.changeItem("ALLE") cboAuftragsart.changeItem("ALLE")
cboFiliale.Items.Clear() 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("ALLE", ""))
cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUBEN", "4807")) cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUBEN", "4807"))
cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEUHAUS", "4819")) cboFiliale.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEUHAUS", "4819"))
@@ -90,6 +96,17 @@ where "
Case "NEU" : cboFiliale.changeItem("4819") : Niederlassung = "4819" Case "NEU" : cboFiliale.changeItem("4819") : Niederlassung = "4819"
Case Else : cboFiliale.changeItem("4807") : Niederlassung = "4807" Case Else : cboFiliale.changeItem("4807") : Niederlassung = "4807"
End Select 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() DateBIS.Value = Now()
DateVON.Value = Now.AddYears(-1).AddDays(1) 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 If cboLand.SelectedItem IsNot "" And cboLand.SelectedItem IsNot "-" And cboLand.SelectedItem IsNot Nothing Then
where &= " AND kd_land = '" & cboLand.SelectedItem & "'" where &= " AND kd_land = '" & cboLand.SelectedItem & "'"
End If End If
where &= " AND kd_AVISOfirma= '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'"
'Else 'Else
' If cboRolle._value IsNot "-1" And cboRolle._value IsNot "" Then ' If cboRolle._value IsNot "-1" And cboRolle._value IsNot "" Then
' where &= " WHERE kd_rolle = '" & cboRolle._value & "'" ' where &= " WHERE kd_rolle = '" & cboRolle._value & "'"

2
UID/frmMain/usrcntlFrachtkosten.vb
View File

@@ -22,7 +22,7 @@ Public Class usrcntlFrachtkosten
End Sub End Sub
Public Sub showDGVFrachtkosten() Public Sub showDGVFrachtkosten()
Dim where As String = "" Dim where As String = " AND frtkst_AVISOfirma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' "
Dim search As String = "" Dim search As String = ""
Dim start As Long = (DateTime.Now - New DateTime(1970, 1, 1)).TotalMilliseconds 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;" tmp = "Provider=SQLOLEDB;Server=DEVELOPER\DEVSQL;Database=UID;"
ConnStr = frmMain.ConnStr ' ConnStr = old_frmMain.ConnStr
Try Try
' Me.Size = My.Settings.frmMainSize ' Me.Size = My.Settings.frmMainSize

9
UID/frmSearch.vb
View File

@@ -31,7 +31,7 @@ Public Class frmSearch
'je nach Auswahl SQL anpassen '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 " 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 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 If txtSuche.Text <> "" Then
'where += " kd_firma LIKE '%" & search & "%'" 'where += " kd_firma LIKE '%" & search & "%'"
@@ -44,14 +44,15 @@ Public Class frmSearch
Dim or_txt As String = "" Dim or_txt As String = ""
For i As Integer = 0 To cnt - 1 Step 1 For i As Integer = 0 To cnt - 1 Step 1
If arr(i) <> "" Then search = arr(i).Trim If arr(i) <> "" Then search = arr(i).Trim
If i > 0 Then where += " AND " ' 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 & "%' ) " 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 Next
where = " WHERE " & where 'where = " WHERE " & where
End If End If
' MsgBox(hSQL + where) ' MsgBox(hSQL + where)
dgvUID.DataSource = UID.AnzeigeTabelle(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, 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, 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, 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.txt12_4, 6, 3)
Me.TableLayoutPanel1.Controls.Add(Me.txt11_4, 5, 3) Me.TableLayoutPanel1.Controls.Add(Me.txt11_4, 5, 3)
Me.TableLayoutPanel1.Controls.Add(Me.txt10_4, 4, 3) Me.TableLayoutPanel1.Controls.Add(Me.txt10_4, 4, 3)
@@ -325,42 +325,42 @@ Partial Class frmTransportauftrag
' '
'txt12_4 '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.Name = "txt12_4"
Me.txt12_4.Size = New System.Drawing.Size(66, 20) Me.txt12_4.Size = New System.Drawing.Size(66, 20)
Me.txt12_4.TabIndex = 27 Me.txt12_4.TabIndex = 27
' '
'txt11_4 '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.Name = "txt11_4"
Me.txt11_4.Size = New System.Drawing.Size(63, 20) Me.txt11_4.Size = New System.Drawing.Size(63, 20)
Me.txt11_4.TabIndex = 26 Me.txt11_4.TabIndex = 26
' '
'txt10_4 '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.Name = "txt10_4"
Me.txt10_4.Size = New System.Drawing.Size(52, 20) Me.txt10_4.Size = New System.Drawing.Size(52, 20)
Me.txt10_4.TabIndex = 25 Me.txt10_4.TabIndex = 25
' '
'txt9_4 '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.Name = "txt9_4"
Me.txt9_4.Size = New System.Drawing.Size(73, 20) Me.txt9_4.Size = New System.Drawing.Size(73, 20)
Me.txt9_4.TabIndex = 24 Me.txt9_4.TabIndex = 24
' '
'txt8_4 '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.Name = "txt8_4"
Me.txt8_4.Size = New System.Drawing.Size(82, 20) Me.txt8_4.Size = New System.Drawing.Size(82, 20)
Me.txt8_4.TabIndex = 23 Me.txt8_4.TabIndex = 23
' '
'txt7_4 '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.Name = "txt7_4"
Me.txt7_4.Size = New System.Drawing.Size(42, 20) Me.txt7_4.Size = New System.Drawing.Size(42, 20)
Me.txt7_4.TabIndex = 22 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.Location = New System.Drawing.Point(3, 69)
Me.txt6_4.Name = "txt6_4" 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 Me.txt6_4.TabIndex = 21
' '
'txt12_3 '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.Name = "txt12_3"
Me.txt12_3.Size = New System.Drawing.Size(66, 20) Me.txt12_3.Size = New System.Drawing.Size(66, 20)
Me.txt12_3.TabIndex = 20 Me.txt12_3.TabIndex = 20
' '
'txt10_3 '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.Name = "txt10_3"
Me.txt10_3.Size = New System.Drawing.Size(52, 20) Me.txt10_3.Size = New System.Drawing.Size(52, 20)
Me.txt10_3.TabIndex = 18 Me.txt10_3.TabIndex = 18
' '
'txt9_3 '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.Name = "txt9_3"
Me.txt9_3.Size = New System.Drawing.Size(73, 20) Me.txt9_3.Size = New System.Drawing.Size(73, 20)
Me.txt9_3.TabIndex = 17 Me.txt9_3.TabIndex = 17
' '
'txt8_3 '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.Name = "txt8_3"
Me.txt8_3.Size = New System.Drawing.Size(82, 20) Me.txt8_3.Size = New System.Drawing.Size(82, 20)
Me.txt8_3.TabIndex = 16 Me.txt8_3.TabIndex = 16
' '
'txt7_3 '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.Name = "txt7_3"
Me.txt7_3.Size = New System.Drawing.Size(42, 20) Me.txt7_3.Size = New System.Drawing.Size(42, 20)
Me.txt7_3.TabIndex = 15 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.Location = New System.Drawing.Point(3, 49)
Me.txt6_3.Name = "txt6_3" 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 Me.txt6_3.TabIndex = 14
' '
'txt12_2 '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.Name = "txt12_2"
Me.txt12_2.Size = New System.Drawing.Size(66, 20) Me.txt12_2.Size = New System.Drawing.Size(66, 20)
Me.txt12_2.TabIndex = 13 Me.txt12_2.TabIndex = 13
' '
'txt11_2 '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.Name = "txt11_2"
Me.txt11_2.Size = New System.Drawing.Size(63, 20) Me.txt11_2.Size = New System.Drawing.Size(63, 20)
Me.txt11_2.TabIndex = 12 Me.txt11_2.TabIndex = 12
' '
'txt10_2 '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.Name = "txt10_2"
Me.txt10_2.Size = New System.Drawing.Size(52, 20) Me.txt10_2.Size = New System.Drawing.Size(52, 20)
Me.txt10_2.TabIndex = 11 Me.txt10_2.TabIndex = 11
' '
'txt9_2 '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.Name = "txt9_2"
Me.txt9_2.Size = New System.Drawing.Size(73, 20) Me.txt9_2.Size = New System.Drawing.Size(73, 20)
Me.txt9_2.TabIndex = 10 Me.txt9_2.TabIndex = 10
' '
'txt8_2 '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.Name = "txt8_2"
Me.txt8_2.Size = New System.Drawing.Size(82, 20) Me.txt8_2.Size = New System.Drawing.Size(82, 20)
Me.txt8_2.TabIndex = 9 Me.txt8_2.TabIndex = 9
' '
'txt7_2 '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.Name = "txt7_2"
Me.txt7_2.Size = New System.Drawing.Size(42, 20) Me.txt7_2.Size = New System.Drawing.Size(42, 20)
Me.txt7_2.TabIndex = 8 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.Location = New System.Drawing.Point(3, 26)
Me.txt6_2.Name = "txt6_2" 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 Me.txt6_2.TabIndex = 7
' '
'txt12_1 '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.Name = "txt12_1"
Me.txt12_1.Size = New System.Drawing.Size(66, 20) Me.txt12_1.Size = New System.Drawing.Size(66, 20)
Me.txt12_1.TabIndex = 6 Me.txt12_1.TabIndex = 6
' '
'txt11_1 '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.Name = "txt11_1"
Me.txt11_1.Size = New System.Drawing.Size(63, 20) Me.txt11_1.Size = New System.Drawing.Size(63, 20)
Me.txt11_1.TabIndex = 5 Me.txt11_1.TabIndex = 5
' '
'txt10_1 '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.Name = "txt10_1"
Me.txt10_1.Size = New System.Drawing.Size(52, 20) Me.txt10_1.Size = New System.Drawing.Size(52, 20)
Me.txt10_1.TabIndex = 4 Me.txt10_1.TabIndex = 4
' '
'txt9_1 '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.Name = "txt9_1"
Me.txt9_1.Size = New System.Drawing.Size(73, 20) Me.txt9_1.Size = New System.Drawing.Size(73, 20)
Me.txt9_1.TabIndex = 3 Me.txt9_1.TabIndex = 3
' '
'txt8_1 '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.Name = "txt8_1"
Me.txt8_1.Size = New System.Drawing.Size(82, 20) Me.txt8_1.Size = New System.Drawing.Size(82, 20)
Me.txt8_1.TabIndex = 2 Me.txt8_1.TabIndex = 2
' '
'txt7_1 '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.Name = "txt7_1"
Me.txt7_1.Size = New System.Drawing.Size(42, 20) Me.txt7_1.Size = New System.Drawing.Size(42, 20)
Me.txt7_1.TabIndex = 1 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.Location = New System.Drawing.Point(3, 3)
Me.txt6_1.Name = "txt6_1" 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 Me.txt6_1.TabIndex = 0
' '
'txt11_3 '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.Name = "txt11_3"
Me.txt11_3.Size = New System.Drawing.Size(63, 20) Me.txt11_3.Size = New System.Drawing.Size(63, 20)
Me.txt11_3.TabIndex = 19 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 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 Dim sumAuftraggeber As Double = 0
sumAuftraggeber += If(IsNumeric(Me.txtAuftraggeber_Entladung.Text), Me.txtAuftraggeber_Entladung.Text, 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) 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 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> DCoBAAAAAAAgsf8vwACzvB4PfnEdHAAAAABJRU5ErkJggg==</ImageData>
</EmbeddedImage> </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> </EmbeddedImages>
<Language>de-AT</Language> <Language>de-AT</Language>
<rd:ReportUnitType>Cm</rd:ReportUnitType> <rd:ReportUnitType>Cm</rd:ReportUnitType>