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,343 @@
<?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
EQAAAk1TRnQBSQFMAgEBDAEAASQBAAEMAQABEAEAARABAAT/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
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA3SURBVChTY2DABP+xiIGFkCVwsVEUwhThNREkiaEAJoiP
RnEmskKs7kd3C1YrYTrx+g6bIrAYAKCqHOQvFu6BAAAAAElFTkSuQmCC
</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
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</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;Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style27{}Style6{}Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style8{}Footer{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style4{}FilterBar{BackColor:255, 255, 192;}EvenRow{BackColor:White;}Style26{}Style13{}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style2{}Style14{}Normal{BackColor:Control;}Style7{}Heading{Wrap:True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}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;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
CwAAAk1TRnQBSQFMAgEBCAEAAQwBAAEMAQABEAEAARABAAT/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/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</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,358 @@
<?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
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACU
EgAAAk1TRnQBSQFMAgEBDQEAASQBAAEMAQABEAEAARABAAT/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=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>685, 28</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
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA3SURBVChTY2DABP+xiIGFkCVwsVEUwhThNREkiaEAJoiP
RnEmskKs7kd3C1YrYTrx+g6bIrAYAKCqHOQvFu6BAAAAAElFTkSuQmCC
</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
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</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;Style15{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style27{}Style6{}Style4{}Footer{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style10{AlignHorz:Near;}FilterBar{BackColor:255, 255, 192;}EvenRow{BackColor:White;}Style26{}Style13{}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style8{}Style2{}Style14{}Normal{BackColor:Control;}Style7{}Heading{Wrap:True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style11{}Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}&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=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>196, 47</value>
</metadata>
<metadata name="ImgListSteuerung.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.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/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABI
CwAAAk1TRnQBSQFMAgEBCAEAAQwBAAEMAQABEAEAARABAAT/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/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</value>
</data>
<data name="btnfilter.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAIRJREFUOE+9k0kO
wCAMA/N0zryKn1FcsMSimFxapBxAMFlsLKVUVdht4bG3SikvXDJuAMAlRAFaZmSf4yxGAdgaWhkgDcDF
PQAJA9Qw/68g4I8urzdEnKP3Wm0EGmyK5ExZNYD6d4jzWFXAgbKSyZWrM4fLdsMse0JcJSL/RXrhc4D6
Dw8/bd0KB8rjUwAAAABJRU5ErkJggg==
</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,346 @@
<?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
DwAAAk1TRnQBSQFMAgEBCQEAAQwBAAEMAQABEAEAARABAAT/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.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>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.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>0, 0</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>249, 112</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/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAZZJREFUOE9jYECA
/1AmiIaxkaRxM2EasNEMdek9/9OCC/8n+Gf/L4qtx2rwfwcHh//t7e3/6+vr/3dPbP9fldiJYtjWKSf+
fz/1/39ORAVc3MM6AG7Y/46Ojv8wcH/d3/8qshr4XAWXa82ZDDbkf0NDA1j/lS0v/gc7xYAV3L9/HywG
oqFhAlcHEoeJgQ1o7Wz+//7+7//H593/nwj0K0gMpghZMYgN8i4ILFiwAB7Y/0tyK8Cazy5//D/UNRYs
oaCggOECbGJgF8R7Z4I1H5x37f/9bd//SwhLYYSBgbophtj6/oOQMAA5G2YAzJAQoEtAUQeiPx79///1
AUQsaCnp/V/cugWsB6sBl9e8+n9z4wewAhANMiTKKwUejSALQWpAlmEYAJIAuSoaqAGkGYRBfFDUggwB
4YllC/4fX3QHuwEgW0GaQZpAXvh7HhJl6cDUCHMVTDNWF+AKSPRwAqmDG5ALTKIw00EuAOGnu//9X9m1
G5b+MQIaxQCQE0HpHORkZAzKRBVJrWAv4HUBUrLEmQdwGQAApXIOrLlV970AAAAASUVORK5CYII=
</value>
</data>
<data name="drpMiatarbeiter.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="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;Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style6{}Style8{}Footer{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style4{}FilterBar{}EvenRow{BackColor:White;}Style11{}Style13{}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style2{}Normal{}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.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
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA3SURBVChTY2DABP+xiIGFkCVwsVEUwhThNREkiaEAJoiP
RnEmskKs7kd3C1YrYTrx+g6bIrAYAKCqHOQvFu6BAAAAAElFTkSuQmCC
</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
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</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;Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style6{}Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style8{}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{}Style2{}Style14{}Normal{}Style7{}Heading{Wrap:True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}Style10{AlignHorz:Near;}Style15{}&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/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</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,259 @@
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"
Me.DataSet1.Locale = New System.Globalization.CultureInfo("de-CH")
'
'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,255 @@
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"
Me.DataSet1.Locale = New System.Globalization.CultureInfo("de-CH")
'
'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,433 @@
<?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>573, 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="TabControl1.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="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtQuittung2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtQuittung1.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="txtBeilagen2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtBeilagen1.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="txtForm2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtForm1.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="txtArt2.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="Label2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtArt1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtGrundlage4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtGrundlage3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtGrundlage2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtGrundlage1.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="cbDokumenttyp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="GroupBox3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="FnktList.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>522, 20</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="mnuDelete.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="DomainList.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="ContextMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>679, 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="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>162, 20</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>27, 20</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>367, 22</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="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>367, 22</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>367, 22</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>367, 22</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>290, 20</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="SqlSelectCommand2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlSelectCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlSelectCommand2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlSelectCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlInsertCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlInsertCommand2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlInsertCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlUpdateCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlUpdateCommand2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlUpdateCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDeleteCommand2.CommandDesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDeleteCommand2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>0, 0</value>
</data>
<data name="SqlDeleteCommand2.DesignTimeVisible" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</data>
<data name="SqlDataAdapter2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="SqlDataAdapter2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>387, 20</value>
</data>
<data name="MainMenu1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="MainMenu1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmBLParameter</value>
</data>
</root>

View File

@@ -0,0 +1,904 @@
Imports System.IO
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Public Class frmBLParameter
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 TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents GroupBox3 As System.Windows.Forms.GroupBox
Friend WithEvents txtQuittung2 As System.Windows.Forms.TextBox
Friend WithEvents txtQuittung1 As System.Windows.Forms.TextBox
Friend WithEvents txtBeilagen2 As System.Windows.Forms.TextBox
Friend WithEvents txtBeilagen1 As System.Windows.Forms.TextBox
Friend WithEvents txtForm2 As System.Windows.Forms.TextBox
Friend WithEvents txtForm1 As System.Windows.Forms.TextBox
Friend WithEvents txtArt2 As System.Windows.Forms.TextBox
Friend WithEvents txtArt1 As System.Windows.Forms.TextBox
Friend WithEvents txtGrundlage3 As System.Windows.Forms.TextBox
Friend WithEvents txtGrundlage2 As System.Windows.Forms.TextBox
Friend WithEvents txtGrundlage1 As System.Windows.Forms.TextBox
Friend WithEvents cbDokumenttyp As System.Windows.Forms.ComboBox
Friend WithEvents txtGrundlage4 As System.Windows.Forms.TextBox
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ToolBarButton2 As System.Windows.Forms.ToolBarButton
Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents DataSet1 As System.Data.DataSet
Friend WithEvents DomainList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents SqlSelectCommand2 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlInsertCommand2 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlUpdateCommand2 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDeleteCommand2 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDataAdapter2 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents FnktList As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu
Friend WithEvents ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents mnuAdd As System.Windows.Forms.MenuItem
Friend WithEvents ContextMenu2 As System.Windows.Forms.ContextMenu
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(frmBLParameter))
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()
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.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.txtQuittung2 = New System.Windows.Forms.TextBox()
Me.txtQuittung1 = New System.Windows.Forms.TextBox()
Me.Label6 = New System.Windows.Forms.Label()
Me.txtBeilagen2 = New System.Windows.Forms.TextBox()
Me.txtBeilagen1 = New System.Windows.Forms.TextBox()
Me.Label5 = New System.Windows.Forms.Label()
Me.txtForm2 = New System.Windows.Forms.TextBox()
Me.txtForm1 = New System.Windows.Forms.TextBox()
Me.Label4 = New System.Windows.Forms.Label()
Me.txtArt2 = New System.Windows.Forms.TextBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.txtArt1 = New System.Windows.Forms.TextBox()
Me.txtGrundlage4 = New System.Windows.Forms.TextBox()
Me.txtGrundlage3 = New System.Windows.Forms.TextBox()
Me.txtGrundlage2 = New System.Windows.Forms.TextBox()
Me.txtGrundlage1 = New System.Windows.Forms.TextBox()
Me.Label1 = New System.Windows.Forms.Label()
Me.cbDokumenttyp = New System.Windows.Forms.ComboBox()
Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
Me.FnktList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu2 = New System.Windows.Forms.ContextMenu()
Me.mnuDelete = New System.Windows.Forms.MenuItem()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.DomainList = New C1.Win.C1TrueDBGrid.C1TrueDBGrid()
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu()
Me.mnuAdd = New System.Windows.Forms.MenuItem()
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection()
Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter()
Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand()
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.SqlSelectCommand2 = New System.Data.SqlClient.SqlCommand()
Me.SqlInsertCommand2 = New System.Data.SqlClient.SqlCommand()
Me.SqlUpdateCommand2 = New System.Data.SqlClient.SqlCommand()
Me.SqlDeleteCommand2 = New System.Data.SqlClient.SqlCommand()
Me.SqlDataAdapter2 = New System.Data.SqlClient.SqlDataAdapter()
Me.MainMenu1 = New System.Windows.Forms.MainMenu()
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.GroupBox3.SuspendLayout()
CType(Me.FnktList, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox2.SuspendLayout()
CType(Me.DomainList, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DataSet1, 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(800, 25)
Me.ToolBar1.TabIndex = 2
'
'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.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'TabControl1
'
Me.TabControl1.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabPage1, Me.TabPage2})
Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.TabControl1.Location = New System.Drawing.Point(0, 25)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(800, 380)
Me.TabControl1.TabIndex = 3
'
'TabPage1
'
Me.TabPage1.Controls.AddRange(New System.Windows.Forms.Control() {Me.GroupBox1, Me.Label1, Me.cbDokumenttyp})
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Size = New System.Drawing.Size(792, 354)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "Dokumentvorlage"
'
'GroupBox1
'
Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.txtQuittung2, Me.txtQuittung1, Me.Label6, Me.txtBeilagen2, Me.txtBeilagen1, Me.Label5, Me.txtForm2, Me.txtForm1, Me.Label4, Me.txtArt2, Me.Label3, Me.Label2, Me.txtArt1, Me.txtGrundlage4, Me.txtGrundlage3, Me.txtGrundlage2, Me.txtGrundlage1})
Me.GroupBox1.Location = New System.Drawing.Point(8, 56)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(784, 400)
Me.GroupBox1.TabIndex = 6
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Dokumenttexte"
'
'txtQuittung2
'
Me.txtQuittung2.Location = New System.Drawing.Point(120, 264)
Me.txtQuittung2.Name = "txtQuittung2"
Me.txtQuittung2.Size = New System.Drawing.Size(648, 20)
Me.txtQuittung2.TabIndex = 16
Me.txtQuittung2.Text = ""
'
'txtQuittung1
'
Me.txtQuittung1.Location = New System.Drawing.Point(120, 240)
Me.txtQuittung1.Name = "txtQuittung1"
Me.txtQuittung1.Size = New System.Drawing.Size(648, 20)
Me.txtQuittung1.TabIndex = 15
Me.txtQuittung1.Text = ""
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(8, 240)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(112, 23)
Me.Label6.TabIndex = 14
Me.Label6.Text = "Quittung"
'
'txtBeilagen2
'
Me.txtBeilagen2.Location = New System.Drawing.Point(120, 208)
Me.txtBeilagen2.Name = "txtBeilagen2"
Me.txtBeilagen2.Size = New System.Drawing.Size(648, 20)
Me.txtBeilagen2.TabIndex = 13
Me.txtBeilagen2.Text = ""
'
'txtBeilagen1
'
Me.txtBeilagen1.Location = New System.Drawing.Point(120, 184)
Me.txtBeilagen1.Name = "txtBeilagen1"
Me.txtBeilagen1.Size = New System.Drawing.Size(648, 20)
Me.txtBeilagen1.TabIndex = 12
Me.txtBeilagen1.Text = ""
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(8, 184)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(112, 23)
Me.Label5.TabIndex = 11
Me.Label5.Text = "Beilagen"
'
'txtForm2
'
Me.txtForm2.Enabled = False
Me.txtForm2.Location = New System.Drawing.Point(128, 400)
Me.txtForm2.Name = "txtForm2"
Me.txtForm2.Size = New System.Drawing.Size(648, 20)
Me.txtForm2.TabIndex = 10
Me.txtForm2.Text = ""
Me.txtForm2.Visible = False
'
'txtForm1
'
Me.txtForm1.Enabled = False
Me.txtForm1.Location = New System.Drawing.Point(128, 376)
Me.txtForm1.Name = "txtForm1"
Me.txtForm1.Size = New System.Drawing.Size(648, 20)
Me.txtForm1.TabIndex = 9
Me.txtForm1.Text = ""
Me.txtForm1.Visible = False
'
'Label4
'
Me.Label4.Enabled = False
Me.Label4.Location = New System.Drawing.Point(16, 376)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(112, 23)
Me.Label4.TabIndex = 8
Me.Label4.Text = "Aushändigungsform"
Me.Label4.Visible = False
'
'txtArt2
'
Me.txtArt2.Location = New System.Drawing.Point(120, 152)
Me.txtArt2.Name = "txtArt2"
Me.txtArt2.Size = New System.Drawing.Size(648, 20)
Me.txtArt2.TabIndex = 7
Me.txtArt2.Text = ""
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(8, 128)
Me.Label3.Name = "Label3"
Me.Label3.TabIndex = 6
Me.Label3.Text = "Aushändigungsart"
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(8, 24)
Me.Label2.Name = "Label2"
Me.Label2.TabIndex = 5
Me.Label2.Text = "Grundlagen"
'
'txtArt1
'
Me.txtArt1.Location = New System.Drawing.Point(120, 128)
Me.txtArt1.Name = "txtArt1"
Me.txtArt1.Size = New System.Drawing.Size(648, 20)
Me.txtArt1.TabIndex = 4
Me.txtArt1.Text = ""
'
'txtGrundlage4
'
Me.txtGrundlage4.Location = New System.Drawing.Point(120, 96)
Me.txtGrundlage4.Name = "txtGrundlage4"
Me.txtGrundlage4.Size = New System.Drawing.Size(648, 20)
Me.txtGrundlage4.TabIndex = 3
Me.txtGrundlage4.Text = ""
'
'txtGrundlage3
'
Me.txtGrundlage3.Location = New System.Drawing.Point(120, 72)
Me.txtGrundlage3.Name = "txtGrundlage3"
Me.txtGrundlage3.Size = New System.Drawing.Size(648, 20)
Me.txtGrundlage3.TabIndex = 2
Me.txtGrundlage3.Text = ""
'
'txtGrundlage2
'
Me.txtGrundlage2.Location = New System.Drawing.Point(120, 48)
Me.txtGrundlage2.Name = "txtGrundlage2"
Me.txtGrundlage2.Size = New System.Drawing.Size(648, 20)
Me.txtGrundlage2.TabIndex = 1
Me.txtGrundlage2.Text = ""
'
'txtGrundlage1
'
Me.txtGrundlage1.Location = New System.Drawing.Point(120, 24)
Me.txtGrundlage1.Name = "txtGrundlage1"
Me.txtGrundlage1.Size = New System.Drawing.Size(648, 20)
Me.txtGrundlage1.TabIndex = 0
Me.txtGrundlage1.Text = ""
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(120, 32)
Me.Label1.TabIndex = 5
Me.Label1.Text = "Dokumenttyp BL-Quittung"
'
'cbDokumenttyp
'
Me.cbDokumenttyp.Location = New System.Drawing.Point(128, 16)
Me.cbDokumenttyp.Name = "cbDokumenttyp"
Me.cbDokumenttyp.Size = New System.Drawing.Size(368, 21)
Me.cbDokumenttyp.TabIndex = 4
Me.cbDokumenttyp.Text = "ComboBox1"
'
'TabPage2
'
Me.TabPage2.Controls.AddRange(New System.Windows.Forms.Control() {Me.GroupBox3, Me.GroupBox2})
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Size = New System.Drawing.Size(792, 442)
Me.TabPage2.TabIndex = 1
Me.TabPage2.Text = "KUBE-Funktionen"
'
'GroupBox3
'
Me.GroupBox3.Controls.AddRange(New System.Windows.Forms.Control() {Me.FnktList})
Me.GroupBox3.Location = New System.Drawing.Point(384, 16)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(400, 416)
Me.GroupBox3.TabIndex = 1
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Funktionen 'KUBE'"
'
'FnktList
'
Me.FnktList.AllowFilter = True
Me.FnktList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.FnktList.AllowSort = True
Me.FnktList.AlternatingRows = True
Me.FnktList.CaptionHeight = 17
Me.FnktList.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Anchored
Me.FnktList.CollapseColor = System.Drawing.Color.Black
Me.FnktList.ContextMenu = Me.ContextMenu2
Me.FnktList.DataChanged = False
Me.FnktList.DeadAreaBackColor = System.Drawing.Color.Gray
Me.FnktList.Dock = System.Windows.Forms.DockStyle.Fill
Me.FnktList.ExpandColor = System.Drawing.Color.Black
Me.FnktList.FilterBar = True
Me.FnktList.GroupByCaption = "Drag a column header here to group by that column"
Me.FnktList.Images.Add(CType(resources.GetObject("resource.Images"), System.Drawing.Bitmap))
Me.FnktList.Location = New System.Drawing.Point(3, 16)
Me.FnktList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.SolidCellBorder
Me.FnktList.Name = "FnktList"
Me.FnktList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.FnktList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.FnktList.PreviewInfo.ZoomFactor = 75
Me.FnktList.PrintInfo.ShowOptionsDialog = False
Me.FnktList.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.FnktList.RowDivider = GridLines1
Me.FnktList.RowHeight = 15
Me.FnktList.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.FnktList.ScrollTips = False
Me.FnktList.Size = New System.Drawing.Size(394, 397)
Me.FnktList.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation
Me.FnktList.TabIndex = 9
Me.FnktList.Text = "C1TrueDBGrid1"
Me.FnktList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}E" & _
"ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
"{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
"eCaptionText;BackColor:InactiveCaption;}FilterBar{Wrap:True;BackColor:255, 255, " & _
"192;}Footer{}Caption{AlignHorz:Center;}Normal{}HighlightRow{ForeColor:HighlightT" & _
"ext;BackColor:Highlight;}Style9{}OddRow{BackColor:224, 224, 224;}RecordSelector{" & _
"AlignImage:Center;}Heading{Wrap:True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;" & _
"ForeColor:ControlText;BackColor:Control;}Style8{}Style10{AlignHorz:Near;}Style11" & _
"{}Style12{}Style13{}Style1{}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeVi" & _
"ew Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCaptionHeight=""17" & _
""" ColumnFooterHeight=""17"" FilterBar=""True"" MarqueeStyle=""SolidCellBorder"" Record" & _
"SelectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollG" & _
"roup=""1""><ClientRect>0, 0, 390, 393</ClientRect><BorderSide>0</BorderSide><Capti" & _
"onStyle parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" " & _
"/><EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar" & _
""" me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""" & _
"Group"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRow" & _
"Style parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""S" & _
"tyle4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=" & _
"""RecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><" & _
"Style parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Na" & _
"medStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><" & _
"Style parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Sty" & _
"le parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Styl" & _
"e parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Styl" & _
"e parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style par" & _
"ent=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Sty" & _
"le parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSp" & _
"lits>1</horzSplits><Layout>Modified</Layout><DefaultRecSelWidth>16</DefaultRecSe" & _
"lWidth><ClientArea>0, 0, 390, 393</ClientArea></Blob>"
'
'ContextMenu2
'
Me.ContextMenu2.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuDelete})
'
'mnuDelete
'
Me.mnuDelete.Index = 0
Me.mnuDelete.Text = "&Funktion löschen"
'
'GroupBox2
'
Me.GroupBox2.Controls.AddRange(New System.Windows.Forms.Control() {Me.DomainList})
Me.GroupBox2.Location = New System.Drawing.Point(8, 16)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(376, 416)
Me.GroupBox2.TabIndex = 0
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Funktionen"
'
'DomainList
'
Me.DomainList.AllowFilter = True
Me.DomainList.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.DomainList.AllowSort = True
Me.DomainList.AlternatingRows = True
Me.DomainList.CaptionHeight = 17
Me.DomainList.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Anchored
Me.DomainList.CollapseColor = System.Drawing.Color.Black
Me.DomainList.ContextMenu = Me.ContextMenu1
Me.DomainList.DataChanged = False
Me.DomainList.DeadAreaBackColor = System.Drawing.Color.Gray
Me.DomainList.Dock = System.Windows.Forms.DockStyle.Fill
Me.DomainList.ExpandColor = System.Drawing.Color.Black
Me.DomainList.FilterBar = True
Me.DomainList.GroupByCaption = "Drag a column header here to group by that column"
Me.DomainList.Images.Add(CType(resources.GetObject("resource.Images1"), System.Drawing.Bitmap))
Me.DomainList.Location = New System.Drawing.Point(3, 16)
Me.DomainList.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.SolidCellBorder
Me.DomainList.Name = "DomainList"
Me.DomainList.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.DomainList.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.DomainList.PreviewInfo.ZoomFactor = 75
Me.DomainList.PrintInfo.ShowOptionsDialog = False
Me.DomainList.RecordSelectorWidth = 16
GridLines2.Color = System.Drawing.Color.DarkGray
GridLines2.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.DomainList.RowDivider = GridLines2
Me.DomainList.RowHeight = 15
Me.DomainList.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.DomainList.ScrollTips = False
Me.DomainList.Size = New System.Drawing.Size(370, 397)
Me.DomainList.TabAction = C1.Win.C1TrueDBGrid.TabActionEnum.ColumnNavigation
Me.DomainList.TabIndex = 8
Me.DomainList.Text = "C1TrueDBGrid1"
Me.DomainList.PropBag = "<?xml version=""1.0""?><Blob><Styles type=""C1.Win.C1TrueDBGrid.Design.ContextWrappe" & _
"r""><Data>Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}E" & _
"ditor{}Style2{}Style5{}Style4{}Style7{}Style6{}EvenRow{BackColor:White;}Selected" & _
"{ForeColor:HighlightText;BackColor:Highlight;}Style3{}Inactive{ForeColor:Inactiv" & _
"eCaptionText;BackColor:InactiveCaption;}FilterBar{Wrap:True;BackColor:255, 255, " & _
"192;}Footer{}Caption{AlignHorz:Center;}Normal{}HighlightRow{ForeColor:HighlightT" & _
"ext;BackColor:Highlight;}Style1{}OddRow{BackColor:224, 224, 224;}RecordSelector{" & _
"AlignImage:Center;}Heading{Wrap:True;BackColor:Control;Border:Raised,,1, 1, 1, 1" & _
";ForeColor:ControlText;AlignVert:Center;}Style8{}Style10{AlignHorz:Near;}Style11" & _
"{}Style12{}Style13{}Style9{}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeVi" & _
"ew Name="""" AlternatingRowStyle=""True"" CaptionHeight=""17"" ColumnCaptionHeight=""17" & _
""" ColumnFooterHeight=""17"" FilterBar=""True"" MarqueeStyle=""SolidCellBorder"" Record" & _
"SelectorWidth=""16"" DefRecSelWidth=""16"" VerticalScrollGroup=""1"" HorizontalScrollG" & _
"roup=""1""><ClientRect>0, 0, 366, 393</ClientRect><BorderSide>0</BorderSide><Capti" & _
"onStyle parent=""Style2"" me=""Style10"" /><EditorStyle parent=""Editor"" me=""Style5"" " & _
"/><EvenRowStyle parent=""EvenRow"" me=""Style8"" /><FilterBarStyle parent=""FilterBar" & _
""" me=""Style13"" /><FooterStyle parent=""Footer"" me=""Style3"" /><GroupStyle parent=""" & _
"Group"" me=""Style12"" /><HeadingStyle parent=""Heading"" me=""Style2"" /><HighLightRow" & _
"Style parent=""HighlightRow"" me=""Style7"" /><InactiveStyle parent=""Inactive"" me=""S" & _
"tyle4"" /><OddRowStyle parent=""OddRow"" me=""Style9"" /><RecordSelectorStyle parent=" & _
"""RecordSelector"" me=""Style11"" /><SelectedStyle parent=""Selected"" me=""Style6"" /><" & _
"Style parent=""Normal"" me=""Style1"" /></C1.Win.C1TrueDBGrid.MergeView></Splits><Na" & _
"medStyles><Style parent="""" me=""Normal"" /><Style parent=""Normal"" me=""Heading"" /><" & _
"Style parent=""Heading"" me=""Footer"" /><Style parent=""Heading"" me=""Caption"" /><Sty" & _
"le parent=""Heading"" me=""Inactive"" /><Style parent=""Normal"" me=""Selected"" /><Styl" & _
"e parent=""Normal"" me=""Editor"" /><Style parent=""Normal"" me=""HighlightRow"" /><Styl" & _
"e parent=""Normal"" me=""EvenRow"" /><Style parent=""Normal"" me=""OddRow"" /><Style par" & _
"ent=""Heading"" me=""RecordSelector"" /><Style parent=""Normal"" me=""FilterBar"" /><Sty" & _
"le parent=""Caption"" me=""Group"" /></NamedStyles><vertSplits>1</vertSplits><horzSp" & _
"lits>1</horzSplits><Layout>Modified</Layout><DefaultRecSelWidth>16</DefaultRecSe" & _
"lWidth><ClientArea>0, 0, 366, 393</ClientArea></Blob>"
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.mnuAdd})
'
'mnuAdd
'
Me.mnuAdd.Index = 0
Me.mnuAdd.Text = "&Funktion hinzufügen"
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = "data source=shu;initial catalog=edoka;persist security info=False;user id=sa;work" & _
"station id=SHU;packet size=4096"
'
'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", "funktionsgruppe", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("funktionsgruppenr", "funktionsgruppenr"), New System.Data.Common.DataColumnMapping("bezeichnung", "bezeichnung"), New System.Data.Common.DataColumnMapping("beschreibung", "beschreibung"), New System.Data.Common.DataColumnMapping("zugehoerigkeit", "zugehoerigkeit"), 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("funktionszuweisung", "funktionszuweisung"), New System.Data.Common.DataColumnMapping("barcodeetiketten", "barcodeetiketten"), New System.Data.Common.DataColumnMapping("edokapartner", "edokapartner"), New System.Data.Common.DataColumnMapping("Dokumentreaktivierung", "Dokumentreaktivierung"), New System.Data.Common.DataColumnMapping("Partnerzusammenlegung", "Partnerzusammenlegung")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
'
'SqlDeleteCommand1
'
Me.SqlDeleteCommand1.CommandText = "[pv_funktionsgruppe_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_funktionsgruppenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "funktionsgruppenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_Dokumentreaktivierung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Dokumentreaktivierung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_Partnerzusammenlegung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Partnerzusammenlegung", 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_barcodeetiketten", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "barcodeetiketten", 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_edokapartner", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "edokapartner", 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_funktionszuweisung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "funktionszuweisung", 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_zugehoerigkeit", System.Data.SqlDbType.VarChar, 255, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "zugehoerigkeit", System.Data.DataRowVersion.Original, Nothing))
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "[pv_funktionsgruppe_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("@funktionsgruppenr", System.Data.SqlDbType.Int, 4, "funktionsgruppenr"))
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("@zugehoerigkeit", System.Data.SqlDbType.VarChar, 255, "zugehoerigkeit"))
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("@funktionszuweisung", System.Data.SqlDbType.Bit, 1, "funktionszuweisung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@barcodeetiketten", System.Data.SqlDbType.Bit, 1, "barcodeetiketten"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@edokapartner", System.Data.SqlDbType.Bit, 1, "edokapartner"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Dokumentreaktivierung", System.Data.SqlDbType.Bit, 1, "Dokumentreaktivierung"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Partnerzusammenlegung", System.Data.SqlDbType.Bit, 1, "Partnerzusammenlegung"))
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "[pv_funktionsgruppe_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"))
'
'SqlUpdateCommand1
'
Me.SqlUpdateCommand1.CommandText = "[pv_funktionsgruppe_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("@funktionsgruppenr", System.Data.SqlDbType.Int, 4, "funktionsgruppenr"))
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("@zugehoerigkeit", System.Data.SqlDbType.VarChar, 255, "zugehoerigkeit"))
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("@funktionszuweisung", System.Data.SqlDbType.Bit, 1, "funktionszuweisung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@barcodeetiketten", System.Data.SqlDbType.Bit, 1, "barcodeetiketten"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@edokapartner", System.Data.SqlDbType.Bit, 1, "edokapartner"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Dokumentreaktivierung", System.Data.SqlDbType.Bit, 1, "Dokumentreaktivierung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Partnerzusammenlegung", System.Data.SqlDbType.Bit, 1, "Partnerzusammenlegung"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_funktionsgruppenr", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "funktionsgruppenr", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_Dokumentreaktivierung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Dokumentreaktivierung", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_Partnerzusammenlegung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Partnerzusammenlegung", 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_barcodeetiketten", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "barcodeetiketten", 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_edokapartner", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "edokapartner", 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_funktionszuweisung", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "funktionszuweisung", 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_zugehoerigkeit", System.Data.SqlDbType.VarChar, 255, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "zugehoerigkeit", System.Data.DataRowVersion.Original, Nothing))
'
'DataSet1
'
Me.DataSet1.DataSetName = "NewDataSet"
Me.DataSet1.Locale = New System.Globalization.CultureInfo("de-CH")
'
'SqlDataAdapter2
'
Me.SqlDataAdapter2.DeleteCommand = Me.SqlDeleteCommand2
Me.SqlDataAdapter2.InsertCommand = Me.SqlInsertCommand2
Me.SqlDataAdapter2.SelectCommand = Me.SqlSelectCommand2
Me.SqlDataAdapter2.UpdateCommand = Me.SqlUpdateCommand2
'
'frmBLParameter
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(800, 405)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.TabControl1, Me.ToolBar1})
Me.Menu = Me.MainMenu1
Me.Name = "frmBLParameter"
Me.Text = "Banklagernd-Parameter "
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.GroupBox1.ResumeLayout(False)
Me.TabPage2.ResumeLayout(False)
Me.GroupBox3.ResumeLayout(False)
CType(Me.FnktList, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox2.ResumeLayout(False)
CType(Me.DomainList, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim WithEvents mcbdoktyp As MultiComboBox
#End Region
#Region "Load"
Private Sub frmBLParameter_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
fill_Doktyp()
Get_Parameterdata()
Funktionen_Laden()
Kube_Funktionen_Laden()
End Sub
#End Region
#Region "Formularhandling"
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
Me.Save_Parameterdata()
End Select
End Sub
#End Region
#Region "Datenhandling"
Private Sub Get_Parameterdata()
Dim blp As New edokadb.clsEdex_bl_parameter()
blp.cpMainConnectionProvider = conn
blp.iBlvparamnr = New SqlInt32(CType(1, Int32))
blp.SelectOne()
Me.txtGrundlage1.Text = blp.sTxtGrundlage1.Value
Me.txtGrundlage2.Text = blp.sTxtGrundlage2.Value
Me.txtGrundlage3.Text = blp.sTxtGrundlage3.Value
Me.txtGrundlage4.Text = blp.sTxtGrundlage4.Value
Me.txtArt1.Text = blp.sTxtArt1.Value
Me.txtArt2.Text = blp.sTxtArt2.Value
Me.txtForm1.Text = blp.sTxtForm1.Value
Me.txtForm2.Text = blp.sTxtForm2.Value
Me.txtBeilagen1.Text = blp.sTxtbeilage1.Value
Me.txtBeilagen2.Text = blp.sTxtbeilage2.Value
Me.txtQuittung1.Text = blp.sTxtQuittung1.Value
Me.txtQuittung2.Text = blp.sTxtQuittung2.Value
Dim I As Integer
I = blp.iBlvdokumenttypnr.Value
Me.mcbdoktyp.SelectedValue = I
blp.Dispose()
End Sub
Private Sub Save_Parameterdata()
Dim blp As New edokadb.clsEdex_bl_parameter()
blp.cpMainConnectionProvider = conn
blp.iBlvparamnr = New SqlInt32(CType(1, Integer))
blp.SelectOne()
blp.sTxtGrundlage1 = New SqlString(CType(Me.txtGrundlage1.Text, String))
blp.sTxtGrundlage2 = New SqlString(CType(Me.txtGrundlage2.Text, String))
blp.sTxtGrundlage3 = New SqlString(CType(Me.txtGrundlage3.Text, String))
blp.sTxtGrundlage4 = New SqlString(CType(Me.txtGrundlage4.Text, String))
blp.sTxtArt1 = New SqlString(CType(Me.txtArt1.Text, String))
blp.sTxtArt2 = New SqlString(CType(Me.txtArt2.Text, String))
blp.sTxtForm1 = New SqlString(CType(Me.txtForm1.Text, String))
blp.sTxtForm2 = New SqlString(CType(Me.txtForm2.Text, String))
blp.sTxtbeilage1 = New SqlString(CType(Me.txtBeilagen1.Text, String))
blp.sTxtbeilage2 = New SqlString(CType(Me.txtBeilagen2.Text, String))
blp.sTxtQuittung1 = New SqlString(CType(Me.txtQuittung1.Text, String))
blp.sTxtQuittung2 = New SqlString(CType(Me.txtQuittung2.Text, String))
blp.daMutiert_am = New SqlDateTime(CType(Now, DateTime))
blp.iMutierer = New SqlInt32(CType(Globals.MitarbeiterNr, Int32))
blp.iBlvdokumenttypnr = New SqlInt32(CType(Me.mcbdoktyp.SelectedValue, Int32))
conn.OpenConnection()
blp.Update()
conn.CloseConnection(True)
blp.Dispose()
End Sub
Private Sub fill_Doktyp()
Me.mcbdoktyp = New MultiComboBox(Me.cbDokumenttyp)
Me.mcbdoktyp.CheckNullValue = True
Me.mcbdoktyp.NullValueMessage = MyTxt.gettext(18)
Me.mcbdoktyp.DisplayColumnName = "Bezeichnung"
Me.mcbdoktyp.ValueColumnName = "Dokumenttypnr"
Me.mcbdoktyp.Fill_Data(Get_Dokumenttyp, False)
End Sub
Private Function Get_Dokumenttyp() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_dokumenttyp"
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("@mandantnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MandantNr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Sub Funktionen_Laden()
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
Me.DomainList.DataMember = "funktionsgruppe"
DivFnkt.SpaltenTitel_Aktualisieren(Me.DomainList, Me.DataSet1.Tables(0), "funktionsgruppe")
End Sub
Private Sub Kube_Funktionen_Laden()
Me.FnktList.DataSource = Nothing
Me.FnktList.DataMember = Nothing
Dim dt As DataTable
dt = KubeFunktionen_Laden()
Me.FnktList.DataSource = dt
Me.FnktList.DataMember = "edex_bl_kubefnkt"
DivFnkt.SpaltenTitel_Aktualisieren(Me.FnktList, Me.DataSet1.Tables(0), "edex_bl_kubefnkt")
End Sub
Private Function KubeFunktionen_Laden() As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_get_kubefnkt"
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 Insert_Funktion()
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_insert_kubefnkt"
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("@fnkt", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.DomainList.Columns(0).Value))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
Private Function delete_Funktion()
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
scmCmdToExecute.CommandText = "dbo.sp_edex_bl_delete_kubefnkt"
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("@fnkt", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Me.FnktList.Columns(0).Value))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
dtToReturn.Dispose()
End Try
End Function
#End Region
Private Sub TabControl1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
If Me.TabControl1.SelectedIndex = 0 Then
Me.ToolBar1.Buttons(1).Enabled = True
Else
Me.ToolBar1.Buttons(1).Enabled = False
End If
End Sub
Private Sub DomainList_doubleclick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DomainList.DoubleClick
Insert_Funktion()
Kube_Funktionen_Laden()
End Sub
Private Sub mnuAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuAdd.Click
Insert_Funktion()
Kube_Funktionen_Laden()
End Sub
Private Sub mnuDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuDelete.Click
delete_Funktion()
Kube_Funktionen_Laden()
End Sub
Private Sub FnktList_Doubleclick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FnktList.DoubleClick
delete_Funktion()
Kube_Funktionen_Laden()
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 FnktList_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles FnktList.MouseDown
Me.FnktList.Bookmark = Me.FnktList.RowContaining(e.Y)
End Sub
End Class

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="Label1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbDossier.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbVersand.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RBPersönlich.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="GroupBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="txtWeitereVerarbeitung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlbck.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbkeineUebergabe.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbbckversand.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbbckbldossier.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="pnleinzeldokument.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="RBEinzelPersoenlich.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbeinzelblversand.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="rbeinzelbldossier.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="PictureBox1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="PictureBox1.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
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAT9JREFUWEftlkkO
wyAMRcnNc7TcjMakRsbBY5DSRZGyaBn+82ewtxJo+75XbfjZvwWW8w0FUfyO46hSgz461re6Msoj6oFJ
gYC4Fq1oA+tAV0IQIK41WLSUOnwW7Amgnp0OaIkDGBfH35YrJoRH/AnANVdwIrLnmS1Ad665Ewhv9JbN
nn4AGN6TSPQeAWsMutAhItFLBxD+j7TBhQgAisxAMgDNhT/ATzhgPaV8f5+cAXoLUjdBeg29hxBvAGbb
lgeib0HWAR797UGyotDeAU9SmkbPcrXFkO7n4lp5lxaRJkbE0ZBlFVFGvEPA5OgVBRdI2h0KVauqvpVu
3wmYw1UYKjqLOiyONKzUFmEk0eG+h6pTNpiCoDP00C2N2gK1AKz5K/u7CdSBlQKetRrEmwAA+TpAS2jL
TrzH99mYDMAH4NzAyhPM9x8AAAAASUVORK5CYII=
</value>
</data>
<data name="$this.Name">
<value>frmBanklagerndverarbeitung</value>
</data>
</root>

View File

@@ -0,0 +1,324 @@
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 PictureBox1 As System.Windows.Forms.PictureBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(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.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.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()
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, 40)
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, 64)
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.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.AddRange(New System.Windows.Forms.Control() {Me.rbkeineUebergabe, Me.rbbckversand, Me.rbbckbldossier})
Me.pnlbck.Location = New System.Drawing.Point(16, 56)
Me.pnlbck.Name = "pnlbck"
Me.pnlbck.Size = New System.Drawing.Size(272, 80)
Me.pnlbck.TabIndex = 6
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"
'
'GroupBox2
'
Me.GroupBox2.Controls.AddRange(New System.Windows.Forms.Control() {Me.rbDossier, Me.rbVersand, Me.RBPersönlich})
Me.GroupBox2.Location = New System.Drawing.Point(8, 40)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(368, 104)
Me.GroupBox2.TabIndex = 7
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Weiterleitung"
'
'pnleinzeldokument
'
Me.pnleinzeldokument.Controls.AddRange(New System.Windows.Forms.Control() {Me.RBEinzelPersoenlich, Me.rbeinzelblversand, Me.rbeinzelbldossier})
Me.pnleinzeldokument.Location = New System.Drawing.Point(16, 56)
Me.pnleinzeldokument.Name = "pnleinzeldokument"
Me.pnleinzeldokument.Size = New System.Drawing.Size(272, 72)
Me.pnleinzeldokument.TabIndex = 7
Me.pnleinzeldokument.Visible = False
'
'RBEinzelPersoenlich
'
Me.RBEinzelPersoenlich.Location = New System.Drawing.Point(8, 51)
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, 27)
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.Bitmap)
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.AddRange(New System.Windows.Forms.Control() {Me.txtWeitereVerarbeitung, Me.pnlbck, Me.pnleinzeldokument, Me.GroupBox2, Me.GroupBox1, Me.Button1, Me.Label1, 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)
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
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
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
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,471 @@
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,345 @@
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()
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
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,154 @@
<?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="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="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="Label2.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="Label3.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="$this.Name">
<value>frmWatchJob</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,230 @@
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 cbverarbeitung As System.Windows.Forms.ComboBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(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()
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.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, 23)
Me.Label1.TabIndex = 1
Me.Label1.Text = "Die COLD-Druckaufbereitung ist abgeschlossen."
'
'Timer1
'
Me.Timer1.Interval = 30000
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", "Nur Aushändigungs-Quittung 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"
'
'frmWatchJob
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(360, 149)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.cbverarbeitung, Me.Label3, Me.lblpartner, Me.Label2, Me.Label1, 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.cbverarbeitung.Enabled = True
End If
If ReturnStatus = 7 Then
Me.Label1.Text = "Dokumentaufbereitung seitens OnDemand ist fehlgeschlagen."
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,257 @@
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"
Me.DataSet1.Locale = New System.Globalization.CultureInfo("de-CH")
'
'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

View File

@@ -0,0 +1,695 @@
<?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
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAD+
CgAAAk1TRnQBSQFMAgEBBAEAAQkBAAEEAQABEAEAARABAAT/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=2.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/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="btnPartnerInhaber.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAZZJREFUOE9jYECA
/1AmiIaxkaRxM2EasNEMdek9/9OCC/8n+Gf/L4qtx2rwfwcHh//t7e3/6+vr/3dPbP9fldiJYtjWKSf+
fz/1/39ORAVc3MM6AG7Y/46Ojv8wcH/d3/8qshr4XAWXa82ZDDbkf0NDA1j/lS0v/gc7xYAV3L9/HywG
oqFhAlcHEoeJgQ1o7Wz+//7+7//H593/nwj0K0gMpghZMYgN8i4ILFiwAB7Y/0tyK8Cazy5//D/UNRYs
oaCggOECbGJgF8R7Z4I1H5x37f/9bd//SwhLYYSBgbophtj6/oOQMAA5G2YAzJAQoEtAUQeiPx79///1
AUQsaCnp/V/cugWsB6sBl9e8+n9z4wewAhANMiTKKwUejSALQWpAlmEYAJIAuSoaqAGkGYRBfFDUggwB
4YllC/4fX3QHuwEgW0GaQZpAXvh7HhJl6cDUCHMVTDNWF+AKSPRwAqmDG5ALTKIw00EuAOGnu//9X9m1
G5b+MQIaxQCQE0HpHORkZAzKRBVJrWAv4HUBUrLEmQdwGQAApXIOrLlV970AAAAASUVORK5CYII=
</value>
</data>
<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="ImageList3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>580, 30</value>
</metadata>
<data name="ImageList3.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACy
PQAAAk1TRnQBSQFMAgEBQwEAAUUBAAEEAQABEAEAARABAAT/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
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAADdJREFUKFNjYMAE
/7GIgYWQJXCxURTCFOE1ESSJoQAmiI9GcSayQqzuR3cLVithOvH6DpsisBgAoKoc5C8W7oEAAAAASUVO
RK5CYII=
</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
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</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;Style15{}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:White;}Style5{}Style1{}RecordSelector{AlignImage:Center;BackColor:ActiveCaptionText;}Style6{}Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}Style26{}Footer{}Style9{}Editor{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:White;}Style27{}Style4{}FilterBar{BackColor:255, 255, 192;}EvenRow{BackColor:White;}Style11{}Style13{}Caption{AlignHorz:Center;Border:None,,0, 0, 0, 0;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style10{AlignHorz:Near;}Style8{}Style2{}Style14{}Normal{BackColor:White;}Style7{}Heading{Wrap:True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style3{}&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="16" 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;16&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=2.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/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABM
CgAAAk1TRnQBSQFMAgEBBQEAAQkBAAEEAQABEAEAARABAAT/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=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>686, 30</value>
</metadata>
<metadata name="ContextMenuDokument.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.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>
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>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1009, 30</value>
</metadata>
<metadata name="ImageList4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.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/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAG
CQAAAk1TRnQBSQFMAgEBAgEAAQQBAAEEAQABEAEAARABAAT/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=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1095, 30</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
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,783 @@
<?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="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="btnnew.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnopen.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>437, 17</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AABOEQAAAk1TRnQBSQFMAgEBCgEAAQ4BAAEEAQABEAEAARABAAT/AQkBAAj/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/AP8ABQAC
LREAAS0BNAEtKgABWgEtAQABhQHmBAcC5ggAAS0BNAEtKgACWgEtAQAH5ggAAy0qAAEtAloBLQEABAcC
5gEAAfkGAAHsLAACLQJaAS0BAAXmAQAB+QQAAuwD6AK4KQABLQFaAewFAALmAQAB+QQAAewF6AK4KAAC
7AHHBAkBAALmAQAB+QEAAfoBAAHsAegB/wLoBW0nAAHsAeEBxwEJA/IEAAH5AQAB+gEAAewB/wPoAc4D
1gFtJgAB7AHhAf8BxwUJAwAB+QEAAfoBAAHsAegC/wHoAc4B3QEJAdYBbSYAAewB/wHhB8cBAAL5AQAB
+gEAAewB/wHoAv8BzgLdAdYBbSYAAewB4QP/ASUBvQPyAQABIwIAAfoCAAHsAf8B6AH/Ac4C3QHWAQAB
FyUAAewB/wHhAv8BJQS9AQABIwH5AQAB+gIAAuwB/wHoA84CAAEXAQABMyQAAewB/wHhAf8EJQEAAyMC
+gQAA+wCAAKUARcBAAEzJAAC7AH/AeEB/wHhAS0CAAIHAfoBJwkABSMBMyYAA+wCAAX6AScB+goAAQIC
+gEzKgAIJwoABQIiAAItDgAQBxMAAS0BNAEtCgABWgEtAQABhQHmBAcC5gUAAwcLDwIHEwABLQE0AS0B
AAIHAuYFAAJaAS0BAAfmBQADBwEACbwBAAIHEwABLQE0AS0BAATmBQABLQJaAS0BAAQHAuYBAAH5AwAD
BwEACf8BAAIHAgAB+wEDAfsBAwH7AQMB+wEDAfsBAwH7AQMB+wQAAS0BNAEtAQACBwLmAQAB+QMAAi0C
WgEtAQAF5gEAAfkDAAMHAQAJ/wEAAgcCAAEDAfsBAwH7AQMB+wEDAfsBAwH7AQMB+wUAAy0BAATmAQAB
+QQAAS0BWgHsBQAC5gEAAfkDAAMHAQAJ/wEAAgcCAAH7AQMB+wEDAfsBAwH7AQMB+wEDAfsBAwUAAewF
AALmAQAB+QQAAuwBxwQJAQAC5gEAAfkBAAH6AQADBwEACf8BAAIHAQAB+wEDAfsBAwH7AQMB+wEDAfsB
AwH7AQMB+wMAAuwBxwQJAQAC5gEAAfkBAAH6AgAB7AHhAccBCQPyBAAB+QEAAfoBAAMHAQAJ/wEAAgcB
AAEDAfsBAwH7AQMB+wEDAfsBAwH7AQMB+wEDAwAB7AHhAccBCQPyBAAB+QEAAfoBAAHsAeEB/wHHBQkD
AAH5AQAB+gEAAwcBAAn/AQACBwEAAfsBAwH7AQMB+wEDAfsBAwH7AQMB+wEDAQAB+wEAAewB4QH/AccF
CQMAAfkBAAH6AQAB7AH/AeEHxwEAAvkBAAH6AQADBwEACf8BAAIHDgAB/wEAAewB/wHhB8cBAAL5AQAB
+gEAAewB4QP/ASUBvQPyAQABIwIAAfoBAAMHAQAG/wPvAQACBwIAAfsB/wH7Af8B+wH/AfsB/wH7Af8B
+wH/AfsBAAHsAeED/wElAb0D8gEAASMCAAH6AQAB7AH/AeEC/wElBL0BAAEjAfkBAAH6AQADBwEABv8B
AAEUAQABQwIHAgAB/wH7Af8B+wH/AfsB/wH7Af8B+wH/AfsB/wEAAewB/wHhAv8BJQS9AQABIwH5AQAB
+gIAAewB/wHhAf8EJQEAAyMC+gEAAwcBAAb/AQABvAEQAwcCAAH7Af8B+wH/CwAB7AH/AeEB/wQlAQAD
IwL6AgAC7AH/AeEB/wHhAS0CAAIHAfoBJwIAAwcBAAbxAQABDwQHEQAC7AH/AeEB/wHhAS0CAAIHAfoB
JwUAA+wCAAX6AScB+gEAAwcIDgUHEwAD7AIABfoBJwH6CAAIJwEAEAcXAAgnEQAQBxACFgABAwH/CAAQ
BwICDQABAgMAAWUB5gQHAuYJAAHsAQMB7AH/EwAFBwECAQACAwYAAgcBAAEDAQABAgMAAWUH5gcAAQMB
7AEDAewBAwH/CgAJAwEABAcBAgEAAgMGAAIHAQABAwEAAQIDAAFlAeYEBwLmAQAB+QQAAQMB7AEDAewB
AwHsAf8BAAHsBwAB+wEACQMBAAMHAQIBAAIDBgACBwEAAQMBAAECAwABZQfmAQAB+QQAAewBAwHsAQMB
7AEDAf8BAAHsBwAB/wH7AQAJAwEAAgcBAgEAAgMJAAEDAQABAgMAAWUB5gEHAeYCBwLmAQAB+QQAAQMB
7AEDAgAB7AH/AQAB7AcAAfsB/wH7AQAJAwEAAQcBAgEADAMBAAECAwABZQfmAQAB+QEAAfoCAAHsAQMB
7AIHAQMB/wEAAewBAAEGBQAB/wH7Af8B+wsAAQIBAAIDCAACAwEAAQIDAAFlAeYDBwHmAWUCAAH5AQAB
+gIAAQMB7AEDAewBAwHsAf8CAAEGBf4BAAH7Af8B+wH/AfsB/wH7Af8B+wEABQcBAgEAAQMBAAgHAQAB
AwEAAQIBAAH7AewBBwH7AewBBwLmAWUB5gEAAfkBAAH6AgAB7AEDAewBAwHsAQMB/wEAAW0G/gEAAf8B
+wH/AfsB/wH7Af8B+wH/AQAFBwECAQABAwEACAcBAAEDAQABAgIAAfsB7AH7AewBBwH/A2UC+QEAAfoC
AAEDAewBAwHsAQMB7AH/AQAB7AFtAf4EbQEAAfsB/wH7BwAFBwECAQABAwEACAcBAAEDAQABAgMAAfsB
BwHsAQcB/AIHAfkBIwIAAfoCAAHsAQMB7AEDAewBAwH/AQAB7AEAAm0DAAEHAwAIBwMAAQcBAgEAAQMB
AAgHAQABAwEAAQIE7AH7AQcB+wLsAvkBIwH5AQAB+gIAAQMB7AEDAewBBwH/AewBAAHsAgABbQMADQcC
AAEHAQIBAAEDAQAIBwMAAQIE+wMHA/sDIwL6AgAB7AEDAQcB/wHsAQAD7AYACAcBAAMHAQABBwEAAQcB
AgEAAQMBAAgHAQABBwEAAQIDAAHsAfsBBwHsAQcB+gMHAfoBJwMAAQcB/wHsAQAF7AYACQcDAAQHAQIO
AAECAgAB7AL7AewB+wHsAQcE+gEnAfoRABAHEAICAAH7AQAB+wHsAQAB+wHsBicBAAFCAU0BPgcAAT4D
AAEoAwABQAMAAUADAAEBAQABAQYAAQIWAAP/ggABDwHhAf8FAAEPAeEB/wUAAQMB4QH/BQABAwHgAX8F
AAEDAYABPwQAAYABAAGAAT8EAAGAAgABHwQAAYACAAEfBwABDwcAAQ8GAAGAAQMGAAGAAQMEAAGAAQAB
4AEDBAABgAEAAf4BAwQAAeABAAH/AYMEAAH+AQEB/wGDBQABDwIAAv8B4AEPAQABDwIAAv8B4AEPAQAB
AwIAAYABAAHgAQMBAAEDAgABgAEAAeABAwEAAQMCAAGAAQAB4AEDAYADAAGAAQAB4AEAAYAFAAGAAQAB
gAUAAYAVAAGABwABgAMAAYADAAGAAQABgAEAAYADAAHDAf8BgAEAAeADAAL/AeABAAH+AQECAAL/Af4B
AQH8AX8EAAHgAQ8B8AF/BAAB4AEPAcABfwQAAeABAwEAAR8EAAHgAQMBAAEfBAAB4AEDAQABFwQAAeAC
AAEHBAAB4AcAAeAHAAGABwABwAcAAeACAAEHBwABFwcAAR8EAAHgAgABHwQAAcACAAEfBAAB0gEBCw==
</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="cbAktiv.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="dtmutiertam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="dterstelltam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblErstelltam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblMutiertam.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="cboowner.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="lblBezeichnung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="TreeSelektion.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TreeSelektion.Locked" type="System.Boolean, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</data>
<data name="ImgListSteuerung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImgListSteuerung.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>191, 17</value>
</data>
<data name="ImgListSteuerung.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AADYCgAAAk1TRnQBSQFMAgEBBwEAAQkBAAEEAQABEAEAARABAAT/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/AP8AGgAH
7DgABwED7DQAAgEH+QIBAuwyAAEBC/kBAQHsBAABAQMAAQEpAAEBC/kBAQLsAwACAQEAAgEoAAEBA/kC
/wP5Av8D+QEBAewEAAEBAQABASkAAQED+QP/AfkD/wP5AQEB7AQAAwEpAAEBBPkF/wT5AQEB7AUAAQEq
AAEBBfkD/wX5AQEB7AQAAwEiAAHsBgABAQT5Bf8E+QEBAewEAAEBAQABASkAAQED+QP/AfkD/wP5AQEB
7AMAAgEBAAIBKAABAQP5Av8D+QL/A/kBAQQAAQEDAAEBKQABAQv5AQEzAAEBC/kBATQAAgEH+QIBNwAH
ATwAAQEBbT0AAQEB+QJtCQALbRAAAf8WAAEBA/kCbQcADG0GAAH/HwABAQX5Am0GAAEoCi4BbQcAAf8H
AAH/FQABAQL5Av8D+QJtBQABKAMuAf8GLgFtBwAB/wYAAf8VAAEBA/kC/wT5Am0EAAEoAi4D/wUuAW0I
AAH/BQAB/xQAAQEL+QJtAwABKAEuBf8ELgFtCQAB/wMAAf8UAAEBDfkCbQIAASgBLgL/AS4D/wMuAW0M
AAH/FQABAQX5Av8G+QFtAwABKAEuAf8DLgP/Ai4BbQsAAf8XAAEBBPkC/wX5AW0EAAEoBi4D/wEuAW0M
AAH/FwABAQP5Av8E+QFtBQABKAcuAv8BLgFtCQAB/wIAAf8YAAEBAvkC/wP5AW0GAAEoCC4B/wEuAW0I
AAH/BQAB/xcAAQEB+QL/AvkBbQcAASgKLgFtBwAB/wcAAf8XAAEBA/kBbQgACygGAAH/CgAB/xcAAQEB
+QFtPgABASgAAUIBTQE+BwABPgMAASgDAAFAAwABMAMAAQEBAAEBBQABgAEBFgAD/4EAAv8B+AEPAv8C
AAH+Af8B8AEDAv8CAAH8Af8BwAEBAv8CAAH4Af8BgAEBAe4B/wIAAfABfwGAAQAB5AH/AgAB4gF/AgAB
9QH/AgABxgE/AgAB8QH/AgAB/wE/AgAB+wH/AgAB/wGfAgAB8QH/AgAB/wGPAgAB9QH/AgAB/wHPAgAB
5AH/AgAB/wHnAQABAQHuAf8CAAH/AfMBgAEDAv8CAAH/AfkBgAEDAv8CAAH/Af0BwAEHAv8CAAL/AfAB
HwL/AgAC/wH+AX8G/wH8AT8B4AEDAf8B+QL/AfgBHwHAAQMB5wP/AfABDwHAAQMBwwHzAv8B4AEHAcAB
AwHDAecC/wHAAQMBwAEDAeEBxwL/AYABAQHAAQMB8AGPAv8CAAHAAQMB+AEfAv8BAAEBAcABAwH8AT8C
/wGAAQMBwAEDAfgBHwL/AcABBwHAAQMB8AGfAv8B4AEPAcABAwHBAccC/wHwAR8BwAEDAYMB4wL/AfgB
PwHAAQcBjwHxAv8B/AF/Bv8B/gX/FgAL
</value>
</data>
<data name="pnlDokumentvorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TreeDokVorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmenuTreeDokVorlagen.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</data>
<data name="ctmenuTreeDokVorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuVorlageSelect.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuVorlageInfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem10.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuKnotenSchliessen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuKnotenOeffnen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuAktKnotenSchliessen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuAktKnotenOeffnen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="pnlTrenner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnsuche.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="btnsuche.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
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGhJREFUOE/NU0EK
ACAI8+k+zZ9ZCEapiyCIAg/pWJsa0W9Hu6A5XB/KJ/3KzCUByGeCGwUqIhYTybCwqRkmejy9Dwv2cvCZ
SArMTwSgD2gP3N5qoeh+nDOaEsFCYMAEYIGSgkPcwy/aAP5wqQPBfWzxAAAAAElFTkSuQmCC
</value>
</data>
<data name="txtSuchbegriff.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblSuche.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlSelVorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="treeSelVorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmenuSelVorlagen.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 54</value>
</data>
<data name="ctmenuSelVorlagen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuselvorlagenVorlageLoeschen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ctmnuselVorlagenInfo.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlBeschreibung.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="ctmenuBeschreibung.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>543, 17</value>
</data>
<data name="ctmenuBeschreibung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem3.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="txtWichtigeHinweise.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="lblWichtigeHinweise.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="FontDialog1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>804, 17</value>
</data>
<data name="FontDialog1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlStruktur.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="TreeStruktur.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>510, 30</value>
</data>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AAA4CAAAAk1TRnQBSQFMAgEBAwEAAQQBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
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/wEAEAcg/xAABwcB
AAEHAQAD7AEAAgcg/xAABwcBAAEHAQAD7AEAAgcI/wEXF/8RAAEHBAABBwEAAQcBAAPsAQACBwj/AfkB
Fxb/EAAFBwMAAQcBAAPsAQACBwj/AvkB4wH0FP8QAAUHAgACBwEAAewBBwHsAQACBwL/Ab0FFgP5AeMU
/xIAAQcBAAEHAwABBwEAA+wBAAIHAv8BFgn5ARcT/xAABAcGAAPsAQACBwL/ARYK+QEXEv8QAAYHAgAB
BwIAAuwBAAIHAv8BFgn5AUYBBxL/EAAFBwMAAQcBAAPsAQACBwL/AZMFRgP5AUYBBxP/EAAGBwIAAQcC
AALsAQACBwL/AfMF8QL5AUYBBxT/EAAJBwUAAgcI/wH5AUYBBxX/EAAQBwj/AUYBBxb/EAAIBwQEBAcI
/wEHF/8QAAgHAQQCBwEEBAcg/xAACAcEBAQHIP8QAAFCAU0BPgcAAT4DAAEoAwABQAMAARADAAEBAQAB
AQUAAYAXAAP/lwAL
</value>
</data>
<data name="ctMenuStruktur.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>164, 54</value>
</data>
<data name="ctMenuStruktur.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuMoveItemUp.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuMoveItemDown.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="Splitter1.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="Panel3.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>292, 54</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>frmDokumentpaketdefinition</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
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,579 @@
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"
Me.DataSet1.Locale = New System.Globalization.CultureInfo("de-CH")
'
'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

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

View File

@@ -0,0 +1,363 @@
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 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
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 Excel.Application
intxls.Workbooks.Open(ExcelFile)
For Each s As 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,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,328 @@
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
Private 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,657 @@
<?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>444, 71</value>
</metadata>
<data name="ImageList4.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABi
IQAAAk1TRnQBSQFMAgEBHQEAASwBAAEsAQABEAEAARABAAT/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>264, 17</value>
</metadata>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACs
IAAAAk1TRnQBSQFMAgEBHAEAASwBAAEsAQABEAEAARABAAT/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, 92</value>
</metadata>
<metadata name="C1ContextMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>171, 92</value>
</metadata>
<metadata name="C1ContextMenu2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>311, 89</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/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAGFJREFUOE9jYKAR
+A80Fxsmyrr/fz/yY2AkA/EaAteI7AKYgcQYAjYgJycH5nyYbWBxcg3A5ir83oDaBFJEsmZkkynSDLcd
S3gQFZWDwwCwK5AClGino8T9gIYBxV4gys8An8SDS+5ffSIAAAAASUVORK5CYII=
</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
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA3SURBVChTY2DABP+xiIGFkCVwsVEUwhThNREkiaEAJoiP
RnEmskKs7kd3C1YrYTrx+g6bIrAYAKCqHOQvFu6BAAAAAElFTkSuQmCC
</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
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</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;Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}Style1{}RecordSelector{AlignImage:Center;}Style27{}Style6{}Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Style8{}Footer{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style4{}FilterBar{BackColor:255, 255, 192;}EvenRow{BackColor:White;}Style26{}Style13{}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style2{}Style14{}Normal{BackColor:Control;}Style7{}Heading{Wrap:True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}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;379&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, 379&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, 379&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>631, 17</value>
</metadata>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACe
BwAAAk1TRnQBSQFMAwEBAAEsAQABLAEAARABAAEQAQAE/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
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAA3SURBVChTY2DABP+xiIGFkCVwsVEUwhThNREkiaEAJoiP
RnEmskKs7kd3C1YrYTrx+g6bIrAYAKCqHOQvFu6BAAAAAElFTkSuQmCC
</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;Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style5{}RecordSelector{AlignImage:Center;}Style6{}Style8{}Footer{}Style13{}Style3{}Style12{}HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Editor{}Style4{}FilterBar{}EvenRow{BackColor:White;}Style11{}Style1{}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style2{}Normal{}Style7{}Heading{Wrap:True;BackColor:Control;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;AlignVert:Center;}Style10{AlignHorz:Near;}Group{AlignVert:Center;Border:None,,0, 0, 0, 0;BackColor:ControlDark;}&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>21, 17</value>
</metadata>
<data name="Notizlist.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="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
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMEAAAABGxlZnQFcmlnaHQDdG9w
BmJvdHRvbQAAAAAICAgIAgAAAGQAAABkAAAAZAAAAGQAAAABCgAAAAEAAAAJAwAAAAHz/////P///wAK
CgoB8v////z///8ACQ8AAAABDwAAAAYAAABkAAAAZAAAAGQAAABkAAAACw==
</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;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;}Style11{}Group{BackColor:ControlDark;Border:None,,0, 0, 0, 0;AlignVert:Center;}Caption{AlignHorz:Center;}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style9{}Style2{}Style14{}Normal{}Style7{}Heading{Wrap:True;AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;}Style10{AlignHorz:Near;}Style15{}&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>125, 17</value>
</metadata>
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>499, 17</value>
</metadata>
<metadata name="SaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>370, 17</value>
</metadata>
<metadata name="statustimer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>443, 92</value>
</metadata>
<metadata name="ImageList3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>550, 92</value>
</metadata>
<data name="ImageList3.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0yLjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACg
BwAAAk1TRnQBSQFMAwEBAAEsAQABLAEAARABAAEQAQAE/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,766 @@
<?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="ToolBarButton5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ToolBarButton6.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="ImageList2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList2.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>667, 17</value>
</data>
<data name="ImageList2.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AABMCgAAAk1TRnQBSQFMAgEBBAEAAQUBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
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/AP8AGAAB
7DIAAQMB/wsAAewB/wIHAf8DBwH/AQcnAAHsAQMB7AH/CwAB7Aj/AQcIAAHsBQAB7BYAAQMB7AEDAewB
AwH/CwAB7AH/AgcB/wMHAf8BBwcAAgMB7AMAAQMB7AYAAQcJAAEHBAABAwHsAQMB7AEDAewB/wEAAewJ
AAHsCP8BBwcAAewC+wEGAuwB+wEDBgABBwkAAQcEAAHsAQMB7AEDAewBAwH/AQAB7AkAAewB/wYHAf8B
BwgAAf8C+wEHAvsB7BUAAQMB7AEDAgAB7AH/AQAB7AgAAQcB7Aj/AQcIAAEDAvsCBwEDBwABBwHsBwAB
BwHsBAAB7AEDAewCBwEDAf8BAAHsAQABBgYAAQcB7AH/BAcB/wEHAf8BBwcAAewBAwP7AQcBAwEEBgAB
BwHsBwABBwHsBAABAwHsAQMB7AEDAewB/wIAAQYF/gH7AewBBwHsCP8BBwYAAQMF+wEHAvsBAwHsBAAB
BwHsBwABBwHsBAAB7AEDAewBAwHsAQMB/wEAAW0G/gEAAfsB7AEHAf8EBwP/AQcFAAHsA/8BBwL7AQcD
/wEDEwABAwHsAQMB7AEDAewB/wEAAewBbQH+BG0C7AMHAuwD/w0AAQcB+wHsCQACBwUAAgcFAAHsAQMB
7AEDAewBAwH/AQAB7AEAAm0DAAP7AQcB+wEHAvsB7AH/AewB/wsAAf8B+wHsFwABAwHsAQMB7AEHAf8B
7AEAAewCAAFtBAAB+wHsAfsB7AH7AewD/wHsDAACAwsAAewFAAHsBgAB7AEDAQcB/wHsAQAD7AYAAfsB
7AEAAfsB7AEAAfsE7AwAAgMYAAEHAf8B7AEABewJAAH7AewCAAH7OwAB+wHsKwABQgFNAT4HAAE+AwAB
KAMAAUADAAEgAwABAQEAAQEGAAEBFgAD/4EAAfwBfwHgAQME/wHwAX8B4AEDBP8BwAF/AeABAwH7Ae8B
hwHhAQABHwHgAQMB8QHPAYcB4QEAAR8B4AEDAfABDwGHAeEBAAEXAeABAwH4AQ8CgQEAAQcBwAEDAfgB
HwGAAQECAAHAAQMB8AEPAYABAQMAAQMB4AEDAYABAQIAAYABAwHAAQMBgAEBAwABAwH+AT8BwQGDAQAB
BwEAAQcB/gE/AeEBhwEAARcBgAEPAf4BfwHhAYcBAAEfASQBHwH+AX8B4QGHAQABHwHmBf8BAAEfAecF
/xYACw==
</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
AAC2DQAAAk1TRnQBSQFMAgEBCAEAAQkBAAEEAQABEAEAARABAAT/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/AP8ABQAw
/xAAJP8KAAL/EAAE/wHsAhQBEAHsAhQBEBf/AfABvAHwAd0D8wP/AQAC/wUAAewFAAHsBAAF/wEQARQB
7AH/ARABFAHsF/8CvAHwAbwB8QEZAfMD/wEAAv8EAAIDAewDAAEDAewEAAT/AUMBbQEUARAB7AJtARQB
7Bb/ArwBIAEAAe0DAAH0Af8BAAL/BAAB7AL7AQYC7AH7AQMEAAP/AUMBEgIUAQABFQFDARICFAHsBv8B
AAEDAQAB/wEAAiII/wEHArsBvAHwAbwB8QEZAfMB/wEAAv8FAAH/AvsBBwL7AewEAAP/AW0B9wHsARQB
bQEUARAB9wPsBv8BAAE3AfsBAwE3AfsBIgj/AQcBkwG1A7wB8AHdAvMBAAL/BQABAwL7AgcBAwUAA/8B
bQH3AewBbQEQARQBQwH3A+wH/wEiAfsDNwEACP8BvAK2ArsBvAHwAbwB8QEZAQAC/wQAAewBAwP7AQcB
AwEEBAAD/wFtAfcC7AEVAewBbQH3A+wG/wEAATcB+wIDAfsBIgj/AbwBuwEBAQABEgQAAbwBAAL/AwAB
AwX7AQcC+wEDAewCAAP/AW0B9wPsAf8BbQH3A+wG/wEiAgMB+wE3AgMBAAf/AfIBvAG7ArYCuwG8AfAB
vAEAAv8CAAHsA/8BBwL7AQcD/wEDAgAD/wFtAfcD7AH/AW0B9wPsCP8BAAE3ASIK/wHxAfABvAG7ApMB
tQO8AQAC/wcAAQcB+wHsBgAD/wFDARICFAHsAf8BQwESAhQB7An/ASIBAAr/AfMB8QK8AbsCtgK7AbwB
AAL/BwAB/wH7AewGAAP/BOwBBwH/BOwBBxX/AfQB8wEgBAAB7wEUAbwBAAL/BwACAwcAJf8C8wO8AewB
HAG1AQAC/wcAAgMHADD/EAAw/xAAEAcgAAn/AewBAAHsBP8HBwEAAQcBAAPsAQACByAAB/8B7AEAAv8B
7AT/BwcBAAEHAQAD7AEAAgcHMAEABzARAAX/AewBAAT/AQAB7AP/AQABBwQAAQcBAAEHAQAD7AEAAgcB
MAWgAgABmgGgBJoBMAcAAf8B+wgAA/8B7AEABf8B/AH/AewD/wUHAwABBwEAA+wBAAIHATABwwSgAQAE
oAOaATAFAAH/AQAB+wH/AfsB/wYAAv8BAAX/AfwB/wH8Af8BAAHsAv8FBwIAAgcBAAHsAQcB7AEAAgcB
MAHDA6ABAAEgAQACoAGaAaACmgEwBAAB+wIAAf8B+wH/AfsB/wH7BAAC/wHsA/8B/AH/AfwC/wH8Af8B
7AL/AgABBwEAAQcDAAEHAQAD7AEAAgcBMAHDA6ABAAIgAgADoAGaATADAAH/AQAB/wEAAfsB/wH7Af8B
+wH/AfsB/wIAAf8B7AEHAQAC/wH8Av8B/AH/AfwB/wEAAewB/wQHBgAD7AEAAgcBMAHDAqABAAP5AiAB
AAGgAZoBoAEwAgAB+wEAAv8BAAH/AfsB/wH7Af8B+wH/AfsB/wEAAf8DBwP/AfwB/wH8Av8B/AH/AewB
/wYHAgABBwIAAuwBAAIHATABwwH0AaABAAEXBPkBIAEAAaABmgEwAwAD/wIAAf8B+wH/AfsB/wH7Af8B
+wEAAf8BAAIHAQAC/wH8Av8B/AH/AfwB/wEAAewFBwMAAQcBAAPsAQACBwEwAcMBoAEAARcCAAEXAfkE
AAGgATAFAAP/AgAB+wH/AfsB/wH7Af8BAAH/AgACBwX/AfwC/wH8Af8B7AYHAgABBwIAAuwBAAIHATAB
9AHDAgACoAIABKABmgEwAwAB+wH/AgAC/wEAAf8B+wH/AfsB/wH7AQAD/wEAAQcBAAH/AwcB/wH8A/8B
AAkHBQACBwEwAvQEwwWgAZoBoAEwBAAB+wH/AfsBAAL/AgAB+wH/AfsB/wIAA/8BAAEHAf8CBwf/EAcB
MAeaBzAGAAH/AfsBAAL/AwAB/wH7AQAC/wEAAv8CAAL/AQAB7AEHAv8BAAH/CAcEBAQHAQABMAH0AsMC
oAEwEgAB/wH7BAAE/wEAAf8BAAH/AQAB/wEHAwAC/wgHAQQCBwEEBAcCAAUwGQAG/wEABP8BBwEAA/8I
BwQEBAcgABD/AUIBTQE+BwABPgMAASgDAAFAAwABMAMAAQEBAAEBBQABgAEBFgAD/4cAAv8GAAL/BgAB
+wHvBgAB8QHPBgAB8AEPBgAB+AEPBgAB+AEfBgAB8AEPBgAB4AEDBgABwAEDBgAB/gE/BgAB/gE/BgAB
/gF/BgAB/gF/BgAC/wYAAv8CAAT/BAABgAEAAv8GAAH4Af8GAAHwAT8GAAHgAQ8GAAHAAQMGAAGAFwAB
gAcAAYAHAAHABgABAQHgBQABgAH/AfkFAAHBAv8BzwQABP8YAAs=
</value>
</data>
<data name="TVStruktur.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>281, 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="MnuDokumenterstellen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem8.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuAddFavoriten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuShowFavoriten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuUnExpand.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuExpand.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuUnexpandsel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuExpandSel.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem5.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem6.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem7.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ImageList4.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>455, 32</value>
</data>
<data name="ImageList4.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AACCPQAAAk1TRnQBSQFMAgEBQwEAAUUBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAASABAQIAAQEBAAEIBgABSBgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQAB
wAHcAcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQAD
QgEAAzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB
/wEzAwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgAC
ZgIAAWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwB
MwIAAcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMB
AAFmAQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB
/wEAATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMB
AAEzAZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkB
AAEzAswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYB
AAEzAQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYB
MwGZAQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMB
AAFmAZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQAB
ZgHMAf8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkB
MwGZAQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYC
AAGZAWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkB
zAEAApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgAB
mQH/ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwB
AAGZAQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwB
ZgIAAcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkB
ZgEAAcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB
/wIAAcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8B
AAGZAQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYB
MwEAAcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkB
AAH/AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8B
AAL/ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8B
AAL/AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD
+AEAAfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP//wD/AP8A/wAn
AA7sPgAC7BgAASkYAA37AQAB7BYAAYUBAAEpAjcWAAX7AgABKQX7AQAB7BQAAQEBAAGFAeYBKQQ3FAAF
+wIAASkE+wEAAuwSAAEnAREBAQH5AYUB5gEpATcB9wM3FAAL+wEAAewSAAFtAScB+gEBAfkBhQHmASkC
NwL3ATcUAAX7AQAE+wEAAewTAAFtAScB+gEBAfkBhQHmASkENwH3FQAE+wEABPsBAAHsFAABJwH6AQEB
+QGFAeYBKQE3AvcCNxUAA/sDAAL7AQAB7BUAAScB+gEBAfkBhQHmASkDNwH3ATcWAAL7AwAC+wEAAewV
AAEnAfoBAQH5AYUB5gIpAjcDKRUAAvsDAAH7AQAB7BYAAScB+gEBAfkBhQLmAikBNwEpATcXAAL7AQAC
+wEAAewWAAEnAfoCAQH5AoUB5gMpGAAE+wEAAewXAAInAfoCAQH5A4UbAAP7AQAB7BgAAicB+gMBHQAC
+xwAAyeKAAFlAeYEBwLmCAABpgHdBAcB3QEHFwADMAUABzACAAFlB+YIAAGmBt0BBw8AASkHAAEwAqAB
hQPWAQABmgGgBJoBMAIAAWUB5gQHAuYBAAL5BQABpgHdBAcB3QEHAQABlAEHCgABhQEAASkCWQUAATAB
wwGgAYUB3QEJAdYDAAGgA5oBMAIAAWUH5gEAAvkFAAGmBt0BBwEAAZQBBwgAAQEBAAGFAd0BKQRZAwAB
MAHDAaABhQLdAdYBAAGUAQABmgGgApoBMAIAAWUB5gEHAeYCBwLmAQAC+QUAAaYB3QEHAd0CBwHdAQcB
AAGUAQcGAAEnAREBAQGUAYUB3QEpAVkB9wNZAgABMAHDAaABhQLdAdYBAAGUAwABoAGaATACAAFlB+YB
AAL5AQAC+gIAAaYG3QEHAQABlAEHAQABngEHAgABbQEnAZ4BAQGUAYUB3QEpAlkC9wFZAgABMAHDAaAF
hQGUAQABngEAAZoBoAEwAgABZQHmAwcB5gFlAgAC+QEAAvoCAAGmAd0DBwHdAaYCAAGUAQcBAAGeAQcC
AAFtAScBngEBAZQBhQHdASkEWQH3AgABMAHDA6ABIwK9AZQBAAGeAQABoAGaATACAAFlBeYBZQHmAQAC
+QEAAvoCAAGmBd0BpgHdAQABlAEHAQABngEHAwABJwGeAQEBlAGFAd0BKQFZAvcCWQIAATABwwOgBSMB
ngEAAZoBoAEwAgAIZQP5AQAC+gIAB6YBhQKUAQcBAAGeAQcDAAEnAZ4BAQGUAYUB3QEpA1kB9wFZAgAB
MAH0AcMEoAECAsIBngEAAaABmgEwBQABIwH5AwcB+QEjAgAC+gUAASMBlAMHAZQBIwIAAZ4BBwMAAScB
ngEBAZQBhQHdAikCWQMpAQABMAL0BMMFAgGaAaABMAUAASMF+QEjAfkBAAL6BQABIwWUASMBlAEAAZ4B
BwMAAScBngEBAZQBhQLdAikBWQEpAVkCAAEwB5oHMAUACCMD+gUACCMCngEHAwABJwGeAgEBlAKFAd0D
KQQAATAB9ALDAqABMA8AAScB+gMHAfoBJwkAAQIBngMHAZ4BAgQAAicBngIBAZQDhQcABTAQAAEnBfoB
JwH6CAABAgWeAQIBngQAAicBngMBHgAIJwgACAIFAAMnOwAB7D8AAewCGgEHAewBBwEaAZoEejQAAewB
wwEaAQAB7AEAARoCmgN6NAAB7AKgAQcB7AEHAxoBmgJ6NAAB7AKgAQAB7AEAAZoDGgKaNAAB7AKgAQcB
7AEHAaADGgKaNAAB7AKgAQAB7AEAAaAEGgGaNAAB7AHDAaABBwHsAQcBoAGaBBo0AAHsAcMBoAEAAewB
AAOgAxo0AAHsAcMBoAEHAQABkgOgAZoCGjQAAewBwwGgAewB7wEABqA0AAHsAsMB7AH2AQAGoDQAAewC
wwHsAQcBAAF6AqA3AAHsA8MB7ALDAqAB7AGgNQAB7AfDAaAB7DYACuz/AP8A/wD/AFkADvsyAAH7DAAB
+wkAAiABAAIgAQACIAgAAiABAAIgAQACIAQAAe8BvAHvAbwE7wUAAfsCAAn7AQAB+wkAAiABAAIgAQAC
IAgAAiABAAIgAQACIAQAAf8EvAHvAbwB7wUAAfsDAAL7BAAC+wEAAfslAAL/Ae8BvAHvAbwC7wUAAfsE
AAL7BgAB+wIAAfwBAAH8AQAB/AEAAfwBAAH8BgAKAgoAAf8BvAH/BLwB7wUAAfsBAAL7AQAC+wIAAvsC
AAH7AQAB/Aj/BwABAgj/AQIKAAL/AbwB/wHvAbwB7wG8BQAB+wEAAvsCAAX7AgAB+wIAAf8BAAH8Af8B
/AEAAv8B/AYAAQIB/wgCCgAB/wG8Af8BvAH/ArwB7wUAAfsBAAL7AgAC+wEAAvsCAAH7AQAB/AH/AfwB
AAEHAQAB/AEHAf8HAAECAf8DAgEHBAIKAAL/AbwB/wkAAfsCAAL7AQAC+wUAAfsCAAH/AQAB/AEAAfwB
AAH8Af8B/AYAAQIC/wECAQcDAgH/AQIKAAH/AbwB/wG8AQABvALvBQAB+wMAAvsBAAL7AQAC+wEAAfsB
AAH8Af8B/AH/AfwBAAH/AQABBwcAAQIB/wECAQcDAgL/AQIKAAT/AQAB/wG8Ae8FAAH7BAAH+wEAAfsC
AAH8AQAB/wEAAfwB/wH8AQAB/AYAAQIB/wEHBQIB/wECCgAE/wEAAf8BvAYAAfsMAAH7AQAB/AEAAfwB
AAH8AQAB/AEAAfwHAAECAf8CAgL/AgIB/wECFwAB+wwAAfsCAAj/AfwGAAECCP8BAhcADvsBAAH8AQAB
/AEAAfwBAAH8AQAB/AcACgJaAAEHAgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEHCgAD
7CgAAQcCAAEHAQABBwEAAQcCAAEHCAABBwT/AQcKAAfvAwAB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB
/AEAAfwBAAH8AQAB/AsAAewBAAH/AQAD/wHsAQcJAAH/BQAB7wIAAfwI/wcAAfwI/w0AAQcH/wHsCAAC
/wG8Af8BvAH/Ae8DAAH/AQAB/AH/AfwBAAL/AfwHAAH/AQAB/AH/AfwBAAL/AfwMAAH/AQAC/wIAAv8B
7AIABe8BAAH/BQAB7wIAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gIAAfwB/wH8AQABBwEAAfwBBwH/AQAE
1ggAAf8BAAL/AwAB/wEHAgAB/wUAAv8BvAH/AbwB/wHvAwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHWAwAB
/wEAAfwBAAH8AQAB/AH/AfwD/wHWCAABBwP/AQAD/wHsAgAB/wG8Af8BvAH/AQAB/wIAAbwFAAH8Af8B
/AH/AfwBAAH/AQABBwEAAdYC/wHWAgAB/AH/AfwB/wH8AQAB/wEAAQcBAAHWAv8B1gcAAuwB/wEAAf8B
AAH/AewB/wEAAewBAAH/BQAC/wG8Af8BAAH/BAAB/AEAAf8BAAH8Af8B/AEAAfwB1gEHAf8B1gMAAfwB
AAH/AQAB/AH/AfwBAAH8AdYBBwH/AdYFAAIgAgAB7AX/AewDAAH/AbwB/wG8Af8BAAT/BQAB/AEAAfwB
AAH8AQAB/AEAAfwBAALWAf8B1gIAAfwBAAH8AQAB/AEAAfwBAAH8AQAC1gH/AdYEAAFBAiAEAAHsAQcB
7AUAAf8CAAH/DAAI/wH8Af8B1gEHAdYDAAj/AfwB/wHWAQcB1gMAAeMCQQQgAewDAAHsBAAB/wG8Af8B
vAEAAf8JAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D1gIAAfwBAAH8AQAB/AEAAfwBAAH8AQAB/wPWAgAD
4wNBBSAGAAT/DwAK1gYACtYDAATjAkEDIBoAAdYI/wHWBgAB1gj/AdYEAAPjHwAK1gYACtYFAALjPwAB
BwIAAQcBAAEHAQABBwIAAQc1AAEHAgABBwEAAQcBAAEHAgABBzUAAQcCAAEHAQABBwEAAQcCAAEHEQAK
AgYACgIGAAoCBwAB/AEAAfwBAAH8AQAB/AEAAfwGAAECCP8BAgYAAQII/wECBgABAgj/AQIGAAH8CP8H
AAECAf8IAgYAAQIB/wgCBgABAgH/CAIHAAH/AQAB/AH/AfwBAAL/AfwGAAECAf8DAgEHBAIGAAECAf8D
AgEHBAIEmAIAAQIB/wMCAQcEAgSYAgAB/AH/AfwBAAEHAQAB/AEHAf8HAAECAv8BAgEHAwIB/wECBgAB
AgL/AQIBBwMCAf8BAgP/AZgCAAECAv8BAgEHAwIB/wECA/8BmAMAAf8BAAH8AQAB/AEAAfwB/wH8BgAB
AgH/AQIBBwMCAv8BAgYAAQIB/wECAQcDAgL/AQIEmAIAAQIB/wECAQcDAgL/AQIEmAIAAfwB/wH8Af8B
/AEAAf8BAAEHBwABAgH/AQcFAgH/AQIGAAECAf8BBwUCAf8BAgSYAgABAgH/AQcFAgH/AQIEmAMAAfwB
AAH/AQAB/AH/AfwBAAH8BgABAgH/AgIC/wICAf8BAgYAAQIB/wICAv8CAgH/AQICmAH/AZgCAAECAf8C
AgL/AgIB/wECApgB/wGYAgAB/AEAAfwBAAH8AQAB/AEAAfwHAAECCP8BAgYAAQII/wECAZgC/wGYAgAB
Agj/AQIBmAL/AZgDAAj/AfwGAAoCBgAKAgKYAf8BmAIACgICmAH/AZgCAAH8AQAB/AEAAfwBAAH8AQAB
/BsAAZgB/wKYAv8CmAH/AZgGAAGYAf8CmAL/ApgB/wGYJgABmAj/AZgGAAGYCP8BmCYACpgGAAqYJgAB
BwIAAQcBAAEHAQABBwIAAQcRAAHsAwABBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgAB
BxEAAewEBwIAAQcBAAEHAQABBwIAAQcVAAEHAgABBwEAAQcBAAEHAgABBwQAAewBBwH7AgcBAAPsBAAB
7AP/AQcCAAEHAQABBwEAAQcCAAEHAgAB/AEAAfwBAAH8AQAB/AEAAfwHAAH8AQAB/AEAAfwBAAH8AQAB
/AkAAewD/wH7Af8BAAH7AQcC7AIAAewB/wQHAf8DBwH/AQcEAAH8CP8HAAH8CP8LAAHsAfsD/wH7AQAB
/wH7AQcB7AEAAewK/wEHBQAB/wEAAfwB/wH8AQAC/wH8BwAB/wEAAfwB/wH8AQAC/wH8CgAB7AL/AfsC
/wEAAf8CAAHsAQAB7AH/BAcB/wMHAf8BBwQAAfwB/wH8AQABBwEAAfwBBwH/AQAE1gIAAfwB/wH8AQAB
BwEAAfwBBwH/AQAE1gcAAewD/wH7AewBAAH/AfsBBwEAAewK/wEHBQAB/wEAAfwBAAH8AQAB/AH/AfwD
/wHWAwAB/wEAAfwBAAH8AQAB/AH/AfwD/wHWCQAB+wP/AfsC/wEHAQAB7AH/CAcB/wEHBAAB/AH/AfwB
/wH8AQAB/wEAAQcBAAHWAv8B1gIAAfwB/wH8Af8B/AEAAf8BAAEHAQAB1gL/AdYHAAIBAQAB/wH7A/8B
+wEHAQAB7Ar/AQcFAAH8AQAB/wEAAfwB/wH8AQAB/AHWAQcB/wHWAwAB/AEAAf8BAAH8Af8B/AEAAfwB
1gEHAf8B1gMAAgEDAAEBAQAD/wH7Av8BBwEAAewB/wIHAf8FBwH/AQcEAAH8AQAB/AEAAfwBAAH8AQAB
/AEAAtYB/wHWAgAB/AEAAfwBAAH8AQAB/AEAAfwBAALWAf8B1gMAAfkBAQEAAfkBAAEBAwAD/wH7AQcB
AAHsCv8BBwUACP8B/AH/AdYBBwHWAwAI/wH8Af8B1gEHAdYDAAL5AgAC+QEAA/8B+wL/AQcBAAHsAf8C
BwH/BQcB/wEHBAAB/AEAAfwBAAH8AQAB/AEAAfwBAAH/A9YCAAH8AQAB/AEAAfwBAAH8AQAB/AEAAf8D
1gkAAv8B+wP/AfsBBwEAAewI/wsACtYGAArWBwAB7AH/AfsD/wH7Av8BBwEAAewB/wYHAf8B7AH/CQAB
1gj/AdYGAAHWCP8B1gcACuwBAAHsCP8B7AoACtYGAArWEgAK7E4AAcgBAAHdAQAByAsAAS0BAAHCAQAB
LQsAASUBAAGaAQABJRoAAcgF3QHICQABLQXCAS0JAAElBZoBJRgAAsgB3QHIAQAByAHdCQACLQHCAS0B
AAEtAcIJAAIlAZoBJQEAASUBmgQAAfwBAAH8AQAB/AEAAfwBAAH8DAAByALdAQAB7AEAAt0ByAcAAS0C
wgEAAewBAALCAS0HAAElApoBAAHsAQACmgElAQAB/Aj/DQACyAHdAcgBAAHIAd0JAAItAcIBLQEAAS0B
wgkAAiUBmgElAQABJQGaBAAB/wEAAfwB/wH8AQAC/wH8DQAByAXdAcgJAAEtBcIBLQkAASUFmgElAgAB
/AH/AfwBAAEHAQAB/AEHAf8OAALIAQAB3QEAAcgKAAItAQABwgEAAS0KAAIlAQABmgEAASUEAAH/AQAB
/AEAAfwBAAH8Af8B/AgAAcgBAAHdAQAByAIABMgFAAEtAQABwgEAAS0CAAQtBQABJQEAAZoBAAElAgAE
JQMAAfwB/wH8Af8B/AEAAf8BAAEHCAAByAXdAcgJAAEtBcIBLQkAASUFmgElCQAB/AEAAf8BAAH8Af8B
/AEAAfwGAALIAd0ByAEAAcgB3QkAAi0BwgEtAQABLQHCCQACJQGaASUBAAElAZoJAAH8AQAB/AEAAfwB
AAH8AQAB/AcAAcgC3QEAAewBAALdAcgHAAEtAsIBAAHsAQACwgEtBwABJQKaAQAB7AEAApoBJQgACP8B
/AYAAsgB3QHIAQAByAHdCQACLQHCAS0BAAEtAcIJAAIlAZoBJQEAASUBmgkAAfwBAAH8AQAB/AEAAfwB
AAH8CAAByAXdAcgJAAEtBcIBLQkAASUFmgElGQACyAEAAd0BAAHICgACLQEAAcIBAAEtCgACJQEAAZoB
AAElHAAEyAwABC0MAAQlLAABLQFVAS0NAAEtAVUBLSEAAewH/wQAAS0BVQEtDQABLQFVAS0SAAEqAQAB
mgEAASoKAAHsB/8EAAEtAVUBLQ0AAS0BVQEtEQABKgWaASoJAAHsB/8EAAMtAgAH/wQAAy0CAAf/BwAC
KgGaASoBAAEqAZoMAAb/BAAB7AUABv8EAAHsBQAG/wcAASoCmgEAAewBAAKaASoDAAa1AQAG/wIAAuwF
4QIABf8CAALsAugB7wH/Ae8CAAX/BwACKgGaASoBAAEqAZoFAAS1AwAG/wIAAewB4QH/BeEBAAX/AgAB
7APoAe8B/wHvAf8BAAX/CAABKgWaASoEAAO1AQACtQEABv8BAAHsAeEB/wfhAQAE/wEAAewB6AH/AugB
7wH/Ae8C/wEABP8IAAIqAQABmgEAASoFAAa1AQAE/wHsAgAB7AH/AeEB/wbhAQAE/wEAAewB/wPoAe8B
/wHvAv8BAAT/AwABKgEAAZoBAAEqAgAEKgUABbUDAAP/AewB/wEAAewB4QH/B+EBAAT/AQAB7AHoAv8B
6AHvAf8B7wL/AQAE/wIAASoFmgEqCgAHtQEABewBAAHsA/8B4QH/BOEBAAL/AewCAAHsAf8B6AL/Ae8B
/wHvAv8BAAL/AewCAAIqAZoBKgEAASoBmgsAB7UBAAH/AewFAAHsA/8B4QH/AeEB/wEAA/8B7AH/AgAB
7AH/AegB/wHvAf8B7wH/AQAD/wHsAf8BAAEqApoBAAHsAQACmgEqCQAEtQEAArUBAAH/AewB/wQAAuwB
/wHhAf8B4QH/AgAF7AIAAuwB/wHoAe8B/wHvAgAF7AEAAioBmgEqAQABKgGaCwAEtQEAAbUBAATsBgAD
7AIAA/8B7AcAA+wCAAP/AewFAAEqBZoBKgoABrUNAAHsBf8B7AH/CAAB7AX/AewB/wQAAioBAAGaAQAB
Kh4ACOwIAAjsBgAEKjwAAS0BVQEtDQAB7AUHAewJAAHsBQcB7AkAAewFBwHsCQABLQFVAS0NAAGvBbYB
rwHsCAABLQVaAS0B7AgAASUFTQElAewIAAEtAVUBLQ0AAa8FtgKvAewHAAEtBVoCLQHsBwABJQVNAiUB
7AcAAy0NAAGvBbYDrwHsBgABLQVaAy0B7AYAASUFTQMlAewGAAHsDwABrwW2AQADrwHsBQABLQVaAQAD
LQHsBQABJQVNAQADJQHsAwAC7AThAW0CAAS1BAAC7AX/AgADrwQAAuwF/wIAAy0EAALsBf8CAAMlAwAB
7AXhAW0BvAEAArUFAAPsBf8BAAEHAQACrwMAA+wF/wEAAQcBAAItAwAD7AX/AQABBwEAAiUCAAHsAeEB
/wThAW0CvAIAArUDAALsAQcF7AIHAf8BAAGvAwAC7AEHBewCBwH/AQABLQMAAuwBBwXsAgcB/wEAASUC
AAHsAf8F4QFtArwBAAO1AwAB7AEHAewDBwLsAQcD/wQAAewBBwHsAwcC7AEHA/8EAAHsAQcB7AMHAuwB
BwP/AwAB7AHhA/8C4QFtArwBAAK1BAAB7AH/AQcB7AMHAQAF7AMAAewB/wEHAewDBwEABewDAAHsAf8B
BwHsAwcBAAXsAgAB7AH/AeEC/wLhAW0CvAEABLUDAAHsAf8BBwHsAQcBAAHsBP8BBwQAAewB/wEHAewB
BwEAAewE/wEHBAAB7AH/AQcB7AEHAQAB7AT/AQcDAAHsAf8B4QH/AuEBbQG8AQAFtQQAAewB/wEHAgAB
7AT/AQcFAAHsAf8BBwIAAewE/wEHBQAB7AH/AQcCAAHsBP8BBwMAAuwB/wHhAf8B4QFtAgACtQEAArUF
AAHsAf8DAAXsBgAB7AH/AwAF7AYAAewB/wMABewFAAPsAgAEtQEAAbUHAAHsDwAB7A8AAewSAAa1TAAB
EgGUBJMxAAETAeoEEgHqAW4BAAESAZQEkxMAAewFBwHsCQAB7AUHAewHAAHqAbcDlAG3AZMBbgEAARIB
lASTEwABMQVZATEB7AgAAeYF1gHmAewGAAESAZQCkwG3AQ4DAAESAZQEkwEABtcBAAb0BQABMQVZAjEB
7AcAAeYF1gLmAewFAAESAZQBkwGUARIBAAESAb0BAAHqAbcBlAOTAQAE1wUABPQFAAExBVkDMQHsBgAB
5gXWA+YB7AQAARIBlAGTAbcBAAESArcBAAEQAhIBbgKTAQAD1wEAAtcBAAL0AQAD9AUAATEFWQEAAzEB
7AUAAeYF1gEAA+YB7AMAARIBlAKTArcBlAG3ARMBEgFtAQABEgG3AZMBAAbXAQAG9AQAAuwF/wIAAzEE
AALsBf8CAAPmAwABEgGUApMBtwETARIBEwK9AW0BAAERAY4BlAEABdcDAAX0AwAD7AX/AQABBwEAAjED
AAPsBf8BAAEHAQAC5gMAARIBlAGTAbcBDgQAAREEAAGTAQAF1wEAB/QDAALsAQcF7AIHAf8BAAExAwAC
7AEHBewCBwH/AQAB5gMAAesBkwGUAUQBAAEQAf8B8QIAARAB/wHxAwAF1wEAB/QDAAHsAQcB7AMHAuwB
BwP/BAAB7AEHAewDBwLsAQcD/wQAAewB8wGTARIBAAH/AQAB/wIAAf8BFAH/AfcCAAPXAQAB1wEAAvQB
AAT0AwAB7AH/AQcB7AMHAQAF7AMAAewB/wEHAewDBwEABewDAAHsAf8BtwFEAQAB8QH/AfECAAHsAv8D
AAPXAQAC1wL0AQAE9AQAAewB/wEHAewBBwEAAewE/wEHBAAB7AH/AQcB7AEHAQAB7AT/AQcDAAHsAv8B
twEQCQABkwEABtcH9AUAAewB/wEHAgAB7AT/AQcFAAHsAf8BBwIAAewE/wEHAwABFALsAe0BbgMAAY4B
twESAQABEQEHAf8UAAHsAf8DAAXsBgAB7AH/AwAF7AkAAbwB8wG9ARoBvQT/FQAB7A8AAewKAAH/AfIB
AAH/ARUBQwr/WgAB6gW2CgAB6gW2BgAB7AEwCgAC+QIAAfkKAAEUAW0E6gFtAesBAAHqBbYBAAEUAW0E
6gFtAesBAAHqBbYFAAHsATABegwAArwLAAFtAd0DtgHdAbUB6wEAAeoFtgEAAW0B3QO2Ad0BtQHrAQAB
6gW2BAAC7AF6AQAC+QkAArwCAAFtCQAB6gO2Ad0BDwMAAeoFtgEAAeoDtgHdAQ8DAAHqBbYBAAHsAjAB
7AF6AQACvAsAA7wBAAH/AQAB7AYAAeoDtgESAQAB6gHeAQABbQHdBLYBAAHqA7YBEgEAAeoB3gEAAW0B
3QS2AQABMAN6AQACvAIAAW0GAALsBLwBAAL/BwAB6gK2AdcBAAESAt0BAAEQAhIBjQK2AQAB6gK2AdcB
AAESAt0BAAEQAhIBjQK2AewBegEAAnoCAAO8AQABVgEAAVYDAALsAQAEvAMAAVABAAFQAwAB6gO2AdcB
3QG2Ad0CEgFtAQAB6gHXAbYBAAHqA7YB1wHdAbYB3QISAW0BAAHqAdcBtgEAA3oBMAEABLwBAAJWBAAC
7AEAArwCAAP/AQABvAQAAeoDtgHdARIB6gESAt4BbQEAAREB9wG2AQAB6gO2Ad0BEgHqARIC3gFtAQAB
EQH3AbYCAAHsAgAB7AEABLwGAAPsAQACvAEAA/8BAAG8BAAB6gK2Ad0BDwQAAUMEAAG1AQAB6gK2Ad0B
DwQAAUMEAAG1BAAC7AEAArwCAAP/BAAF7AEABP8BAAG8AwAB6wK2ARIBAAEQAf8B8QIAARAB/wHxAwAB
6wK2ARIBAAEQAf8B8QIAARAB/wHxBgAD7AEAArwBAAP/CgAC/wIAArwDAAHsAfMBtgHqAQAB/wEAAf8C
AAH/ARQB/wH3AgAB7AHzAbYB6gEAAf8BAAH/AgAB/wEUAf8B9wYABewBAAT/BgADvAEAAv8BAAO8AgAB
7AH/Ad0BEgEAAfEB/wHxAgAB7AL/AwAB7AH/Ad0BEgEAAfEB/wHxAgAB7AL/DQAC/wkABbwBAAG8BAAB
7AL/AdcBEAkAAbYBAAHsAv8B1wEQCQABtggAA7wBAAL/DQAB7AK8AwABFAPsAa4DAAG1Ad0B6gEAAREB
BwH/AQABFAPsAa4DAAG1Ad0B6gEAAREBBwH/CQAFvAsABewJAAG8AfQB8gHxAd4E/wcAAbwB9AHyAfEB
3gT/IAAB/wHyAQAB/wEVAUML/wHyAQAB/wEVAUMK/xQAAQcCAAEHAQABBwEAAQcCAAEHNQABBwIAAQcB
AAEHAQABBwIAAQcYAAL/GwABBwIAAQcBAAEHAQABBwIAAQcWAAL/AgAC/wUACgIGAAoCDAAB7AwAAfMB
/wIAAv8CAAL/AwABAgj/AQIGAAECCP8BAgwAAewDAwYAAewC/wIAAv8CAAL/AgAB/wIAAQIB/wgCBgAB
AgH/CAIMAAHsAf8B7AEDCQAB8wH/AgAC/wIAAv8DAAECAf8DAgEHBAIEmAIAAQIB/wMCAQcEAgSYCAAB
7AH7AewBAwYAAewC/wIAAv8CAAL/AgAB/wIAAQIC/wECAQcDAgH/AQID/wGYAgABAgL/AQIBBwMCAf8B
AgP/AZgIAAHsAf8B7AEDCQAB8wH/AgAC/wIAAv8DAAECAf8BAgEHAwIC/wECBJgCAAECAf8BAgEHAwIC
/wECBJgHAAHsAf8B+wHsAQMGAAHsAv8CAAL/AgAC/wIAAf8CAAECAf8BBwUCAf8BAgSYAgABAgH/AQcF
AgH/AQIEmAYAAewB+wH/AwcBAwgAAfMB/wIAAv8CAAL/AwABAgH/AgIC/wICAf8BAgKYAf8BmAIAAQIB
/wICAv8CAgH/AQICmAH/AZgFAAHsAv8BBwH7AgcBAwHsBAAB7AL/AgAG/wIAAf8CAAECCP8BAgGYAv8B
mAIAAQII/wECAZgC/wGYBAAB7AH/AvsB/wQHAQMB7AYACv8DAAoCApgB/wGYAgAKAgKYAf8BmAIAAuwB
+wH/AvsD/wEHAf8CBwEDAgAB7Az/BwABmAH/ApgC/wKYAf8BmAYAAZgB/wKYAv8CmAH/AZgCAA7sAwAC
7Aj/CQABmAj/AZgGAAGYCP8BmBUAAuwE/wsACpgGAAqYFwAC7B0AAewEAAXsDgABUCUAAuwCBwH5AfsB
/gVeDgACUBUAAfkEAAX5BAAB7AMHBOwFXg0ABFAUAAL5AwAC+QcAAfoB+wH/AQcBAAH5AfsB/gReAewD
AAVQBAAGUAoCCAAE+QQAAhoEAAHsAvoB+wEHAQAB+QL+AQcC7AUAAlAGAAZQAQABAgj/AQIHAAb5AwAB
GgUAAewBBwH5AfsB+gMABQcGAAIaBAACUAEAAlACAAECAf8IAgYABvkEAAQaAgAB7AMHAfkDAAHsAQcJ
AAEaBQABUAIAAVADAAECAf8DAgEHBAIGAAL5AQAC+QYAAxoCAAHsAwcB+QMAAewEXgHsBQAEGgIAAVAG
AAECAv8BAgEHAwIB/wECBgAB+QIAAfkGAAUaAQAB7AIHAfkB+wEAA+wFXgYAAxoCAAFQBgABAgH/AQIB
BwMCAv8BAgYAAfkJAAMaBAABBwH5AfsB+gTsBV4FAAUaCAABAgH/AQcFAgH/AQIGAAH5CwACGgMAAewB
+wH6Af4BAAMHAewB/wEHBwADGgoAAQIB/wICAv8CAgH/AQIHAAH5EAAG7AIHAewC/wEHBwACGgkAAQII
/wECGAAB7AReAewCAAHsA/8BBxEACgIYAAHsBF4B7AMAAf8C7AH/MwAG7AcAAewzAAPsWgAB7D8AAewL
BwsAB7YJAAfkCQAHdQIAAewK/wEHCwAB8wUAAbYJAAHCBQAB5AkAARsFAAF1AgAB7AH/BAcB/wMHAf8B
BwsAAvMDvAHzAbYJAALCAZ4BwgGeAcIB5AkAAhsBvQH/Ab0B/wF1AgAB7Ar/AQcFAAW2AQAB8wUAAbYD
AAXkAQABwgUAAeQDAAV1AQABGwUAAXUCAAHsAf8EBwH/AwcB/wEHBQAB8wUAAvMBvAHzAbwB8wG2AwAB
wgUAAsIBngHCAZ4BwgHkAwABGwUAAhsBvQH/Ab0B/wF1AgAB7Ar/AQcFAAHzA7wB8wEAAfMCAAHzBgAB
wgGeAcIBngHCAQABwgIAAZ4GAAEbAb0B/wG9Af8BAAEbAgABvQUAAewB/wgHAf8BBwUAAfMFAALzAbwB
8wEAAfMEAAHCBQACwgGeAcIBAAHCBAABGwUAAhsBvQEbAQAB/wMAAewK/wEHBQAB8wG8AfMBvAHzAQAE
8wYAAcIBngHCAZ4BwgEABMIGAAEbAb0B/wG9Af8BAAQbBQAB7AH/AgcB/wUHAf8BBwUAAfMCAAHzDAAB
wgIAAcIMAAEbAgAB/wsAAewK/wEHBQAB8wG8AvMBAAHzCgABwgGeAsIBAAHCCgABGwG9ARsB9AEAAf8J
AAHsAf8CBwH/BQcB/wEHBQAE8wwABMIMAAQbCwAB7Aj/NwAB7AH/BgcB/wHsAf81AAHsCP8B7DYACuwN
AAEwAewHAAHsAwABBwIAAQcBAAEHAQABBwIAAQcnAAEwAfsC7AYAAewEBwIAAQcBAAEHAQABBwIAAQcm
AAEwA/sC7AUAAewD/wEHAgABBwEAAQcBAAEHAgABBwgAB1kJAAfWBgABMAX7AuwEAAHsAf8EBwH/AwcB
/wEHCwABwwUAAVkJAAEZBQAB1gUAATAC+wIAA/sC7AMAAewK/wEHCwACwwGaAcMBmgHDAVkJAAIZAd0B
GQHdARkB1gQAATAD+wIABPsC7AIAAewB/wQHAf8DBwH/AQcFAAVZAQABwwUAAVkDAAXWAQABGQUAAdYD
AAEwC/sC7AEAAewK/wEHBQABwwUAAsMBmgHDAZoBwwFZAwABGQUAAhkB3QEZAd0BGQHWAgABMAX7AuoG
+wPsAf8IBwH/AQcFAAHDAZoBwwGaAcMBAAHDAgABwwYAARkB3QEZAd0BGQEAARkCAAHdBQABMAX7AgAG
+wHsAQAB7Ar/AQcFAAHDBQACwwGaAcMBAAHDBAABGQUAAhkB3QEZAQABGQQAATAE+wIABfsB7AIAAewB
/wIHAf8FBwH/AQcFAAHDAZoBwwGaAcMBAATDBgABGQHdARkB3QEZAQAEGQcAATAD+wIABPsB7AMAAewK
/wEHBQABwwIAAcMMAAEZAgABGQ4AATAC+wIAA/sB7AQAAewB/wIHAf8FBwH/AQcFAAHDAZoCwwEAAcMK
AAEZAd0CGQEAARkNAAEwAfsCAAL7AewFAAHsCP8IAATDDAAEGRAAATAD+wHsBgAB7AH/BgcB/wHsAf8r
AAEwAfsB7AcAAewI/wHsLQABMAgACuwmAAFCAU0BPgcAAT4DAAEoAwABQAMAASABAQIAAQEBAAEBBgAB
CRYAA/+BAAT/AcADAAT/BAAB/wEfAv8EAAH8AQcC/wQAAfABAQL/BAABwAEBAv8BgAEBAgABgAEBAv8B
gAEDAgABgAEBAv8BwAEDAgABwAEBAv8BwAEHAgABwAEBAv8B4AEHAgABwAEBAv8B4AEPAgABwAEDAv8B
8AEPAgABwAEHAv8B8AEfAgABwAEfAv8B+AEfAgAB4AF/Av8B+AE/AgAB8QP/AfwBfwIAAv8BgAE/AYAB
PwL/AYABAAGAAT8BgAE/Av8CAAGAAQcBgAEHAf8BHwIAAYABBwGAAQcB/AEHAgABgAEHAYABBwHwAQEC
AAGAAQABgAEAAcABAQIAAYABAAGAAQABgAEBAgABgAEAAYABAAGAAQECAAGAAQABgAEAAcABAQIAAYAB
AAGAAQABwAEBAgAB8AEAAfABAAHAAQECAAHwAQAB8AEAAcABAwEAAQEB8AEAAfABAAHAAQcBgAH/Af4B
AAH+AQABwAEfAcEB/wH+AQAB/gEAAeABfwL/Af4BAQH+AQEB8Qf/AcABAQb/AcABAQb/AcABAQb/AcAB
AQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcABAQb/AcAB
Awb/AcABBwb/AcABD4D/BAAE/wF/Af4CAAT/AWABBgIAAf8BJAH/ASQBYAEGAgAB/wEkAf8BJAFgAQYC
AAT/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABBgMAAT8B
AAE/AWABBgMAAT8BAAE/AWABBgMAAT8BAAE/AWABDgMAAT8BAAE/AWABHgMAAT8BAAE/AX8B/gMAAT8B
AAE/BAAG/wHwAQAB/wGHBP8B8AEAAf4BAwH8AQEC/wHwAQAB/AEBAfwBAQEAAT8BAAE/AfgBAAH8AQEB
AAE/AQABPwH4AgABAQEAAT8BAAE/AfgCAAEBAQABAwEAAQMB+AIAAQEBAAEDAQABAwH4AgABAQEAAQMB
AAEDAfgCAAEDAQABAwEAAQMB5AEBAQABBwEAAQMBAAEDAcYCAAEPAQABAwEAAQMBgAEFAQAB/wEAAQMB
AAEDAQABHwEBAf8B8AEDAfABAwGAASMBAwH/AfABAwHwAQMBxwP/AfABAwHwAQMB5wHxBv8B8AEABv8B
8AEABv8B8AEAAv8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8B
AAE/AQABAwEAAQMBAAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEAAQMB
AAE/AQABPwEAAQMBAAEDAQABPwEAAT8BAAEDAQABAwEAAT8BAAE/AQABAwEAAQMBAAE/Av8B8AEDAfAB
AwT/AfABAwHwAQME/wHwAQMB8AEDBP8B8AEAAv8CAAL/AfABAAHwAQ8CAAL/AfABAAHgAQMDAAE/AQAB
PwHgAQEBAAEHAQABPwEAAT8B8AIAAQcBAAE/AQABPwHwAgABBwEAAQMBAAEDAfgCAAEHAQABAwEAAQMB
+AIAAQcBAAEDAQABAwGQAgABBwEAAQMBAAEDAwABBwEAAQMBAAEDAwABBwEAAQMBAAEDAwABBwEAAQMB
AAEDAZgCAAEHAfABAwHwAQMB+AIAAQ8B8AEDAfABAwH4AgABHwHwAQMB8AEDAv8BAAE/Af8BhwH/AYcB
/wGHAv8B/gEBAf4BAQH+AQEC/wH+AQAB/gEAAf4BAAL/AfwBAAH8AQAB/AIAAT8B/AEAAfwBAAH8AgAB
PwH8AQAB/AEAAfwCAAE/Af4BAQH+AQEB/gEBAQABPwHgAQEB4AEBAeABAQEAAT8BgAEHAYABBwGAAQcB
AAE/AYABPwGAAT8BgAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8BAAE/AQABPwEAAT8B
AAE/AQABPwGAAX8BgAF/AYABfwL/AYABfwGAAX8BgAF/Av8B4QH/AeEB/wHhA/8B/gEAAeEB/wHhAv8B
hwH+AQAB4QH/AeEB/wH+AQEB/gEAAeABAAHgAQAB/gEAAf4BAAHgAQAB4AEAAfwBAAGAAQAB4AEAAeAB
AAH8AQABgAEAAYABAAGAAQAB/AEAAYABAAGAAQABgAEAAf4BAQGABQAB4AEBAYAFAAGAAQcBgAUAAYAB
PwGAAQEFAAE/AYABAwGAAQABgAIAAT8BgAEDAYABAQGAAQEBAAE/AYABBwHgAQMB4AEDAYABfwGAAX8B
+AEDAfgBAwGAAX8BgAF/AfgBBwH4AQcB4QH/AeABPwHgAT8B4AE/AeEB/wHgAR8B4AEfAeABHwHhAf8B
4AEPAeABDwHgAQ8B4QH/AeABBwHgAQcB4AEHAeEB/wHgAQMB4AEDAeABAwHgAQEB4AEBAeABAQHgAQEB
gAEBAcABAQHAAQEBwAEBAYABAQGAAQEBgAEBAYABAQEAAQEBgAEBAYABAQGAAQEBAAEBAYABAQGAAQEB
gAEBAQABAQGAAQEBgAEBAYABAQIAAYABAQGAAQEBgAEBAYABAAHAAQEBwAEBAcABAQGAAQAB4QEBAeEB
AQHhAQEB4AEBAfEBgwHxAYMB8QGDAf4BAQH5Af8B+QH/AfkB/wH+AQECAAH/Ab8B4AE/AeABPwIAAf8B
fwHgAR8B4AEfAwABAQHgAQ8B4AEPAwABAQHgAQcB4AEHAwABAQHgAQMB4AEDAwABAQHgAQEB4AEBAwAB
AQHAAQEBwAEBAwABAQGAAQEBgAEBAwABAQGAAQEBgAEBAwABAQGAAQEBgAEBAwABAQGAAQEBgAEBAwAB
AQGAAQEBgAEBAwABAQHAAQEBwAEBAwABAQHhAQEB4QEBAgAB/gH/AfEBgwHxAYMCAAH/AX8B+QH/AfkB
/wH8A/8EAAH4AX8BgAH/BAAB8AF/AcEB/wQAAYABHwHAAX8FAAE/AYABDwUAAQ8BAAEfBQABAQEAAQEF
AAEDAQABAwQAAYABAwEAAQMEAAHgAQEBgAEBBAAB4AEBAcABAQQAAfABAAHwBQAB+AEBAfgBAQQAAf4B
AQH8AQEEAAH/AQEB/wEBBAAB/wGBAf8BgwQAAv8B8AEAAv8B/gF/Av8B8AEAAv8B+AEfAv8B8AEAAv8B
4AEHAQABPwEAAT8B/AEfAYABAQEAAT8BAAE/AfwBHwEAAQMBAAE/AQABPwH8AR8BgAEBAQABAwEAAQMB
/AEfAQABAwEAAQMBAAEDAfwBHwGAAQEBAAEDAQABAwH4AQ8BAAEDAQABAwEAAQMB8AEHAYABAQEAAQMB
AAEDAeABAwEAAQMBAAEDAQABAwHAAQEBgAEBAQABAwEAAQMDAAEDAfABAwHwAQMCAAGAAQcB8AEDAfAB
AwL/AeABHwHwAQMB8AEDAv8B+AF/Av8B8AGBAf8B9wT/AcABAQH/AfMC/wHuAQMBgAEBAf8B4QL/AeYB
BwGAAQMBAQHAAQABPwHDAQcBAAEPAQMBgQEAAT8BgQGDAQABBwGDAZMBAAE/AQMBAQEDAQEBwQG3AQAB
PwEmAQEBAwEBAYABvwEAAT8BbgIAAQEBAAG/AQABPwF+AQEBgAEBAQABfwEAAT8BfgEBAYABBwEAAf8B
AAE/Ab4BAgHAAQMBAAH/AQABPwH/AQABwAIBAX8BAAE/Af8BgwHAAeABgAF/BP8BwAH+AcEF/wHjC/8B
AAEHAfwBAQH8AQEB/AEBAQABBwH8AQEB/AEBAfwBAQEAAQcB/AEBAfwBAQH8AQEBAAEHAQABAQEAAQEB
AAEBAQABBwEAAQEBAAEBAQABAQEAAQcBAAEBAQABAQEAAQEBAAEHAQABAQEAAQEBAAEBAQABBwEAAQMB
AAEDAQABAwEAAQcBAAEHAQABBwEAAQcBAAEHAQABDwEAAQ8BAAEPAQABBwEAAf8BAAH/AQAB/wEAAQcB
AQH/AQEB/wEBAf8BAAEHAQMB/wEDAf8BAwH/AQABDwb/AQABHwb/AQABPwH+AX8CAAT/AfwBPwIAAfwB
AQH8AQEB+AEfAgAB/AEBAfwBAQHwAQ8BAAEHAfwBAQH8AQEB4AEHAQABBwEAAQEBAAEBAcABAwEAAQcB
AAEBAQABAQGAAQEBAAEHAQABAQEAAQEDAAEHAQABAQEAAQEBAAEBAQABBwEAAQMBAAEDAYABAwEAAQcB
AAEHAQABBwHAAQcBAAEHAQABDwEAAQ8B4AEPAQABBwEAAf8BAAH/AfABHwEAAQcBAQH/AQEB/wH4AT8B
AAEPAQMB/wEDAf8B/AF/AQABHwT/Af4B/wEAAT8E/xYACw==
</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>993, 17</value>
</data>
<data name="TxtSearch.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="pnlFavoriten.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="FavoritenStruktur.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="ContextMenu3.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>870, 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="mnuDokument_erstellen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuInfoDokumentvorlage.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuPaketverwaltung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuIDVBearbeitung.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuNeuesDokumentpaket.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuDokumentpaketKopieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMAKopie.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuLoeschen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem12.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuUmbenennen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="mnuNeuerOrdner.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem9.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MenuItem10.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>404, 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>316, 54</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>539, 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>167, 54</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>17, 54</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>122, 17</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>773, 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="ComboBox1.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="Splitter2.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="ToolTip1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 54</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>frmVorlagenauswahl_Serienbriefe</value>
</data>
<data name="$this.TrayHeight" type="System.Int32, mscorlib, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>238</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
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,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="vorlagenlist.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="mnuload.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="Button1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmpersvorlageladen</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
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,274 @@
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.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmpersvorlageladen))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
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.AllowFilter = True
Me.vorlagenlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.vorlagenlist.AllowSort = True
Me.vorlagenlist.AlternatingRows = True
Me.vorlagenlist.CaptionHeight = 17
Me.vorlagenlist.CellTips = C1.Win.C1TrueDBGrid.CellTipEnum.Floating
Me.vorlagenlist.CollapseColor = System.Drawing.Color.Black
Me.vorlagenlist.ContextMenu = Me.ContextMenu1
Me.vorlagenlist.Cursor = System.Windows.Forms.Cursors.Default
Me.vorlagenlist.DataChanged = False
Me.vorlagenlist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.vorlagenlist.Dock = System.Windows.Forms.DockStyle.Top
Me.vorlagenlist.ExpandColor = System.Drawing.Color.Black
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("resource.Images"), System.Drawing.Bitmap))
Me.vorlagenlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
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.ShowOptionsDialog = False
Me.vorlagenlist.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.vorlagenlist.RowDivider = GridLines1
Me.vorlagenlist.RowHeight = 15
Me.vorlagenlist.RowSubDividerColor = System.Drawing.Color.DarkGray
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 = "<?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, 364," & _
" 172</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, 364, " & _
"172</ClientArea></Blob>"
'
'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.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.AddRange(New System.Windows.Forms.Control() {Me.Button1, 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,438 @@
<?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="C1CommandHolder1.Location" type="System.Drawing.Point, System.Drawing, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>126, 31</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="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="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="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="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="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="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
YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAALNJREFUOE+NU9EV
xCAMuq7tAM7lZneSE0tp0tf0+WEaCEQ9Pha996/nWmuH58o9CDRm4YUQ/1IwgL5WcQ7IpHtn7abkF+xT
ZxK4LWKCKPMs0sNWFTGfJwJ2GmPcOPZwMwICgQLYiQBG/qbAgSjSJd5PgiVleyVguotvtolVEe1B0goL
aToDqpJ9pE6gRNlRryt/XjIdVOXdLtN/iBaRRGElnTN787g2kch99y6EnTJTuaj7AWA972ww0yDcAAAA
AElFTkSuQmCC
</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="C1MnuMainVorschauErstellen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="C1MnuDokumenteGenerieren.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="C1MnuMainDokumenteDrucken.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="C1MnuMainDokumenteBestaetigen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="MnuMainEmpfaengerliste.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1MnuEDOKAHOSTPartnerHinzufuegen.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="C1MnuMainEDOKAPartnerErfassen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="C1MnuMainNeuerEmpfaengerErfassen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="C1MnuMainEmpfaengerBearbeitten.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="C1MnuMainEmpfaengerLoeschen.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="C1MnuEDOKAPartnerErfassen.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="MnuMainEDOKAPartnerErfassen.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="C1MnuMainCheckEmpfaenger.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="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="mnuctAddHost.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</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="mnuctaddempfaenger.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>280, 31</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="C1ContextMenu1.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="C1CommandLink1.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1dokumentedrucken.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1CommandLink3.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1showdoc.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="C1CommandLink2.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1statuszuruecksetzen.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>416, 31</value>
</data>
<data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj0xLjAuMzMw
MC4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZT
eXN0ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMA
AAAcCQAAAk1TRnQBSQFMAgEBAgEAAQUBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
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/AP8ATAAB
7AEHAewMAAEDAf8tAAHsAwcD7AgAAewBAwHsAf8qAALsBQcF7AQAAQMB7AEDAewBAwH/KgAB7AH/BAcB
/wbsAgABAwHsAQMB7AEDAewB/wEAAewnAALsAf8CBwL/AwcE7AIAAewBAwHsAQMB7AEDAf8BAAHsKAAB
7AH/AgcC+gL5AwcC7AIAAQMB7AEDAgAB7AH/AQAB7CYAAewC/wLsAf8FBwLsAQABBwIAAewBAwHsAgcB
AwH/AQAB7AEAAQYkAAHsA/8BAALsAf8BBwLsAQcB/wEAAQcCAAEDAewBAwHsAQMB7AH/AgABBgX+IAAB
7AP/AQAB/wEAAuwBBwT/AwAB7AEDAewBAwHsAQMB/wEAAW0G/iAAAewD/wEAAf8CAAHsBv8CAAEDAewB
AwHsAQMB7AH/AQAB7AFtAf4EbSAABewB/wEAAf8BAAHsA/8C7AIAAewBAwHsAQMB7AEDAf8BAAHsAQAC
bSUAAewD/wEAAf8CAAPsBAABAwHsAQMB7AEHAf8B7AEAAewCAAFtJQAF7AH/CQAB7AEDAQcB/wHsAQAD
7CoAAewD/wQAAf8EAAEHAf8B7AEABewqAAXsNwABQgFNAT4HAAE+AwABKAMAAUADAAEgAwABAQEAAQEG
AAEBFgAD/4EAAf4BHwH8AX8EAAH8AQ8B8AF/BAAB4AEDAcABfwQAAcACAAEfBAABwAIAAR8EAAGAAgAB
FwcAAQcVAAEBDwABgQEAAQcEAAHAAccBAAEXBAABwAF/AQABHwQAAfABdwEAAR8EAAHwAX8BAAEfGgAL
</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="djlist.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="C1CommandLink4.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="c1deldok.Modifiers" type="System.CodeDom.MemberAttributes, System, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>Assembly</value>
</data>
<data name="$this.Name">
<value>frmsbdruck</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,948 @@
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.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmsbdruck))
Dim GridLines1 As C1.Win.C1TrueDBGrid.Util.GridLines = New C1.Win.C1TrueDBGrid.Util.GridLines()
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.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()
Me.C1CommandLink4 = New C1.Win.C1Command.C1CommandLink()
Me.c1deldok = New C1.Win.C1Command.C1Command()
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.Add(Me.C1MnuMainNeuerSerienbrief)
Me.MnuMainDatei.CommandLinks.Add(Me.C1MnuMainSerienbriefLaden)
Me.MnuMainDatei.CommandLinks.Add(Me.C1MnuSerienbriefLoeschen)
Me.MnuMainDatei.CommandLinks.Add(Me.C1MnuMainSerienbriefabschliessen)
Me.MnuMainDatei.CommandLinks.Add(Me.C1MnuMainSerienbriefSpeichern)
Me.MnuMainDatei.CommandLinks.Add(Me.C1MnuMainFensterSchliessen)
Me.MnuMainDatei.Image = Nothing
Me.MnuMainDatei.Name = "MnuMainDatei"
Me.MnuMainDatei.Text = "&Datei"
'
'C1MnuMainNeuerSerienbrief
'
Me.C1MnuMainNeuerSerienbrief.Command = Me.MnuMainNew
Me.C1MnuMainNeuerSerienbrief.Text = "&Neuer Serienbrief"
'
'MnuMainNew
'
Me.MnuMainNew.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = CType(resources.GetObject("MnuMainClose.Image"), System.Drawing.Bitmap)
Me.MnuMainClose.ImageIndex = 0
Me.MnuMainClose.Name = "MnuMainClose"
Me.MnuMainClose.Text = "&Fenster schliessen"
'
'MnuMainDokument
'
Me.MnuMainDokument.CommandLinks.Add(Me.C1MnuMainVorlageImportieren)
Me.MnuMainDokument.CommandLinks.Add(Me.C1MnuMainVorlageBearbeiten)
Me.MnuMainDokument.CommandLinks.Add(Me.C1MnuMainVorschauErstellen)
Me.MnuMainDokument.CommandLinks.Add(Me.C1MnuDokumenteGenerieren)
Me.MnuMainDokument.CommandLinks.Add(Me.C1MnuMainDokumenteDrucken)
Me.MnuMainDokument.CommandLinks.Add(Me.C1MnuMainDokumenteBestaetigen)
Me.MnuMainDokument.Image = Nothing
Me.MnuMainDokument.Name = "MnuMainDokument"
Me.MnuMainDokument.Text = "Dokument"
'
'C1MnuMainVorlageImportieren
'
Me.C1MnuMainVorlageImportieren.Command = Me.MnuMainVorlageImportieren
Me.C1MnuMainVorlageImportieren.Text = "Vorlage &importieren"
'
'MnuMainVorlageImportieren
'
Me.MnuMainVorlageImportieren.Image = Nothing
Me.MnuMainVorlageImportieren.Name = "MnuMainVorlageImportieren"
Me.MnuMainVorlageImportieren.Text = "Vorlage &importieren"
'
'C1MnuMainVorlageBearbeiten
'
Me.C1MnuMainVorlageBearbeiten.Command = Me.MnuMainVorageBearbeiten
Me.C1MnuMainVorlageBearbeiten.Text = "Vorlage &bearbeiten"
'
'MnuMainVorageBearbeiten
'
Me.MnuMainVorageBearbeiten.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
Me.MnuMainDokumenteBestaetigen.ImageIndex = 13
Me.MnuMainDokumenteBestaetigen.Name = "MnuMainDokumenteBestaetigen"
Me.MnuMainDokumenteBestaetigen.Text = "Generierte Dokumente bestätigen"
'
'MnuMainEmpfaengerliste
'
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuEDOKAHOSTPartnerHinzufuegen)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainEDOKAPartnerErfassen)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainNeuerEmpfaengerErfassen)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainEmpfaengerBearbeitten)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainEmpfaengerLoeschen)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuEDOKAPartnerErfassen)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainImportEmpfaneger)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainExportEmpfaenger)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainLoadPartnerliste)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainSaveAsPartnerlist)
Me.MnuMainEmpfaengerliste.CommandLinks.Add(Me.C1MnuMainCheckEmpfaenger)
Me.MnuMainEmpfaengerliste.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
Me.MnuMainCheckEmpfaenger.ImageIndex = 17
Me.MnuMainCheckEmpfaenger.Name = "MnuMainCheckEmpfaenger"
Me.MnuMainCheckEmpfaenger.Text = "Empfängerliste prüfen"
'
'C1CommandMenu1
'
Me.C1CommandMenu1.CommandLinks.Add(Me.C1MnuMainAddColumn)
Me.C1CommandMenu1.CommandLinks.Add(Me.C1MnuMainDeleteColumn)
Me.C1CommandMenu1.CommandLinks.Add(Me.C1MnuMainRenameColumn)
Me.C1CommandMenu1.CommandLinks.Add(Me.C1MnuMainSpaltenselektion)
Me.C1CommandMenu1.Image = Nothing
Me.C1CommandMenu1.Name = "C1CommandMenu1"
Me.C1CommandMenu1.Text = "&Individuelle Dokumentwerte"
'
'C1MnuMainAddColumn
'
Me.C1MnuMainAddColumn.Command = Me.MnuMainAddColumn
Me.C1MnuMainAddColumn.Text = "Spalte hinzufügen"
'
'MnuMainAddColumn
'
Me.MnuMainAddColumn.Image = Nothing
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.Image = Nothing
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.Image = Nothing
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.Image = Nothing
Me.MnuMainSpaltenselektion.Name = "MnuMainSpaltenselektion"
Me.MnuMainSpaltenselektion.Text = "Spalten-Selektion"
'
'mnuctAddHost
'
Me.mnuctAddHost.Image = Nothing
Me.mnuctAddHost.ImageIndex = 16
Me.mnuctAddHost.Name = "mnuctAddHost"
Me.mnuctAddHost.Text = "EDOKA-/HOST-Partner hinzufügen"
'
'mnuCTADDEdokapartner
'
Me.mnuCTADDEdokapartner.Image = Nothing
Me.mnuCTADDEdokapartner.ImageIndex = 18
Me.mnuCTADDEdokapartner.Name = "mnuCTADDEdokapartner"
Me.mnuCTADDEdokapartner.Text = "Neuer EDOKA-Partner erfassen"
'
'mnuctaddempfaenger
'
Me.mnuctaddempfaenger.Image = Nothing
Me.mnuctaddempfaenger.ImageIndex = 19
Me.mnuctaddempfaenger.Name = "mnuctaddempfaenger"
Me.mnuctaddempfaenger.Text = "Neuer Empfänger erfassen"
'
'C1ContextMenu1
'
Me.C1ContextMenu1.CommandLinks.Add(Me.C1CommandLink1)
Me.C1ContextMenu1.CommandLinks.Add(Me.C1CommandLink3)
Me.C1ContextMenu1.CommandLinks.Add(Me.C1CommandLink4)
Me.C1ContextMenu1.CommandLinks.Add(Me.C1CommandLink2)
Me.C1ContextMenu1.Image = CType(resources.GetObject("C1ContextMenu1.Image"), System.Drawing.Bitmap)
Me.C1ContextMenu1.ImageIndex = 0
Me.C1ContextMenu1.Name = "C1ContextMenu1"
'
'C1CommandLink1
'
Me.C1CommandLink1.Command = Me.c1dokumentedrucken
Me.C1CommandLink1.Text = "Dokumente drucken"
'
'c1dokumentedrucken
'
Me.c1dokumentedrucken.Image = Nothing
Me.c1dokumentedrucken.Name = "c1dokumentedrucken"
Me.c1dokumentedrucken.Text = "Dokumente drucken"
'
'C1CommandLink3
'
Me.C1CommandLink3.Command = Me.c1showdoc
Me.C1CommandLink3.Text = "Dokumente anzeigen"
'
'c1showdoc
'
Me.c1showdoc.Image = Nothing
Me.c1showdoc.Name = "c1showdoc"
Me.c1showdoc.Text = "Dokumente anzeigen"
'
'C1CommandLink2
'
Me.C1CommandLink2.Command = Me.c1statuszuruecksetzen
Me.C1CommandLink2.Delimiter = True
Me.C1CommandLink2.Text = "Status zurücksetzen"
'
'c1statuszuruecksetzen
'
Me.c1statuszuruecksetzen.Image = Nothing
Me.c1statuszuruecksetzen.Name = "c1statuszuruecksetzen"
Me.c1statuszuruecksetzen.Text = "Status zurücksetzen"
'
'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.ToolBarButton1})
Me.C1CommandHolder1.SetC1ContextMenu(Me.ToolBar1, Nothing)
Me.ToolBar1.DropDownArrows = True
Me.ToolBar1.ImageList = Me.ImageList1
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(464, 25)
Me.ToolBar1.TabIndex = 29
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 1
'
'djlist
'
Me.djlist.AllowDelete = True
Me.djlist.AllowFilter = True
Me.djlist.AllowRowSizing = C1.Win.C1TrueDBGrid.RowSizingEnum.AllRows
Me.djlist.AllowSort = True
Me.djlist.AlternatingRows = True
Me.C1CommandHolder1.SetC1ContextMenu(Me.djlist, Me.C1ContextMenu1)
Me.djlist.CaptionHeight = 17
Me.djlist.CollapseColor = System.Drawing.Color.Black
Me.djlist.Cursor = System.Windows.Forms.Cursors.Default
Me.djlist.DataChanged = False
Me.djlist.DeadAreaBackColor = System.Drawing.Color.Empty
Me.djlist.Dock = System.Windows.Forms.DockStyle.Fill
Me.djlist.ExpandColor = System.Drawing.Color.Black
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("resource.Images"), System.Drawing.Bitmap))
Me.djlist.Location = New System.Drawing.Point(0, 25)
Me.djlist.MarqueeStyle = C1.Win.C1TrueDBGrid.MarqueeEnum.DottedCellBorder
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
Me.djlist.PrintInfo.ShowOptionsDialog = False
Me.djlist.RecordSelectorWidth = 16
GridLines1.Color = System.Drawing.Color.DarkGray
GridLines1.Style = C1.Win.C1TrueDBGrid.LineStyleEnum.Single
Me.djlist.RowDivider = GridLines1
Me.djlist.RowHeight = 15
Me.djlist.RowSubDividerColor = System.Drawing.Color.DarkGray
Me.djlist.ScrollTips = True
Me.djlist.Size = New System.Drawing.Size(464, 180)
Me.djlist.TabIndex = 30
Me.djlist.Text = "C1TrueDBGrid1"
Me.djlist.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, 460," & _
" 176</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, 460, " & _
"176</ClientArea></Blob>"
'
'C1CommandLink4
'
Me.C1CommandLink4.Command = Me.c1deldok
Me.C1CommandLink4.Text = "Dokumente löschen"
'
'c1deldok
'
Me.c1deldok.Image = Nothing
Me.c1deldok.Name = "c1deldok"
Me.c1deldok.Text = "Dokumente löschen"
'
'frmsbdruck
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.C1CommandHolder1.SetC1ContextMenu(Me, Nothing)
Me.ClientSize = New System.Drawing.Size(464, 205)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.djlist, 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)
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,548 @@
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 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,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="ToolBar1.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="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
AACmCAAAAk1TRnQBSQFMAgEBAgEAAQUBAAEEAQABEAEAARABAAT/AQkBEAj/AUIBTQE2AQQGAAE2AQQC
AAEoAwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB
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/AP8ASwAB
AwH/DwAB7CwAAewBAwHsAf8PAAHsKgABAwHsAQMB7AEDAf8OAALsKQABAwHsAQMB7AEDAewB/wEAAewM
AALsKQAB7AEDAewBAwHsAQMB/wEAAewLAAPsKQABAwHsAQMCAAHsAf8BAAHsCwAD7CkAAewBAwHsAgcB
AwH/AQAB7AEAAQYIAATsKQABAwHsAQMB7AEDAewB/wIAAQYF/gQABOwpAAHsAQMB7AEDAewBAwH/AQAB
bQb+AwAF7CkAAQMB7AEDAewBAwHsAf8BAAHsAW0B/gRtAwAF7CkAAewBAwHsAQMB7AEDAf8BAAHsAQAC
bQUABuwpAAEDAewBAwHsAQcB/wHsAQAB7AIAAW0FAAbsKQAB7AEDAQcB/wHsAQAD7AcABuwCBygAAQcB
/wHsAQAF7AcAA+wIBzQAAewOByEAAUIBTQE+BwABPgMAASgDAAFAAwABIAMAAQEBAAEBBgABARYAA/+B
AAH8AX8B/wF/BAAB8AF/Af4BfwQAAcABfwH+AT8FAAEfAfwBPwUAAR8B/AEfBQABFwH4AR8FAAEHAfgB
DwYAAfABDwYAAfABBwYAAeABBwYAAeABAwUAAQcBwAEDBQABFwHAAQEFAAEfAYABAQUAAR8BgAYAAR8c
AAs=
</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="$this.Name">
<value>frmtextmarken</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>
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,872 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
Imports System.IO
Imports System.Data.OleDb
Imports UtilityLibrary.Win32
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 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(frmtextmarken))
Me.ToolBar1 = New System.Windows.Forms.ToolBar()
Me.ToolBarButton2 = New System.Windows.Forms.ToolBarButton()
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton()
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.Panel1 = New System.Windows.Forms.Panel()
Me.SuspendLayout()
'
'ToolBar1
'
Me.ToolBar1.Buttons.AddRange(New System.Windows.Forms.ToolBarButton() {Me.ToolBarButton2, 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(344, 25)
Me.ToolBar1.TabIndex = 0
'
'ToolBarButton2
'
Me.ToolBarButton2.ImageIndex = 0
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 1
Me.ToolBarButton1.Style = System.Windows.Forms.ToolBarButtonStyle.ToggleButton
'
'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
'
'Panel1
'
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel1.Location = New System.Drawing.Point(0, 25)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(344, 476)
Me.Panel1.TabIndex = 1
'
'frmtextmarken
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(344, 501)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Panel1, Me.ToolBar1})
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmtextmarken"
Me.Text = "Dokumentbefüllung bearbeiten"
Me.ResumeLayout(False)
End Sub
#End Region
#Region "Deklarationen"
Dim serienbriefnr As Integer
Dim DokumentBearbeitungDurchUser As Boolean
Dim WithEvents objword As Word.Application
Dim WithEvents objdoc As 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
#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 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
#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)
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
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"
Public Sub Load_Document(Optional ByVal visible As Boolean = True)
Dim dokumentname As String = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage.doc"
Vorlage_Auslesen()
StartWord(True)
objword.Documents.Open(dokumentname)
objdoc = objword.ActiveDocument
objword.Visible = visible
objword.WindowState = Word.WdWindowState.wdWindowStateMaximize
End Sub
Private Function StartWord(Optional ByVal newinstance As Boolean = False)
Try
If newinstance = False Then
objword = GetObject(, "Word.application")
Else
objword = CreateObject("Word.application")
End If
Catch
Try
objword = CreateObject("Word.application")
Catch ex As Exception
End Try
Finally
objword.Visible = False
End Try
Try
objword.Run("Autoexec")
Catch
End Try
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
Me.objdoc = Nothing
Me.objword = Nothing
Exit Function
End If
If Me.DokumentBearbeitungDurchUser = True Then
Me.objword.ActiveDocument.Save()
Me.objdoc = Me.objword.ActiveDocument
Application.DoEvents()
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
Me.objdoc = Nothing
Me.objword = Nothing
Me.Vorlage_Speichern()
Exit Function
End If
Application.DoEvents()
If Me.objword.Documents.Count = 1 Then
Me.objword.Quit(savechanges:=False)
End If
Me.objdoc = Nothing
Me.objword = Nothing
Application.DoEvents()
'Me.Vorlage_Speichern()
Catch
'MyMsg.show_standardmessage(728, MsgBoxStyle.Critical)
End Try
End Function
#End Region
#Region "Datenzugriffe"
Private Function Vorlage_Auslesen() As Boolean
Try
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage.doc"
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)
Dim fs As New FileStream(dokumentname, FileMode.OpenOrCreate, FileAccess.Write)
fs.Write(MyData, 0, K)
fs.Close()
fs = Nothing
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 = ""
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + Me.serienbriefnr.ToString + "_vorlage.doc"
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 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, "vorlage")
Dim myRow As DataRow
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:=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:=Word.WdGoToItem.wdGoToBookmark, Name:=TMName)
Activate_Word()
Catch ex As Exception
End Try
Else
Try
objword.Selection.GoTo(what:=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
Try
s = objword.ActiveDocument.FormFields.Item(row.Item("feldname")).Name()
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 Word.Application()
'objword.WindowState = 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
Dim dokumentname = Globals.Applikationsdaten.Rows(0).Item("pfad_temporaer_dokumente") + serienbriefnr.ToString + "_vorlage.doc"
'objword.Documents.Open(dokumentname)
'objword.Visible = False
'objword.WindowState = 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:=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:=Word.WdUnits.wdStory)
If objword.ActiveWindow.View.SplitSpecial <> Word.WdSpecialPane.wdPaneNone Then
objword.ActiveWindow.Panes.Item(2).Close()
End If
If objword.ActiveWindow.ActivePane.View.Type = Word.WdViewType.wdNormalView Or objword.ActiveWindow.ActivePane.View.Type = Word.WdViewType.wdOutlineView Then
objword.ActiveWindow.ActivePane.View.Type = Word.WdViewType.wdPrintView
End If
objword.ActiveWindow.ActivePane.View.SeekView = Word.WdSeekView.wdSeekCurrentPageHeader
set_headerbookmark()
objword.ActiveWindow.ActivePane.View.SeekView = Word.WdSeekView.wdSeekMainDocument
End Sub
Private Sub set_headerbookmark()
Try
objword.ActiveDocument.Bookmarks.Item("TGEDKCompanyBBEB99").Select()
Catch
objword.Selection.MoveDown(Unit:=Word.WdUnits.wdLine, Count:=1)
With objword.ActiveDocument.Bookmarks
.Add(Range:=objword.Selection.Range, Name:="TGEDKCompanyBBEB99")
.DefaultSorting = 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

File diff suppressed because it is too large Load Diff

File diff suppressed because one or more lines are too long

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>

View File

@@ -0,0 +1,303 @@
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.SqlDbType
Public Class frmpartnermavip
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 ContextMenu1 As System.Windows.Forms.ContextMenu
Friend WithEvents MenuItem1 As System.Windows.Forms.MenuItem
Friend WithEvents plist As C1.Win.C1TrueDBGrid.C1TrueDBGrid
Friend WithEvents MenuItem2 As System.Windows.Forms.MenuItem
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmpartnermavip))
Me.ToolBar1 = New System.Windows.Forms.ToolBar
Me.ToolBarButton1 = New System.Windows.Forms.ToolBarButton
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.plist = New C1.Win.C1TrueDBGrid.C1TrueDBGrid
Me.ContextMenu1 = New System.Windows.Forms.ContextMenu
Me.MenuItem1 = New System.Windows.Forms.MenuItem
Me.MenuItem2 = New System.Windows.Forms.MenuItem
CType(Me.plist, System.ComponentModel.ISupportInitialize).BeginInit()
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.Location = New System.Drawing.Point(0, 0)
Me.ToolBar1.Name = "ToolBar1"
Me.ToolBar1.ShowToolTips = True
Me.ToolBar1.Size = New System.Drawing.Size(672, 28)
Me.ToolBar1.TabIndex = 0
'
'ToolBarButton1
'
Me.ToolBarButton1.ImageIndex = 0
Me.ToolBarButton1.Name = "ToolBarButton1"
'
'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, "")
Me.ImageList1.Images.SetKeyName(13, "")
Me.ImageList1.Images.SetKeyName(14, "")
Me.ImageList1.Images.SetKeyName(15, "")
Me.ImageList1.Images.SetKeyName(16, "")
Me.ImageList1.Images.SetKeyName(17, "")
Me.ImageList1.Images.SetKeyName(18, "")
Me.ImageList1.Images.SetKeyName(19, "")
Me.ImageList1.Images.SetKeyName(20, "")
Me.ImageList1.Images.SetKeyName(21, "")
Me.ImageList1.Images.SetKeyName(22, "")
Me.ImageList1.Images.SetKeyName(23, "")
Me.ImageList1.Images.SetKeyName(24, "")
Me.ImageList1.Images.SetKeyName(25, "")
Me.ImageList1.Images.SetKeyName(26, "")
Me.ImageList1.Images.SetKeyName(27, "")
'
'plist
'
Me.plist.AllowDelete = True
Me.plist.AlternatingRows = True
Me.plist.ContextMenu = Me.ContextMenu1
Me.plist.Cursor = System.Windows.Forms.Cursors.Default
Me.plist.Dock = System.Windows.Forms.DockStyle.Fill
Me.plist.FetchRowStyles = True
Me.plist.FilterBar = True
Me.plist.GroupByCaption = "Drag a column header here to group by that column"
Me.plist.Images.Add(CType(resources.GetObject("plist.Images"), System.Drawing.Image))
Me.plist.Location = New System.Drawing.Point(0, 28)
Me.plist.Name = "plist"
Me.plist.PreviewInfo.Location = New System.Drawing.Point(0, 0)
Me.plist.PreviewInfo.Size = New System.Drawing.Size(0, 0)
Me.plist.PreviewInfo.ZoomFactor = 75
Me.plist.PrintInfo.PageSettings = CType(resources.GetObject("plist.PrintInfo.PageSettings"), System.Drawing.Printing.PageSettings)
Me.plist.ScrollTips = True
Me.plist.Size = New System.Drawing.Size(672, 377)
Me.plist.TabIndex = 28
Me.plist.Text = "C1TrueDBGrid1"
Me.plist.PropBag = resources.GetString("plist.PropBag")
'
'ContextMenu1
'
Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem2})
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.Text = "&Partner hinzufügen"
'
'MenuItem2
'
Me.MenuItem2.Index = 1
Me.MenuItem2.Text = "Eintrag inaktivieren"
'
'frmpartnermavip
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(672, 405)
Me.Controls.Add(Me.plist)
Me.Controls.Add(Me.ToolBar1)
Me.Name = "frmpartnermavip"
Me.Text = "Partner als Mitarbeiter/VIP"
CType(Me.plist, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
#End Region
Private Sub frmpartnermavip_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
reload_data()
End Sub
Private Sub Reload_Data()
Dim dt As DataTable
dt = getdata()
Me.plist.DataSource = dt
Me.plist.DataMember = dt.TableName
Dim i As Integer
Me.plist.Columns("Erstellt Am").NumberFormat = "dd.MM.yyyy HH:mm:ss"
Me.plist.Columns("Mutiert Am").NumberFormat = "dd.MM.yyyy HH:mm:ss"
For i = 0 To Me.plist.Splits(0).DisplayColumns.Count - 1
Me.plist.Splits(0).DisplayColumns(i).AutoSize()
Me.plist.Splits(0).DisplayColumns(i).Locked = True
Next
Me.plist.Columns("MA").ValueItems.Presentation = C1.Win.C1TrueDBGrid.PresentationEnum.CheckBox
Me.plist.Columns("MA").ValueItems.DefaultItem = True
Me.plist.Columns("MA").DefaultValue = True
Me.plist.Splits(0).DisplayColumns("MA").Locked = False
Me.plist.Columns("VIP").ValueItems.Presentation = C1.Win.C1TrueDBGrid.PresentationEnum.CheckBox
Me.plist.Columns("VIP").ValueItems.DefaultItem = True
Me.plist.Columns("VIP").DefaultValue = True
Me.plist.Splits(0).DisplayColumns("VIP").Locked = False
Me.plist.Columns("Aktiv").ValueItems.Presentation = C1.Win.C1TrueDBGrid.PresentationEnum.CheckBox
Me.plist.Columns("Aktiv").ValueItems.DefaultItem = True
Me.plist.Columns("Aktiv").DefaultValue = True
Me.plist.Splits(0).DisplayColumns("Aktiv").Locked = False
End Sub
Private Function getdata() 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_partner_ma_vip_get"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
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 insert_new_partner(ByVal nrpar00 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_partner_ma_vip_insert"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 5, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiter", SqlDbType.Int, 5, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
sdaAdapter.Fill(dtToReturn)
Return dtToReturn
Catch ex As Exception
MsgBox("Der gewählte Partner ist bereits in der Aufzählung vorhanden.", MsgBoxStyle.Critical)
Finally
scmCmdToExecute.Dispose()
sdaAdapter.Dispose()
End Try
End Function
Private Function update_partner(ByVal nrpar00 As Integer) As DataTable
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
Dim i As Integer
Dim iAktiv As Integer
Dim iVIP As Integer
Dim iMA As Integer
Dim dtToReturn As DataTable = New DataTable()
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
scmCmdToExecute.CommandText = "dbo.sp_partner_ma_vip_update"
scmCmdToExecute.CommandType = CommandType.StoredProcedure
scmCmdToExecute.Connection = conn.scoDBConnection
If LCase(Me.plist.Columns("Aktiv").Value) = "false" Then
iAktiv = 0
Else
iAktiv = 1
End If
If LCase(Me.plist.Columns("VIP").Value) = "false" Then
iVIP = 0
Else
iVIP = 1
End If
If LCase(Me.plist.Columns("MA").Value) = "false" Then
iMA = 0
Else
iMA = 1
End If
Try
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
scmCmdToExecute.Parameters.Add(New SqlParameter("@mitarbeiter", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, Globals.MitarbeiterNr))
scmCmdToExecute.Parameters.Add(New SqlParameter("@ma", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, iMA))
scmCmdToExecute.Parameters.Add(New SqlParameter("@vip", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, iVIP))
scmCmdToExecute.Parameters.Add(New SqlParameter("@aktiv", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, iAktiv))
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 MenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem1.Click
Dim f As New FrmPartnersuche()
f.ShowDialog()
If f.PartnerNr <> 0 Then
insert_new_partner(f.PartnerNr)
Me.Reload_Data()
Dim i As Integer
For i = 0 To Me.plist.Splits(0).Rows.Count
If Me.plist.Columns(0).CellValue(i) = f.PartnerNr Then
Me.plist.Bookmark = i
Exit For
End If
Next
End If
End Sub
Private Sub plist_AfterColUpdate(ByVal sender As Object, ByVal e As C1.Win.C1TrueDBGrid.ColEventArgs) Handles plist.AfterColUpdate
Dim i
i = Me.plist.Bookmark
Me.update_partner(Me.plist.Columns("partnernr").Value)
Me.Reload_Data()
Me.plist.Bookmark = i
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
End Class