neu
This commit is contained in:
211
AVISO_INFO/AVISO_INFO.vbproj
Normal file
211
AVISO_INFO/AVISO_INFO.vbproj
Normal file
@@ -0,0 +1,211 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProjectGuid>{A734141E-2C4E-4D70-81E8-A88184282AF5}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>AVISO_INFO.My.MyApplication</StartupObject>
|
||||
<RootNamespace>AVISO_INFO</RootNamespace>
|
||||
<AssemblyName>AVISO_INFO</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.7</TargetFrameworkVersion>
|
||||
<Deterministic>true</Deterministic>
|
||||
<TargetFrameworkProfile />
|
||||
<NuGetPackageImportStamp>
|
||||
</NuGetPackageImportStamp>
|
||||
<IsWebBootstrapper>true</IsWebBootstrapper>
|
||||
<PublishUrl>\\ftps.verag.ag\g\ftp\programme\AVISO_INFO\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Web</InstallFrom>
|
||||
<UpdateEnabled>true</UpdateEnabled>
|
||||
<UpdateMode>Foreground</UpdateMode>
|
||||
<UpdateInterval>7</UpdateInterval>
|
||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
||||
<UpdatePeriodically>false</UpdatePeriodically>
|
||||
<UpdateRequired>false</UpdateRequired>
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<InstallUrl>http://ftps.verag.ag/AVISO_INFO/</InstallUrl>
|
||||
<CreateWebPageOnPublish>true</CreateWebPageOnPublish>
|
||||
<WebPage>publish.htm</WebPage>
|
||||
<ApplicationRevision>4</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<PublishWizardCompleted>true</PublishWizardCompleted>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>x64</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>AVISO_INFO.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DocumentationFile>AVISO_INFO.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationIcon>aviso.ico</ApplicationIcon>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ManifestCertificateThumbprint>9D59777AB77A758BD3CBA1B39EAE25EC16C09CA2</ManifestCertificateThumbprint>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ManifestKeyFile>AVISO_INFO_TemporaryKey.pfx</ManifestKeyFile>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<GenerateManifests>true</GenerateManifests>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<SignManifests>true</SignManifests>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Design" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xaml" />
|
||||
<Reference Include="System.Xml" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
<Reference Include="System.Net.Http" />
|
||||
<Reference Include="WindowsBase" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="AVISO_INFO" />
|
||||
<Import Include="Microsoft.Toolkit.Forms.UI.Controls" />
|
||||
<Import Include="Microsoft.Toolkit.UI.Controls" />
|
||||
<Import Include="Microsoft.Toolkit.Win32.UI.Controls" />
|
||||
<Import Include="Microsoft.Toolkit.Win32.UI.Controls.Interop.WinRT" />
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
<Import Include="System" />
|
||||
<Import Include="System.Collections" />
|
||||
<Import Include="System.Collections.Generic" />
|
||||
<Import Include="System.Drawing" />
|
||||
<Import Include="System.Diagnostics" />
|
||||
<Import Include="System.Windows.Forms" />
|
||||
<Import Include="System.Linq" />
|
||||
<Import Include="System.Xml.Linq" />
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="frmInfo.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmInfo.Designer.vb">
|
||||
<DependentUpon>frmInfo.vb</DependentUpon>
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Resources.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Settings.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<EmbeddedResource Include="frmInfo.resx">
|
||||
<DependentUpon>frmInfo.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="AVISO_INFO_TemporaryKey.pfx" />
|
||||
<None Include="My Project\Application.myapp">
|
||||
<Generator>MyApplicationCodeGenerator</Generator>
|
||||
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="My Project\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<CustomToolNamespace>My</CustomToolNamespace>
|
||||
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="App.config" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\lan_de.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\timer.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\handy_QR.jpg" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\qr_search.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<PackageReference Include="Microsoft.Toolkit.Forms.UI.Controls.WebView">
|
||||
<Version>6.0.0</Version>
|
||||
</PackageReference>
|
||||
<PackageReference Include="Microsoft.Windows.SDK.Contracts">
|
||||
<Version>10.0.19041.1-preview.vb-release</Version>
|
||||
</PackageReference>
|
||||
<PackageReference Include="System.Runtime.WindowsRuntime">
|
||||
<Version>4.7.0</Version>
|
||||
</PackageReference>
|
||||
<PackageReference Include="System.Runtime.WindowsRuntime.UI.Xaml">
|
||||
<Version>4.7.0</Version>
|
||||
</PackageReference>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Content Include="aviso.ico" />
|
||||
<None Include="Resources\flag_srb2.png" />
|
||||
<None Include="Resources\flag_tr.png" />
|
||||
<None Include="Resources\flag_srb.png" />
|
||||
<None Include="Resources\lan_eng.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include=".NETFramework,Version=v4.7">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>Microsoft .NET Framework 4.7 %28x86 und x64%29</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.5 SP1</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
</Project>
|
||||
6
AVISO_INFO/App.config
Normal file
6
AVISO_INFO/App.config
Normal file
@@ -0,0 +1,6 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<configuration>
|
||||
<startup>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7"/>
|
||||
</startup>
|
||||
</configuration>
|
||||
38
AVISO_INFO/My Project/Application.Designer.vb
generated
Normal file
38
AVISO_INFO/My Project/Application.Designer.vb
generated
Normal file
@@ -0,0 +1,38 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden. Wenn Sie Änderungen vornehmen möchten
|
||||
' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
|
||||
' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
|
||||
' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
|
||||
'
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Public Sub New()
|
||||
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
|
||||
Me.IsSingleInstance = false
|
||||
Me.EnableVisualStyles = false
|
||||
Me.SaveMySettingsOnExit = true
|
||||
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Protected Overrides Sub OnCreateMainForm()
|
||||
Me.MainForm = Global.AVISO_INFO.frmInfo
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
10
AVISO_INFO/My Project/Application.myapp
Normal file
10
AVISO_INFO/My Project/Application.myapp
Normal file
@@ -0,0 +1,10 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>frmInfo</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>false</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
||||
35
AVISO_INFO/My Project/AssemblyInfo.vb
Normal file
35
AVISO_INFO/My Project/AssemblyInfo.vb
Normal file
@@ -0,0 +1,35 @@
|
||||
Imports System
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
' Allgemeine Informationen über eine Assembly werden über die folgenden
|
||||
' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
|
||||
' die einer Assembly zugeordnet sind.
|
||||
|
||||
' Werte der Assemblyattribute überprüfen
|
||||
|
||||
<Assembly: AssemblyTitle("AVISO_INFO")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("AVISO_INFO")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2020")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
|
||||
<Assembly: Guid("a1cc3d6c-2f32-42bf-ab74-d65a06593798")>
|
||||
|
||||
' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
|
||||
'
|
||||
' Hauptversion
|
||||
' Nebenversion
|
||||
' Buildnummer
|
||||
' Revision
|
||||
'
|
||||
' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.0.0.0")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
143
AVISO_INFO/My Project/Resources.Designer.vb
generated
Normal file
143
AVISO_INFO/My Project/Resources.Designer.vb
generated
Normal file
@@ -0,0 +1,143 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
|
||||
'-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
|
||||
'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
|
||||
'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
|
||||
'''<summary>
|
||||
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||
Friend Module Resources
|
||||
|
||||
Private resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
'''<summary>
|
||||
''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("AVISO_INFO.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
|
||||
''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property flag_srb() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("flag_srb", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property flag_srb2() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("flag_srb2", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property flag_tr() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("flag_tr", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property handy_QR() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("handy_QR", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property lan_de() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("lan_de", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property lan_eng() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("lan_eng", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property qr_search() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("qr_search", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property timer() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("timer", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
145
AVISO_INFO/My Project/Resources.resx
Normal file
145
AVISO_INFO/My Project/Resources.resx
Normal file
@@ -0,0 +1,145 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="lan_de" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\lan_de.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="flag_srb" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\flag_srb.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="timer" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\timer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="qr_search" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\qr_search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="lan_eng" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\lan_eng.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="handy_QR" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\handy_QR.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="flag_tr" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\flag_tr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="flag_srb2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\flag_srb2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
73
AVISO_INFO/My Project/Settings.Designer.vb
generated
Normal file
73
AVISO_INFO/My Project/Settings.Designer.vb
generated
Normal file
@@ -0,0 +1,73 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.9.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
|
||||
#Region "Automatische My.Settings-Speicherfunktion"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
Public Shared ReadOnly Property [Default]() As MySettings
|
||||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
Friend ReadOnly Property Settings() As Global.AVISO_INFO.My.MySettings
|
||||
Get
|
||||
Return Global.AVISO_INFO.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
7
AVISO_INFO/My Project/Settings.settings
Normal file
7
AVISO_INFO/My Project/Settings.settings
Normal file
@@ -0,0 +1,7 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
|
||||
<Profiles>
|
||||
<Profile Name="(Default)" />
|
||||
</Profiles>
|
||||
<Settings />
|
||||
</SettingsFile>
|
||||
BIN
AVISO_INFO/Resources/flag_srb.png
Normal file
BIN
AVISO_INFO/Resources/flag_srb.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 311 KiB |
BIN
AVISO_INFO/Resources/flag_srb2.png
Normal file
BIN
AVISO_INFO/Resources/flag_srb2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 100 KiB |
BIN
AVISO_INFO/Resources/flag_tr.png
Normal file
BIN
AVISO_INFO/Resources/flag_tr.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 41 KiB |
BIN
AVISO_INFO/Resources/handy_QR.jpg
Normal file
BIN
AVISO_INFO/Resources/handy_QR.jpg
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 54 KiB |
BIN
AVISO_INFO/Resources/lan_de.png
Normal file
BIN
AVISO_INFO/Resources/lan_de.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 2.4 KiB |
BIN
AVISO_INFO/Resources/lan_eng.png
Normal file
BIN
AVISO_INFO/Resources/lan_eng.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.6 KiB |
BIN
AVISO_INFO/Resources/qr_search.png
Normal file
BIN
AVISO_INFO/Resources/qr_search.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 29 KiB |
BIN
AVISO_INFO/Resources/timer.png
Normal file
BIN
AVISO_INFO/Resources/timer.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 21 KiB |
BIN
AVISO_INFO/aviso.ico
Normal file
BIN
AVISO_INFO/aviso.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 66 KiB |
372
AVISO_INFO/frmInfo.Designer.vb
generated
Normal file
372
AVISO_INFO/frmInfo.Designer.vb
generated
Normal file
@@ -0,0 +1,372 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmInfo
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmInfo))
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.WebView1 = New Microsoft.Toolkit.Forms.UI.Controls.WebView()
|
||||
Me.WebBrowser = New System.Windows.Forms.WebBrowser()
|
||||
Me.WebBrowser1 = New System.Windows.Forms.WebBrowser()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
|
||||
Me.btnResetSearch = New System.Windows.Forms.Button()
|
||||
Me.Panel2 = New System.Windows.Forms.Panel()
|
||||
Me.pic = New System.Windows.Forms.PictureBox()
|
||||
Me.lblClock = New System.Windows.Forms.Label()
|
||||
Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel()
|
||||
Me.btn = New System.Windows.Forms.Button()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.MyTextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.Panel = New System.Windows.Forms.Panel()
|
||||
Me.Timer = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.timerResetDefault = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Panel3 = New System.Windows.Forms.Panel()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.WebView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel1.SuspendLayout()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel2.SuspendLayout()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.FlowLayoutPanel.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.BackColor = System.Drawing.Color.White
|
||||
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnl.Controls.Add(Me.Panel3)
|
||||
Me.pnl.Controls.Add(Me.WebBrowser)
|
||||
Me.pnl.Controls.Add(Me.WebBrowser1)
|
||||
Me.pnl.Controls.Add(Me.Panel1)
|
||||
Me.pnl.Controls.Add(Me.Panel)
|
||||
Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(1388, 559)
|
||||
Me.pnl.TabIndex = 1
|
||||
'
|
||||
'WebView1
|
||||
'
|
||||
Me.WebView1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.WebView1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.WebView1.MinimumSize = New System.Drawing.Size(20, 20)
|
||||
Me.WebView1.Name = "WebView1"
|
||||
Me.WebView1.Size = New System.Drawing.Size(1386, 398)
|
||||
Me.WebView1.TabIndex = 7
|
||||
'
|
||||
'WebBrowser
|
||||
'
|
||||
Me.WebBrowser.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.WebBrowser.Location = New System.Drawing.Point(0, 129)
|
||||
Me.WebBrowser.MinimumSize = New System.Drawing.Size(20, 20)
|
||||
Me.WebBrowser.Name = "WebBrowser"
|
||||
Me.WebBrowser.Size = New System.Drawing.Size(1386, 398)
|
||||
Me.WebBrowser.TabIndex = 6
|
||||
'
|
||||
'WebBrowser1
|
||||
'
|
||||
Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.WebBrowser1.Location = New System.Drawing.Point(0, 129)
|
||||
Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
|
||||
Me.WebBrowser1.Name = "WebBrowser1"
|
||||
Me.WebBrowser1.Size = New System.Drawing.Size(1386, 398)
|
||||
Me.WebBrowser1.TabIndex = 5
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel1.Controls.Add(Me.PictureBox1)
|
||||
Me.Panel1.Controls.Add(Me.btnResetSearch)
|
||||
Me.Panel1.Controls.Add(Me.Panel2)
|
||||
Me.Panel1.Controls.Add(Me.FlowLayoutPanel)
|
||||
Me.Panel1.Controls.Add(Me.MyTextBox1)
|
||||
Me.Panel1.Controls.Add(Me.lbl)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(1386, 129)
|
||||
Me.Panel1.TabIndex = 2
|
||||
'
|
||||
'PictureBox1
|
||||
'
|
||||
Me.PictureBox1.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.qr_search
|
||||
Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.PictureBox1.Location = New System.Drawing.Point(3, 6)
|
||||
Me.PictureBox1.Name = "PictureBox1"
|
||||
Me.PictureBox1.Size = New System.Drawing.Size(129, 104)
|
||||
Me.PictureBox1.TabIndex = 6
|
||||
Me.PictureBox1.TabStop = False
|
||||
'
|
||||
'btnResetSearch
|
||||
'
|
||||
Me.btnResetSearch.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnResetSearch.BackColor = System.Drawing.Color.FromArgb(CType(CType(210, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
|
||||
Me.btnResetSearch.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.btnResetSearch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnResetSearch.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!)
|
||||
Me.btnResetSearch.ForeColor = System.Drawing.Color.White
|
||||
Me.btnResetSearch.Location = New System.Drawing.Point(581, 3)
|
||||
Me.btnResetSearch.Name = "btnResetSearch"
|
||||
Me.btnResetSearch.Size = New System.Drawing.Size(251, 51)
|
||||
Me.btnResetSearch.TabIndex = 1
|
||||
Me.btnResetSearch.Text = "X Suche zurücksetzen"
|
||||
Me.btnResetSearch.UseVisualStyleBackColor = False
|
||||
Me.btnResetSearch.Visible = False
|
||||
'
|
||||
'Panel2
|
||||
'
|
||||
Me.Panel2.BackColor = System.Drawing.Color.Gold
|
||||
Me.Panel2.Controls.Add(Me.pic)
|
||||
Me.Panel2.Controls.Add(Me.lblClock)
|
||||
Me.Panel2.Location = New System.Drawing.Point(134, 10)
|
||||
Me.Panel2.Name = "Panel2"
|
||||
Me.Panel2.Size = New System.Drawing.Size(96, 47)
|
||||
Me.Panel2.TabIndex = 3
|
||||
Me.Panel2.Visible = False
|
||||
'
|
||||
'pic
|
||||
'
|
||||
Me.pic.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.timer
|
||||
Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.pic.Location = New System.Drawing.Point(4, 4)
|
||||
Me.pic.Name = "pic"
|
||||
Me.pic.Size = New System.Drawing.Size(44, 39)
|
||||
Me.pic.TabIndex = 5
|
||||
Me.pic.TabStop = False
|
||||
'
|
||||
'lblClock
|
||||
'
|
||||
Me.lblClock.AutoSize = True
|
||||
Me.lblClock.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblClock.Location = New System.Drawing.Point(45, 8)
|
||||
Me.lblClock.Name = "lblClock"
|
||||
Me.lblClock.Size = New System.Drawing.Size(46, 31)
|
||||
Me.lblClock.TabIndex = 4
|
||||
Me.lblClock.Text = "10"
|
||||
'
|
||||
'FlowLayoutPanel
|
||||
'
|
||||
Me.FlowLayoutPanel.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.FlowLayoutPanel.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.FlowLayoutPanel.Controls.Add(Me.btn)
|
||||
Me.FlowLayoutPanel.Controls.Add(Me.Button1)
|
||||
Me.FlowLayoutPanel.Controls.Add(Me.Button2)
|
||||
Me.FlowLayoutPanel.Controls.Add(Me.Button4)
|
||||
Me.FlowLayoutPanel.Controls.Add(Me.Button5)
|
||||
Me.FlowLayoutPanel.Controls.Add(Me.Button3)
|
||||
Me.FlowLayoutPanel.Location = New System.Drawing.Point(884, 3)
|
||||
Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
|
||||
Me.FlowLayoutPanel.Size = New System.Drawing.Size(491, 75)
|
||||
Me.FlowLayoutPanel.TabIndex = 2
|
||||
'
|
||||
'btn
|
||||
'
|
||||
Me.btn.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.lan_de
|
||||
Me.btn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn.ForeColor = System.Drawing.Color.AliceBlue
|
||||
Me.btn.Location = New System.Drawing.Point(3, 3)
|
||||
Me.btn.Name = "btn"
|
||||
Me.btn.Size = New System.Drawing.Size(75, 63)
|
||||
Me.btn.TabIndex = 0
|
||||
Me.btn.Tag = "DE"
|
||||
Me.btn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.lan_eng
|
||||
Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.ForeColor = System.Drawing.Color.AliceBlue
|
||||
Me.Button1.Location = New System.Drawing.Point(84, 3)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(75, 63)
|
||||
Me.Button1.TabIndex = 1
|
||||
Me.Button1.Tag = "EN"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.flag_srb2
|
||||
Me.Button2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.ForeColor = System.Drawing.Color.AliceBlue
|
||||
Me.Button2.Location = New System.Drawing.Point(165, 3)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(75, 63)
|
||||
Me.Button2.TabIndex = 2
|
||||
Me.Button2.Tag = "SRB"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.ForeColor = System.Drawing.Color.AliceBlue
|
||||
Me.Button4.Location = New System.Drawing.Point(246, 3)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(75, 63)
|
||||
Me.Button4.TabIndex = 4
|
||||
Me.Button4.Tag = "RUS"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
Me.Button4.Visible = False
|
||||
'
|
||||
'Button5
|
||||
'
|
||||
Me.Button5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button5.ForeColor = System.Drawing.Color.AliceBlue
|
||||
Me.Button5.Location = New System.Drawing.Point(327, 3)
|
||||
Me.Button5.Name = "Button5"
|
||||
Me.Button5.Size = New System.Drawing.Size(75, 63)
|
||||
Me.Button5.TabIndex = 5
|
||||
Me.Button5.Tag = "BG"
|
||||
Me.Button5.UseVisualStyleBackColor = True
|
||||
Me.Button5.Visible = False
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.BackgroundImage = Global.AVISO_INFO.My.Resources.Resources.flag_tr
|
||||
Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.AliceBlue
|
||||
Me.Button3.Location = New System.Drawing.Point(408, 3)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(75, 63)
|
||||
Me.Button3.TabIndex = 3
|
||||
Me.Button3.Tag = "TR"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyTextBox1
|
||||
'
|
||||
Me.MyTextBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.MyTextBox1.Location = New System.Drawing.Point(134, 90)
|
||||
Me.MyTextBox1.Name = "MyTextBox1"
|
||||
Me.MyTextBox1.Size = New System.Drawing.Size(698, 20)
|
||||
Me.MyTextBox1.TabIndex = 7
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
||||
Me.lbl.Location = New System.Drawing.Point(130, 61)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(240, 20)
|
||||
Me.lbl.TabIndex = 0
|
||||
Me.lbl.Text = "Bitte scannen Sie den QR-Code:"
|
||||
'
|
||||
'Panel
|
||||
'
|
||||
Me.Panel.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Panel.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.Panel.Location = New System.Drawing.Point(0, 527)
|
||||
Me.Panel.Name = "Panel"
|
||||
Me.Panel.Size = New System.Drawing.Size(1386, 30)
|
||||
Me.Panel.TabIndex = 0
|
||||
Me.Panel.Visible = False
|
||||
'
|
||||
'Timer
|
||||
'
|
||||
Me.Timer.Interval = 1000
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
Me.Timer1.Enabled = True
|
||||
'
|
||||
'timerResetDefault
|
||||
'
|
||||
Me.timerResetDefault.Enabled = True
|
||||
Me.timerResetDefault.Interval = 5000
|
||||
'
|
||||
'Panel3
|
||||
'
|
||||
Me.Panel3.Controls.Add(Me.WebView1)
|
||||
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel3.Location = New System.Drawing.Point(0, 129)
|
||||
Me.Panel3.Name = "Panel3"
|
||||
Me.Panel3.Size = New System.Drawing.Size(1386, 398)
|
||||
Me.Panel3.TabIndex = 9
|
||||
'
|
||||
'frmInfo
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1388, 559)
|
||||
Me.Controls.Add(Me.pnl)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmInfo"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Info"
|
||||
Me.TopMost = True
|
||||
Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
|
||||
Me.pnl.ResumeLayout(False)
|
||||
CType(Me.WebView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel2.ResumeLayout(False)
|
||||
Me.Panel2.PerformLayout()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.FlowLayoutPanel.ResumeLayout(False)
|
||||
Me.Panel3.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pnl As Panel
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents Panel As Panel
|
||||
Friend WithEvents FlowLayoutPanel As FlowLayoutPanel
|
||||
Friend WithEvents btn As Button
|
||||
Friend WithEvents MyTextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Timer As Timer
|
||||
Friend WithEvents Panel2 As Panel
|
||||
Friend WithEvents pic As PictureBox
|
||||
Friend WithEvents lblClock As Label
|
||||
Friend WithEvents PictureBox1 As PictureBox
|
||||
Friend WithEvents btnResetSearch As Button
|
||||
Friend WithEvents WebBrowser1 As WebBrowser
|
||||
Friend WithEvents WebBrowser As WebBrowser
|
||||
Friend WithEvents WebView1 As Microsoft.Toolkit.Forms.UI.Controls.WebView
|
||||
Friend WithEvents Timer1 As Timer
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents Button2 As Button
|
||||
Friend WithEvents Button3 As Button
|
||||
Friend WithEvents Button4 As Button
|
||||
Friend WithEvents Button5 As Button
|
||||
Public WithEvents timerResetDefault As Timer
|
||||
Friend WithEvents Panel3 As Panel
|
||||
End Class
|
||||
1262
AVISO_INFO/frmInfo.resx
Normal file
1262
AVISO_INFO/frmInfo.resx
Normal file
File diff suppressed because it is too large
Load Diff
117
AVISO_INFO/frmInfo.vb
Normal file
117
AVISO_INFO/frmInfo.vb
Normal file
@@ -0,0 +1,117 @@
|
||||
Imports CefSharp.WinForms
|
||||
|
||||
Public Class frmInfo
|
||||
|
||||
|
||||
Dim Timer_Sek As Integer = 30
|
||||
Dim Timer_cnt As Integer
|
||||
|
||||
Dim lastLink As String = ""
|
||||
|
||||
|
||||
Dim tmstmp_Eingabe As Date
|
||||
|
||||
Private Sub MyTextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles MyTextBox1.KeyDown
|
||||
Try
|
||||
|
||||
If e.KeyCode = Keys.Return Then
|
||||
lastLink = MyTextBox1.Text
|
||||
setLink(MyTextBox1.Text)
|
||||
End If
|
||||
|
||||
' Dim c As New ChromiumWebBrowser("as")
|
||||
|
||||
' Me.WebBrowserEx1.ActivateBrowserOnCreation = False
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
Sub setLink(link)
|
||||
If validlink(link) Then
|
||||
WebView1.Navigate(link) ', Nothing, Nothing, "Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.1; Trident/6.0)")
|
||||
' WebBrowserEx1. = MyTextBox1.Text
|
||||
|
||||
MyTextBox1.Text = ""
|
||||
Timer_cnt = Timer_Sek
|
||||
lblClock.Text = Timer_cnt
|
||||
Panel2.Visible = True
|
||||
Timer.Enabled = True
|
||||
btnResetSearch.Visible = True
|
||||
Else
|
||||
reset()
|
||||
End If
|
||||
End Sub
|
||||
'Private Async Sub Button_Click(ByVal sender As Object, ByVal e As RoutedEventArgs)
|
||||
' Dim functionString As String = String.Format("document.getElementById('nameDiv').innerText = 'Hello, {0}';", nameTextBox.Text)
|
||||
' Await WebView1.InvokeScriptAsync("eval", New String() {functionString})
|
||||
'End Sub
|
||||
|
||||
|
||||
Private Sub Timer_Tick(sender As Object, e As EventArgs) Handles Timer.Tick
|
||||
Try
|
||||
If Timer_cnt = 0 Then
|
||||
reset()
|
||||
End If
|
||||
|
||||
Timer_cnt -= 1
|
||||
lblClock.Text = Timer_cnt
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Sub reset()
|
||||
Timer.Enabled = False
|
||||
Panel2.Visible = False
|
||||
btnResetSearch.Visible = False
|
||||
WebView1.Navigate("")
|
||||
WebView1.Dispose()
|
||||
WebView1 = Nothing
|
||||
MyTextBox1.Text = ""
|
||||
MyTextBox1.Focus()
|
||||
lastLink = ""
|
||||
End Sub
|
||||
|
||||
Private Sub btnResetSearch_Click(sender As Object, e As EventArgs) Handles btnResetSearch.Click
|
||||
Try
|
||||
reset()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
|
||||
MyTextBox1.Focus()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Click(sender As Object, e As MouseEventArgs) Handles btn.MouseDown, Button1.MouseDown, Button2.MouseDown, Button3.MouseDown, Button4.MouseDown, Button5.MouseDown
|
||||
If validlink(lastLink) Then
|
||||
setLink(lastLink & "&lan=" & sender.tag)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Function validlink(link) As Boolean
|
||||
If link = "" Then Return False
|
||||
If Not link.contains("https://login.verag.ag/status.aspx?AvisoId=") Then Return False
|
||||
Return True
|
||||
End Function
|
||||
|
||||
Private Sub timerResetDefault_Tick(sender As Object, e As EventArgs) Handles timerResetDefault.Tick
|
||||
If Timer_cnt > 0 Then Exit Sub ' Anzeige läuft...
|
||||
Dim Result As TimeSpan = Now - tmstmp_Eingabe
|
||||
|
||||
If Result.Seconds > 4 Then
|
||||
reset()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub MyTextBox1_TextChanged(sender As Object, e As EventArgs) Handles MyTextBox1.TextChanged
|
||||
tmstmp_Eingabe = Now
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub btntm_Click(sender As Object, e As MouseEventArgs) Handles pic.MouseDown, lblClock.MouseDown, Panel2.MouseDown
|
||||
Timer_cnt = Timer_Sek + 1 ' zurücksetzen
|
||||
End Sub
|
||||
End Class
|
||||
14
Aviso.sln
14
Aviso.sln
@@ -21,6 +21,8 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DAKOSY_Worker_lib", "..\..\
|
||||
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}") = "AVISO_INFO", "AVISO_INFO\AVISO_INFO.vbproj", "{A734141E-2C4E-4D70-81E8-A88184282AF5}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|Any CPU = Debug|Any CPU
|
||||
@@ -123,6 +125,18 @@ Global
|
||||
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|Mixed Platforms.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
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|x86.ActiveCfg = Debug|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Debug|x86.Build.0 = Debug|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|Mixed Platforms.Build.0 = Release|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|x86.ActiveCfg = Release|Any CPU
|
||||
{A734141E-2C4E-4D70-81E8-A88184282AF5}.Release|x86.Build.0 = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
|
||||
6
Aviso/Anhänge/frmAddSendnung.Designer.vb
generated
6
Aviso/Anhänge/frmAddSendnung.Designer.vb
generated
@@ -74,6 +74,7 @@ Partial Class frmAddSendnung
|
||||
'
|
||||
'txtEmpfaenger
|
||||
'
|
||||
Me.txtEmpfaenger._AlleFirmenCLUSTER = False
|
||||
Me.txtEmpfaenger._AllowSetValue = True
|
||||
Me.txtEmpfaenger._autoSizeGross = True
|
||||
Me.txtEmpfaenger._display_Name1 = False
|
||||
@@ -107,7 +108,7 @@ Partial Class frmAddSendnung
|
||||
Me.txtGewicht._ShortDateNew = False
|
||||
Me.txtGewicht._ShortDateOnly = False
|
||||
Me.txtGewicht._TimeOnly = False
|
||||
Me.txtGewicht._value = Nothing
|
||||
Me.txtGewicht._value = ""
|
||||
Me.txtGewicht._Waehrung = False
|
||||
Me.txtGewicht._WaehrungZeichen = True
|
||||
Me.txtGewicht.ForeColor = System.Drawing.Color.Black
|
||||
@@ -141,7 +142,7 @@ Partial Class frmAddSendnung
|
||||
'txtColli
|
||||
'
|
||||
Me.txtColli._DateTimeOnly = False
|
||||
Me.txtColli._numbersOnly = False
|
||||
Me.txtColli._numbersOnly = True
|
||||
Me.txtColli._numbersOnlyKommastellen = ""
|
||||
Me.txtColli._Prozent = False
|
||||
Me.txtColli._ShortDateNew = False
|
||||
@@ -213,6 +214,7 @@ Partial Class frmAddSendnung
|
||||
'
|
||||
'txtAbsender
|
||||
'
|
||||
Me.txtAbsender._AlleFirmenCLUSTER = False
|
||||
Me.txtAbsender._AllowSetValue = True
|
||||
Me.txtAbsender._autoSizeGross = True
|
||||
Me.txtAbsender._display_Name1 = False
|
||||
|
||||
@@ -58,8 +58,8 @@
|
||||
txtAbsender.Text = Sendung.tblSnd_Absender
|
||||
End If
|
||||
|
||||
txtColli.Text = If(Sendung.tblSnd_Colli, "")
|
||||
txtGewicht.Text = If(Sendung.tblSnd_Gewicht, "")
|
||||
txtColli.Text = If(Sendung.tblSnd_Colli, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
|
||||
txtGewicht.Text = If(Sendung.tblSnd_Gewicht, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
|
||||
rtbWarenbezeichnung.Text = If(Sendung.tblSnd_Warenbezeichnung, "")
|
||||
|
||||
End If
|
||||
@@ -70,6 +70,10 @@
|
||||
|
||||
Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
|
||||
Try
|
||||
txtColli.Text = txtColli.Text.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
|
||||
txtGewicht.Text = txtGewicht.Text.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
|
||||
If txtColli.Text <> "" And Not IsNumeric(txtColli.Text) Then MsgBox("Colli: Falsches Format") : Exit Sub
|
||||
If txtGewicht.Text <> "" And Not IsNumeric(txtGewicht.Text) Then MsgBox("f Gewicht: Falsches Format") : Exit Sub
|
||||
|
||||
If Sendung Is Nothing Then
|
||||
Sendung = New VERAG_PROG_ALLGEMEIN.cSendungen(AvisoId, SQL.getValueTxtBySql("SELECT Count(*)+1 FROM tblSendungen WHERE tblSnd_AvisoID=" & AvisoId & "", "AVISO"),,,, 0)
|
||||
@@ -80,8 +84,11 @@
|
||||
Sendung.tblSnd_EmpfaengerKdNr = txtEmpfaenger.KdNr
|
||||
Sendung.tblSnd_Absender = txtAbsender.Text
|
||||
Sendung.tblSnd_AbsenderKdNr = txtAbsender.KdNr
|
||||
Sendung.tblSnd_Colli = txtColli.Text
|
||||
Sendung.tblSnd_Gewicht = txtGewicht.Text
|
||||
Sendung.tblSnd_Colli = ""
|
||||
Sendung.tblSnd_Gewicht = ""
|
||||
If txtColli.Text <> "" Then Sendung.tblSnd_Colli = CInt(txtColli.Text)
|
||||
If txtGewicht.Text <> "" Then Sendung.tblSnd_Gewicht = CDbl(txtGewicht.Text)
|
||||
|
||||
Sendung.tblSnd_Warenbezeichnung = rtbWarenbezeichnung.Text
|
||||
|
||||
If Sendung.SAVE Then
|
||||
@@ -178,11 +185,7 @@
|
||||
initBesKd(Nothing)
|
||||
End Sub
|
||||
|
||||
Private Sub txtGewicht_TextChanged(sender As Object, e As EventArgs) Handles txtGewicht.TextChanged
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub txtGewicht_Leave(sender As Object, e As EventArgs) Handles txtGewicht.TextChanged
|
||||
txtGewicht.Text = txtGewicht.Text.Replace(" ", "")
|
||||
Private Sub txtGewicht_Leave(sender As Object, e As EventArgs) Handles txtGewicht.Leave, txtColli.Leave
|
||||
sender.Text = sender.Text.Replace(" ", "")
|
||||
End Sub
|
||||
End Class
|
||||
24
Aviso/Anhänge/frmSendungAnhangImport.Designer.vb
generated
24
Aviso/Anhänge/frmSendungAnhangImport.Designer.vb
generated
@@ -32,6 +32,7 @@ Partial Class frmSendungAnhangImport
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.pnlAnfuegen = New System.Windows.Forms.Panel()
|
||||
Me.cbxAlternativePDFAnsicht = New System.Windows.Forms.CheckBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.txtBezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
@@ -69,7 +70,6 @@ Partial Class frmSendungAnhangImport
|
||||
Me.lblEmpfaenger = New System.Windows.Forms.Label()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.Button17 = New System.Windows.Forms.Button()
|
||||
Me.cbxAlternativePDFAnsicht = New System.Windows.Forms.CheckBox()
|
||||
Me.flpnlAviso.SuspendLayout()
|
||||
Me.pnlAnfuegen.SuspendLayout()
|
||||
Me.cntxt.SuspendLayout()
|
||||
@@ -187,6 +187,16 @@ Partial Class frmSendungAnhangImport
|
||||
Me.pnlAnfuegen.Size = New System.Drawing.Size(846, 162)
|
||||
Me.pnlAnfuegen.TabIndex = 8
|
||||
'
|
||||
'cbxAlternativePDFAnsicht
|
||||
'
|
||||
Me.cbxAlternativePDFAnsicht.AutoSize = True
|
||||
Me.cbxAlternativePDFAnsicht.Location = New System.Drawing.Point(527, 139)
|
||||
Me.cbxAlternativePDFAnsicht.Name = "cbxAlternativePDFAnsicht"
|
||||
Me.cbxAlternativePDFAnsicht.Size = New System.Drawing.Size(138, 17)
|
||||
Me.cbxAlternativePDFAnsicht.TabIndex = 15
|
||||
Me.cbxAlternativePDFAnsicht.Text = "Alternative PDF-Ansicht"
|
||||
Me.cbxAlternativePDFAnsicht.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.BackColor = System.Drawing.Color.Wheat
|
||||
@@ -409,7 +419,7 @@ Partial Class frmSendungAnhangImport
|
||||
Me.cntxt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiHochladenToolStripMenuItem, Me.DateiScannenToolStripMenuItem, Me.AusZwischenablageeinfügenToolStripMenuItem})
|
||||
Me.cntxt.Name = "cntxt"
|
||||
Me.cntxt.Size = New System.Drawing.Size(250, 70)
|
||||
Me.cntxt.Size = New System.Drawing.Size(250, 92)
|
||||
'
|
||||
'DateiHochladenToolStripMenuItem
|
||||
'
|
||||
@@ -613,16 +623,6 @@ Partial Class frmSendungAnhangImport
|
||||
Me.Button17.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button17.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxAlternativePDFAnsicht
|
||||
'
|
||||
Me.cbxAlternativePDFAnsicht.AutoSize = True
|
||||
Me.cbxAlternativePDFAnsicht.Location = New System.Drawing.Point(527, 139)
|
||||
Me.cbxAlternativePDFAnsicht.Name = "cbxAlternativePDFAnsicht"
|
||||
Me.cbxAlternativePDFAnsicht.Size = New System.Drawing.Size(138, 17)
|
||||
Me.cbxAlternativePDFAnsicht.TabIndex = 15
|
||||
Me.cbxAlternativePDFAnsicht.Text = "Alternative PDF-Ansicht"
|
||||
Me.cbxAlternativePDFAnsicht.UseVisualStyleBackColor = True
|
||||
'
|
||||
'frmSendungAnhangImport
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
|
||||
@@ -37,12 +37,47 @@ Public Class frmSendungAnhangImport
|
||||
'Dim f As New GroupDocs.Viewer
|
||||
End Sub
|
||||
|
||||
Function checkIf1isSelected() As Boolean
|
||||
Dim cnt = 0
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls
|
||||
If u.ACTIVE Then cnt += 1
|
||||
Next
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlSendungen.Controls
|
||||
If u.ACTIVE Then cnt += 1
|
||||
Next
|
||||
Return cnt = 1
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Function checkIfSamePanel(USRCNTL As usrCntlSendungAnhangElement) As Boolean
|
||||
If USRCNTL.Parent Is flpnlAviso Then
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlSendungen.Controls
|
||||
If u.ACTIVE Then Return False
|
||||
Next
|
||||
End If
|
||||
|
||||
If USRCNTL.Parent Is flpnlSendungen Then
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls
|
||||
If u.ACTIVE Then Return False
|
||||
Next
|
||||
End If
|
||||
|
||||
Return True
|
||||
End Function
|
||||
|
||||
Sub initElement(USRCNTL As usrCntlSendungAnhangElement)
|
||||
AddHandler USRCNTL.ME_CLICK, Sub()
|
||||
AddHandler USRCNTL.ME_CLICK, Sub(STRG_PRESSED)
|
||||
' If BrowserLoaded Then
|
||||
|
||||
If USRCNTL.ACTIVE Then Exit Sub 'Bereits aktiv
|
||||
|
||||
If Not STRG_PRESSED Then
|
||||
|
||||
'prüfen, ob genau 1 Elemnt markeirt ist, dann kein neues Laden nötig
|
||||
If USRCNTL.ACTIVE Then
|
||||
If checkIf1isSelected() Then Exit Sub 'Bereits aktiv, aber nur wenn 1 markiert
|
||||
End If
|
||||
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls
|
||||
u.ACTIVE = False
|
||||
Next
|
||||
@@ -50,10 +85,10 @@ Public Class frmSendungAnhangImport
|
||||
u.ACTIVE = False
|
||||
Next
|
||||
USRCNTL.ACTIVE = True
|
||||
|
||||
'WebBrowser1.Navigate(USRCNTL.FILE_PATH)
|
||||
If File.Exists(USRCNTL.FILE_PATH) Then
|
||||
initLocationViewer(USRCNTL.FILE_PATH, USRCNTL.FILE_TYPE)
|
||||
|
||||
Else
|
||||
initLocationViewer("", "PDF")
|
||||
End If
|
||||
@@ -62,7 +97,11 @@ Public Class frmSendungAnhangImport
|
||||
|
||||
txtDateiname.Text = USRCNTL.FILE_NAME
|
||||
txtSeiten.Focus()
|
||||
' End If
|
||||
Else
|
||||
If checkIfSamePanel(USRCNTL) Then
|
||||
USRCNTL.ACTIVE = Not USRCNTL.ACTIVE
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
AddHandler USRCNTL.ME_DELETE, Sub(docId, anhId)
|
||||
@@ -119,11 +158,15 @@ Public Class frmSendungAnhangImport
|
||||
|
||||
|
||||
Function getPDFSplitName(FILE_NAME)
|
||||
getPDFSplitName = FILE_NAME
|
||||
If txtBezeichnung.Text <> "" Then
|
||||
Return txtBezeichnung.Text
|
||||
getPDFSplitName = txtBezeichnung.Text
|
||||
End If
|
||||
|
||||
If Not getPDFSplitName.ToString.EndsWith(".pdf") Then
|
||||
getPDFSplitName = getPDFSplitName & ".pdf"
|
||||
End If
|
||||
|
||||
Return FILE_NAME
|
||||
End Function
|
||||
Dim tmpPageMove = 0
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnAnfuegen.Click
|
||||
@@ -258,13 +301,15 @@ Public Class frmSendungAnhangImport
|
||||
'Hochladen in den Datenserver und anfügen in die Tbl Anhänge mit der SendungsId
|
||||
' saveToDS(u.FILE_NAME, TMP_Path_New, cboArt._value, u.FILE_TYPE,,, SendngsId)
|
||||
|
||||
Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
|
||||
|
||||
If cbxDelPDF.Checked Then
|
||||
Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
ANH.anh_SendungsId = SendngsId
|
||||
ANH.anh_Name = getPDFSplitName(ANH.anh_Name)
|
||||
|
||||
If cboArt._value <> "" Then ANH.anh_Art = cboArt._value
|
||||
ANH.SAVE() 'Eintrag wird überschreiben
|
||||
|
||||
flpnlAviso.Controls.Remove(u)
|
||||
' If cbxDelPDF.Checked Then tryDelete(u.FILE_PATH)
|
||||
initLocationViewer("", "PDF")
|
||||
@@ -272,10 +317,18 @@ Public Class frmSendungAnhangImport
|
||||
DirectCast(flpnlAviso.Controls(0), usrCntlSendungAnhangElement).CLICK_Me()
|
||||
End If
|
||||
Else
|
||||
ANH.anh_SendungsId = SendngsId
|
||||
If cboArt._value <> "" Then ANH.anh_Art = cboArt._value
|
||||
ANH.anh_id = -1 'neuer Eintrag
|
||||
ANH.SAVE()
|
||||
|
||||
saveToDS(AvisoId, getPDFSplitName(u.FILE_NAME), TMP_Path_New, cboArt._value, u.FILE_TYPE,,,, SendngsId)
|
||||
|
||||
|
||||
'Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
'ANH.anh_id = -1 'neuer Eintrag
|
||||
'ANH.anh_SendungsId = SendngsId
|
||||
'ANH.anh_Name = getPDFSplitName(ANH.anh_Name)
|
||||
'If cboArt._value <> "" Then ANH.anh_Art = cboArt._value
|
||||
'ANH.anh_SendungsId = SendngsId
|
||||
'ANH.SAVE()
|
||||
'DOCID!!!!!
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
@@ -575,7 +628,11 @@ Public Class frmSendungAnhangImport
|
||||
PdfCopyProvider.SetFullCompression()
|
||||
srcDoc.Open()
|
||||
For Each p In pagesToExtract
|
||||
If p > Reader.NumberOfPages Then MsgBox("Seitenanzahl überschritten!") : Return False
|
||||
If p > Reader.NumberOfPages Then
|
||||
MsgBox("Seitenanzahl überschritten!")
|
||||
srcDoc.Close() : Reader.Close()
|
||||
Return False
|
||||
End If
|
||||
impPage = PdfCopyProvider.GetImportedPage(Reader, p)
|
||||
' ----- Ermitteln der Seitenauflösung und setzen für die neue Seite
|
||||
PdfCopyProvider.SetPageSize(New iTextSharp.text.Rectangle(0.0F, 0.0F, impPage.Width, impPage.Height, Reader.GetPageRotation(p)))
|
||||
@@ -832,8 +889,10 @@ Public Class frmSendungAnhangImport
|
||||
Dim cnt = 1
|
||||
For Each s In SENDUNG_LIST
|
||||
Dim abfertigungsArt = SQL.getValueTxtBySql("SELECT isnull([Abfertigungsbezeichnung],'') FROM [Abfertigungsarten] WHERE Abfertigungsart='" & s.tblSnd_Abfertigungsart_ID & "'", "FMZOLL")
|
||||
Dim empfTmp = If(s.tblSnd_Empfaenger.Length > 15, s.tblSnd_Empfaenger.Substring(0, 15), s.tblSnd_Empfaenger)
|
||||
|
||||
Dim empfTmp = ""
|
||||
If s.tblSnd_Empfaenger IsNot Nothing Then
|
||||
empfTmp = If(s.tblSnd_Empfaenger.Length > 15, s.tblSnd_Empfaenger.Substring(0, 15), s.tblSnd_Empfaenger)
|
||||
End If
|
||||
cboSendungen.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem(cnt & ". " & empfTmp & " (" & abfertigungsArt & ")", s.tblSnd_SendungID))
|
||||
cnt += 1
|
||||
Next
|
||||
@@ -875,7 +934,7 @@ Public Class frmSendungAnhangImport
|
||||
If cboSendungen._value <> "" Then
|
||||
Dim SND As New VERAG_PROG_ALLGEMEIN.cSendungen(cboSendungen._value)
|
||||
If If(SND.tblSnd_Colli, "") <> "" Then lblSendungsdetails.Text = SND.tblSnd_Colli & " Pk"
|
||||
If If(SND.tblSnd_Gewicht, "") <> "" Then lblSendungsdetails.Text &= If(lblSendungsdetails.Text <> "", "; ", "") & CDbl(SND.tblSnd_Gewicht).ToString("N1") & " kg"
|
||||
If If(SND.tblSnd_Gewicht, "") <> "" Then lblSendungsdetails.Text &= If(lblSendungsdetails.Text <> "", "; ", "") & CDbl(SND.tblSnd_Gewicht.Replace(" ", "").Replace(Chr(160), "")).ToString("N1") & " kg"
|
||||
lblWarenbeichnung.Text = If(SND.tblSnd_Warenbezeichnung, "")
|
||||
lblAbsender.Text = If(SND.tblSnd_Absender, "")
|
||||
lblEmpfaenger.Text = If(SND.tblSnd_Empfaenger, "")
|
||||
@@ -1076,12 +1135,13 @@ Public Class frmSendungAnhangImport
|
||||
Return True
|
||||
End Function
|
||||
|
||||
Public Shared Function saveToDS(AvisoId, fileName, sourcePath, Art, Typ, Optional ByRef da_id = -1, Optional ByRef anhId = -1, Optional ByRef destPath = "", Optional SendungsId = Nothing) As Boolean
|
||||
Public Shared Function saveToDS(AvisoId, ByRef fileName, sourcePath, Art, Typ, Optional ByRef da_id = -1, Optional ByRef anhId = -1, Optional ByRef destPath = "", Optional SendungsId = Nothing) As Boolean
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "AVISO_ANHAENGE", AvisoId, Now.ToString("ddMMyy_HHmmss.ffff"), "", fileName, -1, False)
|
||||
If Not DS.uploadDataToDATENSERVER(sourcePath) Then MsgBox("Fehler beim Speichern: Datenserver!") : Return False
|
||||
If DS.da_id <= 0 Then MsgBox("Keine DocId!") : Return False
|
||||
da_id = DS.da_id
|
||||
destPath = DS.GET_TOP1_PATH
|
||||
fileName = VERAG_PROG_ALLGEMEIN.cDATENSERVER.replaceInvalidCahr(fileName)
|
||||
Dim ANH As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(AvisoId, fileName, DS.da_id, Art, Typ, SendungsId)
|
||||
If Not ANH.SAVE Then MsgBox("Fehler beim Anhang speichern!") : Return False
|
||||
anhId = ANH.anh_id
|
||||
@@ -1135,7 +1195,7 @@ Public Class frmSendungAnhangImport
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub txtSeiten_PreviewKeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles txtSeiten.PreviewKeyDown, cboArt.PreviewKeyDown
|
||||
Private Sub txtSeiten_PreviewKeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles txtSeiten.PreviewKeyDown, cboArt.PreviewKeyDown, txtBezeichnung.PreviewKeyDown
|
||||
Try
|
||||
If e.Modifiers = Keys.Alt Then ' Sendungen durchlaufen
|
||||
If e.KeyCode = Keys.PageDown Then
|
||||
@@ -1147,6 +1207,7 @@ Public Class frmSendungAnhangImport
|
||||
If e.KeyCode = Keys.Add Then
|
||||
btnAddSnd.PerformClick()
|
||||
e.IsInputKey = True ' Damit Event abgefangen ist, sonst steht "+" im Feld
|
||||
'e.Handled = True
|
||||
End If
|
||||
If e.KeyCode = Keys.Return Then
|
||||
btnSndEdit.PerformClick()
|
||||
@@ -1162,6 +1223,7 @@ Public Class frmSendungAnhangImport
|
||||
If e.KeyCode = Keys.Add Then
|
||||
btnAddSnd.PerformClick()
|
||||
e.IsInputKey = True ' Damit Event abgefangen ist, sonst steht "+" im Feld
|
||||
' e.Handled = True
|
||||
End If
|
||||
If e.KeyCode = Keys.Return Then
|
||||
btnSndEdit.PerformClick()
|
||||
@@ -1333,6 +1395,100 @@ Public Class frmSendungAnhangImport
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Public Sub AnhangVerschieben_Markierte(USRCNTL As usrCntlSendungAnhangElement)
|
||||
|
||||
Dim f As New frmSendungAnhang_SendenAnSnd(SENDUNG_LIST)
|
||||
If f.ShowDialog(Me) = DialogResult.OK Then
|
||||
If USRCNTL.Parent Is flpnlAviso Then
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls
|
||||
If u.ACTIVE Then
|
||||
Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
ANH.anh_SendungsId = f.SendungsId
|
||||
ANH.SAVE()
|
||||
End If
|
||||
Next
|
||||
ElseIf USRCNTL.Parent Is flpnlSendungen Then
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlSendungen.Controls
|
||||
If u.ACTIVE Then
|
||||
Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
ANH.anh_SendungsId = f.SendungsId
|
||||
ANH.SAVE()
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
clearPnlAnfuegen()
|
||||
' initSendungen()
|
||||
initFlpANH_LIST()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub PDFszusammenfuehren_Markierte(USRCNTL As usrCntlSendungAnhangElement)
|
||||
Try
|
||||
Dim ANH_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge)
|
||||
|
||||
Dim ANH_NEW As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge
|
||||
|
||||
If USRCNTL.Parent Is flpnlAviso Then
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls
|
||||
If u.ACTIVE Then
|
||||
Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
If ANH.anh_Typ <> "PDF" Then MsgBox("Nur mit PDFs möglich!") : Exit Sub
|
||||
ANH_LIST.Add(ANH)
|
||||
ANH_NEW.anh_AvisoId = ANH.anh_AvisoId
|
||||
End If
|
||||
Next
|
||||
ElseIf USRCNTL.Parent Is flpnlSendungen Then
|
||||
For Each u As usrCntlSendungAnhangElement In flpnlSendungen.Controls
|
||||
If u.ACTIVE Then
|
||||
Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID)
|
||||
If ANH.anh_Typ <> "PDF" Then MsgBox("Nur mit PDFs möglich!") : Exit Sub
|
||||
ANH_LIST.Add(ANH)
|
||||
ANH_NEW.anh_AvisoId = ANH.anh_AvisoId
|
||||
ANH_NEW.anh_SendungsId = ANH.anh_SendungsId
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
|
||||
If ANH_LIST.Count > 0 Then
|
||||
|
||||
Dim f As New frmSendungAnhangUmbenennenUmkateg(ANH_LIST(0).anh_Name, ANH_LIST(0).anh_Art)
|
||||
If f.ShowDialog = DialogResult.OK Then
|
||||
ANH_NEW.anh_Name = f.txtBezeichnung.Text
|
||||
ANH_NEW.anh_Art = f.cboArt._value
|
||||
' FILE_NAME = f.txtBezeichnung.Text
|
||||
Else
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim files As New List(Of String) ' String() = New String() {"Sample1.pdf", "Sample2.pdf", "Sample3.pdf"}
|
||||
Dim outputFile As String = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("Merge.pdf", ".pdf", True,, "Merge") ' "result.pdf"
|
||||
|
||||
For Each r In ANH_LIST
|
||||
files.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.anh_docId))
|
||||
Next
|
||||
|
||||
Dim doc As Spire.Pdf.PdfDocumentBase = Spire.Pdf.PdfDocument.MergeFiles(files.ToArray)
|
||||
doc.Save(outputFile, Spire.Pdf.FileFormat.PDF)
|
||||
|
||||
If saveToDS(ANH_NEW.anh_AvisoId, ANH_NEW.anh_Name, outputFile, ANH_NEW.anh_Art, "PDF",, , , ANH_NEW.anh_SendungsId) Then
|
||||
'addUsrcnlToPnl(destPath, da_id, anhId, filename, Typ)
|
||||
For Each anh In ANH_LIST
|
||||
anh.DELETE()
|
||||
Next
|
||||
End If
|
||||
|
||||
'ANH_NEW.SAVE()
|
||||
|
||||
End If
|
||||
|
||||
clearPnlAnfuegen()
|
||||
' initSendungen()
|
||||
initFlpANH_LIST()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Private Sub txtBezeichnung_GotFocus(sender As Object, e As EventArgs) Handles txtBezeichnung.GotFocus
|
||||
' txtBezeichnung.SelectAll()
|
||||
|
||||
112
Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.Designer.vb
generated
Normal file
112
Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.Designer.vb
generated
Normal file
@@ -0,0 +1,112 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmSendungAnhang_SendenAnSnd
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungAnhang_SendenAnSnd))
|
||||
Me.MyDatagridview1 = New System.Windows.Forms.DataGridView()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.clmnSendungID = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.clmnSendung = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.pnl.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'MyDatagridview1
|
||||
'
|
||||
Me.MyDatagridview1.AllowUserToAddRows = False
|
||||
Me.MyDatagridview1.AllowUserToDeleteRows = False
|
||||
Me.MyDatagridview1.AllowUserToResizeColumns = False
|
||||
Me.MyDatagridview1.AllowUserToResizeRows = False
|
||||
Me.MyDatagridview1.BackgroundColor = System.Drawing.Color.White
|
||||
Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.MyDatagridview1.ColumnHeadersVisible = False
|
||||
Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnSendungID, Me.clmnSendung})
|
||||
Me.MyDatagridview1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.MyDatagridview1.GridColor = System.Drawing.Color.White
|
||||
Me.MyDatagridview1.Location = New System.Drawing.Point(0, 35)
|
||||
Me.MyDatagridview1.Name = "MyDatagridview1"
|
||||
Me.MyDatagridview1.ReadOnly = True
|
||||
Me.MyDatagridview1.RowHeadersVisible = False
|
||||
Me.MyDatagridview1.RowTemplate.Height = 25
|
||||
Me.MyDatagridview1.Size = New System.Drawing.Size(471, 354)
|
||||
Me.MyDatagridview1.TabIndex = 0
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.pnl.Controls.Add(Me.lbl)
|
||||
Me.pnl.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(471, 35)
|
||||
Me.pnl.TabIndex = 1
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Location = New System.Drawing.Point(4, 11)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(232, 13)
|
||||
Me.lbl.TabIndex = 0
|
||||
Me.lbl.Text = "Anhang an Sendung verschieben (doppelklick):"
|
||||
'
|
||||
'clmnSendungID
|
||||
'
|
||||
Me.clmnSendungID.HeaderText = "ID"
|
||||
Me.clmnSendungID.Name = "clmnSendungID"
|
||||
Me.clmnSendungID.ReadOnly = True
|
||||
Me.clmnSendungID.Visible = False
|
||||
'
|
||||
'clmnSendung
|
||||
'
|
||||
Me.clmnSendung.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
||||
Me.clmnSendung.HeaderText = "Sendung"
|
||||
Me.clmnSendung.Name = "clmnSendung"
|
||||
Me.clmnSendung.ReadOnly = True
|
||||
'
|
||||
'frmSendungAnhang_SendenAnSnd
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(471, 389)
|
||||
Me.Controls.Add(Me.MyDatagridview1)
|
||||
Me.Controls.Add(Me.pnl)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmSendungAnhang_SendenAnSnd"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
|
||||
Me.Text = "Anhang verschieben"
|
||||
CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.pnl.ResumeLayout(False)
|
||||
Me.pnl.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents MyDatagridview1 As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents pnl As Panel
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents clmnSendungID As DataGridViewTextBoxColumn
|
||||
Friend WithEvents clmnSendung As DataGridViewTextBoxColumn
|
||||
End Class
|
||||
986
Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.resx
Normal file
986
Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.resx
Normal file
@@ -0,0 +1,986 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="clmnSendungID.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="clmnSendung.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
|
||||
AACRbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEd4Sx5mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB4Sx5/VClmMwBuPg5r
|
||||
OglrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOgluPg5mMwB/VCl0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0RhhzRBVmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
|
||||
RBV3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh18UCRmMwBqOQdnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFqOQdmMwB8UCR9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwDm4N3/////////
|
||||
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
|
||||
//////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
|
||||
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
|
||||
MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
|
||||
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
|
||||
v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
|
||||
jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
|
||||
mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwCMblj///////////////////////////+M
|
||||
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
|
||||
///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
|
||||
y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
|
||||
4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwC3
|
||||
p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
|
||||
p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
|
||||
SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
|
||||
y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
|
||||
MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDm4N3/////////////
|
||||
//+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
|
||||
9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
|
||||
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
|
||||
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
|
||||
//////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
|
||||
///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
|
||||
MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
|
||||
//////////////+3p5xmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCjjH3/
|
||||
///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
|
||||
1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
|
||||
mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
|
||||
MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
|
||||
fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
|
||||
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
|
||||
//////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
|
||||
p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
|
||||
9fRmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwDUy8X///////////////+t
|
||||
mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
|
||||
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
|
||||
//+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
|
||||
MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
|
||||
///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
|
||||
///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
|
||||
MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
|
||||
6+n///////////////+jjH1mMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwCYfWv/////
|
||||
///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
|
||||
//////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
|
||||
//+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
|
||||
//////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
|
||||
MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
|
||||
mo1mMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwDLv7j////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
|
||||
//////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
|
||||
///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
|
||||
fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
|
||||
///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
|
||||
jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAF0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
|
||||
//////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
|
||||
///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ8UCRmMwBqOQdn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFqOQdmMwB8UCR3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh1zRBVmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
|
||||
RBV0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0Rhh/VClmMwBuPg5rOglrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOgluPg5mMwB/VCl4Sx5mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwB4Sx6RbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEf/////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////Bs6rBs6qYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvBs6rBs6r/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////Uy8WYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvUy8X////////////////////////////////////////B
|
||||
s6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3Bs6rBs6r39fT/////////////////////////////////////////////////////////
|
||||
///Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////d1tGMblhmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvm4N3/
|
||||
///////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMbljLv7j/////////////////
|
||||
///////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X////////////////////////////d1tFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCMbljm4N3////////////////////////////////////////////m4N1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////
|
||||
///////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////
|
||||
///////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////Bs6pmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwCtmo3///////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCA
|
||||
XUL/////////////////////////////////////////////////////////////////////////////
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT/////////////////
|
||||
//+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////////////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////////////////////////////////////////
|
||||
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDBs6r///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDBs6r////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////
|
||||
///////////////////////////////////////////////////////////////////////////d1tFm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6rd1tH////////39fTBs6qAXUJm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Lv7hmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////////////Uy8VmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////////////////////////
|
||||
//////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/
|
||||
//////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd
|
||||
1tH////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////
|
||||
///////Uy8XBs6qMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////
|
||||
///////////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////+AXUJmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCtmo3///////////////////////////////////////+AXUJmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwC3p5z////////////////////////////////d1tGMblhmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////9mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT/////////////////////
|
||||
///////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////
|
||||
//////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb39fT/////////////
|
||||
//////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDBs6r////////////////////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCYfWv///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0
|
||||
SSb///////////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDBs6r///////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDUy8X/////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///u6+nBs6rBs6rBs6qYfWtmMwBmMwBmMwDu6+n/////////////////////////////////////////
|
||||
///Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n////////////////////////////////////////u
|
||||
6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCY
|
||||
fWv////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////
|
||||
//////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDm4N3////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////u6+m3p5xmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////m4N1mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDBs6r////////////////////////////////////////////d1tFmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////////u6+lmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////////Uy8XB
|
||||
s6p0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
|
||||
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////////////////
|
||||
//////////////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
|
||||
//////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////m4N3Bs6qMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDUy8X///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCMblj///////////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDm4N3/////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////Bs6qAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb39fT///////////////////////+jjH1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////////////////
|
||||
///////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT///////////////////+t
|
||||
mo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////Lv7hmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/
|
||||
///////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
|
||||
///////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDm4N3////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////////////////////Uy8VmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////////////////////////////////////90SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////Uy8VmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbm4N3/////////////////////
|
||||
///////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////
|
||||
//////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
|
||||
///////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCM
|
||||
bljm4N3///////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3///////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDLv7j///////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwD39fT/////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////////////////////////+M
|
||||
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////
|
||||
//+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvBs6r/////////////////////////
|
||||
//////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////
|
||||
//////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDd1tH///////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDL
|
||||
v7j/////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////////////////////+Mblhm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3Bs6r/////
|
||||
///////////////////////////////////////////////////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////////////////////////////////+AXUJm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////////Bs6pmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCtmo3Bs6r39fT/////////////////////////////////////////////////////////////////
|
||||
///////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////
|
||||
///////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n/////
|
||||
///////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwB0SSbLv7j/////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwC3p5z////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCAXUL/////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////////
|
||||
//////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////
|
||||
//////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////////////////////////39fRmMwBmMwB0SSbBs6rBs6r39fT/////////
|
||||
//////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/
|
||||
///////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDBs6r///////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDm4N3/////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////39fRmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3Bs6rBs6r///////////////////////////+3p5xmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT////////////////////////////39fSMblhmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////////+3p5xmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////
|
||||
///////////////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////
|
||||
///////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////
|
||||
///////////u6+mMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////
|
||||
///////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////////u6+mAXUJmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDLv7j////////////////Uy8W3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDd1tH////////////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMbljBs6r////////d1tG3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH/////////////////////////
|
||||
///39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////
|
||||
///////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCM
|
||||
blj///////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n/
|
||||
//////////////////////////////////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwD39fT/////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////////////L
|
||||
v7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////////////////+YfWtmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDLv7j///////////////////////////////////////////////+jjH1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH/////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
|
||||
//////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////////
|
||||
//////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////39fSAXUJmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCYfWv////////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDB
|
||||
s6r////////////////////////////////////////////////////////Lv7hmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////u6+mMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////
|
||||
///////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwB0SSbUy8X/////////////////////////////////////////////////
|
||||
///////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////////+jjH1mMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////
|
||||
///////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbBs6r/////////////////////////
|
||||
///////////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwB0SSb/////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////d1tGYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDBs6r39fT///////////////////////////////////////////////////////////+AXUJm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXULBs6rBs6rm4N3/
|
||||
//////////////////////////////////////////////////////////////////////////////+A
|
||||
XUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////39fTBs6rBs6pmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCjjH3Bs6rUy8X/////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
39
Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.vb
Normal file
39
Aviso/Anhänge/frmSendungAnhang_SendenAnSnd.vb
Normal file
@@ -0,0 +1,39 @@
|
||||
Public Class frmSendungAnhang_SendenAnSnd
|
||||
Public SendungsId = -1
|
||||
Dim SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen)
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen))
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
Me.SENDUNG_LIST = SENDUNG_LIST
|
||||
End Sub
|
||||
|
||||
Private Sub frmSendungAnhang_SendenAnSnd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Dim cnt = 1
|
||||
For Each S In SENDUNG_LIST
|
||||
Dim abfertigungsArt = SQL.getValueTxtBySql("SELECT isnull([Abfertigungsbezeichnung],'') FROM [Abfertigungsarten] WHERE Abfertigungsart='" & S.tblSnd_Abfertigungsart_ID & "'", "FMZOLL")
|
||||
Dim empfTmp = ""
|
||||
If S.tblSnd_Empfaenger IsNot Nothing Then
|
||||
empfTmp = If(S.tblSnd_Empfaenger.Length > 15, S.tblSnd_Empfaenger.Substring(0, 15), S.tblSnd_Empfaenger)
|
||||
End If
|
||||
|
||||
MyDatagridview1.Rows.Add({S.tblSnd_SendungID, (cnt & ". " & empfTmp & " (" & abfertigungsArt & ")")})
|
||||
cnt += 1
|
||||
Next
|
||||
MyDatagridview1.ClearSelection()
|
||||
End Sub
|
||||
|
||||
Private Sub MyDatagridview1_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles MyDatagridview1.CellDoubleClick, MyDatagridview1.CellContentDoubleClick
|
||||
If e.RowIndex >= 0 Then
|
||||
SendungsId = MyDatagridview1.Rows(e.RowIndex).Cells(0).Value
|
||||
Me.DialogResult = DialogResult.OK
|
||||
Me.Close()
|
||||
Else
|
||||
Me.DialogResult = DialogResult.None
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
@@ -1,9 +1,9 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class usrCntlSendungAnhangElement
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
@@ -20,7 +20,7 @@ Partial Class usrCntlSendungAnhangElement
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.pic = New System.Windows.Forms.PictureBox()
|
||||
@@ -28,6 +28,8 @@ Partial Class usrCntlSendungAnhangElement
|
||||
Me.UmbenennenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.LöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.AnhängeVerschiebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.PDFsZusammenführenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.cntxt.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
@@ -47,21 +49,21 @@ Partial Class usrCntlSendungAnhangElement
|
||||
'
|
||||
'cntxt
|
||||
'
|
||||
Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UmbenennenToolStripMenuItem, Me.LöschenToolStripMenuItem})
|
||||
Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UmbenennenToolStripMenuItem, Me.LöschenToolStripMenuItem, Me.AnhängeVerschiebenToolStripMenuItem, Me.PDFsZusammenführenToolStripMenuItem})
|
||||
Me.cntxt.Name = "cntxt"
|
||||
Me.cntxt.Size = New System.Drawing.Size(147, 48)
|
||||
Me.cntxt.Size = New System.Drawing.Size(206, 114)
|
||||
'
|
||||
'UmbenennenToolStripMenuItem
|
||||
'
|
||||
Me.UmbenennenToolStripMenuItem.Name = "UmbenennenToolStripMenuItem"
|
||||
Me.UmbenennenToolStripMenuItem.Size = New System.Drawing.Size(146, 22)
|
||||
Me.UmbenennenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.UmbenennenToolStripMenuItem.Text = "Umbenennen"
|
||||
'
|
||||
'LöschenToolStripMenuItem
|
||||
'
|
||||
Me.LöschenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.del
|
||||
Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem"
|
||||
Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(146, 22)
|
||||
Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.LöschenToolStripMenuItem.Text = "Löschen"
|
||||
'
|
||||
'lbl
|
||||
@@ -76,6 +78,19 @@ Partial Class usrCntlSendungAnhangElement
|
||||
Me.lbl.Text = "NAME"
|
||||
Me.lbl.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
'
|
||||
'AnhängeVerschiebenToolStripMenuItem
|
||||
'
|
||||
Me.AnhängeVerschiebenToolStripMenuItem.Name = "AnhängeVerschiebenToolStripMenuItem"
|
||||
Me.AnhängeVerschiebenToolStripMenuItem.Size = New System.Drawing.Size(197, 22)
|
||||
Me.AnhängeVerschiebenToolStripMenuItem.Text = "Anhänge verschieben..."
|
||||
'
|
||||
'PDFsZusammenführenToolStripMenuItem
|
||||
'
|
||||
Me.PDFsZusammenführenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdf11
|
||||
Me.PDFsZusammenführenToolStripMenuItem.Name = "PDFsZusammenführenToolStripMenuItem"
|
||||
Me.PDFsZusammenführenToolStripMenuItem.Size = New System.Drawing.Size(205, 22)
|
||||
Me.PDFsZusammenführenToolStripMenuItem.Text = "PDFs zusammenführen..."
|
||||
'
|
||||
'usrCntlSendungAnhangElement
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@@ -97,4 +112,6 @@ Partial Class usrCntlSendungAnhangElement
|
||||
Friend WithEvents cntxt As ContextMenuStrip
|
||||
Friend WithEvents UmbenennenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents LöschenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AnhängeVerschiebenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents PDFsZusammenführenToolStripMenuItem As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@@ -14,7 +14,7 @@ Public Class usrCntlSendungAnhangElement
|
||||
Property FILE_ANHID
|
||||
|
||||
|
||||
Public Event ME_CLICK()
|
||||
Public Event ME_CLICK(STRG_PRESSED)
|
||||
Public Event ME_DELETE(FILE_DOCID, FILE_ANHID)
|
||||
|
||||
|
||||
@@ -87,11 +87,16 @@ Public Class usrCntlSendungAnhangElement
|
||||
End Set
|
||||
|
||||
End Property
|
||||
Private Sub pic_Click(sender As Object, e As EventArgs) Handles pic.Click, lbl.Click, Me.Click
|
||||
RaiseEvent ME_CLICK()
|
||||
'Private Sub pic_Click(sender As Object, e As EventArgs) Handles pic.Click, lbl.Click, Me.Click
|
||||
' RaiseEvent ME_CLICK(My.Computer.Keyboard.CtrlKeyDown)
|
||||
'End Sub
|
||||
Private Sub pic_Click(sender As Object, e As MouseEventArgs) Handles pic.MouseClick, lbl.MouseClick, Me.MouseClick
|
||||
If e.Button = MouseButtons.Left Then
|
||||
RaiseEvent ME_CLICK((My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
|
||||
End If
|
||||
End Sub
|
||||
Public Sub CLICK_Me()
|
||||
RaiseEvent ME_CLICK()
|
||||
RaiseEvent ME_CLICK(False) 'My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
|
||||
End Sub
|
||||
|
||||
Private Sub pic_doubleClick(sender As Object, e As EventArgs) Handles pic.DoubleClick, lbl.DoubleClick, Me.DoubleClick
|
||||
@@ -140,6 +145,24 @@ Public Class usrCntlSendungAnhangElement
|
||||
End Sub
|
||||
|
||||
Private Sub cntxt_Opening(sender As Object, e As CancelEventArgs) Handles cntxt.Opening
|
||||
CLICK_Me()
|
||||
If Not Me.ACTIVE Then CLICK_Me()
|
||||
End Sub
|
||||
|
||||
Private Sub AnhängeVerschiebenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AnhängeVerschiebenToolStripMenuItem.Click
|
||||
Try
|
||||
Dim f As frmSendungAnhangImport = Me.FindForm
|
||||
f.AnhangVerschieben_Markierte(Me)
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub PDFsZusammenführenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PDFsZusammenführenToolStripMenuItem.Click
|
||||
Try
|
||||
Dim f As frmSendungAnhangImport = Me.FindForm
|
||||
f.PDFszusammenfuehren_Markierte(Me)
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
88
Aviso/Auswertung/usrctStatistik.Designer.vb
generated
88
Aviso/Auswertung/usrctStatistik.Designer.vb
generated
@@ -47,6 +47,8 @@ Partial Class usrctStatistik
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Panel6 = New System.Windows.Forms.Panel()
|
||||
Me.Label17 = New System.Windows.Forms.Label()
|
||||
Me.cboFirma = New System.Windows.Forms.ComboBox()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.cboArt = New System.Windows.Forms.ComboBox()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
@@ -60,7 +62,9 @@ Partial Class usrctStatistik
|
||||
Me.txtdatBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.Panel7 = New System.Windows.Forms.Panel()
|
||||
Me.Label21 = New System.Windows.Forms.Label()
|
||||
Me.Label16 = New System.Windows.Forms.Label()
|
||||
Me.cboFirma2 = New System.Windows.Forms.ComboBox()
|
||||
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
@@ -70,10 +74,6 @@ Partial Class usrctStatistik
|
||||
Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker()
|
||||
Me.DateTimePicker2 = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label20 = New System.Windows.Forms.Label()
|
||||
Me.Label17 = New System.Windows.Forms.Label()
|
||||
Me.cboFirma = New System.Windows.Forms.ComboBox()
|
||||
Me.Label21 = New System.Windows.Forms.Label()
|
||||
Me.cboFirma2 = New System.Windows.Forms.ComboBox()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.Panel2.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
@@ -333,6 +333,25 @@ Partial Class usrctStatistik
|
||||
Me.Panel6.Size = New System.Drawing.Size(701, 237)
|
||||
Me.Panel6.TabIndex = 21
|
||||
'
|
||||
'Label17
|
||||
'
|
||||
Me.Label17.AutoSize = True
|
||||
Me.Label17.Location = New System.Drawing.Point(197, 5)
|
||||
Me.Label17.Name = "Label17"
|
||||
Me.Label17.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label17.TabIndex = 26
|
||||
Me.Label17.Text = "Firma:"
|
||||
'
|
||||
'cboFirma
|
||||
'
|
||||
Me.cboFirma.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboFirma.FormattingEnabled = True
|
||||
Me.cboFirma.Items.AddRange(New Object() {"VERAG", "ATILLA", "IMEX", "UNISPED"})
|
||||
Me.cboFirma.Location = New System.Drawing.Point(236, 2)
|
||||
Me.cboFirma.Name = "cboFirma"
|
||||
Me.cboFirma.Size = New System.Drawing.Size(69, 21)
|
||||
Me.cboFirma.TabIndex = 25
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
Me.Label15.AutoSize = True
|
||||
@@ -346,7 +365,7 @@ Partial Class usrctStatistik
|
||||
'
|
||||
Me.cboArt.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboArt.FormattingEnabled = True
|
||||
Me.cboArt.Items.AddRange(New Object() {"Ankunft", "Freigabe"})
|
||||
Me.cboArt.Items.AddRange(New Object() {"Ankunft", "Freigabe", "AvisoEingang"})
|
||||
Me.cboArt.Location = New System.Drawing.Point(423, 2)
|
||||
Me.cboArt.Name = "cboArt"
|
||||
Me.cboArt.Size = New System.Drawing.Size(69, 21)
|
||||
@@ -459,6 +478,15 @@ Partial Class usrctStatistik
|
||||
Me.Panel7.Size = New System.Drawing.Size(701, 237)
|
||||
Me.Panel7.TabIndex = 25
|
||||
'
|
||||
'Label21
|
||||
'
|
||||
Me.Label21.AutoSize = True
|
||||
Me.Label21.Location = New System.Drawing.Point(197, 5)
|
||||
Me.Label21.Name = "Label21"
|
||||
Me.Label21.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label21.TabIndex = 28
|
||||
Me.Label21.Text = "Firma:"
|
||||
'
|
||||
'Label16
|
||||
'
|
||||
Me.Label16.AutoSize = True
|
||||
@@ -468,11 +496,21 @@ Partial Class usrctStatistik
|
||||
Me.Label16.TabIndex = 24
|
||||
Me.Label16.Text = "Art:"
|
||||
'
|
||||
'cboFirma2
|
||||
'
|
||||
Me.cboFirma2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboFirma2.FormattingEnabled = True
|
||||
Me.cboFirma2.Items.AddRange(New Object() {"VERAG", "ATILLA", "IMEX", "UNISPED"})
|
||||
Me.cboFirma2.Location = New System.Drawing.Point(236, 2)
|
||||
Me.cboFirma2.Name = "cboFirma2"
|
||||
Me.cboFirma2.Size = New System.Drawing.Size(69, 21)
|
||||
Me.cboFirma2.TabIndex = 27
|
||||
'
|
||||
'ComboBox1
|
||||
'
|
||||
Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.ComboBox1.FormattingEnabled = True
|
||||
Me.ComboBox1.Items.AddRange(New Object() {"Ankunft", "Freigabe"})
|
||||
Me.ComboBox1.Items.AddRange(New Object() {"Ankunft", "Freigabe", "AvisoEingang"})
|
||||
Me.ComboBox1.Location = New System.Drawing.Point(423, 2)
|
||||
Me.ComboBox1.Name = "ComboBox1"
|
||||
Me.ComboBox1.Size = New System.Drawing.Size(69, 21)
|
||||
@@ -547,44 +585,6 @@ Partial Class usrctStatistik
|
||||
Me.Label20.TabIndex = 14
|
||||
Me.Label20.Text = "Tagesauswertung:"
|
||||
'
|
||||
'Label17
|
||||
'
|
||||
Me.Label17.AutoSize = True
|
||||
Me.Label17.Location = New System.Drawing.Point(197, 5)
|
||||
Me.Label17.Name = "Label17"
|
||||
Me.Label17.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label17.TabIndex = 26
|
||||
Me.Label17.Text = "Firma:"
|
||||
'
|
||||
'cboFirma
|
||||
'
|
||||
Me.cboFirma.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboFirma.FormattingEnabled = True
|
||||
Me.cboFirma.Items.AddRange(New Object() {"VERAG", "ATILLA", "IMEX"})
|
||||
Me.cboFirma.Location = New System.Drawing.Point(236, 2)
|
||||
Me.cboFirma.Name = "cboFirma"
|
||||
Me.cboFirma.Size = New System.Drawing.Size(69, 21)
|
||||
Me.cboFirma.TabIndex = 25
|
||||
'
|
||||
'Label21
|
||||
'
|
||||
Me.Label21.AutoSize = True
|
||||
Me.Label21.Location = New System.Drawing.Point(197, 5)
|
||||
Me.Label21.Name = "Label21"
|
||||
Me.Label21.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label21.TabIndex = 28
|
||||
Me.Label21.Text = "Firma:"
|
||||
'
|
||||
'cboFirma2
|
||||
'
|
||||
Me.cboFirma2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboFirma2.FormattingEnabled = True
|
||||
Me.cboFirma2.Items.AddRange(New Object() {"VERAG", "ATILLA", "IMEX"})
|
||||
Me.cboFirma2.Location = New System.Drawing.Point(236, 2)
|
||||
Me.cboFirma2.Name = "cboFirma2"
|
||||
Me.cboFirma2.Size = New System.Drawing.Size(69, 21)
|
||||
Me.cboFirma2.TabIndex = 27
|
||||
'
|
||||
'usrctStatistik
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
|
||||
@@ -17,8 +17,8 @@ Public Class usrctStatistik
|
||||
cboArt.SelectedIndex = 0
|
||||
End Sub
|
||||
|
||||
Private Sub Panel1_Paint(sender As Object, e As PaintEventArgs) Handles Panel1.Paint
|
||||
Dim g As Graphics = e.Graphics
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
Dim g As Graphics = Panel1.CreateGraphics
|
||||
g.Clear(Color.FromArgb(245, 245, 245))
|
||||
Dim p As Panel = DirectCast(sender, Panel)
|
||||
'Jahre:
|
||||
@@ -85,7 +85,7 @@ Public Class usrctStatistik
|
||||
|
||||
Sub changeYear(sender As Object, e As EventArgs)
|
||||
year = CInt(DirectCast(sender, Button).Text)
|
||||
Panel1_Paint(Panel1, New PaintEventArgs(Panel1.CreateGraphics, Panel1.ClientRectangle))
|
||||
' Panel1_Paint(Panel1, New PaintEventArgs(Panel1.CreateGraphics, Panel1.ClientRectangle))
|
||||
End Sub
|
||||
Function CoordRectangle(w As Integer, h As Integer, x0 As Integer, y0 As Integer, x As Integer, y As Integer) As Rectangle
|
||||
' MsgBox(" x0: " & x0 & " y0: " & CStr(h - y0 - y) & " x: " & x & " y: " & y)
|
||||
@@ -96,12 +96,12 @@ Public Class usrctStatistik
|
||||
End Function
|
||||
|
||||
Private Sub txtAuswJahrDauer_TextChanged(sender As Object, e As EventArgs)
|
||||
Panel1_Paint(Panel1, New PaintEventArgs(Panel1.CreateGraphics, Panel1.ClientRectangle))
|
||||
' Panel1_Paint(Panel1, New PaintEventArgs(Panel1.CreateGraphics, Panel1.ClientRectangle))
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub AuswertungWoToag(sender As Object, e As EventArgs) Handles Button11.Click, cboTag.SelectedIndexChanged
|
||||
Private Sub AuswertungWoToag(sender As Object, e As EventArgs) Handles Button11.Click ', cboTag.SelectedIndexChanged
|
||||
Dim s(17, 2) As String
|
||||
Dim t As String = Button11.Text
|
||||
Dim datVon As Date = CDate(txtdatVon.Value)
|
||||
@@ -115,6 +115,7 @@ Public Class usrctStatistik
|
||||
Dim art = ""
|
||||
If cboArt.SelectedIndex = 0 Then art = "Ankunft"
|
||||
If cboArt.SelectedIndex = 1 Then art = "Freigabe"
|
||||
If cboArt.SelectedIndex = 2 Then art = "AvisoEingang"
|
||||
|
||||
For i = 6 To 22
|
||||
Dim cnt As Integer = 0
|
||||
@@ -194,47 +195,91 @@ Public Class usrctStatistik
|
||||
|
||||
|
||||
Private Sub AuswertungWoToag2(sender As Object, e As EventArgs) Handles Button5.Click ', cboTag.SelectedIndexChanged
|
||||
Exit Sub
|
||||
Dim s(17, 2) As String
|
||||
'Exit Sub
|
||||
Dim s(7, 2) As String
|
||||
Dim s_Weekdays() As String = {"SO", "MO", "DI", "MI", "DO", "FR", "SA"}
|
||||
Dim t As String = Button5.Text
|
||||
Dim datVon As Date = CDate(txtdatVon.Value)
|
||||
Dim datBis As Date = CDate(txtdatBis.Value)
|
||||
Dim datVon As Date = CDate(DateTimePicker1.Value)
|
||||
Dim datBis As Date = CDate(DateTimePicker2.Value)
|
||||
|
||||
Dim TESTgesLKWs = 0
|
||||
Dim TESTgesLKWs2 = 0
|
||||
Dim SQLstat As New StatDB
|
||||
Dim c As Integer = 0
|
||||
' Dim c As Integer = 0
|
||||
|
||||
Dim art = ""
|
||||
If cboArt.SelectedIndex = 0 Then art = "Ankunft"
|
||||
If cboArt.SelectedIndex = 1 Then art = "Freigabe"
|
||||
If cboArt.SelectedIndex = 1 Then art = "Erfasst" 'asdasdasd
|
||||
If ComboBox1.SelectedIndex = 0 Then art = "Ankunft"
|
||||
If ComboBox1.SelectedIndex = 1 Then art = "Freigabe"
|
||||
'If ComboBox1.SelectedIndex = 2 Then art = "Erfasst" 'asdasdasd
|
||||
If ComboBox1.SelectedIndex = 2 Then art = "AvisoEingang" 'asdasdasd
|
||||
For i = 1 To 7
|
||||
Dim c = CInt(i.ToString.Replace("7", "0")) 'Sonntag
|
||||
|
||||
For i = 0 To 6
|
||||
Dim cnt As Integer = 0
|
||||
Dim gesLKWs As Integer = 0
|
||||
|
||||
Dim datTmp As Date = datVon
|
||||
While datTmp <= datBis
|
||||
If datTmp.DayOfWeek = cboTag.SelectedIndex Then
|
||||
gesLKWs += SQLstat.getAnzahlLkwAnkunft(art, datTmp, i, cboFirma2.Text)
|
||||
If datTmp.DayOfWeek = i Then
|
||||
gesLKWs += SQLstat.getAnzahlLkwAnkunft(art, datTmp, cboFirma2.Text)
|
||||
cnt += 1
|
||||
End If
|
||||
datTmp = datTmp.AddDays(1)
|
||||
End While
|
||||
|
||||
s(c, 0) = i & ":00"
|
||||
s((i - 1), 0) = s_Weekdays(c)
|
||||
|
||||
If gesLKWs > 0 And cnt > 0 Then
|
||||
s(c, 1) = CStr(CInt(gesLKWs / cnt))
|
||||
s((i - 1), 1) = CStr(CInt(gesLKWs / cnt))
|
||||
Else
|
||||
s(c, 1) = CStr(0)
|
||||
s((i - 1), 1) = CStr(0)
|
||||
End If
|
||||
c += 1
|
||||
' c += 1
|
||||
Next
|
||||
StatAuswertungWoToag(s)
|
||||
StatAuswertungWo(s)
|
||||
Button5.Text = t
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub StatAuswertungWo(s(,) As String) 'Handles Panel1.Paint
|
||||
Dim g As Graphics = Panel8.CreateGraphics
|
||||
g.Clear(Color.FromArgb(245, 245, 245))
|
||||
Dim p As Panel = Panel8
|
||||
'Jahre:
|
||||
Dim topbound = 10
|
||||
|
||||
|
||||
|
||||
|
||||
Dim y0 As Integer = 0
|
||||
Dim x0 As Integer = 0
|
||||
Dim yMax As Integer = p.Height - 50
|
||||
Dim xMax As Integer = p.Width
|
||||
|
||||
Dim h As Integer = p.Height
|
||||
Dim w As Integer = p.Width
|
||||
|
||||
|
||||
|
||||
' MsgBox(s(i, 0) & " - " & s(i, 1))
|
||||
|
||||
Dim sMax As Long = getMax(s)
|
||||
|
||||
Dim xLeftBound As Integer = 0
|
||||
For i = 0 To s.GetUpperBound(0) - 1
|
||||
Dim hoehe = 0
|
||||
If sMax > 0 Then hoehe = CInt(yMax * (CLng(s(i, 1)) * 100 / sMax) / 100)
|
||||
' MsgBox(hoehe)
|
||||
' g.FillRectangle(Brushes.Red, New Rectangle(x0 + xLeftBound, y0, 20, hoehe))
|
||||
g.FillRectangle(Brushes.Red, CoordRectangle(w, h, x0 + xLeftBound, y0 + 20, 20, hoehe))
|
||||
g.DrawString(CInt(s(i, 1)).ToString, p.Font, Brushes.Black, CoordPoint(h, x0 + xLeftBound, 20 + hoehe + 15))
|
||||
g.DrawString(CStr(s(i, 0)).ToString, p.Font, Brushes.Black, CoordPoint(h, x0 + xLeftBound, 15))
|
||||
xLeftBound += 60
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
|
||||
|
||||
Dim i As Image = cProgramFunctions.TakeScreenShot(Panel5)
|
||||
@@ -259,4 +304,7 @@ Public Class usrctStatistik
|
||||
i.Save(s, Drawing.Imaging.ImageFormat.Png)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
31
Aviso/Auswertung/usrctlAuswertung.Designer.vb
generated
31
Aviso/Auswertung/usrctlAuswertung.Designer.vb
generated
@@ -22,8 +22,8 @@ Partial Class usrctlAuswertung
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.TabControl1 = New System.Windows.Forms.TabControl()
|
||||
Me.TabPage1 = New System.Windows.Forms.TabPage()
|
||||
Me.DataGridView1 = New System.Windows.Forms.DataGridView()
|
||||
@@ -49,7 +49,6 @@ Partial Class usrctlAuswertung
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Panel2 = New System.Windows.Forms.Panel()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.TabPage2 = New System.Windows.Forms.TabPage()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
@@ -154,8 +153,8 @@ Partial Class usrctlAuswertung
|
||||
'
|
||||
'DataGridView1
|
||||
'
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.Color.Azure
|
||||
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
|
||||
DataGridViewCellStyle5.BackColor = System.Drawing.Color.Azure
|
||||
Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
|
||||
Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.DataGridView1.Location = New System.Drawing.Point(3, 61)
|
||||
@@ -370,7 +369,6 @@ Partial Class usrctlAuswertung
|
||||
'
|
||||
'Panel2
|
||||
'
|
||||
Me.Panel2.Controls.Add(Me.Button2)
|
||||
Me.Panel2.Controls.Add(Me.Button1)
|
||||
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Right
|
||||
Me.Panel2.Location = New System.Drawing.Point(1021, 3)
|
||||
@@ -378,24 +376,18 @@ Partial Class usrctlAuswertung
|
||||
Me.Panel2.Size = New System.Drawing.Size(106, 533)
|
||||
Me.Panel2.TabIndex = 1
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Location = New System.Drawing.Point(11, 56)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(85, 47)
|
||||
Me.Button2.TabIndex = 0
|
||||
Me.Button2.Text = "Button1"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Image = Global.AVISO.My.Resources.Resources.Excel_2013_logo_155x110
|
||||
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button1.Location = New System.Drawing.Point(11, 3)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(85, 47)
|
||||
Me.Button1.TabIndex = 0
|
||||
Me.Button1.Text = "Button1"
|
||||
Me.Button1.Text = "Excel"
|
||||
Me.Button1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'TabPage2
|
||||
@@ -1052,8 +1044,8 @@ Partial Class usrctlAuswertung
|
||||
'
|
||||
'DataGridView2
|
||||
'
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.Color.Azure
|
||||
Me.DataGridView2.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
|
||||
DataGridViewCellStyle6.BackColor = System.Drawing.Color.Azure
|
||||
Me.DataGridView2.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6
|
||||
Me.DataGridView2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView2.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.DataGridView2.Location = New System.Drawing.Point(3, 3)
|
||||
@@ -1097,7 +1089,6 @@ Partial Class usrctlAuswertung
|
||||
Friend WithEvents DataGridView1 As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
|
||||
Friend WithEvents Panel2 As System.Windows.Forms.Panel
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
|
||||
@@ -459,4 +459,9 @@ Public Class usrctlAuswertung
|
||||
Private Sub cboFirmaIntern_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboFirmaIntern.SelectedIndexChanged, cboGrenzstelle.SelectedIndexChanged
|
||||
showFirmen()
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
SDL.cProgramFunctions.genExcelFromDT_NEW(DataGridView1.DataSource)
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
|
||||
@@ -1,5 +1,9 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<Import Project="..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.props" Condition="Exists('..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.props')" />
|
||||
<Import Project="..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.props" Condition="Exists('..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.props')" />
|
||||
<Import Project="..\packages\cef.redist.x86.75.1.14\build\cef.redist.x86.props" Condition="Exists('..\packages\cef.redist.x86.75.1.14\build\cef.redist.x86.props')" />
|
||||
<Import Project="..\packages\cef.redist.x64.75.1.14\build\cef.redist.x64.props" Condition="Exists('..\packages\cef.redist.x64.75.1.14\build\cef.redist.x64.props')" />
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">x86</Platform>
|
||||
@@ -32,6 +36,8 @@
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<PublishWizardCompleted>true</PublishWizardCompleted>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
<NuGetPackageImportStamp>
|
||||
</NuGetPackageImportStamp>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
|
||||
<PlatformTarget>x86</PlatformTarget>
|
||||
@@ -101,8 +107,7 @@
|
||||
<HintPath>..\packages\Portable.BouncyCastle.1.8.2\lib\net40\BouncyCastle.Crypto.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="com.esendex.sdk, Version=3.8.0.0, Culture=neutral, PublicKeyToken=9dceac28a20578e2, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\packages\esendex-dotnet-sdk.3.4.0\lib\net35\com.esendex.sdk.dll</HintPath>
|
||||
<HintPath>..\packages\esendex-dotnet-sdk.3.8.0\lib\net35\com.esendex.sdk.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DocumentFormat.OpenXml, Version=2.5.5631.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
@@ -159,7 +164,6 @@
|
||||
</Reference>
|
||||
<Reference Include="Newtonsoft.Json, Version=10.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\Newtonsoft.Json.10.0.3\lib\net45\Newtonsoft.Json.dll</HintPath>
|
||||
<Private>True</Private>
|
||||
</Reference>
|
||||
<Reference Include="NumericBox">
|
||||
<HintPath>..\..\..\dll\NumericBox.dll</HintPath>
|
||||
@@ -213,6 +217,9 @@
|
||||
<Reference Include="System.Core" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
<Reference Include="ThoughtWorks.QRCode">
|
||||
<HintPath>..\..\..\dll\ThoughtWorks.QRCode.dll</HintPath>
|
||||
</Reference>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
@@ -251,6 +258,12 @@
|
||||
<Compile Include="Anhänge\frmSendungAnhangUmbenennenUmkateg.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Anhänge\frmSendungAnhang_SendenAnSnd.Designer.vb">
|
||||
<DependentUpon>frmSendungAnhang_SendenAnSnd.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Anhänge\frmSendungAnhang_SendenAnSnd.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Anhänge\usrCntlSendungAnhangElement.Designer.vb">
|
||||
<DependentUpon>usrCntlSendungAnhangElement.vb</DependentUpon>
|
||||
</Compile>
|
||||
@@ -282,6 +295,12 @@
|
||||
<Compile Include="Auswertung\usrctlAuswertung.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="AvisoReports\rptQRAviso.Designer.vb">
|
||||
<DependentUpon>rptQRAviso.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="AvisoReports\rptQRAviso.vb">
|
||||
<SubType>Component</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Barcode.vb" />
|
||||
<Compile Include="Barcode\Code128Content.vb" />
|
||||
<Compile Include="Barcode\Code128Rendering.vb" />
|
||||
@@ -367,6 +386,24 @@
|
||||
<Compile Include="frmAvisoSettings.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmAvisoWeiterleitenBestaetigen.Designer.vb">
|
||||
<DependentUpon>frmAvisoWeiterleitenBestaetigen.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmAvisoWeiterleitenBestaetigen.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmAvisoWeiterleitenOLD.Designer.vb">
|
||||
<DependentUpon>frmAvisoWeiterleitenOLD.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmAvisoWeiterleitenOLD.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmAvisoWeiterleiten.Designer.vb">
|
||||
<DependentUpon>frmAvisoWeiterleiten.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmAvisoWeiterleiten.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmDokumenteSchicken.Designer.vb">
|
||||
<DependentUpon>frmDokumenteSchicken.vb</DependentUpon>
|
||||
</Compile>
|
||||
@@ -641,6 +678,12 @@
|
||||
<Compile Include="usrCntlAvisoAnhang.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="usrCntlBenachrichtigungen.Designer.vb">
|
||||
<DependentUpon>usrCntlBenachrichtigungen.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="usrCntlBenachrichtigungen.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="usrCntlEintragAvisoAtilla.Designer.vb">
|
||||
<DependentUpon>usrCntlEintragAvisoAtilla.vb</DependentUpon>
|
||||
</Compile>
|
||||
@@ -691,6 +734,9 @@
|
||||
<EmbeddedResource Include="Anhänge\frmSendungAnhangUmbenennenUmkateg.resx">
|
||||
<DependentUpon>frmSendungAnhangUmbenennenUmkateg.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Anhänge\frmSendungAnhang_SendenAnSnd.resx">
|
||||
<DependentUpon>frmSendungAnhang_SendenAnSnd.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Anhänge\usrCntlSendungAnhangElement.resx">
|
||||
<DependentUpon>usrCntlSendungAnhangElement.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
@@ -706,6 +752,9 @@
|
||||
<EmbeddedResource Include="Auswertung\usrctlAuswertung.resx">
|
||||
<DependentUpon>usrctlAuswertung.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="AvisoReports\rptQRAviso.resx">
|
||||
<DependentUpon>rptQRAviso.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Benutzerdefinierte Elemente\frmPopUp.resx">
|
||||
<DependentUpon>frmPopUp.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
@@ -737,6 +786,15 @@
|
||||
<EmbeddedResource Include="frmAvisoSettings.resx">
|
||||
<DependentUpon>frmAvisoSettings.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmAvisoWeiterleitenBestaetigen.resx">
|
||||
<DependentUpon>frmAvisoWeiterleitenBestaetigen.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmAvisoWeiterleitenOLD.resx">
|
||||
<DependentUpon>frmAvisoWeiterleitenOLD.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmAvisoWeiterleiten.resx">
|
||||
<DependentUpon>frmAvisoWeiterleiten.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmDokumenteSchicken.resx">
|
||||
<DependentUpon>frmDokumenteSchicken.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
@@ -874,6 +932,9 @@
|
||||
<EmbeddedResource Include="usrCntlAvisoAnhang.resx">
|
||||
<DependentUpon>usrCntlAvisoAnhang.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="usrCntlBenachrichtigungen.resx">
|
||||
<DependentUpon>usrCntlBenachrichtigungen.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="usrCntlEintragAvisoAtilla.resx">
|
||||
<DependentUpon>usrCntlEintragAvisoAtilla.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
@@ -978,6 +1039,9 @@
|
||||
<ItemGroup>
|
||||
<Content Include="aviso.ico" />
|
||||
<Content Include="My Project\aktAlt.jpg" />
|
||||
<None Include="Resources\weiterleiten_small.png" />
|
||||
<None Include="Resources\weiterleiten1.png" />
|
||||
<None Include="Resources\weiterleiten.png" />
|
||||
<None Include="Resources\dakosy.png" />
|
||||
<None Include="Resources\dakosy_dy.png" />
|
||||
<None Include="Resources\FrontOfficeSUB.jpg" />
|
||||
@@ -994,6 +1058,12 @@
|
||||
<None Include="Resources\personCheck_blue_small.png" />
|
||||
<None Include="Resources\personCheck_gray_small.png" />
|
||||
<None Include="Resources\aviso_messenger.png" />
|
||||
<None Include="Resources\avisoNewMsg.ico" />
|
||||
<None Include="Resources\Telefonliste.png" />
|
||||
<None Include="Resources\Telefonliste1.png" />
|
||||
<Content Include="My Project\Telefonliste_small.png" />
|
||||
<None Include="Resources\Telefonliste_small.png" />
|
||||
<None Include="Resources\Logo_blue_globe_Horizontal.jpg" />
|
||||
<Content Include="Resources\UNISPED.png">
|
||||
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
|
||||
</Content>
|
||||
@@ -1187,6 +1257,19 @@
|
||||
<PropertyGroup>
|
||||
<PostBuildEvent>D:\Andreas\Programmierung\VB\Zertifikate\signtool.exe sign /f D:\Andreas\Programmierung\VB\Zertifikate\Zert_20092019.pfx /p BmWr501956 "Aviso.exe"</PostBuildEvent>
|
||||
</PropertyGroup>
|
||||
<Target Name="EnsureNuGetPackageBuildImports" BeforeTargets="PrepareForBuild">
|
||||
<PropertyGroup>
|
||||
<ErrorText>Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}".</ErrorText>
|
||||
</PropertyGroup>
|
||||
<Error Condition="!Exists('..\packages\cef.redist.x64.75.1.14\build\cef.redist.x64.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\cef.redist.x64.75.1.14\build\cef.redist.x64.props'))" />
|
||||
<Error Condition="!Exists('..\packages\cef.redist.x86.75.1.14\build\cef.redist.x86.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\cef.redist.x86.75.1.14\build\cef.redist.x86.props'))" />
|
||||
<Error Condition="!Exists('..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.props'))" />
|
||||
<Error Condition="!Exists('..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.targets'))" />
|
||||
<Error Condition="!Exists('..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.props'))" />
|
||||
<Error Condition="!Exists('..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.targets'))" />
|
||||
</Target>
|
||||
<Import Project="..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.targets" Condition="Exists('..\packages\CefSharp.Common.75.1.143\build\CefSharp.Common.targets')" />
|
||||
<Import Project="..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.targets" Condition="Exists('..\packages\CefSharp.WinForms.75.1.143\build\CefSharp.WinForms.targets')" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
|
||||
349
Aviso/AvisoReports/rptQRAviso.Designer.vb
generated
Normal file
349
Aviso/AvisoReports/rptQRAviso.Designer.vb
generated
Normal file
@@ -0,0 +1,349 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Public Class rptQRAviso
|
||||
Inherits GrapeCity.ActiveReports.SectionReport
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'NOTE: The following procedure is required by the ActiveReports Designer
|
||||
'It can be modified using the ActiveReports Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Private WithEvents PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader
|
||||
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
|
||||
Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptQRAviso))
|
||||
Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader()
|
||||
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
|
||||
Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
|
||||
Me.picVERAG = New GrapeCity.ActiveReports.SectionReportModel.Picture()
|
||||
Me.lblFirma_Details = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label2 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label3 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblDatum = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblFirma_Name = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader()
|
||||
Me.QR = New GrapeCity.ActiveReports.SectionReportModel.Picture()
|
||||
Me.Shape = New GrapeCity.ActiveReports.SectionReportModel.Shape()
|
||||
Me.txtLKW = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
|
||||
Me.Label1 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.txtFraechter = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
|
||||
Me.Label4 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.txtGrenze = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
|
||||
Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
|
||||
Me.Line1 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.Label5 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblSachbearbeiter = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.picQRAviso = New GrapeCity.ActiveReports.SectionReportModel.Picture()
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFirma_Details, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblDatum, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblNr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFirma_Name, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.QR, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtLKW, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtFraechter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtGrenze, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picQRAviso, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
'
|
||||
'PageHeader
|
||||
'
|
||||
Me.PageHeader.Height = 0!
|
||||
Me.PageHeader.Name = "PageHeader"
|
||||
'
|
||||
'Detail
|
||||
'
|
||||
Me.Detail.Height = 0!
|
||||
Me.Detail.Name = "Detail"
|
||||
'
|
||||
'PageFooter
|
||||
'
|
||||
Me.PageFooter.Height = 0!
|
||||
Me.PageFooter.Name = "PageFooter"
|
||||
'
|
||||
'picVERAG
|
||||
'
|
||||
Me.picVERAG.Height = 0.4897638!
|
||||
Me.picVERAG.HyperLink = Nothing
|
||||
Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
|
||||
Me.picVERAG.Left = 0.2015748!
|
||||
Me.picVERAG.Name = "picVERAG"
|
||||
Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
||||
Me.picVERAG.Top = 0!
|
||||
Me.picVERAG.Width = 2.448031!
|
||||
'
|
||||
'lblFirma_Details
|
||||
'
|
||||
Me.lblFirma_Details.Height = 0.4019686!
|
||||
Me.lblFirma_Details.HyperLink = Nothing
|
||||
Me.lblFirma_Details.Left = 0!
|
||||
Me.lblFirma_Details.Name = "lblFirma_Details"
|
||||
Me.lblFirma_Details.Style = "font-size: 8pt; text-align: center"
|
||||
Me.lblFirma_Details.Text = "A 4975 Suben | Suben 14-15" & Global.Microsoft.VisualBasic.ChrW(10) & "UID: ATU53187000"
|
||||
Me.lblFirma_Details.Top = 0.6468505!
|
||||
Me.lblFirma_Details.Width = 2.649606!
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Height = 0.2417324!
|
||||
Me.Label2.HyperLink = Nothing
|
||||
Me.Label2.Left = 0!
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Style = "font-size: 14pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label2.Text = "Ticket Nr.:"
|
||||
Me.Label2.Top = 0.9952757!
|
||||
Me.Label2.Width = 1.191339!
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Height = 0.1968501!
|
||||
Me.Label3.HyperLink = Nothing
|
||||
Me.Label3.Left = 0!
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Style = "font-size: 10pt; font-weight: normal; text-align: left"
|
||||
Me.Label3.Text = "Ankunft:"
|
||||
Me.Label3.Top = 1.244882!
|
||||
Me.Label3.Width = 1.191339!
|
||||
'
|
||||
'lblDatum
|
||||
'
|
||||
Me.lblDatum.Height = 0.1968501!
|
||||
Me.lblDatum.HyperLink = Nothing
|
||||
Me.lblDatum.Left = 1.191339!
|
||||
Me.lblDatum.Name = "lblDatum"
|
||||
Me.lblDatum.Style = "font-size: 10pt; font-weight: normal; text-align: right"
|
||||
Me.lblDatum.Text = "01.01.2016"
|
||||
Me.lblDatum.Top = 1.244883!
|
||||
Me.lblDatum.Width = 1.468504!
|
||||
'
|
||||
'lblNr
|
||||
'
|
||||
Me.lblNr.Height = 0.2417324!
|
||||
Me.lblNr.HyperLink = Nothing
|
||||
Me.lblNr.Left = 1.191339!
|
||||
Me.lblNr.Name = "lblNr"
|
||||
Me.lblNr.Style = "font-size: 14pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.lblNr.Text = "585125"
|
||||
Me.lblNr.Top = 0.9952757!
|
||||
Me.lblNr.Width = 1.468504!
|
||||
'
|
||||
'lblFirma_Name
|
||||
'
|
||||
Me.lblFirma_Name.Height = 0.1374016!
|
||||
Me.lblFirma_Name.HyperLink = Nothing
|
||||
Me.lblFirma_Name.Left = 0!
|
||||
Me.lblFirma_Name.Name = "lblFirma_Name"
|
||||
Me.lblFirma_Name.Style = "font-size: 8pt; font-weight: bold; text-align: center; ddo-char-set: 1"
|
||||
Me.lblFirma_Name.Text = "VERAG Spediton AG"
|
||||
Me.lblFirma_Name.Top = 0.4976378!
|
||||
Me.lblFirma_Name.Width = 2.649606!
|
||||
'
|
||||
'ReportHeader1
|
||||
'
|
||||
Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.QR, Me.Shape, Me.picVERAG, Me.lblFirma_Details, Me.Label2, Me.Label3, Me.lblDatum, Me.lblNr, Me.lblFirma_Name, Me.txtLKW, Me.Label1, Me.txtFraechter, Me.Label4, Me.txtGrenze, Me.picQRAviso})
|
||||
Me.ReportHeader1.Height = 5.32943!
|
||||
Me.ReportHeader1.Name = "ReportHeader1"
|
||||
'
|
||||
'QR
|
||||
'
|
||||
Me.QR.Height = 2.032284!
|
||||
Me.QR.HyperLink = Nothing
|
||||
Me.QR.ImageData = Nothing
|
||||
Me.QR.Left = 0.01338583!
|
||||
Me.QR.Name = "QR"
|
||||
Me.QR.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
||||
Me.QR.Top = 2.740158!
|
||||
Me.QR.Width = 2.659843!
|
||||
'
|
||||
'Shape
|
||||
'
|
||||
Me.Shape.Height = 0.686614!
|
||||
Me.Shape.Left = 0.01338583!
|
||||
Me.Shape.Name = "Shape"
|
||||
Me.Shape.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing)
|
||||
Me.Shape.Top = 1.993307!
|
||||
Me.Shape.Width = 2.646457!
|
||||
'
|
||||
'txtLKW
|
||||
'
|
||||
Me.txtLKW.CanGrow = False
|
||||
Me.txtLKW.Height = 0.6240159!
|
||||
Me.txtLKW.Left = 0.02677166!
|
||||
Me.txtLKW.Name = "txtLKW"
|
||||
Me.txtLKW.Style = "font-size: 16pt; font-weight: bold; text-align: center; text-justify: auto; verti" &
|
||||
"cal-align: middle; ddo-char-set: 1"
|
||||
Me.txtLKW.Text = "SD123ASD"
|
||||
Me.txtLKW.Top = 2.02441!
|
||||
Me.txtLKW.Width = 2.604725!
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Height = 0.1968501!
|
||||
Me.Label1.HyperLink = Nothing
|
||||
Me.Label1.Left = 0!
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Style = "font-size: 10pt; font-weight: normal; text-align: left"
|
||||
Me.Label1.Text = "Fr<EFBFBD>chter:"
|
||||
Me.Label1.Top = 1.737402!
|
||||
Me.Label1.Width = 0.6811024!
|
||||
'
|
||||
'txtFraechter
|
||||
'
|
||||
Me.txtFraechter.Height = 0.1968504!
|
||||
Me.txtFraechter.Left = 0.6811024!
|
||||
Me.txtFraechter.Name = "txtFraechter"
|
||||
Me.txtFraechter.Style = "font-size: 10pt; font-weight: normal; text-align: right; text-justify: auto; vert" &
|
||||
"ical-align: top; ddo-char-set: 1"
|
||||
Me.txtFraechter.Text = "SD123ASD"
|
||||
Me.txtFraechter.Top = 1.737402!
|
||||
Me.txtFraechter.Width = 1.97874!
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.Height = 0.1968501!
|
||||
Me.Label4.HyperLink = Nothing
|
||||
Me.Label4.Left = 0!
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Style = "font-size: 10pt; font-weight: normal; text-align: left"
|
||||
Me.Label4.Text = "Grenze:"
|
||||
Me.Label4.Top = 1.441733!
|
||||
Me.Label4.Width = 0.6811024!
|
||||
'
|
||||
'txtGrenze
|
||||
'
|
||||
Me.txtGrenze.Height = 0.1968504!
|
||||
Me.txtGrenze.Left = 0.6877953!
|
||||
Me.txtGrenze.Name = "txtGrenze"
|
||||
Me.txtGrenze.Style = "font-size: 10pt; font-weight: normal; text-align: right; text-justify: auto; vert" &
|
||||
"ical-align: top; ddo-char-set: 1"
|
||||
Me.txtGrenze.Text = "SUB"
|
||||
Me.txtGrenze.Top = 1.441733!
|
||||
Me.txtGrenze.Width = 1.97874!
|
||||
'
|
||||
'ReportFooter1
|
||||
'
|
||||
Me.ReportFooter1.CanShrink = True
|
||||
Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Line1, Me.Label5, Me.lblSachbearbeiter})
|
||||
Me.ReportFooter1.Height = 0.1775591!
|
||||
Me.ReportFooter1.Name = "ReportFooter1"
|
||||
'
|
||||
'Line1
|
||||
'
|
||||
Me.Line1.Height = 0!
|
||||
Me.Line1.Left = 0.007086615!
|
||||
Me.Line1.LineWeight = 1.0!
|
||||
Me.Line1.Name = "Line1"
|
||||
Me.Line1.Top = 0!
|
||||
Me.Line1.Width = 2.635417!
|
||||
Me.Line1.X1 = 0.007086615!
|
||||
Me.Line1.X2 = 2.642503!
|
||||
Me.Line1.Y1 = 0!
|
||||
Me.Line1.Y2 = 0!
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.Height = 0.146063!
|
||||
Me.Label5.HyperLink = Nothing
|
||||
Me.Label5.Left = 0.01338583!
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Style = "font-size: 7pt; font-weight: normal; text-align: left"
|
||||
Me.Label5.Text = "Sachbearbeiter:"
|
||||
Me.Label5.Top = 0.03149607!
|
||||
Me.Label5.Width = 0.840945!
|
||||
'
|
||||
'lblSachbearbeiter
|
||||
'
|
||||
Me.lblSachbearbeiter.Height = 0.146063!
|
||||
Me.lblSachbearbeiter.HyperLink = Nothing
|
||||
Me.lblSachbearbeiter.Left = 0.8543308!
|
||||
Me.lblSachbearbeiter.Name = "lblSachbearbeiter"
|
||||
Me.lblSachbearbeiter.Style = "font-size: 7pt; font-weight: normal; text-align: right"
|
||||
Me.lblSachbearbeiter.Text = "-"
|
||||
Me.lblSachbearbeiter.Top = 0.03149607!
|
||||
Me.lblSachbearbeiter.Width = 1.788189!
|
||||
'
|
||||
'picQRAviso
|
||||
'
|
||||
Me.picQRAviso.Height = 0.355118!
|
||||
Me.picQRAviso.HyperLink = Nothing
|
||||
Me.picQRAviso.ImageData = Nothing
|
||||
Me.picQRAviso.Left = 0!
|
||||
Me.picQRAviso.Name = "picQRAviso"
|
||||
Me.picQRAviso.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
||||
Me.picQRAviso.Top = 4.900001!
|
||||
Me.picQRAviso.Width = 2.659843!
|
||||
'
|
||||
'rptQRAviso
|
||||
'
|
||||
Me.MasterReport = False
|
||||
Me.PageSettings.Margins.Bottom = 0.1968504!
|
||||
Me.PageSettings.Margins.Left = 0.07874016!
|
||||
Me.PageSettings.Margins.Right = 0.07874016!
|
||||
Me.PageSettings.Margins.Top = 0!
|
||||
Me.PageSettings.PaperHeight = 11.0!
|
||||
Me.PageSettings.PaperWidth = 8.5!
|
||||
Me.PrintWidth = 2.673229!
|
||||
Me.Sections.Add(Me.ReportHeader1)
|
||||
Me.Sections.Add(Me.PageHeader)
|
||||
Me.Sections.Add(Me.Detail)
|
||||
Me.Sections.Add(Me.PageFooter)
|
||||
Me.Sections.Add(Me.ReportFooter1)
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
|
||||
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
|
||||
"lic", "Heading2", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFirma_Details, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblDatum, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblNr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFirma_Name, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.QR, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtLKW, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtFraechter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtGrenze, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picQRAviso, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
|
||||
End Sub
|
||||
Private WithEvents Label2 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label3 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
|
||||
Private WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
|
||||
Private WithEvents Line1 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents lblDatum As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblNr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents QR As GrapeCity.ActiveReports.SectionReportModel.Picture
|
||||
Private WithEvents Label5 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblSachbearbeiter As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture
|
||||
Public WithEvents lblFirma_Details As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFirma_Name As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents txtLKW As GrapeCity.ActiveReports.SectionReportModel.TextBox
|
||||
Private WithEvents Label1 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents txtFraechter As GrapeCity.ActiveReports.SectionReportModel.TextBox
|
||||
Private WithEvents Label4 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents txtGrenze As GrapeCity.ActiveReports.SectionReportModel.TextBox
|
||||
Private WithEvents Shape As GrapeCity.ActiveReports.SectionReportModel.Shape
|
||||
Private WithEvents picQRAviso As GrapeCity.ActiveReports.SectionReportModel.Picture
|
||||
End Class
|
||||
762
Aviso/AvisoReports/rptQRAviso.resx
Normal file
762
Aviso/AvisoReports/rptQRAviso.resx
Normal file
@@ -0,0 +1,762 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="picVERAG.ImageData" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAEAQAAABZTeXN0ZW0uSU8uTWVtb3J5U3RyZWFtCgAAAAdfYnVmZmVyB19v
|
||||
cmlnaW4JX3Bvc2l0aW9uB19sZW5ndGgJX2NhcGFjaXR5C19leHBhbmRhYmxlCV93cml0YWJsZQpfZXhw
|
||||
b3NhYmxlB19pc09wZW4dTWFyc2hhbEJ5UmVmT2JqZWN0K19faWRlbnRpdHkHAAAAAAAAAAACAggICAgB
|
||||
AQEBCQIAAAAAAAAAAAAAAB6TAAAekwAAAQEBAQoPAgAAAB6TAAACAhmTAACJUE5HDQoaCgAAAA1JSERS
|
||||
AAAJOgAAAZIIBgAAAMnO7JoAAAABc1JHQgCuzhzpAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29mdHdh
|
||||
cmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAJKeSURBVHhe7N0LvG1T3f/xczgOh1MuIbekSC4VXZyuShfy
|
||||
pHokSRc93dOF7qX7qVS6SXcSqXZFqVQq3aQ7SegiIkmJJCKh4/D/f3+W09pzr+/eZ+21xxxrzDk/vV7v
|
||||
1//1Hw97jPWbYy5jrfFdc8z7f//v/wEAAAAAAAAAAAAAAABA0WwjAAAAAAAAAAAAAAAAAJTENgIAAAAA
|
||||
AAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTE
|
||||
NgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAA
|
||||
AAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAA
|
||||
AAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABA
|
||||
SWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAA
|
||||
AAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIA
|
||||
AAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAA
|
||||
AJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAA
|
||||
AAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwj
|
||||
AAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAA
|
||||
AABASWwjAAAAAAAAAAAAAAAAAJTENgIAAAAAAAAAAAAAAABASWwjAAAAAAAAAAAAAAAAAJTENuY0b8lS
|
||||
AAAAAAAAAACAJlhTNpedZHd5qrxQXiPvkA/Lp+Urcor8WM6S38pFcon881Y3yP9DNjfKitqHP0lck3CO
|
||||
xHX6hcR1+5acIJ+TY+RD8l5ZKi+VZ8u+soc8RHaQO8ha4uZN57g9QQAAgBRsY05u8QMAAAAAAAAAAJDR
|
||||
qrKF7CxPklfJ++WLcppEKOY6cQEaYLL/yF/lN/JD+bx8UCIM9wyJgNw9ZF1xc7EV3J4gAABACrYxJ7f4
|
||||
AQAAAAAAAAAAqMEmspscIBFkOlHOlWXiQitAneLJUvEkqS/LoRJPB9tFNhA3fxvD7QkCAACkYBvroEXN
|
||||
T8Qt4lB1vWwsA4tCoFCryNni5jN6uK/TeYm4GgNopngEvLvXUZb40tVdP6Btph5f8SuJDYc4auSbEr/C
|
||||
PloOkzfLK+T/5NFyf9labifuPgKAYSwR9/6ENOJ9Pb7DcLUH0E4LJY6X21/i2LE4juxKce8RQIn+LjFv
|
||||
IwAVx+TdWdxcL5LbKwQAAEjBNtZBi5oHi1uoYVB86BpYFAKFikftunmMvkPE1Q6zR9AJaBeCTs1A0AmY
|
||||
nXgSwMXyMzle4vPdQbKPxEYbYSgA04mjbdz7CtJ5mrjaA2iHreQpEkeEnSpxfJh7LwCaLMJP8X1KfE96
|
||||
N5kv7n4YO7dXCAAAkIJtrIsWNvErWLcwQ1V8MX5HGVgYAoVZUy4RN4/RE5vD64irH2aPoBPQLgSdmoGg
|
||||
E5DeNXKmHCtvlMfL9rKauPsQQPs9Rtz7BdKKJ/bFE17cNQDQPPEd+tPlGIn72933QNv9TT4te8ticffK
|
||||
WLh9QgAAgBRsY120sLmnuIUYBsWHs4GFIVCYN4ibv+iLX++72mE0BJ2AdiHo1AwEnYB8bpRfypESR6zE
|
||||
E6BWF3dvAmiPBfJbce8LSO/F4q4DgPLF++Uu8l45T9w9DnTZDfI1earEj5TdfZSN2ycEAABIwTbWSYub
|
||||
48QtwFC1XLaVgcUhUIiN5Fpx8xc9l8oicfXDaAg6Ae1C0KkZCDoB4xWbFXGc1dtkd7mtuHsVQHM9S9z9
|
||||
j3rEkT+3EXctAJQnQt+Pk8/IleLuawCD/iVHy87i7q3auT1CAACAFGxjnbS42VoixOMWXqj6vAwsDoFC
|
||||
HC5u3qLveeJqh9ERdALahaBTMxB0AsoSn6cj+PQ6uZfMF3fvAmiG+HEMR8Ln92Zx1wNAGVaReHJTPOXy
|
||||
KnH3MYDhxbHZT5Osx7e6PUIAAIAUbGPdtMCJDyhusYVBcdzfwAIRGLPthMDizC6QeJy2qx9GR9AJaBeC
|
||||
Ts1A0Ako22USP0J4uMSmoLuPAZQrQovu3ka94gnVG4q7JgDGJ+7LeF+8WNy9C2Bu/irx/WqWUwjc/iAA
|
||||
AEAKtrFuWuDcQa4Xt9BC1TdkYIEIjNmJ4uYr+p4ornaYG4JOQLsQdGoGgk5Ac8TGxQeEH8wAzbC+XC3u
|
||||
fkb94v3SXRcA+T1A4mi6ZeLuVwBpRZjwuVLrD3Xd/iAAAEAKtjEHLXIOFbfAwqAHysAiERiT+KW4m6fo
|
||||
+6VwhEg9CDoB7ULQqRkIOgHNdIbE5sVtxN3bAMYvgjbu/kUeEai4s7hrAyCP+J7xFHH3KID6/Vpq239y
|
||||
e4MAAAAp2MYctMiJX61dI25xhar4sDewSATGII7CiBCPm6foe6S4+mHuCDoB7ULQqRkIOgHNFvfwO2Qj
|
||||
cfc4gPHYUnhyyfhNiLs+AOoV352dKu6+BJDfx2UdcffryNzeIAAAQAq2MRctdJaKW1RhEMEJlGA/cfMT
|
||||
fd8XVzukQdAJaBeCTs1A0AlohxvkcNlE3L0OIK9jxd2ryOtm2UHcNQKQ3vbyLXH3I4Dx+pMkfbqT2xcE
|
||||
AABIwTbmooXOYrlC3KIKVacLR2FhnBbJn8XNT/TdT1z9kAZBJ6BdCDo1A0EnoF2uk4NlbXH3PID63Ufc
|
||||
/Ynx+Lq46wQgndvJR2W5uPsQQBniHn2DJNmLcvuCAAAAKdjGnLTYeam4BRUG7SkDi0Ugk9eKm5fo+7K4
|
||||
2iEdgk5AuxB0agaCTkA7XS5PEnffA6jXyeLuS4zPg8VdKwBzF99pXybu3gNQpuNkTXH39NDcniAAAEAK
|
||||
tjEnLXbiKTEXi1tMoeocWUUGFoxAzTaUa8TNS/TEr122E1c/pEPQCWgXgk7NQNAJaLdvyubi7n8A6e0h
|
||||
7l7EeP1M3PUCMLp4itNnxN1zAMr3c9lI3P09FLcnCAAAkIJtzOnWBc+zxC2kMGg/qSwWgQw+JG4+ou8T
|
||||
4mqHtAg6Ae1C0KkZCDoB7XeVPE7cewCAdOLHa78Wdx9i/HiSOpDOg+Qv4u41AM1xgWwm7j5fKbcnCAAA
|
||||
kIJtzOnWBc8COU/cQgpVsbBcTSoLRqBGdxXOz5/ZDcKv4PMg6AS0C0GnZiDoBHTHYcLnTaA+zxR376EM
|
||||
8ST1VcVdOwDDi+9u+C4RaI+Rw05uTxAAACAF25jTpEXPPuIWURi0v0yuHVCnr4ibh+g7VFztkB5BJ6Bd
|
||||
CDo1A0EnoFtOksXi3g8AjG6R8HST8kUYzV0/ACsXYemjxN1bAJotwk4biLv3p+X2BAEAAFKwjTlNWvTM
|
||||
lzPFLaJQFV+MxRdkk+sH1OEh4uYg+q6R9cXVD+kRdALahaBTMxB0ArrnFzLrjQwAM3q1uPsNZblY+M4N
|
||||
mL015Vvi7isA7XCaxL3u3gMstycIAACQgm3MacrCZ3dxCygMeqlMrR+QUoQPY4PDzT/0vVFc/VAPgk5A
|
||||
uxB0agaCTkA3/VoIOwFp3E7472lzvFzcdQTgrS0/EXc/AWiXOP0h9g3ce8EAtycIAACQgm3MySx+ThG3
|
||||
gELVFcJxAqjTk8XNPfRdLtyHeRF0AtqFoFMzsDELdFf88CE2L917A4DhxXHn7h5DmeI7t3XEXUsAVbeR
|
||||
eMqLu5cAtNPrxL0fDHB7ggAAACnYxpzM4ucB4hZPGMSTZFCXNeQicfMOfQeKqx/qQ9AJaBeCTs1A0Ano
|
||||
th/IauLeHwCs3J1kmbj7C+V6m7jrCaBvoXxP3D0EoL1ukoeIe1+ocHuCAAAAKdjGnNziR74mbgGFqth0
|
||||
Wk9cDYG5eJW4OYe+P0p8oePqh/oQdALahaBTMxB0AvBRce8PAFbuM+LuK5Tt37KxuGsKoHd01XHi7h8A
|
||||
7XeprCvu/eG/3J4gAABACrYxJ7f4kR3kZnELKFQdIq6GwKjWFzY0V+5p4uqHehF0AtqFoFMzsC4AEJ4r
|
||||
7j0CwPTuJe5+QjN8RNx1BbBk6evF3TcAuuMYce8P/+X2BAEAAFKwjTm5xc+t+MXbcK4TfmGGlD4gbq6h
|
||||
79eyirj6oV4EnYB2IejUDASdAITrZVtx7xMAvO+Ku5/QDDfKVuKuLdBljxZ+pAwg7CbufeIWbk8QAAAg
|
||||
BduYk1v83Cq+SIgvFNziCVUfFFdDYLbuIsvEzTP0PUZc/VA/gk5AuxB0agaCTgBW+KWsJu69AkDVI8Xd
|
||||
R2iWOJrLXV+gq+I7ez4fAFjhQlko7v3C7gkCAACkYBtzcoufSQ4Xt3hCVQRTNhdXQ2A2vihujqHvJ+Jq
|
||||
hzwIOgHtQtCpGdjIADDZm8W9VwDoiycAny3uHkLzxBGE7joDXbOq/EzcfQKgu14u7j3D7gkCAACkYBtz
|
||||
coufSeJItng8vls8oWql5yEDK/EgcXMLVTuLqx/yIOgEtAtBp2Yg6ARgshtkS3HvFwB6nibu/kEzfVvc
|
||||
dQa65vXi7hEA3XaVrCcD7xtuTxAAACAF25iTW/xM8U5xiydULZdtxNUQWJn5cpq4uYW+r4urH/Ih6AS0
|
||||
C0GnZiDoBGAq1sXA9BbJxeLuHTTXw8Vdb6Ar7ik3irs/AOAQGXjvcHuCAAAAKdjGnNziZ4pIgrO5Mpzj
|
||||
xNUQWJl9xM0p9N0sO4irH/Ih6AS0C0GnZmAtDsB5pLj3DKDrXinunkGznS7xIzF3zYG2i+M4+YEkgJlc
|
||||
I+tI5f3D7QkCAACkYBtzmrrwmQaPxR1e/LrG1RCYzkK5UNx8Qt+EuPohL4JOQLsQdGoGgk4AnNjwZNMf
|
||||
qFpX4vgWd8+g+fYWd92BtnuOuHsCACZ7nVTeP9yeIAAAQAq2MaepC59pLJa/iVs8oYojBDBbLxc3l9C3
|
||||
TLYUVz/kRdAJaBeCTs1A0AnAdPYU974BdNV7xN0raIfzZIG4aw+0VQQ4Lxd3TwDAZH+X1eW/7yFuTxAA
|
||||
ACAF25jT5EXPShwobvGEQQ8QV0Ngqjgakl+brtyHxNUP+RF0AtqFoFMzEHQCMJ0zxL1vAF10R7lB3L2C
|
||||
9niuuOsPtNX7xN0LAODsI/99D3F7ggAAACnYxpwmL3pWIo7X+pO4xROqThFXQ2CqQ8XNIfRdKxuJqx/y
|
||||
I+gEtAtBp2Yg6ARgJjuLe+8AuubT4u4RtMtfZZG4OQC0zcZyvbh7AQCc78l/30fcniAAAEAKtjGnyYue
|
||||
ITxd3OIJg3YVV0NghTtLHMnm5g/6DhZXP4wHQSegXQg6NQNBJwAzOV7cewfQJTvKzeLuEbTPq8XNA6Bt
|
||||
DhN3DwDATLaSW95H3J4gAABACrYxpxULniGtKueIWzyh6jSZL66OQPi8uLmDvitkHXH1w3gQdALahaBT
|
||||
MxB0AjCT5XIHce8fQFd8R9z9gXaKtdG64uYC0BabC09zAjCKN8gt7yVuTxAAACAF25jTigXPLOwlbvGE
|
||||
QXuKqyFwf3FzBlWvEFc/jA9BJ6BdCDo1A0EnACvzOnHvH0AXPELcfYF2e5e4+QC0RcxxN/cBYGXOklve
|
||||
S9yeIAAAQAq2MacVC55ZiKcU/VzcAgpVv5FVxNUR3RX30E/EzRn0/VkWiashxoegE9AuBJ2agaATgJU5
|
||||
T9z7B9B28Z3LL8XdF2i3eNLNpuLmBdB0a8lV4uY+AAxjS7F7ggAAACnYxpxisTMCfi03vKeIqyG66/Hi
|
||||
5gqqniWufhgvgk5AuxB0agaCTgCGsUTcewjQZk8Vdz+gG44UNy+Apttf3JwHgGG9UuyeIAAAQAq2MadY
|
||||
7IzoZHELKFRdIAvE1RDds1DOFzdX0HeucN+UiaAT0C4EnZqBoBOAYRwq7j0EaKvV5SJx9wO6YblsI25+
|
||||
AE0VT4L/nbg5DwDD+o7YPUEAAIAUbGNOsdgZ0X3FLaAw6HniaojuebG4OYKqeOqVqx/Gj6AT0C4EnZqB
|
||||
oBOAYcSPbNx7CNBWLxd3L6BbvihufgBN9QBxcx0AZuMGWcPtCQIAAKRgG3PSYmcuYnPMLaJQ9WdZJK6G
|
||||
6I515B/i5gj6fi7x6zVXQ4wfQSegXQg6NQNBJwDD2k7c+wjQNvH5+kpx9wG6h6M70SaHi5vnADBbj3B7
|
||||
ggAAACnYxpy02JmL+BL1ZnGLKFRFOMDVEN3xHnFzA1UPF1c/lIGgE9AuBJ2agaATgGEdJO59BGibd4q7
|
||||
B9BNJ4ubJ0DTxJGcV4mb5wAwW293e4IAAAAp2MactNiZq0+KW0Sh6gpZLK6GaL8tJB4X6+YG+m45OxxF
|
||||
I+gEtAtBp2Yg6ARgWN8V9z4CtMkd5Hpx9wC6azdx8wVokseLm98AMIrvuj1BAACAFGxjTlrszNWdZJm4
|
||||
hRSq3iCuhmi/z4qbE6i6j7j6oRwEnYB2IejUDASdAAzrOlko7r0EaItjxM1/dNuZwjH4aLpjxc1vABjF
|
||||
NbKK2xcEAACYK9uYkxY6KXxQ3EIKVbFJta64GqK9dhI3H1D1BXH1Q1kIOgHtQtCpGQg6AZiNB4l7LwHa
|
||||
4B5ys7i5DzxJ3LwBmmA1uVrc3AaAUW3n9gUBAADmyjbmpIVOChvLteIWUqg6RFwN0V4/EjcX0LdcthZX
|
||||
P5SFoBPQLgSdmoGgE4DZeL249xKgDb4pbt4D4QKJsIibO0DpdhU3rwFgLvZz+4IAAABzZRtz0kInlbeL
|
||||
W0ih6t8SwTBXQ7TP48TNA1QdKa5+KA9BJ6BdCDo1A0EnALPxdXHvJUDTPVzcnAcme6G4+QOUjhMTANTh
|
||||
ELcvCAAAMFe2MSctdFJZR9iEGc4HxNUQ7bJAzhM3B9B3vWwqroYoD0EnoF0IOjUDa2wAs3GZuPcSoMnm
|
||||
yy/EzXlgsktlsbh5BJTsj+LmNADMxVfdviAAAMBc2cactNBJ6SBxiylULZPNxdUQ7fEicdcfVe8SVz+U
|
||||
iaAT0C4EnZqBoBOA2eKHBGibJ4mb64DDEZ5omi3EzWUAmKsL3b4gAADAXNnGnLTQSWmRxC+n3IIKVUeL
|
||||
qyHaYW35u7hrj77YuF1PXA1RJoJOQLsQdGoGgk4AZuux4t5PgCZaKBeKm+uAE2un9cXNJ6BETxc3lwFg
|
||||
rm6WNdzeIAAAwFzYxpy0yEntBeIWVKhaLluLqyGa7xBx1x1VrxVXP5SLoBPQLgSdmoGgE4DZeoO49xOg
|
||||
ifgMglEcKm4+ASU6Rtw8BoAUtnF7gwAAAHNhG3PSIie1+KXdH8QtqFB1rLgaotniWMLrxV1z9MXT39YS
|
||||
V0OUi00GoF0IOjUDQScAszUh7v0EaJp15Apx8xyYyQ0S38+4eQWU5iJx8xgAUtjd7Q0CAADMhW3MSYuc
|
||||
OuwnbkGFqnhs6D3F1RDN9Wlx1xtV8fQ3Vz+UjaAT0C4EnZqBoBOA2fqluPcToGneLm6OA8P4hLh5BZRk
|
||||
Y3HzFwBS2d/tDQIAAMyFbcxJi5w6rCK/FreoQtXXxNUQzXRviQCbu9bou0BWE1dDlI2gE9AuBJ2agaAT
|
||||
gNm6Vtz7CdAkmwpPS57edaYNVTfJ9uLmF1CKx4qbvxiveP+Ip9H/Qr4uH5N3yuvlxfJ0eZw8Qu4rO8qd
|
||||
ZItb3VHiqYRNtq6seD0h3k/jR9u7yO6yp/yfPFcOknfJxyW+Z/iRnCP/EFdf5PV2tzcIAAAwF7YxJy1y
|
||||
6vK/4hZVGHQ/cTVE83xf3DVG1ZPF1Q/lI+gEtAtBp2Yg6ARgFJuIe08BmuIocXMbPU+S2IB3/zf0fUXc
|
||||
/AJK8RZxcxf1i89ZP5Qj5ZWyl9xH4ilbq4q7Xpi9tWQbeaQ8W2LOf0EiCLVc3LVBWp9ye4MAAABzYRtz
|
||||
0iKnTqeKW1ih6hRx9UOzPEbc9UXVmRJPfXM1RPkIOg1qw6/00F3xhaO711EWgk4ARsEPatBkd5N4moab
|
||||
21iy9AyZLw+d1IbpPUDcPANKEE8LcvMWacXTLr8tB0t8h7uZuOuBvBbKPeQpcrj8Ttz1w9x80+0NAgAA
|
||||
zIVtzEmLnDrFY0zdwgqD4jG3roZohgXCB7HhPEpcDdEMBJ0GRVjE1QoAUiHoVHWxTA3toRluJ3HsRRzt
|
||||
EcddPFPiCJDY4PuruOuN0T1R3HsK0AQnipvX6Jn8HRK1Wrl4Ysvk+QWU5DJx8xZz90t5kzxQ4rtbV3+U
|
||||
ZwPZWz4tV4q7tpid093eIAAAwFzYxpy0yKnbt8QtrlAVT7+KX+O5GqJ8+4u7rqj6gbj6oTkIOg2KjVtX
|
||||
KwBIhaBT1UXi6oTmiyMtDpBYM7prj9l5hbg6A6XjR3Mz+65Mrlc8/Yqjf1bu0TK5bkAJ1hc3XzG6c+W1
|
||||
srm4mqNZVpcI7/P5YG4udnuDAAAAc2Ebc9Iip273Fre4wqA9xdUQZbuN/E3cNUXV/cXVEM1B0GkQQScA
|
||||
dSPoVEXQqRu2lMPkenHzACv3AXG1BUoWPwA7XdycRk98zza1bh8X98+i71fCMfoozYPFzVfM3kmyq/BD
|
||||
4vaK75V/Ku76Y2bXu71BAACAubCNOWmRk8Px4hZYqPq18KVL88TZ7u56ouor4uqHZiHoNIigE4C6EXSq
|
||||
IujULRvLMeLmAmZ2nLiaAiV7grj5jJ5jxdVtE/m3uH8HffuJqx8wLs8RN1cxvAi+xNF0rr5onwiyHSj/
|
||||
ETcfML0Fbn8QAABgVLYxJy1wcthWeIz2cJ4sroYo02bCr8xX7mbZXlwN0SwEnQYRdAJQN4JOVQSduime
|
||||
fvsPcXMC3tTjrYDSLZQLxM1nLFm6TLYSV7vwVnH/Hvr+KDHPXP2AcXifuLmKlYvvY18k/Gi4m+4rfxc3
|
||||
N+Ct4/YHAQAARmUbc9ICJ5ejxS2wUBVf6i0QV0OU5xPiriOq4lf4rn5oHoJOgwg6AagbQacqgk7dtbXE
|
||||
JrWbFxgUTwx2dQRKdYC4uYyeD4mr2wocqz+cF4urHzAO3xQ3TzGzP8s9xdUU3bGN8N+94d3R7Q8CAACM
|
||||
yjbmpAVOLpsLjxQdznPF1RBl2UHiSUXuGqIvfnV6R3E1RPMQdBpE0AlA3Qg6VRF06rYt5K/i5gaqok6u
|
||||
hkCJbis8mWF618pG4mo32QvF/fvoi3m2WFz9gNzOFTdPMb34kXA8Yd/VE91zL+Ho1uFs7/YHAQAARmUb
|
||||
c9ICJ6fDxC2yUHWxLBJXQ5QjjoJw1w9Vcd+7+qGZCDoNIugEoG4EnaoIOiGOqrhR3PxAX/zgwNUPKNHB
|
||||
4uYxet4irm5TxRPCzxP3N9C3VFz9gNzi+DU3R+HFMcYzHeGJbnqGuPmCqp3c/iAAAMCobGNOWuDktIHE
|
||||
r9DcQgtVESZwNUQZHiXuuqEq7ve4710N0UwEnQYRdAJQN4JOVQSdEAhFDGehuPoBJdlErhM3h9F7AlEc
|
||||
S+dq5zxO3N9BX3xXsaG4+gG5xPdlbn5ieruKqyXwdXFzBn27uP1BAACAUdnGnLTAyS1+heYWWqi6XHiU
|
||||
dplWld+Iu26o4leS7UPQaRBBJwB1I+hURdAJYXX5g7g5gj7WKWiCI8XNX/QcKK5uM/mxuL+Fvg+Iqx2Q
|
||||
y73FzU14h4qrIxC2lHiaqZs76CHoBAAAkrKNOWmBk9vacoW4xRaqXieuhhivZ4u7XqiK+5ywXvsQdBrE
|
||||
BiKAuhF0qiLohBWeLm6OoG8LcbUDSrGtLBc3f7Fk6R9llCez3V/c30NfbIjfSVz9gBx4+trw/ixriasj
|
||||
sMIR4uYPegg6AQCApGxjTlrgjMMrxC22UBWbWmyglyWCO5eKu16o4vjFdiLoNIj3aQB1I+hURdAJKyyQ
|
||||
i8XNE/RsJ652QCm+Km7uouep4uo2jOPF/U30fVpc7YAcXiBuXmJQhNtdDYHJthY3f9DzCLc/CAAAMCrb
|
||||
mJMWOOOwSC4Rt+BC1TvE1RDj8WZx1wlVf5JRfnWK8hF0GkTQCUDdCDpVEXTCZG8TN0/Qs6O4ugEl2Fnc
|
||||
vEXPWbKKuNoN4y7CMT4zu1nuIa5+QN2WipuXqDpfItzuaghM9QNx8whLlu7p9gcBAABGZRtz0gJnXJ4r
|
||||
bsGFqmtlI3E1RF6byL/FXSdU8Uur9iLoNIigE4C6EXSqIuiEybYRN0/Q80BxdQPGbb6cKm7eomd3cbWb
|
||||
jQ+K+9vo+7q42gF1+7C4OYmq2ENw9QOc/cXNIxB0AgAAidnGnLTAGZf4JcYF4hZdqDpMXA2R18fFXR9U
|
||||
/Vbm8qtTlI2g0yCCTgDqRtCpiqATpuJz5fR2EVczYNz2Fjdn0fN9cXWbrQ3kanF9oO/B4uoH1Ok4cfMR
|
||||
fVfJmuLqBzibiptLWLJ0N7c/CAAAMCrbmJMWOOO0r7hFF6riUeObi6sh8ri73CTu+qBqT3E1RDsQdBpE
|
||||
0AlA3Qg6VRF0wlT8IGF6BJ1Qovjh2+/FzVn0LBFXu1G8Tlwf6PupuNoBdfqeuPmIvsPF1Q6YSXxedPOp
|
||||
63Zx+4MAAACjso05aYEzTvHUlzPFLbxQdZS4GiKPk8RdF1T9TFz90B4EnQYRdAJQN4JOVQSdMNV+4uYK
|
||||
CDqhTC8UN1/Rc7y4uo1qkfxFXF/o+19x9QPq8itxcxF9DxJXO2AmnxU3n7qOoBMAAEjKNuakBc647SFu
|
||||
4YWq5XIXcTVEvXYTd00w6CHiaoj2IOg0iKATgLoRdKoi6ISpdhQ3V7Bk6cPE1QwYl8XyN3HzFb3vfrYW
|
||||
V7u5eIa4/tB3jqwqrn5AHXjqzMwuk/iRtKsdMJMDxc2priPoBAAAkrKNOWmBU4IfiVt8oepYcfVDfeID
|
||||
Nb+wGs43xdUQ7ULQaRBBJwB1I+hURdAJU60hHDPt8UQnlOYt4uYqeuo6ponvNoYTgTBXP6AOV4ibh+g5
|
||||
WlzdgJV5lLg51XUEnQAAQFK2MSctcEqws7jFF6pulvi1sqsh6sGvHocTc/Oe4mqIdiHoNIigE4C6EXSq
|
||||
IugEh6cieASdUJKN5VpxcxVLll4nUSNXuxR2F9cv+i6WCM+6+gGpXS9uHqJnH3F1A1ZmO3FzqusIOgEA
|
||||
gKRsY05a4JTiG+IWYKj6qrj6Ib015RJx1wFVcfa5qyHah6DTIIJOAOpG0KmKoBOcU8XNl67jaGmU5Ahx
|
||||
8xQ9bxNXt5S+K65v9L1cXO2AlOaLm3/o20hc7YCVie/03Zzquge4/UEAAIBR2cactMApRTwNxi3AMOh+
|
||||
4mqItN4grv6oulG2EldDtA9Bp0EEnQDUjaBTFUEnOF8RN1+6jicCoxR3leXi5il6R1jl+FwR373FE5nd
|
||||
GNCT61qg22KOufmHnvPE1Q0Y1tXi5laX7eD2BwEAAEZlG3PSAqckx4pbhKHq++Lqh3TiV0M8Un84HxFX
|
||||
Q7QTQadBfAkOoG4EnaoIOsE5Rtx86TqCTijFl8TNUfS8TFzd6vBpcWNA38Hiagekspm4uYeez4irGzCs
|
||||
v4mbW122hdsfBAAAGJVtzEkLnJLEU2H4hd9wHi6uhkiDR+oP5zrZWFwN0U4EnQYRdAJQN4JOVQSd4HxI
|
||||
3HzpOoJOKMEDxc1P9Fwsq4urXR3uKNeLGwt64odvfNeBOm0hbu6hJ2f4E+0Unxnd3OqyDdz+IAAAwKhs
|
||||
Y05a4JTmY+IWYqg6VVz9MHfbCYG74bxdXA3RXgSdBhF0AlA3gk5VBJ3gHCZuvnTdluLqBeT0E3HzEz3/
|
||||
J65udXq3uLGgj6dXo04EnWbGD3wxV78WN7e6bE23PwgAADAq25iTFjiliUf38suy4fyvuBpibk4UV29U
|
||||
XSkEPLqHoNMg7gMAdSPoVEXQCQ5BJ48nkmDc9hI3N9ETG7GriKtdneIzzD/EjQk9N0o8ed7VD5grgk4z
|
||||
21Rc3YBhvUXiaGvcyu0NAgAAzIVtzEmLnBK9V9yHHFSdLeP4QqzN4hdDrtYY9CpxNUS7EXQaRNAJQN0I
|
||||
OlURdIJD0MlbJK5eQA4L5DxxcxM9jxZXuxxeKm5M6PucuNoBc3U3cXMOS5ZeI65mAEbg9gQBAABSsI05
|
||||
ucVPAdaXq8V92EHVvuJqiNmL0NiZ4uqMqkuETZNuIug0iKATgLoRdKoi6ASHoNOgZeJqBeTyPHFzEz0/
|
||||
FFe3XBbKheLGhr57iasfMBc7iptvWLL0LHE1AzACtycIAACQgm3MyS1+CvEmcR92UHWBxK8kXQ0xO/uJ
|
||||
qzEGPUdcDdF+BJ0GEXQCUDeCTlUEneAcKW6+dNnl4moF5LBYLhU3N9Fzf3G1yyl+POfGhr5vi6sdMBcE
|
||||
naZ3griaARiB2xMEAABIwTbm5BY/hYgvxa4Q94EHVc8WV0MML55O9Gdx9UXV74VwXXcRdBpE0AlA3Qg6
|
||||
VRF0gvNJcfOly2Ld7moF5PBGcfMSPV8WV7fc5svp4saIvoeJqx8wKoJO0/uQuJoBGIHbEwQAAEjBNubk
|
||||
Fj8FYUN9OBfL6uJqiOG8VlxtMegJ4mqIbuB9eRBBJwB1I+hURdAJzlfFzZcui/CCqxVQt9vLteLmJZYs
|
||||
XS7biqvdODxE3DjR93OJUJirHzAKgk7Te724mgEYgdsTBAAASME25uQWPwWJ8E6EeNyHHlRF+MDVECu3
|
||||
oVwjrq6oOkP4cq/bCDoNIugEoG4EnaoIOsH5sbj50mUniasVULcPi5uT6Pm4uLqN09fEjRV9e4urHTAK
|
||||
gk7Te764mgEYgdsTBAAASME25uQWP4V5prgPPaj6m8Rxf66GmBlfwg5vV3E1RHcQdBpE0AlA3Qg6VRF0
|
||||
gnOOuPnSZUeKqxVQp60lnljk5iSWLL1eNhVXu3HaTrhuMztPOMYfqRB0mt4+4moGYARuTxAAACAF25iT
|
||||
W/wUJr5EOFfcBx9UxfFrroaY3l2FL/OG8z1xNUS3EHQCmoEnPbYLQacqgk5wrhQ3X7rszeJqBdTpeHHz
|
||||
ET3vEle3EkQ40o0Zfc8RVztgtgg6Te/h4moGYARuTxAAACAF25iTW/wU6AniPvigKjbBeLLI7HxFXC0x
|
||||
aIm4GqJbCDoBzUDQqV0IOlURdMJUtxU3V7qODXnkdj9xcxE9V0nJ39lsLNeKGzt6LpFF4uoHzAZBp+nt
|
||||
IK5mAEbg9gQBAABSsI05ucVPgebLGeI+/KDq7eJqiEEPEVdDDPqiuBqiewg6Ac1A0KldCDpVEXTCVPcQ
|
||||
N1e6bndx9QLq8iNxcxE9rxRXt5LEk+Dc2NH3anG1A2aDoNP0SjzeE2gstycIAACQgm3MyS1+CvVIcR9+
|
||||
UBW/vru9uBqiL8JzvxBXQ1TF0X7biKsjuoegE9AMBJ3ahaBTFUEnTLWnuLnSdduLqxdQh8eKm4fo+bM0
|
||||
4UlAi+Uyca8BPTxNHSkQdJoe9xeQkNsTBAAASME25uQWPwU7RdwHIFQdJq5+6HuquNph0FHiaohuIugE
|
||||
NANBp3Yh6FRF0AlTvUXcXOm624irF5DaAvmduHmInmeKq12J9hf3GtD3TnG1A4ZF0Gl6BJ2AhNyeIAAA
|
||||
QAq2MSe3+CnY/cV9AELVf2RzcTXEkqVrSGyQudqh6nq5g7g6opsIOgHNQNCpXQg6VRF0wlRfFzdXuuxi
|
||||
cbUC6vAccfMQPedIhMFc7UoUYz1X3GtBT3xXwvFamAuCTtNbTVzNAIzA7QkCAACkYBtzcoufwn1V3Icg
|
||||
VH1cXP2wZOmrxNUMg94rroboLoJOQDMQdGoXgk5VBJ0w1aXi5kqXnSSuVkBqawr34Mz+V1ztShZjdq8F
|
||||
fUeKqx0wDIJO03P1AjAitycIAACQgm3MyS1+Cnd3uVncByH0LZetxNWwy9YXNguHE3WKerk6orsIOgHN
|
||||
QNCpXVi7VBF0wmT3EDdPuu5QcfUCUnu9uDmInp+Iq1sT/Ejca0JPfO92V3G1A1aGoNP0XL265hRxtQFS
|
||||
2MXtEwIAAMyWbcxJC5smmhC3SEPV58TVr8s+KK5WGBRfWLsaotsIOgHNQNCpXQg6VRF0wmQ8rdV7prh6
|
||||
ASltINeIm4PoeZC42jXBfcW9JvQdL652wMoQdPKuFlevriHohDoRdAIAAEnYxpy0sGmieFLRMnELNfTF
|
||||
k6/iF86uhl10F7lRXK1QdZksFldHdBtBJ6AZCDq1C0GnKoJOmCyeluLmSdfdT1y9gJT4IdHMviaubk3y
|
||||
eXGvDX07iasdMBOCTl587nH16hqCTqgTQScAAJCEbcxJC5um+oi4hRqqThBXvy76orgaYdCLxNUQIOgE
|
||||
NANBp3Yh6FRF0AkrbCtujnTdTcKPFlA3foA2s/jh2d3E1a5JthSu88xOFlc7YCYEnTyCTj0EnVAngk4A
|
||||
ACAJ25iTFjZNtbFcL26xhip+zdt7XLyrDQZdKAvF1REg6AQ0A0GndiHoVEXQCSscKm6OdN3Z4uoFpPQF
|
||||
cfMPPZ8QV7cmer+414i+3cTVDpgOQSePoFMPQSfUiaATAABIwjbmpIVNkx0ibrGGqu+Jq19XzJfTxNUG
|
||||
g54qro5AIOgENANBp3Yh6FRF0Akhfvhynbg50nUfE1czIJU4qsvNPfTEj/I2F1e7JlpfWIvM7JcS3z25
|
||||
+gEOQSePoFMPQSfUiaATAABIwjbmpIVNk60rfNkynIeKq2EX7CuuJhgUv/5eRVwdgUDQCWgGgk7twnq3
|
||||
iqATwhHi5gf44QLqxwbszN4rrm5NdpC414q++O7J1Q5wCDp5BJ16+O8s6kTQCQAAJGEbc9LCpuleJ27B
|
||||
hqpTxdWv7eIItjiKzdUEgx4tro7ACgSdgGYg6NQuBJ2qCDrhwXKzuPmBJUs3E1c3IIX4zOjmHXriv9m3
|
||||
E1e7Jlskfxb3mtFzgawmrn7AVASdPIJOPQSdUCeCTgAAIAnbmJMWNk23WC4Vt2hD1WPF1bDNXi6uFhj0
|
||||
I3E1BCYj6AQ0A0GndiHoVEXQqdsixMPnv+n9TlzdgBRWld+Im3voea242rXB/4l7zeh7gbjaAVMRdPII
|
||||
OvUQdEKdCDoBAIAkbGNOWti0wQHiFm2oOku6dCzZenKVuFpg0APF1RGYjKAT0AwEndqFoFMVQafuipDT
|
||||
ueLmBXraeGQWyvEscfMOPX+VePKRq10bxPdJcdy9e+3oiSDuWuLqB0xG0Mkj6NRD0Al1IugEAACSsI05
|
||||
aWHTBnE8WWx4uIUbqvYVV8M2ep+4GmDQ18TVEJiKoBPQDASd2oWgUxVBp266r3Bs0so9VFz9gLmKAM8l
|
||||
4uYdep4jrnZtspu4146+14urHTAZQSePoFMPQSfUiaATAABIwjbmpIVNWzxd3MINVefLAnE1bJMtZZm4
|
||||
GqDqZrm7uDoCUxF0ApqBoFO7EHSqIujULevIO2W5uPmAvssljhZzdQTmKo5kc/MOPedJF75rCd8WVwP0
|
||||
xLptfXG1A1Yg6OQRdOoh6IQ6EXQCAABJ2MactLBpi3iE9jniFm+oisfNuxq2yefFvXYM+rS4GgIOQSeg
|
||||
GQg6tQtBpyqCTt2woRwkV4ibBxh0uLhaAnMVoQ3+WzSzx4urXRvtIPGDKVcH9HCMKFaGoJNH0KmHoBPq
|
||||
RNAJAAAkYRtz0sKmTfYUt3hD1cUSx/25GrbB/cW9bgyKp17dSVwdAYegE9AMBJ3ahc3lKoJO7bWpPFO+
|
||||
LDeKu/6Y3gPF1RWYq8PEzTn0nCbzxdWurT4prhbouV42F1c7IBB08gg69RB0Qp0IOgEAgCRsY05a2LRJ
|
||||
fLEUXzC5BRyq2roBGnPgJ+JeMwZ9QFwdgekQdAKagaBTuxB0qiLo1DxxnFMcQXc72ULuJo+UOH78zXKC
|
||||
/EHc9cZwzhVXe2Cu7iwcCz+zh4irXZvdQSLM4+qBnk+Iqx0QCDp5BJ16CDqhTgSdAABAErYxJy1s2ubh
|
||||
4hZwqLpMFourYZPtLe71YtC1cntxdQSmQ9AJaAaCTu1C0AnAyvC+j7p8TtycQ883xNWtCw4RVxP03CTb
|
||||
iasdQNDJI+jUQ9AJdSLoBAAAkrCNOWlh00bfE7eIQ9VrxNWvqeI4vgvEvVYMeou4OgIzIegENAMb3u1C
|
||||
0AnATK6R24p7/wDm4j7i5hx6bpYdxNWuC+JJfVeIqw164omFrnYAQSePoFMPQSfUiaATAABIwjbmpIVN
|
||||
Gy0Rt4hDVXx4jC+mXA2b6MXiXicGxZeRbIZgFASdgGYg6NQuBJ0AzCSequLeO4C54kdkM/u0uLp1Cd/D
|
||||
rNwDxNUO3UbQySPo1EPQCXUi6AQAAJKwjTlpYdNWXxa3kEPVweLq1zQR2PqHuNeIQS8TV0dgZQg6Ac1A
|
||||
0KldCDoBmE4cR72+uPcOYC7+R9ycQ88y2UJc7boknqz9B3E1Qs8PxdUO3UbQySPo1EPQCXUi6AQAAJKw
|
||||
jTlpYdNWcQ5+PEbcLebQF1+MbyCuhk3yHnGvD4MuljXE1RFYGYJOQDMQdGoXgk4AptOWH66gLKvIr8TN
|
||||
OfS8T1ztumgfcTVC3x7iaofuIujkEXTqIeiEOhF0AgAASdjGnLSwabNjxC3mUHWYuPo1xZ3kP+JeGwY9
|
||||
U1wdgWEQdAKagaBTuxB0AuD8VRaLe98A5uLp4uYceq4RnqTWN19OE1cr9JwtESB09UM3EXTyCDr1EHRC
|
||||
nQg6AQCAJGxjTlrYtNkdJR4n7hZ06LteNhdXwyb4rLjXhUHnyAJxdQSGQdAJaAaCTu1C0AmA80Rx7xnA
|
||||
XCySP4ubc+h5g7jaddnO4mqFvv3E1Q7dRNDJI+jUQ9AJdSLoBAAAkrCNOWlh03YfELegQ9XHxNWvdDuJ
|
||||
ez3wHieujsCwCDoBzUDQqV0IOgGY6gRx7xfAXL1a3JxDz6XCk9S8r4irGXr+KAvF1Q7dQ9DJI+jUQ9AJ
|
||||
dSLoBAAAkrCNOWlh03YbybXiFnXoWy5biathyX4k7vVgUDxKPh4p7+oIDIugE9AMBJ3ahaATgMniyLoN
|
||||
xL1fAHOxnvDfnJm9QFztsGTpNhLfLbm6oedAcbVD9xB08gg69RB0Qp0IOgEAgCRsY05a2HTB28Qt6lAV
|
||||
R8C5+pUqnk7kXge8h4qrIzAbBJ2AZiDo1C5sOgNYIUIErOtRl/eKm3fouUA4Cn5mh4urHXouF54IhkDQ
|
||||
ySPo1EPQCXUi6AQAAJKwjTlpYdMF68iV4hZ26LtZ7i6uhqWJLxd/L+51YNC3xNURmC2CTkAzEHRqF4JO
|
||||
AFZ4kbj3CWCutpD/iJt36NlHXO3Qx1PVV26puNqhWwg6eQSdegg6oU4EnQAAQBK2MSctbLri1eIWdqg6
|
||||
QVz9ShNf8Lvxw7uXuDoCs0XQCWgGgk7tQtAJQIin7bj3CCCFCXHzDj2/EI6CH86bxNUQPREE4/hREHTy
|
||||
CDr1EHRCnQg6AQCAJGxjTlrYdMUiuVTc4g5V9xNXw1KsLX8XN3YMOk5cHYFREHQCmoGgU7sQdAJwhBCy
|
||||
QF3ihzHxhGc399DzcHG1w6A4mo3v32b2fnG1Q3cQdPIIOvUQdEKdCDoBAIAkbGNOWth0yfPFLe5Q9V1x
|
||||
9SvFIeLGjUHL5S7i6giMgqAT0AwEndqFoBPQbR8VQk6oU3wH4OYeer4trm6Y3nPF1RI9yySOi3S1QzcQ
|
||||
dPIIOvUQdEKdCDoBAIAkbGNOWth0yUK5QNwCD1W7iKvhuN1Rrhc3ZgyKX367OgKjIugENANBp3Yh6AR0
|
||||
11Ih5IQ67SZu7qHvnuJqh+ktkHPE1RM9nxZXO3QDQSePoFMPQSfUiaATAABIwjbmpIVN1zxF3AIPVaeK
|
||||
q9+4xRdBbrwYFIGwjcXVERgVQSegGQg6tQtBJ6B7rpOnintPAFJZRc4SNwfR81lxtcPKPUZcTdETx0Xe
|
||||
Q1zt0H4EnTyCTj0EnVAngk4AACAJ25iTFjZdE1/k/UrcIg9V8aWUq+G43FviiyA3Vgx6p7g6AnNB0Alo
|
||||
BoJO7ULQCeiW84TNb+Swn7g5iJ44XmxLcbXDcH4grrboOVFc3dB+BJ08gk49BJ1QJ4JOAAAgCduYkxY2
|
||||
XfRYcYs8VJ0pEQxzNRyH74sbJwbFFwPriKsjMBcEnYBmIOjULgSdgO74kKwp7r0ASGkN+ZO4eYieD4qr
|
||||
HYa3k7jaom9ncbVDuxF08gg69RB0Qp0IOgEAgCRsY05a2HTVT8Ut9FC1r7j65cYjz2fnIHF1BOaKoBPQ
|
||||
DASd2oWgE9B+v5UHinsPAOrwCnFzET3XyobiaofZOVZcjdET30+6uqHdCDp5BJ16CDqhTgSdAABAErYx
|
||||
Jy1sumoXcQs9VMWxCQvE1TCX6P9ccePDoEtlkbhaAnNF0AloBoJO7ULQCWivv8uLZNyfudAt68pV4uYk
|
||||
et4srnaYvTtLHAPo6oye/xVXO7QXQScv3itcvbqGoBPqRNAJAAAkYRtz0sKmy04St9hD1TPE1S+X/cWN
|
||||
C17Uy9URSIGgE9AMBJ3ahaAT0D5XSDyFdbG4+x6o07vFzUv0XC7cm2m9T1yt0RNP9VtFXO3QTgSdpufq
|
||||
1TUEnVAngk4AACAJ25iTFjZddi9xiz1UXSwLxdWwbreRv4kbFwZdIPwaHHUi6AQ0A0GndiHoBLTH7yWe
|
||||
4ESIAuOyuVwvbn6i5wBxtcPobiesZ2Y27h8ZIi+CTtNbQ1zNuoSgE+pE0AkAACRhG3PSwqbrviBuwYeq
|
||||
A8XVr24HixsPvCeKqyOQCkEnoBkIOrULG4NAs0Wo5HPycJkv7j4HcvmUuHkKYLziR4YEPLqDoNP01hFX
|
||||
sy4h6IQ6EXQCAABJ2MactLDpurvKcnGLPvRdKmuJq2FdNhN+aTq8M4WNE9SNoBPQDASd2oWgE9A8/5YT
|
||||
5CnC05tQih3kZnFzFsD4vUzcvYv2Ieg0vduLq1mXEHRCnQg6AQCAJGxjTlrYYMnSo8Qt+lB1kLj61eUY
|
||||
ceOA90hxdQRSIugENANBp3Yh6AQ0w9nyHol1+eri7mdgnL4lbu4CKMMVsra4+xftQtBpeluJq1mXEHRC
|
||||
nQg6AQCAJGxjTlrYYMnSzeUGcQs/9F0luR4fzC9NZ+f74uoIpEbQadAdJd4bgZKwwd4uBJ2AZrhaviwv
|
||||
lK3F3c/AuDxC3LwFUJaDxd3DaBeCTtO7r7iadQlBJ9SJoBMAAEjCNuakhQ16DhO38EPVW8XVL7Xviusf
|
||||
3v3E1RFIjaDToAiVuFoBQCoEnYBm+oMcIvEjDndvA7nEEee/FDdPAZTlWtlY3L2M9iDoNL09xNWsSwg6
|
||||
oU4EnQAAQBK2MSctbNCzvsSXCW7xh76oUdTK1TCVR4nrG178atzVEagDQadBBJ0A1I2gE9B858obhc1r
|
||||
jMNTxM1LAGX6sLh7Ge1B0Gl6zxFXsy4h6IQ6EXQCAABJ2MactLBB31Jxiz9UxdOvXP1SWCC/EdcvBt0k
|
||||
24mrJVAHgk6DCDoBqBtBJ6A9bpTj5CHi7ncgtYXyR3HzEUCZlslW4u5ptANBp+nlOk2gZASdUCeCTgAA
|
||||
IAnbmJMWNui7rVwhbgGIvuvlDuJqOFfxqx3XJ7xPiKsjUBeCToMIOgGoG0EnoJ1Old3F3fdAKi8TN/8A
|
||||
lO1z4u5ptANBp+kdI65mXULQCXUi6AQAAJKwjTlpYYOql4tbAKLqCHH1m4vFcqm4/jDoBtlcXC2BuhB0
|
||||
GkTQCUDdCDoB7fYTebC4+x+Yi1in/kPcvANQvnuKu7fRfASdpvczcTXrkviOPP4bjtHcXdzcQg9BJwAA
|
||||
kIRtzEkLG1Qtkr+IWwSib7mkfoz2m8X1Be994uoI1Img06D4EsXVCgBSIegEdMOE3F7c+wAwineKm2sA
|
||||
muFb4u5tNB9Bp+ldJa5mwLBWFze30EPQCQAAJGEbc9LCBoM4Pm04nxFXv1FsIv8W1w8GXSPri6slUCeC
|
||||
ToMIOgGoG0EnoDtic+95Ml/c+wEwrM0kjp138wxAczxM3D2OZiPoNLNNxdUNGNZl4uYWCDoBAIBEbGNO
|
||||
Wthg0AI5X9xCEH03y93E1XC2jhLXB7w3iqsjUDeCToMIOgGoG0EnoHu+KRuKe08AhnG0uLkFoFl+LoRf
|
||||
24eg08weK65uwLBOFTe3QNAJAAAkYhtz0sIG3r7iFoKoOkFc/WYjzs2O0JT7+xh0ucRZ7a6WQN0IOg0i
|
||||
6ASgbgSdgG66RO4v7n0BmAmfsYF2eby4ex3NRdBpZm8VVzdgWJ8XN7dA0AkAACRiG3PSwgZe/FrqTHGL
|
||||
QVQtEVfDYZ0k7u/CO1BcHYEcCDoNIugEoG4EnYDuWiZPFffeAEzn6+LmE4BmOlfi6fPufkczEXSa2Sni
|
||||
6gYM62Pi5hYIOgEAgERsY05a2GB6/yNuMYiqb4ur3zB2E/c34V0kC8XVEsiBoNMggk4A6kbQCcArxL0/
|
||||
AFM9TNwcAtBszxF3z6OZthZ3ndFzgywSVztgGO8SN7dA0AkAACRiG3PSwgYz+6G4BSGqdhFXv5msIr8S
|
||||
9/fgPU1cLYFcCDoNIugEoG4EnQCEg8S9RwArxJOpfyFu/gBotjjOlOBHe2wh7jqjbw9xtQOGcai4eQWC
|
||||
TgAAIBHbmJMWNpjZg8QtCFH1U3H1m8mzxP0teL+WCIe5WgK5EHQaRNAJQN0IOgFY4aXi3ieAsK+4eQOg
|
||||
HV4l7t5H8xB0WrkjxNUOGMbHxc0rEHQCAACJ2MactLDByn1d3KIQVbP5pc2aEr9Gc38H3mPF1RLIiaDT
|
||||
IIJOAOpG0AnACjfL48W9V6Db4ojzP4ibNwDa4Srh82c7EHRauctlNXH1A1bmOHHzCgSdAABAIrYxJy1s
|
||||
sHI7Snyh7BaG6DtT4lH5roZTvUHc34D3E3F1BHIj6DSIL5oB1I2gE4DJ/i33EPd+ge46UNx8AdAu7xT3
|
||||
HoBmWU/c9UXVo8XVD1iZH4ibUyDoBAAAErGNOWlhg+F8TtzCEFVPFFe/yTaSa8X9+/AeLK6WQG4EnQYR
|
||||
dAJQN4JOAKb6vSwW956B7llbrhA3VwC0y/Wyibj3AjTH6uKuL6q+Jq5+wMpcJm5OgaATAABIxDbmpIUN
|
||||
hrOVLBe3OETfubJAXA1X+Ji4fxdeHJ3o6giMA0GnQQSdANSNoBMAJz5XufcMdM/bxM0RAO3E+3873Cju
|
||||
+qIvTljYUlz9gOlsKm4+oYegEwAASMI25qSFDYZ3hLjFIaqeLq5+YXshMDa8+EC/g7haAuNA0GkQQScA
|
||||
dSPoBGA6Dxf3voHuiM28eMKLmx8A2im+V9ta3HsCmuNKcdcXVUeJqx8wnaeKm0voIegEAACSsI05aWGD
|
||||
4fEF4nAuloXianiiuH8H3mfE1REYF4JOgwg6AagbQScA0zlPVhP33oFuiA1gNzcAtNvx4t4T0BwXibu2
|
||||
qIpg313E1RBwjhU3l9BD0AkAACRhG3PSwgaz825xC0RUHSBTaxe/Nnb/LLxlwuOZURqCToMIOgGoG0En
|
||||
ADN5sbj3DrQfT0wGum0nce8NaIazxV1XDPq6uBoCU91GrhM3j9BD0AkAACRhG3PSwgazs76w2bRyl8qa
|
||||
sqJuq8iZ4v5ZeB+SyXMPKAFBp0EEnQDUjbUngJnEZ681xL1/oN2+Jm5OAOiG74l7b0AzfF/cdYX3OHF1
|
||||
BCZ7qbj5gz6CTgAAIAnbmJMWNpi9N4pbJKLqIFlRs/+7tQ3DuVY2lsnzDigBQadBBJ0A1I2gE4CV2V/c
|
||||
+wfa68Hi5gKAbtlV3HsEysfxWrPzd+G7UsxkLYkfALj5gz6CTgAAIAnbmJMWNpi9xXK5uIUi+q6UCAAs
|
||||
kj/f2obhHCxu7gHjRtBpEEEnAHUj6ARgZf4kq4p7D0H7zJefi5sLALrllxLvCe69AmV7v7hriun9UBaK
|
||||
qyfwdnHzBlUEnQAAQBK2MSctbDAaNvuH8xZ57ZQ2zOwfQnACpeK9bxD3K4C6EXQCMIxHiXsPQfs8Qdwc
|
||||
ANBNTxT3XoGyvUbc9cTMjhbCfZjqfrJc3JxBFUEnAACQhG3MSQsbjCZ+PXKxuMUi+uIItmumtGFmrxA3
|
||||
54ASEHQaRNAJQN0IOgEYxnHi3kPQLqvJBeLmAIBuiveEBeLeM1CuZ4m7nli5jwphJ6ywqXCaxPAIOgEA
|
||||
gCRsY05a2GB0zxC3WARGFR/K4qg/N9+AEhB0GkTQCUDdCDoBGMYNwrqk/V4k7voD6LYXiHvPQLkeKe5a
|
||||
YjjHyuriaovu2EB+LW6OwCPoBAAAkrCNOWlhg9HFr6V+J27BCIzi2eLmGlAKgk6D2FAEUDeCTgCGtZ+4
|
||||
9xG0w23kcnHXHkC3XSpriXvvQJnuIu5aYnhnyJbi6ov2i2vP3szsEXQCAABJ2MactLDB3Dxe3IIRmK1z
|
||||
hUeNo3QEnQYRdAJQN4JOAIb1KXHvI2iHt4q77gAQXifuvQNlWig3ibuWGN6/5RXCd6rdspdcKW5OYGYE
|
||||
nQAAQBK2MSctbDA3cR74L8QtGoHZiNCcm2NASQg6DSLoBKBuBJ0ADCue6BGfUd17CZptY4nNXHfdASDE
|
||||
mvF24t5DUKY/ibuWmL1zJMIvrIPabVOJYwvdHMBwCDoBAIAkbGNOWthg7nYTt2gEhnW68EEcTUDQaRBB
|
||||
JwB1I+gEYDbuJu69BM12pLjrDQCTvVfcewjK9H1x1xGj+408S9YQV3M00ybybrle3HXH8Ag6AQCAJGxj
|
||||
TlrYII1TxC0cgWE8XNy8AkpD0GkQQScAdSPoVHWxxHsvyraRbCF3lwfJHvIUebV8UL4oZ8kN4q4zRvd0
|
||||
ce8laK5tZbm46w0Ak0UIYHNx7yUoz8fEXUfMXXyG+qg8UFYRV3+ULY4jjB+YxxOclom7zpg9gk4AACAJ
|
||||
25iTFjZI437iFo7AynxX3JwCSkTQaVBs5rpaAUAqBJ2qLhJXJzTTqrK17CMfkl/LzeKuPYZzmLhao7lO
|
||||
EHetAcA5Wtx7CcpzgLhriLT+KofL42RtcdcCZVhXniyflavEXU/MDUEnAACQhG3MSQsbpMOXjxjFfcTN
|
||||
J6BEBJ0GEXQCUDeCTlUEndovjqaINcfPxc0BzCyOwXF1RTPFE9HcdQaA6cQT4LYT956CsjxE3DVEfW6S
|
||||
X8gH5EkSgXue+DQeCyWe/vpc+bicI/zgoX4EnQAAQBK2MSctbJDO3YTFOGbjC+LmElAqgk6DCDoBqBtB
|
||||
pyqCTt3yAPmmuLkA73JxtUTzzJefirvOADCT+DGme19BWeL7BHf9kNe18jP5hMQxy/Hkp50kjmKO/xa7
|
||||
a4fhrCXbyK7yDDlE4v3pPOFY3vEg6AQAAJKwjTlpYYO0Pi1uAQlMFR/m7ipuHgGlIugEtNfTxd33GD+C
|
||||
TlUEnbrpkXKJuDmBQauLqyOa5fHiri8ADOP+4t5bUJY/ibt+KMMyic8fP5FjJZ4E9VZ5hTxHniC7yX1l
|
||||
R9lStrhVPKU0wmwrlPzkqNVk8ljDerLitcTritcXP0LYRfaUOHr6WfJKeYccIfGj3u/Jb4Sj58p0T7dP
|
||||
CAAAMFu2MSctbJBWLPrjA5BbRAKTHSluDgElI+gEtBdBp3IRdKoi6NRdt5c4asTNC1TdWVwN0RwL5Pfi
|
||||
ri8ADOMH4t5fUJYvibt+AFCHHd0+IQAAwGzZxpy0sEF6Hxa3iARWuF42FTd/gJIRdALai6BTuQg6VRF0
|
||||
6ra15dfi5gb6HiSufmiOF4i7tgAwG3uIe49BOV4u7toBQB22c/uEAAAAs2Ubc9LCBultLNeJW0gC4d3i
|
||||
5g5QOoJOQHsRdCoXQacqgk6IpxVdI25+oCeOPHO1QzMslsvEXVsAmI2zpeTjstA78sxdOwCow0ZunxAA
|
||||
AGC2bGNOWtigHoeIW0gCsVkZZ5y7eQOUjqAT0F4EncpF0KmKoBPCAeLmB3p4T2+2peKuKwCM4qni3mtQ
|
||||
htWEH8wCyGWh2ycEAACYLduYkxY2qMc6wqYUnNeJmzNAExB0AtqLTfFysaasIuiEsEDOEzdHsGTpc8TV
|
||||
DeXbSK4Vd10BYBQXykJx7zkow/fFXTsASOlfbo8QAABgFLYxJy1uUJ/XiFtQorsulbXEzRegCQg6Ae1F
|
||||
0KlcBJ2qCDphhWeImyPordlczVC+j4q7pgAwFweKe89BGV4t7roBQEoXuD1CAACAUdjGnLS4QX0i0BLB
|
||||
FreoRDe9QNxcAZqCoBPQXgSdykXQqYqgE1ZYU7g/vIPE1Qxlu6ssF3dNAWAuLpfF4t57MH53F3fdACCl
|
||||
77k9QgAAgFHYxpy0uEG9XiRuUYnuuUB4VDiajqAT0F4EncpFkKOKoBMmO0rcPOm6peLqhbJ9Sdz1BIAU
|
||||
3iTuvQdluFjcdQOAVD7u9ggBAABGYRtz0uIG9Ypgyx/FLSzRLU8WN0eAJiHoBLQXQadyEXSqIuiEyfYW
|
||||
N0+6jqBT8zxA3LUEgFT+JeuLew/C+HF0KYC6vd7tEQIAAIzCNuakxQ3q9zRxC0t0x5myirj5ATQJQSeg
|
||||
vQg6lYugUxVBJ0y2jtwsbq50GUGn5vmxuGsJACm9X9x7EMbvEeKuGQCk8ni3RwgAADAK25iTFjeoXwRc
|
||||
fitucYlueJS4uQE0DUEnoL0IOpWLoFMVQSdMFUdEu7nSZQSdmmVPcdcRAFJbJluIey/CeMX3x5eIu24A
|
||||
kMJWbo8QAABgFLYxJy1ukAdfXHbXD8TNCaCJCDoB7UXQqVwEnaoIOmGqL4qbK11G0Kk5Fsi54q4jANTh
|
||||
U+LejzB+7xZ3zQBgruL40vlujxAAAGAUtjEnLW6Qx3w5VdwiE+32AHFzAmgigk5AexF0KhdBpyqCTpjq
|
||||
YHFzpcsIOjXH88RdQwCoSxz5endx70kYrx3FXTMAmKsfuf1BAACAUdnGnLTAQT4PE7fIRHt9RdxcAJqK
|
||||
oBPQXgSdykXQqYqgE6Z6vri50mUEnZphsVwq7hoCQJ1OFPe+hPH7ubhrBgBzcbDbHwQAABiVbcxJCxzk
|
||||
9R1xC020T/xCbntx8wBoKoJOQHsRdCoXQacqgk6YimPCBxF0aoY3iLt+AJDDzuLemzBeTxV3vQBgLh7h
|
||||
9gcBAABGZRtz0gIHee0kbqGJ9vmkuDkANBlBJ6C9CDqVi6BTFUEnTPVgcXOlywg6lW9D+Ze464dBf5WN
|
||||
ZR1gGuvLheLmD7yfiHt/wngtFJ72ByCl/8iabn8QAABgVLYxJy1wkN+XxC040R7L5I7irj/QZASdgPYi
|
||||
6FQugk5VBJ0w1Y7i5kqXEXQq34fEXTt4rFMwjL3EzR9M77HiaonxeqO46wUAo/im2xsEAACYC9uYkxY5
|
||||
yG87WS5u0Yl2OEzctQeajqAT0F5sIJaLoFMVQSdMtYO4udJlBJ3Kdhe5Udy1w6DTZRVxtQSmOkXcPIL3
|
||||
W+H+Kk88pYzPAABSeY7bGwQAAJgL25iTFjkYj2PELTrRfNfKBuKuO9B0BJ2A9iLoVC42OaoIOmGqLcTN
|
||||
lS4j6FS248VdN3gPEFdHwImn/N0sbi7B43NAmeK/5e56AcBsxH8TN3R7gwAAAHNhG3PSIgfjsbnE8WZu
|
||||
8YlmY1MBbUbQCWgvNjjKRdCpiqATpiLoNIjPJOW6r7hrBu9z4uoIzORIcfMJ3sWyurhaYnxuK1eIu2YA
|
||||
MKxvuH1BAACAubKNOWmhg/F5v7jFJ5orvoC4jbjrDbQBQSegvQg6lYugUxVBJ0xF0GkQQady/VDcNcOg
|
||||
6+QO4uoIzOT2co24eQXvZeJqifF6pbjrBQDDerzbFwQAAJgr25iTFjoYn/jiJY45cwtQNFOEQNy1BtqC
|
||||
oBPQXgSdykXQqYqgE6Yi6DSIoFOZHiPuesFjHmMuXi1uXsGLH+6tLa6WGJ+Fcq64awYAK3OZrOb2BQEA
|
||||
AObKNuakhQ7G663iFqFonnjUd3wB4a4z0BYEnYD2IuhULoJOVQSdMBVBp0EERMqzQH4r7nph0J9lTXG1
|
||||
BIYRR7FdKG5+wYvvKF0tMV67irteALAyr3d7ggAAACnYxpy02MF4rSP/ELcQRbOwQYwuIOgEtBf/HSsX
|
||||
Qacqgk6YiqDTIIJO5Xm2uGsF70ni6gjMxl7i5he8eOr8RuJqifH6grhrBgDTiSNc13F7ggAAACnYxpy0
|
||||
2MH4vUrcYhTNEb/MXUXc9QXahKAT0F4EncpF0KmKoBOmIug0iKBTWeLJRH8Vd60w6KcyX1wtgdk6Rdw8
|
||||
g/dhcXXEeG0s/FAWwGwcInZPEAAAIAXbmFMsdjB2i+RScQtSNMOe4q4t0DYEnYD2IuhULoJOVQSdMBVB
|
||||
p0EEncryenHXCYNuliXi6giMYkeJeeXmGwYtk63E1RLj9Xhx1wwApopg5Lpi9wQBAABSsI05xWIHRdhf
|
||||
3KIU5fuZuGsKtBFBJ6C9CDqVi6BTFUEnTEXQaRBBp3KsL1eLu04YdIy4OgJzcaS4+Qbvs+LqiPH7pLhr
|
||||
BgCTvUhued9we4IAAAAp2MacVix4MHYL5AJxC1OUbRdx1xRoI4JOQHsRdCoXQacqgk6YiqDTIIJO5fiA
|
||||
uGuEQdfKJuLqCMzF7eUacfMOg+IJWPcUV0uM122F748BzOQ3EntNt7xvuD1BAACAFGxjTisWPCjCk8Ut
|
||||
TlGub4q7lkBbEXQC2ougU7kIOlURdMJUBJ0GEXQqw5YSx0C5a4RBrxFXRyCFV4ubd/C+Ja6OGL+7SQRD
|
||||
3XUD0G3L5T7y3/cMtycIAACQgm3MafKiB2O3ipwtbpGK8vALN3QRQSegvQg6lYugUxVBJ0xF0GkQQacy
|
||||
HCfu+mDQH2UNcXUEUlhdLhQ3/+A9VFwtMX57i7tmALrtbVJ5v3B7ggAAACnYxpymLnwwdo8Rt0hFeT4n
|
||||
7hoCbUbQCWgvgk7lIuhURdAJUxF0GkTQafx2Endt4MWmvasjkNJe4uYfvNNkvrhaYvzeKu66AeimeM9e
|
||||
KJX3CrcnCAAAkIJtzGnqwgdF+Im4xSrKcaNsJe76AW1G0AloL4JO5SLoVEXQCVMRdBpE0Gn8vi/u2mDQ
|
||||
KeJqCNQh5pubh/AeL66OGL8IoR0t7roB6Ja/yWYy8F7h9gQBAABSsI05ucUPxu4h4hasKMdHxV07oO0I
|
||||
OgHtRdCpXASdqgg6YSqCToMIOo3XHuKuCwbFkfA7iqsjUIeYbzHv3HzEoHNlgbhaYvxWlRPEXTsA3bBM
|
||||
pj1q1O0JAgAApGAbc3KLHxThJHELV4zfdbKxuOsGtB1BJ6C9CDqVi6BTFUEnTEXQaRBBp/FZRX4t7rpg
|
||||
0BHi6gjU6Uhx8xHes8XVEWVYJCeLu3YA2i2Cu/uKe2+4hdsTBAAASME25uQWPyjCPcUtXjF+bxd3zYAu
|
||||
IOgEtBdBp3IRdKoi6ISpCDoNIug0Ps8Ud00w6GrZUFwdgTrdXq4RNy8x6C8SYRpXS5RhTSHsBHTPgeLe
|
||||
E/7L7QkCAACkYBtzcosfFOM4cQtYjM9Vso646wV0AUEnoL0IOpWLoFMVQSdMRdBpEEGn8YggQAQC3DXB
|
||||
oFeKqyOQw6vFzUt4rxJXR5Qjwk6cEAB0x0pDTsHtCQIAAKRgG3Nyix8UY2tZLm4hi/Hgix10HUEnoL0I
|
||||
OpWLoFMVQSdMRdBpEEGn8XiNuOuBQb+XheLqCOSwulwobn5iED/8a4Z4X/2cuGsIoB1ukniCqHsPGOD2
|
||||
BAEAAFKwjTm5xQ+K8nFxC1rkd4nwqG50HUEnoL0IOpWLoFMVQSdMRdBpEEGn/NYX3q+H91hxdQRy2kvc
|
||||
/IT3DnF1RFnmy1vEXUMAzRbHrj5a3L1vuT1BAACAFGxjTm7xg6JsLteLW9gir+eKu0ZAlxB0AtqLoFO5
|
||||
2DivIuiEqQg6DSLolN+h4q4FBn1bXA2BcThF3DzFoPh+cmNxdUR5niw3iLuWAJrnAtlO3P0+LbcnCAAA
|
||||
kIJtzMktflAcvjAdv3is/gJx1wfoEoJOQHsRdCoXQacqgk6YiqDTIIJOed1Jlom7FqiK4/m3F1dHYBx2
|
||||
lJvFzVcM+pi4OqJM95eLxV1LAM1xrIx0fKjbEwQAAEjBNubkFj8oTjwC/1/iFrnIYx9x1wboGoJOQHsR
|
||||
dCoXQacqgk6YiqDTIIJOeX1G3HXAoA+LqyEwTkeKm68YFGHFrcXVEWVaT74s7noCKFscVbefuHt7KG5P
|
||||
EAAAIAXbmJNb/KBI8UW1W+yifmdInG/vrgvQNQSdgPYi6FQugk5VBJ0wFUGnQQSd8rm3uGuAQVdKbLi7
|
||||
OgLjdHuJzWQ3bzHoC+LqiHLF95ovlH+Lu6YAyhPvtZuJu6eH5vYEAQAAUrCNObnFD4p0G7lC3KIX9dpV
|
||||
3DUBuoigE9BeBJ3KRdCpiqATpiLoNIigUz7fE3cNMOhAcTUESvBqcfMW3n3E1RFli6NWvy3umgIow/my
|
||||
u7h7eNbcniAAAEAKtjEnt/hBsV4mbvGL+pws7loAXUXQCWgvgk7lIuhURdAJUxF0GkTQKY//EVd/DPqd
|
||||
LBBXR6AEq8uF4uYvBkXI09UR5YunO8Vnv7+Ju7YAxuPP8hxJul5ye4IAAAAp2Mac3OIHxVokF4tbCKMe
|
||||
S8RdC6CrCDoB7UXQqVwEnaoIOmEqgk6DCDrVbxU5W1z9MeiR4uoIlGQvcfMXHk9Ab7bbyjvkenHXF0Ae
|
||||
f5QDJPZ+3L06J25PEAAAIAXbmJNb/KBozxa3IEZ6XxR3DYAuI+gEtBdBp3IRdKoi6ISpCDoNIuhUv6eJ
|
||||
qz0GfV1cDYES/UDcPMagMySeDuTqiOaIddQxslzcdQZQj1PlCVLrEy/dniAAAEAKtjEnt/hB0WLh+3tx
|
||||
i2OkEx/utxV3DYAuI+gEtBdBp3IRdKoi6ISpCDoNIuhUL562PLxlcldxdQRKdC+5Wdx8xqB9xNURzbOV
|
||||
HCHxvu2uNYC5u1I+KDuIuw+Tc3uCAAAAKdjGnNziB8WLLxHcQhnpHCWu9kDXEXQC2ougU7kIOlURdMJU
|
||||
BJ0GEXSq1yvF1R2DDhVXQ6BkR4ubzxh0gdT6NBJkdwd5u1wu7poDmJ04HjJOjniirCHuvquN2xMEAABI
|
||||
wTbm5BY/KF48FvpMcQtnzF18+NhcXO2BriPoBLQXQadyEXSqIuiEqQg6DSLoVJ/1hPfl4fxd1hFXR6Bk
|
||||
G8m/xM1rDHq+uDqi2VaXOKb1x+KuO4DpXSXHyb6yWNw9loXbEwQAAEjBNubkFj9ohN3FLaIxd+8VV3MA
|
||||
BJ2ANiPoVC421KsIOmEqgk6DCDrVJz4vuppj0PPE1RBogteIm9cYdKmsKa6OaIc7y+vlPHFzAOi6m+QX
|
||||
8g55kKwq7l7Kzu0JAgAApGAbc3KLHzTGD8QtrDG62EhcX1y9ARB0AtqMoFO5CDpVEXTCVASdBhF0qscd
|
||||
5QZxNUfVr6SYTT5gBHG80B/FzW8Mep24OqJ97iFxvU+Tm8XNB6DtbpSfy3vk0bK2uPtl7NyeIAAAQAq2
|
||||
MSe3+EFjPFDcQhuje4O4WgPoIegEtBdBp3IRdKoi6ISpCDoNIuhUj0+LqzcGPVRcDYEmeYK4+Y1BsV69
|
||||
nbg6or3imMenysflAnFzA2i6eFrT72RCDpD7SRzt6O6J4rg9QQAAgBRsY05u8YNG+Zq4BThm7zIZ65nZ
|
||||
QAMQdALai6BTuQg6VRF0wlQEnQYRdEpvR+HJFcP5krgaAk30Q3HzHIPiySauhuiOzeSJcoh8R64UN1eA
|
||||
EsU670/ybXmfPEPuLYvEzfdGcHuCAAAAKdjGnNziB40Svx5YB0msJa7GAPp4zwHaa6G4+x7jF4/Bd9es
|
||||
q24rrk7orlXEzZUuiyOXXK0wOtbBw2NNgTbh3h/ebcTVEN0WgfT/kfjh3EfkZPmzEB7GOMQRxOfKSfIx
|
||||
eY08XuJIxkYHmqbj9gQBAABSsI05ucUPAAAAAAAAAABADVaTCEHtLE+RCJx8WD4vp0gcFfZ3cWEVYKqr
|
||||
5Hw5VU6UIySecPo8ebTcR+KoRTcXW83tCQIAAKRgG3Nyix8AAAAAAAAAAIAxWiC3l7vKfWU32UeeK6+U
|
||||
N8thcrgcI1+Wb0iEpc6Qs+S3Esdfh8skjgYPy8WFZlCPm2RF7f8mK65JXJ+4Tj+WeOLXCfI5iesZ1/bt
|
||||
8mrZX54se8iDZHuJ8FKE5tzcgbg9QQAAgBRsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQEls
|
||||
IwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAA
|
||||
AAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAA
|
||||
AAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACU
|
||||
xDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAA
|
||||
AAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAA
|
||||
AAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAA
|
||||
QElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAA
|
||||
AAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYC
|
||||
AAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAAAACUxDYCAAAAAAAAAAAAAAAAQElsIwAAAAAAAAAAAAAA
|
||||
AACUxDYCAAAAAICqeUuW5raxPESeJa+TD8hn5dtyipwmZ03xMzlZviRHy7vlpfIEWSLriOsLAAAA5bmt
|
||||
3FueKK+SQyXWg1+XH8vUteBPJNaJ35D452It+Ep5sjxQWAtiaO4zUZdMTEwAdVtH7iP7yCvl3RL/+6qc
|
||||
ImcZ0f59OV6OkLfJi2QPuassFNfXrLh7AgBKYhsBAAAAAECV+/I/oY1kb3mPxKbVv+T/1eQSibDU2+TR
|
||||
cjtxY2q7Y2Tq5mAJfimxQRniOn1BPi6xsfkmeYH8r8Sm5+3FvbY2+Zy4OnXZ12QNcfXK5URxY8spNvO/
|
||||
IyfIJyXCoBEK3V/iHtlR1hU3fvTUeX99SFyfdYjwhxsDen4qEZ52tatDW+bVOCyQ+0kEkyK0fqG4tdxc
|
||||
/UVOkoPlEbKmuPF0Ra61xi7i+s8hfjzhxjSKW95T3OeltnHhj8K9Rlwwpi5LxY0D3trySIm6fUP+LP+v
|
||||
BjfJb+VTcoDsIPPFjWla7p4AgJLYRgAAAAAAUDXPbxrMxT0kgiuni9uEyuVmiadDLZV7ihtr26wm14mr
|
||||
R9PcIGdKBD1eIQ+XtmxYxutYJu51d11sTLua5bCBuDGV6kr5oRwuz5MdZFVxr61LctxfMVdc36mdKq5/
|
||||
9L1YXO1Sa9O8ymVt2U+Ol2vEvea6xTX7vhwgOUNxJci51jhDVhE3jrpFqM2NaVQvcZ+X2saFPwp2X1ku
|
||||
LvhSl9+IGwv67i4RbPqJ5L4+k/1NPi1PkDXEjbXC3RMAUBLbCAAAAAAAqub5TYPZuo08V2Kjw20alOAc
|
||||
eY1sKO41tEE8LcG99rb4j8STGiLUEUfeuBo0QTz5wL2+rlsui8XVLIc9xY2rSeKpeV+V58tm4l5n29V9
|
||||
f50vrt/UCEQOZydx9UutLfOqbhF2eaTEU5viv9nutY7LTfI9eYpEMNyNv01yrzX+T9w46hZBNjeeUd3X
|
||||
fV5qGxf+KFQEV84VF3Cp23rixtRld5IIN/1BXM3G7Wo5WpaIG/8t3D0BACWxjQAAAAAAoGqe3zQY1joS
|
||||
T0z6p7jNghLFk4KOkm3EvaYmiycfudfcRv+Wj8qW4mpRsteLe01d9wtx9coljth042qqeKpdbAA/XVYX
|
||||
95rbqO776xPi+k3toeL6R9+1EkeiufqlVve8Olpcv02xSF4ofxD3+koTR9zFMXqxjnWvpw1yrzWipjEP
|
||||
3FjqkvpJpvG3FrjPS23jwh+Fere4QEsOjxE3pq6Jo+EeJSeJq1OpfiyPlYGj7dw9AQAlsY0AAAAAAKBq
|
||||
nt84WJk4Hukl0qSA01Tx9JiPy6biXmMTnSDutbZZXMcPyXrialKieCqVey1d915x9cqlzceEXS5vlCY/
|
||||
CW1Ydd9fzxTXb2pvENc/+uJau9rVoS3zKrWFcqBcJu51le4qicBTG8Og41hrRLjKjaUuqZ9kerL7rNRG
|
||||
U4Mfhbqf3CQuxJLDu8SNqytWkX0ljvFz9WmK0+RB8t/X5u4JACiJbQQAAAAAAFXz/MbBTHaQ08VtEDRR
|
||||
HPX0IonjVtzrbYr5coW419gFf5e9xNWmJBESvEbca+i6ODrO1SyHOCbsRnHjapN4j3i55HoKTm457q+t
|
||||
xfWd2rfF9Y++XKGKNs2rlPaQpjzBaWXi6MBdxb3OJhrXWiPW1BuJG1MdUj/J9C3us1IbTQ59FGqcR9at
|
||||
cKq4sXXBrnK2uLo0VfzvdmLvCQAoiW0EAAAAAABV8/zGwXTiWJJl4jYHmu6Hsom4190E24p7XV3zYYkn
|
||||
TLgaleCe4saN8T6Vq2vHhP1aHiCuFk1W9/31N3H9phYhhTiWzY0BfTuLq19q9xLXfyq55lUqEWT5srjX
|
||||
0nQfkdzHr9VhnGuNj4kbUx1Sz8Pd3GelNoqwR+HGeWTdCstkTXHja6vN5QRx9WiDy2QPd08AQElsIwAA
|
||||
AAAAqJrnNw6miqedfEbcpkCbxGZjBB5cDUr3XHGvqYt+IGuLq9O4xRE/bsxd9xtx9coljnVz42qzm+Rg
|
||||
adPTneq+v74ort/U7iOuf/TdIGuIq19qbZlXKcST9/4h7nW0RQRBm/iErcnGudaII4XvJm5cqcXTPN0Y
|
||||
RhH/TVzsPiu10YQPuZRi3EfWTfZQcWNsm/nyArlWXB3a5s0y390bAFAC2wgAAAAAAKrm+Y2DySIwcoq4
|
||||
TYE2iidWPUFcLUr2KXGvp6vOlhLDTp8XN96ui6douHrl0uVjwiIYuL64ujRN3ffXS8X1m9pLxPWPvngK
|
||||
o6tdHdoyr+ZiNTlM3Pjb6CppavA9jHutcZK4caW0jbi+R3WG+5zUVhM+7FKCEo6sm+wN4sbZJhvKSeJe
|
||||
f5t9QRa5+wMAxs02AgAAAACAqnl+82CFCIqcIW5DoM3iV91PF1eTUl0o7rV02amS64kfw7pU3Fi7bl9x
|
||||
9cqBY8KWLP2jxKaxq0+T1H1/7SSu39SOF9c/+uJpZK52dWjLvBrVOvJdcWNvswi+7yWuJqUrYa2xm7ix
|
||||
pfJscf2O6v3uc1JbTfjASwlKOLJusm+LG2dbPEguEffau+BkWdPdIwAwTrYRAAAAAABUzfObB2GhnCxu
|
||||
M6ALIuz0WHG1Kc0m4l4Dliw9WlzNxmFLcWNEbw67muVwb3Fj6po4AmgHcTVqgrrvrwjD5TrmL45RdWNA
|
||||
3yPF1S61Ns2rUWwmvxM39i5o0lpwhVLWGr+SVcSNMYVjxPU7qr3d56S2mvChl3Er6ci6FeIotwXixtt0
|
||||
z5Bl4l53l3xdVnX3CQCMi20EAAAAAABV8/zmQThK3EZAl1wnO4qrT0meKG786Cllk/L/xI2v6y4QV69c
|
||||
XixuXF0UxzXdXVydSlf3/RVPtHH9pra1uP7Rt1wWi6tfam2ZV6PYSuJpb27cXRJPdtpZXI1KVNJaI566
|
||||
5MaYwvni+hzVRu5zUltN+ODLOJV2ZN1k9xE35iZ7q7jX2lWHuvsEAMbFNgIAAAAAgKp5fvMgjupwmwBd
|
||||
FBspcYSfq1MpPihu7Oi5SOIJZa52OR0pbnxd9wlx9crlC+LG1VWXyJ3E1apkdd9fS8X1m9qzxPWPvtPF
|
||||
1a4Odc+rN4nrd9zuKH8RN+Yu+odsIa5WpSlprRFH6NURStxIXH+jOt99RmqzCR9+GafSjqyb7KXixtxE
|
||||
8+Uj4l5n1z3F3SsAMA62EQAAAAAAVM0b3DxYR+III7cRULf41fyVEsGUCBjF/xv//+vF/fO5jDuIsTJn
|
||||
ihs3+vYXV7uczhU3tq57urh65XKZuHGlEEc+nbUSv5V4r4vjyuI90P2d3H4juZ6Yk0rd99fDxfWbGoHI
|
||||
lXuPuNrVoS3zajZuL/GkPTfenK6WCFutWA+Oa226wmmymrialaS0tcabxY1zLvYW19eoPuE+I7XZhA/B
|
||||
jMvOcrO48EkJvihu3E0TIaePinuN43CFXCTny1/kX+L+uVz+KZu6+wUAcrONAAAAAACgat7g5sFbxW0C
|
||||
pHaznCpvkUdKPEFkVXFjCrHxdn95phwjfxL3d+vyUHHjGrfbyk3ixpxC/G0XzphOBDtiQzJcIf8R93dz
|
||||
O1tc/XLZQNy4Uoqau2tSujuLq1kOcTSTq2UKEVpaJK7fmawv95SnyLsk3ifjqC7XR52+JG58Jar7/or6
|
||||
ryWu79R2kgivunslhXhil3uNqfxTXL8p7Squdqm1aV4NKwKOZ4gbb50i1P4ZeYbEPTBd0DKezril7CmH
|
||||
yC/F/b265Hqy26hyrDVm69+yqbjxjuowcX2N6lnuM1KbTfggzDisKRF0ccGTUlwubuxN80Fxry+HC+QD
|
||||
8iTZTuKoQjfGVWVLeZzEU77OEff36vIVd78AQG62EQAAAAAAVM2rbhxEaOZacZsAqcTG3uFyV5na/2w9
|
||||
UCL0lOMpKPHUlVXEjWOcdhc33lRiw931OxuxYRnXezc5QOKaxRMaXH91upu48eUQm7JuTCndW1zfmF48
|
||||
TcrVMoWfietzFOvJc+QX4vqqS/TpxlOauu+vn4vrt4k+JO41pvIOcf020ePEvcZUSptX8+Ur4sZalx/L
|
||||
/8pMQfeV2U6OkBvF9ZFShLcjIOvGUYIca41RpH4yahxf6foZ1V3dZ6Q2m/Ahk3E4TFzgpDTbiBt/U7xa
|
||||
3Ouq0/USx+TdW9yYhrWTHCeujzrs4u4ZAMjJNgIAAAAAgKp51Y2D+CW92wBIJY7TuI9M7Xeu4okw3xLX
|
||||
Z0r7iet/nA4WN9ZUPiiu3xS2lfj7OTYnw0vEjSOH94obUyr/krlsFHfVUeLqmUI8jcn1OVePkDhazvWZ
|
||||
WgRftxA3jpLUfX8dKq7fJoonIrnXmMqjxPXbRF2bV3HEmBtnHeLpj6mP7dtecjzh6cvi+i9B3XN2VPEU
|
||||
1x3EjXm2Ijyf8imHl7vPR2034QMluZV+ZN1kzxb3Gpogno7kXlOdPi4bixvPqGK+xJOhXH8p/czdMwCQ
|
||||
k20EAAAAAABV86qbB3WGheIJPnGkxtQ+U4knEcSRIq7vVE4U1/c4nSJurKnsI67flOJJRH8R139KnxPX
|
||||
fw6niRtTKnHvun4xs/PE1TOFx4rrM4UFEkEq129qTTjCru77ay9x/TbN2lLnUacRZlhHXN9N1KV5FaGj
|
||||
uH5unKl9VNYQN465WlO+Kq7flOJ4Udf/uNU9Z+fie+LGPFsR9nV/f1Rfcp+P2m7CB0lyquPIut+btlQ+
|
||||
Ke51lC6OifuXuNdUh7/Ig8WNJYX15DRxfafEU50AjJVtBAAAAAAAVfP6GwdxLNs14jYBUniMTO6vLm8S
|
||||
1/+oYuPvj/J1iaPyXJ/jslCuEzfuVDYW13dqcRTM38SNIZUzxPVdt9h4Tfn0AecN4vrG9DYUV8tU4rg5
|
||||
129KT5U6gysrPERc/yXIcX/FXHF9N03dR53+Sly/TdSleXU7+au4MaYU71VxfK0bQ0qLJI4FdGNIZUJc
|
||||
3+OUY87O1aPFjX02Uv+o4aXu81HbTfgQSU6pj6w7Rfad0pbSheJeR8lWl1+Jez11+LGsL24sKa0tZ4sb
|
||||
QyqfdfcNAORiGwEAAAAAQNW8/sbBXW/9wr8uq8vk/uoST3b6prgxzCSOT4uj9eLpJXEc3FMkfrEfG0eu
|
||||
nxLcT9xrSeUP4vqtyx7ixpHKn8T1W7eHiRtPSruI6xvTi6epuFqm8FtxfdbhReLGkNLJ4vouQd33Vzz1
|
||||
y/XbRG8T9xpT+Yi4fpuo7nkV6w3X7zh8RtwYU3u+uP7rEOHpG8SNI4X/SATEXN/jkmOtMVfnSDyR0I1/
|
||||
WN8R97dHtZP7fNR2Ez5AkkvqI+uWSTy56M6T2uqwibjXU6pDxb2OOnxVFokbRx3uIteJG0sK/5H13L0D
|
||||
ADnYRgAAAAAAUDWvv3FQ9wZJzicX3EmWiRvH9XKWfFbeKBF22F5WE/e3SvZKca8xlU+K67dOPxM3lhT+
|
||||
Ka7PusU8c+NJJeZ6yYG8Uh0qrp4pHC6uz7p8Xtw4UtpJXN/jVvf99XFx/TbRD8S9xlSeJK7fJurKvNpV
|
||||
3PhSi5Cd679Odb7Hh/3F9Tsudc/ZVOYSeIuQ1LXi/u4o4m8tcJ+P2m7Ch0dyqOPIurfLir9/xa1tdYgn
|
||||
Rk1+LSXbSW4S9zpS+54sFDeOOr1W3HhSeaq7dwAgB9sIAAAAAACq5vU3Dx4vbhMglefI5P7qFkGDU+UY
|
||||
iUBQHJ13Z4kj+tw/30RfEVfrVJ4trt86vVXcWFK4Ulyfdfu2uPGkEvPc9YuZ1Xm0URwp5/qsy6aScvPX
|
||||
+Zi4vset7vvr6eL6bZo46rTOJ9yEO4jru4m6MK8i4B1PlnLjS+nHsqq4MdQpQu9x/LAbUwrfEtfvuNQ9
|
||||
Z1O5XG4r7jWszH3E/c1Rfdd9NuqCCR8cySH1kXV/lAhPrfj7J4n751L4kEx+LaVaRc4U9xpS+53EUXJu
|
||||
HHWL6/4PceNKYcLdOwCQg20EAAAAAABV8/qbB3UHna4RjtdKJ47o+4e4Wqeyjbi+63SguLGkcL64PusU
|
||||
m7t1B1DeJa5vTG8tWS6unilsIa7fOtX99JKrZZG4vsclx/0VR2C5vpvmAeJeXyrjOhq0Dl2ZV/FkHTe2
|
||||
lGLtF4Ej138Op4kbVwoRHFxDXL+5pZ6zcZyza0/l7eJex8q8WNzfG9VS99moCyZ8cKRuqY+sC4+SyX0c
|
||||
LO6fS+FsmdxXqZ4hbvypxdFx24gbQy7vFje2FH7o7h0AyME2AgAAAACAqnn9zYPdbv3Sv26fkB1lct+Y
|
||||
ve3E1TeVv4vrt251PtHp++L6rFPqpw84jxXXN6b3CHG1TOEv4vqs25bixpPSHuL6Hpe676/LxPXbRK8W
|
||||
9xpT+Yy4fpuoC/MqQouXihtfSi8T138uda4pwoPE9Ztb6jn7BqnzaVhxjPTm4l7LTI4T9/dG9Qj32agL
|
||||
JnxopE51HFl3vEzt57Hi/tkUIqS1jkztsyRxhNzF4saf2gvEjSGne4sb22z9S86ReCLYkfIGuYu7dwAg
|
||||
B9sIAAAAAACq5vU3D+LpAm4ToC5ny9sknjIRx6dMHgtW7nni6prKl8X1W7c44saNJ4UPiOuzTi8RN5aU
|
||||
bieub0xvqbhapnCsuD5zOFPcmFIZxz00k7rvry+I67eJvibuNaayv7h+m6gL8yrH05x+L3Fkous/l73E
|
||||
jS2VqKPrN7fUczaeSnj0lLbUJsS9lplcJO5vjSKe6rjYfTbqggkfGqnTB8QFTEYVwZTNZGo/G4v751OZ
|
||||
+gSp0uwvbtypnSZxRJ4bQ07z5e/ixrjCjRJHHP5QPiPvkOfLHnIPWdfdIwAwTrYRAAAAAABUzetvHqwi
|
||||
/xS3GVC36ySetnOw7Cmj/Mq7az4trpapvFxcv3W6v7ixpLKvuH7rdLy4saTyW3H9YmbfFVfPFF4ors8c
|
||||
DhE3plQioOr6HZe67684Jsn12zRx1OmV4l5jKncT13cTtX1exXyIEJIbW0p7i+s/p7uLG1sqh4nrN7eU
|
||||
czbW5DFHNpJ/3dpWl3gSlXs9zsbi/saoTnefi7piwodG6vJQcQGUuXipuL7CJeL+nRQOEddnCSL0k/qp
|
||||
WdO5v7gxjMNRcrp8Sd4vL5d95H6yiQwEstw9AQAlsY0AAAAAAKBqXnUT4YviNgPGITZlI4zwHnmKbC+r
|
||||
ytQxd9UfxdUtlSXi+q3LbSRCO24sKdwk64vru05xRJEbTyqHi+sX01sg14qrZwr3ENdvDo8XN6ZU4gkY
|
||||
q4vrexzqvr/uLa7fpon/frrXl0r89zrC0q7vJmr7vNpV3LhSOkdKmBPx3303vlS+Ka7f3FLO2dNlxd99
|
||||
za1tdfmhTH4dM3mcuL8xqve5z0VdMTX4UaPFEk/TcWGZUZ0lC8T1F04Q9++l8GNxfZZgd3FjTu2r4vpv
|
||||
DHdPAEBJbCMAAAAAAKiaV91EiF/fu82AUlwvp8lHZD/ZWqa+hi7YVFx9Uvm3RBjE9V2HteVkcWNJ5Tvi
|
||||
+q7TXcSNJaW/ylmFiSOy1hBXkxLsJK6WKcRT8ca5ub+tuHGldC9xfedW9/0VYbi2hGvjWDn3GlM5UVy/
|
||||
TdSFeRXHa7qxpRQBddd3bnE0shtfKvHfPNdvTqnn7BGy4m/Hf8vrDtZHgGny65nOO8X9+6Pay30u6goX
|
||||
/qjJh8WFZUZ1s8STelxfK7xO3L+bwn9kDXH9jtvnxY05tZ3F9d8Y7p4AgJLYRgAAAAAAUDWvuokQ4ZaL
|
||||
xW0IlOoK+YYcJPeTLjz1KY5gc7VI5Xvi+q1DPDmqrUfoPEPcWLognhjialKCl4obcwrxXuT6zGUtceNK
|
||||
adhN6brVfX99W1y/TTQh7jWmEv/9df02Ud3z6lvi+s1lsdT5RLtwuSwU1/84uDGmcoG4PnNKPWcjGDn5
|
||||
7z9R3D+XSqwBI5A2uU/nB+L+/VFt6D4XdYULf9SgjiPrjhDX12S7ift3U3mwuH7HaW25Xtx4U/qluP4b
|
||||
xd0TAFAS2wgAAAAAAKrmDW4kxJOS3IZAU1wt8XSJF8udxb3GpvuQuNeeypvF9ZvKfHmQHCc3ixtDSrER
|
||||
mfMJVSscJW48bRfXdB1xNSlBnUd0xjE/rs+c4sl3bmypHCCu39zqvr/eIK7fJrpI3GtM5YHi+m2its+r
|
||||
vcSNK6V3iet7HOoOf8aRca7fnFLP2Xjq4eS/H2u2H4v7Z1M5UCb3OVWs4eJpo+7fHcV57jNRl7jwR2J1
|
||||
HFl3uawrrr/J1hP376fyWnH9jtO+4saa2gHi+m8Ud08AQElsIwAAAAAAqJo3uJkQGxrfF7cx0ES/kbfJ
|
||||
PcW93iaKo1Lca03lEeL6HUXMp40lNsLjKQHHyJ/F9VuXeNqBG1vdzhM3nrY7R1w9SvE3ceNOYWdxfeZ0
|
||||
pbixpbJUXL+51X1/PVRcv02zmbjXl8oNsrq4vpuo7fPq4+LGldLdxfU9DhuIG2MqcVyp6zenlHP2RnH3
|
||||
832kzmD6P2SmgHQcmer+vVEd5T4TdYkLfySW+si6sJ+4vpzzxf2NFE4S1+c4fVrcWFO6STYU13+juHsC
|
||||
AEpiGwEAAAAAQNU8v6GwicSv1N3mQJNF6CmeRnIbca+7CdaWm8S9vlQiqBJhqlH9QeIJInGsYN1jXZlf
|
||||
yirialmnDcWNpwuOFFeTEmwtbswp/EfWENdvTrFh7MaXSglPa6n7/orN/jXF9d00dR91+iNx/TZRF+ZV
|
||||
/PfZjS2VOIbM9TsudxM3zlTGHXRKPWfPENdPiKC6+3dSeY+4fsPzxf07o3qG+0zUJS78kVAdR9Z9X+aL
|
||||
6885VtzfSeFqWVVcv+NyqbixpvQjcX03jrsnAKAkthEAAAAAAFTN8xsKIY6u+Je4DYKmi42peCpJhIbc
|
||||
ay/Z7uJeEwYtl3gKgatj3R4vbkxd8ExxNSnBs8SNOYU42sf1mVvd79uHies3p7rvr1PF9dtEHxb3GlN5
|
||||
h7h+m6jt82ojceNKqaRj60Lda6Y/ies3l9RzNo5Gdv2E+BHEteL+vRQiLHwncX1/Sty/M6q7uM9EXeLC
|
||||
H4nUcWTdMtlWXH/Tebm4v5XKPcX1Ow5bihtjaq8S1/+w7iFnNcAZsr27bwAgF9sIAAAAAACq5vkNhRUe
|
||||
JFeL2yRog8slgg9xvJp7/SWKY/jca8Gg14urYQ7vEzemLthWXE1K8AlxY07hEHF95rSauLGlNNNTN3Kp
|
||||
+/4q4TWmcra415jK/4jrt4naPq8eLW5cKUWwyPU9LvEUTzfOVOJJoa7fXFLP2SeL62eFN4j791L5vLh+
|
||||
Ux7PF0+stZ+JumTCB1FSqOPIureJ62smDxb3t1I5UFy/4/AkcWNMbTtx/Q8raub+bone5+4bAMjFNgIA
|
||||
AAAAgKr4sn8l7iFxDJnbLGiLb0k86cC9/tL8QNxrQNUXZRxH1q1wurhxtV0cm1ZycPB8ceNOYQ9xfeYU
|
||||
T8NwY0spnobn+s6p7vtrT3H9Nk08tfBmca8xhfjbTXwy4nTaPq9eI25cqcRTFBeL63tcDhc31lROFtdv
|
||||
Lqnn7J3F9bPCIrlY3L+byv1lcp/rivvnRnW82M9EXTLhgyhzVceRdX+QReL6m8lacpO4v5nC58X1Ow5v
|
||||
FzfGlC4S1/ds1HmcYGp7u/sGAHKxjQAAAAAAoCq+7B/CevIlcRsGbfFXGdcxZ8NaKNeLGz/6YuNxTXE1
|
||||
zCE2emPD142t7b4hriYlqPPYpgh8xGas6zenh4obX0oHius7lxz31wbi+m6aeNqSe32pxNOiXL9N1IV5
|
||||
dbS4caVylrh+x+k0cWNNJY5Uc/3mkHrO/k1cP1M9Sdy/n8pPZXJgeldx/9yoXiz2M1GXTPggylzUcWRd
|
||||
+B9x/Q3jt+L+ZgqXietzHL4kbowpxf9c37Nxsbi/XaIN3H0DALnYRgAAAAAAUBVf9s/C3lL3L7nH6Vp5
|
||||
mLjXXoL4lbsbN/pOknGGnMIjxI2tC14nriYliPcvN+YUfi2uz9xeJm58KT1RXN+51H1/nSuu3yZ6u7jX
|
||||
mMqHxfXbRF2YVxECdmNL5TPi+h2XWAvUHV57s7i+c0g9Z08Q189UEUKKMJL7G6nsIyv6i3WF+2dGdW+x
|
||||
n4m6ZMIHUebiY+ICI3PxBXF9DesT4v5uKluJ6ze3X4obX0r7i+t7WJuJ+7sl+q27ZwAgJ9sIAAAAAACq
|
||||
4sv+WYpjK14i8QQkt4HQdNfIvcS99nF7lbgxo+d9sqq42uUUR3u58XVByUHBw8SNOYWPiusztwgauPGl
|
||||
dF9xfedS9/31MXH9NtEPxb3GVPYV128TdWFe/U7c2FKJo/Fcv+OSI3Q8zuBn6jn7anH9OEvE/Y1ULpR4
|
||||
imn09eVb21KIHzTcsk50n4m6ZMKHUUa1m7jAyFxcI5uK629YLxT3t1N5hrh+c/u7uPGldDdxfQ/rieL+
|
||||
bokOd/cMAORkGwEAAAAAQFV82T+i2ICITc7vyE3iNhSa6k9yO3Gve5y+Km68XRehu8eIq9k4fFfcONsu
|
||||
3gfiKB1XkxL8Qty4U3iyuD5ziqds5Aig3lZc/7nUfX89TVy/TRP/jb5B3GtMZTNxfTdRF+ZVHE3mxpZK
|
||||
HGnm+h2XCD+7caa0rbi+c0g9Z3cW1890JsT9nVReLtHPJZPa5urbcsv43WeiLpnwYZRR3FbqOJLsJeL6
|
||||
m42dxP3tVI4W129uN4sbXyo3ymri+h7W+8X97RLt6+4ZAMjJNgIAAAAAgKoVX/jP0YbyfDlFbhS3udA0
|
||||
nxL3WsclQgxXihtrV/1H3iNri6vZOCyQeGKAG2/bnSmuJiWIAFadRxhtLq7fnHYUN7aU/iiu71xy3F93
|
||||
Ftd30zxQ3OtL5SJx/TZRV+bVP8WNLZVdxPU7LvFUIDfOVK6SVcT1XbfUczbW7vHEVtfXdCLoeJ24v5dC
|
||||
zNe7T2mbqzfKLeN3n4m6ZMKHUUZxpLiwyFycKQvE9Tcbq0uEdFwfKZwvrt+c1hE3tpTOFdf3bPxc3N8u
|
||||
0UbungGAnGwjAAAAAACoWvGFf0LxtI/HyRFygbiNhqbYSdxrHIftxY2xi66X90sJ4ZKpYs64MXfBR8TV
|
||||
pAS7ihtzCvEEONdnbm8XN76U4gkeru9c6r6/4olYrt8mOkjca0xl3HMhpbqP4SplXrmxpXRXcf2OQxxB
|
||||
7MaY0oni+s4h9Xvhz8X1szJ1H/n4G9M2F/89Xtd9JuqSCR9Gma06jqyLpxPdV1x/ozhdXD+pbCSu31w2
|
||||
EDeulE4Q1/ew1pTl4v52ac5z9wsA5GYbAQAAAABA1Yov/Gu0sewjH5A4OqpJT3w6QdxrGof9xY2xS/4s
|
||||
sam2vrgaleBl4sae0lmF+l9xNSnBW8TVMoXPiOszp3iqyMXixpfS88T1n0vd99dx4vptoghhuNeYSvw3
|
||||
yfXbRF2ZV/EURDe+VLYQ1+84xJrTjTGlA8X1nUPqORv1cv2szJryF3F/szTxVMcY7y1jd5+JumTCB1Jm
|
||||
o64j6z4qrr9RHS6un1T2FtdvLluIG1dK8dQu1/ewHiLu75bo4+5+AYDcbCMAAAAAAKha8YV/RqvLfeQ5
|
||||
cricLnVvvo0qNkU2Evc6counZ7gxtl0czRKbxI+RVcXVpiRfEvc6UvmduH4xs5PF1TOFEgIfjxY3ttTu
|
||||
IK7/XOq+vw4Q12/TRPCt7qNO4ymDru8m6sq8+oe48aWyrrh+c4t15hXixpjSOI8jTD1nnySun2E8Rdzf
|
||||
LM2p8t9xu89EXTLhAymzUceRdSGOgzsrob+K6yeV94urTy7rixtXSu8R1/ewXiPu75boqe5+AYDcbCMA
|
||||
AAAAAKia/KX/GK0mcczIivDTL+UmcRsVuT1b3Jhzu0jc+NrmBvmpvEsivBEblq4epbpc3OtK5WPi+sX0
|
||||
Fsh14uqZwt3E9ZvTj8SNLaV4Ip/rO6e67697iuu3aWJOuteXSoSo5ovru4m6Mq/qXkesI67f3J4pbnwp
|
||||
nSGu71xSz9m5PI0r3gtOE/d3S/Ie+e+43WeiLpnwgZRh1XFkXVP9UlyNclkkblwpLRXX97BOFPd3S7SZ
|
||||
u18AIDfbCAAAAAAAqiZ/6V+YxbKrvEm+J+N66tOnxI0vp83EjS2VOE7QHUWWUvyS/hT5isQTmo6SCDO9
|
||||
Sp4uD5c7SjyJxNWgCe4qrr4pPU1c35jefcXVMoUIfIx7zj5M3NhSe6m4/nOp+/66Wprw1Lhh1H3U6dfE
|
||||
9dtEXZpXESJ3Y0xlc3H95vYrceNL6SXi+s4h9ZyNo+dcP7PxAHF/uyR7yn/H7D4TdcmED6QMo64j65rq
|
||||
JomauFrlEmNwY0tlLk90mi//EPd3S3Ohu1cAYBxsIwAAAAAAqJr8pX/h1pI4viyeaHONuE2MOsSGmRtP
|
||||
TvuKG1sq8TQY1y9m51ni6pvSncT1jem9XFwtUzhRXJ+5xJM04klLbmwpRdB0fXFjyKXu++skcf020WfE
|
||||
vcZUXi2u3ybq0rz6vLgxphJP5nT95rS7uLGlFE+eXE9c/zmknrPHiutntj4n7u+XYgP573jdZ6IumfCh
|
||||
lGHUdWRdk+0urla51H0832fF9TuMu4j7myU6xt0rADAOthEAAAAAAFRN/tK/QdaUl8m14jYzUrpK3Bhy
|
||||
+rC4saXyDnH9YnY+Ia6+qVwirl/M7Mvi6pnCQeL6zCVHuC6U8GS7uu+v14nrt4n+JO41phJPb3H9NlGX
|
||||
5tWbxY0xlceJ6zeXCH7+XNzYUjpaXP+5pJ6zLxTXz2zFE72uF9fHuJ0rlfG6z0RdMuFDKSvDkXXeweLq
|
||||
lcsp4saVyq/E9TuMeKLTMXJWIv8UN8YUnu7uFQAYB9sIAAAAAACqpn7xP8mGcjd5pMRxWbGh/36JY8fi
|
||||
CUC/l43F/bu57CTxy3q3qZGS6zuns8WNK5X/EdcvZud8cfVNJdVTF7rm7+LqmcI4Ax8byT/FjSu17cWN
|
||||
Iae676+HiOu3ae4g7vWlEv/NXSiu7ybq0rx6orgxpvIWcf3mEkErN66UbpZtxfWfS+o5u4O4fkYRc8D1
|
||||
MW5HSmWs7jNRl0z4UMpM1hGOrPN+IK5muRwhblyp3Czries7p8VyhbgxprCFu1cAYBxsIwAAAAAAXTZv
|
||||
ydLVZFNZInEM3PNkqRwuX5XT5C+yTNxGwVTxVKXKxsEYfEDc2FJy/eaytsTGmhtXCvG3ow/XN4YXoRNX
|
||||
35ReJK5vTG8bcbVMYZyBj3hyydfFjSu1L4obQ05131/x37xF4vpumieJe42p/FBcv03UtXm1mbhxpvID
|
||||
cf3msLrUHVoLcTyb6z+X1HM2wrKriOtrFHHM9F/F9TVO/yeVsbrPSV0y4YMkM4mn8rhwCCYmbpCF4uqW
|
||||
wwHixpXS88T1ndNbxY0thT+7+wQAxsU2AgAAAADQNfN6GxixUX25uC//5+JiGfeTHfYVN7ZUrhHXby7x
|
||||
tCU3rlTiaVGuX8zOE8TVN6WUT13oiueIq2UK4wx8vE3cmFK7Ue4ibgw51X1//Uxcv030EXGvMZW3i+u3
|
||||
ibo4r84TN9YUbpII4rh+6xZH8LoxpRTvh1uJ6z+X1HP2G+L6mYuni+trnLaUyjjdZ6YumfBBkunsIS4c
|
||||
gr4HiqtdDvcUN6aUzpE4hs71n8M2EoEyN7YUJtx9AgDjYhsBAAAAAOiaeb1NGfelfypxpF1l8yCzuoNA
|
||||
fxTXby6xqezGlcqHxfWL2YljHV19U7laUj51oSs+Ka6eKYwj8BFPcnqzuPHU4VBx48it7vvrXeL6baJf
|
||||
iXuNqbTpqNMuzqsYkxtrKuM4vi6OWK7zyZcrvFtc/zmlnrOvEdfPXMRa5Rfi+huHS2VgnO4zU5dM+DCJ
|
||||
E0fWXSIuHIK+g8TVL4dV5HJx40rpmeL6r9vqcrq4MaXybHefAMC42EYAAAAAALpoXr3HefxH7isDmwiZ
|
||||
vF7cuFL5prh+c4mnxrhxpRJPxHL9YnbOEFffVMY9D5vqD+LqmULuwMc68gVxY6nDn2SxuLHkVvf99Vhx
|
||||
/TZNzJE6Ax/xxJ42HXXaxXl1D3FjTeVfsom4vusQryeCwG4sKcUTTG8jbgw5pZ6zO4vrZ64eJK6/cThO
|
||||
BsboPi91yYQPlDgcWTecE8XVL5cjxY0rpStlc3H91yWeIvUpceNJaSt3nwDAuNhGAAAAAAC6aN6Spe8T
|
||||
9+V/Kn+XcRyrFZvwfxE3plTi6Smu7xziWMAbxI0rlU3F9Y3hxTyMAICrbyp1PHWh7TYWV8sUIkySK/AR
|
||||
T8fYT+KpFG4sdYmnpLjx5Jbj/rqduL6b5lHiXl8qZ4nrt4m6PK9OEzfeVL4tq4rrO6V7Saw/3RhS203c
|
||||
GHJKPWdjfbmGuL5SiICR6ze3A2RgfO7zUpdM+FDJVBxZN7yrJJ6s5OqYw87ixpXaL2VtcWNILer5UXHj
|
||||
SOkyd48AwDjZRgAAAAAAumheL4TkvvxPKX7F/0QZ2EyoyerydXFjSenB4vrP4QHixpTKuI/la4vYAHX1
|
||||
Tamupy602T7iapnC2eL6TGkteab8VtwY6hThWDemcaj7/or6un6b6B3iXmMqHxLXbxN1eV49QdyYU/qM
|
||||
rCau/xSeLP8W13dqpcz71HP2x+L6SWULqTusP4x7ysD43OelLpnwwZLJOLJu9u4hrpY5xJOPfi1uXKn9
|
||||
VNYXN45UIkz1VXH9p3asu0cAYJxsIwAAAAAAXTVvydIfiNsASO2rsp0MbCoktL3UfeRMuEjmixtDDq8W
|
||||
N65UPi2uX8zOW8TVN5U4HrLOpy601QfE1TOFuja+by9Pl8/LNeL6rtupEkFSN75xqPv+Olxcv030I3Gv
|
||||
MZU2HXXa5XkVT4mLp3O5cacUR+/eWdwYRrW55DzCM9aapbwfpp6zh4jrJ6W6w5crE/8dtU8Xc5+VumTC
|
||||
h0sm48i62XuhuFrm8n/ixlWHi+WR4sYxV3vJn8X1W4f93T0CAONkGwEAAAAA6Kp5S5Y+WtwmQB3iWKd4
|
||||
2lI8NSCeSjKwwTCiOKbkGFkurt/UloobRy4nihtXKs8T1y9m52Rx9U2l7qcutNUvxdUzhbkEPuJIytis
|
||||
v5/sJW+Q4+UCcX3l9FeJI//cuMel7vvrqeL6bZoIY3DU6fC6Pq8eJm7cqV0v8YS4uQaedpSPyTJx/dTh
|
||||
crmjuPGMQ+o5u4e4flK6jVwmrv8cThI3LvtZqUsmfMBkhbqOrPuXnDVGV4obVyrHiqtnLqvKb8WNrS6n
|
||||
yKNlNXFjGtbqso+cKq6fOm3j7hEAGCfbCAAAAABAl81bsvQ74jYC6hRPozlF4lfdT5MHySYysOkwRfwz
|
||||
8c/G000+KueL+/t1uVrWFze2HOKJC1eKG1sq24rrG8NbINeJq28qMQ/i6RtNc4C4muUQm6s3iatnCueJ
|
||||
e81OPBkuXCX/FPf3ShDveXHMqavnuOS4v+J4Jdd30zxQ3OtLpU1HnTKveibEjb0up8nBEsH7CD5Nd7Rd
|
||||
hEHvIREojSfzxfun+3t1itBgSUfGpp6z8YOEdcT1lVocwerGkMPrxY3Jfk7qkgkfNgl1HlkXTxxyfeby
|
||||
ZnHjSiXq5vrN6eHixla3v0sEvV4gD5YNJY7Tc2MM68ku8iI5Tq4S93frFuOe7+4RABgn2wgAAAAAQJfN
|
||||
W7L0bnKjuM2AcYhN/0slNlAjyHTxrW11P5ViGC+VgY2RjOJauXGlcoWM81i+toin8rj6YsnSv4irWQ67
|
||||
ixsTvNhAL2lTf4W6769xztHUDhL3GlNp01GnzKuedSXG6l5DLvHUpAgyxRPtYiwRuHT/XE4Rkn28uJqN
|
||||
S+o5+ytx/dQhgvt1PmFxJruIG5P9nNQlEz58Euo6si6e/DNT8CWHup5UNdmdxPWd01HixpbbjfJXuUh+
|
||||
JxfI5XKDuH9+HI539wcAjJttBAAAAACg6+YtWfo6cZsB6PuZrCoDGyMZ7S9ubKl8RVy/mJ1XiKsvliw9
|
||||
VlzNcoinhrgxYVAEC0oMOYW6769xztHU4rhY9xpTadNRp8yrvgjQ5DwOrnQRcnqKuFqNU+o5+xFx/dTl
|
||||
weLGUaeY12uKG4/9jNQlEz4gU1cQaJlsJ67PnDYSN76Uniau75wWy7nixoeqF7n7AwDGzTYCAAAAANB1
|
||||
83q/rK57Q7TJ/i6by8CmSGafETe+VGLTzPWL2TlBXH2xZOmLxNUshzgu040JVfFEvfuIq2EJ6r6/Xiiu
|
||||
36aJ/67H0YjuNaaynbi+m4h5VbWfuNfRNRFyepa4Go1b6jkbxwK6fur0JXFjqUv8aMGN4xbuM1KXTAyG
|
||||
Y24nl4oLg8zV28T1OQ4XixtjKkeK6ze3beRqcWNE393d/QEA42YbAQAAAADALWGn28qZ4jYGuiyOb3qA
|
||||
DGyIjMGfxI0xlXiKg+sXw4uj/yIY5+qLJUvvLq5udVsocS+7MaEv/htQQqhzOjnurx3E9d00ca+515fK
|
||||
P6QtR50yr7w4rte9lq6Ip//sLa4241bHnN1MXF91urP8R9x46vAuceO4hft81CUTg8GYz4gLgszVhbJI
|
||||
XJ/j8CVx40wlnqTk+h2HneU6cePExMSVsoq7PwBg3GwjAAAAAADombdk6QbyK3GbA10UwYiHycBmyBjc
|
||||
QdwYU4nXupq4vjG8bcTVF0uWXinxlBlXt7pFiM+NCX2Hyxri6leKuu+vf8q45mhqzxf3GlP5qrh+m6ju
|
||||
eRVHQTZ1Xr1E3Gtqu8sljlZzNSlB6jl7kbh+cninuDHV4bHixnAL99moSyaqgZg9xQVBUniUTO1vnA4S
|
||||
N86UNhDX9zg8TAg7eSe4ewMASmAbAQAAAABA37wlS9eWk8VtEHRJ/FL+/jKwETImTxI3zlS+L65fzM5z
|
||||
xNUXS5Z+RVzNcniluDFhydLLZC9xdStN3ffXN8T120SfFfcaU3mVuH6biHk1szjS7Hpxr62NzpAtxNWi
|
||||
FKnn7IS4fnKIJ8r+Tdy4UruduDHcwn0u6pKJfhAmjqy7TFwQZK6Ol8l9lWBXcWNN6XHi+h6Xe0tdxxI2
|
||||
2UvcvQEAJbCNAAAAAACgal7vyT7vlZvFbRS03elS2ibXR8SNNZW3iusXs/NJcfXFkqWvEFezHCJk5cbU
|
||||
ZfH+frTMuPFbmLrvr9eI67eJLhb3GlMpKQg8V8yrldtJ4qk/7vW1yfskjjp1NShJ6jn7PHH95JIjJH6O
|
||||
uL7/y30m6pKJfgimriPr/iWbyeS+SrC2uPGmdKi4vsdpE/mxuPE2Vbyet05pm417uXsDAEpgGwEAAAAA
|
||||
QNWkL/0fKn8St2HQRjfJwVLiEW51Hym4m7h+MTt/EFdfLFm6RFzN6jZfrhA3pq76qYzresxF3ffXzuL6
|
||||
bZrNxb2+VOLpPk0IgwyLeTWcdeXz4l5j050vTbpOqefsduL6yWVVqXude4S4vv/LfSbqkole+KXOI+te
|
||||
KpODNiU5X9yYUzldXL/jtkBeJ/8RN+4meZ8slLtNapuNq2VVd28AQAlsIwAAAAAAqJryxf9tJMI/14nb
|
||||
OGiLU6XUjf91pM6na0XAa7G4vjG8jcXVF0uWXisLxNWtbtuKG1MXnSmPEVen0tV9f/1H1hDXd9M8Wdxr
|
||||
TOUH4vptIubV7O0tl4h7vU3zb3mtNOkapZ6z/5AIBLu+cnqYuPGlsp+4fv/LfSbqkol6j6w7SyJUMzVo
|
||||
U4q6nmK1wnJZLK7vEmwjPxM39tJdLLvJitcyX/4m7p+dyYnuvgCAUthGAAAAAABQ5b78l03loxJPcnAb
|
||||
CE0Vx/vE5kcJmzzTeZS4sadyhrh+MTtPFFdfLFn6bXE1yyGO5HFj6pKTZXcp+X1uZeq+v34irt8miv9W
|
||||
u9eYytvE9dtEzKvRrAjBR4jVve7SRQDtMInQkHt9JUs9Z+NoV9fPOJwgbowp3Elcn//lPhN1yUR9YZ+b
|
||||
5X6yIohSonjalBt7SruK67sUERB6slwobvylWSbvltvI1NdyrLh/ZyavcPcFAJTCNgIAAAAAgCr35f8k
|
||||
G8ib5FJxGwlNEeGeeOrFuJ4yMxvvEPcaUnm/uH4xOx8UV18sWfp6cTXL4dPixtR28R59qMQTrVxdmqbu
|
||||
++sQcf020a/FvcZUIjTn+m0i5tXc3F4i8NSU40GvlFhTbSLu9TRB6jn7SnH9jMNWskzcOOfiL+L6q3Cf
|
||||
ibpiot4j646QqUGU0jxQ3NhTerO4vksTx78dIKUGniLgdLhsLm78YX9x/+5M7uvuDQAohW0EAAAAAABV
|
||||
7st/Y1WJzc7PSlN+0f83iQ2i+4l7TaX6kbjXk0ocQ+P6xezEsWCuvliy9CHiapbDH8WNqY3Ol3hKSRwB
|
||||
FO/Rrh5NVff99Whx/TbNulL3Uadri+u7iZhXaSyS58tp4uowTjFnvy9PlRinG3+TpJ6zpa2J3y1unHNx
|
||||
rLi+Ktxnoi6YqPfIustlXZkaRCnNWnKTuNeQysni+i7VKhIBuBh3PJXLvaacrpBDZaaA0wp3Efc3pnOt
|
||||
LHD3BwCUwjYCAAAAAIAq9+X/Sqwuu0k8Geh34jYZxiE2e38h75SmbvzHE6fqPi5wI3F9Y3hrSWymuvp2
|
||||
3Q2yhri61S3mthtT00VNz5UTJZ5Oso808QimYdV9f8V/K9YT13fTRADZvcZUzhLXbxMxr+qxpRwksf4a
|
||||
138X/y3x/ri/bChunE2Ues5eJwvF9TUu68jfxY13VC8U11eF+0zUBRMTE++YFPhIbT+ZGkIp1a/EvYZU
|
||||
/i2riuu7dJvIy+VUyRl6ipp9RZ4g8aQpN7bp/EXc33ROcvcGAJTENgIAAAAAgCr35f8s3U72kDjO5ASJ
|
||||
p4zUvdm1XC6QL8jr5FHSlg3Gt0hsLtfhm+L6xOzFUwhcjbtuQly9cjlCYhy/l4tm6U/yzxFEEMm9T4X4
|
||||
v03+Z+MopejrtxLBgFPka/I5iSfQxbF/sVn/BHmANPnIpbmo8/6K/065PpsonljzDXGvM4VxHkNZB+ZV
|
||||
veLpX/FUq/fIDyXe79z74lz9Qb4kr5YHSgTw3XjaIOWcPUZcH+P2DHHjHdX24vqpcJ+JumBiYmJHOasG
|
||||
n5P5MjWAUqqDxb2OVN4ort+mWU/iSU8flDPkOnHhoVH8S34k75VHyOrixjCM+J/rwznI3RsAUBLbCAAA
|
||||
AAAAqtyX/wnEE122lUfKs+WN8gH5tMSv7mNz/6cydXPidIn/W4hNw6MkNnleI8+UeFLTnWU1cf0CAACg
|
||||
DPH0uUfIs+S18mGJkPp3JdZ6se6bvA6Mo9qi/SvyKYmndL5MHi87ymJx/QCz4j4TdcmED4sAKxNPqYqj
|
||||
4vaSA+UQ+ZR8S06R02RF2OsXt7adJBGEe6ccII+Tu0ocl+f6GMXeMjloNpOd3D0BACWxjQAAAAAAAAAA
|
||||
AAAAAABQEtsIAAAAAAAAAAAAAAAAACWxjQAAAAAAAAAAAAAAAABQEtsIAAAAAAAAAAAAAAAAACWxjQAA
|
||||
AAAAAAAAAAAAAABQEtsIAAAAAAAAAAAAAAAAACWxjQAAAAAAAAAAAAAAAABQEtsIAAAAAAAAAAAAAAAA
|
||||
ACWxjQAAAAAAAAAAAAAAAABQEtsIAAAAAAAAAAAAAAAAACWxjQD+fztySAAADANBbP5NdwZewIGAkAAA
|
||||
AAAAAAAAUDITAAAAAAAAAACgZCYAAAAAAAAAAEDJTAAAAAAAAAAAgJKZAAAAAAAAAAAAJTMBAAAAAAAA
|
||||
AABKZgIAAAAAAAAAAJTMBAAAAAAAAAAAKJkJAAAAAAAAAABQMhMAAAAAAAAAAKBkJgAAAAAAAAAAQMe9
|
||||
D/nIDJsB8H0BAAAAAElFTkSuQmCCCw==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="$this.ScriptEditorPositionForUndo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>0, 0</value>
|
||||
</metadata>
|
||||
<metadata name="$this.ScriptEditorPositionForRedo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>0, 0</value>
|
||||
</metadata>
|
||||
</root>
|
||||
138
Aviso/AvisoReports/rptQRAviso.vb
Normal file
138
Aviso/AvisoReports/rptQRAviso.vb
Normal file
@@ -0,0 +1,138 @@
|
||||
Imports System.Web
|
||||
Imports GrapeCity.ActiveReports
|
||||
Imports GrapeCity.ActiveReports.Document
|
||||
Imports ThoughtWorks.QRCode.Codec
|
||||
|
||||
Public Class rptQRAviso
|
||||
Dim AVISO As VERAG_PROG_ALLGEMEIN.cAviso = Nothing
|
||||
|
||||
Sub New(AvisoId As Integer)
|
||||
|
||||
' Dieser Aufruf ist f<>r den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
AVISO = VERAG_PROG_ALLGEMEIN.cAviso.getAvisoById(AvisoId)
|
||||
|
||||
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Sub New(Aviso As VERAG_PROG_ALLGEMEIN.cAviso)
|
||||
|
||||
' Dieser Aufruf ist f<>r den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
Me.AVISO = Aviso
|
||||
|
||||
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub rptEABeleg_PrintProgress(sender As Object, e As EventArgs) Handles Me.PrintProgress
|
||||
' QR.Location = New PointF(QR.Location.X, 4.5) 'QR.Location.Y + lblStorno.Height)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub rptEABeleg_PageStart(sender As Object, e As EventArgs) Handles ReportFooter1.BeforePrint
|
||||
' QR.Location = New PointF(QR.Location.X, 5.5) 'QR.Location.Y + lblStorno.Height)
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub rptQRAviso_ReportStart(sender As Object, e As EventArgs) Handles Me.ReportStart
|
||||
If AVISO Is Nothing Then Exit Sub
|
||||
|
||||
lblSachbearbeiter.Text = AVISO.letzterMitarbeiter
|
||||
txtLKW.Text = AVISO.LKW_Nr
|
||||
lblDatum.Text = AVISO.Ankunft.ToShortDateString & " " & AVISO.Ankunft.ToShortTimeString
|
||||
lblNr.Text = AVISO.AvisoID
|
||||
txtGrenze.Text = AVISO.Grenzstelle
|
||||
txtFraechter.Text = AVISO.Fr<EFBFBD>chter
|
||||
' QR.Image = getQRCode("https://login.verag.ag/status.aspx?AvisoId=" & VERAG_PROG_ALLGEMEIN.cCryptography.Encrypt(AVISO.AvisoID))
|
||||
QR.Image = getQRCode("https://login.verag.ag/status.aspx?AvisoId=" & VERAG_PROG_ALLGEMEIN.cCryptography3.Encrypt(AVISO.AvisoID))
|
||||
|
||||
picQRAviso.Image = getBARCODEAviso(AVISO.AvisoID)
|
||||
|
||||
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Case "VERAG"
|
||||
lblFirma_Name.Text = "VERAG Spedition AG"
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG
|
||||
Case "SBG"
|
||||
lblFirma_Details.Text = "Niederlassung: Nickelsdorf"
|
||||
lblFirma_Details.Text &= "D 83435 Bad Reichenhall | Europaplatz 8"
|
||||
Case "WAI"
|
||||
lblFirma_Details.Text = "Niederlassung: Waidhaus"
|
||||
lblFirma_Details.Text &= "D 92726 Waidhaus | Am Autohof 3"
|
||||
Case "NKD"
|
||||
lblFirma_Details.Text = "Niederlassung: Nickelsdorf"
|
||||
lblFirma_Details.Text &= "A 2425 Nickelsdorf | Neue Teilung 1"
|
||||
Case "NEU"
|
||||
lblFirma_Details.Text = "Niederlassung: Neuhaus"
|
||||
lblFirma_Details.Text &= "D 94152 Neuhaus am Inn | Hartham 6"
|
||||
Case Else
|
||||
lblFirma_Details.Text = "A 4975 Suben | Suben 14"
|
||||
End Select
|
||||
Case "IMEX"
|
||||
picVERAG.Image = My.Resources.IMEX_LOGO_simple
|
||||
lblFirma_Name.Text = "IMEX Customs Service GmbH"
|
||||
lblFirma_Details.Text = "A 4975 Suben | Suben 15"
|
||||
Case "UNISPED"
|
||||
picVERAG.Image = My.Resources.Unisped_logo
|
||||
lblFirma_Name.Text = "UNISPED Speditions GmbH"
|
||||
lblFirma_Details.Text = "A 4975 Suben | Suben 15"
|
||||
|
||||
Case "FRONTOFFICE"
|
||||
picVERAG.Image = My.Resources.FrontOfficeSUB_Horizontal
|
||||
lblFirma_Name.Text = "Front-Office Suben eG"
|
||||
lblFirma_Details.Text = "A 4975 Suben | Suben 14"
|
||||
Case "ATILLA"
|
||||
picVERAG.Image = My.Resources.Atilla
|
||||
lblFirma_Name.Text = "ATILLA Spedition GmbH"
|
||||
lblFirma_Details.Text = "A 4975 Suben | Suben 15"
|
||||
Case Else
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
|
||||
Function getQRCode(QRtext As String, Optional QZSize As Integer = 4, Optional QRVersion As Integer = 7, Optional CorrectionLevel As QRCodeEncoder.ERROR_CORRECTION = QRCodeEncoder.ERROR_CORRECTION.M, Optional encoding As QRCodeEncoder.ENCODE_MODE = QRCodeEncoder.ENCODE_MODE.BYTE) As Image
|
||||
Dim qrCodeEncoder As QRCodeEncoder = New QRCodeEncoder()
|
||||
|
||||
qrCodeEncoder.QRCodeEncodeMode = encoding
|
||||
|
||||
Try
|
||||
Dim scale As Integer = Convert.ToInt16(QZSize)
|
||||
qrCodeEncoder.QRCodeScale = scale
|
||||
Catch ex As Exception
|
||||
MessageBox.Show("Invalid size!")
|
||||
Return Nothing
|
||||
End Try
|
||||
|
||||
Try
|
||||
Dim version As Integer = Convert.ToInt16(QRVersion)
|
||||
qrCodeEncoder.QRCodeVersion = version
|
||||
Catch ex As Exception
|
||||
MessageBox.Show("Invalid version !")
|
||||
End Try
|
||||
|
||||
Dim errorCorrect As String = CorrectionLevel
|
||||
|
||||
qrCodeEncoder.QRCodeErrorCorrect = CorrectionLevel
|
||||
|
||||
Dim image As Image
|
||||
Dim data As String = QRtext
|
||||
image = qrCodeEncoder.Encode(data)
|
||||
Return image
|
||||
End Function
|
||||
|
||||
Function getBARCODEAviso(AvisoID As String) As Image
|
||||
Dim barcode As Image = Code128Rendering.MakeBarcodeImage("/" & AvisoID & "/", 1, True, 25)
|
||||
' barcode.RotateFlip(RotateFlipType.Rotate90FlipNone)
|
||||
|
||||
Return barcode
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -132,7 +132,7 @@ Public Class SendungOptions
|
||||
End Sub
|
||||
|
||||
|
||||
Shared Sub PrintSendung(art As String, SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen, AVISO As cAviso, Optional Printername As String = "", Optional TYP As String = "AKT")
|
||||
Shared Sub PrintSendung(art As String, SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen, AVISO As cAviso, Optional Printername As String = "", Optional TYP As String = "AKT", Optional SendungsAnzahlAviso As Integer = -1)
|
||||
'TYP --> LAUFZETTEL
|
||||
Dim ADMIN As New cADMIN
|
||||
|
||||
@@ -307,6 +307,10 @@ Public Class SendungOptions
|
||||
If CBool(VERAGSQL.getValueTxtBySql("SELECT TOP 1 isnull([Vorkasse],0) FROM [Kunden] where KundenNr=" & SENDUNG.tblSnd_AuftraggeberKdNr, "FMZOLL",,, False)) Then VALUES.Auftraggeber_VK = "€ VK"
|
||||
|
||||
|
||||
If SendungsAnzahlAviso < 0 Then
|
||||
SendungsAnzahlAviso = VERAGSQL.getValueTxtBySql("SELECT COUNT(*) FROM tblSendungen where tblSnd_AvisoID=" & AVISO.AvisoID, "AVISO")
|
||||
End If
|
||||
VALUES.SchnellAbfertigung = (SendungsAnzahlAviso = 1)
|
||||
|
||||
SENDUNG.LOAD_ABRECHNUNG() 'Daten holen
|
||||
Dim abfertKostKdnr As Integer = -1
|
||||
@@ -417,7 +421,7 @@ Public Class SendungOptions
|
||||
End If
|
||||
|
||||
Dim ZOLLANMELDUNG As New DAKOSY_Worker.cZollsysteme_Aktenbeschriftung
|
||||
If Not ZOLLANMELDUNG.getDataByBezugsnummer(SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr, SENDUNG.tblSnd_Abfertigungsart_ID.ToString) Then
|
||||
If Not ZOLLANMELDUNG.getDataByBezugsnummer(SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr, SENDUNG.tblSnd_Abfertigungsart_ID.ToString, SENDUNG.tblSnd_DakosyRef) Then
|
||||
ZOLLANMELDUNG = Nothing
|
||||
End If
|
||||
|
||||
|
||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("3.4.0.5")>
|
||||
<Assembly: AssemblyFileVersion("3.4.0.5")>
|
||||
<Assembly: AssemblyVersion("3.4.5.4")>
|
||||
<Assembly: AssemblyFileVersion("3.4.5.4")>
|
||||
|
||||
62
Aviso/My Project/Resources.Designer.vb
generated
62
Aviso/My Project/Resources.Designer.vb
generated
@@ -249,6 +249,16 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol).
|
||||
'''</summary>
|
||||
Friend ReadOnly Property avisoNewMsg() As System.Drawing.Icon
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("avisoNewMsg", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Icon)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
@@ -499,6 +509,16 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property FrontOfficeSUB_Horizontal() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("FrontOfficeSUB_Horizontal", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
@@ -1179,6 +1199,26 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Telefonliste() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Telefonliste", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Telefonliste_small() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Telefonliste_small", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
@@ -1279,7 +1319,7 @@ Namespace My.Resources
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die 3.4.0.5 ähnelt.
|
||||
''' Sucht eine lokalisierte Zeichenfolge, die 3.4.5.4 ähnelt.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Version() As String
|
||||
Get
|
||||
@@ -1384,6 +1424,26 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property weiterleiten() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("weiterleiten", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property weiterleiten_small1() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("weiterleiten_small1", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
|
||||
@@ -344,7 +344,7 @@
|
||||
<value>..\Resources\akt_ATILLA.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Version" xml:space="preserve">
|
||||
<value>3.4.0.5</value>
|
||||
<value>3.4.5.4</value>
|
||||
</data>
|
||||
<data name="Verag_AG_Logopng" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Verag-AG-Logopng.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
@@ -535,4 +535,22 @@
|
||||
<data name="aviso_messenger" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\aviso_messenger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="avisoNewMsg" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\avisoNewMsg.ico;System.Drawing.Icon, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Telefonliste" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Telefonliste.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Telefonliste_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Telefonliste_small.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="FrontOfficeSUB_Horizontal" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Logo_blue_globe_Horizontal.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="weiterleiten" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\weiterleiten.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="weiterleiten_small1" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\weiterleiten_small.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
BIN
Aviso/My Project/Telefonliste_small.png
Normal file
BIN
Aviso/My Project/Telefonliste_small.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.4 KiB |
BIN
Aviso/Resources/Logo_blue_globe_Horizontal.jpg
Normal file
BIN
Aviso/Resources/Logo_blue_globe_Horizontal.jpg
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 45 KiB |
BIN
Aviso/Resources/Telefonliste.png
Normal file
BIN
Aviso/Resources/Telefonliste.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.5 KiB |
BIN
Aviso/Resources/Telefonliste1.png
Normal file
BIN
Aviso/Resources/Telefonliste1.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.5 KiB |
BIN
Aviso/Resources/Telefonliste_small.png
Normal file
BIN
Aviso/Resources/Telefonliste_small.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.4 KiB |
BIN
Aviso/Resources/avisoNewMsg.ico
Normal file
BIN
Aviso/Resources/avisoNewMsg.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 66 KiB |
BIN
Aviso/Resources/weiterleiten.png
Normal file
BIN
Aviso/Resources/weiterleiten.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 12 KiB |
BIN
Aviso/Resources/weiterleiten1.png
Normal file
BIN
Aviso/Resources/weiterleiten1.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 12 KiB |
BIN
Aviso/Resources/weiterleiten_small.png
Normal file
BIN
Aviso/Resources/weiterleiten_small.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 826 B |
@@ -112,6 +112,8 @@ Public Class cProgramFunctions
|
||||
Public Function MinToTime2(ByRef rMinute As Long) As String
|
||||
Dim m_TimeSpan As TimeSpan = New TimeSpan(0, rMinute, 0)
|
||||
Select Case rMinute
|
||||
Case Is < 0
|
||||
MinToTime2 = "-"
|
||||
Case Is < 60
|
||||
MinToTime2 = Format(m_TimeSpan.Minutes) & " min"
|
||||
Case Is < 1440
|
||||
|
||||
@@ -115,14 +115,14 @@ btnZollDEEingereicht.Click, btnSBG.Click, btnNKD.Click, btnWAI.Click, btnSFD.Cli
|
||||
ElseIf sender Is btnZollDEEingereicht Then
|
||||
If sender.tag = "SWITCH" Then
|
||||
insertVermerk("DE Zoll fertig", 18)
|
||||
If myAviso.LKW_fertig Then FUNC.LKWFertig(myAviso.AvisoID) : frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
If myAviso.LKW_fertig Then VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.LKWFertig(myAviso.AvisoID) : frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
Else
|
||||
insertVermerk("DE Zoll eingereicht", 17)
|
||||
End If
|
||||
ElseIf sender Is btnZollATEingereicht Then
|
||||
If sender.tag = "SWITCH" Then
|
||||
insertVermerk("AT Zoll fertig", 20)
|
||||
If myAviso.LKW_fertig Then FUNC.LKWFertig(myAviso.AvisoID) : frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
If myAviso.LKW_fertig Then VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.LKWFertig(myAviso.AvisoID) : frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
Else
|
||||
insertVermerk("AT Zoll eingereicht", 19)
|
||||
End If
|
||||
@@ -179,7 +179,7 @@ btnZollDEEingereicht.Click, btnSBG.Click, btnNKD.Click, btnWAI.Click, btnSFD.Cli
|
||||
frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
End If
|
||||
ElseIf sender Is btnLKWFertig Then
|
||||
If FUNC.LKWFertig(AvisoID) Then
|
||||
If VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.LKWFertig(AvisoID) Then
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
End If
|
||||
|
||||
40
Aviso/frmAddSendungsvermerkShort.Designer.vb
generated
40
Aviso/frmAddSendungsvermerkShort.Designer.vb
generated
@@ -27,6 +27,8 @@ Partial Class frmAddSendungsvermerkShort
|
||||
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.pnlMain = New System.Windows.Forms.Panel()
|
||||
Me.pnlSendungsVermker = New System.Windows.Forms.Panel()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.cbxRgBest = New System.Windows.Forms.CheckBox()
|
||||
Me.optUeberwachungsdok = New System.Windows.Forms.CheckBox()
|
||||
Me.lblErrSpedition = New System.Windows.Forms.Label()
|
||||
@@ -83,13 +85,15 @@ Partial Class frmAddSendungsvermerkShort
|
||||
Me.pnlMain.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnlMain.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnlMain.Name = "pnlMain"
|
||||
Me.pnlMain.Size = New System.Drawing.Size(434, 386)
|
||||
Me.pnlMain.Size = New System.Drawing.Size(434, 389)
|
||||
Me.pnlMain.TabIndex = 0
|
||||
'
|
||||
'pnlSendungsVermker
|
||||
'
|
||||
Me.pnlSendungsVermker.BackColor = System.Drawing.Color.White
|
||||
Me.pnlSendungsVermker.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnlSendungsVermker.Controls.Add(Me.Label4)
|
||||
Me.pnlSendungsVermker.Controls.Add(Me.Button2)
|
||||
Me.pnlSendungsVermker.Controls.Add(Me.cbxRgBest)
|
||||
Me.pnlSendungsVermker.Controls.Add(Me.optUeberwachungsdok)
|
||||
Me.pnlSendungsVermker.Controls.Add(Me.lblErrSpedition)
|
||||
@@ -130,9 +134,33 @@ Partial Class frmAddSendungsvermerkShort
|
||||
Me.pnlSendungsVermker.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnlSendungsVermker.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnlSendungsVermker.Name = "pnlSendungsVermker"
|
||||
Me.pnlSendungsVermker.Size = New System.Drawing.Size(434, 386)
|
||||
Me.pnlSendungsVermker.Size = New System.Drawing.Size(434, 389)
|
||||
Me.pnlSendungsVermker.TabIndex = 0
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.BackColor = System.Drawing.Color.White
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(18, 361)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(79, 17)
|
||||
Me.Label4.TabIndex = 88
|
||||
Me.Label4.Text = "Optionen:"
|
||||
Me.Label4.Visible = False
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.Enabled = False
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Location = New System.Drawing.Point(21, 381)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(281, 33)
|
||||
Me.Button2.TabIndex = 87
|
||||
Me.Button2.Text = "In Neukunden-Abteilung geben >>"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
Me.Button2.Visible = False
|
||||
'
|
||||
'cbxRgBest
|
||||
'
|
||||
Me.cbxRgBest.AutoSize = True
|
||||
@@ -448,9 +476,9 @@ Partial Class frmAddSendungsvermerkShort
|
||||
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label13.Location = New System.Drawing.Point(9, 217)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(79, 17)
|
||||
Me.Label13.Size = New System.Drawing.Size(84, 17)
|
||||
Me.Label13.TabIndex = 16
|
||||
Me.Label13.Text = "Sonstiges"
|
||||
Me.Label13.Text = "Sonstiges:"
|
||||
'
|
||||
'cbxATR
|
||||
'
|
||||
@@ -549,7 +577,7 @@ Partial Class frmAddSendungsvermerkShort
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(434, 386)
|
||||
Me.ClientSize = New System.Drawing.Size(434, 389)
|
||||
Me.Controls.Add(Me.pnlMain)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
@@ -607,4 +635,6 @@ Partial Class frmAddSendungsvermerkShort
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents optUeberwachungsdok As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents cbxRgBest As CheckBox
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents Button2 As Button
|
||||
End Class
|
||||
|
||||
@@ -111,13 +111,22 @@ Public Class frmAddSendungsvermerkShort
|
||||
|
||||
Private Sub btnOK_Click(sender As System.Object, e As System.EventArgs) Handles btnOK.Click
|
||||
|
||||
If insertVermerke() Then
|
||||
|
||||
'Jetzt wird Fenster geschlossen
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(myAviso.AvisoID)
|
||||
Me.Close()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Function insertVermerke() As Boolean
|
||||
|
||||
If txtDetail.Text <> "" Then
|
||||
If txtDetail.Text.Length > 240 Then
|
||||
showErr(lblErr240Zeichen)
|
||||
txtDetail.Focus()
|
||||
Exit Sub
|
||||
Return False
|
||||
End If
|
||||
End If
|
||||
|
||||
@@ -127,7 +136,7 @@ Public Class frmAddSendungsvermerkShort
|
||||
If txtFreierText.Text.Trim = "" Then
|
||||
showErr(lblErrGrund)
|
||||
txtFreierText.Focus()
|
||||
Exit Sub
|
||||
Return False
|
||||
End If
|
||||
insertSendungsVermerk(SendungID, myAviso.AvisoID, txtFreierText.Text.Trim, 47)
|
||||
End If
|
||||
@@ -145,7 +154,7 @@ Public Class frmAddSendungsvermerkShort
|
||||
|
||||
If cbxSonstDok.Checked Then
|
||||
If txtSonstigesDokumentFehlt.Text.Trim = "" Then
|
||||
showErr(lblErrDokument) : txtSonstigesDokumentFehlt.Focus() : Exit Sub
|
||||
showErr(lblErrDokument) : txtSonstigesDokumentFehlt.Focus() : Return False
|
||||
End If
|
||||
insertSendungsVermerk(SendungID, myAviso.AvisoID, "Dokument '" & txtSonstigesDokumentFehlt.Text.Trim & "' fehlt - angefordert.", 25)
|
||||
End If
|
||||
@@ -160,7 +169,7 @@ Public Class frmAddSendungsvermerkShort
|
||||
If txtSpedition.Text.Trim = "" Then
|
||||
showErr(lblErrSpedition)
|
||||
txtSpedition.Focus()
|
||||
Exit Sub
|
||||
Return False
|
||||
End If
|
||||
insertSendungsVermerk(SendungID, myAviso.AvisoID, "Fahrer muss die Sendung bei '" & txtSpedition.Text.Trim & "' abfertigen - weitergeleitet", 28)
|
||||
End If
|
||||
@@ -183,7 +192,7 @@ Public Class frmAddSendungsvermerkShort
|
||||
' If txtSendung.Text.Trim = "" Then
|
||||
'showErr(lblErrSendungProbleme)
|
||||
' txtSendung.Focus()
|
||||
' Exit Sub
|
||||
' Return False
|
||||
' End If
|
||||
'insertSendungsVermerk(SendungID,myAviso.AvisoID,"ATA-Nr. bei Sendung " & txtSendung.Text.Trim & " erhalten", 34)
|
||||
|
||||
@@ -195,7 +204,7 @@ Public Class frmAddSendungsvermerkShort
|
||||
' If txtFach.Text.Trim = "" Then
|
||||
' showErr(lblErrFach)
|
||||
' txtFach.Focus()
|
||||
' Exit Sub
|
||||
' Return False
|
||||
' End If
|
||||
' insertSendungsVermerk(SendungID,myAviso.AvisoID, "Akt liegt im Fach '" & txtFach.Text.Trim & "'", 35)
|
||||
|
||||
@@ -213,17 +222,8 @@ Public Class frmAddSendungsvermerkShort
|
||||
insertSendungsVermerk(SendungID, myAviso.AvisoID, txtDetail.Text.Substring(160, 80), 46)
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
'Jetzt wird Fenster geschlossen
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(myAviso.AvisoID)
|
||||
|
||||
|
||||
|
||||
|
||||
Me.Close()
|
||||
|
||||
End Sub
|
||||
Return True
|
||||
End Function
|
||||
|
||||
Sub insertVermerk(Text As String, VermerkCodeId As Integer, Optional Beschreibung As String = "")
|
||||
'Daten zuweisen und speichern
|
||||
@@ -309,4 +309,13 @@ Public Class frmAddSendungsvermerkShort
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
If insertVermerke() Then
|
||||
VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen.INSERT_BENACHRICHTIGUNG(myAviso.AvisoID, SendungID, 1, "T", 13, , 1)
|
||||
insertSendungsVermerk(SendungID, myAviso.AvisoID, "In die Neukunden-Abteilung gegeben.", 46)
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(myAviso.AvisoID)
|
||||
Me.Close()
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
811
Aviso/frmAvisoWeiterleiten.Designer.vb
generated
Normal file
811
Aviso/frmAvisoWeiterleiten.Designer.vb
generated
Normal file
@@ -0,0 +1,811 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmAvisoWeiterleiten
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAvisoWeiterleiten))
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.pic = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.Panel2 = New System.Windows.Forms.Panel()
|
||||
Me.btnTeam = New System.Windows.Forms.Button()
|
||||
Me.btnBenutzer = New System.Windows.Forms.Button()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.dgvMitarbeiter = New System.Windows.Forms.DataGridView()
|
||||
Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Panel4 = New System.Windows.Forms.Panel()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.flpFirma = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Panel3 = New System.Windows.Forms.Panel()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.MyFlowLayoutPanel3 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.MyFlowLayoutPanel4 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.Button11 = New System.Windows.Forms.Button()
|
||||
Me.Button12 = New System.Windows.Forms.Button()
|
||||
Me.Button13 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel2 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button6 = New System.Windows.Forms.Button()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.Button7 = New System.Windows.Forms.Button()
|
||||
Me.Panel7 = New System.Windows.Forms.Panel()
|
||||
Me.flpTeams = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Panel8 = New System.Windows.Forms.Panel()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.MyFlowLayoutPanel14 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.MyFlowLayoutPanel15 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button30 = New System.Windows.Forms.Button()
|
||||
Me.Button31 = New System.Windows.Forms.Button()
|
||||
Me.Button32 = New System.Windows.Forms.Button()
|
||||
Me.Button33 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel16 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button34 = New System.Windows.Forms.Button()
|
||||
Me.Button35 = New System.Windows.Forms.Button()
|
||||
Me.Button36 = New System.Windows.Forms.Button()
|
||||
Me.Button37 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.btnVERAG = New System.Windows.Forms.Button()
|
||||
Me.btnUNIPED = New System.Windows.Forms.Button()
|
||||
Me.btnIMEX = New System.Windows.Forms.Button()
|
||||
Me.btnFrontoffice = New System.Windows.Forms.Button()
|
||||
Me.Panel5 = New System.Windows.Forms.Panel()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.dgvAnmhaenge = New System.Windows.Forms.DataGridView()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.rtbVermerk = New System.Windows.Forms.RichTextBox()
|
||||
Me.clmnAnhFilePath = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.clmnAnhFileName = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel2.SuspendLayout()
|
||||
CType(Me.dgvMitarbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel4.SuspendLayout()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel4.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel2.SuspendLayout()
|
||||
Me.Panel7.SuspendLayout()
|
||||
Me.Panel8.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel15.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel16.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel1.SuspendLayout()
|
||||
Me.Panel5.SuspendLayout()
|
||||
CType(Me.dgvAnmhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
|
||||
Me.pnl.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.pnl.Controls.Add(Me.Label3)
|
||||
Me.pnl.Controls.Add(Me.pic)
|
||||
Me.pnl.Controls.Add(Me.lbl)
|
||||
Me.pnl.Controls.Add(Me.Button3)
|
||||
Me.pnl.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(733, 37)
|
||||
Me.pnl.TabIndex = 0
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!)
|
||||
Me.Label3.Location = New System.Drawing.Point(576, 7)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(109, 24)
|
||||
Me.Label3.TabIndex = 8
|
||||
Me.Label3.Text = "Weiterleiten"
|
||||
'
|
||||
'pic
|
||||
'
|
||||
Me.pic.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pic.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1
|
||||
Me.pic.Location = New System.Drawing.Point(689, 3)
|
||||
Me.pic.Name = "pic"
|
||||
Me.pic.Size = New System.Drawing.Size(44, 32)
|
||||
Me.pic.TabIndex = 7
|
||||
Me.pic.TabStop = False
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Location = New System.Drawing.Point(12, 9)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(207, 13)
|
||||
Me.lbl.TabIndex = 0
|
||||
Me.lbl.Text = "Bitte geben Sie das Weiterleitungs-Ziel an:"
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button3.Location = New System.Drawing.Point(397, 106)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button3.TabIndex = 6
|
||||
Me.Button3.Text = "UNISPED"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel2
|
||||
'
|
||||
Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel2.Controls.Add(Me.btnTeam)
|
||||
Me.Panel2.Controls.Add(Me.btnBenutzer)
|
||||
Me.Panel2.Controls.Add(Me.Label2)
|
||||
Me.Panel2.Controls.Add(Me.dgvMitarbeiter)
|
||||
Me.Panel2.Controls.Add(Me.MyTextBox1)
|
||||
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel2.Location = New System.Drawing.Point(0, 37)
|
||||
Me.Panel2.Name = "Panel2"
|
||||
Me.Panel2.Size = New System.Drawing.Size(320, 599)
|
||||
Me.Panel2.TabIndex = 17
|
||||
'
|
||||
'btnTeam
|
||||
'
|
||||
Me.btnTeam.BackColor = System.Drawing.Color.SteelBlue
|
||||
Me.btnTeam.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnTeam.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnTeam.ForeColor = System.Drawing.Color.White
|
||||
Me.btnTeam.Location = New System.Drawing.Point(161, 540)
|
||||
Me.btnTeam.Name = "btnTeam"
|
||||
Me.btnTeam.Size = New System.Drawing.Size(140, 42)
|
||||
Me.btnTeam.TabIndex = 14
|
||||
Me.btnTeam.Text = "senden an" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "TEAM"
|
||||
Me.btnTeam.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btnBenutzer
|
||||
'
|
||||
Me.btnBenutzer.BackColor = System.Drawing.Color.SteelBlue
|
||||
Me.btnBenutzer.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnBenutzer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnBenutzer.ForeColor = System.Drawing.Color.White
|
||||
Me.btnBenutzer.Location = New System.Drawing.Point(15, 540)
|
||||
Me.btnBenutzer.Name = "btnBenutzer"
|
||||
Me.btnBenutzer.Size = New System.Drawing.Size(140, 42)
|
||||
Me.btnBenutzer.TabIndex = 13
|
||||
Me.btnBenutzer.Text = "senden an" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "BENUTZER"
|
||||
Me.btnBenutzer.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(12, 9)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(41, 13)
|
||||
Me.Label2.TabIndex = 11
|
||||
Me.Label2.Text = "Suche:"
|
||||
'
|
||||
'dgvMitarbeiter
|
||||
'
|
||||
Me.dgvMitarbeiter.AllowUserToAddRows = False
|
||||
Me.dgvMitarbeiter.AllowUserToDeleteRows = False
|
||||
Me.dgvMitarbeiter.AllowUserToResizeColumns = False
|
||||
Me.dgvMitarbeiter.AllowUserToResizeRows = False
|
||||
Me.dgvMitarbeiter.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvMitarbeiter.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvMitarbeiter.Location = New System.Drawing.Point(15, 48)
|
||||
Me.dgvMitarbeiter.MultiSelect = False
|
||||
Me.dgvMitarbeiter.Name = "dgvMitarbeiter"
|
||||
Me.dgvMitarbeiter.RowHeadersVisible = False
|
||||
Me.dgvMitarbeiter.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvMitarbeiter.Size = New System.Drawing.Size(286, 486)
|
||||
Me.dgvMitarbeiter.TabIndex = 10
|
||||
'
|
||||
'MyTextBox1
|
||||
'
|
||||
Me.MyTextBox1._DateTimeOnly = False
|
||||
Me.MyTextBox1._numbersOnly = False
|
||||
Me.MyTextBox1._numbersOnlyKommastellen = ""
|
||||
Me.MyTextBox1._Prozent = False
|
||||
Me.MyTextBox1._ShortDateNew = False
|
||||
Me.MyTextBox1._ShortDateOnly = False
|
||||
Me.MyTextBox1._TimeOnly = False
|
||||
Me.MyTextBox1._value = ""
|
||||
Me.MyTextBox1._Waehrung = False
|
||||
Me.MyTextBox1._WaehrungZeichen = True
|
||||
Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
|
||||
Me.MyTextBox1.Location = New System.Drawing.Point(15, 25)
|
||||
Me.MyTextBox1.MaxLineLength = -1
|
||||
Me.MyTextBox1.MaxLines_Warning = ""
|
||||
Me.MyTextBox1.MaxLines_Warning_Label = Nothing
|
||||
Me.MyTextBox1.Name = "MyTextBox1"
|
||||
Me.MyTextBox1.Size = New System.Drawing.Size(286, 20)
|
||||
Me.MyTextBox1.TabIndex = 9
|
||||
'
|
||||
'Panel4
|
||||
'
|
||||
Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel4.Controls.Add(Me.Panel1)
|
||||
Me.Panel4.Controls.Add(Me.Panel7)
|
||||
Me.Panel4.Controls.Add(Me.MyFlowLayoutPanel1)
|
||||
Me.Panel4.Controls.Add(Me.Panel5)
|
||||
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel4.Location = New System.Drawing.Point(320, 37)
|
||||
Me.Panel4.Name = "Panel4"
|
||||
Me.Panel4.Size = New System.Drawing.Size(413, 599)
|
||||
Me.Panel4.TabIndex = 20
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel1.Controls.Add(Me.flpFirma)
|
||||
Me.Panel1.Controls.Add(Me.Panel3)
|
||||
Me.Panel1.Controls.Add(Me.MyFlowLayoutPanel2)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel1.Location = New System.Drawing.Point(200, 57)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(200, 365)
|
||||
Me.Panel1.TabIndex = 20
|
||||
'
|
||||
'flpFirma
|
||||
'
|
||||
Me.flpFirma.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.flpFirma.Location = New System.Drawing.Point(0, 28)
|
||||
Me.flpFirma.Name = "flpFirma"
|
||||
Me.flpFirma.Size = New System.Drawing.Size(198, 335)
|
||||
Me.flpFirma.TabIndex = 1
|
||||
'
|
||||
'Panel3
|
||||
'
|
||||
Me.Panel3.Controls.Add(Me.Label1)
|
||||
Me.Panel3.Controls.Add(Me.MyFlowLayoutPanel3)
|
||||
Me.Panel3.Controls.Add(Me.MyFlowLayoutPanel4)
|
||||
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel3.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel3.Name = "Panel3"
|
||||
Me.Panel3.Size = New System.Drawing.Size(198, 28)
|
||||
Me.Panel3.TabIndex = 2
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.Label1.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(53, 17)
|
||||
Me.Label1.TabIndex = 2
|
||||
Me.Label1.Text = "Firma:"
|
||||
'
|
||||
'MyFlowLayoutPanel3
|
||||
'
|
||||
Me.MyFlowLayoutPanel3.Location = New System.Drawing.Point(170, 93)
|
||||
Me.MyFlowLayoutPanel3.Name = "MyFlowLayoutPanel3"
|
||||
Me.MyFlowLayoutPanel3.Size = New System.Drawing.Size(593, 431)
|
||||
Me.MyFlowLayoutPanel3.TabIndex = 1
|
||||
'
|
||||
'MyFlowLayoutPanel4
|
||||
'
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button10)
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button11)
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button12)
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button13)
|
||||
Me.MyFlowLayoutPanel4.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel4.Name = "MyFlowLayoutPanel4"
|
||||
Me.MyFlowLayoutPanel4.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel4.TabIndex = 1
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button10.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button10.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button10.TabIndex = 3
|
||||
Me.Button10.Text = "TEAM"
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button11
|
||||
'
|
||||
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button11.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button11.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button11.Name = "Button11"
|
||||
Me.Button11.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button11.TabIndex = 1
|
||||
Me.Button11.Text = "NIEDERLASSUNG"
|
||||
Me.Button11.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button12
|
||||
'
|
||||
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button12.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button12.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button12.Name = "Button12"
|
||||
Me.Button12.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button12.TabIndex = 2
|
||||
Me.Button12.Text = "ABTEILUNG"
|
||||
Me.Button12.UseVisualStyleBackColor = True
|
||||
Me.Button12.Visible = False
|
||||
'
|
||||
'Button13
|
||||
'
|
||||
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button13.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button13.Name = "Button13"
|
||||
Me.Button13.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button13.TabIndex = 4
|
||||
Me.Button13.Text = "FIRMA"
|
||||
Me.Button13.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel2
|
||||
'
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button6)
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button4)
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button5)
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button7)
|
||||
Me.MyFlowLayoutPanel2.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel2.Name = "MyFlowLayoutPanel2"
|
||||
Me.MyFlowLayoutPanel2.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel2.TabIndex = 1
|
||||
'
|
||||
'Button6
|
||||
'
|
||||
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button6.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button6.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button6.Name = "Button6"
|
||||
Me.Button6.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button6.TabIndex = 3
|
||||
Me.Button6.Text = "TEAM"
|
||||
Me.Button6.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button4.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button4.TabIndex = 1
|
||||
Me.Button4.Text = "NIEDERLASSUNG"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button5
|
||||
'
|
||||
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button5.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button5.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button5.Name = "Button5"
|
||||
Me.Button5.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button5.TabIndex = 2
|
||||
Me.Button5.Text = "ABTEILUNG"
|
||||
Me.Button5.UseVisualStyleBackColor = True
|
||||
Me.Button5.Visible = False
|
||||
'
|
||||
'Button7
|
||||
'
|
||||
Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button7.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button7.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button7.Name = "Button7"
|
||||
Me.Button7.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button7.TabIndex = 4
|
||||
Me.Button7.Text = "FIRMA"
|
||||
Me.Button7.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel7
|
||||
'
|
||||
Me.Panel7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel7.Controls.Add(Me.flpTeams)
|
||||
Me.Panel7.Controls.Add(Me.Panel8)
|
||||
Me.Panel7.Controls.Add(Me.MyFlowLayoutPanel16)
|
||||
Me.Panel7.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel7.Location = New System.Drawing.Point(0, 57)
|
||||
Me.Panel7.Name = "Panel7"
|
||||
Me.Panel7.Size = New System.Drawing.Size(200, 365)
|
||||
Me.Panel7.TabIndex = 19
|
||||
'
|
||||
'flpTeams
|
||||
'
|
||||
Me.flpTeams.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.flpTeams.Location = New System.Drawing.Point(0, 28)
|
||||
Me.flpTeams.Name = "flpTeams"
|
||||
Me.flpTeams.Size = New System.Drawing.Size(198, 335)
|
||||
Me.flpTeams.TabIndex = 1
|
||||
'
|
||||
'Panel8
|
||||
'
|
||||
Me.Panel8.Controls.Add(Me.Label4)
|
||||
Me.Panel8.Controls.Add(Me.MyFlowLayoutPanel14)
|
||||
Me.Panel8.Controls.Add(Me.MyFlowLayoutPanel15)
|
||||
Me.Panel8.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel8.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel8.Name = "Panel8"
|
||||
Me.Panel8.Size = New System.Drawing.Size(198, 28)
|
||||
Me.Panel8.TabIndex = 2
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.Label4.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(53, 17)
|
||||
Me.Label4.TabIndex = 2
|
||||
Me.Label4.Text = "Team:"
|
||||
'
|
||||
'MyFlowLayoutPanel14
|
||||
'
|
||||
Me.MyFlowLayoutPanel14.Location = New System.Drawing.Point(170, 93)
|
||||
Me.MyFlowLayoutPanel14.Name = "MyFlowLayoutPanel14"
|
||||
Me.MyFlowLayoutPanel14.Size = New System.Drawing.Size(593, 431)
|
||||
Me.MyFlowLayoutPanel14.TabIndex = 1
|
||||
'
|
||||
'MyFlowLayoutPanel15
|
||||
'
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button30)
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button31)
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button32)
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button33)
|
||||
Me.MyFlowLayoutPanel15.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel15.Name = "MyFlowLayoutPanel15"
|
||||
Me.MyFlowLayoutPanel15.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel15.TabIndex = 1
|
||||
'
|
||||
'Button30
|
||||
'
|
||||
Me.Button30.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button30.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button30.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button30.Name = "Button30"
|
||||
Me.Button30.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button30.TabIndex = 3
|
||||
Me.Button30.Text = "TEAM"
|
||||
Me.Button30.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button31
|
||||
'
|
||||
Me.Button31.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button31.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button31.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button31.Name = "Button31"
|
||||
Me.Button31.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button31.TabIndex = 1
|
||||
Me.Button31.Text = "NIEDERLASSUNG"
|
||||
Me.Button31.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button32
|
||||
'
|
||||
Me.Button32.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button32.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button32.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button32.Name = "Button32"
|
||||
Me.Button32.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button32.TabIndex = 2
|
||||
Me.Button32.Text = "ABTEILUNG"
|
||||
Me.Button32.UseVisualStyleBackColor = True
|
||||
Me.Button32.Visible = False
|
||||
'
|
||||
'Button33
|
||||
'
|
||||
Me.Button33.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button33.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button33.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button33.Name = "Button33"
|
||||
Me.Button33.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button33.TabIndex = 4
|
||||
Me.Button33.Text = "FIRMA"
|
||||
Me.Button33.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel16
|
||||
'
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button34)
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button35)
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button36)
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button37)
|
||||
Me.MyFlowLayoutPanel16.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel16.Name = "MyFlowLayoutPanel16"
|
||||
Me.MyFlowLayoutPanel16.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel16.TabIndex = 1
|
||||
'
|
||||
'Button34
|
||||
'
|
||||
Me.Button34.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button34.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button34.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button34.Name = "Button34"
|
||||
Me.Button34.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button34.TabIndex = 3
|
||||
Me.Button34.Text = "TEAM"
|
||||
Me.Button34.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button35
|
||||
'
|
||||
Me.Button35.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button35.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button35.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button35.Name = "Button35"
|
||||
Me.Button35.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button35.TabIndex = 1
|
||||
Me.Button35.Text = "NIEDERLASSUNG"
|
||||
Me.Button35.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button36
|
||||
'
|
||||
Me.Button36.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button36.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button36.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button36.Name = "Button36"
|
||||
Me.Button36.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button36.TabIndex = 2
|
||||
Me.Button36.Text = "ABTEILUNG"
|
||||
Me.Button36.UseVisualStyleBackColor = True
|
||||
Me.Button36.Visible = False
|
||||
'
|
||||
'Button37
|
||||
'
|
||||
Me.Button37.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button37.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button37.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button37.Name = "Button37"
|
||||
Me.Button37.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button37.TabIndex = 4
|
||||
Me.Button37.Text = "FIRMA"
|
||||
Me.Button37.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel1
|
||||
'
|
||||
Me.MyFlowLayoutPanel1.BackColor = System.Drawing.Color.White
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnVERAG)
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnUNIPED)
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnIMEX)
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnFrontoffice)
|
||||
Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1"
|
||||
Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(411, 57)
|
||||
Me.MyFlowLayoutPanel1.TabIndex = 21
|
||||
'
|
||||
'btnVERAG
|
||||
'
|
||||
Me.btnVERAG.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnVERAG.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnVERAG.Location = New System.Drawing.Point(3, 3)
|
||||
Me.btnVERAG.Name = "btnVERAG"
|
||||
Me.btnVERAG.Size = New System.Drawing.Size(86, 43)
|
||||
Me.btnVERAG.TabIndex = 4
|
||||
Me.btnVERAG.Text = "VERAG"
|
||||
Me.btnVERAG.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnUNIPED
|
||||
'
|
||||
Me.btnUNIPED.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnUNIPED.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnUNIPED.Location = New System.Drawing.Point(95, 3)
|
||||
Me.btnUNIPED.Name = "btnUNIPED"
|
||||
Me.btnUNIPED.Size = New System.Drawing.Size(86, 43)
|
||||
Me.btnUNIPED.TabIndex = 7
|
||||
Me.btnUNIPED.Text = "UNISPED"
|
||||
Me.btnUNIPED.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnIMEX
|
||||
'
|
||||
Me.btnIMEX.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnIMEX.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnIMEX.Location = New System.Drawing.Point(187, 3)
|
||||
Me.btnIMEX.Name = "btnIMEX"
|
||||
Me.btnIMEX.Size = New System.Drawing.Size(86, 43)
|
||||
Me.btnIMEX.TabIndex = 5
|
||||
Me.btnIMEX.Text = "IMEX"
|
||||
Me.btnIMEX.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnFrontoffice
|
||||
'
|
||||
Me.btnFrontoffice.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnFrontoffice.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnFrontoffice.Location = New System.Drawing.Point(279, 3)
|
||||
Me.btnFrontoffice.Name = "btnFrontoffice"
|
||||
Me.btnFrontoffice.Size = New System.Drawing.Size(120, 43)
|
||||
Me.btnFrontoffice.TabIndex = 8
|
||||
Me.btnFrontoffice.Text = "FRONTOFFICE"
|
||||
Me.btnFrontoffice.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel5
|
||||
'
|
||||
Me.Panel5.BackColor = System.Drawing.Color.SeaShell
|
||||
Me.Panel5.Controls.Add(Me.Label6)
|
||||
Me.Panel5.Controls.Add(Me.dgvAnmhaenge)
|
||||
Me.Panel5.Controls.Add(Me.Button1)
|
||||
Me.Panel5.Controls.Add(Me.Label5)
|
||||
Me.Panel5.Controls.Add(Me.rtbVermerk)
|
||||
Me.Panel5.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.Panel5.Location = New System.Drawing.Point(0, 422)
|
||||
Me.Panel5.Name = "Panel5"
|
||||
Me.Panel5.Size = New System.Drawing.Size(411, 175)
|
||||
Me.Panel5.TabIndex = 22
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(2, 90)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(53, 13)
|
||||
Me.Label6.TabIndex = 18
|
||||
Me.Label6.Text = "Anhänge:"
|
||||
'
|
||||
'dgvAnmhaenge
|
||||
'
|
||||
Me.dgvAnmhaenge.AllowUserToAddRows = False
|
||||
Me.dgvAnmhaenge.AllowUserToResizeColumns = False
|
||||
Me.dgvAnmhaenge.AllowUserToResizeRows = False
|
||||
Me.dgvAnmhaenge.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvAnmhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvAnmhaenge.ColumnHeadersVisible = False
|
||||
Me.dgvAnmhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnAnhFilePath, Me.clmnAnhFileName})
|
||||
Me.dgvAnmhaenge.Location = New System.Drawing.Point(61, 90)
|
||||
Me.dgvAnmhaenge.MultiSelect = False
|
||||
Me.dgvAnmhaenge.Name = "dgvAnmhaenge"
|
||||
Me.dgvAnmhaenge.ReadOnly = True
|
||||
Me.dgvAnmhaenge.RowHeadersVisible = False
|
||||
Me.dgvAnmhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvAnmhaenge.Size = New System.Drawing.Size(249, 70)
|
||||
Me.dgvAnmhaenge.TabIndex = 17
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.BackColor = System.Drawing.Color.SteelBlue
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button1.ForeColor = System.Drawing.Color.White
|
||||
Me.Button1.Location = New System.Drawing.Point(316, 118)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(82, 42)
|
||||
Me.Button1.TabIndex = 15
|
||||
Me.Button1.Text = "+ Anhang"
|
||||
Me.Button1.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(2, 16)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(49, 13)
|
||||
Me.Label5.TabIndex = 1
|
||||
Me.Label5.Text = "Vermerk:"
|
||||
'
|
||||
'rtbVermerk
|
||||
'
|
||||
Me.rtbVermerk.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.rtbVermerk.Location = New System.Drawing.Point(60, 16)
|
||||
Me.rtbVermerk.MaxLength = 500
|
||||
Me.rtbVermerk.Name = "rtbVermerk"
|
||||
Me.rtbVermerk.Size = New System.Drawing.Size(339, 71)
|
||||
Me.rtbVermerk.TabIndex = 0
|
||||
Me.rtbVermerk.Text = ""
|
||||
'
|
||||
'clmnAnhFilePath
|
||||
'
|
||||
Me.clmnAnhFilePath.HeaderText = "Column1"
|
||||
Me.clmnAnhFilePath.Name = "clmnAnhFilePath"
|
||||
Me.clmnAnhFilePath.ReadOnly = True
|
||||
Me.clmnAnhFilePath.Visible = False
|
||||
'
|
||||
'clmnAnhFileName
|
||||
'
|
||||
Me.clmnAnhFileName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
||||
Me.clmnAnhFileName.HeaderText = "Datei"
|
||||
Me.clmnAnhFileName.Name = "clmnAnhFileName"
|
||||
Me.clmnAnhFileName.ReadOnly = True
|
||||
'
|
||||
'frmAvisoWeiterleiten
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(733, 636)
|
||||
Me.Controls.Add(Me.Panel4)
|
||||
Me.Controls.Add(Me.Panel2)
|
||||
Me.Controls.Add(Me.pnl)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmAvisoWeiterleiten"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Weiterleiten"
|
||||
Me.pnl.ResumeLayout(False)
|
||||
Me.pnl.PerformLayout()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel2.ResumeLayout(False)
|
||||
Me.Panel2.PerformLayout()
|
||||
CType(Me.dgvMitarbeiter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel4.ResumeLayout(False)
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel3.ResumeLayout(False)
|
||||
Me.Panel3.PerformLayout()
|
||||
Me.MyFlowLayoutPanel4.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel2.ResumeLayout(False)
|
||||
Me.Panel7.ResumeLayout(False)
|
||||
Me.Panel8.ResumeLayout(False)
|
||||
Me.Panel8.PerformLayout()
|
||||
Me.MyFlowLayoutPanel15.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel16.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel1.ResumeLayout(False)
|
||||
Me.Panel5.ResumeLayout(False)
|
||||
Me.Panel5.PerformLayout()
|
||||
CType(Me.dgvAnmhaenge, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pnl As Panel
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents Button3 As Button
|
||||
Friend WithEvents Panel2 As Panel
|
||||
Friend WithEvents Panel4 As Panel
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents flpFirma As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Panel3 As Panel
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents MyFlowLayoutPanel3 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents MyFlowLayoutPanel4 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button10 As Button
|
||||
Friend WithEvents Button11 As Button
|
||||
Friend WithEvents Button12 As Button
|
||||
Friend WithEvents Button13 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel2 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button6 As Button
|
||||
Friend WithEvents Button4 As Button
|
||||
Friend WithEvents Button5 As Button
|
||||
Friend WithEvents Button7 As Button
|
||||
Friend WithEvents Panel7 As Panel
|
||||
Friend WithEvents flpTeams As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Panel8 As Panel
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents MyFlowLayoutPanel14 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents MyFlowLayoutPanel15 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button30 As Button
|
||||
Friend WithEvents Button31 As Button
|
||||
Friend WithEvents Button32 As Button
|
||||
Friend WithEvents Button33 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel16 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button34 As Button
|
||||
Friend WithEvents Button35 As Button
|
||||
Friend WithEvents Button36 As Button
|
||||
Friend WithEvents Button37 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel1 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents btnVERAG As Button
|
||||
Friend WithEvents btnUNIPED As Button
|
||||
Friend WithEvents btnIMEX As Button
|
||||
Friend WithEvents btnFrontoffice As Button
|
||||
Friend WithEvents btnTeam As Button
|
||||
Friend WithEvents btnBenutzer As Button
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents dgvMitarbeiter As DataGridView
|
||||
Friend WithEvents MyTextBox1 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents pic As PictureBox
|
||||
Friend WithEvents Panel5 As Panel
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents rtbVermerk As RichTextBox
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents Label6 As Label
|
||||
Friend WithEvents dgvAnmhaenge As DataGridView
|
||||
Friend WithEvents clmnAnhFilePath As DataGridViewTextBoxColumn
|
||||
Friend WithEvents clmnAnhFileName As DataGridViewTextBoxColumn
|
||||
End Class
|
||||
1259
Aviso/frmAvisoWeiterleiten.resx
Normal file
1259
Aviso/frmAvisoWeiterleiten.resx
Normal file
File diff suppressed because it is too large
Load Diff
344
Aviso/frmAvisoWeiterleiten.vb
Normal file
344
Aviso/frmAvisoWeiterleiten.vb
Normal file
@@ -0,0 +1,344 @@
|
||||
|
||||
|
||||
Public Class frmAvisoWeiterleiten
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
Dim Art = "" ' A..viso oder S..endung
|
||||
Dim AvisoId As Integer
|
||||
Dim SendungsId As Integer
|
||||
|
||||
Dim loaded = False
|
||||
|
||||
|
||||
Dim ASF = New AVISO.AvisoStatusFunctions
|
||||
|
||||
Sub New(Art As String, AvisoId As Integer, Optional SendungsId As Integer = -1)
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
Me.Art = Art
|
||||
Me.AvisoId = AvisoId
|
||||
Me.SendungsId = SendungsId
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmAvisoWeiterleiten_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Weiterleiten", "AVISO") Then
|
||||
Me.Close()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
'tbcntr.Appearance = TabAppearance.FlatButtons
|
||||
'tbcntr.ItemSize = New Size(0, 1)
|
||||
'tbcntr.SizeMode = TabSizeMode.Fixed
|
||||
'tbcntr.pa
|
||||
Button6.PerformClick()
|
||||
loaded = True
|
||||
End Sub
|
||||
|
||||
Private Sub Panel2_Paint(sender As Object, e As PaintEventArgs)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub MyFlowLayoutPanel1_Paint(sender As Object, e As PaintEventArgs)
|
||||
|
||||
End Sub
|
||||
|
||||
'Private Sub Button6_Click(sender As Object, e As EventArgs)
|
||||
' Dim flp As FlowLayoutPanel = flpFi
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flp.Controls.Clear()
|
||||
|
||||
' If dt Is Nothing Then Exit Sub
|
||||
|
||||
' For Each t In dt.Rows
|
||||
' Dim btn As New Button
|
||||
' btn.FlatStyle = FlatStyle.Flat
|
||||
' btn.Size = New Size(250, 50)
|
||||
' btn.Font = New Font(Me.Font.FontFamily, 10, FontStyle.Regular)
|
||||
' btn.Text = t("team_bezeichnung")
|
||||
' btn.Tag = t("team_id")
|
||||
|
||||
' AddHandler btn.Click, Sub()
|
||||
' btnWeiterleitung_Clicked("T", (btn.Tag), btn.Text)
|
||||
' initButtons(flp, sender)
|
||||
' End Sub
|
||||
|
||||
' flpFirma.Controls.Add(btn)
|
||||
|
||||
' Next
|
||||
|
||||
'End Sub
|
||||
|
||||
Sub initButtons(flp As FlowLayoutPanel, b As Button)
|
||||
For Each c In flp.Controls
|
||||
DirectCast(c, Button).BackColor = Color.WhiteSmoke
|
||||
DirectCast(c, Button).ForeColor = Color.Black
|
||||
Next
|
||||
b.BackColor = Color.SteelBlue
|
||||
b.ForeColor = Color.White
|
||||
|
||||
End Sub
|
||||
|
||||
Sub initButtonsTop(b As Button)
|
||||
For Each c In MyFlowLayoutPanel1.Controls
|
||||
DirectCast(c, Button).BackColor = Color.WhiteSmoke
|
||||
DirectCast(c, Button).ForeColor = Color.Black
|
||||
Next
|
||||
b.BackColor = Color.SteelBlue
|
||||
b.ForeColor = Color.White
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Sub btnWeiterleitung_Clicked(WLart As String, id As String, bezeichnung As String)
|
||||
Dim text = ""
|
||||
Dim code = 3
|
||||
Select Case WLart
|
||||
Case "T"
|
||||
text = "Ins Team '" & bezeichnung & "' gegeben."
|
||||
Case "A"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
Case "N"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
Case "F"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
Case "B"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
End Select
|
||||
|
||||
'Anhänge:
|
||||
Dim collAnhIds = ""
|
||||
Try
|
||||
For Each r In dgvAnmhaenge.Rows
|
||||
Dim fi As New IO.FileInfo(r.cells("clmnAnhFilePath").value)
|
||||
Dim typ = ""
|
||||
Dim anhId = -1
|
||||
If AVISO.frmSendungAnhangImport.getFileTypeValid(fi.Extension, typ) Then
|
||||
AVISO.frmSendungAnhangImport.saveToDS(AvisoId, fi.Name, r.cells("clmnAnhFilePath").value, "BENACHRICHTIGUNG", typ, , anhId,, If(Art = "S", SendungsId, Nothing))
|
||||
collAnhIds &= anhId & ";"
|
||||
End If
|
||||
Next
|
||||
If collAnhIds <> "" Then collAnhIds = collAnhIds.Substring(0, collAnhIds.Length - 1)
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
|
||||
|
||||
' insertVermerke
|
||||
VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen.INSERT_BENACHRICHTIGUNG(AvisoId, SendungsId, 3, WLart, id, "von '" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "'", 0, collAnhIds, rtbVermerk.Text.Trim)
|
||||
If Art = "S" Then
|
||||
ASF.insertSendungsVermerk(SendungsId, AvisoId, text, 46)
|
||||
If rtbVermerk.Text.Trim <> "" Then ASF.insertSendungsVermerk(SendungsId, AvisoId, "WL: " & rtbVermerk.Text.Trim, 46)
|
||||
ASF.SendungUebernehmen_Zuruecksetzen(SendungsId, AvisoId) ' , Optional MaId As Integer = -1, Optional GesendetAn As Boolean = False)
|
||||
Else
|
||||
ASF.insertVermerkAllg(AvisoId, text, 46)
|
||||
If rtbVermerk.Text.Trim <> "" Then ASF.insertVermerkAllg(AvisoId, "WL: " & rtbVermerk.Text.Trim, 46)
|
||||
ASF.AktUebernehmen_Zuruecksetzen(AvisoId)
|
||||
End If
|
||||
|
||||
' Me.Close()
|
||||
' End If
|
||||
|
||||
Me.Close()
|
||||
Me.DialogResult = DialogResult.OK
|
||||
End Sub
|
||||
|
||||
'Private Sub Button5_Click(sender As Object, e As EventArgs)
|
||||
' ' tbcntr.SelectedTab = tbAbteilung
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flpFirma.Controls.Clear()
|
||||
' addBtn("A", "FISKAL", "VERAG Fiskal")
|
||||
|
||||
' initButtons(sender)
|
||||
'End Sub
|
||||
|
||||
Sub addBtn(flpFirma As FlowLayoutPanel, WLart As String, id As String, bezeichnung As String, Optional enabled As Boolean = True)
|
||||
Dim btn As New Button
|
||||
btn.FlatStyle = FlatStyle.Flat
|
||||
btn.Size = New Size(180, 40)
|
||||
btn.Font = New Font(Me.Font.FontFamily, 10, FontStyle.Regular)
|
||||
btn.Text = bezeichnung
|
||||
btn.Tag = id
|
||||
btn.Enabled = enabled
|
||||
|
||||
AddHandler btn.Click, Sub()
|
||||
btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung)
|
||||
initButtons(flpFirma, btn)
|
||||
End Sub
|
||||
|
||||
flpFirma.Controls.Add(btn)
|
||||
End Sub
|
||||
|
||||
'Private Sub Button4_Click(sender As Object, e As EventArgs)
|
||||
' ' tbcntr.SelectedTab = tbAbteilung
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flpFirma.Controls.Clear()
|
||||
' addBtn("N", "SBG", "VERAG Salzburg")
|
||||
' addBtn("N", "WAI", "VERAG Waidhaus")
|
||||
' addBtn("N", "NKD", "VERAG Nickelsdorf")
|
||||
|
||||
' initButtons(sender)
|
||||
'End Sub
|
||||
|
||||
'Private Sub Button7_Click(sender As Object, e As EventArgs)
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flpFirma.Controls.Clear()
|
||||
' addBtn("F", "FRONTOFFICE", "FRONTOFFICE")
|
||||
' addBtn("F", "UNISPED", "UNISPED")
|
||||
|
||||
' initButtons(sender)
|
||||
'End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnVERAG.Click, btnIMEX.Click, btnUNIPED.Click, btnFrontoffice.Click
|
||||
'flpAbteilung.Controls.Clear()
|
||||
flpTeams.Controls.Clear()
|
||||
' flpNiederlassung.Controls.Clear()
|
||||
flpFirma.Controls.Clear()
|
||||
|
||||
If sender Is btnVERAG Then
|
||||
addBtn(flpFirma, "F", "VERAG", "VERAG", False)
|
||||
|
||||
addBtn(flpFirma, "N", "SBG", "VERAG Salzburg")
|
||||
addBtn(flpFirma, "N", "WAI", "VERAG Waidhaus")
|
||||
addBtn(flpFirma, "N", "NKD", "VERAG Nickelsdorf")
|
||||
|
||||
addBtn(flpFirma, "A", "FISK", "VERAG Fiskal")
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='VERAG' order by team_id", "ADMIN")
|
||||
If dt IsNot Nothing Then
|
||||
For Each t In dt.Rows
|
||||
addBtn(flpTeams, "T", t("team_id"), t("team_bezeichnung"))
|
||||
Next
|
||||
End If
|
||||
ElseIf sender Is btnIMEX Then
|
||||
addBtn(flpFirma, "F", "IMEX", "IMEX", False)
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='IMEX' order by team_id", "ADMIN")
|
||||
If dt IsNot Nothing Then
|
||||
For Each t In dt.Rows
|
||||
addBtn(flpTeams, "T", t("team_id"), t("team_bezeichnung"))
|
||||
Next
|
||||
End If
|
||||
ElseIf sender Is btnUNIPED Then
|
||||
addBtn(flpFirma, "F", "UNISPED", "UNISPED", True)
|
||||
|
||||
ElseIf sender Is btnFrontoffice Then
|
||||
addBtn(flpFirma, "F", "FRONTOFFICE", "FRONT-OFFICE", True)
|
||||
|
||||
End If
|
||||
|
||||
initButtonsTop(sender)
|
||||
End Sub
|
||||
|
||||
Private Sub MyTextBox1_TextChanged(sender As Object, e As EventArgs) Handles MyTextBox1.TextChanged
|
||||
initDGV()
|
||||
End Sub
|
||||
|
||||
Sub initDGV()
|
||||
If Not loaded Then Exit Sub
|
||||
With dgvMitarbeiter
|
||||
Dim FirmaTMP = "" ' MyComboBox1._value
|
||||
Dim sqlStr = "SELECT TOP (1000) [mit_id],[mit_nname] + ' ' + [mit_vname] + ' (' + mit_niederlassung + ')' as MAname,CASE WHEN mit_firma='ALL' THEN mit_firmaHaupt ELSE mit_firma END as mit_firma,[mit_teamId],team_bezeichnung as Team "
|
||||
sqlStr &= " FROM [tblMitarbeiter] left join tblteams on team_id=mit_teamid "
|
||||
sqlStr &= " WHERE mit_gekuendigt=0 AND /*mit_abteilung IN ('QS','ZOLL','DISPO') AND*/ [mit_TESTonly]=0 AND [mit_pseudoUser]=0 AND [mit_ChatBenutzer]=1 "
|
||||
' If MyComboBox1._value <> "" Then sqlStr &= " AND mit_firma IN ('" & FirmaTMP & "','BEIDE','ALLE','ALL')"
|
||||
If MyTextBox1.Text <> "" Then sqlStr &= " AND (mit_nname LIKE '" & MyTextBox1.Text & "%' OR mit_vname LIKE '" & MyTextBox1.Text & "%' )"
|
||||
|
||||
sqlStr &= " order by mit_nname,mit_vname"
|
||||
|
||||
.DataSource = SQL.loadDgvBySql(sqlStr, "ADMIN")
|
||||
|
||||
If .Columns.Count = 0 Then Exit Sub
|
||||
|
||||
.Columns("mit_teamId").Visible = False
|
||||
.Columns("mit_id").Visible = False
|
||||
.AutoSizeColumnsMode = Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
|
||||
End With
|
||||
End Sub
|
||||
|
||||
Private Sub MyComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs)
|
||||
initDGV()
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub dgvMitarbeiter_SelectionChanged(sender As Object, e As EventArgs) Handles dgvMitarbeiter.SelectionChanged
|
||||
btnBenutzer.Enabled = False
|
||||
btnTeam.Enabled = False
|
||||
|
||||
If dgvMitarbeiter.SelectedRows.Count > 0 Then
|
||||
' btnBenutzer.Enabled = True
|
||||
If dgvMitarbeiter.SelectedRows(0).Cells("mit_teamId").Value IsNot DBNull.Value AndAlso dgvMitarbeiter.SelectedRows(0).Cells("mit_teamId").Value > 0 Then
|
||||
btnBenutzer.Enabled = False
|
||||
btnTeam.Enabled = True
|
||||
End If
|
||||
Else
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnTeam_Click(sender As Object, e As EventArgs) Handles btnTeam.Click
|
||||
If dgvMitarbeiter.SelectedRows.Count > 0 Then
|
||||
If dgvMitarbeiter.SelectedRows(0).Cells("mit_teamId").Value IsNot DBNull.Value AndAlso dgvMitarbeiter.SelectedRows(0).Cells("mit_teamId").Value > 0 Then
|
||||
btnWeiterleitung_Clicked("T", dgvMitarbeiter.SelectedRows(0).Cells("mit_teamId").Value, dgvMitarbeiter.SelectedRows(0).Cells("Team").Value)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnBenutzer_Click(sender As Object, e As EventArgs) Handles btnBenutzer.Click
|
||||
If dgvMitarbeiter.SelectedRows.Count > 0 Then
|
||||
btnWeiterleitung_Clicked("B", dgvMitarbeiter.SelectedRows(0).Cells("mit_id").Value, dgvMitarbeiter.SelectedRows(0).Cells("MAname").Value)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
Dim fd As New OpenFileDialog
|
||||
' fd.Filter = "Excel Dateien|*.xls;*.xlsx"
|
||||
fd.RestoreDirectory = True
|
||||
fd.Title = "Datei auswählen"
|
||||
fd.Multiselect = True
|
||||
' fd.InitialDirectory = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
|
||||
|
||||
'fd.Filter = "Image Files(*.BMP;*.JPG;*.GIF;*.PNG)|*.BMP;*.JPG;*.GIF;*.PNG"
|
||||
'fd.FilterIndex = 2
|
||||
|
||||
If fd.ShowDialog() = System.Windows.Forms.DialogResult.OK And fd.FileName <> "" Then
|
||||
' saveFileAtt(fd.FileName)
|
||||
|
||||
For Each fileTMp In fd.FileNames
|
||||
If Not fileTMp.EndsWith(".exe") Then
|
||||
dgvAnmhaenge.Rows.Add({fileTMp, New IO.FileInfo(fileTMp).Name})
|
||||
End If
|
||||
Next
|
||||
'Dim docId = -1
|
||||
'If saveToDS(fileName, fd.FileName, docId) Then
|
||||
|
||||
' Dim MSG As New VERAG_PROG_ALLGEMEIN.cMessenger.cMessenger_ChatMessages(CHAT.chat_id, VERAG_PROG_ALLGEMEIN.cAllgemein.USRID)
|
||||
' MSG.chatMg_type = "ATTACHMENT"
|
||||
' MSG.chatMg_text = fileName
|
||||
' MSG.chatMg_anhang_docId = docId
|
||||
' MSG.chatMg_maName = VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.Fullname
|
||||
' MSG.chatMg_maFirma = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
|
||||
' If MSG.SAVE(True, CHAT.CHAT_MEMBERS) Then
|
||||
' SEND_TOKEN_NEW_MESSAGE()
|
||||
' ' CHAT.CHAT_MESSAGES.Add(MSG)
|
||||
' SET_ALL_READ()
|
||||
' REFRESH_CHAT()
|
||||
' rtbChatMessage.Text = ""
|
||||
' rtbChatMessage.Focus()
|
||||
' End If
|
||||
' End If
|
||||
End If
|
||||
dgvAnmhaenge.ClearSelection()
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
228
Aviso/frmAvisoWeiterleitenBestaetigen.Designer.vb
generated
Normal file
228
Aviso/frmAvisoWeiterleitenBestaetigen.Designer.vb
generated
Normal file
@@ -0,0 +1,228 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmAvisoWeiterleitenBestaetigen
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.dgvAnmhaenge = New System.Windows.Forms.DataGridView()
|
||||
Me.clmnAnhFilePath = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.clmnAnhFileName = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.lblDatUhrzeit = New System.Windows.Forms.Label()
|
||||
Me.lblArt = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.rtbVermerk = New System.Windows.Forms.RichTextBox()
|
||||
Me.btn = New System.Windows.Forms.Button()
|
||||
Me.lblName = New System.Windows.Forms.Label()
|
||||
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.dgvAnmhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.BackColor = System.Drawing.Color.White
|
||||
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnl.Controls.Add(Me.Label7)
|
||||
Me.pnl.Controls.Add(Me.dgvAnmhaenge)
|
||||
Me.pnl.Controls.Add(Me.lblDatUhrzeit)
|
||||
Me.pnl.Controls.Add(Me.lblArt)
|
||||
Me.pnl.Controls.Add(Me.Label2)
|
||||
Me.pnl.Controls.Add(Me.Label1)
|
||||
Me.pnl.Controls.Add(Me.lbl)
|
||||
Me.pnl.Controls.Add(Me.rtbVermerk)
|
||||
Me.pnl.Controls.Add(Me.btn)
|
||||
Me.pnl.Controls.Add(Me.lblName)
|
||||
Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(460, 256)
|
||||
Me.pnl.TabIndex = 0
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Location = New System.Drawing.Point(11, 170)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(53, 13)
|
||||
Me.Label7.TabIndex = 20
|
||||
Me.Label7.Text = "Anhänge:"
|
||||
'
|
||||
'dgvAnmhaenge
|
||||
'
|
||||
Me.dgvAnmhaenge.AllowUserToAddRows = False
|
||||
Me.dgvAnmhaenge.AllowUserToResizeColumns = False
|
||||
Me.dgvAnmhaenge.AllowUserToResizeRows = False
|
||||
Me.dgvAnmhaenge.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvAnmhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvAnmhaenge.ColumnHeadersVisible = False
|
||||
Me.dgvAnmhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnAnhFilePath, Me.clmnAnhFileName})
|
||||
Me.dgvAnmhaenge.Location = New System.Drawing.Point(11, 186)
|
||||
Me.dgvAnmhaenge.MultiSelect = False
|
||||
Me.dgvAnmhaenge.Name = "dgvAnmhaenge"
|
||||
Me.dgvAnmhaenge.ReadOnly = True
|
||||
Me.dgvAnmhaenge.RowHeadersVisible = False
|
||||
Me.dgvAnmhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvAnmhaenge.Size = New System.Drawing.Size(301, 56)
|
||||
Me.dgvAnmhaenge.TabIndex = 19
|
||||
'
|
||||
'clmnAnhFilePath
|
||||
'
|
||||
Me.clmnAnhFilePath.HeaderText = "Column1"
|
||||
Me.clmnAnhFilePath.Name = "clmnAnhFilePath"
|
||||
Me.clmnAnhFilePath.ReadOnly = True
|
||||
Me.clmnAnhFilePath.Visible = False
|
||||
'
|
||||
'clmnAnhFileName
|
||||
'
|
||||
Me.clmnAnhFileName.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
||||
Me.clmnAnhFileName.HeaderText = "Datei"
|
||||
Me.clmnAnhFileName.Name = "clmnAnhFileName"
|
||||
Me.clmnAnhFileName.ReadOnly = True
|
||||
'
|
||||
'lblDatUhrzeit
|
||||
'
|
||||
Me.lblDatUhrzeit.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblDatUhrzeit.Location = New System.Drawing.Point(270, 10)
|
||||
Me.lblDatUhrzeit.Name = "lblDatUhrzeit"
|
||||
Me.lblDatUhrzeit.Size = New System.Drawing.Size(177, 13)
|
||||
Me.lblDatUhrzeit.TabIndex = 8
|
||||
Me.lblDatUhrzeit.Text = "01.01.2020 10:00"
|
||||
Me.lblDatUhrzeit.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'lblArt
|
||||
'
|
||||
Me.lblArt.AutoSize = True
|
||||
Me.lblArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.lblArt.Location = New System.Drawing.Point(11, 8)
|
||||
Me.lblArt.Name = "lblArt"
|
||||
Me.lblArt.Size = New System.Drawing.Size(84, 17)
|
||||
Me.lblArt.TabIndex = 5
|
||||
Me.lblArt.Text = "SENDUNG"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(151, 10)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(79, 13)
|
||||
Me.Label2.TabIndex = 4
|
||||
Me.Label2.Text = "Datum/Uhrzeit:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(151, 26)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(96, 13)
|
||||
Me.Label1.TabIndex = 3
|
||||
Me.Label1.Text = "Weitergeleitet von:"
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Location = New System.Drawing.Point(11, 57)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(49, 13)
|
||||
Me.lbl.TabIndex = 2
|
||||
Me.lbl.Text = "Vermerk:"
|
||||
'
|
||||
'rtbVermerk
|
||||
'
|
||||
Me.rtbVermerk.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.rtbVermerk.Location = New System.Drawing.Point(11, 73)
|
||||
Me.rtbVermerk.Name = "rtbVermerk"
|
||||
Me.rtbVermerk.ReadOnly = True
|
||||
Me.rtbVermerk.Size = New System.Drawing.Size(436, 94)
|
||||
Me.rtbVermerk.TabIndex = 1
|
||||
Me.rtbVermerk.Text = ""
|
||||
'
|
||||
'btn
|
||||
'
|
||||
Me.btn.BackColor = System.Drawing.Color.SteelBlue
|
||||
Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn.ForeColor = System.Drawing.Color.White
|
||||
Me.btn.Location = New System.Drawing.Point(318, 186)
|
||||
Me.btn.Name = "btn"
|
||||
Me.btn.Size = New System.Drawing.Size(129, 56)
|
||||
Me.btn.TabIndex = 0
|
||||
Me.btn.Text = "OK"
|
||||
Me.btn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'lblName
|
||||
'
|
||||
Me.lblName.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblName.Location = New System.Drawing.Point(253, 26)
|
||||
Me.lblName.Name = "lblName"
|
||||
Me.lblName.Size = New System.Drawing.Size(194, 29)
|
||||
Me.lblName.TabIndex = 7
|
||||
Me.lblName.Text = "Maximilian Mustermann (VERAG)"
|
||||
Me.lblName.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'DataGridViewTextBoxColumn1
|
||||
'
|
||||
Me.DataGridViewTextBoxColumn1.HeaderText = "Column1"
|
||||
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
|
||||
Me.DataGridViewTextBoxColumn1.Visible = False
|
||||
'
|
||||
'DataGridViewTextBoxColumn2
|
||||
'
|
||||
Me.DataGridViewTextBoxColumn2.HeaderText = "Datei"
|
||||
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
|
||||
'
|
||||
'frmAvisoWeiterleitenBestaetigen
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(460, 256)
|
||||
Me.Controls.Add(Me.pnl)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Name = "frmAvisoWeiterleitenBestaetigen"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Bestätigen"
|
||||
Me.pnl.ResumeLayout(False)
|
||||
Me.pnl.PerformLayout()
|
||||
CType(Me.dgvAnmhaenge, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pnl As Panel
|
||||
Friend WithEvents lblArt As Label
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents rtbVermerk As RichTextBox
|
||||
Friend WithEvents btn As Button
|
||||
Friend WithEvents lblDatUhrzeit As Label
|
||||
Friend WithEvents lblName As Label
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents dgvAnmhaenge As DataGridView
|
||||
Friend WithEvents clmnAnhFilePath As DataGridViewTextBoxColumn
|
||||
Friend WithEvents clmnAnhFileName As DataGridViewTextBoxColumn
|
||||
Friend WithEvents DataGridViewTextBoxColumn1 As DataGridViewTextBoxColumn
|
||||
Friend WithEvents DataGridViewTextBoxColumn2 As DataGridViewTextBoxColumn
|
||||
End Class
|
||||
126
Aviso/frmAvisoWeiterleitenBestaetigen.resx
Normal file
126
Aviso/frmAvisoWeiterleitenBestaetigen.resx
Normal file
@@ -0,0 +1,126 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="clmnAnhFilePath.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="clmnAnhFileName.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
</root>
|
||||
63
Aviso/frmAvisoWeiterleitenBestaetigen.vb
Normal file
63
Aviso/frmAvisoWeiterleitenBestaetigen.vb
Normal file
@@ -0,0 +1,63 @@
|
||||
Public Class frmAvisoWeiterleitenBestaetigen
|
||||
|
||||
Dim AB As VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen = Nothing
|
||||
|
||||
Sub New(AB As VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen)
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
Me.AB = AB
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
Sub New(ABId)
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
Me.AB = New VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen(ABId)
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub frmAvisoWeiterleitenBestaetigen_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If AB IsNot Nothing Then
|
||||
|
||||
rtbVermerk.Text = AB.ab_Vermerk
|
||||
lblName.Text = AB.ab_Mitarbeiter
|
||||
lblDatUhrzeit.Text = AB.ab_Datum.ToShortDateString & " " & AB.ab_Datum.ToShortTimeString
|
||||
|
||||
If AB.ab_Art = "A" Then lblArt.Text = "LKW"
|
||||
|
||||
If AB.ab_collAnhId <> "" Then
|
||||
Dim split = AB.ab_collAnhId.ToString.Split(";")
|
||||
For Each s In split
|
||||
Dim ANH As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(s)
|
||||
If ANH IsNot Nothing Then
|
||||
dgvAnmhaenge.Rows.Add({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ANH.anh_docId), ANH.anh_Name})
|
||||
End If
|
||||
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
dgvAnmhaenge.ClearSelection()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dgvAnmhaenge_CellContentDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvAnmhaenge.CellContentDoubleClick, dgvAnmhaenge.CellDoubleClick
|
||||
If dgvAnmhaenge.SelectedRows.Count > 0 Then
|
||||
'Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(ANH.anh_docId)
|
||||
'DS.GET_TOP1_PATH()
|
||||
Try
|
||||
Process.Start(dgvAnmhaenge.SelectedRows(0).Cells(0).Value)
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
End Class
|
||||
955
Aviso/frmAvisoWeiterleitenOLD.Designer.vb
generated
Normal file
955
Aviso/frmAvisoWeiterleitenOLD.Designer.vb
generated
Normal file
@@ -0,0 +1,955 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmAvisoWeiterleitenOLD
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAvisoWeiterleitenOLD))
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.btnVERAG = New System.Windows.Forms.Button()
|
||||
Me.btnIMEX = New System.Windows.Forms.Button()
|
||||
Me.btnUNIPED = New System.Windows.Forms.Button()
|
||||
Me.Button9 = New System.Windows.Forms.Button()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.flpFirma = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Panel3 = New System.Windows.Forms.Panel()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.MyFlowLayoutPanel3 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.MyFlowLayoutPanel4 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.Button11 = New System.Windows.Forms.Button()
|
||||
Me.Button12 = New System.Windows.Forms.Button()
|
||||
Me.Button13 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel2 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button6 = New System.Windows.Forms.Button()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.Button7 = New System.Windows.Forms.Button()
|
||||
Me.Panel2 = New System.Windows.Forms.Panel()
|
||||
Me.flpAbteilung = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Panel4 = New System.Windows.Forms.Panel()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.MyFlowLayoutPanel6 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.MyFlowLayoutPanel7 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button14 = New System.Windows.Forms.Button()
|
||||
Me.Button15 = New System.Windows.Forms.Button()
|
||||
Me.Button16 = New System.Windows.Forms.Button()
|
||||
Me.Button17 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel8 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button18 = New System.Windows.Forms.Button()
|
||||
Me.Button19 = New System.Windows.Forms.Button()
|
||||
Me.Button20 = New System.Windows.Forms.Button()
|
||||
Me.Button21 = New System.Windows.Forms.Button()
|
||||
Me.Panel5 = New System.Windows.Forms.Panel()
|
||||
Me.flpNiederlassung = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Panel6 = New System.Windows.Forms.Panel()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.MyFlowLayoutPanel10 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.MyFlowLayoutPanel11 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button22 = New System.Windows.Forms.Button()
|
||||
Me.Button23 = New System.Windows.Forms.Button()
|
||||
Me.Button24 = New System.Windows.Forms.Button()
|
||||
Me.Button25 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel12 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button26 = New System.Windows.Forms.Button()
|
||||
Me.Button27 = New System.Windows.Forms.Button()
|
||||
Me.Button28 = New System.Windows.Forms.Button()
|
||||
Me.Button29 = New System.Windows.Forms.Button()
|
||||
Me.Panel7 = New System.Windows.Forms.Panel()
|
||||
Me.flpTeams = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Panel8 = New System.Windows.Forms.Panel()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.MyFlowLayoutPanel14 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.MyFlowLayoutPanel15 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button30 = New System.Windows.Forms.Button()
|
||||
Me.Button31 = New System.Windows.Forms.Button()
|
||||
Me.Button32 = New System.Windows.Forms.Button()
|
||||
Me.Button33 = New System.Windows.Forms.Button()
|
||||
Me.MyFlowLayoutPanel16 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
|
||||
Me.Button34 = New System.Windows.Forms.Button()
|
||||
Me.Button35 = New System.Windows.Forms.Button()
|
||||
Me.Button36 = New System.Windows.Forms.Button()
|
||||
Me.Button37 = New System.Windows.Forms.Button()
|
||||
Me.pnl.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel1.SuspendLayout()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel4.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel2.SuspendLayout()
|
||||
Me.Panel2.SuspendLayout()
|
||||
Me.Panel4.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel7.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel8.SuspendLayout()
|
||||
Me.Panel5.SuspendLayout()
|
||||
Me.Panel6.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel11.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel12.SuspendLayout()
|
||||
Me.Panel7.SuspendLayout()
|
||||
Me.Panel8.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel15.SuspendLayout()
|
||||
Me.MyFlowLayoutPanel16.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
|
||||
Me.pnl.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.pnl.Controls.Add(Me.lbl)
|
||||
Me.pnl.Controls.Add(Me.Button3)
|
||||
Me.pnl.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(802, 43)
|
||||
Me.pnl.TabIndex = 0
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Location = New System.Drawing.Point(12, 9)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(207, 13)
|
||||
Me.lbl.TabIndex = 0
|
||||
Me.lbl.Text = "Bitte geben Sie das Weiterleitungs-Ziel an:"
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button3.Location = New System.Drawing.Point(397, 106)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button3.TabIndex = 6
|
||||
Me.Button3.Text = "UNISPED"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel1
|
||||
'
|
||||
Me.MyFlowLayoutPanel1.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnVERAG)
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnUNIPED)
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnIMEX)
|
||||
Me.MyFlowLayoutPanel1.Controls.Add(Me.Button9)
|
||||
Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(0, 43)
|
||||
Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1"
|
||||
Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(802, 57)
|
||||
Me.MyFlowLayoutPanel1.TabIndex = 9
|
||||
'
|
||||
'btnVERAG
|
||||
'
|
||||
Me.btnVERAG.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnVERAG.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnVERAG.Location = New System.Drawing.Point(3, 3)
|
||||
Me.btnVERAG.Name = "btnVERAG"
|
||||
Me.btnVERAG.Size = New System.Drawing.Size(191, 42)
|
||||
Me.btnVERAG.TabIndex = 4
|
||||
Me.btnVERAG.Text = "VERAG"
|
||||
Me.btnVERAG.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnIMEX
|
||||
'
|
||||
Me.btnIMEX.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnIMEX.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnIMEX.Location = New System.Drawing.Point(397, 3)
|
||||
Me.btnIMEX.Name = "btnIMEX"
|
||||
Me.btnIMEX.Size = New System.Drawing.Size(191, 42)
|
||||
Me.btnIMEX.TabIndex = 5
|
||||
Me.btnIMEX.Text = "IMEX"
|
||||
Me.btnIMEX.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnUNIPED
|
||||
'
|
||||
Me.btnUNIPED.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.btnUNIPED.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.btnUNIPED.Location = New System.Drawing.Point(200, 3)
|
||||
Me.btnUNIPED.Name = "btnUNIPED"
|
||||
Me.btnUNIPED.Size = New System.Drawing.Size(191, 42)
|
||||
Me.btnUNIPED.TabIndex = 7
|
||||
Me.btnUNIPED.Text = "UNISPED"
|
||||
Me.btnUNIPED.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button9
|
||||
'
|
||||
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button9.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button9.Location = New System.Drawing.Point(594, 3)
|
||||
Me.Button9.Name = "Button9"
|
||||
Me.Button9.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button9.TabIndex = 8
|
||||
Me.Button9.Text = "FRONTOFFICE"
|
||||
Me.Button9.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel1.Controls.Add(Me.flpFirma)
|
||||
Me.Panel1.Controls.Add(Me.Panel3)
|
||||
Me.Panel1.Controls.Add(Me.MyFlowLayoutPanel2)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 100)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(200, 431)
|
||||
Me.Panel1.TabIndex = 10
|
||||
'
|
||||
'flpFirma
|
||||
'
|
||||
Me.flpFirma.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.flpFirma.Location = New System.Drawing.Point(0, 28)
|
||||
Me.flpFirma.Name = "flpFirma"
|
||||
Me.flpFirma.Size = New System.Drawing.Size(198, 401)
|
||||
Me.flpFirma.TabIndex = 1
|
||||
'
|
||||
'Panel3
|
||||
'
|
||||
Me.Panel3.Controls.Add(Me.Label1)
|
||||
Me.Panel3.Controls.Add(Me.MyFlowLayoutPanel3)
|
||||
Me.Panel3.Controls.Add(Me.MyFlowLayoutPanel4)
|
||||
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel3.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel3.Name = "Panel3"
|
||||
Me.Panel3.Size = New System.Drawing.Size(198, 28)
|
||||
Me.Panel3.TabIndex = 2
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.Label1.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(53, 17)
|
||||
Me.Label1.TabIndex = 2
|
||||
Me.Label1.Text = "Firma:"
|
||||
'
|
||||
'MyFlowLayoutPanel3
|
||||
'
|
||||
Me.MyFlowLayoutPanel3.Location = New System.Drawing.Point(170, 93)
|
||||
Me.MyFlowLayoutPanel3.Name = "MyFlowLayoutPanel3"
|
||||
Me.MyFlowLayoutPanel3.Size = New System.Drawing.Size(593, 431)
|
||||
Me.MyFlowLayoutPanel3.TabIndex = 1
|
||||
'
|
||||
'MyFlowLayoutPanel4
|
||||
'
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button10)
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button11)
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button12)
|
||||
Me.MyFlowLayoutPanel4.Controls.Add(Me.Button13)
|
||||
Me.MyFlowLayoutPanel4.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel4.Name = "MyFlowLayoutPanel4"
|
||||
Me.MyFlowLayoutPanel4.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel4.TabIndex = 1
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button10.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button10.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button10.TabIndex = 3
|
||||
Me.Button10.Text = "TEAM"
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button11
|
||||
'
|
||||
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button11.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button11.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button11.Name = "Button11"
|
||||
Me.Button11.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button11.TabIndex = 1
|
||||
Me.Button11.Text = "NIEDERLASSUNG"
|
||||
Me.Button11.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button12
|
||||
'
|
||||
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button12.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button12.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button12.Name = "Button12"
|
||||
Me.Button12.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button12.TabIndex = 2
|
||||
Me.Button12.Text = "ABTEILUNG"
|
||||
Me.Button12.UseVisualStyleBackColor = True
|
||||
Me.Button12.Visible = False
|
||||
'
|
||||
'Button13
|
||||
'
|
||||
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button13.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button13.Name = "Button13"
|
||||
Me.Button13.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button13.TabIndex = 4
|
||||
Me.Button13.Text = "FIRMA"
|
||||
Me.Button13.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel2
|
||||
'
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button6)
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button4)
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button5)
|
||||
Me.MyFlowLayoutPanel2.Controls.Add(Me.Button7)
|
||||
Me.MyFlowLayoutPanel2.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel2.Name = "MyFlowLayoutPanel2"
|
||||
Me.MyFlowLayoutPanel2.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel2.TabIndex = 1
|
||||
'
|
||||
'Button6
|
||||
'
|
||||
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button6.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button6.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button6.Name = "Button6"
|
||||
Me.Button6.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button6.TabIndex = 3
|
||||
Me.Button6.Text = "TEAM"
|
||||
Me.Button6.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button4.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button4.TabIndex = 1
|
||||
Me.Button4.Text = "NIEDERLASSUNG"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button5
|
||||
'
|
||||
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button5.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button5.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button5.Name = "Button5"
|
||||
Me.Button5.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button5.TabIndex = 2
|
||||
Me.Button5.Text = "ABTEILUNG"
|
||||
Me.Button5.UseVisualStyleBackColor = True
|
||||
Me.Button5.Visible = False
|
||||
'
|
||||
'Button7
|
||||
'
|
||||
Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button7.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button7.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button7.Name = "Button7"
|
||||
Me.Button7.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button7.TabIndex = 4
|
||||
Me.Button7.Text = "FIRMA"
|
||||
Me.Button7.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel2
|
||||
'
|
||||
Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel2.Controls.Add(Me.flpAbteilung)
|
||||
Me.Panel2.Controls.Add(Me.Panel4)
|
||||
Me.Panel2.Controls.Add(Me.MyFlowLayoutPanel8)
|
||||
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel2.Location = New System.Drawing.Point(200, 100)
|
||||
Me.Panel2.Name = "Panel2"
|
||||
Me.Panel2.Size = New System.Drawing.Size(200, 431)
|
||||
Me.Panel2.TabIndex = 11
|
||||
'
|
||||
'flpAbteilung
|
||||
'
|
||||
Me.flpAbteilung.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.flpAbteilung.Location = New System.Drawing.Point(0, 28)
|
||||
Me.flpAbteilung.Name = "flpAbteilung"
|
||||
Me.flpAbteilung.Size = New System.Drawing.Size(198, 401)
|
||||
Me.flpAbteilung.TabIndex = 1
|
||||
'
|
||||
'Panel4
|
||||
'
|
||||
Me.Panel4.Controls.Add(Me.Label2)
|
||||
Me.Panel4.Controls.Add(Me.MyFlowLayoutPanel6)
|
||||
Me.Panel4.Controls.Add(Me.MyFlowLayoutPanel7)
|
||||
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel4.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel4.Name = "Panel4"
|
||||
Me.Panel4.Size = New System.Drawing.Size(198, 28)
|
||||
Me.Panel4.TabIndex = 2
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.Label2.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(81, 17)
|
||||
Me.Label2.TabIndex = 2
|
||||
Me.Label2.Text = "Abteilung:"
|
||||
'
|
||||
'MyFlowLayoutPanel6
|
||||
'
|
||||
Me.MyFlowLayoutPanel6.Location = New System.Drawing.Point(170, 93)
|
||||
Me.MyFlowLayoutPanel6.Name = "MyFlowLayoutPanel6"
|
||||
Me.MyFlowLayoutPanel6.Size = New System.Drawing.Size(593, 431)
|
||||
Me.MyFlowLayoutPanel6.TabIndex = 1
|
||||
'
|
||||
'MyFlowLayoutPanel7
|
||||
'
|
||||
Me.MyFlowLayoutPanel7.Controls.Add(Me.Button14)
|
||||
Me.MyFlowLayoutPanel7.Controls.Add(Me.Button15)
|
||||
Me.MyFlowLayoutPanel7.Controls.Add(Me.Button16)
|
||||
Me.MyFlowLayoutPanel7.Controls.Add(Me.Button17)
|
||||
Me.MyFlowLayoutPanel7.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel7.Name = "MyFlowLayoutPanel7"
|
||||
Me.MyFlowLayoutPanel7.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel7.TabIndex = 1
|
||||
'
|
||||
'Button14
|
||||
'
|
||||
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button14.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button14.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button14.Name = "Button14"
|
||||
Me.Button14.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button14.TabIndex = 3
|
||||
Me.Button14.Text = "TEAM"
|
||||
Me.Button14.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button15
|
||||
'
|
||||
Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button15.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button15.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button15.Name = "Button15"
|
||||
Me.Button15.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button15.TabIndex = 1
|
||||
Me.Button15.Text = "NIEDERLASSUNG"
|
||||
Me.Button15.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button16
|
||||
'
|
||||
Me.Button16.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button16.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button16.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button16.Name = "Button16"
|
||||
Me.Button16.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button16.TabIndex = 2
|
||||
Me.Button16.Text = "ABTEILUNG"
|
||||
Me.Button16.UseVisualStyleBackColor = True
|
||||
Me.Button16.Visible = False
|
||||
'
|
||||
'Button17
|
||||
'
|
||||
Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button17.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button17.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button17.Name = "Button17"
|
||||
Me.Button17.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button17.TabIndex = 4
|
||||
Me.Button17.Text = "FIRMA"
|
||||
Me.Button17.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel8
|
||||
'
|
||||
Me.MyFlowLayoutPanel8.Controls.Add(Me.Button18)
|
||||
Me.MyFlowLayoutPanel8.Controls.Add(Me.Button19)
|
||||
Me.MyFlowLayoutPanel8.Controls.Add(Me.Button20)
|
||||
Me.MyFlowLayoutPanel8.Controls.Add(Me.Button21)
|
||||
Me.MyFlowLayoutPanel8.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel8.Name = "MyFlowLayoutPanel8"
|
||||
Me.MyFlowLayoutPanel8.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel8.TabIndex = 1
|
||||
'
|
||||
'Button18
|
||||
'
|
||||
Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button18.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button18.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button18.Name = "Button18"
|
||||
Me.Button18.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button18.TabIndex = 3
|
||||
Me.Button18.Text = "TEAM"
|
||||
Me.Button18.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button19
|
||||
'
|
||||
Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button19.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button19.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button19.Name = "Button19"
|
||||
Me.Button19.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button19.TabIndex = 1
|
||||
Me.Button19.Text = "NIEDERLASSUNG"
|
||||
Me.Button19.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button20
|
||||
'
|
||||
Me.Button20.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button20.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button20.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button20.Name = "Button20"
|
||||
Me.Button20.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button20.TabIndex = 2
|
||||
Me.Button20.Text = "ABTEILUNG"
|
||||
Me.Button20.UseVisualStyleBackColor = True
|
||||
Me.Button20.Visible = False
|
||||
'
|
||||
'Button21
|
||||
'
|
||||
Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button21.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button21.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button21.Name = "Button21"
|
||||
Me.Button21.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button21.TabIndex = 4
|
||||
Me.Button21.Text = "FIRMA"
|
||||
Me.Button21.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel5
|
||||
'
|
||||
Me.Panel5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel5.Controls.Add(Me.flpNiederlassung)
|
||||
Me.Panel5.Controls.Add(Me.Panel6)
|
||||
Me.Panel5.Controls.Add(Me.MyFlowLayoutPanel12)
|
||||
Me.Panel5.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel5.Location = New System.Drawing.Point(400, 100)
|
||||
Me.Panel5.Name = "Panel5"
|
||||
Me.Panel5.Size = New System.Drawing.Size(200, 431)
|
||||
Me.Panel5.TabIndex = 12
|
||||
'
|
||||
'flpNiederlassung
|
||||
'
|
||||
Me.flpNiederlassung.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.flpNiederlassung.Location = New System.Drawing.Point(0, 28)
|
||||
Me.flpNiederlassung.Name = "flpNiederlassung"
|
||||
Me.flpNiederlassung.Size = New System.Drawing.Size(198, 401)
|
||||
Me.flpNiederlassung.TabIndex = 1
|
||||
'
|
||||
'Panel6
|
||||
'
|
||||
Me.Panel6.Controls.Add(Me.Label3)
|
||||
Me.Panel6.Controls.Add(Me.MyFlowLayoutPanel10)
|
||||
Me.Panel6.Controls.Add(Me.MyFlowLayoutPanel11)
|
||||
Me.Panel6.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel6.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel6.Name = "Panel6"
|
||||
Me.Panel6.Size = New System.Drawing.Size(198, 28)
|
||||
Me.Panel6.TabIndex = 2
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.Label3.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(112, 17)
|
||||
Me.Label3.TabIndex = 2
|
||||
Me.Label3.Text = "Niederlassung"
|
||||
'
|
||||
'MyFlowLayoutPanel10
|
||||
'
|
||||
Me.MyFlowLayoutPanel10.Location = New System.Drawing.Point(170, 93)
|
||||
Me.MyFlowLayoutPanel10.Name = "MyFlowLayoutPanel10"
|
||||
Me.MyFlowLayoutPanel10.Size = New System.Drawing.Size(593, 431)
|
||||
Me.MyFlowLayoutPanel10.TabIndex = 1
|
||||
'
|
||||
'MyFlowLayoutPanel11
|
||||
'
|
||||
Me.MyFlowLayoutPanel11.Controls.Add(Me.Button22)
|
||||
Me.MyFlowLayoutPanel11.Controls.Add(Me.Button23)
|
||||
Me.MyFlowLayoutPanel11.Controls.Add(Me.Button24)
|
||||
Me.MyFlowLayoutPanel11.Controls.Add(Me.Button25)
|
||||
Me.MyFlowLayoutPanel11.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel11.Name = "MyFlowLayoutPanel11"
|
||||
Me.MyFlowLayoutPanel11.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel11.TabIndex = 1
|
||||
'
|
||||
'Button22
|
||||
'
|
||||
Me.Button22.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button22.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button22.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button22.Name = "Button22"
|
||||
Me.Button22.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button22.TabIndex = 3
|
||||
Me.Button22.Text = "TEAM"
|
||||
Me.Button22.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button23
|
||||
'
|
||||
Me.Button23.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button23.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button23.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button23.Name = "Button23"
|
||||
Me.Button23.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button23.TabIndex = 1
|
||||
Me.Button23.Text = "NIEDERLASSUNG"
|
||||
Me.Button23.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button24
|
||||
'
|
||||
Me.Button24.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button24.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button24.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button24.Name = "Button24"
|
||||
Me.Button24.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button24.TabIndex = 2
|
||||
Me.Button24.Text = "ABTEILUNG"
|
||||
Me.Button24.UseVisualStyleBackColor = True
|
||||
Me.Button24.Visible = False
|
||||
'
|
||||
'Button25
|
||||
'
|
||||
Me.Button25.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button25.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button25.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button25.Name = "Button25"
|
||||
Me.Button25.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button25.TabIndex = 4
|
||||
Me.Button25.Text = "FIRMA"
|
||||
Me.Button25.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel12
|
||||
'
|
||||
Me.MyFlowLayoutPanel12.Controls.Add(Me.Button26)
|
||||
Me.MyFlowLayoutPanel12.Controls.Add(Me.Button27)
|
||||
Me.MyFlowLayoutPanel12.Controls.Add(Me.Button28)
|
||||
Me.MyFlowLayoutPanel12.Controls.Add(Me.Button29)
|
||||
Me.MyFlowLayoutPanel12.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel12.Name = "MyFlowLayoutPanel12"
|
||||
Me.MyFlowLayoutPanel12.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel12.TabIndex = 1
|
||||
'
|
||||
'Button26
|
||||
'
|
||||
Me.Button26.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button26.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button26.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button26.Name = "Button26"
|
||||
Me.Button26.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button26.TabIndex = 3
|
||||
Me.Button26.Text = "TEAM"
|
||||
Me.Button26.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button27
|
||||
'
|
||||
Me.Button27.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button27.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button27.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button27.Name = "Button27"
|
||||
Me.Button27.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button27.TabIndex = 1
|
||||
Me.Button27.Text = "NIEDERLASSUNG"
|
||||
Me.Button27.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button28
|
||||
'
|
||||
Me.Button28.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button28.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button28.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button28.Name = "Button28"
|
||||
Me.Button28.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button28.TabIndex = 2
|
||||
Me.Button28.Text = "ABTEILUNG"
|
||||
Me.Button28.UseVisualStyleBackColor = True
|
||||
Me.Button28.Visible = False
|
||||
'
|
||||
'Button29
|
||||
'
|
||||
Me.Button29.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button29.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button29.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button29.Name = "Button29"
|
||||
Me.Button29.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button29.TabIndex = 4
|
||||
Me.Button29.Text = "FIRMA"
|
||||
Me.Button29.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel7
|
||||
'
|
||||
Me.Panel7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel7.Controls.Add(Me.flpTeams)
|
||||
Me.Panel7.Controls.Add(Me.Panel8)
|
||||
Me.Panel7.Controls.Add(Me.MyFlowLayoutPanel16)
|
||||
Me.Panel7.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.Panel7.Location = New System.Drawing.Point(600, 100)
|
||||
Me.Panel7.Name = "Panel7"
|
||||
Me.Panel7.Size = New System.Drawing.Size(200, 431)
|
||||
Me.Panel7.TabIndex = 13
|
||||
'
|
||||
'flpTeams
|
||||
'
|
||||
Me.flpTeams.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.flpTeams.Location = New System.Drawing.Point(0, 28)
|
||||
Me.flpTeams.Name = "flpTeams"
|
||||
Me.flpTeams.Size = New System.Drawing.Size(198, 401)
|
||||
Me.flpTeams.TabIndex = 1
|
||||
'
|
||||
'Panel8
|
||||
'
|
||||
Me.Panel8.Controls.Add(Me.Label4)
|
||||
Me.Panel8.Controls.Add(Me.MyFlowLayoutPanel14)
|
||||
Me.Panel8.Controls.Add(Me.MyFlowLayoutPanel15)
|
||||
Me.Panel8.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel8.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel8.Name = "Panel8"
|
||||
Me.Panel8.Size = New System.Drawing.Size(198, 28)
|
||||
Me.Panel8.TabIndex = 2
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.Label4.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(53, 17)
|
||||
Me.Label4.TabIndex = 2
|
||||
Me.Label4.Text = "Team:"
|
||||
'
|
||||
'MyFlowLayoutPanel14
|
||||
'
|
||||
Me.MyFlowLayoutPanel14.Location = New System.Drawing.Point(170, 93)
|
||||
Me.MyFlowLayoutPanel14.Name = "MyFlowLayoutPanel14"
|
||||
Me.MyFlowLayoutPanel14.Size = New System.Drawing.Size(593, 431)
|
||||
Me.MyFlowLayoutPanel14.TabIndex = 1
|
||||
'
|
||||
'MyFlowLayoutPanel15
|
||||
'
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button30)
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button31)
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button32)
|
||||
Me.MyFlowLayoutPanel15.Controls.Add(Me.Button33)
|
||||
Me.MyFlowLayoutPanel15.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel15.Name = "MyFlowLayoutPanel15"
|
||||
Me.MyFlowLayoutPanel15.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel15.TabIndex = 1
|
||||
'
|
||||
'Button30
|
||||
'
|
||||
Me.Button30.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button30.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button30.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button30.Name = "Button30"
|
||||
Me.Button30.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button30.TabIndex = 3
|
||||
Me.Button30.Text = "TEAM"
|
||||
Me.Button30.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button31
|
||||
'
|
||||
Me.Button31.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button31.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button31.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button31.Name = "Button31"
|
||||
Me.Button31.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button31.TabIndex = 1
|
||||
Me.Button31.Text = "NIEDERLASSUNG"
|
||||
Me.Button31.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button32
|
||||
'
|
||||
Me.Button32.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button32.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button32.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button32.Name = "Button32"
|
||||
Me.Button32.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button32.TabIndex = 2
|
||||
Me.Button32.Text = "ABTEILUNG"
|
||||
Me.Button32.UseVisualStyleBackColor = True
|
||||
Me.Button32.Visible = False
|
||||
'
|
||||
'Button33
|
||||
'
|
||||
Me.Button33.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button33.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button33.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button33.Name = "Button33"
|
||||
Me.Button33.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button33.TabIndex = 4
|
||||
Me.Button33.Text = "FIRMA"
|
||||
Me.Button33.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyFlowLayoutPanel16
|
||||
'
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button34)
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button35)
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button36)
|
||||
Me.MyFlowLayoutPanel16.Controls.Add(Me.Button37)
|
||||
Me.MyFlowLayoutPanel16.Location = New System.Drawing.Point(57, 265)
|
||||
Me.MyFlowLayoutPanel16.Name = "MyFlowLayoutPanel16"
|
||||
Me.MyFlowLayoutPanel16.Size = New System.Drawing.Size(200, 431)
|
||||
Me.MyFlowLayoutPanel16.TabIndex = 1
|
||||
'
|
||||
'Button34
|
||||
'
|
||||
Me.Button34.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button34.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button34.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Button34.Name = "Button34"
|
||||
Me.Button34.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button34.TabIndex = 3
|
||||
Me.Button34.Text = "TEAM"
|
||||
Me.Button34.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button35
|
||||
'
|
||||
Me.Button35.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button35.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button35.Location = New System.Drawing.Point(3, 51)
|
||||
Me.Button35.Name = "Button35"
|
||||
Me.Button35.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button35.TabIndex = 1
|
||||
Me.Button35.Text = "NIEDERLASSUNG"
|
||||
Me.Button35.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button36
|
||||
'
|
||||
Me.Button36.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button36.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button36.Location = New System.Drawing.Point(3, 99)
|
||||
Me.Button36.Name = "Button36"
|
||||
Me.Button36.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button36.TabIndex = 2
|
||||
Me.Button36.Text = "ABTEILUNG"
|
||||
Me.Button36.UseVisualStyleBackColor = True
|
||||
Me.Button36.Visible = False
|
||||
'
|
||||
'Button37
|
||||
'
|
||||
Me.Button37.FlatStyle = System.Windows.Forms.FlatStyle.Popup
|
||||
Me.Button37.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button37.Location = New System.Drawing.Point(3, 147)
|
||||
Me.Button37.Name = "Button37"
|
||||
Me.Button37.Size = New System.Drawing.Size(191, 42)
|
||||
Me.Button37.TabIndex = 4
|
||||
Me.Button37.Text = "FIRMA"
|
||||
Me.Button37.UseVisualStyleBackColor = True
|
||||
'
|
||||
'frmAvisoWeiterleiten
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(802, 531)
|
||||
Me.Controls.Add(Me.Panel7)
|
||||
Me.Controls.Add(Me.Panel5)
|
||||
Me.Controls.Add(Me.Panel2)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.Controls.Add(Me.MyFlowLayoutPanel1)
|
||||
Me.Controls.Add(Me.pnl)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmAvisoWeiterleiten"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Weiterleiten"
|
||||
Me.pnl.ResumeLayout(False)
|
||||
Me.pnl.PerformLayout()
|
||||
Me.MyFlowLayoutPanel1.ResumeLayout(False)
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel3.ResumeLayout(False)
|
||||
Me.Panel3.PerformLayout()
|
||||
Me.MyFlowLayoutPanel4.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel2.ResumeLayout(False)
|
||||
Me.Panel2.ResumeLayout(False)
|
||||
Me.Panel4.ResumeLayout(False)
|
||||
Me.Panel4.PerformLayout()
|
||||
Me.MyFlowLayoutPanel7.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel8.ResumeLayout(False)
|
||||
Me.Panel5.ResumeLayout(False)
|
||||
Me.Panel6.ResumeLayout(False)
|
||||
Me.Panel6.PerformLayout()
|
||||
Me.MyFlowLayoutPanel11.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel12.ResumeLayout(False)
|
||||
Me.Panel7.ResumeLayout(False)
|
||||
Me.Panel8.ResumeLayout(False)
|
||||
Me.Panel8.PerformLayout()
|
||||
Me.MyFlowLayoutPanel15.ResumeLayout(False)
|
||||
Me.MyFlowLayoutPanel16.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents pnl As Panel
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents Button3 As Button
|
||||
Friend WithEvents btnVERAG As Button
|
||||
Friend WithEvents btnIMEX As Button
|
||||
Friend WithEvents btnUNIPED As Button
|
||||
Friend WithEvents MyFlowLayoutPanel1 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button9 As Button
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents flpFirma As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Panel3 As Panel
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents MyFlowLayoutPanel3 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents MyFlowLayoutPanel4 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button10 As Button
|
||||
Friend WithEvents Button11 As Button
|
||||
Friend WithEvents Button12 As Button
|
||||
Friend WithEvents Button13 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel2 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button6 As Button
|
||||
Friend WithEvents Button4 As Button
|
||||
Friend WithEvents Button5 As Button
|
||||
Friend WithEvents Button7 As Button
|
||||
Friend WithEvents Panel2 As Panel
|
||||
Friend WithEvents flpAbteilung As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Panel4 As Panel
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents MyFlowLayoutPanel6 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents MyFlowLayoutPanel7 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button14 As Button
|
||||
Friend WithEvents Button15 As Button
|
||||
Friend WithEvents Button16 As Button
|
||||
Friend WithEvents Button17 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel8 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button18 As Button
|
||||
Friend WithEvents Button19 As Button
|
||||
Friend WithEvents Button20 As Button
|
||||
Friend WithEvents Button21 As Button
|
||||
Friend WithEvents Panel5 As Panel
|
||||
Friend WithEvents flpNiederlassung As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Panel6 As Panel
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents MyFlowLayoutPanel10 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents MyFlowLayoutPanel11 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button22 As Button
|
||||
Friend WithEvents Button23 As Button
|
||||
Friend WithEvents Button24 As Button
|
||||
Friend WithEvents Button25 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel12 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button26 As Button
|
||||
Friend WithEvents Button27 As Button
|
||||
Friend WithEvents Button28 As Button
|
||||
Friend WithEvents Button29 As Button
|
||||
Friend WithEvents Panel7 As Panel
|
||||
Friend WithEvents flpTeams As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Panel8 As Panel
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents MyFlowLayoutPanel14 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents MyFlowLayoutPanel15 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button30 As Button
|
||||
Friend WithEvents Button31 As Button
|
||||
Friend WithEvents Button32 As Button
|
||||
Friend WithEvents Button33 As Button
|
||||
Friend WithEvents MyFlowLayoutPanel16 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
|
||||
Friend WithEvents Button34 As Button
|
||||
Friend WithEvents Button35 As Button
|
||||
Friend WithEvents Button36 As Button
|
||||
Friend WithEvents Button37 As Button
|
||||
End Class
|
||||
1253
Aviso/frmAvisoWeiterleitenOLD.resx
Normal file
1253
Aviso/frmAvisoWeiterleitenOLD.resx
Normal file
File diff suppressed because it is too large
Load Diff
210
Aviso/frmAvisoWeiterleitenOLD.vb
Normal file
210
Aviso/frmAvisoWeiterleitenOLD.vb
Normal file
@@ -0,0 +1,210 @@
|
||||
|
||||
|
||||
Public Class frmAvisoWeiterleitenOLD
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
Dim Art = "" ' A..viso oder S..endung
|
||||
Dim AvisoId As Integer
|
||||
Dim SendungsId As Integer
|
||||
|
||||
Dim ASF = New AVISO.AvisoStatusFunctions
|
||||
|
||||
Sub New(Art As String, AvisoId As Integer, Optional SendungsId As Integer = -1)
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
Me.Art = Art
|
||||
Me.AvisoId = AvisoId
|
||||
Me.SendungsId = SendungsId
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmAvisoWeiterleiten_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
'tbcntr.Appearance = TabAppearance.FlatButtons
|
||||
'tbcntr.ItemSize = New Size(0, 1)
|
||||
'tbcntr.SizeMode = TabSizeMode.Fixed
|
||||
'tbcntr.pa
|
||||
Button6.PerformClick()
|
||||
End Sub
|
||||
|
||||
Private Sub Panel2_Paint(sender As Object, e As PaintEventArgs)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub MyFlowLayoutPanel1_Paint(sender As Object, e As PaintEventArgs)
|
||||
|
||||
End Sub
|
||||
|
||||
'Private Sub Button6_Click(sender As Object, e As EventArgs)
|
||||
' Dim flp As FlowLayoutPanel = flpFi
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flp.Controls.Clear()
|
||||
|
||||
' If dt Is Nothing Then Exit Sub
|
||||
|
||||
' For Each t In dt.Rows
|
||||
' Dim btn As New Button
|
||||
' btn.FlatStyle = FlatStyle.Flat
|
||||
' btn.Size = New Size(250, 50)
|
||||
' btn.Font = New Font(Me.Font.FontFamily, 10, FontStyle.Regular)
|
||||
' btn.Text = t("team_bezeichnung")
|
||||
' btn.Tag = t("team_id")
|
||||
|
||||
' AddHandler btn.Click, Sub()
|
||||
' btnWeiterleitung_Clicked("T", (btn.Tag), btn.Text)
|
||||
' initButtons(flp, sender)
|
||||
' End Sub
|
||||
|
||||
' flpFirma.Controls.Add(btn)
|
||||
|
||||
' Next
|
||||
|
||||
'End Sub
|
||||
|
||||
Sub initButtons(flp As FlowLayoutPanel, b As Button)
|
||||
For Each c In flp.Controls
|
||||
DirectCast(c, Button).BackColor = Color.WhiteSmoke
|
||||
DirectCast(c, Button).ForeColor = Color.Black
|
||||
Next
|
||||
b.BackColor = Color.FromArgb(0, 54, 128)
|
||||
b.ForeColor = Color.White
|
||||
|
||||
End Sub
|
||||
|
||||
Sub initButtonsTop(b As Button)
|
||||
For Each c In MyFlowLayoutPanel1.Controls
|
||||
DirectCast(c, Button).BackColor = Color.WhiteSmoke
|
||||
DirectCast(c, Button).ForeColor = Color.Black
|
||||
Next
|
||||
b.BackColor = Color.FromArgb(0, 54, 128)
|
||||
b.ForeColor = Color.White
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Sub btnWeiterleitung_Clicked(WLart As String, id As String, bezeichnung As String)
|
||||
Dim text = ""
|
||||
Dim code = 3
|
||||
Select Case WLart
|
||||
Case "T"
|
||||
text = "Ins Team '" & bezeichnung & "' gegeben."
|
||||
Case "A"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
Case "N"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
Case "F"
|
||||
text = "An '" & bezeichnung & "' gegeben."
|
||||
End Select
|
||||
|
||||
|
||||
'If insertVermerke() Then
|
||||
VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen.INSERT_BENACHRICHTIGUNG(AvisoId, SendungsId, 3, WLart, id, "WL von '" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "'", 0)
|
||||
If Art = "S" Then
|
||||
ASF.insertSendungsVermerk(SendungsId, AvisoId, text, 46)
|
||||
ASF.SendungUebernehmen_Zuruecksetzen(SendungsId, AvisoId) ' , Optional MaId As Integer = -1, Optional GesendetAn As Boolean = False)
|
||||
Else
|
||||
ASF.insertVermerkAllg(AvisoId, text, 46)
|
||||
ASF.AktUebernehmen_Zuruecksetzen(AvisoId)
|
||||
End If
|
||||
|
||||
' Me.Close()
|
||||
' End If
|
||||
|
||||
Me.Close()
|
||||
Me.DialogResult = DialogResult.OK
|
||||
End Sub
|
||||
|
||||
'Private Sub Button5_Click(sender As Object, e As EventArgs)
|
||||
' ' tbcntr.SelectedTab = tbAbteilung
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flpFirma.Controls.Clear()
|
||||
' addBtn("A", "FISKAL", "VERAG Fiskal")
|
||||
|
||||
' initButtons(sender)
|
||||
'End Sub
|
||||
|
||||
Sub addBtn(flpFirma As FlowLayoutPanel, WLart As String, id As String, bezeichnung As String, Optional enabled As Boolean = True)
|
||||
Dim btn As New Button
|
||||
btn.FlatStyle = FlatStyle.Flat
|
||||
btn.Size = New Size(180, 40)
|
||||
btn.Font = New Font(Me.Font.FontFamily, 10, FontStyle.Regular)
|
||||
btn.Text = bezeichnung
|
||||
btn.Tag = id
|
||||
btn.Enabled = enabled
|
||||
|
||||
AddHandler btn.Click, Sub()
|
||||
btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung)
|
||||
initButtons(flpFirma, btn)
|
||||
End Sub
|
||||
|
||||
flpFirma.Controls.Add(btn)
|
||||
End Sub
|
||||
|
||||
'Private Sub Button4_Click(sender As Object, e As EventArgs)
|
||||
' ' tbcntr.SelectedTab = tbAbteilung
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flpFirma.Controls.Clear()
|
||||
' addBtn("N", "SBG", "VERAG Salzburg")
|
||||
' addBtn("N", "WAI", "VERAG Waidhaus")
|
||||
' addBtn("N", "NKD", "VERAG Nickelsdorf")
|
||||
|
||||
' initButtons(sender)
|
||||
'End Sub
|
||||
|
||||
'Private Sub Button7_Click(sender As Object, e As EventArgs)
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' order by team_id", "ADMIN")
|
||||
|
||||
' flpFirma.Controls.Clear()
|
||||
' addBtn("F", "FRONTOFFICE", "FRONTOFFICE")
|
||||
' addBtn("F", "UNISPED", "UNISPED")
|
||||
|
||||
' initButtons(sender)
|
||||
'End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnVERAG.Click, btnIMEX.Click, btnUNIPED.Click, Button9.Click
|
||||
flpAbteilung.Controls.Clear()
|
||||
flpTeams.Controls.Clear()
|
||||
flpNiederlassung.Controls.Clear()
|
||||
flpFirma.Controls.Clear()
|
||||
|
||||
If sender Is btnVERAG Then
|
||||
addBtn(flpFirma, "F", "VERAG", "VERAG", False)
|
||||
|
||||
addBtn(flpNiederlassung, "N", "SBG", "VERAG Salzburg")
|
||||
addBtn(flpNiederlassung, "N", "WAI", "VERAG Waidhaus")
|
||||
addBtn(flpNiederlassung, "N", "NKD", "VERAG Nickelsdorf")
|
||||
|
||||
addBtn(flpAbteilung, "A", "FISK", "VERAG Fiskal")
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='VERAG' order by team_id", "ADMIN")
|
||||
If dt IsNot Nothing Then
|
||||
For Each t In dt.Rows
|
||||
addBtn(flpTeams, "T", t("team_id"), t("team_bezeichnung"))
|
||||
Next
|
||||
End If
|
||||
ElseIf sender Is btnIMEX Then
|
||||
addBtn(flpFirma, "F", "IMEX", "IMEX", False)
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='IMEX' order by team_id", "ADMIN")
|
||||
If dt IsNot Nothing Then
|
||||
For Each t In dt.Rows
|
||||
addBtn(flpTeams, "T", t("team_id"), t("team_bezeichnung"))
|
||||
Next
|
||||
End If
|
||||
ElseIf sender Is btnUNIPED Then
|
||||
addBtn(flpFirma, "F", "UNISPED", "UNISPED", True)
|
||||
|
||||
ElseIf sender Is Button9 Then
|
||||
addBtn(flpFirma, "F", "FRONTOFFICE", "FRONT-OFFICE", True)
|
||||
|
||||
End If
|
||||
|
||||
initButtonsTop(sender)
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
352
Aviso/frmEintragAviso.designer.vb
generated
352
Aviso/frmEintragAviso.designer.vb
generated
@@ -75,6 +75,10 @@ Partial Class frmEintragAviso
|
||||
Me.cboGrenzstelle = New System.Windows.Forms.ComboBox()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.grpAviso = New System.Windows.Forms.GroupBox()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.lblErrVorraussuchtlEintreffen = New System.Windows.Forms.Label()
|
||||
Me.txtAvisiererAuftragsNr = New System.Windows.Forms.TextBox()
|
||||
Me.Label23 = New System.Windows.Forms.Label()
|
||||
Me.kdAuftraggeber = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
|
||||
Me.kdAvisierer = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
|
||||
Me.kdFrächter = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
|
||||
@@ -101,7 +105,6 @@ Partial Class frmEintragAviso
|
||||
Me.lblErr_LKW = New System.Windows.Forms.Label()
|
||||
Me.lblErr_Grenzstelle = New System.Windows.Forms.Label()
|
||||
Me.lblErrFmZollKdNr = New System.Windows.Forms.Label()
|
||||
Me.grp = New System.Windows.Forms.GroupBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.btnAbsSrch = New System.Windows.Forms.Button()
|
||||
Me.lblAtrAvis = New System.Windows.Forms.Label()
|
||||
@@ -109,6 +112,9 @@ Partial Class frmEintragAviso
|
||||
Me.Label17 = New System.Windows.Forms.Label()
|
||||
Me.cbxAuftraggeberfurAlleSendungen = New System.Windows.Forms.CheckBox()
|
||||
Me.Label22 = New System.Windows.Forms.Label()
|
||||
Me.Label24 = New System.Windows.Forms.Label()
|
||||
Me.datVoraussichtlichesEintreffen = New System.Windows.Forms.DateTimePicker()
|
||||
Me.grp = New System.Windows.Forms.GroupBox()
|
||||
Me.txtDyRef = New System.Windows.Forms.TextBox()
|
||||
Me.picDy = New System.Windows.Forms.PictureBox()
|
||||
Me.lblDy = New System.Windows.Forms.Label()
|
||||
@@ -135,6 +141,7 @@ Partial Class frmEintragAviso
|
||||
Me.UsrCntlEintragAvisoAtilla = New AVISO.usrCntlEintragAvisoAtilla()
|
||||
Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.clmnPfad = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.panAdmin.SuspendLayout()
|
||||
Me.grpAviso.SuspendLayout()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@@ -150,10 +157,10 @@ Partial Class frmEintragAviso
|
||||
Me.btnOK.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnOK.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnOK.Location = New System.Drawing.Point(12, 558)
|
||||
Me.btnOK.Location = New System.Drawing.Point(12, 601)
|
||||
Me.btnOK.Name = "btnOK"
|
||||
Me.btnOK.Size = New System.Drawing.Size(306, 45)
|
||||
Me.btnOK.TabIndex = 13
|
||||
Me.btnOK.TabIndex = 18
|
||||
Me.btnOK.Text = "OK"
|
||||
Me.btnOK.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -171,10 +178,10 @@ Partial Class frmEintragAviso
|
||||
Me.btnAbbruch.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnAbbruch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnAbbruch.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnAbbruch.Location = New System.Drawing.Point(324, 558)
|
||||
Me.btnAbbruch.Location = New System.Drawing.Point(324, 601)
|
||||
Me.btnAbbruch.Name = "btnAbbruch"
|
||||
Me.btnAbbruch.Size = New System.Drawing.Size(91, 45)
|
||||
Me.btnAbbruch.TabIndex = 14
|
||||
Me.btnAbbruch.TabIndex = 19
|
||||
Me.btnAbbruch.Text = "Abbruch"
|
||||
Me.btnAbbruch.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -182,28 +189,28 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.txtInfo.AcceptsReturn = True
|
||||
Me.txtInfo.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.txtInfo.Location = New System.Drawing.Point(9, 357)
|
||||
Me.txtInfo.Location = New System.Drawing.Point(9, 415)
|
||||
Me.txtInfo.MaxLength = 240
|
||||
Me.txtInfo.Multiline = True
|
||||
Me.txtInfo.Name = "txtInfo"
|
||||
Me.txtInfo.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
|
||||
Me.txtInfo.Size = New System.Drawing.Size(388, 96)
|
||||
Me.txtInfo.TabIndex = 41
|
||||
Me.txtInfo.Size = New System.Drawing.Size(388, 75)
|
||||
Me.txtInfo.TabIndex = 48
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(6, 341)
|
||||
Me.Label3.Location = New System.Drawing.Point(6, 399)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(25, 13)
|
||||
Me.Label3.TabIndex = 40
|
||||
Me.Label3.TabIndex = 47
|
||||
Me.Label3.Text = "Info"
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(6, 169)
|
||||
Me.Label4.Location = New System.Drawing.Point(6, 195)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(46, 13)
|
||||
Me.Label4.TabIndex = 24
|
||||
@@ -212,19 +219,19 @@ Partial Class frmEintragAviso
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(6, 208)
|
||||
Me.Label5.Location = New System.Drawing.Point(6, 234)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(47, 13)
|
||||
Me.Label5.TabIndex = 29
|
||||
Me.Label5.TabIndex = 30
|
||||
Me.Label5.Text = "Avisierer"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(6, 99)
|
||||
Me.Label6.Location = New System.Drawing.Point(6, 125)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(48, 13)
|
||||
Me.Label6.TabIndex = 8
|
||||
Me.Label6.TabIndex = 12
|
||||
Me.Label6.Text = "LKW-Nr:"
|
||||
'
|
||||
'txtÄnderungen
|
||||
@@ -240,8 +247,8 @@ Partial Class frmEintragAviso
|
||||
Me.txtÄnderungen.Name = "txtÄnderungen"
|
||||
Me.txtÄnderungen.ReadOnly = True
|
||||
Me.txtÄnderungen.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
|
||||
Me.txtÄnderungen.Size = New System.Drawing.Size(360, 357)
|
||||
Me.txtÄnderungen.TabIndex = 15
|
||||
Me.txtÄnderungen.Size = New System.Drawing.Size(360, 400)
|
||||
Me.txtÄnderungen.TabIndex = 13
|
||||
Me.txtÄnderungen.TabStop = False
|
||||
'
|
||||
'Label9
|
||||
@@ -250,7 +257,7 @@ Partial Class frmEintragAviso
|
||||
Me.Label9.Location = New System.Drawing.Point(426, 232)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(65, 13)
|
||||
Me.Label9.TabIndex = 9
|
||||
Me.Label9.TabIndex = 10
|
||||
Me.Label9.Text = "Änderungen"
|
||||
'
|
||||
'dtpDatum
|
||||
@@ -265,11 +272,11 @@ Partial Class frmEintragAviso
|
||||
'txtLKW_Nr
|
||||
'
|
||||
Me.txtLKW_Nr.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtLKW_Nr.Location = New System.Drawing.Point(9, 115)
|
||||
Me.txtLKW_Nr.Location = New System.Drawing.Point(9, 141)
|
||||
Me.txtLKW_Nr.MaxLength = 30
|
||||
Me.txtLKW_Nr.Name = "txtLKW_Nr"
|
||||
Me.txtLKW_Nr.Size = New System.Drawing.Size(170, 26)
|
||||
Me.txtLKW_Nr.TabIndex = 13
|
||||
Me.txtLKW_Nr.TabIndex = 17
|
||||
'
|
||||
'lblStatus
|
||||
'
|
||||
@@ -319,10 +326,10 @@ Partial Class frmEintragAviso
|
||||
Me.panAdmin.Controls.Add(Me.Label8)
|
||||
Me.panAdmin.Controls.Add(Me.lblFreigabe)
|
||||
Me.panAdmin.Controls.Add(Me.lblAnkunft)
|
||||
Me.panAdmin.Location = New System.Drawing.Point(543, 418)
|
||||
Me.panAdmin.Location = New System.Drawing.Point(543, 461)
|
||||
Me.panAdmin.Name = "panAdmin"
|
||||
Me.panAdmin.Size = New System.Drawing.Size(253, 187)
|
||||
Me.panAdmin.TabIndex = 16
|
||||
Me.panAdmin.TabIndex = 20
|
||||
Me.panAdmin.Visible = False
|
||||
'
|
||||
'optVorgeschrieben
|
||||
@@ -566,10 +573,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.Label11.AutoSize = True
|
||||
Me.Label11.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label11.Location = New System.Drawing.Point(229, 99)
|
||||
Me.Label11.Location = New System.Drawing.Point(229, 125)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(59, 13)
|
||||
Me.Label11.TabIndex = 10
|
||||
Me.Label11.TabIndex = 15
|
||||
Me.Label11.Text = "Grenzstelle"
|
||||
'
|
||||
'dtpAvisoEingangDatum
|
||||
@@ -578,7 +585,7 @@ Partial Class frmEintragAviso
|
||||
Me.dtpAvisoEingangDatum.Location = New System.Drawing.Point(112, 26)
|
||||
Me.dtpAvisoEingangDatum.Name = "dtpAvisoEingangDatum"
|
||||
Me.dtpAvisoEingangDatum.Size = New System.Drawing.Size(93, 20)
|
||||
Me.dtpAvisoEingangDatum.TabIndex = 2
|
||||
Me.dtpAvisoEingangDatum.TabIndex = 3
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
@@ -586,7 +593,7 @@ Partial Class frmEintragAviso
|
||||
Me.Label10.Location = New System.Drawing.Point(209, 12)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(40, 13)
|
||||
Me.Label10.TabIndex = 0
|
||||
Me.Label10.TabIndex = 1
|
||||
Me.Label10.Text = "Uhrzeit"
|
||||
'
|
||||
'dtpAvisoEingangZeit
|
||||
@@ -598,16 +605,16 @@ Partial Class frmEintragAviso
|
||||
Me.dtpAvisoEingangZeit.Name = "dtpAvisoEingangZeit"
|
||||
Me.dtpAvisoEingangZeit.ShowUpDown = True
|
||||
Me.dtpAvisoEingangZeit.Size = New System.Drawing.Size(54, 20)
|
||||
Me.dtpAvisoEingangZeit.TabIndex = 3
|
||||
Me.dtpAvisoEingangZeit.TabIndex = 4
|
||||
Me.dtpAvisoEingangZeit.Value = New Date(2013, 1, 1, 0, 0, 0, 0)
|
||||
'
|
||||
'optOhneAviso
|
||||
'
|
||||
Me.optOhneAviso.AutoSize = True
|
||||
Me.optOhneAviso.Location = New System.Drawing.Point(9, 50)
|
||||
Me.optOhneAviso.Location = New System.Drawing.Point(9, 75)
|
||||
Me.optOhneAviso.Name = "optOhneAviso"
|
||||
Me.optOhneAviso.Size = New System.Drawing.Size(210, 30)
|
||||
Me.optOhneAviso.TabIndex = 5
|
||||
Me.optOhneAviso.TabIndex = 8
|
||||
Me.optOhneAviso.TabStop = True
|
||||
Me.optOhneAviso.Text = "Ankunft OHNE Aviso " & Global.Microsoft.VisualBasic.ChrW(10) & "--> LKW wird direkt auf Ankunft gesetzt"
|
||||
Me.optOhneAviso.UseVisualStyleBackColor = True
|
||||
@@ -618,7 +625,7 @@ Partial Class frmEintragAviso
|
||||
Me.optAvisoEingang.Location = New System.Drawing.Point(9, 27)
|
||||
Me.optAvisoEingang.Name = "optAvisoEingang"
|
||||
Me.optAvisoEingang.Size = New System.Drawing.Size(103, 17)
|
||||
Me.optAvisoEingang.TabIndex = 1
|
||||
Me.optAvisoEingang.TabIndex = 2
|
||||
Me.optAvisoEingang.TabStop = True
|
||||
Me.optAvisoEingang.Text = "Aviso eingelangt"
|
||||
Me.optAvisoEingang.UseVisualStyleBackColor = True
|
||||
@@ -660,10 +667,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.Label12.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label12.BackColor = System.Drawing.Color.Transparent
|
||||
Me.Label12.Location = New System.Drawing.Point(6, 454)
|
||||
Me.Label12.Location = New System.Drawing.Point(6, 491)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(372, 32)
|
||||
Me.Label12.TabIndex = 44
|
||||
Me.Label12.TabIndex = 51
|
||||
Me.Label12.Text = "Achtung: im Feld Info nur allgemeine Infos erfassen. " & Global.Microsoft.VisualBasic.ChrW(10) & "Ab Status ANKUNFT kann dies" &
|
||||
"es Infofeld nicht mehr geändert werden!"
|
||||
'
|
||||
@@ -671,11 +678,11 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.cbxHandling.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
|
||||
Me.cbxHandling.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.cbxHandling.Location = New System.Drawing.Point(272, 300)
|
||||
Me.cbxHandling.Location = New System.Drawing.Point(272, 326)
|
||||
Me.cbxHandling.Name = "cbxHandling"
|
||||
Me.cbxHandling.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0)
|
||||
Me.cbxHandling.Size = New System.Drawing.Size(123, 24)
|
||||
Me.cbxHandling.TabIndex = 39
|
||||
Me.cbxHandling.TabIndex = 44
|
||||
Me.cbxHandling.Text = "Handling"
|
||||
Me.cbxHandling.UseVisualStyleBackColor = False
|
||||
'
|
||||
@@ -686,11 +693,11 @@ Partial Class frmEintragAviso
|
||||
Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboGrenzstelle.FormattingEnabled = True
|
||||
Me.cboGrenzstelle.Items.AddRange(New Object() {"", "SUB", "SBG", "WAI", "NKD", "SFD", "???"})
|
||||
Me.cboGrenzstelle.Location = New System.Drawing.Point(232, 115)
|
||||
Me.cboGrenzstelle.Items.AddRange(New Object() {"", "SUB", "SBG", "WAI", "NKD", "SFD", "NEU", "???"})
|
||||
Me.cboGrenzstelle.Location = New System.Drawing.Point(232, 141)
|
||||
Me.cboGrenzstelle.Name = "cboGrenzstelle"
|
||||
Me.cboGrenzstelle.Size = New System.Drawing.Size(74, 28)
|
||||
Me.cboGrenzstelle.TabIndex = 15
|
||||
Me.cboGrenzstelle.TabIndex = 20
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
@@ -704,6 +711,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
'grpAviso
|
||||
'
|
||||
Me.grpAviso.Controls.Add(Me.Button5)
|
||||
Me.grpAviso.Controls.Add(Me.lblErrVorraussuchtlEintreffen)
|
||||
Me.grpAviso.Controls.Add(Me.txtAvisiererAuftragsNr)
|
||||
Me.grpAviso.Controls.Add(Me.Label23)
|
||||
Me.grpAviso.Controls.Add(Me.kdAuftraggeber)
|
||||
Me.grpAviso.Controls.Add(Me.kdAvisierer)
|
||||
Me.grpAviso.Controls.Add(Me.kdFrächter)
|
||||
@@ -731,7 +742,6 @@ Partial Class frmEintragAviso
|
||||
Me.grpAviso.Controls.Add(Me.lblErr_LKW)
|
||||
Me.grpAviso.Controls.Add(Me.lblErr_Grenzstelle)
|
||||
Me.grpAviso.Controls.Add(Me.lblErrFmZollKdNr)
|
||||
Me.grpAviso.Controls.Add(Me.grp)
|
||||
Me.grpAviso.Controls.Add(Me.Button1)
|
||||
Me.grpAviso.Controls.Add(Me.btnAbsSrch)
|
||||
Me.grpAviso.Controls.Add(Me.cbxHandling)
|
||||
@@ -753,15 +763,60 @@ Partial Class frmEintragAviso
|
||||
Me.grpAviso.Controls.Add(Me.cbxAuftraggeberfurAlleSendungen)
|
||||
Me.grpAviso.Controls.Add(Me.Label6)
|
||||
Me.grpAviso.Controls.Add(Me.Label22)
|
||||
Me.grpAviso.Controls.Add(Me.Label24)
|
||||
Me.grpAviso.Controls.Add(Me.datVoraussichtlichesEintreffen)
|
||||
Me.grpAviso.Location = New System.Drawing.Point(12, 45)
|
||||
Me.grpAviso.Name = "grpAviso"
|
||||
Me.grpAviso.Size = New System.Drawing.Size(403, 483)
|
||||
Me.grpAviso.Size = New System.Drawing.Size(403, 520)
|
||||
Me.grpAviso.TabIndex = 5
|
||||
Me.grpAviso.TabStop = False
|
||||
Me.grpAviso.Text = "Aviso"
|
||||
'
|
||||
'Button5
|
||||
'
|
||||
Me.Button5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.Button5.Location = New System.Drawing.Point(272, 47)
|
||||
Me.Button5.Name = "Button5"
|
||||
Me.Button5.Size = New System.Drawing.Size(119, 21)
|
||||
Me.Button5.TabIndex = 7
|
||||
Me.Button5.Text = "Berechnen"
|
||||
Me.Button5.UseVisualStyleBackColor = True
|
||||
Me.Button5.Visible = False
|
||||
'
|
||||
'lblErrVorraussuchtlEintreffen
|
||||
'
|
||||
Me.lblErrVorraussuchtlEintreffen.AutoSize = True
|
||||
Me.lblErrVorraussuchtlEintreffen.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErrVorraussuchtlEintreffen.Location = New System.Drawing.Point(147, 69)
|
||||
Me.lblErrVorraussuchtlEintreffen.Name = "lblErrVorraussuchtlEintreffen"
|
||||
Me.lblErrVorraussuchtlEintreffen.Size = New System.Drawing.Size(244, 13)
|
||||
Me.lblErrVorraussuchtlEintreffen.TabIndex = 52
|
||||
Me.lblErrVorraussuchtlEintreffen.Text = "Datum kann icht kleiner als Erfassungsdatum sein!"
|
||||
Me.lblErrVorraussuchtlEintreffen.Visible = False
|
||||
'
|
||||
'txtAvisiererAuftragsNr
|
||||
'
|
||||
Me.txtAvisiererAuftragsNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
|
||||
Me.txtAvisiererAuftragsNr.Location = New System.Drawing.Point(9, 366)
|
||||
Me.txtAvisiererAuftragsNr.MaxLength = 30
|
||||
Me.txtAvisiererAuftragsNr.Name = "txtAvisiererAuftragsNr"
|
||||
Me.txtAvisiererAuftragsNr.Size = New System.Drawing.Size(388, 20)
|
||||
Me.txtAvisiererAuftragsNr.TabIndex = 46
|
||||
'
|
||||
'Label23
|
||||
'
|
||||
Me.Label23.AutoSize = True
|
||||
Me.Label23.Location = New System.Drawing.Point(6, 352)
|
||||
Me.Label23.Name = "Label23"
|
||||
Me.Label23.Size = New System.Drawing.Size(106, 13)
|
||||
Me.Label23.TabIndex = 45
|
||||
Me.Label23.Text = "Avisierer-AuftragsNr.:"
|
||||
'
|
||||
'kdAuftraggeber
|
||||
'
|
||||
Me.kdAuftraggeber._AlleFirmenCLUSTER = False
|
||||
Me.kdAuftraggeber._AllowSetValue = True
|
||||
Me.kdAuftraggeber._autoSizeGross = False
|
||||
Me.kdAuftraggeber._display_Name1 = False
|
||||
@@ -776,17 +831,18 @@ Partial Class frmEintragAviso
|
||||
Me.kdAuftraggeber.KdNr = "-1"
|
||||
Me.kdAuftraggeber.kdNrField = Nothing
|
||||
Me.kdAuftraggeber.KdNrNullInt = Nothing
|
||||
Me.kdAuftraggeber.Location = New System.Drawing.Point(9, 263)
|
||||
Me.kdAuftraggeber.Location = New System.Drawing.Point(9, 289)
|
||||
Me.kdAuftraggeber.Name = "kdAuftraggeber"
|
||||
Me.kdAuftraggeber.nurAktive = False
|
||||
Me.kdAuftraggeber.searchActive = True
|
||||
Me.kdAuftraggeber.Size = New System.Drawing.Size(343, 20)
|
||||
Me.kdAuftraggeber.TabIndex = 35
|
||||
Me.kdAuftraggeber.TabIndex = 40
|
||||
Me.kdAuftraggeber.usrcntl = Nothing
|
||||
Me.kdAuftraggeber.Visible = False
|
||||
'
|
||||
'kdAvisierer
|
||||
'
|
||||
Me.kdAvisierer._AlleFirmenCLUSTER = False
|
||||
Me.kdAvisierer._AllowSetValue = True
|
||||
Me.kdAvisierer._autoSizeGross = False
|
||||
Me.kdAvisierer._display_Name1 = False
|
||||
@@ -801,16 +857,17 @@ Partial Class frmEintragAviso
|
||||
Me.kdAvisierer.KdNr = "-1"
|
||||
Me.kdAvisierer.kdNrField = Nothing
|
||||
Me.kdAvisierer.KdNrNullInt = Nothing
|
||||
Me.kdAvisierer.Location = New System.Drawing.Point(9, 224)
|
||||
Me.kdAvisierer.Location = New System.Drawing.Point(9, 250)
|
||||
Me.kdAvisierer.Name = "kdAvisierer"
|
||||
Me.kdAvisierer.nurAktive = False
|
||||
Me.kdAvisierer.searchActive = True
|
||||
Me.kdAvisierer.Size = New System.Drawing.Size(343, 20)
|
||||
Me.kdAvisierer.TabIndex = 30
|
||||
Me.kdAvisierer.TabIndex = 34
|
||||
Me.kdAvisierer.usrcntl = Nothing
|
||||
'
|
||||
'kdFrächter
|
||||
'
|
||||
Me.kdFrächter._AlleFirmenCLUSTER = False
|
||||
Me.kdFrächter._AllowSetValue = True
|
||||
Me.kdFrächter._autoSizeGross = False
|
||||
Me.kdFrächter._display_Name1 = False
|
||||
@@ -825,21 +882,21 @@ Partial Class frmEintragAviso
|
||||
Me.kdFrächter.KdNr = "-1"
|
||||
Me.kdFrächter.kdNrField = Nothing
|
||||
Me.kdFrächter.KdNrNullInt = Nothing
|
||||
Me.kdFrächter.Location = New System.Drawing.Point(9, 185)
|
||||
Me.kdFrächter.Location = New System.Drawing.Point(9, 211)
|
||||
Me.kdFrächter.Name = "kdFrächter"
|
||||
Me.kdFrächter.nurAktive = False
|
||||
Me.kdFrächter.searchActive = True
|
||||
Me.kdFrächter.Size = New System.Drawing.Size(343, 20)
|
||||
Me.kdFrächter.TabIndex = 25
|
||||
Me.kdFrächter.TabIndex = 27
|
||||
Me.kdFrächter.usrcntl = Nothing
|
||||
'
|
||||
'lblZA
|
||||
'
|
||||
Me.lblZA.AutoSize = True
|
||||
Me.lblZA.Location = New System.Drawing.Point(6, 149)
|
||||
Me.lblZA.Location = New System.Drawing.Point(6, 175)
|
||||
Me.lblZA.Name = "lblZA"
|
||||
Me.lblZA.Size = New System.Drawing.Size(44, 13)
|
||||
Me.lblZA.TabIndex = 46
|
||||
Me.lblZA.TabIndex = 22
|
||||
Me.lblZA.Text = "Zollamt:"
|
||||
Me.lblZA.Visible = False
|
||||
'
|
||||
@@ -856,7 +913,7 @@ Partial Class frmEintragAviso
|
||||
Me.txtBestimmungszollstelle.INVISIBLE_COLUMNS = Nothing
|
||||
Me.txtBestimmungszollstelle.key_visible = False
|
||||
Me.txtBestimmungszollstelle.KEYPARAM = Nothing
|
||||
Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(58, 146)
|
||||
Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(58, 172)
|
||||
Me.txtBestimmungszollstelle.MaxLength = 50
|
||||
Me.txtBestimmungszollstelle.Name = "txtBestimmungszollstelle"
|
||||
Me.txtBestimmungszollstelle.searchActive = True
|
||||
@@ -865,7 +922,7 @@ Partial Class frmEintragAviso
|
||||
Me.txtBestimmungszollstelle.SQL_SELECT = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_WHERE = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_WhereParamList = Nothing
|
||||
Me.txtBestimmungszollstelle.TabIndex = 21
|
||||
Me.txtBestimmungszollstelle.TabIndex = 23
|
||||
Me.txtBestimmungszollstelle.usrcntl = Nothing
|
||||
Me.txtBestimmungszollstelle.Visible = False
|
||||
'
|
||||
@@ -875,10 +932,10 @@ Partial Class frmEintragAviso
|
||||
Me.Button4.FlatAppearance.BorderSize = 0
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.Image = Global.AVISO.My.Resources.Resources.person_add
|
||||
Me.Button4.Location = New System.Drawing.Point(377, 181)
|
||||
Me.Button4.Location = New System.Drawing.Point(377, 207)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(25, 25)
|
||||
Me.Button4.TabIndex = 45
|
||||
Me.Button4.TabIndex = 29
|
||||
Me.Button4.TabStop = False
|
||||
Me.Button4.Tag = "Kunde hinzufügen"
|
||||
Me.Button4.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
@@ -899,7 +956,7 @@ Partial Class frmEintragAviso
|
||||
Me.sbLkwNationalitaet.INVISIBLE_COLUMNS = Nothing
|
||||
Me.sbLkwNationalitaet.key_visible = False
|
||||
Me.sbLkwNationalitaet.KEYPARAM = Nothing
|
||||
Me.sbLkwNationalitaet.Location = New System.Drawing.Point(178, 115)
|
||||
Me.sbLkwNationalitaet.Location = New System.Drawing.Point(178, 141)
|
||||
Me.sbLkwNationalitaet.MaxLength = 5
|
||||
Me.sbLkwNationalitaet.Name = "sbLkwNationalitaet"
|
||||
Me.sbLkwNationalitaet.searchActive = True
|
||||
@@ -908,26 +965,26 @@ Partial Class frmEintragAviso
|
||||
Me.sbLkwNationalitaet.SQL_SELECT = Nothing
|
||||
Me.sbLkwNationalitaet.SQL_WHERE = Nothing
|
||||
Me.sbLkwNationalitaet.SQL_WhereParamList = Nothing
|
||||
Me.sbLkwNationalitaet.TabIndex = 14
|
||||
Me.sbLkwNationalitaet.TabIndex = 18
|
||||
Me.sbLkwNationalitaet.usrcntl = Nothing
|
||||
'
|
||||
'Label18
|
||||
'
|
||||
Me.Label18.AutoSize = True
|
||||
Me.Label18.Location = New System.Drawing.Point(176, 99)
|
||||
Me.Label18.Location = New System.Drawing.Point(176, 125)
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Size = New System.Drawing.Size(27, 13)
|
||||
Me.Label18.TabIndex = 9
|
||||
Me.Label18.TabIndex = 14
|
||||
Me.Label18.Text = "Nat."
|
||||
'
|
||||
'txtFahrerHandy
|
||||
'
|
||||
Me.txtFahrerHandy.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
|
||||
Me.txtFahrerHandy.Location = New System.Drawing.Point(24, 302)
|
||||
Me.txtFahrerHandy.Location = New System.Drawing.Point(24, 328)
|
||||
Me.txtFahrerHandy.MaxLength = 30
|
||||
Me.txtFahrerHandy.Name = "txtFahrerHandy"
|
||||
Me.txtFahrerHandy.Size = New System.Drawing.Size(234, 20)
|
||||
Me.txtFahrerHandy.TabIndex = 38
|
||||
Me.txtFahrerHandy.TabIndex = 43
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
@@ -935,10 +992,10 @@ Partial Class frmEintragAviso
|
||||
Me.Button2.FlatAppearance.BorderSize = 0
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Image = Global.AVISO.My.Resources.Resources.person_add
|
||||
Me.Button2.Location = New System.Drawing.Point(377, 221)
|
||||
Me.Button2.Location = New System.Drawing.Point(377, 247)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(25, 24)
|
||||
Me.Button2.TabIndex = 12
|
||||
Me.Button2.TabIndex = 36
|
||||
Me.Button2.TabStop = False
|
||||
Me.Button2.Tag = "Kunde hinzufügen"
|
||||
Me.Button2.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
@@ -949,7 +1006,7 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.pic.BackgroundImage = Global.AVISO.My.Resources.Resources.handy
|
||||
Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.pic.Location = New System.Drawing.Point(5, 302)
|
||||
Me.pic.Location = New System.Drawing.Point(5, 328)
|
||||
Me.pic.Name = "pic"
|
||||
Me.pic.Size = New System.Drawing.Size(20, 20)
|
||||
Me.pic.TabIndex = 40
|
||||
@@ -958,19 +1015,19 @@ Partial Class frmEintragAviso
|
||||
'Label16
|
||||
'
|
||||
Me.Label16.AutoSize = True
|
||||
Me.Label16.Location = New System.Drawing.Point(6, 288)
|
||||
Me.Label16.Location = New System.Drawing.Point(6, 314)
|
||||
Me.Label16.Name = "Label16"
|
||||
Me.Label16.Size = New System.Drawing.Size(116, 13)
|
||||
Me.Label16.TabIndex = 37
|
||||
Me.Label16.TabIndex = 42
|
||||
Me.Label16.Text = "Fahrer Handy-Nummer:"
|
||||
'
|
||||
'cbxFrächterUnbekannt
|
||||
'
|
||||
Me.cbxFrächterUnbekannt.AutoSize = True
|
||||
Me.cbxFrächterUnbekannt.Location = New System.Drawing.Point(122, 168)
|
||||
Me.cbxFrächterUnbekannt.Location = New System.Drawing.Point(122, 194)
|
||||
Me.cbxFrächterUnbekannt.Name = "cbxFrächterUnbekannt"
|
||||
Me.cbxFrächterUnbekannt.Size = New System.Drawing.Size(104, 17)
|
||||
Me.cbxFrächterUnbekannt.TabIndex = 22
|
||||
Me.cbxFrächterUnbekannt.TabIndex = 25
|
||||
Me.cbxFrächterUnbekannt.Text = "noch unbekannt"
|
||||
Me.cbxFrächterUnbekannt.UseVisualStyleBackColor = True
|
||||
Me.cbxFrächterUnbekannt.Visible = False
|
||||
@@ -982,10 +1039,10 @@ Partial Class frmEintragAviso
|
||||
Me.btnAuftraggeber.FlatAppearance.BorderSize = 0
|
||||
Me.btnAuftraggeber.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnAuftraggeber.Image = CType(resources.GetObject("btnAuftraggeber.Image"), System.Drawing.Image)
|
||||
Me.btnAuftraggeber.Location = New System.Drawing.Point(352, 259)
|
||||
Me.btnAuftraggeber.Location = New System.Drawing.Point(352, 285)
|
||||
Me.btnAuftraggeber.Name = "btnAuftraggeber"
|
||||
Me.btnAuftraggeber.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btnAuftraggeber.TabIndex = 36
|
||||
Me.btnAuftraggeber.TabIndex = 41
|
||||
Me.btnAuftraggeber.TabStop = False
|
||||
Me.btnAuftraggeber.Tag = "Kunde hinzufügen"
|
||||
Me.btnAuftraggeber.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
@@ -999,11 +1056,11 @@ Partial Class frmEintragAviso
|
||||
Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.UsrCntlTestsystem1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.UsrCntlTestsystem1.ForeColor = System.Drawing.Color.Red
|
||||
Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(49, 416)
|
||||
Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(49, 453)
|
||||
Me.UsrCntlTestsystem1.Margin = New System.Windows.Forms.Padding(5, 6, 5, 6)
|
||||
Me.UsrCntlTestsystem1.Name = "UsrCntlTestsystem1"
|
||||
Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28)
|
||||
Me.UsrCntlTestsystem1.TabIndex = 43
|
||||
Me.UsrCntlTestsystem1.TabIndex = 50
|
||||
'
|
||||
'btnAvisiererKd
|
||||
'
|
||||
@@ -1012,10 +1069,10 @@ Partial Class frmEintragAviso
|
||||
Me.btnAvisiererKd.FlatAppearance.BorderSize = 0
|
||||
Me.btnAvisiererKd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnAvisiererKd.Image = CType(resources.GetObject("btnAvisiererKd.Image"), System.Drawing.Image)
|
||||
Me.btnAvisiererKd.Location = New System.Drawing.Point(352, 220)
|
||||
Me.btnAvisiererKd.Location = New System.Drawing.Point(352, 246)
|
||||
Me.btnAvisiererKd.Name = "btnAvisiererKd"
|
||||
Me.btnAvisiererKd.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btnAvisiererKd.TabIndex = 31
|
||||
Me.btnAvisiererKd.TabIndex = 35
|
||||
Me.btnAvisiererKd.TabStop = False
|
||||
Me.btnAvisiererKd.Tag = "Kunde hinzufügen"
|
||||
Me.btnAvisiererKd.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
@@ -1029,10 +1086,10 @@ Partial Class frmEintragAviso
|
||||
Me.btnFraechterKd.FlatAppearance.BorderSize = 0
|
||||
Me.btnFraechterKd.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnFraechterKd.Image = CType(resources.GetObject("btnFraechterKd.Image"), System.Drawing.Image)
|
||||
Me.btnFraechterKd.Location = New System.Drawing.Point(352, 181)
|
||||
Me.btnFraechterKd.Location = New System.Drawing.Point(352, 207)
|
||||
Me.btnFraechterKd.Name = "btnFraechterKd"
|
||||
Me.btnFraechterKd.Size = New System.Drawing.Size(25, 25)
|
||||
Me.btnFraechterKd.TabIndex = 26
|
||||
Me.btnFraechterKd.TabIndex = 28
|
||||
Me.btnFraechterKd.TabStop = False
|
||||
Me.btnFraechterKd.Tag = "Kunde hinzufügen"
|
||||
Me.btnFraechterKd.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
@@ -1043,10 +1100,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.lblErrImex.AutoSize = True
|
||||
Me.lblErrImex.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErrImex.Location = New System.Drawing.Point(236, 83)
|
||||
Me.lblErrImex.Location = New System.Drawing.Point(236, 109)
|
||||
Me.lblErrImex.Name = "lblErrImex"
|
||||
Me.lblErrImex.Size = New System.Drawing.Size(119, 13)
|
||||
Me.lblErrImex.TabIndex = 20
|
||||
Me.lblErrImex.TabIndex = 10
|
||||
Me.lblErrImex.Text = "Import/Export angeben!"
|
||||
Me.lblErrImex.Visible = False
|
||||
'
|
||||
@@ -1058,20 +1115,20 @@ Partial Class frmEintragAviso
|
||||
Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboImEx.FormattingEnabled = True
|
||||
Me.cboImEx.Items.AddRange(New Object() {"", "IMPORT", "EXPORT"})
|
||||
Me.cboImEx.Location = New System.Drawing.Point(312, 113)
|
||||
Me.cboImEx.Location = New System.Drawing.Point(312, 139)
|
||||
Me.cboImEx.Name = "cboImEx"
|
||||
Me.cboImEx.Size = New System.Drawing.Size(79, 28)
|
||||
Me.cboImEx.TabIndex = 16
|
||||
Me.cboImEx.TabIndex = 19
|
||||
Me.cboImEx.Visible = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label1.Location = New System.Drawing.Point(309, 99)
|
||||
Me.Label1.Location = New System.Drawing.Point(309, 125)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label1.TabIndex = 11
|
||||
Me.Label1.TabIndex = 16
|
||||
Me.Label1.Text = "Im/Ex"
|
||||
Me.Label1.Visible = False
|
||||
'
|
||||
@@ -1079,10 +1136,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.lblErr_Uhrzeit.AutoSize = True
|
||||
Me.lblErr_Uhrzeit.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr_Uhrzeit.Location = New System.Drawing.Point(176, 49)
|
||||
Me.lblErr_Uhrzeit.Location = New System.Drawing.Point(209, 12)
|
||||
Me.lblErr_Uhrzeit.Name = "lblErr_Uhrzeit"
|
||||
Me.lblErr_Uhrzeit.Size = New System.Drawing.Size(90, 13)
|
||||
Me.lblErr_Uhrzeit.TabIndex = 4
|
||||
Me.lblErr_Uhrzeit.TabIndex = 0
|
||||
Me.lblErr_Uhrzeit.Text = "Uhrzeit eingeben!"
|
||||
Me.lblErr_Uhrzeit.Visible = False
|
||||
'
|
||||
@@ -1090,10 +1147,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.lblErr_Avisierer.AutoSize = True
|
||||
Me.lblErr_Avisierer.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr_Avisierer.Location = New System.Drawing.Point(194, 208)
|
||||
Me.lblErr_Avisierer.Location = New System.Drawing.Point(194, 234)
|
||||
Me.lblErr_Avisierer.Name = "lblErr_Avisierer"
|
||||
Me.lblErr_Avisierer.Size = New System.Drawing.Size(97, 13)
|
||||
Me.lblErr_Avisierer.TabIndex = 27
|
||||
Me.lblErr_Avisierer.TabIndex = 32
|
||||
Me.lblErr_Avisierer.Text = "Avisierer eingeben!"
|
||||
Me.lblErr_Avisierer.Visible = False
|
||||
'
|
||||
@@ -1101,10 +1158,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.lblErr_Frächter.AutoSize = True
|
||||
Me.lblErr_Frächter.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr_Frächter.Location = New System.Drawing.Point(92, 208)
|
||||
Me.lblErr_Frächter.Location = New System.Drawing.Point(92, 234)
|
||||
Me.lblErr_Frächter.Name = "lblErr_Frächter"
|
||||
Me.lblErr_Frächter.Size = New System.Drawing.Size(96, 13)
|
||||
Me.lblErr_Frächter.TabIndex = 23
|
||||
Me.lblErr_Frächter.TabIndex = 31
|
||||
Me.lblErr_Frächter.Text = "Frächter eingeben!"
|
||||
Me.lblErr_Frächter.Visible = False
|
||||
'
|
||||
@@ -1112,10 +1169,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.lblErr_LKW.AutoSize = True
|
||||
Me.lblErr_LKW.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr_LKW.Location = New System.Drawing.Point(75, 99)
|
||||
Me.lblErr_LKW.Location = New System.Drawing.Point(75, 125)
|
||||
Me.lblErr_LKW.Name = "lblErr_LKW"
|
||||
Me.lblErr_LKW.Size = New System.Drawing.Size(95, 13)
|
||||
Me.lblErr_LKW.TabIndex = 18
|
||||
Me.lblErr_LKW.TabIndex = 13
|
||||
Me.lblErr_LKW.Text = "LKW-Nr eingeben!"
|
||||
Me.lblErr_LKW.Visible = False
|
||||
'
|
||||
@@ -1123,10 +1180,10 @@ Partial Class frmEintragAviso
|
||||
'
|
||||
Me.lblErr_Grenzstelle.AutoSize = True
|
||||
Me.lblErr_Grenzstelle.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr_Grenzstelle.Location = New System.Drawing.Point(157, 83)
|
||||
Me.lblErr_Grenzstelle.Location = New System.Drawing.Point(157, 109)
|
||||
Me.lblErr_Grenzstelle.Name = "lblErr_Grenzstelle"
|
||||
Me.lblErr_Grenzstelle.Size = New System.Drawing.Size(109, 13)
|
||||
Me.lblErr_Grenzstelle.TabIndex = 19
|
||||
Me.lblErr_Grenzstelle.TabIndex = 9
|
||||
Me.lblErr_Grenzstelle.Text = "Grenzstelle eingeben!"
|
||||
Me.lblErr_Grenzstelle.Visible = False
|
||||
'
|
||||
@@ -1135,33 +1192,22 @@ Partial Class frmEintragAviso
|
||||
Me.lblErrFmZollKdNr.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblErrFmZollKdNr.AutoSize = True
|
||||
Me.lblErrFmZollKdNr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErrFmZollKdNr.Location = New System.Drawing.Point(176, 394)
|
||||
Me.lblErrFmZollKdNr.Location = New System.Drawing.Point(176, 431)
|
||||
Me.lblErrFmZollKdNr.Name = "lblErrFmZollKdNr"
|
||||
Me.lblErrFmZollKdNr.Size = New System.Drawing.Size(156, 26)
|
||||
Me.lblErrFmZollKdNr.TabIndex = 42
|
||||
Me.lblErrFmZollKdNr.TabIndex = 49
|
||||
Me.lblErrFmZollKdNr.Text = "Wenn möglich bitte die FM-Zoll " & Global.Microsoft.VisualBasic.ChrW(10) & "Zuordnung mit KdNr eintragen!"
|
||||
Me.lblErrFmZollKdNr.Visible = False
|
||||
'
|
||||
'grp
|
||||
'
|
||||
Me.grp.Controls.Add(Me.optUnbekannt)
|
||||
Me.grp.Controls.Add(Me.optTelefonisch)
|
||||
Me.grp.Controls.Add(Me.optSchriftlich)
|
||||
Me.grp.Location = New System.Drawing.Point(284, 13)
|
||||
Me.grp.Name = "grp"
|
||||
Me.grp.Size = New System.Drawing.Size(113, 67)
|
||||
Me.grp.TabIndex = 6
|
||||
Me.grp.TabStop = False
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatAppearance.BorderSize = 0
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Image = CType(resources.GetObject("Button1.Image"), System.Drawing.Image)
|
||||
Me.Button1.Location = New System.Drawing.Point(360, 125)
|
||||
Me.Button1.Location = New System.Drawing.Point(360, 151)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(37, 20)
|
||||
Me.Button1.TabIndex = 17
|
||||
Me.Button1.TabIndex = 21
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
Me.Button1.Visible = False
|
||||
'
|
||||
@@ -1170,10 +1216,10 @@ Partial Class frmEintragAviso
|
||||
Me.btnAbsSrch.FlatAppearance.BorderSize = 0
|
||||
Me.btnAbsSrch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnAbsSrch.Image = CType(resources.GetObject("btnAbsSrch.Image"), System.Drawing.Image)
|
||||
Me.btnAbsSrch.Location = New System.Drawing.Point(360, 86)
|
||||
Me.btnAbsSrch.Location = New System.Drawing.Point(360, 112)
|
||||
Me.btnAbsSrch.Name = "btnAbsSrch"
|
||||
Me.btnAbsSrch.Size = New System.Drawing.Size(37, 20)
|
||||
Me.btnAbsSrch.TabIndex = 7
|
||||
Me.btnAbsSrch.TabIndex = 11
|
||||
Me.btnAbsSrch.UseVisualStyleBackColor = True
|
||||
Me.btnAbsSrch.Visible = False
|
||||
'
|
||||
@@ -1183,20 +1229,20 @@ Partial Class frmEintragAviso
|
||||
Me.lblAtrAvis.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.lblAtrAvis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblAtrAvis.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.lblAtrAvis.Location = New System.Drawing.Point(296, 248)
|
||||
Me.lblAtrAvis.Location = New System.Drawing.Point(296, 274)
|
||||
Me.lblAtrAvis.Name = "lblAtrAvis"
|
||||
Me.lblAtrAvis.Size = New System.Drawing.Size(56, 13)
|
||||
Me.lblAtrAvis.TabIndex = 34
|
||||
Me.lblAtrAvis.TabIndex = 39
|
||||
Me.lblAtrAvis.Text = "= Avisierer"
|
||||
Me.lblAtrAvis.Visible = False
|
||||
'
|
||||
'lblAtr
|
||||
'
|
||||
Me.lblAtr.AutoSize = True
|
||||
Me.lblAtr.Location = New System.Drawing.Point(6, 248)
|
||||
Me.lblAtr.Location = New System.Drawing.Point(6, 274)
|
||||
Me.lblAtr.Name = "lblAtr"
|
||||
Me.lblAtr.Size = New System.Drawing.Size(71, 13)
|
||||
Me.lblAtr.TabIndex = 32
|
||||
Me.lblAtr.TabIndex = 37
|
||||
Me.lblAtr.Text = "Auftraggeber:"
|
||||
Me.lblAtr.Visible = False
|
||||
'
|
||||
@@ -1206,19 +1252,19 @@ Partial Class frmEintragAviso
|
||||
Me.Label17.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label17.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Label17.Location = New System.Drawing.Point(297, 208)
|
||||
Me.Label17.Location = New System.Drawing.Point(297, 234)
|
||||
Me.Label17.Name = "Label17"
|
||||
Me.Label17.Size = New System.Drawing.Size(55, 13)
|
||||
Me.Label17.TabIndex = 28
|
||||
Me.Label17.TabIndex = 33
|
||||
Me.Label17.Text = "= Frächter"
|
||||
'
|
||||
'cbxAuftraggeberfurAlleSendungen
|
||||
'
|
||||
Me.cbxAuftraggeberfurAlleSendungen.AutoSize = True
|
||||
Me.cbxAuftraggeberfurAlleSendungen.Location = New System.Drawing.Point(122, 246)
|
||||
Me.cbxAuftraggeberfurAlleSendungen.Location = New System.Drawing.Point(122, 272)
|
||||
Me.cbxAuftraggeberfurAlleSendungen.Name = "cbxAuftraggeberfurAlleSendungen"
|
||||
Me.cbxAuftraggeberfurAlleSendungen.Size = New System.Drawing.Size(194, 17)
|
||||
Me.cbxAuftraggeberfurAlleSendungen.TabIndex = 33
|
||||
Me.cbxAuftraggeberfurAlleSendungen.TabIndex = 38
|
||||
Me.cbxAuftraggeberfurAlleSendungen.Text = "= Auftraggeber (für alle Sendungen)"
|
||||
Me.cbxAuftraggeberfurAlleSendungen.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -1228,12 +1274,45 @@ Partial Class frmEintragAviso
|
||||
Me.Label22.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label22.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Label22.Location = New System.Drawing.Point(296, 169)
|
||||
Me.Label22.Location = New System.Drawing.Point(296, 195)
|
||||
Me.Label22.Name = "Label22"
|
||||
Me.Label22.Size = New System.Drawing.Size(56, 13)
|
||||
Me.Label22.TabIndex = 50
|
||||
Me.Label22.TabIndex = 26
|
||||
Me.Label22.Text = "= Avisierer"
|
||||
'
|
||||
'Label24
|
||||
'
|
||||
Me.Label24.AutoSize = True
|
||||
Me.Label24.Location = New System.Drawing.Point(25, 51)
|
||||
Me.Label24.Name = "Label24"
|
||||
Me.Label24.Size = New System.Drawing.Size(140, 13)
|
||||
Me.Label24.TabIndex = 5
|
||||
Me.Label24.Text = "Voraussichtliches Eintreffen:"
|
||||
Me.Label24.Visible = False
|
||||
'
|
||||
'datVoraussichtlichesEintreffen
|
||||
'
|
||||
Me.datVoraussichtlichesEintreffen.CustomFormat = "dd.MM.yyyy"
|
||||
Me.datVoraussichtlichesEintreffen.Format = System.Windows.Forms.DateTimePickerFormat.Custom
|
||||
Me.datVoraussichtlichesEintreffen.Location = New System.Drawing.Point(177, 48)
|
||||
Me.datVoraussichtlichesEintreffen.Name = "datVoraussichtlichesEintreffen"
|
||||
Me.datVoraussichtlichesEintreffen.Size = New System.Drawing.Size(89, 20)
|
||||
Me.datVoraussichtlichesEintreffen.TabIndex = 6
|
||||
Me.datVoraussichtlichesEintreffen.Value = New Date(2020, 1, 23, 0, 0, 0, 0)
|
||||
Me.datVoraussichtlichesEintreffen.Visible = False
|
||||
'
|
||||
'grp
|
||||
'
|
||||
Me.grp.Controls.Add(Me.optUnbekannt)
|
||||
Me.grp.Controls.Add(Me.optTelefonisch)
|
||||
Me.grp.Controls.Add(Me.optSchriftlich)
|
||||
Me.grp.Location = New System.Drawing.Point(483, 455)
|
||||
Me.grp.Name = "grp"
|
||||
Me.grp.Size = New System.Drawing.Size(98, 67)
|
||||
Me.grp.TabIndex = 17
|
||||
Me.grp.TabStop = False
|
||||
Me.grp.Visible = False
|
||||
'
|
||||
'txtDyRef
|
||||
'
|
||||
Me.txtDyRef.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
|
||||
@@ -1241,7 +1320,7 @@ Partial Class frmEintragAviso
|
||||
Me.txtDyRef.MaxLength = 30
|
||||
Me.txtDyRef.Name = "txtDyRef"
|
||||
Me.txtDyRef.Size = New System.Drawing.Size(234, 20)
|
||||
Me.txtDyRef.TabIndex = 48
|
||||
Me.txtDyRef.TabIndex = 16
|
||||
Me.txtDyRef.Visible = False
|
||||
'
|
||||
'picDy
|
||||
@@ -1261,7 +1340,7 @@ Partial Class frmEintragAviso
|
||||
Me.lblDy.Location = New System.Drawing.Point(491, 386)
|
||||
Me.lblDy.Name = "lblDy"
|
||||
Me.lblDy.Size = New System.Drawing.Size(109, 13)
|
||||
Me.lblDy.TabIndex = 47
|
||||
Me.lblDy.TabIndex = 15
|
||||
Me.lblDy.Text = "Dakosy-Referenz-Nr.:"
|
||||
Me.lblDy.Visible = False
|
||||
'
|
||||
@@ -1276,7 +1355,7 @@ Partial Class frmEintragAviso
|
||||
Me.grpAktVerzollung.Location = New System.Drawing.Point(424, 73)
|
||||
Me.grpAktVerzollung.Name = "grpAktVerzollung"
|
||||
Me.grpAktVerzollung.Size = New System.Drawing.Size(359, 110)
|
||||
Me.grpAktVerzollung.TabIndex = 7
|
||||
Me.grpAktVerzollung.TabIndex = 8
|
||||
Me.grpAktVerzollung.TabStop = False
|
||||
Me.grpAktVerzollung.Text = "Sendungen - Details"
|
||||
'
|
||||
@@ -1502,7 +1581,7 @@ Partial Class frmEintragAviso
|
||||
Me.Button3.Location = New System.Drawing.Point(424, 189)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(359, 37)
|
||||
Me.Button3.TabIndex = 8
|
||||
Me.Button3.TabIndex = 9
|
||||
Me.Button3.Text = "Weiter zu den Sendungsdetails"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -1515,7 +1594,7 @@ Partial Class frmEintragAviso
|
||||
Me.cbxSendungsvorlagen.Location = New System.Drawing.Point(446, 49)
|
||||
Me.cbxSendungsvorlagen.Name = "cbxSendungsvorlagen"
|
||||
Me.cbxSendungsvorlagen.Size = New System.Drawing.Size(205, 21)
|
||||
Me.cbxSendungsvorlagen.TabIndex = 6
|
||||
Me.cbxSendungsvorlagen.TabIndex = 7
|
||||
Me.cbxSendungsvorlagen.Text = "Sendungsvorlagen erfassen"
|
||||
Me.cbxSendungsvorlagen.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -1524,10 +1603,10 @@ Partial Class frmEintragAviso
|
||||
Me.cbxAktenzettelDrucken.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.cbxAktenzettelDrucken.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cbxAktenzettelDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbxAktenzettelDrucken.Location = New System.Drawing.Point(12, 528)
|
||||
Me.cbxAktenzettelDrucken.Location = New System.Drawing.Point(12, 571)
|
||||
Me.cbxAktenzettelDrucken.Name = "cbxAktenzettelDrucken"
|
||||
Me.cbxAktenzettelDrucken.Size = New System.Drawing.Size(403, 33)
|
||||
Me.cbxAktenzettelDrucken.TabIndex = 10
|
||||
Me.cbxAktenzettelDrucken.TabIndex = 11
|
||||
Me.cbxAktenzettelDrucken.Text = "Aktenzettel ausdrucken:"
|
||||
Me.cbxAktenzettelDrucken.UseVisualStyleBackColor = False
|
||||
Me.cbxAktenzettelDrucken.Visible = False
|
||||
@@ -1540,10 +1619,10 @@ Partial Class frmEintragAviso
|
||||
Me.cboPrinter.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboPrinter.FormattingEnabled = True
|
||||
Me.cboPrinter.Location = New System.Drawing.Point(209, 533)
|
||||
Me.cboPrinter.Location = New System.Drawing.Point(209, 576)
|
||||
Me.cboPrinter.Name = "cboPrinter"
|
||||
Me.cboPrinter.Size = New System.Drawing.Size(206, 21)
|
||||
Me.cboPrinter.TabIndex = 11
|
||||
Me.cboPrinter.TabIndex = 12
|
||||
Me.cboPrinter.Visible = False
|
||||
'
|
||||
'UsrCntlEintragAvisoAtilla
|
||||
@@ -1552,7 +1631,7 @@ Partial Class frmEintragAviso
|
||||
Me.UsrCntlEintragAvisoAtilla.Location = New System.Drawing.Point(424, 49)
|
||||
Me.UsrCntlEintragAvisoAtilla.Name = "UsrCntlEintragAvisoAtilla"
|
||||
Me.UsrCntlEintragAvisoAtilla.Size = New System.Drawing.Size(360, 487)
|
||||
Me.UsrCntlEintragAvisoAtilla.TabIndex = 12
|
||||
Me.UsrCntlEintragAvisoAtilla.TabIndex = 6
|
||||
Me.UsrCntlEintragAvisoAtilla.Visible = False
|
||||
'
|
||||
'dgvAnhaenge
|
||||
@@ -1567,14 +1646,14 @@ Partial Class frmEintragAviso
|
||||
Me.dgvAnhaenge.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvAnhaenge.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvAnhaenge.ColumnHeadersVisible = False
|
||||
Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName})
|
||||
Me.dgvAnhaenge.Location = New System.Drawing.Point(424, 278)
|
||||
Me.dgvAnhaenge.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.columnName, Me.clmnPfad})
|
||||
Me.dgvAnhaenge.Location = New System.Drawing.Point(424, 321)
|
||||
Me.dgvAnhaenge.Name = "dgvAnhaenge"
|
||||
Me.dgvAnhaenge.ReadOnly = True
|
||||
Me.dgvAnhaenge.RowHeadersVisible = False
|
||||
Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvAnhaenge.Size = New System.Drawing.Size(360, 327)
|
||||
Me.dgvAnhaenge.TabIndex = 23
|
||||
Me.dgvAnhaenge.TabIndex = 14
|
||||
Me.dgvAnhaenge.Visible = False
|
||||
'
|
||||
'columnName
|
||||
@@ -1584,13 +1663,21 @@ Partial Class frmEintragAviso
|
||||
Me.columnName.Name = "columnName"
|
||||
Me.columnName.ReadOnly = True
|
||||
'
|
||||
'clmnPfad
|
||||
'
|
||||
Me.clmnPfad.HeaderText = "Pfad"
|
||||
Me.clmnPfad.Name = "clmnPfad"
|
||||
Me.clmnPfad.ReadOnly = True
|
||||
Me.clmnPfad.Visible = False
|
||||
'
|
||||
'frmEintragAviso
|
||||
'
|
||||
Me.AcceptButton = Me.btnOK
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(792, 611)
|
||||
Me.ClientSize = New System.Drawing.Size(792, 654)
|
||||
Me.Controls.Add(Me.grp)
|
||||
Me.Controls.Add(Me.txtDyRef)
|
||||
Me.Controls.Add(Me.picDy)
|
||||
Me.Controls.Add(Me.lblDy)
|
||||
@@ -1748,5 +1835,12 @@ Partial Class frmEintragAviso
|
||||
Friend WithEvents lblDy As Label
|
||||
Friend WithEvents Label22 As Label
|
||||
Friend WithEvents dgvAnhaenge As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||
Friend WithEvents txtAvisiererAuftragsNr As TextBox
|
||||
Friend WithEvents Label23 As Label
|
||||
Friend WithEvents lblErrVorraussuchtlEintreffen As Label
|
||||
Friend WithEvents Button5 As Button
|
||||
Friend WithEvents Label24 As Label
|
||||
Friend WithEvents datVoraussichtlichesEintreffen As DateTimePicker
|
||||
Friend WithEvents columnName As DataGridViewTextBoxColumn
|
||||
Friend WithEvents clmnPfad As DataGridViewTextBoxColumn
|
||||
End Class
|
||||
|
||||
@@ -213,6 +213,9 @@
|
||||
<metadata name="columnName.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="clmnPfad.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA
|
||||
|
||||
@@ -72,7 +72,7 @@ Public Class frmEintragAviso
|
||||
Dim sp = a.Split("\")
|
||||
display = sp(sp.Count - 1)
|
||||
End If
|
||||
dgvAnhaenge.Rows.Add({display})
|
||||
dgvAnhaenge.Rows.Add({display, a})
|
||||
Next
|
||||
End If
|
||||
dgvAnhaenge.ClearSelection()
|
||||
@@ -123,12 +123,14 @@ Public Class frmEintragAviso
|
||||
' lblDy.Visible = True
|
||||
' txtDyRef.Visible = True
|
||||
' picDy.Visible = True
|
||||
Case "VERAG"
|
||||
Label1.Visible = True
|
||||
cboImEx.Visible = True
|
||||
cboImEx.Text = "IMPORT"
|
||||
End Select
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG
|
||||
Case "WAI"
|
||||
cboImEx.Visible = True
|
||||
@@ -143,6 +145,11 @@ Public Class frmEintragAviso
|
||||
Case "SUB"
|
||||
txtSndFremd.Visible = True
|
||||
lblSndFremd.Visible = True
|
||||
Case "NEU"
|
||||
txtSndFremd.Visible = True
|
||||
lblSndFremd.Visible = True
|
||||
cboImEx.Visible = True
|
||||
Label1.Visible = True
|
||||
End Select
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Case "FRONTOFFICE"
|
||||
@@ -221,6 +228,7 @@ Public Class frmEintragAviso
|
||||
Neuanlage = True
|
||||
Me.Text = "Neuanlage LKW-Aviso"
|
||||
dtpDatum.Value = Now
|
||||
datVoraussichtlichesEintreffen.Value = Now.AddDays(-1)
|
||||
dtpAvisoEingangDatum.Value = Now.Date
|
||||
dtpAvisoEingangZeit.Value = LeerDatum
|
||||
txtÄnderungen.Text = "Neuanlage von " & cGlobal.AktiverMitarbeiter.Mitarbeiter
|
||||
@@ -236,6 +244,8 @@ Public Class frmEintragAviso
|
||||
End If
|
||||
Else
|
||||
Me.Text = "Änderung LKW-Aviso"
|
||||
'If myAviso.Status = cGlobal.Status_Ankunft Or myAviso.Status = cGlobal.Status_Freigegeben Then datVoraussichtlichesEintreffen.Visible = False
|
||||
|
||||
txtInfo.Visible = False
|
||||
Label3.Visible = False
|
||||
'ausgewählter Datensatz wird geladen
|
||||
@@ -263,6 +273,13 @@ Public Class frmEintragAviso
|
||||
txtLKW_Nr.Text = myAviso.LKW_Nr
|
||||
sbLkwNationalitaet.SET_VALUE(myAviso.LKW_Nationalitaet)
|
||||
txtFahrerHandy.Text = If(myAviso.FahrerHandy, "")
|
||||
txtAvisiererAuftragsNr.Text = If(myAviso.KdAuftragsNr_Avisierer, "")
|
||||
If myAviso.VoraussichtlichesEintreffen IsNot Nothing Then
|
||||
datVoraussichtlichesEintreffen.Value = myAviso.VoraussichtlichesEintreffen
|
||||
Else
|
||||
datVoraussichtlichesEintreffen.Value = myAviso.Datum.AddDays(-1)
|
||||
End If
|
||||
|
||||
|
||||
txtÄnderungen.Text = myAviso.Änderungen.Trim
|
||||
optOhneAviso.Visible = False 'bei Änderung kann kein Eingang ohne Aviso erfolgen, da Datum bereits bei Anlage gesetzt
|
||||
@@ -502,7 +519,7 @@ Public Class frmEintragAviso
|
||||
lblErr_Uhrzeit.Visible = False
|
||||
lblErr_LKW.Visible = False
|
||||
lblSendungsanzahl.Visible = False
|
||||
|
||||
lblErrVorraussuchtlEintreffen.Visible = False
|
||||
|
||||
If CDate(dtpAvisoEingangDatum.Value) > Now Then
|
||||
MsgBox("Aviso-Datum darf nicht in der Zukunft liegen!", vbInformation)
|
||||
@@ -552,7 +569,14 @@ Public Class frmEintragAviso
|
||||
|
||||
End If
|
||||
|
||||
If cGlobal.Aktive_ID = 0 Then ' nur wenn Neuanlage!
|
||||
If datVoraussichtlichesEintreffen.Visible AndAlso CDate(datVoraussichtlichesEintreffen.Value.ToShortDateString) < CDate(dtpDatum.Value.ToShortDateString) Then 'ohne Uhrzeit
|
||||
lblErrVorraussuchtlEintreffen.Visible = True
|
||||
datVoraussichtlichesEintreffen.Focus()
|
||||
Exit Sub
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
If cboImEx.Visible Then 'cGlobal.AktiverMitarbeiter.Abteilung = "QS" Or cGlobal.AktiverMitarbeiter.Grenzstelle = "WAI" Then
|
||||
@@ -669,8 +693,15 @@ Public Class frmEintragAviso
|
||||
myAviso.LKW_Nr = txtLKW_Nr.Text.Trim.Replace(" ", "")
|
||||
myAviso.LKW_Nationalitaet = sbLkwNationalitaet._value
|
||||
myAviso.DakosyRef = SQL.isNullNothing(txtDyRef.Text.Trim)
|
||||
If datVoraussichtlichesEintreffen.Visible Then
|
||||
myAviso.VoraussichtlichesEintreffen = datVoraussichtlichesEintreffen.Value
|
||||
Else
|
||||
myAviso.VoraussichtlichesEintreffen = Nothing
|
||||
End If
|
||||
|
||||
|
||||
myAviso.FahrerHandy = If(txtFahrerHandy.Text.Trim <> "", txtFahrerHandy.Text.Trim, Nothing)
|
||||
myAviso.KdAuftragsNr_Avisierer = If(txtAvisiererAuftragsNr.Text.Trim <> "", txtAvisiererAuftragsNr.Text.Trim, Nothing)
|
||||
|
||||
|
||||
If cbxFrächterUnbekannt.Checked Then
|
||||
@@ -746,11 +777,13 @@ Public Class frmEintragAviso
|
||||
aendText = "Änderung per Eingabefenster von " & cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")
|
||||
End If
|
||||
|
||||
Dim DatAnkunftNow = AVISOFUNC.getAnkunftDateNow()
|
||||
|
||||
If optAvisoEingang.Checked Then
|
||||
myAviso.AvisoEingang = dtpAvisoEingangDatum.Value.Date + dtpAvisoEingangZeit.Value.TimeOfDay
|
||||
Else 'ohne AVISO
|
||||
myAviso.AvisoEingang = Now
|
||||
myAviso.Ankunft = Now
|
||||
myAviso.Ankunft = DatAnkunftNow
|
||||
myAviso.Status = cGlobal.Status_Ankunft
|
||||
End If
|
||||
|
||||
@@ -1029,7 +1062,7 @@ Public Class frmEintragAviso
|
||||
|
||||
Catch ex As Exception
|
||||
Me.Cursor = Cursors.Default
|
||||
MsgBox(ex.Message)
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@@ -1061,6 +1094,7 @@ Public Class frmEintragAviso
|
||||
Case "WAI" : filialeNr = 5103
|
||||
Case "NKD" : filialeNr = 5303
|
||||
Case "SFD" : filialeNr = 4839
|
||||
Case "NEU" : filialeNr = 4819
|
||||
Case "???", "" : If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_standartFiliale > 0 Then filialeNr = VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_standartFiliale
|
||||
End Select
|
||||
ElseIf (cnt - txtSendungen.Text) <= txtSndFiskalAT.Text Then
|
||||
@@ -1497,7 +1531,7 @@ Public Class frmEintragAviso
|
||||
|
||||
Private Sub cboGrenzstelle_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboGrenzstelle.SelectedIndexChanged
|
||||
|
||||
cboImEx.Visible = (cboGrenzstelle.Text = "WAI" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "UNISPED")
|
||||
' cboImEx.Visible = (cboGrenzstelle.Text = "WAI" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "UNISPED")
|
||||
Label1.Visible = (cboGrenzstelle.Text = "WAI" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "UNISPED")
|
||||
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERAG" Then
|
||||
@@ -1562,6 +1596,9 @@ Public Class frmEintragAviso
|
||||
End Sub
|
||||
|
||||
Private Sub optAvisoEingang_CheckedChanged(sender As Object, e As EventArgs) Handles optAvisoEingang.CheckedChanged
|
||||
datVoraussichtlichesEintreffen.Visible = optAvisoEingang.Checked
|
||||
' Button5.Visible = optAvisoEingang.Checked
|
||||
Label24.Visible = optAvisoEingang.Checked
|
||||
|
||||
If optOhneAviso.Checked Then cbxAktenzettelDrucken.Checked = False
|
||||
End Sub
|
||||
@@ -1603,4 +1640,16 @@ Public Class frmEintragAviso
|
||||
kdFrächter.Text = kdAvisierer.Text
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub dgvAnhaenge_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvAnhaenge.CellDoubleClick, dgvAnhaenge.CellContentDoubleClick
|
||||
Try
|
||||
If dgvAnhaenge.SelectedRows.Count > 0 Then
|
||||
If dgvAnhaenge.SelectedRows(0).Cells(1).Value <> "" Then
|
||||
Process.Start(dgvAnhaenge.SelectedRows(0).Cells(1).Value)
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
283
Aviso/frmHauptfenster.Designer.vb
generated
283
Aviso/frmHauptfenster.Designer.vb
generated
@@ -149,6 +149,7 @@ Partial Class frmHauptfenster
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.txtSuche = New System.Windows.Forms.TextBox()
|
||||
Me.Top = New System.Windows.Forms.Panel()
|
||||
Me.Button9 = New System.Windows.Forms.Button()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.btnFakturierung = New System.Windows.Forms.Button()
|
||||
Me.btnDienstplan = New System.Windows.Forms.Button()
|
||||
@@ -180,17 +181,22 @@ Partial Class frmHauptfenster
|
||||
Me.lblSuche = New System.Windows.Forms.Label()
|
||||
Me.SplitContainer2 = New System.Windows.Forms.SplitContainer()
|
||||
Me.pnlLinks = New System.Windows.Forms.Panel()
|
||||
Me.lblErrVermerk = New System.Windows.Forms.Label()
|
||||
Me.Label20 = New System.Windows.Forms.Label()
|
||||
Me.picAVISOMessenger = New System.Windows.Forms.PictureBox()
|
||||
Me.pic = New System.Windows.Forms.PictureBox()
|
||||
Me.lblHinweis = New System.Windows.Forms.Label()
|
||||
Me.lblErrVermerk = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.lblVersion = New System.Windows.Forms.Label()
|
||||
Me.pnlLinksOben = New System.Windows.Forms.Panel()
|
||||
Me.btnNeu = New System.Windows.Forms.Button()
|
||||
Me.SplitContainer3 = New System.Windows.Forms.SplitContainer()
|
||||
Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.Panel6 = New System.Windows.Forms.Panel()
|
||||
Me.lblMeineAviso = New System.Windows.Forms.Label()
|
||||
Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.cbx_My_LKW = New System.Windows.Forms.CheckBox()
|
||||
@@ -198,7 +204,6 @@ Partial Class frmHauptfenster
|
||||
Me.cboMy_VB = New System.Windows.Forms.CheckBox()
|
||||
Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label17 = New System.Windows.Forms.Label()
|
||||
Me.lblMeineAviso = New System.Windows.Forms.Label()
|
||||
Me.lblAkte = New System.Windows.Forms.Label()
|
||||
Me.btnClose = New System.Windows.Forms.Button()
|
||||
Me.TimerAkte = New System.Windows.Forms.Timer(Me.components)
|
||||
@@ -218,6 +223,8 @@ Partial Class frmHauptfenster
|
||||
Me.splitMain = New System.Windows.Forms.SplitContainer()
|
||||
Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.cboImEx = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label21 = New System.Windows.Forms.Label()
|
||||
Me.cbxCluster = New System.Windows.Forms.CheckBox()
|
||||
Me.cboTeams = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.lklErweitereSuche = New System.Windows.Forms.LinkLabel()
|
||||
@@ -266,8 +273,8 @@ Partial Class frmHauptfenster
|
||||
Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.BundesanzeigerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.EUTaricToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Timer_REFRESH = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem()
|
||||
Me.TimerMessanger_NewMessages = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.conMenuAviso.SuspendLayout()
|
||||
Me.MenuStrip1.SuspendLayout()
|
||||
Me.Top.SuspendLayout()
|
||||
@@ -279,6 +286,11 @@ Partial Class frmHauptfenster
|
||||
CType(Me.picAVISOMessenger, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.pnlLinksOben.SuspendLayout()
|
||||
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainer3.Panel1.SuspendLayout()
|
||||
Me.SplitContainer3.Panel2.SuspendLayout()
|
||||
Me.SplitContainer3.SuspendLayout()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel6.SuspendLayout()
|
||||
Me.tbcntrAviso.SuspendLayout()
|
||||
@@ -383,7 +395,7 @@ Partial Class frmHauptfenster
|
||||
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.mnuProgramm, Me.FunktionenToolStripMenuItem, Me.StatistikToolStripMenuItem, Me.ToolStripFormulare, Me.mnuFragezeichen})
|
||||
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.MenuStrip1.Name = "MenuStrip1"
|
||||
Me.MenuStrip1.Size = New System.Drawing.Size(1117, 24)
|
||||
Me.MenuStrip1.Size = New System.Drawing.Size(1372, 24)
|
||||
Me.MenuStrip1.TabIndex = 3
|
||||
Me.MenuStrip1.Text = "MenuStrip1"
|
||||
'
|
||||
@@ -1049,7 +1061,7 @@ Partial Class frmHauptfenster
|
||||
Me.pnlDetailsRechts.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnlDetailsRechts.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnlDetailsRechts.Name = "pnlDetailsRechts"
|
||||
Me.pnlDetailsRechts.Size = New System.Drawing.Size(390, 599)
|
||||
Me.pnlDetailsRechts.Size = New System.Drawing.Size(480, 599)
|
||||
Me.pnlDetailsRechts.TabIndex = 0
|
||||
'
|
||||
'Label6
|
||||
@@ -1075,6 +1087,7 @@ Partial Class frmHauptfenster
|
||||
'Top
|
||||
'
|
||||
Me.Top.BackColor = System.Drawing.Color.White
|
||||
Me.Top.Controls.Add(Me.Button9)
|
||||
Me.Top.Controls.Add(Me.Button5)
|
||||
Me.Top.Controls.Add(Me.btnFakturierung)
|
||||
Me.Top.Controls.Add(Me.btnDienstplan)
|
||||
@@ -1089,9 +1102,26 @@ Partial Class frmHauptfenster
|
||||
Me.Top.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Top.Location = New System.Drawing.Point(0, 24)
|
||||
Me.Top.Name = "Top"
|
||||
Me.Top.Size = New System.Drawing.Size(1117, 52)
|
||||
Me.Top.Size = New System.Drawing.Size(1372, 52)
|
||||
Me.Top.TabIndex = 6
|
||||
'
|
||||
'Button9
|
||||
'
|
||||
Me.Button9.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button9.Cursor = System.Windows.Forms.Cursors.Default
|
||||
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button9.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button9.Image = Global.AVISO.My.Resources.Resources.Telefonliste_small
|
||||
Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button9.Location = New System.Drawing.Point(1138, 6)
|
||||
Me.Button9.Name = "Button9"
|
||||
Me.Button9.Size = New System.Drawing.Size(119, 39)
|
||||
Me.Button9.TabIndex = 12
|
||||
Me.Button9.TabStop = False
|
||||
Me.Button9.Text = "Kontakte/Tel"
|
||||
Me.Button9.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button9.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button5
|
||||
'
|
||||
Me.Button5.Cursor = System.Windows.Forms.Cursors.Default
|
||||
@@ -1134,7 +1164,7 @@ Partial Class frmHauptfenster
|
||||
Me.btnDienstplan.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnDienstplan.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnDienstplan.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnDienstplan.Location = New System.Drawing.Point(1005, 6)
|
||||
Me.btnDienstplan.Location = New System.Drawing.Point(1260, 6)
|
||||
Me.btnDienstplan.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.btnDienstplan.Name = "btnDienstplan"
|
||||
Me.btnDienstplan.Size = New System.Drawing.Size(103, 39)
|
||||
@@ -1312,7 +1342,7 @@ Partial Class frmHauptfenster
|
||||
Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblDauer.BackColor = System.Drawing.Color.White
|
||||
Me.lblDauer.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.lblDauer.Location = New System.Drawing.Point(729, 5)
|
||||
Me.lblDauer.Location = New System.Drawing.Point(984, 5)
|
||||
Me.lblDauer.Name = "lblDauer"
|
||||
Me.lblDauer.Size = New System.Drawing.Size(212, 15)
|
||||
Me.lblDauer.TabIndex = 2
|
||||
@@ -1451,7 +1481,7 @@ Partial Class frmHauptfenster
|
||||
Me.btnMinimieren.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnMinimieren.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnMinimieren.ForeColor = System.Drawing.Color.White
|
||||
Me.btnMinimieren.Location = New System.Drawing.Point(995, -1)
|
||||
Me.btnMinimieren.Location = New System.Drawing.Point(1250, -1)
|
||||
Me.btnMinimieren.Name = "btnMinimieren"
|
||||
Me.btnMinimieren.RightToLeft = System.Windows.Forms.RightToLeft.Yes
|
||||
Me.btnMinimieren.Size = New System.Drawing.Size(63, 28)
|
||||
@@ -1484,21 +1514,20 @@ Partial Class frmHauptfenster
|
||||
'
|
||||
'SplitContainer2.Panel2
|
||||
'
|
||||
Me.SplitContainer2.Panel2.Controls.Add(Me.gridMyAviso)
|
||||
Me.SplitContainer2.Panel2.Controls.Add(Me.Panel6)
|
||||
Me.SplitContainer2.Panel2.Controls.Add(Me.SplitContainer3)
|
||||
Me.SplitContainer2.Panel2MinSize = 650
|
||||
Me.SplitContainer2.Size = New System.Drawing.Size(720, 298)
|
||||
Me.SplitContainer2.SplitterDistance = 69
|
||||
Me.SplitContainer2.Size = New System.Drawing.Size(885, 298)
|
||||
Me.SplitContainer2.SplitterDistance = 230
|
||||
Me.SplitContainer2.SplitterWidth = 1
|
||||
Me.SplitContainer2.TabIndex = 0
|
||||
'
|
||||
'pnlLinks
|
||||
'
|
||||
Me.pnlLinks.Controls.Add(Me.lblErrVermerk)
|
||||
Me.pnlLinks.Controls.Add(Me.Label20)
|
||||
Me.pnlLinks.Controls.Add(Me.picAVISOMessenger)
|
||||
Me.pnlLinks.Controls.Add(Me.pic)
|
||||
Me.pnlLinks.Controls.Add(Me.lblHinweis)
|
||||
Me.pnlLinks.Controls.Add(Me.lblErrVermerk)
|
||||
Me.pnlLinks.Controls.Add(Me.Label7)
|
||||
Me.pnlLinks.Controls.Add(Me.Button1)
|
||||
Me.pnlLinks.Controls.Add(Me.Button7)
|
||||
@@ -1506,27 +1535,44 @@ Partial Class frmHauptfenster
|
||||
Me.pnlLinks.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnlLinks.Location = New System.Drawing.Point(0, 43)
|
||||
Me.pnlLinks.Name = "pnlLinks"
|
||||
Me.pnlLinks.Size = New System.Drawing.Size(69, 255)
|
||||
Me.pnlLinks.Size = New System.Drawing.Size(230, 255)
|
||||
Me.pnlLinks.TabIndex = 0
|
||||
'
|
||||
'lblErrVermerk
|
||||
'
|
||||
Me.lblErrVermerk.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblErrVermerk.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
|
||||
Me.lblErrVermerk.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErrVermerk.Location = New System.Drawing.Point(2, 95)
|
||||
Me.lblErrVermerk.Name = "lblErrVermerk"
|
||||
Me.lblErrVermerk.Size = New System.Drawing.Size(205, 27)
|
||||
Me.lblErrVermerk.TabIndex = 1
|
||||
Me.lblErrVermerk.Text = "Bei diesem Status kann kein Vermerk erfasst werden!"
|
||||
Me.lblErrVermerk.TextAlign = System.Drawing.ContentAlignment.BottomLeft
|
||||
Me.lblErrVermerk.Visible = False
|
||||
'
|
||||
'Label20
|
||||
'
|
||||
Me.Label20.BackColor = System.Drawing.Color.Transparent
|
||||
Me.Label20.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label20.BackColor = System.Drawing.Color.Red
|
||||
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label20.ForeColor = System.Drawing.Color.Red
|
||||
Me.Label20.Location = New System.Drawing.Point(48, 226)
|
||||
Me.Label20.ForeColor = System.Drawing.Color.White
|
||||
Me.Label20.Location = New System.Drawing.Point(49, 223)
|
||||
Me.Label20.Name = "Label20"
|
||||
Me.Label20.Size = New System.Drawing.Size(24, 16)
|
||||
Me.Label20.Size = New System.Drawing.Size(28, 19)
|
||||
Me.Label20.TabIndex = 9
|
||||
Me.Label20.Text = "99"
|
||||
Me.Label20.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
Me.Label20.Visible = False
|
||||
'
|
||||
'picAVISOMessenger
|
||||
'
|
||||
Me.picAVISOMessenger.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.picAVISOMessenger.BackgroundImage = Global.AVISO.My.Resources.Resources.aviso_messenger
|
||||
Me.picAVISOMessenger.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.picAVISOMessenger.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.picAVISOMessenger.Location = New System.Drawing.Point(1, 178)
|
||||
Me.picAVISOMessenger.Location = New System.Drawing.Point(1, 175)
|
||||
Me.picAVISOMessenger.Name = "picAVISOMessenger"
|
||||
Me.picAVISOMessenger.Size = New System.Drawing.Size(59, 55)
|
||||
Me.picAVISOMessenger.TabIndex = 7
|
||||
@@ -1555,20 +1601,6 @@ Partial Class frmHauptfenster
|
||||
Me.lblHinweis.Text = "Hinweis eingetragen"
|
||||
Me.lblHinweis.Visible = False
|
||||
'
|
||||
'lblErrVermerk
|
||||
'
|
||||
Me.lblErrVermerk.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblErrVermerk.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
|
||||
Me.lblErrVermerk.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErrVermerk.Location = New System.Drawing.Point(2, 159)
|
||||
Me.lblErrVermerk.Name = "lblErrVermerk"
|
||||
Me.lblErrVermerk.Size = New System.Drawing.Size(44, 27)
|
||||
Me.lblErrVermerk.TabIndex = 1
|
||||
Me.lblErrVermerk.Text = "Bei diesem Status kann kein Vermerk erfasst werden!"
|
||||
Me.lblErrVermerk.TextAlign = System.Drawing.ContentAlignment.BottomLeft
|
||||
Me.lblErrVermerk.Visible = False
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
@@ -1598,7 +1630,7 @@ Partial Class frmHauptfenster
|
||||
Me.pnlLinksOben.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnlLinksOben.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnlLinksOben.Name = "pnlLinksOben"
|
||||
Me.pnlLinksOben.Size = New System.Drawing.Size(69, 43)
|
||||
Me.pnlLinksOben.Size = New System.Drawing.Size(230, 43)
|
||||
Me.pnlLinksOben.TabIndex = 1
|
||||
'
|
||||
'btnNeu
|
||||
@@ -1617,6 +1649,56 @@ Partial Class frmHauptfenster
|
||||
Me.btnNeu.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnNeu.UseVisualStyleBackColor = True
|
||||
'
|
||||
'SplitContainer3
|
||||
'
|
||||
Me.SplitContainer3.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.SplitContainer3.Location = New System.Drawing.Point(0, 0)
|
||||
Me.SplitContainer3.Name = "SplitContainer3"
|
||||
'
|
||||
'SplitContainer3.Panel1
|
||||
'
|
||||
Me.SplitContainer3.Panel1.Controls.Add(Me.UsrCntlBenachrichtigungen1)
|
||||
'
|
||||
'SplitContainer3.Panel2
|
||||
'
|
||||
Me.SplitContainer3.Panel2.Controls.Add(Me.pnl)
|
||||
Me.SplitContainer3.Size = New System.Drawing.Size(654, 298)
|
||||
Me.SplitContainer3.SplitterDistance = 166
|
||||
Me.SplitContainer3.TabIndex = 3
|
||||
'
|
||||
'UsrCntlBenachrichtigungen1
|
||||
'
|
||||
Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1"
|
||||
Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(166, 298)
|
||||
Me.UsrCntlBenachrichtigungen1.TabIndex = 0
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.Controls.Add(Me.Button10)
|
||||
Me.pnl.Controls.Add(Me.gridMyAviso)
|
||||
Me.pnl.Controls.Add(Me.Panel6)
|
||||
Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.pnl.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(484, 298)
|
||||
Me.pnl.TabIndex = 0
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.BackColor = System.Drawing.Color.White
|
||||
Me.Button10.FlatAppearance.BorderColor = System.Drawing.Color.Black
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button10.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button10.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Button10.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(17, 22)
|
||||
Me.Button10.TabIndex = 2
|
||||
Me.Button10.Text = "<"
|
||||
Me.Button10.UseVisualStyleBackColor = False
|
||||
'
|
||||
'gridMyAviso
|
||||
'
|
||||
Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1
|
||||
@@ -1628,17 +1710,18 @@ Partial Class frmHauptfenster
|
||||
Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle7
|
||||
Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
|
||||
Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.gridMyAviso.Location = New System.Drawing.Point(0, 21)
|
||||
Me.gridMyAviso.Name = "gridMyAviso"
|
||||
Me.gridMyAviso.ReadOnly = True
|
||||
Me.gridMyAviso.RowHeadersVisible = False
|
||||
Me.gridMyAviso.Size = New System.Drawing.Size(650, 277)
|
||||
Me.gridMyAviso.Size = New System.Drawing.Size(484, 277)
|
||||
Me.gridMyAviso.TabIndex = 0
|
||||
'
|
||||
'Panel6
|
||||
'
|
||||
Me.Panel6.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Panel6.Controls.Add(Me.lblMeineAviso)
|
||||
Me.Panel6.Controls.Add(Me.cboMy_Grenzstelle)
|
||||
Me.Panel6.Controls.Add(Me.Label18)
|
||||
Me.Panel6.Controls.Add(Me.cbx_My_LKW)
|
||||
@@ -1646,14 +1729,24 @@ Partial Class frmHauptfenster
|
||||
Me.Panel6.Controls.Add(Me.cboMy_VB)
|
||||
Me.Panel6.Controls.Add(Me.cboMyAvisoAnzeige)
|
||||
Me.Panel6.Controls.Add(Me.Label17)
|
||||
Me.Panel6.Controls.Add(Me.lblMeineAviso)
|
||||
Me.Panel6.Controls.Add(Me.lblAkte)
|
||||
Me.Panel6.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel6.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel6.Name = "Panel6"
|
||||
Me.Panel6.Size = New System.Drawing.Size(650, 21)
|
||||
Me.Panel6.Size = New System.Drawing.Size(484, 21)
|
||||
Me.Panel6.TabIndex = 1
|
||||
'
|
||||
'lblMeineAviso
|
||||
'
|
||||
Me.lblMeineAviso.AutoSize = True
|
||||
Me.lblMeineAviso.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblMeineAviso.ForeColor = System.Drawing.Color.White
|
||||
Me.lblMeineAviso.Location = New System.Drawing.Point(29, 5)
|
||||
Me.lblMeineAviso.Name = "lblMeineAviso"
|
||||
Me.lblMeineAviso.Size = New System.Drawing.Size(113, 13)
|
||||
Me.lblMeineAviso.TabIndex = 0
|
||||
Me.lblMeineAviso.Text = "Meine Sendungen:"
|
||||
'
|
||||
'cboMy_Grenzstelle
|
||||
'
|
||||
Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
|
||||
@@ -1665,7 +1758,7 @@ Partial Class frmHauptfenster
|
||||
Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.cboMy_Grenzstelle.FormattingEnabled = True
|
||||
Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(345, 1)
|
||||
Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(165, 1)
|
||||
Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
|
||||
Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
|
||||
Me.cboMy_Grenzstelle.TabIndex = 26
|
||||
@@ -1675,7 +1768,7 @@ Partial Class frmHauptfenster
|
||||
Me.Label18.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label18.AutoSize = True
|
||||
Me.Label18.ForeColor = System.Drawing.Color.White
|
||||
Me.Label18.Location = New System.Drawing.Point(277, 4)
|
||||
Me.Label18.Location = New System.Drawing.Point(97, 4)
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Size = New System.Drawing.Size(62, 13)
|
||||
Me.Label18.TabIndex = 25
|
||||
@@ -1686,7 +1779,7 @@ Partial Class frmHauptfenster
|
||||
Me.cbx_My_LKW.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.cbx_My_LKW.AutoSize = True
|
||||
Me.cbx_My_LKW.ForeColor = System.Drawing.Color.White
|
||||
Me.cbx_My_LKW.Location = New System.Drawing.Point(221, 3)
|
||||
Me.cbx_My_LKW.Location = New System.Drawing.Point(41, 3)
|
||||
Me.cbx_My_LKW.Name = "cbx_My_LKW"
|
||||
Me.cbx_My_LKW.Size = New System.Drawing.Size(50, 17)
|
||||
Me.cbx_My_LKW.TabIndex = 24
|
||||
@@ -1700,7 +1793,7 @@ Partial Class frmHauptfenster
|
||||
Me.cboMy_QS.Checked = True
|
||||
Me.cboMy_QS.CheckState = System.Windows.Forms.CheckState.Indeterminate
|
||||
Me.cboMy_QS.ForeColor = System.Drawing.Color.White
|
||||
Me.cboMy_QS.Location = New System.Drawing.Point(607, 3)
|
||||
Me.cboMy_QS.Location = New System.Drawing.Point(427, 3)
|
||||
Me.cboMy_QS.Name = "cboMy_QS"
|
||||
Me.cboMy_QS.Size = New System.Drawing.Size(15, 14)
|
||||
Me.cboMy_QS.TabIndex = 23
|
||||
@@ -1714,7 +1807,7 @@ Partial Class frmHauptfenster
|
||||
Me.cboMy_VB.Checked = True
|
||||
Me.cboMy_VB.CheckState = System.Windows.Forms.CheckState.Indeterminate
|
||||
Me.cboMy_VB.ForeColor = System.Drawing.Color.White
|
||||
Me.cboMy_VB.Location = New System.Drawing.Point(628, 3)
|
||||
Me.cboMy_VB.Location = New System.Drawing.Point(448, 3)
|
||||
Me.cboMy_VB.Name = "cboMy_VB"
|
||||
Me.cboMy_VB.Size = New System.Drawing.Size(15, 14)
|
||||
Me.cboMy_VB.TabIndex = 22
|
||||
@@ -1732,7 +1825,7 @@ Partial Class frmHauptfenster
|
||||
Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.cboMyAvisoAnzeige.FormattingEnabled = True
|
||||
Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(464, 1)
|
||||
Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(284, 1)
|
||||
Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
|
||||
Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21)
|
||||
Me.cboMyAvisoAnzeige.TabIndex = 21
|
||||
@@ -1742,28 +1835,17 @@ Partial Class frmHauptfenster
|
||||
Me.Label17.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label17.AutoSize = True
|
||||
Me.Label17.ForeColor = System.Drawing.Color.White
|
||||
Me.Label17.Location = New System.Drawing.Point(415, 3)
|
||||
Me.Label17.Location = New System.Drawing.Point(235, 3)
|
||||
Me.Label17.Name = "Label17"
|
||||
Me.Label17.Size = New System.Drawing.Size(48, 13)
|
||||
Me.Label17.TabIndex = 20
|
||||
Me.Label17.Text = "Anzeige:"
|
||||
'
|
||||
'lblMeineAviso
|
||||
'
|
||||
Me.lblMeineAviso.AutoSize = True
|
||||
Me.lblMeineAviso.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblMeineAviso.ForeColor = System.Drawing.Color.White
|
||||
Me.lblMeineAviso.Location = New System.Drawing.Point(4, 6)
|
||||
Me.lblMeineAviso.Name = "lblMeineAviso"
|
||||
Me.lblMeineAviso.Size = New System.Drawing.Size(113, 13)
|
||||
Me.lblMeineAviso.TabIndex = 0
|
||||
Me.lblMeineAviso.Text = "Meine Sendungen:"
|
||||
'
|
||||
'lblAkte
|
||||
'
|
||||
Me.lblAkte.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblAkte.ForeColor = System.Drawing.Color.White
|
||||
Me.lblAkte.Location = New System.Drawing.Point(993, 6)
|
||||
Me.lblAkte.Location = New System.Drawing.Point(813, 6)
|
||||
Me.lblAkte.Name = "lblAkte"
|
||||
Me.lblAkte.Size = New System.Drawing.Size(207, 19)
|
||||
Me.lblAkte.TabIndex = 1
|
||||
@@ -1779,7 +1861,7 @@ Partial Class frmHauptfenster
|
||||
Me.btnClose.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnClose.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnClose.ForeColor = System.Drawing.Color.White
|
||||
Me.btnClose.Location = New System.Drawing.Point(1055, -1)
|
||||
Me.btnClose.Location = New System.Drawing.Point(1310, -1)
|
||||
Me.btnClose.Name = "btnClose"
|
||||
Me.btnClose.RightToLeft = System.Windows.Forms.RightToLeft.Yes
|
||||
Me.btnClose.Size = New System.Drawing.Size(63, 28)
|
||||
@@ -1851,7 +1933,7 @@ Partial Class frmHauptfenster
|
||||
Me.pnlAktOption.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnlAktOption.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnlAktOption.Name = "pnlAktOption"
|
||||
Me.pnlAktOption.Size = New System.Drawing.Size(720, 5)
|
||||
Me.pnlAktOption.Size = New System.Drawing.Size(885, 5)
|
||||
Me.pnlAktOption.TabIndex = 1
|
||||
'
|
||||
'Button8
|
||||
@@ -1861,7 +1943,7 @@ Partial Class frmHauptfenster
|
||||
Me.Button8.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button8.Image = CType(resources.GetObject("Button8.Image"), System.Drawing.Image)
|
||||
Me.Button8.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button8.Location = New System.Drawing.Point(362, 214)
|
||||
Me.Button8.Location = New System.Drawing.Point(527, 214)
|
||||
Me.Button8.Name = "Button8"
|
||||
Me.Button8.Size = New System.Drawing.Size(89, 34)
|
||||
Me.Button8.TabIndex = 3
|
||||
@@ -1878,7 +1960,7 @@ Partial Class frmHauptfenster
|
||||
Me.btnFertig.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnFertig.Image = CType(resources.GetObject("btnFertig.Image"), System.Drawing.Image)
|
||||
Me.btnFertig.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnFertig.Location = New System.Drawing.Point(466, 214)
|
||||
Me.btnFertig.Location = New System.Drawing.Point(631, 214)
|
||||
Me.btnFertig.Name = "btnFertig"
|
||||
Me.btnFertig.Size = New System.Drawing.Size(102, 34)
|
||||
Me.btnFertig.TabIndex = 0
|
||||
@@ -1948,8 +2030,8 @@ Partial Class frmHauptfenster
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.btnSmall)
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.pnlDetailsRechts)
|
||||
Me.SplitContainer1.Panel2MinSize = 300
|
||||
Me.SplitContainer1.Size = New System.Drawing.Size(1117, 601)
|
||||
Me.SplitContainer1.SplitterDistance = 724
|
||||
Me.SplitContainer1.Size = New System.Drawing.Size(1372, 601)
|
||||
Me.SplitContainer1.SplitterDistance = 889
|
||||
Me.SplitContainer1.SplitterWidth = 1
|
||||
Me.SplitContainer1.TabIndex = 7
|
||||
'
|
||||
@@ -1962,7 +2044,7 @@ Partial Class frmHauptfenster
|
||||
Me.pnlDetailsLinks.Location = New System.Drawing.Point(0, 0)
|
||||
Me.pnlDetailsLinks.MinimumSize = New System.Drawing.Size(324, 564)
|
||||
Me.pnlDetailsLinks.Name = "pnlDetailsLinks"
|
||||
Me.pnlDetailsLinks.Size = New System.Drawing.Size(722, 599)
|
||||
Me.pnlDetailsLinks.Size = New System.Drawing.Size(887, 599)
|
||||
Me.pnlDetailsLinks.TabIndex = 0
|
||||
'
|
||||
'splitMain
|
||||
@@ -1985,7 +2067,7 @@ Partial Class frmHauptfenster
|
||||
'
|
||||
Me.splitMain.Panel2.Controls.Add(Me.SplitContainer2)
|
||||
Me.splitMain.Panel2.Controls.Add(Me.pnlAktOption)
|
||||
Me.splitMain.Size = New System.Drawing.Size(720, 597)
|
||||
Me.splitMain.Size = New System.Drawing.Size(885, 597)
|
||||
Me.splitMain.SplitterDistance = 290
|
||||
Me.splitMain.TabIndex = 0
|
||||
'
|
||||
@@ -2037,13 +2119,15 @@ Partial Class frmHauptfenster
|
||||
Me.gridAviso.RowTemplate.ReadOnly = True
|
||||
Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.gridAviso.Size = New System.Drawing.Size(720, 82)
|
||||
Me.gridAviso.Size = New System.Drawing.Size(885, 82)
|
||||
Me.gridAviso.TabIndex = 1
|
||||
Me.gridAviso.TabStop = False
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Panel1.Controls.Add(Me.cboImEx)
|
||||
Me.Panel1.Controls.Add(Me.Label21)
|
||||
Me.Panel1.Controls.Add(Me.cbxCluster)
|
||||
Me.Panel1.Controls.Add(Me.cboTeams)
|
||||
Me.Panel1.Controls.Add(Me.lklErweitereSuche)
|
||||
@@ -2067,9 +2151,35 @@ Partial Class frmHauptfenster
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(720, 208)
|
||||
Me.Panel1.Size = New System.Drawing.Size(885, 208)
|
||||
Me.Panel1.TabIndex = 2
|
||||
'
|
||||
'cboImEx
|
||||
'
|
||||
Me.cboImEx._allowedValuesFreiText = Nothing
|
||||
Me.cboImEx._allowFreiText = False
|
||||
Me.cboImEx._value = ""
|
||||
Me.cboImEx.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboImEx.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboImEx.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboImEx.FormattingEnabled = True
|
||||
Me.cboImEx.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"})
|
||||
Me.cboImEx.Location = New System.Drawing.Point(828, 3)
|
||||
Me.cboImEx.Name = "cboImEx"
|
||||
Me.cboImEx.Size = New System.Drawing.Size(78, 24)
|
||||
Me.cboImEx.TabIndex = 24
|
||||
'
|
||||
'Label21
|
||||
'
|
||||
Me.Label21.AutoSize = True
|
||||
Me.Label21.ForeColor = System.Drawing.Color.White
|
||||
Me.Label21.Location = New System.Drawing.Point(777, 9)
|
||||
Me.Label21.Name = "Label21"
|
||||
Me.Label21.Size = New System.Drawing.Size(41, 13)
|
||||
Me.Label21.TabIndex = 23
|
||||
Me.Label21.Text = "IM/EX:"
|
||||
'
|
||||
'cbxCluster
|
||||
'
|
||||
Me.cbxCluster.AutoSize = True
|
||||
@@ -2136,7 +2246,7 @@ Partial Class frmHauptfenster
|
||||
Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblEintraege.BackColor = System.Drawing.Color.Transparent
|
||||
Me.lblEintraege.ForeColor = System.Drawing.Color.White
|
||||
Me.lblEintraege.Location = New System.Drawing.Point(421, 56)
|
||||
Me.lblEintraege.Location = New System.Drawing.Point(586, 56)
|
||||
Me.lblEintraege.Name = "lblEintraege"
|
||||
Me.lblEintraege.Size = New System.Drawing.Size(169, 15)
|
||||
Me.lblEintraege.TabIndex = 14
|
||||
@@ -2153,7 +2263,7 @@ Partial Class frmHauptfenster
|
||||
Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboGrenzstelle.FormattingEnabled = True
|
||||
Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"})
|
||||
Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU"})
|
||||
Me.cboGrenzstelle.Location = New System.Drawing.Point(379, 30)
|
||||
Me.cboGrenzstelle.Name = "cboGrenzstelle"
|
||||
Me.cboGrenzstelle.Size = New System.Drawing.Size(67, 24)
|
||||
@@ -2183,7 +2293,7 @@ Partial Class frmHauptfenster
|
||||
Me.pnlTime.Controls.Add(Me.Label5)
|
||||
Me.pnlTime.Location = New System.Drawing.Point(446, 0)
|
||||
Me.pnlTime.Name = "pnlTime"
|
||||
Me.pnlTime.Size = New System.Drawing.Size(274, 57)
|
||||
Me.pnlTime.Size = New System.Drawing.Size(439, 57)
|
||||
Me.pnlTime.TabIndex = 12
|
||||
'
|
||||
'MyComboBox1
|
||||
@@ -2479,7 +2589,6 @@ Partial Class frmHauptfenster
|
||||
'
|
||||
'timerStandzeit
|
||||
'
|
||||
Me.timerStandzeit.Enabled = True
|
||||
Me.timerStandzeit.Interval = 300000
|
||||
'
|
||||
'Label9
|
||||
@@ -2574,7 +2683,7 @@ Partial Class frmHauptfenster
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Button2.ForeColor = System.Drawing.Color.White
|
||||
Me.Button2.Location = New System.Drawing.Point(944, -1)
|
||||
Me.Button2.Location = New System.Drawing.Point(1199, -1)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.RightToLeft = System.Windows.Forms.RightToLeft.Yes
|
||||
Me.Button2.Size = New System.Drawing.Size(45, 25)
|
||||
@@ -2600,6 +2709,11 @@ Partial Class frmHauptfenster
|
||||
Me.EUTaricToolStripMenuItem.Size = New System.Drawing.Size(157, 22)
|
||||
Me.EUTaricToolStripMenuItem.Text = "EU-Taric"
|
||||
'
|
||||
'Timer_REFRESH
|
||||
'
|
||||
Me.Timer_REFRESH.Enabled = True
|
||||
Me.Timer_REFRESH.Interval = 5000
|
||||
'
|
||||
'UsrCntlTestsystem1
|
||||
'
|
||||
Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White
|
||||
@@ -2611,16 +2725,11 @@ Partial Class frmHauptfenster
|
||||
Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28)
|
||||
Me.UsrCntlTestsystem1.TabIndex = 8
|
||||
'
|
||||
'TimerMessanger_NewMessages
|
||||
'
|
||||
Me.TimerMessanger_NewMessages.Enabled = True
|
||||
Me.TimerMessanger_NewMessages.Interval = 1000
|
||||
'
|
||||
'frmHauptfenster
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1117, 677)
|
||||
Me.ClientSize = New System.Drawing.Size(1372, 677)
|
||||
Me.Controls.Add(Me.Button2)
|
||||
Me.Controls.Add(Me.pnlOptionen)
|
||||
Me.Controls.Add(Me.Label9)
|
||||
@@ -2653,6 +2762,11 @@ Partial Class frmHauptfenster
|
||||
CType(Me.picAVISOMessenger, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.pnlLinksOben.ResumeLayout(False)
|
||||
Me.SplitContainer3.Panel1.ResumeLayout(False)
|
||||
Me.SplitContainer3.Panel2.ResumeLayout(False)
|
||||
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.SplitContainer3.ResumeLayout(False)
|
||||
Me.pnl.ResumeLayout(False)
|
||||
CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel6.ResumeLayout(False)
|
||||
Me.Panel6.PerformLayout()
|
||||
@@ -2796,7 +2910,6 @@ Partial Class frmHauptfenster
|
||||
Friend WithEvents UsrCntlTestsystem1 As VERAG_PROG_ALLGEMEIN.usrCntlTestsystem
|
||||
Friend WithEvents TabellenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents splitMain As System.Windows.Forms.SplitContainer
|
||||
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Friend WithEvents HandbuchToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents EinheitspapierToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents CMRToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
@@ -2918,5 +3031,13 @@ Partial Class frmHauptfenster
|
||||
Friend WithEvents Label19 As Label
|
||||
Friend WithEvents picAVISOMessenger As PictureBox
|
||||
Friend WithEvents Label20 As Label
|
||||
Friend WithEvents TimerMessanger_NewMessages As Timer
|
||||
Friend WithEvents Timer_REFRESH As Timer
|
||||
Friend WithEvents cboImEx As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label21 As Label
|
||||
Friend WithEvents Button9 As Button
|
||||
Friend WithEvents SplitContainer3 As SplitContainer
|
||||
Friend WithEvents pnl As Panel
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents UsrCntlBenachrichtigungen1 As usrCntlBenachrichtigungen
|
||||
Friend WithEvents Button10 As Button
|
||||
End Class
|
||||
|
||||
@@ -256,8 +256,8 @@
|
||||
<metadata name="cntxt.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1118, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TimerMessanger_NewMessages.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1196, 17</value>
|
||||
<metadata name="Timer_REFRESH.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1421, 17</value>
|
||||
</metadata>
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@@ -42,7 +42,9 @@ Public Class frmLKWBericht
|
||||
End Sub
|
||||
|
||||
Private Sub frmLKWBericht_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If AvisoID < 0 Then AvisoID = cGlobal.Aktive_ID
|
||||
|
||||
|
||||
If AvisoID < 0 Then AvisoID = VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID
|
||||
If AvisoID <= 0 Then
|
||||
MsgBox("Es ist kein LKW ausgewählt!")
|
||||
Me.Close()
|
||||
|
||||
@@ -2,14 +2,36 @@
|
||||
Public Y As Integer = 0
|
||||
Public AvisoID As Integer = 0
|
||||
|
||||
Public TimerInterval = 5000
|
||||
|
||||
|
||||
Public Notify_ART As cNotify_ART
|
||||
|
||||
|
||||
Enum cNotify_ART
|
||||
AVISO_2H
|
||||
NEUER_CHAT
|
||||
End Enum
|
||||
|
||||
Protected Overrides ReadOnly Property ShowWithoutActivation() As Boolean
|
||||
Get
|
||||
Return True
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Sub New(title As String, text As String)
|
||||
Me.InitializeComponent()
|
||||
Me.lblTitle.Text = title
|
||||
Me.lblText.Text = text
|
||||
End Sub
|
||||
|
||||
Sub New(typ As Integer, text As String, id As Integer)
|
||||
Sub New(art As cNotify_ART, typ As Integer, text As String, Optional id As Integer = -1)
|
||||
Me.InitializeComponent()
|
||||
Me.Notify_ART = art
|
||||
|
||||
Select Case Notify_ART
|
||||
Case cNotify_ART.AVISO_2H
|
||||
|
||||
Me.AvisoID = id
|
||||
Select Case typ
|
||||
Case 1
|
||||
@@ -24,6 +46,12 @@
|
||||
Me.lblText.Text = "Der LKW '" & text & "' steht bereits über 24 Stunden!"
|
||||
Me.Header.BackColor = Color.Red
|
||||
End Select
|
||||
Case cNotify_ART.NEUER_CHAT
|
||||
Me.lblTitle.Text = "AVISO-CHAT"
|
||||
Me.lblText.Text = text
|
||||
|
||||
End Select
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
@@ -36,6 +64,7 @@
|
||||
End Sub
|
||||
|
||||
Private Sub frmNotify_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Timer.Interval = TimerInterval
|
||||
lblText.Cursor = IIf(AvisoID > 0, Cursors.Hand, Cursors.Default)
|
||||
'If Y = 0 Then
|
||||
'Me.Location = New Point(Me.Owner.Width - Me.Width - 10, Me.Owner.Height - Me.Height - 10)
|
||||
@@ -44,15 +73,41 @@
|
||||
' End If
|
||||
Dim WIDTH = Screen.FromRectangle(Me.Bounds).WorkingArea.Size.Width
|
||||
Dim hEIGHT = Screen.FromRectangle(Me.Bounds).WorkingArea.Size.Width
|
||||
'RECHTS UNTEN:
|
||||
'If Y = 0 Then
|
||||
' Me.Location = New Point(WIDTH - Me.Width - 10, hEIGHT - Me.Height - 10)
|
||||
'Else
|
||||
' Me.Location = New Point(WIDTH - Me.Width - 10, Y)
|
||||
'End If
|
||||
|
||||
If Y = 0 Then
|
||||
Me.Location = New Point(WIDTH - Me.Width - 10, hEIGHT - Me.Height - 10)
|
||||
Me.Location = New Point(10, hEIGHT - Me.Height - 10)
|
||||
Else
|
||||
Me.Location = New Point(WIDTH - Me.Width - 10, Y)
|
||||
Me.Location = New Point(10, Y)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub lblText_Click(sender As Object, e As EventArgs) Handles lblText.Click
|
||||
Select Case Notify_ART
|
||||
Case cNotify_ART.AVISO_2H
|
||||
frmHauptfenster.Details_anzeigen(AvisoID)
|
||||
Me.Close()
|
||||
Case cNotify_ART.NEUER_CHAT
|
||||
For Each openForm In Application.OpenForms()
|
||||
If TypeOf (openForm) Is VERAG_PROG_ALLGEMEIN.frmMessenger Then
|
||||
CType(openForm, VERAG_PROG_ALLGEMEIN.frmMessenger).WindowState = FormWindowState.Normal
|
||||
CType(openForm, VERAG_PROG_ALLGEMEIN.frmMessenger).BringToFront()
|
||||
Exit Sub
|
||||
End If
|
||||
Next
|
||||
|
||||
Dim f As New VERAG_PROG_ALLGEMEIN.frmMessenger
|
||||
f.Location = Cursor.Position
|
||||
f.Show()
|
||||
Me.Close()
|
||||
End Select
|
||||
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
4282
Aviso/frmSendungsdetailsNEU.Designer.vb
generated
4282
Aviso/frmSendungsdetailsNEU.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
@@ -117,86 +117,7 @@
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>404, 17</value>
|
||||
</metadata>
|
||||
<metadata name="cntxt.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>765, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="FlatButton4.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
|
||||
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
|
||||
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
|
||||
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
|
||||
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
|
||||
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
|
||||
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
|
||||
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
|
||||
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
|
||||
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
|
||||
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
|
||||
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
|
||||
</value>
|
||||
</data>
|
||||
<data name="FlatButton1.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
|
||||
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
|
||||
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
|
||||
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
|
||||
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
|
||||
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
|
||||
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
|
||||
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
|
||||
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
|
||||
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
|
||||
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
|
||||
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="cntxtAnh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>496, 17</value>
|
||||
</metadata>
|
||||
<data name="Button20.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="Button19.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="Button18.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>296, 17</value>
|
||||
</metadata>
|
||||
<data name="Button6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>296, 17</value>
|
||||
</metadata>
|
||||
<data name="Button3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAABGdBTUEAALGPC/xhBQAACQpJREFUaEPl
|
||||
@@ -275,6 +196,47 @@
|
||||
AElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="cntxtAnh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>496, 17</value>
|
||||
</metadata>
|
||||
<data name="Button20.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="Button19.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="Button18.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>296, 17</value>
|
||||
</metadata>
|
||||
<data name="Button6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
|
||||
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
|
||||
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
|
||||
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>296, 17</value>
|
||||
</metadata>
|
||||
<data name="Button9.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAHtJREFUSEvt
|
||||
@@ -371,6 +333,44 @@
|
||||
rGp33g/w9ql7NoGnXyWw0LUP726+A48ybH5BknCWWY7Lq2TVaSzNVMvnjcLjoYqrHD5NUxOdyqYOtXoR
|
||||
rY7H4jHYSnSdT2lHL8uwNOUI/FU+hyHGUMfjc2xVDEQxsJvDOOIVCrQdKLqYyNPBKNaFOo4UMPToVZT5
|
||||
eWpiMRXkm9o//9k=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>404, 17</value>
|
||||
</metadata>
|
||||
<metadata name="cntxt.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>765, 17</value>
|
||||
</metadata>
|
||||
<data name="FlatButton4.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
|
||||
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
|
||||
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
|
||||
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
|
||||
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
|
||||
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
|
||||
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
|
||||
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
|
||||
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
|
||||
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
|
||||
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
|
||||
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
|
||||
</value>
|
||||
</data>
|
||||
<data name="FlatButton1.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
|
||||
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
|
||||
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
|
||||
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
|
||||
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
|
||||
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
|
||||
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
|
||||
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
|
||||
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
|
||||
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
|
||||
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
|
||||
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
|
||||
</value>
|
||||
</data>
|
||||
<data name="btnDelQS.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
|
||||
@@ -169,7 +169,7 @@ Public Class frmSendungsdetailsNEU
|
||||
If e.Modifiers = Keys.Control AndAlso e.KeyCode = Keys.P Then
|
||||
loadDataInLIST()
|
||||
Dim trd = New Threading.Thread(Sub()
|
||||
SendungOptions.PrintSendung("DIALOG", SENDUNG_LIST(CURRENT_INDEX), AVISO)
|
||||
SendungOptions.PrintSendung("DIALOG", SENDUNG_LIST(CURRENT_INDEX), AVISO,,, SENDUNG_LIST.Count)
|
||||
End Sub)
|
||||
trd.IsBackground = True : trd.Start()
|
||||
e.Handled = True
|
||||
@@ -995,8 +995,8 @@ Public Class frmSendungsdetailsNEU
|
||||
rtbAnmerkung.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Anmerkung, "")
|
||||
rtbAnmerkungDispoliste.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_AnmerkungDispoliste, "")
|
||||
|
||||
txtColli.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Colli, "")
|
||||
txtGewicht.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Gewicht, "")
|
||||
txtColli.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Colli, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
|
||||
txtGewicht.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Gewicht, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen
|
||||
rtbWarenbezeichnung.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenbezeichnung, "")
|
||||
cbxSpedBuch.Checked = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen, False)
|
||||
|
||||
@@ -1074,27 +1074,31 @@ Public Class frmSendungsdetailsNEU
|
||||
txtFrachtfuehrer.Text = SENDUNG_LIST(CURRENT_INDEX).tblSnd_Frachtfuehrer 'IIf(SENDUNG_LIST(CURRENT_INDEX).tblSnd_frachtfuehrer Is Nothing, "", SENDUNG_LIST(CURRENT_INDEX).tblSnd_frachtfuehrer)
|
||||
End If
|
||||
|
||||
''Übergangsphase Aviso/Sendung
|
||||
'If txtAvisiererKdNr.Text = "" Then
|
||||
' If AVISO.Auftraggeber_KdNr > -1 Then
|
||||
' txtAvisierer.KdNr = AVISO.Auftraggeber_KdNr
|
||||
' Else
|
||||
' txtAvisierer.KdNr_value = -1
|
||||
' txtAvisiererKdNr.Text = ""
|
||||
' txtAvisierer.Text = AVISO.Auftraggeber
|
||||
' End If
|
||||
'End If
|
||||
'Übergangsphase Aviso/Sendung
|
||||
If txtAvisierer.Text = "" And txtAvisierer.Enabled And VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale(cboFiliale._value) = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Then
|
||||
If AVISO.Auftraggeber_KdNr > -1 Then
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromKdNr(AVISO.Auftraggeber_KdNr) = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Then
|
||||
txtAvisierer.KdNr = AVISO.Auftraggeber_KdNr
|
||||
End If
|
||||
Else
|
||||
txtAvisierer.KdNr_value = -1
|
||||
txtAvisiererKdNr.Text = ""
|
||||
txtAvisierer.Text = AVISO.Auftraggeber
|
||||
End If
|
||||
End If
|
||||
|
||||
''Übergangsphase Aviso/Sendung
|
||||
'If txtFrachtfuehrer.Text = "" Then
|
||||
' If AVISO.Frächter_KdNr > -1 Then
|
||||
' txtFrachtfuehrer.KdNr = AVISO.Frächter_KdNr
|
||||
' Else
|
||||
' txtFrachtfuehrer.KdNr_value = -1
|
||||
' txtFrachtfuehrerKdNr.Text = ""
|
||||
' txtFrachtfuehrer.Text = AVISO.Frächter
|
||||
' End If
|
||||
'End If
|
||||
'Übergangsphase Aviso/Sendung
|
||||
If txtFrachtfuehrer.Text = "" And txtFrachtfuehrer.Enabled And VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale(cboFiliale._value) = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Then
|
||||
If AVISO.Frächter_KdNr > -1 Then
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromKdNr(AVISO.Frächter_KdNr) = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Then
|
||||
txtFrachtfuehrer.KdNr = AVISO.Frächter_KdNr
|
||||
End If
|
||||
Else
|
||||
txtFrachtfuehrer.KdNr_value = -1
|
||||
txtFrachtfuehrerKdNr.Text = ""
|
||||
txtFrachtfuehrer.Text = AVISO.Frächter
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
pnlT1.Controls.Clear()
|
||||
@@ -1498,12 +1502,12 @@ Public Class frmSendungsdetailsNEU
|
||||
If sender Is Button3 Or sender Is LaufzettelDruckenToolStripMenuItem Then
|
||||
|
||||
'Dim trd = New Threading.Thread(Sub()
|
||||
SendungOptions.PrintSendung("PRINT", Me.SENDUNG_LIST(CURRENT_INDEX), Me.AVISO, Printername, If(sender Is LaufzettelDruckenToolStripMenuItem, "LAUFZETTEL", "AKT"))
|
||||
SendungOptions.PrintSendung("PRINT", Me.SENDUNG_LIST(CURRENT_INDEX), Me.AVISO, Printername, If(sender Is LaufzettelDruckenToolStripMenuItem, "LAUFZETTEL", "AKT"), SENDUNG_LIST.Count)
|
||||
' End Sub)
|
||||
' trd.IsBackground = True : trd.Start()
|
||||
|
||||
ElseIf sender Is Button8 Then
|
||||
SendungOptions.PrintSendung("PDF", SENDUNG_LIST(CURRENT_INDEX), AVISO, Printername)
|
||||
SendungOptions.PrintSendung("PDF", SENDUNG_LIST(CURRENT_INDEX), AVISO, Printername,, SENDUNG_LIST.Count)
|
||||
End If
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
@@ -2364,7 +2368,7 @@ Public Class frmSendungsdetailsNEU
|
||||
Dim Printername = cboPrinter.Text
|
||||
'Dim trd = New Threading.Thread(Sub()
|
||||
For Each s In SENDUNG_LIST
|
||||
If Not s.tblSnd_Fremdspedition Then SendungOptions.PrintSendung("PRINT", s, AVISO, Printername)
|
||||
If Not s.tblSnd_Fremdspedition Then SendungOptions.PrintSendung("PRINT", s, AVISO, Printername,, SENDUNG_LIST.Count)
|
||||
Next
|
||||
' End Sub)
|
||||
' trd.IsBackground = True : trd.Start()
|
||||
@@ -2478,7 +2482,9 @@ Public Class frmSendungsdetailsNEU
|
||||
Case "UNISPED"
|
||||
If cboFiliale._value <> "5601" Then sperren = True
|
||||
Case "VERAG"
|
||||
If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_IMEX", "AVISO") Then
|
||||
If cboFiliale._value = "5601" Or cboFiliale._value = "5501" Then sperren = True
|
||||
End If
|
||||
End Select
|
||||
End If
|
||||
End If
|
||||
@@ -3732,4 +3738,42 @@ Public Class frmSendungsdetailsNEU
|
||||
txtFrachtfuehrer.Text = txtAvisierer.Text
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub IMEXToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles IMEXToolStripMenuItem1.Click
|
||||
open_Mail_NeuerLKW("IMEX")
|
||||
End Sub
|
||||
|
||||
Sub open_Mail_NeuerLKW(firmaTmp)
|
||||
Dim outl As New Outlook.Application
|
||||
Dim Mail As Microsoft.Office.Interop.Outlook.MailItem
|
||||
Mail = outl.CreateItem(0)
|
||||
Mail.Subject = "NEUER LKW: " & AVISO.LKW_Nr
|
||||
|
||||
Select Case firmaTmp
|
||||
Case "IMEX" : Mail.To = "info@imex-group.at"
|
||||
Case "UNISPED" : Mail.To = "office@unisped.at"
|
||||
Case "VERAG" : Mail.To = "quickstop@verag.ag"
|
||||
End Select
|
||||
Dim TextHTML = ""
|
||||
TextHTML &= "Hallo " & firmaTmp & "-TEAM,<br>"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= "oben genannter LKW/Container wurde im AVISO erfasst.<br>"
|
||||
TextHTML &= "Die Papiere sind im Aviso der jeweiligen Sendung angehängt (<b>DIGITALER AKT</b>).<br>"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= "Mit freundlichen Grüßen<br>"
|
||||
TextHTML &= VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "<br>"
|
||||
TextHTML &= "<br>"
|
||||
|
||||
Mail.HTMLBody = "<div style=""font-family:Calibri, Arial;font-size:15px;"">" & TextHTML & SDL.cFakturierung.getSignature("DE") & "</div>"
|
||||
|
||||
Mail.Display()
|
||||
End Sub
|
||||
|
||||
Private Sub UNISPEDToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UNISPEDToolStripMenuItem.Click
|
||||
open_Mail_NeuerLKW("UNISPED")
|
||||
End Sub
|
||||
|
||||
Private Sub VERAGToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VERAGToolStripMenuItem.Click
|
||||
open_Mail_NeuerLKW("VERAG")
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
@@ -1,11 +1,15 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<packages>
|
||||
<package id="cef.redist.x64" version="75.1.14" targetFramework="net47" />
|
||||
<package id="cef.redist.x86" version="75.1.14" targetFramework="net47" />
|
||||
<package id="CefSharp.Common" version="75.1.143" targetFramework="net47" />
|
||||
<package id="CefSharp.WinForms" version="75.1.143" targetFramework="net47" />
|
||||
<package id="esendex-dotnet-sdk" version="3.8.0" targetFramework="net47" />
|
||||
<package id="GrapeCity.Documents.Common" version="2.2.0.315" targetFramework="net461" />
|
||||
<package id="GrapeCity.Documents.Imaging" version="2.2.0.315" targetFramework="net461" />
|
||||
<package id="GrapeCity.Documents.Pdf" version="2.2.0.315" targetFramework="net461" />
|
||||
<package id="GroupDocs.Viewer" version="19.8.0" targetFramework="net461" />
|
||||
<package id="Newtonsoft.Json" version="10.0.3" targetFramework="net45" />
|
||||
<package id="Newtonsoft.Json" version="10.0.3" targetFramework="net47" />
|
||||
<package id="Portable.BouncyCastle" version="1.8.2" targetFramework="net461" />
|
||||
<package id="Spire.PDFViewer" version="4.9.5" targetFramework="net47" />
|
||||
<package id="System.Buffers" version="4.4.0" targetFramework="net461" />
|
||||
|
||||
187
Aviso/usrCntlBenachrichtigungen.Designer.vb
generated
Normal file
187
Aviso/usrCntlBenachrichtigungen.Designer.vb
generated
Normal file
@@ -0,0 +1,187 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlBenachrichtigungen
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.Panel2 = New System.Windows.Forms.Panel()
|
||||
Me.gridAvisoBenachrichtigungen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.Panel4 = New System.Windows.Forms.Panel()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.Panel3 = New System.Windows.Forms.Panel()
|
||||
Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label22 = New System.Windows.Forms.Label()
|
||||
Me.Label25 = New System.Windows.Forms.Label()
|
||||
Me.cbxTeams = New System.Windows.Forms.CheckBox()
|
||||
Me.Panel2.SuspendLayout()
|
||||
CType(Me.gridAvisoBenachrichtigungen, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel4.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Panel2
|
||||
'
|
||||
Me.Panel2.Controls.Add(Me.MyComboBox2)
|
||||
Me.Panel2.Controls.Add(Me.gridAvisoBenachrichtigungen)
|
||||
Me.Panel2.Controls.Add(Me.Panel4)
|
||||
Me.Panel2.Controls.Add(Me.Panel3)
|
||||
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel2.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel2.Name = "Panel2"
|
||||
Me.Panel2.Size = New System.Drawing.Size(184, 203)
|
||||
Me.Panel2.TabIndex = 2
|
||||
'
|
||||
'gridAvisoBenachrichtigungen
|
||||
'
|
||||
Me.gridAvisoBenachrichtigungen.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.gridAvisoBenachrichtigungen.AllowUserToAddRows = False
|
||||
Me.gridAvisoBenachrichtigungen.AllowUserToDeleteRows = False
|
||||
Me.gridAvisoBenachrichtigungen.AllowUserToOrderColumns = True
|
||||
Me.gridAvisoBenachrichtigungen.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.Color.Azure
|
||||
Me.gridAvisoBenachrichtigungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
|
||||
Me.gridAvisoBenachrichtigungen.BackgroundColor = System.Drawing.Color.White
|
||||
Me.gridAvisoBenachrichtigungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.gridAvisoBenachrichtigungen.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridAvisoBenachrichtigungen.Location = New System.Drawing.Point(0, 21)
|
||||
Me.gridAvisoBenachrichtigungen.Name = "gridAvisoBenachrichtigungen"
|
||||
Me.gridAvisoBenachrichtigungen.ReadOnly = True
|
||||
Me.gridAvisoBenachrichtigungen.RowHeadersVisible = False
|
||||
Me.gridAvisoBenachrichtigungen.Size = New System.Drawing.Size(184, 144)
|
||||
Me.gridAvisoBenachrichtigungen.TabIndex = 2
|
||||
'
|
||||
'Panel4
|
||||
'
|
||||
Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel4.Controls.Add(Me.Button10)
|
||||
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.Panel4.Location = New System.Drawing.Point(0, 165)
|
||||
Me.Panel4.Name = "Panel4"
|
||||
Me.Panel4.Size = New System.Drawing.Size(184, 38)
|
||||
Me.Panel4.TabIndex = 5
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button10.Enabled = False
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button10.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button10.Image = Global.AVISO.My.Resources.Resources.ok
|
||||
Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button10.Location = New System.Drawing.Point(59, 3)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(121, 30)
|
||||
Me.Button10.TabIndex = 3
|
||||
Me.Button10.TabStop = False
|
||||
Me.Button10.Text = " Bestätigen"
|
||||
Me.Button10.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Panel3
|
||||
'
|
||||
Me.Panel3.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Panel3.Controls.Add(Me.cbxTeams)
|
||||
Me.Panel3.Controls.Add(Me.Label22)
|
||||
Me.Panel3.Controls.Add(Me.Label25)
|
||||
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel3.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel3.Name = "Panel3"
|
||||
Me.Panel3.Size = New System.Drawing.Size(184, 21)
|
||||
Me.Panel3.TabIndex = 3
|
||||
'
|
||||
'MyComboBox2
|
||||
'
|
||||
Me.MyComboBox2._allowedValuesFreiText = Nothing
|
||||
Me.MyComboBox2._allowFreiText = False
|
||||
Me.MyComboBox2._value = ""
|
||||
Me.MyComboBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.MyComboBox2.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.MyComboBox2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.MyComboBox2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.MyComboBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.MyComboBox2.FormattingEnabled = True
|
||||
Me.MyComboBox2.Location = New System.Drawing.Point(101, 70)
|
||||
Me.MyComboBox2.Name = "MyComboBox2"
|
||||
Me.MyComboBox2.Size = New System.Drawing.Size(83, 21)
|
||||
Me.MyComboBox2.TabIndex = 27
|
||||
Me.MyComboBox2.Visible = False
|
||||
'
|
||||
'Label22
|
||||
'
|
||||
Me.Label22.AutoSize = True
|
||||
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label22.ForeColor = System.Drawing.Color.White
|
||||
Me.Label22.Location = New System.Drawing.Point(5, 4)
|
||||
Me.Label22.Name = "Label22"
|
||||
Me.Label22.Size = New System.Drawing.Size(124, 13)
|
||||
Me.Label22.TabIndex = 0
|
||||
Me.Label22.Text = "Benachrichtigungen:"
|
||||
'
|
||||
'Label25
|
||||
'
|
||||
Me.Label25.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label25.ForeColor = System.Drawing.Color.White
|
||||
Me.Label25.Location = New System.Drawing.Point(527, 6)
|
||||
Me.Label25.Name = "Label25"
|
||||
Me.Label25.Size = New System.Drawing.Size(207, 19)
|
||||
Me.Label25.TabIndex = 1
|
||||
Me.Label25.Text = "0 Akte vom Arbeitsplatz übernommen"
|
||||
Me.Label25.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'cbxTeams
|
||||
'
|
||||
Me.cbxTeams.AutoSize = True
|
||||
Me.cbxTeams.ForeColor = System.Drawing.Color.White
|
||||
Me.cbxTeams.Location = New System.Drawing.Point(135, 4)
|
||||
Me.cbxTeams.Name = "cbxTeams"
|
||||
Me.cbxTeams.Size = New System.Drawing.Size(78, 17)
|
||||
Me.cbxTeams.TabIndex = 28
|
||||
Me.cbxTeams.Text = "Alle Teams"
|
||||
Me.cbxTeams.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlBenachrichtigungen
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.Panel2)
|
||||
Me.Name = "usrCntlBenachrichtigungen"
|
||||
Me.Size = New System.Drawing.Size(184, 203)
|
||||
Me.Panel2.ResumeLayout(False)
|
||||
CType(Me.gridAvisoBenachrichtigungen, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel4.ResumeLayout(False)
|
||||
Me.Panel3.ResumeLayout(False)
|
||||
Me.Panel3.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents Panel2 As Panel
|
||||
Friend WithEvents Panel4 As Panel
|
||||
Friend WithEvents Button10 As Button
|
||||
Friend WithEvents Panel3 As Panel
|
||||
Friend WithEvents MyComboBox2 As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label22 As Label
|
||||
Friend WithEvents Label25 As Label
|
||||
Public WithEvents gridAvisoBenachrichtigungen As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||
Friend WithEvents cbxTeams As CheckBox
|
||||
End Class
|
||||
120
Aviso/usrCntlBenachrichtigungen.resx
Normal file
120
Aviso/usrCntlBenachrichtigungen.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
218
Aviso/usrCntlBenachrichtigungen.vb
Normal file
218
Aviso/usrCntlBenachrichtigungen.vb
Normal file
@@ -0,0 +1,218 @@
|
||||
Public Class usrCntlBenachrichtigungen
|
||||
Dim VERAGSQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
Dim ASF As New AvisoStatusFunctions
|
||||
|
||||
|
||||
Public Event SelectionChanged()
|
||||
|
||||
|
||||
Public Sub initDgvAvisoBenachrichtigungen(Grid_aktiv, gridFont)
|
||||
Try
|
||||
' SplitContainer3.Panel1Collapsed = True : Exit Sub
|
||||
If Not Grid_aktiv Then Exit Sub
|
||||
|
||||
With gridAvisoBenachrichtigungen
|
||||
.DefaultCellStyle.Font = gridFont
|
||||
.Columns.Clear()
|
||||
|
||||
'.RowTemplate.Height = rowHeight 'muss vor Bindung sein
|
||||
|
||||
'If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId IsNot Nothing AndAlso VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId > 0 Then
|
||||
' whereMA = " AND (ab_TO_MaId='" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRID & "' OR ab_TO_TeamId='' ) "
|
||||
'Else
|
||||
' whereMA = " AND (ab_TO_MaId='" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRID & "') "
|
||||
'End If
|
||||
|
||||
'If MyComboBox2._value = "Benutzer" Then
|
||||
' whereMA = " AND (ab_TO_MaId='" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRID & "') "
|
||||
'ElseIf MyComboBox2._value <> "" Then
|
||||
' whereMA = " AND ( ab_TO_TeamId='" & MyComboBox2._value & "' ) "
|
||||
'End If
|
||||
|
||||
Dim whereMA = " AND ( 1<>1 "
|
||||
|
||||
whereMA &= " OR (ab_TO_Art='B' AND ab_TO_Code='" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRID & "') "
|
||||
whereMA &= " OR (ab_TO_Art='N' AND ab_TO_Code='" & VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG & "') "
|
||||
whereMA &= " OR (ab_TO_Art='A' AND ab_TO_Code='" & VERAG_PROG_ALLGEMEIN.cAllgemein.ABTEILUNG & "') "
|
||||
whereMA &= " OR (ab_TO_Art='F' AND ab_TO_Code='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "') "
|
||||
|
||||
If cbxTeams.Checked Then
|
||||
whereMA &= " Or (ab_TO_Art='T' AND ab_TO_Code IN (SELECT [team_id] FROM ADMIN.dbo.[tblTeams] WHERE team_firma = '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "')) "
|
||||
Else
|
||||
whereMA &= " OR (ab_TO_Art='T' AND ab_TO_Code='" & VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId & "') "
|
||||
End If
|
||||
|
||||
whereMA &= " ) "
|
||||
|
||||
Dim sqlStr As String = "SELECT tblAvisoBenachrichtigungen.*, LKW_Nr, Status FROM [tblAvisoBenachrichtigungen] INNER JOIN AVISO on AvisoId=ab_AvisoID WHERE ab_status=0 " & whereMA & " ORDER BY ab_Datum ASC"
|
||||
|
||||
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
' List.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("maId", VERAG_PROG_ALLGEMEIN.cAllgemein.USRID))
|
||||
'If VERAGSQL Is Nothing Then VERAGSQL = New VERAG_PROG_ALLGEMEIN.SQL '? vlt hilfts...
|
||||
|
||||
.DataSource = VERAGSQL.loadDgvBySql_Param(sqlStr, "AVISO", 1500, list)
|
||||
If .DataSource Is Nothing Then Exit Sub
|
||||
' Dim bfont = New Font(.Font.FontFamily, .Font.Size, FontStyle.Bold)
|
||||
Dim nfont = New Font(.Font.FontFamily, .Font.Size, FontStyle.Regular)
|
||||
If .Columns.Count = 0 Then Exit Sub
|
||||
|
||||
.DefaultCellStyle.Font = nfont
|
||||
|
||||
.MultiSelect = False
|
||||
.Columns("ab_id").Visible = False 'AvisoID nicht anzeigen
|
||||
.Columns("ab_AvisoID").Visible = False 'AvisoID nicht anzeigen
|
||||
.Columns("ab_SendungID").Visible = False 'AvisoID nicht anzeigen
|
||||
.Columns("ab_MitarbeiterId").Visible = False 'maID nicht anzeigen
|
||||
.Columns("ab_Mitarbeiter").Visible = False
|
||||
.Columns("ab_BenachrichtigungCode").Visible = False
|
||||
.Columns("ab_Prioritaet").Visible = False
|
||||
.Columns("ab_Status").Visible = False
|
||||
.Columns("ab_Vermerk").Visible = False
|
||||
.Columns("ab_collAnhId").Visible = False
|
||||
|
||||
.Columns("ab_TO_Art").Visible = False
|
||||
.Columns("ab_TO_Code").Visible = False
|
||||
.Columns("ab_Bestaetigt_MaId").Visible = False
|
||||
.Columns("ab_Bestaetigt_Datum").Visible = False
|
||||
.Columns("ab_Firma").Visible = False
|
||||
.Columns("ab_Cluster").Visible = False
|
||||
.Columns("Status").Visible = False
|
||||
|
||||
.Columns("ab_Art").Width = 30
|
||||
.Columns("ab_Art").HeaderText = "Art"
|
||||
.Columns("ab_Art").HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
|
||||
|
||||
'.Columns("ab_Status").Width = 110
|
||||
'.Columns("ab_Status").HeaderText = "Status"
|
||||
|
||||
.Columns("LKW_Nr").MinimumWidth = 95
|
||||
.Columns("LKW_Nr").HeaderText = "LKW-Kennzeichen"
|
||||
.Columns("LKW_Nr").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
.Columns("ab_Datum").Visible = False
|
||||
.Columns("ab_Datum").Width = 80
|
||||
.Columns("ab_Datum").HeaderText = "Datum"
|
||||
.Columns("ab_Datum").DefaultCellStyle.Format = "dd.MM. HH:mm"
|
||||
.Columns("ab_Datum").HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter
|
||||
|
||||
.Columns("ab_Beschreibung").MinimumWidth = 60
|
||||
.Columns("ab_Beschreibung").HeaderText = "Beschreibung"
|
||||
'.Columns("ab_Beschreibung").DefaultCellStyle.ForeColor = Color.White
|
||||
.Columns("ab_Beschreibung").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
If .RowCount = 0 Then .Columns.Clear() : Exit Sub
|
||||
|
||||
|
||||
Dim t = New DataGridViewTextBoxColumn
|
||||
t.Name = "cmlnInfo"
|
||||
t.HeaderText = ""
|
||||
t.DefaultCellStyle.NullValue = "i"
|
||||
t.Width = 20 : t.DefaultCellStyle.Padding = New Padding(2) : t.DefaultCellStyle.BackColor = Color.Gray
|
||||
t.DefaultCellStyle.Font = New Font(.Font.FontFamily, .Font.Size, FontStyle.Bold)
|
||||
t.DefaultCellStyle.ForeColor = Color.White
|
||||
t.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
|
||||
't.ToolTipText = ""
|
||||
t.Visible = False
|
||||
.Columns.Insert(0, t)
|
||||
|
||||
|
||||
'Dim t2 = New DataGridViewTextBoxColumn
|
||||
't2.Name = "cmlnOK"
|
||||
't2.HeaderText = ""
|
||||
't2.DefaultCellStyle.NullValue = "OK"
|
||||
't2.Width = 40 : t2.DefaultCellStyle.Padding = New Padding(2) : t2.DefaultCellStyle.BackColor = Color.DarkGreen ' Color.FromArgb(0, 54, 128)
|
||||
't2.DefaultCellStyle.ForeColor = Color.White
|
||||
't2.DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
|
||||
''t.ToolTipText = ""
|
||||
'.Columns.Insert(.Columns.Count, t2)
|
||||
|
||||
|
||||
.SelectionMode = DataGridViewSelectionMode.FullRowSelect
|
||||
|
||||
For Each r As DataGridViewRow In .Rows
|
||||
'r.DefaultCellStyle.Font = nfont
|
||||
If r.Cells("Status").Value = 3 Then
|
||||
r.DefaultCellStyle.ForeColor = Color.Red
|
||||
r.DefaultCellStyle.Font = New Font(Me.Font.FontFamily, Me.Font.Size, FontStyle.Bold)
|
||||
'r.DefaultCellStyle.SelectionForeColor = Color.Red
|
||||
End If
|
||||
Next
|
||||
|
||||
'.Width = gridAviso.Width - gridVermerke.Width
|
||||
'.Sort(.Columns(3), System.ComponentModel.ListSortDirection.Descending)
|
||||
.ClearSelection()
|
||||
End With
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
' Grid_aktiv = True
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub usrCntlBenachrichtigungen_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
'MyComboBox2.Items.Clear()
|
||||
'MyComboBox2.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Benutzer", "Benutzer"))
|
||||
'MyComboBox2.fillWithSQL("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "'", False, "ADMIN", True, False)
|
||||
'MyComboBox2.changeItem("Benutzer")
|
||||
'' MyComboBox2.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId)
|
||||
End Sub
|
||||
|
||||
Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
|
||||
If gridAvisoBenachrichtigungen.SelectedRows.Count > 0 Then
|
||||
Dim AB As New VERAG_PROG_ALLGEMEIN.cAvisoBenachrichtigungen(gridAvisoBenachrichtigungen.SelectedRows(0).Cells("ab_id").Value)
|
||||
'BEstätigen
|
||||
If AB.BESTAETIGEN_BENACHRICHTIGUNG Then
|
||||
'Übermehmen
|
||||
If AB.ab_Art = "A" Then
|
||||
If Not ASF.AktUebernehmen(AB.ab_AvisoID, False, False, False) Then Exit Sub
|
||||
' If Not ASF.AktUebernehmen(AB.ab_AvisoID, False, False, True) Then Exit Sub
|
||||
Else
|
||||
If Not ASF.SendungUebernehmen(AB.ab_SendungID, AB.ab_AvisoID) Then Exit Sub
|
||||
End If
|
||||
'VERMERK inserieren
|
||||
'insertSendungsVermerk(SendungID, myAviso.AvisoID, "In die Neukunden-Abteilung gegeben.", 46)
|
||||
Dim f As New frmAvisoWeiterleitenBestaetigen(AB)
|
||||
f.ShowDialog(Me)
|
||||
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(AB.ab_AvisoID, True)
|
||||
initDgvAvisoBenachrichtigungen(True, Me.Font)
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub gridAvisoBenachrichtigungen_CellClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles gridAvisoBenachrichtigungen.CellMouseClick, gridAvisoBenachrichtigungen.CellMouseClick
|
||||
RaiseEvent SelectionChanged()
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub keydownMyAviso(sender As Object, e As KeyEventArgs) Handles gridAvisoBenachrichtigungen.KeyUp
|
||||
Try
|
||||
If e.KeyCode = Keys.Up Or e.KeyCode = Keys.Down Or e.KeyCode = Keys.PageUp Or e.KeyCode = Keys.PageDown Or e.KeyCode = Keys.Return Or e.KeyCode = Keys.Enter Then
|
||||
If sender.selectedRows.count = 0 Then Exit Sub
|
||||
RaiseEvent SelectionChanged()
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub usrCntlBenachrichtigungen_SelectionChanged() Handles gridAvisoBenachrichtigungen.SelectionChanged
|
||||
Button10.Enabled = (gridAvisoBenachrichtigungen.SelectedRows.Count = 1)
|
||||
End Sub
|
||||
|
||||
Private Sub usrCntlBenachrichtigungen_SelectionChanged(sender As Object, e As EventArgs) Handles gridAvisoBenachrichtigungen.SelectionChanged
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub cbxTeams_CheckedChanged(sender As Object, e As EventArgs) Handles cbxTeams.CheckedChanged
|
||||
'frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID, True)
|
||||
'initDgvAvisoBenachrichtigungen(True, Me.Font)
|
||||
initDgvAvisoBenachrichtigungen(True, Me.Font)
|
||||
End Sub
|
||||
End Class
|
||||
28
Aviso/usrCntlSND_Handling.Designer.vb
generated
28
Aviso/usrCntlSND_Handling.Designer.vb
generated
@@ -26,6 +26,7 @@ Partial Class usrCntlSND_Handling
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.pnlT1 = New System.Windows.Forms.Panel()
|
||||
Me.lkl = New System.Windows.Forms.LinkLabel()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.txtATCMRNFremd = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
@@ -35,7 +36,6 @@ Partial Class usrCntlSND_Handling
|
||||
Me.clmnATA = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.clmnColli = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.clmnGewicht = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.lkl = New System.Windows.Forms.LinkLabel()
|
||||
Me.pnlT1.SuspendLayout()
|
||||
CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
@@ -53,6 +53,17 @@ Partial Class usrCntlSND_Handling
|
||||
Me.pnlT1.Size = New System.Drawing.Size(549, 92)
|
||||
Me.pnlT1.TabIndex = 67
|
||||
'
|
||||
'lkl
|
||||
'
|
||||
Me.lkl.AutoSize = True
|
||||
Me.lkl.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.lkl.Location = New System.Drawing.Point(442, 74)
|
||||
Me.lkl.Name = "lkl"
|
||||
Me.lkl.Size = New System.Drawing.Size(102, 13)
|
||||
Me.lkl.TabIndex = 37
|
||||
Me.lkl.TabStop = True
|
||||
Me.lkl.Text = "Summen übertragen"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
@@ -147,7 +158,7 @@ Partial Class usrCntlSND_Handling
|
||||
'clmnATA
|
||||
'
|
||||
Me.clmnATA.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
||||
Me.clmnATA.HeaderText = "ATA/CRN/MRN"
|
||||
Me.clmnATA.HeaderText = "ATA/ATC/CRN/MRN"
|
||||
Me.clmnATA.Name = "clmnATA"
|
||||
'
|
||||
'clmnColli
|
||||
@@ -169,17 +180,6 @@ Partial Class usrCntlSND_Handling
|
||||
Me.clmnGewicht.Name = "clmnGewicht"
|
||||
Me.clmnGewicht.Width = 80
|
||||
'
|
||||
'lkl
|
||||
'
|
||||
Me.lkl.AutoSize = True
|
||||
Me.lkl.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.lkl.Location = New System.Drawing.Point(442, 74)
|
||||
Me.lkl.Name = "lkl"
|
||||
Me.lkl.Size = New System.Drawing.Size(102, 13)
|
||||
Me.lkl.TabIndex = 37
|
||||
Me.lkl.TabStop = True
|
||||
Me.lkl.Text = "Summen übertragen"
|
||||
'
|
||||
'usrCntlSND_Handling
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@@ -199,9 +199,9 @@ Partial Class usrCntlSND_Handling
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents MyDatagridview1 As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents lkl As LinkLabel
|
||||
Friend WithEvents clmnArt As DataGridViewComboBoxColumn
|
||||
Friend WithEvents clmnATA As DataGridViewTextBoxColumn
|
||||
Friend WithEvents clmnColli As DataGridViewTextBoxColumn
|
||||
Friend WithEvents clmnGewicht As DataGridViewTextBoxColumn
|
||||
Friend WithEvents lkl As LinkLabel
|
||||
End Class
|
||||
|
||||
@@ -39,9 +39,9 @@ Public Class usrCntlVermerkeATilla
|
||||
insertVermerk("LKW Standzeit Feiertag(e)", 22)
|
||||
|
||||
ElseIf sender Is btnLKWFertig Then
|
||||
If FUNC.LKWFertig(AvisoID) Then
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cglobal.Aktive_ID)
|
||||
frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cglobal.Aktive_ID)
|
||||
If VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.LKWFertig(AvisoID) Then
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
End If
|
||||
ElseIf sender Is btnAuftragFehlt Then
|
||||
If txtSendung.Text.Trim = "" Then lblErrSendung.Visible = True : Exit Sub
|
||||
|
||||
246
Aviso/usrcntlAktDetails.Designer.vb
generated
246
Aviso/usrcntlAktDetails.Designer.vb
generated
@@ -23,17 +23,17 @@ Partial Class usrcntlAktDetails
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle22 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle23 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle24 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle25 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAktDetails))
|
||||
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle26 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle27 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle28 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle29 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle30 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.pnlDetailsRechts = New System.Windows.Forms.Panel()
|
||||
Me.Panel3 = New System.Windows.Forms.Panel()
|
||||
Me.SplitContainer = New System.Windows.Forms.SplitContainer()
|
||||
@@ -88,6 +88,8 @@ Partial Class usrcntlAktDetails
|
||||
Me.tbAnhang = New System.Windows.Forms.TabPage()
|
||||
Me.addVermerk = New System.Windows.Forms.Button()
|
||||
Me.Panel8 = New System.Windows.Forms.Panel()
|
||||
Me.lblBarZuKassierenSumme = New System.Windows.Forms.Label()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button7 = New System.Windows.Forms.Button()
|
||||
Me.btnLkwBeleg = New System.Windows.Forms.Button()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
@@ -95,7 +97,6 @@ Partial Class usrcntlAktDetails
|
||||
Me.lblIMEX = New System.Windows.Forms.Label()
|
||||
Me.cbxHandling = New System.Windows.Forms.Label()
|
||||
Me.btnAktAbschliessen = New System.Windows.Forms.Button()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.txtAktMA = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
@@ -138,9 +139,11 @@ Partial Class usrcntlAktDetails
|
||||
Me.DispolisteTRToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DispolisteENToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.pnlOptionen = New System.Windows.Forms.Panel()
|
||||
Me.Button14 = New System.Windows.Forms.Button()
|
||||
Me.btnLöschen = New System.Windows.Forms.Button()
|
||||
Me.btnÄndern = New System.Windows.Forms.Button()
|
||||
Me.btnTV = New System.Windows.Forms.Button()
|
||||
Me.Button13 = New System.Windows.Forms.Button()
|
||||
Me.pnlDetailsRechts.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@@ -552,44 +555,44 @@ Partial Class usrcntlAktDetails
|
||||
Me.dgvSendungen.AllowUserToAddRows = False
|
||||
Me.dgvSendungen.AllowUserToDeleteRows = False
|
||||
Me.dgvSendungen.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
|
||||
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
|
||||
DataGridViewCellStyle21.BackColor = System.Drawing.Color.Azure
|
||||
DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle21
|
||||
Me.dgvSendungen.BackgroundColor = System.Drawing.Color.White
|
||||
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
|
||||
DataGridViewCellStyle22.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle22.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle22.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle22.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle22.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle22.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle22.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle22
|
||||
Me.dgvSendungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
|
||||
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle3
|
||||
DataGridViewCellStyle23.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle23.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle23.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle23.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle23.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle23.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle23
|
||||
Me.dgvSendungen.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.dgvSendungen.Location = New System.Drawing.Point(0, 0)
|
||||
Me.dgvSendungen.MultiSelect = False
|
||||
Me.dgvSendungen.Name = "dgvSendungen"
|
||||
Me.dgvSendungen.ReadOnly = True
|
||||
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
|
||||
DataGridViewCellStyle24.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle24.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle24.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle24.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle24.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle24
|
||||
Me.dgvSendungen.RowHeadersVisible = False
|
||||
Me.dgvSendungen.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle5
|
||||
DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle25
|
||||
Me.dgvSendungen.RowTemplate.Height = 20
|
||||
Me.dgvSendungen.RowTemplate.ReadOnly = True
|
||||
Me.dgvSendungen.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
@@ -816,44 +819,44 @@ Partial Class usrcntlAktDetails
|
||||
Me.gridVermerke.AllowUserToAddRows = False
|
||||
Me.gridVermerke.AllowUserToDeleteRows = False
|
||||
Me.gridVermerke.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle6.BackColor = System.Drawing.Color.Azure
|
||||
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6
|
||||
DataGridViewCellStyle26.BackColor = System.Drawing.Color.Azure
|
||||
DataGridViewCellStyle26.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle26
|
||||
Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
|
||||
DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle7.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle7.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7
|
||||
DataGridViewCellStyle27.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle27.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle27.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle27.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle27.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle27.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle27.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle27
|
||||
Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
|
||||
DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle8
|
||||
DataGridViewCellStyle28.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle28.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle28.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle28.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle28.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle28.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle28
|
||||
Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridVermerke.Location = New System.Drawing.Point(0, 30)
|
||||
Me.gridVermerke.MultiSelect = False
|
||||
Me.gridVermerke.Name = "gridVermerke"
|
||||
Me.gridVermerke.ReadOnly = True
|
||||
DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle9
|
||||
DataGridViewCellStyle29.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle29.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle29.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle29.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle29.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle29.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle29.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle29
|
||||
Me.gridVermerke.RowHeadersVisible = False
|
||||
Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle10
|
||||
DataGridViewCellStyle30.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle30
|
||||
Me.gridVermerke.RowTemplate.Height = 20
|
||||
Me.gridVermerke.RowTemplate.ReadOnly = True
|
||||
Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
@@ -1002,6 +1005,8 @@ Partial Class usrcntlAktDetails
|
||||
'Panel8
|
||||
'
|
||||
Me.Panel8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel8.Controls.Add(Me.lblBarZuKassierenSumme)
|
||||
Me.Panel8.Controls.Add(Me.Button4)
|
||||
Me.Panel8.Controls.Add(Me.Button7)
|
||||
Me.Panel8.Controls.Add(Me.btnLkwBeleg)
|
||||
Me.Panel8.Controls.Add(Me.Label1)
|
||||
@@ -1009,7 +1014,6 @@ Partial Class usrcntlAktDetails
|
||||
Me.Panel8.Controls.Add(Me.lblIMEX)
|
||||
Me.Panel8.Controls.Add(Me.cbxHandling)
|
||||
Me.Panel8.Controls.Add(Me.btnAktAbschliessen)
|
||||
Me.Panel8.Controls.Add(Me.Button4)
|
||||
Me.Panel8.Controls.Add(Me.Button2)
|
||||
Me.Panel8.Controls.Add(Me.txtAktMA)
|
||||
Me.Panel8.Controls.Add(Me.Label3)
|
||||
@@ -1027,6 +1031,34 @@ Partial Class usrcntlAktDetails
|
||||
Me.Panel8.Size = New System.Drawing.Size(575, 120)
|
||||
Me.Panel8.TabIndex = 92
|
||||
'
|
||||
'lblBarZuKassierenSumme
|
||||
'
|
||||
Me.lblBarZuKassierenSumme.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblBarZuKassierenSumme.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblBarZuKassierenSumme.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblBarZuKassierenSumme.Location = New System.Drawing.Point(437, 76)
|
||||
Me.lblBarZuKassierenSumme.Name = "lblBarZuKassierenSumme"
|
||||
Me.lblBarZuKassierenSumme.Size = New System.Drawing.Size(137, 19)
|
||||
Me.lblBarZuKassierenSumme.TabIndex = 109
|
||||
Me.lblBarZuKassierenSumme.Text = "BAR: € 150,00"
|
||||
Me.lblBarZuKassierenSumme.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
Me.lblBarZuKassierenSumme.Visible = False
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button4.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button4.Image = Global.AVISO.My.Resources.Resources.personCheck_small
|
||||
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button4.Location = New System.Drawing.Point(4, 78)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(162, 35)
|
||||
Me.Button4.TabIndex = 101
|
||||
Me.Button4.Text = "Akt übernehmen"
|
||||
Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button7
|
||||
'
|
||||
Me.Button7.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -1134,21 +1166,6 @@ Partial Class usrcntlAktDetails
|
||||
Me.btnAktAbschliessen.UseVisualStyleBackColor = False
|
||||
Me.btnAktAbschliessen.Visible = False
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.Button4.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button4.Image = Global.AVISO.My.Resources.Resources.personCheck_small
|
||||
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button4.Location = New System.Drawing.Point(4, 78)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(142, 35)
|
||||
Me.Button4.TabIndex = 101
|
||||
Me.Button4.Text = "Akt übernehmen"
|
||||
Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -1173,11 +1190,11 @@ Partial Class usrcntlAktDetails
|
||||
Me.txtAktMA.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.txtAktMA.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtAktMA.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtAktMA.Location = New System.Drawing.Point(150, 96)
|
||||
Me.txtAktMA.Location = New System.Drawing.Point(172, 96)
|
||||
Me.txtAktMA.MaxLength = 0
|
||||
Me.txtAktMA.Name = "txtAktMA"
|
||||
Me.txtAktMA.ReadOnly = True
|
||||
Me.txtAktMA.Size = New System.Drawing.Size(269, 16)
|
||||
Me.txtAktMA.Size = New System.Drawing.Size(247, 16)
|
||||
Me.txtAktMA.TabIndex = 97
|
||||
Me.txtAktMA.TabStop = False
|
||||
'
|
||||
@@ -1186,7 +1203,7 @@ Partial Class usrcntlAktDetails
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.Black
|
||||
Me.Label3.Location = New System.Drawing.Point(150, 76)
|
||||
Me.Label3.Location = New System.Drawing.Point(169, 76)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(59, 17)
|
||||
Me.Label3.TabIndex = 96
|
||||
@@ -1314,9 +1331,9 @@ Partial Class usrcntlAktDetails
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblAktUebernommen.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblAktUebernommen.ForeColor = System.Drawing.Color.Green
|
||||
Me.lblAktUebernommen.Location = New System.Drawing.Point(144, 75)
|
||||
Me.lblAktUebernommen.Location = New System.Drawing.Point(166, 75)
|
||||
Me.lblAktUebernommen.Name = "lblAktUebernommen"
|
||||
Me.lblAktUebernommen.Size = New System.Drawing.Size(263, 38)
|
||||
Me.lblAktUebernommen.Size = New System.Drawing.Size(241, 38)
|
||||
Me.lblAktUebernommen.TabIndex = 102
|
||||
Me.lblAktUebernommen.Text = "Akt übernommen!"
|
||||
Me.lblAktUebernommen.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
@@ -1638,18 +1655,18 @@ Partial Class usrcntlAktDetails
|
||||
'
|
||||
Me.cntxtFormulare.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DispolisteTRToolStripMenuItem, Me.DispolisteENToolStripMenuItem})
|
||||
Me.cntxtFormulare.Name = "cntxtFormulare"
|
||||
Me.cntxtFormulare.Size = New System.Drawing.Size(181, 70)
|
||||
Me.cntxtFormulare.Size = New System.Drawing.Size(144, 48)
|
||||
'
|
||||
'DispolisteTRToolStripMenuItem
|
||||
'
|
||||
Me.DispolisteTRToolStripMenuItem.Name = "DispolisteTRToolStripMenuItem"
|
||||
Me.DispolisteTRToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.DispolisteTRToolStripMenuItem.Size = New System.Drawing.Size(143, 22)
|
||||
Me.DispolisteTRToolStripMenuItem.Text = "Dispoliste TR"
|
||||
'
|
||||
'DispolisteENToolStripMenuItem
|
||||
'
|
||||
Me.DispolisteENToolStripMenuItem.Name = "DispolisteENToolStripMenuItem"
|
||||
Me.DispolisteENToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.DispolisteENToolStripMenuItem.Size = New System.Drawing.Size(143, 22)
|
||||
Me.DispolisteENToolStripMenuItem.Text = "Dispoliste EN"
|
||||
'
|
||||
'pnlOptionen
|
||||
@@ -1657,15 +1674,33 @@ Partial Class usrcntlAktDetails
|
||||
Me.pnlOptionen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pnlOptionen.BackColor = System.Drawing.Color.Black
|
||||
Me.pnlOptionen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnlOptionen.Controls.Add(Me.Button13)
|
||||
Me.pnlOptionen.Controls.Add(Me.Button14)
|
||||
Me.pnlOptionen.Controls.Add(Me.btnLöschen)
|
||||
Me.pnlOptionen.Controls.Add(Me.btnÄndern)
|
||||
Me.pnlOptionen.Controls.Add(Me.btnTV)
|
||||
Me.pnlOptionen.Location = New System.Drawing.Point(454, 141)
|
||||
Me.pnlOptionen.Name = "pnlOptionen"
|
||||
Me.pnlOptionen.Size = New System.Drawing.Size(116, 58)
|
||||
Me.pnlOptionen.Size = New System.Drawing.Size(116, 51)
|
||||
Me.pnlOptionen.TabIndex = 82
|
||||
Me.pnlOptionen.Visible = False
|
||||
'
|
||||
'Button14
|
||||
'
|
||||
Me.Button14.BackColor = System.Drawing.Color.White
|
||||
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button14.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button14.Image = Global.AVISO.My.Resources.Resources.android_note
|
||||
Me.Button14.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button14.Location = New System.Drawing.Point(2, 92)
|
||||
Me.Button14.Name = "Button14"
|
||||
Me.Button14.Size = New System.Drawing.Size(109, 28)
|
||||
Me.Button14.TabIndex = 101
|
||||
Me.Button14.TabStop = False
|
||||
Me.Button14.Text = "LKW QR"
|
||||
Me.Button14.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button14.UseVisualStyleBackColor = False
|
||||
'
|
||||
'btnLöschen
|
||||
'
|
||||
Me.btnLöschen.BackColor = System.Drawing.Color.White
|
||||
@@ -1703,15 +1738,31 @@ Partial Class usrcntlAktDetails
|
||||
Me.btnTV.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnTV.Image = CType(resources.GetObject("btnTV.Image"), System.Drawing.Image)
|
||||
Me.btnTV.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnTV.Location = New System.Drawing.Point(3, 65)
|
||||
Me.btnTV.Location = New System.Drawing.Point(2, 65)
|
||||
Me.btnTV.Name = "btnTV"
|
||||
Me.btnTV.Size = New System.Drawing.Size(108, 28)
|
||||
Me.btnTV.Size = New System.Drawing.Size(109, 28)
|
||||
Me.btnTV.TabIndex = 100
|
||||
Me.btnTV.TabStop = False
|
||||
Me.btnTV.Text = "TV-Hinweis"
|
||||
Me.btnTV.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnTV.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Button13
|
||||
'
|
||||
Me.Button13.BackColor = System.Drawing.Color.White
|
||||
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.Button13.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button13.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button13.Location = New System.Drawing.Point(3, 124)
|
||||
Me.Button13.Name = "Button13"
|
||||
Me.Button13.Size = New System.Drawing.Size(109, 28)
|
||||
Me.Button13.TabIndex = 102
|
||||
Me.Button13.TabStop = False
|
||||
Me.Button13.Text = "Freigabe Mail"
|
||||
Me.Button13.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button13.UseVisualStyleBackColor = False
|
||||
'
|
||||
'usrcntlAktDetails
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
|
||||
@@ -1874,4 +1925,7 @@ Partial Class usrcntlAktDetails
|
||||
Friend WithEvents Button12 As Button
|
||||
Friend WithEvents cbxAlleFirmen As CheckBox
|
||||
Friend WithEvents btnSendungslisteUNISPED As Button
|
||||
Friend WithEvents Button14 As Button
|
||||
Friend WithEvents lblBarZuKassierenSumme As Label
|
||||
Friend WithEvents Button13 As Button
|
||||
End Class
|
||||
|
||||
@@ -105,7 +105,7 @@ Public Class usrcntlAktDetails
|
||||
Case "NKD"
|
||||
lblFiskde.Visible = False
|
||||
txtSndFiskalDE.Visible = False
|
||||
Case "SUB"
|
||||
Case "SUB", "NEU"
|
||||
txtSndFremd.Visible = True
|
||||
lblSndFremd.Visible = True
|
||||
End Select
|
||||
@@ -258,10 +258,14 @@ Public Class usrcntlAktDetails
|
||||
' btnLkwBeleg.Visible = False
|
||||
btnAktAbschliessen.Visible = False
|
||||
btnAktAbschliessen.BackColor = Color.DarkGreen
|
||||
|
||||
lblBarZuKassierenSumme.Visible = False
|
||||
|
||||
Select Case AVISO.Status
|
||||
Case VERAG_PROG_ALLGEMEIN.cGlobal.Status_Ankunft
|
||||
lblStatus.Text = "ANKUNFT" : pnlStatus.BackColor = btnAnkunft.BackColor
|
||||
btnAktAbschliessen.Visible = False
|
||||
lblBarZuKassierenSumme.Visible = True
|
||||
Case VERAG_PROG_ALLGEMEIN.cGlobal.Status_Erfasst
|
||||
lblStatus.Text = "ERFASST" : pnlStatus.BackColor = btnErfasst.BackColor
|
||||
btnAktAbschliessen.Visible = True
|
||||
@@ -302,6 +306,7 @@ Public Class usrcntlAktDetails
|
||||
' btnAktAbschliessen.Visible = True
|
||||
End If
|
||||
|
||||
intiAktUebernehmenBtn()
|
||||
|
||||
'Kann nur bei Freigabe angezeigt werden
|
||||
'If AVISO.Status <> VERAG_PROG_ALLGEMEIN.cglobal.Status_Freigegeben Then
|
||||
@@ -396,7 +401,7 @@ Public Class usrcntlAktDetails
|
||||
With dgvSendungen
|
||||
' Dim selRow = If(.SelectedRows.Count > 0, .SelectedRows(0).Index, -1)
|
||||
.Columns.Clear()
|
||||
.DataSource = AvisoDAL.loadDataTableBySQL(" SELECT FilialenNr ,/*rank() OVER (ORDER BY tblSnd_PosUnterNr) as */ tblSnd_PosUnterNr, [tblSnd_SendungID],[tblSnd_AvisoID],[tblSnd_Abfertigungsart_ID],[tblSnd_EmpfaengerKdNr],[tblSnd_Empfaenger],isnull(cast(FilialenNr as varchar (4)),'')+'/' + isnull(cast(AbfertigungsNr as varchar (8)),'') as AbfertigungsNr,(SELECT (CASE WHEN Count(*)>0 THEN cast(COUNT(*) as varchar(4)) ELSE '-' END) FROM Vermerke WHERE AvisoID=" & AvisoID & " AND SendungID=tblSnd_SendungID) as Vermerke, tblSnd_SpeditionsbuchEingetragen,tblSnd_Fremdspedition,tblSnd_FremdspeditionText,isnull(tblSnd_QS_MA,-1) as tblSnd_QS_MA,tblSnd_Vorbereitet,tblSnd_Vorgeschrieben,LetzterMitarbeiterId,tblSnd_VG_MA,LetzterMitarbeiter" &
|
||||
.DataSource = AvisoDAL.loadDataTableBySQL(" SELECT FilialenNr ,/*rank() OVER (ORDER BY tblSnd_PosUnterNr) as */ tblSnd_PosUnterNr, [tblSnd_SendungID],[tblSnd_AvisoID],[tblSnd_Abfertigungsart_ID],[tblSnd_EmpfaengerKdNr],[tblSnd_Empfaenger],isnull(cast(FilialenNr as varchar (4)),'')+'/' + isnull(cast(AbfertigungsNr as varchar (8)),'') as AbfertigungsNr,(SELECT (CASE WHEN Count(*)>0 THEN cast(COUNT(*) as varchar(4)) ELSE '-' END) FROM Vermerke WHERE AvisoID=" & AvisoID & " AND SendungID=tblSnd_SendungID) as Vermerke, tblSnd_SpeditionsbuchEingetragen,tblSnd_Fremdspedition,tblSnd_FremdspeditionText,isnull(tblSnd_QS_MA,-1) as tblSnd_QS_MA,tblSnd_Vorbereitet,tblSnd_Vorgeschrieben,LetzterMitarbeiterId,tblSnd_VG_MA,LetzterMitarbeiter,tblSnd_BARzuKassieren " &
|
||||
" FROM tblSendungen WHERE tblSnd_AvisoId=" & AvisoID & " ORDER BY tblSnd_PosUnterNr") 'LEFT JOIN tblQS_Abfertigungsarten ON [tblSnd_Abfertigungsart_ID]=QS_Abfertigungsart_ID
|
||||
|
||||
' If .RowCount = 0 Then .Columns.Clear() : Exit Sub
|
||||
@@ -415,6 +420,7 @@ Public Class usrcntlAktDetails
|
||||
.Columns("LetzterMitarbeiter").Visible = False
|
||||
.Columns("LetzterMitarbeiterId").Visible = False
|
||||
.Columns("tblSnd_VG_MA").Visible = False
|
||||
.Columns("tblSnd_BARzuKassieren").Visible = False
|
||||
|
||||
.Columns("tblSnd_PosUnterNr").Width = 20
|
||||
.Columns("tblSnd_PosUnterNr").HeaderText = "Nr."
|
||||
@@ -511,6 +517,13 @@ Public Class usrcntlAktDetails
|
||||
.Columns.Add(c)
|
||||
' End If
|
||||
|
||||
c = New DataGridViewImageColumn
|
||||
c.Name = "SenungWeiterleiten"
|
||||
c.Image = My.Resources.tranparent30Perc : c.ImageLayout = DataGridViewImageCellLayout.Zoom
|
||||
c.Width = 25 : c.DefaultCellStyle.Padding = New Padding(2) : c.DefaultCellStyle.BackColor = Color.White
|
||||
c.ToolTipText = "Senung weiterleiten"
|
||||
.Columns.Add(c)
|
||||
' End If
|
||||
|
||||
Dim t = New DataGridViewTextBoxColumn
|
||||
t.Name = "Abfertigungsart"
|
||||
@@ -521,7 +534,7 @@ Public Class usrcntlAktDetails
|
||||
|
||||
|
||||
Try
|
||||
|
||||
Dim BarZuKassierenSumme As Double = 0
|
||||
For Each r As DataGridViewRow In dgvSendungen.Rows
|
||||
If r.Cells("tblSnd_Fremdspedition").Value Then 'FREMDANMELDER
|
||||
r.Cells("Abfertigungsart").Style.BackColor = Color.FromArgb(230, 230, 230)
|
||||
@@ -549,8 +562,19 @@ Public Class usrcntlAktDetails
|
||||
End Select
|
||||
r.Cells("FilialenNr").Style.SelectionBackColor = r.Cells("FilialenNr").Style.BackColor
|
||||
r.Cells("FilialenNr").Style.SelectionForeColor = r.Cells("FilialenNr").Style.ForeColor
|
||||
|
||||
If r.Cells("tblSnd_BARzuKassieren").Value IsNot DBNull.Value AndAlso IsNumeric(r.Cells("tblSnd_BARzuKassieren").Value) Then '
|
||||
BarZuKassierenSumme += CDbl(r.Cells("tblSnd_BARzuKassieren").Value)
|
||||
End If
|
||||
|
||||
|
||||
Next
|
||||
' timerSendRows.Enabled = False
|
||||
If BarZuKassierenSumme <> 0 Then
|
||||
lblBarZuKassierenSumme.Text = "BAR: " & BarZuKassierenSumme.ToString("C2")
|
||||
Else
|
||||
lblBarZuKassierenSumme.Text = ""
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
@@ -751,8 +775,9 @@ Public Class usrcntlAktDetails
|
||||
tmpIndex = dgvSendungen.SelectedRows(0).Index
|
||||
End If
|
||||
|
||||
Dim VermekId = gridVermerke.Rows(e.RowIndex).Cells("VermerkID").Value
|
||||
Dim VermerkeDAL As New cVermerkeDAL
|
||||
Dim myVermerk As cVermerk = VermerkeDAL.LesenVermerk(gridVermerke.Rows(e.RowIndex).Cells("VermerkID").Value, "")
|
||||
Dim myVermerk As cVermerk = VermerkeDAL.LesenVermerk(VermekId, "")
|
||||
myVermerk.VermerkID = 0
|
||||
'myVermerk.AvisoID = CInt(gridVermerke.Rows(e.RowIndex).Cells(1).Value)
|
||||
myVermerk.Datum = Now
|
||||
@@ -763,50 +788,60 @@ Public Class usrcntlAktDetails
|
||||
Case "1"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 2
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)
|
||||
' initDgvSendungen()
|
||||
|
||||
Case "3"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 4
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "5"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 6
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "7"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 8
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "9"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 10
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "11"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 12
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "13"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 14
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "17"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("eingereicht", "fertig")
|
||||
myVermerk.VermerkCodeId = 18
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
VermerkeDAL.UpdateLKW(myVermerk.AvisoID, False)
|
||||
' avisoAktualisierenAktiveIdBehalten(myVermerk.AvisoID)
|
||||
'Vermerke_aktualisieren()
|
||||
@@ -815,49 +850,57 @@ Public Class usrcntlAktDetails
|
||||
Case "19"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("eingereicht", "fertig")
|
||||
myVermerk.VermerkCodeId = 20
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "25"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 30
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "31"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("in Vorbereitung", "Vorbereitung abgeschl.")
|
||||
myVermerk.VermerkCodeId = 32
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "33"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 34
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "36"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 37
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "53"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 54
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "55"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 56
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
Case "57"
|
||||
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
|
||||
myVermerk.VermerkCodeId = 58
|
||||
VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
|
||||
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
|
||||
init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen()
|
||||
|
||||
|
||||
@@ -928,7 +971,7 @@ Public Class usrcntlAktDetails
|
||||
optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'CMR erhalten' einzutragen."
|
||||
End If
|
||||
Case 13
|
||||
If Not existCodeInGridVermerke(14, CStr(r.Cells("Hinweis_Vermerk").Value)) Then
|
||||
If Not existCodeInGridVermerke(14) And Not existCodeInGridVermerke(59) Then
|
||||
optionCell.Value = "Vorauskasse erhalten"
|
||||
optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'Vorauskasse erhalten' einzutragen."
|
||||
End If
|
||||
@@ -992,8 +1035,10 @@ Public Class usrcntlAktDetails
|
||||
For Each r As DataGridViewRow In gridVermerke.Rows
|
||||
If DirectCast(r.Cells("VermerkeCode"), DataGridViewTextBoxCell).Value.ToString = CStr(code) Then
|
||||
Select Case code
|
||||
Case 59
|
||||
Return True
|
||||
Case 2, 4, 6, 8, 10, 12, 14, 30, 37, 34
|
||||
If DirectCast(r.Cells("Hinweis_Vermerk"), DataGridViewTextBoxCell).Value.ToString.Replace("erhalten", "angefordert") = text Then
|
||||
If text = "" Or DirectCast(r.Cells("Hinweis_Vermerk"), DataGridViewTextBoxCell).Value.ToString.Replace("erhalten", "angefordert") = text Then
|
||||
Return True
|
||||
End If
|
||||
Case 32
|
||||
@@ -1421,6 +1466,22 @@ Public Class usrcntlAktDetails
|
||||
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
Case "SenungWeiterleiten"
|
||||
sendAktiv = False
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
|
||||
If dgvSendungen.Rows(e.RowIndex).Cells("LetzterMitarbeiterId").Value IsNot DBNull.Value AndAlso dgvSendungen.Rows(e.RowIndex).Cells("LetzterMitarbeiterId").Value = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then
|
||||
Dim f As New frmAvisoWeiterleiten("S", AvisoID, VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_SendungsID) '--> Weitereliten
|
||||
If f.ShowDialog(Me) = DialogResult.OK Then
|
||||
initDgvSendungen()
|
||||
Vermerke_anzeigen()
|
||||
End If
|
||||
End If
|
||||
'sendAktiv = False
|
||||
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
|
||||
End Select
|
||||
|
||||
sendAktiv = True
|
||||
@@ -1435,7 +1496,7 @@ Public Class usrcntlAktDetails
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
pnlOptionen.Height = 100
|
||||
pnlOptionen.Height = 157 '125
|
||||
pnlOptionen.Visible = Not pnlOptionen.Visible
|
||||
|
||||
If pnlOptionen.Visible Then pnlOptionen.Location = New Point(pnlOptionen.Location.X, Button2.Height + pnl.Height + FlowLayoutPanel.Height)
|
||||
@@ -1470,6 +1531,7 @@ Public Class usrcntlAktDetails
|
||||
If dgvSendungen.Columns("tblSnd_Vorbereitet") Is Nothing Then Return False
|
||||
If dgvSendungen.Columns("StatusVorbereitetQS") Is Nothing Then Return False
|
||||
If dgvSendungen.Columns("SenungUebernehmen") Is Nothing Then Return False
|
||||
If dgvSendungen.Columns("SenungWeiterleiten") Is Nothing Then Return False
|
||||
|
||||
If dgvSendungen.Columns("SpeditionsbuchEintragen") Is Nothing Then Return False
|
||||
If dgvSendungen.Columns("KundeAnzeigen") Is Nothing Then Return False
|
||||
@@ -1502,6 +1564,7 @@ Public Class usrcntlAktDetails
|
||||
DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).Value = My.Resources.personCheck_gray_small
|
||||
If r.Cells("LetzterMitarbeiterId").Value IsNot DBNull.Value AndAlso r.Cells("LetzterMitarbeiterId").Value = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then
|
||||
DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).Value = My.Resources.personCheck_blue_small
|
||||
DirectCast(r.Cells("SenungWeiterleiten"), DataGridViewImageCell).Value = My.Resources.weiterleiten_small1
|
||||
Else
|
||||
If r.Cells("tblSnd_VG_MA").Value IsNot DBNull.Value Then
|
||||
DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).Value = My.Resources.personCheck_small
|
||||
@@ -1511,6 +1574,7 @@ Public Class usrcntlAktDetails
|
||||
If r.Cells("LetzterMitarbeiter").Value IsNot DBNull.Value Then DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).ToolTipText = "Sendung von '" & r.Cells("LetzterMitarbeiter").Value & "' übernehmen"
|
||||
|
||||
|
||||
|
||||
'If VERAG_PROG_ALLGEMEIN.cAllgemein.ABTEILUNG = "QS" Then
|
||||
' If r.Cells("tblSnd_QS_MA").Value = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then
|
||||
' DirectCast(r.Cells("Abgeklaert"), DataGridViewImageCell).Value = My.Resources.abgeklaertAktiv
|
||||
@@ -1585,36 +1649,38 @@ Public Class usrcntlAktDetails
|
||||
If e.Button = Windows.Forms.MouseButtons.Right Then
|
||||
If dgvSendungen.Columns.Count > 0 Then
|
||||
If dgvSendungen.Columns(e.ColumnIndex).Name = "SenungUebernehmen" Then
|
||||
Dim LIST_FIRMEN() As String = {"VERAG", "UNISPED", "IMEX", "FRONTOFFICE"}
|
||||
Exit Sub
|
||||
|
||||
Dim C As New ContextMenuStrip
|
||||
'Dim LIST_FIRMEN() As String = {"VERAG", "UNISPED", "IMEX", "FRONTOFFICE"}
|
||||
|
||||
For Each FirmaTMP In LIST_FIRMEN
|
||||
'Dim C As New ContextMenuStrip
|
||||
|
||||
Dim item_Firma As New ToolStripMenuItem
|
||||
item_Firma.Text = FirmaTMP
|
||||
'For Each FirmaTMP In LIST_FIRMEN
|
||||
|
||||
Dim sql As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
Dim dt = sql.loadDgvBySql("SELECT TOP (1000) [mit_id],[mit_nname] + ' ' + [mit_vname] + ' (' + mit_niederlassung + ')' as MAname FROM [ADMIN].[dbo].[tblMitarbeiter]
|
||||
where mit_firma IN ('" & FirmaTMP & "','BEIDE','ALLE','ALL') and mit_gekuendigt=0
|
||||
and mit_abteilung IN ('QS','ZOLL','DISPO') and [mit_TESTonly]=0 AND [mit_pseudoUser]=0
|
||||
order by mit_nname,mit_vname ", "AVISO")
|
||||
' Dim item_Firma As New ToolStripMenuItem
|
||||
' item_Firma.Text = FirmaTMP
|
||||
|
||||
For Each r In dt.Rows
|
||||
Dim item As New ToolStripMenuItem
|
||||
item.Tag = r("mit_id")
|
||||
item.Text = r("MAname")
|
||||
AddHandler item.Click, Sub()
|
||||
FUNC.SendungUebernehmen(dgvSendungen.Rows(e.RowIndex).Cells("tblSnd_SendungID").Value, AvisoID, item.Tag, True)
|
||||
reload(AvisoID)
|
||||
End Sub
|
||||
' Dim sql As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
' Dim dt = sql.loadDgvBySql("SELECT TOP (1000) [mit_id],[mit_nname] + ' ' + [mit_vname] + ' (' + mit_niederlassung + ')' as MAname FROM [ADMIN].[dbo].[tblMitarbeiter]
|
||||
' where mit_firma IN ('" & FirmaTMP & "','BEIDE','ALLE','ALL') and mit_gekuendigt=0
|
||||
' and mit_abteilung IN ('QS','ZOLL','DISPO') and [mit_TESTonly]=0 AND [mit_pseudoUser]=0
|
||||
' order by mit_nname,mit_vname ", "AVISO")
|
||||
|
||||
' For Each r In dt.Rows
|
||||
' Dim item As New ToolStripMenuItem
|
||||
' item.Tag = r("mit_id")
|
||||
' item.Text = r("MAname")
|
||||
' AddHandler item.Click, Sub()
|
||||
' FUNC.SendungUebernehmen(dgvSendungen.Rows(e.RowIndex).Cells("tblSnd_SendungID").Value, AvisoID, item.Tag, True)
|
||||
' reload(AvisoID)
|
||||
' End Sub
|
||||
|
||||
|
||||
item_Firma.DropDownItems.Add(item)
|
||||
Next
|
||||
C.Items.Add(item_Firma)
|
||||
Next
|
||||
C.Show(System.Windows.Forms.Cursor.Position)
|
||||
' item_Firma.DropDownItems.Add(item)
|
||||
' Next
|
||||
' C.Items.Add(item_Firma)
|
||||
'Next
|
||||
'C.Show(System.Windows.Forms.Cursor.Position)
|
||||
Else
|
||||
|
||||
If AVISO.Abgeschlossen Then Exit Sub
|
||||
@@ -1828,12 +1894,31 @@ Public Class usrcntlAktDetails
|
||||
|
||||
|
||||
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
|
||||
If FUNC.AktUebernehmen(AvisoID) Then
|
||||
If AVISO.LetzterMitarbeiterId = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then
|
||||
Dim f As New frmAvisoWeiterleiten("A", AvisoID) '--> Weitereliten
|
||||
If f.ShowDialog(Me) = DialogResult.OK Then
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
Vermerke_anzeigen()
|
||||
End If
|
||||
Else
|
||||
If FUNC.AktUebernehmen(AvisoID, False) Then
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Sub intiAktUebernehmenBtn()
|
||||
If AVISO.LetzterMitarbeiterId = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then
|
||||
Button4.Image = My.Resources.weiterleiten_small1
|
||||
Button4.Text = "Akt weiterleiten..."
|
||||
Else
|
||||
Button4.Image = My.Resources.personCheck_small
|
||||
Button4.Text = "Akt übernehmen"
|
||||
End If
|
||||
End Sub
|
||||
Public Sub showInfo(t As String, s As Double)
|
||||
lblAktUebernommen.Text = t
|
||||
lblAktUebernommen.Visible = True
|
||||
@@ -1946,16 +2031,12 @@ Public Class usrcntlAktDetails
|
||||
End Sub
|
||||
|
||||
Private Sub btnFertig_Click_1(sender As Object, e As EventArgs) Handles btnFertig.Click
|
||||
FUNC.LKWFertig(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.LKWFertig(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID)
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub btnÄndern_Click(sender As Object, e As EventArgs) Handles btnÄndern.Click
|
||||
VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID = AvisoID 'zur Sicherheit
|
||||
Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm()
|
||||
@@ -2067,6 +2148,7 @@ Public Class usrcntlAktDetails
|
||||
Case "WAI" : filialeNr = 5103
|
||||
Case "NKD" : filialeNr = 5303
|
||||
Case "SFD" : filialeNr = 4839
|
||||
Case "NEU" : filialeNr = 4819
|
||||
End Select
|
||||
ElseIf (cnt - txtSendungen.Text) <= txtSndFiskalAT.Text Then
|
||||
filialeNr = 4805
|
||||
@@ -2312,7 +2394,7 @@ Public Class usrcntlAktDetails
|
||||
'Dim trd = New Threading.Thread(Sub()
|
||||
For Each s In SENDUNG_LIST
|
||||
If checkcbxAlleFirmen(s.FilialenNr) Then
|
||||
If Not s.tblSnd_Fremdspedition Then SendungOptions.PrintSendung("PRINT", s, AVISO, Printername)
|
||||
If Not s.tblSnd_Fremdspedition Then SendungOptions.PrintSendung("PRINT", s, AVISO, Printername,, SENDUNG_LIST.Count)
|
||||
End If
|
||||
Next
|
||||
' End Sub)
|
||||
@@ -2544,5 +2626,24 @@ Public Class usrcntlAktDetails
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
|
||||
Dim rpt As New rptQRAviso(AVISO)
|
||||
Dim printer = "" 'SDL.cProgramFunctions.getDruckernameBySearch("INFO", True)
|
||||
If printer <> "" Then
|
||||
SDL.cProgramFunctions.printRpt(rpt, printer, True)
|
||||
Else
|
||||
SDL.cProgramFunctions.showRpt(rpt, "AVISO", False)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button13_Click_1(sender As Object, e As EventArgs) Handles Button13.Click
|
||||
Dim mailTo = InputBox("Freigabe-Mail senden an:")
|
||||
|
||||
'If vbYes = MsgBox("Freigabe-Mail wirklich senden?", vbYesNoCancel) Then
|
||||
If mailTo <> "" Then
|
||||
AvisoStatusFunctions.SendFreigabeEmail(AVISO, mailTo)
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
@@ -168,6 +168,8 @@
|
||||
<None Include="Resources\IMEX-LOGO_simple.png" />
|
||||
<None Include="Resources\Unisped_logo.jpg" />
|
||||
<None Include="Resources\FrontOfficeSUB.jpg" />
|
||||
<None Include="Resources\ok.png" />
|
||||
<None Include="Resources\okRound.jpg" />
|
||||
<Content Include="tv.ico" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
|
||||
20
AvisoTV/My Project/Resources.Designer.vb
generated
20
AvisoTV/My Project/Resources.Designer.vb
generated
@@ -136,6 +136,26 @@ Namespace My.Resources
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property ok() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ok", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property okRound() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("okRound", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
|
||||
@@ -163,4 +163,10 @@
|
||||
<data name="ggg5ggggggg" xml:space="preserve">
|
||||
<value />
|
||||
</data>
|
||||
<data name="ok" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\ok.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="okRound" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\okRound.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
BIN
AvisoTV/Resources/ok.png
Normal file
BIN
AvisoTV/Resources/ok.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.2 KiB |
BIN
AvisoTV/Resources/okRound.jpg
Normal file
BIN
AvisoTV/Resources/okRound.jpg
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 13 KiB |
313
AvisoTV/frmAnzeige.Designer.vb
generated
313
AvisoTV/frmAnzeige.Designer.vb
generated
@@ -37,7 +37,13 @@ Partial Class frmAnzeige
|
||||
Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAnzeige))
|
||||
Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.gridAnkunft = New System.Windows.Forms.DataGridView()
|
||||
Me.colFertig = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.colLKWNr = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
@@ -101,18 +107,32 @@ Partial Class frmAnzeige
|
||||
Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.grpTestAnzeige = New System.Windows.Forms.Panel()
|
||||
Me.Label24 = New System.Windows.Forms.Label()
|
||||
Me.txtBreiteGridLKWOK = New System.Windows.Forms.TextBox()
|
||||
Me.Label23 = New System.Windows.Forms.Label()
|
||||
Me.Label22 = New System.Windows.Forms.Label()
|
||||
Me.txtLkwOK_BildBreite = New System.Windows.Forms.TextBox()
|
||||
Me.Label21 = New System.Windows.Forms.Label()
|
||||
Me.Label20 = New System.Windows.Forms.Label()
|
||||
Me.txtLkwOK_LKWNrSchrift = New System.Windows.Forms.TextBox()
|
||||
Me.Label19 = New System.Windows.Forms.Label()
|
||||
Me.txtBreite7 = New System.Windows.Forms.TextBox()
|
||||
Me.txtSchrift7 = New System.Windows.Forms.TextBox()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.Label17 = New System.Windows.Forms.Label()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.gridFertig = New System.Windows.Forms.DataGridView()
|
||||
Me.cbxGridLKWOK = New System.Windows.Forms.CheckBox()
|
||||
Me.DataGridViewTextBoxColumn7 = New System.Windows.Forms.DataGridViewImageColumn()
|
||||
Me.DataGridViewTextBoxColumn8 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
CType(Me.gridAnkunft, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picConnectionProblem, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.Panel2.SuspendLayout()
|
||||
Me.grpTestAnzeige.SuspendLayout()
|
||||
CType(Me.gridFertig, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'gridAnkunft
|
||||
@@ -144,7 +164,7 @@ Partial Class frmAnzeige
|
||||
DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAnkunft.DefaultCellStyle = DataGridViewCellStyle8
|
||||
Me.gridAnkunft.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridAnkunft.Location = New System.Drawing.Point(0, 21)
|
||||
Me.gridAnkunft.Location = New System.Drawing.Point(424, 21)
|
||||
Me.gridAnkunft.MultiSelect = False
|
||||
Me.gridAnkunft.Name = "gridAnkunft"
|
||||
Me.gridAnkunft.ReadOnly = True
|
||||
@@ -155,7 +175,7 @@ Partial Class frmAnzeige
|
||||
Me.gridAnkunft.RowsDefaultCellStyle = DataGridViewCellStyle9
|
||||
Me.gridAnkunft.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridAnkunft.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.gridAnkunft.Size = New System.Drawing.Size(1250, 494)
|
||||
Me.gridAnkunft.Size = New System.Drawing.Size(826, 494)
|
||||
Me.gridAnkunft.TabIndex = 1
|
||||
Me.gridAnkunft.TabStop = False
|
||||
'
|
||||
@@ -309,7 +329,7 @@ Partial Class frmAnzeige
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Button1.ForeColor = System.Drawing.Color.White
|
||||
Me.Button1.Location = New System.Drawing.Point(431, 0)
|
||||
Me.Button1.Location = New System.Drawing.Point(644, 0)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.RightToLeft = System.Windows.Forms.RightToLeft.Yes
|
||||
Me.Button1.Size = New System.Drawing.Size(54, 20)
|
||||
@@ -321,7 +341,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label16.AutoSize = True
|
||||
Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label16.Location = New System.Drawing.Point(137, 70)
|
||||
Me.Label16.Location = New System.Drawing.Point(359, 73)
|
||||
Me.Label16.Name = "Label16"
|
||||
Me.Label16.Size = New System.Drawing.Size(67, 13)
|
||||
Me.Label16.TabIndex = 32
|
||||
@@ -331,7 +351,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label15.AutoSize = True
|
||||
Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label15.Location = New System.Drawing.Point(15, 120)
|
||||
Me.Label15.Location = New System.Drawing.Point(237, 123)
|
||||
Me.Label15.Name = "Label15"
|
||||
Me.Label15.Size = New System.Drawing.Size(85, 13)
|
||||
Me.Label15.TabIndex = 32
|
||||
@@ -340,7 +360,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift1_MESS
|
||||
'
|
||||
Me.txtSchrift1_MESS.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift1_MESS.Location = New System.Drawing.Point(140, 117)
|
||||
Me.txtSchrift1_MESS.Location = New System.Drawing.Point(362, 120)
|
||||
Me.txtSchrift1_MESS.MaxLength = 40
|
||||
Me.txtSchrift1_MESS.Name = "txtSchrift1_MESS"
|
||||
Me.txtSchrift1_MESS.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -350,7 +370,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label14.Location = New System.Drawing.Point(220, 224)
|
||||
Me.Label14.Location = New System.Drawing.Point(442, 227)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(37, 13)
|
||||
Me.Label14.TabIndex = 20
|
||||
@@ -359,7 +379,7 @@ Partial Class frmAnzeige
|
||||
'txtBreite6
|
||||
'
|
||||
Me.txtBreite6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite6.Location = New System.Drawing.Point(219, 247)
|
||||
Me.txtBreite6.Location = New System.Drawing.Point(441, 250)
|
||||
Me.txtBreite6.MaxLength = 40
|
||||
Me.txtBreite6.Name = "txtBreite6"
|
||||
Me.txtBreite6.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -368,7 +388,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift6
|
||||
'
|
||||
Me.txtSchrift6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift6.Location = New System.Drawing.Point(140, 247)
|
||||
Me.txtSchrift6.Location = New System.Drawing.Point(362, 250)
|
||||
Me.txtSchrift6.MaxLength = 40
|
||||
Me.txtSchrift6.Name = "txtSchrift6"
|
||||
Me.txtSchrift6.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -378,7 +398,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label13.Location = New System.Drawing.Point(15, 250)
|
||||
Me.Label13.Location = New System.Drawing.Point(237, 253)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(92, 13)
|
||||
Me.Label13.TabIndex = 23
|
||||
@@ -388,7 +408,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label12.Location = New System.Drawing.Point(313, 75)
|
||||
Me.Label12.Location = New System.Drawing.Point(535, 78)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(95, 13)
|
||||
Me.Label12.TabIndex = 29
|
||||
@@ -400,7 +420,7 @@ Partial Class frmAnzeige
|
||||
Me.cboFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboFirma.FormattingEnabled = True
|
||||
Me.cboFirma.Items.AddRange(New Object() {"VERAG_ALLE", "SUB", "SBG", "WAI", "NKD", "ATILLA", "IMEX", "UNISPED", "AMBAR", "FRONTOFFICE"})
|
||||
Me.cboFirma.Location = New System.Drawing.Point(316, 91)
|
||||
Me.cboFirma.Location = New System.Drawing.Point(538, 94)
|
||||
Me.cboFirma.Name = "cboFirma"
|
||||
Me.cboFirma.Size = New System.Drawing.Size(150, 21)
|
||||
Me.cboFirma.TabIndex = 30
|
||||
@@ -409,7 +429,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.Location = New System.Drawing.Point(393, 172)
|
||||
Me.Label10.Location = New System.Drawing.Point(615, 175)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(56, 13)
|
||||
Me.Label10.TabIndex = 26
|
||||
@@ -419,7 +439,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.Location = New System.Drawing.Point(216, 70)
|
||||
Me.Label8.Location = New System.Drawing.Point(438, 73)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(69, 13)
|
||||
Me.Label8.TabIndex = 4
|
||||
@@ -429,7 +449,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.btnTestAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnTestAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.btnTestAnzeige.Location = New System.Drawing.Point(316, 216)
|
||||
Me.btnTestAnzeige.Location = New System.Drawing.Point(538, 219)
|
||||
Me.btnTestAnzeige.Name = "btnTestAnzeige"
|
||||
Me.btnTestAnzeige.Size = New System.Drawing.Size(150, 51)
|
||||
Me.btnTestAnzeige.TabIndex = 27
|
||||
@@ -439,7 +459,7 @@ Partial Class frmAnzeige
|
||||
'txtHöhe
|
||||
'
|
||||
Me.txtHöhe.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtHöhe.Location = New System.Drawing.Point(303, 37)
|
||||
Me.txtHöhe.Location = New System.Drawing.Point(525, 40)
|
||||
Me.txtHöhe.MaxLength = 40
|
||||
Me.txtHöhe.Name = "txtHöhe"
|
||||
Me.txtHöhe.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -450,7 +470,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.txtBreite5.Enabled = False
|
||||
Me.txtBreite5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite5.Location = New System.Drawing.Point(219, 221)
|
||||
Me.txtBreite5.Location = New System.Drawing.Point(441, 224)
|
||||
Me.txtBreite5.MaxLength = 40
|
||||
Me.txtBreite5.Name = "txtBreite5"
|
||||
Me.txtBreite5.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -460,7 +480,7 @@ Partial Class frmAnzeige
|
||||
'txtSekunden
|
||||
'
|
||||
Me.txtSekunden.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSekunden.Location = New System.Drawing.Point(316, 169)
|
||||
Me.txtSekunden.Location = New System.Drawing.Point(538, 172)
|
||||
Me.txtSekunden.MaxLength = 40
|
||||
Me.txtSekunden.Name = "txtSekunden"
|
||||
Me.txtSekunden.Size = New System.Drawing.Size(71, 20)
|
||||
@@ -469,7 +489,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift5
|
||||
'
|
||||
Me.txtSchrift5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift5.Location = New System.Drawing.Point(140, 221)
|
||||
Me.txtSchrift5.Location = New System.Drawing.Point(362, 224)
|
||||
Me.txtSchrift5.MaxLength = 40
|
||||
Me.txtSchrift5.Name = "txtSchrift5"
|
||||
Me.txtSchrift5.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -478,7 +498,7 @@ Partial Class frmAnzeige
|
||||
'txtBreite4
|
||||
'
|
||||
Me.txtBreite4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite4.Location = New System.Drawing.Point(219, 195)
|
||||
Me.txtBreite4.Location = New System.Drawing.Point(441, 198)
|
||||
Me.txtBreite4.MaxLength = 40
|
||||
Me.txtBreite4.Name = "txtBreite4"
|
||||
Me.txtBreite4.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -487,7 +507,7 @@ Partial Class frmAnzeige
|
||||
'txtBreite3
|
||||
'
|
||||
Me.txtBreite3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite3.Location = New System.Drawing.Point(219, 169)
|
||||
Me.txtBreite3.Location = New System.Drawing.Point(441, 172)
|
||||
Me.txtBreite3.MaxLength = 40
|
||||
Me.txtBreite3.Name = "txtBreite3"
|
||||
Me.txtBreite3.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -496,7 +516,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift4
|
||||
'
|
||||
Me.txtSchrift4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift4.Location = New System.Drawing.Point(140, 195)
|
||||
Me.txtSchrift4.Location = New System.Drawing.Point(362, 198)
|
||||
Me.txtSchrift4.MaxLength = 40
|
||||
Me.txtSchrift4.Name = "txtSchrift4"
|
||||
Me.txtSchrift4.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -505,7 +525,7 @@ Partial Class frmAnzeige
|
||||
'txtBreite2
|
||||
'
|
||||
Me.txtBreite2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite2.Location = New System.Drawing.Point(219, 143)
|
||||
Me.txtBreite2.Location = New System.Drawing.Point(441, 146)
|
||||
Me.txtBreite2.MaxLength = 40
|
||||
Me.txtBreite2.Name = "txtBreite2"
|
||||
Me.txtBreite2.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -514,7 +534,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift3
|
||||
'
|
||||
Me.txtSchrift3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift3.Location = New System.Drawing.Point(140, 169)
|
||||
Me.txtSchrift3.Location = New System.Drawing.Point(362, 172)
|
||||
Me.txtSchrift3.MaxLength = 40
|
||||
Me.txtSchrift3.Name = "txtSchrift3"
|
||||
Me.txtSchrift3.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -523,7 +543,7 @@ Partial Class frmAnzeige
|
||||
'txtBreite1
|
||||
'
|
||||
Me.txtBreite1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite1.Location = New System.Drawing.Point(219, 91)
|
||||
Me.txtBreite1.Location = New System.Drawing.Point(441, 94)
|
||||
Me.txtBreite1.MaxLength = 40
|
||||
Me.txtBreite1.Name = "txtBreite1"
|
||||
Me.txtBreite1.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -532,7 +552,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift2
|
||||
'
|
||||
Me.txtSchrift2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift2.Location = New System.Drawing.Point(140, 143)
|
||||
Me.txtSchrift2.Location = New System.Drawing.Point(362, 146)
|
||||
Me.txtSchrift2.MaxLength = 40
|
||||
Me.txtSchrift2.Name = "txtSchrift2"
|
||||
Me.txtSchrift2.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -542,7 +562,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label9.Location = New System.Drawing.Point(313, 153)
|
||||
Me.Label9.Location = New System.Drawing.Point(535, 156)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(120, 13)
|
||||
Me.Label9.TabIndex = 24
|
||||
@@ -551,7 +571,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift1
|
||||
'
|
||||
Me.txtSchrift1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift1.Location = New System.Drawing.Point(140, 91)
|
||||
Me.txtSchrift1.Location = New System.Drawing.Point(362, 94)
|
||||
Me.txtSchrift1.MaxLength = 40
|
||||
Me.txtSchrift1.Name = "txtSchrift1"
|
||||
Me.txtSchrift1.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -561,7 +581,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(15, 224)
|
||||
Me.Label7.Location = New System.Drawing.Point(237, 227)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(55, 13)
|
||||
Me.Label7.TabIndex = 17
|
||||
@@ -570,7 +590,7 @@ Partial Class frmAnzeige
|
||||
'txtBreite
|
||||
'
|
||||
Me.txtBreite.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite.Location = New System.Drawing.Point(262, 44)
|
||||
Me.txtBreite.Location = New System.Drawing.Point(484, 47)
|
||||
Me.txtBreite.MaxLength = 40
|
||||
Me.txtBreite.Name = "txtBreite"
|
||||
Me.txtBreite.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -581,7 +601,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(15, 198)
|
||||
Me.Label6.Location = New System.Drawing.Point(237, 201)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(36, 13)
|
||||
Me.Label6.TabIndex = 14
|
||||
@@ -591,7 +611,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(300, 40)
|
||||
Me.Label2.Location = New System.Drawing.Point(522, 43)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label2.TabIndex = 2
|
||||
@@ -602,7 +622,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.Location = New System.Drawing.Point(15, 172)
|
||||
Me.Label5.Location = New System.Drawing.Point(237, 175)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(44, 13)
|
||||
Me.Label5.TabIndex = 11
|
||||
@@ -612,7 +632,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label4.Location = New System.Drawing.Point(15, 147)
|
||||
Me.Label4.Location = New System.Drawing.Point(237, 150)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(45, 13)
|
||||
Me.Label4.TabIndex = 8
|
||||
@@ -622,7 +642,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(15, 94)
|
||||
Me.Label3.Location = New System.Drawing.Point(237, 97)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(33, 13)
|
||||
Me.Label3.TabIndex = 5
|
||||
@@ -632,7 +652,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(244, 44)
|
||||
Me.Label1.Location = New System.Drawing.Point(466, 47)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(48, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
@@ -844,6 +864,16 @@ Partial Class frmAnzeige
|
||||
Me.grpTestAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.grpTestAnzeige.BackColor = System.Drawing.Color.White
|
||||
Me.grpTestAnzeige.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.grpTestAnzeige.Controls.Add(Me.cbxGridLKWOK)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label24)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtBreiteGridLKWOK)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label23)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label22)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtLkwOK_BildBreite)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label21)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label20)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtLkwOK_LKWNrSchrift)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label19)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtBreite7)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtSchrift7)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.Label18)
|
||||
@@ -884,17 +914,104 @@ Partial Class frmAnzeige
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtSchrift5)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.txtBreite4)
|
||||
Me.grpTestAnzeige.Controls.Add(Me.pnl)
|
||||
Me.grpTestAnzeige.Location = New System.Drawing.Point(352, 203)
|
||||
Me.grpTestAnzeige.MaximumSize = New System.Drawing.Size(487, 312)
|
||||
Me.grpTestAnzeige.Location = New System.Drawing.Point(424, 203)
|
||||
Me.grpTestAnzeige.MaximumSize = New System.Drawing.Size(700, 312)
|
||||
Me.grpTestAnzeige.Name = "grpTestAnzeige"
|
||||
Me.grpTestAnzeige.Size = New System.Drawing.Size(487, 312)
|
||||
Me.grpTestAnzeige.Size = New System.Drawing.Size(700, 312)
|
||||
Me.grpTestAnzeige.TabIndex = 35
|
||||
Me.grpTestAnzeige.Visible = False
|
||||
'
|
||||
'Label24
|
||||
'
|
||||
Me.Label24.AutoSize = True
|
||||
Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label24.Location = New System.Drawing.Point(14, 276)
|
||||
Me.Label24.Name = "Label24"
|
||||
Me.Label24.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Label24.TabIndex = 98
|
||||
Me.Label24.Text = "Splitter"
|
||||
'
|
||||
'txtBreiteGridLKWOK
|
||||
'
|
||||
Me.txtBreiteGridLKWOK.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreiteGridLKWOK.Location = New System.Drawing.Point(77, 273)
|
||||
Me.txtBreiteGridLKWOK.MaxLength = 40
|
||||
Me.txtBreiteGridLKWOK.Name = "txtBreiteGridLKWOK"
|
||||
Me.txtBreiteGridLKWOK.Size = New System.Drawing.Size(62, 20)
|
||||
Me.txtBreiteGridLKWOK.TabIndex = 99
|
||||
'
|
||||
'Label23
|
||||
'
|
||||
Me.Label23.AutoSize = True
|
||||
Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label23.Location = New System.Drawing.Point(147, 73)
|
||||
Me.Label23.Name = "Label23"
|
||||
Me.Label23.Size = New System.Drawing.Size(69, 13)
|
||||
Me.Label23.TabIndex = 97
|
||||
Me.Label23.Text = "Spaltenbreite"
|
||||
'
|
||||
'Label22
|
||||
'
|
||||
Me.Label22.AutoSize = True
|
||||
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label22.Location = New System.Drawing.Point(14, 123)
|
||||
Me.Label22.Name = "Label22"
|
||||
Me.Label22.Size = New System.Drawing.Size(24, 13)
|
||||
Me.Label22.TabIndex = 95
|
||||
Me.Label22.Text = "Bild"
|
||||
'
|
||||
'txtLkwOK_BildBreite
|
||||
'
|
||||
Me.txtLkwOK_BildBreite.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtLkwOK_BildBreite.Location = New System.Drawing.Point(150, 120)
|
||||
Me.txtLkwOK_BildBreite.MaxLength = 40
|
||||
Me.txtLkwOK_BildBreite.Name = "txtLkwOK_BildBreite"
|
||||
Me.txtLkwOK_BildBreite.Size = New System.Drawing.Size(62, 20)
|
||||
Me.txtLkwOK_BildBreite.TabIndex = 96
|
||||
'
|
||||
'Label21
|
||||
'
|
||||
Me.Label21.AutoSize = True
|
||||
Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label21.Location = New System.Drawing.Point(74, 73)
|
||||
Me.Label21.Name = "Label21"
|
||||
Me.Label21.Size = New System.Drawing.Size(67, 13)
|
||||
Me.Label21.TabIndex = 94
|
||||
Me.Label21.Text = "Schriftgröße "
|
||||
'
|
||||
'Label20
|
||||
'
|
||||
Me.Label20.AutoSize = True
|
||||
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label20.Location = New System.Drawing.Point(14, 97)
|
||||
Me.Label20.Name = "Label20"
|
||||
Me.Label20.Size = New System.Drawing.Size(45, 13)
|
||||
Me.Label20.TabIndex = 92
|
||||
Me.Label20.Text = "LKW-Nr"
|
||||
'
|
||||
'txtLkwOK_LKWNrSchrift
|
||||
'
|
||||
Me.txtLkwOK_LKWNrSchrift.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtLkwOK_LKWNrSchrift.Location = New System.Drawing.Point(77, 94)
|
||||
Me.txtLkwOK_LKWNrSchrift.MaxLength = 40
|
||||
Me.txtLkwOK_LKWNrSchrift.Name = "txtLkwOK_LKWNrSchrift"
|
||||
Me.txtLkwOK_LKWNrSchrift.Size = New System.Drawing.Size(62, 20)
|
||||
Me.txtLkwOK_LKWNrSchrift.TabIndex = 93
|
||||
'
|
||||
'Label19
|
||||
'
|
||||
Me.Label19.AutoSize = True
|
||||
Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label19.Location = New System.Drawing.Point(14, 40)
|
||||
Me.Label19.Name = "Label19"
|
||||
Me.Label19.Size = New System.Drawing.Size(169, 13)
|
||||
Me.Label19.TabIndex = 91
|
||||
Me.Label19.Text = "Einstellungen für LKW-Fertig"
|
||||
'
|
||||
'txtBreite7
|
||||
'
|
||||
Me.txtBreite7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtBreite7.Location = New System.Drawing.Point(219, 273)
|
||||
Me.txtBreite7.Location = New System.Drawing.Point(441, 276)
|
||||
Me.txtBreite7.MaxLength = 40
|
||||
Me.txtBreite7.Name = "txtBreite7"
|
||||
Me.txtBreite7.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -903,7 +1020,7 @@ Partial Class frmAnzeige
|
||||
'txtSchrift7
|
||||
'
|
||||
Me.txtSchrift7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtSchrift7.Location = New System.Drawing.Point(140, 273)
|
||||
Me.txtSchrift7.Location = New System.Drawing.Point(362, 276)
|
||||
Me.txtSchrift7.MaxLength = 40
|
||||
Me.txtSchrift7.Name = "txtSchrift7"
|
||||
Me.txtSchrift7.Size = New System.Drawing.Size(62, 20)
|
||||
@@ -913,7 +1030,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label18.AutoSize = True
|
||||
Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label18.Location = New System.Drawing.Point(15, 276)
|
||||
Me.Label18.Location = New System.Drawing.Point(237, 279)
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Size = New System.Drawing.Size(68, 13)
|
||||
Me.Label18.TabIndex = 90
|
||||
@@ -923,7 +1040,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Label17.AutoSize = True
|
||||
Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label17.Location = New System.Drawing.Point(15, 37)
|
||||
Me.Label17.Location = New System.Drawing.Point(237, 40)
|
||||
Me.Label17.Name = "Label17"
|
||||
Me.Label17.Size = New System.Drawing.Size(151, 13)
|
||||
Me.Label17.TabIndex = 5
|
||||
@@ -933,7 +1050,7 @@ Partial Class frmAnzeige
|
||||
'
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Button2.Location = New System.Drawing.Point(316, 120)
|
||||
Me.Button2.Location = New System.Drawing.Point(538, 123)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(150, 25)
|
||||
Me.Button2.TabIndex = 27
|
||||
@@ -942,20 +1059,110 @@ Partial Class frmAnzeige
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pnl.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.pnl.Location = New System.Drawing.Point(-1, 0)
|
||||
Me.pnl.Name = "pnl"
|
||||
Me.pnl.Size = New System.Drawing.Size(487, 20)
|
||||
Me.pnl.Size = New System.Drawing.Size(699, 20)
|
||||
Me.pnl.TabIndex = 87
|
||||
'
|
||||
'gridFertig
|
||||
'
|
||||
Me.gridFertig.AllowUserToAddRows = False
|
||||
Me.gridFertig.AllowUserToDeleteRows = False
|
||||
DataGridViewCellStyle15.BackColor = System.Drawing.Color.Empty
|
||||
DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridFertig.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle15
|
||||
Me.gridFertig.AutoSizeRowsMode = System.Windows.Forms.DataGridViewAutoSizeRowsMode.DisplayedCellsExceptHeaders
|
||||
Me.gridFertig.BackgroundColor = System.Drawing.Color.MintCream
|
||||
Me.gridFertig.ColumnHeadersBorderStyle = System.Windows.Forms.DataGridViewHeaderBorderStyle.[Single]
|
||||
DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle16.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle16.Font = New System.Drawing.Font("Tahoma", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridFertig.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle16
|
||||
Me.gridFertig.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.gridFertig.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn7, Me.DataGridViewTextBoxColumn8})
|
||||
DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle19.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle19.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
DataGridViewCellStyle19.SelectionBackColor = System.Drawing.Color.MintCream
|
||||
DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridFertig.DefaultCellStyle = DataGridViewCellStyle19
|
||||
Me.gridFertig.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.gridFertig.GridColor = System.Drawing.Color.MintCream
|
||||
Me.gridFertig.Location = New System.Drawing.Point(0, 21)
|
||||
Me.gridFertig.MultiSelect = False
|
||||
Me.gridFertig.Name = "gridFertig"
|
||||
Me.gridFertig.ReadOnly = True
|
||||
Me.gridFertig.RowHeadersVisible = False
|
||||
DataGridViewCellStyle20.BackColor = System.Drawing.Color.MintCream
|
||||
DataGridViewCellStyle20.SelectionBackColor = System.Drawing.Color.White
|
||||
DataGridViewCellStyle20.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridFertig.RowsDefaultCellStyle = DataGridViewCellStyle20
|
||||
Me.gridFertig.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridFertig.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.gridFertig.Size = New System.Drawing.Size(424, 494)
|
||||
Me.gridFertig.TabIndex = 36
|
||||
Me.gridFertig.TabStop = False
|
||||
'
|
||||
'cbxGridLKWOK
|
||||
'
|
||||
Me.cbxGridLKWOK.AutoSize = True
|
||||
Me.cbxGridLKWOK.Location = New System.Drawing.Point(17, 249)
|
||||
Me.cbxGridLKWOK.Name = "cbxGridLKWOK"
|
||||
Me.cbxGridLKWOK.Size = New System.Drawing.Size(119, 17)
|
||||
Me.cbxGridLKWOK.TabIndex = 100
|
||||
Me.cbxGridLKWOK.Text = "LKW-Fertig sichtbar"
|
||||
Me.cbxGridLKWOK.UseVisualStyleBackColor = True
|
||||
'
|
||||
'DataGridViewTextBoxColumn7
|
||||
'
|
||||
DataGridViewCellStyle17.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleCenter
|
||||
DataGridViewCellStyle17.BackColor = System.Drawing.Color.MintCream
|
||||
DataGridViewCellStyle17.NullValue = CType(resources.GetObject("DataGridViewCellStyle17.NullValue"), Object)
|
||||
DataGridViewCellStyle17.SelectionBackColor = System.Drawing.Color.MintCream
|
||||
DataGridViewCellStyle17.SelectionForeColor = System.Drawing.Color.Black
|
||||
Me.DataGridViewTextBoxColumn7.DefaultCellStyle = DataGridViewCellStyle17
|
||||
Me.DataGridViewTextBoxColumn7.HeaderText = ""
|
||||
Me.DataGridViewTextBoxColumn7.Image = Global.AvisoTV.My.Resources.Resources.okRound
|
||||
Me.DataGridViewTextBoxColumn7.ImageLayout = System.Windows.Forms.DataGridViewImageCellLayout.Zoom
|
||||
Me.DataGridViewTextBoxColumn7.Name = "DataGridViewTextBoxColumn7"
|
||||
Me.DataGridViewTextBoxColumn7.ReadOnly = True
|
||||
Me.DataGridViewTextBoxColumn7.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.DataGridViewTextBoxColumn7.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
|
||||
Me.DataGridViewTextBoxColumn7.Width = 80
|
||||
'
|
||||
'DataGridViewTextBoxColumn8
|
||||
'
|
||||
Me.DataGridViewTextBoxColumn8.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
||||
DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle18.BackColor = System.Drawing.Color.LightGreen
|
||||
DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 27.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle18.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0)
|
||||
DataGridViewCellStyle18.SelectionBackColor = System.Drawing.Color.LightGreen
|
||||
DataGridViewCellStyle18.SelectionForeColor = System.Drawing.Color.Black
|
||||
DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.DataGridViewTextBoxColumn8.DefaultCellStyle = DataGridViewCellStyle18
|
||||
Me.DataGridViewTextBoxColumn8.HeaderText = "LKW-KENNZ. /PLAKA"
|
||||
Me.DataGridViewTextBoxColumn8.Name = "DataGridViewTextBoxColumn8"
|
||||
Me.DataGridViewTextBoxColumn8.ReadOnly = True
|
||||
'
|
||||
'frmAnzeige
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1250, 624)
|
||||
Me.Controls.Add(Me.grpTestAnzeige)
|
||||
Me.Controls.Add(Me.picConnectionProblem)
|
||||
Me.Controls.Add(Me.gridAnkunft)
|
||||
Me.Controls.Add(Me.gridFertig)
|
||||
Me.Controls.Add(Me.picConnectionProblem)
|
||||
Me.Controls.Add(Me.Panel2)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
@@ -973,6 +1180,7 @@ Partial Class frmAnzeige
|
||||
Me.Panel2.ResumeLayout(False)
|
||||
Me.grpTestAnzeige.ResumeLayout(False)
|
||||
Me.grpTestAnzeige.PerformLayout()
|
||||
CType(Me.gridFertig, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
@@ -1045,4 +1253,17 @@ Partial Class frmAnzeige
|
||||
Friend WithEvents txtSchrift7 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Label18 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button4 As Button
|
||||
Friend WithEvents gridFertig As DataGridView
|
||||
Friend WithEvents Label23 As Label
|
||||
Friend WithEvents Label22 As Label
|
||||
Friend WithEvents txtLkwOK_BildBreite As TextBox
|
||||
Friend WithEvents Label21 As Label
|
||||
Friend WithEvents Label20 As Label
|
||||
Friend WithEvents txtLkwOK_LKWNrSchrift As TextBox
|
||||
Friend WithEvents Label19 As Label
|
||||
Friend WithEvents Label24 As Label
|
||||
Friend WithEvents txtBreiteGridLKWOK As TextBox
|
||||
Friend WithEvents cbxGridLKWOK As CheckBox
|
||||
Friend WithEvents DataGridViewTextBoxColumn7 As DataGridViewImageColumn
|
||||
Friend WithEvents DataGridViewTextBoxColumn8 As DataGridViewTextBoxColumn
|
||||
End Class
|
||||
|
||||
@@ -141,10 +141,33 @@
|
||||
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="DataGridViewTextBoxColumn7.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="DataGridViewCellStyle17.NullValue" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
Qk32AgAAAAAAADYAAAAoAAAADgAAABAAAAABABgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACEgoTGw8bGw8bGw8bGw8bGw8bGw8bG
|
||||
w8bGw8bGw8bGw8bGw8bGw8YAAAAAAISChP///////////////////////////////////////////8bD
|
||||
xgAAAAAAhIKE////////////////////////////////////////////xsPGAAAAAACEgoT/////////
|
||||
///////////////////////////////////Gw8YAAAAAAISChP//////////////////////////////
|
||||
/////////////8bDxgAAAAAAhIKE////////////AAD/AAD/////////AAD/AAD/////////xsPGAAAA
|
||||
AACEgoT///////////////8AAP8AAP8AAP8AAP/////////////Gw8YAAAAAAISChP//////////////
|
||||
/////wAA/wAA/////////////////8bDxgAAAAAAhIKE////////////////AAD/AAD/AAD/AAD/////
|
||||
////////xsPGAAAAAACEgoT///////////8AAP8AAP////////8AAP8AAP/////////Gw8YAAAAAAISC
|
||||
hP///////////////////////////////////////////8bDxgAAAAAAhIKE////////////////////
|
||||
////////////////////////xsPGAAAAAACEgoT/////////////////////////////////////////
|
||||
///Gw8YAAAAAAISChP///////////////////////////////////////////8bDxgAAAAAAhIKEhIKE
|
||||
hIKEhIKEhIKEhIKEhIKEhIKEhIKEhIKEhIKEhIKEhIKEhIKEAAA=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="DataGridViewTextBoxColumn8.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>35</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA
|
||||
|
||||
@@ -41,6 +41,9 @@ Public Class frmAnzeige
|
||||
Private Font6 As New Font(FontFamily.GenericSansSerif, 30, FontStyle.Bold)
|
||||
Private Font7 As New Font(FontFamily.GenericSansSerif, 30, FontStyle.Bold)
|
||||
|
||||
|
||||
Private Font_LkwOK_LKWNr As New Font(FontFamily.GenericSansSerif, 30, FontStyle.Bold)
|
||||
|
||||
Dim GridBackgroundColor As Color = Color.FromArgb(240, 245, 255)
|
||||
Dim TESTSYSTEM As Boolean = False
|
||||
Private isloaded As Boolean = False
|
||||
@@ -197,6 +200,42 @@ Public Class frmAnzeige
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Function getSQL(ByRef where As String, seiten As Boolean, onlyOK As Boolean) As String
|
||||
Dim buero As String = ""
|
||||
If StandortATILLA Then
|
||||
buero = " , Buero "
|
||||
End If
|
||||
Dim stat_tmp As String = cGlobal.Status_Ankunft.ToString
|
||||
Dim ank_tmp As String = ""
|
||||
If seiten Then ank_tmp = " And Ankunft > " & SQLDatumZeitSekunden(Merk_Ankunftsdatum)
|
||||
If onlyOK Then ank_tmp = " And LKW_fertig = 1 "
|
||||
|
||||
If False Then 'alle Staten
|
||||
stat_tmp = "3,99,4,5,0"
|
||||
ank_tmp = ""
|
||||
End If
|
||||
|
||||
where = " WHERE "
|
||||
Dim hSQL As String = "SELECT AvisoID, Status, UPPER(LKW_Nr) as LKW_Nr, Ankunft, Dauer, letzterMitarbeiter, LKW_fertig " & buero & " , AvisoTVHinweis, ImEx FROM Aviso "
|
||||
where &= " Status IN( " & stat_tmp & ") "
|
||||
If CLUSTER <> "" Then
|
||||
where &= " AND (Firma= '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR Cluster= '" & CLUSTER & "') "
|
||||
ElseIf Standort <> "WAI" And Standort <> "ABG" And Standort <> "NKD" Then
|
||||
where &= " AND Firma= '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' "
|
||||
End If
|
||||
|
||||
If Standort <> "" Then where &= " AND Grenzstelle = '" & Standort.Replace("IMEX", "SUB").Replace("UNISPED", "SUB").Replace("FRONTOFFICE", "SUB") & "'" 'nur die IMEX-LKW in SUB anzeigen
|
||||
If Standort = "FRONTOFFICE" Then where &= " AND isnull(ImEx,'IMPORT') IN ('IMPORT','') "
|
||||
hSQL &= where
|
||||
hSQL += ank_tmp & " ORDER BY CASE " &
|
||||
" when [Status] =3 then 1 " &
|
||||
" when [Status] =99 then 2 " &
|
||||
" when [Status] =4 then 3 " &
|
||||
" when [Status] =5 then 4 " &
|
||||
" when [Status] =0 then 4 " &
|
||||
" END , Ankunft"
|
||||
Return hSQL
|
||||
End Function
|
||||
|
||||
Dim contrnamecnt As Integer = 0
|
||||
Public Sub Listen_ermitteln()
|
||||
@@ -226,38 +265,11 @@ Public Class frmAnzeige
|
||||
Merk_Ankunftsdatum = LeerDatum 'falls letzte Seite angezeigt, dann wieder von vorne anfangen
|
||||
Aktive_Seite = 1
|
||||
End If
|
||||
Dim buero As String = ""
|
||||
If StandortATILLA Then
|
||||
buero = " , Buero "
|
||||
End If
|
||||
Dim stat_tmp As String = cGlobal.Status_Ankunft.ToString
|
||||
Dim ank_tmp As String = " AND Ankunft > " & SQLDatumZeitSekunden(Merk_Ankunftsdatum)
|
||||
Dim where As String = ""
|
||||
|
||||
If False Then 'alle Staten
|
||||
stat_tmp = "3,99,4,5,0"
|
||||
ank_tmp = ""
|
||||
End If
|
||||
Dim hSQL = getSQL(where, True, False)
|
||||
|
||||
Dim where As String = " WHERE "
|
||||
Dim hSQL As String = "SELECT AvisoID, Status, UPPER(LKW_Nr) as LKW_Nr, Ankunft, Dauer, letzterMitarbeiter, LKW_fertig " & buero & " , AvisoTVHinweis, ImEx FROM Aviso "
|
||||
where &= " Status IN( " & stat_tmp & ") "
|
||||
If CLUSTER <> "" Then
|
||||
where &= " AND (Firma= '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR Cluster= '" & CLUSTER & "') "
|
||||
ElseIf Standort <> "WAI" And Standort <> "ABG" And Standort <> "NKD" Then
|
||||
where &= " AND Firma= '" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' "
|
||||
End If
|
||||
|
||||
If Standort <> "" Then where &= " AND Grenzstelle = '" & Standort.Replace("IMEX", "SUB").Replace("UNISPED", "SUB").Replace("FRONTOFFICE", "SUB") & "'" 'nur die IMEX-LKW in SUB anzeigen
|
||||
If Standort = "FRONTOFFICE" Then where &= " AND isnull(ImEx,'IMPORT') IN ('IMPORT','') "
|
||||
hSQL &= where
|
||||
hSQL += ank_tmp & " ORDER BY CASE " &
|
||||
" when [Status] =3 then 1 " &
|
||||
" when [Status] =99 then 2 " &
|
||||
" when [Status] =4 then 3 " &
|
||||
" when [Status] =5 then 4 " &
|
||||
" when [Status] =0 then 4 " &
|
||||
" END , Ankunft"
|
||||
' MsgBox(hSQL)
|
||||
'Anzahl der Aviso mit Status Ankunft ermitteln
|
||||
Dim CheckAnzahl As String = "SELECT AvisoID FROM Aviso " & where 'WHERE Status IN( " & stat_tmp & ") "
|
||||
' If Standort <> "" Then CheckAnzahl += " AND Grenzstelle = '" & Standort.Replace("IMEX", "SUB") & "'"
|
||||
@@ -293,7 +305,7 @@ Public Class frmAnzeige
|
||||
Dim hMitarbeiter As String = VarToStr(dr.Item("LetzterMitarbeiter"))
|
||||
Dim ImEx As String = VarToStr(dr.Item("ImEx"))
|
||||
|
||||
If StandortATILLA Or Standort = "IMEX" Then
|
||||
If StandortATILLA Or Standort = "IMEX" Or Standort = "FRONTOFFICE" Then
|
||||
'bei Mitarbeiter nur User aus letzter Bearbeiter rausfiltern
|
||||
Dim x As String = ""
|
||||
Dim n As Integer = 0
|
||||
@@ -381,9 +393,24 @@ Public Class frmAnzeige
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
|
||||
'gridFertig:
|
||||
Using cmd As New SqlCommand(getSQL("", False, True), conn)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If Not IsNothing(dr) Then
|
||||
gridFertig.Rows.Clear() 'Ansicht löschen
|
||||
|
||||
While dr.Read()
|
||||
anz += 1
|
||||
Dim LKW_Nr As String = VarToStr(dr.Item("LKW_Nr"))
|
||||
gridFertig.Rows.Add(My.Resources.okRound, LKW_Nr)
|
||||
|
||||
End While
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("ERR: " & ex.Message)
|
||||
MsgBox("ERR: " & ex.StackTrace)
|
||||
MsgBox("ERR: " & ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
|
||||
'Ermitteln
|
||||
@@ -520,6 +547,9 @@ Public Class frmAnzeige
|
||||
' picVERAG.Image = My.Resources.Verag_AG_Logopng
|
||||
'End If
|
||||
|
||||
gridFertig.Visible = cbxGridLKWOK.Checked
|
||||
|
||||
|
||||
If txtBreite.Text <> "" Then
|
||||
If VarToInt(txtBreite.Text) < 800 Then
|
||||
MsgBox("Breite ist zu klein - mind. 800")
|
||||
@@ -574,6 +604,16 @@ Public Class frmAnzeige
|
||||
Font3 = New Font(FontFamily.GenericSansSerif, VarToInt(txtSchrift3.Text), FontStyle.Bold)
|
||||
End If
|
||||
|
||||
If txtLkwOK_LKWNrSchrift.Text <> "" Then
|
||||
If VarToInt(txtLkwOK_LKWNrSchrift.Text) < 10 Then
|
||||
MsgBox("txtLkwOK_LKWNrSchrift ist zu klein - mind. 10")
|
||||
txtLkwOK_LKWNrSchrift.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
Font_LkwOK_LKWNr = New Font(FontFamily.GenericSansSerif, VarToInt(txtLkwOK_LKWNrSchrift.Text), FontStyle.Bold)
|
||||
End If
|
||||
|
||||
|
||||
If txtSekunden.Text <> "" Then
|
||||
If VarToInt(txtSekunden.Text) < 10 Then
|
||||
MsgBox("Resfresh unter 10 Sekunden ist nicht erlaubt.")
|
||||
@@ -593,6 +633,9 @@ Public Class frmAnzeige
|
||||
gridAnkunft.Columns(3).DefaultCellStyle.Font = Font4
|
||||
gridAnkunft.Columns(4).DefaultCellStyle.Font = Font5
|
||||
|
||||
gridFertig.Columns(1).DefaultCellStyle.Font = Font_LkwOK_LKWNr
|
||||
|
||||
|
||||
If StandortATILLA And gridAnkunft.Columns("clmnBuero") IsNot Nothing Then
|
||||
gridAnkunft.Columns("clmnBuero").Width = CInt(IIf(IsNumeric(txtBreite6.Text), txtBreite6.Text, 50))
|
||||
gridAnkunft.Columns("clmnBuero").DefaultCellStyle.Font = Font6
|
||||
@@ -613,6 +656,9 @@ Public Class frmAnzeige
|
||||
If txtBreite4.Text <> "" Then gridAnkunft.Columns(3).Width = CInt(txtBreite4.Text)
|
||||
gridAnkunft.Columns(4).AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
If txtLkwOK_BildBreite.Text <> "" Then gridFertig.Columns(0).Width = CInt(txtLkwOK_BildBreite.Text)
|
||||
|
||||
If txtBreiteGridLKWOK.Text <> "" Then gridFertig.Width = CInt(txtBreiteGridLKWOK.Text)
|
||||
|
||||
'gridAnkunft.Columns(4).Width = Me.Width - gridAnkunft.Columns(0).Width - gridAnkunft.Columns(1).Width - gridAnkunft.Columns(2).Width - gridAnkunft.Columns(3).Width - 20
|
||||
'txtBreite5.Text = gridAnkunft.Columns(4).Width.ToString
|
||||
@@ -660,6 +706,10 @@ Public Class frmAnzeige
|
||||
Dim p As String = getProperty(DirectCast(c, TextBox).Name)
|
||||
If p <> "" Then DirectCast(c, TextBox).Text = p
|
||||
End If
|
||||
If c.GetType.Name = "CheckBox" Then
|
||||
Dim p As String = getProperty(DirectCast(c, CheckBox).Name)
|
||||
If p <> "" Then DirectCast(c, CheckBox).Checked = CBool(p)
|
||||
End If
|
||||
Next
|
||||
End Sub
|
||||
|
||||
@@ -685,6 +735,13 @@ Public Class frmAnzeige
|
||||
|
||||
If txtSekunden.Text <> "" Then setProperty("txtSekunden", txtSekunden.Text)
|
||||
|
||||
|
||||
If txtLkwOK_LKWNrSchrift.Text <> "" Then setProperty("txtLkwOK_LKWNrSchrift", txtLkwOK_LKWNrSchrift.Text)
|
||||
If txtLkwOK_BildBreite.Text <> "" Then setProperty("txtLkwOK_BildBreite", txtLkwOK_BildBreite.Text)
|
||||
If txtBreiteGridLKWOK.Text <> "" Then setProperty("txtBreiteGridLKWOK", txtBreiteGridLKWOK.Text)
|
||||
|
||||
setProperty("cbxGridLKWOK", CInt(cbxGridLKWOK.Checked).ToString)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
@@ -724,7 +781,8 @@ Public Class frmAnzeige
|
||||
|
||||
Private Sub txtBreite1_KeyUp(sender As Object, e As KeyEventArgs) Handles txtSchrift1_MESS.KeyUp, txtSekunden.KeyUp,
|
||||
txtSchrift1.KeyUp, txtSchrift2.KeyUp, txtSchrift3.KeyUp, txtSchrift4.KeyUp, txtSchrift5.KeyUp, txtSchrift6.KeyUp, txtSchrift7.KeyUp,
|
||||
txtBreite1.KeyUp, txtBreite2.KeyUp, txtBreite3.KeyUp, txtBreite4.KeyUp, txtBreite5.KeyUp, txtBreite6.KeyUp, txtBreite7.KeyUp
|
||||
txtBreite1.KeyUp, txtBreite2.KeyUp, txtBreite3.KeyUp, txtBreite4.KeyUp, txtBreite5.KeyUp, txtBreite6.KeyUp, txtBreite7.KeyUp,
|
||||
txtLkwOK_BildBreite.KeyUp, txtLkwOK_LKWNrSchrift.KeyUp, txtBreiteGridLKWOK.KeyUp
|
||||
|
||||
If e.KeyCode = Keys.Return Then
|
||||
btnTestAnzeige.PerformClick()
|
||||
@@ -750,6 +808,10 @@ Public Class frmAnzeige
|
||||
End If
|
||||
secondmonitorSelected = Not secondmonitorSelected
|
||||
End Sub
|
||||
|
||||
Private Sub gridFertig_SelectionChanged(sender As Object, e As EventArgs) Handles gridFertig.SelectionChanged
|
||||
gridFertig.ClearSelection()
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
|
||||
BIN
Diverses/avisoMsg.psd
Normal file
BIN
Diverses/avisoMsg.psd
Normal file
Binary file not shown.
BIN
Diverses/avisoNewMsg.ico
Normal file
BIN
Diverses/avisoNewMsg.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 66 KiB |
BIN
Diverses/flag_srb.png
Normal file
BIN
Diverses/flag_srb.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 300 KiB |
BIN
Diverses/flag_srb2.png
Normal file
BIN
Diverses/flag_srb2.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 100 KiB |
BIN
Diverses/flag_tr.jpg
Normal file
BIN
Diverses/flag_tr.jpg
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 76 KiB |
BIN
Diverses/flag_tr.png
Normal file
BIN
Diverses/flag_tr.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 41 KiB |
BIN
Diverses/lan_eng.png
Normal file
BIN
Diverses/lan_eng.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 3.6 KiB |
BIN
Diverses/okRound.jpg
Normal file
BIN
Diverses/okRound.jpg
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 13 KiB |
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user