Compare commits
2 Commits
7352833aa0
...
cd81ff6d90
| Author | SHA1 | Date | |
|---|---|---|---|
| cd81ff6d90 | |||
| efa761d74d |
@@ -1,9 +1,9 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmKassenVerwaltung
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
@@ -20,7 +20,7 @@ Partial Class frmKassenVerwaltung
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKassenVerwaltung))
|
||||
Me.DataGridView = New System.Windows.Forms.DataGridView()
|
||||
|
||||
84
SDL/Administration/frmZinsnachberechnung.Designer.vb
generated
Normal file
84
SDL/Administration/frmZinsnachberechnung.Designer.vb
generated
Normal file
@@ -0,0 +1,84 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmZinsnachberechnung
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmZinsnachberechnung))
|
||||
Me.DataGridView = New System.Windows.Forms.DataGridView()
|
||||
Me.btnSpeichern = New System.Windows.Forms.Button()
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle = New System.Windows.Forms.Label()
|
||||
CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'DataGridView
|
||||
'
|
||||
Me.DataGridView.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.DataGridView.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.AllCells
|
||||
Me.DataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView.Location = New System.Drawing.Point(12, 29)
|
||||
Me.DataGridView.Name = "DataGridView"
|
||||
Me.DataGridView.Size = New System.Drawing.Size(997, 444)
|
||||
Me.DataGridView.TabIndex = 0
|
||||
'
|
||||
'btnSpeichern
|
||||
'
|
||||
Me.btnSpeichern.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnSpeichern.Location = New System.Drawing.Point(872, 479)
|
||||
Me.btnSpeichern.Name = "btnSpeichern"
|
||||
Me.btnSpeichern.Size = New System.Drawing.Size(137, 34)
|
||||
Me.btnSpeichern.TabIndex = 1
|
||||
Me.btnSpeichern.Text = "Speichern"
|
||||
Me.btnSpeichern.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblVerwaltungDerRKSVKassenTabelle
|
||||
'
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle.AutoSize = True
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle.Location = New System.Drawing.Point(13, 13)
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle.Name = "lblVerwaltungDerRKSVKassenTabelle"
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle.Size = New System.Drawing.Size(119, 13)
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle.TabIndex = 2
|
||||
Me.lblVerwaltungDerRKSVKassenTabelle.Text = "Verwaltung der Tabelle:"
|
||||
'
|
||||
'frmKassenVerwaltung
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(1021, 517)
|
||||
Me.Controls.Add(Me.lblVerwaltungDerRKSVKassenTabelle)
|
||||
Me.Controls.Add(Me.btnSpeichern)
|
||||
Me.Controls.Add(Me.DataGridView)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmKassenVerwaltung"
|
||||
Me.Text = "Administration"
|
||||
Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
|
||||
CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents DataGridView As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents btnSpeichern As System.Windows.Forms.Button
|
||||
Friend WithEvents lblVerwaltungDerRKSVKassenTabelle As System.Windows.Forms.Label
|
||||
End Class
|
||||
980
SDL/Administration/frmZinsnachberechnung.resx
Normal file
980
SDL/Administration/frmZinsnachberechnung.resx
Normal file
@@ -0,0 +1,980 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
|
||||
AACRbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEd4Sx5mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB4Sx5/VClmMwBuPg5r
|
||||
OglrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOgluPg5mMwB/VCl0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0RhhzRBVmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
|
||||
RBV3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh18UCRmMwBqOQdnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFqOQdmMwB8UCR9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwDm4N3/////////
|
||||
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
|
||||
//////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
|
||||
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
|
||||
MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
|
||||
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
|
||||
v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
|
||||
jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
|
||||
mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwCMblj///////////////////////////+M
|
||||
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
|
||||
///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
|
||||
y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
|
||||
4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwC3
|
||||
p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
|
||||
p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
|
||||
SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
|
||||
y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
|
||||
MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDm4N3/////////////
|
||||
//+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
|
||||
9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
|
||||
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
|
||||
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
|
||||
//////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
|
||||
///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
|
||||
MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
|
||||
//////////////+3p5xmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCjjH3/
|
||||
///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
|
||||
1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
|
||||
mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
|
||||
MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
|
||||
fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
|
||||
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
|
||||
//////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
|
||||
p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
|
||||
9fRmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwDUy8X///////////////+t
|
||||
mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
|
||||
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
|
||||
//+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
|
||||
MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
|
||||
///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
|
||||
///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
|
||||
MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
|
||||
6+n///////////////+jjH1mMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwCYfWv/////
|
||||
///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
|
||||
//////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
|
||||
//+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
|
||||
//////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
|
||||
MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
|
||||
mo1mMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwDLv7j////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
|
||||
//////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
|
||||
///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
|
||||
fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
|
||||
///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
|
||||
jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAF0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
|
||||
//////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
|
||||
///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ8UCRmMwBqOQdn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFqOQdmMwB8UCR3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh1zRBVmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
|
||||
RBV0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0Rhh/VClmMwBuPg5rOglrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOgluPg5mMwB/VCl4Sx5mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwB4Sx6RbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEf/////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////Bs6rBs6qYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvBs6rBs6r/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////Uy8WYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvUy8X////////////////////////////////////////B
|
||||
s6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3Bs6rBs6r39fT/////////////////////////////////////////////////////////
|
||||
///Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////d1tGMblhmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvm4N3/
|
||||
///////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMbljLv7j/////////////////
|
||||
///////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X////////////////////////////d1tFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCMbljm4N3////////////////////////////////////////////m4N1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////
|
||||
///////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////
|
||||
///////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////Bs6pmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwCtmo3///////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCA
|
||||
XUL/////////////////////////////////////////////////////////////////////////////
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT/////////////////
|
||||
//+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////////////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////////////////////////////////////////
|
||||
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDBs6r///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDBs6r////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////
|
||||
///////////////////////////////////////////////////////////////////////////d1tFm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6rd1tH////////39fTBs6qAXUJm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Lv7hmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////////////Uy8VmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////////////////////////
|
||||
//////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/
|
||||
//////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd
|
||||
1tH////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////
|
||||
///////Uy8XBs6qMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////
|
||||
///////////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////+AXUJmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCtmo3///////////////////////////////////////+AXUJmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwC3p5z////////////////////////////////d1tGMblhmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////9mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT/////////////////////
|
||||
///////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////
|
||||
//////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb39fT/////////////
|
||||
//////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDBs6r////////////////////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCYfWv///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0
|
||||
SSb///////////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDBs6r///////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDUy8X/////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///u6+nBs6rBs6rBs6qYfWtmMwBmMwBmMwDu6+n/////////////////////////////////////////
|
||||
///Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n////////////////////////////////////////u
|
||||
6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCY
|
||||
fWv////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////
|
||||
//////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDm4N3////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////u6+m3p5xmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////m4N1mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDBs6r////////////////////////////////////////////d1tFmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////////u6+lmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////////Uy8XB
|
||||
s6p0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
|
||||
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3/////////////////////////
|
||||
//////////////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
|
||||
//////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////m4N3Bs6qMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDUy8X///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCMblj///////////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDm4N3/////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////Bs6qAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb39fT///////////////////////+jjH1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////////////////
|
||||
///////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT///////////////////+t
|
||||
mo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////Lv7hmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/
|
||||
///////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
|
||||
///////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDm4N3////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////////////////////Uy8VmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////////////////////////////////////90SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////Uy8VmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbm4N3/////////////////////
|
||||
///////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////
|
||||
//////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
|
||||
///////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCM
|
||||
bljm4N3///////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3///////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDLv7j///////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwD39fT/////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////////////////////////+M
|
||||
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////
|
||||
//+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWvBs6r/////////////////////////
|
||||
//////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////
|
||||
//////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDd1tH///////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDL
|
||||
v7j/////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////////////////////+Mblhm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3Bs6r/////
|
||||
///////////////////////////////////////////////////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////////////////////////////////+AXUJm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////////////Bs6pmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCtmo3Bs6r39fT/////////////////////////////////////////////////////////////////
|
||||
///////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////
|
||||
///////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n/////
|
||||
///////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwB0SSbLv7j/////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwC3p5z////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCAXUL/////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////////////
|
||||
//////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////////////////////
|
||||
//////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////////////////////////39fRmMwBmMwB0SSbBs6rBs6r39fT/////////
|
||||
//////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/
|
||||
///////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDBs6r///////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDm4N3/////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////39fRmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwCtmo3Bs6rBs6r///////////////////////////+3p5xmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT////////////////////////////39fSMblhmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////////+3p5xmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////
|
||||
///////////////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////
|
||||
///////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////
|
||||
///////////u6+mMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////
|
||||
///////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////////u6+mAXUJmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDLv7j////////////////Uy8W3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDd1tH////////////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMbljBs6r////////d1tG3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH/////////////////////////
|
||||
///39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////
|
||||
///////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCM
|
||||
blj///////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n/
|
||||
//////////////////////////////////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwD39fT/////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////////////L
|
||||
v7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////////////////+YfWtmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDLv7j///////////////////////////////////////////////+jjH1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH/////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
|
||||
//////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////////////
|
||||
//////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////39fSAXUJmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCYfWv////////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDB
|
||||
s6r////////////////////////////////////////////////////////Lv7hmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////u6+mMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////
|
||||
///////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwB0SSbUy8X/////////////////////////////////////////////////
|
||||
///////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////////+jjH1mMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////
|
||||
///////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbBs6r/////////////////////////
|
||||
///////////////////////////////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwB0SSb/////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////d1tGYfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDBs6r39fT///////////////////////////////////////////////////////////+AXUJm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXULBs6rBs6rm4N3/
|
||||
//////////////////////////////////////////////////////////////////////////////+A
|
||||
XUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD/////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////39fTBs6rBs6pmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCjjH3Bs6rUy8X/////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
37
SDL/Administration/frmZinsnachberechnung.vb
Normal file
37
SDL/Administration/frmZinsnachberechnung.vb
Normal file
@@ -0,0 +1,37 @@
|
||||
Public Class frmZinsnachberechnung
|
||||
Dim KASSENBind As cEasyBinding
|
||||
Public table
|
||||
Public BIND_DB
|
||||
Sub New(table, BIND_DB)
|
||||
Me.table = table
|
||||
Me.BIND_DB = BIND_DB
|
||||
InitializeComponent()
|
||||
End Sub
|
||||
|
||||
Private Sub frmZinsnachberechnung_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Try
|
||||
KASSENBind = New cEasyBinding(BIND_DB)
|
||||
Select Case table
|
||||
Case "" 'Sonderfall
|
||||
Case Else
|
||||
KASSENBind.initBinding("SELECT * FROM " & table & " WHERE verrechnet is null", table)
|
||||
For Each c As DataColumn In KASSENBind.bindingdataTable.Columns
|
||||
If c.ColumnName = "SSMA_TimeStamp" Then
|
||||
KASSENBind.bindingdataTable.Columns.Remove(c)
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
' KASSENBind.initBinding("SELECT * FROM " & table & "", table)
|
||||
End Select
|
||||
DataGridView.DataSource = KASSENBind.bindingdataTable
|
||||
' DataGridView.AutoSize = True
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub btnSpeichern_Click(sender As Object, e As EventArgs) Handles btnSpeichern.Click
|
||||
KASSENBind.updateBinding()
|
||||
End Sub
|
||||
End Class
|
||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.4.6.3")>
|
||||
<Assembly: AssemblyFileVersion("1.4.6.3")>
|
||||
<Assembly: AssemblyVersion("1.4.6.6")>
|
||||
<Assembly: AssemblyFileVersion("1.4.6.6")>
|
||||
|
||||
@@ -488,6 +488,12 @@
|
||||
<Compile Include="Administration\frmKasseAbschliessen.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Administration\frmZinsnachberechnung.Designer.vb">
|
||||
<DependentUpon>frmZinsnachberechnung.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Administration\frmZinsnachberechnung.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Administration\frmKassenVerwaltung.Designer.vb">
|
||||
<DependentUpon>frmKassenVerwaltung.vb</DependentUpon>
|
||||
</Compile>
|
||||
@@ -3300,6 +3306,9 @@
|
||||
<EmbeddedResource Include="Administration\frmKasseAbschliessen.resx">
|
||||
<DependentUpon>frmKasseAbschliessen.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Administration\frmZinsnachberechnung.resx">
|
||||
<DependentUpon>frmZinsnachberechnung.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Administration\frmKassenVerwaltung.resx">
|
||||
<DependentUpon>frmKassenVerwaltung.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
||||
149
SDL/USTV/frmMDM_USTVAntrag.Designer.vb
generated
149
SDL/USTV/frmMDM_USTVAntrag.Designer.vb
generated
@@ -24,13 +24,13 @@ Partial Class frmMDM_USTVAntrag
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMDM_USTVAntrag))
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.pnlBottom = New System.Windows.Forms.Panel()
|
||||
Me.pbMail = New System.Windows.Forms.PictureBox()
|
||||
Me.pb_Beleg = New System.Windows.Forms.PictureBox()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.txtSumme = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtSummeEUR = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label27 = New System.Windows.Forms.Label()
|
||||
Me.picExcel = New System.Windows.Forms.PictureBox()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
@@ -142,6 +142,8 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FakturiertToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.txtSumme = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.pnlBottom.SuspendLayout()
|
||||
CType(Me.pbMail, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pb_Beleg, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@@ -173,10 +175,12 @@ Partial Class frmMDM_USTVAntrag
|
||||
'
|
||||
Me.pnlBottom.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
|
||||
Me.pnlBottom.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnlBottom.Controls.Add(Me.Label18)
|
||||
Me.pnlBottom.Controls.Add(Me.txtSumme)
|
||||
Me.pnlBottom.Controls.Add(Me.pbMail)
|
||||
Me.pnlBottom.Controls.Add(Me.pb_Beleg)
|
||||
Me.pnlBottom.Controls.Add(Me.Button5)
|
||||
Me.pnlBottom.Controls.Add(Me.txtSumme)
|
||||
Me.pnlBottom.Controls.Add(Me.txtSummeEUR)
|
||||
Me.pnlBottom.Controls.Add(Me.Label27)
|
||||
Me.pnlBottom.Controls.Add(Me.picExcel)
|
||||
Me.pnlBottom.Controls.Add(Me.Button4)
|
||||
@@ -187,7 +191,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.pnlBottom.Controls.Add(Me.Button1)
|
||||
Me.pnlBottom.Controls.Add(Me.lbl_EintrageVerarbetiet)
|
||||
Me.pnlBottom.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.pnlBottom.Location = New System.Drawing.Point(0, 649)
|
||||
Me.pnlBottom.Location = New System.Drawing.Point(0, 667)
|
||||
Me.pnlBottom.Name = "pnlBottom"
|
||||
Me.pnlBottom.Size = New System.Drawing.Size(1444, 100)
|
||||
Me.pnlBottom.TabIndex = 3
|
||||
@@ -195,7 +199,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
'pbMail
|
||||
'
|
||||
Me.pbMail.Image = CType(resources.GetObject("pbMail.Image"), System.Drawing.Image)
|
||||
Me.pbMail.Location = New System.Drawing.Point(1110, 17)
|
||||
Me.pbMail.Location = New System.Drawing.Point(1097, 8)
|
||||
Me.pbMail.Name = "pbMail"
|
||||
Me.pbMail.Size = New System.Drawing.Size(35, 35)
|
||||
Me.pbMail.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
@@ -205,7 +209,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
'pb_Beleg
|
||||
'
|
||||
Me.pb_Beleg.Image = CType(resources.GetObject("pb_Beleg.Image"), System.Drawing.Image)
|
||||
Me.pb_Beleg.Location = New System.Drawing.Point(899, 60)
|
||||
Me.pb_Beleg.Location = New System.Drawing.Point(891, 60)
|
||||
Me.pb_Beleg.Name = "pb_Beleg"
|
||||
Me.pb_Beleg.Size = New System.Drawing.Size(35, 35)
|
||||
Me.pb_Beleg.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
@@ -218,7 +222,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button5.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button5.Location = New System.Drawing.Point(869, 17)
|
||||
Me.Button5.Location = New System.Drawing.Point(861, 17)
|
||||
Me.Button5.Name = "Button5"
|
||||
Me.Button5.Size = New System.Drawing.Size(103, 39)
|
||||
Me.Button5.TabIndex = 50
|
||||
@@ -226,45 +230,45 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.Button5.UseVisualStyleBackColor = True
|
||||
Me.Button5.Visible = False
|
||||
'
|
||||
'txtSumme
|
||||
'txtSummeEUR
|
||||
'
|
||||
Me.txtSumme._DateTimeOnly = False
|
||||
Me.txtSumme._numbersOnly = False
|
||||
Me.txtSumme._numbersOnlyKommastellen = ""
|
||||
Me.txtSumme._numbersOnlyTrennzeichen = False
|
||||
Me.txtSumme._Prozent = False
|
||||
Me.txtSumme._ShortDateNew = False
|
||||
Me.txtSumme._ShortDateOnly = False
|
||||
Me.txtSumme._TimeOnly = False
|
||||
Me.txtSumme._TimeOnly_Seconds = False
|
||||
Me.txtSumme._value = ""
|
||||
Me.txtSumme._Waehrung = True
|
||||
Me.txtSumme._WaehrungZeichen = True
|
||||
Me.txtSumme.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtSumme.Location = New System.Drawing.Point(1158, 67)
|
||||
Me.txtSumme.MaxLineLength = -1
|
||||
Me.txtSumme.MaxLines_Warning = ""
|
||||
Me.txtSumme.MaxLines_Warning_Label = Nothing
|
||||
Me.txtSumme.Name = "txtSumme"
|
||||
Me.txtSumme.ReadOnly = True
|
||||
Me.txtSumme.Size = New System.Drawing.Size(88, 20)
|
||||
Me.txtSumme.TabIndex = 49
|
||||
Me.txtSumme.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
Me.txtSummeEUR._DateTimeOnly = False
|
||||
Me.txtSummeEUR._numbersOnly = False
|
||||
Me.txtSummeEUR._numbersOnlyKommastellen = ""
|
||||
Me.txtSummeEUR._numbersOnlyTrennzeichen = False
|
||||
Me.txtSummeEUR._Prozent = False
|
||||
Me.txtSummeEUR._ShortDateNew = False
|
||||
Me.txtSummeEUR._ShortDateOnly = False
|
||||
Me.txtSummeEUR._TimeOnly = False
|
||||
Me.txtSummeEUR._TimeOnly_Seconds = False
|
||||
Me.txtSummeEUR._value = ""
|
||||
Me.txtSummeEUR._Waehrung = True
|
||||
Me.txtSummeEUR._WaehrungZeichen = True
|
||||
Me.txtSummeEUR.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtSummeEUR.Location = New System.Drawing.Point(1145, 75)
|
||||
Me.txtSummeEUR.MaxLineLength = -1
|
||||
Me.txtSummeEUR.MaxLines_Warning = ""
|
||||
Me.txtSummeEUR.MaxLines_Warning_Label = Nothing
|
||||
Me.txtSummeEUR.Name = "txtSummeEUR"
|
||||
Me.txtSummeEUR.ReadOnly = True
|
||||
Me.txtSummeEUR.Size = New System.Drawing.Size(88, 20)
|
||||
Me.txtSummeEUR.TabIndex = 49
|
||||
Me.txtSummeEUR.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
'
|
||||
'Label27
|
||||
'
|
||||
Me.Label27.AutoSize = True
|
||||
Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label27.Location = New System.Drawing.Point(1107, 70)
|
||||
Me.Label27.Location = New System.Drawing.Point(1090, 78)
|
||||
Me.Label27.Name = "Label27"
|
||||
Me.Label27.Size = New System.Drawing.Size(45, 13)
|
||||
Me.Label27.Size = New System.Drawing.Size(54, 13)
|
||||
Me.Label27.TabIndex = 48
|
||||
Me.Label27.Text = "Summe:"
|
||||
Me.Label27.Text = "Summe €:"
|
||||
'
|
||||
'picExcel
|
||||
'
|
||||
Me.picExcel.Image = CType(resources.GetObject("picExcel.Image"), System.Drawing.Image)
|
||||
Me.picExcel.Location = New System.Drawing.Point(1158, 17)
|
||||
Me.picExcel.Location = New System.Drawing.Point(1145, 8)
|
||||
Me.picExcel.Name = "picExcel"
|
||||
Me.picExcel.Size = New System.Drawing.Size(35, 35)
|
||||
Me.picExcel.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
@@ -276,7 +280,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.ForeColor = System.Drawing.Color.Black
|
||||
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button4.Location = New System.Drawing.Point(979, 17)
|
||||
Me.Button4.Location = New System.Drawing.Point(971, 17)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(103, 39)
|
||||
Me.Button4.TabIndex = 28
|
||||
@@ -286,7 +290,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
'picPDF
|
||||
'
|
||||
Me.picPDF.Image = CType(resources.GetObject("picPDF.Image"), System.Drawing.Image)
|
||||
Me.picPDF.Location = New System.Drawing.Point(1211, 17)
|
||||
Me.picPDF.Location = New System.Drawing.Point(1198, 8)
|
||||
Me.picPDF.Name = "picPDF"
|
||||
Me.picPDF.Size = New System.Drawing.Size(35, 35)
|
||||
Me.picPDF.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
@@ -298,7 +302,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.btnMail.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnMail.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnMail.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnMail.Location = New System.Drawing.Point(979, 62)
|
||||
Me.btnMail.Location = New System.Drawing.Point(971, 62)
|
||||
Me.btnMail.Name = "btnMail"
|
||||
Me.btnMail.Size = New System.Drawing.Size(103, 28)
|
||||
Me.btnMail.TabIndex = 26
|
||||
@@ -1462,7 +1466,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.pnlBody.Controls.Add(Me.TabControl1)
|
||||
Me.pnlBody.Location = New System.Drawing.Point(0, 206)
|
||||
Me.pnlBody.Name = "pnlBody"
|
||||
Me.pnlBody.Size = New System.Drawing.Size(1444, 443)
|
||||
Me.pnlBody.Size = New System.Drawing.Size(1444, 461)
|
||||
Me.pnlBody.TabIndex = 1
|
||||
'
|
||||
'TabControl1
|
||||
@@ -1473,7 +1477,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.TabControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
Me.TabControl1.Size = New System.Drawing.Size(1442, 441)
|
||||
Me.TabControl1.Size = New System.Drawing.Size(1442, 459)
|
||||
Me.TabControl1.TabIndex = 1
|
||||
'
|
||||
'TabPage1
|
||||
@@ -1483,7 +1487,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage1.Name = "TabPage1"
|
||||
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage1.Size = New System.Drawing.Size(1434, 415)
|
||||
Me.TabPage1.Size = New System.Drawing.Size(1434, 433)
|
||||
Me.TabPage1.TabIndex = 0
|
||||
Me.TabPage1.Text = "Antragspositionen"
|
||||
Me.TabPage1.UseVisualStyleBackColor = True
|
||||
@@ -1493,8 +1497,8 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.dgvUSTVPositionen.AKTUALISIERUNGS_INTERVALL = 500
|
||||
Me.dgvUSTVPositionen.AllowUserToAddRows = False
|
||||
Me.dgvUSTVPositionen.AllowUserToDeleteRows = False
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvUSTVPositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvUSTVPositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
|
||||
Me.dgvUSTVPositionen.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -1506,14 +1510,14 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.dgvUSTVPositionen.RowHeadersVisible = False
|
||||
Me.dgvUSTVPositionen.RowHeadersWidth = 62
|
||||
Me.dgvUSTVPositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvUSTVPositionen.Size = New System.Drawing.Size(1428, 140)
|
||||
Me.dgvUSTVPositionen.Size = New System.Drawing.Size(1428, 158)
|
||||
Me.dgvUSTVPositionen.TabIndex = 0
|
||||
'
|
||||
'pnlAntragsPosDetails
|
||||
'
|
||||
Me.pnlAntragsPosDetails.Controls.Add(Me.Panel2)
|
||||
Me.pnlAntragsPosDetails.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.pnlAntragsPosDetails.Location = New System.Drawing.Point(3, 149)
|
||||
Me.pnlAntragsPosDetails.Location = New System.Drawing.Point(3, 167)
|
||||
Me.pnlAntragsPosDetails.Name = "pnlAntragsPosDetails"
|
||||
Me.pnlAntragsPosDetails.Size = New System.Drawing.Size(1428, 263)
|
||||
Me.pnlAntragsPosDetails.TabIndex = 2
|
||||
@@ -1633,7 +1637,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage2.Name = "TabPage2"
|
||||
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(1444, 415)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(1434, 415)
|
||||
Me.TabPage2.TabIndex = 1
|
||||
Me.TabPage2.Text = "Erstattungspositionen"
|
||||
Me.TabPage2.UseVisualStyleBackColor = True
|
||||
@@ -1647,7 +1651,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel3.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Panel3.Name = "Panel3"
|
||||
Me.Panel3.Size = New System.Drawing.Size(1438, 409)
|
||||
Me.Panel3.Size = New System.Drawing.Size(1428, 409)
|
||||
Me.Panel3.TabIndex = 3
|
||||
'
|
||||
'dgvErstattungspositionen
|
||||
@@ -1655,8 +1659,8 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.dgvErstattungspositionen.AKTUALISIERUNGS_INTERVALL = 500
|
||||
Me.dgvErstattungspositionen.AllowUserToAddRows = False
|
||||
Me.dgvErstattungspositionen.AllowUserToDeleteRows = False
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvErstattungspositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvErstattungspositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4
|
||||
Me.dgvErstattungspositionen.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -1668,7 +1672,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.dgvErstattungspositionen.RowHeadersVisible = False
|
||||
Me.dgvErstattungspositionen.RowHeadersWidth = 62
|
||||
Me.dgvErstattungspositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvErstattungspositionen.Size = New System.Drawing.Size(1438, 143)
|
||||
Me.dgvErstattungspositionen.Size = New System.Drawing.Size(1428, 143)
|
||||
Me.dgvErstattungspositionen.TabIndex = 1
|
||||
'
|
||||
'pnlErstattungsdetails
|
||||
@@ -1680,7 +1684,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.pnlErstattungsdetails.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.pnlErstattungsdetails.Location = New System.Drawing.Point(0, 146)
|
||||
Me.pnlErstattungsdetails.Name = "pnlErstattungsdetails"
|
||||
Me.pnlErstattungsdetails.Size = New System.Drawing.Size(1436, 261)
|
||||
Me.pnlErstattungsdetails.Size = New System.Drawing.Size(1426, 261)
|
||||
Me.pnlErstattungsdetails.TabIndex = 0
|
||||
'
|
||||
'UstCntlUSTV_AntragErstattungen1
|
||||
@@ -1688,7 +1692,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.UstCntlUSTV_AntragErstattungen1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.UstCntlUSTV_AntragErstattungen1.Location = New System.Drawing.Point(154, 0)
|
||||
Me.UstCntlUSTV_AntragErstattungen1.Name = "UstCntlUSTV_AntragErstattungen1"
|
||||
Me.UstCntlUSTV_AntragErstattungen1.Size = New System.Drawing.Size(1280, 259)
|
||||
Me.UstCntlUSTV_AntragErstattungen1.Size = New System.Drawing.Size(1270, 259)
|
||||
Me.UstCntlUSTV_AntragErstattungen1.TabIndex = 2
|
||||
'
|
||||
'Panel1
|
||||
@@ -1809,11 +1813,46 @@ Partial Class frmMDM_USTVAntrag
|
||||
Me.FakturiertToolStripMenuItem.Text = "Fakturiert zurücksetzen"
|
||||
Me.FakturiertToolStripMenuItem.Visible = False
|
||||
'
|
||||
'txtSumme
|
||||
'
|
||||
Me.txtSumme._DateTimeOnly = False
|
||||
Me.txtSumme._numbersOnly = False
|
||||
Me.txtSumme._numbersOnlyKommastellen = ""
|
||||
Me.txtSumme._numbersOnlyTrennzeichen = False
|
||||
Me.txtSumme._Prozent = False
|
||||
Me.txtSumme._ShortDateNew = False
|
||||
Me.txtSumme._ShortDateOnly = False
|
||||
Me.txtSumme._TimeOnly = False
|
||||
Me.txtSumme._TimeOnly_Seconds = False
|
||||
Me.txtSumme._value = ""
|
||||
Me.txtSumme._Waehrung = True
|
||||
Me.txtSumme._WaehrungZeichen = True
|
||||
Me.txtSumme.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtSumme.Location = New System.Drawing.Point(1145, 51)
|
||||
Me.txtSumme.MaxLineLength = -1
|
||||
Me.txtSumme.MaxLines_Warning = ""
|
||||
Me.txtSumme.MaxLines_Warning_Label = Nothing
|
||||
Me.txtSumme.Name = "txtSumme"
|
||||
Me.txtSumme.ReadOnly = True
|
||||
Me.txtSumme.Size = New System.Drawing.Size(88, 20)
|
||||
Me.txtSumme.TabIndex = 53
|
||||
Me.txtSumme.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
'
|
||||
'Label18
|
||||
'
|
||||
Me.Label18.AutoSize = True
|
||||
Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label18.Location = New System.Drawing.Point(1090, 58)
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Size = New System.Drawing.Size(45, 13)
|
||||
Me.Label18.TabIndex = 54
|
||||
Me.Label18.Text = "Summe:"
|
||||
'
|
||||
'frmMDM_USTVAntrag
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1444, 749)
|
||||
Me.ClientSize = New System.Drawing.Size(1444, 767)
|
||||
Me.Controls.Add(Me.pnlHeader)
|
||||
Me.Controls.Add(Me.pnlBody)
|
||||
Me.Controls.Add(Me.pnlBottom)
|
||||
@@ -1946,7 +1985,7 @@ Partial Class frmMDM_USTVAntrag
|
||||
Friend WithEvents Label14 As Label
|
||||
Friend WithEvents txtEingereichtAm As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents picExcel As PictureBox
|
||||
Friend WithEvents txtSumme As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtSummeEUR As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label27 As Label
|
||||
Friend WithEvents btnAbfertigungsNrVergeben As Button
|
||||
Friend WithEvents Label15 As Label
|
||||
@@ -1974,4 +2013,6 @@ Partial Class frmMDM_USTVAntrag
|
||||
Friend WithEvents FakturiertToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents FakturiertZurücksetzenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents pbMail As PictureBox
|
||||
Friend WithEvents Label18 As Label
|
||||
Friend WithEvents txtSumme As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
End Class
|
||||
|
||||
@@ -2845,7 +2845,7 @@ Public Class frmMDM_USTVAntrag
|
||||
ElseIf TabControl1.SelectedTab Is TabPage2 Then
|
||||
initdgvErstattungen()
|
||||
posTabisSelected = False
|
||||
txtSumme._value = 0
|
||||
txtSummeEUR._value = 0
|
||||
End If
|
||||
|
||||
|
||||
@@ -3446,18 +3446,24 @@ Public Class frmMDM_USTVAntrag
|
||||
|
||||
Private Sub calcSumme()
|
||||
|
||||
Dim countSummeEUR As Double = 0
|
||||
Dim countSumme As Double = 0
|
||||
|
||||
If posTabisSelected Then
|
||||
|
||||
For i As Integer = 0 To dgvUSTVPositionen.SelectedRows.Count - 1
|
||||
If Not IsDBNull(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetragEUR").Value) AndAlso IsNumeric(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetragEUR").Value) Then
|
||||
countSumme += CDbl(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetragEUR").Value)
|
||||
countSummeEUR += CDbl(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetragEUR").Value)
|
||||
End If
|
||||
|
||||
If Not IsDBNull(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetrag").Value) AndAlso IsNumeric(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetrag").Value) Then
|
||||
countSumme += CDbl(dgvUSTVPositionen.SelectedRows(i).Cells("UStVPo_USteuerbetrag").Value)
|
||||
End If
|
||||
Next
|
||||
|
||||
End If
|
||||
|
||||
txtSummeEUR._value = countSummeEUR.ToString
|
||||
txtSumme._value = countSumme.ToString
|
||||
|
||||
End Sub
|
||||
|
||||
716
SDL/buchhaltung/usrCntlBH.Designer.vb
generated
716
SDL/buchhaltung/usrCntlBH.Designer.vb
generated
@@ -25,20 +25,29 @@ Partial Class usrCntlBH
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.TabPage1 = New System.Windows.Forms.TabPage()
|
||||
Me.GroupBox11 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label51 = New System.Windows.Forms.Label()
|
||||
Me.Label49 = New System.Windows.Forms.Label()
|
||||
Me.btnZinsbelastung = New System.Windows.Forms.Button()
|
||||
Me.txtZinssatz = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label45 = New System.Windows.Forms.Label()
|
||||
Me.Label48 = New System.Windows.Forms.Label()
|
||||
Me.txtKdNrvon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label46 = New System.Windows.Forms.Label()
|
||||
Me.txtKdNrbis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtTolInTagen = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label47 = New System.Windows.Forms.Label()
|
||||
Me.Label44 = New System.Windows.Forms.Label()
|
||||
Me.txtZRvon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtZRbis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label42 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox10 = New System.Windows.Forms.GroupBox()
|
||||
Me.btnZNBverrechnen = New System.Windows.Forms.Button()
|
||||
Me.txtnichtabrechneteKunden = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label43 = New System.Windows.Forms.Label()
|
||||
Me.Button13 = New System.Windows.Forms.Button()
|
||||
Me.Button12 = New System.Windows.Forms.Button()
|
||||
Me.Label37 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox9 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label41 = New System.Windows.Forms.Label()
|
||||
Me.Button11 = New System.Windows.Forms.Button()
|
||||
Me.Label40 = New System.Windows.Forms.Label()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.txtStichtag = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label39 = New System.Windows.Forms.Label()
|
||||
Me.Label38 = New System.Windows.Forms.Label()
|
||||
Me.Button9 = New System.Windows.Forms.Button()
|
||||
Me.lblnichtabgerechneteZNB = New System.Windows.Forms.Label()
|
||||
Me.Label34 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox8 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label36 = New System.Windows.Forms.Label()
|
||||
@@ -56,13 +65,13 @@ Partial Class usrCntlBH
|
||||
Me.Label26 = New System.Windows.Forms.Label()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label50 = New System.Windows.Forms.Label()
|
||||
Me.cbxMdmSollHabenOhneKdNr = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxMdmHabenHaben = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxMdmSollSoll = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxMdmSollHaben = New System.Windows.Forms.CheckBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.btnWord = New System.Windows.Forms.Button()
|
||||
Me.Label24 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
@@ -70,6 +79,7 @@ Partial Class usrCntlBH
|
||||
Me.GroupBox4 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label25 = New System.Windows.Forms.Label()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Label24 = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
Me.cbxBankgarantieInfo = New System.Windows.Forms.CheckBox()
|
||||
@@ -120,16 +130,27 @@ Partial Class usrCntlBH
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.tbcntr = New System.Windows.Forms.TabControl()
|
||||
Me.TabPage5 = New System.Windows.Forms.TabPage()
|
||||
Me.Label37 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox9 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label41 = New System.Windows.Forms.Label()
|
||||
Me.Button11 = New System.Windows.Forms.Button()
|
||||
Me.Label40 = New System.Windows.Forms.Label()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.txtStichtag = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label39 = New System.Windows.Forms.Label()
|
||||
Me.Label38 = New System.Windows.Forms.Label()
|
||||
Me.Button9 = New System.Windows.Forms.Button()
|
||||
Me.Label28 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox6 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label31 = New System.Windows.Forms.Label()
|
||||
Me.Label30 = New System.Windows.Forms.Label()
|
||||
Me.Label29 = New System.Windows.Forms.Label()
|
||||
Me.Button7 = New System.Windows.Forms.Button()
|
||||
Me.Label52 = New System.Windows.Forms.Label()
|
||||
Me.pnl.SuspendLayout()
|
||||
Me.TabPage1.SuspendLayout()
|
||||
Me.GroupBox11.SuspendLayout()
|
||||
Me.GroupBox10.SuspendLayout()
|
||||
Me.GroupBox9.SuspendLayout()
|
||||
Me.GroupBox8.SuspendLayout()
|
||||
Me.GroupBox7.SuspendLayout()
|
||||
Me.GroupBox5.SuspendLayout()
|
||||
@@ -142,6 +163,7 @@ Partial Class usrCntlBH
|
||||
Me.Panel2.SuspendLayout()
|
||||
Me.tbcntr.SuspendLayout()
|
||||
Me.TabPage5.SuspendLayout()
|
||||
Me.GroupBox9.SuspendLayout()
|
||||
Me.GroupBox6.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
@@ -168,10 +190,9 @@ Partial Class usrCntlBH
|
||||
'TabPage1
|
||||
'
|
||||
Me.TabPage1.AutoScroll = True
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox11)
|
||||
Me.TabPage1.Controls.Add(Me.Label42)
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox10)
|
||||
Me.TabPage1.Controls.Add(Me.Label37)
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox9)
|
||||
Me.TabPage1.Controls.Add(Me.Label34)
|
||||
Me.TabPage1.Controls.Add(Me.GroupBox8)
|
||||
Me.TabPage1.Controls.Add(Me.Label32)
|
||||
@@ -193,6 +214,253 @@ Partial Class usrCntlBH
|
||||
Me.TabPage1.Text = "Allgemein"
|
||||
Me.TabPage1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox11
|
||||
'
|
||||
Me.GroupBox11.Controls.Add(Me.Label52)
|
||||
Me.GroupBox11.Controls.Add(Me.btnZNBverrechnen)
|
||||
Me.GroupBox11.Controls.Add(Me.Label51)
|
||||
Me.GroupBox11.Controls.Add(Me.txtnichtabrechneteKunden)
|
||||
Me.GroupBox11.Controls.Add(Me.Label49)
|
||||
Me.GroupBox11.Controls.Add(Me.btnZinsbelastung)
|
||||
Me.GroupBox11.Controls.Add(Me.Button13)
|
||||
Me.GroupBox11.Controls.Add(Me.txtZinssatz)
|
||||
Me.GroupBox11.Controls.Add(Me.lblnichtabgerechneteZNB)
|
||||
Me.GroupBox11.Controls.Add(Me.Label45)
|
||||
Me.GroupBox11.Controls.Add(Me.Label48)
|
||||
Me.GroupBox11.Controls.Add(Me.txtKdNrvon)
|
||||
Me.GroupBox11.Controls.Add(Me.Label46)
|
||||
Me.GroupBox11.Controls.Add(Me.txtKdNrbis)
|
||||
Me.GroupBox11.Controls.Add(Me.txtTolInTagen)
|
||||
Me.GroupBox11.Controls.Add(Me.Label47)
|
||||
Me.GroupBox11.Controls.Add(Me.Label44)
|
||||
Me.GroupBox11.Controls.Add(Me.txtZRvon)
|
||||
Me.GroupBox11.Controls.Add(Me.txtZRbis)
|
||||
Me.GroupBox11.Location = New System.Drawing.Point(5, 874)
|
||||
Me.GroupBox11.Name = "GroupBox11"
|
||||
Me.GroupBox11.Size = New System.Drawing.Size(847, 69)
|
||||
Me.GroupBox11.TabIndex = 35
|
||||
Me.GroupBox11.TabStop = False
|
||||
'
|
||||
'Label51
|
||||
'
|
||||
Me.Label51.AutoSize = True
|
||||
Me.Label51.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label51.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label51.Location = New System.Drawing.Point(2, -4)
|
||||
Me.Label51.Name = "Label51"
|
||||
Me.Label51.Size = New System.Drawing.Size(160, 17)
|
||||
Me.Label51.TabIndex = 36
|
||||
Me.Label51.Text = "Zinsnachberechnung"
|
||||
'
|
||||
'Label49
|
||||
'
|
||||
Me.Label49.AutoSize = True
|
||||
Me.Label49.Location = New System.Drawing.Point(123, 45)
|
||||
Me.Label49.Name = "Label49"
|
||||
Me.Label49.Size = New System.Drawing.Size(53, 13)
|
||||
Me.Label49.TabIndex = 33
|
||||
Me.Label49.Text = "Zinssatz*:"
|
||||
'
|
||||
'btnZinsbelastung
|
||||
'
|
||||
Me.btnZinsbelastung.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.btnZinsbelastung.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnZinsbelastung.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnZinsbelastung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnZinsbelastung.Location = New System.Drawing.Point(5, 19)
|
||||
Me.btnZinsbelastung.Name = "btnZinsbelastung"
|
||||
Me.btnZinsbelastung.Size = New System.Drawing.Size(98, 44)
|
||||
Me.btnZinsbelastung.TabIndex = 8
|
||||
Me.btnZinsbelastung.Text = "Zinsbelastung erstellen"
|
||||
Me.btnZinsbelastung.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtZinssatz
|
||||
'
|
||||
Me.txtZinssatz._DateTimeOnly = False
|
||||
Me.txtZinssatz._numbersOnly = False
|
||||
Me.txtZinssatz._numbersOnlyKommastellen = ""
|
||||
Me.txtZinssatz._numbersOnlyTrennzeichen = True
|
||||
Me.txtZinssatz._Prozent = False
|
||||
Me.txtZinssatz._ShortDateNew = False
|
||||
Me.txtZinssatz._ShortDateOnly = False
|
||||
Me.txtZinssatz._TimeOnly = False
|
||||
Me.txtZinssatz._TimeOnly_Seconds = False
|
||||
Me.txtZinssatz._value = "9.5"
|
||||
Me.txtZinssatz._Waehrung = False
|
||||
Me.txtZinssatz._WaehrungZeichen = True
|
||||
Me.txtZinssatz.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtZinssatz.Location = New System.Drawing.Point(194, 40)
|
||||
Me.txtZinssatz.MaxLineLength = -1
|
||||
Me.txtZinssatz.MaxLines_Warning = ""
|
||||
Me.txtZinssatz.MaxLines_Warning_Label = Nothing
|
||||
Me.txtZinssatz.Name = "txtZinssatz"
|
||||
Me.txtZinssatz.Size = New System.Drawing.Size(34, 20)
|
||||
Me.txtZinssatz.TabIndex = 34
|
||||
Me.txtZinssatz.Text = "9.5"
|
||||
'
|
||||
'Label45
|
||||
'
|
||||
Me.Label45.AutoSize = True
|
||||
Me.Label45.Location = New System.Drawing.Point(252, 19)
|
||||
Me.Label45.Name = "Label45"
|
||||
Me.Label45.Size = New System.Drawing.Size(82, 13)
|
||||
Me.Label45.TabIndex = 29
|
||||
Me.Label45.Text = "Kunden-Nr von:"
|
||||
'
|
||||
'Label48
|
||||
'
|
||||
Me.Label48.AutoSize = True
|
||||
Me.Label48.Location = New System.Drawing.Point(123, 21)
|
||||
Me.Label48.Name = "Label48"
|
||||
Me.Label48.Size = New System.Drawing.Size(67, 13)
|
||||
Me.Label48.TabIndex = 29
|
||||
Me.Label48.Text = "Tol inTagen:"
|
||||
'
|
||||
'txtKdNrvon
|
||||
'
|
||||
Me.txtKdNrvon._DateTimeOnly = False
|
||||
Me.txtKdNrvon._numbersOnly = False
|
||||
Me.txtKdNrvon._numbersOnlyKommastellen = ""
|
||||
Me.txtKdNrvon._numbersOnlyTrennzeichen = True
|
||||
Me.txtKdNrvon._Prozent = False
|
||||
Me.txtKdNrvon._ShortDateNew = False
|
||||
Me.txtKdNrvon._ShortDateOnly = False
|
||||
Me.txtKdNrvon._TimeOnly = False
|
||||
Me.txtKdNrvon._TimeOnly_Seconds = False
|
||||
Me.txtKdNrvon._value = Nothing
|
||||
Me.txtKdNrvon._Waehrung = False
|
||||
Me.txtKdNrvon._WaehrungZeichen = True
|
||||
Me.txtKdNrvon.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtKdNrvon.Location = New System.Drawing.Point(337, 16)
|
||||
Me.txtKdNrvon.MaxLineLength = -1
|
||||
Me.txtKdNrvon.MaxLines_Warning = ""
|
||||
Me.txtKdNrvon.MaxLines_Warning_Label = Nothing
|
||||
Me.txtKdNrvon.Name = "txtKdNrvon"
|
||||
Me.txtKdNrvon.Size = New System.Drawing.Size(70, 20)
|
||||
Me.txtKdNrvon.TabIndex = 30
|
||||
'
|
||||
'Label46
|
||||
'
|
||||
Me.Label46.AutoSize = True
|
||||
Me.Label46.Location = New System.Drawing.Point(418, 43)
|
||||
Me.Label46.Name = "Label46"
|
||||
Me.Label46.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label46.TabIndex = 22
|
||||
Me.Label46.Text = "bis:"
|
||||
'
|
||||
'txtKdNrbis
|
||||
'
|
||||
Me.txtKdNrbis._DateTimeOnly = False
|
||||
Me.txtKdNrbis._numbersOnly = False
|
||||
Me.txtKdNrbis._numbersOnlyKommastellen = ""
|
||||
Me.txtKdNrbis._numbersOnlyTrennzeichen = True
|
||||
Me.txtKdNrbis._Prozent = False
|
||||
Me.txtKdNrbis._ShortDateNew = False
|
||||
Me.txtKdNrbis._ShortDateOnly = False
|
||||
Me.txtKdNrbis._TimeOnly = False
|
||||
Me.txtKdNrbis._TimeOnly_Seconds = False
|
||||
Me.txtKdNrbis._value = Nothing
|
||||
Me.txtKdNrbis._Waehrung = False
|
||||
Me.txtKdNrbis._WaehrungZeichen = True
|
||||
Me.txtKdNrbis.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtKdNrbis.Location = New System.Drawing.Point(445, 16)
|
||||
Me.txtKdNrbis.MaxLineLength = -1
|
||||
Me.txtKdNrbis.MaxLines_Warning = ""
|
||||
Me.txtKdNrbis.MaxLines_Warning_Label = Nothing
|
||||
Me.txtKdNrbis.Name = "txtKdNrbis"
|
||||
Me.txtKdNrbis.Size = New System.Drawing.Size(70, 20)
|
||||
Me.txtKdNrbis.TabIndex = 32
|
||||
'
|
||||
'txtTolInTagen
|
||||
'
|
||||
Me.txtTolInTagen._DateTimeOnly = False
|
||||
Me.txtTolInTagen._numbersOnly = False
|
||||
Me.txtTolInTagen._numbersOnlyKommastellen = ""
|
||||
Me.txtTolInTagen._numbersOnlyTrennzeichen = True
|
||||
Me.txtTolInTagen._Prozent = False
|
||||
Me.txtTolInTagen._ShortDateNew = False
|
||||
Me.txtTolInTagen._ShortDateOnly = False
|
||||
Me.txtTolInTagen._TimeOnly = False
|
||||
Me.txtTolInTagen._TimeOnly_Seconds = False
|
||||
Me.txtTolInTagen._value = "0"
|
||||
Me.txtTolInTagen._Waehrung = False
|
||||
Me.txtTolInTagen._WaehrungZeichen = True
|
||||
Me.txtTolInTagen.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtTolInTagen.Location = New System.Drawing.Point(194, 16)
|
||||
Me.txtTolInTagen.MaxLineLength = -1
|
||||
Me.txtTolInTagen.MaxLines_Warning = ""
|
||||
Me.txtTolInTagen.MaxLines_Warning_Label = Nothing
|
||||
Me.txtTolInTagen.Name = "txtTolInTagen"
|
||||
Me.txtTolInTagen.Size = New System.Drawing.Size(34, 20)
|
||||
Me.txtTolInTagen.TabIndex = 30
|
||||
Me.txtTolInTagen.Text = "0"
|
||||
'
|
||||
'Label47
|
||||
'
|
||||
Me.Label47.AutoSize = True
|
||||
Me.Label47.Location = New System.Drawing.Point(252, 43)
|
||||
Me.Label47.Name = "Label47"
|
||||
Me.Label47.Size = New System.Drawing.Size(82, 13)
|
||||
Me.Label47.TabIndex = 23
|
||||
Me.Label47.Text = "Zahlungen von:"
|
||||
'
|
||||
'Label44
|
||||
'
|
||||
Me.Label44.AutoSize = True
|
||||
Me.Label44.Location = New System.Drawing.Point(416, 19)
|
||||
Me.Label44.Name = "Label44"
|
||||
Me.Label44.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label44.TabIndex = 31
|
||||
Me.Label44.Text = "bis:"
|
||||
'
|
||||
'txtZRvon
|
||||
'
|
||||
Me.txtZRvon._DateTimeOnly = False
|
||||
Me.txtZRvon._numbersOnly = False
|
||||
Me.txtZRvon._numbersOnlyKommastellen = ""
|
||||
Me.txtZRvon._numbersOnlyTrennzeichen = True
|
||||
Me.txtZRvon._Prozent = False
|
||||
Me.txtZRvon._ShortDateNew = True
|
||||
Me.txtZRvon._ShortDateOnly = False
|
||||
Me.txtZRvon._TimeOnly = False
|
||||
Me.txtZRvon._TimeOnly_Seconds = False
|
||||
Me.txtZRvon._value = ""
|
||||
Me.txtZRvon._Waehrung = False
|
||||
Me.txtZRvon._WaehrungZeichen = True
|
||||
Me.txtZRvon.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtZRvon.Location = New System.Drawing.Point(337, 40)
|
||||
Me.txtZRvon.MaxLength = 10
|
||||
Me.txtZRvon.MaxLineLength = -1
|
||||
Me.txtZRvon.MaxLines_Warning = ""
|
||||
Me.txtZRvon.MaxLines_Warning_Label = Nothing
|
||||
Me.txtZRvon.Name = "txtZRvon"
|
||||
Me.txtZRvon.Size = New System.Drawing.Size(70, 20)
|
||||
Me.txtZRvon.TabIndex = 21
|
||||
'
|
||||
'txtZRbis
|
||||
'
|
||||
Me.txtZRbis._DateTimeOnly = False
|
||||
Me.txtZRbis._numbersOnly = False
|
||||
Me.txtZRbis._numbersOnlyKommastellen = ""
|
||||
Me.txtZRbis._numbersOnlyTrennzeichen = True
|
||||
Me.txtZRbis._Prozent = False
|
||||
Me.txtZRbis._ShortDateNew = True
|
||||
Me.txtZRbis._ShortDateOnly = False
|
||||
Me.txtZRbis._TimeOnly = False
|
||||
Me.txtZRbis._TimeOnly_Seconds = False
|
||||
Me.txtZRbis._value = ""
|
||||
Me.txtZRbis._Waehrung = False
|
||||
Me.txtZRbis._WaehrungZeichen = True
|
||||
Me.txtZRbis.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtZRbis.Location = New System.Drawing.Point(445, 40)
|
||||
Me.txtZRbis.MaxLength = 10
|
||||
Me.txtZRbis.MaxLineLength = -1
|
||||
Me.txtZRbis.MaxLines_Warning = ""
|
||||
Me.txtZRbis.MaxLines_Warning_Label = Nothing
|
||||
Me.txtZRbis.Name = "txtZRbis"
|
||||
Me.txtZRbis.Size = New System.Drawing.Size(70, 20)
|
||||
Me.txtZRbis.TabIndex = 24
|
||||
'
|
||||
'Label42
|
||||
'
|
||||
Me.Label42.AutoSize = True
|
||||
@@ -214,6 +482,46 @@ Partial Class usrCntlBH
|
||||
Me.GroupBox10.TabIndex = 18
|
||||
Me.GroupBox10.TabStop = False
|
||||
'
|
||||
'btnZNBverrechnen
|
||||
'
|
||||
Me.btnZNBverrechnen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.btnZNBverrechnen.Enabled = False
|
||||
Me.btnZNBverrechnen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnZNBverrechnen.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnZNBverrechnen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnZNBverrechnen.Location = New System.Drawing.Point(743, 39)
|
||||
Me.btnZNBverrechnen.Name = "btnZNBverrechnen"
|
||||
Me.btnZNBverrechnen.Size = New System.Drawing.Size(98, 26)
|
||||
Me.btnZNBverrechnen.TabIndex = 40
|
||||
Me.btnZNBverrechnen.Text = "verrechnen"
|
||||
Me.btnZNBverrechnen.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtnichtabrechneteKunden
|
||||
'
|
||||
Me.txtnichtabrechneteKunden._DateTimeOnly = False
|
||||
Me.txtnichtabrechneteKunden._numbersOnly = False
|
||||
Me.txtnichtabrechneteKunden._numbersOnlyKommastellen = ""
|
||||
Me.txtnichtabrechneteKunden._numbersOnlyTrennzeichen = True
|
||||
Me.txtnichtabrechneteKunden._Prozent = False
|
||||
Me.txtnichtabrechneteKunden._ShortDateNew = False
|
||||
Me.txtnichtabrechneteKunden._ShortDateOnly = False
|
||||
Me.txtnichtabrechneteKunden._TimeOnly = False
|
||||
Me.txtnichtabrechneteKunden._TimeOnly_Seconds = False
|
||||
Me.txtnichtabrechneteKunden._value = "0"
|
||||
Me.txtnichtabrechneteKunden._Waehrung = False
|
||||
Me.txtnichtabrechneteKunden._WaehrungZeichen = True
|
||||
Me.txtnichtabrechneteKunden.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtnichtabrechneteKunden.Location = New System.Drawing.Point(698, 16)
|
||||
Me.txtnichtabrechneteKunden.MaxLineLength = -1
|
||||
Me.txtnichtabrechneteKunden.MaxLines_Warning = ""
|
||||
Me.txtnichtabrechneteKunden.MaxLines_Warning_Label = Nothing
|
||||
Me.txtnichtabrechneteKunden.Name = "txtnichtabrechneteKunden"
|
||||
Me.txtnichtabrechneteKunden.ReadOnly = True
|
||||
Me.txtnichtabrechneteKunden.Size = New System.Drawing.Size(34, 20)
|
||||
Me.txtnichtabrechneteKunden.TabIndex = 39
|
||||
Me.txtnichtabrechneteKunden.Text = "0"
|
||||
Me.txtnichtabrechneteKunden.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
'
|
||||
'Label43
|
||||
'
|
||||
Me.Label43.AutoSize = True
|
||||
@@ -223,6 +531,19 @@ Partial Class usrCntlBH
|
||||
Me.Label43.TabIndex = 2
|
||||
Me.Label43.Text = "Sachkontenzuweisung für Syska."
|
||||
'
|
||||
'Button13
|
||||
'
|
||||
Me.Button13.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button13.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button13.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button13.Location = New System.Drawing.Point(743, 10)
|
||||
Me.Button13.Name = "Button13"
|
||||
Me.Button13.Size = New System.Drawing.Size(98, 26)
|
||||
Me.Button13.TabIndex = 38
|
||||
Me.Button13.Text = "Übersicht"
|
||||
Me.Button13.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button12
|
||||
'
|
||||
Me.Button12.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
@@ -236,142 +557,14 @@ Partial Class usrCntlBH
|
||||
Me.Button12.Text = "Sachkonten"
|
||||
Me.Button12.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label37
|
||||
'lblnichtabgerechneteZNB
|
||||
'
|
||||
Me.Label37.AutoSize = True
|
||||
Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label37.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label37.Location = New System.Drawing.Point(3, 871)
|
||||
Me.Label37.Name = "Label37"
|
||||
Me.Label37.Size = New System.Drawing.Size(136, 17)
|
||||
Me.Label37.TabIndex = 16
|
||||
Me.Label37.Text = "Kontoabstimmung"
|
||||
Me.Label37.Visible = False
|
||||
'
|
||||
'GroupBox9
|
||||
'
|
||||
Me.GroupBox9.Controls.Add(Me.Label41)
|
||||
Me.GroupBox9.Controls.Add(Me.Button11)
|
||||
Me.GroupBox9.Controls.Add(Me.Label40)
|
||||
Me.GroupBox9.Controls.Add(Me.Button10)
|
||||
Me.GroupBox9.Controls.Add(Me.txtStichtag)
|
||||
Me.GroupBox9.Controls.Add(Me.Label39)
|
||||
Me.GroupBox9.Controls.Add(Me.Label38)
|
||||
Me.GroupBox9.Controls.Add(Me.Button9)
|
||||
Me.GroupBox9.Location = New System.Drawing.Point(4, 891)
|
||||
Me.GroupBox9.Name = "GroupBox9"
|
||||
Me.GroupBox9.Size = New System.Drawing.Size(847, 67)
|
||||
Me.GroupBox9.TabIndex = 17
|
||||
Me.GroupBox9.TabStop = False
|
||||
Me.GroupBox9.Visible = False
|
||||
'
|
||||
'Label41
|
||||
'
|
||||
Me.Label41.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label41.AutoSize = True
|
||||
Me.Label41.Location = New System.Drawing.Point(720, 39)
|
||||
Me.Label41.Name = "Label41"
|
||||
Me.Label41.Size = New System.Drawing.Size(81, 13)
|
||||
Me.Label41.TabIndex = 25
|
||||
Me.Label41.Text = "VZ RMC (2865)"
|
||||
'
|
||||
'Button11
|
||||
'
|
||||
Me.Button11.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button11.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button11.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button11.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button11.Location = New System.Drawing.Point(583, 30)
|
||||
Me.Button11.Name = "Button11"
|
||||
Me.Button11.Size = New System.Drawing.Size(121, 31)
|
||||
Me.Button11.TabIndex = 26
|
||||
Me.Button11.Text = " Excel"
|
||||
Me.Button11.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label40
|
||||
'
|
||||
Me.Label40.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label40.AutoSize = True
|
||||
Me.Label40.Location = New System.Drawing.Point(424, 39)
|
||||
Me.Label40.Name = "Label40"
|
||||
Me.Label40.Size = New System.Drawing.Size(100, 13)
|
||||
Me.Label40.TabIndex = 23
|
||||
Me.Label40.Text = "VZ Verag (2866-68)"
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button10.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button10.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button10.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button10.Location = New System.Drawing.Point(287, 30)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(121, 31)
|
||||
Me.Button10.TabIndex = 24
|
||||
Me.Button10.Text = " Excel"
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtStichtag
|
||||
'
|
||||
Me.txtStichtag._DateTimeOnly = False
|
||||
Me.txtStichtag._numbersOnly = False
|
||||
Me.txtStichtag._numbersOnlyKommastellen = ""
|
||||
Me.txtStichtag._numbersOnlyTrennzeichen = True
|
||||
Me.txtStichtag._Prozent = False
|
||||
Me.txtStichtag._ShortDateNew = True
|
||||
Me.txtStichtag._ShortDateOnly = False
|
||||
Me.txtStichtag._TimeOnly = False
|
||||
Me.txtStichtag._TimeOnly_Seconds = False
|
||||
Me.txtStichtag._value = ""
|
||||
Me.txtStichtag._Waehrung = False
|
||||
Me.txtStichtag._WaehrungZeichen = True
|
||||
Me.txtStichtag.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtStichtag.Location = New System.Drawing.Point(67, 10)
|
||||
Me.txtStichtag.MaxLength = 10
|
||||
Me.txtStichtag.MaxLineLength = -1
|
||||
Me.txtStichtag.MaxLines_Warning = ""
|
||||
Me.txtStichtag.MaxLines_Warning_Label = Nothing
|
||||
Me.txtStichtag.Name = "txtStichtag"
|
||||
Me.txtStichtag.Size = New System.Drawing.Size(60, 20)
|
||||
Me.txtStichtag.TabIndex = 21
|
||||
'
|
||||
'Label39
|
||||
'
|
||||
Me.Label39.AutoSize = True
|
||||
Me.Label39.Location = New System.Drawing.Point(4, 13)
|
||||
Me.Label39.Name = "Label39"
|
||||
Me.Label39.Size = New System.Drawing.Size(49, 13)
|
||||
Me.Label39.TabIndex = 22
|
||||
Me.Label39.Text = "Stichtag:"
|
||||
'
|
||||
'Label38
|
||||
'
|
||||
Me.Label38.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label38.AutoSize = True
|
||||
Me.Label38.Location = New System.Drawing.Point(143, 39)
|
||||
Me.Label38.Name = "Label38"
|
||||
Me.Label38.Size = New System.Drawing.Size(81, 13)
|
||||
Me.Label38.TabIndex = 2
|
||||
Me.Label38.Text = "Sicherheit 3470"
|
||||
'
|
||||
'Button9
|
||||
'
|
||||
Me.Button9.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button9.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button9.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button9.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button9.Location = New System.Drawing.Point(6, 30)
|
||||
Me.Button9.Name = "Button9"
|
||||
Me.Button9.Size = New System.Drawing.Size(121, 31)
|
||||
Me.Button9.TabIndex = 7
|
||||
Me.Button9.Text = " Excel"
|
||||
Me.Button9.UseVisualStyleBackColor = True
|
||||
Me.lblnichtabgerechneteZNB.AutoSize = True
|
||||
Me.lblnichtabgerechneteZNB.Location = New System.Drawing.Point(554, 19)
|
||||
Me.lblnichtabgerechneteZNB.Name = "lblnichtabgerechneteZNB"
|
||||
Me.lblnichtabgerechneteZNB.Size = New System.Drawing.Size(144, 13)
|
||||
Me.lblnichtabgerechneteZNB.TabIndex = 37
|
||||
Me.lblnichtabgerechneteZNB.Text = "Nicht abgerechnete Kunden:"
|
||||
'
|
||||
'Label34
|
||||
'
|
||||
@@ -546,6 +739,7 @@ Partial Class usrCntlBH
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.Label50)
|
||||
Me.GroupBox1.Controls.Add(Me.cbxMdmSollHabenOhneKdNr)
|
||||
Me.GroupBox1.Controls.Add(Me.cbxMdmHabenHaben)
|
||||
Me.GroupBox1.Controls.Add(Me.cbxMdmSollSoll)
|
||||
@@ -559,6 +753,17 @@ Partial Class usrCntlBH
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Visible = False
|
||||
'
|
||||
'Label50
|
||||
'
|
||||
Me.Label50.AutoSize = True
|
||||
Me.Label50.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label50.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label50.Location = New System.Drawing.Point(5, 83)
|
||||
Me.Label50.Name = "Label50"
|
||||
Me.Label50.Size = New System.Drawing.Size(168, 17)
|
||||
Me.Label50.TabIndex = 36
|
||||
Me.Label50.Text = "Sachkontenzuweisung"
|
||||
'
|
||||
'cbxMdmSollHabenOhneKdNr
|
||||
'
|
||||
Me.cbxMdmSollHabenOhneKdNr.AutoSize = True
|
||||
@@ -628,17 +833,6 @@ Partial Class usrCntlBH
|
||||
Me.btnWord.Text = "Abgleich starten"
|
||||
Me.btnWord.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label24
|
||||
'
|
||||
Me.Label24.AutoSize = True
|
||||
Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label24.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label24.Location = New System.Drawing.Point(2, -3)
|
||||
Me.Label24.Name = "Label24"
|
||||
Me.Label24.Size = New System.Drawing.Size(150, 17)
|
||||
Me.Label24.TabIndex = 8
|
||||
Me.Label24.Text = "OeKB Versicherung"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||
@@ -715,6 +909,17 @@ Partial Class usrCntlBH
|
||||
Me.Button4.Text = " Excel"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label24
|
||||
'
|
||||
Me.Label24.AutoSize = True
|
||||
Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label24.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label24.Location = New System.Drawing.Point(2, -3)
|
||||
Me.Label24.Name = "Label24"
|
||||
Me.Label24.Size = New System.Drawing.Size(150, 17)
|
||||
Me.Label24.TabIndex = 8
|
||||
Me.Label24.Text = "OeKB Versicherung"
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
@@ -1404,15 +1609,154 @@ Partial Class usrCntlBH
|
||||
'
|
||||
'TabPage5
|
||||
'
|
||||
Me.TabPage5.Controls.Add(Me.Label37)
|
||||
Me.TabPage5.Controls.Add(Me.GroupBox9)
|
||||
Me.TabPage5.Controls.Add(Me.Label28)
|
||||
Me.TabPage5.Controls.Add(Me.GroupBox6)
|
||||
Me.TabPage5.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage5.Name = "TabPage5"
|
||||
Me.TabPage5.Size = New System.Drawing.Size(956, 1062)
|
||||
Me.TabPage5.Size = New System.Drawing.Size(956, 968)
|
||||
Me.TabPage5.TabIndex = 1
|
||||
Me.TabPage5.Text = "IMEX"
|
||||
Me.TabPage5.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label37
|
||||
'
|
||||
Me.Label37.AutoSize = True
|
||||
Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label37.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label37.Location = New System.Drawing.Point(54, 441)
|
||||
Me.Label37.Name = "Label37"
|
||||
Me.Label37.Size = New System.Drawing.Size(136, 17)
|
||||
Me.Label37.TabIndex = 18
|
||||
Me.Label37.Text = "Kontoabstimmung"
|
||||
Me.Label37.Visible = False
|
||||
'
|
||||
'GroupBox9
|
||||
'
|
||||
Me.GroupBox9.Controls.Add(Me.Label41)
|
||||
Me.GroupBox9.Controls.Add(Me.Button11)
|
||||
Me.GroupBox9.Controls.Add(Me.Label40)
|
||||
Me.GroupBox9.Controls.Add(Me.Button10)
|
||||
Me.GroupBox9.Controls.Add(Me.txtStichtag)
|
||||
Me.GroupBox9.Controls.Add(Me.Label39)
|
||||
Me.GroupBox9.Controls.Add(Me.Label38)
|
||||
Me.GroupBox9.Controls.Add(Me.Button9)
|
||||
Me.GroupBox9.Location = New System.Drawing.Point(55, 461)
|
||||
Me.GroupBox9.Name = "GroupBox9"
|
||||
Me.GroupBox9.Size = New System.Drawing.Size(847, 67)
|
||||
Me.GroupBox9.TabIndex = 19
|
||||
Me.GroupBox9.TabStop = False
|
||||
Me.GroupBox9.Visible = False
|
||||
'
|
||||
'Label41
|
||||
'
|
||||
Me.Label41.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label41.AutoSize = True
|
||||
Me.Label41.Location = New System.Drawing.Point(720, 39)
|
||||
Me.Label41.Name = "Label41"
|
||||
Me.Label41.Size = New System.Drawing.Size(81, 13)
|
||||
Me.Label41.TabIndex = 25
|
||||
Me.Label41.Text = "VZ RMC (2865)"
|
||||
'
|
||||
'Button11
|
||||
'
|
||||
Me.Button11.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button11.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button11.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button11.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button11.Location = New System.Drawing.Point(583, 30)
|
||||
Me.Button11.Name = "Button11"
|
||||
Me.Button11.Size = New System.Drawing.Size(121, 31)
|
||||
Me.Button11.TabIndex = 26
|
||||
Me.Button11.Text = " Excel"
|
||||
Me.Button11.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label40
|
||||
'
|
||||
Me.Label40.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label40.AutoSize = True
|
||||
Me.Label40.Location = New System.Drawing.Point(424, 39)
|
||||
Me.Label40.Name = "Label40"
|
||||
Me.Label40.Size = New System.Drawing.Size(100, 13)
|
||||
Me.Label40.TabIndex = 23
|
||||
Me.Label40.Text = "VZ Verag (2866-68)"
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button10.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button10.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button10.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button10.Location = New System.Drawing.Point(287, 30)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(121, 31)
|
||||
Me.Button10.TabIndex = 24
|
||||
Me.Button10.Text = " Excel"
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtStichtag
|
||||
'
|
||||
Me.txtStichtag._DateTimeOnly = False
|
||||
Me.txtStichtag._numbersOnly = False
|
||||
Me.txtStichtag._numbersOnlyKommastellen = ""
|
||||
Me.txtStichtag._numbersOnlyTrennzeichen = True
|
||||
Me.txtStichtag._Prozent = False
|
||||
Me.txtStichtag._ShortDateNew = True
|
||||
Me.txtStichtag._ShortDateOnly = False
|
||||
Me.txtStichtag._TimeOnly = False
|
||||
Me.txtStichtag._TimeOnly_Seconds = False
|
||||
Me.txtStichtag._value = ""
|
||||
Me.txtStichtag._Waehrung = False
|
||||
Me.txtStichtag._WaehrungZeichen = True
|
||||
Me.txtStichtag.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtStichtag.Location = New System.Drawing.Point(67, 10)
|
||||
Me.txtStichtag.MaxLength = 10
|
||||
Me.txtStichtag.MaxLineLength = -1
|
||||
Me.txtStichtag.MaxLines_Warning = ""
|
||||
Me.txtStichtag.MaxLines_Warning_Label = Nothing
|
||||
Me.txtStichtag.Name = "txtStichtag"
|
||||
Me.txtStichtag.Size = New System.Drawing.Size(60, 20)
|
||||
Me.txtStichtag.TabIndex = 21
|
||||
'
|
||||
'Label39
|
||||
'
|
||||
Me.Label39.AutoSize = True
|
||||
Me.Label39.Location = New System.Drawing.Point(4, 13)
|
||||
Me.Label39.Name = "Label39"
|
||||
Me.Label39.Size = New System.Drawing.Size(49, 13)
|
||||
Me.Label39.TabIndex = 22
|
||||
Me.Label39.Text = "Stichtag:"
|
||||
'
|
||||
'Label38
|
||||
'
|
||||
Me.Label38.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label38.AutoSize = True
|
||||
Me.Label38.Location = New System.Drawing.Point(143, 39)
|
||||
Me.Label38.Name = "Label38"
|
||||
Me.Label38.Size = New System.Drawing.Size(81, 13)
|
||||
Me.Label38.TabIndex = 2
|
||||
Me.Label38.Text = "Sicherheit 3470"
|
||||
'
|
||||
'Button9
|
||||
'
|
||||
Me.Button9.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button9.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button9.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button9.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button9.Location = New System.Drawing.Point(6, 30)
|
||||
Me.Button9.Name = "Button9"
|
||||
Me.Button9.Size = New System.Drawing.Size(121, 31)
|
||||
Me.Button9.TabIndex = 7
|
||||
Me.Button9.Text = " Excel"
|
||||
Me.Button9.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label28
|
||||
'
|
||||
Me.Label28.AutoSize = True
|
||||
@@ -1477,6 +1821,15 @@ Partial Class usrCntlBH
|
||||
Me.Button7.Text = "Importieren"
|
||||
Me.Button7.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label52
|
||||
'
|
||||
Me.Label52.AutoSize = True
|
||||
Me.Label52.Location = New System.Drawing.Point(554, 46)
|
||||
Me.Label52.Name = "Label52"
|
||||
Me.Label52.Size = New System.Drawing.Size(138, 13)
|
||||
Me.Label52.TabIndex = 41
|
||||
Me.Label52.Text = "*wenn nicht im Kd hinterlegt"
|
||||
'
|
||||
'usrCntlBH
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@@ -1490,10 +1843,10 @@ Partial Class usrCntlBH
|
||||
Me.pnl.PerformLayout()
|
||||
Me.TabPage1.ResumeLayout(False)
|
||||
Me.TabPage1.PerformLayout()
|
||||
Me.GroupBox11.ResumeLayout(False)
|
||||
Me.GroupBox11.PerformLayout()
|
||||
Me.GroupBox10.ResumeLayout(False)
|
||||
Me.GroupBox10.PerformLayout()
|
||||
Me.GroupBox9.ResumeLayout(False)
|
||||
Me.GroupBox9.PerformLayout()
|
||||
Me.GroupBox8.ResumeLayout(False)
|
||||
Me.GroupBox8.PerformLayout()
|
||||
Me.GroupBox7.ResumeLayout(False)
|
||||
@@ -1516,6 +1869,8 @@ Partial Class usrCntlBH
|
||||
Me.tbcntr.ResumeLayout(False)
|
||||
Me.TabPage5.ResumeLayout(False)
|
||||
Me.TabPage5.PerformLayout()
|
||||
Me.GroupBox9.ResumeLayout(False)
|
||||
Me.GroupBox9.PerformLayout()
|
||||
Me.GroupBox6.ResumeLayout(False)
|
||||
Me.GroupBox6.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
@@ -1610,19 +1965,40 @@ Partial Class usrCntlBH
|
||||
Friend WithEvents Label35 As Label
|
||||
Friend WithEvents Label36 As Label
|
||||
Friend WithEvents cboAbfVerbFirma As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents cbxBankgarantieInfo As CheckBox
|
||||
Friend WithEvents Label42 As Label
|
||||
Friend WithEvents GroupBox10 As GroupBox
|
||||
Friend WithEvents Label43 As Label
|
||||
Friend WithEvents Button12 As Button
|
||||
Friend WithEvents btnZinsbelastung As Button
|
||||
Friend WithEvents Label46 As Label
|
||||
Friend WithEvents Label44 As Label
|
||||
Friend WithEvents txtZRbis As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtZRvon As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label47 As Label
|
||||
Friend WithEvents txtKdNrbis As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtKdNrvon As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label45 As Label
|
||||
Friend WithEvents Label49 As Label
|
||||
Friend WithEvents txtZinssatz As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label48 As Label
|
||||
Friend WithEvents txtTolInTagen As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents GroupBox11 As GroupBox
|
||||
Friend WithEvents Label37 As Label
|
||||
Friend WithEvents GroupBox9 As GroupBox
|
||||
Friend WithEvents Label38 As Label
|
||||
Friend WithEvents Button9 As Button
|
||||
Friend WithEvents Label41 As Label
|
||||
Friend WithEvents Button11 As Button
|
||||
Friend WithEvents Label40 As Label
|
||||
Friend WithEvents Button10 As Button
|
||||
Friend WithEvents txtStichtag As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label39 As Label
|
||||
Friend WithEvents cbxBankgarantieInfo As CheckBox
|
||||
Friend WithEvents Label42 As Label
|
||||
Friend WithEvents GroupBox10 As GroupBox
|
||||
Friend WithEvents Label43 As Label
|
||||
Friend WithEvents Button12 As Button
|
||||
Friend WithEvents Label38 As Label
|
||||
Friend WithEvents Button9 As Button
|
||||
Friend WithEvents Button13 As Button
|
||||
Friend WithEvents lblnichtabgerechneteZNB As Label
|
||||
Friend WithEvents Label51 As Label
|
||||
Friend WithEvents Label50 As Label
|
||||
Friend WithEvents txtnichtabrechneteKunden As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents btnZNBverrechnen As Button
|
||||
Friend WithEvents Label52 As Label
|
||||
End Class
|
||||
|
||||
@@ -1,5 +1,6 @@
|
||||
Imports System.Globalization
|
||||
Imports System.Text
|
||||
Imports VERAG_PROG_ALLGEMEIN
|
||||
|
||||
Public Class usrCntlBH
|
||||
Dim GrenzeVersicherung = 50000
|
||||
@@ -43,10 +44,15 @@ Public Class usrCntlBH
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Case "IMEX" : MyListBox1.fillWithSQL("SELECT [Firma_ID],[Firma_Bez] FROM [VERAG].[dbo].[tblFirma] where Firma_ID IN (20) order by [Firma_ID] ", False, "FMZOLL")
|
||||
Case Else
|
||||
|
||||
Dim isMDM As Boolean = False
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_abteilung = "MDM" Then isMDM = True
|
||||
If isMDM Then txtnichtabrechneteKunden.Text = SQL.getValueTxtBySql("SELECT count(distinct(kundenNr)) FROM [VERAG].[dbo].[tblMDM_Zinsberechnung] where verrechnet is null group by kundenNr", "FMZOLL",,, "0")
|
||||
|
||||
MyListBox1.fillWithSQL("SELECT [Firma_ID],[Firma_Bez] FROM [VERAG].[dbo].[tblFirma] where Firma_ID NOT IN (20) order by [Firma_ID] ", False, "FMZOLL")
|
||||
|
||||
For i = 0 To MyListBox1.Items.Count - 1
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_abteilung = "MDM" Then
|
||||
If isMDM Then
|
||||
If DirectCast(MyListBox1.Items(i), VERAG_PROG_ALLGEMEIN.MyListItem).Value = 1 Or DirectCast(MyListBox1.Items(i), VERAG_PROG_ALLGEMEIN.MyListItem).Value = 15 Then MyListBox1.SetSelected(i, True)
|
||||
Else
|
||||
If DirectCast(MyListBox1.Items(i), VERAG_PROG_ALLGEMEIN.MyListItem).Value <> 7 Then MyListBox1.SetSelected(i, True)
|
||||
@@ -71,27 +77,27 @@ Public Class usrCntlBH
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
If Not checkOPValid() Then Me.Cursor = Cursors.Default : Exit Sub
|
||||
|
||||
Dim dt = SQL.loadDgvBySql(getOPSql(), "FMZOLL")
|
||||
dt.Columns.Add("VersicherungsBetrag", Type.GetType("System.Double"))
|
||||
For Each r In dt.Rows
|
||||
Dim dt = SQL.loadDgvBySql(getOPSql(), "FMZOLL")
|
||||
dt.Columns.Add("VersicherungsBetrag", Type.GetType("System.Double"))
|
||||
For Each r In dt.Rows
|
||||
r("VersicherungsBetrag") = getVersBetrag(r("Risiko"), r("Versicherungssumme"), r("GemeldeterBetrag"), r("nichtVersicherbar"))
|
||||
Next
|
||||
dt.Columns("VersicherungsBetrag").ColumnName = "V-Betrag"
|
||||
dt.Columns("Versicherungssumme").ColumnName = "V-Summe"
|
||||
dt.Columns("Vorauszahlung").ColumnName = "VZ"
|
||||
'dt.Columns("GemeldeterBetrag")
|
||||
dt.Columns.Remove("GemeldeterBetrag")
|
||||
dt.Columns("VersicherungsBetrag").ColumnName = "V-Betrag"
|
||||
dt.Columns("Versicherungssumme").ColumnName = "V-Summe"
|
||||
dt.Columns("Vorauszahlung").ColumnName = "VZ"
|
||||
'dt.Columns("GemeldeterBetrag")
|
||||
dt.Columns.Remove("GemeldeterBetrag")
|
||||
|
||||
If cbxFormatNumbers.Checked Then
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt, {"E1:E" & (dt.Rows.Count + 1), "H1:M" & (dt.Rows.Count + 1), "O1:P" & (dt.Rows.Count + 1)})
|
||||
Else
|
||||
cProgramFunctions.genExcelCSVFromDT(dt)
|
||||
End If
|
||||
If cbxFormatNumbers.Checked Then
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt, {"E1:E" & (dt.Rows.Count + 1), "H1:M" & (dt.Rows.Count + 1), "O1:P" & (dt.Rows.Count + 1)})
|
||||
Else
|
||||
cProgramFunctions.genExcelCSVFromDT(dt)
|
||||
End If
|
||||
|
||||
|
||||
'cProgramFunctions.genExcelFromDT_NEW(dt)
|
||||
'cProgramFunctions.genExcelFromDT_NEW(dt, , False)
|
||||
Me.Cursor = Cursors.Default
|
||||
'cProgramFunctions.genExcelFromDT_NEW(dt)
|
||||
'cProgramFunctions.genExcelFromDT_NEW(dt, , False)
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
@@ -569,11 +575,11 @@ Public Class usrCntlBH
|
||||
Try
|
||||
|
||||
Dim fd As New OpenFileDialog
|
||||
fd.Filter ="CSV Files (*.csv)|*.csv"
|
||||
fd.Filter = "CSV Files (*.csv)|*.csv"
|
||||
If fd.ShowDialog = DialogResult.OK Then
|
||||
If fd.FileName.ToUpper.EndsWith(".CSV") Then
|
||||
|
||||
Dim Lines As String() = My.Computer.FileSystem.ReadAllText(fd.FileName, System.Text.Encoding.Default).Split(vbCr)
|
||||
Dim Lines As String() = My.Computer.FileSystem.ReadAllText(fd.FileName, System.Text.Encoding.Default).split(vbCr)
|
||||
Dim LineCount As Integer = Lines.Length
|
||||
|
||||
' fd.FileName.EndsWith(".csv")
|
||||
@@ -698,7 +704,7 @@ Public Class usrCntlBH
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
|
||||
Private Sub Button9_Click(sender As Object, e As EventArgs)
|
||||
|
||||
|
||||
If txtStichtag.Text <> "" AndAlso Not IsNumeric(txtStichtag.Text) Then MsgBox("Stichtag nicht korrekt!") : Exit Sub
|
||||
@@ -723,7 +729,7 @@ Public Class usrCntlBH
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click, Button11.Click
|
||||
Private Sub Button10_Click(sender As Object, e As EventArgs)
|
||||
|
||||
If txtStichtag.Text <> "" AndAlso Not IsNumeric(txtStichtag.Text) Then MsgBox("Stichtag nicht korrekt!") : Exit Sub
|
||||
|
||||
@@ -766,4 +772,421 @@ Public Class usrCntlBH
|
||||
Dim f As New SDL.frmLeistundenFIBUKonten(VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMIN", "SDL") Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Leistungen_FIBU", "SDL"))
|
||||
f.ShowDialog(Me)
|
||||
End Sub
|
||||
|
||||
Private Sub Button13_Click(sender As Object, e As EventArgs) Handles btnZinsbelastung.Click
|
||||
|
||||
If txtKdNrvon.Text = "" OrElse Not IsNumeric(txtKdNrvon.Text) Then
|
||||
txtKdNrvon.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If txtKdNrbis.Text = "" OrElse Not IsNumeric(txtKdNrbis.Text) Then
|
||||
txtKdNrbis.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If txtZRvon.Text = "" OrElse Not IsDate(txtZRvon.Text) Then
|
||||
txtZRvon.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If txtZRbis.Text = "" OrElse Not IsDate(txtZRbis.Text) Then
|
||||
txtZRbis.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
If txtTolInTagen.Text = "" OrElse Not IsNumeric(txtTolInTagen.Text) Then
|
||||
txtTolInTagen.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If txtZinssatz.Text = "" OrElse Not IsNumeric(txtZinssatz.Text) Then
|
||||
txtZinssatz.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If vbYes = MsgBox("Möchten Sie die Zinsbelastung starten?", vbYesNoCancel) Then
|
||||
|
||||
'Defaultwerte
|
||||
Dim zinssatz As Double = CDbl(txtZinssatz.Text.Replace(".", ","))
|
||||
Dim toleranztage As Integer = CInt(txtTolInTagen.Text)
|
||||
|
||||
|
||||
Dim sqlStr_FIBU = "declare @KundeVon as Integer = " & txtKdNrvon.Text & "
|
||||
declare @KundeBis as Integer = " & txtKdNrbis.Text & "
|
||||
declare @ZahlungVon as Date = '" & CDate(txtZRvon.Text).ToShortDateString & "'
|
||||
declare @ZahlungBis as Date = '" & CDate(txtZRbis.Text).ToShortDateString & "'
|
||||
declare @MandantNr as Integer = 19
|
||||
|
||||
|
||||
SELECT
|
||||
op_debitor.c_urbelegid AS BelegNr,
|
||||
op_debitor.i_personenkonto AS KundenNr,
|
||||
op_debitor.d_rechnung AS Belegdatum,
|
||||
ISNULL(op_debitor.OWNFIELD_Belegdatum, '01.01.2000') AS origbelegdatum,
|
||||
op_debitor.eur_bruttobetrag AS Bruttobetrag,
|
||||
op_debitor.eur_zahlung AS Zahlungsbetrag,
|
||||
op_debitor.d_netto AS Nettodatum,
|
||||
op_debitor.c_bemerkung AS buchungstext,
|
||||
op_debitor.d_zahlung AS Zahlungsdatum,
|
||||
ISNULL(op_debitor.c_zahlziel, '0/0/20') AS ZZ_in_OP,
|
||||
isnull(kde_zinssatz," & zinssatz.ToString.Replace(",", ".") & ") AS Zinssatz_Kunde,
|
||||
ISNULL(fibu_konto.c_zahlziel, '0/0/20') AS ZZ_in_Debitor,
|
||||
isnull(dbo.fibu_zahlziel.si_ntage,0) as ZZinTage ,
|
||||
DATEADD(DAY, (isnull(dbo.fibu_zahlziel.si_ntage,0) + " & toleranztage & "), op_debitor.d_rechnung) as ReZielZahlungsdatum,
|
||||
DATEDIFF(DAY, DATEADD(DAY, (isnull(dbo.fibu_zahlziel.si_ntage,0) + " & toleranztage & " ), op_debitor.d_rechnung), op_debitor.d_zahlung) as ÜberschreitungInTagen,
|
||||
|
||||
case when DATEDIFF(DAY, DATEADD(DAY, (isnull(dbo.fibu_zahlziel.si_ntage,0) + " & toleranztage & "), op_debitor.d_rechnung), op_debitor.d_zahlung) > 0 then
|
||||
|
||||
op_debitor.eur_bruttobetrag * isnull(kde_zinssatz," & zinssatz.ToString.Replace(",", ".") & ") / 100 * DATEDIFF(DAY, DATEADD(DAY, (isnull(dbo.fibu_zahlziel.si_ntage,0) + " & toleranztage & " ), op_debitor.d_rechnung), op_debitor.d_zahlung) / 360
|
||||
|
||||
else 0 end as Zinsbetrag
|
||||
|
||||
FROM op_debitor INNER JOIN fibu_konto ON (op_debitor.i_personenkonto = fibu_konto.i_konto)
|
||||
inner join [FMZOLL\SQLFMZOLL].[VERAG].[dbo].[tblKundenErweitert] on kde_KundenNr = op_debitor.i_personenkonto
|
||||
left join fibu_zahlziel on dbo.fibu_zahlziel.i_firm_refid = dbo.op_debitor.i_firm_refid and dbo.fibu_zahlziel.c_zahlziel = ISNULL(fibu_konto.c_zahlziel, '0/0/20')
|
||||
|
||||
WHERE op_debitor.i_firm_refid = @MandantNr and fibu_konto.i_firm_refid = @MandantNr
|
||||
|
||||
AND (op_debitor.eur_bruttobetrag + op_debitor.eur_zahlung <= 1)
|
||||
AND (op_debitor.eur_bruttobetrag + op_debitor.eur_zahlung >= (-1))
|
||||
AND op_debitor.i_personenkonto >= @KundeVon AND op_debitor.i_personenkonto <= @KundeBis
|
||||
AND op_debitor.d_zahlung >= @ZahlungVon AND op_debitor.d_zahlung <= @ZahlungBis
|
||||
AND DATEDIFF(DAY, DATEADD(DAY, (isnull(dbo.fibu_zahlziel.si_ntage,0) + " & toleranztage & "), op_debitor.d_rechnung), op_debitor.d_zahlung) > 0
|
||||
|
||||
ORDER BY op_debitor.i_personenkonto, op_debitor.d_rechnung, ISNULL(op_debitor.OWNFIELD_Belegdatum, '01.01.2000'), op_debitor.c_urbelegid"
|
||||
|
||||
|
||||
Dim dt = SQL.loadDgvBySql(sqlStr_FIBU, "FIBU")
|
||||
|
||||
If dt.Rows.Count = 0 Then
|
||||
MsgBox("keine Daten")
|
||||
Else
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt, {"E1:E" & (dt.Rows.Count + 1), "F1:F" & (dt.Rows.Count + 1), "P1:P" & (dt.Rows.Count + 1)})
|
||||
|
||||
Dim counter As Integer = 0
|
||||
|
||||
For Each r As DataRow In dt.Rows
|
||||
|
||||
If r.Item("Zinsbetrag") > 0 Then
|
||||
|
||||
Dim zins As New cMDMZinsberechnung(r.Item("KundenNr"), r.Item("BelegNr"))
|
||||
|
||||
If zins.hasEntry AndAlso zins.verrechnet Then
|
||||
counter += 1
|
||||
Else
|
||||
|
||||
zins.buchungstext = r.Item("buchungstext")
|
||||
zins.kundeZahlungsziel = r.Item("ZZ_in_Debitor")
|
||||
zins.zinssatz = r.Item("Zinssatz_Kunde")
|
||||
zins.belegZahlungsziel = r.Item("ZZinTage")
|
||||
zins.ueberschreitungInTagen = r.Item("ÜberschreitungInTagen")
|
||||
zins.zinsbetrag = CDbl(r.Item("Zinsbetrag"))
|
||||
zins.timestamp = Now()
|
||||
zins.belegDatum = r.Item("Belegdatum")
|
||||
zins.zahlungsBetrag = r.Item("Zahlungsbetrag")
|
||||
zins.zahlungDatum = r.Item("Zahlungsdatum")
|
||||
zins.SAVE()
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
Next
|
||||
|
||||
If counter > 0 Then
|
||||
MsgBox("In der Zinsberechnung befinden sich " & counter & " Positionen, die bereits abgerechnet wurden!" & vbNewLine & "Diese wurden ")
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Function gen_SPEDBUCH_ByKdNr(KdNr As String, ByRef SPEDBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch, Optional abrechnugsdatum As Date = Nothing)
|
||||
Try
|
||||
If KdNr = "" Then Return False
|
||||
|
||||
Dim AD As New VERAG_PROG_ALLGEMEIN.cAdressen(KdNr)
|
||||
SPEDBUCH = New VERAG_PROG_ALLGEMEIN.cSpeditionsbuch
|
||||
|
||||
Dim OffertenNr As Integer
|
||||
Dim Abfertigungsart As Integer
|
||||
|
||||
'todo setzen!!
|
||||
OffertenNr = 95 : Abfertigungsart = 10 : SPEDBUCH.FilialenNr = 8001
|
||||
|
||||
|
||||
Dim GJ = Now.Year
|
||||
If IsDate(abrechnugsdatum) AndAlso abrechnugsdatum > Now.AddYears(-5) Then GJ = cRKSV.getGJ(abrechnugsdatum, 19)
|
||||
|
||||
SPEDBUCH.AbfertigungsNr = VERAG_PROG_ALLGEMEIN.cAllgemein.getMaxPosNrIncrement(SPEDBUCH.FilialenNr, GJ)
|
||||
SPEDBUCH.NewUNTER_NR()
|
||||
|
||||
SPEDBUCH.Vermittler = AD.Ordnungsbegriff
|
||||
SPEDBUCH.VermittlerKundenNr = KdNr
|
||||
SPEDBUCH.VermittlerOffertenNr = OffertenNr
|
||||
SPEDBUCH.Abfertigungsdatum = abrechnugsdatum.ToShortDateString
|
||||
|
||||
SPEDBUCH.Abfertigungsart = Abfertigungsart
|
||||
SPEDBUCH.Bar = 0
|
||||
SPEDBUCH.Fakturiert = 1
|
||||
SPEDBUCH.AnzahlSonstiges = 1
|
||||
SPEDBUCH.Abfertigungsanzahl = 1
|
||||
|
||||
SPEDBUCH.AvisUhrzeit = Nothing
|
||||
SPEDBUCH.Umrechnungskurs = Nothing
|
||||
SPEDBUCH.veoerz_basbtg = Nothing
|
||||
SPEDBUCH.Sicherheitsbetrag = Nothing
|
||||
|
||||
SPEDBUCH.Sachbearbeiter = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME
|
||||
|
||||
|
||||
Return SPEDBUCH.SAVE
|
||||
|
||||
Catch ex As System.Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Return False
|
||||
|
||||
End Function
|
||||
|
||||
Function gen_RECHNUNG_BySPEDBUCH(KdNr As String, SPEDBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch, ByRef RK_ID As Integer)
|
||||
Try
|
||||
|
||||
If KdNr = "" Then Return False
|
||||
|
||||
Dim AD As New VERAG_PROG_ALLGEMEIN.cAdressen(SPEDBUCH.VermittlerKundenNr)
|
||||
Dim KD As New VERAG_PROG_ALLGEMEIN.cKunde(SPEDBUCH.VermittlerKundenNr)
|
||||
Dim RG As New VERAG_PROG_ALLGEMEIN.cRechnungsausgang
|
||||
|
||||
Dim OffertenNr As Integer
|
||||
Dim Abfertigungsart As Integer
|
||||
|
||||
'TODO. Setzen!
|
||||
OffertenNr = 95 : Abfertigungsart = 10 : RG.Anlage_1 = ""
|
||||
|
||||
RG.Firma_ID = 19
|
||||
|
||||
RG.FilialenNr = SPEDBUCH.FilialenNr
|
||||
RG.AbfertigungsNr = SPEDBUCH.AbfertigungsNr
|
||||
RG.SpeditionsbuchUnterNr = SPEDBUCH.UnterNr
|
||||
RG.UnterNr = RG.getMaxRGUnterNr()
|
||||
|
||||
RG.Buchungsjahr = cRKSV.getGJ(SPEDBUCH.Abfertigungsdatum, RG.Firma_ID) 'If(Now.Month = 1, Now.Year - 1, Now.Year)
|
||||
RG.FilialenNr = SPEDBUCH.FilialenNr
|
||||
RG.Abfertigungsdatum = SPEDBUCH.Abfertigungsdatum
|
||||
RG.Sammelrechnung = 0
|
||||
RG.BelegartenKz = "AR"
|
||||
RG.BelegartenNr = 70
|
||||
RG.BelegartenBez = "Rechnung"
|
||||
RG.Vorzeichen = "+"
|
||||
|
||||
RG.VermittlerKundenNr = AD.AdressenNr
|
||||
RG.VermittlerLandKz = AD.LandKz
|
||||
RG.VermittlerName_1 = AD.Name_1
|
||||
RG.VermittlerName_2 = AD.Name_2
|
||||
RG.VermittlerOffertenNr = OffertenNr
|
||||
RG.VermittlerOrt = (If(AD.LandKz, "") & " " & If(AD.PLZ, "") & " " & If(AD.Ort, ""))
|
||||
RG.VermittlerStraße = AD.Straße
|
||||
RG.Rechnung_an = 3
|
||||
RG.OffertenNr = OffertenNr
|
||||
|
||||
RG.KundenNrZentrale = KD.KundenNrZentrale
|
||||
RG.RechnungsKundenNr = AD.AdressenNr
|
||||
RG.RechnungsLandKz = AD.LandKz
|
||||
RG.RechnungsName_1 = AD.Name_1
|
||||
RG.RechnungsName_2 = AD.Name_2
|
||||
RG.RechnungsOrt = (If(AD.LandKz, "") & " " & If(AD.PLZ, "") & " " & If(AD.Ort, ""))
|
||||
RG.RechnungsStraße = AD.Straße
|
||||
|
||||
RG.RechnungsUstIdKz = AD.UstIdKz
|
||||
RG.RechnungsUstIdNr = AD.UstIdNr
|
||||
RG.RechnungsUstIdGeprüft = AD.UstIdGeprüft
|
||||
|
||||
RG.Lastschrift = KD.Lastschrift
|
||||
RG.Kunden_SVS = KD.SVS
|
||||
RG.Steuerschlüssel = KD.Steuerschlüssel
|
||||
RG.Vorkasse = KD.Vorkasse
|
||||
RG.Vorlageprovision_Proz = KD.Vorlageprovision
|
||||
RG.Kreditaufwendungen_Proz = KD.Kreditaufwendungen
|
||||
RG.RechnungSprache = "DE"
|
||||
|
||||
RG.Anlage_2 = ""
|
||||
RG.Anlage_3 = ""
|
||||
RG.Anlage_4 = ""
|
||||
RG.Anlage_5 = ""
|
||||
RG.Anlage_6 = ""
|
||||
|
||||
RG.Text = ""
|
||||
RG.EMailRechnungstext = Nothing ' ""
|
||||
|
||||
|
||||
RG.Nettozahlungsziel = KD.Zahlungsziel
|
||||
|
||||
RG.SteuerpflichtigerGesamtbetrag = 0
|
||||
RG.SteuerfreierGesamtbetrag = 0
|
||||
RG.Status = 0 '<= Status während der Erfassung über die Maut/Diesel-Schnittstelle - Nach Abschluss der Datenübernahme Änderung auf 0 20231220 -> gleich auf 0 setzen!
|
||||
|
||||
RG.[Vorkosten] = 0
|
||||
RG.[Erlös] = 0
|
||||
'RG.[Buchungsjahr] = 0
|
||||
RG.[Währungscode] = "EUR"
|
||||
RG.ReErfZeitstempel = Now
|
||||
|
||||
|
||||
RG.Sachbearbeiter = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME
|
||||
|
||||
Dim sqlstr As String = ""
|
||||
Dim useNettogesamtbetrag As Boolean = False
|
||||
|
||||
Dim OFFERTE As New VERAG_PROG_ALLGEMEIN.cOfferte(KdNr, OffertenNr, True)
|
||||
RG.LOAD_OFFERT_POSITIONEN() ' --> OFFERTE MIT ANZAHL >0 und Preis >0
|
||||
|
||||
Dim dt As New DataTable
|
||||
cMDMZinsberechnung.GET_NICHTABGERECHNETE_ZB(dt, KdNr)
|
||||
|
||||
|
||||
For Each r In dt.Rows
|
||||
|
||||
Dim NettoBetrag As Double = r("zinsbetrag")
|
||||
Dim BruttoBetrag As Double = r("zinsbetrag")
|
||||
Dim UstBetrag As Double = BruttoBetrag = NettoBetrag
|
||||
Dim LeistungsNr As Integer = 950
|
||||
Dim LeistungsBezAdd As String = ""
|
||||
If r("buchungstext") <> "" Then
|
||||
LeistungsBezAdd &= r("buchungstext")
|
||||
|
||||
If LeistungsBezAdd.Length > 30 Then
|
||||
LeistungsBezAdd = LeistungsBezAdd.ToString.Substring(0, 30)
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
allPos(RG, OFFERTE, LeistungsNr, NettoBetrag, BruttoBetrag, UstBetrag, LeistungsBezAdd)
|
||||
|
||||
Next
|
||||
|
||||
Dim dtSt As DataTable = SQL.loadDgvBySql("SELECT TOP 1 isnull([Steuersatz %],0),isnull([Steuerbezeichnung],'') FROM [Steuertabelle] WHERE [Steuerschlüssel]='" & RG.Steuerschlüssel & "'", "FMZOLL")
|
||||
If dtSt IsNot Nothing AndAlso dtSt.Rows.Count > 0 Then
|
||||
RG.Steuersatz_Proz = dtSt.Rows(0)(0)
|
||||
End If
|
||||
|
||||
cFakturierung.setGesamtBetraege(RG,, useNettogesamtbetrag)
|
||||
|
||||
RG.Text = (cFakturierung.przRechnungstextTXT(RG, SPEDBUCH) & vbNewLine & cFakturierung.przRechnungstextZZ(RG)).Trim
|
||||
|
||||
If RG.SAVE Then
|
||||
RK_ID = RG.RK_ID
|
||||
Return True
|
||||
Else
|
||||
Return False
|
||||
End If
|
||||
|
||||
Catch ex As System.Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Return ""
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Function allPos(ByRef RG As VERAG_PROG_ALLGEMEIN.cRechnungsausgang, OFFERTE As VERAG_PROG_ALLGEMEIN.cOfferte, LeistungsNr As Integer, NettoBetrag As Double, BruttoBetrag As Double, Optional UstBetrag As Double = 0, Optional leistungsBez As String = "")
|
||||
Try
|
||||
|
||||
For Each o In OFFERTE.POSITIONEN
|
||||
If o.LeistungsNr = LeistungsNr Then
|
||||
|
||||
Dim POS As New VERAG_PROG_ALLGEMEIN.cRechnungsausgangPositionen()
|
||||
Dim LEISTUNG As New VERAG_PROG_ALLGEMEIN.cLeistungen(o.LeistungsNr)
|
||||
POS.LeistungsNr = o.LeistungsNr
|
||||
POS.LeistungsBez = IIf(leistungsBez <> "", leistungsBez, o.LeistungsBez)
|
||||
|
||||
POS.BerechnungsartNr = o.BerechnungsartNr
|
||||
'POS.Preis = BruttoBetrag
|
||||
POS.Anzahl = 1
|
||||
POS.Steuerpflichtig = LEISTUNG.Steuerpflichtig
|
||||
'Berrechnunggebühr wird immer vom übergebenen Betrag abzüglich UST berechnet (Nettobetrag), außer bei UTA!
|
||||
POS.BGebBgl = NettoBetrag - UstBetrag
|
||||
|
||||
|
||||
If POS.Steuerpflichtig Then
|
||||
POS.SteuerpflichtigerBetrag = NettoBetrag
|
||||
POS.Preis = NettoBetrag
|
||||
Else
|
||||
POS.SteuerfreierBetrag = BruttoBetrag
|
||||
POS.Preis = BruttoBetrag
|
||||
End If
|
||||
|
||||
POS.BGebLeistungsNr = o.BGebLeistungsNr
|
||||
POS.BGebProzent = o.BGebProzent
|
||||
POS.BGebMinBetrag = o.BGebMinBetrag
|
||||
|
||||
RG.POSITIONEN.Add(POS)
|
||||
|
||||
Return True
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Return False
|
||||
End Function
|
||||
|
||||
Private Sub Button13_Click_1(sender As Object, e As EventArgs) Handles Button13.Click
|
||||
Dim frm As New frmZinsnachberechnung("tblMDM_Zinsberechnung", "FMZOLL")
|
||||
frm.ShowDialog(Me)
|
||||
End Sub
|
||||
|
||||
Private Sub txtnichtabrechneteKunden_TextChanged(sender As Object, e As EventArgs) Handles txtnichtabrechneteKunden.TextChanged
|
||||
If txtnichtabrechneteKunden.Text <> "" AndAlso IsNumeric(txtnichtabrechneteKunden.Text) AndAlso txtnichtabrechneteKunden.Text > 0 Then
|
||||
btnZNBverrechnen.Enabled = True
|
||||
Else
|
||||
btnZNBverrechnen.Enabled = False
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnZNBverrechnen_Click(sender As Object, e As EventArgs) Handles btnZNBverrechnen.Click
|
||||
|
||||
Dim dt_Main As DataTable = SQL.loadDgvBySql_Param("Select [kundenNr] FROM [VERAG].[dbo].[tblMDM_Zinsberechnung] where [verrechnet] Is null group by [kundenNr] ", "FMZOLL")
|
||||
|
||||
If dt_Main.Rows.Count > 0 Then
|
||||
|
||||
If vbYes = MsgBox("Möchten Sie für " & dt_Main.Rows.Count & " Kunden die Zinsbelastung verrechnen?", vbYesNoCancel) Then
|
||||
|
||||
|
||||
For Each R In dt_Main.Rows
|
||||
Dim verarbOK As Boolean = True
|
||||
Dim SPEDBUCH As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch = Nothing
|
||||
Dim RK_ID As Integer = -1
|
||||
If Not gen_SPEDBUCH_ByKdNr(R("kundenNr"), SPEDBUCH, Now()) Then verarbOK = False
|
||||
If Not gen_RECHNUNG_BySPEDBUCH(R("kundenNr"), SPEDBUCH, RK_ID) Then verarbOK = False
|
||||
|
||||
If verarbOK Then
|
||||
'UPDATE Fakturiert
|
||||
SQL.doSQL("UPDATE [tblMDM_Zinsberechnung] Set [verrechnet]=GETDATE(), RK_ID = " & RK_ID & " WHERE [verrechnet] Is null And kundenNr='" & R("kundenNr") & "' ", "FMZOLL")
|
||||
End If
|
||||
|
||||
Next
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
txtnichtabrechneteKunden.Text = SQL.getValueTxtBySql("SELECT count(distinct(kundenNr)) FROM [VERAG].[dbo].[tblMDM_Zinsberechnung] where verrechnet is null group by kundenNr", "FMZOLL",,, "0")
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
183
SDL/kunden/frmKundenblatt.Designer.vb
generated
183
SDL/kunden/frmKundenblatt.Designer.vb
generated
@@ -197,6 +197,14 @@ Partial Class frmKundenblatt
|
||||
Me.tbUSTVAntrage = New System.Windows.Forms.TabPage()
|
||||
Me.UsrCntlUSTV = New SDL.usrCntlUSTV()
|
||||
Me.tbFIBU = New System.Windows.Forms.TabPage()
|
||||
Me.lblZNB_verrechnet = New System.Windows.Forms.Label()
|
||||
Me.lblZNB_offen = New System.Windows.Forms.Label()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.Label16 = New System.Windows.Forms.Label()
|
||||
Me.dgvZinsnachberechnung = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.txtZinsbelastung = New System.Windows.Forms.TextBox()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.rtbGespreachsbericht = New System.Windows.Forms.RichTextBox()
|
||||
Me.btnFirmendatenFormularSpeichern = New System.Windows.Forms.Button()
|
||||
@@ -286,6 +294,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbUSTVDokumente.SuspendLayout()
|
||||
Me.tbUSTVAntrage.SuspendLayout()
|
||||
Me.tbFIBU.SuspendLayout()
|
||||
CType(Me.dgvZinsnachberechnung, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.tbRechnungen.SuspendLayout()
|
||||
CType(Me.dgvRg, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.MyPanel1.SuspendLayout()
|
||||
@@ -324,7 +333,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbFirmendaten.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbFirmendaten.Name = "tbFirmendaten"
|
||||
Me.tbFirmendaten.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.tbFirmendaten.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbFirmendaten.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbFirmendaten.TabIndex = 3
|
||||
Me.tbFirmendaten.Text = "Firmendaten"
|
||||
'
|
||||
@@ -334,7 +343,7 @@ Partial Class frmKundenblatt
|
||||
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel4.Location = New System.Drawing.Point(3, 3)
|
||||
Me.Panel4.Name = "Panel4"
|
||||
Me.Panel4.Size = New System.Drawing.Size(1638, 1435)
|
||||
Me.Panel4.Size = New System.Drawing.Size(1638, 1452)
|
||||
Me.Panel4.TabIndex = 0
|
||||
'
|
||||
'UsrcntlKundeBearbeitenFull1
|
||||
@@ -344,7 +353,7 @@ Partial Class frmKundenblatt
|
||||
Me.UsrcntlKundeBearbeitenFull1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrcntlKundeBearbeitenFull1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.UsrcntlKundeBearbeitenFull1.Name = "UsrcntlKundeBearbeitenFull1"
|
||||
Me.UsrcntlKundeBearbeitenFull1.Size = New System.Drawing.Size(1638, 1435)
|
||||
Me.UsrcntlKundeBearbeitenFull1.Size = New System.Drawing.Size(1638, 1452)
|
||||
Me.UsrcntlKundeBearbeitenFull1.TabIndex = 0
|
||||
'
|
||||
'tbcntrMain
|
||||
@@ -364,7 +373,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbcntrMain.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.tbcntrMain.Name = "tbcntrMain"
|
||||
Me.tbcntrMain.SelectedIndex = 0
|
||||
Me.tbcntrMain.Size = New System.Drawing.Size(1652, 1470)
|
||||
Me.tbcntrMain.Size = New System.Drawing.Size(1652, 1487)
|
||||
Me.tbcntrMain.TabIndex = 3
|
||||
'
|
||||
'tbAllgemein
|
||||
@@ -405,7 +414,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbAllgemein.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.tbAllgemein.Name = "tbAllgemein"
|
||||
Me.tbAllgemein.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.tbAllgemein.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbAllgemein.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbAllgemein.TabIndex = 0
|
||||
Me.tbAllgemein.Text = "Allgemein"
|
||||
'
|
||||
@@ -486,7 +495,7 @@ Partial Class frmKundenblatt
|
||||
Me.TabControl1.Location = New System.Drawing.Point(8, 582)
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
Me.TabControl1.Size = New System.Drawing.Size(718, 853)
|
||||
Me.TabControl1.Size = New System.Drawing.Size(718, 870)
|
||||
Me.TabControl1.TabIndex = 186
|
||||
'
|
||||
'TabPage1
|
||||
@@ -498,7 +507,7 @@ Partial Class frmKundenblatt
|
||||
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage1.Name = "TabPage1"
|
||||
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage1.Size = New System.Drawing.Size(710, 827)
|
||||
Me.TabPage1.Size = New System.Drawing.Size(710, 844)
|
||||
Me.TabPage1.TabIndex = 0
|
||||
Me.TabPage1.Text = "Offene Posten"
|
||||
Me.TabPage1.UseVisualStyleBackColor = True
|
||||
@@ -557,7 +566,7 @@ Partial Class frmKundenblatt
|
||||
Me.dgvOffenePosten.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
|
||||
Me.dgvOffenePosten.RowHeadersVisible = False
|
||||
Me.dgvOffenePosten.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvOffenePosten.Size = New System.Drawing.Size(707, 792)
|
||||
Me.dgvOffenePosten.Size = New System.Drawing.Size(707, 809)
|
||||
Me.dgvOffenePosten.TabIndex = 175
|
||||
'
|
||||
'Label10
|
||||
@@ -590,7 +599,7 @@ Partial Class frmKundenblatt
|
||||
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage2.Name = "TabPage2"
|
||||
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(710, 827)
|
||||
Me.TabPage2.Size = New System.Drawing.Size(710, 844)
|
||||
Me.TabPage2.TabIndex = 1
|
||||
Me.TabPage2.Text = "Umsatzbericht"
|
||||
Me.TabPage2.UseVisualStyleBackColor = True
|
||||
@@ -635,7 +644,7 @@ Partial Class frmKundenblatt
|
||||
Me.dgvUmsaetze.RowHeadersDefaultCellStyle = DataGridViewCellStyle8
|
||||
Me.dgvUmsaetze.RowHeadersVisible = False
|
||||
Me.dgvUmsaetze.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvUmsaetze.Size = New System.Drawing.Size(707, 799)
|
||||
Me.dgvUmsaetze.Size = New System.Drawing.Size(707, 816)
|
||||
Me.dgvUmsaetze.TabIndex = 182
|
||||
'
|
||||
'Label13
|
||||
@@ -683,7 +692,7 @@ Partial Class frmKundenblatt
|
||||
Me.TabPage3.Controls.Add(Me.dgvUmsatzNachLeistngsNr)
|
||||
Me.TabPage3.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage3.Name = "TabPage3"
|
||||
Me.TabPage3.Size = New System.Drawing.Size(710, 827)
|
||||
Me.TabPage3.Size = New System.Drawing.Size(710, 844)
|
||||
Me.TabPage3.TabIndex = 2
|
||||
Me.TabPage3.Text = "Umsatz nach LeistungsNr"
|
||||
Me.TabPage3.UseVisualStyleBackColor = True
|
||||
@@ -739,7 +748,7 @@ Partial Class frmKundenblatt
|
||||
Me.dgvUmsatzNachLeistngsNr.RowHeadersDefaultCellStyle = DataGridViewCellStyle12
|
||||
Me.dgvUmsatzNachLeistngsNr.RowHeadersVisible = False
|
||||
Me.dgvUmsatzNachLeistngsNr.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvUmsatzNachLeistngsNr.Size = New System.Drawing.Size(705, 838)
|
||||
Me.dgvUmsatzNachLeistngsNr.Size = New System.Drawing.Size(705, 855)
|
||||
Me.dgvUmsatzNachLeistngsNr.TabIndex = 183
|
||||
'
|
||||
'lblAdressenzusatz
|
||||
@@ -1100,7 +1109,7 @@ Partial Class frmKundenblatt
|
||||
Me.dgvSperrliste.Name = "dgvSperrliste"
|
||||
Me.dgvSperrliste.ReadOnly = True
|
||||
Me.dgvSperrliste.RowHeadersDefaultCellStyle = DataGridViewCellStyle15
|
||||
Me.dgvSperrliste.Size = New System.Drawing.Size(446, 1397)
|
||||
Me.dgvSperrliste.Size = New System.Drawing.Size(446, 1414)
|
||||
Me.dgvSperrliste.TabIndex = 23
|
||||
'
|
||||
'PictureBox2
|
||||
@@ -1154,7 +1163,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbZoll.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbZoll.Name = "tbZoll"
|
||||
Me.tbZoll.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.tbZoll.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbZoll.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbZoll.TabIndex = 9
|
||||
Me.tbZoll.Text = "ZOLL"
|
||||
Me.tbZoll.UseVisualStyleBackColor = True
|
||||
@@ -1166,7 +1175,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbcntrZOLL.Location = New System.Drawing.Point(3, 3)
|
||||
Me.tbcntrZOLL.Name = "tbcntrZOLL"
|
||||
Me.tbcntrZOLL.SelectedIndex = 0
|
||||
Me.tbcntrZOLL.Size = New System.Drawing.Size(1638, 1435)
|
||||
Me.tbcntrZOLL.Size = New System.Drawing.Size(1638, 1452)
|
||||
Me.tbcntrZOLL.TabIndex = 0
|
||||
'
|
||||
'tabZoll_Artikel
|
||||
@@ -1174,7 +1183,7 @@ Partial Class frmKundenblatt
|
||||
Me.tabZoll_Artikel.Location = New System.Drawing.Point(4, 22)
|
||||
Me.tabZoll_Artikel.Name = "tabZoll_Artikel"
|
||||
Me.tabZoll_Artikel.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.tabZoll_Artikel.Size = New System.Drawing.Size(1630, 1409)
|
||||
Me.tabZoll_Artikel.Size = New System.Drawing.Size(1630, 1426)
|
||||
Me.tabZoll_Artikel.TabIndex = 1
|
||||
Me.tabZoll_Artikel.Text = "Artikel"
|
||||
Me.tabZoll_Artikel.UseVisualStyleBackColor = True
|
||||
@@ -1185,7 +1194,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbMdm.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbMdm.Name = "tbMdm"
|
||||
Me.tbMdm.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.tbMdm.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbMdm.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbMdm.TabIndex = 10
|
||||
Me.tbMdm.Text = "MDM"
|
||||
Me.tbMdm.UseVisualStyleBackColor = True
|
||||
@@ -1204,7 +1213,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbcntrMDM.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.tbcntrMDM.Name = "tbcntrMDM"
|
||||
Me.tbcntrMDM.SelectedIndex = 0
|
||||
Me.tbcntrMDM.Size = New System.Drawing.Size(1638, 1435)
|
||||
Me.tbcntrMDM.Size = New System.Drawing.Size(1638, 1452)
|
||||
Me.tbcntrMDM.TabIndex = 0
|
||||
'
|
||||
'tbSDL
|
||||
@@ -1216,7 +1225,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbSDL.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.tbSDL.Name = "tbSDL"
|
||||
Me.tbSDL.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.tbSDL.Size = New System.Drawing.Size(1630, 1409)
|
||||
Me.tbSDL.Size = New System.Drawing.Size(1630, 1426)
|
||||
Me.tbSDL.TabIndex = 5
|
||||
Me.tbSDL.Text = "SDL-Leistungen"
|
||||
Me.tbSDL.UseVisualStyleBackColor = True
|
||||
@@ -1258,7 +1267,7 @@ Partial Class frmKundenblatt
|
||||
DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvSDLLeistungenFull.RowHeadersDefaultCellStyle = DataGridViewCellStyle21
|
||||
Me.dgvSDLLeistungenFull.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvSDLLeistungenFull.Size = New System.Drawing.Size(1624, 1213)
|
||||
Me.dgvSDLLeistungenFull.Size = New System.Drawing.Size(1624, 1230)
|
||||
Me.dgvSDLLeistungenFull.TabIndex = 5
|
||||
'
|
||||
'Panel6
|
||||
@@ -1363,7 +1372,7 @@ Partial Class frmKundenblatt
|
||||
Me.Panel5.Controls.Add(Me.lblLetzterSA_SDL)
|
||||
Me.Panel5.Controls.Add(Me.rtbVermerke)
|
||||
Me.Panel5.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.Panel5.Location = New System.Drawing.Point(3, 1263)
|
||||
Me.Panel5.Location = New System.Drawing.Point(3, 1280)
|
||||
Me.Panel5.Name = "Panel5"
|
||||
Me.Panel5.Size = New System.Drawing.Size(1624, 143)
|
||||
Me.Panel5.TabIndex = 177
|
||||
@@ -2249,7 +2258,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbOfferte.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbOfferte.Margin = New System.Windows.Forms.Padding(2)
|
||||
Me.tbOfferte.Name = "tbOfferte"
|
||||
Me.tbOfferte.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbOfferte.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbOfferte.TabIndex = 11
|
||||
Me.tbOfferte.Text = "Offerte"
|
||||
Me.tbOfferte.UseVisualStyleBackColor = True
|
||||
@@ -2261,7 +2270,7 @@ Partial Class frmKundenblatt
|
||||
Me.UsrCntlOfferte1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrCntlOfferte1.Margin = New System.Windows.Forms.Padding(1)
|
||||
Me.UsrCntlOfferte1.Name = "UsrCntlOfferte1"
|
||||
Me.UsrCntlOfferte1.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.UsrCntlOfferte1.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.UsrCntlOfferte1.TabIndex = 0
|
||||
'
|
||||
'tbUSTV
|
||||
@@ -2269,7 +2278,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbUSTV.Controls.Add(Me.tbcntrUSTV)
|
||||
Me.tbUSTV.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbUSTV.Name = "tbUSTV"
|
||||
Me.tbUSTV.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbUSTV.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbUSTV.TabIndex = 12
|
||||
Me.tbUSTV.Text = "USTV"
|
||||
Me.tbUSTV.UseVisualStyleBackColor = True
|
||||
@@ -2283,7 +2292,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbcntrUSTV.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.tbcntrUSTV.Name = "tbcntrUSTV"
|
||||
Me.tbcntrUSTV.SelectedIndex = 0
|
||||
Me.tbcntrUSTV.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbcntrUSTV.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbcntrUSTV.TabIndex = 1
|
||||
'
|
||||
'tbUSTVDokumente
|
||||
@@ -2296,7 +2305,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbUSTVDokumente.Controls.Add(Me.scanUSTVVollmachten)
|
||||
Me.tbUSTVDokumente.Location = New System.Drawing.Point(4, 22)
|
||||
Me.tbUSTVDokumente.Name = "tbUSTVDokumente"
|
||||
Me.tbUSTVDokumente.Size = New System.Drawing.Size(1636, 1415)
|
||||
Me.tbUSTVDokumente.Size = New System.Drawing.Size(1636, 1432)
|
||||
Me.tbUSTVDokumente.TabIndex = 8
|
||||
Me.tbUSTVDokumente.Text = "Dokumente"
|
||||
Me.tbUSTVDokumente.UseVisualStyleBackColor = True
|
||||
@@ -2412,6 +2421,14 @@ Partial Class frmKundenblatt
|
||||
'
|
||||
'tbFIBU
|
||||
'
|
||||
Me.tbFIBU.Controls.Add(Me.lblZNB_verrechnet)
|
||||
Me.tbFIBU.Controls.Add(Me.lblZNB_offen)
|
||||
Me.tbFIBU.Controls.Add(Me.Label18)
|
||||
Me.tbFIBU.Controls.Add(Me.Label16)
|
||||
Me.tbFIBU.Controls.Add(Me.dgvZinsnachberechnung)
|
||||
Me.tbFIBU.Controls.Add(Me.Label15)
|
||||
Me.tbFIBU.Controls.Add(Me.Label14)
|
||||
Me.tbFIBU.Controls.Add(Me.txtZinsbelastung)
|
||||
Me.tbFIBU.Controls.Add(Me.Label12)
|
||||
Me.tbFIBU.Controls.Add(Me.rtbGespreachsbericht)
|
||||
Me.tbFIBU.Controls.Add(Me.btnFirmendatenFormularSpeichern)
|
||||
@@ -2419,16 +2436,103 @@ Partial Class frmKundenblatt
|
||||
Me.tbFIBU.Controls.Add(Me.txtFIBUKuerzel)
|
||||
Me.tbFIBU.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbFIBU.Name = "tbFIBU"
|
||||
Me.tbFIBU.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbFIBU.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbFIBU.TabIndex = 13
|
||||
Me.tbFIBU.Text = "FIBU"
|
||||
Me.tbFIBU.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblZNB_verrechnet
|
||||
'
|
||||
Me.lblZNB_verrechnet.AutoSize = True
|
||||
Me.lblZNB_verrechnet.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblZNB_verrechnet.Location = New System.Drawing.Point(1534, 84)
|
||||
Me.lblZNB_verrechnet.Name = "lblZNB_verrechnet"
|
||||
Me.lblZNB_verrechnet.Size = New System.Drawing.Size(13, 13)
|
||||
Me.lblZNB_verrechnet.TabIndex = 28
|
||||
Me.lblZNB_verrechnet.Text = "0"
|
||||
Me.lblZNB_verrechnet.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'lblZNB_offen
|
||||
'
|
||||
Me.lblZNB_offen.AutoSize = True
|
||||
Me.lblZNB_offen.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblZNB_offen.Location = New System.Drawing.Point(1534, 61)
|
||||
Me.lblZNB_offen.Name = "lblZNB_offen"
|
||||
Me.lblZNB_offen.Size = New System.Drawing.Size(13, 13)
|
||||
Me.lblZNB_offen.TabIndex = 27
|
||||
Me.lblZNB_offen.Text = "0"
|
||||
Me.lblZNB_offen.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'Label18
|
||||
'
|
||||
Me.Label18.AutoSize = True
|
||||
Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label18.Location = New System.Drawing.Point(1259, 84)
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Size = New System.Drawing.Size(58, 13)
|
||||
Me.Label18.TabIndex = 26
|
||||
Me.Label18.Text = "verrechnet"
|
||||
'
|
||||
'Label16
|
||||
'
|
||||
Me.Label16.AutoSize = True
|
||||
Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label16.Location = New System.Drawing.Point(1259, 61)
|
||||
Me.Label16.Name = "Label16"
|
||||
Me.Label16.Size = New System.Drawing.Size(84, 13)
|
||||
Me.Label16.TabIndex = 25
|
||||
Me.Label16.Text = "nicht verrechnet"
|
||||
'
|
||||
'dgvZinsnachberechnung
|
||||
'
|
||||
Me.dgvZinsnachberechnung.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.dgvZinsnachberechnung.AllowUserToAddRows = False
|
||||
Me.dgvZinsnachberechnung.AllowUserToDeleteRows = False
|
||||
Me.dgvZinsnachberechnung.AllowUserToResizeColumns = False
|
||||
Me.dgvZinsnachberechnung.AllowUserToResizeRows = False
|
||||
Me.dgvZinsnachberechnung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvZinsnachberechnung.Location = New System.Drawing.Point(688, 104)
|
||||
Me.dgvZinsnachberechnung.Name = "dgvZinsnachberechnung"
|
||||
Me.dgvZinsnachberechnung.ReadOnly = True
|
||||
Me.dgvZinsnachberechnung.RowHeadersVisible = False
|
||||
Me.dgvZinsnachberechnung.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvZinsnachberechnung.Size = New System.Drawing.Size(865, 492)
|
||||
Me.dgvZinsnachberechnung.TabIndex = 23
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
Me.Label15.AutoSize = True
|
||||
Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label15.Location = New System.Drawing.Point(685, 83)
|
||||
Me.Label15.Name = "Label15"
|
||||
Me.Label15.Size = New System.Drawing.Size(111, 13)
|
||||
Me.Label15.TabIndex = 22
|
||||
Me.Label15.Text = "Zinsnachberechnung:"
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label14.Location = New System.Drawing.Point(685, 18)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(124, 13)
|
||||
Me.Label14.TabIndex = 21
|
||||
Me.Label14.Text = "Zinssatz (Zinsbelastung):"
|
||||
'
|
||||
'txtZinsbelastung
|
||||
'
|
||||
Me.txtZinsbelastung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtZinsbelastung.Location = New System.Drawing.Point(959, 11)
|
||||
Me.txtZinsbelastung.MaxLength = 50
|
||||
Me.txtZinsbelastung.Name = "txtZinsbelastung"
|
||||
Me.txtZinsbelastung.Size = New System.Drawing.Size(53, 20)
|
||||
Me.txtZinsbelastung.TabIndex = 20
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label12.Location = New System.Drawing.Point(8, 57)
|
||||
Me.Label12.Location = New System.Drawing.Point(8, 83)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(93, 13)
|
||||
Me.Label12.TabIndex = 19
|
||||
@@ -2436,9 +2540,9 @@ Partial Class frmKundenblatt
|
||||
'
|
||||
'rtbGespreachsbericht
|
||||
'
|
||||
Me.rtbGespreachsbericht.Location = New System.Drawing.Point(11, 78)
|
||||
Me.rtbGespreachsbericht.Location = New System.Drawing.Point(11, 104)
|
||||
Me.rtbGespreachsbericht.Name = "rtbGespreachsbericht"
|
||||
Me.rtbGespreachsbericht.Size = New System.Drawing.Size(628, 324)
|
||||
Me.rtbGespreachsbericht.Size = New System.Drawing.Size(628, 492)
|
||||
Me.rtbGespreachsbericht.TabIndex = 18
|
||||
Me.rtbGespreachsbericht.Text = ""
|
||||
'
|
||||
@@ -2446,7 +2550,7 @@ Partial Class frmKundenblatt
|
||||
'
|
||||
Me.btnFirmendatenFormularSpeichern.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnFirmendatenFormularSpeichern.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnFirmendatenFormularSpeichern.Location = New System.Drawing.Point(568, 3)
|
||||
Me.btnFirmendatenFormularSpeichern.Location = New System.Drawing.Point(1482, 3)
|
||||
Me.btnFirmendatenFormularSpeichern.Name = "btnFirmendatenFormularSpeichern"
|
||||
Me.btnFirmendatenFormularSpeichern.Size = New System.Drawing.Size(71, 52)
|
||||
Me.btnFirmendatenFormularSpeichern.TabIndex = 17
|
||||
@@ -2469,7 +2573,7 @@ Partial Class frmKundenblatt
|
||||
Me.txtFIBUKuerzel.Location = New System.Drawing.Point(112, 18)
|
||||
Me.txtFIBUKuerzel.MaxLength = 50
|
||||
Me.txtFIBUKuerzel.Name = "txtFIBUKuerzel"
|
||||
Me.txtFIBUKuerzel.Size = New System.Drawing.Size(289, 20)
|
||||
Me.txtFIBUKuerzel.Size = New System.Drawing.Size(223, 20)
|
||||
Me.txtFIBUKuerzel.TabIndex = 3
|
||||
'
|
||||
'tbRechnungen
|
||||
@@ -2478,7 +2582,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbRechnungen.Controls.Add(Me.MyPanel1)
|
||||
Me.tbRechnungen.Location = New System.Drawing.Point(4, 25)
|
||||
Me.tbRechnungen.Name = "tbRechnungen"
|
||||
Me.tbRechnungen.Size = New System.Drawing.Size(1644, 1441)
|
||||
Me.tbRechnungen.Size = New System.Drawing.Size(1644, 1458)
|
||||
Me.tbRechnungen.TabIndex = 14
|
||||
Me.tbRechnungen.Text = "Rechnungen"
|
||||
Me.tbRechnungen.UseVisualStyleBackColor = True
|
||||
@@ -2497,7 +2601,7 @@ Partial Class frmKundenblatt
|
||||
Me.dgvRg.ReadOnly = True
|
||||
Me.dgvRg.RowHeadersVisible = False
|
||||
Me.dgvRg.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvRg.Size = New System.Drawing.Size(1644, 1381)
|
||||
Me.dgvRg.Size = New System.Drawing.Size(1644, 1398)
|
||||
Me.dgvRg.TabIndex = 3
|
||||
'
|
||||
'MyPanel1
|
||||
@@ -2892,7 +2996,7 @@ Partial Class frmKundenblatt
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.AutoScroll = True
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(1595, 1599)
|
||||
Me.ClientSize = New System.Drawing.Size(1651, 1616)
|
||||
Me.Controls.Add(Me.lblAbfVerb)
|
||||
Me.Controls.Add(Me.btnAbfVerb)
|
||||
Me.Controls.Add(Me.tbcntrMain)
|
||||
@@ -2969,6 +3073,7 @@ Partial Class frmKundenblatt
|
||||
Me.tbUSTVAntrage.ResumeLayout(False)
|
||||
Me.tbFIBU.ResumeLayout(False)
|
||||
Me.tbFIBU.PerformLayout()
|
||||
CType(Me.dgvZinsnachberechnung, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.tbRechnungen.ResumeLayout(False)
|
||||
CType(Me.dgvRg, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.MyPanel1.ResumeLayout(False)
|
||||
@@ -3172,4 +3277,12 @@ Partial Class frmKundenblatt
|
||||
Friend WithEvents ToolStripMenuItem10 As ToolStripMenuItem
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents rtbGespreachsbericht As RichTextBox
|
||||
Friend WithEvents Label14 As Label
|
||||
Friend WithEvents txtZinsbelastung As TextBox
|
||||
Friend WithEvents Label15 As Label
|
||||
Friend WithEvents lblZNB_verrechnet As Label
|
||||
Friend WithEvents lblZNB_offen As Label
|
||||
Friend WithEvents Label18 As Label
|
||||
Friend WithEvents Label16 As Label
|
||||
Friend WithEvents dgvZinsnachberechnung As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||
End Class
|
||||
|
||||
@@ -466,6 +466,10 @@ Public Class frmKundenblatt
|
||||
If kdNr > 0 Then
|
||||
rtbGespreachsbericht.Text = checkNullStr(KUNDE.Gesprächsbericht)
|
||||
txtFIBUKuerzel.Text = checkNullStr(KUNDE_ERW.kde_BezFIBU)
|
||||
txtZinsbelastung.Text = checkNullStr(KUNDE_ERW.kde_zinssatz)
|
||||
|
||||
initZNB()
|
||||
|
||||
End If
|
||||
|
||||
Else
|
||||
@@ -2217,6 +2221,14 @@ Public Class frmKundenblatt
|
||||
|
||||
Private Sub btnFirmendatenFormularSpeichern_Click(sender As Object, e As EventArgs) Handles btnFirmendatenFormularSpeichern.Click
|
||||
KUNDE_ERW.kde_BezFIBU = checkNullStr(txtFIBUKuerzel.Text)
|
||||
|
||||
If txtZinsbelastung.Text <> "" AndAlso txtZinsbelastung.Text.Contains(",") Then
|
||||
txtZinsbelastung.Text = txtZinsbelastung.ToString.Replace(",", ".")
|
||||
End If
|
||||
|
||||
KUNDE_ERW.kde_zinssatz = checkNullStr(txtZinsbelastung.Text)
|
||||
|
||||
|
||||
KUNDE_ERW.SAVE()
|
||||
|
||||
If KUNDE.Gesprächsbericht <> "" AndAlso checkNullStr(rtbGespreachsbericht.Text) = "" OrElse KUNDE.Gesprächsbericht = "" AndAlso checkNullStr(rtbGespreachsbericht.Text) <> "" Then
|
||||
@@ -2380,5 +2392,102 @@ Public Class frmKundenblatt
|
||||
|
||||
End Sub
|
||||
|
||||
Sub initZNB()
|
||||
|
||||
With dgvZinsnachberechnung
|
||||
Dim sqlStr = ""
|
||||
sqlStr &= " SELECT TOP 1000 [belegNr] ,[belegDatum],[buchungstext],[zinsbetrag],[zinssatz],[ueberschreitungInTagen],[belegZahlungsziel],[timestamp], cast(case when [verrechnet] is null then 0 else 1 end as bit) as verrechnet"
|
||||
sqlStr &= " FROM [tblMDM_Zinsberechnung] WHERE kundenNr=" & kdNr
|
||||
|
||||
.SET_SQL(sqlStr & " ORDER BY belegdatum desc", "FMZOLL")
|
||||
.LOAD()
|
||||
|
||||
'.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.AllCells
|
||||
|
||||
|
||||
.Columns("belegNr").Width = 70
|
||||
.Columns("belegNr").HeaderText = "Beleg-Nr"
|
||||
.Columns("belegNr").HeaderCell.Style.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
.Columns("belegNr").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
|
||||
.Columns("belegDatum").Width = 100
|
||||
.Columns("belegDatum").HeaderText = "Beleg-Dat."
|
||||
.Columns("belegDatum").HeaderCell.Style.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
.Columns("belegDatum").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
|
||||
'.Columns("Rechnungsbetrag").Width = 100
|
||||
'.Columns("Rechnungsbetrag").HeaderText = "Belegbetrag"
|
||||
'.Columns("Rechnungsbetrag").DefaultCellStyle.Format = "C"
|
||||
'.Columns("Rechnungsbetrag").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopRight
|
||||
|
||||
.Columns("buchungstext").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
.Columns("buchungstext").HeaderText = "Text"
|
||||
.Columns("buchungstext").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopRight
|
||||
|
||||
|
||||
.Columns("zinsbetrag").Width = 100
|
||||
.Columns("zinsbetrag").HeaderText = "Zinsbetrag"
|
||||
.Columns("zinsbetrag").DefaultCellStyle.Format = "C"
|
||||
.Columns("zinsbetrag").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopRight
|
||||
|
||||
.Columns("zinssatz").Width = 100
|
||||
.Columns("zinssatz").HeaderText = "Zinssatz"
|
||||
.Columns("zinssatz").DefaultCellStyle.Format = "C"
|
||||
.Columns("zinssatz").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopRight
|
||||
|
||||
|
||||
.Columns("ueberschreitungInTagen").Width = 45
|
||||
.Columns("ueberschreitungInTagen").HeaderText = "Tage"
|
||||
.Columns("ueberschreitungInTagen").HeaderCell.Style.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
.Columns("ueberschreitungInTagen").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
|
||||
|
||||
.Columns("belegZahlungsziel").Width = 45
|
||||
.Columns("belegZahlungsziel").HeaderText = "ZZ"
|
||||
.Columns("belegZahlungsziel").HeaderCell.Style.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
.Columns("belegZahlungsziel").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
|
||||
.Columns("verrechnet").Width = 50
|
||||
.Columns("verrechnet").HeaderText = "Fakt."
|
||||
.Columns("verrechnet").HeaderCell.Style.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
.Columns("verrechnet").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
|
||||
.Columns("timestamp").Width = 100
|
||||
.Columns("timestamp").HeaderText = "Erstellt am"
|
||||
.Columns("timestamp").HeaderCell.Style.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
.Columns("timestamp").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter
|
||||
|
||||
|
||||
Dim sumOffeneZB As Double = 0
|
||||
Dim sumVerrZB As Double = 0
|
||||
|
||||
|
||||
For Each r As DataGridViewRow In .Rows
|
||||
If (IsNumeric(r.Cells("zinsbetrag").Value)) Then
|
||||
If Not IsDBNull(r.Cells("verrechnet").Value) AndAlso r.Cells("verrechnet").Value > 0 Then
|
||||
sumVerrZB += If(IsNumeric(r.Cells("zinsbetrag").Value), CDbl(r.Cells("zinsbetrag").Value), 0)
|
||||
Else
|
||||
sumOffeneZB += If(IsNumeric(r.Cells("zinsbetrag").Value), CDbl(r.Cells("zinsbetrag").Value), 0)
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
Next
|
||||
|
||||
lblZNB_offen.Text = sumOffeneZB
|
||||
lblZNB_verrechnet.Text = sumVerrZB
|
||||
|
||||
|
||||
End With
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
@@ -175,14 +175,14 @@ Public Class usrCntlIDSPreise
|
||||
ORDER BY tbl_IDS_Länder.OutletCountry, tbl_IDS_Rechenwerte.OutletCountryCode, tbl_IDS_Stationen.OutletName, tbl_IDS_Rechenwerte.OutletCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.ProductTypeCode;"
|
||||
|
||||
Case "LK"
|
||||
SQL_ = "SELECT tbl_IDS_Rechenwerte.OutletCountryCode, tbl_IDS_Länder.OutletCountry, tbl_IDS_Rechenwerte.CustomerCode,Adressen.Ordnungsbegriff AS CustomerName,tbl_IDS_Rechenwerte.ProductTypeCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.Rechenwert, tbl_IDS_Rechenwerte.Kz, tbl_IDS_Rechenwerte.KategorieNr, tbl_IDS_Rechenwerte.Zeitstempel, tbl_IDS_Rechenwerte.Sachbearbeiter
|
||||
SQL_ = "SELECT tbl_IDS_Rechenwerte.ID as ID,tbl_IDS_Rechenwerte.OutletCountryCode, tbl_IDS_Länder.OutletCountry, tbl_IDS_Rechenwerte.CustomerCode,Adressen.Ordnungsbegriff AS CustomerName,tbl_IDS_Rechenwerte.ProductTypeCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.Rechenwert, tbl_IDS_Rechenwerte.Kz, tbl_IDS_Rechenwerte.KategorieNr, tbl_IDS_Rechenwerte.Zeitstempel, tbl_IDS_Rechenwerte.Sachbearbeiter
|
||||
FROM tbl_IDS_Produkte INNER JOIN (tbl_IDS_Länder INNER JOIN (Adressen INNER JOIN tbl_IDS_Rechenwerte ON Adressen.AdressenNr = tbl_IDS_Rechenwerte.CustomerCode) ON tbl_IDS_Länder.OutletCountryCode = tbl_IDS_Rechenwerte.OutletCountryCode) ON tbl_IDS_Produkte.ProductTypeCode = tbl_IDS_Rechenwerte.ProductTypeCode
|
||||
WHERE (((tbl_IDS_Rechenwerte.CustomerCode) Is Not Null) AND ((tbl_IDS_Rechenwerte.OutletCode) Is Null) " & IIf(OutletCountryCode > 0, " AND tbl_IDS_Rechenwerte.OutletCountryCode = " & OutletCountryCode & ") ", ") ") & SQL_WHERE & "
|
||||
ORDER BY tbl_IDS_Länder.OutletCountry, tbl_IDS_Rechenwerte.OutletCountryCode, Adressen.Ordnungsbegriff, tbl_IDS_Rechenwerte.CustomerCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.ProductTypeCode;"
|
||||
|
||||
|
||||
Case "LSK"
|
||||
SQL_ = "SELECT tbl_IDS_Rechenwerte.ID as ID,tbl_IDS_Rechenwerte.OutletCountryCode, tbl_IDS_Länder.OutletCountry,tbl_IDS_Rechenwerte.OutletCode, tbl_IDS_Stationen.OutletName, tbl_IDS_Rechenwerte.CustomerCode,Adressen.Ordnungsbegriff AS CustomerName, tbl_IDS_Rechenwerte.ProductTypeCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.Rechenwert, tbl_IDS_Rechenwerte.Kz, tbl_IDS_Rechenwerte.KategorieNr, tbl_IDS_Rechenwerte.Zeitstempel, tbl_IDS_Rechenwerte.Sachbearbeiter
|
||||
SQL_ = "SELECT tbl_IDS_Rechenwerte.ID c,tbl_IDS_Rechenwerte.OutletCountryCode, tbl_IDS_Länder.OutletCountry,tbl_IDS_Rechenwerte.OutletCode, tbl_IDS_Stationen.OutletName, tbl_IDS_Rechenwerte.CustomerCode,Adressen.Ordnungsbegriff AS CustomerName, tbl_IDS_Rechenwerte.ProductTypeCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.Rechenwert, tbl_IDS_Rechenwerte.Kz, tbl_IDS_Rechenwerte.KategorieNr, tbl_IDS_Rechenwerte.Zeitstempel, tbl_IDS_Rechenwerte.Sachbearbeiter
|
||||
FROM tbl_IDS_Produkte INNER JOIN (tbl_IDS_Länder INNER JOIN (Adressen INNER JOIN (tbl_IDS_Stationen INNER JOIN tbl_IDS_Rechenwerte ON (tbl_IDS_Stationen.OutletCountryCode = tbl_IDS_Rechenwerte.OutletCountryCode) AND (tbl_IDS_Stationen.OutletCode = tbl_IDS_Rechenwerte.OutletCode)) ON Adressen.AdressenNr = tbl_IDS_Rechenwerte.CustomerCode) ON tbl_IDS_Länder.OutletCountryCode = tbl_IDS_Rechenwerte.OutletCountryCode) ON tbl_IDS_Produkte.ProductTypeCode = tbl_IDS_Rechenwerte.ProductTypeCode
|
||||
WHERE (((tbl_IDS_Rechenwerte.OutletCode) Is Not Null) AND ((tbl_IDS_Rechenwerte.CustomerCode) Is Not Null) " & IIf(OutletCountryCode > 0, " AND tbl_IDS_Rechenwerte.OutletCountryCode = " & OutletCountryCode & ") ", ") ") & SQL_WHERE & "
|
||||
ORDER BY tbl_IDS_Länder.OutletCountry, tbl_IDS_Rechenwerte.OutletCountryCode, tbl_IDS_Stationen.OutletName, tbl_IDS_Rechenwerte.OutletCode, Adressen.Ordnungsbegriff, tbl_IDS_Rechenwerte.CustomerCode, tbl_IDS_Produkte.ProductDescription, tbl_IDS_Rechenwerte.ProductTypeCode;"
|
||||
|
||||
@@ -96,11 +96,10 @@ Public Class cKundenErweitert
|
||||
Property kde_Kopfsammelrechnung As Boolean = False
|
||||
Property kde_CSPortfolioAdded As Boolean = False
|
||||
Property kde_CSinsolventAm As Object = Nothing
|
||||
|
||||
|
||||
Property kde_Provisionsverguetung As Boolean = False
|
||||
Property kde_Provisionsverguetung_ProzentDL As Object = Nothing
|
||||
Property kde_Provisionsverguetung_GSAnKdNr As Object = Nothing
|
||||
Property kde_zinssatz As Object = Nothing
|
||||
|
||||
|
||||
|
||||
@@ -207,6 +206,7 @@ Public Class cKundenErweitert
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_Provisionsverguetung_ProzentDL", kde_Provisionsverguetung_ProzentDL))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_Provisionsverguetung_GSAnKdNr", kde_Provisionsverguetung_GSAnKdNr))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_CSinsolventAm", kde_CSinsolventAm))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kde_zinssatz", kde_zinssatz))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
@@ -33,7 +33,7 @@ Public Class cMDMEinarbeitung
|
||||
Sub New(supplier, invoicedate, importdate)
|
||||
Me.supplier = supplier
|
||||
Me.invoicedate = invoicedate
|
||||
Me.import_date = import_date
|
||||
Me.import_date = importdate
|
||||
LOAD(supplier, invoicedate, import_date)
|
||||
End Sub
|
||||
|
||||
|
||||
207
VERAG_PROG_ALLGEMEIN/Classes/cMDMZinsberechnung.vb
Normal file
207
VERAG_PROG_ALLGEMEIN/Classes/cMDMZinsberechnung.vb
Normal file
@@ -0,0 +1,207 @@
|
||||
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.Reflection
|
||||
|
||||
Public Class cMDMZinsberechnung
|
||||
Property id As Integer
|
||||
Property kundenNr As Object = Nothing
|
||||
Property belegNr As Object = Nothing
|
||||
Property buchungstext As Object = Nothing
|
||||
Property kundeZahlungsziel As Object = Nothing
|
||||
Property zinssatz As Object = Nothing
|
||||
Property belegZahlungsziel As Object = Nothing
|
||||
Property ueberschreitungInTagen As Object = Nothing
|
||||
Property zinsbetrag As Object = Nothing
|
||||
Property timestamp As Object = Nothing
|
||||
Property verrechnet As Object = Nothing
|
||||
Property belegDatum As Object = Nothing
|
||||
Property zahlungDatum As Object = Nothing
|
||||
Property zahlungsBetrag As Object = Nothing
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New SQL
|
||||
|
||||
Sub New(id)
|
||||
Me.id = id
|
||||
LOAD()
|
||||
End Sub
|
||||
|
||||
Sub New(kundennr, BelegNr)
|
||||
Me.kundenNr = kundennr
|
||||
Me.belegNr = BelegNr
|
||||
LOAD(kundennr, BelegNr)
|
||||
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("id", id,, True))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kundenNr", kundenNr))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("belegNr", belegNr))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("buchungstext", buchungstext))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("kundeZahlungsziel", kundeZahlungsziel))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zinssatz", zinssatz))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("belegZahlungsziel", belegZahlungsziel))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ueberschreitungInTagen", ueberschreitungInTagen))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zinsbetrag", zinsbetrag))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("timestamp", timestamp))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("verrechnet", verrechnet))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("belegDatum", belegDatum))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zahlungDatum", zahlungDatum))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zahlungsBetrag", zahlungsBetrag))
|
||||
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN IF EXISTS(SELECT * FROM tblMDM_Zinsberechnung WHERE id=@id) " &
|
||||
" BEGIN " & getUpdateCmd() & " END " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " END " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "FMZOLL", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionFMZOLL()
|
||||
Using cmd As New SqlCommand("SELECT * FROM tblMDM_Zinsberechnung WHERE id=@id ", conn)
|
||||
cmd.Parameters.AddWithValue("@id", id)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub LOAD(kundennr, BelegNr)
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionFMZOLL()
|
||||
Using cmd As New SqlCommand("SELECT * FROM tblMDM_Zinsberechnung WHERE kundennr=@kundennr and BelegNr=@BelegNr ", conn)
|
||||
cmd.Parameters.AddWithValue("@kundennr", kundennr)
|
||||
cmd.Parameters.AddWithValue("@BelegNr", BelegNr)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [tblMDM_Zinsberechnung] SET " & str & " WHERE id=@id ")
|
||||
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO tblMDM_Zinsberechnung (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Shared Function GET_NICHTABGERECHNETE_ZB(ByRef dt As DataTable, KundenNr As Integer) As Boolean
|
||||
Try
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionFMZOLL()
|
||||
|
||||
Using cmd As New SqlCommand("SELECT belegNr,belegDatum,buchungstext,zahlungsBetrag,zahlungDatum, ueberschreitungInTagen, zinssatz,zinsbetrag
|
||||
|
||||
FROM
|
||||
tblMDM_Zinsberechnung
|
||||
WHERE
|
||||
kundenNr = @KundenNr
|
||||
AND zinsbetrag <> 0
|
||||
AND verrechnet is null
|
||||
ORDER BY
|
||||
belegDatum", conn)
|
||||
|
||||
cmd.Parameters.AddWithValue("@KundenNr", KundenNr)
|
||||
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
dt.Load(dr)
|
||||
'While dr.Read
|
||||
' dt.Load(dr)
|
||||
'End While
|
||||
dr.Close()
|
||||
|
||||
End Using
|
||||
End Using
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Return False
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -387,6 +387,7 @@
|
||||
<Compile Include="AuditFlow\Classes\cAuditFlow_Pruefobjekte.vb" />
|
||||
<Compile Include="AuditFlow\Classes\cAuditFlow_Pruefungen.vb" />
|
||||
<Compile Include="Classes\cMDMEInarbeitung.vb" />
|
||||
<Compile Include="Classes\cMDMZinsberechnung.vb" />
|
||||
<Compile Include="frmTimasabfrage.Designer.vb">
|
||||
<DependentUpon>frmTimasabfrage.vb</DependentUpon>
|
||||
</Compile>
|
||||
|
||||
Reference in New Issue
Block a user