This commit is contained in:
2022-12-25 10:09:49 +01:00
commit 406d053e79
3903 changed files with 2127541 additions and 0 deletions

View File

@@ -0,0 +1,62 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FrmFortschritt
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.Label1 = New System.Windows.Forms.Label
Me.ProgressBar1 = New System.Windows.Forms.ProgressBar
Me.SuspendLayout()
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 18)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(261, 13)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Die Daten werden nach Excel-Exportiert. Bitte warten."
'
'ProgressBar1
'
Me.ProgressBar1.Location = New System.Drawing.Point(15, 57)
Me.ProgressBar1.Name = "ProgressBar1"
Me.ProgressBar1.Size = New System.Drawing.Size(353, 23)
Me.ProgressBar1.TabIndex = 1
'
'FrmFortschritt
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(380, 98)
Me.Controls.Add(Me.ProgressBar1)
Me.Controls.Add(Me.Label1)
Me.Name = "FrmFortschritt"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Excel-Export"
Me.TopMost = True
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar
End Class

View 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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@@ -0,0 +1,6 @@
Public Class FrmFortschritt
Private Sub FrmFortschritt_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class

198
EDOKA/EDEX/Banklagernd/_Form2.Designer.vb generated Normal file
View File

@@ -0,0 +1,198 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class _Form2
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.pnlbck = New System.Windows.Forms.Panel
Me.rbkeineUebergabe = New System.Windows.Forms.RadioButton
Me.rbbckversand = New System.Windows.Forms.RadioButton
Me.rbbckbldossier = New System.Windows.Forms.RadioButton
Me.pnleinzeldokument = New System.Windows.Forms.Panel
Me.rbphysischisesDossier = New System.Windows.Forms.RadioButton
Me.RBEinzelPersoenlich = New System.Windows.Forms.RadioButton
Me.rbeinzelblversand = New System.Windows.Forms.RadioButton
Me.rbeinzelbldossier = New System.Windows.Forms.RadioButton
Me.GroupBox2 = New System.Windows.Forms.GroupBox
Me.rbDossier = New System.Windows.Forms.RadioButton
Me.rbVersand = New System.Windows.Forms.RadioButton
Me.RBPersönlich = New System.Windows.Forms.RadioButton
Me.RBPhysisch = New System.Windows.Forms.RadioButton
Me.pnlbck.SuspendLayout()
Me.pnleinzeldokument.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.SuspendLayout()
'
'pnlbck
'
Me.pnlbck.Controls.Add(Me.rbkeineUebergabe)
Me.pnlbck.Controls.Add(Me.rbbckversand)
Me.pnlbck.Controls.Add(Me.rbbckbldossier)
Me.pnlbck.Location = New System.Drawing.Point(33, 25)
Me.pnlbck.Name = "pnlbck"
Me.pnlbck.Size = New System.Drawing.Size(272, 80)
Me.pnlbck.TabIndex = 7
Me.pnlbck.Visible = False
'
'rbkeineUebergabe
'
Me.rbkeineUebergabe.Location = New System.Drawing.Point(8, 55)
Me.rbkeineUebergabe.Name = "rbkeineUebergabe"
Me.rbkeineUebergabe.Size = New System.Drawing.Size(256, 24)
Me.rbkeineUebergabe.TabIndex = 2
Me.rbkeineUebergabe.Text = "Keine Übergabe an den Kunden"
'
'rbbckversand
'
Me.rbbckversand.Location = New System.Drawing.Point(8, 30)
Me.rbbckversand.Name = "rbbckversand"
Me.rbbckversand.Size = New System.Drawing.Size(208, 24)
Me.rbbckversand.TabIndex = 1
Me.rbbckversand.Text = "Versand/persönliche Aushändigung"
'
'rbbckbldossier
'
Me.rbbckbldossier.Location = New System.Drawing.Point(8, 6)
Me.rbbckbldossier.Name = "rbbckbldossier"
Me.rbbckbldossier.Size = New System.Drawing.Size(264, 24)
Me.rbbckbldossier.TabIndex = 0
Me.rbbckbldossier.Text = "Ablage im elektronischen Banklagernd-Dossier"
'
'pnleinzeldokument
'
Me.pnleinzeldokument.Controls.Add(Me.rbphysischisesDossier)
Me.pnleinzeldokument.Controls.Add(Me.RBEinzelPersoenlich)
Me.pnleinzeldokument.Controls.Add(Me.rbeinzelblversand)
Me.pnleinzeldokument.Controls.Add(Me.rbeinzelbldossier)
Me.pnleinzeldokument.Location = New System.Drawing.Point(308, 87)
Me.pnleinzeldokument.Name = "pnleinzeldokument"
Me.pnleinzeldokument.Size = New System.Drawing.Size(272, 88)
Me.pnleinzeldokument.TabIndex = 8
Me.pnleinzeldokument.Visible = False
'
'rbphysischisesDossier
'
Me.rbphysischisesDossier.Location = New System.Drawing.Point(8, 66)
Me.rbphysischisesDossier.Name = "rbphysischisesDossier"
Me.rbphysischisesDossier.Size = New System.Drawing.Size(192, 24)
Me.rbphysischisesDossier.TabIndex = 6
Me.rbphysischisesDossier.Text = "Ablage im physischen Dossier"
'
'RBEinzelPersoenlich
'
Me.RBEinzelPersoenlich.Location = New System.Drawing.Point(8, 43)
Me.RBEinzelPersoenlich.Name = "RBEinzelPersoenlich"
Me.RBEinzelPersoenlich.Size = New System.Drawing.Size(192, 24)
Me.RBEinzelPersoenlich.TabIndex = 5
Me.RBEinzelPersoenlich.Text = "Persönliche Aushändigung"
'
'rbeinzelblversand
'
Me.rbeinzelblversand.Location = New System.Drawing.Point(8, 23)
Me.rbeinzelblversand.Name = "rbeinzelblversand"
Me.rbeinzelblversand.Size = New System.Drawing.Size(208, 24)
Me.rbeinzelblversand.TabIndex = 1
Me.rbeinzelblversand.Text = "Versand an eine Zustelladresse"
'
'rbeinzelbldossier
'
Me.rbeinzelbldossier.Location = New System.Drawing.Point(8, 3)
Me.rbeinzelbldossier.Name = "rbeinzelbldossier"
Me.rbeinzelbldossier.Size = New System.Drawing.Size(264, 24)
Me.rbeinzelbldossier.TabIndex = 0
Me.rbeinzelbldossier.Text = "Ablage im physischen Banklagernd-Dossier"
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.RBPhysisch)
Me.GroupBox2.Controls.Add(Me.rbDossier)
Me.GroupBox2.Controls.Add(Me.rbVersand)
Me.GroupBox2.Controls.Add(Me.RBPersönlich)
Me.GroupBox2.Location = New System.Drawing.Point(260, 79)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(368, 104)
Me.GroupBox2.TabIndex = 9
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Weiterleitung"
'
'rbDossier
'
Me.rbDossier.Location = New System.Drawing.Point(8, 16)
Me.rbDossier.Name = "rbDossier"
Me.rbDossier.Size = New System.Drawing.Size(280, 24)
Me.rbDossier.TabIndex = 1
Me.rbDossier.Text = "Ablage im elektronischen Banklagernd-Dossier"
'
'rbVersand
'
Me.rbVersand.Location = New System.Drawing.Point(8, 35)
Me.rbVersand.Name = "rbVersand"
Me.rbVersand.Size = New System.Drawing.Size(192, 24)
Me.rbVersand.TabIndex = 2
Me.rbVersand.Text = "Versand an eine Zustelladresse"
'
'RBPersönlich
'
Me.RBPersönlich.Location = New System.Drawing.Point(8, 54)
Me.RBPersönlich.Name = "RBPersönlich"
Me.RBPersönlich.Size = New System.Drawing.Size(192, 24)
Me.RBPersönlich.TabIndex = 3
Me.RBPersönlich.Text = "Persönliche Aushändigung"
'
'RBPhysisch
'
Me.RBPhysisch.Location = New System.Drawing.Point(8, 74)
Me.RBPhysisch.Name = "RBPhysisch"
Me.RBPhysisch.Size = New System.Drawing.Size(192, 24)
Me.RBPhysisch.TabIndex = 10
Me.RBPhysisch.Text = "Ablage im physischen Dossier"
'
'_Form2
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(889, 262)
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.pnleinzeldokument)
Me.Controls.Add(Me.pnlbck)
Me.Name = "_Form2"
Me.Text = "_Form2"
Me.pnlbck.ResumeLayout(False)
Me.pnleinzeldokument.ResumeLayout(False)
Me.GroupBox2.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents pnlbck As System.Windows.Forms.Panel
Friend WithEvents rbkeineUebergabe As System.Windows.Forms.RadioButton
Friend WithEvents rbbckversand As System.Windows.Forms.RadioButton
Friend WithEvents rbbckbldossier As System.Windows.Forms.RadioButton
Friend WithEvents pnleinzeldokument As System.Windows.Forms.Panel
Friend WithEvents rbphysischisesDossier As System.Windows.Forms.RadioButton
Friend WithEvents RBEinzelPersoenlich As System.Windows.Forms.RadioButton
Friend WithEvents rbeinzelblversand As System.Windows.Forms.RadioButton
Friend WithEvents rbeinzelbldossier As System.Windows.Forms.RadioButton
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents rbDossier As System.Windows.Forms.RadioButton
Friend WithEvents rbVersand As System.Windows.Forms.RadioButton
Friend WithEvents RBPersönlich As System.Windows.Forms.RadioButton
Friend WithEvents RBPhysisch As System.Windows.Forms.RadioButton
End Class

View 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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@@ -0,0 +1,3 @@
Public Class _Form2
End Class

View File

@@ -0,0 +1,345 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>521, 30</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABS
EQAAAk1TRnQBSQFMAgEBDAEAAbwBAAG8AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ABQAQBxD/
IAAQBxD/IAACBwkAAewEBwH/BQAC/wIABv8gAAEHAQAL7AMHCP8BMgIABf8YAAEyBwAB7AoHA+wCBwH/
BAAD/wEHATICAAT/GAABBwEyBgAB7AYHAfkB/wH5Af8C7AEAAgcI/wHsAQcBMgIAA/8YAAHsAQcBMgUA
AewKBwTsAQcB/wUAA/8B7AEHATICAAL/GQAB7AEHATIEAAHsCv8E7AEHB/8EAAEHATICAAH/GwABBwEy
AwABBwHsAf8HAAL/A+wBBwH/BAAC/wHsAQcFMhkAAewBBwUyAgACBwHsB/8BAAL/AuwBBwj/AewBBwEy
AgAD/xgAAewBBwEyBQADBwHsAf8FBwEAA+wCBwH/BQAD/wHsAQcBMgIAAv8IAAFBEAAB7AEHATIEAAQH
AewFBwH/BQcJ/wHsAQcCMgIAAf8HAAJBEAAB7AEHAjIDAAUHAf8FBwEABAcB/wUABP8B7AEHAjIIAANB
EQAB7AEHAjICAAUHB+wEBwv/AewBBwIyCAACQRIAAewBBwIyAQAQBxD/CAABQRcAEAcQ/zQAAQcCAAEH
AQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsAwABBwIAAQcBAAEHAQABBwIAAQcVAAEH
AgABBwEAAQcBAAEHAgABBwUAAQcCAAEHAQABBwEAAQcCAAEHAQAB7AQHAgABBwEAAQcBAAEHAgABBxUA
AQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsA/8BBwIAAQcBAAEHAQABBwIA
AQcBAAoCBgAKAgcAAfwBAAH8AQAB/AEAAfwBAAH8BgAB7AH/BAcB/wMHAf8BBwQAAQII/wECBgABAgj/
AQIGAAH8CP8HAAHsCv8BBwQAAQIB/wgCBgABAgH/CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAHsAf8EBwH/
AwcB/wEHBAABAgH/AwIBBwQCBgABAgH/AwIBBwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAHs
Cv8BBwQAAQIC/wECAQcDAgH/AQIGAAECAv8BAgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEAAfwB/wH8
A/8B1gIAAewB/wgHAf8BBwQAAQIB/wECAQcDAgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAH8Af8B/AH/
AfwBAAH/AQABBwEAAdYC/wHWAgAB7Ar/AQcEAAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wECBJgDAAH8
AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAgAB7AH/AgcB/wUHAf8BBwQAAQIB/wICAv8CAgH/AQIGAAEC
Af8CAgL/AgIB/wECApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gIAAewK/wEHBAABAgj/
AQIGAAECCP8BAgGYAv8BmAMACP8B/AH/AdYBBwHWAgAB7AH/AgcB/wUHAf8BBwQACgIGAAoCApgB/wGY
AgAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YCAAHsCP8bAAGYAf8CmAL/ApgB/wGYBgAK1gIAAewB/wYH
Af8B7AH/GQABmAj/AZgGAAHWCP8B1gIAAewI/wHsGgAKmAYACtYCAArsFgAQAiYAAQMB/wgAAgINAAEC
JAAB7AEDAewB/wgAAQIBAAIDBgACBwEAAQMBAAECIgABAwHsAQMB7AEDAf8IAAECAQACAwYAAgcBAAED
AQABAgEAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEAAfwHAAEDAewBAwHsAQMB7AH/
AQAB7AYAAQIBAAIDBgACBwEAAQMBAAECAfwI/wcAAfwI/wgAAewBAwHsAQMB7AEDAf8BAAHsBgABAgEA
AgMJAAEDAQABAgEAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AcAAQMB7AEDAgAB7AH/
AQAB7AYAAQIBAAwDAQABAgH8Af8B/AEAAQcBAAH8AQcB/wcAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gMA
AewBAwHsAgcBAwH/AQAB7AEAAQYEAAECAQACAwgAAgMBAAECAQAB/wEAAfwBAAH8AQAB/AH/AfwHAAH/
AQAB/AEAAfwBAAH8Af8B/AP/AdYDAAEDAewBAwHsAQMB7AH/AgABBgX+AQIBAAEDAQAIBwEAAQMBAAEC
AfwB/wH8Af8B/AEAAf8BAAEHBwAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gMAAewBAwHsAQMB7AED
Af8BAAFtBv4BAgEAAQMBAAgHAQABAwEAAQIBAAH8AQAB/wEAAfwB/wH8AQAB/AcAAfwBAAH/AQAB/AH/
AfwBAAH8AdYBBwH/AdYDAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQECAQABAwEACAcBAAEDAQABAgH8
AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAHsAQMB7AEDAewBAwH/
AQAB7AEAAm0DAAECAQABAwEACAcBAAEDAQABAgEACP8B/AcACP8B/AH/AdYBBwHWAwABAwHsAQMB7AEH
Af8B7AEAAewCAAFtAwABAgEAAQMBAAgHAwABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEA
AfwBAAH8AQAB/wPWAwAB7AEDAQcB/wHsAQAD7AYAAQIBAAEDAQAIBwEAAQcBAAECFAAK1gMAAQcB/wHs
AQAF7AYAAQIOAAECFAAB1gj/AdYSABACFAAK1gIAAUIBTQE+BwABPgMAASgDAAFAAwABQAMAAQEBAAEB
BgABAhYAA/+FAAT/BAAB/AE/Av8EAAHzAc8BgwE/BAAB7wH3Af8BHwQAAe8B9wGHAQ8EAAHfAfsB/wEH
BAAB3wH7AoMEAAHfAfsB/gEBBAAB3wH7AYYFAAHvAfcB/wEHBAAB7wF3AoMEAAHyAU8B/wGBBAAB/AE/
AYMBwAQAAf4BfwH/AeAEAAH/AX8C/wQABv8B8AEAAfADAAL/AfABAAHwAwAC/wHwAQAB8AQAAT8BAAE/
AQABPwEAAQcBAAE/AQABPwEAAT8BAAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAEDAQABAwEAAQcBAAE/
AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEH
AQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcC/wHwAQMB8AEDAQABDwL/AfABAwHwAQMBAAEf
Av8B8AEDAfABAwEAAT8B/AF/AgAE/wHwAX8CAAT/AcABfwIABP8BAAEfAwABPwEAAT8BAAEfAwABPwEA
AT8BAAEXAwABPwEAAT8BAAEHAwABPwEAAQMFAAE/AQABAwUAAT8BAAEDBQABPwEAAQMFAAE/AQABAwEA
AQcDAAE/AQABAwEAARcDAAE/AQABAwEAAR8CAAL/AfABAwEAAR8CAAL/AfABAwEAAR8CAAL/AfABAws=
</value>
</data>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>627, 30</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="DokList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="DokList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="DokList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;303&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 580, 303&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 582, 303&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>750, 30</value>
</metadata>
<metadata name="ImgListSteuerung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>366, 30</value>
</metadata>
<data name="ImgListSteuerung.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABI
CwAAAk1TRnQBSQFMAgEBCAEAAbwBAAG8AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ACwABBwHs
HQAH7BsAAQcB7BsABwED7BgAAfkBAAEHAewYAAIBB/kCAQLsFwAC+QEAAQcB7BYAAQEL+QEBAewEAAEB
AwABAQ4AA/kBAAEHAewVAAEBC/kBAQLsAwACAQEAAgEOAAT5AQABBwHsEwABAQP5Av8D+QL/A/kBAQHs
BAABAQEAAQEPAAX5AQABBxMAAQED+QP/AfkD/wP5AQEB7AQAAwEPAAb5AQABBxIAAQEE+QX/BPkBAQHs
BQABARAABvkUAAEBBfkD/wX5AQEB7AQAAwEPAAX5DgAB7AYAAQEE+QX/BPkBAQHsBAABAQEAAQEPAAT5
FgABAQP5A/8B+QP/A/kBAQHsAwACAQEAAgEOAAP5FwABAQP5Av8D+QL/A/kBAQQAAQEDAAEBDgAC+RkA
AQEL+QEBGAAB+RoAAQEL+QEBNAACAQf5AgE3AAcBLAABAQFtPQABAQH5Am0JAAttEAAB/xYAAQED+QJt
BwAMbQYAAf8fAAEBBfkCbQYAASgKLgFtBwAB/wcAAf8VAAEBAvkC/wP5Am0FAAEoAy4B/wYuAW0HAAH/
BgAB/xUAAQED+QL/BPkCbQQAASgCLgP/BS4BbQgAAf8FAAH/FAABAQv5Am0DAAEoAS4F/wQuAW0JAAH/
AwAB/xQAAQEN+QJtAgABKAEuAv8BLgP/Ay4BbQwAAf8VAAEBBfkC/wb5AW0DAAEoAS4B/wMuA/8CLgFt
CwAB/xcAAQEE+QL/BfkBbQQAASgGLgP/AS4BbQwAAf8XAAEBA/kC/wT5AW0FAAEoBy4C/wEuAW0JAAH/
AgAB/xgAAQEC+QL/A/kBbQYAASgILgH/AS4BbQgAAf8FAAH/FwABAQH5Av8C+QFtBwABKAouAW0HAAH/
BwAB/xcAAQED+QFtCAALKAYAAf8KAAH/FwABAQH5AW0+AAEBKAABQgFNAT4HAAE+AwABKAMAAUADAAEw
AwABAQEAAQEFAAGAAQEWAAP/gQAB+AP/AfgBDwL/AfgBfwH+Af8B8AEDAv8B+AE/AfwB/wHAAQEC/wH4
AR8B+AH/AYABAQHuAf8B+AEPAfABfwGAAQAB5AH/AfgBBwHiAX8CAAH1Af8B+AEHAcYBPwIAAfEB/wH4
AQMB/wE/AgAB+wH/AfgBBwH/AZ8CAAHxAf8B+AEPAf8BjwIAAfUB/wH4AR8B/wHPAgAB5AH/AfgBPwH/
AecBAAEBAe4B/wH4AX8B/wHzAYABAwL/AfgC/wH5AYABAwL/AfkC/wH9AcABBwL/AfsD/wHwAR8E/wH+
AX8G/wH8AT8B4AEDAf8B+QL/AfgBHwHAAQMB5wP/AfABDwHAAQMBwwHzAv8B4AEHAcABAwHDAecC/wHA
AQMBwAEDAeEBxwL/AYABAQHAAQMB8AGPAv8CAAHAAQMB+AEfAv8BAAEBAcABAwH8AT8C/wGAAQMBwAED
AfgBHwL/AcABBwHAAQMB8AGfAv8B4AEPAcABAwHBAccC/wHwAR8BwAEDAYMB4wL/AfgBPwHAAQcBjwHx
Av8B/AF/Bv8B/gX/Cw==
</value>
</data>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAASUlEQVQ4T2OgFfiPAxMF/v/9yI+BQeJQ
jBdg00CSIWCFOTk56AopMoAkF4AARZqRAUWaQQCsGUt4EA0G3gAQoEzz0PcCEYCBAQCfxINLHCrVBwAA
AABJRU5ErkJggg==
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4ANAAAAAAAAAAAAAAAAAAAADQ0ABYWFhYWFgAAAAAAAAA0NBYREQAAAAAAAAAAAAAANDQREQAK
EREREREAAAAAADQ0ERERAACJiYkRAAAAAAA0NAoKCgoKEREREQARAAAAAAAAAAAKEYmJiREAEQAAAAAA
AAAAChERERERABEAEQAAAAAAAAoRiYmJEQARABEAAAAAAAAKEREREREAEQARAAAAAAAACgoKCgoKABEA
EQAAAAAAAAAAChERERERABEAAAAAAAAAAAoKCgoKCgARAAAAAAAAAAAAAAoREREREQAAAAAAAAAAAAAK
CgoKCgoAAAAAAAAAAAAAAAAAAAAAACB/AAAAPwAAAA8AAAAPAAAAAwAAAAMAAPgAAAD4AAAA+AAAAPgA
AAD4AAAA/gAAAP4AAAD/gAAA/4AAAP//AAA=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,145 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="DateTimePicker1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmBLDatumab</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAACioqKioqKioqKiogAAAAAAohEREREREREREaKgoKCgoKIRoqKioqKiohGioBERERGi
ERERERERERERoqARoKCgohEREUFBEREREaKgEREREaIRERFBQRERERGioBERPj6iEREREUFBERERoqAR
Pj4RohERERERQUEREaKgERE+PqIREUFBQUFBERGioBE+PhGiERERERERERERoqARET4+oqKioqKioqKi
oqKgEREREaKioqKioqKioqKioKCgoKCioqKioqKioqKioqCgoKCgoKCgoKCgAAAAAACgoKCgoKCgoKCg
oAAAAAAAAAAAAAAAAAAAAAAAAAAAAPgAAAD4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAHwAAAB8AAP//AAA=
</value>
</data>
</root>

View File

@@ -0,0 +1,112 @@
Public Class frmBLDatumab
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents DateTimePicker1 As System.Windows.Forms.DateTimePicker
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmBLDatumab))
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 8)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(280, 48)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Der Kunde hatte bis jetzt noch keine Auslieferung, welche mittels EDOKA-Funktiona" & _
"lität durchgeführt wurde."
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(6, 56)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(280, 48)
Me.Label2.TabIndex = 1
Me.Label2.Text = "Geben Sie bitte das Ab-Datum ein"
'
'DateTimePicker1
'
Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.Short
Me.DateTimePicker1.Location = New System.Drawing.Point(192, 56)
Me.DateTimePicker1.Name = "DateTimePicker1"
Me.DateTimePicker1.Size = New System.Drawing.Size(96, 20)
Me.DateTimePicker1.TabIndex = 2
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(216, 112)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 3
Me.Button1.Text = "OK"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(8, 112)
Me.Button2.Name = "Button2"
Me.Button2.TabIndex = 4
Me.Button2.Text = "&Abbruch"
'
'frmBLDatumab
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(292, 141)
Me.ControlBox = False
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button2, Me.Button1, Me.DateTimePicker1, Me.Label2, Me.Label1})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmBLDatumab"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Banklagernd-Dokumente ab"
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.DialogResult = DialogResult.OK
Me.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.DialogResult = DialogResult.Abort
End Sub
End Class

View File

@@ -0,0 +1,359 @@
<?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="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>573, 30</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACU
EgAAAk1TRnQBSQFMAgEBDQEAAfwBAAH8AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wgAAgcEBAEHOQABBwEE
BgcxAAHsAv8BBwL/AgcBBAQHAQQCBzAAAewC/wEHAv8FBAEHAwQBBzAAAewGBwMEAQcFBDAAAewC/wEH
Av8CBwEEBAcBBAIHMAAB7AL/AQcC/wcHAQQBBzEAAewCBwQBAgcEBAIHMQAB7AL/AQEC/wEBAv8BBwL/
AQcC/zEAAewC/wEBAv8BAQL/AQcC/wEHAv8xAAHsAgcEAQgHMQAB7AL/AQcC/wEHAv8BBwL/AQcC/zEA
AewC/wEHAv8BBwL/AQcC/wEHAv8xAAHsBwQH7DEAAewHBAfsMQAP7DEAEAcgAAEgDwAQByAAAiABAAYH
BwACBwkAAewEByAAAiABBwL/CwABBwEAC+wDBxgAATIHAAIgAv8BAAHsBf8FAAHsCgcD7AIHGAABBwEy
BgACIAP/AgADpgH/BQAB7AYHAfkB/wH5Af8C7AEAAgcYAAHsAQcBMgUAAiAF7AT/AQAB/wMAAewKBwTs
AQcZAAHsAQcBMgkAAewB/wOmAf8BAAH/AwAB7Ar/BOwBBxsAAQcBMggAAewF/wEAAf8BAAH/AQABBwHs
Af8HAAL/A+wBBxcAAewBBwUyAwABXgHsAe8C7AP/AaYB/wEAAf8BAAH/AQACBwHsB/8BAAL/AuwBBxgA
AewBBwEyBwABXgHsAe8B7APvAv8BAAH/AQAB/wEAAwcB7AH/BQcBAAPsAgcZAAHsAQcBMgUAAuwD7wXs
AQAB/wEAAf8BAAQHAewFBwH/BQcZAAHsAQcCMgQAA14B7wFeAe8CXgT/AQAB/wEABQcB/wUHAQAEBxoA
AewBBwIyBAABXgHsAV4B7AFeBuwBAAH/AQAFBwfsBAcbAAHsAQcCMgIAAV4B7AEAAV4B7AEAAV4C7AX/
AQAQByQAAV4B7AIAAV4G7AEAEAckAAFeAeweAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEHAQABBwEA
AQcCAAEHAQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcFAAEHAgABBwEA
AQcBAAEHAgABBwEAAewEBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEH
AQABBwEAAQcCAAEHAQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHAQAKAgYACgIHAAH8AQAB/AEAAfwBAAH8
AQAB/AYAAewB/wQHAf8DBwH/AQcEAAECCP8BAgYAAQII/wECBgAB/Aj/BwAB7Ar/AQcEAAECAf8IAgYA
AQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgAB7AH/BAcB/wMHAf8BBwQAAQIB/wMCAQcEAgYAAQIB/wMC
AQcEAgSYAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB7Ar/AQcEAAECAv8BAgEHAwIB/wECBgABAgL/
AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYCAAHsAf8IBwH/AQcEAAECAf8BAgEH
AwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIAAewK/wEH
BAABAgH/AQcFAgH/AQIGAAECAf8BBwUCAf8BAgSYAwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gIA
AewB/wIHAf8FBwH/AQcEAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKYAf8BmAIAAfwBAAH8
AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAHsCv8BBwQAAQII/wECBgABAgj/AQIBmAL/AZgDAAj/AfwB/wHW
AQcB1gIAAewB/wIHAf8FBwH/AQcEAAoCBgAKAgKYAf8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPW
AgAB7Aj/GwABmAH/ApgC/wKYAf8BmAYACtYCAAHsAf8GBwH/AewB/xkAAZgI/wGYBgAB1gj/AdYCAAHs
CP8B7BoACpgGAArWAgAK7BYAEAImAAEDAf8IAAICDQABAiQAAewBAwHsAf8IAAECAQACAwYAAgcBAAED
AQABAiIAAQMB7AEDAewBAwH/CAABAgEAAgMGAAIHAQABAwEAAQIBAAH8AQAB/AEAAfwBAAH8AQAB/AcA
AfwBAAH8AQAB/AEAAfwBAAH8BwABAwHsAQMB7AEDAewB/wEAAewGAAECAQACAwYAAgcBAAEDAQABAgH8
CP8HAAH8CP8IAAHsAQMB7AEDAewBAwH/AQAB7AYAAQIBAAIDCQABAwEAAQIBAAH/AQAB/AH/AfwBAAL/
AfwHAAH/AQAB/AH/AfwBAAL/AfwHAAEDAewBAwIAAewB/wEAAewGAAECAQAMAwEAAQIB/AH/AfwBAAEH
AQAB/AEHAf8HAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYDAAHsAQMB7AIHAQMB/wEAAewBAAEGBAABAgEA
AgMIAAIDAQABAgEAAf8BAAH8AQAB/AEAAfwB/wH8BwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHWAwABAwHs
AQMB7AEDAewB/wIAAQYF/gECAQABAwEACAcBAAEDAQABAgH8Af8B/AH/AfwBAAH/AQABBwcAAfwB/wH8
Af8B/AEAAf8BAAEHAQAB1gL/AdYDAAHsAQMB7AEDAewBAwH/AQABbQb+AQIBAAEDAQAIBwEAAQMBAAEC
AQAB/AEAAf8BAAH8Af8B/AEAAfwHAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAwABAwHsAQMB7AED
AewB/wEAAewBbQH+BG0BAgEAAQMBAAgHAQABAwEAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEA
AfwBAAH8AQAB/AEAAtYB/wHWAwAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABAgEAAQMBAAgHAQABAwEA
AQIBAAj/AfwHAAj/AfwB/wHWAQcB1gMAAQMB7AEDAewBBwH/AewBAAHsAgABbQMAAQIBAAEDAQAIBwMA
AQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gMAAewBAwEHAf8B7AEA
A+wGAAECAQABAwEACAcBAAEHAQABAhQACtYDAAEHAf8B7AEABewGAAECDgABAhQAAdYI/wHWEgAQAhQA
CtYCAAFCAU0BPgcAAT4DAAEoAwABQAMAAUADAAEBAQABAQYAAQIWAAP/AQAB/gEDBwABAXgABP8BIAF/
AgAE/wEAAT8CAAH5Ad8BgwE/AQABDwIAAvcB/wEfAQABDwIAAe8B/wGHAQ8BAAEDAgAB/wH7Af8BBwEA
AQMCAAHfAf8CgwH4AwAB3wH/Af4BAQH4AwAB3wH/AYYBAAGAAwAB/wH7Af8BBwHAAwAB7wH/AoMBgAMA
AfYB9wH/AYEBgAMAAfgBXwGDAsADAAH+AX8B/wHgAZIDAAH+A/8B8wMABP8B8wP/AfABAAHwAwAC/wHw
AQAB8AMAAv8B8AEAAfAEAAE/AQABPwEAAT8BAAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAE/AQABPwEA
AQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEA
AQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAv8B8AED
AfABAwEAAQ8C/wHwAQMB8AEDAQABHwL/AfABAwHwAQMBAAE/AfwBfwIABP8B8AF/AgAE/wHAAX8CAAT/
AQABHwMAAT8BAAE/AQABHwMAAT8BAAE/AQABFwMAAT8BAAE/AQABBwMAAT8BAAEDBQABPwEAAQMFAAE/
AQABAwUAAT8BAAEDBQABPwEAAQMBAAEHAwABPwEAAQMBAAEXAwABPwEAAQMBAAEfAgAC/wHwAQMBAAEf
AgAC/wHwAQMBAAEfAgAC/wHwAQML
</value>
</data>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>685, 28</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="DokList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="DokList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj00LjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="DokList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{ForeColor:ControlText;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;479&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 726, 479&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 728, 479&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ctmenuTVDossier.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>196, 47</value>
</metadata>
<metadata name="ImgListSteuerung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>445, 30</value>
</metadata>
<data name="ImgListSteuerung.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABI
CwAAAk1TRnQBSQFMAgEBCAEAAfwBAAH8AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ACwABBwHs
HQAH7BsAAQcB7BsABwED7BgAAfkBAAEHAewYAAIBB/kCAQLsFwAC+QEAAQcB7BYAAQEL+QEBAewEAAEB
AwABAQ4AA/kBAAEHAewVAAEBC/kBAQLsAwACAQEAAgEOAAT5AQABBwHsEwABAQP5Av8D+QL/A/kBAQHs
BAABAQEAAQEPAAX5AQABBxMAAQED+QP/AfkD/wP5AQEB7AQAAwEPAAb5AQABBxIAAQEE+QX/BPkBAQHs
BQABARAABvkUAAEBBfkD/wX5AQEB7AQAAwEPAAX5DgAB7AYAAQEE+QX/BPkBAQHsBAABAQEAAQEPAAT5
FgABAQP5A/8B+QP/A/kBAQHsAwACAQEAAgEOAAP5FwABAQP5Av8D+QL/A/kBAQQAAQEDAAEBDgAC+RkA
AQEL+QEBGAAB+RoAAQEL+QEBNAACAQf5AgE3AAcBLAABAQFtPQABAQH5Am0JAAttEAAB/xYAAQED+QJt
BwAMbQYAAf8fAAEBBfkCbQYAASgKLgFtBwAB/wcAAf8VAAEBAvkC/wP5Am0FAAEoAy4B/wYuAW0HAAH/
BgAB/xUAAQED+QL/BPkCbQQAASgCLgP/BS4BbQgAAf8FAAH/FAABAQv5Am0DAAEoAS4F/wQuAW0JAAH/
AwAB/xQAAQEN+QJtAgABKAEuAv8BLgP/Ay4BbQwAAf8VAAEBBfkC/wb5AW0DAAEoAS4B/wMuA/8CLgFt
CwAB/xcAAQEE+QL/BfkBbQQAASgGLgP/AS4BbQwAAf8XAAEBA/kC/wT5AW0FAAEoBy4C/wEuAW0JAAH/
AgAB/xgAAQEC+QL/A/kBbQYAASgILgH/AS4BbQgAAf8FAAH/FwABAQH5Av8C+QFtBwABKAouAW0HAAH/
BwAB/xcAAQED+QFtCAALKAYAAf8KAAH/FwABAQH5AW0+AAEBKAABQgFNAT4HAAE+AwABKAMAAUADAAEw
AwABAQEAAQEFAAGAAQEWAAP/gQAB+AP/AfgBDwL/AfgBfwH+Af8B8AEDAv8B+AE/AfwB/wHAAQEC/wH4
AR8B+AH/AYABAQHuAf8B+AEPAfABfwGAAQAB5AH/AfgBBwHiAX8CAAH1Af8B+AEHAcYBPwIAAfEB/wH4
AQMB/wE/AgAB+wH/AfgBBwH/AZ8CAAHxAf8B+AEPAf8BjwIAAfUB/wH4AR8B/wHPAgAB5AH/AfgBPwH/
AecBAAEBAe4B/wH4AX8B/wHzAYABAwL/AfgC/wH5AYABAwL/AfkC/wH9AcABBwL/AfsD/wHwAR8E/wH+
AX8G/wH8AT8B4AEDAf8B+QL/AfgBHwHAAQMB5wP/AfABDwHAAQMBwwHzAv8B4AEHAcABAwHDAecC/wHA
AQMBwAEDAeEBxwL/AYABAQHAAQMB8AGPAv8CAAHAAQMB+AEfAv8BAAEBAcABAwH8AT8C/wGAAQMBwAED
AfgBHwL/AcABBwHAAQMB8AGfAv8B4AEPAcABAwHBAccC/wHwAR8BwAEDAYMB4wL/AfgBPwHAAQcBjwHx
Av8B/AF/Bv8B/gX/Cw==
</value>
</data>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAASUlEQVQ4T2OgFfiPAxMF/v/9yI+BQeJQ
jBdg00CSIWCFOTk56AopMoAkF4AARZqRAUWaQQCsGUt4EA0G3gAQoEzz0PcCEYCBAQCfxINLHCrVBwAA
AABJRU5ErkJggg==
</value>
</data>
<data name="btnfilter.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAAcUlEQVQ4T9WOSw6AMAgFOXrXPRU3UyYt
0fQDujJO8halvAlSSjmiSAZLO1Q1l2QCCCWRwL7HzEQCh0tsNRewOMbntvq3C5hHsWoT8ljBvF0gPWCl
Wp8J4JLAogyRAFxCpjLchtu4pL/f873A8PIgEDkBP23dCph42wEAAAAASUVORK5CYII=
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgAAQEBAAICAgADAwMABEREQAWFhYAHBwcACIiIgApKSkAVVVVAE1N
TQBCQkIAOTk5AIB8/wBQUP8AkwDWAP/szADG1u8A1ufnAJCprQAAADMAAABmAAAAmQAAAMwAADMAAAAz
MwAAM2YAADOZAAAzzAAAM/8AAGYAAABmMwAAZmYAAGaZAABmzAAAZv8AAJkAAACZMwAAmWYAAJmZAACZ
zAAAmf8AAMwAAADMMwAAzGYAAMyZAADMzAAAzP8AAP9mAAD/mQAA/8wAMwAAADMAMwAzAGYAMwCZADMA
zAAzAP8AMzMAADMzMwAzM2YAMzOZADMzzAAzM/8AM2YAADNmMwAzZmYAM2aZADNmzAAzZv8AM5kAADOZ
MwAzmWYAM5mZADOZzAAzmf8AM8wAADPMMwAzzGYAM8yZADPMzAAzzP8AM/8zADP/ZgAz/5kAM//MADP/
/wBmAAAAZgAzAGYAZgBmAJkAZgDMAGYA/wBmMwAAZjMzAGYzZgBmM5kAZjPMAGYz/wBmZgAAZmYzAGZm
ZgBmZpkAZmbMAGaZAABmmTMAZplmAGaZmQBmmcwAZpn/AGbMAABmzDMAZsyZAGbMzABmzP8AZv8AAGb/
MwBm/5kAZv/MAMwA/wD/AMwAmZkAAJkzmQCZAJkAmQDMAJkAAACZMzMAmQBmAJkzzACZAP8AmWYAAJlm
MwCZM2YAmWaZAJlmzACZM/8AmZkzAJmZZgCZmZkAmZnMAJmZ/wCZzAAAmcwzAGbMZgCZzJkAmczMAJnM
/wCZ/wAAmf8zAJnMZgCZ/5kAmf/MAJn//wDMAAAAmQAzAMwAZgDMAJkAzADMAJkzAADMMzMAzDNmAMwz
mQDMM8wAzDP/AMxmAADMZjMAmWZmAMxmmQDMZswAmWb/AMyZAADMmTMAzJlmAMyZmQDMmcwAzJn/AMzM
AADMzDMAzMxmAMzMmQDMzMwAzMz/AMz/AADM/zMAmf9mAMz/mQDM/8wAzP//AMwAMwD/AGYA/wCZAMwz
AAD/MzMA/zNmAP8zmQD/M8wA/zP/AP9mAAD/ZjMAzGZmAP9mmQD/ZswAzGb/AP+ZAAD/mTMA/5lmAP+Z
mQD/mcwA/5n/AP/MAAD/zDMA/8xmAP/MmQD/zMwA/8z/AP//MwDM/2YA//+ZAP//zABmZv8AZv9mAGb/
/wD/ZmYA/2b/AP//ZgAhAKUAX19fAHd3dwCGhoYAlpaWAMvLywCysrIA19fXAN3d3QDj4+MA6urqAPHx
8QD4+PgAFBQUFBQUFBQUFBQUFBQUFBQUOjo6Ojo6Ojo6Ojo6FBQUFDoRpKqkqqSkpKSDOhQUFDoRqqqk
qqSqpKSkgxQ6FBQ6EaqqqqqqpKqkpDoUOhQ6EaqqqqqkqqqkqoMUAIMUOhGqqqqqqqqkqqSDAACDFDo6
Ojo6Ojo6Ojo6OhIAABQUOhGqqgoREREREQARABEAFDoRqqoKEbCwsBEAEQARABQ6EaqqChERERERABEA
EQAUFDoREQoKCgoKCgARABEAFBQUOjo6AAoREREREQARABQUFBQUAAAKCgoKCgoAEQAUFBQUFAAAAAAK
EREREREAFBQUFBQAAAAACgoKCgoKAOAAAADAAAAAwAAAAIAAAACAAAAAAAAAAAAAAAAAAAAAgAAAAIAA
AACAAAAAwAAAAOIAAAD+AAAA/4AAAP+AAAA=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="cbNiederlassung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblNiederlassung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblBLV.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cbblv.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnAbbruch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnzuweisen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmBLDossierzuweisen</value>
</data>
</root>

View File

@@ -0,0 +1,190 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmBLDossierzuweisen
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents cbNiederlassung As System.Windows.Forms.ComboBox
Friend WithEvents lblNiederlassung As System.Windows.Forms.Label
Friend WithEvents lblBLV As System.Windows.Forms.Label
Friend WithEvents btnAbbruch As System.Windows.Forms.Button
Friend WithEvents btnzuweisen As System.Windows.Forms.Button
Friend WithEvents cbblv As System.Windows.Forms.ComboBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.cbNiederlassung = New System.Windows.Forms.ComboBox()
Me.lblNiederlassung = New System.Windows.Forms.Label()
Me.lblBLV = New System.Windows.Forms.Label()
Me.cbblv = New System.Windows.Forms.ComboBox()
Me.btnAbbruch = New System.Windows.Forms.Button()
Me.btnzuweisen = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'cbNiederlassung
'
Me.cbNiederlassung.Location = New System.Drawing.Point(112, 32)
Me.cbNiederlassung.Name = "cbNiederlassung"
Me.cbNiederlassung.Size = New System.Drawing.Size(184, 21)
Me.cbNiederlassung.TabIndex = 0
Me.cbNiederlassung.Text = "ComboBox1"
'
'lblNiederlassung
'
Me.lblNiederlassung.Location = New System.Drawing.Point(8, 32)
Me.lblNiederlassung.Name = "lblNiederlassung"
Me.lblNiederlassung.TabIndex = 1
Me.lblNiederlassung.Text = "Niederlassung"
'
'lblBLV
'
Me.lblBLV.Location = New System.Drawing.Point(8, 64)
Me.lblBLV.Name = "lblBLV"
Me.lblBLV.Size = New System.Drawing.Size(100, 32)
Me.lblBLV.TabIndex = 3
Me.lblBLV.Text = "Banklagernd-Verantwortlicher"
'
'cbblv
'
Me.cbblv.Location = New System.Drawing.Point(112, 64)
Me.cbblv.Name = "cbblv"
Me.cbblv.Size = New System.Drawing.Size(184, 21)
Me.cbblv.TabIndex = 2
'
'btnAbbruch
'
Me.btnAbbruch.Location = New System.Drawing.Point(8, 112)
Me.btnAbbruch.Name = "btnAbbruch"
Me.btnAbbruch.TabIndex = 4
Me.btnAbbruch.Text = "Abbruch"
'
'btnzuweisen
'
Me.btnzuweisen.Location = New System.Drawing.Point(224, 112)
Me.btnzuweisen.Name = "btnzuweisen"
Me.btnzuweisen.TabIndex = 5
Me.btnzuweisen.Text = "&Zuweisen"
'
'frmBLDossierzuweisen
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(312, 149)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnzuweisen, Me.btnAbbruch, Me.lblBLV, Me.cbblv, Me.lblNiederlassung, Me.cbNiederlassung})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Name = "frmBLDossierzuweisen"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Dossier einem Banklagernd-Verantwortlichen zuweisen"
Me.ResumeLayout(False)
End Sub
#End Region
Dim WithEvents mcbniederlassung As New MultiComboBox()
Dim WithEvents mcbblv As New MultiComboBox()
Dim on_load As Boolean = True
Private Sub frmBLDossierzuweisen_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim dt As New DataTable()
dt = get_niederlassung
Me.mcbniederlassung = New MultiComboBox(Me.cbNiederlassung)
Me.mcbblv = New MultiComboBox(Me.cbblv)
Me.mcbniederlassung.CheckNullValue = True
Me.mcbniederlassung.NullValueMessage = MyTxt.gettext(83)
Me.mcbniederlassung.DisplayColumnName = "niederlassung"
Me.mcbniederlassung.ValueColumnName = "niederlassungnr"
Me.mcbniederlassung.Fill_Data(dt, False)
Me.on_load = False
Me.mcbniederlassung.SelectedValue = dt.Rows(0).Item(0)
Me.cbNiederlassung_SelectedIndexChanged(sender, e)
End Sub
Private Sub cbNiederlassung_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mcbniederlassung.SelectedIndexChanged
If Me.On_Load Then Exit Sub
Dim dt As New DataTable()
dt = Get_blv()
Me.mcbblv.CheckNullValue = True
Me.mcbblv.NullValueMessage = MyTxt.gettext(83)
Me.mcbblv.DisplayColumnName = "mitarbeiter"
Me.mcbblv.ValueColumnName = "mitarbeiternr"
Me.mcbblv.Fill_Data(dt, False)
If dt.Rows.Count = 0 Then
Me.mcbblv.Enabled = False
Me.cbblv.Enabled = False
Me.btnzuweisen.Enabled = False
Else
Me.mcbblv.Enabled = True
Me.cbblv.Enabled = True
Me.btnzuweisen.Enabled = True
Me.mcbblv.SelectedValue = dt.Rows(0).Item(0)
End If
End Sub
Private Function Get_Niederlassung() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_niederlassung"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function Get_blv() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_blvnl"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@niederlassungnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.mcbniederlassung.SelectedValue))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
End Class

View File

@@ -0,0 +1,348 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>523, 30</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADK
DwAAAk1TRnQBSQFMAgEBCQEAASQBAQEkAQEBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wEAEAcwABAHMAACBwkA
AewEBzAAAQcBAAvsAwcwAAHsCgcD7AIHMAAB7AYHAfkB/wH5Af8C7AEAAgcwAAHsCgcE7AEHMAAB7Ar/
BOwBBzAAAQcB7AH/BwAC/wPsAQcwAAIHAewH/wEAAv8C7AEHMAADBwHsAf8FBwEAA+wCBzAABAcB7AUH
Af8FBzAABQcB/wUHAQAEBzAABQcH7AQHMAAQBzAAEAdEAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEH
AQABBwEAAQcCAAEHAQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcFAAEH
AgABBwEAAQcBAAEHAgABBwEAAewEBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBwUA
AQcCAAEHAQABBwEAAQcCAAEHAQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHAQAKAgYACgIHAAH8AQAB/AEA
AfwBAAH8AQAB/AYAAewB/wQHAf8DBwH/AQcEAAECCP8BAgYAAQII/wECBgAB/Aj/BwAB7Ar/AQcEAAEC
Af8IAgYAAQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgAB7AH/BAcB/wMHAf8BBwQAAQIB/wMCAQcEAgYA
AQIB/wMCAQcEAgSYAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB7Ar/AQcEAAECAv8BAgEHAwIB/wEC
BgABAgL/AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYCAAHsAf8IBwH/AQcEAAEC
Af8BAgEHAwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIA
AewK/wEHBAABAgH/AQcFAgH/AQIGAAECAf8BBwUCAf8BAgSYAwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEH
Af8B1gIAAewB/wIHAf8FBwH/AQcEAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKYAf8BmAIA
AfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAHsCv8BBwQAAQII/wECBgABAgj/AQIBmAL/AZgDAAj/
AfwB/wHWAQcB1gIAAewB/wIHAf8FBwH/AQcEAAoCBgAKAgKYAf8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8
AQAB/wPWAgAB7Aj/GwABmAH/ApgC/wKYAf8BmAYACtYCAAHsAf8GBwH/AewB/xkAAZgI/wGYBgAB1gj/
AdYCAAHsCP8B7BoACpgGAArWAgAK7BYAEAImAAEDAf8IAAICDQABAiQAAewBAwHsAf8IAAECAQACAwYA
AgcBAAEDAQABAiIAAQMB7AEDAewBAwH/CAABAgEAAgMGAAIHAQABAwEAAQIBAAH8AQAB/AEAAfwBAAH8
AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8BwABAwHsAQMB7AEDAewB/wEAAewGAAECAQACAwYAAgcBAAED
AQABAgH8CP8HAAH8CP8IAAHsAQMB7AEDAewBAwH/AQAB7AYAAQIBAAIDCQABAwEAAQIBAAH/AQAB/AH/
AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwHAAEDAewBAwIAAewB/wEAAewGAAECAQAMAwEAAQIB/AH/
AfwBAAEHAQAB/AEHAf8HAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYDAAHsAQMB7AIHAQMB/wEAAewBAAEG
BAABAgEAAgMIAAIDAQABAgEAAf8BAAH8AQAB/AEAAfwB/wH8BwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHW
AwABAwHsAQMB7AEDAewB/wIAAQYF/gECAQABAwEACAcBAAEDAQABAgH8Af8B/AH/AfwBAAH/AQABBwcA
AfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYDAAHsAQMB7AEDAewBAwH/AQABbQb+AQIBAAEDAQAIBwEA
AQMBAAECAQAB/AEAAf8BAAH8Af8B/AEAAfwHAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAwABAwHs
AQMB7AEDAewB/wEAAewBbQH+BG0BAgEAAQMBAAgHAQABAwEAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8
AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAwAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABAgEAAQMBAAgH
AQABAwEAAQIBAAj/AfwHAAj/AfwB/wHWAQcB1gMAAQMB7AEDAewBBwH/AewBAAHsAgABbQMAAQIBAAED
AQAIBwMAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gMAAewBAwEH
Af8B7AEAA+wGAAECAQABAwEACAcBAAEHAQABAhQACtYDAAEHAf8B7AEABewGAAECDgABAhQAAdYI/wHW
EgAQAhQACtYCAAFCAU0BPgcAAT4DAAEoAwABQAMAATADAAEBAQABAQUAAYABARYAA/+BAAL/AfABAAHw
AwAC/wHwAQAB8AMAAv8B8AEAAfAEAAE/AQABPwEAAT8BAAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAE/
AQABPwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/
AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEH
Av8B8AEDAfABAwEAAQ8C/wHwAQMB8AEDAQABHwL/AfABAwHwAQMBAAE/AfwBfwIABP8B8AF/AgAE/wHA
AX8CAAT/AQABHwMAAT8BAAE/AQABHwMAAT8BAAE/AQABFwMAAT8BAAE/AQABBwMAAT8BAAEDBQABPwEA
AQMFAAE/AQABAwUAAT8BAAEDBQABPwEAAQMBAAEHAwABPwEAAQMBAAEXAwABPwEAAQMBAAEfAgAC/wHw
AQMBAAEfAgAC/wHwAQMBAAEfAgAC/wHwAQML
</value>
</data>
<metadata name="SqlDataAdapter1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>249, 45</value>
</metadata>
<metadata name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDeleteCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlConnection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>507, 52</value>
</metadata>
<metadata name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>249, 112</value>
</metadata>
<metadata name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="DataSet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>788, 89</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Button2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAABh0lEQVQ4T41TQStEURh9/8FGSk1SZCEb
K5tJKbGghhImRjLJzIKkycKb0jQzKE2spxcLKZEaNrMxC42ULGhKqbeQEgusZqFx3HP1jWfmxXx1+u47
95zTd999z3AUHF3WNZUY3GCsBDcw45vH5MAcFvym5ioLXq8X8XgcpmliPRXHciD5K+hk+wLFSyA0Eilz
vV2D7LqQSCQgZR+W0NzYWhb+hVhoi91ANBrV5tvME3zd43rTtm3NsYtBdCzhFFRSchWv9gfyaRsBdVZy
IpIuax6XZVmW8AYWwxFtvtp7wHCPX294PB4tdE7gxikYmOif1eZcugD7tIj6uganQKOjpbOKO9rMsRt6
bAmQkCE1Ca+O/f0ceDn7uYW2pnbsxjLa4xpwc/CMu+M3zbEzZLRvuhxAPTXUVgVwg9yYMtBM8JlXyxAi
tWQhv3PvHsBOM3keoXT9fQtB9TXKVGJ2DSDcXmSlRqADwupski54zH5ify0r3//fAQRfEEd2gj9RZCpW
W8B/cA8o4Aulcg6s2EG/hQAAAABJRU5ErkJggg==
</value>
</data>
<data name="drpMiatarbeiter.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="drpMiatarbeiter.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style6{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}EvenRow{BackColor:White;}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style13{}Style9{}OddRow{BackColor:224, 224, 224;}Style1{}Style5{}FilterBar{}Normal{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Editor{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}RecordSelector{AlignImage:Center;}Footer{}Style12{}Style3{}Style7{}Style4{}Caption{AlignHorz:Center;}Style11{}Heading{Wrap:True;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style10{AlignHorz:Near;}Style2{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.DropdownView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" RecordSelectors="False" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;76&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 36, 76&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.DropdownView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 38, 78&lt;/ClientArea&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>504, 141</value>
</metadata>
<data name="Notizlist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="Notizlist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="Notizlist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{Wrap:True;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;257&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 422, 257&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 424, 259&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAASUlEQVQ4T2OgFfiPAxMF/v/9yI+BQeJQ
jBdg00CSIWCFOTk56AopMoAkF4AARZqRAUWaQQCsGUt4EA0G3gAQoEzz0PcCEYCBAQCfxINLHCrVBwAA
AABJRU5ErkJggg==
</value>
</data>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>25</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4ANAAAAAAAAAAAAAAAAAAAADQ0AAcHBwcHBwAAAAAAAAA0NAcREQAAAAAAAAAAAAAANDQREQAK
EREREREAAAAAADQ0ERERAACJiYkRAAAAAAA0NAoKCgoKEREREQARAAAAAAAAAAAKEYmJiREAEQAAAAAA
AAAAChERERERABEAEQAA5ArxCgoRERGJEQARABEAAADkCvEK8fHxEREAEQARAAAKCvHx8QoKCgoKABEA
EQAA5OTk8eTx5OQRERERABEAAADkCuQK5AoKCgoKCgARAADkCgDkCgDkCgoREREREQAAAAAA5AoAAOQK
CgoKCgoAAAAAAOQKAAAAAAAAAAAAACB/AAAAPwAAAA8AAAAPAAAAAwAAAAMAAPgAAAD4AAAAgAAAAMAA
AACAAAAAgAAAAMAAAACSAAAA8wAAAPP/AAA=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,156 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="DataSet1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>880, 30</value>
</data>
<data name="DataSet1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDataAdapter1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDataAdapter1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 67</value>
</data>
<data name="SqlSelectCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlConnection1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlConnection1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>152, 67</value>
</data>
<data name="$this.Name">
<value>frmBLKunde</value>
</data>
</root>

View File

@@ -0,0 +1,258 @@
Imports System.ComponentModel
Public Class frmBLKunde
Inherits _frmDomainEditor
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents DataSet1 As System.Data.DataSet
Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.DataSet1 = New System.Data.DataSet()
Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter()
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlUpdateCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection()
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'DataSet1
'
Me.DataSet1.DataSetName = "NewDataSet"
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "EDEX_BL_BLKunde", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("blkundenr", "blkundenr"), New System.Data.Common.DataColumnMapping("NRPAR00", "NRPAR00"), New System.Data.Common.DataColumnMapping("partnertyp", "partnertyp"), New System.Data.Common.DataColumnMapping("mandantnr", "mandantnr"), New System.Data.Common.DataColumnMapping("aktiv", "aktiv"), New System.Data.Common.DataColumnMapping("erstellt_am", "erstellt_am"), New System.Data.Common.DataColumnMapping("mutiert_am", "mutiert_am"), New System.Data.Common.DataColumnMapping("mutierer", "mutierer"), New System.Data.Common.DataColumnMapping("banklagernd_erklaerung", "banklagernd_erklaerung"), New System.Data.Common.DataColumnMapping("banklagernd_erklaerung_vom", "banklagernd_erklaerung_vom"), New System.Data.Common.DataColumnMapping("bl_periodische_auslieferung", "bl_periodische_auslieferung")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "[pv_blkunde_select]"
Me.SqlSelectCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlSelectCommand1.Connection = Me.SqlConnection1
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "[pv_blkunde_insert]"
Me.SqlInsertCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlInsertCommand1.Connection = Me.SqlConnection1
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@blkundenr", System.Data.SqlDbType.Int, 4, "blkundenr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@NRPAR00", System.Data.SqlDbType.Int, 4, "NRPAR00"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@partnertyp", System.Data.SqlDbType.Int, 4, "partnertyp"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, "banklagernd_erklaerung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, "banklagernd_erklaerung_vom"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, "bl_periodische_auslieferung"))
'
'SqlUpdateCommand1
'
Me.SqlUpdateCommand1.CommandText = "[pv_blkunde_update]"
Me.SqlUpdateCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlUpdateCommand1.Connection = Me.SqlConnection1
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@blkundenr", System.Data.SqlDbType.Int, 4, "blkundenr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@NRPAR00", System.Data.SqlDbType.Int, 4, "NRPAR00"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@partnertyp", System.Data.SqlDbType.Int, 4, "partnertyp"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Param1", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, "banklagernd_erklaerung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, "banklagernd_erklaerung_vom"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, "bl_periodische_auslieferung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_blkundenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "blkundenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_NRPAR00", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "NRPAR00", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung_vom", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bl_periodische_auslieferung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutierer", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutierer", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_partnertyp", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "partnertyp", System.Data.DataRowVersion.Original, Nothing))
'
'SqlDeleteCommand1
'
Me.SqlDeleteCommand1.CommandText = "[pv_blkunde_delete]"
Me.SqlDeleteCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlDeleteCommand1.Connection = Me.SqlConnection1
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_blkundenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "blkundenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_NRPAR00", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "NRPAR00", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung_vom", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bl_periodische_auslieferung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutierer", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutierer", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_partnertyp", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "partnertyp", System.Data.DataRowVersion.Original, Nothing))
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = "data source=shunb1;initial catalog=edoka;persist security info=False;user id=sa;w" & _
"orkstation id=SHUMAIN;packet size=4096"
'
'frmBLKunde
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(840, 405)
Me.Name = "frmBLKunde"
Me.Text = "Banklagernd-Kunden"
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
'Dim tablename As String = "blkunde"
Private Sub frmBLKunde_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.DomainList.ScrollTips = True
Me.tablename = "blkunde"
Dim dbconn As New EDOKA.DB_Connection()
Me.SqlConnection1.ConnectionString = Globals.sConnectionString
Me.SqlConnection1.Open()
' Nur für den aktuell gewählten Mandanten die Daten auslesen
Me.SqlDataAdapter1.SelectCommand.Parameters.Clear()
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@mandantnr", Globals.MandantNr)
Me.SqlDataAdapter1.Fill(Me.DataSet1)
Me.DomainList.DataSource = Me.DataSet1.Tables(0)
Me.DomainList.DataMember = Me.TableName
Me.SpaltenTitel_Aktualisieren(Me.DataSet1)
'DivFnkt.SpaltenTitel_Aktualisieren(Me.DomainList, Me.DataSet1.Tables(0), Me.tablename)
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'close button
Me.Close()
Case 1 'Speichern
Save_Data()
End Select
End Sub
Private Sub frmClose(ByVal sender As System.Object, ByVal e As CancelEventArgs) Handles MyBase.Closing
Dim msg As MsgBoxResult
If Me.DataSet1.HasChanges Then
msg = Globals.MyMsg.Show_MessageYesNoCancel(2)
If msg = MsgBoxResult.No Then
e.Cancel = False
End If
If msg = MsgBoxResult.Yes Then
If Save_Data() Then e.Cancel = False Else e.Cancel = True
End If
If msg = MsgBoxResult.Cancel Then e.Cancel = True
End If
End Sub
Private Function Save_Data() As Boolean
Save_Data = True
Try
SqlDataAdapter1.Update(Me.DataSet1)
Catch ex As Exception
MsgBox(Globals.MyMsg.Get_Meldungstext(902))
Save_Data = False
End Try
End Function
Private Sub DomainList_AfterInsert(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DomainList.AfterInsert
Dim i As Integer
'Defaulwerte erstellt_am, mutiert_am, mutierer und aktiv setzen
Try
For i = 0 To DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "partnertyp" Then
Me.DomainList.Columns(i).Value = 1
End If
If Me.DomainList.Columns(i).DataField = "bl_periodische_auslieferung" Then
Me.DomainList.Columns(i).Value = 0
End If
If Me.DomainList.Columns(i).DataField = "banklagernd_erklaerung" Then
Me.DomainList.Columns(i).Value = 0
End If
Next
Catch
End Try
End Sub
Private Sub domainlist_aftercellupdate(ByVal sender As System.Object, ByVal e As C1.Win.C1TrueDBGrid.ColEventArgs) Handles DomainList.AfterColUpdate
'Aktualisieren von Mutierer und Mutiert_am
Dim i As Integer
Try
For i = 0 To Me.DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "mutiert_am" Then Me.DomainList.Columns(i).Value = Now
If Me.DomainList.Columns(i).DataField = "mutierer" Then Me.DomainList.Columns(i).Value = Globals.MitarbeiterNr
If Me.DomainList.Columns(i).DataField = "partnertyp" Then Me.DomainList.Columns(i).Value = 1
Next
'neuer DB-Key auslösen, sofern kein Key vorhanden ist
If Me.DomainList.Columns(0).Value Is DBNull.Value Then
Dim dbkey As New edokadb.clsMyKey_Tabelle()
Dim key As Long
dbkey.cpMainConnectionProvider = conn
key = dbkey.get_dbkey(TableName)
Me.DomainList.Columns(0).Value = key
For i = 0 To Me.DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "mandantnr" Then
Me.DomainList.Columns(i).Value = Globals.MandantNr
End If
Next
dbkey.Dispose()
End If
Catch
End Try
End Sub
End Class

View File

@@ -0,0 +1,156 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="SqlDataAdapter1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDataAdapter1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>125, 17</value>
</data>
<data name="SqlSelectCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlConnection1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlConnection1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>260, 17</value>
</data>
<data name="DataSet1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>388, 17</value>
</data>
<data name="DataSet1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmBLKundeVIP</value>
</data>
</root>

View File

@@ -0,0 +1,254 @@
Imports System.ComponentModel
Public Class frmBLKundeVIP
Inherits _frmDomainEditor
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
Friend WithEvents DataSet1 As System.Data.DataSet
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter()
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlUpdateCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection()
Me.DataSet1 = New System.Data.DataSet()
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "EDEX_BL_BLKunde", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("blkundenr", "blkundenr"), New System.Data.Common.DataColumnMapping("NRPAR00", "NRPAR00"), New System.Data.Common.DataColumnMapping("partnertyp", "partnertyp"), New System.Data.Common.DataColumnMapping("mandantnr", "mandantnr"), New System.Data.Common.DataColumnMapping("aktiv", "aktiv"), New System.Data.Common.DataColumnMapping("erstellt_am", "erstellt_am"), New System.Data.Common.DataColumnMapping("mutiert_am", "mutiert_am"), New System.Data.Common.DataColumnMapping("mutierer", "mutierer"), New System.Data.Common.DataColumnMapping("banklagernd_erklaerung", "banklagernd_erklaerung"), New System.Data.Common.DataColumnMapping("banklagernd_erklaerung_vom", "banklagernd_erklaerung_vom"), New System.Data.Common.DataColumnMapping("bl_periodische_auslieferung", "bl_periodische_auslieferung")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "[pv_blkundevip_select]"
Me.SqlSelectCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlSelectCommand1.Connection = Me.SqlConnection1
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "[pv_blkundevip_insert]"
Me.SqlInsertCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlInsertCommand1.Connection = Me.SqlConnection1
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@blkundenr", System.Data.SqlDbType.Int, 4, "blkundenr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@NRPAR00", System.Data.SqlDbType.Int, 4, "NRPAR00"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@partnertyp", System.Data.SqlDbType.Int, 4, "partnertyp"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, "banklagernd_erklaerung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, "banklagernd_erklaerung_vom"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, "bl_periodische_auslieferung"))
'
'SqlUpdateCommand1
'
Me.SqlUpdateCommand1.CommandText = "[pv_blkundevip_update]"
Me.SqlUpdateCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlUpdateCommand1.Connection = Me.SqlConnection1
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@blkundenr", System.Data.SqlDbType.Int, 4, "blkundenr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@NRPAR00", System.Data.SqlDbType.Int, 4, "NRPAR00"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@partnertyp", System.Data.SqlDbType.Int, 4, "partnertyp"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Param1", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, "banklagernd_erklaerung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, "banklagernd_erklaerung_vom"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, "bl_periodische_auslieferung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_blkundenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "blkundenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_NRPAR00", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "NRPAR00", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung_vom", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bl_periodische_auslieferung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutierer", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutierer", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_partnertyp", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "partnertyp", System.Data.DataRowVersion.Original, Nothing))
'
'SqlDeleteCommand1
'
Me.SqlDeleteCommand1.CommandText = "[pv_blkundevip_delete]"
Me.SqlDeleteCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlDeleteCommand1.Connection = Me.SqlConnection1
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_blkundenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "blkundenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_NRPAR00", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "NRPAR00", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung_vom", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bl_periodische_auslieferung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutierer", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutierer", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_partnertyp", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "partnertyp", System.Data.DataRowVersion.Original, Nothing))
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = "data source=shunb1;initial catalog=edoka;persist security info=False;user id=sa;w" & _
"orkstation id=SHUMAIN;packet size=4096"
'
'DataSet1
'
Me.DataSet1.DataSetName = "NewDataSet"
'
'frmBLKundeVIP
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(840, 433)
Me.Name = "frmBLKundeVIP"
Me.Text = "VIP-Kunden verwalten"
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub frmBLKunde_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.DomainList.ScrollTips = True
Me.TableName = "blkunde"
Dim dbconn As New EDOKA.DB_Connection()
Me.SqlConnection1.ConnectionString = Globals.sConnectionString
Me.SqlConnection1.Open()
' Nur für den aktuell gewählten Mandanten die Daten auslesen
Me.SqlDataAdapter1.SelectCommand.Parameters.Clear()
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@mandantnr", Globals.MandantNr)
Me.SqlDataAdapter1.Fill(Me.DataSet1)
Me.DomainList.DataSource = Me.DataSet1.Tables(0)
Me.DomainList.DataMember = Me.TableName
Me.SpaltenTitel_Aktualisieren(Me.DataSet1)
'DivFnkt.SpaltenTitel_Aktualisieren(Me.DomainList, Me.DataSet1.Tables(0), Me.tablename)
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'close button
Me.Close()
Case 1 'Speichern
Save_Data()
End Select
End Sub
Private Sub frmClose(ByVal sender As System.Object, ByVal e As CancelEventArgs) Handles MyBase.Closing
Dim msg As MsgBoxResult
If Me.DataSet1.HasChanges Then
msg = Globals.MyMsg.Show_MessageYesNoCancel(2)
If msg = MsgBoxResult.No Then
e.Cancel = False
End If
If msg = MsgBoxResult.Yes Then
If Save_Data() Then e.Cancel = False Else e.Cancel = True
End If
If msg = MsgBoxResult.Cancel Then e.Cancel = True
End If
End Sub
Private Function Save_Data() As Boolean
Save_Data = True
Try
SqlDataAdapter1.Update(Me.DataSet1)
Catch ex As Exception
MsgBox(Globals.MyMsg.Get_Meldungstext(902))
Save_Data = False
End Try
End Function
Private Sub DomainList_AfterInsert(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DomainList.AfterInsert
Dim i As Integer
'Defaulwerte erstellt_am, mutiert_am, mutierer und aktiv setzen
Try
For i = 0 To DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "partnertyp" Then
Me.DomainList.Columns(i).Value = 1
End If
If Me.DomainList.Columns(i).DataField = "bl_periodische_auslieferung" Then
Me.DomainList.Columns(i).Value = 0
End If
If Me.DomainList.Columns(i).DataField = "banklagernd_erklaerung" Then
Me.DomainList.Columns(i).Value = 0
End If
Next
Catch
End Try
End Sub
Private Sub domainlist_aftercellupdate(ByVal sender As System.Object, ByVal e As C1.Win.C1TrueDBGrid.ColEventArgs) Handles DomainList.AfterColUpdate
'Aktualisieren von Mutierer und Mutiert_am
Dim i As Integer
Try
For i = 0 To Me.DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "mutiert_am" Then Me.DomainList.Columns(i).Value = Now
If Me.DomainList.Columns(i).DataField = "mutierer" Then Me.DomainList.Columns(i).Value = Globals.MitarbeiterNr
If Me.DomainList.Columns(i).DataField = "partnertyp" Then Me.DomainList.Columns(i).Value = 3
Next
'neuer DB-Key auslösen, sofern kein Key vorhanden ist
If Me.DomainList.Columns(0).Value Is DBNull.Value Then
Dim dbkey As New edokadb.clsMyKey_Tabelle()
Dim key As Long
dbkey.cpMainConnectionProvider = conn
key = dbkey.get_dbkey(TableName)
Me.DomainList.Columns(0).Value = key
For i = 0 To Me.DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "mandantnr" Then
Me.DomainList.Columns(i).Value = Globals.MandantNr
End If
Next
dbkey.Dispose()
End If
Catch
End Try
End Sub
End Class

View File

@@ -0,0 +1,370 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>573, 30</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADK
DwAAAk1TRnQBSQFMAgEBCQEAARQBAAEUAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wEAEAcwABAHMAACBwkA
AewEBzAAAQcBAAvsAwcwAAHsCgcD7AIHMAAB7AYHAfkB/wH5Af8C7AEAAgcwAAHsCgcE7AEHMAAB7Ar/
BOwBBzAAAQcB7AH/BwAC/wPsAQcwAAIHAewH/wEAAv8C7AEHMAADBwHsAf8FBwEAA+wCBzAABAcB7AUH
Af8FBzAABQcB/wUHAQAEBzAABQcH7AQHMAAQBzAAEAdEAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEH
AQABBwEAAQcCAAEHAQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcFAAEH
AgABBwEAAQcBAAEHAgABBwEAAewEBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBwUA
AQcCAAEHAQABBwEAAQcCAAEHAQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHAQAKAgYACgIHAAH8AQAB/AEA
AfwBAAH8AQAB/AYAAewB/wQHAf8DBwH/AQcEAAECCP8BAgYAAQII/wECBgAB/Aj/BwAB7Ar/AQcEAAEC
Af8IAgYAAQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgAB7AH/BAcB/wMHAf8BBwQAAQIB/wMCAQcEAgYA
AQIB/wMCAQcEAgSYAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB7Ar/AQcEAAECAv8BAgEHAwIB/wEC
BgABAgL/AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYCAAHsAf8IBwH/AQcEAAEC
Af8BAgEHAwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIA
AewK/wEHBAABAgH/AQcFAgH/AQIGAAECAf8BBwUCAf8BAgSYAwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEH
Af8B1gIAAewB/wIHAf8FBwH/AQcEAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKYAf8BmAIA
AfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAHsCv8BBwQAAQII/wECBgABAgj/AQIBmAL/AZgDAAj/
AfwB/wHWAQcB1gIAAewB/wIHAf8FBwH/AQcEAAoCBgAKAgKYAf8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8
AQAB/wPWAgAB7Aj/GwABmAH/ApgC/wKYAf8BmAYACtYCAAHsAf8GBwH/AewB/xkAAZgI/wGYBgAB1gj/
AdYCAAHsCP8B7BoACpgGAArWAgAK7BYAEAImAAEDAf8IAAICDQABAiQAAewBAwHsAf8IAAECAQACAwYA
AgcBAAEDAQABAiIAAQMB7AEDAewBAwH/CAABAgEAAgMGAAIHAQABAwEAAQIBAAH8AQAB/AEAAfwBAAH8
AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8BwABAwHsAQMB7AEDAewB/wEAAewGAAECAQACAwYAAgcBAAED
AQABAgH8CP8HAAH8CP8IAAHsAQMB7AEDAewBAwH/AQAB7AYAAQIBAAIDCQABAwEAAQIBAAH/AQAB/AH/
AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwHAAEDAewBAwIAAewB/wEAAewGAAECAQAMAwEAAQIB/AH/
AfwBAAEHAQAB/AEHAf8HAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYDAAHsAQMB7AIHAQMB/wEAAewBAAEG
BAABAgEAAgMIAAIDAQABAgEAAf8BAAH8AQAB/AEAAfwB/wH8BwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHW
AwABAwHsAQMB7AEDAewB/wIAAQYF/gECAQABAwEACAcBAAEDAQABAgH8Af8B/AH/AfwBAAH/AQABBwcA
AfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYDAAHsAQMB7AEDAewBAwH/AQABbQb+AQIBAAEDAQAIBwEA
AQMBAAECAQAB/AEAAf8BAAH8Af8B/AEAAfwHAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAwABAwHs
AQMB7AEDAewB/wEAAewBbQH+BG0BAgEAAQMBAAgHAQABAwEAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8
AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAwAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABAgEAAQMBAAgH
AQABAwEAAQIBAAj/AfwHAAj/AfwB/wHWAQcB1gMAAQMB7AEDAewBBwH/AewBAAHsAgABbQMAAQIBAAED
AQAIBwMAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gMAAewBAwEH
Af8B7AEAA+wGAAECAQABAwEACAcBAAEHAQABAhQACtYDAAEHAf8B7AEABewGAAECDgABAhQAAdYI/wHW
EgAQAhQACtYCAAFCAU0BPgcAAT4DAAEoAwABQAMAATADAAEBAQABAQUAAYABARYAA/+BAAL/AfABAAHw
AwAC/wHwAQAB8AMAAv8B8AEAAfAEAAE/AQABPwEAAT8BAAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAE/
AQABPwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/
AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEH
Av8B8AEDAfABAwEAAQ8C/wHwAQMB8AEDAQABHwL/AfABAwHwAQMBAAE/AfwBfwIABP8B8AF/AgAE/wHA
AX8CAAT/AQABHwMAAT8BAAE/AQABHwMAAT8BAAE/AQABFwMAAT8BAAE/AQABBwMAAT8BAAEDBQABPwEA
AQMFAAE/AQABAwUAAT8BAAEDBQABPwEAAQMBAAEHAwABPwEAAQMBAAEXAwABPwEAAQMBAAEfAgAC/wHw
AQMBAAEfAgAC/wHwAQMBAAEfAgAC/wHwAQML
</value>
</data>
<metadata name="ContextMenu2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>522, 20</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="FnktList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="FnktList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="FnktList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}FilterBar{Wrap:True;BackColor:255, 255, 192;}Heading{AlignVert:Center;Wrap:True;ForeColor:ControlText;BackColor:Control;Border:Raised,,1, 1, 1, 1;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="SolidCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;393&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 390, 393&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 392, 395&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>679, 30</value>
</metadata>
<data name="DomainList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="DomainList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="DomainList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}FilterBar{Wrap:True;BackColor:255, 255, 192;}Heading{ForeColor:ControlText;Wrap:True;AlignVert:Center;BackColor:Control;Border:Raised,,1, 1, 1, 1;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style6{}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" MarqueeStyle="SolidCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;393&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 366, 393&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 368, 395&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="SqlConnection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>162, 20</value>
</metadata>
<metadata name="SqlDataAdapter1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>27, 20</value>
</metadata>
<metadata name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDeleteCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="DataSet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>290, 20</value>
</metadata>
<metadata name="SqlSelectCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlSelectCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlInsertCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlUpdateCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDeleteCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDeleteCommand2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlDeleteCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDataAdapter2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>387, 20</value>
</metadata>
<metadata name="MainMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
</root>

File diff suppressed because one or more lines are too long

View File

@@ -0,0 +1,133 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAATtJREFUWEftl1sS
wyAIRV16lpad2WCKRSLP2Ek/6kw/WtF7AAVbSmBs21a1T2ArvykV3Pe9SgPmqK1fQbDEzTRRD0wKBMQz
whwIoxKCAHFtwKal1OFjwR4Ah71jWOIAxsXxu0rd1hkQHvE7AOdaASKS80wKMDrn2gmE13srzJ55AAC9
fiIi3nsELBuMQoeIeC8dQPg9MoYoRABQZAaSAWhR+AP8RASsUsrze+cM0FuQuglSNfQeQrwB2G1bPYjW
gmwEuPeXgmR5odUBT1Oaes+apMWQnufig/ffhoiII8uyF1FGvEPA4ugVhRyRtnt5RTveRR+Td56wh6sw
VHTmtZZzFYo9tUUYSXS47yH3mTH/QwKCdCz12gLF1EgA1vqV852BRmClgGevBvEkAEA+DtAa2rIT74n7
zCYD8AKKrtDBDzrVEwAAAABJRU5ErkJggg==
</value>
</data>
</root>

View File

@@ -0,0 +1,368 @@
Public Class frmBanklagerndverarbeitung
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents rbDossier As System.Windows.Forms.RadioButton
Friend WithEvents rbVersand As System.Windows.Forms.RadioButton
Friend WithEvents RBPersönlich As System.Windows.Forms.RadioButton
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents txtWeitereVerarbeitung As System.Windows.Forms.Label
Friend WithEvents pnlbck As System.Windows.Forms.Panel
Friend WithEvents rbbckbldossier As System.Windows.Forms.RadioButton
Friend WithEvents rbbckversand As System.Windows.Forms.RadioButton
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents pnleinzeldokument As System.Windows.Forms.Panel
Friend WithEvents rbeinzelblversand As System.Windows.Forms.RadioButton
Friend WithEvents rbeinzelbldossier As System.Windows.Forms.RadioButton
Friend WithEvents RBEinzelPersoenlich As System.Windows.Forms.RadioButton
Friend WithEvents rbkeineUebergabe As System.Windows.Forms.RadioButton
Friend WithEvents rbbckphysisch As System.Windows.Forms.RadioButton
Friend WithEvents rbPhysisch As System.Windows.Forms.RadioButton
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmBanklagerndverarbeitung))
Me.Label1 = New System.Windows.Forms.Label
Me.rbDossier = New System.Windows.Forms.RadioButton
Me.rbVersand = New System.Windows.Forms.RadioButton
Me.RBPersönlich = New System.Windows.Forms.RadioButton
Me.Button1 = New System.Windows.Forms.Button
Me.GroupBox1 = New System.Windows.Forms.GroupBox
Me.txtWeitereVerarbeitung = New System.Windows.Forms.Label
Me.pnlbck = New System.Windows.Forms.Panel
Me.rbbckphysisch = New System.Windows.Forms.RadioButton
Me.rbkeineUebergabe = New System.Windows.Forms.RadioButton
Me.rbbckversand = New System.Windows.Forms.RadioButton
Me.rbbckbldossier = New System.Windows.Forms.RadioButton
Me.GroupBox2 = New System.Windows.Forms.GroupBox
Me.rbPhysisch = New System.Windows.Forms.RadioButton
Me.pnleinzeldokument = New System.Windows.Forms.Panel
Me.RBEinzelPersoenlich = New System.Windows.Forms.RadioButton
Me.rbeinzelblversand = New System.Windows.Forms.RadioButton
Me.rbeinzelbldossier = New System.Windows.Forms.RadioButton
Me.PictureBox1 = New System.Windows.Forms.PictureBox
Me.pnlbck.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.pnleinzeldokument.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(312, 23)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Sie erstellen ein Dokument für einen Banklagernd-Kunden."
'
'rbDossier
'
Me.rbDossier.Location = New System.Drawing.Point(8, 16)
Me.rbDossier.Name = "rbDossier"
Me.rbDossier.Size = New System.Drawing.Size(280, 24)
Me.rbDossier.TabIndex = 1
Me.rbDossier.Text = "Ablage im elektronischen Banklagernd-Dossier"
'
'rbVersand
'
Me.rbVersand.Location = New System.Drawing.Point(8, 35)
Me.rbVersand.Name = "rbVersand"
Me.rbVersand.Size = New System.Drawing.Size(192, 24)
Me.rbVersand.TabIndex = 2
Me.rbVersand.Text = "Versand an eine Zustelladresse"
'
'RBPersönlich
'
Me.RBPersönlich.Location = New System.Drawing.Point(8, 55)
Me.RBPersönlich.Name = "RBPersönlich"
Me.RBPersönlich.Size = New System.Drawing.Size(192, 24)
Me.RBPersönlich.TabIndex = 3
Me.RBPersönlich.Text = "Persönliche Aushändigung"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(160, 336)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 23)
Me.Button1.TabIndex = 4
Me.Button1.Text = "&OK"
'
'GroupBox1
'
Me.GroupBox1.Location = New System.Drawing.Point(400, 392)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(176, 56)
Me.GroupBox1.TabIndex = 5
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Hinweis zur Dokumentbearbeitung"
'
'txtWeitereVerarbeitung
'
Me.txtWeitereVerarbeitung.Location = New System.Drawing.Point(56, 152)
Me.txtWeitereVerarbeitung.Name = "txtWeitereVerarbeitung"
Me.txtWeitereVerarbeitung.Size = New System.Drawing.Size(320, 168)
Me.txtWeitereVerarbeitung.TabIndex = 0
'
'pnlbck
'
Me.pnlbck.Controls.Add(Me.rbbckphysisch)
Me.pnlbck.Controls.Add(Me.rbkeineUebergabe)
Me.pnlbck.Controls.Add(Me.rbbckversand)
Me.pnlbck.Controls.Add(Me.rbbckbldossier)
Me.pnlbck.Location = New System.Drawing.Point(14, 56)
Me.pnlbck.Name = "pnlbck"
Me.pnlbck.Size = New System.Drawing.Size(274, 88)
Me.pnlbck.TabIndex = 6
Me.pnlbck.Visible = False
'
'rbbckphysisch
'
Me.rbbckphysisch.Location = New System.Drawing.Point(8, 66)
Me.rbbckphysisch.Name = "rbbckphysisch"
Me.rbbckphysisch.Size = New System.Drawing.Size(256, 24)
Me.rbbckphysisch.TabIndex = 3
Me.rbbckphysisch.Text = "Ablage im physischen Dossier"
'
'rbkeineUebergabe
'
Me.rbkeineUebergabe.Location = New System.Drawing.Point(8, 45)
Me.rbkeineUebergabe.Name = "rbkeineUebergabe"
Me.rbkeineUebergabe.Size = New System.Drawing.Size(256, 24)
Me.rbkeineUebergabe.TabIndex = 2
Me.rbkeineUebergabe.Text = "Keine Übergabe an den Kunden"
'
'rbbckversand
'
Me.rbbckversand.Location = New System.Drawing.Point(8, 25)
Me.rbbckversand.Name = "rbbckversand"
Me.rbbckversand.Size = New System.Drawing.Size(208, 24)
Me.rbbckversand.TabIndex = 1
Me.rbbckversand.Text = "Versand/persönliche Aushändigung"
'
'rbbckbldossier
'
Me.rbbckbldossier.Location = New System.Drawing.Point(8, 6)
Me.rbbckbldossier.Name = "rbbckbldossier"
Me.rbbckbldossier.Size = New System.Drawing.Size(264, 24)
Me.rbbckbldossier.TabIndex = 0
Me.rbbckbldossier.Text = "Ablage im elektronischen Banklagernd-Dossier"
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.rbPhysisch)
Me.GroupBox2.Controls.Add(Me.rbDossier)
Me.GroupBox2.Controls.Add(Me.rbVersand)
Me.GroupBox2.Controls.Add(Me.RBPersönlich)
Me.GroupBox2.Location = New System.Drawing.Point(8, 40)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(368, 109)
Me.GroupBox2.TabIndex = 7
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Weiterleitung"
'
'rbPhysisch
'
Me.rbPhysisch.Location = New System.Drawing.Point(8, 76)
Me.rbPhysisch.Name = "rbPhysisch"
Me.rbPhysisch.Size = New System.Drawing.Size(242, 24)
Me.rbPhysisch.TabIndex = 4
Me.rbPhysisch.Text = "Ablage im physischen Dossier"
'
'pnleinzeldokument
'
Me.pnleinzeldokument.Controls.Add(Me.RBEinzelPersoenlich)
Me.pnleinzeldokument.Controls.Add(Me.rbeinzelblversand)
Me.pnleinzeldokument.Controls.Add(Me.rbeinzelbldossier)
Me.pnleinzeldokument.Location = New System.Drawing.Point(14, 56)
Me.pnleinzeldokument.Name = "pnleinzeldokument"
Me.pnleinzeldokument.Size = New System.Drawing.Size(274, 82)
Me.pnleinzeldokument.TabIndex = 7
Me.pnleinzeldokument.Visible = False
'
'RBEinzelPersoenlich
'
Me.RBEinzelPersoenlich.Location = New System.Drawing.Point(8, 41)
Me.RBEinzelPersoenlich.Name = "RBEinzelPersoenlich"
Me.RBEinzelPersoenlich.Size = New System.Drawing.Size(192, 24)
Me.RBEinzelPersoenlich.TabIndex = 5
Me.RBEinzelPersoenlich.Text = "Persönliche Aushändigung"
'
'rbeinzelblversand
'
Me.rbeinzelblversand.Location = New System.Drawing.Point(8, 22)
Me.rbeinzelblversand.Name = "rbeinzelblversand"
Me.rbeinzelblversand.Size = New System.Drawing.Size(208, 24)
Me.rbeinzelblversand.TabIndex = 1
Me.rbeinzelblversand.Text = "Versand an eine Zustelladresse"
'
'rbeinzelbldossier
'
Me.rbeinzelbldossier.Location = New System.Drawing.Point(8, 3)
Me.rbeinzelbldossier.Name = "rbeinzelbldossier"
Me.rbeinzelbldossier.Size = New System.Drawing.Size(264, 24)
Me.rbeinzelbldossier.TabIndex = 0
Me.rbeinzelbldossier.Text = "Ablage im physischen Banklagernd-Dossier"
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(8, 152)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(48, 48)
Me.PictureBox1.TabIndex = 8
Me.PictureBox1.TabStop = False
'
'frmBanklagerndverarbeitung
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(386, 367)
Me.ControlBox = False
Me.Controls.Add(Me.txtWeitereVerarbeitung)
Me.Controls.Add(Me.pnlbck)
Me.Controls.Add(Me.pnleinzeldokument)
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.PictureBox1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Name = "frmBanklagerndverarbeitung"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Dokumenterstellung für Banklagernd-Kunde"
Me.pnlbck.ResumeLayout(False)
Me.GroupBox2.ResumeLayout(False)
Me.pnleinzeldokument.ResumeLayout(False)
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Public Sub New(ByVal nrpar00 As Integer, ByVal bck As Boolean)
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
Me.Text = Me.Text + ": " + DivFnkt.get_parnter_namevorname(nrpar00)
If bck Then
pnlbck.Visible = True
pnleinzeldokument.Visible = False
End If
End Sub
Public Sub New(ByVal nrpar00 As Integer, ByVal bck As Boolean, ByVal einzeldokument As Boolean)
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
Me.Text = Me.Text + ": " + DivFnkt.get_parnter_namevorname(nrpar00)
If einzeldokument Then
pnleinzeldokument.Visible = True
pnlbck.Visible = False
End If
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.DialogResult = DialogResult.OK
Me.Close()
End Sub
Private Sub set_texte()
Dim mdgnr As Integer = 0
If Me.pnlbck.Visible = False And Me.pnleinzeldokument.Visible = False Then
If Me.rbDossier.Checked = True Then mdgnr = 600
If Me.rbVersand.Checked = True Then mdgnr = 601
If Me.RBPersönlich.Checked = True Then mdgnr = 602
If Me.rbPhysisch.Checked = True Then mdgnr = 609
End If
If Me.pnlbck.Visible = True Then
If Me.rbbckbldossier.Checked Then mdgnr = 603
If Me.rbbckversand.Checked Then mdgnr = 604
If Me.rbkeineUebergabe.Checked Then mdgnr = 608
If Me.rbbckphysisch.Checked = True Then mdgnr = 609
End If
If Me.pnleinzeldokument.Visible = True Then
If Me.rbeinzelbldossier.Checked Then mdgnr = 605
If Me.rbeinzelblversand.Checked Then mdgnr = 606
If Me.RBEinzelPersoenlich.Checked Then mdgnr = 607
End If
If mdgnr > 0 Then
Me.txtWeitereVerarbeitung.Text = MyTxt.gettext(mdgnr)
Else
Me.txtWeitereVerarbeitung.Text = ""
End If
End Sub
Private Sub rbDossier_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbDossier.CheckedChanged
set_texte()
End Sub
Private Sub rbVersand_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbVersand.CheckedChanged
set_texte()
End Sub
Private Sub RBPersönlich_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RBPersönlich.CheckedChanged
set_texte()
End Sub
Private Sub rbeinzelbldossier_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbeinzelbldossier.CheckedChanged
set_texte()
End Sub
Private Sub rbeinzelblversand_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbeinzelblversand.CheckedChanged
set_texte()
End Sub
Private Sub rbbckbldossier_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbbckbldossier.CheckedChanged
set_texte()
End Sub
Private Sub rbbckversand_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbbckversand.CheckedChanged, RBEinzelPersoenlich.CheckedChanged
set_texte()
End Sub
Private Sub frmBanklagerndverarbeitung_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.set_texte()
End Sub
Private Sub rbkeineUebergabe_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbkeineUebergabe.CheckedChanged
Me.set_texte()
End Sub
Private Sub rbbckphysisch_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rbbckphysisch.CheckedChanged, rbPhysisch.CheckedChanged
Me.set_texte()
End Sub
End Class

View File

@@ -0,0 +1,381 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmBlPartnerUebersicht
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(frmBlPartnerUebersicht))
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.btnexit = New System.Windows.Forms.ToolBarButton()
Me.btnDruck = New System.Windows.Forms.ToolBarButton()
Me.btnDoklist = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
Me.DateiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.SchliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.GrpBLKunden = New System.Windows.Forms.GroupBox()
Me.lbblpartner = New System.Windows.Forms.ListBox()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.C1DefPeriode = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.GrpAushaendigungen = New System.Windows.Forms.GroupBox()
Me.C1Aushaendigungen = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.CtxMenuAushaendigung = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.QuittungAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.GrpBLDokumente = New System.Windows.Forms.GroupBox()
Me.DokList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
Me.ComboBox2 = New System.Windows.Forms.ComboBox()
Me.lblaelterals = New System.Windows.Forms.Label()
Me.lbljahre = New System.Windows.Forms.Label()
Me.MenuStrip1.SuspendLayout()
Me.GrpBLKunden.SuspendLayout()
Me.SplitContainer1.Panel1.SuspendLayout()
Me.SplitContainer1.Panel2.SuspendLayout()
Me.SplitContainer1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
CType(Me.C1DefPeriode, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GrpAushaendigungen.SuspendLayout()
CType(Me.C1Aushaendigungen, System.ComponentModel.ISupportInitialize).BeginInit()
Me.CtxMenuAushaendigung.SuspendLayout()
Me.GrpBLDokumente.SuspendLayout()
CType(Me.DokList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.btnexit, Me.btnDruck, Me.btnDoklist})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Location = New System.Drawing.Point(0, 24)
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(919, 28)
Me.ToolBar1.TabIndex = 1
'
'btnexit
'
Me.btnexit.ImageIndex = 0
Me.btnexit.Name = "btnexit"
'
'btnDruck
'
Me.btnDruck.ImageIndex = 4
Me.btnDruck.Name = "btnDruck"
Me.btnDruck.ToolTipText = "Partnerliste nach Excel"
'
'btnDoklist
'
Me.btnDoklist.ImageIndex = 4
Me.btnDoklist.Name = "btnDoklist"
Me.btnDoklist.ToolTipText = "Dokumentliste nach Excel"
'
'ImageList1
'
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
Me.ImageList1.Images.SetKeyName(0, "")
Me.ImageList1.Images.SetKeyName(1, "")
Me.ImageList1.Images.SetKeyName(2, "")
Me.ImageList1.Images.SetKeyName(3, "")
Me.ImageList1.Images.SetKeyName(4, "")
Me.ImageList1.Images.SetKeyName(5, "")
Me.ImageList1.Images.SetKeyName(6, "")
Me.ImageList1.Images.SetKeyName(7, "")
Me.ImageList1.Images.SetKeyName(8, "")
Me.ImageList1.Images.SetKeyName(9, "")
Me.ImageList1.Images.SetKeyName(10, "")
Me.ImageList1.Images.SetKeyName(11, "")
Me.ImageList1.Images.SetKeyName(12, "")
'
'MenuStrip1
'
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiToolStripMenuItem})
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Size = New System.Drawing.Size(919, 24)
Me.MenuStrip1.TabIndex = 2
Me.MenuStrip1.Text = "MenuStrip1"
'
'DateiToolStripMenuItem
'
Me.DateiToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SchliessenToolStripMenuItem})
Me.DateiToolStripMenuItem.Name = "DateiToolStripMenuItem"
Me.DateiToolStripMenuItem.Size = New System.Drawing.Size(46, 20)
Me.DateiToolStripMenuItem.Text = "&Datei"
'
'SchliessenToolStripMenuItem
'
Me.SchliessenToolStripMenuItem.Name = "SchliessenToolStripMenuItem"
Me.SchliessenToolStripMenuItem.Size = New System.Drawing.Size(128, 22)
Me.SchliessenToolStripMenuItem.Text = "&Schliessen"
'
'GrpBLKunden
'
Me.GrpBLKunden.Controls.Add(Me.lbblpartner)
Me.GrpBLKunden.Dock = System.Windows.Forms.DockStyle.Left
Me.GrpBLKunden.Location = New System.Drawing.Point(0, 52)
Me.GrpBLKunden.Name = "GrpBLKunden"
Me.GrpBLKunden.Size = New System.Drawing.Size(200, 433)
Me.GrpBLKunden.TabIndex = 3
Me.GrpBLKunden.TabStop = False
Me.GrpBLKunden.Text = "Banklagernd-Partner"
'
'lbblpartner
'
Me.lbblpartner.Dock = System.Windows.Forms.DockStyle.Fill
Me.lbblpartner.FormattingEnabled = True
Me.lbblpartner.Location = New System.Drawing.Point(3, 16)
Me.lbblpartner.Name = "lbblpartner"
Me.lbblpartner.Size = New System.Drawing.Size(194, 414)
Me.lbblpartner.TabIndex = 0
'
'SplitContainer1
'
Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer1.Location = New System.Drawing.Point(200, 52)
Me.SplitContainer1.Name = "SplitContainer1"
'
'SplitContainer1.Panel1
'
Me.SplitContainer1.Panel1.Controls.Add(Me.GroupBox1)
Me.SplitContainer1.Panel1.Controls.Add(Me.GrpAushaendigungen)
'
'SplitContainer1.Panel2
'
Me.SplitContainer1.Panel2.Controls.Add(Me.GrpBLDokumente)
Me.SplitContainer1.Size = New System.Drawing.Size(719, 433)
Me.SplitContainer1.SplitterDistance = 239
Me.SplitContainer1.TabIndex = 4
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.C1DefPeriode)
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Fill
Me.GroupBox1.Location = New System.Drawing.Point(0, 246)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(239, 187)
Me.GroupBox1.TabIndex = 1
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Definierte peroid. Auslieferungen"
'
'C1DefPeriode
'
Me.C1DefPeriode.AllowUpdateOnBlur = False
Me.C1DefPeriode.AlternatingRows = True
Me.C1DefPeriode.Cursor = System.Windows.Forms.Cursors.Default
Me.C1DefPeriode.Dock = System.Windows.Forms.DockStyle.Fill
Me.C1DefPeriode.FetchRowStyles = True
Me.C1DefPeriode.FilterBar = True
Me.C1DefPeriode.GroupByCaption = "Drag a column header here to group by that column"
Me.C1DefPeriode.Images.Add(CType(resources.GetObject("C1DefPeriode.Images"), System.Drawing.Image))
Me.C1DefPeriode.Location = New System.Drawing.Point(3, 16)
Me.C1DefPeriode.Name = "C1DefPeriode"
Me.C1DefPeriode.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1DefPeriode.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1DefPeriode.PreviewInfo.ZoomFactor = 75.0R
Me.C1DefPeriode.PrintInfo.PageSettings = CType(resources.GetObject("C1DefPeriode.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1DefPeriode.ScrollTips = True
Me.C1DefPeriode.Size = New System.Drawing.Size(233, 168)
Me.C1DefPeriode.TabIndex = 28
Me.C1DefPeriode.Text = "C1TrueDBGrid1"
Me.C1DefPeriode.PropBag = resources.GetString("C1DefPeriode.PropBag")
'
'GrpAushaendigungen
'
Me.GrpAushaendigungen.Controls.Add(Me.C1Aushaendigungen)
Me.GrpAushaendigungen.Dock = System.Windows.Forms.DockStyle.Top
Me.GrpAushaendigungen.Location = New System.Drawing.Point(0, 0)
Me.GrpAushaendigungen.Name = "GrpAushaendigungen"
Me.GrpAushaendigungen.Size = New System.Drawing.Size(239, 246)
Me.GrpAushaendigungen.TabIndex = 0
Me.GrpAushaendigungen.TabStop = False
Me.GrpAushaendigungen.Text = "Aushändigungen"
'
'C1Aushaendigungen
'
Me.C1Aushaendigungen.AllowUpdateOnBlur = False
Me.C1Aushaendigungen.AlternatingRows = True
Me.C1Aushaendigungen.ContextMenuStrip = Me.CtxMenuAushaendigung
Me.C1Aushaendigungen.Cursor = System.Windows.Forms.Cursors.Default
Me.C1Aushaendigungen.Dock = System.Windows.Forms.DockStyle.Fill
Me.C1Aushaendigungen.FetchRowStyles = True
Me.C1Aushaendigungen.FilterBar = True
Me.C1Aushaendigungen.GroupByCaption = "Drag a column header here to group by that column"
Me.C1Aushaendigungen.Images.Add(CType(resources.GetObject("C1Aushaendigungen.Images"), System.Drawing.Image))
Me.C1Aushaendigungen.Location = New System.Drawing.Point(3, 16)
Me.C1Aushaendigungen.Name = "C1Aushaendigungen"
Me.C1Aushaendigungen.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.C1Aushaendigungen.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.C1Aushaendigungen.PreviewInfo.ZoomFactor = 75.0R
Me.C1Aushaendigungen.PrintInfo.PageSettings = CType(resources.GetObject("C1Aushaendigungen.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.C1Aushaendigungen.ScrollTips = True
Me.C1Aushaendigungen.Size = New System.Drawing.Size(233, 227)
Me.C1Aushaendigungen.TabIndex = 28
Me.C1Aushaendigungen.Text = "C1TrueDBGrid1"
Me.C1Aushaendigungen.PropBag = resources.GetString("C1Aushaendigungen.PropBag")
'
'CtxMenuAushaendigung
'
Me.CtxMenuAushaendigung.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.QuittungAnzeigenToolStripMenuItem})
Me.CtxMenuAushaendigung.Name = "CtxMenuAushaendigung"
Me.CtxMenuAushaendigung.Size = New System.Drawing.Size(173, 26)
'
'QuittungAnzeigenToolStripMenuItem
'
Me.QuittungAnzeigenToolStripMenuItem.Name = "QuittungAnzeigenToolStripMenuItem"
Me.QuittungAnzeigenToolStripMenuItem.Size = New System.Drawing.Size(172, 22)
Me.QuittungAnzeigenToolStripMenuItem.Text = "&Quittung anzeigen"
'
'GrpBLDokumente
'
Me.GrpBLDokumente.Controls.Add(Me.DokList)
Me.GrpBLDokumente.Dock = System.Windows.Forms.DockStyle.Fill
Me.GrpBLDokumente.Location = New System.Drawing.Point(0, 0)
Me.GrpBLDokumente.Name = "GrpBLDokumente"
Me.GrpBLDokumente.Size = New System.Drawing.Size(476, 433)
Me.GrpBLDokumente.TabIndex = 5
Me.GrpBLDokumente.TabStop = False
Me.GrpBLDokumente.Text = "Nicht ausgelieferte Dokumente"
'
'DokList
'
Me.DokList.AllowUpdateOnBlur = False
Me.DokList.AlternatingRows = True
Me.DokList.Cursor = System.Windows.Forms.Cursors.Default
Me.DokList.Dock = System.Windows.Forms.DockStyle.Fill
Me.DokList.FetchRowStyles = True
Me.DokList.FilterBar = True
Me.DokList.GroupByCaption = "Drag a column header here to group by that column"
Me.DokList.Images.Add(CType(resources.GetObject("DokList.Images"), System.Drawing.Image))
Me.DokList.Location = New System.Drawing.Point(3, 16)
Me.DokList.Name = "DokList"
Me.DokList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.DokList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.DokList.PreviewInfo.ZoomFactor = 75.0R
Me.DokList.PrintInfo.PageSettings = CType(resources.GetObject("DokList.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.DokList.ScrollTips = True
Me.DokList.Size = New System.Drawing.Size(470, 414)
Me.DokList.TabIndex = 27
Me.DokList.Text = "C1TrueDBGrid1"
Me.DokList.PropBag = resources.GetString("DokList.PropBag")
'
'ComboBox1
'
Me.ComboBox1.FormattingEnabled = True
Me.ComboBox1.Items.AddRange(New Object() {"Alle Partner", "BP mit Aushändigung(en)", "BP ohne Aushändigung", "BP mit nicht ausgelieferten Dokumenten", "Saldierte BP mit nicht ausgelieferten Dokumenten", "BP mit aktiven periodischen Auslieferungen"})
Me.ComboBox1.Location = New System.Drawing.Point(73, 27)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(283, 21)
Me.ComboBox1.TabIndex = 5
'
'ComboBox2
'
Me.ComboBox2.FormattingEnabled = True
Me.ComboBox2.Items.AddRange(New Object() {"0 (alle)", "1", "2", "3", "4", "5", "6", "7", "8", "9", "10"})
Me.ComboBox2.Location = New System.Drawing.Point(413, 27)
Me.ComboBox2.Name = "ComboBox2"
Me.ComboBox2.Size = New System.Drawing.Size(56, 21)
Me.ComboBox2.TabIndex = 6
Me.ComboBox2.Visible = False
'
'lblaelterals
'
Me.lblaelterals.AutoSize = True
Me.lblaelterals.Location = New System.Drawing.Point(364, 32)
Me.lblaelterals.Name = "lblaelterals"
Me.lblaelterals.Size = New System.Drawing.Size(43, 13)
Me.lblaelterals.TabIndex = 7
Me.lblaelterals.Text = "älter als"
Me.lblaelterals.Visible = False
'
'lbljahre
'
Me.lbljahre.AutoSize = True
Me.lbljahre.Location = New System.Drawing.Point(475, 30)
Me.lbljahre.Name = "lbljahre"
Me.lbljahre.Size = New System.Drawing.Size(33, 13)
Me.lbljahre.TabIndex = 8
Me.lbljahre.Text = "Jahre"
Me.lbljahre.Visible = False
'
'frmBlPartnerUebersicht
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(919, 485)
Me.Controls.Add(Me.lbljahre)
Me.Controls.Add(Me.lblaelterals)
Me.Controls.Add(Me.ComboBox2)
Me.Controls.Add(Me.ComboBox1)
Me.Controls.Add(Me.SplitContainer1)
Me.Controls.Add(Me.GrpBLKunden)
Me.Controls.Add(Me.ToolBar1)
Me.Controls.Add(Me.MenuStrip1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MainMenuStrip = Me.MenuStrip1
Me.Name = "frmBlPartnerUebersicht"
Me.Text = "Übersicht Banklagernd"
Me.MenuStrip1.ResumeLayout(False)
Me.MenuStrip1.PerformLayout()
Me.GrpBLKunden.ResumeLayout(False)
Me.SplitContainer1.Panel1.ResumeLayout(False)
Me.SplitContainer1.Panel2.ResumeLayout(False)
Me.SplitContainer1.ResumeLayout(False)
Me.GroupBox1.ResumeLayout(False)
CType(Me.C1DefPeriode, System.ComponentModel.ISupportInitialize).EndInit()
Me.GrpAushaendigungen.ResumeLayout(False)
CType(Me.C1Aushaendigungen, System.ComponentModel.ISupportInitialize).EndInit()
Me.CtxMenuAushaendigung.ResumeLayout(False)
Me.GrpBLDokumente.ResumeLayout(False)
CType(Me.DokList, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents btnexit As System.Windows.Forms.ToolBarButton
Friend WithEvents btnBPList As System.Windows.Forms.ToolBarButton
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip
Friend WithEvents DateiToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents SchliessenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents GrpBLKunden As System.Windows.Forms.GroupBox
Friend WithEvents lbblpartner As System.Windows.Forms.ListBox
Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents GrpAushaendigungen As System.Windows.Forms.GroupBox
Friend WithEvents GrpBLDokumente As System.Windows.Forms.GroupBox
Friend WithEvents DokList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents C1DefPeriode As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents C1Aushaendigungen As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents CtxMenuAushaendigung As System.Windows.Forms.ContextMenuStrip
Friend WithEvents QuittungAnzeigenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents btnDoklist As System.Windows.Forms.ToolBarButton
Friend WithEvents SaveFileDialog1 As System.Windows.Forms.SaveFileDialog
Friend WithEvents btnDruck As System.Windows.Forms.ToolBarButton
Friend WithEvents ComboBox2 As System.Windows.Forms.ComboBox
Friend WithEvents lblaelterals As System.Windows.Forms.Label
Friend WithEvents lbljahre As System.Windows.Forms.Label
End Class

View File

@@ -0,0 +1,354 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACU
EgAAAk1TRnQBSQFMAgEBDQEAAaQBAAGkAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wgAAgcEBAEHOQABBwEE
BgcxAAHsAv8BBwL/AgcBBAQHAQQCBzAAAewC/wEHAv8FBAEHAwQBBzAAAewGBwMEAQcFBDAAAewC/wEH
Av8CBwEEBAcBBAIHMAAB7AL/AQcC/wcHAQQBBzEAAewCBwQBAgcEBAIHMQAB7AL/AQEC/wEBAv8BBwL/
AQcC/zEAAewC/wEBAv8BAQL/AQcC/wEHAv8xAAHsAgcEAQgHMQAB7AL/AQcC/wEHAv8BBwL/AQcC/zEA
AewC/wEHAv8BBwL/AQcC/wEHAv8xAAHsBwQH7DEAAewHBAfsMQAP7DEAEAcgAAEgDwAQByAAAiABAAYH
BwACBwkAAewEByAAAiABBwL/CwABBwEAC+wDBxgAATIHAAIgAv8BAAHsBf8FAAHsCgcD7AIHGAABBwEy
BgACIAP/AgADpgH/BQAB7AYHAfkB/wH5Af8C7AEAAgcYAAHsAQcBMgUAAiAF7AT/AQAB/wMAAewKBwTs
AQcZAAHsAQcBMgkAAewB/wOmAf8BAAH/AwAB7Ar/BOwBBxsAAQcBMggAAewF/wEAAf8BAAH/AQABBwHs
Af8HAAL/A+wBBxcAAewBBwUyAwABXgHsAe8C7AP/AaYB/wEAAf8BAAH/AQACBwHsB/8BAAL/AuwBBxgA
AewBBwEyBwABXgHsAe8B7APvAv8BAAH/AQAB/wEAAwcB7AH/BQcBAAPsAgcZAAHsAQcBMgUAAuwD7wXs
AQAB/wEAAf8BAAQHAewFBwH/BQcZAAHsAQcCMgQAA14B7wFeAe8CXgT/AQAB/wEABQcB/wUHAQAEBxoA
AewBBwIyBAABXgHsAV4B7AFeBuwBAAH/AQAFBwfsBAcbAAHsAQcCMgIAAV4B7AEAAV4B7AEAAV4C7AX/
AQAQByQAAV4B7AIAAV4G7AEAEAckAAFeAeweAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEHAQABBwEA
AQcCAAEHAQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcFAAEHAgABBwEA
AQcBAAEHAgABBwEAAewEBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEH
AQABBwEAAQcCAAEHAQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHAQAKAgYACgIHAAH8AQAB/AEAAfwBAAH8
AQAB/AYAAewB/wQHAf8DBwH/AQcEAAECCP8BAgYAAQII/wECBgAB/Aj/BwAB7Ar/AQcEAAECAf8IAgYA
AQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgAB7AH/BAcB/wMHAf8BBwQAAQIB/wMCAQcEAgYAAQIB/wMC
AQcEAgSYAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB7Ar/AQcEAAECAv8BAgEHAwIB/wECBgABAgL/
AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYCAAHsAf8IBwH/AQcEAAECAf8BAgEH
AwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIAAewK/wEH
BAABAgH/AQcFAgH/AQIGAAECAf8BBwUCAf8BAgSYAwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gIA
AewB/wIHAf8FBwH/AQcEAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKYAf8BmAIAAfwBAAH8
AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAHsCv8BBwQAAQII/wECBgABAgj/AQIBmAL/AZgDAAj/AfwB/wHW
AQcB1gIAAewB/wIHAf8FBwH/AQcEAAoCBgAKAgKYAf8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPW
AgAB7Aj/GwABmAH/ApgC/wKYAf8BmAYACtYCAAHsAf8GBwH/AewB/xkAAZgI/wGYBgAB1gj/AdYCAAHs
CP8B7BoACpgGAArWAgAK7BYAEAImAAEDAf8IAAICDQABAiQAAewBAwHsAf8IAAECAQACAwYAAgcBAAED
AQABAiIAAQMB7AEDAewBAwH/CAABAgEAAgMGAAIHAQABAwEAAQIBAAH8AQAB/AEAAfwBAAH8AQAB/AcA
AfwBAAH8AQAB/AEAAfwBAAH8BwABAwHsAQMB7AEDAewB/wEAAewGAAECAQACAwYAAgcBAAEDAQABAgH8
CP8HAAH8CP8IAAHsAQMB7AEDAewBAwH/AQAB7AYAAQIBAAIDCQABAwEAAQIBAAH/AQAB/AH/AfwBAAL/
AfwHAAH/AQAB/AH/AfwBAAL/AfwHAAEDAewBAwIAAewB/wEAAewGAAECAQAMAwEAAQIB/AH/AfwBAAEH
AQAB/AEHAf8HAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYDAAHsAQMB7AIHAQMB/wEAAewBAAEGBAABAgEA
AgMIAAIDAQABAgEAAf8BAAH8AQAB/AEAAfwB/wH8BwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHWAwABAwHs
AQMB7AEDAewB/wIAAQYF/gECAQABAwEACAcBAAEDAQABAgH8Af8B/AH/AfwBAAH/AQABBwcAAfwB/wH8
Af8B/AEAAf8BAAEHAQAB1gL/AdYDAAHsAQMB7AEDAewBAwH/AQABbQb+AQIBAAEDAQAIBwEAAQMBAAEC
AQAB/AEAAf8BAAH8Af8B/AEAAfwHAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAwABAwHsAQMB7AED
AewB/wEAAewBbQH+BG0BAgEAAQMBAAgHAQABAwEAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEA
AfwBAAH8AQAB/AEAAtYB/wHWAwAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABAgEAAQMBAAgHAQABAwEA
AQIBAAj/AfwHAAj/AfwB/wHWAQcB1gMAAQMB7AEDAewBBwH/AewBAAHsAgABbQMAAQIBAAEDAQAIBwMA
AQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gMAAewBAwEHAf8B7AEA
A+wGAAECAQABAwEACAcBAAEHAQABAhQACtYDAAEHAf8B7AEABewGAAECDgABAhQAAdYI/wHWEgAQAhQA
CtYCAAFCAU0BPgcAAT4DAAEoAwABQAMAAUADAAEBAQABAQYAAQIWAAP/AQAB/gEDBwABAXgABP8BIAF/
AgAE/wEAAT8CAAH5Ad8BgwE/AQABDwIAAvcB/wEfAQABDwIAAe8B/wGHAQ8BAAEDAgAB/wH7Af8BBwEA
AQMCAAHfAf8CgwH4AwAB3wH/Af4BAQH4AwAB3wH/AYYBAAGAAwAB/wH7Af8BBwHAAwAB7wH/AoMBgAMA
AfYB9wH/AYEBgAMAAfgBXwGDAsADAAH+AX8B/wHgAZIDAAH+A/8B8wMABP8B8wP/AfABAAHwAwAC/wHw
AQAB8AMAAv8B8AEAAfAEAAE/AQABPwEAAT8BAAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAE/AQABPwEA
AQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEA
AQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAv8B8AED
AfABAwEAAQ8C/wHwAQMB8AEDAQABHwL/AfABAwHwAQMBAAE/AfwBfwIABP8B8AF/AgAE/wHAAX8CAAT/
AQABHwMAAT8BAAE/AQABHwMAAT8BAAE/AQABFwMAAT8BAAE/AQABBwMAAT8BAAEDBQABPwEAAQMFAAE/
AQABAwUAAT8BAAEDBQABPwEAAQMBAAEHAwABPwEAAQMBAAEXAwABPwEAAQMBAAEfAgAC/wHwAQMBAAEf
AgAC/wHwAQMBAAEfAgAC/wHwAQML
</value>
</data>
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>127, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="C1DefPeriode.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="C1DefPeriode.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="C1DefPeriode.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{AlignVert:Center;Wrap:True;ForeColor:ControlText;BackColor:Control;Border:Raised,,1, 1, 1, 1;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;166&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 231, 166&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 231, 166&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="CtxMenuAushaendigung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>242, 17</value>
</metadata>
<data name="C1Aushaendigungen.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="C1Aushaendigungen.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="C1Aushaendigungen.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{AlignVert:Center;Wrap:True;ForeColor:ControlText;BackColor:Control;Border:Raised,,1, 1, 1, 1;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;225&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 231, 225&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 231, 225&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<data name="DokList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="DokList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="DokList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{Wrap:True;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;412&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 468, 412&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 468, 412&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="SaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>428, 17</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAICAEAAAAAADoAgAAFgAAACgAAAAgAAAAQAAAAAEABAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAgICAAMDAwAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
AAD///8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
ALi4uLi4uLi4uAAAAAAAAACLi4uLAAAAAAAAAAAAAAAAuLi4sA+/v7+/vwAAAAAAAIuLiw8L+/v7+/sA
AAAAAAC4uLD/D7+/v7+/AAAAAAAAi4sP/wv7+/v7+wAAAAAAALiw//8Pv7+/v78AAAAAAACLD///C/d3
d3f7AAAAAAAAsAAAAA+3d3d3vwAAAAAAAID7+/v7+/v7+/sAAAAAAACw/7d3d3d3d3e/AAAAAAAAgPv3
d3d3d3d3+wAAAAAAALD/v7+/v7+/v78AAAAAAACA+/d3d3d3d3f7AAAAAAAAsP+3d3d3d3d3vwAAAAAA
AID7+/v7+/v7+/sAAAAAAACw/7d3d3d3d3e/AAAAAAAAgPv3d3d3d3d3+wAAAAAAAAD/v7+/v7+/v78A
AAAAAAAA////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/////////////////////////////
///4AAB/+AAAf/gAAB/4AAAf+AAAH/gAAB/4AAAf+AAAH/gAAB/4AAAf+AAAH/gAAB/4AAAf+AAAH/gA
AB/4AAAf+AAAH/gAAB/4AAAf+AAAH/4AAB/+AAAf/////////////////////w==
</value>
</data>
</root>

View File

@@ -0,0 +1,348 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmBlPartnerUebersicht
#Region "Deklarationen"
Dim bpdaten As New DataTable
Dim Dokumente As New DataTable
Dim Aushaendigungen As New DataTable
Dim DefPeriode As New DataTable
Dim OnLoad As Boolean = True
#End Region
#Region "Formular"
Private Sub SchliessenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SchliessenToolStripMenuItem.Click
Me.Close()
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'Exit
Me.SchliessenToolStripMenuItem_Click(sender, e)
Case 1
Me.SaveFileDialog1.AddExtension = True
Me.SaveFileDialog1.DefaultExt.Insert(0, "*.xls")
Me.SaveFileDialog1.Filter = "Excel-Dateien|*.xls"
Me.SaveFileDialog1.ShowDialog()
If Me.SaveFileDialog1.FileName <> "" Then
If Me.SaveFileDialog1.FileName.EndsWith("xls") Then
Me.DatatableToExcel(Me.bpdaten, Me.SaveFileDialog1.FileName)
End If
End If
Case 2
Me.SaveFileDialog1.AddExtension = True
Me.SaveFileDialog1.DefaultExt.Insert(0, "*.xls")
Me.SaveFileDialog1.Filter = "Excel-Dateien|*.xls"
Me.SaveFileDialog1.ShowDialog()
If Me.SaveFileDialog1.FileName <> "" Then
If Me.SaveFileDialog1.FileName.EndsWith("xls") Then
Me.DatatableToExcel(Me.Dokumente, Me.SaveFileDialog1.FileName)
End If
End If
Case 3
End Select
End Sub
Private Sub frmBlPartnerUebersicht_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Try
' Me.Cursor = Cursors.WaitCursor
' Application.DoEvents()
' Me.bpdaten = Me.Get_BLPartner(1)
' Me.lbblpartner.DataSource = Me.bpdaten
' Me.lbblpartner.DisplayMember = "Partner"
'Catch ex As Exception
'Finally
' Me.Cursor = Cursors.Default
'End Try
Me.OnLoad = False
Me.ComboBox1.SelectedIndex = 0
End Sub
Private Sub lbblpartner_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbblpartner.SelectedIndexChanged
Try
Me.Cursor = Cursors.WaitCursor
Dim s As String = Me.bpdaten.Rows(Me.lbblpartner.SelectedIndex).Item(0).ToString
Dim i As Integer
Dim pnr As Integer
i = s.IndexOf("-")
pnr = s.Substring(0, i - 1)
pnr = Trim(pnr)
Me.Dokumente = Get_Dokumente(pnr)
Me.Aushaendigungen = Get_Aushaendigungen(pnr)
Me.DefPeriode = Get_Periode(pnr)
Me.DokList.Enabled = False
Me.DokList.BeginInit()
Me.DokList.DataSource = Me.Dokumente
Me.DokList.DataMember = Me.Dokumente.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.DokList, Me.Dokumente, "bldossier")
Me.DokList.EndInit()
Me.DokList.Enabled = True
Me.C1Aushaendigungen.Enabled = False
Me.C1Aushaendigungen.BeginInit()
Me.C1Aushaendigungen.DataSource = Me.Aushaendigungen
Me.C1Aushaendigungen.DataMember = Me.Aushaendigungen.TableName
Try
DivFnkt.SpaltenTitel_Aktualisieren(Me.C1Aushaendigungen, Me.Aushaendigungen, "Aushaendigung")
Catch ex As Exception
End Try
Me.C1Aushaendigungen.EndInit()
Me.C1Aushaendigungen.Enabled = True
Me.C1DefPeriode.Enabled = False
Me.C1DefPeriode.BeginInit()
Me.C1DefPeriode.DataSource = Me.DefPeriode
Me.C1DefPeriode.DataMember = Me.DefPeriode.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.C1DefPeriode, Me.DefPeriode, "BLPeriode")
Me.C1DefPeriode.EndInit()
Me.C1DefPeriode.Enabled = True
Catch ex As Exception
Me.C1DefPeriode.DataSource = Nothing
Me.C1Aushaendigungen.DataSource = Nothing
Me.DokList.DataSource = Nothing
Finally
Me.Cursor = Cursors.Default
End Try
End Sub
#End Region
#Region "Export to Excel"
Public Shared Function DatatableToExcel(ByVal aDataTable As DataTable, ByVal aOutputFilename As String) As Boolean
Application.DoEvents()
Dim f As New FrmFortschritt
Dim app As New Object
Dim wb As New Object
Dim ws As New Object
Try
f.Show()
Application.DoEvents()
f.ProgressBar1.Minimum = 0
f.ProgressBar1.Maximum = aDataTable.Rows.Count
app = CreateObject("Excel.application")
'Dim wb As Object
'Dim ws As Object
' Dim app As New Excel.ApplicationClass
' Dim wb As Excel.Workbook
' Dim ws As Excel.Worksheet
wb = app.Workbooks.add()
'wb = app.Workbooks.Add()
ws = wb.ActiveSheet()
Dim dc As DataColumn
Dim dr As DataRow
Dim colIndex As Integer
Dim rowIndex As Integer
' Columns erstellen
For Each dc In aDataTable.Columns
colIndex += 1
app.Cells(1, colIndex) = dc.ColumnName
Next
' Rows hinzufügen
For Each dr In aDataTable.Rows
f.ProgressBar1.Value = rowIndex
rowIndex += 1
colIndex = 0
For Each dc In aDataTable.Columns
colIndex += 1
app.Cells(rowIndex + 1, colIndex) = dr(dc.ColumnName)
Next
Next
ws.Columns.AutoFit()
wb.SaveAs(aOutputFilename)
app.Workbooks.Open(aOutputFilename)
' Excel anzeigen wenn fertig exportiert
app.Visible = True
ws = Nothing
wb = Nothing
app = Nothing
f.Close()
Return True
Catch ex As Exception
f.Close()
MsgBox(ex.Message)
End Try
End Function
#End Region
#Region "Daten"
Private Function Get_BLPartner(ByVal type As Integer, Optional ByVal jahre As Integer = 0) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_blbpList"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@type", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, type))
scmCmdToExecute.Parameters.Add(New SqlParameter("@Jahre", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Jahre))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function Get_Dokumente(ByVal pnr As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_dossier"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, pnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@filter", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function Get_Aushaendigungen(ByVal pnr As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_auslieferungen_des_partners_komplett"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, pnr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function Get_Periode(ByVal pnr As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_peridata"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@blkundenr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, pnr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
#End Region
Private Sub QuittungAnzeigenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles QuittungAnzeigenToolStripMenuItem.Click
Try
DivFnkt.ShowDoc(Me.C1Aushaendigungen.Columns("Dokumentid_Quittung").Value, Me)
Catch ex As Exception
End Try
End Sub
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
If OnLoad Then Exit Sub
Me.ComboBox2.Visible = False
Me.lblaelterals.Visible = False
Me.lbljahre.Visible = False
Select Case ComboBox1.Text
Case "Alle Partner"
Me.bpdaten = Me.Get_BLPartner(1)
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
Case "BP mit Aushändigung(en)"
Me.bpdaten = Me.Get_BLPartner(2)
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
Case "BP ohne Aushändigung"
Me.bpdaten = Me.Get_BLPartner(3)
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
Case "BP mit nicht ausgelieferten Dokumenten"
Me.ComboBox2.Visible = True
Me.lblaelterals.Visible = True
Me.lbljahre.Visible = True
Me.ComboBox2.SelectedIndex = 0
If Me.ComboBox2.Text = "0 (alle)" Then
Me.bpdaten = Me.Get_BLPartner(4, 0)
Else
Me.bpdaten = Me.Get_BLPartner(4, Me.ComboBox2.Text)
End If
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
Case "Saldierte BP mit nicht ausgelieferten Dokumenten"
Me.bpdaten = Me.Get_BLPartner(6)
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
Case "BP mit aktiven periodischen Auslieferungen"
Me.bpdaten = Me.Get_BLPartner(7)
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
Case Else
Me.Get_BLPartner(1)
End Select
End Sub
Private Sub C1DefPeriode_FetchRowStyle(ByVal sender As Object, ByVal e As C1.Win.C1TrueDBGrid.FetchRowStyleEventArgs) Handles C1DefPeriode.FetchRowStyle
Dim dtvon As Date
Dim dtbis As Date
dtvon = Me.C1DefPeriode.Columns("erstmals_am").CellValue(e.Row)
dtbis = Me.C1DefPeriode.Columns("ende").CellValue(e.Row)
If dtvon > Now Then
Dim FNT As Font = e.CellStyle.Font
e.CellStyle.BackColor = Color.Green
End If
If dtbis < Now Then
Dim FNT As Font = e.CellStyle.Font
e.CellStyle.Font = New Font(FNT, FontStyle.Strikeout)
e.CellStyle.ForeColor = Color.Gray
End If
End Sub
Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox2.SelectedIndexChanged
Me.C1DefPeriode.DataSource = Nothing
Me.C1Aushaendigungen.DataSource = Nothing
Me.DokList.DataSource = Nothing
If Me.ComboBox2.Text = "0 (alle)" Then
Me.bpdaten = Me.Get_BLPartner(4, 0)
Else
Me.bpdaten = Me.Get_BLPartner(4, Me.ComboBox2.Text)
End If
Me.lbblpartner.DataSource = Me.bpdaten
Me.lbblpartner.DisplayMember = "Partner"
End Sub
End Class

View File

@@ -0,0 +1,151 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="btnabbruch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ProgressBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnWeiter.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblpartner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnclose.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmDokumentAufbereitung</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABQAPAAUAAAAAAAAAAAAABQ8PDw8PBQAAAAAAAAAABQUPBQAF
DwAAAAAAAAAAAAUPDwAKAA8PBQARAAAAAAAFBQ8FAAUPAACJEQAAAAAAAAUPDw8PDwUAEREAEQAAAAAF
BQAPAAUAAIkRABEAAAAAAAAFBQUFEREREQARABEAAAAAAAAKEYmJiREAEQARAAAAAAAAChERERERABEA
EQAAAAAAAAoKCgoKCgARABEAAAAAAAAAAAoREREREQARAAAAAAAAAAAKCgoKCgoAEQAAAAAAAAAAAAAK
EREREREAAAAAAAAAAAAACgoKCgoKAOH/AACAfwAAgD8AAAAPAAAADwAAAAMAAIADAACAAAAA4AAAAPgA
AAD4AAAA+AAAAP4AAAD+AAAA/4AAAP+AAAA=
</value>
</data>
</root>

View File

@@ -0,0 +1,472 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Imports System.Threading 'Namespace for Thread class
Public Class frmDokumentAufbereitung
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar
Friend WithEvents btnabbruch As System.Windows.Forms.Button
Friend WithEvents btnWeiter As System.Windows.Forms.Button
Friend WithEvents lblpartner As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents btnclose As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmDokumentAufbereitung))
Me.btnabbruch = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()
Me.btnWeiter = New System.Windows.Forms.Button()
Me.lblpartner = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.btnclose = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'btnabbruch
'
Me.btnabbruch.Location = New System.Drawing.Point(8, 104)
Me.btnabbruch.Name = "btnabbruch"
Me.btnabbruch.Size = New System.Drawing.Size(88, 32)
Me.btnabbruch.TabIndex = 0
Me.btnabbruch.Text = "Abbruch"
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 32)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(352, 32)
Me.Label1.TabIndex = 1
Me.Label1.Text = "Die auszudruckenden Dokumente werden zusammengestellt und aufbereitet."
'
'ProgressBar1
'
Me.ProgressBar1.Location = New System.Drawing.Point(8, 64)
Me.ProgressBar1.Name = "ProgressBar1"
Me.ProgressBar1.Size = New System.Drawing.Size(352, 23)
Me.ProgressBar1.TabIndex = 2
'
'btnWeiter
'
Me.btnWeiter.Enabled = False
Me.btnWeiter.Location = New System.Drawing.Point(232, 104)
Me.btnWeiter.Name = "btnWeiter"
Me.btnWeiter.Size = New System.Drawing.Size(128, 32)
Me.btnWeiter.TabIndex = 3
Me.btnWeiter.Text = "Druckdialog anzeigen"
'
'lblpartner
'
Me.lblpartner.Location = New System.Drawing.Point(56, 8)
Me.lblpartner.Name = "lblpartner"
Me.lblpartner.Size = New System.Drawing.Size(336, 23)
Me.lblpartner.TabIndex = 5
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 8)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(48, 23)
Me.Label2.TabIndex = 4
Me.Label2.Text = "Partner:"
'
'btnclose
'
Me.btnclose.Location = New System.Drawing.Point(8, 104)
Me.btnclose.Name = "btnclose"
Me.btnclose.Size = New System.Drawing.Size(88, 32)
Me.btnclose.TabIndex = 6
Me.btnclose.Text = "Schliessen"
Me.btnclose.Visible = False
'
'frmDokumentAufbereitung
'
Me.AutoScale = False
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(370, 141)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnclose, Me.lblpartner, Me.Label2, Me.btnWeiter, Me.ProgressBar1, Me.Label1, Me.btnabbruch})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MaximumSize = New System.Drawing.Size(366, 166)
Me.MinimizeBox = False
Me.Name = "frmDokumentAufbereitung"
Me.Text = "Druckaufbereitung"
Me.ResumeLayout(False)
End Sub
#End Region
Dim DruckThread As New Thread(AddressOf Druckaufbereitung)
Dim ProgressThread As New Threading.Thread(AddressOf set_progress)
Dim M_Druchjobid As Integer
Dim alnr As Integer
Dim part As Integer
Public Sub New(ByVal druckjobid As Integer, ByVal part As Integer)
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
Me.M_Druchjobid = druckjobid
Me.alnr = druckjobid
Me.part = part
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
Private Sub tf_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.get_partner(alnr)
Me.Text = "Dokumentaufbereitung: " + Me.lblpartner.Text
Me.ProgressBar1.Value = 0
Me.btnWeiter.Text = "Drucken"
End Sub
Private Sub set_progress()
Try
Do While 1 = 1
Me.ProgressBar1.Value = Me.ProgressBar1.Value + 1
If Me.ProgressBar1.Value = 100 Then Me.ProgressBar1.Value = 0
ProgressThread.Sleep(100)
Loop
Catch
End Try
End Sub
Public Sub StartDruckaufbereituung()
ProgressThread.Start()
DruckThread.Start()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnabbruch.Click
Try
ProgressThread.Abort()
Catch
End Try
Try
DruckThread.Abort()
Catch
End Try
Close()
End Sub
Private Sub Druckaufbereitung()
Try
Dim remoteObj As EDKB07Verarbeitung.EDKB07Verarbeitung.IEDKB07
Dim Obj As Object
Obj = Activator.GetObject( _
GetType(EDKB07Verarbeitung.EDKB07Verarbeitung.IEDKB07), _
System.Configuration.ConfigurationSettings.AppSettings("RemoteObjUrl"))
remoteObj = CType(Obj, EDKB07Verarbeitung.EDKB07Verarbeitung.IEDKB07)
remoteObj.PrintJobF(Me.M_Druchjobid, Me.part)
Me.btnWeiter.Enabled = True
Me.ProgressBar1.Value = 100
Me.Refresh()
Application.DoEvents()
Me.Label1.Text = "Die EDOKA-Druckaufbereitung ist abgeschlossen."
Me.Text = "Fertig - " + Me.Text
Me.BringToFront()
Catch ex As Exception
MsgBox("Aufgrund des folgenden Fehlers konnte der Druckjob nicht gestartet werden:" + vbCrLf + vbCrLf + ex.Message, MsgBoxStyle.Critical)
Finally
Me.Cursor = Cursors.Default
ProgressThread.Abort()
DruckThread.Abort()
End Try
End Sub
Private printthread As Thread
Private Sub btnWeiter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnWeiter.Click
Try
kill_acroreader()
Catch
End Try
tuesdrucken()
End Sub
Private Sub kill_acroreader()
Try
Dim myprocess() As Process
Dim mp As Process
myprocess = Process.GetProcessesByName("acrord32")
For Each mp In myprocess
mp.Kill()
Next
Thread.Sleep(100)
Catch ex As Exception
Finally
End Try
End Sub
Private Sub tuesdrucken()
Dim i As Integer
Me.Cursor = Cursors.WaitCursor
If get_pdf(alnr, Me.part) Then
Me.btnclose.Visible = True
Me.btnabbruch.Visible = False
Me.btnWeiter.Text = "Ausdruck wiederholen"
print_pdf(alnr)
If get_parts(alnr) = 0 Then
Me.update_aushaendigungsquittung_status(alnr, 3)
End If
If part = 0 Then
set_druckjobstatus(alnr, 3)
Else
Me.set_druckjobstatus_part(alnr, part, 3)
End If
Else
MsgBox("Das temporäre PDF-Dokumente konnte nicht erstellt werden.", MsgBoxStyle.Information)
End If
Me.Cursor = Cursors.Default
Me.Close()
End Sub
Public Function get_parts(ByVal alnr As Integer) As Integer
Dim connect As New SqlConnection()
connect.ConnectionString = Globals.sConnectionString
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_druckjobparts_count"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = connect
scmCmdToExecute.Parameters.Add(New SqlParameter("@auslieferungnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, alnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@parts", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
sdaAdapter.Fill(dtToReturn)
Return scmCmdToExecute.Parameters("@parts").Value
Catch ex As Exception
Return -1
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
connect.Dispose()
End Try
End Function
Private Function set_druckjobstatus_part(ByVal alnr As Integer, ByVal part As Integer, ByVal status As Integer) As Integer
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.SP_edex_bl_set_druckjobstatus_part"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@auslieferungnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, alnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@part", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, part))
scmCmdToExecute.Parameters.Add(New SqlParameter("@status", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, status))
scmCmdToExecute.Parameters.Add(New SqlParameter("@return", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
sdaAdapter.Fill(dtToReturn)
Return scmCmdToExecute.Parameters("@return").Value
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Sub print_pdf(ByVal alnr As Integer)
Try
Dim f As New frmPDFPrinter(True)
f.addressBar.Text = dokumentfilename
f.MdiParent = Me.MdiParent
f.alnr = alnr
f.Part = Me.part
f.Show()
Application.DoEvents()
f.PrintPDF()
Catch ex As Exception
End Try
End Sub
Dim dokumentfilename As String
Private Function get_pdf(ByVal alnr As Integer, ByVal part As Integer) As Boolean
If part = 0 Then
'PDF-Dokument aus der Datenbank auslesen
Me.Cursor = Cursors.WaitCursor
Dim connection As New SqlConnection()
Dim da As New SqlDataAdapter("Select * from edex_bl_druckjob where (status=2 or status=3) and auslieferungnr=" + LTrim(Str(alnr)), connection)
Dim CB As SqlCommandBuilder = New SqlCommandBuilder(da)
Dim ds As New DataSet()
Try
'Connectionstring zur Datenbank
connection.ConnectionString = Globals.sConnectionString
connection.Open()
da.Fill(ds, "docs")
Dim myRow As DataRow
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item("pdfdokument_aufbereitet")
dokumentfilename = Globals.Applikationsdaten.Rows(Globals.AppldataRow).Item("pfad_temporaer_dokumente") + LTrim(Str(myRow.Item(0))) + ".PDF"
Dim K As Long
K = UBound(MyData)
Dim fs As New FileStream(dokumentfilename, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
Return True
Catch ex As Exception
Return False
Finally
CB = Nothing
ds = Nothing
da = Nothing
connection.Close()
connection = Nothing
Me.Cursor = Cursors.Default
End Try
Else
'PDF-Dokument aus der Datenbank auslesen
Me.Cursor = Cursors.WaitCursor
Dim connection As New SqlConnection()
Dim s As String = "SELECT dbo.EDEX_BL_Druckjob_Part.* " & _
"FROM dbo.EDEX_BL_Druckjob INNER JOIN " & _
"dbo.EDEX_BL_Druckjob_Part ON dbo.EDEX_BL_Druckjob.druckjobnr = dbo.EDEX_BL_Druckjob_Part.druckjobnr " & _
"where (dbo.edex_bl_druckjob_part.status=2 or dbo.edex_bl_druckjob_part.status=3) and dbo.edex_bl_druckjob.auslieferungnr=" + LTrim(Str(alnr)) & " " & _
"and dbo.edex_bl_druckjob_part.partno=" + LTrim(part)
Dim da As New SqlDataAdapter(s, connection)
Dim CB As SqlCommandBuilder = New SqlCommandBuilder(da)
Dim ds As New DataSet()
Try
'Connectionstring zur Datenbank
connection.ConnectionString = Globals.sConnectionString
connection.Open()
da.Fill(ds, "docs")
Dim myRow As DataRow
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item("pdfdokument_aufbereitet")
dokumentfilename = Globals.Applikationsdaten.Rows(Globals.AppldataRow).Item("pfad_temporaer_dokumente") + LTrim(Str(myRow.Item(0))) + ".PDF"
Dim K As Long
K = UBound(MyData)
Dim fs As New FileStream(dokumentfilename, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
Return True
Catch ex As Exception
Return False
Finally
CB = Nothing
ds = Nothing
da = Nothing
connection.Close()
connection = Nothing
Me.Cursor = Cursors.Default
End Try
End If
End Function
Private Function set_druckjobstatus(ByVal alnr As Integer, ByVal status As Integer)
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.SP_edex_bl_set_druckjobstatus"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@auslieferungnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, alnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@status", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, status))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function get_partner(ByVal alnr As Integer)
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.SP_edex_bl_get_partner"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@alnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, alnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@bkpar00", SqlDbType.VarChar, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, ""))
sdaAdapter.Fill(dtToReturn)
Me.lblpartner.Text = scmCmdToExecute.Parameters("@bkpar00").Value
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function update_aushaendigungsquittung_status(ByVal auslieferungnr As Integer, ByVal status As Integer)
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.SP_edex_bl_aushaendigungsquittung_update_status"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@auslieferungnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, auslieferungnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@status", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, status))
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Sub btnclose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnclose.Click
Me.Close()
End Sub
End Class

View File

@@ -0,0 +1,585 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="TabControl1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabPageAllgemein.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlzensur1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblzensur1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox18.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label19.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox14.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label15.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox13.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label14.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox12.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label12.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox11.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label11.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox10.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label10.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox9.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label9.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabPageStatus.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Statuslist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="Panel2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RBStatusHistory.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RBStatusAktuell.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabPageDokumentwerte.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabControl2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabPage1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlzensur2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ColdList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images1" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="Splitter2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblzensur2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ColdListDokumente.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images2" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="TabPage3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox17.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label18.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox16.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox15.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label17.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label16.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabPageZuordnung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlzensur4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblzensur4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Zuordnungslist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images3" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="TabPageNotizen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlzensur5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="drpMiatarbeiter.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images4" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="lblzensur5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Notizlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images5" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="TabPageInfomeldung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlzensur3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblzensur3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="InfoMeldungList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images6" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="TabPageBerechtigung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="DokumentFunktionenList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images7" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="TabPage2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlzensur6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblzensur6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ErsetzteDokumenteList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images8" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="DokList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images9" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>463, 30</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AACkEAAAAk1TRnQBSQFMAgEBCwEAAQ4BAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ABQAQ
BzAAEAcwAAIHCQAB7AQHMAABBwEAC+wDBxgAATIXAAHsCgcD7AIHGAABBwEyFgAB7AYHAfkB/wH5Af8C
7AEAAgcYAAHsAQcBMhUAAewKBwTsAQcZAAHsAQcBMhQAAewK/wTsAQcbAAEHATITAAEHAewB/wcAAv8D
7AEHFwAB7AEHBTISAAIHAewH/wEAAv8C7AEHGAAB7AEHATIVAAMHAewB/wUHAQAD7AIHGQAB7AEHATIU
AAQHAewFBwH/BQcZAAHsAQcCMhMABQcB/wUHAQAEBxoAAewBBwIyEgAFBwfsBAcbAAHsAQcCMhEAEAcw
ABAHRAABBwIAAQcBAAEHAQABBwIAAQcFAAEHAgABBwEAAQcBAAEHAgABBwEAAewDAAEHAgABBwEAAQcB
AAEHAgABBxUAAQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsBAcCAAEHAQAB
BwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcFAAEHAgABBwEAAQcBAAEHAgABBwEAAewD/wEHAgAB
BwEAAQcBAAEHAgABBwEACgIGAAoCBwAB/AEAAfwBAAH8AQAB/AEAAfwGAAHsAf8EBwH/AwcB/wEHBAAB
Agj/AQIGAAECCP8BAgYAAfwI/wcAAewK/wEHBAABAgH/CAIGAAECAf8IAgcAAf8BAAH8Af8B/AEAAv8B
/AYAAewB/wQHAf8DBwH/AQcEAAECAf8DAgEHBAIGAAECAf8DAgEHBAIEmAIAAfwB/wH8AQABBwEAAfwB
BwH/AQAE1gIAAewK/wEHBAABAgL/AQIBBwMCAf8BAgYAAQIC/wECAQcDAgH/AQID/wGYAwAB/wEAAfwB
AAH8AQAB/AH/AfwD/wHWAgAB7AH/CAcB/wEHBAABAgH/AQIBBwMCAv8BAgYAAQIB/wECAQcDAgL/AQIE
mAIAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYCAAHsCv8BBwQAAQIB/wEHBQIB/wECBgABAgH/AQcF
AgH/AQIEmAMAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYCAAHsAf8CBwH/BQcB/wEHBAABAgH/AgIC
/wICAf8BAgYAAQIB/wICAv8CAgH/AQICmAH/AZgCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAgAB
7Ar/AQcEAAECCP8BAgYAAQII/wECAZgC/wGYAwAI/wH8Af8B1gEHAdYCAAHsAf8CBwH/BQcB/wEHBAAK
AgYACgICmAH/AZgCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gIAAewI/xsAAZgB/wKYAv8CmAH/AZgG
AArWAgAB7AH/BgcB/wHsAf8ZAAGYCP8BmAYAAdYI/wHWAgAB7Aj/AewaAAqYBgAK1gIACuwWABACJgAB
AwH/CAACAg0AAQIkAAHsAQMB7AH/CAABAgEAAgMGAAIHAQABAwEAAQIiAAEDAewBAwHsAQMB/wgAAQIB
AAIDBgACBwEAAQMBAAECAQAB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AcAAQMB
7AEDAewBAwHsAf8BAAHsBgABAgEAAgMGAAIHAQABAwEAAQIB/Aj/BwAB/Aj/CAAB7AEDAewBAwHsAQMB
/wEAAewGAAECAQACAwkAAQMBAAECAQAB/wEAAfwB/wH8AQAC/wH8BwAB/wEAAfwB/wH8AQAC/wH8BwAB
AwHsAQMCAAHsAf8BAAHsBgABAgEADAMBAAECAfwB/wH8AQABBwEAAfwBBwH/BwAB/AH/AfwBAAEHAQAB
/AEHAf8BAATWAwAB7AEDAewCBwEDAf8BAAHsAQABBgQAAQIBAAIDCAACAwEAAQIBAAH/AQAB/AEAAfwB
AAH8Af8B/AcAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gMAAQMB7AEDAewBAwHsAf8CAAEGBf4BAgEAAQMB
AAgHAQABAwEAAQIB/AH/AfwB/wH8AQAB/wEAAQcHAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWAwAB
7AEDAewBAwHsAQMB/wEAAW0G/gECAQABAwEACAcBAAEDAQABAgEAAfwBAAH/AQAB/AH/AfwBAAH8BwAB
/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAQMB7AEDAewBAwHsAf8BAAHsAW0B/gRtAQIBAAEDAQAI
BwEAAQMBAAECAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gMAAewB
AwHsAQMB7AEDAf8BAAHsAQACbQMAAQIBAAEDAQAIBwEAAQMBAAECAQAI/wH8BwAI/wH8Af8B1gEHAdYD
AAEDAewBAwHsAQcB/wHsAQAB7AIAAW0DAAECAQABAwEACAcDAAECAfwBAAH8AQAB/AEAAfwBAAH8BwAB
/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YDAAHsAQMBBwH/AewBAAPsBgABAgEAAQMBAAgHAQABBwEAAQIU
AArWAwABBwH/AewBAAXsBgABAg4AAQIUAAHWCP8B1hIAEAIUAArWAgABQgFNAT4HAAE+AwABKAMAAUAD
AAFAAwABAQEAAQEGAAECFgAD/4MABP8EAAT/BAAB+QHfAYMBPwQAAvcB/wEfBAAB7wH/AYcBDwQAAf8B
+wH/AQcEAAHfAf8CgwQAAd8B/wH+AQEEAAHfAf8BhgUAAf8B+wH/AQcEAAHvAf8CgwQAAfYB9wH/AYEE
AAH4AV8BgwHABAAB/gF/Af8B4AQAAf4D/wQABP8CAAL/AfABAAHwAwAC/wHwAQAB8AMAAv8B8AEAAfAE
AAE/AQABPwEAAT8BAAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAE/AQABPwEAAQcBAAE/AQABAwEAAQMB
AAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMB
AAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAv8B8AEDAfABAwEAAQ8C/wHwAQMB
8AEDAQABHwL/AfABAwHwAQMBAAE/AfwBfwIABP8B8AF/AgAE/wHAAX8CAAT/AQABHwMAAT8BAAE/AQAB
HwMAAT8BAAE/AQABFwMAAT8BAAE/AQABBwMAAT8BAAEDBQABPwEAAQMFAAE/AQABAwUAAT8BAAEDBQAB
PwEAAQMBAAEHAwABPwEAAQMBAAEXAwABPwEAAQMBAAEfAgAC/wHwAQMBAAEfAgAC/wHwAQMBAAEfAgAC
/wHwAQMWAAs=
</value>
</data>
<data name="TabControl3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TabPage4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtDokumenttyp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label32.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtDokumentid.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label31.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtanzahlseiten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label30.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtReferenzzeile2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtReferenzzeile1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label28.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label29.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtnachvollziehbarkeit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label27.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtisin.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtvalor.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label25.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label26.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtValuta.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label24.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtErstelltAm.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label23.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtvvextern2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtvvextern1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label22.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label21.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtPartnerZusteller.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtPartnerInhaber.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label20.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label13.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmDokumentinformationen</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,187 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="contextMenu.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>123, 17</value>
</data>
<data name="contextMenu.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem13.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="StatusBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="addressBar.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="addressBarLbl.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBar2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblpartner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cbverarbeitung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="webOCWrapper.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmPDFPrinter</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABQAPAAUAAAAAAAAAAAAABQ8PDw8PBQAAAAAAAAAABQUPBQAF
DwAAAAAAAAAAAAUPDwAKAA8PBQARAAAAAAAFBQ8FAAUPAACJEQAAAAAAAAUPDw8PDwUAEREAEQAAAAAF
BQAPAAUAAIkRABEAAAAAAAAFBQUFEREREQARABEAAAAAAAAKEYmJiREAEQARAAAAAAAAChERERERABEA
EQAAAAAAAAoKCgoKCgARABEAAAAAAAAAAAoREREREQARAAAAAAAAAAAKCgoKCgoAEQAAAAAAAAAAAAAK
EREREREAAAAAAAAAAAAACgoKCgoKAOH/AACAfwAAgD8AAAAPAAAADwAAAAMAAIADAACAAAAA4AAAAPgA
AAD4AAAA+AAAAP4AAAD+AAAA/4AAAP+AAAA=
</value>
</data>
</root>

View File

@@ -0,0 +1,391 @@
Imports System.Resources
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.Runtime.InteropServices
Imports System.IO
Public Class frmPDFPrinter
Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
End Sub
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Friend WithEvents MenuItem13 As System.Windows.Forms.MenuItem
Friend Shadows WithEvents contextMenu As System.Windows.Forms.ContextMenu
Friend WithEvents StatusBar1 As System.Windows.Forms.StatusBar
Friend WithEvents addressBar As System.Windows.Forms.ComboBox
Friend WithEvents addressBarLbl As System.Windows.Forms.Label
Friend WithEvents ToolBar2 As System.Windows.Forms.ToolBar
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
Friend WithEvents ToolBarButton2 As System.Windows.Forms.ToolBarButton
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents cbverarbeitung As System.Windows.Forms.ComboBox
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents lblpartner As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents webOCWrapper As EDOKAApp.WebOCHostCtrl
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmPDFPrinter))
Me.contextMenu = New System.Windows.Forms.ContextMenu()
Me.MenuItem13 = New System.Windows.Forms.MenuItem()
Me.StatusBar1 = New System.Windows.Forms.StatusBar()
Me.addressBar = New System.Windows.Forms.ComboBox()
Me.addressBarLbl = New System.Windows.Forms.Label()
Me.ToolBar2 = New System.Windows.Forms.ToolBar()
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
Me.ToolBarButton2 = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.Panel1 = New System.Windows.Forms.Panel()
Me.lblpartner = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.cbverarbeitung = New System.Windows.Forms.ComboBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.webOCWrapper = New EDOKAApp.WebOCHostCtrl()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'contextMenu
'
Me.contextMenu.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem13})
'
'MenuItem13
'
Me.MenuItem13.Index = 0
Me.MenuItem13.Text = "Print..."
'
'StatusBar1
'
Me.StatusBar1.Anchor = ((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me.StatusBar1.Dock = System.Windows.Forms.DockStyle.None
Me.StatusBar1.Location = New System.Drawing.Point(0, 431)
Me.StatusBar1.Name = "StatusBar1"
Me.StatusBar1.Size = New System.Drawing.Size(666, 24)
Me.StatusBar1.TabIndex = 1
'
'addressBar
'
Me.addressBar.Location = New System.Drawing.Point(16, 56)
Me.addressBar.Name = "addressBar"
Me.addressBar.Size = New System.Drawing.Size(352, 21)
Me.addressBar.Sorted = True
Me.addressBar.TabIndex = 3
Me.addressBar.Visible = False
'
'addressBarLbl
'
Me.addressBarLbl.Location = New System.Drawing.Point(16, 12)
Me.addressBarLbl.Name = "addressBarLbl"
Me.addressBarLbl.Size = New System.Drawing.Size(100, 16)
Me.addressBarLbl.TabIndex = 8
Me.addressBarLbl.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'ToolBar2
'
Me.ToolBar2.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1, Me.ToolBarButton2})
Me.ToolBar2.DropDownArrows = True
Me.ToolBar2.ImageList = Me.ImageList1
Me.ToolBar2.Name = "ToolBar2"
Me.ToolBar2.ShowToolTips = True
Me.ToolBar2.Size = New System.Drawing.Size(666, 25)
Me.ToolBar2.TabIndex = 9
Me.ToolBar2.Visible = False
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 0
'
'ToolBarButton2
'
Me.ToolBarButton2.ImageIndex = 1
'
'ImageList1
'
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'Panel1
'
Me.Panel1.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblpartner, Me.Label2, Me.cbverarbeitung, Me.Label3, Me.Button1, Me.Label1})
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(368, 176)
Me.Panel1.TabIndex = 10
'
'lblpartner
'
Me.lblpartner.Location = New System.Drawing.Point(56, 8)
Me.lblpartner.Name = "lblpartner"
Me.lblpartner.Size = New System.Drawing.Size(336, 23)
Me.lblpartner.TabIndex = 10
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 8)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(48, 23)
Me.Label2.TabIndex = 9
Me.Label2.Text = "Partner:"
'
'cbverarbeitung
'
Me.cbverarbeitung.Items.AddRange(New Object() {"Fenster schliessen", "Ausdruck erfolgreich", "Ausdruck nicht erfolgreich"})
Me.cbverarbeitung.Location = New System.Drawing.Point(160, 80)
Me.cbverarbeitung.Name = "cbverarbeitung"
Me.cbverarbeitung.Size = New System.Drawing.Size(192, 21)
Me.cbverarbeitung.TabIndex = 8
Me.cbverarbeitung.Text = "ComboBox1"
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(8, 80)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(128, 23)
Me.Label3.TabIndex = 7
Me.Label3.Text = "Weitere Verarbeitung:"
'
'Button1
'
Me.Button1.Enabled = False
Me.Button1.Location = New System.Drawing.Point(152, 120)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 1
Me.Button1.Text = "&OK"
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 40)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(352, 32)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Label1"
'
'webOCWrapper
'
Me.webOCWrapper.Anchor = (((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me.webOCWrapper.BrowserContextMenu = False
Me.webOCWrapper.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.webOCWrapper.Location = New System.Drawing.Point(8, 88)
Me.webOCWrapper.Name = "webOCWrapper"
Me.webOCWrapper.Size = New System.Drawing.Size(688, 304)
Me.webOCWrapper.TabIndex = 11
Me.webOCWrapper.TabStop = False
'
'frmPDFPrinter
'
Me.AutoScale = False
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(666, 455)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Panel1, Me.ToolBar2, Me.addressBarLbl, Me.StatusBar1, Me.addressBar, Me.webOCWrapper})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MaximumSize = New System.Drawing.Size(368, 176)
Me.MinimizeBox = False
Me.Name = "frmPDFPrinter"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Druckbestätigung"
Me.Panel1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
#Region " Deklarationen"
Dim m_showdoc As Boolean = True
Dim m_alnr As Integer
Property alnr() As Integer
Get
Return m_alnr
End Get
Set(ByVal Value As Integer)
m_alnr = Value
End Set
End Property
Dim m_part As Integer
Property Part() As Integer
Get
Return m_part
End Get
Set(ByVal Value As Integer)
m_part = Value
End Set
End Property
#End Region
Public Sub New(ByVal ShowDoc As Boolean)
MyBase.New()
InitializeComponent()
Me.m_showdoc = ShowDoc
End Sub
Private Sub frmPDFPrinter_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
get_partner(alnr)
Me.Text = "Druckbestätigung: " + Me.lblpartner.Text
Me.Label1.Text = MyTxt.gettext(615)
'----------------------------
' Taskforce Korrektur
' BUD - 21.03.2006
'----------------------------
'If Me.m_showdoc = True Then
' webOCWrapper.Navigate(addressBar.Text)
'End If
'----------------------------
Me.cbverarbeitung.SelectedIndex = 1
End Sub
Private Sub delay(ByVal seconds As Integer)
Me.Cursor = Cursors.WaitCursor
Dim starttime As DateTime = DateTime.Now
Do
Application.DoEvents()
Loop While DateTime.Now.Subtract(starttime).TotalSeconds < seconds
Me.Cursor = Cursors.Default
End Sub
Public Sub PrintPDF()
Dim pdfprinting As New clsPDFHandling
If pdfprinting.Printtype_Banklagernd = pdfprinting.enum_Printtype.EDOKA_Default Then
delay(2)
'----------------------------
' Taskforce Korrektur
' BUD - 21.03.2006
'----------------------------
'webOCWrapper.Print(doUI:=True)
Dim objpdf As New clsPDF_print_show()
objpdf.PrintPDF(addressBar.Text, clsPDF_print_show.Enum_Art.Drucken)
MsgBox(MyTxt.gettext(618), MsgBoxStyle.Information, "Banklagernd Druck")
'----------------------------
Me.Button1.Enabled = True
Application.DoEvents()
Dim i As Integer
End If
If pdfprinting.Printtype_Banklagernd = pdfprinting.enum_Printtype.ShowAcrobat Then
'Me.Visible = False
Dim s As String
pdfprinting.Print_ShowPDF(addressBar.Text)
Me.Button1.Enabled = True
Application.DoEvents()
Dim i As Integer
'If MsgBox(MyTxt.gettext(618), vbYesNo + vbQuestion) = MsgBoxResult.Yes Then
' Dim frmbla As New frmBLAuslieferungen()
' frmbla.set_PrintOK(Me.alnr, Part)
' frmbla.Close()
' frmbla.Dispose()
'Else
' Dim frmbla As New frmBLAuslieferungen()
' frmbla.set_PrintNOK(Me.alnr, Part)
' frmbla.Close()
' frmbla.Dispose()
'End If
'Me.Close()
End If
If pdfprinting.Printtype_Banklagernd = pdfprinting.enum_Printtype.PDFPrintingNet Then
Dim s As String
Me.Visible = False
pdfprinting.PrintPDF(addressBar.Text, 2)
Me.Button1.Enabled = True
Application.DoEvents()
Dim i As Integer
'If MsgBox(MyTxt.gettext(618), vbYesNo + vbQuestion) = MsgBoxResult.Yes Then
' Dim frmbla As New frmBLAuslieferungen()
' frmbla.set_PrintOK(Me.alnr, Part)
' frmbla.Close()
' frmbla.Dispose()
'Else
' Dim frmbla As New frmBLAuslieferungen()
' frmbla.set_PrintNOK(Me.alnr, Part)
' frmbla.Close()
' frmbla.Dispose()
'End If
'Me.Close()
End If
End Sub
Private Sub inetOptionsMI_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
webOCWrapper.InternetOptions()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Select Case Me.cbverarbeitung.SelectedIndex
Case 0
Case 1
Dim frmbla As New frmBLAuslieferungen()
frmbla.set_PrintOK(Me.alnr, Part)
frmbla.Close()
frmbla.Dispose()
Case 2
Dim frmbla As New frmBLAuslieferungen()
frmbla.set_PrintNOK(Me.alnr, Part)
frmbla.Close()
frmbla.Dispose()
End Select
Me.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Function get_partner(ByVal alnr As Integer)
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.SP_edex_bl_get_partner"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@alnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, alnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@bkpar00", SqlDbType.VarChar, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, ""))
sdaAdapter.Fill(dtToReturn)
Me.lblpartner.Text = scmCmdToExecute.Parameters("@bkpar00").Value
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
End Class

View File

@@ -0,0 +1,152 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.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>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABQAPAAUAAAAAAAAAAAAABQ8PDw8PBQAAAAAAAAAABQUPBQAF
DwAAAAAAAAAAAAUPDwAKAA8PBQARAAAAAAAFBQ8FAAUPAACJEQAAAAAAAAUPDw8PDwUAEREAEQAAAAAF
BQAPAAUAAIkRABEAAAAAAAAFBQUFEREREQARABEAAAAAAAAKEYmJiREAEQARAAAAAAAAChERERERABEA
EQAAAAAAAAoKCgoKCgARABEAAAAAAAAAAAoREREREQARAAAAAAAAAAAKCgoKCgoAEQAAAAAAAAAAAAAK
EREREREAAAAAAAAAAAAACgoKCgoKAOH/AACAfwAAgD8AAAAPAAAADwAAAAMAAIADAACAAAAA4AAAAPgA
AAD4AAAA+AAAAP4AAAD+AAAA/4AAAP+AAAA=
</value>
</data>
</root>

View File

@@ -0,0 +1,250 @@
Imports System.Data
Imports System.Data.SqlClient
Public Class frmWatchJob
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Timer1 As System.Timers.Timer
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents lblpartner As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents cbverarbeitung As System.Windows.Forms.ComboBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmWatchJob))
Me.Button1 = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.Timer1 = New System.Timers.Timer()
Me.Label2 = New System.Windows.Forms.Label()
Me.lblpartner = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label()
Me.cbverarbeitung = New System.Windows.Forms.ComboBox()
Me.Label4 = New System.Windows.Forms.Label()
CType(Me.Timer1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(136, 120)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 23)
Me.Button1.TabIndex = 0
Me.Button1.Text = "OK"
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 32)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(376, 18)
Me.Label1.TabIndex = 1
Me.Label1.Text = "Die COLD-Druckaufbereitung ist abgeschlossen."
'
'Timer1
'
Me.Timer1.Interval = 30000.0R
Me.Timer1.SynchronizingObject = Me
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 8)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(48, 23)
Me.Label2.TabIndex = 2
Me.Label2.Text = "Partner:"
'
'lblpartner
'
Me.lblpartner.Location = New System.Drawing.Point(56, 8)
Me.lblpartner.Name = "lblpartner"
Me.lblpartner.Size = New System.Drawing.Size(336, 23)
Me.lblpartner.TabIndex = 3
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(8, 72)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(120, 23)
Me.Label3.TabIndex = 4
Me.Label3.Text = "Weitere Verarbeitung:"
'
'cbverarbeitung
'
Me.cbverarbeitung.Items.AddRange(New Object() {"Meldungsfenster schliessen", "Aushändigungs-Qu. und Dokumente drucken"})
Me.cbverarbeitung.Location = New System.Drawing.Point(136, 72)
Me.cbverarbeitung.Name = "cbverarbeitung"
Me.cbverarbeitung.Size = New System.Drawing.Size(216, 21)
Me.cbverarbeitung.TabIndex = 5
Me.cbverarbeitung.Text = "ComboBox1"
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(8, 50)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(376, 18)
Me.Label4.TabIndex = 6
Me.Label4.Text = "Bitte nehmen Sie mit dem Dokumenten-Management TKB Kontakt auf."
Me.Label4.Visible = False
'
'frmWatchJob
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(360, 149)
Me.Controls.Add(Me.Label4)
Me.Controls.Add(Me.cbverarbeitung)
Me.Controls.Add(Me.Label3)
Me.Controls.Add(Me.lblpartner)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Button1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmWatchJob"
Me.ShowInTaskbar = False
Me.Text = "Druckaufbereitung abgeschlossen"
Me.TopMost = True
CType(Me.Timer1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Dim m_druckjobnr As Integer
Dim dokidquittung As String = ""
Dim alnr As Integer = 0
Dim part As Integer
Public Sub New(ByVal druckjobnr As Integer)
MyBase.New()
InitializeComponent()
Me.m_druckjobnr = druckjobnr
Me.Timer1.Enabled = True
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Select Case Me.cbverarbeitung.SelectedIndex
Case 0
Case 1
Dim frmbla As New frmBLAuslieferungen()
frmbla.PrintDocs(Me.dokidquittung, Me, Me.alnr, part)
frmbla.Close()
frmbla.Dispose()
Case 2
Dim frmbla As New frmBLAuslieferungen()
frmbla.PrintQuittung(Me.dokidquittung, Me, Me.alnr)
frmbla.Close()
frmbla.Dispose()
End Select
Me.Close()
End Sub
Private Sub Timer1_Elapsed(ByVal sender As Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
'Rel 4.03
Dim ReturnStatus As Integer = 0
If Check_Status(ReturnStatus) Then
Me.Timer1.Enabled = False
If ReturnStatus <> 7 Then
Me.Label1.Text = "Die COLD-Druckaufbereitung ist abgeschlossen."
Me.Text = "Druckaufbereitung abgeschlossen"
Me.Label4.Visible = False
Me.cbverarbeitung.Enabled = True
End If
If ReturnStatus = 7 Then
Me.Label1.Text = "Dokumentaufbereitung seitens OnDemand ist fehlgeschlagen."
Me.Label4.Visible = True
Me.Text = "Druckaufbereitung fehlgeschlagen"
Me.cbverarbeitung.SelectedIndex = 0
Me.cbverarbeitung.Enabled = False
End If
Me.Visible = True
Beep()
Application.DoEvents()
End If
'If Check_Status() Then
' Me.Timer1.Enabled = False
' Me.Visible = True
' Beep()
' Application.DoEvents()
'End If
End Sub
Private Function Check_Status(ByRef Returnstatus As Integer) As Boolean
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_check_druckjob"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@druckjobnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.m_druckjobnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@status", SqlDbType.Int, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@partner", SqlDbType.VarChar, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, ""))
scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid_quittung", SqlDbType.VarChar, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, ""))
scmCmdToExecute.Parameters.Add(New SqlParameter("@alnr", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
sdaAdapter.Fill(dtToReturn)
'Rel 4.03
Select Case scmCmdToExecute.Parameters("@status").Value
Case 1
Me.lblpartner.Text = scmCmdToExecute.Parameters("@Partner").Value
Me.dokidquittung = scmCmdToExecute.Parameters("@dokumentid_quittung").Value
Me.alnr = scmCmdToExecute.Parameters("@alnr").Value
Returnstatus = 1
Return True
Case 7
Me.lblpartner.Text = scmCmdToExecute.Parameters("@Partner").Value
Me.dokidquittung = scmCmdToExecute.Parameters("@dokumentid_quittung").Value
Me.alnr = scmCmdToExecute.Parameters("@alnr").Value
Returnstatus = 7
Return True
Case Else
Return False
End Select
'Rel. 4.03 - Prüfung Druckjobstatus
'If scmCmdToExecute.Parameters("@status").Value = 1 Then
' Me.lblpartner.Text = scmCmdToExecute.Parameters("@Partner").Value
' Me.dokidquittung = scmCmdToExecute.Parameters("@dokumentid_quittung").Value
' Me.alnr = scmCmdToExecute.Parameters("@alnr").Value
' Return True
'Else
' Return False
'End If
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Sub frmWatchJob_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.cbverarbeitung.SelectedIndex = 1
End Sub
End Class

View File

@@ -0,0 +1,156 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="SqlDataAdapter1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDataAdapter1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>125, 17</value>
</data>
<data name="SqlSelectCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlConnection1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlConnection1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>260, 17</value>
</data>
<data name="DataSet1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>388, 17</value>
</data>
<data name="DataSet1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmblkundeMA</value>
</data>
</root>

View File

@@ -0,0 +1,256 @@
Imports System.ComponentModel
Public Class frmblkundeMA
Inherits _frmDomainEditor
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
Friend WithEvents DataSet1 As System.Data.DataSet
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter()
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlUpdateCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection()
Me.DataSet1 = New System.Data.DataSet()
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "EDEX_BL_BLKunde", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("blkundenr", "blkundenr"), New System.Data.Common.DataColumnMapping("NRPAR00", "NRPAR00"), New System.Data.Common.DataColumnMapping("partnertyp", "partnertyp"), New System.Data.Common.DataColumnMapping("mandantnr", "mandantnr"), New System.Data.Common.DataColumnMapping("aktiv", "aktiv"), New System.Data.Common.DataColumnMapping("erstellt_am", "erstellt_am"), New System.Data.Common.DataColumnMapping("mutiert_am", "mutiert_am"), New System.Data.Common.DataColumnMapping("mutierer", "mutierer"), New System.Data.Common.DataColumnMapping("banklagernd_erklaerung", "banklagernd_erklaerung"), New System.Data.Common.DataColumnMapping("banklagernd_erklaerung_vom", "banklagernd_erklaerung_vom"), New System.Data.Common.DataColumnMapping("bl_periodische_auslieferung", "bl_periodische_auslieferung")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "[pv_blkundema_select]"
Me.SqlSelectCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlSelectCommand1.Connection = Me.SqlConnection1
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "[pv_blkundema_insert]"
Me.SqlInsertCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlInsertCommand1.Connection = Me.SqlConnection1
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@blkundenr", System.Data.SqlDbType.Int, 4, "blkundenr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@NRPAR00", System.Data.SqlDbType.Int, 4, "NRPAR00"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@partnertyp", System.Data.SqlDbType.Int, 4, "partnertyp"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, "banklagernd_erklaerung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, "banklagernd_erklaerung_vom"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, "bl_periodische_auslieferung"))
'
'SqlUpdateCommand1
'
Me.SqlUpdateCommand1.CommandText = "[pv_blkundema_update]"
Me.SqlUpdateCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlUpdateCommand1.Connection = Me.SqlConnection1
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@blkundenr", System.Data.SqlDbType.Int, 4, "blkundenr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@NRPAR00", System.Data.SqlDbType.Int, 4, "NRPAR00"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@partnertyp", System.Data.SqlDbType.Int, 4, "partnertyp"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Param1", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, "banklagernd_erklaerung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, "banklagernd_erklaerung_vom"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, "bl_periodische_auslieferung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_blkundenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "blkundenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_NRPAR00", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "NRPAR00", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung_vom", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bl_periodische_auslieferung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutierer", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutierer", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_partnertyp", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "partnertyp", System.Data.DataRowVersion.Original, Nothing))
'
'SqlDeleteCommand1
'
Me.SqlDeleteCommand1.CommandText = "[pv_blkundema_delete]"
Me.SqlDeleteCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlDeleteCommand1.Connection = Me.SqlConnection1
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_blkundenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "blkundenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_NRPAR00", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "NRPAR00", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_banklagernd_erklaerung_vom", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "banklagernd_erklaerung_vom", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bl_periodische_auslieferung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bl_periodische_auslieferung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutierer", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutierer", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_partnertyp", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "partnertyp", System.Data.DataRowVersion.Original, Nothing))
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = "data source=shunb1;initial catalog=edoka;persist security info=False;user id=sa;w" & _
"orkstation id=SHUMAIN;packet size=4096"
'
'DataSet1
'
Me.DataSet1.DataSetName = "NewDataSet"
'
'frmblkundeMA
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(896, 441)
Me.Name = "frmblkundeMA"
Me.Text = "Mitarbeiter verwalten"
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub frmBLKunde_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.DomainList.ScrollTips = True
Me.TableName = "blkunde"
Dim dbconn As New EDOKA.DB_Connection()
Me.SqlConnection1.ConnectionString = Globals.sConnectionString
Me.SqlConnection1.Open()
' Nur für den aktuell gewählten Mandanten die Daten auslesen
Me.SqlDataAdapter1.SelectCommand.Parameters.Clear()
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@mandantnr", Globals.MandantNr)
Me.SqlDataAdapter1.Fill(Me.DataSet1)
Me.DomainList.DataSource = Me.DataSet1.Tables(0)
Me.DomainList.DataMember = Me.TableName
Me.SpaltenTitel_Aktualisieren(Me.DataSet1)
'DivFnkt.SpaltenTitel_Aktualisieren(Me.DomainList, Me.DataSet1.Tables(0), Me.tablename)
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'close button
Me.Close()
Case 1 'Speichern
Save_Data()
End Select
End Sub
Private Sub frmClose(ByVal sender As System.Object, ByVal e As CancelEventArgs) Handles MyBase.Closing
Dim msg As MsgBoxResult
If Me.DataSet1.HasChanges Then
msg = Globals.MyMsg.Show_MessageYesNoCancel(2)
If msg = MsgBoxResult.No Then
e.Cancel = False
End If
If msg = MsgBoxResult.Yes Then
If Save_Data() Then e.Cancel = False Else e.Cancel = True
End If
If msg = MsgBoxResult.Cancel Then e.Cancel = True
End If
End Sub
Private Function Save_Data() As Boolean
Save_Data = True
Try
SqlDataAdapter1.Update(Me.DataSet1)
Catch ex As Exception
MsgBox(Globals.MyMsg.Get_Meldungstext(902))
Save_Data = False
End Try
End Function
Private Sub DomainList_AfterInsert(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DomainList.AfterInsert
Dim i As Integer
'Defaulwerte erstellt_am, mutiert_am, mutierer und aktiv setzen
Try
For i = 0 To DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "partnertyp" Then
Me.DomainList.Columns(i).Value = 1
End If
If Me.DomainList.Columns(i).DataField = "bl_periodische_auslieferung" Then
Me.DomainList.Columns(i).Value = 0
End If
If Me.DomainList.Columns(i).DataField = "banklagernd_erklaerung" Then
Me.DomainList.Columns(i).Value = 0
End If
Next
Catch
End Try
End Sub
Private Sub domainlist_aftercellupdate(ByVal sender As System.Object, ByVal e As C1.Win.C1TrueDBGrid.ColEventArgs) Handles DomainList.AfterColUpdate
'Aktualisieren von Mutierer und Mutiert_am
Dim i As Integer
Try
For i = 0 To Me.DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "mutiert_am" Then Me.DomainList.Columns(i).Value = Now
If Me.DomainList.Columns(i).DataField = "mutierer" Then Me.DomainList.Columns(i).Value = Globals.MitarbeiterNr
If Me.DomainList.Columns(i).DataField = "partnertyp" Then Me.DomainList.Columns(i).Value = 2
Next
'neuer DB-Key auslösen, sofern kein Key vorhanden ist
If Me.DomainList.Columns(0).Value Is DBNull.Value Then
Dim dbkey As New edokadb.clsMyKey_Tabelle()
Dim key As Long
dbkey.cpMainConnectionProvider = conn
key = dbkey.get_dbkey(TableName)
Me.DomainList.Columns(0).Value = key
For i = 0 To Me.DomainList.Columns.Count - 1
If Me.DomainList.Columns(i).DataField = "mandantnr" Then
Me.DomainList.Columns(i).Value = Globals.MandantNr
End If
Next
dbkey.Dispose()
End If
Catch
End Try
End Sub
End Class

View File

@@ -0,0 +1,306 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>522, 30</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AADUDwAAAk1TRnQBSQFMAgEBCQEAAQ4BAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ABQAQ
BzAAEAcwAAIHCQAB7AQHMAABBwEAC+wDBzAAAewKBwPsAgcwAAHsBgcB+QH/AfkB/wLsAQACBzAAAewK
BwTsAQcwAAHsCv8E7AEHMAABBwHsAf8HAAL/A+wBBzAAAgcB7Af/AQAC/wLsAQcwAAMHAewB/wUHAQAD
7AIHMAAEBwHsBQcB/wUHMAAFBwH/BQcBAAQHMAAFBwfsBAcwABAHMAAQB0QAAQcCAAEHAQABBwEAAQcC
AAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsAwABBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcB
AAEHAgABBwUAAQcCAAEHAQABBwEAAQcCAAEHAQAB7AQHAgABBwEAAQcBAAEHAgABBxUAAQcCAAEHAQAB
BwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsA/8BBwIAAQcBAAEHAQABBwIAAQcBAAoCBgAK
AgcAAfwBAAH8AQAB/AEAAfwBAAH8BgAB7AH/BAcB/wMHAf8BBwQAAQII/wECBgABAgj/AQIGAAH8CP8H
AAHsCv8BBwQAAQIB/wgCBgABAgH/CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAHsAf8EBwH/AwcB/wEHBAAB
AgH/AwIBBwQCBgABAgH/AwIBBwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAHsCv8BBwQAAQIC
/wECAQcDAgH/AQIGAAECAv8BAgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gIAAewB
/wgHAf8BBwQAAQIB/wECAQcDAgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAH8Af8B/AH/AfwBAAH/AQAB
BwEAAdYC/wHWAgAB7Ar/AQcEAAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wECBJgDAAH8AQAB/wEAAfwB
/wH8AQAB/AHWAQcB/wHWAgAB7AH/AgcB/wUHAf8BBwQAAQIB/wICAv8CAgH/AQIGAAECAf8CAgL/AgIB
/wECApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gIAAewK/wEHBAABAgj/AQIGAAECCP8B
AgGYAv8BmAMACP8B/AH/AdYBBwHWAgAB7AH/AgcB/wUHAf8BBwQACgIGAAoCApgB/wGYAgAB/AEAAfwB
AAH8AQAB/AEAAfwBAAH/A9YCAAHsCP8bAAGYAf8CmAL/ApgB/wGYBgAK1gIAAewB/wYHAf8B7AH/GQAB
mAj/AZgGAAHWCP8B1gIAAewI/wHsGgAKmAYACtYCAArsFgAQAiYAAQMB/wgAAgINAAECJAAB7AEDAewB
/wgAAQIBAAIDBgACBwEAAQMBAAECIgABAwHsAQMB7AEDAf8IAAECAQACAwYAAgcBAAEDAQABAgEAAfwB
AAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEAAfwHAAEDAewBAwHsAQMB7AH/AQAB7AYAAQIB
AAIDBgACBwEAAQMBAAECAfwI/wcAAfwI/wgAAewBAwHsAQMB7AEDAf8BAAHsBgABAgEAAgMJAAEDAQAB
AgEAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AcAAQMB7AEDAgAB7AH/AQAB7AYAAQIB
AAwDAQABAgH8Af8B/AEAAQcBAAH8AQcB/wcAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gMAAewBAwHsAgcB
AwH/AQAB7AEAAQYEAAECAQACAwgAAgMBAAECAQAB/wEAAfwBAAH8AQAB/AH/AfwHAAH/AQAB/AEAAfwB
AAH8Af8B/AP/AdYDAAEDAewBAwHsAQMB7AH/AgABBgX+AQIBAAEDAQAIBwEAAQMBAAECAfwB/wH8Af8B
/AEAAf8BAAEHBwAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gMAAewBAwHsAQMB7AEDAf8BAAFtBv4B
AgEAAQMBAAgHAQABAwEAAQIBAAH8AQAB/wEAAfwB/wH8AQAB/AcAAfwBAAH/AQAB/AH/AfwBAAH8AdYB
BwH/AdYDAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQECAQABAwEACAcBAAEDAQABAgH8AQAB/AEAAfwB
AAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAHsAQMB7AEDAewBAwH/AQAB7AEAAm0D
AAECAQABAwEACAcBAAEDAQABAgEACP8B/AcACP8B/AH/AdYBBwHWAwABAwHsAQMB7AEHAf8B7AEAAewC
AAFtAwABAgEAAQMBAAgHAwABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8AQAB
/wPWAwAB7AEDAQcB/wHsAQAD7AYAAQIBAAEDAQAIBwEAAQcBAAECFAAK1gMAAQcB/wHsAQAF7AYAAQIO
AAECFAAB1gj/AdYSABACFAAK1gIAAUIBTQE+BwABPgMAASgDAAFAAwABQAMAAQEBAAEBBgABAhYAA///
AAIAAv8B8AEAAfADAAL/AfABAAHwAwAC/wHwAQAB8AQAAT8BAAE/AQABPwEAAQcBAAE/AQABPwEAAT8B
AAEHAQABPwEAAT8BAAE/AQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMB
AAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8B
AAEDAQABAwEAAQcC/wHwAQMB8AEDAQABDwL/AfABAwHwAQMBAAEfAv8B8AEDAfABAwEAAT8B/AF/AgAE
/wHwAX8CAAT/AcABfwIABP8BAAEfAwABPwEAAT8BAAEfAwABPwEAAT8BAAEXAwABPwEAAT8BAAEHAwAB
PwEAAQMFAAE/AQABAwUAAT8BAAEDBQABPwEAAQMFAAE/AQABAwEAAQcDAAE/AQABAwEAARcDAAE/AQAB
AwEAAR8CAAL/AfABAwEAAR8CAAL/AfABAwEAAR8CAAL/AfABAxYACw==
</value>
</data>
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnexit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnsave.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblPartner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtPartner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cbblerklaerung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="dtblerklaerung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="dtperiodischeAuslieferung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblNaechteAusfuehrung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="dterstmalsam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cbPeridiozitaetDetail.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cbPeriodizitaet.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="dtgueltigbis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cbhatPeriodischeAuslieferung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>628, 30</value>
</data>
<data name="ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuAdd.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuDel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuUpd.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="BtnHelp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</value>
</data>
<data name="$this.Name">
<value>frmblkundenparameter</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAAAAAAA
AACAgIAAAAAAAIAAAAD///8AwMDAAAAAgAARsCEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAQEBAQEBAQQEAgICAgQBAQEBAQEBAQEEAgQEBAQEBAEAAwMEAwMEBAIEBAQEAgQEAAMDBAMD
AgICAgIEAgICBAAEBAQEBAQCAgIEAgICAgIAAwMEAwMEBAIEBAQEAgQEAAMDBAMDBAQEBAQEBAIEAQAE
BAUFBQUEBAICAgIEBAEAAwMFAwMFAwMEAwMEAwMBAAMDBQMDBQMDBAMDBAMDAQAEBAUFBQUEBAQEBAQE
BAEAAwMEAwMEAwMEAwMEAwMBAAMDBAMDBAMDBAMDBAMDAQACAgICAgICAAAAAAAAAAEAAgICAgICAgAA
AAAAAAABAAAAAAAAAAAAAAAAAAAAAf4DAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=
</value>
</data>
</root>

View File

@@ -0,0 +1,673 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmblkundenparameter
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents btnexit As System.Windows.Forms.ToolBarButton
Friend WithEvents btnsave As System.Windows.Forms.ToolBarButton
Friend WithEvents lblPartner As System.Windows.Forms.Label
Friend WithEvents txtPartner As System.Windows.Forms.TextBox
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents dtblerklaerung As System.Windows.Forms.DateTimePicker
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents MnuAdd As System.Windows.Forms.MenuItem
Friend WithEvents MnuDel As System.Windows.Forms.MenuItem
Friend WithEvents MnuUpd As System.Windows.Forms.MenuItem
Friend WithEvents cbblerklaerung As System.Windows.Forms.CheckBox
Friend WithEvents GroupBox3 As System.Windows.Forms.GroupBox
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents cbPeriodizitaet As System.Windows.Forms.ComboBox
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents cbPeridiozitaetDetail As System.Windows.Forms.ComboBox
Friend WithEvents cbhatPeriodischeAuslieferung As System.Windows.Forms.CheckBox
Friend WithEvents dterstmalsam As System.Windows.Forms.DateTimePicker
Friend WithEvents dtgueltigbis As System.Windows.Forms.DateTimePicker
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents dtperiodischeAuslieferung As System.Windows.Forms.DateTimePicker
Friend WithEvents GroupBox4 As System.Windows.Forms.GroupBox
Friend WithEvents BtnHelp As System.Windows.Forms.Button
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents lblNaechteAusfuehrung As System.Windows.Forms.Label
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmblkundenparameter))
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.btnexit = New System.Windows.Forms.ToolBarButton()
Me.btnsave = New System.Windows.Forms.ToolBarButton()
Me.lblPartner = New System.Windows.Forms.Label()
Me.txtPartner = New System.Windows.Forms.TextBox()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.Label1 = New System.Windows.Forms.Label()
Me.cbblerklaerung = New System.Windows.Forms.CheckBox()
Me.dtblerklaerung = New System.Windows.Forms.DateTimePicker()
Me.Label5 = New System.Windows.Forms.Label()
Me.dtperiodischeAuslieferung = New System.Windows.Forms.DateTimePicker()
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
Me.lblNaechteAusfuehrung = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.dterstmalsam = New System.Windows.Forms.DateTimePicker()
Me.Label4 = New System.Windows.Forms.Label()
Me.cbPeridiozitaetDetail = New System.Windows.Forms.ComboBox()
Me.cbPeriodizitaet = New System.Windows.Forms.ComboBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.dtgueltigbis = New System.Windows.Forms.DateTimePicker()
Me.Label2 = New System.Windows.Forms.Label()
Me.cbhatPeriodischeAuslieferung = New System.Windows.Forms.CheckBox()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.MnuAdd = New System.Windows.Forms.MenuItem()
Me.MnuDel = New System.Windows.Forms.MenuItem()
Me.MnuUpd = New System.Windows.Forms.MenuItem()
Me.GroupBox4 = New System.Windows.Forms.GroupBox()
Me.BtnHelp = New System.Windows.Forms.Button()
Me.GroupBox1.SuspendLayout()
Me.GroupBox3.SuspendLayout()
Me.GroupBox4.SuspendLayout()
Me.SuspendLayout()
'
'ImageList1
'
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.btnexit, Me.btnsave})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(448, 25)
Me.ToolBar1.TabIndex = 0
'
'btnexit
'
Me.btnexit.ImageIndex = 0
'
'btnsave
'
Me.btnsave.ImageIndex = 1
'
'lblPartner
'
Me.lblPartner.Location = New System.Drawing.Point(8, 40)
Me.lblPartner.Name = "lblPartner"
Me.lblPartner.Size = New System.Drawing.Size(56, 23)
Me.lblPartner.TabIndex = 1
Me.lblPartner.Text = "Partner:"
'
'txtPartner
'
Me.txtPartner.BackColor = System.Drawing.Color.White
Me.txtPartner.Location = New System.Drawing.Point(64, 40)
Me.txtPartner.Name = "txtPartner"
Me.txtPartner.ReadOnly = True
Me.txtPartner.Size = New System.Drawing.Size(376, 20)
Me.txtPartner.TabIndex = 2
Me.txtPartner.Text = ""
'
'GroupBox1
'
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.Label1, Me.cbblerklaerung, Me.dtblerklaerung})
Me.GroupBox1.Location = New System.Drawing.Point(8, 256)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(432, 64)
Me.GroupBox1.TabIndex = 3
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Banklagernd-Erklärung"
Me.GroupBox1.Visible = False
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(224, 26)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(80, 16)
Me.Label1.TabIndex = 3
Me.Label1.Text = "Vertragsdatum"
'
'cbblerklaerung
'
Me.cbblerklaerung.Location = New System.Drawing.Point(16, 22)
Me.cbblerklaerung.Name = "cbblerklaerung"
Me.cbblerklaerung.Size = New System.Drawing.Size(192, 24)
Me.cbblerklaerung.TabIndex = 2
Me.cbblerklaerung.Text = "Der Kunde hat eine BL-Erklärung"
'
'dtblerklaerung
'
Me.dtblerklaerung.Enabled = False
Me.dtblerklaerung.Format = System.Windows.Forms.DateTimePickerFormat.Short
Me.dtblerklaerung.Location = New System.Drawing.Point(320, 24)
Me.dtblerklaerung.Name = "dtblerklaerung"
Me.dtblerklaerung.Size = New System.Drawing.Size(96, 20)
Me.dtblerklaerung.TabIndex = 1
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(243, 30)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(80, 16)
Me.Label5.TabIndex = 6
Me.Label5.Text = "Auftragsdatum"
'
'dtperiodischeAuslieferung
'
Me.dtperiodischeAuslieferung.Enabled = False
Me.dtperiodischeAuslieferung.Format = System.Windows.Forms.DateTimePickerFormat.Short
Me.dtperiodischeAuslieferung.Location = New System.Drawing.Point(328, 28)
Me.dtperiodischeAuslieferung.Name = "dtperiodischeAuslieferung"
Me.dtperiodischeAuslieferung.Size = New System.Drawing.Size(96, 20)
Me.dtperiodischeAuslieferung.TabIndex = 5
'
'GroupBox3
'
Me.GroupBox3.Controls.AddRange(New System.Windows.Forms.Control() {Me.lblNaechteAusfuehrung, Me.Label6, Me.dterstmalsam, Me.Label4, Me.cbPeridiozitaetDetail, Me.cbPeriodizitaet, Me.Label3, Me.dtgueltigbis, Me.Label2})
Me.GroupBox3.Enabled = False
Me.GroupBox3.Location = New System.Drawing.Point(8, 144)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(432, 104)
Me.GroupBox3.TabIndex = 4
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Regelungen"
'
'lblNaechteAusfuehrung
'
Me.lblNaechteAusfuehrung.Location = New System.Drawing.Point(328, 24)
Me.lblNaechteAusfuehrung.Name = "lblNaechteAusfuehrung"
Me.lblNaechteAusfuehrung.Size = New System.Drawing.Size(88, 16)
Me.lblNaechteAusfuehrung.TabIndex = 21
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(216, 24)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(112, 16)
Me.Label6.TabIndex = 20
Me.Label6.Text = "Nächste Ausführung:"
'
'dterstmalsam
'
Me.dterstmalsam.Format = System.Windows.Forms.DateTimePickerFormat.Short
Me.dterstmalsam.Location = New System.Drawing.Point(128, 24)
Me.dterstmalsam.Name = "dterstmalsam"
Me.dterstmalsam.Size = New System.Drawing.Size(80, 20)
Me.dterstmalsam.TabIndex = 19
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(8, 24)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(72, 24)
Me.Label4.TabIndex = 18
Me.Label4.Text = "erstmals am:"
'
'cbPeridiozitaetDetail
'
Me.cbPeridiozitaetDetail.Enabled = False
Me.cbPeridiozitaetDetail.Items.AddRange(New Object() {"Immer am gewählten Datum", "Immer am letzten Tag des Zeitraumes"})
Me.cbPeridiozitaetDetail.Location = New System.Drawing.Point(216, 48)
Me.cbPeridiozitaetDetail.Name = "cbPeridiozitaetDetail"
Me.cbPeridiozitaetDetail.Size = New System.Drawing.Size(192, 21)
Me.cbPeridiozitaetDetail.TabIndex = 17
'
'cbPeriodizitaet
'
Me.cbPeriodizitaet.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cbPeriodizitaet.Location = New System.Drawing.Point(128, 48)
Me.cbPeriodizitaet.Name = "cbPeriodizitaet"
Me.cbPeriodizitaet.Size = New System.Drawing.Size(80, 21)
Me.cbPeriodizitaet.TabIndex = 16
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(8, 48)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(64, 24)
Me.Label3.TabIndex = 15
Me.Label3.Text = "Periodizität"
'
'dtgueltigbis
'
Me.dtgueltigbis.Format = System.Windows.Forms.DateTimePickerFormat.Short
Me.dtgueltigbis.Location = New System.Drawing.Point(128, 72)
Me.dtgueltigbis.Name = "dtgueltigbis"
Me.dtgueltigbis.Size = New System.Drawing.Size(80, 20)
Me.dtgueltigbis.TabIndex = 14
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 72)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(120, 24)
Me.Label2.TabIndex = 13
Me.Label2.Text = "Regelung gültig bis"
'
'cbhatPeriodischeAuslieferung
'
Me.cbhatPeriodischeAuslieferung.Location = New System.Drawing.Point(8, 24)
Me.cbhatPeriodischeAuslieferung.Name = "cbhatPeriodischeAuslieferung"
Me.cbhatPeriodischeAuslieferung.Size = New System.Drawing.Size(240, 24)
Me.cbhatPeriodischeAuslieferung.TabIndex = 3
Me.cbhatPeriodischeAuslieferung.Text = "Kunde hat eine periodische Aushändigung"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MnuAdd, Me.MnuDel, Me.MnuUpd})
'
'MnuAdd
'
Me.MnuAdd.Index = 0
Me.MnuAdd.Text = "&Periodische Auslieferung hinzufügen"
'
'MnuDel
'
Me.MnuDel.Index = 1
Me.MnuDel.Text = "Periodische Auslieferung &löschen"
'
'MnuUpd
'
Me.MnuUpd.Index = 2
Me.MnuUpd.Text = "&Periodische Auslieferung ändern"
'
'GroupBox4
'
Me.GroupBox4.Controls.AddRange(New System.Windows.Forms.Control() {Me.Label5, Me.cbhatPeriodischeAuslieferung, Me.dtperiodischeAuslieferung})
Me.GroupBox4.Location = New System.Drawing.Point(8, 72)
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(432, 64)
Me.GroupBox4.TabIndex = 5
Me.GroupBox4.TabStop = False
Me.GroupBox4.Text = "Auftrag"
'
'BtnHelp
'
Me.BtnHelp.Anchor = (System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right)
Me.BtnHelp.Image = CType(resources.GetObject("BtnHelp.Image"), System.Drawing.Bitmap)
Me.BtnHelp.Location = New System.Drawing.Point(424, 3)
Me.BtnHelp.Name = "BtnHelp"
Me.BtnHelp.Size = New System.Drawing.Size(24, 23)
Me.BtnHelp.TabIndex = 70
'
'frmblkundenparameter
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(448, 253)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.BtnHelp, Me.GroupBox4, Me.GroupBox1, Me.txtPartner, Me.lblPartner, Me.ToolBar1, Me.GroupBox3})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmblkundenparameter"
Me.ShowInTaskbar = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Periodische Aushändigung"
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox3.ResumeLayout(False)
Me.GroupBox4.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim m_nrpar00 As Integer
Property NRPar00() As Integer
Get
Return m_nrpar00
End Get
Set(ByVal Value As Integer)
m_nrpar00 = Value
End Set
End Property
Dim tblblkunde As New DataTable()
Dim tblperi As New DataTable()
Dim On_Load As Boolean = True
#End Region
Dim has_changes As Boolean = False
#Region "Members"
Private _naechsteAusfuehrung As DateTime
#End Region
Private Sub blkundenparameter_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim xdata As New DataTable()
xdata = get_periode()
Me.cbPeriodizitaet.DataSource = xdata
Me.cbPeriodizitaet.DisplayMember = "Periode"
Me.cbPeriodizitaet.ValueMember = "periodenr"
Me.tblperi = get_peridata()
If Me.tblperi.Rows.Count > 0 Then
Me.cbhatPeriodischeAuslieferung.Checked = True
Me.dterstmalsam.Value = Me.tblperi.Rows(0).Item("erstmals_am")
Me.dtgueltigbis.Value = Me.tblperi.Rows(0).Item("ende")
Try
Me.cbPeriodizitaet.SelectedValue = Me.tblperi.Rows(0).Item("intervall")
Catch
Me.cbPeriodizitaet.SelectedValue = 5
End Try
Dim i As Integer
Try
i = Me.tblperi.Rows(0).Item("intervall1")
Me.cbPeridiozitaetDetail.SelectedIndex = i - 1
Catch
End Try
Try
Me.dtperiodischeAuslieferung.Value = tblperi.Rows(0).Item("auftragsdatum")
If Not tblperi.Rows(0)("naechstes_ereignis") Is DBNull.Value Then
_naechsteAusfuehrung = Convert.ToDateTime(tblperi.Rows(0)("naechstes_ereignis"))
lblNaechteAusfuehrung.Text = _naechsteAusfuehrung.ToShortDateString()
End If
Catch
End Try
Else
Me.cbhatPeriodischeAuslieferung.Checked = False
Dim dt As DateTime
dt = DateAdd(DateInterval.Day, 1, Now)
Me.dterstmalsam.Value = dt
dt = DateAdd(DateInterval.Year, 1, dt)
Me.dtgueltigbis.Value = dt
Me.cbPeriodizitaet.SelectedValue = 6
End If
'beim Starten werden noch keine änderungen gemacht
has_changes = False
Me.On_Load = False
End Sub
Private Function get_bldata(ByVal nrpar00 As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_bldata"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function get_peridata() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_peridata"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@blkundenr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.NRPar00))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function get_periode() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_periode"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Sub cbPeriodizitaet_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbPeriodizitaet.SelectedIndexChanged, dterstmalsam.ValueChanged
If Me.On_Load = True Then Exit Sub
has_changes = True
Try
Dim s As String
s = Me.cbPeriodizitaet.Text
Select Case s
Case "monatlich", "zwei-monatlich", "viertel-jährlich", "viertel-jährlich", "halb-jährlich"
If Me.Last_Day_Of_Period(Me.dterstmalsam.Value) Then
Me.cbPeridiozitaetDetail.Enabled = True
Me.cbPeridiozitaetDetail.SelectedIndex = 1
Else
Me.cbPeridiozitaetDetail.Enabled = False
Me.cbPeridiozitaetDetail.SelectedIndex = -1
Me.cbPeridiozitaetDetail.SelectedText = ""
End If
Case Else
Me.cbPeridiozitaetDetail.Enabled = False
Me.cbPeridiozitaetDetail.SelectedIndex = -1
Me.cbPeridiozitaetDetail.SelectedText = ""
End Select
Catch
End Try
End Sub
Private Function Last_Day_Of_Period(ByVal Datum As DateTime) As Boolean
Dim mm As Integer
Dim dttemp As DateTime
mm = Month(Me.dterstmalsam.Value)
dttemp = Me.dterstmalsam.Value
dttemp = Me.dterstmalsam.Value.AddDays(1)
If Month(dttemp) <> Month(Me.dterstmalsam.Value) Then
Return True
Else
Return False
End If
End Function
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbhatPeriodischeAuslieferung.CheckedChanged
If Me.cbhatPeriodischeAuslieferung.Checked = True Then
Me.GroupBox3.Enabled = True
Me.dtperiodischeAuslieferung.Enabled = True
has_changes = True
Else
Me.GroupBox3.Enabled = False
Me.dtperiodischeAuslieferung.Enabled = False
has_changes = True
End If
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'Exit
Close()
Case 1
If IsInputValid() Then
Me.save_bldata()
End If
End Select
End Sub
Private Function save_bldata()
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_save_bldata"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Try
scmCmdToExecute.Connection = conn.scoDBConnection
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, NRPar00))
If Me.cbhatPeriodischeAuslieferung.Checked = False Then
scmCmdToExecute.Parameters.Add(New SqlParameter("@periauftrag", SqlDbType.DateTime, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dtperiodischeAuslieferung.Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@periode", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@erstmal", SqlDbType.DateTime, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dterstmalsam.Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@gueltig", SqlDbType.DateTime, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dtgueltigbis.Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@Periodizitaet", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, ""))
scmCmdToExecute.Parameters.Add(New SqlParameter("@Periodizitaetdetail", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, ""))
Else
scmCmdToExecute.Parameters.Add(New SqlParameter("@periauftrag", SqlDbType.DateTime, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dtperiodischeAuslieferung.Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@periode", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 1))
scmCmdToExecute.Parameters.Add(New SqlParameter("@erstmal", SqlDbType.DateTime, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dterstmalsam.Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@gueltig", SqlDbType.DateTime, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dtgueltigbis.Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@Periodizitaet", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.cbPeriodizitaet.Text))
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@Periodizitaetdetail", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.cbPeridiozitaetDetail.Items(Me.cbPeridiozitaetDetail.SelectedIndex)))
Catch
scmCmdToExecute.Parameters.Add(New SqlParameter("@Periodizitaetdetail", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, ""))
End Try
End If
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
sdaAdapter.Fill(dtToReturn)
has_changes = False
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Sub cbblerklaerung_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbblerklaerung.CheckedChanged
If Me.cbblerklaerung.Checked = True Then Me.dtblerklaerung.Enabled = True Else Me.dtblerklaerung.Enabled = False
End Sub
Private Sub frmblkundenparameter_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
If has_changes Then
Dim ret As DialogResult
ret = MessageBox.Show("Die Daten wurden verändert. Möchten Sie die Änderungen speichern?", "Änderungen Speichern", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If ret = DialogResult.Yes Then
If IsInputValid() Then
save_bldata()
Else
'input ist ungültig
e.Cancel = True
End If
End If
End If
End Sub
Private Function IsInputValid() As Boolean
Try
Dim s As String = ""
'1) Wenn die Box "Kunde hat periodische Aushändigung" aktiv ist, soll der Dialog nur verlassen werden dürfen, wenn:
If cbhatPeriodischeAuslieferung.Checked Then
If Not IsNothing(_naechsteAusfuehrung) Then
'wenn das Datum "erstmals am" grösser ist als das aktuelle Tagesdatum
If dterstmalsam.Value.Date <= DateTime.Today Then
If s.Length > 1 Then s = s + vbCrLf
s = s + "- Das 'erstmals am' muss grösser sein als das aktuelle Datum"
dterstmalsam.Focus()
End If
End If
'wenn eine Peridiozität ausgewählt wurde
If IsNothing(cbPeriodizitaet.SelectedValue) Then
If s.Length > 1 Then s = s + vbCrLf
s = s + "- Es muss eine Periodizität ausgewhält werden"
dterstmalsam.Focus()
End If
If Me.dtperiodischeAuslieferung.Value > Me.dtgueltigbis.Value Then
If s.Length > 1 Then s = s + vbCrLf
s = s + "- Das Auftragsdatum kann nicht grösser als das Gültigbis-Datum sein."
Me.dtperiodischeAuslieferung.Focus()
End If
If Me.dtperiodischeAuslieferung.Value > Me.dterstmalsam.Value Then
If s.Length > 1 Then s = s + vbCrLf
s = s + "- Das Auftragsdatum kann nicht grösser als das 'Erstmals am'-Datum sein"
Me.dtperiodischeAuslieferung.Focus()
End If
If Me.dterstmalsam.Value >= Me.dtgueltigbis.Value Then
If s.Length > 1 Then s = s + vbCrLf
s = s + "Das Datum 'Erstmals am' liegt nach dem Gültig-Bis-Datum."
End If
End If
If s.Length > 0 Then
s = "Folgende Fehler sind vorhanden:" + vbCrLf + s
MsgBox(s, MsgBoxStyle.Critical)
Return False
Else
Return True
End If
Catch ex As Exception
TKBLib.Errorhandling.TraceHelper.Msg("EDOKAApp.frmblkundenparameter.ValidateInput: ", ex.Message & " StackTrance: " & ex.StackTrace, TraceLevel.Error)
End Try
End Function
Private Sub cbPeridiozitaetDetail_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbPeridiozitaetDetail.SelectedIndexChanged
If Me.On_Load = True Then Exit Sub
has_changes = True
End Sub
Private Sub dtgueltigbis_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dtgueltigbis.ValueChanged
If Me.On_Load = True Then Exit Sub
has_changes = True
End Sub
Private Sub BtnHelp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHelp.Click
Globals.HTMLHelp.ShowHelpToc("periodischeaushndigung")
End Sub
Private Sub dtperiodischeAuslieferung_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles dtperiodischeAuslieferung.ValueChanged
has_changes = True
End Sub
End Class

Binary file not shown.

View File

@@ -0,0 +1,143 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmBPPerson
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(frmBPPerson))
Me.txtMeldung = New System.Windows.Forms.Label()
Me.lblaktuell = New System.Windows.Forms.Label()
Me.BUtton3 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.MenuItem1 = New System.Windows.Forms.MenuItem()
Me.MenuItem2 = New System.Windows.Forms.MenuItem()
Me.PartnerList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
CType(Me.PartnerList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'txtMeldung
'
Me.txtMeldung.Location = New System.Drawing.Point(12, 9)
Me.txtMeldung.Name = "txtMeldung"
Me.txtMeldung.Size = New System.Drawing.Size(511, 58)
Me.txtMeldung.TabIndex = 15
Me.txtMeldung.Text = "Label1"
'
'lblaktuell
'
Me.lblaktuell.AutoSize = True
Me.lblaktuell.Location = New System.Drawing.Point(12, 110)
Me.lblaktuell.Name = "lblaktuell"
Me.lblaktuell.Size = New System.Drawing.Size(82, 13)
Me.lblaktuell.TabIndex = 16
Me.lblaktuell.Text = "Aktuell gewählt:"
'
'BUtton3
'
Me.BUtton3.Location = New System.Drawing.Point(12, 353)
Me.BUtton3.Name = "BUtton3"
Me.BUtton3.Size = New System.Drawing.Size(80, 24)
Me.BUtton3.TabIndex = 17
Me.BUtton3.Text = "Schliessen"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(435, 353)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(88, 23)
Me.Button2.TabIndex = 18
Me.Button2.Text = "Übernehmen"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem2})
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.Text = "&Partner übernehmen"
'
'MenuItem2
'
Me.MenuItem2.Index = 1
Me.MenuItem2.Text = "&Detailinformationen"
'
'PartnerList
'
Me.PartnerList.AllowUpdate = False
Me.PartnerList.AllowUpdateOnBlur = False
Me.PartnerList.AlternatingRows = True
Me.PartnerList.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Anchored
Me.PartnerList.ContextMenu = Me.ContextMenu1
Me.PartnerList.FetchRowStyles = True
Me.PartnerList.FilterBar = True
Me.PartnerList.GroupByCaption = "Drag a column header here to group by that column"
Me.PartnerList.Images.Add(CType(resources.GetObject("PartnerList.Images"), System.Drawing.Image))
Me.PartnerList.Location = New System.Drawing.Point(12, 143)
Me.PartnerList.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.PartnerList.Name = "PartnerList"
Me.PartnerList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.PartnerList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.PartnerList.PreviewInfo.ZoomFactor = 75.0R
Me.PartnerList.PrintInfo.PageSettings = CType(resources.GetObject("PartnerList.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.PartnerList.ScrollTips = True
Me.PartnerList.Size = New System.Drawing.Size(511, 192)
Me.PartnerList.TabIndex = 19
Me.PartnerList.Text = "C1TrueDBGrid1"
Me.PartnerList.PropBag = resources.GetString("PartnerList.PropBag")
'
'ImageList1
'
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
Me.ImageList1.Images.SetKeyName(0, "Person1.png")
Me.ImageList1.Images.SetKeyName(1, "Partner.bmp")
'
'frmBPPerson
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(535, 389)
Me.Controls.Add(Me.PartnerList)
Me.Controls.Add(Me.BUtton3)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.lblaktuell)
Me.Controls.Add(Me.txtMeldung)
Me.Name = "frmBPPerson"
Me.Text = "Auswahl Person / BP"
CType(Me.PartnerList, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents txtMeldung As Label
Friend WithEvents lblaktuell As Label
Friend WithEvents BUtton3 As Button
Friend WithEvents Button2 As Button
Friend WithEvents ContextMenu1 As ContextMenu
Friend WithEvents MenuItem1 As MenuItem
Friend WithEvents MenuItem2 As MenuItem
Friend WithEvents PartnerList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents ImageList1 As ImageList
End Class

View File

@@ -0,0 +1,213 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 7</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="PartnerList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="PartnerList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="PartnerList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{ForeColor:ControlText;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;190&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 509, 190&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 509, 190&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>149, 7</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABM
CQAAAk1TRnQBSQFMAgEBAgEAASABAAEgAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wYABv8BBwFWAlAB8AoA
AeoFtiIAAf8B9AHyBQcB7wFPAVYBGwFWAXIBAAEUAW0E6gFtAesBAAHqBbYiAAG8AQcFvAIHAU8BmAH/
AfYBlwEAAW0B3QO2Ad0BtQHrAQAB6gW2IgACBwW8AgcBTwF4AZgBeAGXAQAB6gO2Ad0BDwMAAeoFtiIA
AbwBBwa8AQcBcgKXAVYB8wEAAeoDtgESAQAB6gHeAQABbQHdBLYiAAG8AQcGvAQHAe0CAAHqArYB1wEA
ARIC3QEAARACEgGNArYiAAH3BP8DvAT/AfMCAAHqA7YB1wHdAbYB3QISAW0BAAHqAdcBtiQAAv8B7QPs
AZIC/wQAAeoDtgHdARIB6gESAt4BbQEAAREB9wG2JQAB/wIHArwB7QH0BQAB6gK2Ad0BDwQAAUMEAAG1
JQAB7wG8AQcB9wIHAfAFAAHrArYBEgEAARAB/wHxAgABEAH/AfEnAAH/AfMB9AHyAfAB7wHtBQAB7AHz
AbYB6gEAAf8BAAH/AgAB/wEUAf8B9yYAA/8B8wHyAQcBkgUAAewB/wHdARIBAAHxAf8B8QIAAewC/ycA
A/8B9AHzAfAB9wUAAewC/wHXARAJAAG2JQAB8gP/AfQBBwH/BQABFAPsAa4DAAG1Ad0B6gEAAREBBwH/
JgAB8QP/AfIMAAG8AfQB8gHxAd4E/zAAAf8B8gEAAf8BFQFDCv8gAAFCAU0BPgcAAT4DAAEoAwABQAMA
ARADAAEBAQABAQUAAYAXAAP/AQAB+AcAAcAHAAHABwABwAcAAcAHAAHAAQEGAAHAAQEGAAHwAQcGAAH4
AQ8GAAH4AQ8GAAH4AQ8GAAH4AQ8GAAH4AQ8GAAH4AQ8GAAH8AR8GAAL/BgAL
</value>
</data>
</root>

View File

@@ -0,0 +1,205 @@
Imports System.Data
Imports System.Data.SqlTypes
Imports System.Data.SqlClient
Public Class frmBPPerson
Dim m_nrpar00 As Integer
Property nrpar00 As Integer
Get
Return m_nrpar00
End Get
Set(value As Integer)
m_nrpar00 = value
End Set
End Property
Dim m_partnernext As String
Property Partnertext As String
Get
Return m_partnernext
End Get
Set(value As String)
m_partnernext = value
End Set
End Property
Dim data As New DataTable
Dim PartnerDoktyp As Integer
Private Sub frmBPPerson_Load(sender As Object, e As EventArgs) Handles MyBase.Load
data = Get_Data(Me.nrpar00, PartnerDoktyp)
Me.PartnerList.DataSource = data
Me.PartnerList.DataMember = data.TableName
SpaltenTitel_Aktualisieren()
Me.lblaktuell.Text = Me.nrpar00.ToString + " - " + Me.Partnertext
Dim bmp0 As New Bitmap(Me.ImageList1.Images(0))
Dim bmp1 As New Bitmap(Me.ImageList1.Images(1))
Dim v0 As New C1.Win.C1TrueDBGrid.ValueItem()
Dim v1 As New C1.Win.C1TrueDBGrid.ValueItem()
v0.DisplayValue = bmp0
v0.Value = 0
v1.DisplayValue = bmp1
v1.Value = 1
Me.PartnerList.Columns("Typ").ValueItems.Values.Add(v0)
Me.PartnerList.Columns("Typ").ValueItems.Values.Add(v1)
Me.PartnerList.Columns("Typ").ValueItems.Translate = True
End Sub
Public Function Check_Partner_Doktyp(ByVal Partnernr As Integer, Doktyp As Integer) As Integer
PartnerDoktyp = DivFnkt.Check_Dokumentpaket_Erstellung(Partnernr, Doktyp)
Select Case PartnerDoktyp
Case 0 'Normale Weiterbearbeitung
Case 1 'BP gewählt, Dokument für BP und Person
Me.txtMeldung.Text = MyMsg.Get_Meldungstext(91002)
Return 1
Case 2 'Person gewählt, Dokument für BP und Persion
Me.txtMeldung.Text = MyMsg.Get_Meldungstext(91003)
Return 2
Case 3 'BP gewählt, Dokument nur für Person
Me.txtMeldung.Text = MyMsg.Get_Meldungstext(91000)
Return 3
Case 4 'Person gewählt, Dokument nur für BP
Me.txtMeldung.Text = MyMsg.Get_Meldungstext(91001)
Return 4
End Select
End Function
Private Sub BUtton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BUtton3.Click
Me.DialogResult = DialogResult.Cancel
Me.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
Me.nrpar00 = PartnerList.Columns("nrpar00").Value
Me.Partnertext = PartnerList.Columns("bkpar00").Value
Me.DialogResult = DialogResult.OK
Me.Close()
Catch
End Try
End Sub
Private Sub PartnerList_FetchRowStyle(ByVal sender As Object, ByVal e As C1.Win.C1TrueDBGrid.FetchRowStyleEventArgs)
If Microsoft.VisualBasic.Left(Me.PartnerList.Columns(0).CellValue(e.Row), 1) = "9" Then
e.CellStyle.BackColor = System.Drawing.Color.CadetBlue
End If
End Sub
Private Sub PartnerList_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs)
If e.KeyCode = Keys.Enter Then
If Me.PartnerList.Splits(0).Rows.Count > 0 Then
Try
Button2_Click(sender, e)
Catch
End Try
End If
End If
End Sub
Public Function Get_Data(ByVal nr As Integer, Partnerdoktyp As Integer)
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "sp_partner_search_dp"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.Parameters.Add(New SqlParameter("@nr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@PartnerDokTyp", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Partnerdoktyp))
scmCmdToExecute.Connection = conn.scoDBConnection
Try
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("BPPerson::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Public Sub SpaltenTitel_Aktualisieren()
'Spaltentitel setzen
Dim titel As New EDOKA.MySpaltenTitel()
Dim ts As New EDOKA.Tabellenspalte()
Dim i As Integer
Dim t As New DataTable()
Dim dc As C1.Win.C1TrueDBGrid.C1DisplayColumn
Dim s As String
t = data
ts.Tabelle = "Partner"
For i = 0 To Me.PartnerList.Columns.Count - 1
s = Me.PartnerList.Columns(i).DataField
ts.Feld = s
ts.getspalte()
Me.PartnerList.Columns(i).Caption = ts.spaltenname
If Me.PartnerList.Columns(i).Caption = "" Then
Me.PartnerList.Splits(0).DisplayColumns(i).Width = 0
Else
Me.PartnerList.Splits(0).DisplayColumns(i).Width = ts.ColWith
End If
' If Me.PartnerList.Columns(i).Caption = "" Then Me.PartnerList.Splits(0).DisplayColumns(i).Width = 0
If ts.locked Then
Me.PartnerList.Splits(0).DisplayColumns(i).Locked = True
End If
If ts.AlsHacken Then
Me.PartnerList.Columns(i).ValueItems.Presentation = C1.Win.C1TrueDBGrid.PresentationEnum.CheckBox
End If
'Präsentation von aktiv
If Me.PartnerList.Columns(i).DataField = "aktiv" Then
Me.PartnerList.Columns(i).ValueItems.Presentation = C1.Win.C1TrueDBGrid.PresentationEnum.CheckBox
Me.PartnerList.Columns(i).ValueItems.DefaultItem = True
Me.PartnerList.Columns(i).DefaultValue = True
Me.PartnerList.Columns(i).FilterText = True
End If
If Me.PartnerList.Columns(i).DataField = "erstellt_am" Then
Me.PartnerList.Columns(i).DefaultValue = Now
End If
Next
End Sub
Private Sub MenuItem1_Click(sender As Object, e As EventArgs) Handles MenuItem1.Click
Button2_Click(sender, e)
End Sub
Private Sub MenuItem2_Click(sender As Object, e As EventArgs) Handles MenuItem2.Click
Try
'Objperson
If DivFnkt.PartnerTyp(Me.PartnerList.Columns(0).Value) = EDOKA.clsDivFnkt.ENUM_Partnertyp.EDOKA_Interessent Then
'If Me.PartnerList.Columns(0).Value > 91000000 Then
Dim f As New frmInteressent()
f.Partnernr = Me.PartnerList.Columns(0).Value
f.Display = True
f.ShowDialog()
f.Dispose()
Else
Dim f As New frmPartnerDetails()
f.Partnernr = Me.PartnerList.Columns(0).Value
f.ShowDialog()
f.Dispose()
End If
Catch
Finally
End Try
End Sub
Private Sub PartnerList_MouseDown(sender As Object, e As MouseEventArgs) Handles PartnerList.MouseDown
Me.PartnerList.Bookmark = Me.PartnerList.RowContaining(e.Y)
End Sub
Private Sub PartnerList_DoubleClick(sender As Object, e As EventArgs) Handles PartnerList.DoubleClick
Button2_Click(sender, e)
End Sub
End Class

View File

@@ -0,0 +1,998 @@
<?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="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAD+
CgAAAk1TRnQBSQFMAgEBBAEAAbQBAAG0AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AFQAQAiYA
AQMB/wgAAgINAAECBwAEyAcAA0cBIAEAAYUD1QkAAewBAwHsAf8IAAECAQACAwYAAgcBAAEDAQABAgYA
B8gGAAFHAiABAAGFAdYC1QcAAQMB7AEDAewBAwH/CAABAgEAAgMGAAIHAQABAwEAAQIGAALIBP8ByAUA
AUcDIAEAAYUC1gHVAQABFwQAAQMB7AEDAewBAwHsAf8BAAHsBgABAgEAAgMGAAIHAQABAwEAAQIFAATI
Av8DyAMAAUcBIAIAASABAAGFAtYB1QEAARcEAAHsAQMB7AEDAewBAwH/AQAB7AYAAQIBAAIDCQABAwEA
AQIFAATIAv8DyAMAAUcFAAWFARcBAAEzAgABAwHsAQMCAAHsAf8BAAHsBgABAgEADAMBAAECBG0BAAPI
A/8DyAIAAW0BRwNtBAABIwKUARcBAAEzAgAB7AEDAewCBwEDAf8BAAHsAQABBgQAAQIBAAIDCAACAwEA
AQIBzgPWAW0BAAfIAwABzgPWAW0EAAUjATMCAAEDAewBAwHsAQMB7AH/AgABBgX+AQIBAAEDAQAIBwEA
AQMBAAECAc4B3QEJAdYBbQEAA8gC/wLIAwABzgHdAQkB1gNtBAABAgL6ATMCAAHsAQMB7AEDAewBAwH/
AQABbQb+AQIBAAEDAQAIBwEAAQMBAAECAc4C3QHWAW0BlAIAA8gFAAHOAt0B1gFtAZQBbQQABQIBAAED
AewBAwHsAQMB7AH/AQAB7AFtAf4EbQECAQABAwEACAcBAAEDAQABAgHOAt0B1gFtAZQCbQgAAc4C3QHW
AW0BlANtCAAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABAgEAAQMBAAgHAQABAwEAAQIFzgGUAW0BngFt
BwAFzgGUAW0BngFtCAABAwHsAQMB7AEHAf8B7AEAAewCAAFtAwABAgEAAQMBAAgHAwABAgIAASACvQGU
AW0BngFtCQABIAK9AZQBbQGeAW0IAAHsAQMBBwH/AewBAAPsBgABAgEAAQMBAAgHAQABBwEAAQICAAUg
AZ4BbQkABSABngFtCAABBwH/AewBAAXsBgABAg4AAQIEAAEzAsIBngFtCwABMwLCAZ4BbRcAEAIEAAUz
CwAFMwcAAUIBTQE+BwABPgMAASgDAAFAAwABIAMAAQEBAAEBBgABARYAA/+BAAH8AX8CAAH+AR8B/gEP
AfABfwIAAfwBBwHCAQ8BwAF/AgAB+AEDAeIBAwEAAR8CAAH4AQMBwgEDAQABHwIAAfABAQGaAgABFwIA
AfABAQG+AgABBwMAAQEBBwGABQABAwEHAYAFAAEDAQEB4AUAAQcBAQHgBQABHwEAAX8BAAEHAwABfwEA
AX8BAAEXAgABwAF/AcABfwEAAR8CAAHAAX8BwAF/AQABHwIAAfABfwHwAX8BAAEfAgAB8AF/AfABfws=
</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Button1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAABVUlEQVQ4T2MwMDD4z0AhABnw/8yBS///
Pf///9nlj/8fnHv1/9XVb8QZXJXYCTYAhpe27Pj/fNf//zEeGWC+lrbm/wObjuM2TEVWA8UAXHjPktMg
Giv4f//+/f8gAKJBfBBuaGgAi4EATAyIsQK4IhgNYzs4OIDpBQsW4DdAQUEBrBDZBdjEgBgTSAhLISsA
YwN1Uwyx9f0HQTSDs8v//8iY4f627/9DXGP/J/hng+mPR///f33g//+ciAqwRi0lvf+LW7egaELGDJfX
vPp/c+OH/2eXPwbTIEOivFLgBiQCDUbWAANwA0CKQBpAmkEYxAdFLUgMhCeWLUAxAB0zgBSBNIG88Pc8
JBbSgwvhrkJWjAzgBoDCAD0gQc4GaT447xqKASAMAzA+A0ghKOmu7Nr9vyi2nnQDQE4H4TSgsyuSWjEM
QDYEHYANgDkbGeMyABP//w8AhlrhKPZyCTAAAAAASUVORK5CYII=
</value>
</data>
<data name="btnPartnerInhaber.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAABh0lEQVQ4T41TQStEURh9/8FGSk1SZCEb
K5tJKbGghhImRjLJzIKkycKb0jQzKE2spxcLKZEaNrMxC42ULGhKqbeQEgusZqFx3HP1jWfmxXx1+u47
95zTd999z3AUHF3WNZUY3GCsBDcw45vH5MAcFvym5ioLXq8X8XgcpmliPRXHciD5K+hk+wLFSyA0Eilz
vV2D7LqQSCQgZR+W0NzYWhb+hVhoi91ANBrV5tvME3zd43rTtm3NsYtBdCzhFFRSchWv9gfyaRsBdVZy
IpIuax6XZVmW8AYWwxFtvtp7wHCPX294PB4tdE7gxikYmOif1eZcugD7tIj6uganQKOjpbOKO9rMsRt6
bAmQkCE1Ca+O/f0ceDn7uYW2pnbsxjLa4xpwc/CMu+M3zbEzZLRvuhxAPTXUVgVwg9yYMtBM8JlXyxAi
tWQhv3PvHsBOM3keoXT9fQtB9TXKVGJ2DSDcXmSlRqADwupski54zH5ify0r3//fAQRfEEd2gj9RZCpW
W8B/cA8o4Aulcg6s2EG/hQAAAABJRU5ErkJggg==
</value>
</data>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAASUlEQVQ4T2OgFfiPAxMF/v/9yI+BQeJQ
jBdg00CSIWCFOTk56AopMoAkF4AARZqRAUWaQQCsGUt4EA0G3gAQoEzz0PcCEYCBAQCfxINLHCrVBwAA
AABJRU5ErkJggg==
</value>
</data>
<metadata name="ImageList3_sik.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>580, 30</value>
</metadata>
<data name="ImageList3_sik.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACy
PQAAAk1TRnQBSQFMAgEBQwEAAbQBAAG0AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARABAQIAAQEBAAEIBgABRBgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc
AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA
AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz
AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA
AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA
AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm
AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA
ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz
AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz
AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz
AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ
AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm
AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM
Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ
AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ
AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA
ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/
ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ
AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA
AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA
AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA
AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ
AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA
AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/
AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/
ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/
AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA
AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP/JwABRAEVPQABRAFu
AUQCFR4AASkPAAEpCwABRAFKAW8FFRoAAYUBAAEpAjcLAAGFAQABKQJZCAABRAFKAUsBdAEVAUQBFQFD
AhEBFRYAAQEBAAGFAeYBKQQ3BwABAQEAAYUB3QEpBFkFAAJEAUoBSwFvARUBbwF0AUsBFQEPARUUAAEn
AREBAQH5AYUB5gEpATcB9wM3BAABJwERAQEBlAGFAd0BKQFZAfcDWQQAAUQCSgNLA3QBbwFLAUQTAAFt
AScB+gEBAfkBhQHmASkCNwL3ATcDAAFtAScBngEBAZQBhQHdASkCWQL3AVkEAAREAREBRAFLA3QBbwFM
AUsBFREAAW0BJwH6AQEB+QGFAeYBKQQ3AfcDAAFtAScBngEBAZQBhQHdASkEWQH3BAABRAFKAUsBFQFD
ARECQwFKAUsBdAFvAUsBFRIAAScB+gEBAfkBhQHmASkBNwL3AjcEAAEnAZ4BAQGUAYUB3QEpAVkC9wJZ
BAABSgFLAUQDFQJDARUBRAJKARUTAAEnAfoBAQH5AYUB5gEpAzcB9wE3BAABJwGeAQEBlAGFAd0BKQNZ
AfcBWQMAAUQBSgNEBBUBSgNvAUsTAAEnAfoBAQH5AYUB5gIpAjcDKQMAAScBngEBAZQBhQHdAikCWQMp
AQAJRAFLBXQBSxIAAScB+gEBAfkBhQLmAikBNwEpATcEAAEnAZ4BAQGUAYUC3QIpAVkBKQFZAwABRARK
AkQBSgFvBXQBRBIAAScB+gIBAfkChQHmAykFAAEnAZ4CAQGUAoUB3QMpAwABRAJLAUoBSwNKAUsBdAGT
A3QBRBMAAicB+gIBAfkDhQcAAicBngIBAZQDhQYAAkQFSwEVAXQBmQJ0FgACJwH6AwEKAAInAZ4DAQsA
AUQCSwFEAgACdBgAAycNAAMnWwAB7B4AAWUB5gQHAuYIAAGmAd0EBwHdAQcJAAHsAhoBBwHsAQcBGgGa
BHoCAAMwBQAHMAIAAWUH5ggAAaYG3QEHCQAB7AHDARoBAAHsAQABGgKaA3oCAAEwAqABhQPWAQABmgGg
BJoBMAIAAWUB5gQHAuYBAAL5BQABpgHdBAcB3QEHAQABlAEHBgAB7AKgAQcB7AEHAxoBmgJ6AgABMAHD
AaABhQHdAQkB1gMAAaADmgEwAgABZQfmAQAC+QUAAaYG3QEHAQABlAEHBgAB7AKgAQAB7AEAAZoDGgKa
AgABMAHDAaABhQLdAdYBAAGUAQABmgGgApoBMAIAAWUB5gEHAeYCBwLmAQAC+QUAAaYB3QEHAd0CBwHd
AQcBAAGUAQcGAAHsAqABBwHsAQcBoAMaApoCAAEwAcMBoAGFAt0B1gEAAZQDAAGgAZoBMAIAAWUH5gEA
AvkBAAL6AgABpgbdAQcBAAGUAQcBAAGeAQcDAAHsAqABAAHsAQABoAQaAZoCAAEwAcMBoAWFAZQBAAGe
AQABmgGgATACAAFlAeYDBwHmAWUCAAL5AQAC+gIAAaYB3QMHAd0BpgIAAZQBBwEAAZ4BBwMAAewBwwGg
AQcB7AEHAaABmgQaAgABMAHDA6ABIwK9AZQBAAGeAQABoAGaATACAAFlBeYBZQHmAQAC+QEAAvoCAAGm
Bd0BpgHdAQABlAEHAQABngEHAwAB7AHDAaABAAHsAQADoAMaAgABMAHDA6AFIwGeAQABmgGgATACAAhl
A/kBAAL6AgAHpgGFApQBBwEAAZ4BBwMAAewBwwGgAQcBAAGSA6ABmgIaAgABMAH0AcMEoAECAsIBngEA
AaABmgEwBQABIwH5AwcB+QEjAgAC+gUAASMBlAMHAZQBIwIAAZ4BBwMAAewBwwGgAewB7wEABqACAAEw
AvQEwwUCAZoBoAEwBQABIwX5ASMB+QEAAvoFAAEjBZQBIwGUAQABngEHAwAB7ALDAewB9gEABqACAAEw
B5oHMAUACCMD+gUACCMCngEHAwAB7ALDAewBBwEAAXoCoAYAATAB9ALDAqABMA8AAScB+gMHAfoBJwkA
AQIBngMHAZ4BAgQAAewDwwHsAsMCoAHsAaAFAAUwEAABJwX6AScB+ggAAQIFngECAZ4DAAHsB8MBoAHs
GwAIJwgACAIDAArs/wD/AP8A/wD/AP8A/wD/AF0ADvsyAAH7DAAB+wkAAiABAAIgAQACIAgAAiABAAIg
AQACIAQAAe8BvAHvAbwE7wUAAfsCAAn7AQAB+wkAAiABAAIgAQACIAgAAiABAAIgAQACIAQAAf8EvAHv
AbwB7wUAAfsDAAL7BAAC+wEAAfslAAL/Ae8BvAHvAbwC7wUAAfsEAAL7BgAB+wIAAfwBAAH8AQAB/AEA
AfwBAAH8BgAKAgoAAf8BvAH/BLwB7wUAAfsBAAL7AQAC+wIAAvsCAAH7AQAB/Aj/BwABAgj/AQIKAAL/
AbwB/wHvAbwB7wG8BQAB+wEAAvsCAAX7AgAB+wIAAf8BAAH8Af8B/AEAAv8B/AYAAQIB/wgCCgAB/wG8
Af8BvAH/ArwB7wUAAfsBAAL7AgAC+wEAAvsCAAH7AQAB/AH/AfwBAAEHAQAB/AEHAf8HAAECAf8DAgEH
BAIKAAL/AbwB/wkAAfsCAAL7AQAC+wUAAfsCAAH/AQAB/AEAAfwBAAH8Af8B/AYAAQIC/wECAQcDAgH/
AQIKAAH/AbwB/wG8AQABvALvBQAB+wMAAvsBAAL7AQAC+wEAAfsBAAH8Af8B/AH/AfwBAAH/AQABBwcA
AQIB/wECAQcDAgL/AQIKAAT/AQAB/wG8Ae8FAAH7BAAH+wEAAfsCAAH8AQAB/wEAAfwB/wH8AQAB/AYA
AQIB/wEHBQIB/wECCgAE/wEAAf8BvAYAAfsMAAH7AQAB/AEAAfwBAAH8AQAB/AEAAfwHAAECAf8CAgL/
AgIB/wECFwAB+wwAAfsCAAj/AfwGAAECCP8BAhcADvsBAAH8AQAB/AEAAfwBAAH8AQAB/AcACgJaAAEH
AgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEHCgAD7CgAAQcCAAEHAQABBwEAAQcCAAEH
CAABBwT/AQcKAAfvAwAB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AsAAewBAAH/
AQAD/wHsAQcJAAH/BQAB7wIAAfwI/wcAAfwI/w0AAQcH/wHsCAAC/wG8Af8BvAH/Ae8DAAH/AQAB/AH/
AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwMAAH/AQAC/wIAAv8B7AIABe8BAAH/BQAB7wIAAfwB/wH8
AQABBwEAAfwBBwH/AQAE1gIAAfwB/wH8AQABBwEAAfwBBwH/AQAE1ggAAf8BAAL/AwAB/wEHAgAB/wUA
Av8BvAH/AbwB/wHvAwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHWAwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHW
CAABBwP/AQAD/wHsAgAB/wG8Af8BvAH/AQAB/wIAAbwFAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHW
AgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gcAAuwB/wEAAf8BAAH/AewB/wEAAewBAAH/BQAC/wG8
Af8BAAH/BAAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/
AdYFAAIgAgAB7AX/AewDAAH/AbwB/wG8Af8BAAT/BQAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gIA
AfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYEAAFBAiAEAAHsAQcB7AUAAf8CAAH/DAAI/wH8Af8B1gEH
AdYDAAj/AfwB/wHWAQcB1gMAAeMCQQQgAewDAAHsBAAB/wG8Af8BvAEAAf8JAAH8AQAB/AEAAfwBAAH8
AQAB/AEAAf8D1gIAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAD4wNBBSAGAAT/DwAK1gYACtYDAATj
AkEDIBoAAdYI/wHWBgAB1gj/AdYEAAPjHwAK1gYACtYFAALjPwABBwIAAQcBAAEHAQABBwIAAQc1AAEH
AgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEHEQAKAgYACgIGAAoCBwAB/AEAAfwBAAH8
AQAB/AEAAfwGAAECCP8BAgYAAQII/wECBgABAgj/AQIGAAH8CP8HAAECAf8IAgYAAQIB/wgCBgABAgH/
CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAECAf8DAgEHBAIGAAECAf8DAgEHBAIEmAIAAQIB/wMCAQcEAgSY
AgAB/AH/AfwBAAEHAQAB/AEHAf8HAAECAv8BAgEHAwIB/wECBgABAgL/AQIBBwMCAf8BAgP/AZgCAAEC
Av8BAgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEAAfwB/wH8BgABAgH/AQIBBwMCAv8BAgYAAQIB/wEC
AQcDAgL/AQIEmAIAAQIB/wECAQcDAgL/AQIEmAIAAfwB/wH8Af8B/AEAAf8BAAEHBwABAgH/AQcFAgH/
AQIGAAECAf8BBwUCAf8BAgSYAgABAgH/AQcFAgH/AQIEmAMAAfwBAAH/AQAB/AH/AfwBAAH8BgABAgH/
AgIC/wICAf8BAgYAAQIB/wICAv8CAgH/AQICmAH/AZgCAAECAf8CAgL/AgIB/wECApgB/wGYAgAB/AEA
AfwBAAH8AQAB/AEAAfwHAAECCP8BAgYAAQII/wECAZgC/wGYAgABAgj/AQIBmAL/AZgDAAj/AfwGAAoC
BgAKAgKYAf8BmAIACgICmAH/AZgCAAH8AQAB/AEAAfwBAAH8AQAB/BsAAZgB/wKYAv8CmAH/AZgGAAGY
Af8CmAL/ApgB/wGYJgABmAj/AZgGAAGYCP8BmCYACpgGAAqYJgABBwIAAQcBAAEHAQABBwIAAQcRAAHs
AwABBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBxEAAewEBwIAAQcBAAEHAQABBwIA
AQcVAAEHAgABBwEAAQcBAAEHAgABBwQAAewBBwH7AgcBAAPsBAAB7AP/AQcCAAEHAQABBwEAAQcCAAEH
AgAB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AkAAewD/wH7Af8BAAH7AQcC7AIA
AewB/wQHAf8DBwH/AQcEAAH8CP8HAAH8CP8LAAHsAfsD/wH7AQAB/wH7AQcB7AEAAewK/wEHBQAB/wEA
AfwB/wH8AQAC/wH8BwAB/wEAAfwB/wH8AQAC/wH8CgAB7AL/AfsC/wEAAf8CAAHsAQAB7AH/BAcB/wMH
Af8BBwQAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gIAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gcAAewD/wH7
AewBAAH/AfsBBwEAAewK/wEHBQAB/wEAAfwBAAH8AQAB/AH/AfwD/wHWAwAB/wEAAfwBAAH8AQAB/AH/
AfwD/wHWCQAB+wP/AfsC/wEHAQAB7AH/CAcB/wEHBAAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIA
AfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYHAAIBAQAB/wH7A/8B+wEHAQAB7Ar/AQcFAAH8AQAB/wEA
AfwB/wH8AQAB/AHWAQcB/wHWAwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAgEDAAEBAQAD/wH7
Av8BBwEAAewB/wIHAf8FBwH/AQcEAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAgAB/AEAAfwBAAH8
AQAB/AEAAfwBAALWAf8B1gMAAfkBAQEAAfkBAAEBAwAD/wH7AQcBAAHsCv8BBwUACP8B/AH/AdYBBwHW
AwAI/wH8Af8B1gEHAdYDAAL5AgAC+QEAA/8B+wL/AQcBAAHsAf8CBwH/BQcB/wEHBAAB/AEAAfwBAAH8
AQAB/AEAAfwBAAH/A9YCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gkAAv8B+wP/AfsBBwEAAewI/wsA
CtYGAArWBwAB7AH/AfsD/wH7Av8BBwEAAewB/wYHAf8B7AH/CQAB1gj/AdYGAAHWCP8B1gcACuwBAAHs
CP8B7AoACtYGAArWEgAK7E4AAcgBAAHdAQAByAsAAS0BAAHCAQABLQsAASUBAAGaAQABJRoAAcgF3QHI
CQABLQXCAS0JAAElBZoBJRgAAsgB3QHIAQAByAHdCQACLQHCAS0BAAEtAcIJAAIlAZoBJQEAASUBmgQA
AfwBAAH8AQAB/AEAAfwBAAH8DAAByALdAQAB7AEAAt0ByAcAAS0CwgEAAewBAALCAS0HAAElApoBAAHs
AQACmgElAQAB/Aj/DQACyAHdAcgBAAHIAd0JAAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaBAAB/wEA
AfwB/wH8AQAC/wH8DQAByAXdAcgJAAEtBcIBLQkAASUFmgElAgAB/AH/AfwBAAEHAQAB/AEHAf8OAALI
AQAB3QEAAcgKAAItAQABwgEAAS0KAAIlAQABmgEAASUEAAH/AQAB/AEAAfwBAAH8Af8B/AgAAcgBAAHd
AQAByAIABMgFAAEtAQABwgEAAS0CAAQtBQABJQEAAZoBAAElAgAEJQMAAfwB/wH8Af8B/AEAAf8BAAEH
CAAByAXdAcgJAAEtBcIBLQkAASUFmgElCQAB/AEAAf8BAAH8Af8B/AEAAfwGAALIAd0ByAEAAcgB3QkA
Ai0BwgEtAQABLQHCCQACJQGaASUBAAElAZoJAAH8AQAB/AEAAfwBAAH8AQAB/AcAAcgC3QEAAewBAALd
AcgHAAEtAsIBAAHsAQACwgEtBwABJQKaAQAB7AEAApoBJQgACP8B/AYAAsgB3QHIAQAByAHdCQACLQHC
AS0BAAEtAcIJAAIlAZoBJQEAASUBmgkAAfwBAAH8AQAB/AEAAfwBAAH8CAAByAXdAcgJAAEtBcIBLQkA
ASUFmgElGQACyAEAAd0BAAHICgACLQEAAcIBAAEtCgACJQEAAZoBAAElHAAEyAwABC0MAAQlLAABLQFV
AS0NAAEtAVUBLSEAAewH/wQAAS0BVQEtDQABLQFVAS0SAAEqAQABmgEAASoKAAHsB/8EAAEtAVUBLQ0A
AS0BVQEtEQABKgWaASoJAAHsB/8EAAMtAgAH/wQAAy0CAAf/BwACKgGaASoBAAEqAZoMAAb/BAAB7AUA
Bv8EAAHsBQAG/wcAASoCmgEAAewBAAKaASoDAAa1AQAG/wIAAuwF4QIABf8CAALsAugB7wH/Ae8CAAX/
BwACKgGaASoBAAEqAZoFAAS1AwAG/wIAAewB4QH/BeEBAAX/AgAB7APoAe8B/wHvAf8BAAX/CAABKgWa
ASoEAAO1AQACtQEABv8BAAHsAeEB/wfhAQAE/wEAAewB6AH/AugB7wH/Ae8C/wEABP8IAAIqAQABmgEA
ASoFAAa1AQAE/wHsAgAB7AH/AeEB/wbhAQAE/wEAAewB/wPoAe8B/wHvAv8BAAT/AwABKgEAAZoBAAEq
AgAEKgUABbUDAAP/AewB/wEAAewB4QH/B+EBAAT/AQAB7AHoAv8B6AHvAf8B7wL/AQAE/wIAASoFmgEq
CgAHtQEABewBAAHsA/8B4QH/BOEBAAL/AewCAAHsAf8B6AL/Ae8B/wHvAv8BAAL/AewCAAIqAZoBKgEA
ASoBmgsAB7UBAAH/AewFAAHsA/8B4QH/AeEB/wEAA/8B7AH/AgAB7AH/AegB/wHvAf8B7wH/AQAD/wHs
Af8BAAEqApoBAAHsAQACmgEqCQAEtQEAArUBAAH/AewB/wQAAuwB/wHhAf8B4QH/AgAF7AIAAuwB/wHo
Ae8B/wHvAgAF7AEAAioBmgEqAQABKgGaCwAEtQEAAbUBAATsBgAD7AIAA/8B7AcAA+wCAAP/AewFAAEq
BZoBKgoABrUNAAHsBf8B7AH/CAAB7AX/AewB/wQAAioBAAGaAQABKh4ACOwIAAjsBgAEKjwAAS0BVQEt
DQAB7AUHAewJAAHsBQcB7AkAAewFBwHsCQABLQFVAS0NAAGvBbYBrwHsCAABLQVaAS0B7AgAASUFTQEl
AewIAAEtAVUBLQ0AAa8FtgKvAewHAAEtBVoCLQHsBwABJQVNAiUB7AcAAy0NAAGvBbYDrwHsBgABLQVa
Ay0B7AYAASUFTQMlAewGAAHsDwABrwW2AQADrwHsBQABLQVaAQADLQHsBQABJQVNAQADJQHsAwAC7ATh
AW0CAAS1BAAC7AX/AgADrwQAAuwF/wIAAy0EAALsBf8CAAMlAwAB7AXhAW0BvAEAArUFAAPsBf8BAAEH
AQACrwMAA+wF/wEAAQcBAAItAwAD7AX/AQABBwEAAiUCAAHsAeEB/wThAW0CvAIAArUDAALsAQcF7AIH
Af8BAAGvAwAC7AEHBewCBwH/AQABLQMAAuwBBwXsAgcB/wEAASUCAAHsAf8F4QFtArwBAAO1AwAB7AEH
AewDBwLsAQcD/wQAAewBBwHsAwcC7AEHA/8EAAHsAQcB7AMHAuwBBwP/AwAB7AHhA/8C4QFtArwBAAK1
BAAB7AH/AQcB7AMHAQAF7AMAAewB/wEHAewDBwEABewDAAHsAf8BBwHsAwcBAAXsAgAB7AH/AeEC/wLh
AW0CvAEABLUDAAHsAf8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewBBwEAAewE/wEHBAAB7AH/AQcB7AEH
AQAB7AT/AQcDAAHsAf8B4QH/AuEBbQG8AQAFtQQAAewB/wEHAgAB7AT/AQcFAAHsAf8BBwIAAewE/wEH
BQAB7AH/AQcCAAHsBP8BBwMAAuwB/wHhAf8B4QFtAgACtQEAArUFAAHsAf8DAAXsBgAB7AH/AwAF7AYA
AewB/wMABewFAAPsAgAEtQEAAbUHAAHsDwAB7A8AAewSAAa1TAABEgGUBJMxAAETAeoEEgHqAW4BAAES
AZQEkxMAAewFBwHsCQAB7AUHAewHAAHqAbcDlAG3AZMBbgEAARIBlASTEwABMQVZATEB7AgAAeYF1gHm
AewGAAESAZQCkwG3AQ4DAAESAZQEkwEABtcBAAb0BQABMQVZAjEB7AcAAeYF1gLmAewFAAESAZQBkwGU
ARIBAAESAb0BAAHqAbcBlAOTAQAE1wUABPQFAAExBVkDMQHsBgAB5gXWA+YB7AQAARIBlAGTAbcBAAES
ArcBAAEQAhIBbgKTAQAD1wEAAtcBAAL0AQAD9AUAATEFWQEAAzEB7AUAAeYF1gEAA+YB7AMAARIBlAKT
ArcBlAG3ARMBEgFtAQABEgG3AZMBAAbXAQAG9AQAAuwF/wIAAzEEAALsBf8CAAPmAwABEgGUApMBtwET
ARIBEwK9AW0BAAERAY4BlAEABdcDAAX0AwAD7AX/AQABBwEAAjEDAAPsBf8BAAEHAQAC5gMAARIBlAGT
AbcBDgQAAREEAAGTAQAF1wEAB/QDAALsAQcF7AIHAf8BAAExAwAC7AEHBewCBwH/AQAB5gMAAesBkwGU
AUQBAAEQAf8B8QIAARAB/wHxAwAF1wEAB/QDAAHsAQcB7AMHAuwBBwP/BAAB7AEHAewDBwLsAQcD/wQA
AewB8wGTARIBAAH/AQAB/wIAAf8BFAH/AfcCAAPXAQAB1wEAAvQBAAT0AwAB7AH/AQcB7AMHAQAF7AMA
AewB/wEHAewDBwEABewDAAHsAf8BtwFEAQAB8QH/AfECAAHsAv8DAAPXAQAC1wL0AQAE9AQAAewB/wEH
AewBBwEAAewE/wEHBAAB7AH/AQcB7AEHAQAB7AT/AQcDAAHsAv8BtwEQCQABkwEABtcH9AUAAewB/wEH
AgAB7AT/AQcFAAHsAf8BBwIAAewE/wEHAwABFALsAe0BbgMAAY4BtwESAQABEQEHAf8UAAHsAf8DAAXs
BgAB7AH/AwAF7AkAAbwB8wG9ARoBvQT/FQAB7A8AAewKAAH/AfIBAAH/ARUBQwr/WgAB6gW2CgAB6gW2
BgAB7AEwCgAC+QIAAfkKAAEUAW0E6gFtAesBAAHqBbYBAAEUAW0E6gFtAesBAAHqBbYFAAHsATABegwA
ArwLAAFtAd0DtgHdAbUB6wEAAeoFtgEAAW0B3QO2Ad0BtQHrAQAB6gW2BAAC7AF6AQAC+QkAArwCAAFt
CQAB6gO2Ad0BDwMAAeoFtgEAAeoDtgHdAQ8DAAHqBbYBAAHsAjAB7AF6AQACvAsAA7wBAAH/AQAB7AYA
AeoDtgESAQAB6gHeAQABbQHdBLYBAAHqA7YBEgEAAeoB3gEAAW0B3QS2AQABMAN6AQACvAIAAW0GAALs
BLwBAAL/BwAB6gK2AdcBAAESAt0BAAEQAhIBjQK2AQAB6gK2AdcBAAESAt0BAAEQAhIBjQK2AewBegEA
AnoCAAO8AQABVgEAAVYDAALsAQAEvAMAAVABAAFQAwAB6gO2AdcB3QG2Ad0CEgFtAQAB6gHXAbYBAAHq
A7YB1wHdAbYB3QISAW0BAAHqAdcBtgEAA3oBMAEABLwBAAJWBAAC7AEAArwCAAP/AQABvAQAAeoDtgHd
ARIB6gESAt4BbQEAAREB9wG2AQAB6gO2Ad0BEgHqARIC3gFtAQABEQH3AbYCAAHsAgAB7AEABLwGAAPs
AQACvAEAA/8BAAG8BAAB6gK2Ad0BDwQAAUMEAAG1AQAB6gK2Ad0BDwQAAUMEAAG1BAAC7AEAArwCAAP/
BAAF7AEABP8BAAG8AwAB6wK2ARIBAAEQAf8B8QIAARAB/wHxAwAB6wK2ARIBAAEQAf8B8QIAARAB/wHx
BgAD7AEAArwBAAP/CgAC/wIAArwDAAHsAfMBtgHqAQAB/wEAAf8CAAH/ARQB/wH3AgAB7AHzAbYB6gEA
Af8BAAH/AgAB/wEUAf8B9wYABewBAAT/BgADvAEAAv8BAAO8AgAB7AH/Ad0BEgEAAfEB/wHxAgAB7AL/
AwAB7AH/Ad0BEgEAAfEB/wHxAgAB7AL/DQAC/wkABbwBAAG8BAAB7AL/AdcBEAkAAbYBAAHsAv8B1wEQ
CQABtggAA7wBAAL/DQAB7AK8AwABFAPsAa4DAAG1Ad0B6gEAAREBBwH/AQABFAPsAa4DAAG1Ad0B6gEA
AREBBwH/CQAFvAsABewJAAG8AfQB8gHxAd4E/wcAAbwB9AHyAfEB3gT/IAAB/wHyAQAB/wEVAUML/wHy
AQAB/wEVAUMK/xQAAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQABBwIAAQcYAAL/GwABBwIA
AQcBAAEHAQABBwIAAQcWAAL/AgAC/wUACgIGAAoCDAAB7AwAAfMB/wIAAv8CAAL/AwABAgj/AQIGAAEC
CP8BAgwAAewDAwYAAewC/wIAAv8CAAL/AgAB/wIAAQIB/wgCBgABAgH/CAIMAAHsAf8B7AEDCQAB8wH/
AgAC/wIAAv8DAAECAf8DAgEHBAIEmAIAAQIB/wMCAQcEAgSYCAAB7AH7AewBAwYAAewC/wIAAv8CAAL/
AgAB/wIAAQIC/wECAQcDAgH/AQID/wGYAgABAgL/AQIBBwMCAf8BAgP/AZgIAAHsAf8B7AEDCQAB8wH/
AgAC/wIAAv8DAAECAf8BAgEHAwIC/wECBJgCAAECAf8BAgEHAwIC/wECBJgHAAHsAf8B+wHsAQMGAAHs
Av8CAAL/AgAC/wIAAf8CAAECAf8BBwUCAf8BAgSYAgABAgH/AQcFAgH/AQIEmAYAAewB+wH/AwcBAwgA
AfMB/wIAAv8CAAL/AwABAgH/AgIC/wICAf8BAgKYAf8BmAIAAQIB/wICAv8CAgH/AQICmAH/AZgFAAHs
Av8BBwH7AgcBAwHsBAAB7AL/AgAG/wIAAf8CAAECCP8BAgGYAv8BmAIAAQII/wECAZgC/wGYBAAB7AH/
AvsB/wQHAQMB7AYACv8DAAoCApgB/wGYAgAKAgKYAf8BmAIAAuwB+wH/AvsD/wEHAf8CBwEDAgAB7Az/
BwABmAH/ApgC/wKYAf8BmAYAAZgB/wKYAv8CmAH/AZgCAA7sAwAC7Aj/CQABmAj/AZgGAAGYCP8BmBUA
AuwE/wsACpgGAAqYFwAC7B0AAewEAAXsDgABUCUAAuwCBwH5AfsB/gVeDgACUBUAAfkEAAX5BAAB7AMH
BOwFXg0ABFAUAAL5AwAC+QcAAfoB+wH/AQcBAAH5AfsB/gReAewDAAVQBAAGUAoCCAAE+QQAAhoEAAHs
AvoB+wEHAQAB+QL+AQcC7AUAAlAGAAZQAQABAgj/AQIHAAb5AwABGgUAAewBBwH5AfsB+gMABQcGAAIa
BAACUAEAAlACAAECAf8IAgYABvkEAAQaAgAB7AMHAfkDAAHsAQcJAAEaBQABUAIAAVADAAECAf8DAgEH
BAIGAAL5AQAC+QYAAxoCAAHsAwcB+QMAAewEXgHsBQAEGgIAAVAGAAECAv8BAgEHAwIB/wECBgAB+QIA
AfkGAAUaAQAB7AIHAfkB+wEAA+wFXgYAAxoCAAFQBgABAgH/AQIBBwMCAv8BAgYAAfkJAAMaBAABBwH5
AfsB+gTsBV4FAAUaCAABAgH/AQcFAgH/AQIGAAH5CwACGgMAAewB+wH6Af4BAAMHAewB/wEHBwADGgoA
AQIB/wICAv8CAgH/AQIHAAH5EAAG7AIHAewC/wEHBwACGgkAAQII/wECGAAB7AReAewCAAHsA/8BBxEA
CgIYAAHsBF4B7AMAAf8C7AH/MwAG7AcAAewzAAPsWgAB7D8AAewLBwsAB7YJAAfkCQAHdQIAAewK/wEH
CwAB8wUAAbYJAAHCBQAB5AkAARsFAAF1AgAB7AH/BAcB/wMHAf8BBwsAAvMDvAHzAbYJAALCAZ4BwgGe
AcIB5AkAAhsBvQH/Ab0B/wF1AgAB7Ar/AQcFAAW2AQAB8wUAAbYDAAXkAQABwgUAAeQDAAV1AQABGwUA
AXUCAAHsAf8EBwH/AwcB/wEHBQAB8wUAAvMBvAHzAbwB8wG2AwABwgUAAsIBngHCAZ4BwgHkAwABGwUA
AhsBvQH/Ab0B/wF1AgAB7Ar/AQcFAAHzA7wB8wEAAfMCAAHzBgABwgGeAcIBngHCAQABwgIAAZ4GAAEb
Ab0B/wG9Af8BAAEbAgABvQUAAewB/wgHAf8BBwUAAfMFAALzAbwB8wEAAfMEAAHCBQACwgGeAcIBAAHC
BAABGwUAAhsBvQEbAQAB/wMAAewK/wEHBQAB8wG8AfMBvAHzAQAE8wYAAcIBngHCAZ4BwgEABMIGAAEb
Ab0B/wG9Af8BAAQbBQAB7AH/AgcB/wUHAf8BBwUAAfMCAAHzDAABwgIAAcIMAAEbAgAB/wsAAewK/wEH
BQAB8wG8AvMBAAHzCgABwgGeAsIBAAHCCgABGwG9ARsB9AEAAf8JAAHsAf8CBwH/BQcB/wEHBQAE8wwA
BMIMAAQbCwAB7Aj/NwAB7AH/BgcB/wHsAf81AAHsCP8B7DYACuwNAAEwAewHAAHsAwABBwIAAQcBAAEH
AQABBwIAAQcnAAEwAfsC7AYAAewEBwIAAQcBAAEHAQABBwIAAQcmAAEwA/sC7AUAAewD/wEHAgABBwEA
AQcBAAEHAgABBwgAB1kJAAfWBgABMAX7AuwEAAHsAf8EBwH/AwcB/wEHCwABwwUAAVkJAAEZBQAB1gUA
ATAC+wIAA/sC7AMAAewK/wEHCwACwwGaAcMBmgHDAVkJAAIZAd0BGQHdARkB1gQAATAD+wIABPsC7AIA
AewB/wQHAf8DBwH/AQcFAAVZAQABwwUAAVkDAAXWAQABGQUAAdYDAAEwC/sC7AEAAewK/wEHBQABwwUA
AsMBmgHDAZoBwwFZAwABGQUAAhkB3QEZAd0BGQHWAgABMAX7AuoG+wPsAf8IBwH/AQcFAAHDAZoBwwGa
AcMBAAHDAgABwwYAARkB3QEZAd0BGQEAARkCAAHdBQABMAX7AgAG+wHsAQAB7Ar/AQcFAAHDBQACwwGa
AcMBAAHDBAABGQUAAhkB3QEZAQABGQQAATAE+wIABfsB7AIAAewB/wIHAf8FBwH/AQcFAAHDAZoBwwGa
AcMBAATDBgABGQHdARkB3QEZAQAEGQcAATAD+wIABPsB7AMAAewK/wEHBQABwwIAAcMMAAEZAgABGQ4A
ATAC+wIAA/sB7AQAAewB/wIHAf8FBwH/AQcFAAHDAZoCwwEAAcMKAAEZAd0CGQEAARkNAAEwAfsCAAL7
AewFAAHsCP8IAATDDAAEGRAAATAD+wHsBgAB7AH/BgcB/wHsAf8rAAEwAfsB7AcAAewI/wHsLQABMAgA
CuwmAAFCAU0BPgcAAT4DAAEoAwABQAMAARABAQIAAQEBAAEBBQABgAEIFgAD/wEABP8B/AH/AgAE/wH4
AT8CAAH/AR8B/wEfAfABDwIAAfwBBwH8AQcB4AEDAgAB8AEBAfABAQHAAQMCAAHAAQEBwAEBAcABAwIA
AYABAQGAAQEBwAMAAYABAQGAAQEBwAMAAcABAQHAAQEBwAEBAgABwAEBAcABAQGAAQECAAHAAQEBwAEB
BAABwAEDAcABAwGAAwABwAEHAcABBwEAAQECAAHAAR8BwAEfAYABBwIAAeABfwHgAX8B8AHPAgAB8QH/
AfED/wIAAv8BgAE/AYABPwHAAQEBgAEAAYABPwGAAT8BwAEBAgABgAEHAYABBwHAAQECAAGAAQcBgAEH
AcABAQIAAYABBwGAAQcBwAEBAgABgAEAAYABAAHAAQECAAGAAQABgAEAAcABAQIAAYABAAGAAQABwAEB
AgABgAEAAYABAAHAAQECAAGAAQABgAEAAcABAQIAAfABAAHwAQABwAEBAgAB8AEAAfABAAHAAQEBAAEB
AfABAAHwAQABwAEBAYAB/wH+AQAB/gEAAcABAwHBAf8B/gEAAf4BAAHAAQcC/wH+AQEB/gEBAcABD///
Af8EAAT/AX8B/gIABP8BYAEGAgAB/wEkAf8BJAFgAQYCAAH/ASQB/wEkAWABBgIABP8BYAEGAwABPwEA
AT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEA
AT8BYAEGAwABPwEAAT8BYAEOAwABPwEAAT8BYAEeAwABPwEAAT8BfwH+AwABPwEAAT8EAAb/AfABAAH/
AYcE/wHwAQAB/gEDAfwBAQL/AfABAAH8AQEB/AEBAQABPwEAAT8B+AEAAfwBAQEAAT8BAAE/AfgCAAEB
AQABPwEAAT8B+AIAAQEBAAEDAQABAwH4AgABAQEAAQMBAAEDAfgCAAEBAQABAwEAAQMB+AIAAQMBAAED
AQABAwHkAQEBAAEHAQABAwEAAQMBxgIAAQ8BAAEDAQABAwGAAQUBAAH/AQABAwEAAQMBAAEfAQEB/wHw
AQMB8AEDAYABIwEDAf8B8AEDAfABAwHHA/8B8AEDAfABAwHnAfEG/wHwAQAG/wHwAQAG/wHwAQAC/wEA
AT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAEDAQABAwEA
AT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEA
AQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8C/wHwAQMB8AEDBP8B8AEDAfABAwT/
AfABAwHwAQME/wHwAQAC/wIAAv8B8AEAAfABDwIAAv8B8AEAAeABAwMAAT8BAAE/AeABAQEAAQcBAAE/
AQABPwHwAgABBwEAAT8BAAE/AfACAAEHAQABAwEAAQMB+AIAAQcBAAEDAQABAwH4AgABBwEAAQMBAAED
AZACAAEHAQABAwEAAQMDAAEHAQABAwEAAQMDAAEHAQABAwEAAQMDAAEHAQABAwEAAQMBmAIAAQcB8AED
AfABAwH4AgABDwHwAQMB8AEDAfgCAAEfAfABAwHwAQMC/wEAAT8B/wGHAf8BhwH/AYcC/wH+AQEB/gEB
Af4BAQL/Af4BAAH+AQAB/gEAAv8B/AEAAfwBAAH8AgABPwH8AQAB/AEAAfwCAAE/AfwBAAH8AQAB/AIA
AT8B/gEBAf4BAQH+AQEBAAE/AeABAQHgAQEB4AEBAQABPwGAAQcBgAEHAYABBwEAAT8BgAE/AYABPwGA
AT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AYABfwGA
AX8BgAF/Av8BgAF/AYABfwGAAX8C/wHhAf8B4QH/AeED/wH+AQAB4QH/AeEC/wGHAf4BAAHhAf8B4QH/
Af4BAQH+AQAB4AEAAeABAAH+AQAB/gEAAeABAAHgAQAB/AEAAYABAAHgAQAB4AEAAfwBAAGAAQABgAEA
AYABAAH8AQABgAEAAYABAAGAAQAB/gEBAYAFAAHgAQEBgAUAAYABBwGABQABgAE/AYABAQUAAT8BgAED
AYABAAGAAgABPwGAAQMBgAEBAYABAQEAAT8BgAEHAeABAwHgAQMBgAF/AYABfwH4AQMB+AEDAYABfwGA
AX8B+AEHAfgBBwHhAf8B4AE/AeABPwHgAT8B4QH/AeABHwHgAR8B4AEfAeEB/wHgAQ8B4AEPAeABDwHh
Af8B4AEHAeABBwHgAQcB4QH/AeABAwHgAQMB4AEDAeABAQHgAQEB4AEBAeABAQGAAQEBwAEBAcABAQHA
AQEBgAEBAYABAQGAAQEBgAEBAQABAQGAAQEBgAEBAYABAQEAAQEBgAEBAYABAQGAAQEBAAEBAYABAQGA
AQEBgAEBAgABgAEBAYABAQGAAQEBgAEAAcABAQHAAQEBwAEBAYABAAHhAQEB4QEBAeEBAQHgAQEB8QGD
AfEBgwHxAYMB/gEBAfkB/wH5Af8B+QH/Af4BAQIAAf8BvwHgAT8B4AE/AgAB/wF/AeABHwHgAR8DAAEB
AeABDwHgAQ8DAAEBAeABBwHgAQcDAAEBAeABAwHgAQMDAAEBAeABAQHgAQEDAAEBAcABAQHAAQEDAAEB
AYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEB
AcABAQHAAQEDAAEBAeEBAQHhAQECAAH+Af8B8QGDAfEBgwIAAf8BfwH5Af8B+QH/AfwD/wQAAfgBfwGA
Af8EAAHwAX8BwQH/BAABgAEfAcABfwUAAT8BgAEPBQABDwEAAR8FAAEBAQABAQUAAQMBAAEDBAABgAED
AQABAwQAAeABAQGAAQEEAAHgAQEBwAEBBAAB8AEAAfAFAAH4AQEB+AEBBAAB/gEBAfwBAQQAAf8BAQH/
AQEEAAH/AYEB/wGDBAAC/wHwAQAC/wH+AX8C/wHwAQAC/wH4AR8C/wHwAQAC/wHgAQcBAAE/AQABPwH8
AR8BgAEBAQABPwEAAT8B/AEfAQABAwEAAT8BAAE/AfwBHwGAAQEBAAEDAQABAwH8AR8BAAEDAQABAwEA
AQMB/AEfAYABAQEAAQMBAAEDAfgBDwEAAQMBAAEDAQABAwHwAQcBgAEBAQABAwEAAQMB4AEDAQABAwEA
AQMBAAEDAcABAQGAAQEBAAEDAQABAwMAAQMB8AEDAfABAwIAAYABBwHwAQMB8AEDAv8B4AEfAfABAwHw
AQMC/wH4AX8C/wHwAYEB/wH3BP8BwAEBAf8B8wL/Ae4BAwGAAQEB/wHhAv8B5gEHAYABAwEBAcABAAE/
AcMBBwEAAQ8BAwGBAQABPwGBAYMBAAEHAYMBkwEAAT8BAwEBAQMBAQHBAbcBAAE/ASYBAQEDAQEBgAG/
AQABPwFuAgABAQEAAb8BAAE/AX4BAQGAAQEBAAF/AQABPwF+AQEBgAEHAQAB/wEAAT8BvgECAcABAwEA
Af8BAAE/Af8BAAHAAgEBfwEAAT8B/wGDAcAB4AGAAX8E/wHAAf4BwQX/AeML/wEAAQcB/AEBAfwBAQH8
AQEBAAEHAfwBAQH8AQEB/AEBAQABBwH8AQEB/AEBAfwBAQEAAQcBAAEBAQABAQEAAQEBAAEHAQABAQEA
AQEBAAEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEBAQABAQEAAQEBAAEHAQABAwEAAQMBAAEDAQABBwEA
AQcBAAEHAQABBwEAAQcBAAEPAQABDwEAAQ8BAAEHAQAB/wEAAf8BAAH/AQABBwEBAf8BAQH/AQEB/wEA
AQcBAwH/AQMB/wEDAf8BAAEPBv8BAAEfBv8BAAE/Af4BfwIABP8B/AE/AgAB/AEBAfwBAQH4AR8CAAH8
AQEB/AEBAfABDwEAAQcB/AEBAfwBAQHgAQcBAAEHAQABAQEAAQEBwAEDAQABBwEAAQEBAAEBAYABAQEA
AQcBAAEBAQABAQMAAQcBAAEBAQABAQEAAQEBAAEHAQABAwEAAQMBgAEDAQABBwEAAQcBAAEHAcABBwEA
AQcBAAEPAQABDwHgAQ8BAAEHAQAB/wEAAf8B8AEfAQABBwEBAf8BAQH/AfgBPwEAAQ8BAwH/AQMB/wH8
AX8BAAEfBP8B/gH/AQABPwT/Cw==
</value>
</data>
<data name="DokList.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="DokList.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj00LjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="DokList.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:White;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:White;}RecordSelector{AlignImage:Center;BackColor:ActiveCaptionText;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:White;}Style14{}Footer{}Heading{Wrap:True;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;Border:None,,0, 0, 0, 0;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView AllowColMove="False" AllowColSelect="False" AllowRowSelect="False" Name="" AllowRowSizing="IndividualRows" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" MarqueeStyle="NoMarquee" RecordSelectorWidth="20" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;228&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 548, 228&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 550, 230&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ImageList2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>123, 17</value>
</metadata>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABM
CgAAAk1TRnQBSQFMAgEBBQEAAbQBAAG0AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wEABv8CCgj/MAAF/wEE
Am0BZgEKBv8wAAT/AQQBbQIHAm0BZgEKBP8wAAP/AQQBbQEHArwB/wEHAm0BZgP/MAAC/wEEAW0BBwG6
Af8BvAG6AbwB/wEHARUD/zAAAf8BBAFtAQcC/wK6Af8CvAEHAQAD/zAAAQQBbQGSAv8B7wL/AZEB8QHv
AgACCjEAAUMBBwG8Ae8B8QHsAWcEbQEVAhACBDAAARUBkgHqAf8BvAHvARACbQHvAfMC/wHxAgQwAAFD
AQABFQEHAfEBkgFtAWcBDAFtAQcD/wFfAQQwAAH/AQABQwEAARUC7AHvAmcB8wH/AQcBFTIAA/8BQwEA
AUMCAAHvAmcB7AEAA/8wAAj/AgACDAT/MAAL/wIMA/8wAAz/AgwC/zAADf8BAAL/MAAQ/yAAAewPABD/
IAAB7AH/AgcB/wMHAf8BBwYAEP8gAAHsCP8BBwYAEP8gAAHsAf8G7AH/AQcGABD/AwAJ/wcACf8EAAHs
Av8DAAP/AQcGABD/AwAJ/wcAA/8BAAX/BAAB7AH/AQcB7AH/AQcBAAEHAf8BBwYAEP8DAAn/BwAC/wMA
BP8EAAHsAv8B7AEAAUoB7AEAAf8BBwYAEP8DAAn/BwAB/wUAA/8EAAHsAf8BBwH/AkoBBwFKAQABBwYA
EP8DAAn/BwAB/wIAAf8DAAL/BAAB7AT/AUoBegEHAUoHABD/AwAJ/wcAAf8BAAP/AwAB/wQAAewB/wQH
AUoBegEHAUoGABD/AwAJ/wcABv8CAAH/BAAB7Ab/AUoBegEHAUoFABD/AwAJ/wcAB/8BAAH/BAAB7AH/
BAcB/wHsAUoBegEHAUoEABD/AwAJ/wcACf8EAAHsBv8B7AEAAUoB7AEAAUUDABD/IAAI7AMAAUcBqwFF
AgAQ/ysAAkUDABD/MAABQgFNAT4HAAE+AwABKAMAAUADAAEgAwABAQEAAQEGAAEBFgAD/4MABP8BAAEf
AgAE/wEAAR8CAAT/AQABHwIAAcABBwHAAQcBAAEfAgABwAEHAcABBwEAAR8CAAHAAQcBwAEHAQABHwIA
AcABBwHAAQcBAAEfAgABwAEHAcABBwEAAR8CAAHAAQcBwAEHAQABHwIAAcABBwHAAQcBAAEfAgABwAEH
AcABBwEAAQ8CAAHAAQcBwAEHAQABBwIAAcABBwHAAQcBAAEDAgABwAEHAcABBwEAAcMCAAX/AecCAAb/
Cw==
</value>
</data>
<metadata name="ContextMenuDokTyp.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>686, 30</value>
</metadata>
<metadata name="ContextMenuDokument.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>841, 30</value>
</metadata>
<data name="PicHinweis.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAE0klEQVRoQ+1XaUhUURR+k6NJSdIiRhLZ
QotFRVFR9CMIIoqWP/4JSqIotIgoCAqCFoiinRYMoqK9CYo22rHFNEtzSSvbbMVQsSzLcpbT+c59981Y
Rn9m9Anvwsfb7nvzfec7594zhjOc4QxnOMN2o6z4ClU83ULmZdsa5WWnKdAYRwFfDH2vHUdF+dltS4jv
q0H+BoMCfoVsTzxt3HC4bYiorphBde/bcfSjyNswxBIxbdJ0WrUy094ikPcgLwIaE6nyebpKJdOFhIR0
unapwL4iPj2fJeR9NS4m3l0c8Pv6kr8+6ML8OSvsK0BHXwgj8t5Y8jf2t+oh62RXceH29SL7idDRV+mj
yEv+e5MknUJdWLRwnf0ENI0+E+aoPzzlVi4gjUwXLh7sKS5kXS20j4jK8rlUU+ymHx+R+3F07Wh3inH3
sKBcSSQsr4FGgyaMTaVlS7fbR4COvu8zBCRaxDtEp1DH6DGSNgFvL9OdoAt5d0taX4SOvooy5z7DEuCe
KJg8YYYIExd4hYIQ27hQVRQtAn59UtEP+F1CPjqqpyVAHOCNDbUgArgeju/uS0lJi1vXhQ/Plgej/7OT
csBcaSR92k8RASCrVqRePC+Bfr13ST0MHzqvdXdnkA8WL6cHaoCJFpxwiYChQxbQ+FGpVJXfXq1CLFJc
qFICDm0bKC60SrOH6FcVxoiAQH28kAMxCCg9bUgKzZyaJgJQuEgdeQ4XfnSjwFuXODFyWBqtW3Og5QUg
9yHg+2MmxQKEHJNCZHEOB7BhIZ1QtPq5iIWICp7Lju1Zn0IDBmW0rAtvS1dTzQO3CPC9M0mBHASYLoA4
lkrP3t7iQJPnLECOL9S9fv0zWrbdRtpUP4yhhlImVt85GF0NFrB7bYoIkN04RICACxktBt7Hu5kbBooL
JY9yIy9CRx9Q0e+sSHFKCPgcaZTriZNVSOahuPWcV+ocxSz3+BpCUPCbNx2JvACkTW1eO/pWEhWMPkgB
ISJ+cm1gCcW1zNHkNbjdhgte0wU4NnhwBhUX5EROBKJfl+sSAUKovosig1wGNDlEloH2WZ9b83AsVymF
VluePVH3kUZbNx+LnACkw5d7hkRXyOPHQUYDBBFxLJlmy2Atn5o45uD4lI/8DelUUUv8LewLEasFRP/D
VRfV5ZgkkPuaCGCKANk8T6zVD8W6kyVNmojF/DIGi5JagJs8B0sydueI7AvYTatvuejLff4xkEFEQQLk
kAKAKUCTB9CNIr+llQZxzMN7GnAStfBYidS1UJR/L3wiXj45SJU3eelkAfqHhAjIhwLRfRMUgGiiVcD/
YKRSs+/ATfxr42f4NmoMy+/OHSfDJwB/F99dNkSAImqS+RN8Hw6gfYaALvFpdOPyI+n/RbR2QAMO4Mii
cS7u8hxsgqNHzA6fAET/zSVDaqA2m+uAowTgB4HQcyVQbWSI/NnMZLmH6DY33wIvDjV31Pt6EzzruRMe
EXAADdqLcwZVXGRc+De0UBAW0kwM7v3rvdc48rNQh3UbEtZihgsQgFb5fyg8YfyF5uZp4DkC9Op8MPrJ
fRaFtw4w9u87I7mJFjjcwHdR9CCPwp+VuiS8K5EeKMrt245LdDR27TwlCD3/87q5ufpan2sgUBEh7wxn
OMMZznCG/YZh/AYIAGxQRLvtyAAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1009, 30</value>
</metadata>
<metadata name="ImageList4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>229, 17</value>
</metadata>
<data name="ImageList4.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAG
CQAAAk1TRnQBSQFMAgEBAgEAAbQBAAG0AQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/0IAAaYB3QQHAd0BBwgA
AWUB5gQHAuYoAAGmBt0BBwgAAWUH5igAAaYB3QQHAd0BBwEAAZQBBwUAAWUB5gQHAuYBAAL5JQABpgbd
AQcBAAGUAQcFAAFlB+YBAAL5JQABpgHdAQcB3QIHAd0BBwEAAZQBBwUAAWUB5gEHAeYCBwLmAQAC+SUA
AaYG3QEHAQABlAEHAQABngEHAgABZQfmAQAC+QEAAvoiAAGmAd0DBwHdAaYCAAGUAQcBAAGeAQcCAAFl
AeYDBwHmAWUCAAL5AQAC+iIAAaYF3QGmAd0BAAGUAQcBAAGeAQcCAAFlBeYBZQHmAQAC+QEAAvoiAAem
AYUClAEHAQABngEHAgAIZQP5AQAC+iUAASMBlAMHAZQBIwIAAZ4BBwUAASMB+QMHAfkBIwIAAvolAAEj
BZQBIwGUAQABngEHBQABIwX5ASMB+QEAAvolAAgjAp4BBwUACCMD+igAAQIBngMHAZ4BAgkAAScB+gMH
AfoBJykAAQIFngECAZ4IAAEnBfoBJwH6KAAIAggACCchAAFCAU0BPgcAAT4DAAEoAwABQAMAARADAAEB
AQABAQUAAYAXAAP/AQABgAE/AYABPwQAAYABPwGAAT8EAAGAAQcBgAEHBAABgAEHAYABBwQAAYABBwGA
AQcEAAGAAQABgAUAAYABAAGABQABgAEAAYAFAAGAAQABgAUAAYABAAGABQAB8AEAAfAFAAHwAQAB8AUA
AfABAAHwBQAB/gEAAf4FAAH+AQAB/gUAAf4BAQH+AQEEAAs=
</value>
</data>
<metadata name="Timer2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1095, 30</value>
</metadata>
<metadata name="ImageList3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>465, 56</value>
</metadata>
<data name="ImageList3.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACA
RAAAAk1TRnQBSQFMAgEBSQEAAQQBBwEEAQcBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATABAQIAAQEBAAEIBgABTBgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc
AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA
AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz
AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA
AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA
AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm
AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA
ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz
AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz
AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz
AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ
AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm
AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM
Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ
AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ
AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA
ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/
ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ
AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA
AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA
AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA
AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ
AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA
AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/
AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/
ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/
AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA
AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP/QgAB8gTzAbsDBwK8
A/QyAAHyA/MCRwdGAkcxAAEZA/MCRwFGARoCRgL/AUYCRzEAARkD8wJHAUYBGgH/AUYC/wFGAkcxAAHx
A/MBRwlNAUcxAAHwBPMF9AEZNQAB8AfzAvIBGTUAARkG8wLyAvE1AAEZBfMC8gHxAvA1AAfpBEY1AAPp
BUYD8zUABOkERgLzAfQ1AATpBEYB8wH0twABvAHtApIF9wKSAe0HAAb/AQcBVgJQAfAKAAHqBfkSAAG8
AgcBvAHvAQcCkgHtAZIB7QEHBAAB/wH0AfIFBwHvAU8BVgEbAVYBcgEAARQBbQTqAW0B6wEAAeoF+QEA
AfIE8wG7AwcCvAP0AwABvAF0AvAB8QHvAe0B7wL3AewBBwQAAbwBBwW8AgcBTwGYAf8B9gGXAQABbQHd
A/kB3QG1AesBAAHqBfkBAAHyA/MCRwdGAkcCAAG8AZMBTQLzAfIC8wHyAfEB8AEHBAACBwW8AgcBTwF4
AZgBeAGXAQAB6gP5Ad0BDwMAAeoF+QEAARkD8wJHAUYBGgJGAv8BRgJHAgABvAHxAZQBJgH/AfMB9ALz
AfQB8QEHBAABvAEHBrwBBwFyApcBVgHzAQAB6gP5ARIBAAHqAd4BAAFtAd0E+QEAARkD8wJHAUYBGgH/
AUYC/wFGAkcCAAG8AfIB8wH/ASYBlAH0Af8CdQFNAbwEAAG8AQcGvAQHAe0CAAHqAvkB1wEAARIC3QEA
ARACEgGNAvkBAAHxA/MBRwlNAUcCAAG8AfIB8wH0AZQB/wG9AU0BmgEaAfQBvAQAAfcE/wO8BP8B8wIA
AeoD+QHXAd0BtgHdAhIBbQEAAeoB1wH5AQAB8AMAAfMF9AEZBgABvAHyAfMB9AH/AZoB4wH/AfQB8wHy
AbwGAAL/Ae0D7AGSAv8EAAHqA/kB3QESAeoBEgLeAW0BAAERAfcB+QEAAfAJAAEZBgABvAHyAvMB9AFH
Af8C9AHzAfIBvAcAAf8CBwK8Ae0B9AUAAeoC+QHdAQ8EAAFDBAABtQEAARkJAAHxBgABvAHxAfIB8wH0
AUcB/wH0AvMB8QG8BwAB7wG8AQcB9wIHAfAFAAHrAvkBEgEAARAB/wHxAgABEAH/AfEDAAEZCQAB8AYA
AbwB8AHxAfIB8wFHAfQC8wHyAfAB9wcAAf8B8wH0AfIB8AHvAe0FAAHsAvkB6gEAAf8BAAH/AgAB/wEU
Af8B9wIAB+kERgYAArwB8AHxAfIBTQHzAfIB8ALvAbwHAAP/AfMB8gEHAZIFAAHsAf8B3QESAQAB8QH/
AfECAAHsAv8DAAPpBUYD8wYAAbwBBwK8AfABkwHxAvAB9AEHCAAD/wH0AfMB8AH3BQAB7AL/AdcBEAkA
AbYBAATpBEYC8wH0BgABvAQHA7wB8AEHCQAB8gP/AfQBBwH/BQABFAPsAa4DAAG1Ad0B6gEAAREBBwH/
AQAE6QRGAfMB9AcAAbwD7wQHAe8LAAHxA/8B8gwAAbwB9AHyAfEB3gT/MAAB/wHyAQAB/wEVAUMK/zIA
DuwG/wHzAvEB8gH0Bf8uAALsBP8B8wHvAbsCugHwAZEBBwHzA/8IAAEpGAAN+wEAAewD/wHwAZABswO5
AbsBCQGzAZEB8QL/BgABhQEAASkCNxYABfsCAAEpBfsBAAHsAv8B8AGQA7MCuQG6Af8CswGRAfIB/wQA
AQEBAAGFAeYBKQQ3FAAF+wIAASkE+wEAAuwB/wH0AZADswEJAfQBugG5Af8BugGzAZABkgH0AgABJwER
AQEB+QGFAeYBKQE3AfcDNxQAC/sBAAHsAQAB/wG8A7MBuQG6ARkBuQG6Af8BugKzAZAB8QEAAW0BJwH6
AQEB+QGFAeYBKQI3AvcBNxQABfsBAAT7AQAB7AIAAf8BkQG0ArMCuQH/ARkB9AH/AbMBCQG7AZABBwEA
AW0BJwH6AQEB+QGFAeYBKQQ3AfcVAAT7AQAE+wEAAewCAAH/AZAEswG5AboD/wGzAfQBCQGQAe8CAAEn
AfoBAQH5AYUB5gEpATcC9wI3FQAD+wMAAvsBAAHsAwAB/wGRArQBugKzA/8BCQH0ArMBkAHvAgABJwH6
AQEB+QGFAeYBKQM3AfcBNxYAAvsDAAL7AQAB7AMAAf8BkQS7AfAC/wH0BLMBiwG8AgABJwH6AQEB+QGF
AeYCKQI3AykVAAL7AwAB+wEAAewEAAH/AfABuwHwAfMB9AP/AboDswGQAYsB8wIAAScB+gEBAfkBhQLm
AikBNwEpATcXAAL7AQAC+wEAAewEAAL/AbQB8gHzAQkB/wH0AfMBGQEJArMBkAHvAf8CAAEnAfoCAQH5
AoUB5gMpGAAE+wEAAewFAAL/AfMBtAG7AbwB/wEZAQkC8wG0AZABkQH0Af8CAAInAfoCAQH5A4UbAAP7
AQAB7AUAA/8B8gG0AfMB/wH0AgkBuwK0AfQC/wMAAicB+gMBHQAC+wgABP8B9AHwAf8BCQG7ArUB8AT/
BAADJykACP8B9Af/UQABZQHmBAcC5ggAAaYB3QQHAd0BBxcAAzAFAAcwAgABZQfmCAABpgbdAQcPAAEp
BwABMAKgAYUD1gEAAZoBoASaATACAAFlAeYEBwLmAQAC+QUAAaYB3QQHAd0BBwEAAZQBBwoAAYUBAAEp
AlkFAAEwAcMBoAGFAd0BCQHWAwABoAOaATACAAFlB+YBAAL5BQABpgbdAQcBAAGUAQcIAAEBAQABhQHd
ASkEWQMAATABwwGgAYUC3QHWAQABlAEAAZoBoAKaATACAAFlAeYBBwHmAgcC5gEAAvkFAAGmAd0BBwHd
AgcB3QEHAQABlAEHBgABJwERAQEBlAGFAd0BKQFZAfcDWQIAATABwwGgAYUC3QHWAQABlAMAAaABmgEw
AgABZQfmAQAC+QEAAvoCAAGmBt0BBwEAAZQBBwEAAZ4BBwIAAW0BJwGeAQEBlAGFAd0BKQJZAvcBWQIA
ATABwwGgBYUBlAEAAZ4BAAGaAaABMAIAAWUB5gMHAeYBZQIAAvkBAAL6AgABpgHdAwcB3QGmAgABlAEH
AQABngEHAgABbQEnAZ4BAQGUAYUB3QEpBFkB9wIAATABwwOgASMCvQGUAQABngEAAaABmgEwAgABZQXm
AWUB5gEAAvkBAAL6AgABpgXdAaYB3QEAAZQBBwEAAZ4BBwMAAScBngEBAZQBhQHdASkBWQL3AlkCAAEw
AcMDoAUjAZ4BAAGaAaABMAIACGUD+QEAAvoCAAemAYUClAEHAQABngEHAwABJwGeAQEBlAGFAd0BKQNZ
AfcBWQIAATAB9AHDBKABAgLCAZ4BAAGgAZoBMAUAASMB+QMHAfkBIwIAAvoFAAEjAZQDBwGUASMCAAGe
AQcDAAEnAZ4BAQGUAYUB3QIpAlkDKQEAATAC9ATDBQIBmgGgATAFAAEjBfkBIwH5AQAC+gUAASMFlAEj
AZQBAAGeAQcDAAEnAZ4BAQGUAYUC3QIpAVkBKQFZAgABMAeaBzAFAAgjA/oFAAgjAp4BBwMAAScBngIB
AZQChQHdAykEAAEwAfQCwwKgATAPAAEnAfoDBwH6AScJAAECAZ4DBwGeAQIEAAInAZ4CAQGUA4UHAAUw
EAABJwX6AScB+ggAAQIFngECAZ4EAAInAZ4DAR4ACCcIAAgCBQADJysAAew/AAHsAhoBBwHsAQcBGgGa
BHo0AAHsAcMBGgEAAewBAAEaApoDejQAAewCoAEHAewBBwMaAZoCejQAAewCoAEAAewBAAGaAxoCmjQA
AewCoAEHAewBBwGgAxoCmjQAAewCoAEAAewBAAGgBBoBmjQAAewBwwGgAQcB7AEHAaABmgQaNAAB7AHD
AaABAAHsAQADoAMaNAAB7AHDAaABBwEAAZIDoAGaAho0AAHsAcMBoAHsAe8BAAagNAAB7ALDAewB9gEA
BqA0AAHsAsMB7AEHAQABegKgNwAB7APDAewCwwKgAewBoDUAAewHwwGgAew2AArs/wD/AP8A/wBpAA77
MgAB+wwAAfsJAAIgAQACIAEAAiAIAAIgAQACIAEAAiAEAAHvAbwB7wG8BO8FAAH7AgAJ+wEAAfsJAAIg
AQACIAEAAiAIAAIgAQACIAEAAiAEAAH/BLwB7wG8Ae8FAAH7AwAC+wQAAvsBAAH7JQAC/wHvAbwB7wG8
Au8FAAH7BAAC+wYAAfsCAAH8AQAB/AEAAfwBAAH8AQAB/AYACgIKAAH/AbwB/wS8Ae8FAAH7AQAC+wEA
AvsCAAL7AgAB+wEAAfwI/wcAAQII/wECCgAC/wG8Af8B7wG8Ae8BvAUAAfsBAAL7AgAF+wIAAfsCAAH/
AQAB/AH/AfwBAAL/AfwGAAECAf8IAgoAAf8BvAH/AbwB/wK8Ae8FAAH7AQAC+wIAAvsBAAL7AgAB+wEA
AfwB/wH8AQABBwEAAfwBBwH/BwABAgH/AwIBBwQCCgAC/wG8Af8JAAH7AgAC+wEAAvsFAAH7AgAB/wEA
AfwBAAH8AQAB/AH/AfwGAAECAv8BAgEHAwIB/wECCgAB/wG8Af8BvAEAAbwC7wUAAfsDAAL7AQAC+wEA
AvsBAAH7AQAB/AH/AfwB/wH8AQAB/wEAAQcHAAECAf8BAgEHAwIC/wECCgAE/wEAAf8BvAHvBQAB+wQA
B/sBAAH7AgAB/AEAAf8BAAH8Af8B/AEAAfwGAAECAf8BBwUCAf8BAgoABP8BAAH/AbwGAAH7DAAB+wEA
AfwBAAH8AQAB/AEAAfwBAAH8BwABAgH/AgIC/wICAf8BAhcAAfsMAAH7AgAI/wH8BgABAgj/AQIXAA77
AQAB/AEAAfwBAAH8AQAB/AEAAfwHAAoCWgABBwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEH
AgABBwoAA+woAAEHAgABBwEAAQcBAAEHAgABBwgAAQcE/wEHCgAH7wMAAfwBAAH8AQAB/AEAAfwBAAH8
BwAB/AEAAfwBAAH8AQAB/AEAAfwLAAHsAQAB/wEAA/8B7AEHCQAB/wUAAe8CAAH8CP8HAAH8CP8NAAEH
B/8B7AgAAv8BvAH/AbwB/wHvAwAB/wEAAfwB/wH8AQAC/wH8BwAB/wEAAfwB/wH8AQAC/wH8DAAB/wEA
Av8CAAL/AewCAAXvAQAB/wUAAe8CAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAH8Af8B/AEAAQcBAAH8
AQcB/wEABNYIAAH/AQAC/wMAAf8BBwIAAf8FAAL/AbwB/wG8Af8B7wMAAf8BAAH8AQAB/AEAAfwB/wH8
A/8B1gMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1ggAAQcD/wEAA/8B7AIAAf8BvAH/AbwB/wEAAf8CAAG8
BQAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYHAALs
Af8BAAH/AQAB/wHsAf8BAAHsAQAB/wUAAv8BvAH/AQAB/wQAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/
AdYDAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWBQACIAIAAewF/wHsAwAB/wG8Af8BvAH/AQAE/wUA
AfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWBAABQQIg
BAAB7AEHAewFAAH/AgAB/wwACP8B/AH/AdYBBwHWAwAI/wH8Af8B1gEHAdYDAAHjAkEEIAHsAwAB7AQA
Af8BvAH/AbwBAAH/CQAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YCAAH8AQAB/AEAAfwBAAH8AQAB/AEA
Af8D1gIAA+MDQQUgBgAE/w8ACtYGAArWAwAE4wJBAyAaAAHWCP8B1gYAAdYI/wHWBAAD4x8ACtYGAArW
BQAC4z8AAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEH
AgABBxEACgIGAAoCBgAKAgcAAfwBAAH8AQAB/AEAAfwBAAH8BgABAgj/AQIGAAECCP8BAgYAAQII/wEC
BgAB/Aj/BwABAgH/CAIGAAECAf8IAgYAAQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgABAgH/AwIBBwQC
BgABAgH/AwIBBwQCBJgCAAECAf8DAgEHBAIEmAIAAfwB/wH8AQABBwEAAfwBBwH/BwABAgL/AQIBBwMC
Af8BAgYAAQIC/wECAQcDAgH/AQID/wGYAgABAgL/AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8
Af8B/AYAAQIB/wECAQcDAgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAECAf8BAgEHAwIC/wECBJgCAAH8
Af8B/AH/AfwBAAH/AQABBwcAAQIB/wEHBQIB/wECBgABAgH/AQcFAgH/AQIEmAIAAQIB/wEHBQIB/wEC
BJgDAAH8AQAB/wEAAfwB/wH8AQAB/AYAAQIB/wICAv8CAgH/AQIGAAECAf8CAgL/AgIB/wECApgB/wGY
AgABAgH/AgIC/wICAf8BAgKYAf8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8BwABAgj/AQIGAAECCP8BAgGY
Av8BmAIAAQII/wECAZgC/wGYAwAI/wH8BgAKAgYACgICmAH/AZgCAAoCApgB/wGYAgAB/AEAAfwBAAH8
AQAB/AEAAfwbAAGYAf8CmAL/ApgB/wGYBgABmAH/ApgC/wKYAf8BmCYAAZgI/wGYBgABmAj/AZgmAAqY
BgAKmCYAAQcCAAEHAQABBwEAAQcCAAEHEQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEH
AQABBwIAAQcRAAHsBAcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcEAAHsAQcB+wIH
AQAD7AQAAewD/wEHAgABBwEAAQcBAAEHAgABBwIAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8
AQAB/AEAAfwJAAHsA/8B+wH/AQAB+wEHAuwCAAHsAf8EBwH/AwcB/wEHBAAB/Aj/BwAB/Aj/CwAB7AH7
A/8B+wEAAf8B+wEHAewBAAHsCv8BBwUAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AoA
AewC/wH7Av8BAAH/AgAB7AEAAewB/wQHAf8DBwH/AQcEAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAH8
Af8B/AEAAQcBAAH8AQcB/wEABNYHAAHsA/8B+wHsAQAB/wH7AQcBAAHsCv8BBwUAAf8BAAH8AQAB/AEA
AfwB/wH8A/8B1gMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gkAAfsD/wH7Av8BBwEAAewB/wgHAf8BBwQA
AfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYCAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWBwACAQEA
Af8B+wP/AfsBBwEAAewK/wEHBQAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAfwBAAH/AQAB/AH/
AfwBAAH8AdYBBwH/AdYDAAIBAwABAQEAA/8B+wL/AQcBAAHsAf8CBwH/BQcB/wEHBAAB/AEAAfwBAAH8
AQAB/AEAAfwBAALWAf8B1gIAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAH5AQEBAAH5AQABAQMA
A/8B+wEHAQAB7Ar/AQcFAAj/AfwB/wHWAQcB1gMACP8B/AH/AdYBBwHWAwAC+QIAAvkBAAP/AfsC/wEH
AQAB7AH/AgcB/wUHAf8BBwQAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAB/AEAAfwBAAH8AQAB/AEA
AfwBAAH/A9YJAAL/AfsD/wH7AQcBAAHsCP8LAArWBgAK1gcAAewB/wH7A/8B+wL/AQcBAAHsAf8GBwH/
AewB/wkAAdYI/wHWBgAB1gj/AdYHAArsAQAB7Aj/AewKAArWBgAK1hIACuxOAAHIAQAB3QEAAcgLAAEt
AQABwgEAAS0LAAElAQABmgEAASUaAAHIBd0ByAkAAS0FwgEtCQABJQWaASUYAALIAd0ByAEAAcgB3QkA
Ai0BwgEtAQABLQHCCQACJQGaASUBAAElAZoEAAH8AQAB/AEAAfwBAAH8AQAB/AwAAcgC3QEAAewBAALd
AcgHAAEtAsIBAAHsAQACwgEtBwABJQKaAQAB7AEAApoBJQEAAfwI/w0AAsgB3QHIAQAByAHdCQACLQHC
AS0BAAEtAcIJAAIlAZoBJQEAASUBmgQAAf8BAAH8Af8B/AEAAv8B/A0AAcgF3QHICQABLQXCAS0JAAEl
BZoBJQIAAfwB/wH8AQABBwEAAfwBBwH/DgACyAEAAd0BAAHICgACLQEAAcIBAAEtCgACJQEAAZoBAAEl
BAAB/wEAAfwBAAH8AQAB/AH/AfwIAAHIAQAB3QEAAcgCAATIBQABLQEAAcIBAAEtAgAELQUAASUBAAGa
AQABJQIABCUDAAH8Af8B/AH/AfwBAAH/AQABBwgAAcgF3QHICQABLQXCAS0JAAElBZoBJQkAAfwBAAH/
AQAB/AH/AfwBAAH8BgACyAHdAcgBAAHIAd0JAAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaCQAB/AEA
AfwBAAH8AQAB/AEAAfwHAAHIAt0BAAHsAQAC3QHIBwABLQLCAQAB7AEAAsIBLQcAASUCmgEAAewBAAKa
ASUIAAj/AfwGAALIAd0ByAEAAcgB3QkAAi0BwgEtAQABLQHCCQACJQGaASUBAAElAZoJAAH8AQAB/AEA
AfwBAAH8AQAB/AgAAcgF3QHICQABLQXCAS0JAAElBZoBJRkAAsgBAAHdAQAByAoAAi0BAAHCAQABLQoA
AiUBAAGaAQABJRwABMgMAAQtDAAEJSwAAS0BVQEtDQABLQFVAS0hAAHsB/8EAAEtAVUBLQ0AAS0BVQEt
EgABKgEAAZoBAAEqCgAB7Af/BAABLQFVAS0NAAEtAVUBLREAASoFmgEqCQAB7Af/BAADLQIAB/8EAAMt
AgAH/wcAAioBmgEqAQABKgGaDAAG/wQAAewFAAb/BAAB7AUABv8HAAEqApoBAAHsAQACmgEqAwAGtQEA
Bv8CAALsBeECAAX/AgAC7ALoAe8B/wHvAgAF/wcAAioBmgEqAQABKgGaBQAEtQMABv8CAAHsAeEB/wXh
AQAF/wIAAewD6AHvAf8B7wH/AQAF/wgAASoFmgEqBAADtQEAArUBAAb/AQAB7AHhAf8H4QEABP8BAAHs
AegB/wLoAe8B/wHvAv8BAAT/CAACKgEAAZoBAAEqBQAGtQEABP8B7AIAAewB/wHhAf8G4QEABP8BAAHs
Af8D6AHvAf8B7wL/AQAE/wMAASoBAAGaAQABKgIABCoFAAW1AwAD/wHsAf8BAAHsAeEB/wfhAQAE/wEA
AewB6AL/AegB7wH/Ae8C/wEABP8CAAEqBZoBKgoAB7UBAAXsAQAB7AP/AeEB/wThAQAC/wHsAgAB7AH/
AegC/wHvAf8B7wL/AQAC/wHsAgACKgGaASoBAAEqAZoLAAe1AQAB/wHsBQAB7AP/AeEB/wHhAf8BAAP/
AewB/wIAAewB/wHoAf8B7wH/Ae8B/wEAA/8B7AH/AQABKgKaAQAB7AEAApoBKgkABLUBAAK1AQAB/wHs
Af8EAALsAf8B4QH/AeEB/wIABewCAALsAf8B6AHvAf8B7wIABewBAAIqAZoBKgEAASoBmgsABLUBAAG1
AQAE7AYAA+wCAAP/AewHAAPsAgAD/wHsBQABKgWaASoKAAa1DQAB7AX/AewB/wgAAewF/wHsAf8EAAIq
AQABmgEAASoeAAjsCAAI7AYABCo8AAEtAVUBLQ0AAewFBwHsCQAB7AUHAewJAAHsBQcB7AkAAS0BVQEt
DQABrwW2Aa8B7AgAAS0FWgEtAewIAAElBU0BJQHsCAABLQFVAS0NAAGvBbYCrwHsBwABLQVaAi0B7AcA
ASUFTQIlAewHAAMtDQABrwW2A68B7AYAAS0FWgMtAewGAAElBU0DJQHsBgAB7A8AAa8FtgEAA68B7AUA
AS0FWgEAAy0B7AUAASUFTQEAAyUB7AMAAuwE4QFtAgAEtQQAAuwF/wIAA68EAALsBf8CAAMtBAAC7AX/
AgADJQMAAewF4QFtAbwBAAK1BQAD7AX/AQABBwEAAq8DAAPsBf8BAAEHAQACLQMAA+wF/wEAAQcBAAIl
AgAB7AHhAf8E4QFtArwCAAK1AwAC7AEHBewCBwH/AQABrwMAAuwBBwXsAgcB/wEAAS0DAALsAQcF7AIH
Af8BAAElAgAB7AH/BeEBbQK8AQADtQMAAewBBwHsAwcC7AEHA/8EAAHsAQcB7AMHAuwBBwP/BAAB7AEH
AewDBwLsAQcD/wMAAewB4QP/AuEBbQK8AQACtQQAAewB/wEHAewDBwEABewDAAHsAf8BBwHsAwcBAAXs
AwAB7AH/AQcB7AMHAQAF7AIAAewB/wHhAv8C4QFtArwBAAS1AwAB7AH/AQcB7AEHAQAB7AT/AQcEAAHs
Af8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewBBwEAAewE/wEHAwAB7AH/AeEB/wLhAW0BvAEABbUEAAHs
Af8BBwIAAewE/wEHBQAB7AH/AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcDAALsAf8B4QH/AeEBbQIA
ArUBAAK1BQAB7AH/AwAF7AYAAewB/wMABewGAAHsAf8DAAXsBQAD7AIABLUBAAG1BwAB7A8AAewPAAHs
EgAGtUwAARIBlASTMQABEwHqBBIB6gFuAQABEgGUBJMTAAHsBQcB7AkAAewFBwHsBwAB6gG3A5QBtwGT
AW4BAAESAZQEkxMAATEFWQExAewIAAHmBdYB5gHsBgABEgGUApMBtwEOAwABEgGUBJMBAAbXAQAG9AUA
ATEFWQIxAewHAAHmBdYC5gHsBQABEgGUAZMBlAESAQABEgG9AQAB6gG3AZQDkwEABNcFAAT0BQABMQVZ
AzEB7AYAAeYF1gPmAewEAAESAZQBkwG3AQABEgK3AQABEAISAW4CkwEAA9cBAALXAQAC9AEAA/QFAAEx
BVkBAAMxAewFAAHmBdYBAAPmAewDAAESAZQCkwK3AZQBtwETARIBbQEAARIBtwGTAQAG1wEABvQEAALs
Bf8CAAMxBAAC7AX/AgAD5gMAARIBlAKTAbcBEwESARMCvQFtAQABEQGOAZQBAAXXAwAF9AMAA+wF/wEA
AQcBAAIxAwAD7AX/AQABBwEAAuYDAAESAZQBkwG3AQ4EAAERBAABkwEABdcBAAf0AwAC7AEHBewCBwH/
AQABMQMAAuwBBwXsAgcB/wEAAeYDAAHrAZMBlAFEAQABEAH/AfECAAEQAf8B8QMABdcBAAf0AwAB7AEH
AewDBwLsAQcD/wQAAewBBwHsAwcC7AEHA/8EAAHsAfMBkwESAQAB/wEAAf8CAAH/ARQB/wH3AgAD1wEA
AdcBAAL0AQAE9AMAAewB/wEHAewDBwEABewDAAHsAf8BBwHsAwcBAAXsAwAB7AH/AbcBRAEAAfEB/wHx
AgAB7AL/AwAD1wEAAtcC9AEABPQEAAHsAf8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewBBwEAAewE/wEH
AwAB7AL/AbcBEAkAAZMBAAbXB/QFAAHsAf8BBwIAAewE/wEHBQAB7AH/AQcCAAHsBP8BBwMAARQC7AHt
AW4DAAGOAbcBEgEAAREBBwH/FAAB7AH/AwAF7AYAAewB/wMABewJAAG8AfMBvQEaAb0E/xUAAewPAAHs
CgAB/wHyAQAB/wEVAUMK/1oAAeoFtgoAAeoFtgYAAewBMAoAAvkCAAH5CgABFAFtBOoBbQHrAQAB6gW2
AQABFAFtBOoBbQHrAQAB6gW2BQAB7AEwAXoMAAK8CwABbQHdA7YB3QG1AesBAAHqBbYBAAFtAd0DtgHd
AbUB6wEAAeoFtgQAAuwBegEAAvkJAAK8AgABbQkAAeoDtgHdAQ8DAAHqBbYBAAHqA7YB3QEPAwAB6gW2
AQAB7AIwAewBegEAArwLAAO8AQAB/wEAAewGAAHqA7YBEgEAAeoB3gEAAW0B3QS2AQAB6gO2ARIBAAHq
Ad4BAAFtAd0EtgEAATADegEAArwCAAFtBgAC7AS8AQAC/wcAAeoCtgHXAQABEgLdAQABEAISAY0CtgEA
AeoCtgHXAQABEgLdAQABEAISAY0CtgHsAXoBAAJ6AgADvAEAAVYBAAFWAwAC7AEABLwDAAFQAQABUAMA
AeoDtgHXAd0BtgHdAhIBbQEAAeoB1wG2AQAB6gO2AdcB3QG2Ad0CEgFtAQAB6gHXAbYBAAN6ATABAAS8
AQACVgQAAuwBAAK8AgAD/wEAAbwEAAHqA7YB3QESAeoBEgLeAW0BAAERAfcBtgEAAeoDtgHdARIB6gES
At4BbQEAAREB9wG2AgAB7AIAAewBAAS8BgAD7AEAArwBAAP/AQABvAQAAeoCtgHdAQ8EAAFDBAABtQEA
AeoCtgHdAQ8EAAFDBAABtQQAAuwBAAK8AgAD/wQABewBAAT/AQABvAMAAesCtgESAQABEAH/AfECAAEQ
Af8B8QMAAesCtgESAQABEAH/AfECAAEQAf8B8QYAA+wBAAK8AQAD/woAAv8CAAK8AwAB7AHzAbYB6gEA
Af8BAAH/AgAB/wEUAf8B9wIAAewB8wG2AeoBAAH/AQAB/wIAAf8BFAH/AfcGAAXsAQAE/wYAA7wBAAL/
AQADvAIAAewB/wHdARIBAAHxAf8B8QIAAewC/wMAAewB/wHdARIBAAHxAf8B8QIAAewC/w0AAv8JAAW8
AQABvAQAAewC/wHXARAJAAG2AQAB7AL/AdcBEAkAAbYIAAO8AQAC/w0AAewCvAMAARQD7AGuAwABtQHd
AeoBAAERAQcB/wEAARQD7AGuAwABtQHdAeoBAAERAQcB/wkABbwLAAXsCQABvAH0AfIB8QHeBP8HAAG8
AfQB8gHxAd4E/yAAAf8B8gEAAf8BFQFDC/8B8gEAAf8BFQFDCv8UAAEHAgABBwEAAQcBAAEHAgABBzUA
AQcCAAEHAQABBwEAAQcCAAEHGAAC/xsAAQcCAAEHAQABBwEAAQcCAAEHFgAC/wIAAv8FAAoCBgAKAgwA
AewMAAHzAf8CAAL/AgAC/wMAAQII/wECBgABAgj/AQIMAAHsAwMGAAHsAv8CAAL/AgAC/wIAAf8CAAEC
Af8IAgYAAQIB/wgCDAAB7AH/AewBAwkAAfMB/wIAAv8CAAL/AwABAgH/AwIBBwQCBJgCAAECAf8DAgEH
BAIEmAgAAewB+wHsAQMGAAHsAv8CAAL/AgAC/wIAAf8CAAECAv8BAgEHAwIB/wECA/8BmAIAAQIC/wEC
AQcDAgH/AQID/wGYCAAB7AH/AewBAwkAAfMB/wIAAv8CAAL/AwABAgH/AQIBBwMCAv8BAgSYAgABAgH/
AQIBBwMCAv8BAgSYBwAB7AH/AfsB7AEDBgAB7AL/AgAC/wIAAv8CAAH/AgABAgH/AQcFAgH/AQIEmAIA
AQIB/wEHBQIB/wECBJgGAAHsAfsB/wMHAQMIAAHzAf8CAAL/AgAC/wMAAQIB/wICAv8CAgH/AQICmAH/
AZgCAAECAf8CAgL/AgIB/wECApgB/wGYBQAB7AL/AQcB+wIHAQMB7AQAAewC/wIABv8CAAH/AgABAgj/
AQIBmAL/AZgCAAECCP8BAgGYAv8BmAQAAewB/wL7Af8EBwEDAewGAAr/AwAKAgKYAf8BmAIACgICmAH/
AZgCAALsAfsB/wL7A/8BBwH/AgcBAwIAAewM/wcAAZgB/wKYAv8CmAH/AZgGAAGYAf8CmAL/ApgB/wGY
AgAO7AMAAuwI/wkAAZgI/wGYBgABmAj/AZgVAALsBP8LAAqYBgAKmBcAAuwdAAHsBAAF7A4AAVAlAALs
AgcB+QH7Af4FXg4AAlAVAAH5BAAF+QQAAewDBwTsBV4NAARQFAAC+QMAAvkHAAH6AfsB/wEHAQAB+QH7
Af4EXgHsAwAFUAQABlAKAggABPkEAAIaBAAB7AL6AfsBBwEAAfkC/gEHAuwFAAJQBgAGUAEAAQII/wEC
BwAG+QMAARoFAAHsAQcB+QH7AfoDAAUHBgACGgQAAlABAAJQAgABAgH/CAIGAAb5BAAEGgIAAewDBwH5
AwAB7AEHCQABGgUAAVACAAFQAwABAgH/AwIBBwQCBgAC+QEAAvkGAAMaAgAB7AMHAfkDAAHsBF4B7AUA
BBoCAAFQBgABAgL/AQIBBwMCAf8BAgYAAfkCAAH5BgAFGgEAAewCBwH5AfsBAAPsBV4GAAMaAgABUAYA
AQIB/wECAQcDAgL/AQIGAAH5CQADGgQAAQcB+QH7AfoE7AVeBQAFGggAAQIB/wEHBQIB/wECBgAB+QsA
AhoDAAHsAfsB+gH+AQADBwHsAf8BBwcAAxoKAAECAf8CAgL/AgIB/wECBwAB+RAABuwCBwHsAv8BBwcA
AhoJAAECCP8BAhgAAewEXgHsAgAB7AP/AQcRAAoCGAAB7AReAewDAAH/AuwB/zMABuwHAAHsMwAD7FoA
Aew/AAHsCwcLAAe2CQAH5AkAB3UCAAHsCv8BBwsAAfMFAAG2CQABwgUAAeQJAAEbBQABdQIAAewB/wQH
Af8DBwH/AQcLAALzA7wB8wG2CQACwgGeAcIBngHCAeQJAAIbAb0B/wG9Af8BdQIAAewK/wEHBQAFtgEA
AfMFAAG2AwAF5AEAAcIFAAHkAwAFdQEAARsFAAF1AgAB7AH/BAcB/wMHAf8BBwUAAfMFAALzAbwB8wG8
AfMBtgMAAcIFAALCAZ4BwgGeAcIB5AMAARsFAAIbAb0B/wG9Af8BdQIAAewK/wEHBQAB8wO8AfMBAAHz
AgAB8wYAAcIBngHCAZ4BwgEAAcICAAGeBgABGwG9Af8BvQH/AQABGwIAAb0FAAHsAf8IBwH/AQcFAAHz
BQAC8wG8AfMBAAHzBAABwgUAAsIBngHCAQABwgQAARsFAAIbAb0BGwEAAf8DAAHsCv8BBwUAAfMBvAHz
AbwB8wEABPMGAAHCAZ4BwgGeAcIBAATCBgABGwG9Af8BvQH/AQAEGwUAAewB/wIHAf8FBwH/AQcFAAHz
AgAB8wwAAcICAAHCDAABGwIAAf8LAAHsCv8BBwUAAfMBvALzAQAB8woAAcIBngLCAQABwgoAARsBvQEb
AfQBAAH/CQAB7AH/AgcB/wUHAf8BBwUABPMMAATCDAAEGwsAAewI/zcAAewB/wYHAf8B7AH/NQAB7Aj/
Aew2AArsDQABMAHsBwAB7AMAAQcCAAEHAQABBwEAAQcCAAEHJwABMAH7AuwGAAHsBAcCAAEHAQABBwEA
AQcCAAEHJgABMAP7AuwFAAHsA/8BBwIAAQcBAAEHAQABBwIAAQcIAAdZCQAH1gYAATAF+wLsBAAB7AH/
BAcB/wMHAf8BBwsAAcMFAAFZCQABGQUAAdYFAAEwAvsCAAP7AuwDAAHsCv8BBwsAAsMBmgHDAZoBwwFZ
CQACGQHdARkB3QEZAdYEAAEwA/sCAAT7AuwCAAHsAf8EBwH/AwcB/wEHBQAFWQEAAcMFAAFZAwAF1gEA
ARkFAAHWAwABMAv7AuwBAAHsCv8BBwUAAcMFAALDAZoBwwGaAcMBWQMAARkFAAIZAd0BGQHdARkB1gIA
ATAF+wLqBvsD7AH/CAcB/wEHBQABwwGaAcMBmgHDAQABwwIAAcMGAAEZAd0BGQHdARkBAAEZAgAB3QUA
ATAF+wIABvsB7AEAAewK/wEHBQABwwUAAsMBmgHDAQABwwQAARkFAAIZAd0BGQEAARkEAAEwBPsCAAX7
AewCAAHsAf8CBwH/BQcB/wEHBQABwwGaAcMBmgHDAQAEwwYAARkB3QEZAd0BGQEABBkHAAEwA/sCAAT7
AewDAAHsCv8BBwUAAcMCAAHDDAABGQIAARkOAAEwAvsCAAP7AewEAAHsAf8CBwH/BQcB/wEHBQABwwGa
AsMBAAHDCgABGQHdAhkBAAEZDQABMAH7AgAC+wHsBQAB7Aj/CAAEwwwABBkQAAEwA/sB7AYAAewB/wYH
Af8B7AH/KwABMAH7AewHAAHsCP8B7C0AATAIAArsJgABQgFNAT4HAAE+AwABKAMAAUADAAEwAQECAAEB
AQABAQUAAYABCRYAA/8BAAL/BgABgAEBBgABgAcAAYAHAAGABwABgAcAAYABDwYAAYABDwYAAYABDwYA
AYABDwYAAYABDwYAAYABDwYAAYABDwYAAYABHwYAAv8GAAL/BgABwAEDAfgDAAL/AcABAwHAAwABgAEB
AcABAwHAAwABgAEAAcABAwHAAwABgAEAAcABAwHAAwABgAEAAcABAwHAAQECAAGAAQABwAEDAcABAQIA
AYABDwHAAQMB8AEHAgABgAEPAcABAwH4AQ8CAAGAAQ8BwAEDAfgBDwIAAYABDwHAAQMB+AEPAgABgAEP
AcABAwH4AQ8CAAGAAQ8BwAEHAfgBDwIAAYABDwHAAQ8B+AEPAgABgAEfAcABHwH8AR8CAAb/AgAG/wHA
AwAE/wQAAf8BHwL/BAAB/AEHAv8EAAHwAQEC/wQAAcABAQL/AYABAQIAAYABAQL/AYABAwIAAYABAQL/
AcABAwIAAcABAQL/AcABBwIAAcABAQL/AeABBwIAAcABAQL/AeABDwIAAcABAwL/AfABDwIAAcABBwL/
AfABHwIAAcABHwL/AfgBHwIAAeABfwL/AfgBPwIAAfED/wH8AX8CAAL/AYABPwGAAT8C/wGAAQABgAE/
AYABPwL/AgABgAEHAYABBwH/AR8CAAGAAQcBgAEHAfwBBwIAAYABBwGAAQcB8AEBAgABgAEAAYABAAHA
AQECAAGAAQABgAEAAYABAQIAAYABAAGAAQABgAEBAgABgAEAAYABAAHAAQECAAGAAQABgAEAAcABAQIA
AfABAAHwAQABwAEBAgAB8AEAAfABAAHAAQMBAAEBAfABAAHwAQABwAEHAYAB/wH+AQAB/gEAAcABHwHB
Af8B/gEAAf4BAAHgAX8C/wH+AQEB/gEBAfEF/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHA
AQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQMG/wHAAQcG/wHA
AQ+C/wQABP8BfwH+AgAE/wFgAQYCAAH/ASQB/wEkAWABBgIAAf8BJAH/ASQBYAEGAgAE/wFgAQYDAAE/
AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/
AQABPwFgAQYDAAE/AQABPwFgAQ4DAAE/AQABPwFgAR4DAAE/AQABPwF/Af4DAAE/AQABPwQABv8B8AEA
Af8BhwT/AfABAAH+AQMB/AEBAv8B8AEAAfwBAQH8AQEBAAE/AQABPwH4AQAB/AEBAQABPwEAAT8B+AIA
AQEBAAE/AQABPwH4AgABAQEAAQMBAAEDAfgCAAEBAQABAwEAAQMB+AIAAQEBAAEDAQABAwH4AgABAwEA
AQMBAAEDAeQBAQEAAQcBAAEDAQABAwHGAgABDwEAAQMBAAEDAYABBQEAAf8BAAEDAQABAwEAAR8BAQH/
AfABAwHwAQMBgAEjAQMB/wHwAQMB8AEDAccD/wHwAQMB8AEDAecB8Qb/AfABAAb/AfABAAb/AfABAAL/
AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAQMBAAED
AQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAED
AQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwL/AfABAwHwAQME/wHwAQMB8AED
BP8B8AEDAfABAwT/AfABAAL/AgAC/wHwAQAB8AEPAgAC/wHwAQAB4AEDAwABPwEAAT8B4AEBAQABBwEA
AT8BAAE/AfACAAEHAQABPwEAAT8B8AIAAQcBAAEDAQABAwH4AgABBwEAAQMBAAEDAfgCAAEHAQABAwEA
AQMBkAIAAQcBAAEDAQABAwMAAQcBAAEDAQABAwMAAQcBAAEDAQABAwMAAQcBAAEDAQABAwGYAgABBwHw
AQMB8AEDAfgCAAEPAfABAwHwAQMB+AIAAR8B8AEDAfABAwL/AQABPwH/AYcB/wGHAf8BhwL/Af4BAQH+
AQEB/gEBAv8B/gEAAf4BAAH+AQAC/wH8AQAB/AEAAfwCAAE/AfwBAAH8AQAB/AIAAT8B/AEAAfwBAAH8
AgABPwH+AQEB/gEBAf4BAQEAAT8B4AEBAeABAQHgAQEBAAE/AYABBwGAAQcBgAEHAQABPwGAAT8BgAE/
AYABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BgAF/
AYABfwGAAX8C/wGAAX8BgAF/AYABfwL/AeEB/wHhAf8B4QP/Af4BAAHhAf8B4QL/AYcB/gEAAeEB/wHh
Af8B/gEBAf4BAAHgAQAB4AEAAf4BAAH+AQAB4AEAAeABAAH8AQABgAEAAeABAAHgAQAB/AEAAYABAAGA
AQABgAEAAfwBAAGAAQABgAEAAYABAAH+AQEBgAUAAeABAQGABQABgAEHAYAFAAGAAT8BgAEBBQABPwGA
AQMBgAEAAYACAAE/AYABAwGAAQEBgAEBAQABPwGAAQcB4AEDAeABAwGAAX8BgAF/AfgBAwH4AQMBgAF/
AYABfwH4AQcB+AEHAeEB/wHgAT8B4AE/AeABPwHhAf8B4AEfAeABHwHgAR8B4QH/AeABDwHgAQ8B4AEP
AeEB/wHgAQcB4AEHAeABBwHhAf8B4AEDAeABAwHgAQMB4AEBAeABAQHgAQEB4AEBAYABAQHAAQEBwAEB
AcABAQGAAQEBgAEBAYABAQGAAQEBAAEBAYABAQGAAQEBgAEBAQABAQGAAQEBgAEBAYABAQEAAQEBgAEB
AYABAQGAAQECAAGAAQEBgAEBAYABAQGAAQABwAEBAcABAQHAAQEBgAEAAeEBAQHhAQEB4QEBAeABAQHx
AYMB8QGDAfEBgwH+AQEB+QH/AfkB/wH5Af8B/gEBAgAB/wG/AeABPwHgAT8CAAH/AX8B4AEfAeABHwMA
AQEB4AEPAeABDwMAAQEB4AEHAeABBwMAAQEB4AEDAeABAwMAAQEB4AEBAeABAQMAAQEBwAEBAcABAQMA
AQEBgAEBAYABAQMAAQEBgAEBAYABAQMAAQEBgAEBAYABAQMAAQEBgAEBAYABAQMAAQEBgAEBAYABAQMA
AQEBwAEBAcABAQMAAQEB4QEBAeEBAQIAAf4B/wHxAYMB8QGDAgAB/wF/AfkB/wH5Af8B/AP/BAAB+AF/
AYAB/wQAAfABfwHBAf8EAAGAAR8BwAF/BQABPwGAAQ8FAAEPAQABHwUAAQEBAAEBBQABAwEAAQMEAAGA
AQMBAAEDBAAB4AEBAYABAQQAAeABAQHAAQEEAAHwAQAB8AUAAfgBAQH4AQEEAAH+AQEB/AEBBAAB/wEB
Af8BAQQAAf8BgQH/AYMEAAL/AfABAAL/Af4BfwL/AfABAAL/AfgBHwL/AfABAAL/AeABBwEAAT8BAAE/
AfwBHwGAAQEBAAE/AQABPwH8AR8BAAEDAQABPwEAAT8B/AEfAYABAQEAAQMBAAEDAfwBHwEAAQMBAAED
AQABAwH8AR8BgAEBAQABAwEAAQMB+AEPAQABAwEAAQMBAAEDAfABBwGAAQEBAAEDAQABAwHgAQMBAAED
AQABAwEAAQMBwAEBAYABAQEAAQMBAAEDAwABAwHwAQMB8AEDAgABgAEHAfABAwHwAQMC/wHgAR8B8AED
AfABAwL/AfgBfwL/AfABgQH/AfcE/wHAAQEB/wHzAv8B7gEDAYABAQH/AeEC/wHmAQcBgAEDAQEBwAEA
AT8BwwEHAQABDwEDAYEBAAE/AYEBgwEAAQcBgwGTAQABPwEDAQEBAwEBAcEBtwEAAT8BJgEBAQMBAQGA
Ab8BAAE/AW4CAAEBAQABvwEAAT8BfgEBAYABAQEAAX8BAAE/AX4BAQGAAQcBAAH/AQABPwG+AQIBwAED
AQAB/wEAAT8B/wEAAcACAQF/AQABPwH/AYMBwAHgAYABfwT/AcAB/gHBBf8B4wv/AQABBwH8AQEB/AEB
AfwBAQEAAQcB/AEBAfwBAQH8AQEBAAEHAfwBAQH8AQEB/AEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEB
AQABAQEAAQEBAAEHAQABAQEAAQEBAAEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEDAQABAwEAAQMBAAEH
AQABBwEAAQcBAAEHAQABBwEAAQ8BAAEPAQABDwEAAQcBAAH/AQAB/wEAAf8BAAEHAQEB/wEBAf8BAQH/
AQABBwEDAf8BAwH/AQMB/wEAAQ8G/wEAAR8G/wEAAT8B/gF/AgAE/wH8AT8CAAH8AQEB/AEBAfgBHwIA
AfwBAQH8AQEB8AEPAQABBwH8AQEB/AEBAeABBwEAAQcBAAEBAQABAQHAAQMBAAEHAQABAQEAAQEBgAEB
AQABBwEAAQEBAAEBAwABBwEAAQEBAAEBAQABAQEAAQcBAAEDAQABAwGAAQMBAAEHAQABBwEAAQcBwAEH
AQABBwEAAQ8BAAEPAeABDwEAAQcBAAH/AQAB/wHwAR8BAAEHAQEB/wEBAf8B+AE/AQABDwEDAf8BAwH/
AfwBfwEAAR8E/wH+Af8BAAE/BP8L
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD9AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8AAAD/AAAAsABIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/1lZAJ0AAAD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAAP8AAAB3AABI/0gAJf8lAAD/
AAAA3AAAAKoAAACWAAAAZAAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAWToAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AKv1+gAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB1dXUAYWFhAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAACKggcHBweCggAAAAAAAAAAioKCgoKCgoIAAAAAAAAAAIqCBwcH
B4KCACIiAAAAAACKgoKCgoKCggAiIgAAAAAAioIHggcHgoIAIiIAAAAAAIqCgoKCgoKCACIiAL6+AACK
ggcHB4KKAAAiIgC+vgAAioKCgoKCioIAIiIAvr4AAIqKioqKioqKIiIiAL6+AAAAAAAqIgcHByIqAAC+
vgAAAAAAKiIiIiIiKiIAvr4AAAAAACoqKioqKioqvr6+AAAAAAAAAADGvgcHB77GAAAAAAAAAAAAxr6+
vr6+xr4AAAAAAAAAAMbGxsbGxsbGAIA///+AP///gAf//4AH//+AB///gAD//4AA//+AAP//gAD//4AA
///wAP//8AD///AA///+AP///gD///4B//8=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,432 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="lblBezeichnung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtBezeichnung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GrpDokumentvorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TreeVorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TreeVorlagen.Locked" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</data>
<data name="ImageList3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList3.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>698, 17</value>
</data>
<data name="ImageList3.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AADCNQAAAk1TRnQBSQFMAgEBNAEAATYBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAAeADAAEBAQABCAYAATgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AVgAO
+zIAAfsMAAH7CQACIAEAAiABAAIgCAACIAEAAiABAAIgBAAB7wG8Ae8BvATvBQAB+wIACfsBAAH7CQAC
IAEAAiABAAIgCAACIAEAAiABAAIgBAAB/wS8Ae8BvAHvBQAB+wMAAvsEAAL7AQAB+yUAAv8B7wG8Ae8B
vALvBQAB+wQAAvsGAAH7AgAB/AEAAfwBAAH8AQAB/AEAAfwGAAoCCgAB/wG8Af8EvAHvBQAB+wEAAvsB
AAL7AgAC+wIAAfsBAAH8CP8HAAECCP8BAgoAAv8BvAH/Ae8BvAHvAbwFAAH7AQAC+wIABfsCAAH7AgAB
/wEAAfwB/wH8AQAC/wH8BgABAgH/CAIKAAH/AbwB/wG8Af8CvAHvBQAB+wEAAvsCAAL7AQAC+wIAAfsB
AAH8Af8B/AEAAQcBAAH8AQcB/wcAAQIB/wMCAQcEAgoAAv8BvAH/CQAB+wIAAvsBAAL7BQAB+wIAAf8B
AAH8AQAB/AEAAfwB/wH8BgABAgL/AQIBBwMCAf8BAgoAAf8BvAH/AbwBAAG8Au8FAAH7AwAC+wEAAvsB
AAL7AQAB+wEAAfwB/wH8Af8B/AEAAf8BAAEHBwABAgH/AQIBBwMCAv8BAgoABP8BAAH/AbwB7wUAAfsE
AAf7AQAB+wIAAfwBAAH/AQAB/AH/AfwBAAH8BgABAgH/AQcFAgH/AQIKAAT/AQAB/wG8BgAB+wwAAfsB
AAH8AQAB/AEAAfwBAAH8AQAB/AcAAQIB/wICAv8CAgH/AQIXAAH7DAAB+wIACP8B/AYAAQII/wECFwAO
+wEAAfwBAAH8AQAB/AEAAfwBAAH8BwAKAloAAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQAB
BwIAAQcKAAPsKAABBwIAAQcBAAEHAQABBwIAAQcIAAEHBP8BBwoAB+8DAAH8AQAB/AEAAfwBAAH8AQAB
/AcAAfwBAAH8AQAB/AEAAfwBAAH8CwAB7AEAAf8BAAP/AewBBwkAAf8FAAHvAgAB/Aj/BwAB/Aj/DQAB
Bwf/AewIAAL/AbwB/wG8Af8B7wMAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AwAAf8B
AAL/AgAC/wHsAgAF7wEAAf8FAAHvAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB/AH/AfwBAAEHAQAB
/AEHAf8BAATWCAAB/wEAAv8DAAH/AQcCAAH/BQAC/wG8Af8BvAH/Ae8DAAH/AQAB/AEAAfwBAAH8Af8B
/AP/AdYDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYIAAEHA/8BAAP/AewCAAH/AbwB/wG8Af8BAAH/AgAB
vAUAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYCAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWBwAC
7AH/AQAB/wEAAf8B7AH/AQAB7AEAAf8FAAL/AbwB/wEAAf8EAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB
/wHWAwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gUAAiACAAHsBf8B7AMAAf8BvAH/AbwB/wEABP8F
AAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gQAAUEC
IAQAAewBBwHsBQAB/wIAAf8MAAj/AfwB/wHWAQcB1gMACP8B/AH/AdYBBwHWAwAB4wJBBCAB7AMAAewE
AAH/AbwB/wG8AQAB/wkAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAB/AEAAfwBAAH8AQAB/AEAAfwB
AAH/A9YCAAPjA0EFIAYABP8PAArWBgAK1gMABOMCQQMgGgAB1gj/AdYGAAHWCP8B1gQAA+MfAArWBgAK
1gUAAuM/AAEHAgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQAB
BwIAAQcRAAoCBgAKAgYACgIHAAH8AQAB/AEAAfwBAAH8AQAB/AYAAQII/wECBgABAgj/AQIGAAECCP8B
AgYAAfwI/wcAAQIB/wgCBgABAgH/CAIGAAECAf8IAgcAAf8BAAH8Af8B/AEAAv8B/AYAAQIB/wMCAQcE
AgYAAQIB/wMCAQcEAgSYAgABAgH/AwIBBwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wcAAQIC/wECAQcD
AgH/AQIGAAECAv8BAgEHAwIB/wECA/8BmAIAAQIC/wECAQcDAgH/AQID/wGYAwAB/wEAAfwBAAH8AQAB
/AH/AfwGAAECAf8BAgEHAwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgABAgH/AQIBBwMCAv8BAgSYAgAB
/AH/AfwB/wH8AQAB/wEAAQcHAAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wECBJgCAAECAf8BBwUCAf8B
AgSYAwAB/AEAAf8BAAH8Af8B/AEAAfwGAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKYAf8B
mAIAAQIB/wICAv8CAgH/AQICmAH/AZgCAAH8AQAB/AEAAfwBAAH8AQAB/AcAAQII/wECBgABAgj/AQIB
mAL/AZgCAAECCP8BAgGYAv8BmAMACP8B/AYACgIGAAoCApgB/wGYAgAKAgKYAf8BmAIAAfwBAAH8AQAB
/AEAAfwBAAH8GwABmAH/ApgC/wKYAf8BmAYAAZgB/wKYAv8CmAH/AZgmAAGYCP8BmAYAAZgI/wGYJgAK
mAYACpgmAAEHAgABBwEAAQcBAAEHAgABBxEAAewDAAEHAgABBwEAAQcBAAEHAgABBxUAAQcCAAEHAQAB
BwEAAQcCAAEHEQAB7AQHAgABBwEAAQcBAAEHAgABBxUAAQcCAAEHAQABBwEAAQcCAAEHBAAB7AEHAfsC
BwEAA+wEAAHsA/8BBwIAAQcBAAEHAQABBwIAAQcCAAH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB
/AEAAfwBAAH8CQAB7AP/AfsB/wEAAfsBBwLsAgAB7AH/BAcB/wMHAf8BBwQAAfwI/wcAAfwI/wsAAewB
+wP/AfsBAAH/AfsBBwHsAQAB7Ar/AQcFAAH/AQAB/AH/AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwK
AAHsAv8B+wL/AQAB/wIAAewBAAHsAf8EBwH/AwcB/wEHBAAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB
/AH/AfwBAAEHAQAB/AEHAf8BAATWBwAB7AP/AfsB7AEAAf8B+wEHAQAB7Ar/AQcFAAH/AQAB/AEAAfwB
AAH8Af8B/AP/AdYDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYJAAH7A/8B+wL/AQcBAAHsAf8IBwH/AQcE
AAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gcAAgEB
AAH/AfsD/wH7AQcBAAHsCv8BBwUAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAH8AQAB/wEAAfwB
/wH8AQAB/AHWAQcB/wHWAwACAQMAAQEBAAP/AfsC/wEHAQAB7AH/AgcB/wUHAf8BBwQAAfwBAAH8AQAB
/AEAAfwBAAH8AQAC1gH/AdYCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAwAB+QEBAQAB+QEAAQED
AAP/AfsBBwEAAewK/wEHBQAI/wH8Af8B1gEHAdYDAAj/AfwB/wHWAQcB1gMAAvkCAAL5AQAD/wH7Av8B
BwEAAewB/wIHAf8FBwH/AQcEAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gIAAfwBAAH8AQAB/AEAAfwB
AAH8AQAB/wPWCQAC/wH7A/8B+wEHAQAB7Aj/CwAK1gYACtYHAAHsAf8B+wP/AfsC/wEHAQAB7AH/BgcB
/wHsAf8JAAHWCP8B1gYAAdYI/wHWBwAK7AEAAewI/wHsCgAK1gYACtYSAArsTgAByAEAAd0BAAHICwAB
LQEAAcIBAAEtCwABJQEAAZoBAAElGgAByAXdAcgJAAEtBcIBLQkAASUFmgElGAACyAHdAcgBAAHIAd0J
AAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaBAAB/AEAAfwBAAH8AQAB/AEAAfwMAAHIAt0BAAHsAQAC
3QHIBwABLQLCAQAB7AEAAsIBLQcAASUCmgEAAewBAAKaASUBAAH8CP8NAALIAd0ByAEAAcgB3QkAAi0B
wgEtAQABLQHCCQACJQGaASUBAAElAZoEAAH/AQAB/AH/AfwBAAL/AfwNAAHIBd0ByAkAAS0FwgEtCQAB
JQWaASUCAAH8Af8B/AEAAQcBAAH8AQcB/w4AAsgBAAHdAQAByAoAAi0BAAHCAQABLQoAAiUBAAGaAQAB
JQQAAf8BAAH8AQAB/AEAAfwB/wH8CAAByAEAAd0BAAHIAgAEyAUAAS0BAAHCAQABLQIABC0FAAElAQAB
mgEAASUCAAQlAwAB/AH/AfwB/wH8AQAB/wEAAQcIAAHIBd0ByAkAAS0FwgEtCQABJQWaASUJAAH8AQAB
/wEAAfwB/wH8AQAB/AYAAsgB3QHIAQAByAHdCQACLQHCAS0BAAEtAcIJAAIlAZoBJQEAASUBmgkAAfwB
AAH8AQAB/AEAAfwBAAH8BwAByALdAQAB7AEAAt0ByAcAAS0CwgEAAewBAALCAS0HAAElApoBAAHsAQAC
mgElCAAI/wH8BgACyAHdAcgBAAHIAd0JAAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaCQAB/AEAAfwB
AAH8AQAB/AEAAfwIAAHIBd0ByAkAAS0FwgEtCQABJQWaASUZAALIAQAB3QEAAcgKAAItAQABwgEAAS0K
AAIlAQABmgEAASUcAATIDAAELQwABCUsAAEtAVUBLQ0AAS0BVQEtIQAB7Af/BAABLQFVAS0NAAEtAVUB
LRIAASoBAAGaAQABKgoAAewH/wQAAS0BVQEtDQABLQFVAS0RAAEqBZoBKgkAAewH/wQAAy0CAAf/BAAD
LQIAB/8HAAIqAZoBKgEAASoBmgwABv8EAAHsBQAG/wQAAewFAAb/BwABKgKaAQAB7AEAApoBKgMABrUB
AAb/AgAC7AXhAgAF/wIAAuwC6AHvAf8B7wIABf8HAAIqAZoBKgEAASoBmgUABLUDAAb/AgAB7AHhAf8F
4QEABf8CAAHsA+gB7wH/Ae8B/wEABf8IAAEqBZoBKgQAA7UBAAK1AQAG/wEAAewB4QH/B+EBAAT/AQAB
7AHoAf8C6AHvAf8B7wL/AQAE/wgAAioBAAGaAQABKgUABrUBAAT/AewCAAHsAf8B4QH/BuEBAAT/AQAB
7AH/A+gB7wH/Ae8C/wEABP8DAAEqAQABmgEAASoCAAQqBQAFtQMAA/8B7AH/AQAB7AHhAf8H4QEABP8B
AAHsAegC/wHoAe8B/wHvAv8BAAT/AgABKgWaASoKAAe1AQAF7AEAAewD/wHhAf8E4QEAAv8B7AIAAewB
/wHoAv8B7wH/Ae8C/wEAAv8B7AIAAioBmgEqAQABKgGaCwAHtQEAAf8B7AUAAewD/wHhAf8B4QH/AQAD
/wHsAf8CAAHsAf8B6AH/Ae8B/wHvAf8BAAP/AewB/wEAASoCmgEAAewBAAKaASoJAAS1AQACtQEAAf8B
7AH/BAAC7AH/AeEB/wHhAf8CAAXsAgAC7AH/AegB7wH/Ae8CAAXsAQACKgGaASoBAAEqAZoLAAS1AQAB
tQEABOwGAAPsAgAD/wHsBwAD7AIAA/8B7AUAASoFmgEqCgAGtQ0AAewF/wHsAf8IAAHsBf8B7AH/BAAC
KgEAAZoBAAEqHgAI7AgACOwGAAQqPAABLQFVAS0NAAHsBQcB7AkAAewFBwHsCQAB7AUHAewJAAEtAVUB
LQ0AAa8FtgGvAewIAAEtBVoBLQHsCAABJQVNASUB7AgAAS0BVQEtDQABrwW2Aq8B7AcAAS0FWgItAewH
AAElBU0CJQHsBwADLQ0AAa8FtgOvAewGAAEtBVoDLQHsBgABJQVNAyUB7AYAAewPAAGvBbYBAAOvAewF
AAEtBVoBAAMtAewFAAElBU0BAAMlAewDAALsBOEBbQIABLUEAALsBf8CAAOvBAAC7AX/AgADLQQAAuwF
/wIAAyUDAAHsBeEBbQG8AQACtQUAA+wF/wEAAQcBAAKvAwAD7AX/AQABBwEAAi0DAAPsBf8BAAEHAQAC
JQIAAewB4QH/BOEBbQK8AgACtQMAAuwBBwXsAgcB/wEAAa8DAALsAQcF7AIHAf8BAAEtAwAC7AEHBewC
BwH/AQABJQIAAewB/wXhAW0CvAEAA7UDAAHsAQcB7AMHAuwBBwP/BAAB7AEHAewDBwLsAQcD/wQAAewB
BwHsAwcC7AEHA/8DAAHsAeED/wLhAW0CvAEAArUEAAHsAf8BBwHsAwcBAAXsAwAB7AH/AQcB7AMHAQAF
7AMAAewB/wEHAewDBwEABewCAAHsAf8B4QL/AuEBbQK8AQAEtQMAAewB/wEHAewBBwEAAewE/wEHBAAB
7AH/AQcB7AEHAQAB7AT/AQcEAAHsAf8BBwHsAQcBAAHsBP8BBwMAAewB/wHhAf8C4QFtAbwBAAW1BAAB
7AH/AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcFAAHsAf8BBwIAAewE/wEHAwAC7AH/AeEB/wHhAW0C
AAK1AQACtQUAAewB/wMABewGAAHsAf8DAAXsBgAB7AH/AwAF7AUAA+wCAAS1AQABtQcAAewPAAHsDwAB
7BIABrVMAAESAZQEkzEAARMB6gQSAeoBbgEAARIBlASTEwAB7AUHAewJAAHsBQcB7AcAAeoBtwOUAbcB
kwFuAQABEgGUBJMTAAExBVkBMQHsCAAB5gXWAeYB7AYAARIBlAKTAbcBDgMAARIBlASTAQAG1wEABvQF
AAExBVkCMQHsBwAB5gXWAuYB7AUAARIBlAGTAZQBEgEAARIBvQEAAeoBtwGUA5MBAATXBQAE9AUAATEF
WQMxAewGAAHmBdYD5gHsBAABEgGUAZMBtwEAARICtwEAARACEgFuApMBAAPXAQAC1wEAAvQBAAP0BQAB
MQVZAQADMQHsBQAB5gXWAQAD5gHsAwABEgGUApMCtwGUAbcBEwESAW0BAAESAbcBkwEABtcBAAb0BAAC
7AX/AgADMQQAAuwF/wIAA+YDAAESAZQCkwG3ARMBEgETAr0BbQEAAREBjgGUAQAF1wMABfQDAAPsBf8B
AAEHAQACMQMAA+wF/wEAAQcBAALmAwABEgGUAZMBtwEOBAABEQQAAZMBAAXXAQAH9AMAAuwBBwXsAgcB
/wEAATEDAALsAQcF7AIHAf8BAAHmAwAB6wGTAZQBRAEAARAB/wHxAgABEAH/AfEDAAXXAQAH9AMAAewB
BwHsAwcC7AEHA/8EAAHsAQcB7AMHAuwBBwP/BAAB7AHzAZMBEgEAAf8BAAH/AgAB/wEUAf8B9wIAA9cB
AAHXAQAC9AEABPQDAAHsAf8BBwHsAwcBAAXsAwAB7AH/AQcB7AMHAQAF7AMAAewB/wG3AUQBAAHxAf8B
8QIAAewC/wMAA9cBAALXAvQBAAT0BAAB7AH/AQcB7AEHAQAB7AT/AQcEAAHsAf8BBwHsAQcBAAHsBP8B
BwMAAewC/wG3ARAJAAGTAQAG1wf0BQAB7AH/AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcDAAEUAuwB
7QFuAwABjgG3ARIBAAERAQcB/xQAAewB/wMABewGAAHsAf8DAAXsCQABvAHzAb0BGgG9BP8VAAHsDwAB
7AoAAf8B8gEAAf8BFQFDCv9aAAHqBbYKAAHqBbYGAAHsATAKAAL5AgAB+QoAARQBbQTqAW0B6wEAAeoF
tgEAARQBbQTqAW0B6wEAAeoFtgUAAewBMAF6DAACvAsAAW0B3QO2Ad0BtQHrAQAB6gW2AQABbQHdA7YB
3QG1AesBAAHqBbYEAALsAXoBAAL5CQACvAIAAW0JAAHqA7YB3QEPAwAB6gW2AQAB6gO2Ad0BDwMAAeoF
tgEAAewCMAHsAXoBAAK8CwADvAEAAf8BAAHsBgAB6gO2ARIBAAHqAd4BAAFtAd0EtgEAAeoDtgESAQAB
6gHeAQABbQHdBLYBAAEwA3oBAAK8AgABbQYAAuwEvAEAAv8HAAHqArYB1wEAARIC3QEAARACEgGNArYB
AAHqArYB1wEAARIC3QEAARACEgGNArYB7AF6AQACegIAA7wBAAFWAQABVgMAAuwBAAS8AwABUAEAAVAD
AAHqA7YB1wHdAbYB3QISAW0BAAHqAdcBtgEAAeoDtgHXAd0BtgHdAhIBbQEAAeoB1wG2AQADegEwAQAE
vAEAAlYEAALsAQACvAIAA/8BAAG8BAAB6gO2Ad0BEgHqARIC3gFtAQABEQH3AbYBAAHqA7YB3QESAeoB
EgLeAW0BAAERAfcBtgIAAewCAAHsAQAEvAYAA+wBAAK8AQAD/wEAAbwEAAHqArYB3QEPBAABQwQAAbUB
AAHqArYB3QEPBAABQwQAAbUEAALsAQACvAIAA/8EAAXsAQAE/wEAAbwDAAHrArYBEgEAARAB/wHxAgAB
EAH/AfEDAAHrArYBEgEAARAB/wHxAgABEAH/AfEGAAPsAQACvAEAA/8KAAL/AgACvAMAAewB8wG2AeoB
AAH/AQAB/wIAAf8BFAH/AfcCAAHsAfMBtgHqAQAB/wEAAf8CAAH/ARQB/wH3BgAF7AEABP8GAAO8AQAC
/wEAA7wCAAHsAf8B3QESAQAB8QH/AfECAAHsAv8DAAHsAf8B3QESAQAB8QH/AfECAAHsAv8NAAL/CQAF
vAEAAbwEAAHsAv8B1wEQCQABtgEAAewC/wHXARAJAAG2CAADvAEAAv8NAAHsArwDAAEUA+wBrgMAAbUB
3QHqAQABEQEHAf8BAAEUA+wBrgMAAbUB3QHqAQABEQEHAf8JAAW8CwAF7AkAAbwB9AHyAfEB3gT/BwAB
vAH0AfIB8QHeBP8gAAH/AfIBAAH/ARUBQwv/AfIBAAH/ARUBQwr/FAABBwIAAQcBAAEHAQABBwIAAQc1
AAEHAgABBwEAAQcBAAEHAgABBxgAAv8bAAEHAgABBwEAAQcBAAEHAgABBxYAAv8CAAL/BQAKAgYACgIM
AAHsDAAB8wH/AgAC/wIAAv8DAAECCP8BAgYAAQII/wECDAAB7AMDBgAB7AL/AgAC/wIAAv8CAAH/AgAB
AgH/CAIGAAECAf8IAgwAAewB/wHsAQMJAAHzAf8CAAL/AgAC/wMAAQIB/wMCAQcEAgSYAgABAgH/AwIB
BwQCBJgIAAHsAfsB7AEDBgAB7AL/AgAC/wIAAv8CAAH/AgABAgL/AQIBBwMCAf8BAgP/AZgCAAECAv8B
AgEHAwIB/wECA/8BmAgAAewB/wHsAQMJAAHzAf8CAAL/AgAC/wMAAQIB/wECAQcDAgL/AQIEmAIAAQIB
/wECAQcDAgL/AQIEmAcAAewB/wH7AewBAwYAAewC/wIAAv8CAAL/AgAB/wIAAQIB/wEHBQIB/wECBJgC
AAECAf8BBwUCAf8BAgSYBgAB7AH7Af8DBwEDCAAB8wH/AgAC/wIAAv8DAAECAf8CAgL/AgIB/wECApgB
/wGYAgABAgH/AgIC/wICAf8BAgKYAf8BmAUAAewC/wEHAfsCBwEDAewEAAHsAv8CAAb/AgAB/wIAAQII
/wECAZgC/wGYAgABAgj/AQIBmAL/AZgEAAHsAf8C+wH/BAcBAwHsBgAK/wMACgICmAH/AZgCAAoCApgB
/wGYAgAC7AH7Af8C+wP/AQcB/wIHAQMCAAHsDP8HAAGYAf8CmAL/ApgB/wGYBgABmAH/ApgC/wKYAf8B
mAIADuwDAALsCP8JAAGYCP8BmAYAAZgI/wGYFQAC7AT/CwAKmAYACpgXAALsHQAB7AQABewOAAFQJQAC
7AIHAfkB+wH+BV4OAAJQFQAB+QQABfkEAAHsAwcE7AVeDQAEUBQAAvkDAAL5BwAB+gH7Af8BBwEAAfkB
+wH+BF4B7AMABVAEAAZQCgIIAAT5BAACGgQAAewC+gH7AQcBAAH5Av4BBwLsBQACUAYABlABAAECCP8B
AgcABvkDAAEaBQAB7AEHAfkB+wH6AwAFBwYAAhoEAAJQAQACUAIAAQIB/wgCBgAG+QQABBoCAAHsAwcB
+QMAAewBBwkAARoFAAFQAgABUAMAAQIB/wMCAQcEAgYAAvkBAAL5BgADGgIAAewDBwH5AwAB7AReAewF
AAQaAgABUAYAAQIC/wECAQcDAgH/AQIGAAH5AgAB+QYABRoBAAHsAgcB+QH7AQAD7AVeBgADGgIAAVAG
AAECAf8BAgEHAwIC/wECBgAB+QkAAxoEAAEHAfkB+wH6BOwFXgUABRoIAAECAf8BBwUCAf8BAgYAAfkL
AAIaAwAB7AH7AfoB/gEAAwcB7AH/AQcHAAMaCgABAgH/AgIC/wICAf8BAgcAAfkQAAbsAgcB7AL/AQcH
AAIaCQABAgj/AQIYAAHsBF4B7AIAAewD/wEHEQAKAhgAAewEXgHsAwAB/wLsAf8zAAbsBwAB7DMAA+xa
AAHsPwAB7AsHCwAHtgkAB+QJAAd1AgAB7Ar/AQcLAAHzBQABtgkAAcIFAAHkCQABGwUAAXUCAAHsAf8E
BwH/AwcB/wEHCwAC8wO8AfMBtgkAAsIBngHCAZ4BwgHkCQACGwG9Af8BvQH/AXUCAAHsCv8BBwUABbYB
AAHzBQABtgMABeQBAAHCBQAB5AMABXUBAAEbBQABdQIAAewB/wQHAf8DBwH/AQcFAAHzBQAC8wG8AfMB
vAHzAbYDAAHCBQACwgGeAcIBngHCAeQDAAEbBQACGwG9Af8BvQH/AXUCAAHsCv8BBwUAAfMDvAHzAQAB
8wIAAfMGAAHCAZ4BwgGeAcIBAAHCAgABngYAARsBvQH/Ab0B/wEAARsCAAG9BQAB7AH/CAcB/wEHBQAB
8wUAAvMBvAHzAQAB8wQAAcIFAALCAZ4BwgEAAcIEAAEbBQACGwG9ARsBAAH/AwAB7Ar/AQcFAAHzAbwB
8wG8AfMBAATzBgABwgGeAcIBngHCAQAEwgYAARsBvQH/Ab0B/wEABBsFAAHsAf8CBwH/BQcB/wEHBQAB
8wIAAfMMAAHCAgABwgwAARsCAAH/CwAB7Ar/AQcFAAHzAbwC8wEAAfMKAAHCAZ4CwgEAAcIKAAEbAb0B
GwH0AQAB/wkAAewB/wIHAf8FBwH/AQcFAATzDAAEwgwABBsLAAHsCP83AAHsAf8GBwH/AewB/zUAAewI
/wHsNgAK7A0AATAB7AcAAewDAAEHAgABBwEAAQcBAAEHAgABBycAATAB+wLsBgAB7AQHAgABBwEAAQcB
AAEHAgABByYAATAD+wLsBQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHCAAHWQkAB9YGAAEwBfsC7AQAAewB
/wQHAf8DBwH/AQcLAAHDBQABWQkAARkFAAHWBQABMAL7AgAD+wLsAwAB7Ar/AQcLAALDAZoBwwGaAcMB
WQkAAhkB3QEZAd0BGQHWBAABMAP7AgAE+wLsAgAB7AH/BAcB/wMHAf8BBwUABVkBAAHDBQABWQMABdYB
AAEZBQAB1gMAATAL+wLsAQAB7Ar/AQcFAAHDBQACwwGaAcMBmgHDAVkDAAEZBQACGQHdARkB3QEZAdYC
AAEwBfsC6gb7A+wB/wgHAf8BBwUAAcMBmgHDAZoBwwEAAcMCAAHDBgABGQHdARkB3QEZAQABGQIAAd0F
AAEwBfsCAAb7AewBAAHsCv8BBwUAAcMFAALDAZoBwwEAAcMEAAEZBQACGQHdARkBAAEZBAABMAT7AgAF
+wHsAgAB7AH/AgcB/wUHAf8BBwUAAcMBmgHDAZoBwwEABMMGAAEZAd0BGQHdARkBAAQZBwABMAP7AgAE
+wHsAwAB7Ar/AQcFAAHDAgABwwwAARkCAAEZDgABMAL7AgAD+wHsBAAB7AH/AgcB/wUHAf8BBwUAAcMB
mgLDAQABwwoAARkB3QIZAQABGQ0AATAB+wIAAvsB7AUAAewI/wgABMMMAAQZEAABMAP7AewGAAHsAf8G
BwH/AewB/ysAATAB+wHsBwAB7Aj/AewtAAEwCAAK7CYAAUIBTQE+BwABPgMAASgDAAFAAwAB4AMAAQEB
AAEBBgABBxYAA/+FAAT/AX8B/gIABP8BYAEGAgAB/wEkAf8BJAFgAQYCAAH/ASQB/wEkAWABBgIABP8B
YAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8B
YAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEOAwABPwEAAT8BYAEeAwABPwEAAT8BfwH+AwABPwEAAT8E
AAb/AfABAAH/AYcE/wHwAQAB/gEDAfwBAQL/AfABAAH8AQEB/AEBAQABPwEAAT8B+AEAAfwBAQEAAT8B
AAE/AfgCAAEBAQABPwEAAT8B+AIAAQEBAAEDAQABAwH4AgABAQEAAQMBAAEDAfgCAAEBAQABAwEAAQMB
+AIAAQMBAAEDAQABAwHkAQEBAAEHAQABAwEAAQMBxgIAAQ8BAAEDAQABAwGAAQUBAAH/AQABAwEAAQMB
AAEfAQEB/wHwAQMB8AEDAYABIwEDAf8B8AEDAfABAwHHA/8B8AEDAfABAwHnAfEG/wHwAQAG/wHwAQAG
/wHwAQAC/wEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8B
AAEDAQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8B
AAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8C/wHwAQMB8AEDBP8B
8AEDAfABAwT/AfABAwHwAQME/wHwAQAC/wIAAv8B8AEAAfABDwIAAv8B8AEAAeABAwMAAT8BAAE/AeAB
AQEAAQcBAAE/AQABPwHwAgABBwEAAT8BAAE/AfACAAEHAQABAwEAAQMB+AIAAQcBAAEDAQABAwH4AgAB
BwEAAQMBAAEDAZACAAEHAQABAwEAAQMDAAEHAQABAwEAAQMDAAEHAQABAwEAAQMDAAEHAQABAwEAAQMB
mAIAAQcB8AEDAfABAwH4AgABDwHwAQMB8AEDAfgCAAEfAfABAwHwAQMC/wEAAT8B/wGHAf8BhwH/AYcC
/wH+AQEB/gEBAf4BAQL/Af4BAAH+AQAB/gEAAv8B/AEAAfwBAAH8AgABPwH8AQAB/AEAAfwCAAE/AfwB
AAH8AQAB/AIAAT8B/gEBAf4BAQH+AQEBAAE/AeABAQHgAQEB4AEBAQABPwGAAQcBgAEHAYABBwEAAT8B
gAE/AYABPwGAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8B
AAE/AYABfwGAAX8BgAF/Av8BgAF/AYABfwGAAX8C/wHhAf8B4QH/AeED/wH+AQAB4QH/AeEC/wGHAf4B
AAHhAf8B4QH/Af4BAQH+AQAB4AEAAeABAAH+AQAB/gEAAeABAAHgAQAB/AEAAYABAAHgAQAB4AEAAfwB
AAGAAQABgAEAAYABAAH8AQABgAEAAYABAAGAAQAB/gEBAYAFAAHgAQEBgAUAAYABBwGABQABgAE/AYAB
AQUAAT8BgAEDAYABAAGAAgABPwGAAQMBgAEBAYABAQEAAT8BgAEHAeABAwHgAQMBgAF/AYABfwH4AQMB
+AEDAYABfwGAAX8B+AEHAfgBBwHhAf8B4AE/AeABPwHgAT8B4QH/AeABHwHgAR8B4AEfAeEB/wHgAQ8B
4AEPAeABDwHhAf8B4AEHAeABBwHgAQcB4QH/AeABAwHgAQMB4AEDAeABAQHgAQEB4AEBAeABAQGAAQEB
wAEBAcABAQHAAQEBgAEBAYABAQGAAQEBgAEBAQABAQGAAQEBgAEBAYABAQEAAQEBgAEBAYABAQGAAQEB
AAEBAYABAQGAAQEBgAEBAgABgAEBAYABAQGAAQEBgAEAAcABAQHAAQEBwAEBAYABAAHhAQEB4QEBAeEB
AQHgAQEB8QGDAfEBgwHxAYMB/gEBAfkB/wH5Af8B+QH/Af4BAQIAAf8BvwHgAT8B4AE/AgAB/wF/AeAB
HwHgAR8DAAEBAeABDwHgAQ8DAAEBAeABBwHgAQcDAAEBAeABAwHgAQMDAAEBAeABAQHgAQEDAAEBAcAB
AQHAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYAB
AQGAAQEDAAEBAcABAQHAAQEDAAEBAeEBAQHhAQECAAH+Af8B8QGDAfEBgwIAAf8BfwH5Af8B+QH/AfwD
/wQAAfgBfwGAAf8EAAHwAX8BwQH/BAABgAEfAcABfwUAAT8BgAEPBQABDwEAAR8FAAEBAQABAQUAAQMB
AAEDBAABgAEDAQABAwQAAeABAQGAAQEEAAHgAQEBwAEBBAAB8AEAAfAFAAH4AQEB+AEBBAAB/gEBAfwB
AQQAAf8BAQH/AQEEAAH/AYEB/wGDBAAC/wHwAQAC/wH+AX8C/wHwAQAC/wH4AR8C/wHwAQAC/wHgAQcB
AAE/AQABPwH8AR8BgAEBAQABPwEAAT8B/AEfAQABAwEAAT8BAAE/AfwBHwGAAQEBAAEDAQABAwH8AR8B
AAEDAQABAwEAAQMB/AEfAYABAQEAAQMBAAEDAfgBDwEAAQMBAAEDAQABAwHwAQcBgAEBAQABAwEAAQMB
4AEDAQABAwEAAQMBAAEDAcABAQGAAQEBAAEDAQABAwMAAQMB8AEDAfABAwIAAYABBwHwAQMB8AEDAv8B
4AEfAfABAwHwAQMC/wH4AX8C/wHwAYEB/wH3BP8BwAEBAf8B8wL/Ae4BAwGAAQEB/wHhAv8B5gEHAYAB
AwEBAcABAAE/AcMBBwEAAQ8BAwGBAQABPwGBAYMBAAEHAYMBkwEAAT8BAwEBAQMBAQHBAbcBAAE/ASYB
AQEDAQEBgAG/AQABPwFuAgABAQEAAb8BAAE/AX4BAQGAAQEBAAF/AQABPwF+AQEBgAEHAQAB/wEAAT8B
vgECAcABAwEAAf8BAAE/Af8BAAHAAgEBfwEAAT8B/wGDAcAB4AGAAX8E/wHAAf4BwQX/AeML/wEAAQcB
/AEBAfwBAQH8AQEBAAEHAfwBAQH8AQEB/AEBAQABBwH8AQEB/AEBAfwBAQEAAQcBAAEBAQABAQEAAQEB
AAEHAQABAQEAAQEBAAEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEBAQABAQEAAQEBAAEHAQABAwEAAQMB
AAEDAQABBwEAAQcBAAEHAQABBwEAAQcBAAEPAQABDwEAAQ8BAAEHAQAB/wEAAf8BAAH/AQABBwEBAf8B
AQH/AQEB/wEAAQcBAwH/AQMB/wEDAf8BAAEPBv8BAAEfBv8BAAE/Af4BfwIABP8B/AE/AgAB/AEBAfwB
AQH4AR8CAAH8AQEB/AEBAfABDwEAAQcB/AEBAfwBAQHgAQcBAAEHAQABAQEAAQEBwAEDAQABBwEAAQEB
AAEBAYABAQEAAQcBAAEBAQABAQMAAQcBAAEBAQABAQEAAQEBAAEHAQABAwEAAQMBgAEDAQABBwEAAQcB
AAEHAcABBwEAAQcBAAEPAQABDwHgAQ8BAAEHAQAB/wEAAf8B8AEfAQABBwEBAf8BAQH/AfgBPwEAAQ8B
AwH/AQMB/wH8AX8BAAEfBP8B/gH/AQABPwT/FgAL
</value>
</data>
<data name="lblOwner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtOwner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GrpBeschreibung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RichTextBoxHS1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GrpAllgemein.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GrpHinweis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtHinweis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="PicHinweis.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="PicHinweis.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAABQNJREFUaEPtmH1o
VXUYx891d3PYaGgNpSGuDLMpFkVF0R9CEFGU/bN/hBqRFM6IKAgKgjKQwtIkiwWR0YsvV0gqxbTC0ula
bu7FTZtm8y0m21iuptPdl6ff5/md39mdzPKPe7cjnMHDzr3nOed8X57n93vO9bzoL1IgUiBSIFIgbAp0
tH4nXYffkbDhuiI8nR2bJTNcIplUkZzrv09aGuuuLiKpvz1JD3mSSduoS5TKWys+uzpI9HYtkoFTk4z6
BZIcmh+QePTBx+TVV2rDTYK6B7wSGJ4u3UeW2lLyXSgrWyo7tzWFl8SZI4sVfKovZoDPUAfSqdmSHrSl
hAtLnnw5vASc+goY5ZPFkh6eE/TDro3XCS78/H1L+Eg49W35WPDaxMlyLadsF5Y9uzx8BEarbwCbVWj/
prh1gTLyV6Wt62aqC7t2NIeHRHfnU9LXGpfzf1L7JbLzixlSFL8hCNfULK+ZYU8W3lslL76wOjwEnPqp
vyAwPQA+pbBSrim8R5s3k5xly8gQcC407GmbeBJO/aD2jQNO/SnxB4R4aOEiJUawQkEkNC70tBRq+Vw8
Y9XPpGNKoLBgpoIn1AGzsdELSsD0w/q1s6W8/DmZUBdO//aSglf1L1wbbFoA1vKZ/LASAKxdkWaZvDK5
eCom9MPtC56e2N0Z8CPNa8qDHjBAmzbElMCC+c/I/XdVSU/jZLsKGZLqQo8l8OmquerChAx7qN/TXKQE
MoOlCg5gEGjf7GkJPf5ItRKgcSkdPY8L56+XzImYOnHnbdWy/PVPxr+ZqX0InDtoQBkCCs6AQlmOcYAN
i3Kiad15JQuJLpNrHPvgzUq55daa8XXhRPtr0vdrXAmkTloCgFcCvgsAZ8NKfHijOjDqvCGgeUftNTfP
qRnfcZuy6d1fJEPtBtjg1BF1fRKU0do3KpWA7sZZBJSIaWRGDK6HSO2KuepC24H6/JeSUx8HrPpTrbqm
JDT8MqpPlOgqpHk0t8s5Zo9pZv3OfIYIDb/y7c/zT4Cy6W+YJP+0FYyoDygii8QF0xssoVrrlAvnXB7/
zbiNC0nfBRybN69GWpv25Y8E6g/Ux5SAAhqcZkFRy4QD6JcS47Or/SCPnE7bE4zaev6QvZYyenfll/kj
QDmc3esJ6ip4Hg4YF5BAcZZMf2QIlk8HnBzyD9t76KRKL5l7sS/krRdQ//SOmAzsMw8DBLXvgADGJ0G5
NCSKg3moOF6hZTKKLPkdVnXtBdw0OSzJ7M552RfYTXt/isnZX/yGRFFAAI4SIAwJCGSP0kyj1LeO0gAn
j+tc4CS9cNCSdL3Q0rg3d6X0+6F10v2jWToNAfcgBQL47MCF4yMEUJNRgfdgfU8e6xrc5K3NnOPe9BjL
75r3NuaOAK+LJ7d7SkABd/pgnPKBA3bFYXzGhWml1fLD9gM6/2sJOQdcPi5wbEjjiLprctgE777jidwR
QP3j2zztgf460wdGJYIHEtnHlqDdyFB+S22FkkbdsfLddywOfbutQG4T3JLYnRsSOMCAdvRrT7q2mvj2
8uGIAlhBG2C4d7nr/uBe5p7ZDrsxJKfNjAsQYFT+v2je4Mml8V/XkItAx74ZUb/ipmW57QN+1f34o6+0
NhmBcx3cl6angWn8xVXPmwk1hyuR+1maply9ar2q4+L9NZuE4LM7vvTzWLkuP/teHCNUXsBf0W/rUVKk
QKRApECkQKTAOCvwLwgAbFDiNRjdAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnOK.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmDokumentpaketInfo</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAICAQAAEABADoAgAAFgAAACgAAAAgAAAAQAAAAAEABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAwMDAAICAgAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
AAD///8AAAAAAAAAAAAACIAAAAAAAAAAAAAAAAAAAIiAAAAAAAAAAAAAAAAAAAAIgAAAAAAAAAAAAAAA
AAAPCIAAAAAAAAAAAAAAAAAA/wiAAAAAAAAAAAAAAAAID/8IgAAAAAAAAAAAAACIiA//CIiIAAAAAAAA
AACIgAB//wiIiIgAAAAAAAAIAAf///9wAIiIgAAAAAAAAH////////cAiIgAAAAAAH//////////9wiI
gAAAAA/////////////wiIgAAAD//////////////wiIgACP/////MzMzMz////wiIAIf//////8zMz/
////9wiICP///////MzM//////8IiIf///////zMzP//////cIiP///////8zMz///////CIj///////
/MzM///////wiI////////zMzP//////8IiP///////8zMz///////CIj//////8zMzM///////wgIf/
////////////////cIAI/////////////////wgACH//////fMzH//////cAAACP/////8zMzP/////w
AAAACP/////MzMz/////AAAAAACP////fMzH////8AAAAAAACH//////////94AAAAAAAACIf///////
94gAAAAAAAAAAIiH////eIgAAAAAAAAAAAAACIiIiIAAAAAAAAD//+f////H////h////wf///4H///4
B///wAD//wAAP/4AAB/8AAAP+AAAB/AAAAPgAAABwAAAAYAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAABAAAAAYAAAAOAAAAHwAAAD+AAAB/wAAA/+AAAf/wAAP//AAP//+Af/w==
</value>
</data>
</root>

View File

@@ -0,0 +1,366 @@
Imports System
Imports System.Data
Imports System.Data.SqlTypes
Imports System.Data.SqlClient
Imports System.IO
Public Class frmDokumentpaketInfo
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents lblBezeichnung As System.Windows.Forms.Label
Friend WithEvents txtBezeichnung As System.Windows.Forms.TextBox
Friend WithEvents GrpDokumentvorlagen As System.Windows.Forms.GroupBox
Friend WithEvents lblOwner As System.Windows.Forms.Label
Friend WithEvents txtOwner As System.Windows.Forms.TextBox
Friend WithEvents GrpBeschreibung As System.Windows.Forms.GroupBox
Friend WithEvents RichTextBoxHS1 As EDOKAApp.RichTextBoxHS
Friend WithEvents GrpAllgemein As System.Windows.Forms.GroupBox
Friend WithEvents GrpHinweis As System.Windows.Forms.GroupBox
Friend WithEvents btnOK As System.Windows.Forms.Button
Friend WithEvents ImageList3 As System.Windows.Forms.ImageList
Friend WithEvents TreeVorlagen As System.Windows.Forms.TreeView
Friend WithEvents PicHinweis As System.Windows.Forms.PictureBox
Friend WithEvents txtHinweis As System.Windows.Forms.Label
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmDokumentpaketInfo))
Me.lblBezeichnung = New System.Windows.Forms.Label()
Me.txtBezeichnung = New System.Windows.Forms.TextBox()
Me.GrpDokumentvorlagen = New System.Windows.Forms.GroupBox()
Me.TreeVorlagen = New System.Windows.Forms.TreeView()
Me.ImageList3 = New System.Windows.Forms.ImageList(Me.components)
Me.lblOwner = New System.Windows.Forms.Label()
Me.txtOwner = New System.Windows.Forms.TextBox()
Me.GrpBeschreibung = New System.Windows.Forms.GroupBox()
Me.RichTextBoxHS1 = New EDOKAApp.RichTextBoxHS()
Me.GrpAllgemein = New System.Windows.Forms.GroupBox()
Me.GrpHinweis = New System.Windows.Forms.GroupBox()
Me.txtHinweis = New System.Windows.Forms.Label()
Me.PicHinweis = New System.Windows.Forms.PictureBox()
Me.btnOK = New System.Windows.Forms.Button()
Me.GrpDokumentvorlagen.SuspendLayout()
Me.GrpBeschreibung.SuspendLayout()
Me.GrpAllgemein.SuspendLayout()
Me.GrpHinweis.SuspendLayout()
Me.SuspendLayout()
'
'lblBezeichnung
'
Me.lblBezeichnung.Location = New System.Drawing.Point(16, 16)
Me.lblBezeichnung.Name = "lblBezeichnung"
Me.lblBezeichnung.Size = New System.Drawing.Size(88, 24)
Me.lblBezeichnung.TabIndex = 1
Me.lblBezeichnung.Text = "Dokumentpaket"
'
'txtBezeichnung
'
Me.txtBezeichnung.BackColor = System.Drawing.Color.White
Me.txtBezeichnung.Location = New System.Drawing.Point(104, 16)
Me.txtBezeichnung.Name = "txtBezeichnung"
Me.txtBezeichnung.ReadOnly = True
Me.txtBezeichnung.Size = New System.Drawing.Size(368, 20)
Me.txtBezeichnung.TabIndex = 2
Me.txtBezeichnung.Text = "TextBox1"
'
'GrpDokumentvorlagen
'
Me.GrpDokumentvorlagen.Controls.AddRange(New System.Windows.Forms.Control() {Me.TreeVorlagen})
Me.GrpDokumentvorlagen.Location = New System.Drawing.Point(8, 160)
Me.GrpDokumentvorlagen.Name = "GrpDokumentvorlagen"
Me.GrpDokumentvorlagen.Size = New System.Drawing.Size(240, 360)
Me.GrpDokumentvorlagen.TabIndex = 3
Me.GrpDokumentvorlagen.TabStop = False
Me.GrpDokumentvorlagen.Text = "Dokumentvorlagen"
'
'TreeVorlagen
'
Me.TreeVorlagen.CheckBoxes = True
Me.TreeVorlagen.Dock = System.Windows.Forms.DockStyle.Fill
Me.TreeVorlagen.ImageList = Me.ImageList3
Me.TreeVorlagen.Location = New System.Drawing.Point(3, 16)
Me.TreeVorlagen.Name = "TreeVorlagen"
Me.TreeVorlagen.Size = New System.Drawing.Size(234, 341)
Me.TreeVorlagen.TabIndex = 0
'
'ImageList3
'
Me.ImageList3.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList3.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList3.ImageStream = CType(resources.GetObject("ImageList3.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList3.TransparentColor = System.Drawing.Color.Transparent
'
'lblOwner
'
Me.lblOwner.Location = New System.Drawing.Point(488, 16)
Me.lblOwner.Name = "lblOwner"
Me.lblOwner.Size = New System.Drawing.Size(80, 24)
Me.lblOwner.TabIndex = 4
Me.lblOwner.Text = "Verantwortlich:"
'
'txtOwner
'
Me.txtOwner.BackColor = System.Drawing.Color.White
Me.txtOwner.Location = New System.Drawing.Point(576, 16)
Me.txtOwner.Name = "txtOwner"
Me.txtOwner.ReadOnly = True
Me.txtOwner.Size = New System.Drawing.Size(208, 20)
Me.txtOwner.TabIndex = 5
Me.txtOwner.Text = "TextBox1"
'
'GrpBeschreibung
'
Me.GrpBeschreibung.Controls.AddRange(New System.Windows.Forms.Control() {Me.RichTextBoxHS1})
Me.GrpBeschreibung.Location = New System.Drawing.Point(256, 160)
Me.GrpBeschreibung.Name = "GrpBeschreibung"
Me.GrpBeschreibung.Size = New System.Drawing.Size(544, 360)
Me.GrpBeschreibung.TabIndex = 6
Me.GrpBeschreibung.TabStop = False
Me.GrpBeschreibung.Text = "Beschreibung"
'
'RichTextBoxHS1
'
Me.RichTextBoxHS1.AcceptsTab = True
Me.RichTextBoxHS1.Dock = System.Windows.Forms.DockStyle.Fill
Me.RichTextBoxHS1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RichTextBoxHS1.Location = New System.Drawing.Point(3, 16)
Me.RichTextBoxHS1.Name = "RichTextBoxHS1"
Me.RichTextBoxHS1.ReadOnly = True
Me.RichTextBoxHS1.Size = New System.Drawing.Size(538, 341)
Me.RichTextBoxHS1.TabIndex = 4
Me.RichTextBoxHS1.Text = ""
'
'GrpAllgemein
'
Me.GrpAllgemein.Controls.AddRange(New System.Windows.Forms.Control() {Me.txtBezeichnung, Me.lblBezeichnung, Me.txtOwner, Me.lblOwner})
Me.GrpAllgemein.Location = New System.Drawing.Point(8, 8)
Me.GrpAllgemein.Name = "GrpAllgemein"
Me.GrpAllgemein.Size = New System.Drawing.Size(800, 48)
Me.GrpAllgemein.TabIndex = 7
Me.GrpAllgemein.TabStop = False
Me.GrpAllgemein.Text = "Allgemeines"
'
'GrpHinweis
'
Me.GrpHinweis.Controls.AddRange(New System.Windows.Forms.Control() {Me.txtHinweis, Me.PicHinweis})
Me.GrpHinweis.Location = New System.Drawing.Point(8, 64)
Me.GrpHinweis.Name = "GrpHinweis"
Me.GrpHinweis.Size = New System.Drawing.Size(800, 88)
Me.GrpHinweis.TabIndex = 8
Me.GrpHinweis.TabStop = False
Me.GrpHinweis.Text = "Wichtiger Hinweis"
'
'txtHinweis
'
Me.txtHinweis.Location = New System.Drawing.Point(72, 24)
Me.txtHinweis.Name = "txtHinweis"
Me.txtHinweis.Size = New System.Drawing.Size(720, 56)
Me.txtHinweis.TabIndex = 60
Me.txtHinweis.Text = "Label1"
'
'PicHinweis
'
Me.PicHinweis.Image = CType(resources.GetObject("PicHinweis.Image"), System.Drawing.Bitmap)
Me.PicHinweis.Location = New System.Drawing.Point(16, 24)
Me.PicHinweis.Name = "PicHinweis"
Me.PicHinweis.Size = New System.Drawing.Size(40, 46)
Me.PicHinweis.TabIndex = 59
Me.PicHinweis.TabStop = False
Me.PicHinweis.Visible = False
'
'btnOK
'
Me.btnOK.Location = New System.Drawing.Point(720, 528)
Me.btnOK.Name = "btnOK"
Me.btnOK.TabIndex = 9
Me.btnOK.Text = "OK"
'
'frmDokumentpaketInfo
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(802, 557)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnOK, Me.GrpHinweis, Me.GrpAllgemein, Me.GrpBeschreibung, Me.GrpDokumentvorlagen})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmDokumentpaketInfo"
Me.Text = "Informationen zum Dokumentpaket:"
Me.GrpDokumentvorlagen.ResumeLayout(False)
Me.GrpBeschreibung.ResumeLayout(False)
Me.GrpAllgemein.ResumeLayout(False)
Me.GrpHinweis.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim m_key As Integer
Property Key() As Integer
Get
Return m_key
End Get
Set(ByVal Value As Integer)
m_key = Value
End Set
End Property
Dim m_title As String
Property Titel() As String
Get
Return m_title
End Get
Set(ByVal Value As String)
m_title = Value
End Set
End Property
Dim on_Load As Boolean = True
#End Region
#Region "Init_Load"
Private Sub frmDokumentpaketInfo_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
Dim tn As TreeNode
Me.Text = Me.Text + " " + Me.Titel
Dim tb As DataTable = Generic_Select(1)
If tb.Rows.Count > 0 Then
Me.txtBezeichnung.Text = tb.Rows(0).Item("bezeichnung")
Me.txtOwner.Text = tb.Rows(0).Item("owner")
Me.txtHinweis.Text = tb.Rows(0).Item("wichtigehinweise")
For i = 0 To tb.Rows.Count - 1
tn = Me.TreeVorlagen.Nodes.Add(tb.Rows(i).Item("DTBezeichnung"))
tn.Tag = i
tn.ImageIndex = tb.Rows(i).Item("imageindex")
tn.SelectedImageIndex = tb.Rows(i).Item("imageindex")
tn.Checked = tb.Rows(i).Item("zwingend") = 1
Next
Load_Beschreibung()
End If
If Me.txtHinweis.Text.Length > 0 Then Me.PicHinweis.Visible = True Else Me.PicHinweis.Visible = False
Me.on_Load = False
End Sub
Private Sub Load_Beschreibung()
Dim connection As New SqlConnection()
Dim da As New SqlDataAdapter("Select * From EDEX_dokumentpaket where dokumentpaketnr=" + Str(Me.Key), connection)
Dim CB As SqlCommandBuilder = New SqlCommandBuilder(da)
Dim ds As New DataSet()
Dim dokname As String
dokname = Globals.Applikationsdaten.Rows(Globals.AppldataRow).Item("pfad_temporaer_dokumente") + "tmp.rtf"
Try
connection.ConnectionString = Globals.sConnectionString
connection.Open()
da.Fill(ds, "docbeschreibung")
Dim myRow As DataRow
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item(5)
Dim K As Long
K = UBound(MyData)
Dim fs As New FileStream(dokname, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
Me.RichTextBoxHS1.LoadFile(dokname)
Catch ex As Exception
Finally
CB = Nothing
ds = Nothing
da = Nothing
connection.Close()
connection = Nothing
End Try
End Sub
#End Region
#Region "Datenbank"
Private Function Generic_Select(ByVal typ As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Select Case typ
Case 1
scmCmdToExecute.CommandText = "edex_sp_dokumentpaketinfo"
Case Else
End Select
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Select Case typ
Case 1
scmCmdToExecute.Parameters.Add(New SqlParameter("@dpnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.Key))
End Select
scmCmdToExecute.Connection = conn.scoDBConnection
Try
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("Dokumentpaket::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
#End Region
Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click
Me.Close()
End Sub
Dim CheckValue As Boolean
Private Sub TreeVorlagen_BeforeCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewCancelEventArgs) Handles TreeVorlagen.BeforeCheck
If Me.on_Load Then Exit Sub
Try
e.Cancel = True
Catch
End Try
End Sub
Private Sub TreeVorlagen_AfterCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeVorlagen.AfterCheck
End Sub
End Class

View File

@@ -0,0 +1,919 @@
<?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="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>437, 17</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABI
EQAAAk1TRnQBSQFMAgEBCgEAASwBAAEsAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wEAAi0RAAEtATQBLSoA
AVoBLQEAAYUB5gQHAuYIAAEtATQBLSoAAloBLQEAB+YIAAMtKgABLQJaAS0BAAQHAuYBAAH5BgAB7CwA
Ai0CWgEtAQAF5gEAAfkEAALsA+gCuCkAAS0BWgHsBQAC5gEAAfkEAAHsBegCuCgAAuwBxwQJAQAC5gEA
AfkBAAH6AQAB7AHoAf8C6AVtJwAB7AHhAccBCQPyBAAB+QEAAfoBAAHsAf8D6AHOA9YBbSYAAewB4QH/
AccFCQMAAfkBAAH6AQAB7AHoAv8B6AHOAd0BCQHWAW0mAAHsAf8B4QfHAQAC+QEAAfoBAAHsAf8B6AL/
Ac4C3QHWAW0mAAHsAeED/wElAb0D8gEAASMCAAH6AgAB7AH/AegB/wHOAt0B1gEAARclAAHsAf8B4QL/
ASUEvQEAASMB+QEAAfoCAALsAf8B6APOAgABFwEAATMkAAHsAf8B4QH/BCUBAAMjAvoEAAPsAgAClAEX
AQABMyQAAuwB/wHhAf8B4QEtAgACBwH6AScJAAUjATMmAAPsAgAF+gEnAfoKAAECAvoBMyoACCcKAAUC
IgACLQ4AEAcTAAEtATQBLQoAAVoBLQEAAYUB5gQHAuYFAAMHCw8CBxMAAS0BNAEtAQACBwLmBQACWgEt
AQAH5gUAAwcBAAm8AQACBxMAAS0BNAEtAQAE5gUAAS0CWgEtAQAEBwLmAQAB+QMAAwcBAAn/AQACBwIA
AfsBAwH7AQMB+wEDAfsBAwH7AQMB+wEDAfsEAAEtATQBLQEAAgcC5gEAAfkDAAItAloBLQEABeYBAAH5
AwADBwEACf8BAAIHAgABAwH7AQMB+wEDAfsBAwH7AQMB+wEDAfsFAAMtAQAE5gEAAfkEAAEtAVoB7AUA
AuYBAAH5AwADBwEACf8BAAIHAgAB+wEDAfsBAwH7AQMB+wEDAfsBAwH7AQMFAAHsBQAC5gEAAfkEAALs
AccECQEAAuYBAAH5AQAB+gEAAwcBAAn/AQACBwEAAfsBAwH7AQMB+wEDAfsBAwH7AQMB+wEDAfsDAALs
AccECQEAAuYBAAH5AQAB+gIAAewB4QHHAQkD8gQAAfkBAAH6AQADBwEACf8BAAIHAQABAwH7AQMB+wED
AfsBAwH7AQMB+wEDAfsBAwMAAewB4QHHAQkD8gQAAfkBAAH6AQAB7AHhAf8BxwUJAwAB+QEAAfoBAAMH
AQAJ/wEAAgcBAAH7AQMB+wEDAfsBAwH7AQMB+wEDAfsBAwEAAfsBAAHsAeEB/wHHBQkDAAH5AQAB+gEA
AewB/wHhB8cBAAL5AQAB+gEAAwcBAAn/AQACBw4AAf8BAAHsAf8B4QfHAQAC+QEAAfoBAAHsAeED/wEl
Ab0D8gEAASMCAAH6AQADBwEABv8D7wEAAgcCAAH7Af8B+wH/AfsB/wH7Af8B+wH/AfsB/wH7AQAB7AHh
A/8BJQG9A/IBAAEjAgAB+gEAAewB/wHhAv8BJQS9AQABIwH5AQAB+gEAAwcBAAb/AQABFAEAAUMCBwIA
Af8B+wH/AfsB/wH7Af8B+wH/AfsB/wH7Af8BAAHsAf8B4QL/ASUEvQEAASMB+QEAAfoCAAHsAf8B4QH/
BCUBAAMjAvoBAAMHAQAG/wEAAbwBEAMHAgAB+wH/AfsB/wsAAewB/wHhAf8EJQEAAyMC+gIAAuwB/wHh
Af8B4QEtAgACBwH6AScCAAMHAQAG8QEAAQ8EBxEAAuwB/wHhAf8B4QEtAgACBwH6AScFAAPsAgAF+gEn
AfoBAAMHCA4FBxMAA+wCAAX6AScB+ggACCcBABAHFwAIJxEAEAcQAhYAAQMB/wgAEAcCAg0AAQIDAAFl
AeYEBwLmCQAB7AEDAewB/xMABQcBAgEAAgMGAAIHAQABAwEAAQIDAAFlB+YHAAEDAewBAwHsAQMB/woA
CQMBAAQHAQIBAAIDBgACBwEAAQMBAAECAwABZQHmBAcC5gEAAfkEAAEDAewBAwHsAQMB7AH/AQAB7AcA
AfsBAAkDAQADBwECAQACAwYAAgcBAAEDAQABAgMAAWUH5gEAAfkEAAHsAQMB7AEDAewBAwH/AQAB7AcA
Af8B+wEACQMBAAIHAQIBAAIDCQABAwEAAQIDAAFlAeYBBwHmAgcC5gEAAfkEAAEDAewBAwIAAewB/wEA
AewHAAH7Af8B+wEACQMBAAEHAQIBAAwDAQABAgMAAWUH5gEAAfkBAAH6AgAB7AEDAewCBwEDAf8BAAHs
AQABBgUAAf8B+wH/AfsLAAECAQACAwgAAgMBAAECAwABZQHmAwcB5gFlAgAB+QEAAfoCAAEDAewBAwHs
AQMB7AH/AgABBgX+AQAB+wH/AfsB/wH7Af8B+wH/AfsBAAUHAQIBAAEDAQAIBwEAAQMBAAECAQAB+wHs
AQcB+wHsAQcC5gFlAeYBAAH5AQAB+gIAAewBAwHsAQMB7AEDAf8BAAFtBv4BAAH/AfsB/wH7Af8B+wH/
AfsB/wEABQcBAgEAAQMBAAgHAQABAwEAAQICAAH7AewB+wHsAQcB/wNlAvkBAAH6AgABAwHsAQMB7AED
AewB/wEAAewBbQH+BG0BAAH7Af8B+wcABQcBAgEAAQMBAAgHAQABAwEAAQIDAAH7AQcB7AEHAfwCBwH5
ASMCAAH6AgAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABBwMACAcDAAEHAQIBAAEDAQAIBwEAAQMBAAEC
BOwB+wEHAfsC7AL5ASMB+QEAAfoCAAEDAewBAwHsAQcB/wHsAQAB7AIAAW0DAA0HAgABBwECAQABAwEA
CAcDAAECBPsDBwP7AyMC+gIAAewBAwEHAf8B7AEAA+wGAAgHAQADBwEAAQcBAAEHAQIBAAEDAQAIBwEA
AQcBAAECAwAB7AH7AQcB7AEHAfoDBwH6AScDAAEHAf8B7AEABewGAAkHAwAEBwECDgABAgIAAewC+wHs
AfsB7AEHBPoBJwH6EQAQBxACAgAB+wEAAfsB7AEAAfsB7AYnAQABQgFNAT4HAAE+AwABKAMAAUADAAEw
AwABAQEAAQEFAAGAAQEWAAP/AgABDwHhAf8FAAEPAeEB/wUAAQMB4QH/BQABAwHgAX8FAAEDAYABPwQA
AYABAAGAAT8EAAGAAgABHwQAAYACAAEfBwABDwcAAQ8GAAGAAQMGAAGAAQMEAAGAAQAB4AEDBAABgAEA
Af4BAwQAAeABAAH/AYMEAAH+AQEB/wGDBQABDwIAAv8B4AEPAQABDwIAAv8B4AEPAQABAwIAAYABAAHg
AQMBAAEDAgABgAEAAeABAwEAAQMCAAGAAQAB4AEDAYADAAGAAQAB4AEAAYAFAAGAAQABgAUAAYAVAAGA
BwABgAMAAYADAAGAAQABgAEAAYADAAHDAf8BgAEAAeADAAL/AeABAAH+AQECAAL/Af4BAQH8AX8EAAHg
AQ8B8AF/BAAB4AEPAcABfwQAAeABAwEAAR8EAAHgAQMBAAEfBAAB4AEDAQABFwQAAeACAAEHBAAB4AcA
AeAHAAGABwABwAcAAeACAAEHBwABFwcAAR8EAAHgAgABHwQAAcACAAEfBAAB0gEBCw==
</value>
</data>
<metadata name="TreeSelektion.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="ImgListSteuerung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>191, 17</value>
</metadata>
<data name="ImgListSteuerung.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADM
CgAAAk1TRnQBSQFMAgEBBwEAASwBAAEsAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/xYAB+w4AAcBA+w0AAIB
B/kCAQLsMgABAQv5AQEB7AQAAQEDAAEBKQABAQv5AQEC7AMAAgEBAAIBKAABAQP5Av8D+QL/A/kBAQHs
BAABAQEAAQEpAAEBA/kD/wH5A/8D+QEBAewEAAMBKQABAQT5Bf8E+QEBAewFAAEBKgABAQX5A/8F+QEB
AewEAAMBIgAB7AYAAQEE+QX/BPkBAQHsBAABAQEAAQEpAAEBA/kD/wH5A/8D+QEBAewDAAIBAQACASgA
AQED+QL/A/kC/wP5AQEEAAEBAwABASkAAQEL+QEBMwABAQv5AQE0AAIBB/kCATcABwE8AAEBAW09AAEB
AfkCbQkAC20QAAH/FgABAQP5Am0HAAxtBgAB/x8AAQEF+QJtBgABKAouAW0HAAH/BwAB/xUAAQEC+QL/
A/kCbQUAASgDLgH/Bi4BbQcAAf8GAAH/FQABAQP5Av8E+QJtBAABKAIuA/8FLgFtCAAB/wUAAf8UAAEB
C/kCbQMAASgBLgX/BC4BbQkAAf8DAAH/FAABAQ35Am0CAAEoAS4C/wEuA/8DLgFtDAAB/xUAAQEF+QL/
BvkBbQMAASgBLgH/Ay4D/wIuAW0LAAH/FwABAQT5Av8F+QFtBAABKAYuA/8BLgFtDAAB/xcAAQED+QL/
BPkBbQUAASgHLgL/AS4BbQkAAf8CAAH/GAABAQL5Av8D+QFtBgABKAguAf8BLgFtCAAB/wUAAf8XAAEB
AfkC/wL5AW0HAAEoCi4BbQcAAf8HAAH/FwABAQP5AW0IAAsoBgAB/woAAf8XAAEBAfkBbT4AAQEoAAFC
AU0BPgcAAT4DAAEoAwABQAMAASADAAEBAQABAQYAAQEWAAP/AQAC/wH4AQ8C/wIAAf4B/wHwAQMC/wIA
AfwB/wHAAQEC/wIAAfgB/wGAAQEB7gH/AgAB8AF/AYABAAHkAf8CAAHiAX8CAAH1Af8CAAHGAT8CAAHx
Af8CAAH/AT8CAAH7Af8CAAH/AZ8CAAHxAf8CAAH/AY8CAAH1Af8CAAH/Ac8CAAHkAf8CAAH/AecBAAEB
Ae4B/wIAAf8B8wGAAQMC/wIAAf8B+QGAAQMC/wIAAf8B/QHAAQcC/wIAAv8B8AEfAv8CAAL/Af4Bfwb/
AfwBPwHgAQMB/wH5Av8B+AEfAcABAwHnA/8B8AEPAcABAwHDAfMC/wHgAQcBwAEDAcMB5wL/AcABAwHA
AQMB4QHHAv8BgAEBAcABAwHwAY8C/wIAAcABAwH4AR8C/wEAAQEBwAEDAfwBPwL/AYABAwHAAQMB+AEf
Av8BwAEHAcABAwHwAZ8C/wHgAQ8BwAEDAcEBxwL/AfABHwHAAQMBgwHjAv8B+AE/AcABBwGPAfEC/wH8
AX8G/wH+Bf8L
</value>
</data>
<metadata name="ctmenuTreeDokVorlagen.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="ImageList3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>465, 56</value>
</metadata>
<data name="ImageList3.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACA
RAAAAk1TRnQBSQFMAgEBSQEAAQQBBwEEAQcBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATABAQIAAQEBAAEIBgABTBgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc
AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA
AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz
AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA
AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA
AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm
AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA
ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz
AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz
AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz
AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ
AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm
AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM
Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ
AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ
AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA
ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/
ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ
AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA
AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA
AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA
AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ
AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA
AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/
AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/
ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/
AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA
AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP/QgAB8gTzAbsDBwK8
A/QyAAHyA/MCRwdGAkcxAAEZA/MCRwFGARoCRgL/AUYCRzEAARkD8wJHAUYBGgH/AUYC/wFGAkcxAAHx
A/MBRwlNAUcxAAHwBPMF9AEZNQAB8AfzAvIBGTUAARkG8wLyAvE1AAEZBfMC8gHxAvA1AAfpBEY1AAPp
BUYD8zUABOkERgLzAfQ1AATpBEYB8wH0twABvAHtApIF9wKSAe0HAAb/AQcBVgJQAfAKAAHqBfkSAAG8
AgcBvAHvAQcCkgHtAZIB7QEHBAAB/wH0AfIFBwHvAU8BVgEbAVYBcgEAARQBbQTqAW0B6wEAAeoF+QEA
AfIE8wG7AwcCvAP0AwABvAF0AvAB8QHvAe0B7wL3AewBBwQAAbwBBwW8AgcBTwGYAf8B9gGXAQABbQHd
A/kB3QG1AesBAAHqBfkBAAHyA/MCRwdGAkcCAAG8AZMBTQLzAfIC8wHyAfEB8AEHBAACBwW8AgcBTwF4
AZgBeAGXAQAB6gP5Ad0BDwMAAeoF+QEAARkD8wJHAUYBGgJGAv8BRgJHAgABvAHxAZQBJgH/AfMB9ALz
AfQB8QEHBAABvAEHBrwBBwFyApcBVgHzAQAB6gP5ARIBAAHqAd4BAAFtAd0E+QEAARkD8wJHAUYBGgH/
AUYC/wFGAkcCAAG8AfIB8wH/ASYBlAH0Af8CdQFNAbwEAAG8AQcGvAQHAe0CAAHqAvkB1wEAARIC3QEA
ARACEgGNAvkBAAHxA/MBRwlNAUcCAAG8AfIB8wH0AZQB/wG9AU0BmgEaAfQBvAQAAfcE/wO8BP8B8wIA
AeoD+QHXAd0BtgHdAhIBbQEAAeoB1wH5AQAB8AMAAfMF9AEZBgABvAHyAfMB9AH/AZoB4wH/AfQB8wHy
AbwGAAL/Ae0D7AGSAv8EAAHqA/kB3QESAeoBEgLeAW0BAAERAfcB+QEAAfAJAAEZBgABvAHyAvMB9AFH
Af8C9AHzAfIBvAcAAf8CBwK8Ae0B9AUAAeoC+QHdAQ8EAAFDBAABtQEAARkJAAHxBgABvAHxAfIB8wH0
AUcB/wH0AvMB8QG8BwAB7wG8AQcB9wIHAfAFAAHrAvkBEgEAARAB/wHxAgABEAH/AfEDAAEZCQAB8AYA
AbwB8AHxAfIB8wFHAfQC8wHyAfAB9wcAAf8B8wH0AfIB8AHvAe0FAAHsAvkB6gEAAf8BAAH/AgAB/wEU
Af8B9wIAB+kERgYAArwB8AHxAfIBTQHzAfIB8ALvAbwHAAP/AfMB8gEHAZIFAAHsAf8B3QESAQAB8QH/
AfECAAHsAv8DAAPpBUYD8wYAAbwBBwK8AfABkwHxAvAB9AEHCAAD/wH0AfMB8AH3BQAB7AL/AdcBEAkA
AbYBAATpBEYC8wH0BgABvAQHA7wB8AEHCQAB8gP/AfQBBwH/BQABFAPsAa4DAAG1Ad0B6gEAAREBBwH/
AQAE6QRGAfMB9AcAAbwD7wQHAe8LAAHxA/8B8gwAAbwB9AHyAfEB3gT/MAAB/wHyAQAB/wEVAUMK/zIA
DuwG/wHzAvEB8gH0Bf8uAALsBP8B8wHvAbsCugHwAZEBBwHzA/8IAAEpGAAN+wEAAewD/wHwAZABswO5
AbsBCQGzAZEB8QL/BgABhQEAASkCNxYABfsCAAEpBfsBAAHsAv8B8AGQA7MCuQG6Af8CswGRAfIB/wQA
AQEBAAGFAeYBKQQ3FAAF+wIAASkE+wEAAuwB/wH0AZADswEJAfQBugG5Af8BugGzAZABkgH0AgABJwER
AQEB+QGFAeYBKQE3AfcDNxQAC/sBAAHsAQAB/wG8A7MBuQG6ARkBuQG6Af8BugKzAZAB8QEAAW0BJwH6
AQEB+QGFAeYBKQI3AvcBNxQABfsBAAT7AQAB7AIAAf8BkQG0ArMCuQH/ARkB9AH/AbMBCQG7AZABBwEA
AW0BJwH6AQEB+QGFAeYBKQQ3AfcVAAT7AQAE+wEAAewCAAH/AZAEswG5AboD/wGzAfQBCQGQAe8CAAEn
AfoBAQH5AYUB5gEpATcC9wI3FQAD+wMAAvsBAAHsAwAB/wGRArQBugKzA/8BCQH0ArMBkAHvAgABJwH6
AQEB+QGFAeYBKQM3AfcBNxYAAvsDAAL7AQAB7AMAAf8BkQS7AfAC/wH0BLMBiwG8AgABJwH6AQEB+QGF
AeYCKQI3AykVAAL7AwAB+wEAAewEAAH/AfABuwHwAfMB9AP/AboDswGQAYsB8wIAAScB+gEBAfkBhQLm
AikBNwEpATcXAAL7AQAC+wEAAewEAAL/AbQB8gHzAQkB/wH0AfMBGQEJArMBkAHvAf8CAAEnAfoCAQH5
AoUB5gMpGAAE+wEAAewFAAL/AfMBtAG7AbwB/wEZAQkC8wG0AZABkQH0Af8CAAInAfoCAQH5A4UbAAP7
AQAB7AUAA/8B8gG0AfMB/wH0AgkBuwK0AfQC/wMAAicB+gMBHQAC+wgABP8B9AHwAf8BCQG7ArUB8AT/
BAADJykACP8B9Af/UQABZQHmBAcC5ggAAaYB3QQHAd0BBxcAAzAFAAcwAgABZQfmCAABpgbdAQcPAAEp
BwABMAKgAYUD1gEAAZoBoASaATACAAFlAeYEBwLmAQAC+QUAAaYB3QQHAd0BBwEAAZQBBwoAAYUBAAEp
AlkFAAEwAcMBoAGFAd0BCQHWAwABoAOaATACAAFlB+YBAAL5BQABpgbdAQcBAAGUAQcIAAEBAQABhQHd
ASkEWQMAATABwwGgAYUC3QHWAQABlAEAAZoBoAKaATACAAFlAeYBBwHmAgcC5gEAAvkFAAGmAd0BBwHd
AgcB3QEHAQABlAEHBgABJwERAQEBlAGFAd0BKQFZAfcDWQIAATABwwGgAYUC3QHWAQABlAMAAaABmgEw
AgABZQfmAQAC+QEAAvoCAAGmBt0BBwEAAZQBBwEAAZ4BBwIAAW0BJwGeAQEBlAGFAd0BKQJZAvcBWQIA
ATABwwGgBYUBlAEAAZ4BAAGaAaABMAIAAWUB5gMHAeYBZQIAAvkBAAL6AgABpgHdAwcB3QGmAgABlAEH
AQABngEHAgABbQEnAZ4BAQGUAYUB3QEpBFkB9wIAATABwwOgASMCvQGUAQABngEAAaABmgEwAgABZQXm
AWUB5gEAAvkBAAL6AgABpgXdAaYB3QEAAZQBBwEAAZ4BBwMAAScBngEBAZQBhQHdASkBWQL3AlkCAAEw
AcMDoAUjAZ4BAAGaAaABMAIACGUD+QEAAvoCAAemAYUClAEHAQABngEHAwABJwGeAQEBlAGFAd0BKQNZ
AfcBWQIAATAB9AHDBKABAgLCAZ4BAAGgAZoBMAUAASMB+QMHAfkBIwIAAvoFAAEjAZQDBwGUASMCAAGe
AQcDAAEnAZ4BAQGUAYUB3QIpAlkDKQEAATAC9ATDBQIBmgGgATAFAAEjBfkBIwH5AQAC+gUAASMFlAEj
AZQBAAGeAQcDAAEnAZ4BAQGUAYUC3QIpAVkBKQFZAgABMAeaBzAFAAgjA/oFAAgjAp4BBwMAAScBngIB
AZQChQHdAykEAAEwAfQCwwKgATAPAAEnAfoDBwH6AScJAAECAZ4DBwGeAQIEAAInAZ4CAQGUA4UHAAUw
EAABJwX6AScB+ggAAQIFngECAZ4EAAInAZ4DAR4ACCcIAAgCBQADJzsAAew/AAHsAhoBBwHsAQcBGgGa
BHo0AAHsAcMBGgEAAewBAAEaApoDejQAAewCoAEHAewBBwMaAZoCejQAAewCoAEAAewBAAGaAxoCmjQA
AewCoAEHAewBBwGgAxoCmjQAAewCoAEAAewBAAGgBBoBmjQAAewBwwGgAQcB7AEHAaABmgQaNAAB7AHD
AaABAAHsAQADoAMaNAAB7AHDAaABBwEAAZIDoAGaAho0AAHsAcMBoAHsAe8BAAagNAAB7ALDAewB9gEA
BqA0AAHsAsMB7AEHAQABegKgNwAB7APDAewCwwKgAewBoDUAAewHwwGgAew2AArs/wD/AP8A/wBZAA77
MgAB+wwAAfsJAAIgAQACIAEAAiAIAAIgAQACIAEAAiAEAAHvAbwB7wG8BO8FAAH7AgAJ+wEAAfsJAAIg
AQACIAEAAiAIAAIgAQACIAEAAiAEAAH/BLwB7wG8Ae8FAAH7AwAC+wQAAvsBAAH7JQAC/wHvAbwB7wG8
Au8FAAH7BAAC+wYAAfsCAAH8AQAB/AEAAfwBAAH8AQAB/AYACgIKAAH/AbwB/wS8Ae8FAAH7AQAC+wEA
AvsCAAL7AgAB+wEAAfwI/wcAAQII/wECCgAC/wG8Af8B7wG8Ae8BvAUAAfsBAAL7AgAF+wIAAfsCAAH/
AQAB/AH/AfwBAAL/AfwGAAECAf8IAgoAAf8BvAH/AbwB/wK8Ae8FAAH7AQAC+wIAAvsBAAL7AgAB+wEA
AfwB/wH8AQABBwEAAfwBBwH/BwABAgH/AwIBBwQCCgAC/wG8Af8JAAH7AgAC+wEAAvsFAAH7AgAB/wEA
AfwBAAH8AQAB/AH/AfwGAAECAv8BAgEHAwIB/wECCgAB/wG8Af8BvAEAAbwC7wUAAfsDAAL7AQAC+wEA
AvsBAAH7AQAB/AH/AfwB/wH8AQAB/wEAAQcHAAECAf8BAgEHAwIC/wECCgAE/wEAAf8BvAHvBQAB+wQA
B/sBAAH7AgAB/AEAAf8BAAH8Af8B/AEAAfwGAAECAf8BBwUCAf8BAgoABP8BAAH/AbwGAAH7DAAB+wEA
AfwBAAH8AQAB/AEAAfwBAAH8BwABAgH/AgIC/wICAf8BAhcAAfsMAAH7AgAI/wH8BgABAgj/AQIXAA77
AQAB/AEAAfwBAAH8AQAB/AEAAfwHAAoCWgABBwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEH
AgABBwoAA+woAAEHAgABBwEAAQcBAAEHAgABBwgAAQcE/wEHCgAH7wMAAfwBAAH8AQAB/AEAAfwBAAH8
BwAB/AEAAfwBAAH8AQAB/AEAAfwLAAHsAQAB/wEAA/8B7AEHCQAB/wUAAe8CAAH8CP8HAAH8CP8NAAEH
B/8B7AgAAv8BvAH/AbwB/wHvAwAB/wEAAfwB/wH8AQAC/wH8BwAB/wEAAfwB/wH8AQAC/wH8DAAB/wEA
Av8CAAL/AewCAAXvAQAB/wUAAe8CAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAH8Af8B/AEAAQcBAAH8
AQcB/wEABNYIAAH/AQAC/wMAAf8BBwIAAf8FAAL/AbwB/wG8Af8B7wMAAf8BAAH8AQAB/AEAAfwB/wH8
A/8B1gMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1ggAAQcD/wEAA/8B7AIAAf8BvAH/AbwB/wEAAf8CAAG8
BQAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gIAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYHAALs
Af8BAAH/AQAB/wHsAf8BAAHsAQAB/wUAAv8BvAH/AQAB/wQAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/
AdYDAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWBQACIAIAAewF/wHsAwAB/wG8Af8BvAH/AQAE/wUA
AfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWBAABQQIg
BAAB7AEHAewFAAH/AgAB/wwACP8B/AH/AdYBBwHWAwAI/wH8Af8B1gEHAdYDAAHjAkEEIAHsAwAB7AQA
Af8BvAH/AbwBAAH/CQAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YCAAH8AQAB/AEAAfwBAAH8AQAB/AEA
Af8D1gIAA+MDQQUgBgAE/w8ACtYGAArWAwAE4wJBAyAaAAHWCP8B1gYAAdYI/wHWBAAD4x8ACtYGAArW
BQAC4z8AAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEH
AgABBxEACgIGAAoCBgAKAgcAAfwBAAH8AQAB/AEAAfwBAAH8BgABAgj/AQIGAAECCP8BAgYAAQII/wEC
BgAB/Aj/BwABAgH/CAIGAAECAf8IAgYAAQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgABAgH/AwIBBwQC
BgABAgH/AwIBBwQCBJgCAAECAf8DAgEHBAIEmAIAAfwB/wH8AQABBwEAAfwBBwH/BwABAgL/AQIBBwMC
Af8BAgYAAQIC/wECAQcDAgH/AQID/wGYAgABAgL/AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8
Af8B/AYAAQIB/wECAQcDAgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAECAf8BAgEHAwIC/wECBJgCAAH8
Af8B/AH/AfwBAAH/AQABBwcAAQIB/wEHBQIB/wECBgABAgH/AQcFAgH/AQIEmAIAAQIB/wEHBQIB/wEC
BJgDAAH8AQAB/wEAAfwB/wH8AQAB/AYAAQIB/wICAv8CAgH/AQIGAAECAf8CAgL/AgIB/wECApgB/wGY
AgABAgH/AgIC/wICAf8BAgKYAf8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8BwABAgj/AQIGAAECCP8BAgGY
Av8BmAIAAQII/wECAZgC/wGYAwAI/wH8BgAKAgYACgICmAH/AZgCAAoCApgB/wGYAgAB/AEAAfwBAAH8
AQAB/AEAAfwbAAGYAf8CmAL/ApgB/wGYBgABmAH/ApgC/wKYAf8BmCYAAZgI/wGYBgABmAj/AZgmAAqY
BgAKmCYAAQcCAAEHAQABBwEAAQcCAAEHEQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEH
AQABBwIAAQcRAAHsBAcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcEAAHsAQcB+wIH
AQAD7AQAAewD/wEHAgABBwEAAQcBAAEHAgABBwIAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8
AQAB/AEAAfwJAAHsA/8B+wH/AQAB+wEHAuwCAAHsAf8EBwH/AwcB/wEHBAAB/Aj/BwAB/Aj/CwAB7AH7
A/8B+wEAAf8B+wEHAewBAAHsCv8BBwUAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AoA
AewC/wH7Av8BAAH/AgAB7AEAAewB/wQHAf8DBwH/AQcEAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAH8
Af8B/AEAAQcBAAH8AQcB/wEABNYHAAHsA/8B+wHsAQAB/wH7AQcBAAHsCv8BBwUAAf8BAAH8AQAB/AEA
AfwB/wH8A/8B1gMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gkAAfsD/wH7Av8BBwEAAewB/wgHAf8BBwQA
AfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYCAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWBwACAQEA
Af8B+wP/AfsBBwEAAewK/wEHBQAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAfwBAAH/AQAB/AH/
AfwBAAH8AdYBBwH/AdYDAAIBAwABAQEAA/8B+wL/AQcBAAHsAf8CBwH/BQcB/wEHBAAB/AEAAfwBAAH8
AQAB/AEAAfwBAALWAf8B1gIAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAH5AQEBAAH5AQABAQMA
A/8B+wEHAQAB7Ar/AQcFAAj/AfwB/wHWAQcB1gMACP8B/AH/AdYBBwHWAwAC+QIAAvkBAAP/AfsC/wEH
AQAB7AH/AgcB/wUHAf8BBwQAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAB/AEAAfwBAAH8AQAB/AEA
AfwBAAH/A9YJAAL/AfsD/wH7AQcBAAHsCP8LAArWBgAK1gcAAewB/wH7A/8B+wL/AQcBAAHsAf8GBwH/
AewB/wkAAdYI/wHWBgAB1gj/AdYHAArsAQAB7Aj/AewKAArWBgAK1hIACuxOAAHIAQAB3QEAAcgLAAEt
AQABwgEAAS0LAAElAQABmgEAASUaAAHIBd0ByAkAAS0FwgEtCQABJQWaASUYAALIAd0ByAEAAcgB3QkA
Ai0BwgEtAQABLQHCCQACJQGaASUBAAElAZoEAAH8AQAB/AEAAfwBAAH8AQAB/AwAAcgC3QEAAewBAALd
AcgHAAEtAsIBAAHsAQACwgEtBwABJQKaAQAB7AEAApoBJQEAAfwI/w0AAsgB3QHIAQAByAHdCQACLQHC
AS0BAAEtAcIJAAIlAZoBJQEAASUBmgQAAf8BAAH8Af8B/AEAAv8B/A0AAcgF3QHICQABLQXCAS0JAAEl
BZoBJQIAAfwB/wH8AQABBwEAAfwBBwH/DgACyAEAAd0BAAHICgACLQEAAcIBAAEtCgACJQEAAZoBAAEl
BAAB/wEAAfwBAAH8AQAB/AH/AfwIAAHIAQAB3QEAAcgCAATIBQABLQEAAcIBAAEtAgAELQUAASUBAAGa
AQABJQIABCUDAAH8Af8B/AH/AfwBAAH/AQABBwgAAcgF3QHICQABLQXCAS0JAAElBZoBJQkAAfwBAAH/
AQAB/AH/AfwBAAH8BgACyAHdAcgBAAHIAd0JAAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaCQAB/AEA
AfwBAAH8AQAB/AEAAfwHAAHIAt0BAAHsAQAC3QHIBwABLQLCAQAB7AEAAsIBLQcAASUCmgEAAewBAAKa
ASUIAAj/AfwGAALIAd0ByAEAAcgB3QkAAi0BwgEtAQABLQHCCQACJQGaASUBAAElAZoJAAH8AQAB/AEA
AfwBAAH8AQAB/AgAAcgF3QHICQABLQXCAS0JAAElBZoBJRkAAsgBAAHdAQAByAoAAi0BAAHCAQABLQoA
AiUBAAGaAQABJRwABMgMAAQtDAAEJSwAAS0BVQEtDQABLQFVAS0hAAHsB/8EAAEtAVUBLQ0AAS0BVQEt
EgABKgEAAZoBAAEqCgAB7Af/BAABLQFVAS0NAAEtAVUBLREAASoFmgEqCQAB7Af/BAADLQIAB/8EAAMt
AgAH/wcAAioBmgEqAQABKgGaDAAG/wQAAewFAAb/BAAB7AUABv8HAAEqApoBAAHsAQACmgEqAwAGtQEA
Bv8CAALsBeECAAX/AgAC7ALoAe8B/wHvAgAF/wcAAioBmgEqAQABKgGaBQAEtQMABv8CAAHsAeEB/wXh
AQAF/wIAAewD6AHvAf8B7wH/AQAF/wgAASoFmgEqBAADtQEAArUBAAb/AQAB7AHhAf8H4QEABP8BAAHs
AegB/wLoAe8B/wHvAv8BAAT/CAACKgEAAZoBAAEqBQAGtQEABP8B7AIAAewB/wHhAf8G4QEABP8BAAHs
Af8D6AHvAf8B7wL/AQAE/wMAASoBAAGaAQABKgIABCoFAAW1AwAD/wHsAf8BAAHsAeEB/wfhAQAE/wEA
AewB6AL/AegB7wH/Ae8C/wEABP8CAAEqBZoBKgoAB7UBAAXsAQAB7AP/AeEB/wThAQAC/wHsAgAB7AH/
AegC/wHvAf8B7wL/AQAC/wHsAgACKgGaASoBAAEqAZoLAAe1AQAB/wHsBQAB7AP/AeEB/wHhAf8BAAP/
AewB/wIAAewB/wHoAf8B7wH/Ae8B/wEAA/8B7AH/AQABKgKaAQAB7AEAApoBKgkABLUBAAK1AQAB/wHs
Af8EAALsAf8B4QH/AeEB/wIABewCAALsAf8B6AHvAf8B7wIABewBAAIqAZoBKgEAASoBmgsABLUBAAG1
AQAE7AYAA+wCAAP/AewHAAPsAgAD/wHsBQABKgWaASoKAAa1DQAB7AX/AewB/wgAAewF/wHsAf8EAAIq
AQABmgEAASoeAAjsCAAI7AYABCo8AAEtAVUBLQ0AAewFBwHsCQAB7AUHAewJAAHsBQcB7AkAAS0BVQEt
DQABrwW2Aa8B7AgAAS0FWgEtAewIAAElBU0BJQHsCAABLQFVAS0NAAGvBbYCrwHsBwABLQVaAi0B7AcA
ASUFTQIlAewHAAMtDQABrwW2A68B7AYAAS0FWgMtAewGAAElBU0DJQHsBgAB7A8AAa8FtgEAA68B7AUA
AS0FWgEAAy0B7AUAASUFTQEAAyUB7AMAAuwE4QFtAgAEtQQAAuwF/wIAA68EAALsBf8CAAMtBAAC7AX/
AgADJQMAAewF4QFtAbwBAAK1BQAD7AX/AQABBwEAAq8DAAPsBf8BAAEHAQACLQMAA+wF/wEAAQcBAAIl
AgAB7AHhAf8E4QFtArwCAAK1AwAC7AEHBewCBwH/AQABrwMAAuwBBwXsAgcB/wEAAS0DAALsAQcF7AIH
Af8BAAElAgAB7AH/BeEBbQK8AQADtQMAAewBBwHsAwcC7AEHA/8EAAHsAQcB7AMHAuwBBwP/BAAB7AEH
AewDBwLsAQcD/wMAAewB4QP/AuEBbQK8AQACtQQAAewB/wEHAewDBwEABewDAAHsAf8BBwHsAwcBAAXs
AwAB7AH/AQcB7AMHAQAF7AIAAewB/wHhAv8C4QFtArwBAAS1AwAB7AH/AQcB7AEHAQAB7AT/AQcEAAHs
Af8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewBBwEAAewE/wEHAwAB7AH/AeEB/wLhAW0BvAEABbUEAAHs
Af8BBwIAAewE/wEHBQAB7AH/AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcDAALsAf8B4QH/AeEBbQIA
ArUBAAK1BQAB7AH/AwAF7AYAAewB/wMABewGAAHsAf8DAAXsBQAD7AIABLUBAAG1BwAB7A8AAewPAAHs
EgAGtUwAARIBlASTMQABEwHqBBIB6gFuAQABEgGUBJMTAAHsBQcB7AkAAewFBwHsBwAB6gG3A5QBtwGT
AW4BAAESAZQEkxMAATEFWQExAewIAAHmBdYB5gHsBgABEgGUApMBtwEOAwABEgGUBJMBAAbXAQAG9AUA
ATEFWQIxAewHAAHmBdYC5gHsBQABEgGUAZMBlAESAQABEgG9AQAB6gG3AZQDkwEABNcFAAT0BQABMQVZ
AzEB7AYAAeYF1gPmAewEAAESAZQBkwG3AQABEgK3AQABEAISAW4CkwEAA9cBAALXAQAC9AEAA/QFAAEx
BVkBAAMxAewFAAHmBdYBAAPmAewDAAESAZQCkwK3AZQBtwETARIBbQEAARIBtwGTAQAG1wEABvQEAALs
Bf8CAAMxBAAC7AX/AgAD5gMAARIBlAKTAbcBEwESARMCvQFtAQABEQGOAZQBAAXXAwAF9AMAA+wF/wEA
AQcBAAIxAwAD7AX/AQABBwEAAuYDAAESAZQBkwG3AQ4EAAERBAABkwEABdcBAAf0AwAC7AEHBewCBwH/
AQABMQMAAuwBBwXsAgcB/wEAAeYDAAHrAZMBlAFEAQABEAH/AfECAAEQAf8B8QMABdcBAAf0AwAB7AEH
AewDBwLsAQcD/wQAAewBBwHsAwcC7AEHA/8EAAHsAfMBkwESAQAB/wEAAf8CAAH/ARQB/wH3AgAD1wEA
AdcBAAL0AQAE9AMAAewB/wEHAewDBwEABewDAAHsAf8BBwHsAwcBAAXsAwAB7AH/AbcBRAEAAfEB/wHx
AgAB7AL/AwAD1wEAAtcC9AEABPQEAAHsAf8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewBBwEAAewE/wEH
AwAB7AL/AbcBEAkAAZMBAAbXB/QFAAHsAf8BBwIAAewE/wEHBQAB7AH/AQcCAAHsBP8BBwMAARQC7AHt
AW4DAAGOAbcBEgEAAREBBwH/FAAB7AH/AwAF7AYAAewB/wMABewJAAG8AfMBvQEaAb0E/xUAAewPAAHs
CgAB/wHyAQAB/wEVAUMK/1oAAeoFtgoAAeoFtgYAAewBMAoAAvkCAAH5CgABFAFtBOoBbQHrAQAB6gW2
AQABFAFtBOoBbQHrAQAB6gW2BQAB7AEwAXoMAAK8CwABbQHdA7YB3QG1AesBAAHqBbYBAAFtAd0DtgHd
AbUB6wEAAeoFtgQAAuwBegEAAvkJAAK8AgABbQkAAeoDtgHdAQ8DAAHqBbYBAAHqA7YB3QEPAwAB6gW2
AQAB7AIwAewBegEAArwLAAO8AQAB/wEAAewGAAHqA7YBEgEAAeoB3gEAAW0B3QS2AQAB6gO2ARIBAAHq
Ad4BAAFtAd0EtgEAATADegEAArwCAAFtBgAC7AS8AQAC/wcAAeoCtgHXAQABEgLdAQABEAISAY0CtgEA
AeoCtgHXAQABEgLdAQABEAISAY0CtgHsAXoBAAJ6AgADvAEAAVYBAAFWAwAC7AEABLwDAAFQAQABUAMA
AeoDtgHXAd0BtgHdAhIBbQEAAeoB1wG2AQAB6gO2AdcB3QG2Ad0CEgFtAQAB6gHXAbYBAAN6ATABAAS8
AQACVgQAAuwBAAK8AgAD/wEAAbwEAAHqA7YB3QESAeoBEgLeAW0BAAERAfcBtgEAAeoDtgHdARIB6gES
At4BbQEAAREB9wG2AgAB7AIAAewBAAS8BgAD7AEAArwBAAP/AQABvAQAAeoCtgHdAQ8EAAFDBAABtQEA
AeoCtgHdAQ8EAAFDBAABtQQAAuwBAAK8AgAD/wQABewBAAT/AQABvAMAAesCtgESAQABEAH/AfECAAEQ
Af8B8QMAAesCtgESAQABEAH/AfECAAEQAf8B8QYAA+wBAAK8AQAD/woAAv8CAAK8AwAB7AHzAbYB6gEA
Af8BAAH/AgAB/wEUAf8B9wIAAewB8wG2AeoBAAH/AQAB/wIAAf8BFAH/AfcGAAXsAQAE/wYAA7wBAAL/
AQADvAIAAewB/wHdARIBAAHxAf8B8QIAAewC/wMAAewB/wHdARIBAAHxAf8B8QIAAewC/w0AAv8JAAW8
AQABvAQAAewC/wHXARAJAAG2AQAB7AL/AdcBEAkAAbYIAAO8AQAC/w0AAewCvAMAARQD7AGuAwABtQHd
AeoBAAERAQcB/wEAARQD7AGuAwABtQHdAeoBAAERAQcB/wkABbwLAAXsCQABvAH0AfIB8QHeBP8HAAG8
AfQB8gHxAd4E/yAAAf8B8gEAAf8BFQFDC/8B8gEAAf8BFQFDCv8UAAEHAgABBwEAAQcBAAEHAgABBzUA
AQcCAAEHAQABBwEAAQcCAAEHGAAC/xsAAQcCAAEHAQABBwEAAQcCAAEHFgAC/wIAAv8FAAoCBgAKAgwA
AewMAAHzAf8CAAL/AgAC/wMAAQII/wECBgABAgj/AQIMAAHsAwMGAAHsAv8CAAL/AgAC/wIAAf8CAAEC
Af8IAgYAAQIB/wgCDAAB7AH/AewBAwkAAfMB/wIAAv8CAAL/AwABAgH/AwIBBwQCBJgCAAECAf8DAgEH
BAIEmAgAAewB+wHsAQMGAAHsAv8CAAL/AgAC/wIAAf8CAAECAv8BAgEHAwIB/wECA/8BmAIAAQIC/wEC
AQcDAgH/AQID/wGYCAAB7AH/AewBAwkAAfMB/wIAAv8CAAL/AwABAgH/AQIBBwMCAv8BAgSYAgABAgH/
AQIBBwMCAv8BAgSYBwAB7AH/AfsB7AEDBgAB7AL/AgAC/wIAAv8CAAH/AgABAgH/AQcFAgH/AQIEmAIA
AQIB/wEHBQIB/wECBJgGAAHsAfsB/wMHAQMIAAHzAf8CAAL/AgAC/wMAAQIB/wICAv8CAgH/AQICmAH/
AZgCAAECAf8CAgL/AgIB/wECApgB/wGYBQAB7AL/AQcB+wIHAQMB7AQAAewC/wIABv8CAAH/AgABAgj/
AQIBmAL/AZgCAAECCP8BAgGYAv8BmAQAAewB/wL7Af8EBwEDAewGAAr/AwAKAgKYAf8BmAIACgICmAH/
AZgCAALsAfsB/wL7A/8BBwH/AgcBAwIAAewM/wcAAZgB/wKYAv8CmAH/AZgGAAGYAf8CmAL/ApgB/wGY
AgAO7AMAAuwI/wkAAZgI/wGYBgABmAj/AZgVAALsBP8LAAqYBgAKmBcAAuwdAAHsBAAF7A4AAVAlAALs
AgcB+QH7Af4FXg4AAlAVAAH5BAAF+QQAAewDBwTsBV4NAARQFAAC+QMAAvkHAAH6AfsB/wEHAQAB+QH7
Af4EXgHsAwAFUAQABlAKAggABPkEAAIaBAAB7AL6AfsBBwEAAfkC/gEHAuwFAAJQBgAGUAEAAQII/wEC
BwAG+QMAARoFAAHsAQcB+QH7AfoDAAUHBgACGgQAAlABAAJQAgABAgH/CAIGAAb5BAAEGgIAAewDBwH5
AwAB7AEHCQABGgUAAVACAAFQAwABAgH/AwIBBwQCBgAC+QEAAvkGAAMaAgAB7AMHAfkDAAHsBF4B7AUA
BBoCAAFQBgABAgL/AQIBBwMCAf8BAgYAAfkCAAH5BgAFGgEAAewCBwH5AfsBAAPsBV4GAAMaAgABUAYA
AQIB/wECAQcDAgL/AQIGAAH5CQADGgQAAQcB+QH7AfoE7AVeBQAFGggAAQIB/wEHBQIB/wECBgAB+QsA
AhoDAAHsAfsB+gH+AQADBwHsAf8BBwcAAxoKAAECAf8CAgL/AgIB/wECBwAB+RAABuwCBwHsAv8BBwcA
AhoJAAECCP8BAhgAAewEXgHsAgAB7AP/AQcRAAoCGAAB7AReAewDAAH/AuwB/zMABuwHAAHsMwAD7FoA
Aew/AAHsCwcLAAe2CQAH5AkAB3UCAAHsCv8BBwsAAfMFAAG2CQABwgUAAeQJAAEbBQABdQIAAewB/wQH
Af8DBwH/AQcLAALzA7wB8wG2CQACwgGeAcIBngHCAeQJAAIbAb0B/wG9Af8BdQIAAewK/wEHBQAFtgEA
AfMFAAG2AwAF5AEAAcIFAAHkAwAFdQEAARsFAAF1AgAB7AH/BAcB/wMHAf8BBwUAAfMFAALzAbwB8wG8
AfMBtgMAAcIFAALCAZ4BwgGeAcIB5AMAARsFAAIbAb0B/wG9Af8BdQIAAewK/wEHBQAB8wO8AfMBAAHz
AgAB8wYAAcIBngHCAZ4BwgEAAcICAAGeBgABGwG9Af8BvQH/AQABGwIAAb0FAAHsAf8IBwH/AQcFAAHz
BQAC8wG8AfMBAAHzBAABwgUAAsIBngHCAQABwgQAARsFAAIbAb0BGwEAAf8DAAHsCv8BBwUAAfMBvAHz
AbwB8wEABPMGAAHCAZ4BwgGeAcIBAATCBgABGwG9Af8BvQH/AQAEGwUAAewB/wIHAf8FBwH/AQcFAAHz
AgAB8wwAAcICAAHCDAABGwIAAf8LAAHsCv8BBwUAAfMBvALzAQAB8woAAcIBngLCAQABwgoAARsBvQEb
AfQBAAH/CQAB7AH/AgcB/wUHAf8BBwUABPMMAATCDAAEGwsAAewI/zcAAewB/wYHAf8B7AH/NQAB7Aj/
Aew2AArsDQABMAHsBwAB7AMAAQcCAAEHAQABBwEAAQcCAAEHJwABMAH7AuwGAAHsBAcCAAEHAQABBwEA
AQcCAAEHJgABMAP7AuwFAAHsA/8BBwIAAQcBAAEHAQABBwIAAQcIAAdZCQAH1gYAATAF+wLsBAAB7AH/
BAcB/wMHAf8BBwsAAcMFAAFZCQABGQUAAdYFAAEwAvsCAAP7AuwDAAHsCv8BBwsAAsMBmgHDAZoBwwFZ
CQACGQHdARkB3QEZAdYEAAEwA/sCAAT7AuwCAAHsAf8EBwH/AwcB/wEHBQAFWQEAAcMFAAFZAwAF1gEA
ARkFAAHWAwABMAv7AuwBAAHsCv8BBwUAAcMFAALDAZoBwwGaAcMBWQMAARkFAAIZAd0BGQHdARkB1gIA
ATAF+wLqBvsD7AH/CAcB/wEHBQABwwGaAcMBmgHDAQABwwIAAcMGAAEZAd0BGQHdARkBAAEZAgAB3QUA
ATAF+wIABvsB7AEAAewK/wEHBQABwwUAAsMBmgHDAQABwwQAARkFAAIZAd0BGQEAARkEAAEwBPsCAAX7
AewCAAHsAf8CBwH/BQcB/wEHBQABwwGaAcMBmgHDAQAEwwYAARkB3QEZAd0BGQEABBkHAAEwA/sCAAT7
AewDAAHsCv8BBwUAAcMCAAHDDAABGQIAARkOAAEwAvsCAAP7AewEAAHsAf8CBwH/BQcB/wEHBQABwwGa
AsMBAAHDCgABGQHdAhkBAAEZDQABMAH7AgAC+wHsBQAB7Aj/CAAEwwwABBkQAAEwA/sB7AYAAewB/wYH
Af8B7AH/KwABMAH7AewHAAHsCP8B7C0AATAIAArsJgABQgFNAT4HAAE+AwABKAMAAUADAAEwAQECAAEB
AQABAQUAAYABCRYAA/8BAAL/BgABgAEBBgABgAcAAYAHAAGABwABgAcAAYABDwYAAYABDwYAAYABDwYA
AYABDwYAAYABDwYAAYABDwYAAYABDwYAAYABHwYAAv8GAAL/BgABwAEDAfgDAAL/AcABAwHAAwABgAEB
AcABAwHAAwABgAEAAcABAwHAAwABgAEAAcABAwHAAwABgAEAAcABAwHAAQECAAGAAQABwAEDAcABAQIA
AYABDwHAAQMB8AEHAgABgAEPAcABAwH4AQ8CAAGAAQ8BwAEDAfgBDwIAAYABDwHAAQMB+AEPAgABgAEP
AcABAwH4AQ8CAAGAAQ8BwAEHAfgBDwIAAYABDwHAAQ8B+AEPAgABgAEfAcABHwH8AR8CAAb/AgAG/wHA
AwAE/wQAAf8BHwL/BAAB/AEHAv8EAAHwAQEC/wQAAcABAQL/AYABAQIAAYABAQL/AYABAwIAAYABAQL/
AcABAwIAAcABAQL/AcABBwIAAcABAQL/AeABBwIAAcABAQL/AeABDwIAAcABAwL/AfABDwIAAcABBwL/
AfABHwIAAcABHwL/AfgBHwIAAeABfwL/AfgBPwIAAfED/wH8AX8CAAL/AYABPwGAAT8C/wGAAQABgAE/
AYABPwL/AgABgAEHAYABBwH/AR8CAAGAAQcBgAEHAfwBBwIAAYABBwGAAQcB8AEBAgABgAEAAYABAAHA
AQECAAGAAQABgAEAAYABAQIAAYABAAGAAQABgAEBAgABgAEAAYABAAHAAQECAAGAAQABgAEAAcABAQIA
AfABAAHwAQABwAEBAgAB8AEAAfABAAHAAQMBAAEBAfABAAHwAQABwAEHAYAB/wH+AQAB/gEAAcABHwHB
Af8B/gEAAf4BAAHgAX8C/wH+AQEB/gEBAfEH/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHA
AQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQEG/wHAAQMG/wHAAQcG/wHA
AQ+A/wQABP8BfwH+AgAE/wFgAQYCAAH/ASQB/wEkAWABBgIAAf8BJAH/ASQBYAEGAgAE/wFgAQYDAAE/
AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/AQABPwFgAQYDAAE/
AQABPwFgAQYDAAE/AQABPwFgAQ4DAAE/AQABPwFgAR4DAAE/AQABPwF/Af4DAAE/AQABPwQABv8B8AEA
Af8BhwT/AfABAAH+AQMB/AEBAv8B8AEAAfwBAQH8AQEBAAE/AQABPwH4AQAB/AEBAQABPwEAAT8B+AIA
AQEBAAE/AQABPwH4AgABAQEAAQMBAAEDAfgCAAEBAQABAwEAAQMB+AIAAQEBAAEDAQABAwH4AgABAwEA
AQMBAAEDAeQBAQEAAQcBAAEDAQABAwHGAgABDwEAAQMBAAEDAYABBQEAAf8BAAEDAQABAwEAAR8BAQH/
AfABAwHwAQMBgAEjAQMB/wHwAQMB8AEDAccD/wHwAQMB8AEDAecB8Qb/AfABAAb/AfABAAb/AfABAAL/
AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAQMBAAED
AQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAED
AQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwL/AfABAwHwAQME/wHwAQMB8AED
BP8B8AEDAfABAwT/AfABAAL/AgAC/wHwAQAB8AEPAgAC/wHwAQAB4AEDAwABPwEAAT8B4AEBAQABBwEA
AT8BAAE/AfACAAEHAQABPwEAAT8B8AIAAQcBAAEDAQABAwH4AgABBwEAAQMBAAEDAfgCAAEHAQABAwEA
AQMBkAIAAQcBAAEDAQABAwMAAQcBAAEDAQABAwMAAQcBAAEDAQABAwMAAQcBAAEDAQABAwGYAgABBwHw
AQMB8AEDAfgCAAEPAfABAwHwAQMB+AIAAR8B8AEDAfABAwL/AQABPwH/AYcB/wGHAf8BhwL/Af4BAQH+
AQEB/gEBAv8B/gEAAf4BAAH+AQAC/wH8AQAB/AEAAfwCAAE/AfwBAAH8AQAB/AIAAT8B/AEAAfwBAAH8
AgABPwH+AQEB/gEBAf4BAQEAAT8B4AEBAeABAQHgAQEBAAE/AYABBwGAAQcBgAEHAQABPwGAAT8BgAE/
AYABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BgAF/
AYABfwGAAX8C/wGAAX8BgAF/AYABfwL/AeEB/wHhAf8B4QP/Af4BAAHhAf8B4QL/AYcB/gEAAeEB/wHh
Af8B/gEBAf4BAAHgAQAB4AEAAf4BAAH+AQAB4AEAAeABAAH8AQABgAEAAeABAAHgAQAB/AEAAYABAAGA
AQABgAEAAfwBAAGAAQABgAEAAYABAAH+AQEBgAUAAeABAQGABQABgAEHAYAFAAGAAT8BgAEBBQABPwGA
AQMBgAEAAYACAAE/AYABAwGAAQEBgAEBAQABPwGAAQcB4AEDAeABAwGAAX8BgAF/AfgBAwH4AQMBgAF/
AYABfwH4AQcB+AEHAeEB/wHgAT8B4AE/AeABPwHhAf8B4AEfAeABHwHgAR8B4QH/AeABDwHgAQ8B4AEP
AeEB/wHgAQcB4AEHAeABBwHhAf8B4AEDAeABAwHgAQMB4AEBAeABAQHgAQEB4AEBAYABAQHAAQEBwAEB
AcABAQGAAQEBgAEBAYABAQGAAQEBAAEBAYABAQGAAQEBgAEBAQABAQGAAQEBgAEBAYABAQEAAQEBgAEB
AYABAQGAAQECAAGAAQEBgAEBAYABAQGAAQABwAEBAcABAQHAAQEBgAEAAeEBAQHhAQEB4QEBAeABAQHx
AYMB8QGDAfEBgwH+AQEB+QH/AfkB/wH5Af8B/gEBAgAB/wG/AeABPwHgAT8CAAH/AX8B4AEfAeABHwMA
AQEB4AEPAeABDwMAAQEB4AEHAeABBwMAAQEB4AEDAeABAwMAAQEB4AEBAeABAQMAAQEBwAEBAcABAQMA
AQEBgAEBAYABAQMAAQEBgAEBAYABAQMAAQEBgAEBAYABAQMAAQEBgAEBAYABAQMAAQEBgAEBAYABAQMA
AQEBwAEBAcABAQMAAQEB4QEBAeEBAQIAAf4B/wHxAYMB8QGDAgAB/wF/AfkB/wH5Af8B/AP/BAAB+AF/
AYAB/wQAAfABfwHBAf8EAAGAAR8BwAF/BQABPwGAAQ8FAAEPAQABHwUAAQEBAAEBBQABAwEAAQMEAAGA
AQMBAAEDBAAB4AEBAYABAQQAAeABAQHAAQEEAAHwAQAB8AUAAfgBAQH4AQEEAAH+AQEB/AEBBAAB/wEB
Af8BAQQAAf8BgQH/AYMEAAL/AfABAAL/Af4BfwL/AfABAAL/AfgBHwL/AfABAAL/AeABBwEAAT8BAAE/
AfwBHwGAAQEBAAE/AQABPwH8AR8BAAEDAQABPwEAAT8B/AEfAYABAQEAAQMBAAEDAfwBHwEAAQMBAAED
AQABAwH8AR8BgAEBAQABAwEAAQMB+AEPAQABAwEAAQMBAAEDAfABBwGAAQEBAAEDAQABAwHgAQMBAAED
AQABAwEAAQMBwAEBAYABAQEAAQMBAAEDAwABAwHwAQMB8AEDAgABgAEHAfABAwHwAQMC/wHgAR8B8AED
AfABAwL/AfgBfwL/AfABgQH/AfcE/wHAAQEB/wHzAv8B7gEDAYABAQH/AeEC/wHmAQcBgAEDAQEBwAEA
AT8BwwEHAQABDwEDAYEBAAE/AYEBgwEAAQcBgwGTAQABPwEDAQEBAwEBAcEBtwEAAT8BJgEBAQMBAQGA
Ab8BAAE/AW4CAAEBAQABvwEAAT8BfgEBAYABAQEAAX8BAAE/AX4BAQGAAQcBAAH/AQABPwG+AQIBwAED
AQAB/wEAAT8B/wEAAcACAQF/AQABPwH/AYMBwAHgAYABfwT/AcAB/gHBBf8B4wv/AQABBwH8AQEB/AEB
AfwBAQEAAQcB/AEBAfwBAQH8AQEBAAEHAfwBAQH8AQEB/AEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEB
AQABAQEAAQEBAAEHAQABAQEAAQEBAAEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEDAQABAwEAAQMBAAEH
AQABBwEAAQcBAAEHAQABBwEAAQ8BAAEPAQABDwEAAQcBAAH/AQAB/wEAAf8BAAEHAQEB/wEBAf8BAQH/
AQABBwEDAf8BAwH/AQMB/wEAAQ8G/wEAAR8G/wEAAT8B/gF/AgAE/wH8AT8CAAH8AQEB/AEBAfgBHwIA
AfwBAQH8AQEB8AEPAQABBwH8AQEB/AEBAeABBwEAAQcBAAEBAQABAQHAAQMBAAEHAQABAQEAAQEBgAEB
AQABBwEAAQEBAAEBAwABBwEAAQEBAAEBAQABAQEAAQcBAAEDAQABAwGAAQMBAAEHAQABBwEAAQcBwAEH
AQABBwEAAQ8BAAEPAeABDwEAAQcBAAH/AQAB/wHwAR8BAAEHAQEB/wEBAf8B+AE/AQABDwEDAf8BAwH/
AfwBfwEAAR8E/wH+Af8BAAE/BP8L
</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="btnsuche.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAAXElEQVQ4T82PAQrAMAgDfbpP82eOShVX
TdkYjB4cLRoC0nHoooPmBWXmLojmhRzKQTS/oSJijv/U2e2MvHhjYO3LncUmExxQAHS63TCw9vFOETD3
vWAR8TT3G0QX/nCpA8c1czAAAAAASUVORK5CYII=
</value>
</data>
<metadata name="ImageList3_sik.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>698, 17</value>
</metadata>
<data name="ImageList3_sik.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADA
NQAAAk1TRnQBSQFMAgEBNAEAAYQBAAEsAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAeADAAEBAQABCAYAATgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AVgAO+zIA
AfsMAAH7CQACIAEAAiABAAIgCAACIAEAAiABAAIgBAAB7wG8Ae8BvATvBQAB+wIACfsBAAH7CQACIAEA
AiABAAIgCAACIAEAAiABAAIgBAAB/wS8Ae8BvAHvBQAB+wMAAvsEAAL7AQAB+yUAAv8B7wG8Ae8BvALv
BQAB+wQAAvsGAAH7AgAB/AEAAfwBAAH8AQAB/AEAAfwGAAoCCgAB/wG8Af8EvAHvBQAB+wEAAvsBAAL7
AgAC+wIAAfsBAAH8CP8HAAECCP8BAgoAAv8BvAH/Ae8BvAHvAbwFAAH7AQAC+wIABfsCAAH7AgAB/wEA
AfwB/wH8AQAC/wH8BgABAgH/CAIKAAH/AbwB/wG8Af8CvAHvBQAB+wEAAvsCAAL7AQAC+wIAAfsBAAH8
Af8B/AEAAQcBAAH8AQcB/wcAAQIB/wMCAQcEAgoAAv8BvAH/CQAB+wIAAvsBAAL7BQAB+wIAAf8BAAH8
AQAB/AEAAfwB/wH8BgABAgL/AQIBBwMCAf8BAgoAAf8BvAH/AbwBAAG8Au8FAAH7AwAC+wEAAvsBAAL7
AQAB+wEAAfwB/wH8Af8B/AEAAf8BAAEHBwABAgH/AQIBBwMCAv8BAgoABP8BAAH/AbwB7wUAAfsEAAf7
AQAB+wIAAfwBAAH/AQAB/AH/AfwBAAH8BgABAgH/AQcFAgH/AQIKAAT/AQAB/wG8BgAB+wwAAfsBAAH8
AQAB/AEAAfwBAAH8AQAB/AcAAQIB/wICAv8CAgH/AQIXAAH7DAAB+wIACP8B/AYAAQII/wECFwAO+wEA
AfwBAAH8AQAB/AEAAfwBAAH8BwAKAloAAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQABBwIA
AQcKAAPsKAABBwIAAQcBAAEHAQABBwIAAQcIAAEHBP8BBwoAB+8DAAH8AQAB/AEAAfwBAAH8AQAB/AcA
AfwBAAH8AQAB/AEAAfwBAAH8CwAB7AEAAf8BAAP/AewBBwkAAf8FAAHvAgAB/Aj/BwAB/Aj/DQABBwf/
AewIAAL/AbwB/wG8Af8B7wMAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AwAAf8BAAL/
AgAC/wHsAgAF7wEAAf8FAAHvAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB/AH/AfwBAAEHAQAB/AEH
Af8BAATWCAAB/wEAAv8DAAH/AQcCAAH/BQAC/wG8Af8BvAH/Ae8DAAH/AQAB/AEAAfwBAAH8Af8B/AP/
AdYDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYIAAEHA/8BAAP/AewCAAH/AbwB/wG8Af8BAAH/AgABvAUA
AfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYCAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWBwAC7AH/
AQAB/wEAAf8B7AH/AQAB7AEAAf8FAAL/AbwB/wEAAf8EAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHW
AwAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gUAAiACAAHsBf8B7AMAAf8BvAH/AbwB/wEABP8FAAH8
AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gQAAUECIAQA
AewBBwHsBQAB/wIAAf8MAAj/AfwB/wHWAQcB1gMACP8B/AH/AdYBBwHWAwAB4wJBBCAB7AMAAewEAAH/
AbwB/wG8AQAB/wkAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/
A9YCAAPjA0EFIAYABP8PAArWBgAK1gMABOMCQQMgGgAB1gj/AdYGAAHWCP8B1gQAA+MfAArWBgAK1gUA
AuM/AAEHAgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcBAAEHAQABBwIA
AQcRAAoCBgAKAgYACgIHAAH8AQAB/AEAAfwBAAH8AQAB/AYAAQII/wECBgABAgj/AQIGAAECCP8BAgYA
AfwI/wcAAQIB/wgCBgABAgH/CAIGAAECAf8IAgcAAf8BAAH8Af8B/AEAAv8B/AYAAQIB/wMCAQcEAgYA
AQIB/wMCAQcEAgSYAgABAgH/AwIBBwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wcAAQIC/wECAQcDAgH/
AQIGAAECAv8BAgEHAwIB/wECA/8BmAIAAQIC/wECAQcDAgH/AQID/wGYAwAB/wEAAfwBAAH8AQAB/AH/
AfwGAAECAf8BAgEHAwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgABAgH/AQIBBwMCAv8BAgSYAgAB/AH/
AfwB/wH8AQAB/wEAAQcHAAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wECBJgCAAECAf8BBwUCAf8BAgSY
AwAB/AEAAf8BAAH8Af8B/AEAAfwGAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKYAf8BmAIA
AQIB/wICAv8CAgH/AQICmAH/AZgCAAH8AQAB/AEAAfwBAAH8AQAB/AcAAQII/wECBgABAgj/AQIBmAL/
AZgCAAECCP8BAgGYAv8BmAMACP8B/AYACgIGAAoCApgB/wGYAgAKAgKYAf8BmAIAAfwBAAH8AQAB/AEA
AfwBAAH8GwABmAH/ApgC/wKYAf8BmAYAAZgB/wKYAv8CmAH/AZgmAAGYCP8BmAYAAZgI/wGYJgAKmAYA
CpgmAAEHAgABBwEAAQcBAAEHAgABBxEAAewDAAEHAgABBwEAAQcBAAEHAgABBxUAAQcCAAEHAQABBwEA
AQcCAAEHEQAB7AQHAgABBwEAAQcBAAEHAgABBxUAAQcCAAEHAQABBwEAAQcCAAEHBAAB7AEHAfsCBwEA
A+wEAAHsA/8BBwIAAQcBAAEHAQABBwIAAQcCAAH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEA
AfwBAAH8CQAB7AP/AfsB/wEAAfsBBwLsAgAB7AH/BAcB/wMHAf8BBwQAAfwI/wcAAfwI/wsAAewB+wP/
AfsBAAH/AfsBBwHsAQAB7Ar/AQcFAAH/AQAB/AH/AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwKAAHs
Av8B+wL/AQAB/wIAAewBAAHsAf8EBwH/AwcB/wEHBAAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB/AH/
AfwBAAEHAQAB/AEHAf8BAATWBwAB7AP/AfsB7AEAAf8B+wEHAQAB7Ar/AQcFAAH/AQAB/AEAAfwBAAH8
Af8B/AP/AdYDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYJAAH7A/8B+wL/AQcBAAHsAf8IBwH/AQcEAAH8
Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gcAAgEBAAH/
AfsD/wH7AQcBAAHsCv8BBwUAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAH8AQAB/wEAAfwB/wH8
AQAB/AHWAQcB/wHWAwACAQMAAQEBAAP/AfsC/wEHAQAB7AH/AgcB/wUHAf8BBwQAAfwBAAH8AQAB/AEA
AfwBAAH8AQAC1gH/AdYCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAwAB+QEBAQAB+QEAAQEDAAP/
AfsBBwEAAewK/wEHBQAI/wH8Af8B1gEHAdYDAAj/AfwB/wHWAQcB1gMAAvkCAAL5AQAD/wH7Av8BBwEA
AewB/wIHAf8FBwH/AQcEAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gIAAfwBAAH8AQAB/AEAAfwBAAH8
AQAB/wPWCQAC/wH7A/8B+wEHAQAB7Aj/CwAK1gYACtYHAAHsAf8B+wP/AfsC/wEHAQAB7AH/BgcB/wHs
Af8JAAHWCP8B1gYAAdYI/wHWBwAK7AEAAewI/wHsCgAK1gYACtYSAArsTgAByAEAAd0BAAHICwABLQEA
AcIBAAEtCwABJQEAAZoBAAElGgAByAXdAcgJAAEtBcIBLQkAASUFmgElGAACyAHdAcgBAAHIAd0JAAIt
AcIBLQEAAS0BwgkAAiUBmgElAQABJQGaBAAB/AEAAfwBAAH8AQAB/AEAAfwMAAHIAt0BAAHsAQAC3QHI
BwABLQLCAQAB7AEAAsIBLQcAASUCmgEAAewBAAKaASUBAAH8CP8NAALIAd0ByAEAAcgB3QkAAi0BwgEt
AQABLQHCCQACJQGaASUBAAElAZoEAAH/AQAB/AH/AfwBAAL/AfwNAAHIBd0ByAkAAS0FwgEtCQABJQWa
ASUCAAH8Af8B/AEAAQcBAAH8AQcB/w4AAsgBAAHdAQAByAoAAi0BAAHCAQABLQoAAiUBAAGaAQABJQQA
Af8BAAH8AQAB/AEAAfwB/wH8CAAByAEAAd0BAAHIAgAEyAUAAS0BAAHCAQABLQIABC0FAAElAQABmgEA
ASUCAAQlAwAB/AH/AfwB/wH8AQAB/wEAAQcIAAHIBd0ByAkAAS0FwgEtCQABJQWaASUJAAH8AQAB/wEA
AfwB/wH8AQAB/AYAAsgB3QHIAQAByAHdCQACLQHCAS0BAAEtAcIJAAIlAZoBJQEAASUBmgkAAfwBAAH8
AQAB/AEAAfwBAAH8BwAByALdAQAB7AEAAt0ByAcAAS0CwgEAAewBAALCAS0HAAElApoBAAHsAQACmgEl
CAAI/wH8BgACyAHdAcgBAAHIAd0JAAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaCQAB/AEAAfwBAAH8
AQAB/AEAAfwIAAHIBd0ByAkAAS0FwgEtCQABJQWaASUZAALIAQAB3QEAAcgKAAItAQABwgEAAS0KAAIl
AQABmgEAASUcAATIDAAELQwABCUsAAEtAVUBLQ0AAS0BVQEtIQAB7Af/BAABLQFVAS0NAAEtAVUBLRIA
ASoBAAGaAQABKgoAAewH/wQAAS0BVQEtDQABLQFVAS0RAAEqBZoBKgkAAewH/wQAAy0CAAf/BAADLQIA
B/8HAAIqAZoBKgEAASoBmgwABv8EAAHsBQAG/wQAAewFAAb/BwABKgKaAQAB7AEAApoBKgMABrUBAAb/
AgAC7AXhAgAF/wIAAuwC6AHvAf8B7wIABf8HAAIqAZoBKgEAASoBmgUABLUDAAb/AgAB7AHhAf8F4QEA
Bf8CAAHsA+gB7wH/Ae8B/wEABf8IAAEqBZoBKgQAA7UBAAK1AQAG/wEAAewB4QH/B+EBAAT/AQAB7AHo
Af8C6AHvAf8B7wL/AQAE/wgAAioBAAGaAQABKgUABrUBAAT/AewCAAHsAf8B4QH/BuEBAAT/AQAB7AH/
A+gB7wH/Ae8C/wEABP8DAAEqAQABmgEAASoCAAQqBQAFtQMAA/8B7AH/AQAB7AHhAf8H4QEABP8BAAHs
AegC/wHoAe8B/wHvAv8BAAT/AgABKgWaASoKAAe1AQAF7AEAAewD/wHhAf8E4QEAAv8B7AIAAewB/wHo
Av8B7wH/Ae8C/wEAAv8B7AIAAioBmgEqAQABKgGaCwAHtQEAAf8B7AUAAewD/wHhAf8B4QH/AQAD/wHs
Af8CAAHsAf8B6AH/Ae8B/wHvAf8BAAP/AewB/wEAASoCmgEAAewBAAKaASoJAAS1AQACtQEAAf8B7AH/
BAAC7AH/AeEB/wHhAf8CAAXsAgAC7AH/AegB7wH/Ae8CAAXsAQACKgGaASoBAAEqAZoLAAS1AQABtQEA
BOwGAAPsAgAD/wHsBwAD7AIAA/8B7AUAASoFmgEqCgAGtQ0AAewF/wHsAf8IAAHsBf8B7AH/BAACKgEA
AZoBAAEqHgAI7AgACOwGAAQqPAABLQFVAS0NAAHsBQcB7AkAAewFBwHsCQAB7AUHAewJAAEtAVUBLQ0A
Aa8FtgGvAewIAAEtBVoBLQHsCAABJQVNASUB7AgAAS0BVQEtDQABrwW2Aq8B7AcAAS0FWgItAewHAAEl
BU0CJQHsBwADLQ0AAa8FtgOvAewGAAEtBVoDLQHsBgABJQVNAyUB7AYAAewPAAGvBbYBAAOvAewFAAEt
BVoBAAMtAewFAAElBU0BAAMlAewDAALsBOEBbQIABLUEAALsBf8CAAOvBAAC7AX/AgADLQQAAuwF/wIA
AyUDAAHsBeEBbQG8AQACtQUAA+wF/wEAAQcBAAKvAwAD7AX/AQABBwEAAi0DAAPsBf8BAAEHAQACJQIA
AewB4QH/BOEBbQK8AgACtQMAAuwBBwXsAgcB/wEAAa8DAALsAQcF7AIHAf8BAAEtAwAC7AEHBewCBwH/
AQABJQIAAewB/wXhAW0CvAEAA7UDAAHsAQcB7AMHAuwBBwP/BAAB7AEHAewDBwLsAQcD/wQAAewBBwHs
AwcC7AEHA/8DAAHsAeED/wLhAW0CvAEAArUEAAHsAf8BBwHsAwcBAAXsAwAB7AH/AQcB7AMHAQAF7AMA
AewB/wEHAewDBwEABewCAAHsAf8B4QL/AuEBbQK8AQAEtQMAAewB/wEHAewBBwEAAewE/wEHBAAB7AH/
AQcB7AEHAQAB7AT/AQcEAAHsAf8BBwHsAQcBAAHsBP8BBwMAAewB/wHhAf8C4QFtAbwBAAW1BAAB7AH/
AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcFAAHsAf8BBwIAAewE/wEHAwAC7AH/AeEB/wHhAW0CAAK1
AQACtQUAAewB/wMABewGAAHsAf8DAAXsBgAB7AH/AwAF7AUAA+wCAAS1AQABtQcAAewPAAHsDwAB7BIA
BrVMAAESAZQEkzEAARMB6gQSAeoBbgEAARIBlASTEwAB7AUHAewJAAHsBQcB7AcAAeoBtwOUAbcBkwFu
AQABEgGUBJMTAAExBVkBMQHsCAAB5gXWAeYB7AYAARIBlAKTAbcBDgMAARIBlASTAQAG1wEABvQFAAEx
BVkCMQHsBwAB5gXWAuYB7AUAARIBlAGTAZQBEgEAARIBvQEAAeoBtwGUA5MBAATXBQAE9AUAATEFWQMx
AewGAAHmBdYD5gHsBAABEgGUAZMBtwEAARICtwEAARACEgFuApMBAAPXAQAC1wEAAvQBAAP0BQABMQVZ
AQADMQHsBQAB5gXWAQAD5gHsAwABEgGUApMCtwGUAbcBEwESAW0BAAESAbcBkwEABtcBAAb0BAAC7AX/
AgADMQQAAuwF/wIAA+YDAAESAZQCkwG3ARMBEgETAr0BbQEAAREBjgGUAQAF1wMABfQDAAPsBf8BAAEH
AQACMQMAA+wF/wEAAQcBAALmAwABEgGUAZMBtwEOBAABEQQAAZMBAAXXAQAH9AMAAuwBBwXsAgcB/wEA
ATEDAALsAQcF7AIHAf8BAAHmAwAB6wGTAZQBRAEAARAB/wHxAgABEAH/AfEDAAXXAQAH9AMAAewBBwHs
AwcC7AEHA/8EAAHsAQcB7AMHAuwBBwP/BAAB7AHzAZMBEgEAAf8BAAH/AgAB/wEUAf8B9wIAA9cBAAHX
AQAC9AEABPQDAAHsAf8BBwHsAwcBAAXsAwAB7AH/AQcB7AMHAQAF7AMAAewB/wG3AUQBAAHxAf8B8QIA
AewC/wMAA9cBAALXAvQBAAT0BAAB7AH/AQcB7AEHAQAB7AT/AQcEAAHsAf8BBwHsAQcBAAHsBP8BBwMA
AewC/wG3ARAJAAGTAQAG1wf0BQAB7AH/AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcDAAEUAuwB7QFu
AwABjgG3ARIBAAERAQcB/xQAAewB/wMABewGAAHsAf8DAAXsCQABvAHzAb0BGgG9BP8VAAHsDwAB7AoA
Af8B8gEAAf8BFQFDCv9aAAHqBbYKAAHqBbYGAAHsATAKAAL5AgAB+QoAARQBbQTqAW0B6wEAAeoFtgEA
ARQBbQTqAW0B6wEAAeoFtgUAAewBMAF6DAACvAsAAW0B3QO2Ad0BtQHrAQAB6gW2AQABbQHdA7YB3QG1
AesBAAHqBbYEAALsAXoBAAL5CQACvAIAAW0JAAHqA7YB3QEPAwAB6gW2AQAB6gO2Ad0BDwMAAeoFtgEA
AewCMAHsAXoBAAK8CwADvAEAAf8BAAHsBgAB6gO2ARIBAAHqAd4BAAFtAd0EtgEAAeoDtgESAQAB6gHe
AQABbQHdBLYBAAEwA3oBAAK8AgABbQYAAuwEvAEAAv8HAAHqArYB1wEAARIC3QEAARACEgGNArYBAAHq
ArYB1wEAARIC3QEAARACEgGNArYB7AF6AQACegIAA7wBAAFWAQABVgMAAuwBAAS8AwABUAEAAVADAAHq
A7YB1wHdAbYB3QISAW0BAAHqAdcBtgEAAeoDtgHXAd0BtgHdAhIBbQEAAeoB1wG2AQADegEwAQAEvAEA
AlYEAALsAQACvAIAA/8BAAG8BAAB6gO2Ad0BEgHqARIC3gFtAQABEQH3AbYBAAHqA7YB3QESAeoBEgLe
AW0BAAERAfcBtgIAAewCAAHsAQAEvAYAA+wBAAK8AQAD/wEAAbwEAAHqArYB3QEPBAABQwQAAbUBAAHq
ArYB3QEPBAABQwQAAbUEAALsAQACvAIAA/8EAAXsAQAE/wEAAbwDAAHrArYBEgEAARAB/wHxAgABEAH/
AfEDAAHrArYBEgEAARAB/wHxAgABEAH/AfEGAAPsAQACvAEAA/8KAAL/AgACvAMAAewB8wG2AeoBAAH/
AQAB/wIAAf8BFAH/AfcCAAHsAfMBtgHqAQAB/wEAAf8CAAH/ARQB/wH3BgAF7AEABP8GAAO8AQAC/wEA
A7wCAAHsAf8B3QESAQAB8QH/AfECAAHsAv8DAAHsAf8B3QESAQAB8QH/AfECAAHsAv8NAAL/CQAFvAEA
AbwEAAHsAv8B1wEQCQABtgEAAewC/wHXARAJAAG2CAADvAEAAv8NAAHsArwDAAEUA+wBrgMAAbUB3QHq
AQABEQEHAf8BAAEUA+wBrgMAAbUB3QHqAQABEQEHAf8JAAW8CwAF7AkAAbwB9AHyAfEB3gT/BwABvAH0
AfIB8QHeBP8gAAH/AfIBAAH/ARUBQwv/AfIBAAH/ARUBQwr/FAABBwIAAQcBAAEHAQABBwIAAQc1AAEH
AgABBwEAAQcBAAEHAgABBxgAAv8bAAEHAgABBwEAAQcBAAEHAgABBxYAAv8CAAL/BQAKAgYACgIMAAHs
DAAB8wH/AgAC/wIAAv8DAAECCP8BAgYAAQII/wECDAAB7AMDBgAB7AL/AgAC/wIAAv8CAAH/AgABAgH/
CAIGAAECAf8IAgwAAewB/wHsAQMJAAHzAf8CAAL/AgAC/wMAAQIB/wMCAQcEAgSYAgABAgH/AwIBBwQC
BJgIAAHsAfsB7AEDBgAB7AL/AgAC/wIAAv8CAAH/AgABAgL/AQIBBwMCAf8BAgP/AZgCAAECAv8BAgEH
AwIB/wECA/8BmAgAAewB/wHsAQMJAAHzAf8CAAL/AgAC/wMAAQIB/wECAQcDAgL/AQIEmAIAAQIB/wEC
AQcDAgL/AQIEmAcAAewB/wH7AewBAwYAAewC/wIAAv8CAAL/AgAB/wIAAQIB/wEHBQIB/wECBJgCAAEC
Af8BBwUCAf8BAgSYBgAB7AH7Af8DBwEDCAAB8wH/AgAC/wIAAv8DAAECAf8CAgL/AgIB/wECApgB/wGY
AgABAgH/AgIC/wICAf8BAgKYAf8BmAUAAewC/wEHAfsCBwEDAewEAAHsAv8CAAb/AgAB/wIAAQII/wEC
AZgC/wGYAgABAgj/AQIBmAL/AZgEAAHsAf8C+wH/BAcBAwHsBgAK/wMACgICmAH/AZgCAAoCApgB/wGY
AgAC7AH7Af8C+wP/AQcB/wIHAQMCAAHsDP8HAAGYAf8CmAL/ApgB/wGYBgABmAH/ApgC/wKYAf8BmAIA
DuwDAALsCP8JAAGYCP8BmAYAAZgI/wGYFQAC7AT/CwAKmAYACpgXAALsHQAB7AQABewOAAFQJQAC7AIH
AfkB+wH+BV4OAAJQFQAB+QQABfkEAAHsAwcE7AVeDQAEUBQAAvkDAAL5BwAB+gH7Af8BBwEAAfkB+wH+
BF4B7AMABVAEAAZQCgIIAAT5BAACGgQAAewC+gH7AQcBAAH5Av4BBwLsBQACUAYABlABAAECCP8BAgcA
BvkDAAEaBQAB7AEHAfkB+wH6AwAFBwYAAhoEAAJQAQACUAIAAQIB/wgCBgAG+QQABBoCAAHsAwcB+QMA
AewBBwkAARoFAAFQAgABUAMAAQIB/wMCAQcEAgYAAvkBAAL5BgADGgIAAewDBwH5AwAB7AReAewFAAQa
AgABUAYAAQIC/wECAQcDAgH/AQIGAAH5AgAB+QYABRoBAAHsAgcB+QH7AQAD7AVeBgADGgIAAVAGAAEC
Af8BAgEHAwIC/wECBgAB+QkAAxoEAAEHAfkB+wH6BOwFXgUABRoIAAECAf8BBwUCAf8BAgYAAfkLAAIa
AwAB7AH7AfoB/gEAAwcB7AH/AQcHAAMaCgABAgH/AgIC/wICAf8BAgcAAfkQAAbsAgcB7AL/AQcHAAIa
CQABAgj/AQIYAAHsBF4B7AIAAewD/wEHEQAKAhgAAewEXgHsAwAB/wLsAf8zAAbsBwAB7DMAA+xaAAHs
PwAB7AsHCwAHtgkAB+QJAAd1AgAB7Ar/AQcLAAHzBQABtgkAAcIFAAHkCQABGwUAAXUCAAHsAf8EBwH/
AwcB/wEHCwAC8wO8AfMBtgkAAsIBngHCAZ4BwgHkCQACGwG9Af8BvQH/AXUCAAHsCv8BBwUABbYBAAHz
BQABtgMABeQBAAHCBQAB5AMABXUBAAEbBQABdQIAAewB/wQHAf8DBwH/AQcFAAHzBQAC8wG8AfMBvAHz
AbYDAAHCBQACwgGeAcIBngHCAeQDAAEbBQACGwG9Af8BvQH/AXUCAAHsCv8BBwUAAfMDvAHzAQAB8wIA
AfMGAAHCAZ4BwgGeAcIBAAHCAgABngYAARsBvQH/Ab0B/wEAARsCAAG9BQAB7AH/CAcB/wEHBQAB8wUA
AvMBvAHzAQAB8wQAAcIFAALCAZ4BwgEAAcIEAAEbBQACGwG9ARsBAAH/AwAB7Ar/AQcFAAHzAbwB8wG8
AfMBAATzBgABwgGeAcIBngHCAQAEwgYAARsBvQH/Ab0B/wEABBsFAAHsAf8CBwH/BQcB/wEHBQAB8wIA
AfMMAAHCAgABwgwAARsCAAH/CwAB7Ar/AQcFAAHzAbwC8wEAAfMKAAHCAZ4CwgEAAcIKAAEbAb0BGwH0
AQAB/wkAAewB/wIHAf8FBwH/AQcFAATzDAAEwgwABBsLAAHsCP83AAHsAf8GBwH/AewB/zUAAewI/wHs
NgAK7A0AATAB7AcAAewDAAEHAgABBwEAAQcBAAEHAgABBycAATAB+wLsBgAB7AQHAgABBwEAAQcBAAEH
AgABByYAATAD+wLsBQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHCAAHWQkAB9YGAAEwBfsC7AQAAewB/wQH
Af8DBwH/AQcLAAHDBQABWQkAARkFAAHWBQABMAL7AgAD+wLsAwAB7Ar/AQcLAALDAZoBwwGaAcMBWQkA
AhkB3QEZAd0BGQHWBAABMAP7AgAE+wLsAgAB7AH/BAcB/wMHAf8BBwUABVkBAAHDBQABWQMABdYBAAEZ
BQAB1gMAATAL+wLsAQAB7Ar/AQcFAAHDBQACwwGaAcMBmgHDAVkDAAEZBQACGQHdARkB3QEZAdYCAAEw
BfsC6gb7A+wB/wgHAf8BBwUAAcMBmgHDAZoBwwEAAcMCAAHDBgABGQHdARkB3QEZAQABGQIAAd0FAAEw
BfsCAAb7AewBAAHsCv8BBwUAAcMFAALDAZoBwwEAAcMEAAEZBQACGQHdARkBAAEZBAABMAT7AgAF+wHs
AgAB7AH/AgcB/wUHAf8BBwUAAcMBmgHDAZoBwwEABMMGAAEZAd0BGQHdARkBAAQZBwABMAP7AgAE+wHs
AwAB7Ar/AQcFAAHDAgABwwwAARkCAAEZDgABMAL7AgAD+wHsBAAB7AH/AgcB/wUHAf8BBwUAAcMBmgLD
AQABwwoAARkB3QIZAQABGQ0AATAB+wIAAvsB7AUAAewI/wgABMMMAAQZEAABMAP7AewGAAHsAf8GBwH/
AewB/ysAATAB+wHsBwAB7Aj/AewtAAEwCAAK7CYAAUIBTQE+BwABPgMAASgDAAFAAwAB4AMAAQEBAAEB
BgABBxYAA/+FAAT/AX8B/gIABP8BYAEGAgAB/wEkAf8BJAFgAQYCAAH/ASQB/wEkAWABBgIABP8BYAEG
AwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEGAwABPwEAAT8BYAEG
AwABPwEAAT8BYAEGAwABPwEAAT8BYAEOAwABPwEAAT8BYAEeAwABPwEAAT8BfwH+AwABPwEAAT8EAAb/
AfABAAH/AYcE/wHwAQAB/gEDAfwBAQL/AfABAAH8AQEB/AEBAQABPwEAAT8B+AEAAfwBAQEAAT8BAAE/
AfgCAAEBAQABPwEAAT8B+AIAAQEBAAEDAQABAwH4AgABAQEAAQMBAAEDAfgCAAEBAQABAwEAAQMB+AIA
AQMBAAEDAQABAwHkAQEBAAEHAQABAwEAAQMBxgIAAQ8BAAEDAQABAwGAAQUBAAH/AQABAwEAAQMBAAEf
AQEB/wHwAQMB8AEDAYABIwEDAf8B8AEDAfABAwHHA/8B8AEDAfABAwHnAfEG/wHwAQAG/wHwAQAG/wHw
AQAC/wEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAED
AQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8BAAE/
AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8C/wHwAQMB8AEDBP8B8AED
AfABAwT/AfABAwHwAQME/wHwAQAC/wIAAv8B8AEAAfABDwIAAv8B8AEAAeABAwMAAT8BAAE/AeABAQEA
AQcBAAE/AQABPwHwAgABBwEAAT8BAAE/AfACAAEHAQABAwEAAQMB+AIAAQcBAAEDAQABAwH4AgABBwEA
AQMBAAEDAZACAAEHAQABAwEAAQMDAAEHAQABAwEAAQMDAAEHAQABAwEAAQMDAAEHAQABAwEAAQMBmAIA
AQcB8AEDAfABAwH4AgABDwHwAQMB8AEDAfgCAAEfAfABAwHwAQMC/wEAAT8B/wGHAf8BhwH/AYcC/wH+
AQEB/gEBAf4BAQL/Af4BAAH+AQAB/gEAAv8B/AEAAfwBAAH8AgABPwH8AQAB/AEAAfwCAAE/AfwBAAH8
AQAB/AIAAT8B/gEBAf4BAQH+AQEBAAE/AeABAQHgAQEB4AEBAQABPwGAAQcBgAEHAYABBwEAAT8BgAE/
AYABPwGAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/
AYABfwGAAX8BgAF/Av8BgAF/AYABfwGAAX8C/wHhAf8B4QH/AeED/wH+AQAB4QH/AeEC/wGHAf4BAAHh
Af8B4QH/Af4BAQH+AQAB4AEAAeABAAH+AQAB/gEAAeABAAHgAQAB/AEAAYABAAHgAQAB4AEAAfwBAAGA
AQABgAEAAYABAAH8AQABgAEAAYABAAGAAQAB/gEBAYAFAAHgAQEBgAUAAYABBwGABQABgAE/AYABAQUA
AT8BgAEDAYABAAGAAgABPwGAAQMBgAEBAYABAQEAAT8BgAEHAeABAwHgAQMBgAF/AYABfwH4AQMB+AED
AYABfwGAAX8B+AEHAfgBBwHhAf8B4AE/AeABPwHgAT8B4QH/AeABHwHgAR8B4AEfAeEB/wHgAQ8B4AEP
AeABDwHhAf8B4AEHAeABBwHgAQcB4QH/AeABAwHgAQMB4AEDAeABAQHgAQEB4AEBAeABAQGAAQEBwAEB
AcABAQHAAQEBgAEBAYABAQGAAQEBgAEBAQABAQGAAQEBgAEBAYABAQEAAQEBgAEBAYABAQGAAQEBAAEB
AYABAQGAAQEBgAEBAgABgAEBAYABAQGAAQEBgAEAAcABAQHAAQEBwAEBAYABAAHhAQEB4QEBAeEBAQHg
AQEB8QGDAfEBgwHxAYMB/gEBAfkB/wH5Af8B+QH/Af4BAQIAAf8BvwHgAT8B4AE/AgAB/wF/AeABHwHg
AR8DAAEBAeABDwHgAQ8DAAEBAeABBwHgAQcDAAEBAeABAwHgAQMDAAEBAeABAQHgAQEDAAEBAcABAQHA
AQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGAAQEDAAEBAYABAQGA
AQEDAAEBAcABAQHAAQEDAAEBAeEBAQHhAQECAAH+Af8B8QGDAfEBgwIAAf8BfwH5Af8B+QH/AfwD/wQA
AfgBfwGAAf8EAAHwAX8BwQH/BAABgAEfAcABfwUAAT8BgAEPBQABDwEAAR8FAAEBAQABAQUAAQMBAAED
BAABgAEDAQABAwQAAeABAQGAAQEEAAHgAQEBwAEBBAAB8AEAAfAFAAH4AQEB+AEBBAAB/gEBAfwBAQQA
Af8BAQH/AQEEAAH/AYEB/wGDBAAC/wHwAQAC/wH+AX8C/wHwAQAC/wH4AR8C/wHwAQAC/wHgAQcBAAE/
AQABPwH8AR8BgAEBAQABPwEAAT8B/AEfAQABAwEAAT8BAAE/AfwBHwGAAQEBAAEDAQABAwH8AR8BAAED
AQABAwEAAQMB/AEfAYABAQEAAQMBAAEDAfgBDwEAAQMBAAEDAQABAwHwAQcBgAEBAQABAwEAAQMB4AED
AQABAwEAAQMBAAEDAcABAQGAAQEBAAEDAQABAwMAAQMB8AEDAfABAwIAAYABBwHwAQMB8AEDAv8B4AEf
AfABAwHwAQMC/wH4AX8C/wHwAYEB/wH3BP8BwAEBAf8B8wL/Ae4BAwGAAQEB/wHhAv8B5gEHAYABAwEB
AcABAAE/AcMBBwEAAQ8BAwGBAQABPwGBAYMBAAEHAYMBkwEAAT8BAwEBAQMBAQHBAbcBAAE/ASYBAQED
AQEBgAG/AQABPwFuAgABAQEAAb8BAAE/AX4BAQGAAQEBAAF/AQABPwF+AQEBgAEHAQAB/wEAAT8BvgEC
AcABAwEAAf8BAAE/Af8BAAHAAgEBfwEAAT8B/wGDAcAB4AGAAX8E/wHAAf4BwQX/AeML/wEAAQcB/AEB
AfwBAQH8AQEBAAEHAfwBAQH8AQEB/AEBAQABBwH8AQEB/AEBAfwBAQEAAQcBAAEBAQABAQEAAQEBAAEH
AQABAQEAAQEBAAEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEBAQABAQEAAQEBAAEHAQABAwEAAQMBAAED
AQABBwEAAQcBAAEHAQABBwEAAQcBAAEPAQABDwEAAQ8BAAEHAQAB/wEAAf8BAAH/AQABBwEBAf8BAQH/
AQEB/wEAAQcBAwH/AQMB/wEDAf8BAAEPBv8BAAEfBv8BAAE/Af4BfwIABP8B/AE/AgAB/AEBAfwBAQH4
AR8CAAH8AQEB/AEBAfABDwEAAQcB/AEBAfwBAQHgAQcBAAEHAQABAQEAAQEBwAEDAQABBwEAAQEBAAEB
AYABAQEAAQcBAAEBAQABAQMAAQcBAAEBAQABAQEAAQEBAAEHAQABAwEAAQMBgAEDAQABBwEAAQcBAAEH
AcABBwEAAQcBAAEPAQABDwHgAQ8BAAEHAQAB/wEAAf8B8AEfAQABBwEBAf8BAQH/AfgBPwEAAQ8BAwH/
AQMB/wH8AX8BAAEfBP8B/gH/AQABPwT/Cw==
</value>
</data>
<metadata name="ctmenuSelVorlagen.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 54</value>
</metadata>
<metadata name="ctmenuBeschreibung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>543, 17</value>
</metadata>
<metadata name="FontDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>804, 17</value>
</metadata>
<metadata name="ImageList2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>510, 30</value>
</metadata>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAA4
CAAAAk1TRnQBSQFMAgEBAwEAASwBAAEsAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/wEAEAcg/xAABwcBAAEH
AQAD7AEAAgcg/xAABwcBAAEHAQAD7AEAAgcI/wEXF/8RAAEHBAABBwEAAQcBAAPsAQACBwj/AfkBFxb/
EAAFBwMAAQcBAAPsAQACBwj/AvkB4wH0FP8QAAUHAgACBwEAAewBBwHsAQACBwL/Ab0FFgP5AeMU/xIA
AQcBAAEHAwABBwEAA+wBAAIHAv8BFgn5ARcT/xAABAcGAAPsAQACBwL/ARYK+QEXEv8QAAYHAgABBwIA
AuwBAAIHAv8BFgn5AUYBBxL/EAAFBwMAAQcBAAPsAQACBwL/AZMFRgP5AUYBBxP/EAAGBwIAAQcCAALs
AQACBwL/AfMF8QL5AUYBBxT/EAAJBwUAAgcI/wH5AUYBBxX/EAAQBwj/AUYBBxb/EAAIBwQEBAcI/wEH
F/8QAAgHAQQCBwEEBAcg/xAACAcEBAQHIP8QAAFCAU0BPgcAAT4DAAEoAwABQAMAARADAAEBAQABAQUA
AYAXAAP/gQAL
</value>
</data>
<metadata name="ctMenuStruktur.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>164, 54</value>
</metadata>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAASUlEQVQ4T2OgFfiPAxMF/v/9yI+BQeJQ
jBdg00CSIWCFOTk56AopMoAkF4AARZqRAUWaQQCsGUt4EA0G3gAQoEzz0PcCEYCBAQCfxINLHCrVBwAA
AABJRU5ErkJggg==
</value>
</data>
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>292, 54</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>152</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD9AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8AAAD/AAAAsABIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/1lZAJ0AAAD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAAP8AAAB3AABI/0gAJf8lAAD/
AAAA3AAAAKoAAACWAAAAZAAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAWToAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AKv1+gAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB1dXUAYWFhAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAIqCBwcHB4KCAAAAAAAAAACKgoKCgoKCggAAAAAAAAAAioIH
BwcHgoIAIgAAAAAAAIqCgoKCgoKCACIAAAAAAACKggeCBweCggAiAAAAAAAAioKCgoKCgoIAIgC+AAAA
AIqCBwcHgooAACIAvgAADwoHDwoHgoKKggAiAL4AAAAPCg8KBxGKiooiIgC+AAAAAA8HCgcMBwciKgAA
vgAKCgoKDwcPCgoiIioiAL4ADw8PDwcHBw8PDyoqKr6+AAAAAAoPBwoHvgcHB77GAAAAAAoPDwoPCge+
vr6+xr4AAAAPAA8KAA8KxsbGxsbGAOAP///gD///4AP//+AD///gA///4AD//+AA///gAP//gAD//8AA
///gAP//AAD//wAA///gAP//wAD//9IB//8=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,216 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="SqlDataAdapter1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDataAdapter1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>125, 17</value>
</data>
<data name="SqlDeleteCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlConnection1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlConnection1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>260, 17</value>
</data>
<data name="SqlInsertCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlSelectCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlSelectCommand1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="DataSet1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>388, 17</value>
</data>
<data name="DataSet1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>485, 17</value>
</data>
<data name="ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuNew.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuEdit.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cdmnuShow.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cboDokTyp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnDokTypSelektion.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnXLSExport.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnXLSExport.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAItJREFUOE/Nk9EN
gDAIRNuRHM4v45dxLzZwpComF0+K0E9JGkIljzvRWkxsx97snVev01LdPgVkEQ4BQDPDuH4D5tLKwAkB
mWQdYNU8/q+HGlABGNcAsL0OICKuFcBhAdlVYCGsJgVgkgdRCxzdFvgdaLNnJ1WQrvLz8zTyvJXe8AiQ
Tg8BI3/Or3tOonyGb7wYBTsAAAAASUVORK5CYII=
</value>
</data>
<data name="SaveFileDialog1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SaveFileDialog1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>608, 17</value>
</data>
<data name="lblSelektion.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolTip1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>737, 17</value>
</data>
<data name="ToolTip1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmDokumentpaketuebersicht</value>
</data>
</root>

View File

@@ -0,0 +1,578 @@
Imports System.ComponentModel
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.Drawing
Imports System.Drawing.Color
Public Class frmDokumentpaketuebersicht
Inherits _frmDomainEditor
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
Friend WithEvents DataSet1 As System.Data.DataSet
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents ctmnuNew As System.Windows.Forms.MenuItem
Friend WithEvents ctmnuEdit As System.Windows.Forms.MenuItem
Friend WithEvents cdmnuShow As System.Windows.Forms.MenuItem
Friend WithEvents cboDokTyp As System.Windows.Forms.ComboBox
Friend WithEvents btnDokTypSelektion As System.Windows.Forms.Button
Friend WithEvents btnXLSExport As System.Windows.Forms.Button
Friend WithEvents SaveFileDialog1 As System.Windows.Forms.SaveFileDialog
Friend WithEvents lblSelektion As System.Windows.Forms.Label
Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip
Friend WithEvents ContextMenu2 As System.Windows.Forms.ContextMenu
Friend WithEvents MenuItem4 As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmDokumentpaketuebersicht))
Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter()
Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection()
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand()
Me.SqlUpdateCommand1 = New System.Data.SqlClient.SqlCommand()
Me.DataSet1 = New System.Data.DataSet()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.ctmnuNew = New System.Windows.Forms.MenuItem()
Me.ctmnuEdit = New System.Windows.Forms.MenuItem()
Me.cdmnuShow = New System.Windows.Forms.MenuItem()
Me.cboDokTyp = New System.Windows.Forms.ComboBox()
Me.btnDokTypSelektion = New System.Windows.Forms.Button()
Me.btnXLSExport = New System.Windows.Forms.Button()
Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
Me.lblSelektion = New System.Windows.Forms.Label()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.ContextMenu2 = New System.Windows.Forms.ContextMenu()
Me.MenuItem4 = New System.Windows.Forms.MenuItem()
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "edex_dokumentpaket", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("dokumentpaketnr", "dokumentpaketnr"), New System.Data.Common.DataColumnMapping("bezeichnung", "bezeichnung"), New System.Data.Common.DataColumnMapping("beschreibung", "beschreibung"), New System.Data.Common.DataColumnMapping("owner", "owner"), New System.Data.Common.DataColumnMapping("individuelles_dp", "individuelles_dp"), New System.Data.Common.DataColumnMapping("dpbeschreibung", "dpbeschreibung"), New System.Data.Common.DataColumnMapping("dokumentartnr", "dokumentartnr"), New System.Data.Common.DataColumnMapping("erstellt_am", "erstellt_am"), New System.Data.Common.DataColumnMapping("mutiert_am", "mutiert_am"), New System.Data.Common.DataColumnMapping("mandantnr", "mandantnr"), New System.Data.Common.DataColumnMapping("aktiv", "aktiv")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
'
'SqlDeleteCommand1
'
Me.SqlDeleteCommand1.CommandText = "[edex_pr_dokumentpaket_delete]"
Me.SqlDeleteCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlDeleteCommand1.Connection = Me.SqlConnection1
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_dokumentpaketnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "dokumentpaketnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_beschreibung", System.Data.SqlDbType.VarChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "beschreibung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bezeichnung", System.Data.SqlDbType.VarChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bezeichnung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_dokumentartnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "dokumentartnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_individuelles_dp", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "individuelles_dp", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_owner", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "owner", System.Data.DataRowVersion.Original, Nothing))
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = "data source=SHUMAIN;initial catalog=edoka;persist security info=False;user id=sa;" & _
"workstation id=SHUMAIN;packet size=4096"
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "[edex_pr_dokumentpaket_insert]"
Me.SqlInsertCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlInsertCommand1.Connection = Me.SqlConnection1
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@dokumentpaketnr", System.Data.SqlDbType.Int, 4, "dokumentpaketnr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bezeichnung", System.Data.SqlDbType.VarChar, 50, "bezeichnung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@beschreibung", System.Data.SqlDbType.VarChar, 50, "beschreibung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@owner", System.Data.SqlDbType.Int, 4, "owner"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@individuelles_dp", System.Data.SqlDbType.Bit, 1, "individuelles_dp"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@dpbeschreibung", System.Data.SqlDbType.VarBinary, 2147483647, "dpbeschreibung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@dokumentartnr", System.Data.SqlDbType.Int, 4, "dokumentartnr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "[edex_sp_dokumentpakete_select]"
Me.SqlSelectCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlSelectCommand1.Connection = Me.SqlConnection1
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(10, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(10, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mitarbeiternr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(10, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlSelectCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@filter", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(10, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
'
'SqlUpdateCommand1
'
Me.SqlUpdateCommand1.CommandText = "[edex_pr_dokumentpaket_update]"
Me.SqlUpdateCommand1.CommandType = System.Data.CommandType.StoredProcedure
Me.SqlUpdateCommand1.Connection = Me.SqlConnection1
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@dokumentpaketnr", System.Data.SqlDbType.Int, 4, "dokumentpaketnr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@bezeichnung", System.Data.SqlDbType.VarChar, 50, "bezeichnung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@beschreibung", System.Data.SqlDbType.VarChar, 50, "beschreibung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@owner", System.Data.SqlDbType.Int, 4, "owner"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@individuelles_dp", System.Data.SqlDbType.Bit, 1, "individuelles_dp"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@dpbeschreibung", System.Data.SqlDbType.VarBinary, 2147483647, "dpbeschreibung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@dokumentartnr", System.Data.SqlDbType.Int, 4, "dokumentartnr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Param1", System.Data.SqlDbType.Int, 4, "mandantnr"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_dokumentpaketnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "dokumentpaketnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_aktiv", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "aktiv", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_beschreibung", System.Data.SqlDbType.VarChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "beschreibung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_bezeichnung", System.Data.SqlDbType.VarChar, 50, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "bezeichnung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_dokumentartnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "dokumentartnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_erstellt_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "erstellt_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_individuelles_dp", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "individuelles_dp", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mandantnr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mandantnr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_mutiert_am", System.Data.SqlDbType.DateTime, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "mutiert_am", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_owner", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "owner", System.Data.DataRowVersion.Original, Nothing))
'
'DataSet1
'
Me.DataSet1.DataSetName = "NewDataSet"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.ctmnuNew, Me.ctmnuEdit, Me.cdmnuShow})
'
'ctmnuNew
'
Me.ctmnuNew.Index = 0
Me.ctmnuNew.Text = "&Neues Dokumentpaket"
'
'ctmnuEdit
'
Me.ctmnuEdit.Index = 1
Me.ctmnuEdit.Text = "&Dokumentpaket bearbeiten"
'
'cdmnuShow
'
Me.cdmnuShow.Index = 2
Me.cdmnuShow.Text = "Dokumentpaket anzeigen"
'
'cboDokTyp
'
Me.cboDokTyp.Location = New System.Drawing.Point(160, 3)
Me.cboDokTyp.Name = "cboDokTyp"
Me.cboDokTyp.Size = New System.Drawing.Size(272, 21)
Me.cboDokTyp.TabIndex = 8
'
'btnDokTypSelektion
'
Me.btnDokTypSelektion.Location = New System.Drawing.Point(432, 3)
Me.btnDokTypSelektion.Name = "btnDokTypSelektion"
Me.btnDokTypSelektion.Size = New System.Drawing.Size(20, 20)
Me.btnDokTypSelektion.TabIndex = 9
Me.btnDokTypSelektion.Text = "..."
'
'btnXLSExport
'
Me.btnXLSExport.Image = CType(resources.GetObject("btnXLSExport.Image"), System.Drawing.Bitmap)
Me.btnXLSExport.Location = New System.Drawing.Point(456, 3)
Me.btnXLSExport.Name = "btnXLSExport"
Me.btnXLSExport.Size = New System.Drawing.Size(20, 20)
Me.btnXLSExport.TabIndex = 10
'
'SaveFileDialog1
'
Me.SaveFileDialog1.FileName = "doc1"
'
'lblSelektion
'
Me.lblSelektion.Location = New System.Drawing.Point(24, 7)
Me.lblSelektion.Name = "lblSelektion"
Me.lblSelektion.Size = New System.Drawing.Size(144, 16)
Me.lblSelektion.TabIndex = 11
Me.lblSelektion.Text = "Dokumenttyp-Verwendung:"
'
'ContextMenu2
'
Me.ContextMenu2.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem4})
'
'MenuItem4
'
Me.MenuItem4.Index = 0
Me.MenuItem4.Text = "&Dokumentpaket übernehmen"
'
'frmDokumentpaketuebersicht
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(1008, 273)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnXLSExport, Me.btnDokTypSelektion, Me.cboDokTyp, Me.lblSelektion})
Me.Name = "frmDokumentpaketuebersicht"
Me.Text = "frmDokumentpaketuebersicht"
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Dim dtDokumenttyp As DataTable
Dim WithEvents mcbdoktyp As MultiComboBox
Dim m_mitarbeiternr As Integer = 0
Property Mitarbeiternr() As Integer
Get
Return m_mitarbeiternr
End Get
Set(ByVal Value As Integer)
m_mitarbeiternr = Value
End Set
End Property
Dim m_individuelles_DP As Boolean
Property individuelles_dp() As Boolean
Get
Return m_individuelles_DP
End Get
Set(ByVal Value As Boolean)
m_individuelles_DP = Value
End Set
End Property
Dim m_dokumentpaketnr As Integer
Property Dokumentpaketnr() As Integer
Get
Return m_dokumentpaketnr
End Get
Set(ByVal Value As Integer)
m_dokumentpaketnr = Value
End Set
End Property
Dim on_Load As Boolean = False
Public Sub New(ByVal mitarbeiternr As Integer)
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
Me.Mitarbeiternr = Mitarbeiternr
If Me.Mitarbeiternr <> 0 Then Me.individuelles_dp = True Else Me.individuelles_dp = False
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
Private Sub frmDokumentpaketuebersicht_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ToolBar1.Height = Me.ToolBar1.Height + 3
Me.on_Load = True
If Me.individuelles_dp = True Then
' Me.Width = Me.ParentForm.Width / 3
' Me.Height = Me.ParentForm.Height / 3
' Me.Text = "Übersicht Individuelle Dokumentpakete"
Me.Text = "Übersicht Individuelle Dokumentpakete"
Me.Width = 600
Me.Height = 450
Me.cboDokTyp.Visible = False
Me.btnDokTypSelektion.Visible = False
Me.btnXLSExport.Visible = False
Else
Me.DomainList.ContextMenu = Me.ContextMenu1
Me.Text = "Übersicht Dokumentpakete"
Me.cboDokTyp.BringToFront()
Me.btnDokTypSelektion.BringToFront()
Me.btnXLSExport.BringToFront()
Me.dtDokumenttyp = Generic_Select(1)
Me.mcbdoktyp = New MultiComboBox(Me.cboDokTyp)
Me.mcbdoktyp.Items.Clear()
Me.mcbdoktyp.CheckNullValue = False
Me.mcbdoktyp.DisplayColumnName = "Bezeichnung"
Me.mcbdoktyp.ValueColumnName = "dokumenttypnr"
Me.mcbdoktyp.Fill_Data(dtDokumenttyp, True, "-- Keine Dokumenttyp-Verwendung --")
Me.mcbdoktyp.Visible = True
Me.lblSelektion.BringToFront()
Me.mcbdoktyp.BringToFront()
Dim ttip As New ToolTip()
ttip.SetToolTip(Me.mcbdoktyp, MyTxt.gettext(22106))
ttip.SetToolTip(Me.btnDokTypSelektion, MyTxt.gettext(22107))
ttip.SetToolTip(Me.btnXLSExport, MyTxt.gettext(22108))
End If
Load_data()
Me.DomainList.AllowAddNew = False
Me.on_Load = False
If Me.individuelles_dp = True Then Me.DomainList.ContextMenu = Me.ContextMenu2 Else Me.DomainList.ContextMenu = Me.ContextMenu1
End Sub
Private Sub Load_data()
Dim xd As DataTable
'Me.DomainList.BeginInit()
Me.DataSet1.Tables.Clear()
Me.DomainList.DataSource = Nothing
Me.DomainList.DataMember = Nothing
Me.TableName = "dokumentpaket"
Dim dbconn As New EDOKA.DB_Connection()
Me.SqlConnection1.ConnectionString = Globals.sConnectionString
Me.SqlConnection1.Open()
' Nur für den aktuell gewählten Mandanten die Daten auslesen
Me.SqlDataAdapter1.SelectCommand.Parameters.Clear()
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@mandantnr", Globals.MandantNr)
If Me.Mitarbeiternr > 0 Then
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@mitarbeiternr", Mitarbeiternr)
Else
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@mitarbeiternr", 0)
Me.SqlDataAdapter1.SelectCommand.Parameters.AddWithValue("@filter", Me.mcbdoktyp.SelectedValue)
End If
Me.SqlDataAdapter1.Fill(Me.DataSet1)
Me.DomainList.DataSource = Me.DataSet1.Tables(0)
Me.DomainList.DataMember = Me.DataSet1.Tables(0).TableName
SpaltenTitel_Aktualisieren(Me.DataSet1)
Me.ToolBtnSave.Visible = False
Me.DomainList.ContextMenu = Me.ContextMenu1
Me.SqlConnection1.Close()
If Me.DomainList.Splits(0).Rows.Count < 1 Then Me.btnXLSExport.Enabled = False Else Me.btnXLSExport.Enabled = True
End Sub
Private Function Generic_Select(ByVal typ As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Select Case typ
Case 1
scmCmdToExecute.CommandText = "edex_sp_get_dokumenttypdaten"
Case 2
Case Else
End Select
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Select Case typ
Case 1
Case Else
End Select
scmCmdToExecute.Connection = conn.scoDBConnection
Try
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("Dokumentpaket::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'close button
Me.Close()
End Select
End Sub
Private Sub ContextMenu1_Popup(ByVal sender As Object, ByVal e As System.EventArgs) Handles ContextMenu1.Popup
Try
If Not DivFnkt.Check_Sysadmin_Stellvertreter(Me.DomainList.Columns(10).Value) Then
Me.ctmnuEdit.Enabled = False
Me.ctmnuNew.Enabled = True
Else
Me.ctmnuEdit.Enabled = True
Me.ctmnuNew.Enabled = True
End If
Catch
If Me.DomainList.Splits(0).Rows.Count < 2 Then
Me.ctmnuEdit.Enabled = False
Me.ctmnuNew.Enabled = True
End If
End Try
End Sub
Private Sub ctmnuNew_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ctmnuNew.Click
Try
Dim f As New frmDokumentpaketdefinition(True, 0, Me.individuelles_dp)
f.ShowDialog()
Me.DomainList.BeginInit()
Load_data()
Me.DomainList.EndInit()
Catch
End Try
End Sub
Private Sub ctmnuEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ctmnuEdit.Click
Try
Dim book
If Globals.MitarbeiterNr <> Me.DomainList.Columns(10).Value Then
If Not DivFnkt.Check_Sysadmin_Stellvertreter(Me.DomainList.Columns(10).Value) Then
Dim f As New frmDokumentpaketdefinition(False, Me.DomainList.Columns("dokumentpaketnr").Value, False, Me.individuelles_dp)
book = Me.DomainList.Bookmark
f.Anzeige = True
f.ShowDialog()
Load_data()
Me.DomainList.Bookmark = book
f.Dispose()
Else
Dim f As New frmDokumentpaketdefinition(False, Me.DomainList.Columns("dokumentpaketnr").Value, Me.individuelles_dp)
book = Me.DomainList.Bookmark
f.ShowDialog()
Load_data()
Me.DomainList.Bookmark = book
f.Dispose()
End If
Else
Dim f As New frmDokumentpaketdefinition(False, Me.DomainList.Columns("dokumentpaketnr").Value, Me.individuelles_dp)
book = Me.DomainList.Bookmark
f.ShowDialog()
Load_data()
Me.DomainList.Bookmark = book
f.Dispose()
End If
Catch
End Try
End Sub
Private Sub Domainlist_dblclick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DomainList.DoubleClick, MenuItem4.Click
If ToSelect Or Me.individuelles_dp = True Then
Me.TransferKey = Me.DomainList.Columns(0).Value
Me.Close()
Exit Sub
End If
ctmnuEdit_Click(sender, e)
End Sub
Private Sub cdmnuShow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cdmnuShow.Click
Try
Dim f As New frmDokumentpaketdefinition(False, Me.DomainList.Columns("dokumentpaketnr").Value, False, Me.individuelles_dp)
f.Anzeige = True
f.ShowDialog()
f.Dispose()
Catch
End Try
End Sub
Private Sub Domainlist_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles DomainList.MouseDown
Me.DomainList.Bookmark = Me.DomainList.RowContaining(e.Y)
End Sub
Private Sub btnDokTypSelektion_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDokTypSelektion.Click
Dim F As New frmDataselect()
Dim i1 As Integer
F.Left = Me.MousePosition.X
F.Top = Me.MousePosition.Y
F.C1TrueDBGrid1.DataSource = Me.dtDokumenttyp
F.C1TrueDBGrid1.DataMember = Me.dtDokumenttyp.TableName
F.C1TrueDBGrid1.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
F.ShowDialog()
If F.DialogResult = DialogResult.OK Then
Dim colRows As C1.Win.C1TrueDBGrid.SelectedRowCollection
colRows = F.C1TrueDBGrid1.SelectedRows
If colRows.Count - 1 = 0 Then
Dim i As Integer = F.C1TrueDBGrid1.Columns(0).Value
Me.mcbdoktyp.SelectedValue = i
Me.Load_data()
Else
For i1 = 0 To colRows.Count - 1
Dim i As Integer
i = F.C1TrueDBGrid1.Columns(0).CellValue(colRows(i1))
Me.mcbdoktyp.SelectedValue = i
Me.Load_data()
Next
End If
End If
If F.DialogResult = DialogResult.Yes Then
Dim i As Integer = F.C1TrueDBGrid1.Columns(0).Value
Me.mcbdoktyp.SelectedValue = i
Me.Load_data()
End If
F.Dispose()
End Sub
Private Sub cboDokTyp_leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mcbdoktyp.Leave
If Me.on_Load = True Then Exit Sub
Try
Me.Load_data()
Catch
End Try
End Sub
Private Sub btnXLSExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnXLSExport.Click
If Me.DomainList.Splits(0).Rows.Count > 0 Then
Me.SaveFileDialog1.CheckFileExists = False
Me.SaveFileDialog1.CheckPathExists = True
Me.SaveFileDialog1.DefaultExt = "csv"
Me.SaveFileDialog1.Filter = "CSV-Dateien (*.csv)|*.csv|Alle Dateien (*.*)|*.*"
Me.SaveFileDialog1.RestoreDirectory = True
Me.SaveFileDialog1.ShowHelp = True
Me.SaveFileDialog1.Title = "Liste als CSV-Datei speichern"
Me.SaveFileDialog1.ValidateNames = True
Me.SaveFileDialog1.AddExtension = True
Me.SaveFileDialog1.DefaultExt.Insert(0, "*.csv")
Me.SaveFileDialog1.AddExtension = True
Me.SaveFileDialog1.ShowDialog()
If Me.SaveFileDialog1.FileName <> "" Then
Me.DomainList.ExportToDelimitedFile(Me.SaveFileDialog1.FileName, C1.Win.C1TrueDBGrid.RowSelectorEnum.AllRows, ";")
End If
End If
End Sub
Private Sub MenuItem4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem4.Click
Me.TransferKey = Me.DomainList.Columns(0).Value
Me.Close()
Exit Sub
End Sub
Private Sub mcbdoktyp_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles mcbdoktyp.SelectedIndexChanged
cboDokTyp_leave(sender, e)
End Sub
End Class

View File

@@ -0,0 +1,222 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AADKCgAAAk1TRnQBSQFMAgEBBAEAAQkBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8A/wD/
AP8A/wBPAAEDAf8JAAGmAd0EBwHdAQcIAAFlAeYEBwLmGwAB7AEDAewB/wkAAaYG3QEHCAABZQfmGQAB
AwHsAQMB7AEDAf8JAAGmAd0EBwHdAQcBAAGUAQcFAAFlAeYEBwLmAQAC+QwAAfkIAAEDAewBAwHsAQMB
7AH/AQAB7AcAAaYG3QEHAQABlAEHBQABZQfmAQAC+QwAAQcB+QcAAewBAwHsAQMB7AEDAf8BAAHsBwAB
pgHdAQcB3QIHAd0BBwEAAZQBBwUAAWUB5gEHAeYCBwLmAQAC+QwAAewBBwH5BgABAwHsAQMCAAHsAf8B
AAHsBwABpgbdAQcBAAGUAQcBAAGeAQcCAAFlB+YBAAL5AQAC+goAAewBBwH5BQAB7AEDAewCBwEDAf8B
AAHsAQABBgUAAaYB3QMHAd0BpgIAAZQBBwEAAZ4BBwIAAWUB5gMHAeYBZQIAAvkBAAL6DAABBwH5BAAB
AwHsAQMB7AEDAewB/wIAAQYF/gEAAaYF3QGmAd0BAAGUAQcBAAGeAQcCAAFlBeYBZQHmAQAC+QEAAvoI
AAHsAQcF+QMAAewBAwHsAQMB7AEDAf8BAAFtBv4BAAemAYUClAEHAQABngEHAgAIZQP5AQAC+gkAAewB
BwH5BgABAwHsAQMB7AEDAewB/wEAAewBbQH+BG0EAAEjAZQDBwGUASMCAAGeAQcFAAEjAfkDBwH5ASMC
AAL6CgAB7AEHAfkFAAHsAQMB7AEDAewBAwH/AQAB7AEAAm0HAAEjBZQBIwGUAQABngEHBQABIwX5ASMB
+QEAAvoKAAHsAQcC+QQAAQMB7AEDAewBBwH/AewBAAHsAgABbQcACCMCngEHBQAIIwP6CwAB7AEHAvkD
AAHsAQMBBwH/AewBAAPsDQABAgGeAwcBngECCQABJwH6AwcB+gEnDQAB7AEHAvkCAAEHAf8B7AEABewN
AAECBZ4BAgGeCAABJwX6AScB+igACAIIAAgnEQABQgFNAT4HAAE+AwABKAMAAUADAAEwAwABAQEAAQEF
AAGAAQEWAAP//wACAAH8AX8BgAE/AYABPwL/AfABfwGAAT8BgAE/Av8BwAF/AYABBwGAAQcBgwE/AQAB
HwGAAQcBgAEHAf8BHwEAAR8BgAEHAYABBwGHAQ8BAAEXAYABAAGAAQAB/wEHAQABBwGAAQABgAEAAoMC
AAGAAQABgAEAAf4BAQIAAYABAAGAAQABhgMAAYABAAGAAQAB/wEHAgAB8AEAAfABAAKDAQABBwHwAQAB
8AEAAf8BgQEAARcB8AEAAfABAAGDAcABAAEfAf4BAAH+AQAB/wHgAQABHwH+AQAB/gEAAv8BAAEfAf4B
AQH+AQEC/xYACw==
</value>
</data>
<data name="DokList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>123, 17</value>
</data>
<data name="ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuOpen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuDelete.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmOffeneDPInstanzen</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD9AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8AAAD/AAAAsABIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/1lZAJ0AAAD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAAP8AAAB3AABI/0gAJf8lAAD/
AAAA3AAAAKoAAACWAAAAZAAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAWToAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AKv1+gAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB1dXUAYWFhAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAACKggcHBweCggAAAAAAAAAAioKCgoKCgoIAAAAAAAAAAIqCBwcH
B4KCACIiAAAAAACKgoKCgoKCggAiIgAAAAAAioIHggcHgoIAIiIAAAAAAIqCgoKCgoKCACIiAL6+AACK
ggcHB4KKAAAiIgC+vgAAioKCgoKCioIAIiIAvr4AAIqKioqKioqKIiIiAL6+AAAAAAAqIgcHByIqAAC+
vgAAAAAAKiIiIiIiKiIAvr4AAAAAACoqKioqKioqvr6+AAAAAAAAAADGvgcHB77GAAAAAAAAAAAAxr6+
vr6+xr4AAAAAAAAAAMbGxsbGxsbGAIA///+AP///gAf//4AH//+AB///gAD//4AA//+AAP//gAD//4AA
///wAP//8AD///AA///+AP///gD///4B//8=
</value>
</data>
</root>

View File

@@ -0,0 +1,294 @@
Imports System.Data
Imports System.Data.SqlTypes
Imports System.Data.SqlClient
Public Class frmOffeneDPInstanzen
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
Friend WithEvents DokList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents ToolBarButton2 As System.Windows.Forms.ToolBarButton
Friend WithEvents mnuOpen As System.Windows.Forms.MenuItem
Friend WithEvents MnuDelete As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmOffeneDPInstanzen))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
Me.ToolBarButton2 = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.DokList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.mnuOpen = New System.Windows.Forms.MenuItem()
Me.MnuDelete = New System.Windows.Forms.MenuItem()
CType(Me.DokList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1, Me.ToolBarButton2})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(608, 25)
Me.ToolBar1.TabIndex = 0
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 0
'
'ToolBarButton2
'
Me.ToolBarButton2.ImageIndex = 3
'
'ImageList1
'
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'DokList
'
Me.DokList.AllowFilter = True
Me.DokList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.DokList.AllowSort = True
Me.DokList.AllowUpdateOnBlur = False
Me.DokList.AlternatingRows = True
Me.DokList.CaptionHeight = 17
Me.DokList.CollapseColor = System.Drawing.Color.Black
Me.DokList.ContextMenu = Me.ContextMenu1
Me.DokList.Cursor = System.Windows.Forms.Cursors.Default
Me.DokList.DataChanged = False
Me.DokList.DeadAreaBackColor = System.Drawing.Color.Empty
Me.DokList.Dock = System.Windows.Forms.DockStyle.Fill
Me.DokList.ExpandColor = System.Drawing.Color.Black
Me.DokList.FetchRowStyles = True
Me.DokList.FilterBar = True
Me.DokList.GroupByCaption = "Drag a column header here to group by that column"
Me.DokList.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.DokList.Location = New System.Drawing.Point(0, 25)
Me.DokList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.DokList.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.DokList.Name = "DokList"
Me.DokList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.DokList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.DokList.PreviewInfo.ZoomFactor = 75
Me.DokList.PrintInfo.ShowOptionsDialog = False
Me.DokList.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.DokList.RowDivider = GridLines1
Me.DokList.RowHeight = 15
Me.DokList.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.DokList.ScrollTips = True
Me.DokList.Size = New System.Drawing.Size(608, 276)
Me.DokList.TabIndex = 26
Me.DokList.Text = "C1TrueDBGrid1"
Me.DokList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 604," & _
" 272</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 604, " & _
"272</ClientArea></Blob>"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuOpen, Me.MnuDelete})
'
'mnuOpen
'
Me.mnuOpen.Index = 0
Me.mnuOpen.Text = "&Dokumentpaket öffnen"
'
'MnuDelete
'
Me.MnuDelete.Index = 1
Me.MnuDelete.Text = "&Dokumentpaket löschen"
'
'frmOffeneDPInstanzen
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(608, 301)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.DokList, Me.ToolBar1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmOffeneDPInstanzen"
Me.Text = "Pendente Dokumentpakete"
CType(Me.DokList, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Public dpdaten As DataTable
#End Region
#Region "Init_Load"
Private Sub frmOffeneDPInstanzen_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Load_Data()
End Sub
#End Region
#Region "Formhandling"
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 ' Close
Me.Close()
Case 1
Load_Data()
End Select
End Sub
Private Sub DokList_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles DokList.MouseDown
Me.DokList.Bookmark = Me.DokList.RowContaining(e.Y)
End Sub
Private Sub DokList_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles DokList.DoubleClick
Dim f As New frmDokumentpaket(Me.DokList.Columns(0).Value)
f.MdiParent = Me.MdiParent
f.Show()
End Sub
Private Sub mnuOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuOpen.Click
Me.DokList_DoubleClick(sender, e)
End Sub
Private Sub MnuDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MnuDelete.Click
Generic_Select(2)
Load_Data()
End Sub
#End Region
#Region "Daten"
Public Sub Load_Data()
Me.DokList.DataSource = Nothing
Me.DokList.DataMember = Nothing
dpdaten = Generic_Select(1)
Me.DokList.DataSource = dpdaten
Me.DokList.DataMember = dpdaten.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.DokList, dpdaten, "DPInstanz")
Dim bmp1 As New Bitmap(Me.ImageList1.Images(1))
Dim bmp2 As New Bitmap(Me.ImageList1.Images(2))
Dim v1 As New C1.Win.C1TrueDBGrid.ValueItem()
Dim v2 As New C1.Win.C1TrueDBGrid.ValueItem()
v1.DisplayValue = bmp1
v1.Value = 0
v2.DisplayValue = bmp2
v2.Value = 1
Me.DokList.Columns(1).ValueItems.Values.Add(v1)
Me.DokList.Columns(1).ValueItems.Values.Add(v2)
Me.DokList.Columns(1).ValueItems.Translate = True
End Sub
Public Function Generic_Select(ByVal typ As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Select Case typ
Case 1, 2
scmCmdToExecute.CommandText = "edex_sp_dpinstanz"
Case Else
End Select
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
Select Case typ
Case 1
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@dpinstanznr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@fnkt", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 1))
Case 2
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@dpinstanznr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DokList.Columns(0).Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@fnkt", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 2))
End Select
scmCmdToExecute.Connection = conn.scoDBConnection
Try
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("Dokumentpaket::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
#End Region
End Class

Binary file not shown.

View File

@@ -0,0 +1,108 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Bar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="info.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>ucProgress</value>
</data>
</root>

View File

@@ -0,0 +1,82 @@
Public Class ucProgress
Inherits System.Windows.Forms.UserControl
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
'UserControl überschreibt den Löschvorgang zum Bereinigen der Komponentenliste.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Bar1 As UtilityLibrary.WinControls.ProgressBarEx
Friend WithEvents info As System.Windows.Forms.Label
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Bar1 = New UtilityLibrary.WinControls.ProgressBarEx()
Me.info = New System.Windows.Forms.Label()
Me.SuspendLayout()
'
'Bar1
'
Me.Bar1.BackgroundBitmap = Nothing
Me.Bar1.BackgroundColor = System.Drawing.Color.FromArgb(CType(220, Byte), CType(217, Byte), CType(211, Byte))
Me.Bar1.Border3D = System.Windows.Forms.Border3DStyle.Flat
Me.Bar1.BorderColor = System.Drawing.SystemColors.Highlight
Me.Bar1.EnableBorder3D = True
Me.Bar1.ForegroundBitmap = Nothing
Me.Bar1.ForegroundColor = System.Drawing.Color.Blue
Me.Bar1.GradientEndColor = System.Drawing.Color.Navy
Me.Bar1.GradientMiddleColor = System.Drawing.Color.Blue
Me.Bar1.GradientStartColor = System.Drawing.Color.FromArgb(CType(128, Byte), CType(128, Byte), CType(255, Byte))
Me.Bar1.Maximum = 100
Me.Bar1.Minimum = 0
Me.Bar1.Name = "Bar1"
Me.Bar1.ProgressTextColor = System.Drawing.Color.Empty
Me.Bar1.ProgressTextHiglightColor = System.Drawing.Color.Empty
Me.Bar1.ShowProgressText = True
Me.Bar1.Size = New System.Drawing.Size(224, 24)
Me.Bar1.Smooth = True
Me.Bar1.Step = 10
Me.Bar1.TabIndex = 3
Me.Bar1.Text = "ProgressBarEx1"
Me.Bar1.Value = 0
'
'info
'
Me.info.Location = New System.Drawing.Point(228, 5)
Me.info.Name = "info"
Me.info.Size = New System.Drawing.Size(284, 23)
Me.info.TabIndex = 4
'
'ucProgress
'
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.info, Me.Bar1})
Me.Name = "ucProgress"
Me.Size = New System.Drawing.Size(520, 24)
Me.ResumeLayout(False)
End Sub
#End Region
End Class

View File

@@ -0,0 +1,174 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="grpStandard.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="standardlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ContextMenu2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>140, 17</value>
</data>
<data name="ContextMenu2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuinsertStdTM.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnustandardpositionieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnudelplatzhalter.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GrpIDV.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="idvwerteList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images1" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ContextMenu3.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>263, 17</value>
</data>
<data name="ContextMenu3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuinsertidvtm.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="grpUsed.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="usedlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images2" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="$this.Name">
<value>ucedit</value>
</data>
</root>

View File

@@ -0,0 +1,503 @@
Public Class ucedit
Inherits System.Windows.Forms.UserControl
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
'UserControl überschreibt den Löschvorgang zum Bereinigen der Komponentenliste.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents grpStandard As System.Windows.Forms.GroupBox
Friend WithEvents standardlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents GrpIDV As System.Windows.Forms.GroupBox
Friend WithEvents idvwerteList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents mnustandardpositionieren As System.Windows.Forms.MenuItem
Friend WithEvents grpUsed As System.Windows.Forms.GroupBox
Friend WithEvents usedlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents ContextMenu2 As System.Windows.Forms.ContextMenu
Friend WithEvents mnuinsertStdTM As System.Windows.Forms.MenuItem
Friend WithEvents ContextMenu3 As System.Windows.Forms.ContextMenu
Friend WithEvents mnuinsertidvtm As System.Windows.Forms.MenuItem
Friend WithEvents mnudelplatzhalter As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(ucedit))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Dim GridLines2 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Dim GridLines3 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Me.grpStandard = New System.Windows.Forms.GroupBox()
Me.standardlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu2 = New System.Windows.Forms.ContextMenu()
Me.mnuinsertStdTM = New System.Windows.Forms.MenuItem()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.mnustandardpositionieren = New System.Windows.Forms.MenuItem()
Me.mnudelplatzhalter = New System.Windows.Forms.MenuItem()
Me.GrpIDV = New System.Windows.Forms.GroupBox()
Me.idvwerteList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu3 = New System.Windows.Forms.ContextMenu()
Me.mnuinsertidvtm = New System.Windows.Forms.MenuItem()
Me.grpUsed = New System.Windows.Forms.GroupBox()
Me.usedlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.grpStandard.SuspendLayout()
CType(Me.standardlist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GrpIDV.SuspendLayout()
CType(Me.idvwerteList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.grpUsed.SuspendLayout()
CType(Me.usedlist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'grpStandard
'
Me.grpStandard.Controls.AddRange(New System.Windows.Forms.Control() {Me.standardlist})
Me.grpStandard.Location = New System.Drawing.Point(8, 8)
Me.grpStandard.Name = "grpStandard"
Me.grpStandard.Size = New System.Drawing.Size(336, 152)
Me.grpStandard.TabIndex = 0
Me.grpStandard.TabStop = False
Me.grpStandard.Text = "Verfügbare Standard-Werte"
'
'standardlist
'
Me.standardlist.AllowDelete = True
Me.standardlist.AllowFilter = True
Me.standardlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.standardlist.AllowSort = True
Me.standardlist.AlternatingRows = True
Me.standardlist.CaptionHeight = 17
Me.standardlist.CollapseColor = System.Drawing.Color.Black
Me.standardlist.ContextMenu = Me.ContextMenu2
Me.standardlist.Cursor = System.Windows.Forms.Cursors.Default
Me.standardlist.DataChanged = False
Me.standardlist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.standardlist.ExpandColor = System.Drawing.Color.Black
Me.standardlist.FetchRowStyles = True
Me.standardlist.FilterBar = True
Me.standardlist.GroupByCaption = "Drag a column header here to group by that column"
Me.standardlist.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.standardlist.Location = New System.Drawing.Point(3, 16)
Me.standardlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.standardlist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.standardlist.Name = "standardlist"
Me.standardlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.standardlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.standardlist.PreviewInfo.ZoomFactor = 75
Me.standardlist.PrintInfo.ShowOptionsDialog = False
Me.standardlist.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.standardlist.RowDivider = GridLines1
Me.standardlist.RowHeight = 15
Me.standardlist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.standardlist.ScrollTips = True
Me.standardlist.Size = New System.Drawing.Size(325, 128)
Me.standardlist.TabIndex = 28
Me.standardlist.Text = "C1TrueDBGrid1"
Me.standardlist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 321," & _
" 124</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 321, " & _
"124</ClientArea></Blob>"
'
'ContextMenu2
'
Me.ContextMenu2.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuinsertStdTM})
'
'mnuinsertStdTM
'
Me.mnuinsertStdTM.Index = 0
Me.mnuinsertStdTM.Text = "&Platzhalter im Dokument einfügen"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnustandardpositionieren, Me.mnudelplatzhalter})
'
'mnustandardpositionieren
'
Me.mnustandardpositionieren.Index = 0
Me.mnustandardpositionieren.Text = "Cursor &im Dokument positionieren"
'
'mnudelplatzhalter
'
Me.mnudelplatzhalter.Index = 1
Me.mnudelplatzhalter.Text = "&Platzhalter löschen"
'
'GrpIDV
'
Me.GrpIDV.Controls.AddRange(New System.Windows.Forms.Control() {Me.idvwerteList})
Me.GrpIDV.Location = New System.Drawing.Point(8, 160)
Me.GrpIDV.Name = "GrpIDV"
Me.GrpIDV.Size = New System.Drawing.Size(336, 104)
Me.GrpIDV.TabIndex = 1
Me.GrpIDV.TabStop = False
Me.GrpIDV.Text = "Verfügbare dokumentspezifische Werte"
'
'idvwerteList
'
Me.idvwerteList.AllowDelete = True
Me.idvwerteList.AllowFilter = True
Me.idvwerteList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.idvwerteList.AllowSort = True
Me.idvwerteList.AlternatingRows = True
Me.idvwerteList.CaptionHeight = 17
Me.idvwerteList.CollapseColor = System.Drawing.Color.Black
Me.idvwerteList.ContextMenu = Me.ContextMenu3
Me.idvwerteList.Cursor = System.Windows.Forms.Cursors.Default
Me.idvwerteList.DataChanged = False
Me.idvwerteList.DeadAreaBackColor = System.Drawing.Color.Empty
Me.idvwerteList.ExpandColor = System.Drawing.Color.Black
Me.idvwerteList.FetchRowStyles = True
Me.idvwerteList.FilterBar = True
Me.idvwerteList.GroupByCaption = "Drag a column header here to group by that column"
Me.idvwerteList.Images.Add(CType(resources.GetObject("resource.Images1"), System.Drawing.Bitmap))
Me.idvwerteList.Location = New System.Drawing.Point(3, 16)
Me.idvwerteList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.idvwerteList.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.idvwerteList.Name = "idvwerteList"
Me.idvwerteList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.idvwerteList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.idvwerteList.PreviewInfo.ZoomFactor = 75
Me.idvwerteList.PrintInfo.ShowOptionsDialog = False
Me.idvwerteList.RecordSelectorWidth = 16
GridLines2.Color = System.Drawing.Color.DarkGray
GridLines2.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.idvwerteList.RowDivider = GridLines2
Me.idvwerteList.RowHeight = 15
Me.idvwerteList.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.idvwerteList.ScrollTips = True
Me.idvwerteList.Size = New System.Drawing.Size(325, 80)
Me.idvwerteList.TabIndex = 28
Me.idvwerteList.Text = "C1TrueDBGrid1"
Me.idvwerteList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert" & _
":Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}Footer{}Caption{AlignHorz:Center;}Editor{}Normal{B" & _
"ackColor:Control;}Style27{}Style26{}HighlightRow{ForeColor:HighlightText;BackCol" & _
"or:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}RecordSelector{AlignImage:" & _
"Center;}Style9{}Style8{}Style3{}Style2{}Group{AlignVert:Center;Border:None,,0, 0" & _
", 0, 0;BackColor:ControlDark;}Style10{AlignHorz:Near;}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 321," & _
" 76</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""Sty" & _
"le10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRow" & _
""" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle p" & _
"arent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><HeadingS" & _
"tyle parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me=" & _
"""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""O" & _
"ddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" /" & _
"><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Style" & _
"1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=""" & _
"Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foot" & _
"er"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inactiv" & _
"e"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" /" & _
"><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow"" " & _
"/><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelecto" & _
"r"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group"" " & _
"/></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Modi" & _
"fied</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 321, 7" & _
"6</ClientArea></Blob>"
'
'ContextMenu3
'
Me.ContextMenu3.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuinsertidvtm})
'
'mnuinsertidvtm
'
Me.mnuinsertidvtm.Index = 0
Me.mnuinsertidvtm.Text = "&Platzhalter im Dokument einfügen"
'
'grpUsed
'
Me.grpUsed.Controls.AddRange(New System.Windows.Forms.Control() {Me.usedlist})
Me.grpUsed.Location = New System.Drawing.Point(8, 272)
Me.grpUsed.Name = "grpUsed"
Me.grpUsed.Size = New System.Drawing.Size(336, 152)
Me.grpUsed.TabIndex = 2
Me.grpUsed.TabStop = False
Me.grpUsed.Text = "Verwendete Werte"
'
'usedlist
'
Me.usedlist.AllowDelete = True
Me.usedlist.AllowFilter = True
Me.usedlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.usedlist.AllowSort = True
Me.usedlist.AlternatingRows = True
Me.usedlist.CaptionHeight = 17
Me.usedlist.CollapseColor = System.Drawing.Color.Black
Me.usedlist.ContextMenu = Me.ContextMenu1
Me.usedlist.Cursor = System.Windows.Forms.Cursors.Default
Me.usedlist.DataChanged = False
Me.usedlist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.usedlist.ExpandColor = System.Drawing.Color.Black
Me.usedlist.FetchRowStyles = True
Me.usedlist.FilterBar = True
Me.usedlist.GroupByCaption = "Drag a column header here to group by that column"
Me.usedlist.Images.Add(CType(resources.GetObject("resource.Images2"), System.Drawing.Bitmap))
Me.usedlist.Location = New System.Drawing.Point(3, 16)
Me.usedlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.usedlist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.usedlist.Name = "usedlist"
Me.usedlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.usedlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.usedlist.PreviewInfo.ZoomFactor = 75
Me.usedlist.PrintInfo.ShowOptionsDialog = False
Me.usedlist.RecordSelectorWidth = 16
GridLines3.Color = System.Drawing.Color.DarkGray
GridLines3.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.usedlist.RowDivider = GridLines3
Me.usedlist.RowHeight = 15
Me.usedlist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.usedlist.ScrollTips = True
Me.usedlist.Size = New System.Drawing.Size(325, 128)
Me.usedlist.TabIndex = 28
Me.usedlist.Text = "C1TrueDBGrid1"
Me.usedlist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 321," & _
" 124</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 321, " & _
"124</ClientArea></Blob>"
'
'ucedit
'
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.grpUsed, Me.GrpIDV, Me.grpStandard})
Me.Name = "ucedit"
Me.Size = New System.Drawing.Size(352, 432)
Me.grpStandard.ResumeLayout(False)
CType(Me.standardlist, System.ComponentModel.ISupportInitialize).EndInit()
Me.GrpIDV.ResumeLayout(False)
CType(Me.idvwerteList, System.ComponentModel.ISupportInitialize).EndInit()
Me.grpUsed.ResumeLayout(False)
CType(Me.usedlist, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim StdFelder As New DataTable()
Dim IDVFelder As New DataTable()
Dim USEDFelder As New DataTable()
Public Event OnGetStandardvorlagenfelder(ByRef list As DataTable)
Public Event OnGetIDVFelder(ByRef list As DataTable)
Public Event OnGetUsedFelder(ByRef list As DataTable)
Public Event OnInsert_TM(ByVal TMName As String, ByVal isfield As Boolean)
Public Event OnGoto_TM(ByVal TMName As String, ByVal isfield As Boolean)
Public Event OnDelete_TM(ByVal TMName As String, ByVal isfield As Boolean)
#End Region
Private Sub mnustandardpositionieren_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnustandardpositionieren.Click
If Me.usedlist.Columns("Feldname").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("feldname").Text, True)
Exit Sub
End If
If Me.usedlist.Columns("beginntextmarke").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("beginntextmarke").Text, False)
Exit Sub
End If
If Me.usedlist.Columns("endetextmarke").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("endetextmarke").Text, False)
End If
End Sub
Private Sub ucedit_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
RaiseEvent OnGetStandardvorlagenfelder(Me.StdFelder)
Me.standardlist.DataSource = StdFelder
Me.standardlist.DataMember = StdFelder.TableName
Dim i As Integer
DivFnkt.SpaltenTitel_Aktualisieren(Me.standardlist, StdFelder, "edex_sb_vorlagenfelder")
'With Me.standardlist
' For i = 0 To .Splits(0).DisplayColumns.Count - 1
' .Splits(0).DisplayColumns(i).Visible = False
' Next
' .Splits(0).DisplayColumns(0).Visible = True
' .Splits(0).DisplayColumns(0).Width = Me.standardlist.Width * 0.1
' .Splits(0).DisplayColumns(1).Visible = True
' .Splits(0).DisplayColumns(1).Width = Me.standardlist.Width * 0.8
'End With
RaiseEvent OnGetUsedFelder(Me.USEDFelder)
Me.usedlist.DataSource = Me.USEDFelder
Me.usedlist.DataMember = Me.USEDFelder.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.usedlist, Me.USEDFelder, "edex_sb_vorlagenfelder")
'With Me.usedlist
' For i = 0 To .Splits(0).DisplayColumns.Count - 1
' .Splits(0).DisplayColumns(i).Visible = False
' Next
' .Splits(0).DisplayColumns(0).Visible = True
' .Splits(0).DisplayColumns(0).Width = Me.usedlist.Width * 0.1
' .Splits(0).DisplayColumns(1).Visible = True
' .Splits(0).DisplayColumns(1).Width = Me.usedlist.Width * 0.8
'End With
RaiseEvent OnGetIDVFelder(Me.IDVFelder)
Me.idvwerteList.DataSource = Me.IDVFelder
Me.idvwerteList.DataMember = Me.IDVFelder.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.idvwerteList, Me.IDVFelder, "edex_sb_verk")
'With Me.idvwerteList
' For i = 0 To .Splits(0).DisplayColumns.Count - 1
' .Splits(0).DisplayColumns(i).Visible = False
' Next
' .Splits(0).DisplayColumns(0).Visible = True
' .Splits(0).DisplayColumns(0).Width = Me.usedlist.Width * 0.9
' .Splits(0).DisplayColumns(1).Visible = False
'End With
End Sub
Private Sub mnuinsertStdTM_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuinsertStdTM.Click
Dim i As Integer
Dim s As String
Dim sbtmindex As Integer = 0
For i = 0 To Me.USEDFelder.Rows.Count - 1
Try
If Microsoft.VisualBasic.Left(Me.USEDFelder.Rows(i).Item("beginntextmarke"), 4) = "TMSB" Then
sbtmindex = sbtmindex + 1
End If
Catch
End Try
Next
s = "TMSB_" + sbtmindex.ToString
Dim row As DataRow
row = Me.USEDFelder.NewRow
row.Item(0) = Me.standardlist.Columns(0).Text
row.Item(1) = Me.standardlist.Columns(1).Text
row.Item(2) = ""
row.Item(3) = s
row.Item(4) = ""
Me.USEDFelder.Rows.Add(row)
RaiseEvent OnInsert_TM(s, False)
End Sub
Private Sub mnuinsertidvtm_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuinsertidvtm.Click
Dim i As Integer
Dim s As String
Dim sbtmindex As Integer = 0
For i = 0 To Me.USEDFelder.Rows.Count - 1
Try
If Microsoft.VisualBasic.Left(Me.USEDFelder.Rows(i).Item("beginntextmarke"), 5) = "TMISB" Then
sbtmindex = sbtmindex + 1
End If
Catch
End Try
Next
s = "TMISB_09_" + Me.idvwerteList.Columns(0).Text + "_09_" + sbtmindex.ToString
Dim row As DataRow
row = Me.USEDFelder.NewRow
row.Item(0) = 0
row.Item(1) = Me.idvwerteList.Columns(0).Text
row.Item(2) = ""
row.Item(3) = s
row.Item(4) = ""
Me.USEDFelder.Rows.Add(row)
RaiseEvent OnInsert_TM(s, False)
End Sub
Private Sub mnudelplatzhalter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnudelplatzhalter.Click
If Me.usedlist.Columns("feldname").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("feldname").Text, True)
RaiseEvent OnDelete_TM(Me.usedlist.Columns("Feldname").Text, True)
Else
If Me.usedlist.Columns("Beginntextmarke").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("Beginntextmarke").Text, False)
RaiseEvent OnDelete_TM(Me.usedlist.Columns("Beginntextmarke").Text, False)
End If
If Me.usedlist.Columns("EndeTextmarke").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("Endetextmarke").Text, False)
RaiseEvent OnDelete_TM(Me.usedlist.Columns("endetextmarke").Text, False)
End If
End If
Me.usedlist.Delete()
Me.usedlist.UpdateData()
End Sub
End Class

View File

@@ -0,0 +1,174 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="grpUsed.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="usedlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuposdoc.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnulink1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GrpIDV.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="idvwerteList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images1" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ContextMenu2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>140, 17</value>
</data>
<data name="ContextMenu2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnulink2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="verklist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images2" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="ContextMenu3.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>263, 17</value>
</data>
<data name="ContextMenu3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuDelVerk.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>ucnoedit</value>
</data>
</root>

View File

@@ -0,0 +1,483 @@
Public Class ucnoedit
Inherits System.Windows.Forms.UserControl
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
'UserControl überschreibt den Löschvorgang zum Bereinigen der Komponentenliste.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents grpUsed As System.Windows.Forms.GroupBox
Friend WithEvents usedlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents GrpIDV As System.Windows.Forms.GroupBox
Friend WithEvents idvwerteList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents mnuposdoc As System.Windows.Forms.MenuItem
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents verklist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents mnulink1 As System.Windows.Forms.MenuItem
Friend WithEvents ContextMenu2 As System.Windows.Forms.ContextMenu
Friend WithEvents mnulink2 As System.Windows.Forms.MenuItem
Friend WithEvents ContextMenu3 As System.Windows.Forms.ContextMenu
Friend WithEvents mnuDelVerk As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(ucnoedit))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Dim GridLines2 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Dim GridLines3 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Me.grpUsed = New System.Windows.Forms.GroupBox()
Me.usedlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.mnuposdoc = New System.Windows.Forms.MenuItem()
Me.mnulink1 = New System.Windows.Forms.MenuItem()
Me.GrpIDV = New System.Windows.Forms.GroupBox()
Me.idvwerteList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu2 = New System.Windows.Forms.ContextMenu()
Me.mnulink2 = New System.Windows.Forms.MenuItem()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.verklist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu3 = New System.Windows.Forms.ContextMenu()
Me.mnuDelVerk = New System.Windows.Forms.MenuItem()
Me.grpUsed.SuspendLayout()
CType(Me.usedlist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GrpIDV.SuspendLayout()
CType(Me.idvwerteList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox1.SuspendLayout()
CType(Me.verklist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'grpUsed
'
Me.grpUsed.Controls.AddRange(New System.Windows.Forms.Control() {Me.usedlist})
Me.grpUsed.Location = New System.Drawing.Point(8, 8)
Me.grpUsed.Name = "grpUsed"
Me.grpUsed.Size = New System.Drawing.Size(336, 152)
Me.grpUsed.TabIndex = 3
Me.grpUsed.TabStop = False
Me.grpUsed.Text = "Platzhalter im Dokument"
'
'usedlist
'
Me.usedlist.AllowDelete = True
Me.usedlist.AllowFilter = True
Me.usedlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.usedlist.AllowSort = True
Me.usedlist.AlternatingRows = True
Me.usedlist.CaptionHeight = 17
Me.usedlist.CollapseColor = System.Drawing.Color.Black
Me.usedlist.ContextMenu = Me.ContextMenu1
Me.usedlist.Cursor = System.Windows.Forms.Cursors.Default
Me.usedlist.DataChanged = False
Me.usedlist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.usedlist.ExpandColor = System.Drawing.Color.Black
Me.usedlist.FetchRowStyles = True
Me.usedlist.FilterBar = True
Me.usedlist.GroupByCaption = "Drag a column header here to group by that column"
Me.usedlist.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.usedlist.Location = New System.Drawing.Point(3, 16)
Me.usedlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.usedlist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.usedlist.Name = "usedlist"
Me.usedlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.usedlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.usedlist.PreviewInfo.ZoomFactor = 75
Me.usedlist.PrintInfo.ShowOptionsDialog = False
Me.usedlist.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.usedlist.RowDivider = GridLines1
Me.usedlist.RowHeight = 15
Me.usedlist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.usedlist.ScrollTips = True
Me.usedlist.Size = New System.Drawing.Size(325, 128)
Me.usedlist.TabIndex = 28
Me.usedlist.Text = "C1TrueDBGrid1"
Me.usedlist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 321," & _
" 124</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 321, " & _
"124</ClientArea></Blob>"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuposdoc, Me.mnulink1})
'
'mnuposdoc
'
Me.mnuposdoc.Index = 0
Me.mnuposdoc.Text = "Cursor &im Dokument positionieren"
'
'mnulink1
'
Me.mnulink1.Index = 1
Me.mnulink1.Text = "&Platzhalter mit dok. spez. Wert verknüpfen"
'
'GrpIDV
'
Me.GrpIDV.Controls.AddRange(New System.Windows.Forms.Control() {Me.idvwerteList})
Me.GrpIDV.Location = New System.Drawing.Point(8, 168)
Me.GrpIDV.Name = "GrpIDV"
Me.GrpIDV.Size = New System.Drawing.Size(336, 104)
Me.GrpIDV.TabIndex = 4
Me.GrpIDV.TabStop = False
Me.GrpIDV.Text = "Verfügbare dokumentspezifische Werte"
'
'idvwerteList
'
Me.idvwerteList.AllowDelete = True
Me.idvwerteList.AllowFilter = True
Me.idvwerteList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.idvwerteList.AllowSort = True
Me.idvwerteList.AlternatingRows = True
Me.idvwerteList.CaptionHeight = 17
Me.idvwerteList.CollapseColor = System.Drawing.Color.Black
Me.idvwerteList.ContextMenu = Me.ContextMenu2
Me.idvwerteList.Cursor = System.Windows.Forms.Cursors.Default
Me.idvwerteList.DataChanged = False
Me.idvwerteList.DeadAreaBackColor = System.Drawing.Color.Empty
Me.idvwerteList.ExpandColor = System.Drawing.Color.Black
Me.idvwerteList.FetchRowStyles = True
Me.idvwerteList.FilterBar = True
Me.idvwerteList.GroupByCaption = "Drag a column header here to group by that column"
Me.idvwerteList.Images.Add(CType(resources.GetObject("resource.Images1"), System.Drawing.Bitmap))
Me.idvwerteList.Location = New System.Drawing.Point(3, 16)
Me.idvwerteList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.idvwerteList.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.idvwerteList.Name = "idvwerteList"
Me.idvwerteList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.idvwerteList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.idvwerteList.PreviewInfo.ZoomFactor = 75
Me.idvwerteList.PrintInfo.ShowOptionsDialog = False
Me.idvwerteList.RecordSelectorWidth = 16
GridLines2.Color = System.Drawing.Color.DarkGray
GridLines2.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.idvwerteList.RowDivider = GridLines2
Me.idvwerteList.RowHeight = 15
Me.idvwerteList.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.idvwerteList.ScrollTips = True
Me.idvwerteList.Size = New System.Drawing.Size(325, 80)
Me.idvwerteList.TabIndex = 28
Me.idvwerteList.Text = "C1TrueDBGrid1"
Me.idvwerteList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert" & _
":Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}Footer{}Caption{AlignHorz:Center;}Editor{}Normal{B" & _
"ackColor:Control;}Style27{}Style26{}HighlightRow{ForeColor:HighlightText;BackCol" & _
"or:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}RecordSelector{AlignImage:" & _
"Center;}Style9{}Style8{}Style3{}Style2{}Group{AlignVert:Center;Border:None,,0, 0" & _
", 0, 0;BackColor:ControlDark;}Style10{AlignHorz:Near;}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 321," & _
" 76</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""Sty" & _
"le10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRow" & _
""" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle p" & _
"arent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><HeadingS" & _
"tyle parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me=" & _
"""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""O" & _
"ddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" /" & _
"><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Style" & _
"1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=""" & _
"Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foot" & _
"er"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inactiv" & _
"e"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" /" & _
"><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow"" " & _
"/><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelecto" & _
"r"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group"" " & _
"/></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Modi" & _
"fied</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 321, 7" & _
"6</ClientArea></Blob>"
'
'ContextMenu2
'
Me.ContextMenu2.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnulink2})
'
'mnulink2
'
Me.mnulink2.Index = 0
Me.mnulink2.Text = "&Platzhalter mit dok. spez. Wert verknüpfen"
'
'GroupBox1
'
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.verklist})
Me.GroupBox1.Location = New System.Drawing.Point(8, 280)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(336, 144)
Me.GroupBox1.TabIndex = 5
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Zugeordnete, dokumentspezifische Werte"
'
'verklist
'
Me.verklist.AllowDelete = True
Me.verklist.AllowFilter = True
Me.verklist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.verklist.AllowSort = True
Me.verklist.AlternatingRows = True
Me.verklist.CaptionHeight = 17
Me.verklist.CollapseColor = System.Drawing.Color.Black
Me.verklist.ContextMenu = Me.ContextMenu3
Me.verklist.Cursor = System.Windows.Forms.Cursors.Default
Me.verklist.DataChanged = False
Me.verklist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.verklist.ExpandColor = System.Drawing.Color.Black
Me.verklist.FetchRowStyles = True
Me.verklist.FilterBar = True
Me.verklist.GroupByCaption = "Drag a column header here to group by that column"
Me.verklist.Images.Add(CType(resources.GetObject("resource.Images2"), System.Drawing.Bitmap))
Me.verklist.Location = New System.Drawing.Point(3, 16)
Me.verklist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.verklist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.verklist.Name = "verklist"
Me.verklist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.verklist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.verklist.PreviewInfo.ZoomFactor = 75
Me.verklist.PrintInfo.ShowOptionsDialog = False
Me.verklist.RecordSelectorWidth = 16
GridLines3.Color = System.Drawing.Color.DarkGray
GridLines3.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.verklist.RowDivider = GridLines3
Me.verklist.RowHeight = 15
Me.verklist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.verklist.ScrollTips = True
Me.verklist.Size = New System.Drawing.Size(325, 120)
Me.verklist.TabIndex = 28
Me.verklist.Text = "C1TrueDBGrid1"
Me.verklist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 321," & _
" 116</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 321, " & _
"116</ClientArea></Blob>"
'
'ContextMenu3
'
Me.ContextMenu3.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuDelVerk})
'
'mnuDelVerk
'
Me.mnuDelVerk.Index = 0
Me.mnuDelVerk.Text = "&Verknüpfung löschen"
'
'ucnoedit
'
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.GroupBox1, Me.GrpIDV, Me.grpUsed})
Me.Name = "ucnoedit"
Me.Size = New System.Drawing.Size(352, 432)
Me.grpUsed.ResumeLayout(False)
CType(Me.usedlist, System.ComponentModel.ISupportInitialize).EndInit()
Me.GrpIDV.ResumeLayout(False)
CType(Me.idvwerteList, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox1.ResumeLayout(False)
CType(Me.verklist, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim StdFelder As New DataTable()
Dim IDVFelder As New DataTable()
Dim USEDFelder As New DataTable()
Dim VerkFelder As New DataTable()
Public Event OnGetStandardvorlagenfelder(ByRef list As DataTable)
Public Event OnGetIDVFelder(ByRef list As DataTable)
Public Event OnGetUsedFelder(ByRef list As DataTable)
Public Event OnGetVerknuepfteFelder(ByRef list As DataTable)
Public Event OnInsert_TM(ByVal TMName As String, ByVal isfield As Boolean)
Public Event OnGoto_TM(ByVal TMName As String, ByVal isfield As Boolean)
Public Event OnDelete_TM(ByVal TMName As String, ByVal isfield As Boolean)
#End Region
Private Sub ucnoedit_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
RaiseEvent OnGetUsedFelder(Me.USEDFelder)
Me.usedlist.DataSource = Me.USEDFelder
Me.usedlist.DataMember = Me.USEDFelder.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.usedlist, Me.USEDFelder, "edex_sb_vorlagenfelder")
'With Me.usedlist
' For i = 0 To .Splits(0).DisplayColumns.Count - 1
' .Splits(0).DisplayColumns(i).Visible = False
' Next
' .Splits(0).DisplayColumns(0).Visible = True
' .Splits(0).DisplayColumns(0).Width = Me.usedlist.Width * 0.1
' .Splits(0).DisplayColumns(1).Visible = True
' .Splits(0).DisplayColumns(1).Width = Me.usedlist.Width * 0.8
'End With
RaiseEvent OnGetIDVFelder(Me.IDVFelder)
Me.idvwerteList.DataSource = Me.IDVFelder
Me.idvwerteList.DataMember = Me.IDVFelder.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.idvwerteList, Me.IDVFelder, "edex_sb_verk")
'With Me.idvwerteList
' For i = 0 To .Splits(0).DisplayColumns.Count - 1
' .Splits(0).DisplayColumns(i).Visible = False
' Next
' .Splits(0).DisplayColumns(0).Visible = True
' .Splits(0).DisplayColumns(0).Width = Me.usedlist.Width * 0.9
' .Splits(0).DisplayColumns(1).Visible = False
'End With
RaiseEvent OnGetVerknuepfteFelder(Me.VerkFelder)
Me.verklist.DataSource = Me.VerkFelder
Me.verklist.DataMember = Me.VerkFelder.TableName
DivFnkt.SpaltenTitel_Aktualisieren(Me.verklist, Me.VerkFelder, "edex_sb_verk")
'With Me.verklist
' For i = 0 To .Splits(0).DisplayColumns.Count - 1
' .Splits(0).DisplayColumns(i).Visible = False
' Next
' .Splits(0).DisplayColumns(0).Visible = True
' .Splits(0).DisplayColumns(0).Width = Me.usedlist.Width * 0.45
' .Splits(0).DisplayColumns(1).Visible = True
' .Splits(0).DisplayColumns(1).Width = Me.usedlist.Width * 0.45
'End With
End Sub
Private Sub mnuposdoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuposdoc.Click
If Me.usedlist.Columns("Feldname").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("feldname").Text, True)
Exit Sub
End If
If Me.usedlist.Columns("beginntextmarke").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("beginntextmarke").Text, False)
Exit Sub
End If
If Me.usedlist.Columns("endetextmarke").Text <> "" Then
RaiseEvent OnGoto_TM(Me.usedlist.Columns("endetextmarke").Text, False)
End If
End Sub
Private Sub ContextMenu1_Popup(ByVal sender As Object, ByVal e As System.EventArgs) Handles ContextMenu1.Popup, ContextMenu2.Popup
If Me.USEDFelder.Rows.Count = 0 Then
Me.mnuposdoc.Enabled = False
Me.mnulink1.Enabled = False
Me.mnulink2.Enabled = False
Else
Me.mnuposdoc.Enabled = True
Me.mnulink1.Enabled = True
Me.mnulink2.Enabled = True
End If
If Me.IDVFelder.Rows.Count = 0 Then
Me.mnulink1.Enabled = False
Me.mnulink2.Enabled = False
Else
Me.mnulink1.Enabled = True
Me.mnulink2.Enabled = True
End If
End Sub
Private Sub mnulink1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnulink1.Click, mnulink2.Click
Dim row As DataRow
row = Me.VerkFelder.NewRow
row.Item(0) = Me.idvwerteList.Columns(0).Text
row.Item(1) = Me.usedlist.Columns(1).Text
row.Item(2) = Me.usedlist.Columns(0).Text
Me.VerkFelder.Rows.Add(row)
End Sub
Private Sub ContextMenu3_Popup(ByVal sender As Object, ByVal e As System.EventArgs) Handles ContextMenu3.Popup
If Me.VerkFelder.Rows.Count = 0 Then
Me.mnuDelVerk.Enabled = False
Else
Me.mnuDelVerk.Enabled = True
End If
End Sub
Private Sub mnuDelVerk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuDelVerk.Click
Me.verklist.Delete()
Me.verklist.UpdateData()
End Sub
End Class

Binary file not shown.

View File

@@ -0,0 +1,368 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Public Class clsEmpfaengerdata
#Region "Deklarationen"
Dim dsempfaenger As DataSet
Dim Serienbriefnr As Integer
Dim reservedwords As Collection()
#End Region
#Region "öffentliche Methoden"
Public Sub New(ByRef DsEmpfaenger As DataSet, ByVal Serienbriefnr As Integer)
Me.dsempfaenger = DsEmpfaenger
Me.Serienbriefnr = Serienbriefnr
End Sub
Public Function Get_Empfaenger()
Load_Empfaenger()
End Function
Public Function Vorlagendaten_aufbreiten() As DataTable
Return Datentabelle_Generieren()
End Function
Private Function hascoltodelete(ByRef edata As DataTable, ByVal Prefix As String) As Boolean
Dim i As Integer
Dim s As String = ""
For i = 0 To edata.Columns.Count - 1
If Left(edata.Columns(i).ColumnName, 2) = Prefix Then
s = edata.Columns(i).ColumnName
Exit For
End If
Next
If s <> "" Then
edata.Columns.Remove(s)
Return True
End If
Return False
End Function
#End Region
#Region "Datentabelle"
Private Function Datentabelle_Generieren() As DataTable
Dim dt As New DataTable()
Dim dn As DataRow
Dim i As Integer
Dim aPrimaryKey(0) As DataColumn
Dim oDatacolumn As DataColumn
Me.dsempfaenger.Tables(0).Columns.Add("IntEintragnr")
For i = 0 To Me.dsempfaenger.Tables(0).Rows.Count - 1
Me.dsempfaenger.Tables(0).Rows(i).Item("IntEintragNr") = i
Next
oDatacolumn = Me.dsempfaenger.Tables(0).Columns("IntEintragnr")
aPrimaryKey(0) = oDatacolumn
Me.dsempfaenger.Tables(0).PrimaryKey = aPrimaryKey
dt.TableName = "EDKB09_" + Me.Serienbriefnr.ToString
For i = 0 To Me.dsempfaenger.Tables(0).Columns.Count - 1
dt.Columns.Add(Me.dsempfaenger.Tables(0).Columns(i).ColumnName)
Next
Dim dv As DataRow()
Dim dr As DataRow
dv = Me.dsempfaenger.Tables(0).Select("Dokumentid='' or dokumentid<>''")
For Each dr In dv
dt.ImportRow(dr)
Next
' dt = Me.dsempfaenger.Tables(0).Copy
'Dim dc As DataColumn
'For Each dc In dt.Columns
' dc.ColumnName = dc.ColumnName.Replace(" ", "_")
' dc.ColumnName = dc.ColumnName.Replace(" ", "_")
' dc.ColumnName = dc.ColumnName.Replace("ö", "oe")
' dc.ColumnName = dc.ColumnName.Replace("Ö", "OE")
' dc.ColumnName = dc.ColumnName.Replace("ü", "ue")
' dc.ColumnName = dc.ColumnName.Replace("Ü", "UE")
' dc.ColumnName = dc.ColumnName.Replace("ä", "ae")
' dc.ColumnName = dc.ColumnName.Replace("Ä", "AE")
' dc.ColumnName = dc.ColumnName.Replace("-", "_")
' dc.ColumnName = dc.ColumnName.Replace("/", "_")
' dc.ColumnName = dc.ColumnName.Replace("\", "_")
' dc.ColumnName = dc.ColumnName.Replace(".", "_")
' dc.ColumnName = dc.ColumnName.Replace(":", "_")
' dc.ColumnName = dc.ColumnName.Replace(",", "_")
' Select Case Left(dc.ColumnName, 1)
' Case "1", "2", "3", "4", "5", "6", "7", "8", "9", "0"
' dc.ColumnName = "N" + dc.ColumnName
' End Select
' If resword(dc.ColumnName) Then
' dc.ColumnName = dc.ColumnName + "_"
' End If
'Next
Dim tmkopfzeile As Boolean = False
Me.dsempfaenger.Tables("UsedFelder").AcceptChanges()
Try
For i = 0 To Me.dsempfaenger.Tables("UsedFelder").Rows.Count - 1
If Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("Nr") = 33 Then
tmkopfzeile = True
End If
Next
Catch ex As Exception
Dim a
a = 1
End Try
If tmkopfzeile = False Then
dn = Me.dsempfaenger.Tables("UsedFelder").NewRow
dn.Item(0) = 33
dn.Item(1) = "TGEDKCompanyBBEB99"
dn.Item(2) = ""
dn.Item(3) = "TGEDKCompanyBBEB99"
dn.Item(4) = ""
Me.dsempfaenger.Tables("UsedFelder").Rows.Add(dn)
End If
Me.dsempfaenger.Tables("UsedFelder").Columns.Add("TempFeldname")
Me.dsempfaenger.Tables("UsedFelder").Columns.Add("Fnkt")
Dim s As String
For i = 0 To Me.dsempfaenger.Tables("UsedFelder").Rows.Count - 1
'If dsempfaenger.Tables("Usedfelder").Rows(i).Item(2).ToString <> "" Then
' MsgBox("Hallo")
'End If
If Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("Nr") <> 0 Then
s = "F_09_" + Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("Nr").ToString
Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("fnkt") = s
s = Insert_DT_Column(dt, s)
Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("Tempfeldname") = s
Else
s = "I_09_" + Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("Beginntextmarke")
Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("fnkt") = s
s = Insert_DT_Column(dt, s)
Me.dsempfaenger.Tables("UsedFelder").Rows(i).Item("Tempfeldname") = s
End If
Next
'Me.dsempfaenger.WriteXml("d:\test.xmls")
Create_SQL_Server_Table(dt)
Save_Data_To_Temptable(dt)
Return Fill_And_Get_Data()
End Function
'GAGA
Private Function Insert_DT_Column(ByRef dt As DataTable, ByVal colname As String) As String
Dim i As Integer = 0
Dim dc As DataColumn
For Each dc In dt.Columns
If UCase(Microsoft.VisualBasic.Left(dc.ColumnName, Len(colname))) = UCase(colname) Then
i = i + 1
End If
Next
If i > 0 Then colname = colname + "_" + i.ToString
dt.Columns.Add(colname)
Return colname
End Function
#End Region
#Region "Datenzugriffe"
Dim Dokid As Integer
Private Function Fill_And_Get_Data() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_fill_sbdata"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = Globals.conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@serienbriefnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.Serienbriefnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@ROWCOUNT", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumentid", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@bedr", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@preview", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 1))
sdaAdapter.Fill(dtToReturn)
Dokid = scmCmdToExecute.Parameters("@dokumentid").Value
For i = 0 To dtToReturn.Rows.Count - 1
dtToReturn.Rows(i).Item("Dokumentid") = Generate_Key(Dokid)
Dokid = Dokid + 1
If scmCmdToExecute.Parameters("@bedr").Value = 1 Then
dtToReturn.Rows(i).Item("dokumentidbdr") = Generate_Key(Dokid)
Dokid = Dokid + 1
End If
Next
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub Create_SQL_Server_Table(ByRef dt As DataTable)
Dim s As String
Dim s1 As String
Dim i As Integer
'dt.Columns.Add("NRPAR00")
'dt.Columns.Add("IntEintragNr")
s1 = "Drop Table DBO.EDKB09_" + Me.Serienbriefnr.ToString
's = "Create Table EDKB09_" + Me.Serienbriefnr.ToString + "( NRPAR00 int, intEintragNr int,"
s = "Create Table DBO.EDKB09_" + Me.Serienbriefnr.ToString + "( NRPAR00 varchar(11),"
For i = 1 To dt.Columns.Count - 1
s = s + dt.Columns(i).ColumnName + " varchar(255),"
Next
s = Left(s, Len(s) - 1)
s = s + ")"
Dim conn As New SqlConnection()
conn.ConnectionString = Globals.sConnectionString
conn.Open()
Dim sqlcmd0 As New SqlCommand(s1, conn)
Try
sqlcmd0.ExecuteNonQuery()
Catch
End Try
Dim sqlcmd As New SqlCommand(s, conn)
sqlcmd.ExecuteNonQuery()
conn.Close()
End Sub
Private Sub Save_Data_To_Temptable(ByRef dt As DataTable)
Dim tdt As New DataTable("EDKB09_" + Me.Serienbriefnr.ToString)
Dim tdr As DataRow
Dim i As Integer
Dim ii As Integer
tdt = dt.Copy
tdt.Columns(0).ColumnName = "NRPAR00"
Dim connection As New SqlConnection()
Dim da As New SqlDataAdapter("Select * from EDKB09_" + Me.Serienbriefnr.ToString, connection)
Dim cb As New SqlCommandBuilder(da)
connection.ConnectionString = Globals.sConnectionString
connection.Open()
da.Update(tdt)
connection.Close()
End Sub
Private Sub Load_Empfaenger()
'Dim dokumentname = Globals.Params.Pfad_Serienbrief_Daten + Me.Serienbriefnr.ToString + "_empfaenger.xml"
'Try
' Me.dsempfaenger.Tables.Clear()
' Dim Connection As New SqlConnection()
' Dim DA As New SqlDataAdapter("select * from edex_sb_empfaenger where serienbriefnr=" + Str(Me.Serienbriefnr), Connection)
' Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
' Dim ds As New DataSet()
' Try
' Connection.ConnectionString = Globals.sConnectionString
' Connection.Open()
' DA.Fill(ds, "empf")
' Dim myRow As DataRow
' If ds.Tables(0).Rows.Count = 0 Then
' MsgBox("Empfänger konnten nicht geladen werden.")
' Else
' myRow = ds.Tables(0).Rows(0)
' Dim MyData() As Byte
' MyData = myRow.Item(2)
' Dim K As Long
' K = UBound(MyData)
' Dim fs As New FileStream(dokumentname, FileMode.OpenOrCreate, FileAccess.Write)
' fs.Write(MyData, 0, K)
' fs.Close()
' fs = Nothing
' Me.dsempfaenger.ReadXml(dokumentname)
' End If
' Catch ex As Exception
' End Try
' cb = Nothing
' ds = Nothing
' DA = Nothing
' Connection.Close()
' Connection = Nothing
'Catch EX As Exception
'Finally
' Try
' File.Delete(dokumentname)
' Catch
' End Try
'End Try
End Sub
Public Function Generate_Key(ByVal key As Long) As String
Dim skey As String
Dim s As String
skey = "OFFEDK000"
s = Str(Year(Now))
While Microsoft.VisualBasic.Left(s, 1) = " "
s = Microsoft.VisualBasic.Right(s, Len(s) - 1)
End While
skey = skey + s
s = Str(key)
While Microsoft.VisualBasic.Left(s, 1) = " "
s = Microsoft.VisualBasic.Right(s, Len(s) - 1)
End While
While Len(s) < 8
s = "0" + s
End While
skey = skey + s
s = Pruefziffer(Microsoft.VisualBasic.Right(skey, 15))
While Microsoft.VisualBasic.Left(s, 1) = " "
s = Microsoft.VisualBasic.Right(s, Len(s) - 1)
End While
skey = skey + s
Generate_Key = skey
End Function
Public Function Pruefziffer(ByVal zahl As String) As String
Dim ptab(9, 9) As Integer
Dim pz(9) As Integer
Dim s1, s2, s3 As String
Dim i1, i2 As Long
s1 = "0,9,4,6,8,2,7,1,3,5"
s2 = s1
For i1 = 0 To 9
For i2 = 0 To 9
ptab(i1, i2) = Mid(s2, (i2 * 2) + 1, 1)
Next
s3 = Microsoft.VisualBasic.Left(s1, 1)
s1 = Microsoft.VisualBasic.Right(s1, Len(s1) - 2)
s1 = s1 + "," + s3
s2 = s1
Next
pz(0) = 0
pz(1) = 9
pz(2) = 8
pz(3) = 7
pz(4) = 6
pz(5) = 5
pz(6) = 4
pz(7) = 3
pz(8) = 2
pz(9) = 1
Dim i, x, y, z, e As Integer
Dim xx As String
y = 0
For i = 1 To Len(zahl)
x = Val(Mid(zahl, i, 1))
y = ptab(x, y)
Next
Pruefziffer = Str(pz(y))
End Function
#End Region
End Class

View File

@@ -0,0 +1,138 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbabschliessen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbgeneriertedokumentebestätigen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbweiteregenerieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbkeineaktion.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtbemerkung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Abbruch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="StatusBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmDruckabschluss</value>
</data>
</root>

View File

@@ -0,0 +1,410 @@
Imports System.IO
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmDruckabschluss
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents rbkeineaktion As System.Windows.Forms.RadioButton
Friend WithEvents rbweiteregenerieren As System.Windows.Forms.RadioButton
Friend WithEvents rbgeneriertedokumentebestätigen As System.Windows.Forms.RadioButton
Friend WithEvents rbabschliessen As System.Windows.Forms.RadioButton
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Abbruch As System.Windows.Forms.Button
Friend WithEvents txtbemerkung As System.Windows.Forms.TextBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents StatusBar1 As System.Windows.Forms.StatusBar
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.rbabschliessen = New System.Windows.Forms.RadioButton()
Me.rbgeneriertedokumentebestätigen = New System.Windows.Forms.RadioButton()
Me.rbweiteregenerieren = New System.Windows.Forms.RadioButton()
Me.rbkeineaktion = New System.Windows.Forms.RadioButton()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.txtbemerkung = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.Abbruch = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.StatusBar1 = New System.Windows.Forms.StatusBar()
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.SuspendLayout()
'
'GroupBox1
'
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.rbabschliessen, Me.rbgeneriertedokumentebestätigen, Me.rbweiteregenerieren, Me.rbkeineaktion})
Me.GroupBox1.Location = New System.Drawing.Point(8, 40)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(320, 128)
Me.GroupBox1.TabIndex = 0
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Optionen"
'
'rbabschliessen
'
Me.rbabschliessen.Location = New System.Drawing.Point(16, 96)
Me.rbabschliessen.Name = "rbabschliessen"
Me.rbabschliessen.Size = New System.Drawing.Size(200, 24)
Me.rbabschliessen.TabIndex = 3
Me.rbabschliessen.Text = "Serienbrief abschliessen"
'
'rbgeneriertedokumentebestätigen
'
Me.rbgeneriertedokumentebestätigen.Location = New System.Drawing.Point(16, 72)
Me.rbgeneriertedokumentebestätigen.Name = "rbgeneriertedokumentebestätigen"
Me.rbgeneriertedokumentebestätigen.Size = New System.Drawing.Size(200, 24)
Me.rbgeneriertedokumentebestätigen.TabIndex = 2
Me.rbgeneriertedokumentebestätigen.Text = "Erstellte Dokumente bestätigen"
'
'rbweiteregenerieren
'
Me.rbweiteregenerieren.Location = New System.Drawing.Point(16, 48)
Me.rbweiteregenerieren.Name = "rbweiteregenerieren"
Me.rbweiteregenerieren.Size = New System.Drawing.Size(240, 24)
Me.rbweiteregenerieren.TabIndex = 1
Me.rbweiteregenerieren.Text = "Weitere pendente Dokumente generieren"
'
'rbkeineaktion
'
Me.rbkeineaktion.Location = New System.Drawing.Point(16, 24)
Me.rbkeineaktion.Name = "rbkeineaktion"
Me.rbkeineaktion.Size = New System.Drawing.Size(152, 24)
Me.rbkeineaktion.TabIndex = 0
Me.rbkeineaktion.Text = "keine Aktion durchführen"
'
'GroupBox2
'
Me.GroupBox2.Controls.AddRange(New System.Windows.Forms.Control() {Me.txtbemerkung})
Me.GroupBox2.Location = New System.Drawing.Point(8, 176)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(320, 100)
Me.GroupBox2.TabIndex = 1
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Beschreibung"
'
'txtbemerkung
'
Me.txtbemerkung.BackColor = System.Drawing.SystemColors.ActiveBorder
Me.txtbemerkung.Location = New System.Drawing.Point(8, 16)
Me.txtbemerkung.Multiline = True
Me.txtbemerkung.Name = "txtbemerkung"
Me.txtbemerkung.Size = New System.Drawing.Size(304, 72)
Me.txtbemerkung.TabIndex = 0
Me.txtbemerkung.Text = ""
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(248, 288)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 2
Me.Button1.Text = "OK"
'
'Abbruch
'
Me.Abbruch.Location = New System.Drawing.Point(8, 288)
Me.Abbruch.Name = "Abbruch"
Me.Abbruch.TabIndex = 3
Me.Abbruch.Text = "Abbruch"
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(16, 8)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(64, 23)
Me.Label1.TabIndex = 4
Me.Label1.Text = "Serienbrief:"
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(80, 8)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(248, 23)
Me.Label2.TabIndex = 5
Me.Label2.Text = "Label2"
'
'StatusBar1
'
Me.StatusBar1.Location = New System.Drawing.Point(0, 327)
Me.StatusBar1.Name = "StatusBar1"
Me.StatusBar1.Size = New System.Drawing.Size(336, 22)
Me.StatusBar1.TabIndex = 6
'
'frmDruckabschluss
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(336, 349)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.StatusBar1, Me.Label2, Me.Label1, Me.Abbruch, Me.Button1, Me.GroupBox2, Me.GroupBox1})
Me.Name = "frmDruckabschluss"
Me.Text = "Serienbrief-Verarbeitung:"
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox2.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
Dim serienbriefnr As Integer
Dim dsempfaenger As New DataSet()
Dim progress As New ucProgress()
Dim m_datasaved As Boolean
Dim serienbrief As New edokadb.clsEdex_sb_serienbrief()
Property datasaved() As Boolean
Get
Return m_datasaved
End Get
Set(ByVal Value As Boolean)
m_datasaved = Value
End Set
End Property
Public Sub New(ByVal serienbriefnr As Integer)
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
Me.serienbriefnr = serienbriefnr
End Sub
Private Sub frmDruckabschluss_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
serienbrief.cpMainConnectionProvider = Globals.conn
serienbrief.iSerienbriefnr = New SqlInt32(CType(Me.serienbriefnr, Int32))
serienbrief.SelectOne()
Label2.Text = serienbrief.sBezeichnung.Value
serienbrief.Dispose()
Me.StatusBar1.Controls.Add(progress)
Me.SetProgress(0, "Empfänger prüfen", False)
If Load_empfaenger() = True Then
check_data()
End If
Me.SetProgress(0, "", True)
Me.rbkeineaktion.Checked = True
End Sub
Private Function Load_empfaenger() As Boolean
Try
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_empfaenger.xml"
Me.dsempfaenger.Tables.Clear()
Dim Connection As New SqlConnection()
Dim DA As New SqlDataAdapter("select * from edex_sb_empfaenger where serienbriefnr=" + Str(Me.serienbriefnr), Connection)
Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
Dim ds As New DataSet()
Try
Connection.ConnectionString = Globals.sConnectionString
Connection.Open()
DA.Fill(ds, "empf")
Dim myRow As DataRow
If ds.Tables(0).Rows.Count = 0 Then
MyMsg.show_standardmessage(701, MsgBoxStyle.Critical)
Return False
Else
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item(2)
Dim K As Long
K = UBound(MyData)
Dim fs As New FileStream(dokumentname, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
Me.dsempfaenger.ReadXml(dokumentname)
End If
Catch ex As Exception
MyMsg.show_standardmessage(701, MsgBoxStyle.Critical)
' MsgBox(ex.Message)
Return False
End Try
cb = Nothing
ds = Nothing
DA = Nothing
Connection.Close()
Connection = Nothing
Return True
Catch EX As Exception
MyMsg.show_standardmessage(701, MsgBoxStyle.Critical)
Return False
End Try
End Function
Private Function save_empfaenger() As Boolean
Try
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_empfaenger.xml"
Me.dsempfaenger.WriteXml(dokumentname)
Dim Connection As New SqlConnection()
Dim DA As New SqlDataAdapter("select * from edex_sb_empfaenger where serienbriefnr=" + Str(Me.serienbriefnr), Connection)
Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
Dim ds As New DataSet()
Dim fs As New FileStream(dokumentname, FileMode.Open, FileAccess.Read)
Dim mydata(fs.Length) As Byte
Try
fs.Read(mydata, 0, fs.Length)
fs.Close()
Connection.ConnectionString = Globals.sConnectionString
Connection.Open()
DA.Fill(ds, "empf")
Dim myRow As DataRow
If ds.Tables(0).Rows.Count = 0 Then
'Neue Serienbrief_Empfaenger speichern
myRow = ds.Tables(0).NewRow
myRow.Item(1) = Me.serienbriefnr
myRow.Item(2) = mydata
ds.Tables(0).Rows.Add(myRow)
DA.Update(ds, "empf")
Else
' Bestehende Empfängerliste überschreiben
myRow = ds.Tables(0).Rows(0)
myRow.Item(2) = mydata
DA.Update(ds, "empf")
End If
Catch ex As Exception
MyMsg.show_standardmessage(700, MsgBoxStyle.Critical)
Return False
End Try
fs = Nothing
cb = Nothing
ds = Nothing
DA = Nothing
Connection.Close()
Connection = Nothing
Return True
Catch EX As Exception
MyMsg.show_standardmessage(700, MsgBoxStyle.Critical)
Return False
End Try
End Function
Private Function check_data()
Me.rbabschliessen.Enabled = False
Me.rbgeneriertedokumentebestätigen.Enabled = False
Me.rbkeineaktion.Enabled = True
Me.rbweiteregenerieren.Enabled = False
If Me.serienbrief.iAusgeloest.Value <> 0 Then Me.rbweiteregenerieren.Enabled = True
If Me.serienbrief.iErstellt.Value <> 0 Or Me.serienbrief.iGedruckt.Value <> 0 Then Me.rbgeneriertedokumentebestätigen.Enabled = True
If Me.serienbrief.iFehlerhaft.Value = 0 And Me.serienbrief.iAusgeloest.Value = 0 And Me.serienbrief.iInBearbeitung.Value = 0 Then
Me.rbabschliessen.Enabled = True
End If
End Function
Private Sub SetProgress(ByVal wert As Integer, ByVal txt As String, ByVal hidedialog As Boolean)
If hidedialog Then
progress.Hide()
Exit Sub
End If
progress.Visible = True
If wert + 1 > 100 Then wert = 99
progress.Bar1.Value = wert + 1
progress.info.Text = txt
progress.Refresh()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Me.rbkeineaktion.Checked Then
Me.datasaved = False
Me.Close()
End If
If Me.rbgeneriertedokumentebestätigen.Checked Then
Dokumente_bestaetigen()
Me.save_empfaenger()
Me.datasaved = True
Me.Close()
End If
If Me.rbabschliessen.Checked Then
Dokumente_bestaetigen()
Dim serienbrief As New edokadb.clsEdex_sb_serienbrief()
serienbrief.cpMainConnectionProvider = Globals.conn
serienbrief.iSerienbriefnr = New SqlInt32(CType(Me.serienbriefnr, Int32))
serienbrief.SelectOne()
serienbrief.iStatus = New SqlInt32(CType(1, Int32))
Globals.conn.OpenConnection()
serienbrief.Update()
Globals.conn.CloseConnection(True)
serienbrief.Dispose()
Me.save_empfaenger()
Me.datasaved = True
Me.Close()
End If
If Me.rbweiteregenerieren.Checked Then
Dim serienbrief As New edokadb.clsEdex_sb_serienbrief()
serienbrief.cpMainConnectionProvider = Globals.conn
serienbrief.iSerienbriefnr = New SqlInt32(CType(Me.serienbriefnr, Int32))
serienbrief.SelectOne()
serienbrief.iStatus = New SqlInt32(CType(-1, Int32))
Globals.conn.OpenConnection()
serienbrief.Update()
Globals.conn.CloseConnection(True)
serienbrief.Dispose()
Me.save_empfaenger()
Me.Close()
Me.datasaved = True
End If
End Sub
Private Sub Dokumente_bestaetigen()
Me.Cursor = Cursors.WaitCursor
Application.DoEvents()
Dim pwert As Integer
Dim i As Integer
For i = 0 To Me.dsempfaenger.Tables(0).Rows.Count - 1
Try
pwert = 100 / Me.dsempfaenger.Tables(0).Rows.Count * i
Catch
pwert = 0
End Try
Me.SetProgress(pwert, "Dokumente bestätigen", False)
Try
If Me.dsempfaenger.Tables(0).Rows(i).Item("STATUS") = 2 Or Me.dsempfaenger.Tables(0).Rows(i).Item("STATUS") = 3 Then
Me.dsempfaenger.Tables(0).Rows(i).Item("Dokument_Gedruckt") = 1
Me.dsempfaenger.Tables(0).Rows(i).Item("STATUS") = 4
End If
Catch
End Try
Next
Me.SetProgress(100, "", True)
Cursor = Cursors.Default
Application.DoEvents()
End Sub
Private Sub Abbruch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Abbruch.Click
Me.Close()
End Sub
End Class

View File

@@ -0,0 +1,151 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ComboBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Timer1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="Timer1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="CheckBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmDruckMessage</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKBwoAAAAAAAAAAAAAAAoHBwcKCgoAAAAAAAAKCgcH
BwcHCgoKCgoAAAAAChEHBwcHEQoKCgoKCgAACgoRBwcREQcHBwoKCgoAAAAKEQcHDg4QEAcHBwoKAAoR
EQoKEQcHBwcHCgoABwAKERERAAoKEQcKCgcRAAcAChEREQARAAoKBxEREREAAAoREREAEQAAChERERER
EQAKCgoKChEAEQAKERERCgoAAAAKERERABEAAAoKCgAAAAAACgoKCgoRAAAAAAAAAAAAAAAAChEREQAA
AAARAAAAAAAAAAoKCgoKAAAAAAAAAP4f///8D///4AP//8AA///AAP//gAD//wAA//8AAP//AAD//wAB
//8AAP//AIH//8DH///Af///8Hf///B///8=
</value>
</data>
</root>

View File

@@ -0,0 +1,197 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmDruckMessage
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Timer1 As System.Windows.Forms.Timer
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmDruckMessage))
Me.Label1 = New System.Windows.Forms.Label()
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(296, 23)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Für folgende Serienbriefe wurden Dokumente aufbereitet:"
'
'ComboBox1
'
Me.ComboBox1.Location = New System.Drawing.Point(8, 40)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(288, 21)
Me.ComboBox1.TabIndex = 1
Me.ComboBox1.Text = "ComboBox1"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(8, 72)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 2
Me.Button1.Text = "Abbruch"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(176, 72)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(120, 23)
Me.Button2.TabIndex = 3
Me.Button2.Text = "Serienbrief anzeigen"
'
'Timer1
'
Me.Timer1.Enabled = True
Me.Timer1.Interval = 1800000
'
'CheckBox1
'
Me.CheckBox1.Location = New System.Drawing.Point(8, 104)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(288, 24)
Me.CheckBox1.TabIndex = 4
Me.CheckBox1.Text = "Keine Meldungen für diesen Serienbrief erstellen"
'
'frmDruckMessage
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(304, 141)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.CheckBox1, Me.Button2, Me.Button1, Me.ComboBox1, Me.Label1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmDruckMessage"
Me.Text = "Serienbriefe: Aufbereitete Dokumente"
Me.ResumeLayout(False)
End Sub
#End Region
Public dt As New DataTable()
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
Check_Data()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
Private Sub frmDruckMessage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' Check_Data()
End Sub
Public Function Check_Data() As Integer
dt = checkdata()
Me.ComboBox1.DataSource = dt
Me.ComboBox1.DisplayMember = "bezeichnung"
Me.ComboBox1.ValueMember = "serienbriefnr"
If dt.Rows.Count > 0 Then
Me.Visible = True
Application.DoEvents()
Else
Me.Visible = False
End If
End Function
Private Function checkdata() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_get_serienbriefe_gedruckt"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim f As New frmSerienbriefe(True, Me.ComboBox1.SelectedValue)
f.Show()
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Check_Data()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Hide()
End Sub
Private Sub frmDruckMessage_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
Me.Visible = False
e.Cancel = True
End Sub
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If Me.CheckBox1.Checked = True Then
Me.update_meldung()
Me.ComboBox1.DataSource = Nothing
Me.ComboBox1.Items.Clear()
Me.Check_Data()
End If
End Sub
Private Function update_meldung()
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_set_druckjobmeldung"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@serienbriefnr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.ComboBox1.SelectedValue))
sdaAdapter.Fill(dtToReturn)
Catch ex As Exception
Throw New Exception("sp_edex_sb_set_druckjobmeldung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
End Class

View File

@@ -0,0 +1,72 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmExcelSheets
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.lstSheets = New System.Windows.Forms.ListBox
Me.BtnOK = New System.Windows.Forms.Button
Me.BtnAbbruch = New System.Windows.Forms.Button
Me.SuspendLayout()
'
'lstSheets
'
Me.lstSheets.FormattingEnabled = True
Me.lstSheets.Location = New System.Drawing.Point(12, 32)
Me.lstSheets.Name = "lstSheets"
Me.lstSheets.Size = New System.Drawing.Size(220, 134)
Me.lstSheets.TabIndex = 0
'
'BtnOK
'
Me.BtnOK.Location = New System.Drawing.Point(12, 193)
Me.BtnOK.Name = "BtnOK"
Me.BtnOK.Size = New System.Drawing.Size(75, 23)
Me.BtnOK.TabIndex = 1
Me.BtnOK.Text = "Auswählen"
Me.BtnOK.UseVisualStyleBackColor = True
'
'BtnAbbruch
'
Me.BtnAbbruch.Location = New System.Drawing.Point(157, 193)
Me.BtnAbbruch.Name = "BtnAbbruch"
Me.BtnAbbruch.Size = New System.Drawing.Size(75, 23)
Me.BtnAbbruch.TabIndex = 2
Me.BtnAbbruch.Text = "Abbruch"
Me.BtnAbbruch.UseVisualStyleBackColor = True
'
'frmExcelSheets
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(254, 228)
Me.Controls.Add(Me.BtnAbbruch)
Me.Controls.Add(Me.BtnOK)
Me.Controls.Add(Me.lstSheets)
Me.Name = "frmExcelSheets"
Me.Text = "Auswahl Excel-Blatt"
Me.ResumeLayout(False)
End Sub
Friend WithEvents lstSheets As System.Windows.Forms.ListBox
Friend WithEvents BtnOK As System.Windows.Forms.Button
Friend WithEvents BtnAbbruch As System.Windows.Forms.Button
End Class

View 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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@@ -0,0 +1,47 @@
Public Class frmExcelSheets
Dim m_excelsheet As String
Property ExcelSheet() As String
Get
Return m_excelsheet
End Get
Set(ByVal value As String)
m_excelsheet = value
End Set
End Property
Dim m_excelfile As String
Property ExcelFile() As String
Get
Return m_excelfile
End Get
Set(ByVal value As String)
m_excelfile = value
End Set
End Property
Private Sub frmExcelSheets_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim intxls As New Microsoft.Office.Interop.Excel.Application
intxls.Workbooks.Open(ExcelFile)
For Each s As Microsoft.Office.Interop.Excel.Worksheet In intxls.ActiveWorkbook.Sheets
Me.lstSheets.Items.Add(s.Name)
Next
intxls.ActiveWorkbook.Close(False)
intxls.Quit()
intxls = Nothing
End Sub
Private Sub BtnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnOK.Click
Me.ExcelSheet = "[" & Me.lstSheets.SelectedItem & "$]"
Me.DialogResult = Windows.Forms.DialogResult.OK
Me.Close()
End Sub
Private Sub BtnAbbruch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnAbbruch.Click
Me.DialogResult = Windows.Forms.DialogResult.Cancel
Me.Close()
End Sub
Private Sub lstSheets_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lstSheets.DoubleClick
BtnOK_Click(sender, e)
End Sub
End Class

View File

@@ -0,0 +1,193 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AAAgCAAAAk1TRnQBSQFMAwEBAAEFAQABBAEAARABAAEQAQAE/wEJARAI/wFCAU0BNgEEBgABNgEEAgAB
KAMAAUADAAEgAwABAQEAAQgGAAEIGAABgAIAAYADAAKAAQABgAMAAYABAAGAAQACgAIAA8ABAAHAAdwB
wAEAAfABygGmAQABMwUAATMBAAEzAQABMwEAAjMCAAMWAQADHAEAAyIBAAMpAQADVQEAA00BAANCAQAD
OQEAAYABfAH/AQACUAH/AQABkwEAAdYBAAH/AewBzAEAAcYB1gHvAQAB1gLnAQABkAGpAa0CAAH/ATMD
AAFmAwABmQMAAcwCAAEzAwACMwIAATMBZgIAATMBmQIAATMBzAIAATMB/wIAAWYDAAFmATMCAAJmAgAB
ZgGZAgABZgHMAgABZgH/AgABmQMAAZkBMwIAAZkBZgIAApkCAAGZAcwCAAGZAf8CAAHMAwABzAEzAgAB
zAFmAgABzAGZAgACzAIAAcwB/wIAAf8BZgIAAf8BmQIAAf8BzAEAATMB/wIAAf8BAAEzAQABMwEAAWYB
AAEzAQABmQEAATMBAAHMAQABMwEAAf8BAAH/ATMCAAMzAQACMwFmAQACMwGZAQACMwHMAQACMwH/AQAB
MwFmAgABMwFmATMBAAEzAmYBAAEzAWYBmQEAATMBZgHMAQABMwFmAf8BAAEzAZkCAAEzAZkBMwEAATMB
mQFmAQABMwKZAQABMwGZAcwBAAEzAZkB/wEAATMBzAIAATMBzAEzAQABMwHMAWYBAAEzAcwBmQEAATMC
zAEAATMBzAH/AQABMwH/ATMBAAEzAf8BZgEAATMB/wGZAQABMwH/AcwBAAEzAv8BAAFmAwABZgEAATMB
AAFmAQABZgEAAWYBAAGZAQABZgEAAcwBAAFmAQAB/wEAAWYBMwIAAWYCMwEAAWYBMwFmAQABZgEzAZkB
AAFmATMBzAEAAWYBMwH/AQACZgIAAmYBMwEAA2YBAAJmAZkBAAJmAcwBAAFmAZkCAAFmAZkBMwEAAWYB
mQFmAQABZgKZAQABZgGZAcwBAAFmAZkB/wEAAWYBzAIAAWYBzAEzAQABZgHMAZkBAAFmAswBAAFmAcwB
/wEAAWYB/wIAAWYB/wEzAQABZgH/AZkBAAFmAf8BzAEAAcwBAAH/AQAB/wEAAcwBAAKZAgABmQEzAZkB
AAGZAQABmQEAAZkBAAHMAQABmQMAAZkCMwEAAZkBAAFmAQABmQEzAcwBAAGZAQAB/wEAAZkBZgIAAZkB
ZgEzAQABmQEzAWYBAAGZAWYBmQEAAZkBZgHMAQABmQEzAf8BAAKZATMBAAKZAWYBAAOZAQACmQHMAQAC
mQH/AQABmQHMAgABmQHMATMBAAFmAcwBZgEAAZkBzAGZAQABmQLMAQABmQHMAf8BAAGZAf8CAAGZAf8B
MwEAAZkBzAFmAQABmQH/AZkBAAGZAf8BzAEAAZkC/wEAAcwDAAGZAQABMwEAAcwBAAFmAQABzAEAAZkB
AAHMAQABzAEAAZkBMwIAAcwCMwEAAcwBMwFmAQABzAEzAZkBAAHMATMBzAEAAcwBMwH/AQABzAFmAgAB
zAFmATMBAAGZAmYBAAHMAWYBmQEAAcwBZgHMAQABmQFmAf8BAAHMAZkCAAHMAZkBMwEAAcwBmQFmAQAB
zAKZAQABzAGZAcwBAAHMAZkB/wEAAswCAALMATMBAALMAWYBAALMAZkBAAPMAQACzAH/AQABzAH/AgAB
zAH/ATMBAAGZAf8BZgEAAcwB/wGZAQABzAH/AcwBAAHMAv8BAAHMAQABMwEAAf8BAAFmAQAB/wEAAZkB
AAHMATMCAAH/AjMBAAH/ATMBZgEAAf8BMwGZAQAB/wEzAcwBAAH/ATMB/wEAAf8BZgIAAf8BZgEzAQAB
zAJmAQAB/wFmAZkBAAH/AWYBzAEAAcwBZgH/AQAB/wGZAgAB/wGZATMBAAH/AZkBZgEAAf8CmQEAAf8B
mQHMAQAB/wGZAf8BAAH/AcwCAAH/AcwBMwEAAf8BzAFmAQAB/wHMAZkBAAH/AswBAAH/AcwB/wEAAv8B
MwEAAcwB/wFmAQAC/wGZAQAC/wHMAQACZgH/AQABZgH/AWYBAAFmAv8BAAH/AmYBAAH/AWYB/wEAAv8B
ZgEAASEBAAGlAQADXwEAA3cBAAOGAQADlgEAA8sBAAOyAQAD1wEAA90BAAPjAQAD6gEAA/EBAAP4AQAB
8AH7Af8BAAGkAqABAAOAAwAB/wIAAf8DAAL/AQAB/wMAAf8BAAH/AQAC/wIAA///AP8A/wD/AEsAAQMB
/zwAAewBAwHsAf86AAEDAewBAwHsAQMB/zkAAQMB7AEDAewBAwHsAf8BAAHsNwAB7AEDAewBAwHsAQMB
/wEAAew3AAEDAewBAwIAAewB/wEAAew3AAHsAQMB7AIHAQMB/wEAAewBAAEGNQABAwHsAQMB7AEDAewB
/wIAAQYF/jEAAewBAwHsAQMB7AEDAf8BAAFtBv4xAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbTEAAewB
AwHsAQMB7AEDAf8BAAHsAQACbTQAAQMB7AEDAewBBwH/AewBAAHsAgABbTQAAewBAwEHAf8B7AEAA+w3
AAEHAf8B7AEABex2AAFCAU0BPgcAAT4DAAEoAwABQAMAASADAAEBAQABAQYAAQEWAAP/gQAB/AF/BgAB
8AF/BgABwAF/BwABHwcAAR8HAAEXBwABBycAAQcHAAEXBwABHwcAAR8HAAEfHAAL
</value>
</data>
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ListBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="webOCWrapper.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmOfficePreview</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANDAAAAAAAAAAAAAAAAAANDAwAAAAAAAAA
AAAAAAANDAwAAAAAAAAAAAAAAAANDAwAAAAACgoKAAMDAwMDAAwAAAAAAAAAAAcNEQ0NAwMAAAAAAAoR
EQANEQ0RDQ0DAAAAAAAKEREABw0HDRENAwAAAAAAChERAA0RDRENEQMAAAAAAAoREQAHDQcNBw0DAAAA
AAAKCgoKABENEQ0RAAAAAAAAAAAKEREAAAAAAAAAAAAAAAAACgoKCgoRAAAAAAAAAAAAAAAAChEREQAA
AAAAAAAAAAAAAAoKCgoKAAAAAAAAAP/5////8P///+D////B///4A///gAf//wAP//8AD///AA///wAP
//8AD///AB///8A////Af///8H////B///8=
</value>
</data>
</root>

View File

@@ -0,0 +1,162 @@
Imports System.IO
Public Class frmOfficePreview
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents webOCWrapper As WebOCHostCtrl
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmOfficePreview))
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.ListBox1 = New System.Windows.Forms.ListBox()
Me.webOCWrapper = New WebOCHostCtrl()
Me.GroupBox1.SuspendLayout()
Me.SuspendLayout()
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(880, 25)
Me.ToolBar1.TabIndex = 13
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 0
'
'ImageList1
'
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'GroupBox1
'
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.ListBox1})
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Left
Me.GroupBox1.Location = New System.Drawing.Point(0, 25)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(208, 596)
Me.GroupBox1.TabIndex = 14
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Generierte Dokumente"
'
'ListBox1
'
Me.ListBox1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ListBox1.Location = New System.Drawing.Point(3, 16)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(202, 576)
Me.ListBox1.TabIndex = 0
'
'webOCWrapper
'
Me.webOCWrapper.BrowserContextMenu = False
Me.webOCWrapper.Dock = System.Windows.Forms.DockStyle.Fill
Me.webOCWrapper.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.webOCWrapper.Location = New System.Drawing.Point(208, 25)
Me.webOCWrapper.Name = "webOCWrapper"
Me.webOCWrapper.Size = New System.Drawing.Size(672, 596)
Me.webOCWrapper.TabIndex = 15
Me.webOCWrapper.TabStop = False
'
'frmOfficePreview
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(880, 621)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.webOCWrapper, Me.GroupBox1, Me.ToolBar1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmOfficePreview"
Me.Text = "Dokument-Vorschau"
Me.GroupBox1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
Public Sub New(ByVal gd As Collection)
MyBase.New()
InitializeComponent()
Dim i As Integer
For i = 1 To gd.Count
Me.ListBox1.Items.Add(gd.Item(i))
Next
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Me.Close()
End Sub
Private Sub frmOfficePreview_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ListBox1.SelectedIndex = 0
Application.DoEvents()
MyMsg.show_standardmessage(724, MsgBoxStyle.Information)
'Try
' webOCWrapper.Navigate(Me.ListBox1.SelectedItem.Text)
'Catch
'End Try
End Sub
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
Try
webOCWrapper.Navigate(Me.ListBox1.SelectedItem)
Catch
End Try
End Sub
Private Sub frmOfficePreview_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
Dim i As Integer
Try
webOCWrapper.Navigate("")
Catch
End Try
For i = 0 To Me.ListBox1.Items.Count - 1
Try
File.Delete(Me.ListBox1.Items(i))
Catch
End Try
Next
End Sub
End Class

View File

@@ -0,0 +1,156 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="partnerlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="Beschreibung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmPartnerlisteLaden</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wDdpsIA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAxlwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABegF6AXoBegFAAAAAAAADwAF6AXoBegF6AUAAAAAABEAAAXo
BegF6AXoBQAAAAAAAAAABegF6AXoBegFAAAABwcREQAAAAAAAAAAAAAAAAcHABEREREAaQAAAAAAAAAH
BwAREQAAaQAAAAAAtwAABwcHABERAGlpaQAAAAC3AAAHBwcHBwBpaWkAAAAAtwAAAAAAAABpAGlpAAAA
ALcAAAAAaWlpaQBpAAC3ALcAAAAAAGlpaWlpaQAAt7cAAAAAAAAAAAAAAAAAALe3twAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAf//8AD///AAf//wAD//8AAf//AAD//wAf//8AHf//AA7//4AO
///ADv//4BX//+AT///gEf////////////8=
</value>
</data>
</root>

View File

@@ -0,0 +1,274 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Public Class frmPartnerlisteLaden
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Beschreibung As System.Windows.Forms.Label
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents partnerlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmPartnerlisteLaden))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.partnerlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.Beschreibung = New System.Windows.Forms.Label()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.Panel1.SuspendLayout()
CType(Me.partnerlist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Panel1
'
Me.Panel1.BackColor = System.Drawing.SystemColors.Control
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
Me.Panel1.Controls.AddRange(New System.Windows.Forms.Control() {Me.partnerlist})
Me.Panel1.Location = New System.Drawing.Point(8, 8)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(416, 136)
Me.Panel1.TabIndex = 49
'
'partnerlist
'
Me.partnerlist.AllowFilter = True
Me.partnerlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.partnerlist.AllowSort = True
Me.partnerlist.AlternatingRows = True
Me.partnerlist.CaptionHeight = 17
Me.partnerlist.CollapseColor = System.Drawing.Color.Black
Me.partnerlist.Cursor = System.Windows.Forms.Cursors.Default
Me.partnerlist.DataChanged = False
Me.partnerlist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.partnerlist.Dock = System.Windows.Forms.DockStyle.Fill
Me.partnerlist.ExpandColor = System.Drawing.Color.Black
Me.partnerlist.FetchRowStyles = True
Me.partnerlist.FilterBar = True
Me.partnerlist.GroupByCaption = "Drag a column header here to group by that column"
Me.partnerlist.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.partnerlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.partnerlist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.partnerlist.Name = "partnerlist"
Me.partnerlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.partnerlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.partnerlist.PreviewInfo.ZoomFactor = 75
Me.partnerlist.PrintInfo.ShowOptionsDialog = False
Me.partnerlist.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.partnerlist.RowDivider = GridLines1
Me.partnerlist.RowHeight = 15
Me.partnerlist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.partnerlist.ScrollTips = True
Me.partnerlist.Size = New System.Drawing.Size(412, 132)
Me.partnerlist.TabIndex = 28
Me.partnerlist.Text = "C1TrueDBGrid1"
Me.partnerlist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 408," & _
" 128</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 408, " & _
"128</ClientArea></Blob>"
'
'Beschreibung
'
Me.Beschreibung.Location = New System.Drawing.Point(8, 152)
Me.Beschreibung.Name = "Beschreibung"
Me.Beschreibung.Size = New System.Drawing.Size(80, 16)
Me.Beschreibung.TabIndex = 50
Me.Beschreibung.Text = "Beschreibung"
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(88, 152)
Me.TextBox1.Multiline = True
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(336, 80)
Me.TextBox1.TabIndex = 51
Me.TextBox1.Text = ""
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(8, 248)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(80, 23)
Me.Button1.TabIndex = 52
Me.Button1.Text = "Abbruch"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(344, 248)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(80, 23)
Me.Button2.TabIndex = 53
Me.Button2.Text = "Übernehmen"
'
'frmPartnerlisteLaden
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(432, 277)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button2, Me.Button1, Me.TextBox1, Me.Beschreibung, Me.Panel1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmPartnerlisteLaden"
Me.Text = "Partnerliste laden"
Me.Panel1.ResumeLayout(False)
CType(Me.partnerlist, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
Dim m_partnerlistenr As Integer
Property PartnerListeNr() As Integer
Get
Return m_partnerlistenr
End Get
Set(ByVal Value As Integer)
m_partnerlistenr = Value
End Set
End Property
Private Sub frmPartnerlisteLaden_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim dt As New DataTable()
dt = Load_Partnerlisten()
If dt.Rows.Count = 0 Then Me.Button2.Enabled = False
Me.partnerlist.DataSource = dt
Me.partnerlist.DataMember = dt.TableName
Me.partnerlist.Splits(0).DisplayColumns(3).Visible = False
Me.partnerlist.Bookmark = 0
Me.partnerlist.Splits(0).DisplayColumns("Nr").Visible = False
Me.partnerlist.Splits(0).DisplayColumns("Bezeichnung").AutoSize()
Me.partnerlist.Splits(0).DisplayColumns("Zuständig").AutoSize()
End Sub
Private Function Load_Partnerlisten() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_get_partnerlisten"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@manr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("dbo.sp_edex_sb_get_partnerlisten::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub partnerlist_RowColChange(ByVal sender As Object, ByVal e As C1.Win.C1TrueDBGrid.RowColChangeEventArgs) Handles partnerlist.RowColChange
Me.TextBox1.Text = Me.partnerlist.Columns(3).Text
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.PartnerListeNr = Me.partnerlist.Columns(0).Text
Me.DialogResult = DialogResult.OK
Me.Close()
End Sub
Public Function Load_Partnerlist() As String
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.PartnerListeNr.ToString + "_Partnerlist.xml"
Dim connection As New SqlConnection()
Dim da As New SqlDataAdapter("Select * From edex_sb_partnerliste where partnerlistenr=" + Me.PartnerListeNr.ToString, connection)
Dim CB As SqlCommandBuilder = New SqlCommandBuilder(da)
Dim ds As New DataSet()
Try
'Connectionstring zur Datenbank
connection.ConnectionString = Globals.sConnectionString
connection.Open()
da.Fill(ds, "docs")
Dim myRow As DataRow
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item(9)
Dim K As Long
K = UBound(MyData)
Dim fs As New FileStream(dokumentname, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
Return dokumentname
Catch ex As Exception
Return ""
End Try
CB = Nothing
ds = Nothing
da = Nothing
connection.Close()
connection = Nothing
Return True
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.DialogResult = DialogResult.Abort
Me.Close()
End Sub
End Class

View File

@@ -0,0 +1,172 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ComboBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmPartnerlisteSpeichern</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wDdpsIA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAxlwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABegF6AXoBegFAAAAAAAADwAF6AXoBegF6AUAAAAAABEAAAXo
BegF6AXoBQAAAAAAAAAABegF6AXoBegFAAAABwcREQAAAAAAAAAAAAAAAAcHABEREREAaQAAAAAAAAAH
BwAREQAAaQAAAAAxMTEABwcHABERAGlpaQAAMTEAAAAHBwcHBwBpaWkAADEAMQAAAAAAAABpAGlpAAAA
ADEAAAAAaWlpaQBpAAAAAAAxAAAAAGlpaWlpaQAAAAAxAAAAAAAAAAAAAAAAADExAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAf//8AD///AAf//wAD//8AAf//AAD//wAf//8AGP//AAn//4AK
///ADv//4B7//+Ad///gE/////////////8=
</value>
</data>
</root>

View File

@@ -0,0 +1,326 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Public Class frmPartnerlisteSpeichern
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents RadioButton5 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton4 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton3 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton2 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton1 As System.Windows.Forms.RadioButton
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents RadioButton6 As System.Windows.Forms.RadioButton
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmPartnerlisteSpeichern))
Me.Label1 = New System.Windows.Forms.Label()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.TextBox2 = New System.Windows.Forms.TextBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.RadioButton5 = New System.Windows.Forms.RadioButton()
Me.RadioButton4 = New System.Windows.Forms.RadioButton()
Me.RadioButton3 = New System.Windows.Forms.RadioButton()
Me.RadioButton2 = New System.Windows.Forms.RadioButton()
Me.RadioButton1 = New System.Windows.Forms.RadioButton()
Me.Label3 = New System.Windows.Forms.Label()
Me.Button2 = New System.Windows.Forms.Button()
Me.RadioButton6 = New System.Windows.Forms.RadioButton()
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(56, 23)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Name"
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(96, 16)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(240, 20)
Me.TextBox1.TabIndex = 1
Me.TextBox1.Text = ""
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(8, 272)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(72, 24)
Me.Button1.TabIndex = 8
Me.Button1.Text = "Abbruch"
'
'TextBox2
'
Me.TextBox2.Location = New System.Drawing.Point(96, 40)
Me.TextBox2.Multiline = True
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(240, 96)
Me.TextBox2.TabIndex = 9
Me.TextBox2.Text = ""
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 40)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(80, 23)
Me.Label2.TabIndex = 10
Me.Label2.Text = "Beschreibung"
'
'RadioButton5
'
Me.RadioButton5.Location = New System.Drawing.Point(96, 210)
Me.RadioButton5.Name = "RadioButton5"
Me.RadioButton5.Size = New System.Drawing.Size(80, 24)
Me.RadioButton5.TabIndex = 16
Me.RadioButton5.Text = "Persönlich"
'
'RadioButton4
'
Me.RadioButton4.Location = New System.Drawing.Point(96, 194)
Me.RadioButton4.Name = "RadioButton4"
Me.RadioButton4.Size = New System.Drawing.Size(176, 24)
Me.RadioButton4.TabIndex = 15
Me.RadioButton4.Text = "Team"
'
'RadioButton3
'
Me.RadioButton3.Location = New System.Drawing.Point(96, 178)
Me.RadioButton3.Name = "RadioButton3"
Me.RadioButton3.Size = New System.Drawing.Size(176, 24)
Me.RadioButton3.TabIndex = 14
Me.RadioButton3.Text = "Kostenstelle"
'
'RadioButton2
'
Me.RadioButton2.Location = New System.Drawing.Point(96, 160)
Me.RadioButton2.Name = "RadioButton2"
Me.RadioButton2.Size = New System.Drawing.Size(176, 24)
Me.RadioButton2.TabIndex = 13
Me.RadioButton2.Text = "Niederlassung"
'
'RadioButton1
'
Me.RadioButton1.Location = New System.Drawing.Point(96, 144)
Me.RadioButton1.Name = "RadioButton1"
Me.RadioButton1.Size = New System.Drawing.Size(176, 24)
Me.RadioButton1.TabIndex = 12
Me.RadioButton1.Text = "Marktbereich"
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(8, 144)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(80, 32)
Me.Label3.TabIndex = 17
Me.Label3.Text = "Verwendung durch"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(264, 272)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(72, 24)
Me.Button2.TabIndex = 18
Me.Button2.Text = "Speichern"
'
'RadioButton6
'
Me.RadioButton6.Location = New System.Drawing.Point(96, 226)
Me.RadioButton6.Name = "RadioButton6"
Me.RadioButton6.Size = New System.Drawing.Size(80, 24)
Me.RadioButton6.TabIndex = 19
Me.RadioButton6.Text = "Funktion"
'
'ComboBox1
'
Me.ComboBox1.Location = New System.Drawing.Point(176, 228)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(160, 21)
Me.ComboBox1.TabIndex = 20
'
'frmPartnerlisteSpeichern
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(344, 301)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.RadioButton2, Me.ComboBox1, Me.RadioButton6, Me.Button2, Me.Label3, Me.RadioButton5, Me.RadioButton4, Me.RadioButton3, Me.RadioButton1, Me.Label2, Me.TextBox2, Me.Button1, Me.TextBox1, Me.Label1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmPartnerlisteSpeichern"
Me.Text = "Partnerliste speichern"
Me.ResumeLayout(False)
End Sub
#End Region
Dim empfaenger As New DataTable()
Dim dsempfaenger As New DataSet()
Dim mcbfunktionen As New MultiComboBox()
Public Sub New(ByVal dt As DataTable)
MyBase.New()
InitializeComponent()
empfaenger = dt.Copy
End Sub
Private Sub frmPartnerlisteSpeichern_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.RadioButton1.Checked = True
Me.ComboBox1.Enabled = False
Me.TextBox1.Text = ""
Me.TextBox2.Text = ""
mcbfunktionen = New MultiComboBox(Me.ComboBox1)
mcbfunktionen.DisplayColumnName = "Bezeichnung"
mcbfunktionen.ValueColumnName = "funktionsgruppenr"
mcbfunktionen.CheckNullValue = False
Dim dt As New DataTable()
dt = load_funktionen()
mcbfunktionen.Fill_Data(dt, True)
mcbfunktionen.SelectedIndex = 0
mcbfunktionen.Visible = True
End Sub
Private Function load_funktionen() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_get_funktionen"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("dbo.sp_edex_sb_get_funktionen::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If Me.TextBox1.Text = "" Then
MyMsg.show_standardmessage(714, MsgBoxStyle.Critical)
Exit Sub
End If
Dim pl As New edokadb.clsEdex_sb_partnerliste()
pl.cpMainConnectionProvider = Globals.conn
pl.sBezeichnung = New SqlString(CType(Me.TextBox1.Text, String))
pl.sBeschreibung = New SqlString(CType(Me.TextBox2.Text, String))
Dim i As Integer
If Me.RadioButton1.Checked Then i = 1
If Me.RadioButton2.Checked Then i = 2
If Me.RadioButton3.Checked Then i = 3
If Me.RadioButton4.Checked Then i = 4
If Me.RadioButton5.Checked Then i = 5
If Me.RadioButton6.Checked Then i = 6
If Me.RadioButton6.Checked Then
pl.iVerwendungcd = New SqlInt32(CType(Me.mcbfunktionen.SelectedValue, Int32))
Else
pl.iVerwendungcd = New SqlInt32(CType(0, Int32))
End If
pl.iVerwendung = New SqlInt32(CType(i, Int32))
pl.daErstellt_am = New SqlDateTime(CType(Now, DateTime))
pl.daMutiert_am = New SqlDateTime(CType(Now, DateTime))
pl.bAktiv = New SqlBoolean(CType(True, Boolean))
pl.iMutierer = New SqlInt32(CType(Globals.MitarbeiterNr, Int32))
Globals.conn.OpenConnection()
pl.Insert()
Globals.conn.CloseConnection(True)
save_partner(pl.iPartnerlistenr.Value)
Me.Close()
End Sub
Private Function save_partner(ByVal partnerlistnr As Integer) As Boolean
Try
Dim i As Integer
While empfaenger.Columns.Count > 11
empfaenger.Columns.RemoveAt(empfaenger.Columns.Count - 1)
End While
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + partnerlistnr.ToString + "_Partnerlist.xml"
Me.dsempfaenger.Tables.Add(Me.empfaenger.Copy)
Me.dsempfaenger.WriteXml(dokumentname)
Dim Connection As New SqlConnection()
Dim DA As New SqlDataAdapter("select * from edex_sb_partnerliste where partnerlistenr=" + partnerlistnr.ToString, Connection)
Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
Dim ds As New DataSet()
Dim fs As New FileStream(dokumentname, FileMode.Open, FileAccess.Read)
Dim mydata(fs.Length) As Byte
Try
fs.Read(mydata, 0, fs.Length)
fs.Close()
Connection.ConnectionString = Globals.sConnectionString
Connection.Open()
DA.Fill(ds, "empf")
Dim myRow As DataRow
myRow = ds.Tables(0).Rows(0)
myRow.Item(9) = mydata
DA.Update(ds, "empf")
Catch ex As Exception
MyMsg.show_standardmessage(715, MsgBoxStyle.Critical)
Return False
End Try
fs = Nothing
cb = Nothing
ds = Nothing
DA = Nothing
File.Delete(dokumentname)
Connection.Close()
Connection = Nothing
Return True
Catch EX As Exception
MyMsg.show_standardmessage(715, MsgBoxStyle.Critical)
Return False
End Try
End Function
Private Sub RadioButton6_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton6.CheckedChanged
If Me.RadioButton6.Checked = True Then Me.mcbfunktionen.Enabled = True Else Me.mcbfunktionen.Enabled = False
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub
End Class

View File

@@ -0,0 +1,751 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>21, 14</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AABeIQAAAk1TRnQBSQFMAgEBHQEAASIBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAAZADAAEBAQABCAYAASQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AUwAB
/zUAAf9AAAH/BwAB/zcAAf8GAAH/OQAB/wUAAf86AAH/AwAB/z4AAf8+AAH/QAAB/zwAAf8CAAH/OwAB
/wUAAf84AAH/BwAB/zUAAf8KAAH/8wABAwEwAQMBMAEDATABAwEwAQMLAAn/DgAB/gH8BgAJIAMAAfsB
AAEDATABAwEwAQMBMAEDATABAwoACf8NAAH+AvwFAAEgB/kBIAH5ASACAAH/AfsBAAEDATABAwEwAQMB
MAEDATABAwkAAv8BAAQHAv8MAAH+AvwGAAEgAvkF9gH5AiACAAH7Af8B+wEAAQMBMAEDATABAwEwAQMB
MAEDCAAC/wIABf8LAAH+AvwHAAEgAfkC9gP5AvYB+QEgAgAB/wH7Af8B+wwABOwBAAL/AwAE/wIAA+wB
AAUGAQAB/AUAA+wBIAH5AfYC+QH2AvkB9gH5ASAGAAH7Af8B+wH/AfsMAAL/AQAB+wHsAQABBwL/BQAB
BwH+Af8C/gIGCQABIAH5AfYC+QH2AvkB9gH5ASABAAHsA/8BAAH/AfsB/wH7Af8GAAHsA/8CAAL/AQAB
+wEHAQAD/wEAAewC/wEAAf4B/wH+Af8C/gEGBQAB7AP/ASAB+QH2AvkB9gL5AfYB+QEgAQAB7AP/CAAD
HwEAAewD/wIAA/8BAAH7AewBAAL/AQAB7AL/AQABBwH+AQcB/gH/Af4BBgUAAewD/wEgAfkC9gP5AvYB
+QEgAQAB7AP/AQAB/wYAAh8CAAHsA/8CAAL/AQcBAAH7AQcBAAL/AQAB7AL/AQAB/gH/Af4B/wH+Af8B
BgUAAewD/wEgAeMB+QX2AvkBIAEAAewD/wEAAf8GAAEfAQABHwEAAewD/wIABP8BAAH7AewBAAH/AQAB
7AL/AQABBwH+AQcB/gEHAf4BBgUAAewD/wEgAfkB4wf5ASABAAXsAf8BAAH/BwABHwXsAQAE/wEAAfsC
AAH/AQAE7AEAAf8B/gH/Af4B/wYABewJIAQAAewD/wEAAf8HAAEfAgAB7AL/BwACAQQAAewC/w0AAewD
/wEAAf8KAAXsAf8HAAEfAgAF7AH/CgAF7AH/CgAF7AH/DAAB7AP/BgABHwUAAewD/wwAAewD/wwAAewD
/wwABewLAAXsCwAF7AsABexpAAEDATABAwEwAQMBMAEDATABAxgABewZAAH7AQABAwEwAQMBMAEDATAB
AwEwAQMRAAH5FwAF7AcAAf8B+wEAAQMBMAEDATABAwEwAQMBMAEDBgABIA4AAewD/wEAA+wXAAH7Af8B
+wEAAQMBMAEDATABAwEwAQMBMAEDBAAC+QEgBwABIAUAAewD/woAASABAAEgAQACIAL/AQAD7AUAAf8B
+wH/AfsNAAL5ASAD7AMAASAGAAEHA/YBAAH/AQAD7AgAAewD/w0AAfsB/wH7Af8B+wkAA/kEAAEgAfkG
AAEHA/8B7AH/CgABIAEAAiAC/wEAAf8BAAPsAgAB7AP/AQAB/wH7Af8B+wH/AgABSAUAAewB/wL5ASAC
7AL5BQAB+wHsAQcE7AH/AQAB/woAAewD/wEAAf8GAAHsA/8JAAFIBAAB7AL/BfkHAAH7AewBBwHsA/8B
AAH/BgABIAEAASABAAIgA+wB/wEAAf8EAAHsA/8BAAH/BwABSAQAAewD/wP5A+wEAALsAwcE7AH/DAAB
7AP/AQAB/wQAAewD/wEAAf8HAAFIBAAB7AL/BfkGAAP7AQcB+wEHAvsC/wgAASABAAIgBewB/wQABewB
/wEAAf8CAAFIAQABSAUAAuwD+QH/AQAB+QcAAfsB7AH7AewB+wHsAQAD7A0AAewD/wYAAewD/wEAAf8C
AAJIBgAE+QL/AQAB/wL5BAAB+wHsAQAB+wHsAQAB+wHsCAABIAEAASABAAIgAgAF7AUABewB/wIAA0gE
AAT5BOwB/wEAAvkGAAH7AewCAAH7HAAB7AP/CQAC+QMAAewD/wIAAvkFAAH7AewfAAXsDQAF7AgABycP
AAQgBwAB+wEAAfsB7AEAAfsKAAH7AQAB+wHsAQAB+wH5AgAB+QUAAScCLQH/Ai0BJwS2CgADIAL/AfkG
AAHsAvsB7AH7AewEtgYAAewC+wHsAfsB7AEAAv8GAAEnAi0B9gItAScCtgwAAiAC/wT8BQAB7AH7AQcB
7AEHArYJAAHsAfsBBwHsAQcC/wcAAScB/wP2Af8BJwG2AQACtgQAAjQCAAE0AQACIAH/ASAD/AMABPsB
BwPsAbYBAAK2BAAE+wEHA+wBAAP/BQABJwItAfYCLQEnBLYGAAL/AwADIAH8Af8C/AIABOwC+wLyBLYE
AATsAvsC8gT/BQABJwItAf8CLQEnA7YGAAL/AgAB3QQgAv8C/AQAAewB+wEHAewB+wEHA7YHAAHsAfsB
BwHsAfsBBwEABP8EAAcnBbYFAAP/AwAB/AL/A/wEAAH7AewB+wHsAfsBBwW2BQAB+wHsAfsB7AH7AQcB
AAL/AwAB7AP/BAAHtgIAAgcE/wEAAt0BAAT8AQAB7AP/AgAB7AEAAgcFtgEAAewD/wIAAewBAAMHAQAC
/wIAAewD/wQABLYBAAK2AgACBwEABP8BAAHdBgAB7AP/BAAEtgEAArYBAAHsA/8FAAUHAgAB7AP/AQAB
/wIABLYBAAG2AwACBwEAAv8CAAHdBwAB7AP/AQAB/wIABLYBAAG2AgAB7AP/AQAB/woAAewD/wEAAf8C
AAa2AwADBwEAAv8BAAPdBQAB7AP/AQAB/wIABrYCAAHsA/8BAAH/CgAF7AH/DAAFBwEAA90FAAXsAf8K
AAXsAf8BAAH/CgAB7AP/AQAB/w8AAd0BAALdBwAB7AP/AQAB/woAAewD/wEAAf8KAAXsAf8MAATdAQAB
3QgABewB/woABewB/wwAAewD/wwABt0KAAHsA/8MAAHsA/8MAAXsGwAF7AsABexVAAH/BQALLQgAAewB
BwHsGgAB/w8AAS0J/wEtBgAB7AMHA+wZAAH/BwAB/wYAAS0D/wEtBf8BLQMAAuwFBwXsCAABAwEAAfsB
AAEDCgAB/wYAAf8HAAEtAv8DLQT/AS0DAAHsAf8EBwH/BuwGAAEDBfsBAwoAAf8FAAH/BAAD7AEtAf8F
LQP/AS0CAALsAf8CBwL/AwcE7AIAA+wCAwH7AQMBAAEDAfsMAAH/AwAB/wgAAS0B/wItAf8DLQL/AS0D
AAHsAf8CBwL6AvkDBwLsBQABAwL7AQAB7AEAAvsBAw0AAf8FAAHsA/8BLQH/AS0D/wMtAf8BLQEAAewC
/wLsAf8FBwLsAQABBwEAAewD/wIDAfsBAwEAAQMB+w4AAf8GAAHsA/8BLQb/Ai0B/wEtAQAB7AP/AQAC
7AH/AQcC7AEHAf8BAAEHAQAB7AP/AQABAwX7AQMOAAH/BQAB7AP/AS0H/wEtAf8BLQEAAewD/wEAAf8B
AALsAQcE/wIAAewD/wEAAgMBAAH7AQABAwwAAf8CAAH/BQAB7AP/AS0J/wEtAQAB7AP/AQAB/wIAAewG
/wEAAewD/wEAAf8BAAQDCwAB/wUAAf8DAATsCy0BAAXsAf8BAAH/AQAB7AP/AuwBAAXsAf8BAAH/DQAB
/wcAAf8EAAHsA/8BAAH/CgAB7AP/AQAB/wIAA+wFAAHsA/8BAAH/CwAB/woAAf8DAAXsAf8KAAXsAf8K
AAXsAf8cAAHsA/8MAAHsA/8EAAH/BwAB7AP/HAAF7AsABewLAAXsFwAQNyAHBgAF7AUAEDcDBwsPEgcE
AAHsBPkDAAPsAQABNwFRCwMBMAI3AwcBAAm8AQACBwsABQcDAAb5AwAC7AIAATcBFQEPBEoBAwFtAQMD
SgEpATABNwMHAQAJ/wEAAgcCAAkDAQAEBwIAAvkGAAL5AQAC7AEAATcBDgHsAesEeQFYBHkBSgEDATcD
BwEACf8BAAIHAQAB+wEACQMBAAMHAgAB+QHsBgAD+QEAAewBAAE3AQ8BWAEpA3kBXgGZAV4EeQEUATAD
BwEACf8BAAIHAQAB/wH7AQAJAwEAAgcBAAL5AewGAAH5AQAB+QEAAewBAAE3ARABoAEwAQMBeQFeAZkB
XgGZAV4CeQFYASIBMAMHAQAJ/wEAAgcBAAH7Af8B+wEACQMBAAEHAQAB+QLsCAAC+QHsAQABNwEiAV4B
kgFtAVgBmQFeAQcBXgGZAVgCeQFeASIDBwEACf8BAAIHAQAB/wH7Af8B+wwAAfkC7AgAAvkB7AEAATcB
EAGgAeUB7QEPARABIgEQARwBWAJ5AVgBHAEQAwcBAAn/AQACBwEAAfsB/wH7Af8B+wH/AfsB/wH7AQAF
BwEAAfkBAAHsAQAB7AYAAvkB7AEAATcBDwHlAqAB5QGgAeUBwwEUASIBFQEiAQ4BIgEwAwcBAAn/AQAC
BwEAAf8B+wH/AfsB/wH7Af8B+wH/AQAFBwEAAfkBAAPsBgAC+QIAATcBDwGgAeUCoAHlAaAB5QGgAeUB
oAFRAQMCNwMHAQAG/wPvAQACBwEAAfsB/wH7BwAFBwEAAvkBAALsBgAB+QHsAgABNwEPBKABHAEDAewB
AwHrAVEBSgEwAjcDBwEABv8BAAEUAQABQwMHAwAIBwMAAQcCAAL5AwAE7AH5BAABNwEDAeoESgUDATAD
NwMHAQAG/wEAAbwBEBAHAgABBwEAA/kDAALsAvkFAAI3BAMKNwMHAQAG8QEAAQ8MBwEAAwcBAAEHAQAB
BwUABfkGABA3AwcIDg4HAwAEBxAAEDcgBxQAAQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQAB
BwIAAQcBAAHsAwABBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEHAQAB
BwEAAQcCAAEHAQAB7AQHAgABBwEAAQcBAAEHAgABBxUAAQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcB
AAEHAQABBwIAAQcBAAHsA/8BBwIAAQcBAAEHAQABBwIAAQcBAAoCBgAKAgcAAfwBAAH8AQAB/AEAAfwB
AAH8BgAB7AH/BAcB/wMHAf8BBwQAAQII/wECBgABAgj/AQIGAAH8CP8HAAHsCv8BBwQAAQIB/wgCBgAB
AgH/CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAHsAf8EBwH/AwcB/wEHBAABAgH/AwIBBwQCBgABAgH/AwIB
BwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAHsCv8BBwQAAQIC/wECAQcDAgH/AQIGAAECAv8B
AgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gIAAewB/wgHAf8BBwQAAQIB/wECAQcD
AgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWAgAB7Ar/AQcE
AAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wECBJgDAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAgAB
7AH/AgcB/wUHAf8BBwQAAQIB/wICAv8CAgH/AQIGAAECAf8CAgL/AgIB/wECApgB/wGYAgAB/AEAAfwB
AAH8AQAB/AEAAfwBAALWAf8B1gIAAewK/wEHBAABAgj/AQIGAAECCP8BAgGYAv8BmAMACP8B/AH/AdYB
BwHWAgAB7AH/AgcB/wUHAf8BBwQACgIGAAoCApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YC
AAHsCP8bAAGYAf8CmAL/ApgB/wGYBgAK1gIAAewB/wYHAf8B7AH/GQABmAj/AZgGAAHWCP8B1gIAAewI
/wHsGgAKmAYACtYCAArsFgAQAiYAAQMB/wgAAgINAAECJAAB7AEDAewB/wgAAQIBAAIDBgACBwEAAQMB
AAECIgABAwHsAQMB7AEDAf8IAAECAQACAwYAAgcBAAEDAQABAgEAAfwBAAH8AQAB/AEAAfwBAAH8BwAB
/AEAAfwBAAH8AQAB/AEAAfwHAAEDAewBAwHsAQMB7AH/AQAB7AYAAQIBAAIDBgACBwEAAQMBAAECAfwI
/wcAAfwI/wgAAewBAwHsAQMB7AEDAf8BAAHsBgABAgEAAgMJAAEDAQABAgEAAf8BAAH8Af8B/AEAAv8B
/AcAAf8BAAH8Af8B/AEAAv8B/AcAAQMB7AEDAgAB7AH/AQAB7AYAAQIBAAwDAQABAgH8Af8B/AEAAQcB
AAH8AQcB/wcAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gMAAewBAwHsAgcBAwH/AQAB7AEAAQYEAAECAQAC
AwgAAgMBAAECAQAB/wEAAfwBAAH8AQAB/AH/AfwHAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYDAAEDAewB
AwHsAQMB7AH/AgABBgX+AQIBAAEDAQAIBwEAAQMBAAECAfwB/wH8Af8B/AEAAf8BAAEHBwAB/AH/AfwB
/wH8AQAB/wEAAQcBAAHWAv8B1gMAAewBAwHsAQMB7AEDAf8BAAFtBv4BAgEAAQMBAAgHAQABAwEAAQIB
AAH8AQAB/wEAAfwB/wH8AQAB/AcAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAEDAewBAwHsAQMB
7AH/AQAB7AFtAf4EbQECAQABAwEACAcBAAEDAQABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB
/AEAAfwBAAH8AQAC1gH/AdYDAAHsAQMB7AEDAewBAwH/AQAB7AEAAm0DAAECAQABAwEACAcBAAEDAQAB
AgEACP8B/AcACP8B/AH/AdYBBwHWAwABAwHsAQMB7AEHAf8B7AEAAewCAAFtAwABAgEAAQMBAAgHAwAB
AgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAwAB7AEDAQcB/wHsAQAD
7AYAAQIBAAEDAQAIBwEAAQcBAAECFAAK1gMAAQcB/wHsAQAF7AYAAQIOAAECFAAB1gj/AdYSABACFAAK
1gIAAUIBTQE+BwABPgMAASgDAAFAAwABkAMAAQEBAAEBBQABgAEEFgAD/4EAAv8GAAH/AfkGAAHnAf8G
AAHDAfMGAAHDAecGAAHhAccGAAHwAY8GAAH4AR8GAAH8AT8GAAH4AR8GAAHwAZ8GAAHBAccGAAGDAeMG
AAGPAfEGAAL/BgAC/wcAAR8B+AEAAf8B+QL/AQABDwH4AQAB/wHwAfgBAwEAAQcB+AEAAf8B4AHwAQEB
AAEDAfgBAAH/AcEB8AEBAQABAQH4AQAB+AEDAfABAQIAAYABAAGAAQcBgAEBAQABHwMAAQ8BAAEBAQAB
HwMAAQ8BAAEBAQABEQMAAQ8BAAIBAfMDAAEPAQABAQEAAXUDAAEPAQABAQEAAX4DAAEfAQABAwHAAX4B
wAEAAcABPwHAAX8BwAF+AcABYwHAAX8BwAF/AfABfQHwAX8B8AF/AfABfwHwAX8B8AF/AfABfwHwAX8E
/wEAAR8G/wEAAQ8C/wHgA/8BAAEHAf8B+wHBAf8B+AE/AQABAwHvAf8BwAE/AfABfwEAAQEBxwH3AcAB
fwFQAQ8CAAHAAe8BwAEPAfABHwEAAR8BwQHPAcABHwHQAQMBAAEXAcABHwEAAR8B8AEHAQABGwHAAT8B
gAEfAVABBwEBAfsBwAEPAQABHwH8AQcBAAF7AcABHwEAAR8B0AEHAQABVwHAAR8BgQEfAf8BBwHAAU8B
wAEPASQB/wFTAQcBwAFHAYABBwHmA/8B8AF/AZwBEwHnA/8B8AF/AfwBHwHgAQEB/wGHAfQBAQH0AQEB
4AEBAf8BAwHwAQEB8AEDAeABAQH/AQAB+AEBAfgBAwHgAQEBgAEBAcABAQHAAQEB4AEBAcABgAHAAQEB
wAEBAeABAQHAAQAB8AEBAfADAAGABAABAQEGAgABAQEEAQABBAEBAwABHwIAAgEBAAEBAQABHwEAAgEB
gwEAAQEBAAEPAQABAQEAAX8BAAEBAYABDwEAAQEBAAF/AcABfwHAAQ8BwAF/AcABfwHAAX8B4AEfAcAB
fwHAAX8B8AF/AeABHwHwAX8B8AF/AfABfwHgAR8B8AF/AfABfwT/Af4BHwP/AfkB8AEBAfwBDwL/AecB
/wHwAQEB4AEDAf4BHwHDAfMB8AEBAcABAAH4AQcBwwHnAfABAQHAAQAB+AEDAeEBxwGAAQEBgAEAAYAB
AwHwAY8BAAEBAwABAwH4AR8BAAEBAwABAwH8AT8BAAEBAwABAwH4AR8BAAEBAQABAQEAAQcB8AGfAQAB
AQMAAR8BwQHHAQABAQEAAYEBAAF/AYMB4wHAAX8BwAHHAcABfwGPAfEBwAF/AcABfwHAAX8C/wHwAX8B
8AF3AfABfwL/AfABfwHwAX8B8AF/Av8GAAH8AR8GAAHwAXEGAAHgAXMGAAHPAckGAAHPAcUGAAGPAdUG
AAGPAfEGAAGPAfEGAAGrAfEGAAGjAfMGAAGTAfMGAAHOAQ8GAAGOAR8GAAH4AT8GAAL/BgAC/wHwAQAB
8AMAAv8B8AEAAfADAAL/AfABAAHwBAABPwEAAT8BAAE/AQABBwEAAT8BAAE/AQABPwEAAQcBAAE/AQAB
PwEAAT8BAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQAB
PwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQAB
BwL/AfABAwHwAQMBAAEPAv8B8AEDAfABAwEAAR8C/wHwAQMB8AEDAQABPwH8AX8CAAT/AfABfwIABP8B
wAF/AgAE/wEAAR8DAAE/AQABPwEAAR8DAAE/AQABPwEAARcDAAE/AQABPwEAAQcDAAE/AQABAwUAAT8B
AAEDBQABPwEAAQMFAAE/AQABAwUAAT8BAAEDAQABBwMAAT8BAAEDAQABFwMAAT8BAAEDAQABHwIAAv8B
8AEDAQABHwIAAv8B8AEDAQABHwIAAv8B8AEDFgAL
</value>
</data>
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ComboBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RadioButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ComboBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Partnerlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="C1CommandHolder1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>158, 23</value>
</data>
<data name="C1CommandHolder1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>312, 23</value>
</data>
<data name="C1ContextMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1CommandLink21.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1mnupartner1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1mnupartner1.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKdJREFUOE+Vk9sV
gCAIQHXZhnAAd3Anh+m/DxMyQx6pnMOpSC5PvWMSYyzcFkLw3GZ+A4BKPSiAqjM4cgXQFoBHXgJMIr8Z
WE/ntJpJ5JJTVrWXtgsAR4D+AtpPPMQzoDY8NxmbWQLN4mvQUYmGar2QIwbn9Cg2sr0DlAJIiWynKOA6
TcDQxAFRASjVuStk0jIQDRQ7vZABnZC8E4s9+C3BmgKL3BfpBsVap3lXctUNAAAAAElFTkSuQmCC
</value>
</data>
<data name="C1CommandLink11.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainEmpfaengerBearbeiten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1CommandLink12.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainEmfpaengerLoeschen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainDatei.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainNeuerSerienbrief.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainNew.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainNew.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJZJREFUOE+tk0sO
gCAMRDk95+JI7l1UBxydkEIxStJYCfP6oaQkyyxZztl075XfA/AfAlQ08pchBCgIJdFcEA7TSinV57ft
t3WK/XJIh4imUeFPAUiLKQNAgUaeAnqxRqcwzABZtLqf1aU+7gE7WwH7dlut7GpeeBOAeLVfnY+HaQRY
iqxPQSLGNXtT1d//p4cVzv9fBw52ziDx4JP0LQAAAABJRU5ErkJggg==
</value>
</data>
<data name="C1MnuMainSerienbriefLaden.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainLoad.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainLoad.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJ9JREFUOE+lkt0N
wCAIhHGm7tQhfPLJHZzWFv+KgJJYE2M03neH6ICNGGPmZ957x8+WewTQ8V4UQFWMQj4RNAD3laFPjaA5
qwCt5pWzAKAYU9BhOH8lUBGFmNG1ei1Ae7juTteKswC1jdC6WdepGyyVcOJi3O/+w+RELmslqGVNcdEp
BMgp7VeaaCQ4EeNzlASn4gL4Ix6ATe/lPyBtfABpHWvCAHLT1QAAAABJRU5ErkJggg==
</value>
</data>
<data name="C1MnuSerienbriefLoeschen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainSerienbriefLoeschen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainSerienbriefLoeschen.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJhJREFUOE+tUoEN
wCAI07c9wOv2kxMnpKCwmM2EmFhoS2NOzqm1NguVUvK2vXc2KgSJAE/HBr7rlUcGaRiLiGh2O8yqDMo9
5cfgw7C4VOuwoiICZV7ByyypncEuKC+hLg5MamIb8/jiwJ0dgKww7V/9trnEDGZvGxoR2r+iCDksVLa/
kTDXBRJEVkOSEHwL4AQPszgh+qX3BuVQ5K56Me8SAAAAAElFTkSuQmCC
</value>
</data>
<data name="C1MnuMainSerienbriefabschliessen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainAbschluss.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainAbschluss.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKhJREFUOE+dk1ES
gyAMROtlPQQH4HQepv9+pCwlzLoNiGUmozLZx5LE7SUr52y6l1LadG/4DQCvkvgDDMUQagD0CKAnLwGi
k49i+y76NfTOEBbfZvv+fQ4CeRUSAlx8vs00GnAOQJIL2QHtrQFcDKG8d0Brk7erFq8mByLeZ0Ctg8df
AJ6sC4BdSF0uDkIAC7gTNCPhSHcHk/6jFkMHoN5N4VS8/Nu2xA/QiaNhiP0CAQAAAABJRU5ErkJggg==
</value>
</data>
<data name="C1MnuMainSerienbriefSpeichern.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainSave.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainSave.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJRJREFUOE+lU1sO
gCAMg2vzxRd34LRIeQmdI6gkZGGh7VrUGlohhMQ955zlnnoGwbzyRUEIcOQ+gLxBpBEIkiflI4Kd8jEB
e56AwkL3PjJ4OzqAS4BK6l2Za0l/IdEmyPk3Z7XuXkOoMRjnLUGVuhXbZc2GsCXA3mef0aRdnScaXtF8
C8YXWSb4Ci4Ef8CD4DA48RdfEExrwmxzL9QAAAAASUVORK5CYII=
</value>
</data>
<data name="C1MnuMainFensterSchliessen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainClose.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainClose.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAALBJREFUOE+Vk1ES
gCAIRO2ynsMvz+XNrMW2EEzNGcap4LWLeIQQ6hW76xgl1lJKxco5Aya7jdmPJDmlMAVNASgmBPtIEQEx
Rme5K9Yw2KIl7CgeAqwCPmuAFF4vCNGwpQIWA+AC0lYKxH9KvrhZ9A1EEwG1PRBImxsdvQJ+xGk4wFvY
zdOyBxywu8of46oHBuCmWfyMILSgPE/vzDM0dg52bxrzHkVKwV+G5HdH9UU4ARvjbvL2kifRAAAAAElF
TkSuQmCC
</value>
</data>
<data name="MnuMainDokument.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainVorlageImportieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainVorlageImportieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainVorlageBearbeiten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainVorageBearbeiten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainVorageBearbeiten.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKhJREFUOE+dk0sO
gCAMRPXarFxxLm6mDlgcyxSNJE34tG9aCuviRs5593sppdXvhWsAeJyOA1AGI9AbQA5g6xHKylcQO/f5
dmYE6z5KGYd+tL07sGcX1BwCrkuu5zWLN0AppTpC/Z43/ieAOQLA6p8BkTp3SN62XYIBTB1l8Fl9E74T
3AVuqepM9CK9ytAV8cgerAcAabMNJYg0pOKvEmak2UeTnVF/5AC+u/ttX9vfwQAAAABJRU5ErkJggg==
</value>
</data>
<data name="C1CommandLink1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1mnumainpreview.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1mnumainpreview.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJFJREFUOE/Nk0EK
wCAMBPXbnjz5Ln/WdlMjYTUlpZcKIoo7m5iYE43W2sFnpZTMZ+4eADuuiwtwK4aQJ0CvAOo8RCp+hrAr
xOI8aHP1UrE5Q9x7FzGvqdZ9JAxYnDWSKICdNZ1PESAqF8AvrhFMZxV7KaApbCUEiMs8pQrxvuAekMrc
gDiEO/aXkOBH2/y+2ZUnTEkz2abejZIAAAAASUVORK5CYII=
</value>
</data>
<data name="MnuMainVorschauErstellen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainVorschauErstellen.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJFJREFUOE/Nk0EK
wCAMBPXbnjz5Ln/WdlMjYTUlpZcKIoo7m5iYE43W2sFnpZTMZ+4eADuuiwtwK4aQJ0CvAOo8RCp+hrAr
xOI8aHP1UrE5Q9x7FzGvqdZ9JAxYnDWSKICdNZ1PESAqF8AvrhFMZxV7KaApbCUEiMs8pQrxvuAekMrc
gDiEO/aXkOBH2/y+2ZUnTEkz2abejZIAAAAASUVORK5CYII=
</value>
</data>
<data name="MnuMainDokumenteGenerieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainDokumenteGenerieren.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJBJREFUOE+9UzES
wCAI0287OfltazyxGKXaDvWOQY4kENQ7OimlzLkQgueceQeBPqVwIlyCAeQA0SsCVj4ieFI+JrCUY3RZ
hzk7EwgI8xcXqg/INT9GU1euoxhAjiUJE4g6wAIQQtXB0IVurYJEGYD2sHpOdXFbojfxpYPJ3FceGG+6
z7/dwuaTDP4cf6hfCy8QlCaM9ek25gAAAABJRU5ErkJggg==
</value>
</data>
<data name="MnuMainDokumenteDrucken.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainDokumenteDrucken.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAALNJREFUOE+NU9EV
xCAMuq7tAM7lZneSE0tp0tf0+WEaCEQ9Pha996/nWmuH58o9CDRm4YUQ/1IwgL5WcQ7IpHtn7abkF+xT
ZxK4LWKCKPMs0sNWFTGfJwJ2GmPcOPZwMwICgQLYiQBG/qbAgSjSJd5PgiVleyVguotvtolVEe1B0goL
aToDqpJ9pE6gRNlRryt/XjIdVOXdLtN/iBaRRGElnTN787g2kch99y6EnTJTuaj7AWA972ww0yDcAAAA
AElFTkSuQmCC
</value>
</data>
<data name="MnuMainDokumenteBestaetigen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainDokumenteBestaetigen.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAJFJREFUOE+dk4EN
wCAIBHVtB3CHTtuK6Rt4xaAkJtXAwQPNiazW+vJbKSXzm3sXgLbmOAGXwRLIR0BHAM4cAnDW9LSSo0e0
TJpbcMR6khuABHZpNwBICwGQCXJ0XwzgHxPG1UsbDvStoUMC+oBpMIAzm4qWG6Wm4AWzBMuhMXIvjirY
7YPpgSkhuoXYg/Bv6jh+RHTaM2dhDaMAAAAASUVORK5CYII=
</value>
</data>
<data name="MnuMainEmpfaengerliste.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainImportEmpfaneger.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainImportEmpfaenger.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainExportEmpfaenger.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainExportEmpfaenger.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainLoadPartnerliste.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainLoadPartnerliste.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainSaveAsPartnerlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainSaveAsPartnerlist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainAddEDOKAHOSTPartner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainAddEDOKAHOSTPartner.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKdJREFUOE+Vk9sV
gCAIQHXZhnAAd3Anh+m/DxMyQx6pnMOpSC5PvWMSYyzcFkLw3GZ+A4BKPSiAqjM4cgXQFoBHXgJMIr8Z
WE/ntJpJ5JJTVrWXtgsAR4D+AtpPPMQzoDY8NxmbWQLN4mvQUYmGar2QIwbn9Cg2sr0DlAJIiWynKOA6
TcDQxAFRASjVuStk0jIQDRQ7vZABnZC8E4s9+C3BmgKL3BfpBsVap3lXctUNAAAAAElFTkSuQmCC
</value>
</data>
<data name="MnuMainNeuerEDOKAPartnerErfassen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainNeuerEDOKAPartnerErfassen.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAALRJREFUOE+VU4sV
hCAMK2szADvcNgzgFgzC2Z7RUIucvtcH1iZNPyZxTymle1/OOXnf9F0J+NkDb4QhWIHelOgVgc/8F8Ei
MxTMTpGoZsrct88W2lnaWwIFKukjwfHRgrwC9lncbGzHPvRaq1lUClQMDdoHZ+Pkc0Uw7AXACuI7K6AS
L+x9icRUtNbMol4MmTWYDQpAjM6D6HFDfRncA57Q9J+AEm7msgSwKVjvmIJdf77I5AvHEcnm6xxCUAAA
AABJRU5ErkJggg==
</value>
</data>
<data name="MnuMainNeuerEmpfaengerErfassen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainNeuerEmpfaengerErfassen.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKpJREFUOE+VUwES
gCAIq2/7AN/lX3xINW1FE6y441TOjQm4LmI5501jKaVVY+EZBNaOiwOhCwZQHUS/CDTzJ4JZ5s8Ek8zv
T/CK5mQmkV17LYOq28xbKWXwq7hR2855eAABotnuPOQdjWvttCsUOGB/PggGyO4tgaei1cI6FMBrrc3V
hgEjgCsVkFQVTCdUnwEykR3/D4K1mFEHho8FIIIk6EAcW7x3494vOw2kowGY+y+7AAAAAElFTkSuQmCC
</value>
</data>
<data name="C1CommandMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainAddColumn.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainAddColumn.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainDeleteColumn.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainDeleteColumn.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainRenameColumn.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainRenameColumn.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuMainSpaltenselektion.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainSpaltenselektion.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainCheckEmpfaenger.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainCheckEmpfaenger.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKRJREFUOE+VkwEO
gCAIRfNM3X/zAN6J+hnywchiY8OQ5wetbN4krOOyLPKbtCaPfhau4Bd7KtZvXwA4wTnUMPQNIrXWyaOi
DOAKsUntNyAWh/7TIQ4FDIgqPvU/tN/BPEAMld1exZg+Q/ytWCaFsOxxOt4Gue1RJUFFhCDNAL0kU9EB
srfuKltjLQYYcSY//UcYAIgHXC/13Z76B2VV5/IM6W2YHQ5jfmWIXHaLAAAAAElFTkSuQmCC
</value>
</data>
<data name="mnuctAddHost.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuctAddHost.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKdJREFUOE+Vk9sV
gCAIQHXZhnAAd3Anh+m/DxMyQx6pnMOpSC5PvWMSYyzcFkLw3GZ+A4BKPSiAqjM4cgXQFoBHXgJMIr8Z
WE/ntJpJ5JJTVrWXtgsAR4D+AtpPPMQzoDY8NxmbWQLN4mvQUYmGar2QIwbn9Cg2sr0DlAJIiWynKOA6
TcDQxAFRASjVuStk0jIQDRQ7vZABnZC8E4s9+C3BmgKL3BfpBsVap3lXctUNAAAAAElFTkSuQmCC
</value>
</data>
<data name="mnuCTADDEdokapartner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuCTADDEdokapartner.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAALRJREFUOE+VU4sV
hCAMK2szADvcNgzgFgzC2Z7RUIucvtcH1iZNPyZxTymle1/OOXnf9F0J+NkDb4QhWIHelOgVgc/8F8Ei
MxTMTpGoZsrct88W2lnaWwIFKukjwfHRgrwC9lncbGzHPvRaq1lUClQMDdoHZ+Pkc0Uw7AXACuI7K6AS
L+x9icRUtNbMol4MmTWYDQpAjM6D6HFDfRncA57Q9J+AEm7msgSwKVjvmIJdf77I5AvHEcnm6xxCUAAA
AABJRU5ErkJggg==
</value>
</data>
<data name="mnuctaddempfaenger.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuctaddempfaenger.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKpJREFUOE+VUwES
gCAIq2/7AN/lX3xINW1FE6y441TOjQm4LmI5501jKaVVY+EZBNaOiwOhCwZQHUS/CDTzJ4JZ5s8Ek8zv
T/CK5mQmkV17LYOq28xbKWXwq7hR2855eAABotnuPOQdjWvttCsUOGB/PggGyO4tgaei1cI6FMBrrc3V
hgEjgCsVkFQVTCdUnwEykR3/D4K1mFEHho8FIIIk6EAcW7x3494vOw2kowGY+y+7AAAAAElFTkSuQmCC
</value>
</data>
<data name="c1mnupartner2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1mnupartner2.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAALRJREFUOE+VU4sV
hCAMK2szADvcNgzgFgzC2Z7RUIucvtcH1iZNPyZxTymle1/OOXnf9F0J+NkDb4QhWIHelOgVgc/8F8Ei
MxTMTpGoZsrct88W2lnaWwIFKukjwfHRgrwC9lncbGzHPvRaq1lUClQMDdoHZ+Pkc0Uw7AXACuI7K6AS
L+x9icRUtNbMol4MmTWYDQpAjM6D6HFDfRncA57Q9J+AEm7msgSwKVjvmIJdf77I5AvHEcnm6xxCUAAA
AABJRU5ErkJggg==
</value>
</data>
<data name="c1mnupartner3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1mnupartner3.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAKpJREFUOE+VUwES
gCAIq2/7AN/lX3xINW1FE6y441TOjQm4LmI5501jKaVVY+EZBNaOiwOhCwZQHUS/CDTzJ4JZ5s8Ek8zv
T/CK5mQmkV17LYOq28xbKWXwq7hR2855eAABotnuPOQdjWvttCsUOGB/PggGyO4tgaei1cI6FMBrrc3V
hgEjgCsVkFQVTCdUnwEykR3/D4K1mFEHho8FIIIk6EAcW7x3494vOw2kowGY+y+7AAAAAElFTkSuQmCC
</value>
</data>
<data name="GroupBox3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="GroupBox4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TextBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="BtnHelp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</value>
</data>
<data name="$this.Name">
<value>frmPartnerlisteVerwalten</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wDdpsIA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABegF6AXoBegFAAAAAAAADwAF6AXoBegF6AUAAAAAABEPAAXo
BegF6AXoBQAAAAAPEQ8ABegF6AXoBegFAAAAEQ8AAAAAAAAAAAAAAAAAAA8ABwcRERERAGlpAAAAAAAR
AAcHABEREREAaQAAAAAAAAAHBwAREQAAaQAAAAAAAAAABwcHABERAGlpaQAAAAAAAAAHBwcHBwBpaWkA
AAAAAAAAAAAAAABpAGlpAAAAAAAAAAAAaWlpaQBpAAAAAAAAAAAAAGlpaWlpaQAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAf//8AD///AAf//wAD//8AAf//AAD//wAH//8AB///AAf//8AD
///gA///8AP///gH///4B///+Af///////8=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,422 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmSBEdit
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(frmSBEdit))
Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
Me.DateiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.SpeichernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.StatusEmpfängerlisteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DruckstapelLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DokumentePruefenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.ListBox2 = New System.Windows.Forms.ListBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.ListBox1 = New System.Windows.Forms.ListBox()
Me.txtBLDossier = New System.Windows.Forms.TextBox()
Me.lblBLDossier = New System.Windows.Forms.Label()
Me.txtausgelöst = New System.Windows.Forms.TextBox()
Me.txtbestätigt = New System.Windows.Forms.TextBox()
Me.txtgedruckt = New System.Windows.Forms.TextBox()
Me.txterstellt = New System.Windows.Forms.TextBox()
Me.txtinbearbeitung = New System.Windows.Forms.TextBox()
Me.txtfehlerhaft = New System.Windows.Forms.TextBox()
Me.txtStatus = New System.Windows.Forms.TextBox()
Me.lblausgelöst = New System.Windows.Forms.Label()
Me.lblBestätigt = New System.Windows.Forms.Label()
Me.lblGedruckt = New System.Windows.Forms.Label()
Me.lblErstellt = New System.Windows.Forms.Label()
Me.lblInBearbeitung = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.lblStatus = New System.Windows.Forms.Label()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.empflist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.CTMenuEmpflist = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.MenuStrip1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
CType(Me.empflist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.CTMenuEmpflist.SuspendLayout()
Me.SuspendLayout()
'
'MenuStrip1
'
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiToolStripMenuItem, Me.SpeichernToolStripMenuItem, Me.StatusEmpfängerlisteToolStripMenuItem, Me.DruckstapelLöschenToolStripMenuItem, Me.DokumentePruefenToolStripMenuItem, Me.DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem})
Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Size = New System.Drawing.Size(877, 24)
Me.MenuStrip1.TabIndex = 0
Me.MenuStrip1.Text = "MenuStrip1"
'
'DateiToolStripMenuItem
'
Me.DateiToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BeendenToolStripMenuItem})
Me.DateiToolStripMenuItem.Name = "DateiToolStripMenuItem"
Me.DateiToolStripMenuItem.Size = New System.Drawing.Size(46, 20)
Me.DateiToolStripMenuItem.Text = "Datei"
'
'BeendenToolStripMenuItem
'
Me.BeendenToolStripMenuItem.Name = "BeendenToolStripMenuItem"
Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(120, 22)
Me.BeendenToolStripMenuItem.Text = "Beenden"
'
'SpeichernToolStripMenuItem
'
Me.SpeichernToolStripMenuItem.Name = "SpeichernToolStripMenuItem"
Me.SpeichernToolStripMenuItem.Size = New System.Drawing.Size(71, 20)
Me.SpeichernToolStripMenuItem.Text = "&Speichern"
'
'StatusEmpfängerlisteToolStripMenuItem
'
Me.StatusEmpfängerlisteToolStripMenuItem.Name = "StatusEmpfängerlisteToolStripMenuItem"
Me.StatusEmpfängerlisteToolStripMenuItem.Size = New System.Drawing.Size(133, 20)
Me.StatusEmpfängerlisteToolStripMenuItem.Text = "Status Empfängerliste"
'
'DruckstapelLöschenToolStripMenuItem
'
Me.DruckstapelLöschenToolStripMenuItem.Name = "DruckstapelLöschenToolStripMenuItem"
Me.DruckstapelLöschenToolStripMenuItem.Size = New System.Drawing.Size(125, 20)
Me.DruckstapelLöschenToolStripMenuItem.Text = "Druckstapel löschen"
'
'DokumentePruefenToolStripMenuItem
'
Me.DokumentePruefenToolStripMenuItem.Name = "DokumentePruefenToolStripMenuItem"
Me.DokumentePruefenToolStripMenuItem.Size = New System.Drawing.Size(125, 20)
Me.DokumentePruefenToolStripMenuItem.Text = "&Dokumente pruefen"
'
'DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem
'
Me.DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem.Name = "DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem"
Me.DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem.Size = New System.Drawing.Size(292, 20)
Me.DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem.Text = "Dokumente prüfen und EDKB08-Struktur generieren"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.ListBox2)
Me.GroupBox1.Controls.Add(Me.Label3)
Me.GroupBox1.Controls.Add(Me.Label2)
Me.GroupBox1.Controls.Add(Me.ListBox1)
Me.GroupBox1.Controls.Add(Me.txtBLDossier)
Me.GroupBox1.Controls.Add(Me.lblBLDossier)
Me.GroupBox1.Controls.Add(Me.txtausgelöst)
Me.GroupBox1.Controls.Add(Me.txtbestätigt)
Me.GroupBox1.Controls.Add(Me.txtgedruckt)
Me.GroupBox1.Controls.Add(Me.txterstellt)
Me.GroupBox1.Controls.Add(Me.txtinbearbeitung)
Me.GroupBox1.Controls.Add(Me.txtfehlerhaft)
Me.GroupBox1.Controls.Add(Me.txtStatus)
Me.GroupBox1.Controls.Add(Me.lblausgelöst)
Me.GroupBox1.Controls.Add(Me.lblBestätigt)
Me.GroupBox1.Controls.Add(Me.lblGedruckt)
Me.GroupBox1.Controls.Add(Me.lblErstellt)
Me.GroupBox1.Controls.Add(Me.lblInBearbeitung)
Me.GroupBox1.Controls.Add(Me.Label1)
Me.GroupBox1.Controls.Add(Me.lblStatus)
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Top
Me.GroupBox1.Location = New System.Drawing.Point(0, 24)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(877, 137)
Me.GroupBox1.TabIndex = 1
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Serienbrief"
'
'ListBox2
'
Me.ListBox2.BackColor = System.Drawing.SystemColors.InactiveCaption
Me.ListBox2.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.ListBox2.ForeColor = System.Drawing.Color.Black
Me.ListBox2.FormattingEnabled = True
Me.ListBox2.Items.AddRange(New Object() {"-1 = nicht festgelegt", " 0 = Dokumente nicht in el. BL-Dossier", " 1 = Dokument in BL-Dossier"})
Me.ListBox2.Location = New System.Drawing.Point(587, 42)
Me.ListBox2.Name = "ListBox2"
Me.ListBox2.Size = New System.Drawing.Size(187, 65)
Me.ListBox2.TabIndex = 19
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(584, 26)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(55, 13)
Me.Label3.TabIndex = 18
Me.Label3.Text = "BLDossier"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(387, 26)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(37, 13)
Me.Label2.TabIndex = 17
Me.Label2.Text = "Status"
'
'ListBox1
'
Me.ListBox1.BackColor = System.Drawing.SystemColors.InactiveCaption
Me.ListBox1.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.ListBox1.ForeColor = System.Drawing.Color.Black
Me.ListBox1.FormattingEnabled = True
Me.ListBox1.Items.AddRange(New Object() {"-1 =Dokumentgenerierung ausgelöst", " 0 = in Bearbeitung", " 1 = Serienbrief abgeschlossen", " 2 = Serienbrief abgeschlossen", " "})
Me.ListBox1.Location = New System.Drawing.Point(390, 42)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(187, 65)
Me.ListBox1.TabIndex = 16
'
'txtBLDossier
'
Me.txtBLDossier.Location = New System.Drawing.Point(259, 23)
Me.txtBLDossier.Name = "txtBLDossier"
Me.txtBLDossier.Size = New System.Drawing.Size(52, 20)
Me.txtBLDossier.TabIndex = 15
'
'lblBLDossier
'
Me.lblBLDossier.AutoSize = True
Me.lblBLDossier.Location = New System.Drawing.Point(187, 26)
Me.lblBLDossier.Name = "lblBLDossier"
Me.lblBLDossier.Size = New System.Drawing.Size(55, 13)
Me.lblBLDossier.TabIndex = 14
Me.lblBLDossier.Text = "BLDossier"
'
'txtausgelöst
'
Me.txtausgelöst.Location = New System.Drawing.Point(259, 103)
Me.txtausgelöst.Name = "txtausgelöst"
Me.txtausgelöst.Size = New System.Drawing.Size(52, 20)
Me.txtausgelöst.TabIndex = 13
'
'txtbestätigt
'
Me.txtbestätigt.Location = New System.Drawing.Point(259, 80)
Me.txtbestätigt.Name = "txtbestätigt"
Me.txtbestätigt.Size = New System.Drawing.Size(52, 20)
Me.txtbestätigt.TabIndex = 12
'
'txtgedruckt
'
Me.txtgedruckt.Location = New System.Drawing.Point(259, 56)
Me.txtgedruckt.Name = "txtgedruckt"
Me.txtgedruckt.Size = New System.Drawing.Size(52, 20)
Me.txtgedruckt.TabIndex = 11
'
'txterstellt
'
Me.txterstellt.Location = New System.Drawing.Point(112, 103)
Me.txterstellt.Name = "txterstellt"
Me.txterstellt.Size = New System.Drawing.Size(52, 20)
Me.txterstellt.TabIndex = 10
'
'txtinbearbeitung
'
Me.txtinbearbeitung.Location = New System.Drawing.Point(112, 80)
Me.txtinbearbeitung.Name = "txtinbearbeitung"
Me.txtinbearbeitung.Size = New System.Drawing.Size(52, 20)
Me.txtinbearbeitung.TabIndex = 9
'
'txtfehlerhaft
'
Me.txtfehlerhaft.Location = New System.Drawing.Point(112, 56)
Me.txtfehlerhaft.Name = "txtfehlerhaft"
Me.txtfehlerhaft.Size = New System.Drawing.Size(52, 20)
Me.txtfehlerhaft.TabIndex = 8
'
'txtStatus
'
Me.txtStatus.Location = New System.Drawing.Point(112, 23)
Me.txtStatus.Name = "txtStatus"
Me.txtStatus.Size = New System.Drawing.Size(52, 20)
Me.txtStatus.TabIndex = 7
'
'lblausgelöst
'
Me.lblausgelöst.AutoSize = True
Me.lblausgelöst.Location = New System.Drawing.Point(187, 106)
Me.lblausgelöst.Name = "lblausgelöst"
Me.lblausgelöst.Size = New System.Drawing.Size(53, 13)
Me.lblausgelöst.TabIndex = 6
Me.lblausgelöst.Text = "Ausgelöst"
'
'lblBestätigt
'
Me.lblBestätigt.AutoSize = True
Me.lblBestätigt.Location = New System.Drawing.Point(187, 83)
Me.lblBestätigt.Name = "lblBestätigt"
Me.lblBestätigt.Size = New System.Drawing.Size(48, 13)
Me.lblBestätigt.TabIndex = 5
Me.lblBestätigt.Text = "Bestätigt"
'
'lblGedruckt
'
Me.lblGedruckt.AutoSize = True
Me.lblGedruckt.Location = New System.Drawing.Point(187, 59)
Me.lblGedruckt.Name = "lblGedruckt"
Me.lblGedruckt.Size = New System.Drawing.Size(51, 13)
Me.lblGedruckt.TabIndex = 4
Me.lblGedruckt.Text = "Gedruckt"
'
'lblErstellt
'
Me.lblErstellt.AutoSize = True
Me.lblErstellt.Location = New System.Drawing.Point(28, 106)
Me.lblErstellt.Name = "lblErstellt"
Me.lblErstellt.Size = New System.Drawing.Size(38, 13)
Me.lblErstellt.TabIndex = 3
Me.lblErstellt.Text = "Erstellt"
'
'lblInBearbeitung
'
Me.lblInBearbeitung.AutoSize = True
Me.lblInBearbeitung.Location = New System.Drawing.Point(28, 83)
Me.lblInBearbeitung.Name = "lblInBearbeitung"
Me.lblInBearbeitung.Size = New System.Drawing.Size(76, 13)
Me.lblInBearbeitung.TabIndex = 2
Me.lblInBearbeitung.Text = "In Bearbeitung"
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(28, 59)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(54, 13)
Me.Label1.TabIndex = 1
Me.Label1.Text = "Fehlerhaft"
'
'lblStatus
'
Me.lblStatus.AutoSize = True
Me.lblStatus.Location = New System.Drawing.Point(28, 26)
Me.lblStatus.Name = "lblStatus"
Me.lblStatus.Size = New System.Drawing.Size(37, 13)
Me.lblStatus.TabIndex = 0
Me.lblStatus.Text = "Status"
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.empflist)
Me.GroupBox2.Dock = System.Windows.Forms.DockStyle.Fill
Me.GroupBox2.Location = New System.Drawing.Point(0, 161)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(877, 316)
Me.GroupBox2.TabIndex = 2
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Empfängerlsite"
'
'empflist
'
Me.empflist.AllowDelete = True
Me.empflist.AlternatingRows = True
Me.empflist.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Floating
Me.empflist.ContextMenuStrip = Me.CTMenuEmpflist
Me.empflist.Cursor = System.Windows.Forms.Cursors.Default
Me.empflist.Dock = System.Windows.Forms.DockStyle.Fill
Me.empflist.FetchRowStyles = True
Me.empflist.FilterBar = True
Me.empflist.GroupByCaption = "Drag a column header here to group by that column"
Me.empflist.Images.Add(CType(resources.GetObject("empflist.Images"), System.Drawing.Image))
Me.empflist.Location = New System.Drawing.Point(3, 16)
Me.empflist.Name = "empflist"
Me.empflist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.empflist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.empflist.PreviewInfo.ZoomFactor = 75.0R
Me.empflist.PrintInfo.PageSettings = CType(resources.GetObject("empflist.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.empflist.ScrollTips = True
Me.empflist.Size = New System.Drawing.Size(871, 297)
Me.empflist.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation
Me.empflist.TabIndex = 27
Me.empflist.Text = "C1TrueDBGrid1"
Me.empflist.PropBag = resources.GetString("empflist.PropBag")
'
'CTMenuEmpflist
'
Me.CTMenuEmpflist.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem})
Me.CTMenuEmpflist.Name = "CTMenuEmpflist"
Me.CTMenuEmpflist.Size = New System.Drawing.Size(324, 26)
'
'IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem
'
Me.IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem.Name = "IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem"
Me.IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem.Size = New System.Drawing.Size(323, 22)
Me.IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem.Text = "&Indexdaten für markierte Datensätze generieren"
'
'frmSBEdit
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(877, 477)
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.MenuStrip1)
Me.MainMenuStrip = Me.MenuStrip1
Me.Name = "frmSBEdit"
Me.Text = "Serienbrief editieren"
Me.MenuStrip1.ResumeLayout(False)
Me.MenuStrip1.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
CType(Me.empflist, System.ComponentModel.ISupportInitialize).EndInit()
Me.CTMenuEmpflist.ResumeLayout(False)
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip
Friend WithEvents DateiToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents BeendenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents lblErstellt As System.Windows.Forms.Label
Friend WithEvents lblInBearbeitung As System.Windows.Forms.Label
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents lblStatus As System.Windows.Forms.Label
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents lblausgelöst As System.Windows.Forms.Label
Friend WithEvents lblBestätigt As System.Windows.Forms.Label
Friend WithEvents lblGedruckt As System.Windows.Forms.Label
Friend WithEvents txtBLDossier As System.Windows.Forms.TextBox
Friend WithEvents lblBLDossier As System.Windows.Forms.Label
Friend WithEvents txtausgelöst As System.Windows.Forms.TextBox
Friend WithEvents txtbestätigt As System.Windows.Forms.TextBox
Friend WithEvents txtgedruckt As System.Windows.Forms.TextBox
Friend WithEvents txterstellt As System.Windows.Forms.TextBox
Friend WithEvents txtinbearbeitung As System.Windows.Forms.TextBox
Friend WithEvents txtfehlerhaft As System.Windows.Forms.TextBox
Friend WithEvents txtStatus As System.Windows.Forms.TextBox
Friend WithEvents empflist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents SpeichernToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents ListBox2 As System.Windows.Forms.ListBox
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents StatusEmpfängerlisteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents DruckstapelLöschenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents DokumentePruefenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents CTMenuEmpflist As System.Windows.Forms.ContextMenuStrip
Friend WithEvents IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
End Class

View File

@@ -0,0 +1,166 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="CTMenuEmpflist.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>132, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="empflist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="empflist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="empflist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{ForeColor:ControlText;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;295&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 869, 295&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 869, 295&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
</root>

View File

@@ -0,0 +1,264 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmSBEdit
#Region "Deklarationen"
Public sb As edokadb.clsEdex_sb_serienbrief
Private EmpfData As New DataTable
Public ResultatDaten As New DataTable
#End Region
Sub New(ByRef serienbrief As edokadb.clsEdex_sb_serienbrief, ByRef daten As DataTable)
Me.InitializeComponent()
Me.sb = serienbrief
Me.EmpfData = daten.Copy
Me.ResultatDaten = daten.Copy
End Sub
Private Sub frmSBEdit_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
Me.txtStatus.Text = Me.sb.iStatus.Value.ToString
Me.txtfehlerhaft.Text = Me.sb.iFehlerhaft.Value.ToString
Me.txtinbearbeitung.Text = Me.sb.iInBearbeitung.Value.ToString
Me.txterstellt.Text = Me.sb.iErstellt.Value.ToString
Me.txtgedruckt.Text = Me.sb.iGedruckt.Value.ToString
Me.txtbestätigt.Text = Me.sb.iBestaetigt.Value.ToString
Me.txtausgelöst.Text = Me.sb.iAusgeloest.Value.ToString
Me.txtBLDossier.Text = Me.sb.iBldossier.Value.ToString
Me.empflist.DataSource = Me.EmpfData
Me.empflist.DataMember = Me.EmpfData.TableName
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub BeendenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BeendenToolStripMenuItem.Click
Me.Close()
End Sub
Private Sub SpeichernToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SpeichernToolStripMenuItem.Click
Me.sb.iStatus = New SqlInt32(CType(Me.txtStatus.Text, Int32))
Me.sb.iFehlerhaft = New SqlInt32(CType(Me.txtfehlerhaft.Text, Int32))
Me.sb.iInBearbeitung = New SqlInt32(CType(Me.txtinbearbeitung.Text, Int32))
Me.sb.iErstellt = New SqlInt32(CType(Me.txterstellt.Text, Int32))
Me.sb.iGedruckt = New SqlInt32(CType(Me.txtgedruckt.Text, Int32))
Me.sb.iBestaetigt = New SqlInt32(CType(Me.txtbestätigt.Text, Int32))
Me.sb.iAusgeloest = New SqlInt32(CType(Me.txtausgelöst.Text, Int32))
Me.sb.iBldossier = New SqlInt32(CType(Me.txtBLDossier.Text, Int32))
Me.ResultatDaten.Clear()
Me.ResultatDaten = Me.EmpfData.Copy
End Sub
Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
End Sub
Private Sub StatusEmpfängerlisteToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles StatusEmpfängerlisteToolStripMenuItem.Click
Dim res As String = "-99"
res = InputBox("Status der Einträge in der Empängerliste:", "Status Empfängerliste setzen")
If res <> "-99" Then
For Each dr As DataRow In Me.EmpfData.Rows
dr.Item("Status") = res
Next
End If
End Sub
Private Sub DruckstapelLöschenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DruckstapelLöschenToolStripMenuItem.Click
If MsgBox("Es werden alle Druckstapel gelöscht. Die Löschung kann nicht mehr rückgängig gemacht werde. Fortfahren?", MsgBoxStyle.YesNo + MsgBoxStyle.Question, "Druckstapel löschen") = MsgBoxResult.Yes Then
set_druckjobstatus(3, Me.sb.iSerienbriefnr.Value)
End If
End Sub
Private Function set_druckjobstatus(ByVal status As Integer, ByVal serienbriefnr As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "sp_edex_sb_set_druckjobstatus"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@druckjobnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 0))
scmCmdToExecute.Parameters.Add(New SqlParameter("@status", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, status))
scmCmdToExecute.Parameters.Add(New SqlParameter("@serienbriefnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, serienbriefnr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub DokumentePruefenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DokumentePruefenToolStripMenuItem.Click
Try
Cursor = Cursors.WaitCursor
Dim i As Integer
Dim tmpdata As New DataTable
Dim errorstring As String = "Folgende Dokumente sind nicht im EDOKA:"
Dim dok As New edokadb.clsDokument
dok.cpMainConnectionProvider = Globals.conn
For i = 0 To EmpfData.Rows.Count - 1
tmpdata.Rows.Clear()
dok.sDokumentid = New SqlString(CType(EmpfData.Rows(i).Item("Dokumentid"), String))
tmpdata = dok.SelectOne()
If tmpdata.Rows.Count = 0 Then
errorstring = errorstring + vbCrLf + EmpfData.Rows(i).Item("Partnernr").ToString + ": " + EmpfData.Rows(i).Item("Dokumentid").ToString
End If
Next
tmpdata.Dispose()
dok.Dispose()
If errorstring <> "Folgende Dokumente sind nicht im EDOKA:" Then
MsgBox(errorstring, MsgBoxStyle.Critical)
Else
MsgBox("Alle Dokumente im EDOKA vorhanden.")
End If
Catch ex As Exception
MsgBox("Bei der Prüfung ist ein Fehler aufgetreten:" + ex.Message)
Cursor = Cursors.Default
End Try
End Sub
Private Sub IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IndexdatenFürMarkierteDatensätzeGenerierenToolStripMenuItem.Click
If Not IO.File.Exists(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\EDKB08Struktur.xml") Then
MsgBox("Die Datei 'EDKB08Struktur.xml' muss für diesen Vorgang im Verzeichnis " + Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + " zur Verfügung stehen.", MsgBoxStyle.Critical)
Exit Sub
End If
Dim importdata As New DataSet()
importdata.ReadXml(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\EDKB08Struktur.xml")
importdata.Tables(0).Rows.Clear()
importdata.Tables(0).Columns.Add("BLKunde")
importdata.Tables(0).Columns.Add("Dokumentidbdr")
importdata.Tables(0).Columns.Add("Dokumentid")
importdata.Tables(0).Columns.Add("Bezeichnung")
Dim i As Integer = 0
Dim s As String = ""
Dim row As Long
Dim col As C1.Win.C1TrueDBGrid.C1DataColumn
Dim cols As Integer, rows As Long
If Me.empflist.SelectedRows.Count = 0 Then
s = Me.empflist.Columns("Dokumentid").Text
Insert_datarow(importdata, s)
Else
For Each row In Me.empflist.SelectedRows
For Each col In Me.empflist.Columns
If col.Caption = "DOKUMENTID" Then
s = col.CellText(row)
Insert_datarow(importdata, s)
End If
Next
Next
End If
importdata.WriteXml(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\" + Me.sb.iSerienbriefnr.Value.ToString + "_EDKB08_Import.xml")
MsgBox("Die Datei " + Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\" + Me.sb.iSerienbriefnr.Value.ToString + "_EDKB08_Import.xml mit den generierten Indexdaten wurde erstellt.")
End Sub
Private Function Insert_datarow(ByVal importdata As DataSet, ByVal dokumentid As String)
Dim i As Integer
For Each dv As DataRow In EmpfData.Rows
If dv.Item("Dokumentid") = dokumentid Then
Dim dr As DataRow
dr = importdata.Tables(0).NewRow
Try
While i < 40
dr.Item(i) = ""
i = i + 1
End While
Catch
End Try
dr.Item("Funktion") = "ADD"
dr.Item("PARTNERNR") = dv.Item("Partnernr")
dr.Item("Dokumenttypnr") = sb.iDokumenttypnr.Value
dr.Item("dateiname") = dv.Item("Dokumentid") + ".pdf"
dr.Item("Dateiformat") = "PDF"
dr.Item("Archivdatum") = Now.ToString
Dim ma As New edokadb.clsMitarbeiter
ma.cpMainConnectionProvider = Globals.conn
ma.iMitarbeiternr = New SqlInt32(CType(dv.Item("Ersteller"), Int32))
ma.SelectOne()
dr.Item("Ersteller") = ma.sTgnummer.Value.ToString
ma.Dispose()
dr.Item("HERKUNFTSAPPLIKATION") = "EDKB09"
dr.Item("Dokumentid") = dv.Item("Dokumentid")
dr.Item("Dokumentidbdr") = dv.Item("Dokumentidbdr")
'Rel. 4.1 - Nur als BL-Kunde kennzeichnen, sofern so im Serienbrief festgehalten
If sb.iBldossier.Value.ToString = "1" Then
dr.Item("BLKunde") = dv.Item("BLKUNDE")
Else
If dv.Item("BLKunde") = "1" Then
'insert_sb_bl_physiche_ablage_journal(Me.Serienbriefnr, sb.sBezeichnung.Value.ToString, get_tgnummer(dv.Item("Ersteller")), dv.Item("Partnernr"), dv.Item("DokumentID"))
End If
dr.Item("BLKunde") = "0"
End If
dr.Item("Bezeichnung") = sb.sBezeichnung.Value
dr.Item("DOKUMENTWERT2") = "Serienbriefnr;" + sb.iSerienbriefnr.ToString
importdata.Tables(0).Rows.Add(dr)
Exit For
End If
Next
End Function
Private Sub DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DokumentePrüfenUndEDKB08StrukturGenerierenToolStripMenuItem.Click
Try
Dim cnt As Integer
If Not IO.File.Exists(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\EDKB08Struktur.xml") Then
MsgBox("Die Datei 'EDKB08Struktur.xml' muss für diesen Vorgang im Verzeichnis " + Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + " zur Verfügung stehen.", MsgBoxStyle.Critical)
Exit Sub
End If
Dim importdata As New DataSet()
importdata.ReadXml(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\EDKB08Struktur.xml")
importdata.Tables(0).Rows.Clear()
importdata.Tables(0).Columns.Add("BLKunde")
importdata.Tables(0).Columns.Add("Dokumentidbdr")
importdata.Tables(0).Columns.Add("Dokumentid")
importdata.Tables(0).Columns.Add("Bezeichnung")
Cursor = Cursors.WaitCursor
Dim i As Integer
Dim rc As Integer
Dim fi As Integer = 0
Dim tmpdata As New DataTable
Dim errorstring As String = "Folgende Dokumente sind nicht im EDOKA:"
Dim dok As New edokadb.clsDokument
dok.cpMainConnectionProvider = Globals.conn
For i = 0 To EmpfData.Rows.Count - 1
tmpdata.Rows.Clear()
dok.sDokumentid = New SqlString(CType(EmpfData.Rows(i).Item("Dokumentid"), String))
tmpdata = dok.SelectOne()
If tmpdata.Rows.Count = 0 Then
Insert_datarow(importdata, dok.sDokumentid.Value)
rc = rc + 1
cnt = cnt + 1
If rc > 50 Then
importdata.WriteXml(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\" + Me.sb.iSerienbriefnr.Value.ToString + "_" + fi.ToString + "_EDKB08_Import.IND")
fi = fi + 1
rc = 0
importdata.Tables(0).Rows.Clear()
End If
End If
Next
importdata.WriteXml(Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\" + Me.sb.iSerienbriefnr.Value.ToString + "_" + fi.ToString + "_EDKB08_Import.IND")
tmpdata.Dispose()
dok.Dispose()
Cursor = Cursors.Default
MsgBox("Indexdaten für " + cnt.ToString + " Datensätze generiert" + vbCrLf + vbCrLf + "Die Datei(en) " + Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + "\" + Me.sb.iSerienbriefnr.Value.ToString + "_(X)_EDKB08_Import.IND mit den generierten Indexdaten wurde erstellt.")
Catch ex As Exception
MsgBox("Bei der Prüfung ist ein Fehler aufgetreten:" + ex.Message)
Cursor = Cursors.Default
End Try
End Sub
End Class

View File

@@ -0,0 +1,181 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="contextMenu.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>123, 17</value>
</data>
<data name="contextMenu.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem13.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="StatusBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="addressBar.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="PictureBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="PictureBox2.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAVpJREFUWEfFl2sO
hDAIhPXmHs2buVKXLqW0MGwTTfzVx3xMweK+Ac9xHNds+j2+A9vFppIov+d5XqOHxuTc2O6TWRHRCEwK
hMRn0Q5tUAPsCgRB4qufG2CaOxXQE6eI7r3M13PMhYiKSyENk4aInDmL6ePRELPjexw0jsOLnjYdCSEA
zz5bKdfm3D3rRgBWTngJzC5UiEj0tKkUY2A0eoZrXIgC6Mh09F7kcpwBigtZABk9Ii7zYAlAJH/6ynkS
cQkAGr3pQCaKjPAvmYUDVI9oHlgVEQWSCdiUIuJCtvzkN6DmAH+REBeyAGb06q4OOZk5Ai0+a+9CEMgk
RJwNWdYRZcQrBC1GkpNdEddu06h6XXXXun0X8B0+hZGiVtSwuKwOUTJDmJFoV25Qhyomy56fnRndcEv/
DyxgDyAbZGZdNaG54zM7/bGmQLwJQOyvA5QbdVnGZ48jA/ABQB/NVGTmD6kAAAAASUVORK5CYII=
</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="webOCWrapper.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmSBPDFPrinter</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKBwoAAAAAAAAAAAAAAAoHBwcKCgoAAAAAAAAKCgcH
BwcHCgoKCgoAAAAAChEHBwcHEQoKCgoKCgAACgoRBwcREQcHBwoKCgoAAAAKEQcHDg4QEAcHBwoKAAoR
EQoKEQcHBwcHCgoABwAKERERAAoKEQcKCgcRAAcAChEREQARAAoKBxEREREAAAoREREAEQAAChERERER
EQAKCgoKChEAEQAKERERCgoAAAAKERERABEAAAoKCgAAAAAACgoKCgoRAAAAAAAAAAAAAAAAChEREQAA
AAARAAAAAAAAAAoKCgoKAAAAAAAAAP4f///8D///4AP//8AA///AAP//gAD//wAA//8AAP//AAD//wAB
//8AAP//AIH//8DH///Af///8Hf///B///8=
</value>
</data>
</root>

View File

@@ -0,0 +1,329 @@
Imports System.Resources
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.Runtime.InteropServices
Imports System.IO
Public Class frmSBPDFPrinter
Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
End Sub
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Friend WithEvents MenuItem13 As System.Windows.Forms.MenuItem
Friend Shadows WithEvents contextMenu As System.Windows.Forms.ContextMenu
Friend WithEvents StatusBar1 As System.Windows.Forms.StatusBar
Friend WithEvents addressBar As System.Windows.Forms.ComboBox
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents webOCWrapper As WebOCHostCtrl
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmSBPDFPrinter))
Me.contextMenu = New System.Windows.Forms.ContextMenu()
Me.MenuItem13 = New System.Windows.Forms.MenuItem()
Me.StatusBar1 = New System.Windows.Forms.StatusBar()
Me.addressBar = New System.Windows.Forms.ComboBox()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.Panel1 = New System.Windows.Forms.Panel()
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
Me.Button2 = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button()
Me.webOCWrapper = New EDOKAApp.WebOCHostCtrl()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'contextMenu
'
Me.contextMenu.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem13})
'
'MenuItem13
'
Me.MenuItem13.Index = 0
Me.MenuItem13.Text = "Print..."
'
'StatusBar1
'
Me.StatusBar1.Anchor = ((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right)
Me.StatusBar1.Dock = System.Windows.Forms.DockStyle.None
Me.StatusBar1.Location = New System.Drawing.Point(0, 405)
Me.StatusBar1.Name = "StatusBar1"
Me.StatusBar1.Size = New System.Drawing.Size(624, 24)
Me.StatusBar1.TabIndex = 1
'
'addressBar
'
Me.addressBar.Location = New System.Drawing.Point(16, 56)
Me.addressBar.Name = "addressBar"
Me.addressBar.Size = New System.Drawing.Size(352, 21)
Me.addressBar.Sorted = True
Me.addressBar.TabIndex = 3
Me.addressBar.Visible = False
'
'ImageList1
'
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'Panel1
'
Me.Panel1.Controls.AddRange(New System.Windows.Forms.Control() {Me.PictureBox2, Me.Button2, Me.Label1, Me.Button1})
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(368, 176)
Me.Panel1.TabIndex = 10
'
'PictureBox2
'
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Bitmap)
Me.PictureBox2.Location = New System.Drawing.Point(16, 8)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(40, 50)
Me.PictureBox2.TabIndex = 15
Me.PictureBox2.TabStop = False
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(160, 88)
Me.Button2.Name = "Button2"
Me.Button2.TabIndex = 3
Me.Button2.Text = "&Nein"
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(56, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(264, 48)
Me.Label1.TabIndex = 2
Me.Label1.Text = "Sind die Dokumente des Druckstapels erfolgreich gedruckt worden?"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(240, 88)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 1
Me.Button1.Text = "&Ja"
'
'webOCWrapper
'
Me.webOCWrapper.BrowserContextMenu = False
Me.webOCWrapper.Dock = System.Windows.Forms.DockStyle.Fill
Me.webOCWrapper.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.webOCWrapper.Name = "webOCWrapper"
Me.webOCWrapper.Size = New System.Drawing.Size(320, 125)
Me.webOCWrapper.TabIndex = 11
Me.webOCWrapper.TabStop = False
'
'frmSBPDFPrinter
'
Me.AutoScale = False
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(320, 125)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Panel1, Me.StatusBar1, Me.addressBar, Me.webOCWrapper})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmSBPDFPrinter"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Serienbriefe drucken"
Me.Panel1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
Dim m_druckjobnr As Integer
Public Event PrintDOne()
Private Sub delay(ByVal seconds As Integer)
Me.Cursor = Cursors.WaitCursor
Dim starttime As DateTime = DateTime.Now
Do
Application.DoEvents()
Loop While DateTime.Now.Subtract(starttime).TotalSeconds < seconds
Me.Cursor = Cursors.Default
End Sub
Public Sub PrintPDF()
delay(2)
'----------------------------
' Taskforce Korrektur
' BUD - 21.03.2006
'----------------------------
'webOCWrapper.Print(doUI:=True)
Dim objpdf As New clsPDF_print_show()
objpdf.PrintPDF(addressBar.Text, clsPDF_print_show.Enum_Art.Drucken)
'MsgBox(MyTxt.gettext(618), MsgBoxStyle.Information, "Banklagernd Druck")
'----------------------------
Me.Button1.Enabled = True
Application.DoEvents()
Dim i As Integer
End Sub
Dim m_showdoc As Boolean = True
Public Sub New(ByVal druckjobnr As Integer, ByVal ShowDoc As Boolean)
MyBase.New()
InitializeComponent()
Me.m_showdoc = ShowDoc
Me.m_druckjobnr = druckjobnr
End Sub
Private Sub frmPDFPrinter_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Get_Druckjob()
If Me.m_showdoc = True Then
Me.Width = Me.Width * 2.5
Me.Height = Me.Height * 3.5
Me.Panel1.Visible = False
webOCWrapper.Navigate(addressBar.Text)
Else
'----------------------------
' Taskforce Korrektur
' BUD - 21.03.2006
'----------------------------
'webOCWrapper.Navigate(addressBar.Text)
'----------------------------
End If
End Sub
''SHU Mehrfachdruck
'Public Sub Prepare_Form()
' Get_Druckjob()
' If Me.m_showdoc = True Then
' Me.Width = Me.Width * 2.5
' Me.Height = Me.Height * 3.5
' Me.Panel1.Visible = False
' webOCWrapper.Navigate(addressBar.Text)
' Else
' webOCWrapper.Navigate(addressBar.Text)
' End If
'End Sub
''Ende SHU Mehrfachdruck
Private Sub inetOptionsMI_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
webOCWrapper.InternetOptions()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.DialogResult = DialogResult.Yes
Me.Close()
End Sub
Public Function Get_Druckjob()
Try
''Test BUD
'If m_mitPfadNormal = True Then
' Dim dokumentname2 = m_Pfad
' Me.addressBar.Text = dokumentname2
' Return True
' Exit Function
'End If
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.m_druckjobnr.ToString + "_empfaenger.pdf"
Dim Connection As New SqlConnection()
Dim DA As New SqlDataAdapter("select * from edex_sb_druckjob where druckjobnr=" + Me.m_druckjobnr.ToString, Connection)
Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
Dim ds As New DataSet()
Try
Connection.ConnectionString = Globals.sConnectionString
Connection.Open()
DA.Fill(ds, "empf")
Dim myRow As DataRow
If ds.Tables(0).Rows.Count = 0 Then
MyMsg.show_standardmessage(716, MsgBoxStyle.Critical)
Return False
Else
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item(6)
Dim K As Long
K = UBound(MyData)
Dim fs As New FileStream(dokumentname, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
Me.addressBar.Text = dokumentname
End If
Catch ex As Exception
MyMsg.show_standardmessage(716, MsgBoxStyle.Critical)
' MsgBox(ex.Message)
Return False
End Try
cb = Nothing
ds = Nothing
DA = Nothing
Connection.Close()
Connection = Nothing
Return True
Catch EX As Exception
MyMsg.show_standardmessage(716, MsgBoxStyle.Critical)
Return False
End Try
End Function
Private Sub frmSBPDFPrinter_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
Me.Hide()
If Me.DialogResult = DialogResult.Yes Then RaiseEvent PrintDOne()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.DialogResult = DialogResult.No
Me.Close()
End Sub
'#Region " Test "
' Dim m_Pfad As String
' Property prop_Pfad() As String
' Get
' Return m_Pfad
' End Get
' Set(ByVal Value As String)
' m_Pfad = Value
' End Set
' End Property
' Dim m_mitPfadNormal As Boolean = False
' Property prop_mitPfadNormal() As Boolean
' Get
' Return m_mitPfadNormal
' End Get
' Set(ByVal Value As Boolean)
' m_mitPfadNormal = Value
' End Set
' End Property
'#End Region
End Class

View File

@@ -0,0 +1,213 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="ListBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ListBox2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBar1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AACSCQAAAk1TRnQBSQFMAgEBBQEAAQkBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
3AHAAQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IB
AAM5AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8B
MwMAAWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYC
AAFmAZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMC
AAHMAWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQAB
ZgEAATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8B
AAEzAWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQAB
MwGZAWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQAB
MwLMAQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQAB
MwEAAWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMB
mQEAAWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQAB
ZgGZAWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYB
zAH/AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMB
mQEAAZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgAB
mQFmATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwB
AAKZAf8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB
/wEzAQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQAB
mQEAAcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYC
AAHMAWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYB
AAHMApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8C
AAHMAf8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQAB
mQEAAcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMB
AAHMAmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB
/wGZAcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC
/wEzAQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC
/wFmAQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gB
AAHwAfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8A/wD/
AP8A/wAZACAHFgABAwH/CAAgBxQAAewBAwHsAf8IACAHEgABAwHsAQMB7AEDAf8IAAUHAewB9xIHAe8B
kgLsAwcRAAEDAewBAwHsAQMB7AH/AQAB7AYABQcBDgHrAewQBwHsAesBEgEAAewDBxEAAewBAwHsAQMB
7AEDAf8BAAHsBgAFBwIAARAC7AGSCwcB7QHsARABDgIAAewDBxEAAQMB7AEDAgAB7AH/AQAB7AYABQcE
AAFDAeoKBwHsARIFAAHsAwcRAAHsAQMB7AIHAQMB/wEAAewBAAEGBAAFBwcACAcBbQcAAewDBxEAAQMB
7AEDAewBAwHsAf8CAAEGBf4FBwUAAQ8B7AgHAZIBbQYAAewDBxEAAewBAwHsAQMB7AEDAf8BAAFtBv4F
BwMAAUMB7A0HAUMEAAHsAwcRAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQUHAgAB7xAHAe8BFQIAAewD
BxEAAewBAwHsAQMB7AEDAf8BAAHsAQACbQMABQcBbRQHAe8BbQQHEQABAwHsAQMB7AEHAf8B7AEAAewC
AAFtAwAgBxEAAewBAwEHAf8B7AEAA+wGACAHEQABBwH/AewBAAXsBgAgByAAIAcQAAFCAU0BPgcAAT4D
AAEoAwABQAMAATADAAEBAQABAQUAAYABARYAA/+BAAL/BgAC/wYAAv8GAAH8Af8GAAH+AT8GAAH+AQ8G
AAGAAQMOAAGAAQEGAAH+AQcGAAH+AR8GAAH8AX8GAAH9Af8GAAL/BgAC/wYAAv8GAAH8AX8EAAL/AfAB
fwQAAv8BwAF/BAAC/wEAAR8EAAH/AT8BAAEfBAAB/AF/AQABFwQAAfABfwEAAQcEAAHAAQEOAAGAAQEG
AAHgAX8GAAH4AX8BAAEHBAAB/gE/AQABFwQAAf8BvwEAAR8EAAL/AQABHwQAAv8BAAEfBAAC/xYACw==
</value>
</data>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAEFJREFUOE9jYBjW
4D+lvgMZAMNkm4VsCFkuQjcAp4twKSQkDvYaIUWE5Mk2hKiAxWY7URphiiiKSorTAElOHTjFAFPjQr4E
+LFQAAAAAElFTkSuQmCC
</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAEVJREFUOE9jYBgx
4D+5PgVphGGSzEDWSJLt6BqJth2XRkLiYG8RUkRIHh42hBRik8casEQrJBQtZEchusFExwQhFw1SeQC/
d0K+0ZmoxwAAAABJRU5ErkJggg==
</value>
</data>
<data name="$this.Name">
<value>frmSpaltenDarstellung</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAICAEAAAAAADoAgAAFgAAACgAAAAgAAAAQAAAAAEABAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAgICAAMDAwAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
AAD///8AAAAAAAAAAAAAAAAAAAAAAAAAeIiIiIiIiIiIiIiAAAAAAH//////////////gAAAAAB/////
/////////4AAAAAAf/////////////+AAAAAAH/0RERERERERET/gAAAAAB//////////////4AAAAAA
f/////////////+AAAAAAH/0RERERERERET/gAAAAAB//////////////4AAAAAAf/////////////+A
AAAAAH/0RERERERERET/gAAAAAB//////////////4AAAAAAf/////////////+AAAAAAH/0RERERERE
RET/gAAAAAB//////////////4AAAAAAf/////////////+AAAAAAH/0RERERERERET/gAAAAAB/////
/////////4AAAAAAf/////////////+AAAAAAH/0RERERERERET/gAAAAAB//////////////4AAAAAA
f/////////////+AAAAAAH/0RERERERERET/gAAAAAB//////////////4AAAAAAf//////////wAAAA
AAAAAH/0RERERERE9/+HAAAAAAB///////////f4cAAAAAAAf//////////3hwAAAAAAAH//////////
93AAAAAAAAB///////////cAAAAAAAAAd3d3d3d3d3d3AAAAAADwAAAP8AAAD/AAAA/wAAAP8AAAD/AA
AA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AA
AA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAB/wAAA/8AAAf/AAAP/wAAH/8AAD/w==
</value>
</data>
</root>

View File

@@ -0,0 +1,189 @@
Public Class frmSBSpaltenDarstellung
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
Friend WithEvents ListBox2 As System.Windows.Forms.ListBox
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmSBSpaltenDarstellung))
Me.ListBox1 = New System.Windows.Forms.ListBox()
Me.ListBox2 = New System.Windows.Forms.ListBox()
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'ListBox1
'
Me.ListBox1.Location = New System.Drawing.Point(16, 56)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.SelectionMode = System.Windows.Forms.SelectionMode.MultiExtended
Me.ListBox1.Size = New System.Drawing.Size(184, 329)
Me.ListBox1.Sorted = True
Me.ListBox1.TabIndex = 0
'
'ListBox2
'
Me.ListBox2.Location = New System.Drawing.Point(232, 56)
Me.ListBox2.Name = "ListBox2"
Me.ListBox2.SelectionMode = System.Windows.Forms.SelectionMode.MultiExtended
Me.ListBox2.Size = New System.Drawing.Size(184, 329)
Me.ListBox2.Sorted = True
Me.ListBox2.TabIndex = 1
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(432, 25)
Me.ToolBar1.TabIndex = 2
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 0
'
'ImageList1
'
Me.ImageList1.ColorDepth = System.Windows.Forms.ColorDepth.Depth8Bit
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(16, 40)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(144, 16)
Me.Label1.TabIndex = 3
Me.Label1.Text = "Vorhandene Spalten"
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(232, 40)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(144, 16)
Me.Label2.TabIndex = 4
Me.Label2.Text = "Anzuzeigende Spalten"
'
'Button1
'
Me.Button1.Image = CType(resources.GetObject("Button1.Image"), System.Drawing.Bitmap)
Me.Button1.ImageIndex = 4
Me.Button1.ImageList = Me.ImageList1
Me.Button1.Location = New System.Drawing.Point(200, 176)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(32, 32)
Me.Button1.TabIndex = 5
'
'Button2
'
Me.Button2.Image = CType(resources.GetObject("Button2.Image"), System.Drawing.Bitmap)
Me.Button2.ImageIndex = 3
Me.Button2.ImageList = Me.ImageList1
Me.Button2.Location = New System.Drawing.Point(200, 216)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(32, 32)
Me.Button2.TabIndex = 6
'
'frmSpaltenDarstellung
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(432, 397)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button2, Me.Button1, Me.Label2, Me.Label1, Me.ToolBar1, Me.ListBox2, Me.ListBox1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmSpaltenDarstellung"
Me.Text = "Spalten-Selektion"
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub frmSpaltenDarstellung_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Dim i As Integer
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'close button
Me.Close()
Case Else
End Select
End Sub
Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
Dim i As Integer
For i = 0 To Me.ListBox1.SelectedItems.Count - 1
Me.ListBox2.Items.Add(Me.ListBox1.SelectedItems(i))
Next
For i = 0 To Me.ListBox1.SelectedItems.Count - 1
Me.ListBox1.Items.Remove(Me.ListBox1.SelectedItems(0))
Next
'Me.ListBox2.Items.Add(Me.ListBox1.SelectedI
'Me.ListBox1.Items.Remove(Me.ListBox1.SelectedItem)
End Sub
Private Sub ListBox2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox2.DoubleClick
Dim i As Integer
For i = 0 To Me.ListBox2.SelectedItems.Count - 1
Me.ListBox1.Items.Add(Me.ListBox2.SelectedItems(i))
Next
For i = 0 To Me.ListBox2.SelectedItems.Count - 1
Me.ListBox2.Items.Remove(Me.ListBox2.SelectedItems(0))
Next
'Me.ListBox1.Items.Add(Me.ListBox2.SelectedItem)
'Me.ListBox2.Items.Remove(Me.ListBox2.SelectedItem)
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ListBox1_DoubleClick(sender, e)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ListBox2_DoubleClick(sender, e)
End Sub
End Class

View File

@@ -0,0 +1,661 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="ImageList4.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABi
IQAAAk1TRnQBSQFMAgEBHQEAAYwBAwGMAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAYADAAEBAQABCAYAASAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/4kAAhI+AAE4AhI9AAEH
ATgCEjwAAewBBwE4AhI8AAHsAQcBOAISOQAEEgEHATgCEjgAAewBBwU4AhI4AAHsAQcBOAISPAAB7AEH
ATgCEjsAAewBBwI4AhI7AAHsAQcCOAISOwAB7AEHAjgBEvIAAQMBMAEDATABAwEwAQMBMAEDCwAJ/w4A
Af4B/AYACSADAAH7AQABAwEwAQMBMAEDATABAwEwAQMKAAn/DQAB/gL8BQABIAf5ASAB+QEgAgAB/wH7
AQABAwEwAQMBMAEDATABAwEwAQMJAAL/AQAEBwL/DAAB/gL8BgABIAL5BfYB+QIgAgAB+wH/AfsBAAED
ATABAwEwAQMBMAEDATABAwgAAv8CAAX/CwAB/gL8BwABIAH5AvYD+QL2AfkBIAIAAf8B+wH/AfsMAATs
AQAC/wMABP8CAAPsAQAFBgEAAfwFAAPsASAB+QH2AvkB9gL5AfYB+QEgBgAB+wH/AfsB/wH7DAAC/wEA
AfsB7AEAAQcC/wUAAQcB/gH/Av4CBgkAASAB+QH2AvkB9gL5AfYB+QEgAQAB7AP/AQAB/wH7Af8B+wH/
BgAB7AP/AgAC/wEAAfsBBwEAA/8BAAHsAv8BAAH+Af8B/gH/Av4BBgUAAewD/wEgAfkB9gL5AfYC+QH2
AfkBIAEAAewD/wgAAx8BAAHsA/8CAAP/AQAB+wHsAQAC/wEAAewC/wEAAQcB/gEHAf4B/wH+AQYFAAHs
A/8BIAH5AvYD+QL2AfkBIAEAAewD/wEAAf8GAAIfAgAB7AP/AgAC/wEHAQAB+wEHAQAC/wEAAewC/wEA
Af4B/wH+Af8B/gH/AQYFAAHsA/8BIAHjAfkF9gL5ASABAAHsA/8BAAH/BgABHwEAAR8BAAHsA/8CAAT/
AQAB+wHsAQAB/wEAAewC/wEAAQcB/gEHAf4BBwH+AQYFAAHsA/8BIAH5AeMH+QEgAQAF7AH/AQAB/wcA
AR8F7AEABP8BAAH7AgAB/wEABOwBAAH/Af4B/wH+Af8GAAXsCSAEAAHsA/8BAAH/BwABHwIAAewC/wcA
AgEEAAHsAv8NAAHsA/8BAAH/CgAF7AH/BwABHwIABewB/woABewB/woABewB/wwAAewD/wYAAR8FAAHs
A/8MAAHsA/8MAAHsA/8MAAXsCwAF7AsABewLAAXsaQABAwEwAQMBMAEDATABAwEwAQMYAAXsGQAB+wEA
AQMBMAEDATABAwEwAQMBMAEDEQAB+RcABewHAAH/AfsBAAEDATABAwEwAQMBMAEDATABAwYAASAOAAHs
A/8BAAPsFwAB+wH/AfsBAAEDATABAwEwAQMBMAEDATABAwQAAvkBIAcAASAFAAHsA/8KAAEgAQABIAEA
AiAC/wEAA+wFAAH/AfsB/wH7DQAC+QEgA+wDAAEgBgABBwP2AQAB/wEAA+wIAAHsA/8NAAH7Af8B+wH/
AfsJAAP5BAABIAH5BgABBwP/AewB/woAASABAAIgAv8BAAH/AQAD7AIAAewD/wEAAf8B+wH/AfsB/wIA
AUgFAAHsAf8C+QEgAuwC+QUAAfsB7AEHBOwB/wEAAf8KAAHsA/8BAAH/BgAB7AP/CQABSAQAAewC/wX5
BwAB+wHsAQcB7AP/AQAB/wYAASABAAEgAQACIAPsAf8BAAH/BAAB7AP/AQAB/wcAAUgEAAHsA/8D+QPs
BAAC7AMHBOwB/wwAAewD/wEAAf8EAAHsA/8BAAH/BwABSAQAAewC/wX5BgAD+wEHAfsBBwL7Av8IAAEg
AQACIAXsAf8EAAXsAf8BAAH/AgABSAEAAUgFAALsA/kB/wEAAfkHAAH7AewB+wHsAfsB7AEAA+wNAAHs
A/8GAAHsA/8BAAH/AgACSAYABPkC/wEAAf8C+QQAAfsB7AEAAfsB7AEAAfsB7AgAASABAAEgAQACIAIA
BewFAAXsAf8CAANIBAAE+QTsAf8BAAL5BgAB+wHsAgAB+xwAAewD/wkAAvkDAAHsA/8CAAL5BQAB+wHs
HwAF7A0ABewIAAcnDwAEIAcAAfsBAAH7AewBAAH7CgAB+wEAAfsB7AEAAfsB+QIAAfkFAAEnAi0B/wIt
AScEtgoAAyAC/wH5BgAB7AL7AewB+wHsBLYGAAHsAvsB7AH7AewBAAL/BgABJwItAfYCLQEnArYMAAIg
Av8E/AUAAewB+wEHAewBBwK2CQAB7AH7AQcB7AEHAv8HAAEnAf8D9gH/AScBtgEAArYEAAI0AgABNAEA
AiAB/wEgA/wDAAT7AQcD7AG2AQACtgQABPsBBwPsAQAD/wUAAScCLQH2Ai0BJwS2BgAC/wMAAyAB/AH/
AvwCAATsAvsC8gS2BAAE7AL7AvIE/wUAAScCLQH/Ai0BJwO2BgAC/wIAAd0EIAL/AvwEAAHsAfsBBwHs
AfsBBwO2BwAB7AH7AQcB7AH7AQcBAAT/BAAHJwW2BQAD/wMAAfwC/wP8BAAB+wHsAfsB7AH7AQcFtgUA
AfsB7AH7AewB+wEHAQAC/wMAAewD/wQAB7YCAAIHBP8BAALdAQAE/AEAAewD/wIAAewBAAIHBbYBAAHs
A/8CAAHsAQADBwEAAv8CAAHsA/8EAAS2AQACtgIAAgcBAAT/AQAB3QYAAewD/wQABLYBAAK2AQAB7AP/
BQAFBwIAAewD/wEAAf8CAAS2AQABtgMAAgcBAAL/AgAB3QcAAewD/wEAAf8CAAS2AQABtgIAAewD/wEA
Af8KAAHsA/8BAAH/AgAGtgMAAwcBAAL/AQAD3QUAAewD/wEAAf8CAAa2AgAB7AP/AQAB/woABewB/wwA
BQcBAAPdBQAF7AH/CgAF7AH/AQAB/woAAewD/wEAAf8PAAHdAQAC3QcAAewD/wEAAf8KAAHsA/8BAAH/
CgAF7AH/DAAE3QEAAd0IAAXsAf8KAAXsAf8MAAHsA/8MAAbdCgAB7AP/DAAB7AP/DAAF7BsABewLAAXs
VQAB/wUACy0IAAHsAQcB7BoAAf8PAAEtCf8BLQYAAewDBwPsGQAB/wcAAf8GAAEtA/8BLQX/AS0DAALs
BQcF7AgAAQMBAAH7AQABAwoAAf8GAAH/BwABLQL/Ay0E/wEtAwAB7AH/BAcB/wbsBgABAwX7AQMKAAH/
BQAB/wQAA+wBLQH/BS0D/wEtAgAC7AH/AgcC/wMHBOwCAAPsAgMB+wEDAQABAwH7DAAB/wMAAf8IAAEt
Af8CLQH/Ay0C/wEtAwAB7AH/AgcC+gL5AwcC7AUAAQMC+wEAAewBAAL7AQMNAAH/BQAB7AP/AS0B/wEt
A/8DLQH/AS0BAAHsAv8C7AH/BQcC7AEAAQcBAAHsA/8CAwH7AQMBAAEDAfsOAAH/BgAB7AP/AS0G/wIt
Af8BLQEAAewD/wEAAuwB/wEHAuwBBwH/AQABBwEAAewD/wEAAQMF+wEDDgAB/wUAAewD/wEtB/8BLQH/
AS0BAAHsA/8BAAH/AQAC7AEHBP8CAAHsA/8BAAIDAQAB+wEAAQMMAAH/AgAB/wUAAewD/wEtCf8BLQEA
AewD/wEAAf8CAAHsBv8BAAHsA/8BAAH/AQAEAwsAAf8FAAH/AwAE7AstAQAF7AH/AQAB/wEAAewD/wLs
AQAF7AH/AQAB/w0AAf8HAAH/BAAB7AP/AQAB/woAAewD/wEAAf8CAAPsBQAB7AP/AQAB/wsAAf8KAAH/
AwAF7AH/CgAF7AH/CgAF7AH/HAAB7AP/DAAB7AP/BAAB/wcAAewD/xwABewLAAXsCwAF7BcAEDcgBwYA
BewFABA3AwcLDxIHBAAB7AT5AwAD7AEAATcBUQsDATACNwMHAQAJvAEAAgcLAAUHAwAG+QMAAuwCAAE3
ARUBDwRKAQMBbQEDA0oBKQEwATcDBwEACf8BAAIHAgAJAwEABAcCAAL5BgAC+QEAAuwBAAE3AQ4B7AHr
BHkBWAR5AUoBAwE3AwcBAAn/AQACBwEAAfsBAAkDAQADBwIAAfkB7AYAA/kBAAHsAQABNwEPAVgBKQN5
AV4BmQFeBHkBFAEwAwcBAAn/AQACBwEAAf8B+wEACQMBAAIHAQAC+QHsBgAB+QEAAfkBAAHsAQABNwEQ
AaABMAEDAXkBXgGZAV4BmQFeAnkBWAEiATADBwEACf8BAAIHAQAB+wH/AfsBAAkDAQABBwEAAfkC7AgA
AvkB7AEAATcBIgFeAZIBbQFYAZkBXgEHAV4BmQFYAnkBXgEiAwcBAAn/AQACBwEAAf8B+wH/AfsMAAH5
AuwIAAL5AewBAAE3ARABoAHlAe0BDwEQASIBEAEcAVgCeQFYARwBEAMHAQAJ/wEAAgcBAAH7Af8B+wH/
AfsB/wH7Af8B+wEABQcBAAH5AQAB7AEAAewGAAL5AewBAAE3AQ8B5QKgAeUBoAHlAcMBFAEiARUBIgEO
ASIBMAMHAQAJ/wEAAgcBAAH/AfsB/wH7Af8B+wH/AfsB/wEABQcBAAH5AQAD7AYAAvkCAAE3AQ8BoAHl
AqAB5QGgAeUBoAHlAaABUQEDAjcDBwEABv8D7wEAAgcBAAH7Af8B+wcABQcBAAL5AQAC7AYAAfkB7AIA
ATcBDwSgARwBAwHsAQMB6wFRAUoBMAI3AwcBAAb/AQABFAEAAUMDBwMACAcDAAEHAgAC+QMABOwB+QQA
ATcBAwHqBEoFAwEwAzcDBwEABv8BAAG8ARAQBwIAAQcBAAP5AwAC7AL5BQACNwQDCjcDBwEABvEBAAEP
DAcBAAMHAQABBwEAAQcFAAX5BgAQNwMHCA4OBwMABAcQABA3IAcUAAEHAgABBwEAAQcBAAEHAgABBwUA
AQcCAAEHAQABBwEAAQcCAAEHAQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIA
AQcFAAEHAgABBwEAAQcBAAEHAgABBwEAAewEBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEH
AgABBwUAAQcCAAEHAQABBwEAAQcCAAEHAQAB7AP/AQcCAAEHAQABBwEAAQcCAAEHAQAKAgYACgIHAAH8
AQAB/AEAAfwBAAH8AQAB/AYAAewB/wQHAf8DBwH/AQcEAAECCP8BAgYAAQII/wECBgAB/Aj/BwAB7Ar/
AQcEAAECAf8IAgYAAQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgAB7AH/BAcB/wMHAf8BBwQAAQIB/wMC
AQcEAgYAAQIB/wMCAQcEAgSYAgAB/AH/AfwBAAEHAQAB/AEHAf8BAATWAgAB7Ar/AQcEAAECAv8BAgEH
AwIB/wECBgABAgL/AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYCAAHsAf8IBwH/
AQcEAAECAf8BAgEHAwIC/wECBgABAgH/AQIBBwMCAv8BAgSYAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHW
Av8B1gIAAewK/wEHBAABAgH/AQcFAgH/AQIGAAECAf8BBwUCAf8BAgSYAwAB/AEAAf8BAAH8Af8B/AEA
AfwB1gEHAf8B1gIAAewB/wIHAf8FBwH/AQcEAAECAf8CAgL/AgIB/wECBgABAgH/AgIC/wICAf8BAgKY
Af8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYCAAHsCv8BBwQAAQII/wECBgABAgj/AQIBmAL/
AZgDAAj/AfwB/wHWAQcB1gIAAewB/wIHAf8FBwH/AQcEAAoCBgAKAgKYAf8BmAIAAfwBAAH8AQAB/AEA
AfwBAAH8AQAB/wPWAgAB7Aj/GwABmAH/ApgC/wKYAf8BmAYACtYCAAHsAf8GBwH/AewB/xkAAZgI/wGY
BgAB1gj/AdYCAAHsCP8B7BoACpgGAArWAgAK7BYAEAImAAEDAf8IAAICDQABAiQAAewBAwHsAf8IAAEC
AQACAwYAAgcBAAEDAQABAiIAAQMB7AEDAewBAwH/CAABAgEAAgMGAAIHAQABAwEAAQIBAAH8AQAB/AEA
AfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8BwABAwHsAQMB7AEDAewB/wEAAewGAAECAQACAwYA
AgcBAAEDAQABAgH8CP8HAAH8CP8IAAHsAQMB7AEDAewBAwH/AQAB7AYAAQIBAAIDCQABAwEAAQIBAAH/
AQAB/AH/AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwHAAEDAewBAwIAAewB/wEAAewGAAECAQAMAwEA
AQIB/AH/AfwBAAEHAQAB/AEHAf8HAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYDAAHsAQMB7AIHAQMB/wEA
AewBAAEGBAABAgEAAgMIAAIDAQABAgEAAf8BAAH8AQAB/AEAAfwB/wH8BwAB/wEAAfwBAAH8AQAB/AH/
AfwD/wHWAwABAwHsAQMB7AEDAewB/wIAAQYF/gECAQABAwEACAcBAAEDAQABAgH8Af8B/AH/AfwBAAH/
AQABBwcAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYDAAHsAQMB7AEDAewBAwH/AQABbQb+AQIBAAED
AQAIBwEAAQMBAAECAQAB/AEAAf8BAAH8Af8B/AEAAfwHAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHW
AwABAwHsAQMB7AEDAewB/wEAAewBbQH+BG0BAgEAAQMBAAgHAQABAwEAAQIB/AEAAfwBAAH8AQAB/AEA
AfwHAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWAwAB7AEDAewBAwHsAQMB/wEAAewBAAJtAwABAgEA
AQMBAAgHAQABAwEAAQIBAAj/AfwHAAj/AfwB/wHWAQcB1gMAAQMB7AEDAewBBwH/AewBAAHsAgABbQMA
AQIBAAEDAQAIBwMAAQIB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gMA
AewBAwEHAf8B7AEAA+wGAAECAQABAwEACAcBAAEHAQABAhQACtYDAAEHAf8B7AEABewGAAECDgABAhQA
AdYI/wHWEgAQAhQACtYCAAFCAU0BPgcAAT4DAAEoAwABQAMAAYADAAEBAQABAQYAAQQWAAP/AQAC/wYA
Av8GAAGDAT8GAAH/AR8GAAGHAQ8GAAH/AQcGAAKDBgAB/gEBBgABhgcAAf8BBwYAAoMGAAH/AYEGAAGD
AcAGAAH/AeAGAAL/BgAC/wcAAR8B+AEAAf8B+QL/AQABDwH4AQAB/wHwAfgBAwEAAQcB+AEAAf8B4AHw
AQEBAAEDAfgBAAH/AcEB8AEBAQABAQH4AQAB+AEDAfABAQIAAYABAAGAAQcBgAEBAQABHwMAAQ8BAAEB
AQABHwMAAQ8BAAEBAQABEQMAAQ8BAAIBAfMDAAEPAQABAQEAAXUDAAEPAQABAQEAAX4DAAEfAQABAwHA
AX4BwAEAAcABPwHAAX8BwAF+AcABYwHAAX8BwAF/AfABfQHwAX8B8AF/AfABfwHwAX8B8AF/AfABfwHw
AX8E/wEAAR8G/wEAAQ8C/wHgA/8BAAEHAf8B+wHBAf8B+AE/AQABAwHvAf8BwAE/AfABfwEAAQEBxwH3
AcABfwFQAQ8CAAHAAe8BwAEPAfABHwEAAR8BwQHPAcABHwHQAQMBAAEXAcABHwEAAR8B8AEHAQABGwHA
AT8BgAEfAVABBwEBAfsBwAEPAQABHwH8AQcBAAF7AcABHwEAAR8B0AEHAQABVwHAAR8BgQEfAf8BBwHA
AU8BwAEPASQB/wFTAQcBwAFHAYABBwHmA/8B8AF/AZwBEwHnA/8B8AF/AfwBHwHgAQEB/wGHAfQBAQH0
AQEB4AEBAf8BAwHwAQEB8AEDAeABAQH/AQAB+AEBAfgBAwHgAQEBgAEBAcABAQHAAQEB4AEBAcABgAHA
AQEBwAEBAeABAQHAAQAB8AEBAfADAAGABAABAQEGAgABAQEEAQABBAEBAwABHwIAAgEBAAEBAQABHwEA
AgEBgwEAAQEBAAEPAQABAQEAAX8BAAEBAYABDwEAAQEBAAF/AcABfwHAAQ8BwAF/AcABfwHAAX8B4AEf
AcABfwHAAX8B8AF/AeABHwHwAX8B8AF/AfABfwHgAR8B8AF/AfABfwT/Af4BHwP/AfkB8AEBAfwBDwL/
AecB/wHwAQEB4AEDAf4BHwHDAfMB8AEBAcABAAH4AQcBwwHnAfABAQHAAQAB+AEDAeEBxwGAAQEBgAEA
AYABAwHwAY8BAAEBAwABAwH4AR8BAAEBAwABAwH8AT8BAAEBAwABAwH4AR8BAAEBAQABAQEAAQcB8AGf
AQABAQMAAR8BwQHHAQABAQEAAYEBAAF/AYMB4wHAAX8BwAHHAcABfwGPAfEBwAF/AcABfwHAAX8C/wHw
AX8B8AF3AfABfwL/AfABfwHwAX8B8AF/Av8GAAH8AR8GAAHwAXEGAAHgAXMGAAHPAckGAAHPAcUGAAGP
AdUGAAGPAfEGAAGPAfEGAAGrAfEGAAGjAfMGAAGTAfMGAAHOAQ8GAAGOAR8GAAH4AT8GAAL/BgAC/wHw
AQAB8AMAAv8B8AEAAfADAAL/AfABAAHwBAABPwEAAT8BAAE/AQABBwEAAT8BAAE/AQABPwEAAQcBAAE/
AQABPwEAAT8BAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEH
AQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAED
AQABBwL/AfABAwHwAQMBAAEPAv8B8AEDAfABAwEAAR8C/wHwAQMB8AEDAQABPwH8AX8CAAT/AfABfwIA
BP8BwAF/AgAE/wEAAR8DAAE/AQABPwEAAR8DAAE/AQABPwEAARcDAAE/AQABPwEAAQcDAAE/AQABAwUA
AT8BAAEDBQABPwEAAQMFAAE/AQABAwUAAT8BAAEDAQABBwMAAT8BAAEDAQABFwMAAT8BAAEDAQABHwIA
Av8B8AEDAQABHwIAAv8B8AEDAQABHwIAAv8B8AEDCw==
</value>
</data>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 251</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACs
IAAAAk1TRnQBSQFMAgEBHAEAAYwBAwGMAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAYADAAEBAQABCAYAASAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ARwABAwEw
AQMBMAEDATABAwEwAQMLAAn/DgAB/gH8BgAJIAMAAfsBAAEDATABAwEwAQMBMAEDATABAwoACf8NAAH+
AvwFAAEgB/kBIAH5ASACAAH/AfsBAAEDATABAwEwAQMBMAEDATABAwkAAv8BAAQHAv8MAAH+AvwGAAEg
AvkF9gH5AiACAAH7Af8B+wEAAQMBMAEDATABAwEwAQMBMAEDCAAC/wIABf8LAAH+AvwHAAEgAfkC9gP5
AvYB+QEgAgAB/wH7Af8B+wwABOwBAAL/AwAE/wIAA+wBAAUGAQAB/AUAA+wBIAH5AfYC+QH2AvkB9gH5
ASAGAAH7Af8B+wH/AfsMAAL/AQAB+wHsAQABBwL/BQABBwH+Af8C/gIGCQABIAH5AfYC+QH2AvkB9gH5
ASABAAHsA/8BAAH/AfsB/wH7Af8GAAHsA/8CAAL/AQAB+wEHAQAD/wEAAewC/wEAAf4B/wH+Af8C/gEG
BQAB7AP/ASAB+QH2AvkB9gL5AfYB+QEgAQAB7AP/CAADHwEAAewD/wIAA/8BAAH7AewBAAL/AQAB7AL/
AQABBwH+AQcB/gH/Af4BBgUAAewD/wEgAfkC9gP5AvYB+QEgAQAB7AP/AQAB/wYAAh8CAAHsA/8CAAL/
AQcBAAH7AQcBAAL/AQAB7AL/AQAB/gH/Af4B/wH+Af8BBgUAAewD/wEgAeMB+QX2AvkBIAEAAewD/wEA
Af8GAAEfAQABHwEAAewD/wIABP8BAAH7AewBAAH/AQAB7AL/AQABBwH+AQcB/gEHAf4BBgUAAewD/wEg
AfkB4wf5ASABAAXsAf8BAAH/BwABHwXsAQAE/wEAAfsCAAH/AQAE7AEAAf8B/gH/Af4B/wYABewJIAQA
AewD/wEAAf8HAAEfAgAB7AL/BwACAQQAAewC/w0AAewD/wEAAf8KAAXsAf8HAAEfAgAF7AH/CgAF7AH/
CgAF7AH/DAAB7AP/BgABHwUAAewD/wwAAewD/wwAAewD/wwABewLAAXsCwAF7AsABexpAAEDATABAwEw
AQMBMAEDATABAxgABewZAAH7AQABAwEwAQMBMAEDATABAwEwAQMRAAH5FwAF7AcAAf8B+wEAAQMBMAED
ATABAwEwAQMBMAEDBgABIA4AAewD/wEAA+wXAAH7Af8B+wEAAQMBMAEDATABAwEwAQMBMAEDBAAC+QEg
BwABIAUAAewD/woAASABAAEgAQACIAL/AQAD7AUAAf8B+wH/AfsNAAL5ASAD7AMAASAGAAEHA/YBAAH/
AQAD7AgAAewD/w0AAfsB/wH7Af8B+wkAA/kEAAEgAfkGAAEHA/8B7AH/CgABIAEAAiAC/wEAAf8BAAPs
AgAB7AP/AQAB/wH7Af8B+wH/AgABSAUAAewB/wL5ASAC7AL5BQAB+wHsAQcE7AH/AQAB/woAAewD/wEA
Af8GAAHsA/8JAAFIBAAB7AL/BfkHAAH7AewBBwHsA/8BAAH/BgABIAEAASABAAIgA+wB/wEAAf8EAAHs
A/8BAAH/BwABSAQAAewD/wP5A+wEAALsAwcE7AH/DAAB7AP/AQAB/wQAAewD/wEAAf8HAAFIBAAB7AL/
BfkGAAP7AQcB+wEHAvsC/wgAASABAAIgBewB/wQABewB/wEAAf8CAAFIAQABSAUAAuwD+QH/AQAB+QcA
AfsB7AH7AewB+wHsAQAD7A0AAewD/wYAAewD/wEAAf8CAAJIBgAE+QL/AQAB/wL5BAAB+wHsAQAB+wHs
AQAB+wHsCAABIAEAASABAAIgAgAF7AUABewB/wIAA0gEAAT5BOwB/wEAAvkGAAH7AewCAAH7HAAB7AP/
CQAC+QMAAewD/wIAAvkFAAH7AewfAAXsDQAF7AgABycPAAQgBwAB+wEAAfsB7AEAAfsKAAH7AQAB+wHs
AQAB+wH5AgAB+QUAAScCLQH/Ai0BJwS2CgADIAL/AfkGAAHsAvsB7AH7AewEtgYAAewC+wHsAfsB7AEA
Av8GAAEnAi0B9gItAScCtgwAAiAC/wT8BQAB7AH7AQcB7AEHArYJAAHsAfsBBwHsAQcC/wcAAScB/wP2
Af8BJwG2AQACtgQAAjQCAAE0AQACIAH/ASAD/AMABPsBBwPsAbYBAAK2BAAE+wEHA+wBAAP/BQABJwIt
AfYCLQEnBLYGAAL/AwADIAH8Af8C/AIABOwC+wLyBLYEAATsAvsC8gT/BQABJwItAf8CLQEnA7YGAAL/
AgAB3QQgAv8C/AQAAewB+wEHAewB+wEHA7YHAAHsAfsBBwHsAfsBBwEABP8EAAcnBbYFAAP/AwAB/AL/
A/wEAAH7AewB+wHsAfsBBwW2BQAB+wHsAfsB7AH7AQcBAAL/AwAB7AP/BAAHtgIAAgcE/wEAAt0BAAT8
AQAB7AP/AgAB7AEAAgcFtgEAAewD/wIAAewBAAMHAQAC/wIAAewD/wQABLYBAAK2AgACBwEABP8BAAHd
BgAB7AP/BAAEtgEAArYBAAHsA/8FAAUHAgAB7AP/AQAB/wIABLYBAAG2AwACBwEAAv8CAAHdBwAB7AP/
AQAB/wIABLYBAAG2AgAB7AP/AQAB/woAAewD/wEAAf8CAAa2AwADBwEAAv8BAAPdBQAB7AP/AQAB/wIA
BrYCAAHsA/8BAAH/CgAF7AH/DAAFBwEAA90FAAXsAf8KAAXsAf8BAAH/CgAB7AP/AQAB/w8AAd0BAALd
BwAB7AP/AQAB/woAAewD/wEAAf8KAAXsAf8MAATdAQAB3QgABewB/woABewB/wwAAewD/wwABt0KAAHs
A/8MAAHsA/8MAAXsGwAF7AsABexVAAH/BQALLQgAAewBBwHsGgAB/w8AAS0J/wEtBgAB7AMHA+wZAAH/
BwAB/wYAAS0D/wEtBf8BLQMAAuwFBwXsCAABAwEAAfsBAAEDCgAB/wYAAf8HAAEtAv8DLQT/AS0DAAHs
Af8EBwH/BuwGAAEDBfsBAwoAAf8FAAH/BAAD7AEtAf8FLQP/AS0CAALsAf8CBwL/AwcE7AIAA+wCAwH7
AQMBAAEDAfsMAAH/AwAB/wgAAS0B/wItAf8DLQL/AS0DAAHsAf8CBwL6AvkDBwLsBQABAwL7AQAB7AEA
AvsBAw0AAf8FAAHsA/8BLQH/AS0D/wMtAf8BLQEAAewC/wLsAf8FBwLsAQABBwEAAewD/wIDAfsBAwEA
AQMB+w4AAf8GAAHsA/8BLQb/Ai0B/wEtAQAB7AP/AQAC7AH/AQcC7AEHAf8BAAEHAQAB7AP/AQABAwX7
AQMOAAH/BQAB7AP/AS0H/wEtAf8BLQEAAewD/wEAAf8BAALsAQcE/wIAAewD/wEAAgMBAAH7AQABAwwA
Af8CAAH/BQAB7AP/AS0J/wEtAQAB7AP/AQAB/wIAAewG/wEAAewD/wEAAf8BAAQDCwAB/wUAAf8DAATs
Cy0BAAXsAf8BAAH/AQAB7AP/AuwBAAXsAf8BAAH/DQAB/wcAAf8EAAHsA/8BAAH/CgAB7AP/AQAB/wIA
A+wFAAHsA/8BAAH/CwAB/woAAf8DAAXsAf8KAAXsAf8KAAXsAf8cAAHsA/8MAAHsA/8EAAH/BwAB7AP/
HAAF7AsABewLAAXsFwAQNyAHBgAF7AUAEDcDBwsPEgcEAAHsBPkDAAPsAQABNwFRCwMBMAI3AwcBAAm8
AQACBwsABQcDAAb5AwAC7AIAATcBFQEPBEoBAwFtAQMDSgEpATABNwMHAQAJ/wEAAgcCAAkDAQAEBwIA
AvkGAAL5AQAC7AEAATcBDgHsAesEeQFYBHkBSgEDATcDBwEACf8BAAIHAQAB+wEACQMBAAMHAgAB+QHs
BgAD+QEAAewBAAE3AQ8BWAEpA3kBXgGZAV4EeQEUATADBwEACf8BAAIHAQAB/wH7AQAJAwEAAgcBAAL5
AewGAAH5AQAB+QEAAewBAAE3ARABoAEwAQMBeQFeAZkBXgGZAV4CeQFYASIBMAMHAQAJ/wEAAgcBAAH7
Af8B+wEACQMBAAEHAQAB+QLsCAAC+QHsAQABNwEiAV4BkgFtAVgBmQFeAQcBXgGZAVgCeQFeASIDBwEA
Cf8BAAIHAQAB/wH7Af8B+wwAAfkC7AgAAvkB7AEAATcBEAGgAeUB7QEPARABIgEQARwBWAJ5AVgBHAEQ
AwcBAAn/AQACBwEAAfsB/wH7Af8B+wH/AfsB/wH7AQAFBwEAAfkBAAHsAQAB7AYAAvkB7AEAATcBDwHl
AqAB5QGgAeUBwwEUASIBFQEiAQ4BIgEwAwcBAAn/AQACBwEAAf8B+wH/AfsB/wH7Af8B+wH/AQAFBwEA
AfkBAAPsBgAC+QIAATcBDwGgAeUCoAHlAaAB5QGgAeUBoAFRAQMCNwMHAQAG/wPvAQACBwEAAfsB/wH7
BwAFBwEAAvkBAALsBgAB+QHsAgABNwEPBKABHAEDAewBAwHrAVEBSgEwAjcDBwEABv8BAAEUAQABQwMH
AwAIBwMAAQcCAAL5AwAE7AH5BAABNwEDAeoESgUDATADNwMHAQAG/wEAAbwBEBAHAgABBwEAA/kDAALs
AvkFAAI3BAMKNwMHAQAG8QEAAQ8MBwEAAwcBAAEHAQABBwUABfkGABA3AwcIDg4HAwAEBxAAEDcgBxQA
AQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsAwABBwIAAQcBAAEHAQABBwIA
AQcVAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEHAQABBwEAAQcCAAEHAQAB7AQHAgABBwEAAQcBAAEH
AgABBxUAAQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsA/8BBwIAAQcBAAEH
AQABBwIAAQcBAAoCBgAKAgcAAfwBAAH8AQAB/AEAAfwBAAH8BgAB7AH/BAcB/wMHAf8BBwQAAQII/wEC
BgABAgj/AQIGAAH8CP8HAAHsCv8BBwQAAQIB/wgCBgABAgH/CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAHs
Af8EBwH/AwcB/wEHBAABAgH/AwIBBwQCBgABAgH/AwIBBwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wEA
BNYCAAHsCv8BBwQAAQIC/wECAQcDAgH/AQIGAAECAv8BAgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEA
AfwB/wH8A/8B1gIAAewB/wgHAf8BBwQAAQIB/wECAQcDAgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAH8
Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWAgAB7Ar/AQcEAAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wEC
BJgDAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAgAB7AH/AgcB/wUHAf8BBwQAAQIB/wICAv8CAgH/
AQIGAAECAf8CAgL/AgIB/wECApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gIAAewK/wEH
BAABAgj/AQIGAAECCP8BAgGYAv8BmAMACP8B/AH/AdYBBwHWAgAB7AH/AgcB/wUHAf8BBwQACgIGAAoC
ApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YCAAHsCP8bAAGYAf8CmAL/ApgB/wGYBgAK1gIA
AewB/wYHAf8B7AH/GQABmAj/AZgGAAHWCP8B1gIAAewI/wHsGgAKmAYACtYCAArsFgAQAiYAAQMB/wgA
AgINAAECJAAB7AEDAewB/wgAAQIBAAIDBgACBwEAAQMBAAECIgABAwHsAQMB7AEDAf8IAAECAQACAwYA
AgcBAAEDAQABAgEAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEAAfwHAAEDAewBAwHs
AQMB7AH/AQAB7AYAAQIBAAIDBgACBwEAAQMBAAECAfwI/wcAAfwI/wgAAewBAwHsAQMB7AEDAf8BAAHs
BgABAgEAAgMJAAEDAQABAgEAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AcAAQMB7AED
AgAB7AH/AQAB7AYAAQIBAAwDAQABAgH8Af8B/AEAAQcBAAH8AQcB/wcAAfwB/wH8AQABBwEAAfwBBwH/
AQAE1gMAAewBAwHsAgcBAwH/AQAB7AEAAQYEAAECAQACAwgAAgMBAAECAQAB/wEAAfwBAAH8AQAB/AH/
AfwHAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYDAAEDAewBAwHsAQMB7AH/AgABBgX+AQIBAAEDAQAIBwEA
AQMBAAECAfwB/wH8Af8B/AEAAf8BAAEHBwAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gMAAewBAwHs
AQMB7AEDAf8BAAFtBv4BAgEAAQMBAAgHAQABAwEAAQIBAAH8AQAB/wEAAfwB/wH8AQAB/AcAAfwBAAH/
AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQECAQABAwEACAcBAAED
AQABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAHsAQMB7AED
AewBAwH/AQAB7AEAAm0DAAECAQABAwEACAcBAAEDAQABAgEACP8B/AcACP8B/AH/AdYBBwHWAwABAwHs
AQMB7AEHAf8B7AEAAewCAAFtAwABAgEAAQMBAAgHAwABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8
AQAB/AEAAfwBAAH8AQAB/wPWAwAB7AEDAQcB/wHsAQAD7AYAAQIBAAEDAQAIBwEAAQcBAAECFAAK1gMA
AQcB/wHsAQAF7AYAAQIOAAECFAAB1gj/AdYSABACFAAK1gIAAUIBTQE+BwABPgMAASgDAAFAAwABgAMA
AQEBAAEBBgABBBYAA/+CAAEfAfgBAAH/AfkC/wEAAQ8B+AEAAf8B8AH4AQMBAAEHAfgBAAH/AeAB8AEB
AQABAwH4AQAB/wHBAfABAQEAAQEB+AEAAfgBAwHwAQECAAGAAQABgAEHAYABAQEAAR8DAAEPAQABAQEA
AR8DAAEPAQABAQEAAREDAAEPAQACAQHzAwABDwEAAQEBAAF1AwABDwEAAQEBAAF+AwABHwEAAQMBwAF+
AcABAAHAAT8BwAF/AcABfgHAAWMBwAF/AcABfwHwAX0B8AF/AfABfwHwAX8B8AF/AfABfwHwAX8B8AF/
BP8BAAEfBv8BAAEPAv8B4AP/AQABBwH/AfsBwQH/AfgBPwEAAQMB7wH/AcABPwHwAX8BAAEBAccB9wHA
AX8BUAEPAgABwAHvAcABDwHwAR8BAAEfAcEBzwHAAR8B0AEDAQABFwHAAR8BAAEfAfABBwEAARsBwAE/
AYABHwFQAQcBAQH7AcABDwEAAR8B/AEHAQABewHAAR8BAAEfAdABBwEAAVcBwAEfAYEBHwH/AQcBwAFP
AcABDwEkAf8BUwEHAcABRwGAAQcB5gP/AfABfwGcARMB5wP/AfABfwH8AR8B4AEBAf8BhwH0AQEB9AEB
AeABAQH/AQMB8AEBAfABAwHgAQEB/wEAAfgBAQH4AQMB4AEBAYABAQHAAQEBwAEBAeABAQHAAYABwAEB
AcABAQHgAQEBwAEAAfABAQHwAwABgAQAAQEBBgIAAQEBBAEAAQQBAQMAAR8CAAIBAQABAQEAAR8BAAIB
AYMBAAEBAQABDwEAAQEBAAF/AQABAQGAAQ8BAAEBAQABfwHAAX8BwAEPAcABfwHAAX8BwAF/AeABHwHA
AX8BwAF/AfABfwHgAR8B8AF/AfABfwHwAX8B4AEfAfABfwHwAX8E/wH+AR8D/wH5AfABAQH8AQ8C/wHn
Af8B8AEBAeABAwH+AR8BwwHzAfABAQHAAQAB+AEHAcMB5wHwAQEBwAEAAfgBAwHhAccBgAEBAYABAAGA
AQMB8AGPAQABAQMAAQMB+AEfAQABAQMAAQMB/AE/AQABAQMAAQMB+AEfAQABAQEAAQEBAAEHAfABnwEA
AQEDAAEfAcEBxwEAAQEBAAGBAQABfwGDAeMBwAF/AcABxwHAAX8BjwHxAcABfwHAAX8BwAF/Av8B8AF/
AfABdwHwAX8C/wHwAX8B8AF/AfABfwL/BgAB/AEfBgAB8AFxBgAB4AFzBgABzwHJBgABzwHFBgABjwHV
BgABjwHxBgABjwHxBgABqwHxBgABowHzBgABkwHzBgABzgEPBgABjgEfBgAB+AE/BgAC/wYAAv8B8AEA
AfADAAL/AfABAAHwAwAC/wHwAQAB8AQAAT8BAAE/AQABPwEAAQcBAAE/AQABPwEAAT8BAAEHAQABPwEA
AT8BAAE/AQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEA
AT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEA
AQcC/wHwAQMB8AEDAQABDwL/AfABAwHwAQMBAAEfAv8B8AEDAfABAwEAAT8B/AF/AgAE/wHwAX8CAAT/
AcABfwIABP8BAAEfAwABPwEAAT8BAAEfAwABPwEAAT8BAAEXAwABPwEAAT8BAAEHAwABPwEAAQMFAAE/
AQABAwUAAT8BAAEDBQABPwEAAQMFAAE/AQABAwEAAQcDAAE/AQABAwEAARcDAAE/AQABAwEAAR8CAAL/
AfABAwEAAR8CAAL/AfABAwEAAR8CAAL/AfABAws=
</value>
</data>
<metadata name="C1CommandHolder1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 290</value>
</metadata>
<metadata name="C1ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 329</value>
</metadata>
<metadata name="C1ContextMenu2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 368</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>163</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAASUlEQVQ4T2OgFfiPAxMF/v/9yI+BQeJQ
jBdg00CSIWCFOTk56AopMoAkF4AARZqRAUWaQQCsGUt4EA0G3gAQoEzz0PcCEYCBAQCfxINLHCrVBwAA
AABJRU5ErkJggg==
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAK
CgoKCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAzADMAMzMREQAKCgoAAAAAAAAAAAoREREAAAAAAAAAAAAA
MwAzMxERABEACgoKAAAAAAAAChEREQARAAAAAAAAMwAzADMzCgoKEQARAAAAAAAAAAAAAAoREREAEQAA
AAAAADMAMzMKCgoKChEAAAAAAAAAAAAAAAAKERERAAAAADMAMwAzMwAACgoKCgoAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAP////////////////g////wf///UA////Af///QA///8Af//1AH
///8B///0Af///8H//9TB/////////////8=
</value>
</data>
<data name="empflist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="empflist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="empflist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;316&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 489, 316&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 491, 316&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="ImageList2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACe
BwAAAk1TRnQBSQFMAwEBAAGMAQMBjAEDARABAAEQAQAE/wEJAQAI/wFCAU0BNgEEBgABNgEEAgABKAMA
AUADAAEQAwABAQEAAQgGAAEEGAABgAIAAYADAAKAAQABgAMAAYABAAGAAQACgAIAA8ABAAHAAdwBwAEA
AfABygGmAQABMwUAATMBAAEzAQABMwEAAjMCAAMWAQADHAEAAyIBAAMpAQADVQEAA00BAANCAQADOQEA
AYABfAH/AQACUAH/AQABkwEAAdYBAAH/AewBzAEAAcYB1gHvAQAB1gLnAQABkAGpAa0CAAH/ATMDAAFm
AwABmQMAAcwCAAEzAwACMwIAATMBZgIAATMBmQIAATMBzAIAATMB/wIAAWYDAAFmATMCAAJmAgABZgGZ
AgABZgHMAgABZgH/AgABmQMAAZkBMwIAAZkBZgIAApkCAAGZAcwCAAGZAf8CAAHMAwABzAEzAgABzAFm
AgABzAGZAgACzAIAAcwB/wIAAf8BZgIAAf8BmQIAAf8BzAEAATMB/wIAAf8BAAEzAQABMwEAAWYBAAEz
AQABmQEAATMBAAHMAQABMwEAAf8BAAH/ATMCAAMzAQACMwFmAQACMwGZAQACMwHMAQACMwH/AQABMwFm
AgABMwFmATMBAAEzAmYBAAEzAWYBmQEAATMBZgHMAQABMwFmAf8BAAEzAZkCAAEzAZkBMwEAATMBmQFm
AQABMwKZAQABMwGZAcwBAAEzAZkB/wEAATMBzAIAATMBzAEzAQABMwHMAWYBAAEzAcwBmQEAATMCzAEA
ATMBzAH/AQABMwH/ATMBAAEzAf8BZgEAATMB/wGZAQABMwH/AcwBAAEzAv8BAAFmAwABZgEAATMBAAFm
AQABZgEAAWYBAAGZAQABZgEAAcwBAAFmAQAB/wEAAWYBMwIAAWYCMwEAAWYBMwFmAQABZgEzAZkBAAFm
ATMBzAEAAWYBMwH/AQACZgIAAmYBMwEAA2YBAAJmAZkBAAJmAcwBAAFmAZkCAAFmAZkBMwEAAWYBmQFm
AQABZgKZAQABZgGZAcwBAAFmAZkB/wEAAWYBzAIAAWYBzAEzAQABZgHMAZkBAAFmAswBAAFmAcwB/wEA
AWYB/wIAAWYB/wEzAQABZgH/AZkBAAFmAf8BzAEAAcwBAAH/AQAB/wEAAcwBAAKZAgABmQEzAZkBAAGZ
AQABmQEAAZkBAAHMAQABmQMAAZkCMwEAAZkBAAFmAQABmQEzAcwBAAGZAQAB/wEAAZkBZgIAAZkBZgEz
AQABmQEzAWYBAAGZAWYBmQEAAZkBZgHMAQABmQEzAf8BAAKZATMBAAKZAWYBAAOZAQACmQHMAQACmQH/
AQABmQHMAgABmQHMATMBAAFmAcwBZgEAAZkBzAGZAQABmQLMAQABmQHMAf8BAAGZAf8CAAGZAf8BMwEA
AZkBzAFmAQABmQH/AZkBAAGZAf8BzAEAAZkC/wEAAcwDAAGZAQABMwEAAcwBAAFmAQABzAEAAZkBAAHM
AQABzAEAAZkBMwIAAcwCMwEAAcwBMwFmAQABzAEzAZkBAAHMATMBzAEAAcwBMwH/AQABzAFmAgABzAFm
ATMBAAGZAmYBAAHMAWYBmQEAAcwBZgHMAQABmQFmAf8BAAHMAZkCAAHMAZkBMwEAAcwBmQFmAQABzAKZ
AQABzAGZAcwBAAHMAZkB/wEAAswCAALMATMBAALMAWYBAALMAZkBAAPMAQACzAH/AQABzAH/AgABzAH/
ATMBAAGZAf8BZgEAAcwB/wGZAQABzAH/AcwBAAHMAv8BAAHMAQABMwEAAf8BAAFmAQAB/wEAAZkBAAHM
ATMCAAH/AjMBAAH/ATMBZgEAAf8BMwGZAQAB/wEzAcwBAAH/ATMB/wEAAf8BZgIAAf8BZgEzAQABzAJm
AQAB/wFmAZkBAAH/AWYBzAEAAcwBZgH/AQAB/wGZAgAB/wGZATMBAAH/AZkBZgEAAf8CmQEAAf8BmQHM
AQAB/wGZAf8BAAH/AcwCAAH/AcwBMwEAAf8BzAFmAQAB/wHMAZkBAAH/AswBAAH/AcwB/wEAAv8BMwEA
AcwB/wFmAQAC/wGZAQAC/wHMAQACZgH/AQABZgH/AWYBAAFmAv8BAAH/AmYBAAH/AWYB/wEAAv8BZgEA
ASEBAAGlAQADXwEAA3cBAAOGAQADlgEAA8sBAAOyAQAD1wEAA90BAAPjAQAD6gEAA/EBAAP4AQAB8AH7
Af8BAAGkAqABAAOAAwAB/wIAAf8DAAL/AQAB/wMAAf8BAAH/AQAC/wIAA/8HAAEHAew/AAEHAew9AAH5
AQABBwHsPAAC+QEAAQcB7DsAA/kBAAEHAew6AAT5AQABBwHsOQAF+QEAAQc5AAb5AQABBzgABvk6AAX5
OwAE+TwAA/k9AAL5PgAB+bkAAUIBTQE+BwABPgMAASgDAAFAAwABEAMAAQEBAAEBBQABgBcAA/8BAAH4
Af8GAAH4AX8GAAH4AT8GAAH4AR8GAAH4AQ8GAAH4AQcGAAH4AQcGAAH4AQMGAAH4AQcGAAH4AQ8GAAH4
AR8GAAH4AT8GAAH4AX8GAAH4Af8GAAH5Af8GAAH7Af8GAAs=
</value>
</data>
<data name="drpMiatarbeiter.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="drpMiatarbeiter.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style6{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}EvenRow{BackColor:White;}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style13{}Style9{}OddRow{BackColor:224, 224, 224;}Style1{}Style5{}FilterBar{}Normal{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Editor{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}RecordSelector{AlignImage:Center;}Footer{}Style12{}Style3{}Style7{}Style4{}Caption{AlignHorz:Center;}Style11{}Heading{Wrap:True;Border:Raised,,1, 1, 1, 1;AlignVert:Center;BackColor:Control;ForeColor:ControlText;}Style10{AlignHorz:Near;}Style2{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.DropdownView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" RecordSelectors="False" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;76&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 36, 76&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.DropdownView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 38, 78&lt;/ClientArea&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="MenuNotiz.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<data name="Notizlist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="Notizlist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="Notizlist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style14{}Footer{}Heading{AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{BackColor:255, 255, 192;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;172&lt;/Height&gt;&lt;CaptionStyle parent="Style2" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style5" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style13" /&gt;&lt;FooterStyle parent="Footer" me="Style3" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style2" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style4" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style6" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 326, 172&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;None&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 328, 174&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<metadata name="MenuEmpfaenger.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 134</value>
</metadata>
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 173</value>
</metadata>
<metadata name="SaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 212</value>
</metadata>
<metadata name="statustimer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 407</value>
</metadata>
<metadata name="ImageList3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 446</value>
</metadata>
<data name="ImageList3.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACg
BwAAAk1TRnQBSQFMAwEBAAGMAQMBjAEDARABAAEQAQAE/wEJAQAI/wFCAU0BNgEEBgABNgEEAgABKAMA
AUADAAEQAwABAQEAAQgGAAEEGAABgAIAAYADAAKAAQABgAMAAYABAAGAAQACgAIAA8ABAAHAAdwBwAEA
AfABygGmAQABMwUAATMBAAEzAQABMwEAAjMCAAMWAQADHAEAAyIBAAMpAQADVQEAA00BAANCAQADOQEA
AYABfAH/AQACUAH/AQABkwEAAdYBAAH/AewBzAEAAcYB1gHvAQAB1gLnAQABkAGpAa0CAAH/ATMDAAFm
AwABmQMAAcwCAAEzAwACMwIAATMBZgIAATMBmQIAATMBzAIAATMB/wIAAWYDAAFmATMCAAJmAgABZgGZ
AgABZgHMAgABZgH/AgABmQMAAZkBMwIAAZkBZgIAApkCAAGZAcwCAAGZAf8CAAHMAwABzAEzAgABzAFm
AgABzAGZAgACzAIAAcwB/wIAAf8BZgIAAf8BmQIAAf8BzAEAATMB/wIAAf8BAAEzAQABMwEAAWYBAAEz
AQABmQEAATMBAAHMAQABMwEAAf8BAAH/ATMCAAMzAQACMwFmAQACMwGZAQACMwHMAQACMwH/AQABMwFm
AgABMwFmATMBAAEzAmYBAAEzAWYBmQEAATMBZgHMAQABMwFmAf8BAAEzAZkCAAEzAZkBMwEAATMBmQFm
AQABMwKZAQABMwGZAcwBAAEzAZkB/wEAATMBzAIAATMBzAEzAQABMwHMAWYBAAEzAcwBmQEAATMCzAEA
ATMBzAH/AQABMwH/ATMBAAEzAf8BZgEAATMB/wGZAQABMwH/AcwBAAEzAv8BAAFmAwABZgEAATMBAAFm
AQABZgEAAWYBAAGZAQABZgEAAcwBAAFmAQAB/wEAAWYBMwIAAWYCMwEAAWYBMwFmAQABZgEzAZkBAAFm
ATMBzAEAAWYBMwH/AQACZgIAAmYBMwEAA2YBAAJmAZkBAAJmAcwBAAFmAZkCAAFmAZkBMwEAAWYBmQFm
AQABZgKZAQABZgGZAcwBAAFmAZkB/wEAAWYBzAIAAWYBzAEzAQABZgHMAZkBAAFmAswBAAFmAcwB/wEA
AWYB/wIAAWYB/wEzAQABZgH/AZkBAAFmAf8BzAEAAcwBAAH/AQAB/wEAAcwBAAKZAgABmQEzAZkBAAGZ
AQABmQEAAZkBAAHMAQABmQMAAZkCMwEAAZkBAAFmAQABmQEzAcwBAAGZAQAB/wEAAZkBZgIAAZkBZgEz
AQABmQEzAWYBAAGZAWYBmQEAAZkBZgHMAQABmQEzAf8BAAKZATMBAAKZAWYBAAOZAQACmQHMAQACmQH/
AQABmQHMAgABmQHMATMBAAFmAcwBZgEAAZkBzAGZAQABmQLMAQABmQHMAf8BAAGZAf8CAAGZAf8BMwEA
AZkBzAFmAQABmQH/AZkBAAGZAf8BzAEAAZkC/wEAAcwDAAGZAQABMwEAAcwBAAFmAQABzAEAAZkBAAHM
AQABzAEAAZkBMwIAAcwCMwEAAcwBMwFmAQABzAEzAZkBAAHMATMBzAEAAcwBMwH/AQABzAFmAgABzAFm
ATMBAAGZAmYBAAHMAWYBmQEAAcwBZgHMAQABmQFmAf8BAAHMAZkCAAHMAZkBMwEAAcwBmQFmAQABzAKZ
AQABzAGZAcwBAAHMAZkB/wEAAswCAALMATMBAALMAWYBAALMAZkBAAPMAQACzAH/AQABzAH/AgABzAH/
ATMBAAGZAf8BZgEAAcwB/wGZAQABzAH/AcwBAAHMAv8BAAHMAQABMwEAAf8BAAFmAQAB/wEAAZkBAAHM
ATMCAAH/AjMBAAH/ATMBZgEAAf8BMwGZAQAB/wEzAcwBAAH/ATMB/wEAAf8BZgIAAf8BZgEzAQABzAJm
AQAB/wFmAZkBAAH/AWYBzAEAAcwBZgH/AQAB/wGZAgAB/wGZATMBAAH/AZkBZgEAAf8CmQEAAf8BmQHM
AQAB/wGZAf8BAAH/AcwCAAH/AcwBMwEAAf8BzAFmAQAB/wHMAZkBAAH/AswBAAH/AcwB/wEAAv8BMwEA
AcwB/wFmAQAC/wGZAQAC/wHMAQACZgH/AQABZgH/AWYBAAFmAv8BAAH/AmYBAAH/AWYB/wEAAv8BZgEA
ASEBAAGlAQADXwEAA3cBAAOGAQADlgEAA8sBAAOyAQAD1wEAA90BAAPjAQAD6gEAA/EBAAP4AQAB8AH7
Af8BAAGkAqABAAOAAwAB/wIAAf8DAAL/AQAB/wMAAf8BAAH/AQAC/wIAA/+JAAISPgABOAISPQABBwE4
AhI8AAHsAQcBOAISPAAB7AEHATgCEjkABBIBBwE4AhI4AAHsAQcFOAISOAAB7AEHATgCEjwAAewBBwE4
AhI7AAHsAQcCOAISOwAB7AEHAjgCEjsAAewBBwI4ARKwAAFCAU0BPgcAAT4DAAEoAwABQAMAARADAAEB
AQABAQUAAYAXAAP/AQAC/wYAAv8GAAGDAT8GAAH/AR8GAAGHAQ8GAAH/AQcGAAKDBgAB/gEBBgABhgcA
Af8BBwYAAoMGAAH/AYEGAAGDAcAGAAH/AeAGAAL/BgAC/wYACw==
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,165 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="ListBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Panel2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Panel3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TVStatus.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="sblist.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmSerienbriefe_Load</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACqqgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAABekF6QXpBekFAAAAAAAADwAF6QXpBekF6QUAAAAAABEPAAXp
BekF6QXpBQAAAAAPEQ8ABekF6QXpBekFAAAAEQ8RDwAAAAAAAAAAAAAAAAAAAAAPEQ8RDwAAAAAAAAoR
EREAEQ8RDxEAALoAAAAKERERAAAAAAAAAAAAugAAChEREQARAAAAAAAAALoAAAoREREAEQAAAAAAAAC6
AAAKCgoKChEAEQAAugC6AAAAAAAKERERABEAALq6AAAAAAAACgoKCgoRAAC6uroAAAAAAAAAChEREQAA
AAAAAAAAAAAAAAoKCgoKAAAAAAAAAAAf//8AD///AAf//wAD//8AAf//AAD//wAf//8AF///ABv//wH7
//8Ae///AFf//8BP///AR///8H////B///8=
</value>
</data>
</root>

View File

@@ -0,0 +1,398 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmSerienbriefe_Load
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Panel2 As System.Windows.Forms.Panel
Friend WithEvents Panel3 As System.Windows.Forms.Panel
Friend WithEvents TVStatus As System.Windows.Forms.TreeView
Friend WithEvents sblist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmSerienbriefe_Load))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Me.ListBox1 = New System.Windows.Forms.ListBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.TVStatus = New System.Windows.Forms.TreeView()
Me.sblist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.Panel1.SuspendLayout()
Me.Panel2.SuspendLayout()
Me.Panel3.SuspendLayout()
CType(Me.sblist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox1.SuspendLayout()
Me.SuspendLayout()
'
'ListBox1
'
Me.ListBox1.Location = New System.Drawing.Point(176, 448)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(368, 30)
Me.ListBox1.TabIndex = 0
'
'Button1
'
Me.Button1.Anchor = (System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right)
Me.Button1.Location = New System.Drawing.Point(688, 16)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 1
Me.Button1.Text = "&OK"
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(8, 16)
Me.Button2.Name = "Button2"
Me.Button2.TabIndex = 2
Me.Button2.Text = "&Abbruch"
'
'Panel1
'
Me.Panel1.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button2, Me.Button1})
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel1.Location = New System.Drawing.Point(0, 253)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(768, 48)
Me.Panel1.TabIndex = 28
'
'Panel2
'
Me.Panel2.Controls.AddRange(New System.Windows.Forms.Control() {Me.sblist})
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Left
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(528, 253)
Me.Panel2.TabIndex = 29
'
'Panel3
'
Me.Panel3.Controls.AddRange(New System.Windows.Forms.Control() {Me.TVStatus})
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel3.Location = New System.Drawing.Point(3, 16)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(234, 234)
Me.Panel3.TabIndex = 30
'
'TVStatus
'
Me.TVStatus.BackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(255, Byte), CType(192, Byte))
Me.TVStatus.Dock = System.Windows.Forms.DockStyle.Fill
Me.TVStatus.ImageIndex = -1
Me.TVStatus.Name = "TVStatus"
Me.TVStatus.SelectedImageIndex = -1
Me.TVStatus.Size = New System.Drawing.Size(234, 234)
Me.TVStatus.TabIndex = 1
'
'sblist
'
Me.sblist.AllowFilter = True
Me.sblist.AllowSort = True
Me.sblist.AllowUpdate = False
Me.sblist.AllowUpdateOnBlur = False
Me.sblist.AlternatingRows = True
Me.sblist.CaptionHeight = 17
Me.sblist.CollapseColor = System.Drawing.Color.Black
Me.sblist.Cursor = System.Windows.Forms.Cursors.Default
Me.sblist.DataChanged = False
Me.sblist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.sblist.Dock = System.Windows.Forms.DockStyle.Fill
Me.sblist.ExpandColor = System.Drawing.Color.Black
Me.sblist.FetchRowStyles = True
Me.sblist.FilterBar = True
Me.sblist.GroupByCaption = "Drag a column header here to group by that column"
Me.sblist.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.sblist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.sblist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.sblist.Name = "sblist"
Me.sblist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.sblist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.sblist.PreviewInfo.ZoomFactor = 75
Me.sblist.PrintInfo.ShowOptionsDialog = False
Me.sblist.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.sblist.RowDivider = GridLines1
Me.sblist.RowHeight = 15
Me.sblist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.sblist.ScrollTips = True
Me.sblist.Size = New System.Drawing.Size(528, 253)
Me.sblist.TabIndex = 29
Me.sblist.Text = "C1TrueDBGrid1"
Me.sblist.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Wrap" & _
":True;Trimming:None;BackColor:White;}Selected{ForeColor:HighlightText;BackColor:" & _
"Highlight;}Heading{Wrap:True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeCol" & _
"or:ControlText;AlignVert:Center;}Inactive{ForeColor:InactiveCaptionText;BackColo" & _
"r:InactiveCaption;}FilterBar{BackColor:255, 255, 192;}Footer{}Caption{AlignHorz:" & _
"Center;}Editor{}Normal{Wrap:True;BackColor:Control;}Style27{}Style26{}HighlightR" & _
"ow{ForeColor:HighlightText;BackColor:Highlight;}Style1{}OddRow{Wrap:True;AlignHo" & _
"rz:General;BackColor:224, 224, 224;}RecordSelector{AlignImage:Center;}Style9{}St" & _
"yle8{}Style3{}Style2{}Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:C" & _
"ontrolDark;}Style10{AlignHorz:Near;}</Data></Styles><Splits><C1.Win.C1TrueDBGrid" & _
".MergeView Name="""" AllowRowSizing=""IndividualRows"" AlternatingRowStyle=""True"" Ca" & _
"ptionHeight=""17"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles" & _
"=""True"" FilterBar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16" & _
""" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientR" & _
"ect>0, 0, 524, 249</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""H" & _
"eading"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle " & _
"parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /" & _
"><FooterStyle parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style" & _
"12"" /><HeadingStyle parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""Hi" & _
"ghlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRow" & _
"Style parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector""" & _
" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""No" & _
"rmal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style" & _
" parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""He" & _
"ading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Headi" & _
"ng"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal" & _
""" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal" & _
""" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me" & _
"=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Capti" & _
"on"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSpli" & _
"ts><Layout>Modified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientAr" & _
"ea>0, 0, 524, 249</ClientArea></Blob>"
'
'GroupBox1
'
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.Panel3})
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Fill
Me.GroupBox1.Location = New System.Drawing.Point(528, 0)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(240, 253)
Me.GroupBox1.TabIndex = 31
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Details zum Serienbrief"
'
'frmSerienbriefe_Load
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(768, 301)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.GroupBox1, Me.Panel2, Me.Panel1, Me.ListBox1})
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmSerienbriefe_Load"
Me.Text = "Serienbrief laden"
Me.Panel1.ResumeLayout(False)
Me.Panel2.ResumeLayout(False)
Me.Panel3.ResumeLayout(False)
CType(Me.sblist, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
#End Region
Dim m_serienbriefnr As Integer
Property Serienbriefnr() As Integer
Get
Return m_serienbriefnr
End Get
Set(ByVal Value As Integer)
m_serienbriefnr = Value
End Set
End Property
Private Sub frmSerienbriefe_Load_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim dt As New DataTable()
dt = Load_Serienbriefe()
Me.sblist.DataSource = dt
Me.sblist.DataMember = dt.TableName
Me.sblist.Splits(0).DisplayColumns(0).Visible = False
Dim i As Integer
For i = 5 To Me.sblist.Splits(0).DisplayColumns.Count - 1
Me.sblist.Splits(0).DisplayColumns(i).Visible = False
Next
'Me.sblist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.IndividualRows
Me.sblist.Splits(0).DisplayColumns(1).Width = 170
Me.sblist.Splits(0).DisplayColumns(2).Width = 80
Me.sblist.Splits(0).DisplayColumns(3).Width = 120
Me.sblist.Splits(0).DisplayColumns(4).Width = 100
For i = 0 To Me.sblist.Splits(0).Rows.Count - 1
Me.sblist.Splits(0).Rows(i).AutoSize()
Next
If dt.Rows.Count < 1 Then
Me.Button1.Enabled = False
End If
' Me.sblist.Columns("Status").FilterText = "in Bearbeitung"
End Sub
Private Function Load_Serienbriefe() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_get_serienbriefe"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Me.Serienbriefnr = Me.sblist.Columns(0).Value
Catch
Exit Sub
End Try
'Me.Serienbriefnr = Me.ListBox1.SelectedValue
Me.DialogResult = DialogResult.OK
Me.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Serienbriefnr = -1
Me.Close()
End Sub
Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
Me.Button1_Click(sender, e)
End Sub
Private Sub sblist_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles sblist.DoubleClick
Try
Me.Button1_Click(sender, e)
Catch
End Try
End Sub
Private Sub sblist_RowColChange(ByVal sender As System.Object, ByVal e As C1.Win.C1TrueDBGrid.RowColChangeEventArgs) Handles sblist.RowColChange
Try
Me.TVStatus.BeginUpdate()
Me.TVStatus.Nodes.Clear()
Dim tn As New TreeNode()
Dim tn1 As New TreeNode()
Dim tn2 As New TreeNode()
Dim iFehlerhaft As Integer
Dim iInBearbeitung As Integer
Dim iNichtgeneriert As Integer
Dim iAusgeloest As Integer
Dim iErstellt As Integer
Dim iGedruckt As Integer
Dim iBestaetigt As Integer
iFehlerhaft = Me.sblist.Columns("fehlerhaft").Value
iNichtgeneriert = Me.sblist.Columns("inBearbeitung").Value
iAusgeloest = Me.sblist.Columns("ausgeloest").Value
iErstellt = Me.sblist.Columns("erstellt").Value
iGedruckt = Me.sblist.Columns("gedruckt").Value
iBestaetigt = Me.sblist.Columns("bestaetigt").Value
tn = Me.TVStatus.Nodes.Add(Me.sblist.Columns(1).Text)
tn.SelectedImageIndex = 0
tn.ImageIndex = -99
tn.Tag = -3
If Me.sblist.Columns("sbstatus").Value > 0 Then
tn1 = tn.Nodes.Add("in Bearbeitung (0)")
Else
tn1 = tn.Nodes.Add("in Bearbeitung (" + Str(iFehlerhaft + iNichtgeneriert + iErstellt + iGedruckt + iBestaetigt).Trim + ")")
End If
tn1.Tag = -9
tn1.SelectedImageIndex = 0
tn1.ImageIndex = -99
If Me.sblist.Columns("sbstatus").Value > 0 Then
tn1 = tn.Nodes.Add("Dokumentgenerierung ausgelöst " + "(" + Str(iAusgeloest).Trim + ")")
tn1.Tag = 1
tn1.SelectedImageIndex = 0
tn1.ImageIndex = -99
tn1 = tn.Nodes.Add("Abgeschlossen (" + Str(iFehlerhaft + iNichtgeneriert + iErstellt + iGedruckt + iBestaetigt).Trim + ")")
tn1.Tag = -4
tn1.SelectedImageIndex = 0
tn1.ImageIndex = -99
End If
tn2 = tn1.Nodes.Add("Fehlerhaft " + "(" + Str(iFehlerhaft).Trim + ")")
tn2.Tag = -1
tn2.SelectedImageIndex = 0
tn2.ImageIndex = -99
tn2 = tn1.Nodes.Add("Empfänger in Bearbeitung " + "(" + Str(iNichtgeneriert).Trim + ")")
tn2.Tag = 0
tn2.SelectedImageIndex = 0
tn2.ImageIndex = -99
tn2 = tn1.Nodes.Add("Dokumente erstellt " + "(" + Str(iErstellt).Trim + ")")
tn2.Tag = 2
tn2.SelectedImageIndex = 0
tn2.ImageIndex = -99
tn2 = tn1.Nodes.Add("Dokumente gedruckt " + "(" + Str(iGedruckt).Trim + ")")
tn2.Tag = 3
tn2.SelectedImageIndex = 0
tn2.ImageIndex = -99
tn2 = tn1.Nodes.Add("Dokumente bestätigt " + "(" + Str(iBestaetigt).Trim + ")")
tn2.Tag = 4
tn2.SelectedImageIndex = 0
tn2.ImageIndex = -99
Me.TVStatus.ExpandAll()
If Me.sblist.Columns("sbstatus").Value < 1 Then
tn1 = tn.Nodes.Add("Dokumentgenerierung ausgelöst " + "(" + Str(iAusgeloest).Trim + ")")
tn1.Tag = 1
tn1.SelectedImageIndex = 0
tn1.ImageIndex = -99
tn1 = tn.Nodes.Add("Abgeschlossen")
tn1.Tag = -4
tn1.SelectedImageIndex = 0
tn1.ImageIndex = -99
End If
Catch
Finally
Me.TVStatus.EndUpdate()
End Try
End Sub
End Class

View File

@@ -0,0 +1,613 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>667, 17</value>
</metadata>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABK
CgAAAk1TRnQBSQFMAgEBBAEAAQwBAAEMAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AGAAB7DIA
AQMB/wsAAewB/wIHAf8DBwH/AQcnAAHsAQMB7AH/CwAB7Aj/AQcIAAHsBQAB7BYAAQMB7AEDAewBAwH/
CwAB7AH/AgcB/wMHAf8BBwcAAgMB7AMAAQMB7AYAAQcJAAEHBAABAwHsAQMB7AEDAewB/wEAAewJAAHs
CP8BBwcAAewC+wEGAuwB+wEDBgABBwkAAQcEAAHsAQMB7AEDAewBAwH/AQAB7AkAAewB/wYHAf8BBwgA
Af8C+wEHAvsB7BUAAQMB7AEDAgAB7AH/AQAB7AgAAQcB7Aj/AQcIAAEDAvsCBwEDBwABBwHsBwABBwHs
BAAB7AEDAewCBwEDAf8BAAHsAQABBgYAAQcB7AH/BAcB/wEHAf8BBwcAAewBAwP7AQcBAwEEBgABBwHs
BwABBwHsBAABAwHsAQMB7AEDAewB/wIAAQYF/gH7AewBBwHsCP8BBwYAAQMF+wEHAvsBAwHsBAABBwHs
BwABBwHsBAAB7AEDAewBAwHsAQMB/wEAAW0G/gEAAfsB7AEHAf8EBwP/AQcFAAHsA/8BBwL7AQcD/wED
EwABAwHsAQMB7AEDAewB/wEAAewBbQH+BG0C7AMHAuwD/w0AAQcB+wHsCQACBwUAAgcFAAHsAQMB7AED
AewBAwH/AQAB7AEAAm0DAAP7AQcB+wEHAvsB7AH/AewB/wsAAf8B+wHsFwABAwHsAQMB7AEHAf8B7AEA
AewCAAFtBAAB+wHsAfsB7AH7AewD/wHsDAACAwsAAewFAAHsBgAB7AEDAQcB/wHsAQAD7AYAAfsB7AEA
AfsB7AEAAfsE7AwAAgMYAAEHAf8B7AEABewJAAH7AewCAAH7OwAB+wHsKwABQgFNAT4HAAE+AwABKAMA
AUADAAEgAwABAQEAAQEGAAEBFgAD/4EAAfwBfwHgAQME/wHwAX8B4AEDBP8BwAF/AeABAwH7Ae8BhwHh
AQABHwHgAQMB8QHPAYcB4QEAAR8B4AEDAfABDwGHAeEBAAEXAeABAwH4AQ8CgQEAAQcBwAEDAfgBHwGA
AQECAAHAAQMB8AEPAYABAQMAAQMB4AEDAYABAQIAAYABAwHAAQMBgAEBAwABAwH+AT8BwQGDAQABBwEA
AQcB/gE/AeEBhwEAARcBgAEPAf4BfwHhAYcBAAEfASQBHwH+AX8B4QGHAQABHwHmBf8BAAEfAecF/ws=
</value>
</data>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAC2
DQAAAk1TRnQBSQFMAgEBCAEAAQwBAAEMAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAATADAAEBAQABCAYAAQwYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ABQAw/xAA
JP8KAAL/EAAE/wHsAhQBEAHsAhQBEBf/AfABvAHwAd0D8wP/AQAC/wUAAewFAAHsBAAF/wEQARQB7AH/
ARABFAHsF/8CvAHwAbwB8QEZAfMD/wEAAv8EAAIDAewDAAEDAewEAAT/AUMBbQEUARAB7AJtARQB7Bb/
ArwBIAEAAe0DAAH0Af8BAAL/BAAB7AL7AQYC7AH7AQMEAAP/AUMBEgIUAQABFQFDARICFAHsBv8BAAED
AQAB/wEAAiII/wEHArsBvAHwAbwB8QEZAfMB/wEAAv8FAAH/AvsBBwL7AewEAAP/AW0B9wHsARQBbQEU
ARAB9wPsBv8BAAE3AfsBAwE3AfsBIgj/AQcBkwG1A7wB8AHdAvMBAAL/BQABAwL7AgcBAwUAA/8BbQH3
AewBbQEQARQBQwH3A+wH/wEiAfsDNwEACP8BvAK2ArsBvAHwAbwB8QEZAQAC/wQAAewBAwP7AQcBAwEE
BAAD/wFtAfcC7AEVAewBbQH3A+wG/wEAATcB+wIDAfsBIgj/AbwBuwEBAQABEgQAAbwBAAL/AwABAwX7
AQcC+wEDAewCAAP/AW0B9wPsAf8BbQH3A+wG/wEiAgMB+wE3AgMBAAf/AfIBvAG7ArYCuwG8AfABvAEA
Av8CAAHsA/8BBwL7AQcD/wEDAgAD/wFtAfcD7AH/AW0B9wPsCP8BAAE3ASIK/wHxAfABvAG7ApMBtQO8
AQAC/wcAAQcB+wHsBgAD/wFDARICFAHsAf8BQwESAhQB7An/ASIBAAr/AfMB8QK8AbsCtgK7AbwBAAL/
BwAB/wH7AewGAAP/BOwBBwH/BOwBBxX/AfQB8wEgBAAB7wEUAbwBAAL/BwACAwcAJf8C8wO8AewBHAG1
AQAC/wcAAgMHADD/EAAw/xAAEAcgAAn/AewBAAHsBP8HBwEAAQcBAAPsAQACByAAB/8B7AEAAv8B7AT/
BwcBAAEHAQAD7AEAAgcHMAEABzARAAX/AewBAAT/AQAB7AP/AQABBwQAAQcBAAEHAQAD7AEAAgcBMAWg
AgABmgGgBJoBMAcAAf8B+wgAA/8B7AEABf8B/AH/AewD/wUHAwABBwEAA+wBAAIHATABwwSgAQAEoAOa
ATAFAAH/AQAB+wH/AfsB/wYAAv8BAAX/AfwB/wH8Af8BAAHsAv8FBwIAAgcBAAHsAQcB7AEAAgcBMAHD
A6ABAAEgAQACoAGaAaACmgEwBAAB+wIAAf8B+wH/AfsB/wH7BAAC/wHsA/8B/AH/AfwC/wH8Af8B7AL/
AgABBwEAAQcDAAEHAQAD7AEAAgcBMAHDA6ABAAIgAgADoAGaATADAAH/AQAB/wEAAfsB/wH7Af8B+wH/
AfsB/wIAAf8B7AEHAQAC/wH8Av8B/AH/AfwB/wEAAewB/wQHBgAD7AEAAgcBMAHDAqABAAP5AiABAAGg
AZoBoAEwAgAB+wEAAv8BAAH/AfsB/wH7Af8B+wH/AfsB/wEAAf8DBwP/AfwB/wH8Av8B/AH/AewB/wYH
AgABBwIAAuwBAAIHATABwwH0AaABAAEXBPkBIAEAAaABmgEwAwAD/wIAAf8B+wH/AfsB/wH7Af8B+wEA
Af8BAAIHAQAC/wH8Av8B/AH/AfwB/wEAAewFBwMAAQcBAAPsAQACBwEwAcMBoAEAARcCAAEXAfkEAAGg
ATAFAAP/AgAB+wH/AfsB/wH7Af8BAAH/AgACBwX/AfwC/wH8Af8B7AYHAgABBwIAAuwBAAIHATAB9AHD
AgACoAIABKABmgEwAwAB+wH/AgAC/wEAAf8B+wH/AfsB/wH7AQAD/wEAAQcBAAH/AwcB/wH8A/8BAAkH
BQACBwEwAvQEwwWgAZoBoAEwBAAB+wH/AfsBAAL/AgAB+wH/AfsB/wIAA/8BAAEHAf8CBwf/EAcBMAea
BzAGAAH/AfsBAAL/AwAB/wH7AQAC/wEAAv8CAAL/AQAB7AEHAv8BAAH/CAcEBAQHAQABMAH0AsMCoAEw
EgAB/wH7BAAE/wEAAf8BAAH/AQAB/wEHAwAC/wgHAQQCBwEEBAcCAAUwGQAG/wEABP8BBwEAA/8IBwQE
BAcgABD/AUIBTQE+BwABPgMAASgDAAFAAwABMAMAAQEBAAEBBQABgAEBFgAD/4cAAv8GAAL/BgAB+wHv
BgAB8QHPBgAB8AEPBgAB+AEPBgAB+AEfBgAB8AEPBgAB4AEDBgABwAEDBgAB/gE/BgAB/gE/BgAB/gF/
BgAB/gF/BgAC/wYAAv8CAAT/BAABgAEAAv8GAAH4Af8GAAHwAT8GAAHgAQ8GAAHAAQMGAAGAFwABgAcA
AYAHAAHABgABAQHgBQABgAH/AfkFAAHBAv8BzwQABP8CAAs=
</value>
</data>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>281, 17</value>
</metadata>
<metadata name="ImageList4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>455, 32</value>
</metadata>
<data name="ImageList4.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAB6
PQAAAk1TRnQBSQFMAgEBQwEAAVQBAAEMAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARABAQIAAQEBAAEIBgABRBgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc
AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA
AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz
AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA
AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA
AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm
AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA
ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz
AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz
AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz
AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ
AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm
AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM
Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ
AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ
AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA
ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/
ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ
AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA
AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA
AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA
AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ
AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA
AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/
AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/
ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/
AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA
AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP/IwAO7D4AAuwYAAEp
GAAN+wEAAewWAAGFAQABKQI3FgAF+wIAASkF+wEAAewUAAEBAQABhQHmASkENxQABfsCAAEpBPsBAALs
EgABJwERAQEB+QGFAeYBKQE3AfcDNxQAC/sBAAHsEgABbQEnAfoBAQH5AYUB5gEpAjcC9wE3FAAF+wEA
BPsBAAHsEwABbQEnAfoBAQH5AYUB5gEpBDcB9xUABPsBAAT7AQAB7BQAAScB+gEBAfkBhQHmASkBNwL3
AjcVAAP7AwAC+wEAAewVAAEnAfoBAQH5AYUB5gEpAzcB9wE3FgAC+wMAAvsBAAHsFQABJwH6AQEB+QGF
AeYCKQI3AykVAAL7AwAB+wEAAewWAAEnAfoBAQH5AYUC5gIpATcBKQE3FwAC+wEAAvsBAAHsFgABJwH6
AgEB+QKFAeYDKRgABPsBAAHsFwACJwH6AgEB+QOFGwAD+wEAAewYAAInAfoDAR0AAvscAAMnigABZQHm
BAcC5ggAAaYB3QQHAd0BBxcAAzAFAAcwAgABZQfmCAABpgbdAQcPAAEpBwABMAKgAYUD1gEAAZoBoASa
ATACAAFlAeYEBwLmAQAC+QUAAaYB3QQHAd0BBwEAAZQBBwoAAYUBAAEpAlkFAAEwAcMBoAGFAd0BCQHW
AwABoAOaATACAAFlB+YBAAL5BQABpgbdAQcBAAGUAQcIAAEBAQABhQHdASkEWQMAATABwwGgAYUC3QHW
AQABlAEAAZoBoAKaATACAAFlAeYBBwHmAgcC5gEAAvkFAAGmAd0BBwHdAgcB3QEHAQABlAEHBgABJwER
AQEBlAGFAd0BKQFZAfcDWQIAATABwwGgAYUC3QHWAQABlAMAAaABmgEwAgABZQfmAQAC+QEAAvoCAAGm
Bt0BBwEAAZQBBwEAAZ4BBwIAAW0BJwGeAQEBlAGFAd0BKQJZAvcBWQIAATABwwGgBYUBlAEAAZ4BAAGa
AaABMAIAAWUB5gMHAeYBZQIAAvkBAAL6AgABpgHdAwcB3QGmAgABlAEHAQABngEHAgABbQEnAZ4BAQGU
AYUB3QEpBFkB9wIAATABwwOgASMCvQGUAQABngEAAaABmgEwAgABZQXmAWUB5gEAAvkBAAL6AgABpgXd
AaYB3QEAAZQBBwEAAZ4BBwMAAScBngEBAZQBhQHdASkBWQL3AlkCAAEwAcMDoAUjAZ4BAAGaAaABMAIA
CGUD+QEAAvoCAAemAYUClAEHAQABngEHAwABJwGeAQEBlAGFAd0BKQNZAfcBWQIAATAB9AHDBKABAgLC
AZ4BAAGgAZoBMAUAASMB+QMHAfkBIwIAAvoFAAEjAZQDBwGUASMCAAGeAQcDAAEnAZ4BAQGUAYUB3QIp
AlkDKQEAATAC9ATDBQIBmgGgATAFAAEjBfkBIwH5AQAC+gUAASMFlAEjAZQBAAGeAQcDAAEnAZ4BAQGU
AYUC3QIpAVkBKQFZAgABMAeaBzAFAAgjA/oFAAgjAp4BBwMAAScBngIBAZQChQHdAykEAAEwAfQCwwKg
ATAPAAEnAfoDBwH6AScJAAECAZ4DBwGeAQIEAAInAZ4CAQGUA4UHAAUwEAABJwX6AScB+ggAAQIFngEC
AZ4EAAInAZ4DAR4ACCcIAAgCBQADJzsAAew/AAHsAhoBBwHsAQcBGgGaBHo0AAHsAcMBGgEAAewBAAEa
ApoDejQAAewCoAEHAewBBwMaAZoCejQAAewCoAEAAewBAAGaAxoCmjQAAewCoAEHAewBBwGgAxoCmjQA
AewCoAEAAewBAAGgBBoBmjQAAewBwwGgAQcB7AEHAaABmgQaNAAB7AHDAaABAAHsAQADoAMaNAAB7AHD
AaABBwEAAZIDoAGaAho0AAHsAcMBoAHsAe8BAAagNAAB7ALDAewB9gEABqA0AAHsAsMB7AEHAQABegKg
NwAB7APDAewCwwKgAewBoDUAAewHwwGgAew2AArs/wD/AP8A/wBZAA77MgAB+wwAAfsJAAIgAQACIAEA
AiAIAAIgAQACIAEAAiAEAAHvAbwB7wG8BO8FAAH7AgAJ+wEAAfsJAAIgAQACIAEAAiAIAAIgAQACIAEA
AiAEAAH/BLwB7wG8Ae8FAAH7AwAC+wQAAvsBAAH7JQAC/wHvAbwB7wG8Au8FAAH7BAAC+wYAAfsCAAH8
AQAB/AEAAfwBAAH8AQAB/AYACgIKAAH/AbwB/wS8Ae8FAAH7AQAC+wEAAvsCAAL7AgAB+wEAAfwI/wcA
AQII/wECCgAC/wG8Af8B7wG8Ae8BvAUAAfsBAAL7AgAF+wIAAfsCAAH/AQAB/AH/AfwBAAL/AfwGAAEC
Af8IAgoAAf8BvAH/AbwB/wK8Ae8FAAH7AQAC+wIAAvsBAAL7AgAB+wEAAfwB/wH8AQABBwEAAfwBBwH/
BwABAgH/AwIBBwQCCgAC/wG8Af8JAAH7AgAC+wEAAvsFAAH7AgAB/wEAAfwBAAH8AQAB/AH/AfwGAAEC
Av8BAgEHAwIB/wECCgAB/wG8Af8BvAEAAbwC7wUAAfsDAAL7AQAC+wEAAvsBAAH7AQAB/AH/AfwB/wH8
AQAB/wEAAQcHAAECAf8BAgEHAwIC/wECCgAE/wEAAf8BvAHvBQAB+wQAB/sBAAH7AgAB/AEAAf8BAAH8
Af8B/AEAAfwGAAECAf8BBwUCAf8BAgoABP8BAAH/AbwGAAH7DAAB+wEAAfwBAAH8AQAB/AEAAfwBAAH8
BwABAgH/AgIC/wICAf8BAhcAAfsMAAH7AgAI/wH8BgABAgj/AQIXAA77AQAB/AEAAfwBAAH8AQAB/AEA
AfwHAAoCWgABBwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEHAgABBwoAA+woAAEHAgABBwEA
AQcBAAEHAgABBwgAAQcE/wEHCgAH7wMAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEA
AfwLAAHsAQAB/wEAA/8B7AEHCQAB/wUAAe8CAAH8CP8HAAH8CP8NAAEHB/8B7AgAAv8BvAH/AbwB/wHv
AwAB/wEAAfwB/wH8AQAC/wH8BwAB/wEAAfwB/wH8AQAC/wH8DAAB/wEAAv8CAAL/AewCAAXvAQAB/wUA
Ae8CAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYIAAH/AQAC/wMA
Af8BBwIAAf8FAAL/AbwB/wG8Af8B7wMAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gMAAf8BAAH8AQAB/AEA
AfwB/wH8A/8B1ggAAQcD/wEAA/8B7AIAAf8BvAH/AbwB/wEAAf8CAAG8BQAB/AH/AfwB/wH8AQAB/wEA
AQcBAAHWAv8B1gIAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYHAALsAf8BAAH/AQAB/wHsAf8BAAHs
AQAB/wUAAv8BvAH/AQAB/wQAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAH8AQAB/wEAAfwB/wH8
AQAB/AHWAQcB/wHWBQACIAIAAewF/wHsAwAB/wG8Af8BvAH/AQAE/wUAAfwBAAH8AQAB/AEAAfwBAAH8
AQAC1gH/AdYCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAtYB/wHWBAABQQIgBAAB7AEHAewFAAH/AgAB/wwA
CP8B/AH/AdYBBwHWAwAI/wH8Af8B1gEHAdYDAAHjAkEEIAHsAwAB7AQAAf8BvAH/AbwBAAH/CQAB/AEA
AfwBAAH8AQAB/AEAAfwBAAH/A9YCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gIAA+MDQQUgBgAE/w8A
CtYGAArWAwAE4wJBAyAaAAHWCP8B1gYAAdYI/wHWBAAD4x8ACtYGAArWBQAC4z8AAQcCAAEHAQABBwEA
AQcCAAEHNQABBwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEHAgABBxEACgIGAAoCBgAKAgcA
AfwBAAH8AQAB/AEAAfwBAAH8BgABAgj/AQIGAAECCP8BAgYAAQII/wECBgAB/Aj/BwABAgH/CAIGAAEC
Af8IAgYAAQIB/wgCBwAB/wEAAfwB/wH8AQAC/wH8BgABAgH/AwIBBwQCBgABAgH/AwIBBwQCBJgCAAEC
Af8DAgEHBAIEmAIAAfwB/wH8AQABBwEAAfwBBwH/BwABAgL/AQIBBwMCAf8BAgYAAQIC/wECAQcDAgH/
AQID/wGYAgABAgL/AQIBBwMCAf8BAgP/AZgDAAH/AQAB/AEAAfwBAAH8Af8B/AYAAQIB/wECAQcDAgL/
AQIGAAECAf8BAgEHAwIC/wECBJgCAAECAf8BAgEHAwIC/wECBJgCAAH8Af8B/AH/AfwBAAH/AQABBwcA
AQIB/wEHBQIB/wECBgABAgH/AQcFAgH/AQIEmAIAAQIB/wEHBQIB/wECBJgDAAH8AQAB/wEAAfwB/wH8
AQAB/AYAAQIB/wICAv8CAgH/AQIGAAECAf8CAgL/AgIB/wECApgB/wGYAgABAgH/AgIC/wICAf8BAgKY
Af8BmAIAAfwBAAH8AQAB/AEAAfwBAAH8BwABAgj/AQIGAAECCP8BAgGYAv8BmAIAAQII/wECAZgC/wGY
AwAI/wH8BgAKAgYACgICmAH/AZgCAAoCApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwbAAGYAf8CmAL/
ApgB/wGYBgABmAH/ApgC/wKYAf8BmCYAAZgI/wGYBgABmAj/AZgmAAqYBgAKmCYAAQcCAAEHAQABBwEA
AQcCAAEHEQAB7AMAAQcCAAEHAQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcRAAHsBAcCAAEH
AQABBwEAAQcCAAEHFQABBwIAAQcBAAEHAQABBwIAAQcEAAHsAQcB+wIHAQAD7AQAAewD/wEHAgABBwEA
AQcBAAEHAgABBwIAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEAAfwJAAHsA/8B+wH/
AQAB+wEHAuwCAAHsAf8EBwH/AwcB/wEHBAAB/Aj/BwAB/Aj/CwAB7AH7A/8B+wEAAf8B+wEHAewBAAHs
Cv8BBwUAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AoAAewC/wH7Av8BAAH/AgAB7AEA
AewB/wQHAf8DBwH/AQcEAAH8Af8B/AEAAQcBAAH8AQcB/wEABNYCAAH8Af8B/AEAAQcBAAH8AQcB/wEA
BNYHAAHsA/8B+wHsAQAB/wH7AQcBAAHsCv8BBwUAAf8BAAH8AQAB/AEAAfwB/wH8A/8B1gMAAf8BAAH8
AQAB/AEAAfwB/wH8A/8B1gkAAfsD/wH7Av8BBwEAAewB/wgHAf8BBwQAAfwB/wH8Af8B/AEAAf8BAAEH
AQAB1gL/AdYCAAH8Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWBwACAQEAAf8B+wP/AfsBBwEAAewK/wEH
BQAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAfwBAAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAIB
AwABAQEAA/8B+wL/AQcBAAHsAf8CBwH/BQcB/wEHBAAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gIA
AfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAH5AQEBAAH5AQABAQMAA/8B+wEHAQAB7Ar/AQcFAAj/
AfwB/wHWAQcB1gMACP8B/AH/AdYBBwHWAwAC+QIAAvkBAAP/AfsC/wEHAQAB7AH/AgcB/wUHAf8BBwQA
AfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YJAAL/AfsD/wH7
AQcBAAHsCP8LAArWBgAK1gcAAewB/wH7A/8B+wL/AQcBAAHsAf8GBwH/AewB/wkAAdYI/wHWBgAB1gj/
AdYHAArsAQAB7Aj/AewKAArWBgAK1hIACuxOAAHIAQAB3QEAAcgLAAEtAQABwgEAAS0LAAElAQABmgEA
ASUaAAHIBd0ByAkAAS0FwgEtCQABJQWaASUYAALIAd0ByAEAAcgB3QkAAi0BwgEtAQABLQHCCQACJQGa
ASUBAAElAZoEAAH8AQAB/AEAAfwBAAH8AQAB/AwAAcgC3QEAAewBAALdAcgHAAEtAsIBAAHsAQACwgEt
BwABJQKaAQAB7AEAApoBJQEAAfwI/w0AAsgB3QHIAQAByAHdCQACLQHCAS0BAAEtAcIJAAIlAZoBJQEA
ASUBmgQAAf8BAAH8Af8B/AEAAv8B/A0AAcgF3QHICQABLQXCAS0JAAElBZoBJQIAAfwB/wH8AQABBwEA
AfwBBwH/DgACyAEAAd0BAAHICgACLQEAAcIBAAEtCgACJQEAAZoBAAElBAAB/wEAAfwBAAH8AQAB/AH/
AfwIAAHIAQAB3QEAAcgCAATIBQABLQEAAcIBAAEtAgAELQUAASUBAAGaAQABJQIABCUDAAH8Af8B/AH/
AfwBAAH/AQABBwgAAcgF3QHICQABLQXCAS0JAAElBZoBJQkAAfwBAAH/AQAB/AH/AfwBAAH8BgACyAHd
AcgBAAHIAd0JAAItAcIBLQEAAS0BwgkAAiUBmgElAQABJQGaCQAB/AEAAfwBAAH8AQAB/AEAAfwHAAHI
At0BAAHsAQAC3QHIBwABLQLCAQAB7AEAAsIBLQcAASUCmgEAAewBAAKaASUIAAj/AfwGAALIAd0ByAEA
AcgB3QkAAi0BwgEtAQABLQHCCQACJQGaASUBAAElAZoJAAH8AQAB/AEAAfwBAAH8AQAB/AgAAcgF3QHI
CQABLQXCAS0JAAElBZoBJRkAAsgBAAHdAQAByAoAAi0BAAHCAQABLQoAAiUBAAGaAQABJRwABMgMAAQt
DAAEJSwAAS0BVQEtDQABLQFVAS0hAAHsB/8EAAEtAVUBLQ0AAS0BVQEtEgABKgEAAZoBAAEqCgAB7Af/
BAABLQFVAS0NAAEtAVUBLREAASoFmgEqCQAB7Af/BAADLQIAB/8EAAMtAgAH/wcAAioBmgEqAQABKgGa
DAAG/wQAAewFAAb/BAAB7AUABv8HAAEqApoBAAHsAQACmgEqAwAGtQEABv8CAALsBeECAAX/AgAC7ALo
Ae8B/wHvAgAF/wcAAioBmgEqAQABKgGaBQAEtQMABv8CAAHsAeEB/wXhAQAF/wIAAewD6AHvAf8B7wH/
AQAF/wgAASoFmgEqBAADtQEAArUBAAb/AQAB7AHhAf8H4QEABP8BAAHsAegB/wLoAe8B/wHvAv8BAAT/
CAACKgEAAZoBAAEqBQAGtQEABP8B7AIAAewB/wHhAf8G4QEABP8BAAHsAf8D6AHvAf8B7wL/AQAE/wMA
ASoBAAGaAQABKgIABCoFAAW1AwAD/wHsAf8BAAHsAeEB/wfhAQAE/wEAAewB6AL/AegB7wH/Ae8C/wEA
BP8CAAEqBZoBKgoAB7UBAAXsAQAB7AP/AeEB/wThAQAC/wHsAgAB7AH/AegC/wHvAf8B7wL/AQAC/wHs
AgACKgGaASoBAAEqAZoLAAe1AQAB/wHsBQAB7AP/AeEB/wHhAf8BAAP/AewB/wIAAewB/wHoAf8B7wH/
Ae8B/wEAA/8B7AH/AQABKgKaAQAB7AEAApoBKgkABLUBAAK1AQAB/wHsAf8EAALsAf8B4QH/AeEB/wIA
BewCAALsAf8B6AHvAf8B7wIABewBAAIqAZoBKgEAASoBmgsABLUBAAG1AQAE7AYAA+wCAAP/AewHAAPs
AgAD/wHsBQABKgWaASoKAAa1DQAB7AX/AewB/wgAAewF/wHsAf8EAAIqAQABmgEAASoeAAjsCAAI7AYA
BCo8AAEtAVUBLQ0AAewFBwHsCQAB7AUHAewJAAHsBQcB7AkAAS0BVQEtDQABrwW2Aa8B7AgAAS0FWgEt
AewIAAElBU0BJQHsCAABLQFVAS0NAAGvBbYCrwHsBwABLQVaAi0B7AcAASUFTQIlAewHAAMtDQABrwW2
A68B7AYAAS0FWgMtAewGAAElBU0DJQHsBgAB7A8AAa8FtgEAA68B7AUAAS0FWgEAAy0B7AUAASUFTQEA
AyUB7AMAAuwE4QFtAgAEtQQAAuwF/wIAA68EAALsBf8CAAMtBAAC7AX/AgADJQMAAewF4QFtAbwBAAK1
BQAD7AX/AQABBwEAAq8DAAPsBf8BAAEHAQACLQMAA+wF/wEAAQcBAAIlAgAB7AHhAf8E4QFtArwCAAK1
AwAC7AEHBewCBwH/AQABrwMAAuwBBwXsAgcB/wEAAS0DAALsAQcF7AIHAf8BAAElAgAB7AH/BeEBbQK8
AQADtQMAAewBBwHsAwcC7AEHA/8EAAHsAQcB7AMHAuwBBwP/BAAB7AEHAewDBwLsAQcD/wMAAewB4QP/
AuEBbQK8AQACtQQAAewB/wEHAewDBwEABewDAAHsAf8BBwHsAwcBAAXsAwAB7AH/AQcB7AMHAQAF7AIA
AewB/wHhAv8C4QFtArwBAAS1AwAB7AH/AQcB7AEHAQAB7AT/AQcEAAHsAf8BBwHsAQcBAAHsBP8BBwQA
AewB/wEHAewBBwEAAewE/wEHAwAB7AH/AeEB/wLhAW0BvAEABbUEAAHsAf8BBwIAAewE/wEHBQAB7AH/
AQcCAAHsBP8BBwUAAewB/wEHAgAB7AT/AQcDAALsAf8B4QH/AeEBbQIAArUBAAK1BQAB7AH/AwAF7AYA
AewB/wMABewGAAHsAf8DAAXsBQAD7AIABLUBAAG1BwAB7A8AAewPAAHsEgAGtUwAARIBlASTMQABEwHq
BBIB6gFuAQABEgGUBJMTAAHsBQcB7AkAAewFBwHsBwAB6gG3A5QBtwGTAW4BAAESAZQEkxMAATEFWQEx
AewIAAHmBdYB5gHsBgABEgGUApMBtwEOAwABEgGUBJMBAAbXAQAG9AUAATEFWQIxAewHAAHmBdYC5gHs
BQABEgGUAZMBlAESAQABEgG9AQAB6gG3AZQDkwEABNcFAAT0BQABMQVZAzEB7AYAAeYF1gPmAewEAAES
AZQBkwG3AQABEgK3AQABEAISAW4CkwEAA9cBAALXAQAC9AEAA/QFAAExBVkBAAMxAewFAAHmBdYBAAPm
AewDAAESAZQCkwK3AZQBtwETARIBbQEAARIBtwGTAQAG1wEABvQEAALsBf8CAAMxBAAC7AX/AgAD5gMA
ARIBlAKTAbcBEwESARMCvQFtAQABEQGOAZQBAAXXAwAF9AMAA+wF/wEAAQcBAAIxAwAD7AX/AQABBwEA
AuYDAAESAZQBkwG3AQ4EAAERBAABkwEABdcBAAf0AwAC7AEHBewCBwH/AQABMQMAAuwBBwXsAgcB/wEA
AeYDAAHrAZMBlAFEAQABEAH/AfECAAEQAf8B8QMABdcBAAf0AwAB7AEHAewDBwLsAQcD/wQAAewBBwHs
AwcC7AEHA/8EAAHsAfMBkwESAQAB/wEAAf8CAAH/ARQB/wH3AgAD1wEAAdcBAAL0AQAE9AMAAewB/wEH
AewDBwEABewDAAHsAf8BBwHsAwcBAAXsAwAB7AH/AbcBRAEAAfEB/wHxAgAB7AL/AwAD1wEAAtcC9AEA
BPQEAAHsAf8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewBBwEAAewE/wEHAwAB7AL/AbcBEAkAAZMBAAbX
B/QFAAHsAf8BBwIAAewE/wEHBQAB7AH/AQcCAAHsBP8BBwMAARQC7AHtAW4DAAGOAbcBEgEAAREBBwH/
FAAB7AH/AwAF7AYAAewB/wMABewJAAG8AfMBvQEaAb0E/xUAAewPAAHsCgAB/wHyAQAB/wEVAUMK/1oA
AeoFtgoAAeoFtgYAAewBMAoAAvkCAAH5CgABFAFtBOoBbQHrAQAB6gW2AQABFAFtBOoBbQHrAQAB6gW2
BQAB7AEwAXoMAAK8CwABbQHdA7YB3QG1AesBAAHqBbYBAAFtAd0DtgHdAbUB6wEAAeoFtgQAAuwBegEA
AvkJAAK8AgABbQkAAeoDtgHdAQ8DAAHqBbYBAAHqA7YB3QEPAwAB6gW2AQAB7AIwAewBegEAArwLAAO8
AQAB/wEAAewGAAHqA7YBEgEAAeoB3gEAAW0B3QS2AQAB6gO2ARIBAAHqAd4BAAFtAd0EtgEAATADegEA
ArwCAAFtBgAC7AS8AQAC/wcAAeoCtgHXAQABEgLdAQABEAISAY0CtgEAAeoCtgHXAQABEgLdAQABEAIS
AY0CtgHsAXoBAAJ6AgADvAEAAVYBAAFWAwAC7AEABLwDAAFQAQABUAMAAeoDtgHXAd0BtgHdAhIBbQEA
AeoB1wG2AQAB6gO2AdcB3QG2Ad0CEgFtAQAB6gHXAbYBAAN6ATABAAS8AQACVgQAAuwBAAK8AgAD/wEA
AbwEAAHqA7YB3QESAeoBEgLeAW0BAAERAfcBtgEAAeoDtgHdARIB6gESAt4BbQEAAREB9wG2AgAB7AIA
AewBAAS8BgAD7AEAArwBAAP/AQABvAQAAeoCtgHdAQ8EAAFDBAABtQEAAeoCtgHdAQ8EAAFDBAABtQQA
AuwBAAK8AgAD/wQABewBAAT/AQABvAMAAesCtgESAQABEAH/AfECAAEQAf8B8QMAAesCtgESAQABEAH/
AfECAAEQAf8B8QYAA+wBAAK8AQAD/woAAv8CAAK8AwAB7AHzAbYB6gEAAf8BAAH/AgAB/wEUAf8B9wIA
AewB8wG2AeoBAAH/AQAB/wIAAf8BFAH/AfcGAAXsAQAE/wYAA7wBAAL/AQADvAIAAewB/wHdARIBAAHx
Af8B8QIAAewC/wMAAewB/wHdARIBAAHxAf8B8QIAAewC/w0AAv8JAAW8AQABvAQAAewC/wHXARAJAAG2
AQAB7AL/AdcBEAkAAbYIAAO8AQAC/w0AAewCvAMAARQD7AGuAwABtQHdAeoBAAERAQcB/wEAARQD7AGu
AwABtQHdAeoBAAERAQcB/wkABbwLAAXsCQABvAH0AfIB8QHeBP8HAAG8AfQB8gHxAd4E/yAAAf8B8gEA
Af8BFQFDC/8B8gEAAf8BFQFDCv8UAAEHAgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEH
GAAC/xsAAQcCAAEHAQABBwEAAQcCAAEHFgAC/wIAAv8FAAoCBgAKAgwAAewMAAHzAf8CAAL/AgAC/wMA
AQII/wECBgABAgj/AQIMAAHsAwMGAAHsAv8CAAL/AgAC/wIAAf8CAAECAf8IAgYAAQIB/wgCDAAB7AH/
AewBAwkAAfMB/wIAAv8CAAL/AwABAgH/AwIBBwQCBJgCAAECAf8DAgEHBAIEmAgAAewB+wHsAQMGAAHs
Av8CAAL/AgAC/wIAAf8CAAECAv8BAgEHAwIB/wECA/8BmAIAAQIC/wECAQcDAgH/AQID/wGYCAAB7AH/
AewBAwkAAfMB/wIAAv8CAAL/AwABAgH/AQIBBwMCAv8BAgSYAgABAgH/AQIBBwMCAv8BAgSYBwAB7AH/
AfsB7AEDBgAB7AL/AgAC/wIAAv8CAAH/AgABAgH/AQcFAgH/AQIEmAIAAQIB/wEHBQIB/wECBJgGAAHs
AfsB/wMHAQMIAAHzAf8CAAL/AgAC/wMAAQIB/wICAv8CAgH/AQICmAH/AZgCAAECAf8CAgL/AgIB/wEC
ApgB/wGYBQAB7AL/AQcB+wIHAQMB7AQAAewC/wIABv8CAAH/AgABAgj/AQIBmAL/AZgCAAECCP8BAgGY
Av8BmAQAAewB/wL7Af8EBwEDAewGAAr/AwAKAgKYAf8BmAIACgICmAH/AZgCAALsAfsB/wL7A/8BBwH/
AgcBAwIAAewM/wcAAZgB/wKYAv8CmAH/AZgGAAGYAf8CmAL/ApgB/wGYAgAO7AMAAuwI/wkAAZgI/wGY
BgABmAj/AZgVAALsBP8LAAqYBgAKmBcAAuwdAAHsBAAF7A4AAVAlAALsAgcB+QH7Af4FXg4AAlAVAAH5
BAAF+QQAAewDBwTsBV4NAARQFAAC+QMAAvkHAAH6AfsB/wEHAQAB+QH7Af4EXgHsAwAFUAQABlAKAggA
BPkEAAIaBAAB7AL6AfsBBwEAAfkC/gEHAuwFAAJQBgAGUAEAAQII/wECBwAG+QMAARoFAAHsAQcB+QH7
AfoDAAUHBgACGgQAAlABAAJQAgABAgH/CAIGAAb5BAAEGgIAAewDBwH5AwAB7AEHCQABGgUAAVACAAFQ
AwABAgH/AwIBBwQCBgAC+QEAAvkGAAMaAgAB7AMHAfkDAAHsBF4B7AUABBoCAAFQBgABAgL/AQIBBwMC
Af8BAgYAAfkCAAH5BgAFGgEAAewCBwH5AfsBAAPsBV4GAAMaAgABUAYAAQIB/wECAQcDAgL/AQIGAAH5
CQADGgQAAQcB+QH7AfoE7AVeBQAFGggAAQIB/wEHBQIB/wECBgAB+QsAAhoDAAHsAfsB+gH+AQADBwHs
Af8BBwcAAxoKAAECAf8CAgL/AgIB/wECBwAB+RAABuwCBwHsAv8BBwcAAhoJAAECCP8BAhgAAewEXgHs
AgAB7AP/AQcRAAoCGAAB7AReAewDAAH/AuwB/zMABuwHAAHsMwAD7FoAAew/AAHsCwcLAAe2CQAH5AkA
B3UCAAHsCv8BBwsAAfMFAAG2CQABwgUAAeQJAAEbBQABdQIAAewB/wQHAf8DBwH/AQcLAALzA7wB8wG2
CQACwgGeAcIBngHCAeQJAAIbAb0B/wG9Af8BdQIAAewK/wEHBQAFtgEAAfMFAAG2AwAF5AEAAcIFAAHk
AwAFdQEAARsFAAF1AgAB7AH/BAcB/wMHAf8BBwUAAfMFAALzAbwB8wG8AfMBtgMAAcIFAALCAZ4BwgGe
AcIB5AMAARsFAAIbAb0B/wG9Af8BdQIAAewK/wEHBQAB8wO8AfMBAAHzAgAB8wYAAcIBngHCAZ4BwgEA
AcICAAGeBgABGwG9Af8BvQH/AQABGwIAAb0FAAHsAf8IBwH/AQcFAAHzBQAC8wG8AfMBAAHzBAABwgUA
AsIBngHCAQABwgQAARsFAAIbAb0BGwEAAf8DAAHsCv8BBwUAAfMBvAHzAbwB8wEABPMGAAHCAZ4BwgGe
AcIBAATCBgABGwG9Af8BvQH/AQAEGwUAAewB/wIHAf8FBwH/AQcFAAHzAgAB8wwAAcICAAHCDAABGwIA
Af8LAAHsCv8BBwUAAfMBvALzAQAB8woAAcIBngLCAQABwgoAARsBvQEbAfQBAAH/CQAB7AH/AgcB/wUH
Af8BBwUABPMMAATCDAAEGwsAAewI/zcAAewB/wYHAf8B7AH/NQAB7Aj/Aew2AArsDQABMAHsBwAB7AMA
AQcCAAEHAQABBwEAAQcCAAEHJwABMAH7AuwGAAHsBAcCAAEHAQABBwEAAQcCAAEHJgABMAP7AuwFAAHs
A/8BBwIAAQcBAAEHAQABBwIAAQcIAAdZCQAH1gYAATAF+wLsBAAB7AH/BAcB/wMHAf8BBwsAAcMFAAFZ
CQABGQUAAdYFAAEwAvsCAAP7AuwDAAHsCv8BBwsAAsMBmgHDAZoBwwFZCQACGQHdARkB3QEZAdYEAAEw
A/sCAAT7AuwCAAHsAf8EBwH/AwcB/wEHBQAFWQEAAcMFAAFZAwAF1gEAARkFAAHWAwABMAv7AuwBAAHs
Cv8BBwUAAcMFAALDAZoBwwGaAcMBWQMAARkFAAIZAd0BGQHdARkB1gIAATAF+wLqBvsD7AH/CAcB/wEH
BQABwwGaAcMBmgHDAQABwwIAAcMGAAEZAd0BGQHdARkBAAEZAgAB3QUAATAF+wIABvsB7AEAAewK/wEH
BQABwwUAAsMBmgHDAQABwwQAARkFAAIZAd0BGQEAARkEAAEwBPsCAAX7AewCAAHsAf8CBwH/BQcB/wEH
BQABwwGaAcMBmgHDAQAEwwYAARkB3QEZAd0BGQEABBkHAAEwA/sCAAT7AewDAAHsCv8BBwUAAcMCAAHD
DAABGQIAARkOAAEwAvsCAAP7AewEAAHsAf8CBwH/BQcB/wEHBQABwwGaAsMBAAHDCgABGQHdAhkBAAEZ
DQABMAH7AgAC+wHsBQAB7Aj/CAAEwwwABBkQAAEwA/sB7AYAAewB/wYHAf8B7AH/KwABMAH7AewHAAHs
CP8B7C0AATAIAArsJgABQgFNAT4HAAE+AwABKAMAAUADAAEQAQECAAEBAQABAQUAAYABCBYAA/8BAAT/
AcADAAT/BAAB/wEfAv8EAAH8AQcC/wQAAfABAQL/BAABwAEBAv8BgAEBAgABgAEBAv8BgAEDAgABgAEB
Av8BwAEDAgABwAEBAv8BwAEHAgABwAEBAv8B4AEHAgABwAEBAv8B4AEPAgABwAEDAv8B8AEPAgABwAEH
Av8B8AEfAgABwAEfAv8B+AEfAgAB4AF/Av8B+AE/AgAB8QP/AfwBfwIAAv8BgAE/AYABPwL/AYABAAGA
AT8BgAE/Av8CAAGAAQcBgAEHAf8BHwIAAYABBwGAAQcB/AEHAgABgAEHAYABBwHwAQECAAGAAQABgAEA
AcABAQIAAYABAAGAAQABgAEBAgABgAEAAYABAAGAAQECAAGAAQABgAEAAcABAQIAAYABAAGAAQABwAEB
AgAB8AEAAfABAAHAAQECAAHwAQAB8AEAAcABAwEAAQEB8AEAAfABAAHAAQcBgAH/Af4BAAH+AQABwAEf
AcEB/wH+AQAB/gEAAeABfwL/Af4BAQH+AQEB8Qf/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/
AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAwb/AcABBwb/
AcABD4D/BAAE/wF/Af4CAAT/AWABBgIAAf8BJAH/ASQBYAEGAgAB/wEkAf8BJAFgAQYCAAT/AWABBgMA
AT8BAAE/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABBgMA
AT8BAAE/AWABBgMAAT8BAAE/AWABDgMAAT8BAAE/AWABHgMAAT8BAAE/AX8B/gMAAT8BAAE/BAAG/wHw
AQAB/wGHBP8B8AEAAf4BAwH8AQEC/wHwAQAB/AEBAfwBAQEAAT8BAAE/AfgBAAH8AQEBAAE/AQABPwH4
AgABAQEAAT8BAAE/AfgCAAEBAQABAwEAAQMB+AIAAQEBAAEDAQABAwH4AgABAQEAAQMBAAEDAfgCAAED
AQABAwEAAQMB5AEBAQABBwEAAQMBAAEDAcYCAAEPAQABAwEAAQMBgAEFAQAB/wEAAQMBAAEDAQABHwEB
Af8B8AEDAfABAwGAASMBAwH/AfABAwHwAQMBxwP/AfABAwHwAQMB5wHxBv8B8AEABv8B8AEABv8B8AEA
Av8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABAwEA
AQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEAAQMBAAE/AQABPwEA
AQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEAAQMBAAE/Av8B8AEDAfABAwT/AfABAwHw
AQME/wHwAQMB8AEDBP8B8AEAAv8CAAL/AfABAAHwAQ8CAAL/AfABAAHgAQMDAAE/AQABPwHgAQEBAAEH
AQABPwEAAT8B8AIAAQcBAAE/AQABPwHwAgABBwEAAQMBAAEDAfgCAAEHAQABAwEAAQMB+AIAAQcBAAED
AQABAwGQAgABBwEAAQMBAAEDAwABBwEAAQMBAAEDAwABBwEAAQMBAAEDAwABBwEAAQMBAAEDAZgCAAEH
AfABAwHwAQMB+AIAAQ8B8AEDAfABAwH4AgABHwHwAQMB8AEDAv8BAAE/Af8BhwH/AYcB/wGHAv8B/gEB
Af4BAQH+AQEC/wH+AQAB/gEAAf4BAAL/AfwBAAH8AQAB/AIAAT8B/AEAAfwBAAH8AgABPwH8AQAB/AEA
AfwCAAE/Af4BAQH+AQEB/gEBAQABPwHgAQEB4AEBAeABAQEAAT8BgAEHAYABBwGAAQcBAAE/AYABPwGA
AT8BgAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwGA
AX8BgAF/AYABfwL/AYABfwGAAX8BgAF/Av8B4QH/AeEB/wHhA/8B/gEAAeEB/wHhAv8BhwH+AQAB4QH/
AeEB/wH+AQEB/gEAAeABAAHgAQAB/gEAAf4BAAHgAQAB4AEAAfwBAAGAAQAB4AEAAeABAAH8AQABgAEA
AYABAAGAAQAB/AEAAYABAAGAAQABgAEAAf4BAQGABQAB4AEBAYAFAAGAAQcBgAUAAYABPwGAAQEFAAE/
AYABAwGAAQABgAIAAT8BgAEDAYABAQGAAQEBAAE/AYABBwHgAQMB4AEDAYABfwGAAX8B+AEDAfgBAwGA
AX8BgAF/AfgBBwH4AQcB4QH/AeABPwHgAT8B4AE/AeEB/wHgAR8B4AEfAeABHwHhAf8B4AEPAeABDwHg
AQ8B4QH/AeABBwHgAQcB4AEHAeEB/wHgAQMB4AEDAeABAwHgAQEB4AEBAeABAQHgAQEBgAEBAcABAQHA
AQEBwAEBAYABAQGAAQEBgAEBAYABAQEAAQEBgAEBAYABAQGAAQEBAAEBAYABAQGAAQEBgAEBAQABAQGA
AQEBgAEBAYABAQIAAYABAQGAAQEBgAEBAYABAAHAAQEBwAEBAcABAQGAAQAB4QEBAeEBAQHhAQEB4AEB
AfEBgwHxAYMB8QGDAf4BAQH5Af8B+QH/AfkB/wH+AQECAAH/Ab8B4AE/AeABPwIAAf8BfwHgAR8B4AEf
AwABAQHgAQ8B4AEPAwABAQHgAQcB4AEHAwABAQHgAQMB4AEDAwABAQHgAQEB4AEBAwABAQHAAQEBwAEB
AwABAQGAAQEBgAEBAwABAQGAAQEBgAEBAwABAQGAAQEBgAEBAwABAQGAAQEBgAEBAwABAQGAAQEBgAEB
AwABAQHAAQEBwAEBAwABAQHhAQEB4QEBAgAB/gH/AfEBgwHxAYMCAAH/AX8B+QH/AfkB/wH8A/8EAAH4
AX8BgAH/BAAB8AF/AcEB/wQAAYABHwHAAX8FAAE/AYABDwUAAQ8BAAEfBQABAQEAAQEFAAEDAQABAwQA
AYABAwEAAQMEAAHgAQEBgAEBBAAB4AEBAcABAQQAAfABAAHwBQAB+AEBAfgBAQQAAf4BAQH8AQEEAAH/
AQEB/wEBBAAB/wGBAf8BgwQAAv8B8AEAAv8B/gF/Av8B8AEAAv8B+AEfAv8B8AEAAv8B4AEHAQABPwEA
AT8B/AEfAYABAQEAAT8BAAE/AfwBHwEAAQMBAAE/AQABPwH8AR8BgAEBAQABAwEAAQMB/AEfAQABAwEA
AQMBAAEDAfwBHwGAAQEBAAEDAQABAwH4AQ8BAAEDAQABAwEAAQMB8AEHAYABAQEAAQMBAAEDAeABAwEA
AQMBAAEDAQABAwHAAQEBgAEBAQABAwEAAQMDAAEDAfABAwHwAQMCAAGAAQcB8AEDAfABAwL/AeABHwHw
AQMB8AEDAv8B+AF/Av8B8AGBAf8B9wT/AcABAQH/AfMC/wHuAQMBgAEBAf8B4QL/AeYBBwGAAQMBAQHA
AQABPwHDAQcBAAEPAQMBgQEAAT8BgQGDAQABBwGDAZMBAAE/AQMBAQEDAQEBwQG3AQABPwEmAQEBAwEB
AYABvwEAAT8BbgIAAQEBAAG/AQABPwF+AQEBgAEBAQABfwEAAT8BfgEBAYABBwEAAf8BAAE/Ab4BAgHA
AQMBAAH/AQABPwH/AQABwAIBAX8BAAE/Af8BgwHAAeABgAF/BP8BwAH+AcEF/wHjC/8BAAEHAfwBAQH8
AQEB/AEBAQABBwH8AQEB/AEBAfwBAQEAAQcB/AEBAfwBAQH8AQEBAAEHAQABAQEAAQEBAAEBAQABBwEA
AQEBAAEBAQABAQEAAQcBAAEBAQABAQEAAQEBAAEHAQABAQEAAQEBAAEBAQABBwEAAQMBAAEDAQABAwEA
AQcBAAEHAQABBwEAAQcBAAEHAQABDwEAAQ8BAAEPAQABBwEAAf8BAAH/AQAB/wEAAQcBAQH/AQEB/wEB
Af8BAAEHAQMB/wEDAf8BAwH/AQABDwb/AQABHwb/AQABPwH+AX8CAAT/AfwBPwIAAfwBAQH8AQEB+AEf
AgAB/AEBAfwBAQHwAQ8BAAEHAfwBAQH8AQEB4AEHAQABBwEAAQEBAAEBAcABAwEAAQcBAAEBAQABAQGA
AQEBAAEHAQABAQEAAQEDAAEHAQABAQEAAQEBAAEBAQABBwEAAQMBAAEDAYABAwEAAQcBAAEHAQABBwHA
AQcBAAEHAQABDwEAAQ8B4AEPAQABBwEAAf8BAAH/AfABHwEAAQcBAQH/AQEB/wH4AT8BAAEPAQMB/wED
Af8B/AF/AQABHwT/Af4B/wEAAT8E/ws=
</value>
</data>
<metadata name="ImageList3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>993, 17</value>
</metadata>
<metadata name="ContextMenu3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>870, 17</value>
</metadata>
<metadata name="SqlDataAdapter1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>404, 17</value>
</metadata>
<metadata name="SqlDeleteCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDeleteCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlDeleteCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlConnection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>539, 17</value>
</metadata>
<metadata name="SqlInsertCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlInsertCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="SqlSelectCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlSelectCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 54</value>
</metadata>
<metadata name="SqlUpdateCommand1.DesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand1.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SqlUpdateCommand1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</metadata>
<metadata name="DataSet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>773, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="BtnHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</value>
</data>
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 54</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>238</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKCgoKCgAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAChEREQAKCgoAAAAAAAAAAAoREREAAAAAAAAAAAAAAAAHEhISABEACgoKAAAAAAAA
BxEREQoRAAAAAAAAAAAP9QcKCgoKEQARAAAAAAAAAA/1BwoREREAEQAAAAAAAPX1BwcH9fUKChEAAAAA
AAAPDw8HDwcPDxERAAAAAAAAAA/1D/UP9QAKCgoAAAAAAA/1AA/1AA/1AAAAAAAAAAAAAAAP9QAADwAA
AAAAAAAAAAAAD/UAAAAAAAAAAAAAAP//////////4P///8H////AP///wH///8AP///AH///AB///4Af
//8AH///AB///4Ef//8k////5v///+f///8=
</value>
</data>
</root>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,189 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="vorlagenlist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA3SURBVChTY2DABP+xiIGFkCVwsVEUwhThNREkiaEAJoiP
RnEmskKs7kd3C1YrYTrx+g6bIrAYAKCqHOQvFu6BAAAAAElFTkSuQmCC
</value>
</data>
<data name="vorlagenlist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</value>
</data>
<data name="vorlagenlist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style6{}Style8{}Footer{}Style13{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style4{}FilterBar{BackColor:255, 255, 192;}EvenRow{BackColor:White;}Style26{}Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Normal{BackColor:Control;}Style2{}Style14{}Style27{}Style7{}Heading{Wrap:True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style10{AlignHorz:Near;}Style11{}Style15{}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;172&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 364, 172&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 366, 174&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACqqgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAPT09PT0AAAAAAAAAAAAAADwERER9AAAAAAAAAAAAAAA8BEREfT09AAAAAAAAAAAAPAR
ERH0EfQAAAAAAAAAAADwERER9BH09PQAAAAAAAAA8PDw8PAR9BH0AAAAAAAAAAAA8BEREfQR9AAAAArt
7e0AAPDw8PDwEfQAAAAK7e3tAAAAAPARNQAAAAAACu3t7QDtAADw8AA1AAAAAArt7e0A7QAAAAAAADUA
AAAKCgoKCu0A7QAAAAAANQAAAAAK7e3tAO0AAAAAADUAAAAACgoKCgrtAAAANQA1AAAAAAAACu3t7QAA
ADU1AAAAAAAAAAoKCgoKAAA1NTUAAPB////wf///8B////Af///wB///8Af//wQH//8EB///AR///wEv
//8Ad///AHv//8B7///Aa///8Gf///Bj//8=
</value>
</data>
</root>

View File

@@ -0,0 +1,230 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmpersvorlageladen
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents vorlagenlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents mnuload As System.Windows.Forms.MenuItem
Friend WithEvents mnudelete As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmpersvorlageladen))
Me.vorlagenlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu
Me.mnuload = New System.Windows.Forms.MenuItem
Me.mnudelete = New System.Windows.Forms.MenuItem
Me.Button1 = New System.Windows.Forms.Button
CType(Me.vorlagenlist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'vorlagenlist
'
Me.vorlagenlist.AlternatingRows = True
Me.vorlagenlist.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Floating
Me.vorlagenlist.ContextMenu = Me.ContextMenu1
Me.vorlagenlist.Cursor = System.Windows.Forms.Cursors.Default
Me.vorlagenlist.Dock = System.Windows.Forms.DockStyle.Top
Me.vorlagenlist.FetchRowStyles = True
Me.vorlagenlist.FilterBar = True
Me.vorlagenlist.GroupByCaption = "Drag a column header here to group by that column"
Me.vorlagenlist.Images.Add(CType(resources.GetObject("vorlagenlist.Images"), System.Drawing.Image))
Me.vorlagenlist.Location = New System.Drawing.Point(0, 0)
Me.vorlagenlist.Name = "vorlagenlist"
Me.vorlagenlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.vorlagenlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.vorlagenlist.PreviewInfo.ZoomFactor = 75
Me.vorlagenlist.PrintInfo.PageSettings = CType(resources.GetObject("vorlagenlist.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.vorlagenlist.ScrollTips = True
Me.vorlagenlist.Size = New System.Drawing.Size(368, 176)
Me.vorlagenlist.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation
Me.vorlagenlist.TabIndex = 27
Me.vorlagenlist.Text = "C1TrueDBGrid1"
Me.vorlagenlist.PropBag = resources.GetString("vorlagenlist.PropBag")
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuload, Me.mnudelete})
'
'mnuload
'
Me.mnuload.Index = 0
Me.mnuload.Text = "&Vorlage laden"
'
'mnudelete
'
Me.mnudelete.Index = 1
Me.mnudelete.Text = "Vorlage &löschen"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(152, 184)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 23)
Me.Button1.TabIndex = 28
Me.Button1.Text = "&Schliessen"
'
'frmpersvorlageladen
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(368, 213)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.vorlagenlist)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmpersvorlageladen"
Me.Text = "Persönliche Serienbriefvorlage laden"
CType(Me.vorlagenlist, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim m_PersVorlageNr As Integer
Property PersVorlageNr() As Integer
Get
Return m_PersVorlageNr
End Get
Set(ByVal Value As Integer)
m_PersVorlageNr = Value
End Set
End Property
Dim dokumenttypnr As Integer
#End Region
Public Sub New(ByVal dokumenttypnr As Integer)
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
Me.dokumenttypnr = dokumenttypnr
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
Private Sub frmpersvorlageladen_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.PersVorlageNr = 0
Load_data()
End Sub
Private Sub Load_data()
Me.vorlagenlist.DataSource = Nothing
Me.vorlagenlist.DataMember = Nothing
Dim dt As New DataTable()
dt = get_data()
Me.vorlagenlist.DataSource = dt
Me.vorlagenlist.DataMember = dt.TableName
If dt.Rows.Count = 0 Then
Me.mnudelete.Enabled = False
Me.mnuload.Enabled = False
Else
Me.mnudelete.Enabled = True
Me.mnuload.Enabled = True
End If
Me.vorlagenlist.Splits(0).DisplayColumns(0).Width = 0
Me.vorlagenlist.Splits(0).DisplayColumns(1).Width = Me.vorlagenlist.Width - 50
End Sub
Private Function get_data() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_get_persvorlagen"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiternr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumenttypnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.dokumenttypnr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.PersVorlageNr = 0
Me.Close()
End Sub
Private Function delete_vorlage() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_delte_persvorlagen"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@vorlagenr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.vorlagenlist.Columns(0).Text))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Sub mnudelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnudelete.Click
Try
If MyMsg.Show_MessageYesNo(739) = MsgBoxResult.Yes Then
delete_vorlage()
Load_data()
End If
Catch
End Try
End Sub
Private Sub mnuload_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuload.Click
Try
Me.PersVorlageNr = Me.vorlagenlist.Columns(0).Text
Me.Close()
Catch
End Try
End Sub
Private Sub vorlagenlist_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles vorlagenlist.DoubleClick
mnuload_Click(sender, e)
End Sub
End Class

View File

@@ -0,0 +1,243 @@
<?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="C1CommandHolder1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>126, 31</value>
</metadata>
<metadata name="C1ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>280, 31</value>
</metadata>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>416, 31</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAU
CQAAAk1TRnQBSQFMAgEBAgEAAQwBAAEMAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/0gAAewBBwHsDAABAwH/
LQAB7AMHA+wIAAHsAQMB7AH/KgAC7AUHBewEAAEDAewBAwHsAQMB/yoAAewB/wQHAf8G7AIAAQMB7AED
AewBAwHsAf8BAAHsJwAC7AH/AgcC/wMHBOwCAAHsAQMB7AEDAewBAwH/AQAB7CgAAewB/wIHAvoC+QMH
AuwCAAEDAewBAwIAAewB/wEAAewmAAHsAv8C7AH/BQcC7AEAAQcCAAHsAQMB7AIHAQMB/wEAAewBAAEG
JAAB7AP/AQAC7AH/AQcC7AEHAf8BAAEHAgABAwHsAQMB7AEDAewB/wIAAQYF/iAAAewD/wEAAf8BAALs
AQcE/wMAAewBAwHsAQMB7AEDAf8BAAFtBv4gAAHsA/8BAAH/AgAB7Ab/AgABAwHsAQMB7AEDAewB/wEA
AewBbQH+BG0gAAXsAf8BAAH/AQAB7AP/AuwCAAHsAQMB7AEDAewBAwH/AQAB7AEAAm0lAAHsA/8BAAH/
AgAD7AQAAQMB7AEDAewBBwH/AewBAAHsAgABbSUABewB/wkAAewBAwEHAf8B7AEAA+wqAAHsA/8EAAH/
BAABBwH/AewBAAXsKgAF7DcAAUIBTQE+BwABPgMAASgDAAFAAwABEAMAAQEBAAEBBQABgBcAA/8BAAH+
AR8B/AF/BAAB/AEPAfABfwQAAeABAwHAAX8EAAHAAgABHwQAAcACAAEfBAABgAIAARcHAAEHFQABAQ8A
AYEBAAEHBAABwAHHAQABFwQAAcABfwEAAR8EAAHwAXcBAAEfBAAB8AF/AQABHwQACw==
</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="djlist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA0SURBVChTdYkBCgAgDAL9/6eLIsd0eSCKhw/r9aCLtC88
vAdHMEIXKUIUhMK76EfagglgA6CqHOQpL6GyAAAAAElFTkSuQmCC
</value>
</data>
<data name="djlist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj00LjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
</value>
</data>
<data name="djlist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style10{AlignHorz:Near;}EvenRow{BackColor:White;}Normal{BackColor:Control;}RecordSelector{AlignImage:Center;}OddRow{BackColor:224, 224, 224;}Style6{}Footer{}Style14{}FilterBar{BackColor:255, 255, 192;}Heading{AlignVert:Center;Wrap:True;ForeColor:ControlText;BackColor:Control;Border:Raised,,1, 1, 1, 1;}Style5{}Editor{}Style12{}Style3{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style27{}Style26{}Style13{}Style9{}Style11{}Style4{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style2{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;175&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 460, 175&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;17&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 462, 175&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA/47UAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKBwoAAAAAAAAAAAAAAAoHBwcKCgoAAAAAAAAKCgcH
BwcHCgoKCgoAAAAAChEHBwcHEQoKCgoKCgAACgoRBwcREQcHBwoKCgoAAAAKEQcHDg4QEAcHBwoKAAoR
EQoKEQcHBwcHCgoABwAKERERAAoKEQcKCgcRAAcAChEREQARAAoKBxEREREAAAoREREAEQAAChERERER
EQAKCgoKChEAEQAKERERCgoAAAAKERERABEAAAoKCgAAAAAACgoKCgoRAAAAAAAAAAAAAAAAChEREQAA
AAARAAAAAAAAAAoKCgoKAAAAAAAAAP4f///8D///4AP//8AA///AAP//gAD//wAA//8AAP//AAD//wAB
//8AAP//AIH//8DH///Af///8Hf///B///8=
</value>
</data>
</root>

View File

@@ -0,0 +1,838 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Public Class frmsbdruck
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents C1CommandHolder1 As C1.Win.C1Command.C1CommandHolder
Friend WithEvents MnuMainDatei As C1.Win.C1Command.C1CommandMenu
Friend WithEvents C1MnuMainNeuerSerienbrief As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainNew As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainSerienbriefLaden As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainLoad As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuSerienbriefLoeschen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainSerienbriefLoeschen As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainSerienbriefabschliessen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainAbschluss As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainSerienbriefSpeichern As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainSave As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainFensterSchliessen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainClose As C1.Win.C1Command.C1Command
Friend WithEvents MnuMainDokument As C1.Win.C1Command.C1CommandMenu
Friend WithEvents C1MnuMainVorlageImportieren As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainVorlageImportieren As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainVorlageBearbeiten As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainVorageBearbeiten As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainVorschauErstellen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainVorschauErstellen As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuDokumenteGenerieren As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainDokumenteGenerieren As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainDokumenteDrucken As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainDokumenteDrucken As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainDokumenteBestaetigen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainDokumenteBestaetigen As C1.Win.C1Command.C1Command
Friend WithEvents MnuMainEmpfaengerliste As C1.Win.C1Command.C1CommandMenu
Friend WithEvents C1MnuEDOKAHOSTPartnerHinzufuegen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainAddEDOKAHOSTPartner As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainEDOKAPartnerErfassen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainNeuerEDOKAPartnerErfassen As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainNeuerEmpfaengerErfassen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainNeuerEmpfaengerErfassen As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainEmpfaengerBearbeitten As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainEmpfaengerBearbeiten As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainEmpfaengerLoeschen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainEmfpaengerLoeschen As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuEDOKAPartnerErfassen As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainEDOKAPartnerErfassen As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainImportEmpfaneger As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainImportEmpfaenger As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainExportEmpfaenger As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainExportEmpfaenger As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainLoadPartnerliste As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainLoadPartnerliste As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainSaveAsPartnerlist As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainSaveAsPartnerlist As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainCheckEmpfaenger As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainCheckEmpfaenger As C1.Win.C1Command.C1Command
Friend WithEvents C1CommandMenu1 As C1.Win.C1Command.C1CommandMenu
Friend WithEvents C1MnuMainAddColumn As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainAddColumn As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainDeleteColumn As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainDeleteColumn As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainRenameColumn As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainRenameColumn As C1.Win.C1Command.C1Command
Friend WithEvents C1MnuMainSpaltenselektion As C1.Win.C1Command.C1CommandLink
Friend WithEvents MnuMainSpaltenselektion As C1.Win.C1Command.C1Command
Friend WithEvents mnuctAddHost As C1.Win.C1Command.C1Command
Friend WithEvents mnuCTADDEdokapartner As C1.Win.C1Command.C1Command
Friend WithEvents mnuctaddempfaenger As C1.Win.C1Command.C1Command
Friend WithEvents C1ContextMenu1 As C1.Win.C1Command.C1ContextMenu
Friend WithEvents C1CommandLink1 As C1.Win.C1Command.C1CommandLink
Friend WithEvents c1dokumentedrucken As C1.Win.C1Command.C1Command
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
Friend WithEvents djlist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents C1CommandLink2 As C1.Win.C1Command.C1CommandLink
Friend WithEvents c1statuszuruecksetzen As C1.Win.C1Command.C1Command
Friend WithEvents C1CommandLink3 As C1.Win.C1Command.C1CommandLink
Friend WithEvents c1showdoc As C1.Win.C1Command.C1Command
Friend WithEvents C1CommandLink4 As C1.Win.C1Command.C1CommandLink
Friend WithEvents c1deldok As C1.Win.C1Command.C1Command
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmsbdruck))
Me.C1CommandHolder1 = New C1.Win.C1Command.C1CommandHolder()
Me.MnuMainDatei = New C1.Win.C1Command.C1CommandMenu()
Me.C1MnuMainNeuerSerienbrief = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainNew = New C1.Win.C1Command.C1Command()
Me.C1MnuMainSerienbriefLaden = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainLoad = New C1.Win.C1Command.C1Command()
Me.C1MnuSerienbriefLoeschen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainSerienbriefLoeschen = New C1.Win.C1Command.C1Command()
Me.C1MnuMainSerienbriefabschliessen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainAbschluss = New C1.Win.C1Command.C1Command()
Me.C1MnuMainSerienbriefSpeichern = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainSave = New C1.Win.C1Command.C1Command()
Me.C1MnuMainFensterSchliessen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainClose = New C1.Win.C1Command.C1Command()
Me.MnuMainDokument = New C1.Win.C1Command.C1CommandMenu()
Me.C1MnuMainVorlageImportieren = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainVorlageImportieren = New C1.Win.C1Command.C1Command()
Me.C1MnuMainVorlageBearbeiten = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainVorageBearbeiten = New C1.Win.C1Command.C1Command()
Me.C1MnuMainVorschauErstellen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainVorschauErstellen = New C1.Win.C1Command.C1Command()
Me.C1MnuDokumenteGenerieren = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainDokumenteGenerieren = New C1.Win.C1Command.C1Command()
Me.C1MnuMainDokumenteDrucken = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainDokumenteDrucken = New C1.Win.C1Command.C1Command()
Me.C1MnuMainDokumenteBestaetigen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainDokumenteBestaetigen = New C1.Win.C1Command.C1Command()
Me.MnuMainEmpfaengerliste = New C1.Win.C1Command.C1CommandMenu()
Me.C1MnuEDOKAHOSTPartnerHinzufuegen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainAddEDOKAHOSTPartner = New C1.Win.C1Command.C1Command()
Me.C1MnuMainEDOKAPartnerErfassen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainNeuerEDOKAPartnerErfassen = New C1.Win.C1Command.C1Command()
Me.C1MnuMainNeuerEmpfaengerErfassen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainNeuerEmpfaengerErfassen = New C1.Win.C1Command.C1Command()
Me.C1MnuMainEmpfaengerBearbeitten = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainEmpfaengerBearbeiten = New C1.Win.C1Command.C1Command()
Me.C1MnuMainEmpfaengerLoeschen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainEmfpaengerLoeschen = New C1.Win.C1Command.C1Command()
Me.C1MnuEDOKAPartnerErfassen = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainEDOKAPartnerErfassen = New C1.Win.C1Command.C1Command()
Me.C1MnuMainImportEmpfaneger = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainImportEmpfaenger = New C1.Win.C1Command.C1Command()
Me.C1MnuMainExportEmpfaenger = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainExportEmpfaenger = New C1.Win.C1Command.C1Command()
Me.C1MnuMainLoadPartnerliste = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainLoadPartnerliste = New C1.Win.C1Command.C1Command()
Me.C1MnuMainSaveAsPartnerlist = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainSaveAsPartnerlist = New C1.Win.C1Command.C1Command()
Me.C1MnuMainCheckEmpfaenger = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainCheckEmpfaenger = New C1.Win.C1Command.C1Command()
Me.C1CommandMenu1 = New C1.Win.C1Command.C1CommandMenu()
Me.C1MnuMainAddColumn = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainAddColumn = New C1.Win.C1Command.C1Command()
Me.C1MnuMainDeleteColumn = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainDeleteColumn = New C1.Win.C1Command.C1Command()
Me.C1MnuMainRenameColumn = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainRenameColumn = New C1.Win.C1Command.C1Command()
Me.C1MnuMainSpaltenselektion = New C1.Win.C1Command.C1CommandLink()
Me.MnuMainSpaltenselektion = New C1.Win.C1Command.C1Command()
Me.mnuctAddHost = New C1.Win.C1Command.C1Command()
Me.mnuCTADDEdokapartner = New C1.Win.C1Command.C1Command()
Me.mnuctaddempfaenger = New C1.Win.C1Command.C1Command()
Me.C1ContextMenu1 = New C1.Win.C1Command.C1ContextMenu()
Me.C1CommandLink1 = New C1.Win.C1Command.C1CommandLink()
Me.c1dokumentedrucken = New C1.Win.C1Command.C1Command()
Me.C1CommandLink3 = New C1.Win.C1Command.C1CommandLink()
Me.c1showdoc = New C1.Win.C1Command.C1Command()
Me.C1CommandLink4 = New C1.Win.C1Command.C1CommandLink()
Me.c1deldok = New C1.Win.C1Command.C1Command()
Me.C1CommandLink2 = New C1.Win.C1Command.C1CommandLink()
Me.c1statuszuruecksetzen = New C1.Win.C1Command.C1Command()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
Me.djlist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
CType(Me.C1CommandHolder1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.djlist, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'C1CommandHolder1
'
Me.C1CommandHolder1.Commands.Add(Me.MnuMainDatei)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainNew)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainLoad)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainSave)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainClose)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainDokument)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainVorlageImportieren)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainVorageBearbeiten)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainVorschauErstellen)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainDokumenteGenerieren)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainDokumenteDrucken)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainDokumenteBestaetigen)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainEmpfaengerliste)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainAddEDOKAHOSTPartner)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainNeuerEDOKAPartnerErfassen)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainNeuerEmpfaengerErfassen)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainLoadPartnerliste)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainSaveAsPartnerlist)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainImportEmpfaenger)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainExportEmpfaenger)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainEDOKAPartnerErfassen)
Me.C1CommandHolder1.Commands.Add(Me.C1CommandMenu1)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainAddColumn)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainDeleteColumn)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainRenameColumn)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainSpaltenselektion)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainAbschluss)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainEmpfaengerBearbeiten)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainEmfpaengerLoeschen)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainCheckEmpfaenger)
Me.C1CommandHolder1.Commands.Add(Me.MnuMainSerienbriefLoeschen)
Me.C1CommandHolder1.Commands.Add(Me.mnuctAddHost)
Me.C1CommandHolder1.Commands.Add(Me.mnuCTADDEdokapartner)
Me.C1CommandHolder1.Commands.Add(Me.mnuctaddempfaenger)
Me.C1CommandHolder1.Commands.Add(Me.C1ContextMenu1)
Me.C1CommandHolder1.Commands.Add(Me.c1dokumentedrucken)
Me.C1CommandHolder1.Commands.Add(Me.c1statuszuruecksetzen)
Me.C1CommandHolder1.Commands.Add(Me.c1showdoc)
Me.C1CommandHolder1.Commands.Add(Me.c1deldok)
Me.C1CommandHolder1.ImageList = Me.ImageList1
Me.C1CommandHolder1.Owner = Me
Me.C1CommandHolder1.SmoothImages = False
'
'MnuMainDatei
'
Me.MnuMainDatei.CommandLinks.AddRange(New C1.Win.C1Command.C1CommandLink() {Me.C1MnuMainNeuerSerienbrief, Me.C1MnuMainSerienbriefLaden, Me.C1MnuSerienbriefLoeschen, Me.C1MnuMainSerienbriefabschliessen, Me.C1MnuMainSerienbriefSpeichern, Me.C1MnuMainFensterSchliessen})
Me.MnuMainDatei.Name = "MnuMainDatei"
Me.MnuMainDatei.Text = "&Datei"
'
'C1MnuMainNeuerSerienbrief
'
Me.C1MnuMainNeuerSerienbrief.Command = Me.MnuMainNew
Me.C1MnuMainNeuerSerienbrief.Text = "&Neuer Serienbrief"
'
'MnuMainNew
'
Me.MnuMainNew.ImageIndex = 20
Me.MnuMainNew.Name = "MnuMainNew"
Me.MnuMainNew.Text = "&Neuer Serienbrief"
'
'C1MnuMainSerienbriefLaden
'
Me.C1MnuMainSerienbriefLaden.Command = Me.MnuMainLoad
Me.C1MnuMainSerienbriefLaden.Text = "Serienbrief &laden"
'
'MnuMainLoad
'
Me.MnuMainLoad.ImageIndex = 22
Me.MnuMainLoad.Name = "MnuMainLoad"
Me.MnuMainLoad.Text = "Serienbrief &laden"
'
'C1MnuSerienbriefLoeschen
'
Me.C1MnuSerienbriefLoeschen.Command = Me.MnuMainSerienbriefLoeschen
Me.C1MnuSerienbriefLoeschen.Text = "Serienbrief löschen"
'
'MnuMainSerienbriefLoeschen
'
Me.MnuMainSerienbriefLoeschen.ImageIndex = 23
Me.MnuMainSerienbriefLoeschen.Name = "MnuMainSerienbriefLoeschen"
Me.MnuMainSerienbriefLoeschen.Text = "Serienbrief löschen"
'
'C1MnuMainSerienbriefabschliessen
'
Me.C1MnuMainSerienbriefabschliessen.Command = Me.MnuMainAbschluss
Me.C1MnuMainSerienbriefabschliessen.Text = "Serienbrief abschliessen"
'
'MnuMainAbschluss
'
Me.MnuMainAbschluss.ImageIndex = 27
Me.MnuMainAbschluss.Name = "MnuMainAbschluss"
Me.MnuMainAbschluss.Text = "Serienbrief abschliessen"
'
'C1MnuMainSerienbriefSpeichern
'
Me.C1MnuMainSerienbriefSpeichern.Command = Me.MnuMainSave
Me.C1MnuMainSerienbriefSpeichern.Delimiter = True
Me.C1MnuMainSerienbriefSpeichern.Text = "&Serienbrief speichern"
'
'MnuMainSave
'
Me.MnuMainSave.ImageIndex = 24
Me.MnuMainSave.Name = "MnuMainSave"
Me.MnuMainSave.Text = "&Serienbrief speichern"
'
'C1MnuMainFensterSchliessen
'
Me.C1MnuMainFensterSchliessen.Command = Me.MnuMainClose
Me.C1MnuMainFensterSchliessen.Delimiter = True
Me.C1MnuMainFensterSchliessen.Text = "&Fenster schliessen"
'
'MnuMainClose
'
Me.MnuMainClose.ImageIndex = 0
Me.MnuMainClose.Name = "MnuMainClose"
Me.MnuMainClose.Text = "&Fenster schliessen"
'
'MnuMainDokument
'
Me.MnuMainDokument.CommandLinks.AddRange(New C1.Win.C1Command.C1CommandLink() {Me.C1MnuMainVorlageImportieren, Me.C1MnuMainVorlageBearbeiten, Me.C1MnuMainVorschauErstellen, Me.C1MnuDokumenteGenerieren, Me.C1MnuMainDokumenteDrucken, Me.C1MnuMainDokumenteBestaetigen})
Me.MnuMainDokument.Name = "MnuMainDokument"
Me.MnuMainDokument.Text = "Dokument"
'
'C1MnuMainVorlageImportieren
'
Me.C1MnuMainVorlageImportieren.Command = Me.MnuMainVorlageImportieren
Me.C1MnuMainVorlageImportieren.Text = "Vorlage &importieren"
'
'MnuMainVorlageImportieren
'
Me.MnuMainVorlageImportieren.Name = "MnuMainVorlageImportieren"
Me.MnuMainVorlageImportieren.Text = "Vorlage &importieren"
'
'C1MnuMainVorlageBearbeiten
'
Me.C1MnuMainVorlageBearbeiten.Command = Me.MnuMainVorageBearbeiten
Me.C1MnuMainVorlageBearbeiten.Text = "Vorlage &bearbeiten"
'
'MnuMainVorageBearbeiten
'
Me.MnuMainVorageBearbeiten.ImageIndex = 25
Me.MnuMainVorageBearbeiten.Name = "MnuMainVorageBearbeiten"
Me.MnuMainVorageBearbeiten.Text = "Vorlage &bearbeiten"
'
'C1MnuMainVorschauErstellen
'
Me.C1MnuMainVorschauErstellen.Command = Me.MnuMainVorschauErstellen
Me.C1MnuMainVorschauErstellen.Delimiter = True
Me.C1MnuMainVorschauErstellen.Text = "Vorschau erstellen"
'
'MnuMainVorschauErstellen
'
Me.MnuMainVorschauErstellen.ImageIndex = 26
Me.MnuMainVorschauErstellen.Name = "MnuMainVorschauErstellen"
Me.MnuMainVorschauErstellen.Text = "Vorschau erstellen"
'
'C1MnuDokumenteGenerieren
'
Me.C1MnuDokumenteGenerieren.Command = Me.MnuMainDokumenteGenerieren
Me.C1MnuDokumenteGenerieren.Delimiter = True
Me.C1MnuDokumenteGenerieren.Text = "Dokumente &generieren"
'
'MnuMainDokumenteGenerieren
'
Me.MnuMainDokumenteGenerieren.ImageIndex = 15
Me.MnuMainDokumenteGenerieren.Name = "MnuMainDokumenteGenerieren"
Me.MnuMainDokumenteGenerieren.Text = "Dokumente &generieren"
'
'C1MnuMainDokumenteDrucken
'
Me.C1MnuMainDokumenteDrucken.Command = Me.MnuMainDokumenteDrucken
Me.C1MnuMainDokumenteDrucken.Text = "Dokumente &drucken"
'
'MnuMainDokumenteDrucken
'
Me.MnuMainDokumenteDrucken.ImageIndex = 14
Me.MnuMainDokumenteDrucken.Name = "MnuMainDokumenteDrucken"
Me.MnuMainDokumenteDrucken.Text = "Dokumente &drucken"
'
'C1MnuMainDokumenteBestaetigen
'
Me.C1MnuMainDokumenteBestaetigen.Command = Me.MnuMainDokumenteBestaetigen
Me.C1MnuMainDokumenteBestaetigen.Text = "Generierte Dokumente bestätigen"
'
'MnuMainDokumenteBestaetigen
'
Me.MnuMainDokumenteBestaetigen.ImageIndex = 13
Me.MnuMainDokumenteBestaetigen.Name = "MnuMainDokumenteBestaetigen"
Me.MnuMainDokumenteBestaetigen.Text = "Generierte Dokumente bestätigen"
'
'MnuMainEmpfaengerliste
'
Me.MnuMainEmpfaengerliste.CommandLinks.AddRange(New C1.Win.C1Command.C1CommandLink() {Me.C1MnuEDOKAHOSTPartnerHinzufuegen, Me.C1MnuMainEDOKAPartnerErfassen, Me.C1MnuMainNeuerEmpfaengerErfassen, Me.C1MnuMainEmpfaengerBearbeitten, Me.C1MnuMainEmpfaengerLoeschen, Me.C1MnuEDOKAPartnerErfassen, Me.C1MnuMainImportEmpfaneger, Me.C1MnuMainExportEmpfaenger, Me.C1MnuMainLoadPartnerliste, Me.C1MnuMainSaveAsPartnerlist, Me.C1MnuMainCheckEmpfaenger})
Me.MnuMainEmpfaengerliste.Name = "MnuMainEmpfaengerliste"
Me.MnuMainEmpfaengerliste.Text = "Empfängerliste"
'
'C1MnuEDOKAHOSTPartnerHinzufuegen
'
Me.C1MnuEDOKAHOSTPartnerHinzufuegen.Command = Me.MnuMainAddEDOKAHOSTPartner
Me.C1MnuEDOKAHOSTPartnerHinzufuegen.Text = "EDOKA-/HOST-Partner hinzufügen"
'
'MnuMainAddEDOKAHOSTPartner
'
Me.MnuMainAddEDOKAHOSTPartner.ImageIndex = 16
Me.MnuMainAddEDOKAHOSTPartner.Name = "MnuMainAddEDOKAHOSTPartner"
Me.MnuMainAddEDOKAHOSTPartner.Shortcut = System.Windows.Forms.Shortcut.CtrlP
Me.MnuMainAddEDOKAHOSTPartner.Text = "EDOKA-/HOST-Partner hinzufügen"
'
'C1MnuMainEDOKAPartnerErfassen
'
Me.C1MnuMainEDOKAPartnerErfassen.Command = Me.MnuMainNeuerEDOKAPartnerErfassen
Me.C1MnuMainEDOKAPartnerErfassen.Text = "&Neuer EDOKA-Partner erfassen"
'
'MnuMainNeuerEDOKAPartnerErfassen
'
Me.MnuMainNeuerEDOKAPartnerErfassen.ImageIndex = 18
Me.MnuMainNeuerEDOKAPartnerErfassen.Name = "MnuMainNeuerEDOKAPartnerErfassen"
Me.MnuMainNeuerEDOKAPartnerErfassen.Shortcut = System.Windows.Forms.Shortcut.CtrlN
Me.MnuMainNeuerEDOKAPartnerErfassen.Text = "&Neuer EDOKA-Partner erfassen"
'
'C1MnuMainNeuerEmpfaengerErfassen
'
Me.C1MnuMainNeuerEmpfaengerErfassen.Command = Me.MnuMainNeuerEmpfaengerErfassen
Me.C1MnuMainNeuerEmpfaengerErfassen.Text = "Neuer E&mpfänger erfassen"
'
'MnuMainNeuerEmpfaengerErfassen
'
Me.MnuMainNeuerEmpfaengerErfassen.ImageIndex = 19
Me.MnuMainNeuerEmpfaengerErfassen.Name = "MnuMainNeuerEmpfaengerErfassen"
Me.MnuMainNeuerEmpfaengerErfassen.Shortcut = System.Windows.Forms.Shortcut.CtrlE
Me.MnuMainNeuerEmpfaengerErfassen.Text = "Neuer E&mpfänger erfassen"
'
'C1MnuMainEmpfaengerBearbeitten
'
Me.C1MnuMainEmpfaengerBearbeitten.Command = Me.MnuMainEmpfaengerBearbeiten
Me.C1MnuMainEmpfaengerBearbeitten.Delimiter = True
Me.C1MnuMainEmpfaengerBearbeitten.Text = "Markierter Empfänger bearbeiten"
'
'MnuMainEmpfaengerBearbeiten
'
Me.MnuMainEmpfaengerBearbeiten.Name = "MnuMainEmpfaengerBearbeiten"
Me.MnuMainEmpfaengerBearbeiten.Text = "Markierter Empfänger bearbeiten"
'
'C1MnuMainEmpfaengerLoeschen
'
Me.C1MnuMainEmpfaengerLoeschen.Command = Me.MnuMainEmfpaengerLoeschen
Me.C1MnuMainEmpfaengerLoeschen.Text = "Markierter Empfänger löschen"
'
'MnuMainEmfpaengerLoeschen
'
Me.MnuMainEmfpaengerLoeschen.Name = "MnuMainEmfpaengerLoeschen"
Me.MnuMainEmfpaengerLoeschen.Text = "Markierter Empfänger löschen"
'
'C1MnuEDOKAPartnerErfassen
'
Me.C1MnuEDOKAPartnerErfassen.Command = Me.MnuMainEDOKAPartnerErfassen
Me.C1MnuEDOKAPartnerErfassen.Text = "Markierter Empfänger als EDOKA-Partner erfassen"
'
'MnuMainEDOKAPartnerErfassen
'
Me.MnuMainEDOKAPartnerErfassen.Name = "MnuMainEDOKAPartnerErfassen"
Me.MnuMainEDOKAPartnerErfassen.Text = "Markierter Empfänger als EDOKA-Partner erfassen"
'
'C1MnuMainImportEmpfaneger
'
Me.C1MnuMainImportEmpfaneger.Command = Me.MnuMainImportEmpfaenger
Me.C1MnuMainImportEmpfaneger.Delimiter = True
Me.C1MnuMainImportEmpfaneger.Text = "Empfängerliste importieren"
'
'MnuMainImportEmpfaenger
'
Me.MnuMainImportEmpfaenger.Name = "MnuMainImportEmpfaenger"
Me.MnuMainImportEmpfaenger.Text = "Empfängerliste importieren"
'
'C1MnuMainExportEmpfaenger
'
Me.C1MnuMainExportEmpfaenger.Command = Me.MnuMainExportEmpfaenger
Me.C1MnuMainExportEmpfaenger.Text = "Empfängerliste exportieren"
'
'MnuMainExportEmpfaenger
'
Me.MnuMainExportEmpfaenger.Name = "MnuMainExportEmpfaenger"
Me.MnuMainExportEmpfaenger.Text = "Empfängerliste exportieren"
'
'C1MnuMainLoadPartnerliste
'
Me.C1MnuMainLoadPartnerliste.Command = Me.MnuMainLoadPartnerliste
Me.C1MnuMainLoadPartnerliste.Delimiter = True
Me.C1MnuMainLoadPartnerliste.Text = "&Bestehende Partnerliste laden"
'
'MnuMainLoadPartnerliste
'
Me.MnuMainLoadPartnerliste.Name = "MnuMainLoadPartnerliste"
Me.MnuMainLoadPartnerliste.Text = "&Bestehende Partnerliste laden"
'
'C1MnuMainSaveAsPartnerlist
'
Me.C1MnuMainSaveAsPartnerlist.Command = Me.MnuMainSaveAsPartnerlist
Me.C1MnuMainSaveAsPartnerlist.Text = "Emfänger als Partnerliste speichern"
'
'MnuMainSaveAsPartnerlist
'
Me.MnuMainSaveAsPartnerlist.Name = "MnuMainSaveAsPartnerlist"
Me.MnuMainSaveAsPartnerlist.Text = "Emfänger als Partnerliste speichern"
'
'C1MnuMainCheckEmpfaenger
'
Me.C1MnuMainCheckEmpfaenger.Command = Me.MnuMainCheckEmpfaenger
Me.C1MnuMainCheckEmpfaenger.Delimiter = True
Me.C1MnuMainCheckEmpfaenger.Text = "Empfängerliste prüfen"
'
'MnuMainCheckEmpfaenger
'
Me.MnuMainCheckEmpfaenger.ImageIndex = 17
Me.MnuMainCheckEmpfaenger.Name = "MnuMainCheckEmpfaenger"
Me.MnuMainCheckEmpfaenger.Text = "Empfängerliste prüfen"
'
'C1CommandMenu1
'
Me.C1CommandMenu1.CommandLinks.AddRange(New C1.Win.C1Command.C1CommandLink() {Me.C1MnuMainAddColumn, Me.C1MnuMainDeleteColumn, Me.C1MnuMainRenameColumn, Me.C1MnuMainSpaltenselektion})
Me.C1CommandMenu1.Name = "C1CommandMenu1"
Me.C1CommandMenu1.Text = "&Individuelle Dokumentwerte"
'
'C1MnuMainAddColumn
'
Me.C1MnuMainAddColumn.Command = Me.MnuMainAddColumn
Me.C1MnuMainAddColumn.Text = "Spalte hinzufügen"
'
'MnuMainAddColumn
'
Me.MnuMainAddColumn.Name = "MnuMainAddColumn"
Me.MnuMainAddColumn.Text = "Spalte hinzufügen"
'
'C1MnuMainDeleteColumn
'
Me.C1MnuMainDeleteColumn.Command = Me.MnuMainDeleteColumn
Me.C1MnuMainDeleteColumn.Text = "Markierte Spalte löschen"
'
'MnuMainDeleteColumn
'
Me.MnuMainDeleteColumn.Name = "MnuMainDeleteColumn"
Me.MnuMainDeleteColumn.Text = "Markierte Spalte löschen"
'
'C1MnuMainRenameColumn
'
Me.C1MnuMainRenameColumn.Command = Me.MnuMainRenameColumn
Me.C1MnuMainRenameColumn.Text = "Markierte Spalte umbenennen"
'
'MnuMainRenameColumn
'
Me.MnuMainRenameColumn.Name = "MnuMainRenameColumn"
Me.MnuMainRenameColumn.Text = "Markierte Spalte umbenennen"
'
'C1MnuMainSpaltenselektion
'
Me.C1MnuMainSpaltenselektion.Command = Me.MnuMainSpaltenselektion
Me.C1MnuMainSpaltenselektion.Delimiter = True
Me.C1MnuMainSpaltenselektion.Text = "Spalten-Selektion"
'
'MnuMainSpaltenselektion
'
Me.MnuMainSpaltenselektion.Name = "MnuMainSpaltenselektion"
Me.MnuMainSpaltenselektion.Text = "Spalten-Selektion"
'
'mnuctAddHost
'
Me.mnuctAddHost.ImageIndex = 16
Me.mnuctAddHost.Name = "mnuctAddHost"
Me.mnuctAddHost.Text = "EDOKA-/HOST-Partner hinzufügen"
'
'mnuCTADDEdokapartner
'
Me.mnuCTADDEdokapartner.ImageIndex = 18
Me.mnuCTADDEdokapartner.Name = "mnuCTADDEdokapartner"
Me.mnuCTADDEdokapartner.Text = "Neuer EDOKA-Partner erfassen"
'
'mnuctaddempfaenger
'
Me.mnuctaddempfaenger.ImageIndex = 19
Me.mnuctaddempfaenger.Name = "mnuctaddempfaenger"
Me.mnuctaddempfaenger.Text = "Neuer Empfänger erfassen"
'
'C1ContextMenu1
'
Me.C1ContextMenu1.CommandLinks.AddRange(New C1.Win.C1Command.C1CommandLink() {Me.C1CommandLink1, Me.C1CommandLink3, Me.C1CommandLink4, Me.C1CommandLink2})
Me.C1ContextMenu1.ImageIndex = 0
Me.C1ContextMenu1.Name = "C1ContextMenu1"
'
'C1CommandLink1
'
Me.C1CommandLink1.Command = Me.c1dokumentedrucken
Me.C1CommandLink1.Text = "Dokumente drucken"
'
'c1dokumentedrucken
'
Me.c1dokumentedrucken.Name = "c1dokumentedrucken"
Me.c1dokumentedrucken.Text = "Dokumente drucken"
'
'C1CommandLink3
'
Me.C1CommandLink3.Command = Me.c1showdoc
Me.C1CommandLink3.Text = "Dokumente anzeigen"
'
'c1showdoc
'
Me.c1showdoc.Name = "c1showdoc"
Me.c1showdoc.Text = "Dokumente anzeigen"
'
'C1CommandLink4
'
Me.C1CommandLink4.Command = Me.c1deldok
Me.C1CommandLink4.Text = "Dokumente löschen"
'
'c1deldok
'
Me.c1deldok.Name = "c1deldok"
Me.c1deldok.Text = "Dokumente löschen"
'
'C1CommandLink2
'
Me.C1CommandLink2.Command = Me.c1statuszuruecksetzen
Me.C1CommandLink2.Delimiter = True
Me.C1CommandLink2.Text = "Status zurücksetzen"
'
'c1statuszuruecksetzen
'
Me.c1statuszuruecksetzen.Name = "c1statuszuruecksetzen"
Me.c1statuszuruecksetzen.Text = "Status zurücksetzen"
'
'ImageList1
'
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
Me.ImageList1.Images.SetKeyName(0, "")
Me.ImageList1.Images.SetKeyName(1, "")
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton1})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Location = New System.Drawing.Point(0, 0)
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(464, 28)
Me.ToolBar1.TabIndex = 29
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 1
Me.ToolBarButton1.Name = "ToolBarButton1"
'
'djlist
'
Me.djlist.AllowDelete = True
Me.djlist.AlternatingRows = True
Me.C1CommandHolder1.SetC1ContextMenu(Me.djlist, Me.C1ContextMenu1)
Me.djlist.Cursor = System.Windows.Forms.Cursors.Default
Me.djlist.Dock = System.Windows.Forms.DockStyle.Fill
Me.djlist.FetchRowStyles = True
Me.djlist.FilterBar = True
Me.djlist.GroupByCaption = "Drag a column header here to group by that column"
Me.djlist.Images.Add(CType(resources.GetObject("djlist.Images"), System.Drawing.Image))
Me.djlist.Location = New System.Drawing.Point(0, 28)
Me.djlist.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.djlist.Name = "djlist"
Me.djlist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.djlist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.djlist.PreviewInfo.ZoomFactor = 75.0R
Me.djlist.PrintInfo.PageSettings = CType(resources.GetObject("djlist.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.djlist.ScrollTips = True
Me.djlist.Size = New System.Drawing.Size(464, 177)
Me.djlist.TabIndex = 30
Me.djlist.Text = "C1TrueDBGrid1"
Me.djlist.PropBag = resources.GetString("djlist.PropBag")
'
'frmsbdruck
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(464, 205)
Me.Controls.Add(Me.djlist)
Me.Controls.Add(Me.ToolBar1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmsbdruck"
Me.ShowInTaskbar = False
Me.Text = "Serienbriefe drucken"
CType(Me.C1CommandHolder1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.djlist, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
#End Region
Dim m_datasaved As Boolean = False
Property datasaved() As Boolean
Get
Return m_datasaved
End Get
Set(ByVal Value As Boolean)
m_datasaved = Value
End Set
End Property
Dim serienbriefnr As Integer
Public Sub New(ByVal serienbriefnr As Integer)
MyBase.New()
InitializeComponent()
Me.serienbriefnr = serienbriefnr
End Sub
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Me.Close()
End Sub
Private Sub frmsbdruck_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sb As New edokadb.clsEdex_sb_serienbrief()
sb.cpMainConnectionProvider = Globals.conn
sb.iSerienbriefnr = New SqlInt32(CType(Me.serienbriefnr, Int32))
sb.SelectOne()
Me.Text = Me.Text + ": " + sb.sBezeichnung.Value
sb.Dispose()
refresh_data()
End Sub
Private Function refresh_data() As DataTable
Dim dt As New DataTable()
dt = Me.get_druckjobs
Me.djlist.DataSource = Nothing
Me.djlist.DataMember = Nothing
Me.djlist.DataSource = dt
Me.djlist.DataMember = dt.TableName
Dim i As Integer
For i = 0 To Me.djlist.Splits(0).DisplayColumns.Count - 1
Me.djlist.Splits(0).DisplayColumns(i).AutoSize()
Next
Return dt
End Function
Private Function get_druckjobs() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "sp_edex_sb_get_druckjob"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@sbnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.serienbriefnr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Function set_druckjobstatus(ByVal status As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "sp_edex_sb_set_druckjobstatus"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@druckjobnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.djlist.Columns("nr").Value))
scmCmdToExecute.Parameters.Add(New SqlParameter("@status", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, status))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Dim WithEvents pdfprinter As frmSBPDFPrinter
Private Sub c1dokumentedrucken_Click(ByVal sender As System.Object, ByVal e As C1.Win.C1Command.ClickEventArgs) Handles c1dokumentedrucken.Click
pdfprinter = New frmSBPDFPrinter(Me.djlist.Columns("Nr").Value, False)
pdfprinter.Show()
Application.DoEvents()
pdfprinter.PrintPDF()
End Sub
Private Sub pdfprinter_PrintDOne() Handles pdfprinter.PrintDOne
Application.DoEvents()
Application.DoEvents()
Application.DoEvents()
Dim nicht_alles_gedruckt As Integer
nicht_alles_gedruckt = False
Me.set_druckjobstatus(1)
Dim i As Integer
Dim dt As DataTable
dt = Me.refresh_data()
If dt.Rows.Count > 0 Then
For i = 0 To dt.Rows.Count - 1
If dt.Rows(i).Item("Status") = "nicht gedruckt" Then
nicht_alles_gedruckt = True
End If
Next
End If
If Not nicht_alles_gedruckt Then
Dim f As New frmDruckabschluss(Me.serienbriefnr)
f.ShowDialog()
If f.datasaved Then
Me.datasaved = True
End If
f.Dispose()
Me.Close()
End If
End Sub
Private Sub c1statuszuruecksetzen_Click(ByVal sender As System.Object, ByVal e As C1.Win.C1Command.ClickEventArgs) Handles c1statuszuruecksetzen.Click
Me.set_druckjobstatus(0)
Me.refresh_data()
End Sub
Private Sub djlist_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles djlist.MouseDown
Me.djlist.Bookmark = djlist.RowContaining(e.Y)
End Sub
Private Sub c1showdoc_Click(ByVal sender As System.Object, ByVal e As C1.Win.C1Command.ClickEventArgs) Handles c1showdoc.Click
Dim f As New frmSBPDFPrinter(Me.djlist.Columns("Nr").Value, True)
f.Show()
End Sub
Private Sub c1deldok_Click(ByVal sender As System.Object, ByVal e As C1.Win.C1Command.ClickEventArgs) Handles c1deldok.Click
Me.set_druckjobstatus(3)
Me.refresh_data()
Me.pdfprinter_PrintDOne()
End Sub
End Class

View File

@@ -0,0 +1,231 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 1.3
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">1.3</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1">this is my long string</data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
[base64 mime encoded serialized .NET Framework object]
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
[base64 mime encoded string representing a byte array form of the .NET Framework object]
</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.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:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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>1.3</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtnrpar00.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtkurzbezeichnung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtvorname.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtstrasse.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtplz.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtort.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtanrede1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtanrede2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtzustelladresse.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Panel1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="WertList.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="resource.Images" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="Label9.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Button2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtAnrede.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label10.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Label11.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnPartnerInfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnPartnerInfo.Image" type="System.Drawing.Bitmap, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAVdJREFUOE9jMDAw
+M9AIQAZ8P/MgUv//z3////Z5Y//H5x79f/V1W/EGVyV2Ak2AIaXtuz4/3zX//8xHhlgMS1tzf8HNh3H
bZiKrAaKAciGIbP3LDmN05D/9+/f/w8CIBqmqaGhASwGAkgGYQ0tuCJkxSC2g4MDWG7BggUwQ7AboKCg
gOECbGJYdUsIS2GEgYG6KYbY+v6D4DBwdvn/Hxkz3N/2/X+Ia+z/BP9sMP3x6P//rw/8/58TUQGJBSW9
/4tbt6BoQjHg8ppX/29u/PD/7PLHYBpkSJRXCtyARKDByBpgAQsTA7kKrAGkGYRBfFDUgsRAeGLZApy2
gwxhACkCaQJ54e95SJSlBxfCXYXNdpAr4C4AhQF6QIKcDfLSwXnXMGzH8AJIISjpruza/b8oth7sApIM
ADkdhNOAzq5IasUwANkV8KQJZYDDAFvaR3YBNm8ghwsAhlrhKDl5qa8AAAAASUVORK5CYII=
</value>
</data>
<data name="$this.Name">
<value>frmsbpartnerdetail</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAEBAAAAEACABoBQAAFgAAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAA
AAAAAAAAgACAAIAAAACAgAAAAIAAAACAgAAAAIAAwMDAAMDcwADwyqYAgICAAP8A/wD/AAAA//8AAAD/
AAAA//8AAAD/AP///wDw+/8ApKCgANTw/wCx4v8AjtT/AGvG/wBIuP8AJar/AACq/wAAktwAAHq5AABi
lgAASnMAADJQANTj/wCxx/8Ajqv/AGuP/wBIc/8AJVf/AABV/wAASdwAAD25AAAxlgAAJXMAABlQANTU
/wCxsf8Ajo7/AGtr/wBISP8AJSX/AAAA/wAAANwAAAC5AAAAlgAAAHMAAABQAOPU/wDHsf8Aq47/AI9r
/wBzSP8AVyX/AFUA/wBJANwAPQC5ADEAlgAlAHMAGQBQAPDU/wDisf8A1I7/AMZr/wC4SP8AqiX/AKoA
/wCSANwAegC5AGIAlgBKAHMAMgBQAP/U/wD/sf8A/47/AP9r/wD/SP8A/yX/AP8A/wDcANwAuQC5AJYA
lgBzAHMAUABQAP/U8AD/seIA3abCAP9rxgD/SLgA/yWqAP8AqgDcAJIAuQB6AJYAYgBzAEoAUAAyAP/U
4wD/sccA/46rAP9rjwD/SHMA/yVXAP8AVQDcAEkAuQA9AJYAMQBzACUAUAAZAP/U1AD/sbEA/46OAP9r
awD/SEgA/yUlAP8AAADcAAAAuQAAAJYAAABzAAAAUAAAAP/j1AD/x7EA/6uOAP+PawD/c0gA/1clAP9V
AADcSQAAuT0AAJYxAABzJQAAUBkAAP/w1AD/4rEA/9SOAP/GawD/uEgA/6olAP+qAADckgAAuXoAAJZi
AABzSgAAUDIAAP//1AD//7EA//+OAP//awD//0gA//8lAP//AADc3AAAubkAAJaWAABzcwAAUFAAAPD/
1ADi/7EA1P+OAMb/awC4/0gAqv8lAKr/AACS3AAAerkAAGKWAABKcwAAMlAAAOP/1ADH/7EAq/+OAI//
awBz/0gAV/8lAFX/AABJ3AAAPbkAADGWAAAlcwAAGVAAANT/1ACx/7EAjv+OAGv/awBI/0gAJf8lAAD/
AAAA3AAAALkAAACWAAAAcwAAAFAAANT/4wCx/8cAjv+rAGv/jwBI/3MAJf9XAAD/VQAA3EkAALk9AACW
MQAAcyUAAFAZANT/8ACx/+IAjv/UAGv/xgBI/7gAJf+qAAD/qgAA3JIAALl6AACWYgAAc0oAAFAyANT/
/wCx//8Ajv//AGv//wBI//8AJf//AAD//wAA3NwAALm5AACWlgAAc3MAAFBQAPLy8gDm5uYA2traAM7O
zgDCwsIAtra2AKqqqgCenp4AkpKSAIaGhgB6enoAbm5uAGJiYgBWVlYASkpKAD4+PgAyMjIAJiYmABoa
GgAODg4AAAAAAA8ADwoADwAAAAAAAAAAAAAKDw8KDwpeXl5eAAAAAAAAAAoPBwoHXl4AAAAAAAAPDw8P
BwoKCl4AXl4AAAAACgoKCg8P7e1eXl5eAAAAAAAACg8HCg8HXl5eAAAAAAAAAA8KDwoPB15eXl5eAAoR
EREAAAoABwdeXl5eXgAKERERAAAAAF5eXl4AXl4AChEREQARAABeXl5eAF4AAAoREREAEQAAXl5eXl5e
AAAKCgoKChEAAAAAAAAAAAAAAAAKERERABEAAAAAAAAAAAAACgoKCgoRAAAAAAAAAAAAAAAAChEREQAA
AAAAAAAAAAAAAAoKCgoKAAAAAAAAAPQB///wAf//+AH//8AB///AAf//8AH//wAA//8EAP//AAD//wAB
//8AAf//AAH//8B////Af///8H////B///8=
</value>
</data>
</root>

View File

@@ -0,0 +1,549 @@
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmsbpartnerdetail
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents Label7 As System.Windows.Forms.Label
Friend WithEvents Label8 As System.Windows.Forms.Label
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents txtnrpar00 As System.Windows.Forms.TextBox
Friend WithEvents txtkurzbezeichnung As System.Windows.Forms.TextBox
Friend WithEvents txtname As System.Windows.Forms.TextBox
Friend WithEvents txtvorname As System.Windows.Forms.TextBox
Friend WithEvents txtstrasse As System.Windows.Forms.TextBox
Friend WithEvents txtplz As System.Windows.Forms.TextBox
Friend WithEvents txtort As System.Windows.Forms.TextBox
Friend WithEvents txtanrede2 As System.Windows.Forms.TextBox
Friend WithEvents txtzustelladresse As System.Windows.Forms.TextBox
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents Label10 As System.Windows.Forms.Label
Friend WithEvents txtAnrede As System.Windows.Forms.TextBox
Friend WithEvents Label11 As System.Windows.Forms.Label
Friend WithEvents txtanrede1 As System.Windows.Forms.TextBox
Friend WithEvents WertList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents btnPartnerInfo As System.Windows.Forms.Button
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmsbpartnerdetail))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label()
Me.Label4 = New System.Windows.Forms.Label()
Me.Label5 = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.Label7 = New System.Windows.Forms.Label()
Me.Label8 = New System.Windows.Forms.Label()
Me.txtnrpar00 = New System.Windows.Forms.TextBox()
Me.txtkurzbezeichnung = New System.Windows.Forms.TextBox()
Me.txtname = New System.Windows.Forms.TextBox()
Me.txtvorname = New System.Windows.Forms.TextBox()
Me.txtstrasse = New System.Windows.Forms.TextBox()
Me.txtplz = New System.Windows.Forms.TextBox()
Me.txtort = New System.Windows.Forms.TextBox()
Me.txtanrede1 = New System.Windows.Forms.TextBox()
Me.txtanrede2 = New System.Windows.Forms.TextBox()
Me.txtzustelladresse = New System.Windows.Forms.TextBox()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.WertList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.Label9 = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.txtAnrede = New System.Windows.Forms.TextBox()
Me.Label10 = New System.Windows.Forms.Label()
Me.Label11 = New System.Windows.Forms.Label()
Me.btnPartnerInfo = New System.Windows.Forms.Button()
Me.Panel1.SuspendLayout()
CType(Me.WertList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(88, 16)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Partnernr"
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 160)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(96, 16)
Me.Label2.TabIndex = 1
Me.Label2.Text = "Kurzbezeichnung"
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(8, 64)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(88, 16)
Me.Label3.TabIndex = 2
Me.Label3.Text = "Vorname"
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(8, 112)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(88, 16)
Me.Label4.TabIndex = 3
Me.Label4.Text = "Strasse"
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(8, 136)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(88, 16)
Me.Label5.TabIndex = 4
Me.Label5.Text = "PLZ/Ort"
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(8, 232)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(88, 16)
Me.Label6.TabIndex = 5
Me.Label6.Text = "Zustelladresse"
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(8, 184)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(88, 16)
Me.Label7.TabIndex = 6
Me.Label7.Text = "Briefanrede 1"
'
'Label8
'
Me.Label8.Location = New System.Drawing.Point(8, 208)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(88, 16)
Me.Label8.TabIndex = 7
Me.Label8.Text = "Briefanrede 2"
'
'txtnrpar00
'
Me.txtnrpar00.Location = New System.Drawing.Point(112, 16)
Me.txtnrpar00.Name = "txtnrpar00"
Me.txtnrpar00.Size = New System.Drawing.Size(144, 20)
Me.txtnrpar00.TabIndex = 1
Me.txtnrpar00.Text = ""
'
'txtkurzbezeichnung
'
Me.txtkurzbezeichnung.Location = New System.Drawing.Point(112, 160)
Me.txtkurzbezeichnung.Name = "txtkurzbezeichnung"
Me.txtkurzbezeichnung.Size = New System.Drawing.Size(296, 20)
Me.txtkurzbezeichnung.TabIndex = 8
Me.txtkurzbezeichnung.Text = ""
'
'txtname
'
Me.txtname.Location = New System.Drawing.Point(112, 88)
Me.txtname.Name = "txtname"
Me.txtname.Size = New System.Drawing.Size(296, 20)
Me.txtname.TabIndex = 4
Me.txtname.Text = ""
'
'txtvorname
'
Me.txtvorname.Location = New System.Drawing.Point(112, 64)
Me.txtvorname.Name = "txtvorname"
Me.txtvorname.Size = New System.Drawing.Size(296, 20)
Me.txtvorname.TabIndex = 3
Me.txtvorname.Text = ""
'
'txtstrasse
'
Me.txtstrasse.Location = New System.Drawing.Point(112, 112)
Me.txtstrasse.Name = "txtstrasse"
Me.txtstrasse.Size = New System.Drawing.Size(296, 20)
Me.txtstrasse.TabIndex = 5
Me.txtstrasse.Text = ""
'
'txtplz
'
Me.txtplz.Location = New System.Drawing.Point(112, 136)
Me.txtplz.Name = "txtplz"
Me.txtplz.Size = New System.Drawing.Size(72, 20)
Me.txtplz.TabIndex = 6
Me.txtplz.Text = ""
'
'txtort
'
Me.txtort.Location = New System.Drawing.Point(192, 136)
Me.txtort.Name = "txtort"
Me.txtort.Size = New System.Drawing.Size(216, 20)
Me.txtort.TabIndex = 7
Me.txtort.Text = ""
'
'txtanrede1
'
Me.txtanrede1.Location = New System.Drawing.Point(112, 184)
Me.txtanrede1.Name = "txtanrede1"
Me.txtanrede1.Size = New System.Drawing.Size(296, 20)
Me.txtanrede1.TabIndex = 9
Me.txtanrede1.Text = ""
'
'txtanrede2
'
Me.txtanrede2.Location = New System.Drawing.Point(112, 208)
Me.txtanrede2.Name = "txtanrede2"
Me.txtanrede2.Size = New System.Drawing.Size(296, 20)
Me.txtanrede2.TabIndex = 10
Me.txtanrede2.Text = ""
'
'txtzustelladresse
'
Me.txtzustelladresse.Location = New System.Drawing.Point(112, 232)
Me.txtzustelladresse.Multiline = True
Me.txtzustelladresse.Name = "txtzustelladresse"
Me.txtzustelladresse.Size = New System.Drawing.Size(296, 104)
Me.txtzustelladresse.TabIndex = 11
Me.txtzustelladresse.Text = ""
'
'Panel1
'
Me.Panel1.BackColor = System.Drawing.SystemColors.Control
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
Me.Panel1.Controls.AddRange(New System.Windows.Forms.Control() {Me.WertList})
Me.Panel1.Location = New System.Drawing.Point(112, 344)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(296, 128)
Me.Panel1.TabIndex = 49
'
'WertList
'
Me.WertList.AllowFilter = False
Me.WertList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.WertList.AllowSort = False
Me.WertList.AlternatingRows = True
Me.WertList.CaptionHeight = 17
Me.WertList.CollapseColor = System.Drawing.Color.Black
Me.WertList.Cursor = System.Windows.Forms.Cursors.Default
Me.WertList.DataChanged = False
Me.WertList.DeadAreaBackColor = System.Drawing.Color.Empty
Me.WertList.Dock = System.Windows.Forms.DockStyle.Fill
Me.WertList.ExpandColor = System.Drawing.Color.Black
Me.WertList.FetchRowStyles = True
Me.WertList.FilterBar = True
Me.WertList.GroupByCaption = "Drag a column header here to group by that column"
Me.WertList.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.WertList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
Me.WertList.MultiSelect = C1.Win.C1TrueDBGrid.MultiSelectEnum.None
Me.WertList.Name = "WertList"
Me.WertList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.WertList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.WertList.PreviewInfo.ZoomFactor = 75
Me.WertList.PrintInfo.ShowOptionsDialog = False
Me.WertList.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.WertList.RowDivider = GridLines1
Me.WertList.RowHeight = 15
Me.WertList.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.WertList.ScrollTips = True
Me.WertList.Size = New System.Drawing.Size(292, 124)
Me.WertList.TabIndex = 28
Me.WertList.Text = "C1TrueDBGrid1"
Me.WertList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Style11{}Style12{}Style13{}Style5{}Style4{}Style7{}Style6{}EvenRow{Back" & _
"Color:White;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Heading{Wrap:" & _
"True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:" & _
"Control;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}Filte" & _
"rBar{BackColor:255, 255, 192;}OddRow{BackColor:224, 224, 224;}Footer{}Caption{Al" & _
"ignHorz:Center;}Style27{}Normal{BackColor:Control;}Style26{}HighlightRow{ForeCol" & _
"or:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Editor{}RecordSele" & _
"ctor{AlignImage:Center;}Style9{}Style8{}Style3{}Style2{}Group{BackColor:ControlD" & _
"ark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style1{}</Data></Styles><Splits><C" & _
"1.Win.C1TrueDBGrid.MergeView Name="""" AlternatingRowStyle=""True"" CaptionHeight=""1" & _
"7"" ColumnCaptionHeight=""17"" ColumnFooterHeight=""17"" FetchRowStyles=""True"" Filter" & _
"Bar=""True"" MarqueeStyle=""DottedCellBorder"" RecordSelectorWidth=""16"" DefRecSelWid" & _
"th=""16"" VerticalScrollGroup=""1"" HorizontalScrollGroup=""1""><ClientRect>0, 0, 288," & _
" 120</ClientRect><BorderSide>0</BorderSide><CaptionStyle parent=""Heading"" me=""St" & _
"yle10"" /><EditorStyle parent=""Editor"" me=""Style2"" /><EvenRowStyle parent=""EvenRo" & _
"w"" me=""Style8"" /><FilterBarStyle parent=""FilterBar"" me=""Style27"" /><FooterStyle " & _
"parent=""Footer"" me=""Style4"" /><GroupStyle parent=""Group"" me=""Style12"" /><Heading" & _
"Style parent=""Heading"" me=""Style3"" /><HighLightRowStyle parent=""HighlightRow"" me" & _
"=""Style7"" /><InactiveStyle parent=""Inactive"" me=""Style6"" /><OddRowStyle parent=""" & _
"OddRow"" me=""Style9"" /><RecordSelectorStyle parent=""RecordSelector"" me=""Style11"" " & _
"/><SelectedStyle parent=""Selected"" me=""Style5"" /><Style parent=""Normal"" me=""Styl" & _
"e1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="""" me=" & _
"""Normal"" /><Style parent=""Normal"" me=""Heading"" /><Style parent=""Heading"" me=""Foo" & _
"ter"" /><Style parent=""Heading"" me=""Caption"" /><Style parent=""Heading"" me=""Inacti" & _
"ve"" /><Style parent=""Normal"" me=""Selected"" /><Style parent=""Normal"" me=""Editor"" " & _
"/><Style parent=""Normal"" me=""HighlightRow"" /><Style parent=""Normal"" me=""EvenRow""" & _
" /><Style parent=""Normal"" me=""OddRow"" /><Style parent=""Heading"" me=""RecordSelect" & _
"or"" /><Style parent=""Normal"" me=""FilterBar"" /><Style parent=""Caption"" me=""Group""" & _
" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>Mod" & _
"ified</Layout><DefaultRecSelWidth>16</DefaultRecSelWidth><ClientArea>0, 0, 288, " & _
"120</ClientArea></Blob>"
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(8, 344)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(96, 32)
Me.Label9.TabIndex = 50
Me.Label9.Text = "Dokument-spezifische Werte"
'
'Button1
'
Me.Button1.DialogResult = System.Windows.Forms.DialogResult.Abort
Me.Button1.Location = New System.Drawing.Point(8, 480)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(112, 24)
Me.Button1.TabIndex = 12
Me.Button1.Text = "Abbruch"
'
'Button2
'
Me.Button2.DialogResult = System.Windows.Forms.DialogResult.OK
Me.Button2.Location = New System.Drawing.Point(296, 480)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(112, 24)
Me.Button2.TabIndex = 13
Me.Button2.Text = "Speichern"
'
'txtAnrede
'
Me.txtAnrede.Location = New System.Drawing.Point(112, 40)
Me.txtAnrede.Name = "txtAnrede"
Me.txtAnrede.Size = New System.Drawing.Size(144, 20)
Me.txtAnrede.TabIndex = 2
Me.txtAnrede.Text = ""
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(8, 40)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(88, 16)
Me.Label10.TabIndex = 53
Me.Label10.Text = "Anrede"
'
'Label11
'
Me.Label11.Location = New System.Drawing.Point(8, 88)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(88, 16)
Me.Label11.TabIndex = 55
Me.Label11.Text = "Name/Firma"
'
'btnPartnerInfo
'
Me.btnPartnerInfo.Image = CType(resources.GetObject("btnPartnerInfo.Image"), System.Drawing.Bitmap)
Me.btnPartnerInfo.Location = New System.Drawing.Point(256, 16)
Me.btnPartnerInfo.Name = "btnPartnerInfo"
Me.btnPartnerInfo.Size = New System.Drawing.Size(24, 24)
Me.btnPartnerInfo.TabIndex = 56
'
'frmsbpartnerdetail
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(416, 509)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnPartnerInfo, Me.Label11, Me.txtAnrede, Me.Label10, Me.Button2, Me.Button1, Me.Label9, Me.Panel1, Me.txtzustelladresse, Me.txtanrede2, Me.txtanrede1, Me.txtort, Me.txtplz, Me.txtstrasse, Me.txtvorname, Me.txtname, Me.txtkurzbezeichnung, Me.txtnrpar00, Me.Label8, Me.Label7, Me.Label6, Me.Label5, Me.Label4, Me.Label3, Me.Label2, Me.Label1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmsbpartnerdetail"
Me.ShowInTaskbar = False
Me.Text = "Empfänger-Details"
Me.Panel1.ResumeLayout(False)
CType(Me.WertList, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim dr As DataRow()
Dim dt As New DataTable()
Dim AddNew As Boolean = False
Dim nrpar00 As Integer = 0
Dim adressarray(6) As String
#End Region
#Region "Datenbankzugriffe"
Private Function Generic_Select(ByVal typ As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Select Case typ
Case 1
scmCmdToExecute.CommandText = "dbo.SP_get_ort"
Case 2
scmCmdToExecute.CommandText = "dbo.SP_check_partner"
Case Else
End Select
scmCmdToExecute.CommandType = CommandType.StoredProcedure
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.Connection = conn.scoDBConnection
Try
Select Case typ
Case 1
scmCmdToExecute.Parameters.Add(New SqlParameter("@plz", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.txtplz.Text))
Case Else
End Select
If typ = 1 Then
End If
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
' // some error occured. Bubble it to caller and encapsulate Exception object
Throw New Exception("Dokumenterstellung::Generic_Select::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
#End Region
Public Sub New(ByVal add As Boolean, ByVal dt As DataTable, ByVal nrpar00 As String)
MyBase.New()
InitializeComponent()
Try
Me.nrpar00 = nrpar00
Catch
Me.nrpar00 = -1
End Try
Me.AddNew = add
Me.dt = dt
End Sub
Private Sub frmsbpartnerdetail_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.btnPartnerInfo.Visible = False
If Me.AddNew Then
Me.txtnrpar00.Text = ""
Me.txtnrpar00.Enabled = False
Else
If Me.nrpar00 = -1 Then
Me.txtnrpar00.Text = ""
Else
Me.txtnrpar00.Text = Me.nrpar00.ToString
End If
If Me.txtnrpar00.Text <> "" Then
Me.txtnrpar00.Enabled = False
' Me.txtAnrede.Enabled = False
' Me.txtname.Enabled = False
' Me.txtvorname.Enabled = False
' Me.txtstrasse.Enabled = False
' Me.txtplz.Enabled = False
' Me.txtort.Enabled = False
' Me.txtkurzbezeichnung.Enabled = False
End If
Me.txtanrede1.Focus()
End If
If Me.txtnrpar00.Text <> "" Then Me.btnPartnerInfo.Visible = True
End Sub
Private Sub txtplz_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtplz.Leave
Dim plz As DataTable
plz = Generic_Select(1)
If plz.Rows.Count > 0 And Me.txtort.Text = "" Then
Me.txtort.Text = plz.Rows(0).Item(2)
End If
plz.Dispose()
End Sub
Private Sub txtname_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtname.Leave, txtort.Leave, txtAnrede.Leave, txtvorname.Leave, txtstrasse.Leave, txtplz.Leave, txtAnrede.Enter
If Me.txtnrpar00.Text <> "" Then Exit Sub
If Me.txtvorname.Text = "" Then
Me.txtkurzbezeichnung.Text = Me.txtname.Text
Me.txtanrede1.Text = "Damen und Herren"
Else
Me.txtkurzbezeichnung.Text = Me.txtvorname.Text + " " + Me.txtname.Text
Me.txtanrede1.Text = Me.txtAnrede.Text + " " + Me.txtname.Text
End If
If Me.txtort.Text <> "" Then
Me.txtkurzbezeichnung.Text = Me.txtkurzbezeichnung.Text + ", " + Me.txtort.Text
End If
'Adresse
Dim i As Integer
For i = 0 To 6
Me.adressarray(i) = ""
Next
i = 0
If Me.txtAnrede.Text <> "" Then
Me.adressarray(i) = Me.txtAnrede.Text
i = i + 1
End If
If Me.txtvorname.Text <> "" Then
Me.adressarray(i) = Me.txtvorname.Text + " " + Me.txtname.Text
i = i + 1
Else
Me.adressarray(i) = Me.txtname.Text
i = i + 1
End If
If Me.txtstrasse.Text <> "" Then
Me.adressarray(i) = Me.txtstrasse.Text
i = i + 1
End If
Me.adressarray(i) = Me.txtplz.Text + " " + Me.txtort.Text
Me.txtzustelladresse.Text = ""
Me.txtzustelladresse.Text = Me.adressarray(0) + vbCrLf + Me.adressarray(1) + vbCrLf + Me.adressarray(2) + vbCrLf + Me.adressarray(3) + vbCrLf + Me.adressarray(4) + vbCrLf + Me.adressarray(5) + vbCrLf + Me.adressarray(6)
End Sub
Private Sub btnPartnerInfo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPartnerInfo.Click
Try
If DivFnkt.PartnerTyp(Val(Me.txtnrpar00.Text)) = EDOKA.clsDivFnkt.ENUM_Partnertyp.EDOKA_Interessent Then
'If Me.txtnrpar00.Text > 91000000 Then
Dim f As New frmInteressent()
f.Partnernr = Me.txtnrpar00.Text
f.Display = True
f.ShowDialog()
f.Dispose()
Else
Dim f As New frmPartnerDetails()
f.Partnernr = Me.txtnrpar00.Text
f.ShowDialog()
f.Dispose()
End If
Catch
Finally
End Try
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.DialogResult = DialogResult.OK
Me.Close()
End Sub
End Class

View File

@@ -0,0 +1,194 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABu
CQAAAk1TRnQBSQFMAgEBAwEAARQBAAEUAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/yEAAQcC7CMAAQMB/w8A
AewIAAHsAfsBAwHsIAAB7AEDAewB/w8AAewJAAL7AQMB7B0AAQMB7AEDAewBAwH/DgAC7AoAAvsBAwHs
GwABAwHsAQMB7AEDAewB/wEAAewMAALsCwAC+wEDAewaAAHsAQMB7AEDAewBAwH/AQAB7AsAA+wLAAEH
AvsB7AIABAcUAAEDAewBAwIAAewB/wEAAewLAAPsDQACBwHsBf8BBxMAAewBAwHsAgcBAwH/AQAB7AEA
AQYIAATsDgAB7Af/AQcSAAEDAewBAwHsAQMB7AH/AgABBgX+BAAE7A4AAgcH/wEHEQAB7AEDAewBAwHs
AQMB/wEAAW0G/gMABewNAAEHAf8CBwb/AewRAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQMABewNAAEH
Af8CBwb/AQcRAAHsAQMB7AEDAewBAwH/AQAB7AEAAm0FAAbsDQABBwH/AwcF/wHsEQABAwHsAQMB7AEH
Af8B7AEAAewCAAFtBQAG7A4AAQcC/wIHBP8SAAHsAQMBBwH/AewBAAPsBwAG7AIHDQABBwP/AwcB/wHs
EgABBwH/AewBAAXsBwAD7AgHCwACBwP/AgciAAHsDgcKAAMHFAABQgFNAT4HAAE+AwABKAMAAUADAAEQ
AwABAQEAAQEFAAGAFwAD/wEAAfwBfwH/AX8BHwH/AgAB8AF/Af4BfwEPAf8CAAHAAX8B/gE/AYcB/wMA
AR8B/AE/AcMB/wMAAR8B/AEfAeEB/wMAARcB+AEfAeEBhwMAAQcB+AEPAfgBAwQAAfABDwH8AQEEAAHw
AQcB/AUAAeABBwH4BQAB4AEDAfgEAAEHAcABAwH4BAABFwHAAQEB/AEBAwABHwGAAQEB/AEBAwABHwGA
AQAB/gEDAwABHwIAAf8BjwIACw==
</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.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>
AAABAAIAICAQAAAAAADoAgAAJgAAABAQEAAAAAAAKAEAAA4DAAAoAAAAIAAAAEAAAAABAAQAAAAAAIAC
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICAgADAwMAAAAD/AAD/
AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAbGwAAAAAAAAAAAAAAAAABsbEAAAAAAAAAAAAAAAAAGxsQAAAAAAAAAAAAAAAAAbGxAQAA
AAAAAAAAAAAAABsbEBsAAAAAAAAAAAAAAAGxsQGxAAAAAAAAAAAAAAAbGxAbEAAAAAAAAAAAAAABsbEB
sQAAAAAAAAAAAAAAAAAQGxAAAAAAAAAAAAAAAPj4AbEAAAAAAAAAAAAAAACPgBsQAAAAAAAAAAAAAAAI
+PCxAAAAAAAAAAAAAAAAj4+PAAAAAAAAAAAAAAAAAAD4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////////
///////g////wP///4D///8A///+AP///AD///gA///wAf//4AP//+AH///AD///wB///4A///+A////
Af///wf///4f///+f///4f///w///wZ////4/////H////2////9n////d////zv///+D///////////
//8oAAAAEAAAACAAAAABAAQAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAA
AACAAIAAgIAAAICAgADAwMAAAAD/AAD/AAAA//8A/wAAAP8A/wD//wAA////AAAAAAAAAAAAAAAAAAAA
ABsAAAAAAAABsQAAAAAAABsbAAAAAAABsbAAAAAAAIAbAAAAAAAAiLAAAAAAAAiIAAAAAAAACAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA//8AAP/4
AAD/8AAA/+AAAP/AAAD/gQAA/4MAAP8HAAD/DwAA/j8AAPn/AAAH/wAA5/8AANv/AADb/wAA5/8AAA==
</value>
</data>
</root>

View File

@@ -0,0 +1,991 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Imports System.Data.OleDb
Imports UtilityLibrary.Win32
Imports System.Threading
Public Class frmtextmarken
Inherits System.Windows.Forms.Form
#Region " Vom Windows Form Designer generierter Code "
Public Sub New()
MyBase.New()
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
InitializeComponent()
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
End Sub
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Für Windows Form-Designer erforderlich
Private components As System.ComponentModel.IContainer
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
'Sie kann mit dem Windows Form-Designer modifiziert werden.
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
Friend WithEvents ToolBar1 As System.Windows.Forms.ToolBar
Friend WithEvents ToolBarButton1 As System.Windows.Forms.ToolBarButton
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents ToolBarButton2 As System.Windows.Forms.ToolBarButton
Friend WithEvents tsbtnpreview As System.Windows.Forms.ToolBarButton
Friend WithEvents cbpartner As System.Windows.Forms.ComboBox
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmtextmarken))
Me.ToolBar1 = New System.Windows.Forms.ToolBar
Me.ToolBarButton2 = New System.Windows.Forms.ToolBarButton
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton
Me.tsbtnpreview = New System.Windows.Forms.ToolBarButton
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.Panel1 = New System.Windows.Forms.Panel
Me.cbpartner = New System.Windows.Forms.ComboBox
Me.SuspendLayout()
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton2, Me.ToolBarButton1, Me.tsbtnpreview})
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Location = New System.Drawing.Point(0, 0)
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(344, 28)
Me.ToolBar1.TabIndex = 0
'
'ToolBarButton2
'
Me.ToolBarButton2.ImageIndex = 0
Me.ToolBarButton2.Name = "ToolBarButton2"
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 1
Me.ToolBarButton1.Name = "ToolBarButton1"
Me.ToolBarButton1.Style = System.Windows.Forms.ToolBarButtonStyle.ToggleButton
'
'tsbtnpreview
'
Me.tsbtnpreview.ImageIndex = 2
Me.tsbtnpreview.Name = "tsbtnpreview"
Me.tsbtnpreview.ToolTipText = "Vorschau"
'
'ImageList1
'
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
Me.ImageList1.Images.SetKeyName(0, "")
Me.ImageList1.Images.SetKeyName(1, "")
Me.ImageList1.Images.SetKeyName(2, "Lupe2.png")
'
'Panel1
'
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel1.Location = New System.Drawing.Point(0, 28)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(344, 473)
Me.Panel1.TabIndex = 1
'
'cbpartner
'
Me.cbpartner.FormattingEnabled = True
Me.cbpartner.Location = New System.Drawing.Point(79, 3)
Me.cbpartner.Name = "cbpartner"
Me.cbpartner.Size = New System.Drawing.Size(253, 21)
Me.cbpartner.TabIndex = 2
'
'frmtextmarken
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(344, 501)
Me.Controls.Add(Me.cbpartner)
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.ToolBar1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmtextmarken"
Me.Text = "Dokumentbefüllung bearbeiten"
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
#End Region
#Region "Deklarationen"
Dim serienbriefnr As Integer
Dim DokumentBearbeitungDurchUser As Boolean
Dim WithEvents objword As Microsoft.Office.Interop.Word.Application
Dim WithEvents objdoc As Microsoft.Office.Interop.Word.Document
Dim stdvorlagenfelder As New DataTable()
Dim dsempfaenger As New DataSet()
Dim WithEvents ucedit As New ucedit()
Dim WithEvents ucnoedit As New ucnoedit()
Dim m_dokumenttypnr As Integer
Property Dokumenttypnr() As Integer
Get
Return m_dokumenttypnr
End Get
Set(ByVal Value As Integer)
m_dokumenttypnr = Value
End Set
End Property
Public Event Vorschau(ByVal Filename As String, ByVal bpnr As Integer)
#End Region
#Region "Ereignisse"
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Select Case ToolBar1.Buttons.IndexOf(e.Button)
Case 0 'Exit
Me.Close()
Case 1
If Me.ToolBarButton1.Pushed Then
Me.Height = 50
Else
Me.Height = 450 + Me.ToolBar1.Height + 10
End If
Case 2
objword.ActiveDocument.Save()
'Rel. Office 2010
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage" + System.IO.Path.GetExtension(objword.ActiveDocument.Name)
'Rel. Office 2010
FileCopy(dokumentname, dokumentname + "_Preview" + System.IO.Path.GetExtension(objword.ActiveDocument.Name))
Dim bpnr As Integer
Dim i As Integer
Dim pnr As Integer
i = Me.cbpartner.Text.ToString.IndexOf("-")
pnr = Me.cbpartner.Text.ToString.Substring(0, i - 1)
pnr = Trim(pnr)
bpnr = pnr
'Rel. Office 2010
RaiseEvent Vorschau(dokumentname + "_Preview" + System.IO.Path.GetExtension(dokumentname), bpnr)
Case Else
End Select
End Sub
Dim Schliessen_OK As Boolean = False
Private Sub frmtextmarken_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
Schliessen_OK = True
Me.Save_Office()
End Sub
Private Sub document_beforeclose(ByVal Doc As Microsoft.Office.Interop.Word.Document, ByRef Cancel As Boolean) Handles objword.DocumentBeforeClose
If Doc.Name = sbdokumentname And Not Schliessen_OK Then
MsgBox("Bitte schliessen Sie das Dokument durch schliessen des Fensters 'Dokumentbefüllung bearbeiten'.", vbInformation)
Cancel = True
End If
End Sub
#End Region
#Region "Load"
Public Sub New(ByVal serienbriefnr As Integer, ByVal DokumentBearbeitungDurchUser As Boolean, ByVal dsempfaenger As DataSet, ByVal dokumenttypnr As Integer, Optional ByVal Vorlagendaten As DataTable = Nothing, Optional ByVal tmpempfaenger As DataSet = Nothing, Optional ByVal Vorschau_Aktivieren As Boolean = False)
MyBase.New()
InitializeComponent()
Me.serienbriefnr = serienbriefnr
Me.DokumentBearbeitungDurchUser = DokumentBearbeitungDurchUser
Me.dsempfaenger = dsempfaenger
Me.Dokumenttypnr = dokumenttypnr
'Rel. 4.1
If Not Vorlagendaten Is Nothing Then
Me.Filldoc = True
Me.vorlagendaten = Vorlagendaten
Me.tmpempfaenger = tmpempfaenger
Else
Filldoc = False
End If
If Vorschau_Aktivieren = True Then
Me.tsbtnpreview.Visible = True
Me.cbpartner.Visible = True
For Each dr As DataRow In Me.dsempfaenger.Tables(0).Rows
Me.cbpartner.Items.Add(dr.Item("Partnernr").ToString + " - " + dr.Item("Kurzbezeichnung").ToString)
Next
Me.cbpartner.SelectedIndex = 0
Else
Me.tsbtnpreview.Visible = False
Me.cbpartner.Visible = False
End If
End Sub
Private Sub frmtextmarken_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Application.DoEvents()
Me.Cursor = Cursors.WaitCursor
Me.TopMost = True
Me.Load_Document()
If Me.DokumentBearbeitungDurchUser = True Then
Me.Panel1.Controls.Add(ucedit)
Me.ucedit.Dock = DockStyle.Fill
Me.Height = 450 + Me.ToolBar1.Height + 10
Else
Me.Panel1.Controls.Add(ucnoedit)
Me.Height = 450 + Me.ToolBar1.Height + 10
End If
Me.Cursor = Cursors.Default
Application.DoEvents()
'Rel. 4.1
If Me.Filldoc = True Then
Me.Dokumente_Generieren()
End If
End Sub
#End Region
#Region "Office"
Dim sbdokumentname As String = ""
Public Sub Load_Document(Optional ByVal visible As Boolean = True)
'Rel. Office 2010
Dim dokumentname As String = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage.docx"
Vorlage_Auslesen(dokumentname)
StartWord(True)
objword.Documents.Open(dokumentname)
objdoc = objword.ActiveDocument
If visible = True Then sbdokumentname = objdoc.Name
objword.Visible = visible
objword.WindowState = Microsoft.Office.Interop.Word.WdWindowState.wdWindowStateMaximize
End Sub
Private Function StartWord(Optional ByVal newinstance As Boolean = False)
Try
If Globals.Office_2010_Always_New_Word = True Then
objword = CreateObject("Word.Application")
Else
objword = GetObject(, "Word.Application")
objword.Application.Options.SaveInterval = 0
End If
Catch
Try
objword = CreateObject("Word.Application")
objword.Application.Options.SaveInterval = 0
Catch ex As Exception
MsgBox(ex.Message)
End Try
Finally
objword.Visible = False
End Try
Try
If Globals.Office_2010_Word_Autoexec = True Then
Thread.Sleep(Globals.Office_2010_Word_Start_Delay)
objword.Run("Autoexec")
Else
Try
Dim addinfile As String = DivFnkt.XML_Param("TKBMakroLib")
Thread.Sleep(Globals.Office_2010_Word_Start_Delay)
If addinfile <> "" Then objword.AddIns.Add(addinfile)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End If
Catch ex As Exception
DivFnkt.TraceLog("-----------Fehler Autoexec Ende")
End Try
'Me.Errormessage = "15"
End Function
Private Function Save_Office(Optional ByVal savetodb As Boolean = True)
Try
If Not savetodb Then
Me.objdoc = Me.objword.ActiveDocument
Application.DoEvents()
Me.objdoc.Close(Savechanges:=False)
Application.DoEvents()
Threading.Thread.CurrentThread.Sleep(400)
If Me.objword.Documents.Count = 0 Then
Me.objword.Quit(savechanges:=False)
End If
Try
Me.objdoc = Nothing
Catch
End Try
Try
Me.objword = Nothing
Catch
End Try
Exit Function
End If
If Me.DokumentBearbeitungDurchUser = True Then
Me.objword.ActiveDocument.Save()
Me.objdoc = Me.objword.ActiveDocument
Application.DoEvents()
If Me.Filldoc = True Then Delete_Generierte_Bookmarks()
Me.objdoc.Close(savechanges:=True)
Application.DoEvents()
Threading.Thread.CurrentThread.Sleep(400)
If Me.objword.Documents.Count = 0 Then
Me.objword.Quit(SaveChanges:=False)
End If
Try
Me.objdoc = Nothing
Catch
End Try
Try
Me.objword = Nothing
Catch
End Try
Me.Vorlage_Speichern()
Exit Function
End If
Application.DoEvents()
If Me.objword.Documents.Count = 1 Then
Me.objword.Quit(savechanges:=False)
End If
Try
Me.objdoc = Nothing
Catch
End Try
Try
Me.objword = Nothing
Catch
End Try
Application.DoEvents()
'Me.Vorlage_Speichern()
Catch ex As Exception
'MyMsg.show_standardmessage(728, MsgBoxStyle.Critical)
End Try
End Function
#End Region
#Region "Datenzugriffe"
Private Function Vorlage_Auslesen(Optional ByRef dateiname As String = "") As Boolean
Try
'Rel. Office 2010
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage.docx"
Dim Connection As New SqlConnection()
Dim DA As New SqlDataAdapter("select * from edex_sb_vorlage where serienbriefnr=" + Str(Me.serienbriefnr), Connection)
Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
Dim ds As New DataSet()
Try
Connection.ConnectionString = Globals.sConnectionString
Connection.Open()
DA.Fill(ds, "empf")
Dim myRow As DataRow
If ds.Tables(0).Rows.Count = 0 Then
MyMsg.show_standardmessage(715, MsgBoxStyle.Critical)
Else
myRow = ds.Tables(0).Rows(0)
Dim MyData() As Byte
MyData = myRow.Item(1)
Dim K As Long
K = UBound(MyData)
dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage" + myRow.Item(2)
Dim fs As New FileStream(dokumentname, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
dateiname = dokumentname
End If
Catch ex As Exception
MyMsg.show_standardmessage(717, MsgBoxStyle.Critical)
' MsgBox(ex.Message)
Return False
End Try
cb = Nothing
ds = Nothing
DA = Nothing
Connection.Close()
Connection = Nothing
Return True
Catch EX As Exception
MyMsg.show_standardmessage(717, MsgBoxStyle.Critical)
Return False
End Try
End Function
Private Sub Vorlage_Speichern()
'Dokumentvorlage aus Office-Vorlage-Datei auslesen, sofern Filename = ""
'Rel. Office 2010
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage.docx"
Try
Dim Connection As New SqlConnection()
Dim DA As New SqlDataAdapter("select * from edex_sb_vorlage where serienbriefnr=" + Str(Me.serienbriefnr), Connection)
Dim cb As SqlCommandBuilder = New SqlCommandBuilder(DA)
Dim ds As New DataSet()
Dim fs As FileStream
Try
Connection.ConnectionString = Globals.sConnectionString
Connection.Open()
DA.Fill(ds, "vorlage")
Dim myRow As DataRow
myRow = ds.Tables(0).Rows(0)
dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage" + myRow.Item(2)
fs = New FileStream(dokumentname, FileMode.Open, FileAccess.Read)
Dim mydata(fs.Length) As Byte
fs.Read(mydata, 0, fs.Length)
fs.Close()
If ds.Tables(0).Rows.Count = 0 Then
'Neue Serienbrief_Empfaenger speichern
myRow = ds.Tables(0).NewRow
myRow.Item(0) = Me.serienbriefnr
myRow.Item(1) = mydata
ds.Tables(0).Rows.Add(myRow)
DA.Update(ds, "vorlage")
Else
' Bestehende Empfängerliste überschreiben
myRow = ds.Tables(0).Rows(0)
myRow.Item(1) = mydata
DA.Update(ds, "vorlage")
End If
Catch ex As Exception
MyMsg.show_standardmessage(718, MsgBoxStyle.Critical)
' MsgBox(ex.Message)
End Try
fs = Nothing
cb = Nothing
ds = Nothing
DA = Nothing
Connection.Close()
Connection = Nothing
Catch ex As Exception
Finally
Try
Application.DoEvents()
File.Delete(dokumentname)
Catch
End Try
End Try
End Sub
Private Function Get_Vorlagenfelder(ByVal type As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_edex_sb_get_standardvorlagenfelder"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@dokumenttypnr", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.Dokumenttypnr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@type", SqlDbType.Int, 22, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, type))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Throw New Exception("sp_check_dokumentreaktivierung::" & scmCmdToExecute.CommandText & "::Error occured." & ex.Message, ex)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
#End Region
#Region "UC-Ereignisse"
Private Function Activate_Word()
Dim hnd As Long
hnd = Win32API.FindWindow("Opusapp", vbNullString)
Win32API.SetForegroundWindow(hnd)
End Function
Private Sub ucedit_insert_tm(ByVal TMName As String, ByVal isfield As Boolean) Handles ucedit.OnInsert_TM
Try
If isfield = False Then
objword.Selection.Bookmarks.Add(TMName)
Else
objword.Selection.FormFields.Add(Range:=objword.Selection.Range, Type:=Microsoft.Office.Interop.Word.WdFieldType.wdFieldFormTextInput)
objword.Selection.PreviousField.Select()
objword.Selection.FormFields.Item(1).Name = TMName
End If
Activate_Word()
Catch
End Try
End Sub
Private Sub ucedit_goto_tm(ByVal TMName As String, ByVal isfield As Boolean) Handles ucedit.OnGoto_TM, ucnoedit.OnGoto_TM
If Not isfield Then
Try
objword.Selection.GoTo(what:=Microsoft.Office.Interop.Word.WdGoToItem.wdGoToBookmark, Name:=TMName)
Activate_Word()
Catch ex As Exception
End Try
Else
Try
objword.Selection.GoTo(what:=Microsoft.Office.Interop.Word.WdGoToItem.wdGoToField, Name:=TMName)
Activate_Word()
Catch
End Try
End If
End Sub
Private Sub ucedit_OnGetStandardvorlagenfelder(ByRef list As System.Data.DataTable) Handles ucedit.OnGetStandardvorlagenfelder
list = Me.Get_Vorlagenfelder(0)
End Sub
Private Sub ucedit_OnGetUsedFelder(ByRef list As System.Data.DataTable) Handles ucedit.OnGetUsedFelder, ucnoedit.OnGetUsedFelder
list = Me.dsempfaenger.Tables("UsedFelder")
End Sub
Private Sub get_usedfelder(ByRef list As System.Data.DataTable)
list = Me.Get_Vorlagenfelder(1)
Dim i As Integer
Dim s As String
Dim row As DataRow
Dim dodelete As Boolean = False
For Each row In list.Rows
dodelete = False
If row.Item("Feldname") <> "" Then
'ContentControls
Try
If row.Item("Feldname").ToString.Substring(0, 3) = "cc_" Then
s = row.Item("Feldname")
Else
s = objword.ActiveDocument.FormFields.Item(row.Item("feldname")).Name()
End If
Catch
dodelete = True
End Try
End If
If row.Item("Beginntextmarke") <> "" Then
Try
s = objword.ActiveDocument.Bookmarks.Item(row.Item("beginntextmarke")).Name
Catch
dodelete = True
End Try
End If
If row.Item("endetextmarke") <> "" Then
Try
s = objword.ActiveDocument.Bookmarks.Item(row.Item("endetextmarke")).Name
Catch
dodelete = True
End Try
End If
If dodelete Then row.Delete()
Next
End Sub
Private Sub ucedit_OnGetIDVFelder(ByRef list As System.Data.DataTable) Handles ucedit.OnGetIDVFelder, ucnoedit.OnGetIDVFelder
list = Me.get_idvwerte
End Sub
Private Sub ucnoedit_OnGetVerknuepfteFelder(ByRef list As System.Data.DataTable) Handles ucnoedit.OnGetVerknuepfteFelder
Try
list = Me.dsempfaenger.Tables("Verkfelder")
Catch
End Try
If list Is Nothing Then
Me.dsempfaenger.Tables.Add("VerkFelder")
Dim d1 As New DataColumn()
Dim d2 As New DataColumn()
Dim d3 As New DataColumn()
d1.Caption = "IDVWert"
d1.ColumnName = "IDVWert"
d1.DefaultValue = ""
d2.Caption = "Standardwert"
d2.ColumnName = "Standardwert"
d2.DefaultValue = ""
d3.Caption = "Vorlagenfeldnr"
d3.ColumnName = "Vorlagenfeldnr"
d3.DefaultValue = ""
With Me.dsempfaenger.Tables("Verkfelder").Columns
.Add(d1)
.Add(d2)
.Add(d3)
End With
list = Me.dsempfaenger.Tables("Verkfelder")
End If
End Sub
Private Function get_idvwerte() As DataTable
Dim i As Integer
Dim dt As New DataTable()
dt.Columns.Add("Feldname")
dt.Columns.Add("Wert")
For i = 0 To Me.dsempfaenger.Tables(0).Columns.Count - 1
Select Case UCase(Me.dsempfaenger.Tables(0).Columns(i).Caption)
Case "PARTNERNR", "KURZBEZEICHNUNG", "ANREDE", "NAME", "VORNAME", "STRASSE", "PLZ", "ORT", "ZUSTELLADRESSE", "BRIEFANREDE1", "BRIEFANREDE2", "STATUS", "FEHLERCD", "BLKUNDE", "DOKUMENT_GEDRUCKT", "AKTIV", "DOKUMENTID", "DOKUMENTIDBDR", "ERSTELLER", "FEHLERCODE", "DRUCKJOBID"
Case Else
Dim myRow As DataRow
myRow = dt.NewRow
myRow.Item(0) = Me.dsempfaenger.Tables(0).Columns(i).Caption
myRow.Item(1) = ""
dt.Rows.Add(myRow)
End Select
Next
Return dt
End Function
Private Sub ucedit_OnDelete_TM(ByVal TMName As String, ByVal isfield As Boolean) Handles ucedit.OnDelete_TM
Try
If isfield = False Then
objword.ActiveDocument.Bookmarks.Item(TMName).Delete()
Activate_Word()
Else
objword.ActiveDocument.FormFields.Item(TMName).Delete()
Activate_Word()
End If
Catch
End Try
End Sub
#End Region
#Region "öffentliche Methoden"
Public Function init_used_felder() As DataTable
Dim dt As New DataTable()
Me.Load_Document(False)
Me.get_usedfelder(dt)
Me.Save_Office(False)
Return dt
End Function
#End Region
'Rel. 4.1
#Region "Befüllen"
Dim doktyp As New edokadb.clsDokumenttyp()
Dim serienbrief As New edokadb.clsEdex_sb_serienbrief()
Dim vorlagendaten As New DataTable
Dim tmpempfaenger As New DataSet
Dim officevorlage As New edokadb.clsOffice_vorlage()
Dim beginntextmarke As String
Dim endetextmarke As String
Dim feldname As String
Dim dokid As String
Dim blkunde As String = ""
Dim GenerierteDokumente As New Collection()
Dim Filldoc As Boolean = False
Private Function Dokumente_Generieren()
Dim Kopfzeile As Boolean
serienbrief.cpMainConnectionProvider = Globals.conn
serienbrief.iSerienbriefnr = New SqlInt32(CType(Me.Serienbriefnr, Int32))
serienbrief.SelectOne()
doktyp.cpMainConnectionProvider = Globals.conn
doktyp.iDokumenttypnr = serienbrief.iDokumenttypnr
doktyp.SelectOne()
officevorlage.cpMainConnectionProvider = Globals.conn
officevorlage.iOffice_vorlagenr = doktyp.iOffice_vorlagenr
officevorlage.SelectOne()
If officevorlage.bKopfzeile_generieren.Value = True Then
Kopfzeile = True
Else
Kopfzeile = False
End If
serienbrief.Dispose()
doktyp.Dispose()
officevorlage.Dispose()
'objword = New Microsoft.Office.Interop.Word.Application()
'objword.WindowState = Microsoft.Office.Interop.Word.WdWindowState.wdWindowStateMinimize
'objword.Visible = False
Dim i As Integer
Dim i1 As Integer
Dim pstep As Double
Dim pval As Double
Dim feldnr As String
Try
pstep = 70 / vorlagendaten.Rows.Count
Catch
pval = 30
End Try
For i = 0 To vorlagendaten.Rows.Count - 1
Try
pval = pval + pstep
'Rel. Office 2010
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + serienbriefnr.ToString + "_vorlage.docx"
'objword.Documents.Open(dokumentname)
'objword.Visible = False
'objword.WindowState = Microsoft.Office.Interop.Word.WdWindowState.wdWindowStateMinimize
If Kopfzeile Then
Insert_Kopfzeile()
End If
Dim sp1 As String
Dim sp2() As String
For i1 = 0 To vorlagendaten.Columns.Count - 1
'If vorlagendaten.Columns(i1).ColumnName = "_Alter" Or vorlagendaten.Columns(i1).ColumnName = "Alter" Or vorlagendaten.Columns(i1).ColumnName = "Alter_" Then
' MsgBox("Gaga")
'End If
Try
sp1 = vorlagendaten.Columns(i1).ColumnName
sp2 = sp1.Split("_09_")
sp1 = sp2(0) + "_09_" + sp2(2)
feldnr = sp2(1).ToString
sp1 = sp1
Catch
sp1 = vorlagendaten.Columns(i1).ColumnName
feldnr = sp1
End Try
Select Case sp1
'Mapping Zustelladresse
Case "F_09_1", "F_09_10"
If vorlagendaten.Rows(i).Item("Zustelladresse") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("Zustelladresse")
End If
Case "F_09_89"
If vorlagendaten.Rows(i).Item("Name") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("Name")
End If
Case "F_09_111"
If vorlagendaten.Rows(i).Item("Vorname") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("Vorname")
End If
Case "F_09_122", "F_09_123", "F_09_20"
Dim s As String = ""
Dim s1
If vorlagendaten.Rows(i).Item("Briefanrede1") <> "" Then
s = vorlagendaten.Rows(i).Item("Briefanrede1")
If Microsoft.VisualBasic.Left(s, 4) = "Herr" Then
s = "r " + s
Else
s = " " + s
End If
End If
If vorlagendaten.Rows(i).Item("Briefanrede2") <> "" Then
If s <> "" Then s = s + vbCrLf
s1 = vorlagendaten.Rows(i).Item("Briefanrede2")
If Microsoft.VisualBasic.Left(s1, 4) = "Herr" Then
s = s + "Sehr geehrter " + s1
Else
s = s + "Sehr geehrte " + s1
End If
End If
If s <> "" Then
vorlagendaten.Rows(i).Item(i1) = s
End If
Case "F_09_98"
If vorlagendaten.Rows(i).Item("Strasse") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("Strasse")
End If
Case "F_09_93"
If vorlagendaten.Rows(i).Item("Ort") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("Ort")
End If
Case "F_09_93"
If vorlagendaten.Rows(i).Item("Ort") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("Ort")
End If
Case "F_09_96"
If vorlagendaten.Rows(i).Item("PLZ") <> "" Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("PLZ")
End If
Case "F_09_132"
If vorlagendaten.Rows(i).Item("PLZ") <> "" Or vorlagendaten.Rows(i).Item("Ort") <> 0 Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item("PLZ") + " " + vorlagendaten.Rows(i).Item("Ort")
End If
Case Else
End Select
'Verknüpfte Felder
Try
Dim i2 As Integer
For i2 = 0 To Me.dsempfaenger.Tables("VerkFelder").Rows.Count - 1
If feldnr = Me.dsempfaenger.Tables("verkfelder").Rows(i2).Item("Vorlagenfeldnr").ToString Then
vorlagendaten.Rows(i).Item(i1) = vorlagendaten.Rows(i).Item(Me.dsempfaenger.Tables("verkfelder").Rows(i2).Item("IDVWert"))
End If
Next
Catch
End Try
If vorlagendaten.Rows(i).Item(i1) Is System.DBNull.Value Then
vorlagendaten.Rows(i).Item(i1) = ""
End If
If Microsoft.VisualBasic.Left(vorlagendaten.Columns(i1).ColumnName, 5) = "F_09_" Then
Insert_Value(vorlagendaten.Rows(i).Item(i1), vorlagendaten.Columns(i1).ColumnName)
End If
If Microsoft.VisualBasic.Left(vorlagendaten.Columns(i1).ColumnName, 5) = "I_09_" Then
Dim intfeldname As String
Dim Intbookmark As String
Dim IntWert As String
intfeldname = vorlagendaten.Columns(i1).ColumnName
Intbookmark = Microsoft.VisualBasic.Right(vorlagendaten.Columns(i1).ColumnName, Len(vorlagendaten.Columns(i1).ColumnName) - 5)
IntWert = Microsoft.VisualBasic.Right(vorlagendaten.Columns(i1).ColumnName, Len(vorlagendaten.Columns(i1).ColumnName) - 14)
Dim SplitArray() As String
Dim ind As Integer
ind = IntWert.IndexOf("_09_")
IntWert = Microsoft.VisualBasic.Left(IntWert, ind)
'SplitArray = IntWert.Split("_09_")
'IntWert = SplitArray(0)
'IntWert = RenCol(IntWert)
Insert_Value(vorlagendaten.Rows(i).Item(IntWert), Intbookmark)
End If
Next
If doktyp.bZu_retournieren.Value = True Or vorlagendaten.Rows(i).Item("blkunde") = 1 Or vorlagendaten.Rows(i).Item("Dokumentidbdr") <> "" Then
blkunde = vorlagendaten.Rows(i).Item("blkunde")
If vorlagendaten.Rows(i).Item("Dokumentidbdr") <> "" Then
dokid = vorlagendaten.Rows(i).Item("Dokumentidbdr")
Else
dokid = vorlagendaten.Rows(i).Item("Dokumentid")
End If
' Generate_Barcodes()
blkunde = ""
End If
Dim dm As String
' dm = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Serienbriefnr.ToString + "_vorlage_" + i.ToString + ".doc"
' objword.ActiveDocument.SaveAs(dm)
' Me.GenerierteDokumente.Add(dm)
' objword.Documents.Close(SAVECHANGES:=False)
Catch ex As Exception
MsgBox(ex.Message)
vorlagendaten.Rows(i).Item("Status") = -1
End Try
Next
End Function
Private Sub Delete_Generierte_Bookmarks()
Dim i As Integer
Dim pos1 As Integer
Dim pos2 As Integer
Dim hastextmarken As Boolean = True
Dim s As String
Dim e As String
Try
While hastextmarken = True
hastextmarken = False
For i = 1 To objword.ActiveDocument.Bookmarks.Count
s = objword.ActiveDocument.Bookmarks.Item(i).Name
If Microsoft.VisualBasic.Left(s, 2) = "TS" Then
hastextmarken = True
delete_it(s)
Exit For
End If
Next
End While
Catch ex As Exception
MsgBox(ex.Message + " :" + s)
End Try
End Sub
Private Sub delete_it(ByVal s As String)
Dim pos1 As Integer
Dim pos2 As Integer
Dim hastextmarken As Boolean = True
Dim e As String
pos1 = objword.ActiveDocument.Bookmarks.Item(s).Start
e = "TE" + Microsoft.VisualBasic.Right(s, Len(s) - 2)
pos2 = objword.ActiveDocument.Bookmarks.Item(e).Start
objword.Selection.SetRange(Start:=pos1, End:=pos2)
objword.Selection.Delete()
Try
objword.ActiveDocument.Bookmarks.Item(s).Delete()
objword.ActiveDocument.Bookmarks.Item(e).Delete()
Application.DoEvents()
Catch
End Try
End Sub
Private Sub Insert_Value(ByVal feldwert As String, ByVal feldname As String)
Dim i As Integer
Dim dc As DataRow
Dim pos1 As Integer
Dim pos2 As Integer
If Microsoft.VisualBasic.Left(feldname, 5) = "TMISB" Then
beginntextmarke = feldname
endetextmarke = ""
feldname = ""
Else
For Each dc In Me.tmpempfaenger.Tables("UsedFelder").Rows
If dc.Item("TempFeldName") = feldname Then
beginntextmarke = dc.Item("Beginntextmarke")
endetextmarke = dc.Item("Endetextmarke")
feldname = dc.Item("Feldname")
Exit For
End If
Next
End If
If beginntextmarke <> "" And endetextmarke = "" Then
Try
objword.ActiveDocument.Bookmarks.Item(beginntextmarke).Select()
objword.ActiveDocument.Bookmarks.Add("TS" & beginntextmarke)
objword.ActiveDocument.Bookmarks.Item("TS" & beginntextmarke).Select()
objword.Selection.MoveRight(Unit:=Microsoft.Office.Interop.Word.WdUnits.wdCharacter, Count:=1)
objword.ActiveDocument.Bookmarks.Add("TE" & beginntextmarke)
objword.ActiveDocument.Bookmarks.Item("TS" & beginntextmarke).Select()
objword.Selection.TypeText(Text:=feldwert)
Catch ex As Exception
End Try
End If
If beginntextmarke <> "" And endetextmarke <> "" Then
Try
objword.ActiveDocument.Bookmarks.Item(beginntextmarke).Select()
objword.ActiveDocument.Bookmarks.Add("TS" & beginntextmarke)
objword.ActiveDocument.Bookmarks.Item(endetextmarke).Select()
objword.ActiveDocument.Bookmarks.Add("TE" & beginntextmarke)
pos1 = objword.ActiveDocument.Bookmarks.Item("TS" & beginntextmarke).Start
pos2 = objword.ActiveDocument.Bookmarks.Item("TE" & endetextmarke).Start
objword.Selection.SetRange(Start:=pos1, End:=pos2)
objword.Selection.TypeText(Text:=feldwert)
Catch ex As Exception
End Try
End If
End Sub
Private Sub Insert_Kopfzeile()
objword.Selection.HomeKey(Unit:=Microsoft.Office.Interop.Word.WdUnits.wdStory)
If objword.ActiveWindow.View.SplitSpecial <> Microsoft.Office.Interop.Word.WdSpecialPane.wdPaneNone Then
objword.ActiveWindow.Panes.Item(2).Close()
End If
If objword.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdNormalView Or objword.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdOutlineView Then
objword.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdPrintView
End If
objword.ActiveWindow.ActivePane.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekCurrentPageHeader
set_headerbookmark()
objword.ActiveWindow.ActivePane.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekMainDocument
End Sub
Private Sub set_headerbookmark()
Try
objword.ActiveDocument.Bookmarks.Item("TGEDKCompanyBBEB99").Select()
Catch
objword.Selection.MoveDown(Unit:=Microsoft.Office.Interop.Word.WdUnits.wdLine, Count:=1)
With objword.ActiveDocument.Bookmarks
.Add(Range:=objword.Selection.Range, Name:="TGEDKCompanyBBEB99")
.DefaultSorting = Microsoft.Office.Interop.Word.WdBookmarkSortBy.wdSortByName
.ShowHidden = False
End With
End Try
End Sub
#End Region
Private Sub objdoc_DocumentEvents_Event_Close() Handles objdoc.Close
Me.Close()
End Sub
End Class

Binary file not shown.

View File

@@ -0,0 +1,312 @@
<?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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>477, 30</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACs
IAAAAk1TRnQBSQFMAgEBHAEAAR0BAAEEAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAAYADAAEBAQABCAYAASAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8ARwABAwEw
AQMBMAEDATABAwEwAQMLAAn/DgAB/gH8BgAJIAMAAfsBAAEDATABAwEwAQMBMAEDATABAwoACf8NAAH+
AvwFAAEgB/kBIAH5ASACAAH/AfsBAAEDATABAwEwAQMBMAEDATABAwkAAv8BAAQHAv8MAAH+AvwGAAEg
AvkF9gH5AiACAAH7Af8B+wEAAQMBMAEDATABAwEwAQMBMAEDCAAC/wIABf8LAAH+AvwHAAEgAfkC9gP5
AvYB+QEgAgAB/wH7Af8B+wwABOwBAAL/AwAE/wIAA+wBAAUGAQAB/AUAA+wBIAH5AfYC+QH2AvkB9gH5
ASAGAAH7Af8B+wH/AfsMAAL/AQAB+wHsAQABBwL/BQABBwH+Af8C/gIGCQABIAH5AfYC+QH2AvkB9gH5
ASABAAHsA/8BAAH/AfsB/wH7Af8GAAHsA/8CAAL/AQAB+wEHAQAD/wEAAewC/wEAAf4B/wH+Af8C/gEG
BQAB7AP/ASAB+QH2AvkB9gL5AfYB+QEgAQAB7AP/CAADHwEAAewD/wIAA/8BAAH7AewBAAL/AQAB7AL/
AQABBwH+AQcB/gH/Af4BBgUAAewD/wEgAfkC9gP5AvYB+QEgAQAB7AP/AQAB/wYAAh8CAAHsA/8CAAL/
AQcBAAH7AQcBAAL/AQAB7AL/AQAB/gH/Af4B/wH+Af8BBgUAAewD/wEgAeMB+QX2AvkBIAEAAewD/wEA
Af8GAAEfAQABHwEAAewD/wIABP8BAAH7AewBAAH/AQAB7AL/AQABBwH+AQcB/gEHAf4BBgUAAewD/wEg
AfkB4wf5ASABAAXsAf8BAAH/BwABHwXsAQAE/wEAAfsCAAH/AQAE7AEAAf8B/gH/Af4B/wYABewJIAQA
AewD/wEAAf8HAAEfAgAB7AL/BwACAQQAAewC/w0AAewD/wEAAf8KAAXsAf8HAAEfAgAF7AH/CgAF7AH/
CgAF7AH/DAAB7AP/BgABHwUAAewD/wwAAewD/wwAAewD/wwABewLAAXsCwAF7AsABexpAAEDATABAwEw
AQMBMAEDATABAxgABewZAAH7AQABAwEwAQMBMAEDATABAwEwAQMRAAH5FwAF7AcAAf8B+wEAAQMBMAED
ATABAwEwAQMBMAEDBgABIA4AAewD/wEAA+wXAAH7Af8B+wEAAQMBMAEDATABAwEwAQMBMAEDBAAC+QEg
BwABIAUAAewD/woAASABAAEgAQACIAL/AQAD7AUAAf8B+wH/AfsNAAL5ASAD7AMAASAGAAEHA/YBAAH/
AQAD7AgAAewD/w0AAfsB/wH7Af8B+wkAA/kEAAEgAfkGAAEHA/8B7AH/CgABIAEAAiAC/wEAAf8BAAPs
AgAB7AP/AQAB/wH7Af8B+wH/AgABSAUAAewB/wL5ASAC7AL5BQAB+wHsAQcE7AH/AQAB/woAAewD/wEA
Af8GAAHsA/8JAAFIBAAB7AL/BfkHAAH7AewBBwHsA/8BAAH/BgABIAEAASABAAIgA+wB/wEAAf8EAAHs
A/8BAAH/BwABSAQAAewD/wP5A+wEAALsAwcE7AH/DAAB7AP/AQAB/wQAAewD/wEAAf8HAAFIBAAB7AL/
BfkGAAP7AQcB+wEHAvsC/wgAASABAAIgBewB/wQABewB/wEAAf8CAAFIAQABSAUAAuwD+QH/AQAB+QcA
AfsB7AH7AewB+wHsAQAD7A0AAewD/wYAAewD/wEAAf8CAAJIBgAE+QL/AQAB/wL5BAAB+wHsAQAB+wHs
AQAB+wHsCAABIAEAASABAAIgAgAF7AUABewB/wIAA0gEAAT5BOwB/wEAAvkGAAH7AewCAAH7HAAB7AP/
CQAC+QMAAewD/wIAAvkFAAH7AewfAAXsDQAF7AgABycPAAQgBwAB+wEAAfsB7AEAAfsKAAH7AQAB+wHs
AQAB+wH5AgAB+QUAAScCLQH/Ai0BJwS2CgADIAL/AfkGAAHsAvsB7AH7AewEtgYAAewC+wHsAfsB7AEA
Av8GAAEnAi0B9gItAScCtgwAAiAC/wT8BQAB7AH7AQcB7AEHArYJAAHsAfsBBwHsAQcC/wcAAScB/wP2
Af8BJwG2AQACtgQAAjQCAAE0AQACIAH/ASAD/AMABPsBBwPsAbYBAAK2BAAE+wEHA+wBAAP/BQABJwIt
AfYCLQEnBLYGAAL/AwADIAH8Af8C/AIABOwC+wLyBLYEAATsAvsC8gT/BQABJwItAf8CLQEnA7YGAAL/
AgAB3QQgAv8C/AQAAewB+wEHAewB+wEHA7YHAAHsAfsBBwHsAfsBBwEABP8EAAcnBbYFAAP/AwAB/AL/
A/wEAAH7AewB+wHsAfsBBwW2BQAB+wHsAfsB7AH7AQcBAAL/AwAB7AP/BAAHtgIAAgcE/wEAAt0BAAT8
AQAB7AP/AgAB7AEAAgcFtgEAAewD/wIAAewBAAMHAQAC/wIAAewD/wQABLYBAAK2AgACBwEABP8BAAHd
BgAB7AP/BAAEtgEAArYBAAHsA/8FAAUHAgAB7AP/AQAB/wIABLYBAAG2AwACBwEAAv8CAAHdBwAB7AP/
AQAB/wIABLYBAAG2AgAB7AP/AQAB/woAAewD/wEAAf8CAAa2AwADBwEAAv8BAAPdBQAB7AP/AQAB/wIA
BrYCAAHsA/8BAAH/CgAF7AH/DAAFBwEAA90FAAXsAf8KAAXsAf8BAAH/CgAB7AP/AQAB/w8AAd0BAALd
BwAB7AP/AQAB/woAAewD/wEAAf8KAAXsAf8MAATdAQAB3QgABewB/woABewB/wwAAewD/wwABt0KAAHs
A/8MAAHsA/8MAAXsGwAF7AsABexVAAH/BQALLQgAAewBBwHsGgAB/w8AAS0J/wEtBgAB7AMHA+wZAAH/
BwAB/wYAAS0D/wEtBf8BLQMAAuwFBwXsCAABAwEAAfsBAAEDCgAB/wYAAf8HAAEtAv8DLQT/AS0DAAHs
Af8EBwH/BuwGAAEDBfsBAwoAAf8FAAH/BAAD7AEtAf8FLQP/AS0CAALsAf8CBwL/AwcE7AIAA+wCAwH7
AQMBAAEDAfsMAAH/AwAB/wgAAS0B/wItAf8DLQL/AS0DAAHsAf8CBwL6AvkDBwLsBQABAwL7AQAB7AEA
AvsBAw0AAf8FAAHsA/8BLQH/AS0D/wMtAf8BLQEAAewC/wLsAf8FBwLsAQABBwEAAewD/wIDAfsBAwEA
AQMB+w4AAf8GAAHsA/8BLQb/Ai0B/wEtAQAB7AP/AQAC7AH/AQcC7AEHAf8BAAEHAQAB7AP/AQABAwX7
AQMOAAH/BQAB7AP/AS0H/wEtAf8BLQEAAewD/wEAAf8BAALsAQcE/wIAAewD/wEAAgMBAAH7AQABAwwA
Af8CAAH/BQAB7AP/AS0J/wEtAQAB7AP/AQAB/wIAAewG/wEAAewD/wEAAf8BAAQDCwAB/wUAAf8DAATs
Cy0BAAXsAf8BAAH/AQAB7AP/AuwBAAXsAf8BAAH/DQAB/wcAAf8EAAHsA/8BAAH/CgAB7AP/AQAB/wIA
A+wFAAHsA/8BAAH/CwAB/woAAf8DAAXsAf8KAAXsAf8KAAXsAf8cAAHsA/8MAAHsA/8EAAH/BwAB7AP/
HAAF7AsABewLAAXsFwAQNyAHBgAF7AUAEDcDBwsPEgcEAAHsBPkDAAPsAQABNwFRCwMBMAI3AwcBAAm8
AQACBwsABQcDAAb5AwAC7AIAATcBFQEPBEoBAwFtAQMDSgEpATABNwMHAQAJ/wEAAgcCAAkDAQAEBwIA
AvkGAAL5AQAC7AEAATcBDgHsAesEeQFYBHkBSgEDATcDBwEACf8BAAIHAQAB+wEACQMBAAMHAgAB+QHs
BgAD+QEAAewBAAE3AQ8BWAEpA3kBXgGZAV4EeQEUATADBwEACf8BAAIHAQAB/wH7AQAJAwEAAgcBAAL5
AewGAAH5AQAB+QEAAewBAAE3ARABoAEwAQMBeQFeAZkBXgGZAV4CeQFYASIBMAMHAQAJ/wEAAgcBAAH7
Af8B+wEACQMBAAEHAQAB+QLsCAAC+QHsAQABNwEiAV4BkgFtAVgBmQFeAQcBXgGZAVgCeQFeASIDBwEA
Cf8BAAIHAQAB/wH7Af8B+wwAAfkC7AgAAvkB7AEAATcBEAGgAeUB7QEPARABIgEQARwBWAJ5AVgBHAEQ
AwcBAAn/AQACBwEAAfsB/wH7Af8B+wH/AfsB/wH7AQAFBwEAAfkBAAHsAQAB7AYAAvkB7AEAATcBDwHl
AqAB5QGgAeUBwwEUASIBFQEiAQ4BIgEwAwcBAAn/AQACBwEAAf8B+wH/AfsB/wH7Af8B+wH/AQAFBwEA
AfkBAAPsBgAC+QIAATcBDwGgAeUCoAHlAaAB5QGgAeUBoAFRAQMCNwMHAQAG/wPvAQACBwEAAfsB/wH7
BwAFBwEAAvkBAALsBgAB+QHsAgABNwEPBKABHAEDAewBAwHrAVEBSgEwAjcDBwEABv8BAAEUAQABQwMH
AwAIBwMAAQcCAAL5AwAE7AH5BAABNwEDAeoESgUDATADNwMHAQAG/wEAAbwBEBAHAgABBwEAA/kDAALs
AvkFAAI3BAMKNwMHAQAG8QEAAQ8MBwEAAwcBAAEHAQABBwUABfkGABA3AwcIDg4HAwAEBxAAEDcgBxQA
AQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsAwABBwIAAQcBAAEHAQABBwIA
AQcVAAEHAgABBwEAAQcBAAEHAgABBwUAAQcCAAEHAQABBwEAAQcCAAEHAQAB7AQHAgABBwEAAQcBAAEH
AgABBxUAAQcCAAEHAQABBwEAAQcCAAEHBQABBwIAAQcBAAEHAQABBwIAAQcBAAHsA/8BBwIAAQcBAAEH
AQABBwIAAQcBAAoCBgAKAgcAAfwBAAH8AQAB/AEAAfwBAAH8BgAB7AH/BAcB/wMHAf8BBwQAAQII/wEC
BgABAgj/AQIGAAH8CP8HAAHsCv8BBwQAAQIB/wgCBgABAgH/CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAHs
Af8EBwH/AwcB/wEHBAABAgH/AwIBBwQCBgABAgH/AwIBBwQCBJgCAAH8Af8B/AEAAQcBAAH8AQcB/wEA
BNYCAAHsCv8BBwQAAQIC/wECAQcDAgH/AQIGAAECAv8BAgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEA
AfwB/wH8A/8B1gIAAewB/wgHAf8BBwQAAQIB/wECAQcDAgL/AQIGAAECAf8BAgEHAwIC/wECBJgCAAH8
Af8B/AH/AfwBAAH/AQABBwEAAdYC/wHWAgAB7Ar/AQcEAAECAf8BBwUCAf8BAgYAAQIB/wEHBQIB/wEC
BJgDAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAgAB7AH/AgcB/wUHAf8BBwQAAQIB/wICAv8CAgH/
AQIGAAECAf8CAgL/AgIB/wECApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gIAAewK/wEH
BAABAgj/AQIGAAECCP8BAgGYAv8BmAMACP8B/AH/AdYBBwHWAgAB7AH/AgcB/wUHAf8BBwQACgIGAAoC
ApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YCAAHsCP8bAAGYAf8CmAL/ApgB/wGYBgAK1gIA
AewB/wYHAf8B7AH/GQABmAj/AZgGAAHWCP8B1gIAAewI/wHsGgAKmAYACtYCAArsFgAQAiYAAQMB/wgA
AgINAAECJAAB7AEDAewB/wgAAQIBAAIDBgACBwEAAQMBAAECIgABAwHsAQMB7AEDAf8IAAECAQACAwYA
AgcBAAEDAQABAgEAAfwBAAH8AQAB/AEAAfwBAAH8BwAB/AEAAfwBAAH8AQAB/AEAAfwHAAEDAewBAwHs
AQMB7AH/AQAB7AYAAQIBAAIDBgACBwEAAQMBAAECAfwI/wcAAfwI/wgAAewBAwHsAQMB7AEDAf8BAAHs
BgABAgEAAgMJAAEDAQABAgEAAf8BAAH8Af8B/AEAAv8B/AcAAf8BAAH8Af8B/AEAAv8B/AcAAQMB7AED
AgAB7AH/AQAB7AYAAQIBAAwDAQABAgH8Af8B/AEAAQcBAAH8AQcB/wcAAfwB/wH8AQABBwEAAfwBBwH/
AQAE1gMAAewBAwHsAgcBAwH/AQAB7AEAAQYEAAECAQACAwgAAgMBAAECAQAB/wEAAfwBAAH8AQAB/AH/
AfwHAAH/AQAB/AEAAfwBAAH8Af8B/AP/AdYDAAEDAewBAwHsAQMB7AH/AgABBgX+AQIBAAEDAQAIBwEA
AQMBAAECAfwB/wH8Af8B/AEAAf8BAAEHBwAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gMAAewBAwHs
AQMB7AEDAf8BAAFtBv4BAgEAAQMBAAgHAQABAwEAAQIBAAH8AQAB/wEAAfwB/wH8AQAB/AcAAfwBAAH/
AQAB/AH/AfwBAAH8AdYBBwH/AdYDAAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQECAQABAwEACAcBAAED
AQABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYDAAHsAQMB7AED
AewBAwH/AQAB7AEAAm0DAAECAQABAwEACAcBAAEDAQABAgEACP8B/AcACP8B/AH/AdYBBwHWAwABAwHs
AQMB7AEHAf8B7AEAAewCAAFtAwABAgEAAQMBAAgHAwABAgH8AQAB/AEAAfwBAAH8AQAB/AcAAfwBAAH8
AQAB/AEAAfwBAAH8AQAB/wPWAwAB7AEDAQcB/wHsAQAD7AYAAQIBAAEDAQAIBwEAAQcBAAECFAAK1gMA
AQcB/wHsAQAF7AYAAQIOAAECFAAB1gj/AdYSABACFAAK1gIAAUIBTQE+BwABPgMAASgDAAFAAwABgAMA
AQEBAAEBBgABBBYAA/+CAAEfAfgBAAH/AfkC/wEAAQ8B+AEAAf8B8AH4AQMBAAEHAfgBAAH/AeAB8AEB
AQABAwH4AQAB/wHBAfABAQEAAQEB+AEAAfgBAwHwAQECAAGAAQABgAEHAYABAQEAAR8DAAEPAQABAQEA
AR8DAAEPAQABAQEAAREDAAEPAQACAQHzAwABDwEAAQEBAAF1AwABDwEAAQEBAAF+AwABHwEAAQMBwAF+
AcABAAHAAT8BwAF/AcABfgHAAWMBwAF/AcABfwHwAX0B8AF/AfABfwHwAX8B8AF/AfABfwHwAX8B8AF/
BP8BAAEfBv8BAAEPAv8B4AP/AQABBwH/AfsBwQH/AfgBPwEAAQMB7wH/AcABPwHwAX8BAAEBAccB9wHA
AX8BUAEPAgABwAHvAcABDwHwAR8BAAEfAcEBzwHAAR8B0AEDAQABFwHAAR8BAAEfAfABBwEAARsBwAE/
AYABHwFQAQcBAQH7AcABDwEAAR8B/AEHAQABewHAAR8BAAEfAdABBwEAAVcBwAEfAYEBHwH/AQcBwAFP
AcABDwEkAf8BUwEHAcABRwGAAQcB5gP/AfABfwGcARMB5wP/AfABfwH8AR8B4AEBAf8BhwH0AQEB9AEB
AeABAQH/AQMB8AEBAfABAwHgAQEB/wEAAfgBAQH4AQMB4AEBAYABAQHAAQEBwAEBAeABAQHAAYABwAEB
AcABAQHgAQEBwAEAAfABAQHwAwABgAQAAQEBBgIAAQEBBAEAAQQBAQMAAR8CAAIBAQABAQEAAR8BAAIB
AYMBAAEBAQABDwEAAQEBAAF/AQABAQGAAQ8BAAEBAQABfwHAAX8BwAEPAcABfwHAAX8BwAF/AeABHwHA
AX8BwAF/AfABfwHgAR8B8AF/AfABfwHwAX8B4AEfAfABfwHwAX8E/wH+AR8D/wH5AfABAQH8AQ8C/wHn
Af8B8AEBAeABAwH+AR8BwwHzAfABAQHAAQAB+AEHAcMB5wHwAQEBwAEAAfgBAwHhAccBgAEBAYABAAGA
AQMB8AGPAQABAQMAAQMB+AEfAQABAQMAAQMB/AE/AQABAQMAAQMB+AEfAQABAQEAAQEBAAEHAfABnwEA
AQEDAAEfAcEBxwEAAQEBAAGBAQABfwGDAeMBwAF/AcABxwHAAX8BjwHxAcABfwHAAX8BwAF/Av8B8AF/
AfABdwHwAX8C/wHwAX8B8AF/AfABfwL/BgAB/AEfBgAB8AFxBgAB4AFzBgABzwHJBgABzwHFBgABjwHV
BgABjwHxBgABjwHxBgABqwHxBgABowHzBgABkwHzBgABzgEPBgABjgEfBgAB+AE/BgAC/wYAAv8B8AEA
AfADAAL/AfABAAHwAwAC/wHwAQAB8AQAAT8BAAE/AQABPwEAAQcBAAE/AQABPwEAAT8BAAEHAQABPwEA
AT8BAAE/AQABBwEAAT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEA
AT8BAAEDAQABAwEAAQcBAAE/AQABAwEAAQMBAAEHAQABPwEAAQMBAAEDAQABBwEAAT8BAAEDAQABAwEA
AQcC/wHwAQMB8AEDAQABDwL/AfABAwHwAQMBAAEfAv8B8AEDAfABAwEAAT8B/AF/AgAE/wHwAX8CAAT/
AcABfwIABP8BAAEfAwABPwEAAT8BAAEfAwABPwEAAT8BAAEXAwABPwEAAT8BAAEHAwABPwEAAQMFAAE/
AQABAwUAAT8BAAEDBQABPwEAAQMFAAE/AQABAwEAAQcDAAE/AQABAwEAARcDAAE/AQABAwEAAR8CAAL/
AfABAwEAAR8CAAL/AfABAwEAAR8CAAL/AfABAws=
</value>
</data>
<metadata name="ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="plist.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</value>
</data>
<data name="plist.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj0yLjAuMC4wLCBDdWx0
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</value>
</data>
<data name="plist.PropBag" xml:space="preserve">
<value>&lt;?xml version="1.0"?&gt;&lt;Blob&gt;&lt;Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"&gt;&lt;Data&gt;Style15{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style27{}Style6{}Style26{}Footer{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style4{}FilterBar{BackColor:255, 255, 192;}EvenRow{BackColor:White;}Style11{}Style13{}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style8{}Style2{}Style14{}Normal{BackColor:Control;}Style7{}Heading{Wrap:True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}Style10{AlignHorz:Near;}Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}&lt;/Data&gt;&lt;/Styles&gt;&lt;Splits&gt;&lt;C1.Win.C1TrueDBGrid.MergeView Name="" AlternatingRowStyle="True" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FetchRowStyles="True" FilterBar="True" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="16" DefRecSelWidth="16" VerticalScrollGroup="1" HorizontalScrollGroup="1"&gt;&lt;Height&gt;375&lt;/Height&gt;&lt;CaptionStyle parent="Heading" me="Style10" /&gt;&lt;EditorStyle parent="Editor" me="Style2" /&gt;&lt;EvenRowStyle parent="EvenRow" me="Style8" /&gt;&lt;FilterBarStyle parent="FilterBar" me="Style27" /&gt;&lt;FooterStyle parent="Footer" me="Style4" /&gt;&lt;GroupStyle parent="Group" me="Style12" /&gt;&lt;HeadingStyle parent="Heading" me="Style3" /&gt;&lt;HighLightRowStyle parent="HighlightRow" me="Style7" /&gt;&lt;InactiveStyle parent="Inactive" me="Style6" /&gt;&lt;OddRowStyle parent="OddRow" me="Style9" /&gt;&lt;RecordSelectorStyle parent="RecordSelector" me="Style11" /&gt;&lt;SelectedStyle parent="Selected" me="Style5" /&gt;&lt;Style parent="Normal" me="Style1" /&gt;&lt;ClientRect&gt;0, 0, 668, 375&lt;/ClientRect&gt;&lt;BorderSide&gt;0&lt;/BorderSide&gt;&lt;/C1.Win.C1TrueDBGrid.MergeView&gt;&lt;/Splits&gt;&lt;NamedStyles&gt;&lt;Style parent="" me="Normal" /&gt;&lt;Style parent="Normal" me="Heading" /&gt;&lt;Style parent="Heading" me="Footer" /&gt;&lt;Style parent="Heading" me="Caption" /&gt;&lt;Style parent="Heading" me="Inactive" /&gt;&lt;Style parent="Normal" me="Selected" /&gt;&lt;Style parent="Normal" me="Editor" /&gt;&lt;Style parent="Normal" me="HighlightRow" /&gt;&lt;Style parent="Normal" me="EvenRow" /&gt;&lt;Style parent="Normal" me="OddRow" /&gt;&lt;Style parent="Heading" me="RecordSelector" /&gt;&lt;Style parent="Normal" me="FilterBar" /&gt;&lt;Style parent="Caption" me="Group" /&gt;&lt;/NamedStyles&gt;&lt;vertSplits&gt;1&lt;/vertSplits&gt;&lt;horzSplits&gt;1&lt;/horzSplits&gt;&lt;Layout&gt;Modified&lt;/Layout&gt;&lt;DefaultRecSelWidth&gt;16&lt;/DefaultRecSelWidth&gt;&lt;ClientArea&gt;0, 0, 670, 375&lt;/ClientArea&gt;&lt;PrintPageHeaderStyle parent="" me="Style14" /&gt;&lt;PrintPageFooterStyle parent="" me="Style15" /&gt;&lt;/Blob&gt;</value>
</data>
</root>

Some files were not shown because too many files have changed in this diff Show More