Revert "commit"
This commit is contained in:
919
SDL/zoll/frmAddArtikelATLAS.Designer.vb
generated
Normal file
919
SDL/zoll/frmAddArtikelATLAS.Designer.vb
generated
Normal file
@@ -0,0 +1,919 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmAddArtikelATLAS
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAddArtikelATLAS))
|
||||
Me.lblError = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.Panel3 = New System.Windows.Forms.Panel()
|
||||
Me.errWarencodenummer = New System.Windows.Forms.Label()
|
||||
Me.Label17 = New System.Windows.Forms.Label()
|
||||
Me.Label18 = New System.Windows.Forms.Label()
|
||||
Me.Label19 = New System.Windows.Forms.Label()
|
||||
Me.lblStatus = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.lblAufschubKtoEUST = New System.Windows.Forms.Label()
|
||||
Me.lblOrt = New System.Windows.Forms.Label()
|
||||
Me.lblStrasse = New System.Windows.Forms.Label()
|
||||
Me.lblAufschubKtoZoll = New System.Windows.Forms.Label()
|
||||
Me.lblEORINr = New System.Windows.Forms.Label()
|
||||
Me.lblFirma = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label16 = New System.Windows.Forms.Label()
|
||||
Me.txtKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.btnSave = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.txtMerkmal1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.txtWarencodeZusatz1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.lblErfassung = New System.Windows.Forms.Label()
|
||||
Me.txtMerkmal2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label15 = New System.Windows.Forms.Label()
|
||||
Me.txtWarencodeZusatz2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.lblAenderung = New System.Windows.Forms.Label()
|
||||
Me.txtArtikelNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.lblSachbearb = New System.Windows.Forms.Label()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.txtKurztext = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtBeschreibung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtWarencodenummer = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Panel4 = New System.Windows.Forms.Panel()
|
||||
Me.cbxSBG = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxSUB = New System.Windows.Forms.CheckBox()
|
||||
Me.FlatButton3 = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.cbxUeberschreiben = New System.Windows.Forms.CheckBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.Panel2 = New System.Windows.Forms.Panel()
|
||||
Me.cboJumpToKd_Firma = New System.Windows.Forms.ComboBox()
|
||||
Me.btnKdSearch = New System.Windows.Forms.Button()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components)
|
||||
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
|
||||
Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.Panel3.SuspendLayout()
|
||||
Me.Panel4.SuspendLayout()
|
||||
Me.Panel2.SuspendLayout()
|
||||
CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.BindingNavigator1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lblError
|
||||
'
|
||||
Me.lblError.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblError.Location = New System.Drawing.Point(220, 338)
|
||||
Me.lblError.Name = "lblError"
|
||||
Me.lblError.Size = New System.Drawing.Size(342, 25)
|
||||
Me.lblError.TabIndex = 5
|
||||
Me.lblError.Text = "ERROR"
|
||||
Me.lblError.Visible = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.Location = New System.Drawing.Point(11, 8)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(88, 13)
|
||||
Me.Label1.TabIndex = 1
|
||||
Me.Label1.Text = "Kunde suchen"
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BackColor = System.Drawing.Color.White
|
||||
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel1.Controls.Add(Me.Panel3)
|
||||
Me.Panel1.Controls.Add(Me.Panel2)
|
||||
Me.Panel1.Controls.Add(Me.Label3)
|
||||
Me.Panel1.Controls.Add(Me.BindingNavigator1)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(569, 540)
|
||||
Me.Panel1.TabIndex = 8
|
||||
'
|
||||
'Panel3
|
||||
'
|
||||
Me.Panel3.Controls.Add(Me.errWarencodenummer)
|
||||
Me.Panel3.Controls.Add(Me.Label17)
|
||||
Me.Panel3.Controls.Add(Me.Label18)
|
||||
Me.Panel3.Controls.Add(Me.Label19)
|
||||
Me.Panel3.Controls.Add(Me.lblStatus)
|
||||
Me.Panel3.Controls.Add(Me.Label4)
|
||||
Me.Panel3.Controls.Add(Me.lblAufschubKtoEUST)
|
||||
Me.Panel3.Controls.Add(Me.lblOrt)
|
||||
Me.Panel3.Controls.Add(Me.lblStrasse)
|
||||
Me.Panel3.Controls.Add(Me.lblAufschubKtoZoll)
|
||||
Me.Panel3.Controls.Add(Me.lblEORINr)
|
||||
Me.Panel3.Controls.Add(Me.lblFirma)
|
||||
Me.Panel3.Controls.Add(Me.Label2)
|
||||
Me.Panel3.Controls.Add(Me.Label16)
|
||||
Me.Panel3.Controls.Add(Me.txtKdNr)
|
||||
Me.Panel3.Controls.Add(Me.btnSave)
|
||||
Me.Panel3.Controls.Add(Me.Label13)
|
||||
Me.Panel3.Controls.Add(Me.txtMerkmal1)
|
||||
Me.Panel3.Controls.Add(Me.Label14)
|
||||
Me.Panel3.Controls.Add(Me.txtWarencodeZusatz1)
|
||||
Me.Panel3.Controls.Add(Me.lblErfassung)
|
||||
Me.Panel3.Controls.Add(Me.txtMerkmal2)
|
||||
Me.Panel3.Controls.Add(Me.Label15)
|
||||
Me.Panel3.Controls.Add(Me.txtWarencodeZusatz2)
|
||||
Me.Panel3.Controls.Add(Me.lblAenderung)
|
||||
Me.Panel3.Controls.Add(Me.txtArtikelNr)
|
||||
Me.Panel3.Controls.Add(Me.lblSachbearb)
|
||||
Me.Panel3.Controls.Add(Me.Label9)
|
||||
Me.Panel3.Controls.Add(Me.Label8)
|
||||
Me.Panel3.Controls.Add(Me.Label11)
|
||||
Me.Panel3.Controls.Add(Me.txtKurztext)
|
||||
Me.Panel3.Controls.Add(Me.txtBeschreibung)
|
||||
Me.Panel3.Controls.Add(Me.txtWarencodenummer)
|
||||
Me.Panel3.Controls.Add(Me.Label12)
|
||||
Me.Panel3.Controls.Add(Me.Label10)
|
||||
Me.Panel3.Controls.Add(Me.Panel4)
|
||||
Me.Panel3.Controls.Add(Me.lblError)
|
||||
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel3.Location = New System.Drawing.Point(0, 90)
|
||||
Me.Panel3.Name = "Panel3"
|
||||
Me.Panel3.Size = New System.Drawing.Size(567, 448)
|
||||
Me.Panel3.TabIndex = 378
|
||||
'
|
||||
'errWarencodenummer
|
||||
'
|
||||
Me.errWarencodenummer.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.errWarencodenummer.Location = New System.Drawing.Point(94, 164)
|
||||
Me.errWarencodenummer.Name = "errWarencodenummer"
|
||||
Me.errWarencodenummer.Size = New System.Drawing.Size(468, 13)
|
||||
Me.errWarencodenummer.TabIndex = 392
|
||||
'
|
||||
'Label17
|
||||
'
|
||||
Me.Label17.AutoSize = True
|
||||
Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label17.Location = New System.Drawing.Point(329, 46)
|
||||
Me.Label17.Name = "Label17"
|
||||
Me.Label17.Size = New System.Drawing.Size(84, 13)
|
||||
Me.Label17.TabIndex = 388
|
||||
Me.Label17.Text = "Aufschub EUSt: "
|
||||
'
|
||||
'Label18
|
||||
'
|
||||
Me.Label18.AutoSize = True
|
||||
Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label18.Location = New System.Drawing.Point(329, 33)
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Size = New System.Drawing.Size(86, 13)
|
||||
Me.Label18.TabIndex = 387
|
||||
Me.Label18.Text = "Aufschub ZOLL: "
|
||||
'
|
||||
'Label19
|
||||
'
|
||||
Me.Label19.AutoSize = True
|
||||
Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label19.Location = New System.Drawing.Point(329, 19)
|
||||
Me.Label19.Name = "Label19"
|
||||
Me.Label19.Size = New System.Drawing.Size(51, 13)
|
||||
Me.Label19.TabIndex = 386
|
||||
Me.Label19.Text = "EORI-Nr: "
|
||||
'
|
||||
'lblStatus
|
||||
'
|
||||
Me.lblStatus.AutoSize = True
|
||||
Me.lblStatus.Location = New System.Drawing.Point(94, 324)
|
||||
Me.lblStatus.Name = "lblStatus"
|
||||
Me.lblStatus.Size = New System.Drawing.Size(54, 13)
|
||||
Me.lblStatus.TabIndex = 383
|
||||
Me.lblStatus.Text = "Erfassung"
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(8, 324)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(40, 13)
|
||||
Me.Label4.TabIndex = 383
|
||||
Me.Label4.Text = "Status:"
|
||||
'
|
||||
'lblAufschubKtoEUST
|
||||
'
|
||||
Me.lblAufschubKtoEUST.AutoSize = True
|
||||
Me.lblAufschubKtoEUST.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblAufschubKtoEUST.Location = New System.Drawing.Point(419, 46)
|
||||
Me.lblAufschubKtoEUST.Name = "lblAufschubKtoEUST"
|
||||
Me.lblAufschubKtoEUST.Size = New System.Drawing.Size(11, 13)
|
||||
Me.lblAufschubKtoEUST.TabIndex = 382
|
||||
Me.lblAufschubKtoEUST.Text = "-"
|
||||
'
|
||||
'lblOrt
|
||||
'
|
||||
Me.lblOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblOrt.Location = New System.Drawing.Point(6, 51)
|
||||
Me.lblOrt.Name = "lblOrt"
|
||||
Me.lblOrt.Size = New System.Drawing.Size(317, 13)
|
||||
Me.lblOrt.TabIndex = 381
|
||||
Me.lblOrt.Text = "Land Plz Ort"
|
||||
'
|
||||
'lblStrasse
|
||||
'
|
||||
Me.lblStrasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblStrasse.Location = New System.Drawing.Point(6, 37)
|
||||
Me.lblStrasse.Name = "lblStrasse"
|
||||
Me.lblStrasse.Size = New System.Drawing.Size(317, 13)
|
||||
Me.lblStrasse.TabIndex = 380
|
||||
Me.lblStrasse.Text = "Strasse"
|
||||
'
|
||||
'lblAufschubKtoZoll
|
||||
'
|
||||
Me.lblAufschubKtoZoll.AutoSize = True
|
||||
Me.lblAufschubKtoZoll.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblAufschubKtoZoll.Location = New System.Drawing.Point(419, 33)
|
||||
Me.lblAufschubKtoZoll.Name = "lblAufschubKtoZoll"
|
||||
Me.lblAufschubKtoZoll.Size = New System.Drawing.Size(11, 13)
|
||||
Me.lblAufschubKtoZoll.TabIndex = 379
|
||||
Me.lblAufschubKtoZoll.Text = "-"
|
||||
'
|
||||
'lblEORINr
|
||||
'
|
||||
Me.lblEORINr.AutoSize = True
|
||||
Me.lblEORINr.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblEORINr.Location = New System.Drawing.Point(419, 19)
|
||||
Me.lblEORINr.Name = "lblEORINr"
|
||||
Me.lblEORINr.Size = New System.Drawing.Size(11, 13)
|
||||
Me.lblEORINr.TabIndex = 378
|
||||
Me.lblEORINr.Text = "-"
|
||||
'
|
||||
'lblFirma
|
||||
'
|
||||
Me.lblFirma.Cursor = System.Windows.Forms.Cursors.Default
|
||||
Me.lblFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblFirma.Location = New System.Drawing.Point(6, 11)
|
||||
Me.lblFirma.Name = "lblFirma"
|
||||
Me.lblFirma.Size = New System.Drawing.Size(324, 26)
|
||||
Me.lblFirma.TabIndex = 3
|
||||
Me.lblFirma.Text = "FIRMA"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(329, 110)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(235, 52)
|
||||
Me.Label2.TabIndex = 377
|
||||
Me.Label2.Text = "* Fixe Parameter: Anhand dieser Parameter " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " identifiziert ATLAS den Datensatz" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & _
|
||||
" Bei Änderung wird ein neuer Eintrag im ATLAS " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " erzeugt."
|
||||
Me.Label2.Visible = False
|
||||
'
|
||||
'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(329, 84)
|
||||
Me.Label16.Name = "Label16"
|
||||
Me.Label16.Size = New System.Drawing.Size(41, 13)
|
||||
Me.Label16.TabIndex = 377
|
||||
Me.Label16.Text = "KdNr *:"
|
||||
'
|
||||
'txtKdNr
|
||||
'
|
||||
Me.txtKdNr._numbersOnly = False
|
||||
Me.txtKdNr._Prozent = False
|
||||
Me.txtKdNr._ShortDateOnly = False
|
||||
Me.txtKdNr._value = Nothing
|
||||
Me.txtKdNr._Waehrung = False
|
||||
Me.txtKdNr.Location = New System.Drawing.Point(376, 81)
|
||||
Me.txtKdNr.MaxLength = 17
|
||||
Me.txtKdNr.Name = "txtKdNr"
|
||||
Me.txtKdNr.Size = New System.Drawing.Size(179, 20)
|
||||
Me.txtKdNr.TabIndex = 1
|
||||
'
|
||||
'btnSave
|
||||
'
|
||||
Me.btnSave.Enabled = False
|
||||
Me.btnSave.FlatAppearance.BorderSize = 0
|
||||
Me.btnSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnSave.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnSave.Image = Global.SDL.My.Resources.save
|
||||
Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnSave.Location = New System.Drawing.Point(11, 408)
|
||||
Me.btnSave.Name = "btnSave"
|
||||
Me.btnSave.Size = New System.Drawing.Size(106, 39)
|
||||
Me.btnSave.TabIndex = 9
|
||||
Me.btnSave.Text = "Speichern"
|
||||
Me.btnSave.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnSave.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(8, 353)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(94, 13)
|
||||
Me.Label13.TabIndex = 374
|
||||
Me.Label13.Text = "Erfassungsdatum: "
|
||||
Me.Label13.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtMerkmal1
|
||||
'
|
||||
Me.txtMerkmal1._numbersOnly = False
|
||||
Me.txtMerkmal1._Prozent = False
|
||||
Me.txtMerkmal1._ShortDateOnly = False
|
||||
Me.txtMerkmal1._value = Nothing
|
||||
Me.txtMerkmal1._Waehrung = False
|
||||
Me.txtMerkmal1.Location = New System.Drawing.Point(97, 107)
|
||||
Me.txtMerkmal1.MaxLength = 100
|
||||
Me.txtMerkmal1.Name = "txtMerkmal1"
|
||||
Me.txtMerkmal1.Size = New System.Drawing.Size(110, 20)
|
||||
Me.txtMerkmal1.TabIndex = 2
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(8, 386)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(96, 13)
|
||||
Me.Label14.TabIndex = 372
|
||||
Me.Label14.Text = "letzter Sachbearb.:"
|
||||
Me.Label14.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtWarencodeZusatz1
|
||||
'
|
||||
Me.txtWarencodeZusatz1._numbersOnly = False
|
||||
Me.txtWarencodeZusatz1._Prozent = False
|
||||
Me.txtWarencodeZusatz1._ShortDateOnly = False
|
||||
Me.txtWarencodeZusatz1._value = Nothing
|
||||
Me.txtWarencodeZusatz1._Waehrung = False
|
||||
Me.txtWarencodeZusatz1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtWarencodeZusatz1.Location = New System.Drawing.Point(329, 180)
|
||||
Me.txtWarencodeZusatz1.MaxLength = 4
|
||||
Me.txtWarencodeZusatz1.Name = "txtWarencodeZusatz1"
|
||||
Me.txtWarencodeZusatz1.Size = New System.Drawing.Size(110, 20)
|
||||
Me.txtWarencodeZusatz1.TabIndex = 5
|
||||
'
|
||||
'lblErfassung
|
||||
'
|
||||
Me.lblErfassung.AutoSize = True
|
||||
Me.lblErfassung.Location = New System.Drawing.Point(106, 353)
|
||||
Me.lblErfassung.Name = "lblErfassung"
|
||||
Me.lblErfassung.Size = New System.Drawing.Size(0, 13)
|
||||
Me.lblErfassung.TabIndex = 371
|
||||
Me.lblErfassung.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtMerkmal2
|
||||
'
|
||||
Me.txtMerkmal2._numbersOnly = False
|
||||
Me.txtMerkmal2._Prozent = False
|
||||
Me.txtMerkmal2._ShortDateOnly = False
|
||||
Me.txtMerkmal2._value = Nothing
|
||||
Me.txtMerkmal2._Waehrung = False
|
||||
Me.txtMerkmal2.Location = New System.Drawing.Point(213, 107)
|
||||
Me.txtMerkmal2.MaxLength = 100
|
||||
Me.txtMerkmal2.Name = "txtMerkmal2"
|
||||
Me.txtMerkmal2.Size = New System.Drawing.Size(110, 20)
|
||||
Me.txtMerkmal2.TabIndex = 3
|
||||
'
|
||||
'Label15
|
||||
'
|
||||
Me.Label15.AutoSize = True
|
||||
Me.Label15.Location = New System.Drawing.Point(8, 369)
|
||||
Me.Label15.Name = "Label15"
|
||||
Me.Label15.Size = New System.Drawing.Size(93, 13)
|
||||
Me.Label15.TabIndex = 373
|
||||
Me.Label15.Text = "Änderungsdatum: "
|
||||
Me.Label15.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtWarencodeZusatz2
|
||||
'
|
||||
Me.txtWarencodeZusatz2._numbersOnly = False
|
||||
Me.txtWarencodeZusatz2._Prozent = False
|
||||
Me.txtWarencodeZusatz2._ShortDateOnly = False
|
||||
Me.txtWarencodeZusatz2._value = Nothing
|
||||
Me.txtWarencodeZusatz2._Waehrung = False
|
||||
Me.txtWarencodeZusatz2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtWarencodeZusatz2.Location = New System.Drawing.Point(445, 180)
|
||||
Me.txtWarencodeZusatz2.MaxLength = 4
|
||||
Me.txtWarencodeZusatz2.Name = "txtWarencodeZusatz2"
|
||||
Me.txtWarencodeZusatz2.Size = New System.Drawing.Size(110, 20)
|
||||
Me.txtWarencodeZusatz2.TabIndex = 6
|
||||
'
|
||||
'lblAenderung
|
||||
'
|
||||
Me.lblAenderung.AutoSize = True
|
||||
Me.lblAenderung.Location = New System.Drawing.Point(107, 369)
|
||||
Me.lblAenderung.Name = "lblAenderung"
|
||||
Me.lblAenderung.Size = New System.Drawing.Size(0, 13)
|
||||
Me.lblAenderung.TabIndex = 370
|
||||
Me.lblAenderung.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtArtikelNr
|
||||
'
|
||||
Me.txtArtikelNr._numbersOnly = False
|
||||
Me.txtArtikelNr._Prozent = False
|
||||
Me.txtArtikelNr._ShortDateOnly = False
|
||||
Me.txtArtikelNr._value = Nothing
|
||||
Me.txtArtikelNr._Waehrung = False
|
||||
Me.txtArtikelNr.Location = New System.Drawing.Point(97, 81)
|
||||
Me.txtArtikelNr.MaxLength = 50
|
||||
Me.txtArtikelNr.Name = "txtArtikelNr"
|
||||
Me.txtArtikelNr.Size = New System.Drawing.Size(226, 20)
|
||||
Me.txtArtikelNr.TabIndex = 0
|
||||
'
|
||||
'lblSachbearb
|
||||
'
|
||||
Me.lblSachbearb.AutoSize = True
|
||||
Me.lblSachbearb.Location = New System.Drawing.Point(106, 386)
|
||||
Me.lblSachbearb.Name = "lblSachbearb"
|
||||
Me.lblSachbearb.Size = New System.Drawing.Size(0, 13)
|
||||
Me.lblSachbearb.TabIndex = 369
|
||||
Me.lblSachbearb.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label9.Location = New System.Drawing.Point(8, 110)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(63, 13)
|
||||
Me.Label9.TabIndex = 11
|
||||
Me.Label9.Text = "Merkmale *:"
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.Location = New System.Drawing.Point(7, 84)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(63, 13)
|
||||
Me.Label8.TabIndex = 10
|
||||
Me.Label8.Text = "Artikel-Nr. *:"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.AutoSize = True
|
||||
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label11.Location = New System.Drawing.Point(8, 244)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(75, 13)
|
||||
Me.Label11.TabIndex = 15
|
||||
Me.Label11.Text = "Beschreibung:"
|
||||
'
|
||||
'txtKurztext
|
||||
'
|
||||
Me.txtKurztext._numbersOnly = False
|
||||
Me.txtKurztext._Prozent = False
|
||||
Me.txtKurztext._ShortDateOnly = False
|
||||
Me.txtKurztext._value = Nothing
|
||||
Me.txtKurztext._Waehrung = False
|
||||
Me.txtKurztext.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtKurztext.Location = New System.Drawing.Point(97, 206)
|
||||
Me.txtKurztext.MaxLength = 600
|
||||
Me.txtKurztext.Name = "txtKurztext"
|
||||
Me.txtKurztext.Size = New System.Drawing.Size(458, 20)
|
||||
Me.txtKurztext.TabIndex = 7
|
||||
'
|
||||
'txtBeschreibung
|
||||
'
|
||||
Me.txtBeschreibung._numbersOnly = False
|
||||
Me.txtBeschreibung._Prozent = False
|
||||
Me.txtBeschreibung._ShortDateOnly = False
|
||||
Me.txtBeschreibung._value = Nothing
|
||||
Me.txtBeschreibung._Waehrung = False
|
||||
Me.txtBeschreibung.Location = New System.Drawing.Point(97, 241)
|
||||
Me.txtBeschreibung.MaxLength = 2400
|
||||
Me.txtBeschreibung.Multiline = True
|
||||
Me.txtBeschreibung.Name = "txtBeschreibung"
|
||||
Me.txtBeschreibung.Size = New System.Drawing.Size(458, 80)
|
||||
Me.txtBeschreibung.TabIndex = 8
|
||||
'
|
||||
'txtWarencodenummer
|
||||
'
|
||||
Me.txtWarencodenummer._numbersOnly = False
|
||||
Me.txtWarencodenummer._Prozent = False
|
||||
Me.txtWarencodenummer._ShortDateOnly = False
|
||||
Me.txtWarencodenummer._value = Nothing
|
||||
Me.txtWarencodenummer._Waehrung = False
|
||||
Me.txtWarencodenummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtWarencodenummer.Location = New System.Drawing.Point(97, 180)
|
||||
Me.txtWarencodenummer.MaxLength = 11
|
||||
Me.txtWarencodenummer.Name = "txtWarencodenummer"
|
||||
Me.txtWarencodenummer.Size = New System.Drawing.Size(226, 20)
|
||||
Me.txtWarencodenummer.TabIndex = 4
|
||||
'
|
||||
'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, 183)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(83, 13)
|
||||
Me.Label12.TabIndex = 13
|
||||
Me.Label12.Text = "Warencode-Nr.:"
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label10.Location = New System.Drawing.Point(8, 209)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(48, 13)
|
||||
Me.Label10.TabIndex = 13
|
||||
Me.Label10.Text = "Kurztext:"
|
||||
'
|
||||
'Panel4
|
||||
'
|
||||
Me.Panel4.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel4.Controls.Add(Me.cbxSBG)
|
||||
Me.Panel4.Controls.Add(Me.cbxSUB)
|
||||
Me.Panel4.Controls.Add(Me.FlatButton3)
|
||||
Me.Panel4.Controls.Add(Me.cbxUeberschreiben)
|
||||
Me.Panel4.Controls.Add(Me.Label6)
|
||||
Me.Panel4.Location = New System.Drawing.Point(220, 366)
|
||||
Me.Panel4.Name = "Panel4"
|
||||
Me.Panel4.Size = New System.Drawing.Size(335, 84)
|
||||
Me.Panel4.TabIndex = 391
|
||||
Me.Panel4.Visible = False
|
||||
'
|
||||
'cbxSBG
|
||||
'
|
||||
Me.cbxSBG.AutoSize = True
|
||||
Me.cbxSBG.Checked = True
|
||||
Me.cbxSBG.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbxSBG.Location = New System.Drawing.Point(137, 43)
|
||||
Me.cbxSBG.Name = "cbxSBG"
|
||||
Me.cbxSBG.Size = New System.Drawing.Size(154, 17)
|
||||
Me.cbxSBG.TabIndex = 390
|
||||
Me.cbxSBG.Text = "an ATLAS-SBG übertragen"
|
||||
Me.cbxSBG.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxSUB
|
||||
'
|
||||
Me.cbxSUB.AutoSize = True
|
||||
Me.cbxSUB.Checked = True
|
||||
Me.cbxSUB.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbxSUB.Location = New System.Drawing.Point(137, 21)
|
||||
Me.cbxSUB.Name = "cbxSUB"
|
||||
Me.cbxSUB.Size = New System.Drawing.Size(154, 17)
|
||||
Me.cbxSUB.TabIndex = 389
|
||||
Me.cbxSUB.Text = "an ATLAS-SUB übertragen"
|
||||
Me.cbxSUB.UseVisualStyleBackColor = True
|
||||
'
|
||||
'FlatButton3
|
||||
'
|
||||
Me.FlatButton3.Enabled = False
|
||||
Me.FlatButton3.FlatAppearance.BorderSize = 0
|
||||
Me.FlatButton3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.FlatButton3.ForeColor = System.Drawing.Color.Black
|
||||
Me.FlatButton3.Image = Global.SDL.My.Resources.transfer
|
||||
Me.FlatButton3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.FlatButton3.Location = New System.Drawing.Point(5, 21)
|
||||
Me.FlatButton3.Name = "FlatButton3"
|
||||
Me.FlatButton3.Size = New System.Drawing.Size(126, 39)
|
||||
Me.FlatButton3.TabIndex = 10
|
||||
Me.FlatButton3.Text = "Datensatz an " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ATLAS senden"
|
||||
Me.FlatButton3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.FlatButton3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxUeberschreiben
|
||||
'
|
||||
Me.cbxUeberschreiben.AutoSize = True
|
||||
Me.cbxUeberschreiben.Location = New System.Drawing.Point(137, -9)
|
||||
Me.cbxUeberschreiben.Name = "cbxUeberschreiben"
|
||||
Me.cbxUeberschreiben.Size = New System.Drawing.Size(210, 30)
|
||||
Me.cbxUeberschreiben.TabIndex = 384
|
||||
Me.cbxUeberschreiben.Text = "Datensatz bereits in ATLAS vorhanden" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(Daten überschreiben)"
|
||||
Me.cbxUeberschreiben.UseVisualStyleBackColor = True
|
||||
Me.cbxUeberschreiben.Visible = False
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(46, 63)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(245, 13)
|
||||
Me.Label6.TabIndex = 377
|
||||
Me.Label6.Text = "Änderungen im ATLAS sind nur 1x täglich möglich!"
|
||||
'
|
||||
'Panel2
|
||||
'
|
||||
Me.Panel2.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel2.Controls.Add(Me.cboJumpToKd_Firma)
|
||||
Me.Panel2.Controls.Add(Me.btnKdSearch)
|
||||
Me.Panel2.Controls.Add(Me.Label7)
|
||||
Me.Panel2.Controls.Add(Me.Label1)
|
||||
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel2.Location = New System.Drawing.Point(0, 25)
|
||||
Me.Panel2.Name = "Panel2"
|
||||
Me.Panel2.Size = New System.Drawing.Size(567, 65)
|
||||
Me.Panel2.TabIndex = 6
|
||||
'
|
||||
'cboJumpToKd_Firma
|
||||
'
|
||||
Me.cboJumpToKd_Firma.FormattingEnabled = True
|
||||
Me.cboJumpToKd_Firma.Location = New System.Drawing.Point(51, 30)
|
||||
Me.cboJumpToKd_Firma.Name = "cboJumpToKd_Firma"
|
||||
Me.cboJumpToKd_Firma.Size = New System.Drawing.Size(344, 21)
|
||||
Me.cboJumpToKd_Firma.TabIndex = 3
|
||||
'
|
||||
'btnKdSearch
|
||||
'
|
||||
Me.btnKdSearch.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.btnKdSearch.FlatAppearance.BorderSize = 0
|
||||
Me.btnKdSearch.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnKdSearch.Image = Global.SDL.My.Resources.search
|
||||
Me.btnKdSearch.Location = New System.Drawing.Point(403, 30)
|
||||
Me.btnKdSearch.Name = "btnKdSearch"
|
||||
Me.btnKdSearch.Size = New System.Drawing.Size(40, 21)
|
||||
Me.btnKdSearch.TabIndex = 2
|
||||
Me.btnKdSearch.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(10, 33)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label7.TabIndex = 1
|
||||
Me.Label7.Text = "Firma:"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(11, 109)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(95, 13)
|
||||
Me.Label3.TabIndex = 1
|
||||
Me.Label3.Text = "Artikel erfassen"
|
||||
'
|
||||
'BindingNavigator1
|
||||
'
|
||||
Me.BindingNavigator1.AddNewItem = Me.BindingNavigatorAddNewItem
|
||||
Me.BindingNavigator1.CountItem = Me.BindingNavigatorCountItem
|
||||
Me.BindingNavigator1.DeleteItem = Me.BindingNavigatorDeleteItem
|
||||
Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.ToolStripButton1, Me.ToolStripLabel1})
|
||||
Me.BindingNavigator1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
|
||||
Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem
|
||||
Me.BindingNavigator1.MoveNextItem = Me.BindingNavigatorMoveNextItem
|
||||
Me.BindingNavigator1.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
|
||||
Me.BindingNavigator1.Name = "BindingNavigator1"
|
||||
Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem
|
||||
Me.BindingNavigator1.Size = New System.Drawing.Size(567, 25)
|
||||
Me.BindingNavigator1.TabIndex = 7
|
||||
Me.BindingNavigator1.Text = "BindingNavigator1"
|
||||
'
|
||||
'BindingNavigatorAddNewItem
|
||||
'
|
||||
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorAddNewItem.Image = CType(resources.GetObject("BindingNavigatorAddNewItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
|
||||
Me.BindingNavigatorAddNewItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorAddNewItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorAddNewItem.Text = "Neu hinzufügen"
|
||||
'
|
||||
'BindingNavigatorCountItem
|
||||
'
|
||||
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
|
||||
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(44, 22)
|
||||
Me.BindingNavigatorCountItem.Text = "von {0}"
|
||||
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
|
||||
'
|
||||
'BindingNavigatorDeleteItem
|
||||
'
|
||||
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
|
||||
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorDeleteItem.Text = "Löschen"
|
||||
'
|
||||
'BindingNavigatorMoveFirstItem
|
||||
'
|
||||
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
|
||||
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorMoveFirstItem.Text = "Erste verschieben"
|
||||
'
|
||||
'BindingNavigatorMovePreviousItem
|
||||
'
|
||||
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
|
||||
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorMovePreviousItem.Text = "Vorherige verschieben"
|
||||
'
|
||||
'BindingNavigatorSeparator
|
||||
'
|
||||
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
|
||||
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'BindingNavigatorPositionItem
|
||||
'
|
||||
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
|
||||
Me.BindingNavigatorPositionItem.AutoSize = False
|
||||
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
|
||||
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
|
||||
Me.BindingNavigatorPositionItem.Text = "0"
|
||||
Me.BindingNavigatorPositionItem.ToolTipText = "Aktuelle Position"
|
||||
'
|
||||
'BindingNavigatorSeparator1
|
||||
'
|
||||
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
|
||||
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'BindingNavigatorMoveNextItem
|
||||
'
|
||||
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
|
||||
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorMoveNextItem.Text = "Nächste verschieben"
|
||||
'
|
||||
'BindingNavigatorMoveLastItem
|
||||
'
|
||||
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
|
||||
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
|
||||
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
|
||||
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 22)
|
||||
Me.BindingNavigatorMoveLastItem.Text = "Letzte verschieben"
|
||||
'
|
||||
'BindingNavigatorSeparator2
|
||||
'
|
||||
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
|
||||
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'ToolStripButton1
|
||||
'
|
||||
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.ToolStripButton1.Image = Global.SDL.My.Resources.save
|
||||
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ToolStripButton1.Name = "ToolStripButton1"
|
||||
Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
|
||||
Me.ToolStripButton1.Text = "ToolStripButton1"
|
||||
'
|
||||
'ToolStripLabel1
|
||||
'
|
||||
Me.ToolStripLabel1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.ToolStripLabel1.Name = "ToolStripLabel1"
|
||||
Me.ToolStripLabel1.Size = New System.Drawing.Size(58, 22)
|
||||
Me.ToolStripLabel1.Text = "Schließen"
|
||||
'
|
||||
'Timer1
|
||||
'
|
||||
Me.Timer1.Interval = 1000
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Label5.Location = New System.Drawing.Point(83, 110)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(352, 62)
|
||||
Me.Label5.TabIndex = 9
|
||||
Me.Label5.Text = "Der Kunde wurde " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "erfolgreich aufgenommen!"
|
||||
Me.Label5.TextAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.Label5.Visible = False
|
||||
'
|
||||
'frmAddArtikelATLAS
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(569, 540)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.Controls.Add(Me.Label5)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmAddArtikelATLAS"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Neuer Artikel"
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
Me.Panel3.ResumeLayout(False)
|
||||
Me.Panel3.PerformLayout()
|
||||
Me.Panel4.ResumeLayout(False)
|
||||
Me.Panel4.PerformLayout()
|
||||
Me.Panel2.ResumeLayout(False)
|
||||
Me.Panel2.PerformLayout()
|
||||
CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.BindingNavigator1.ResumeLayout(False)
|
||||
Me.BindingNavigator1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents lblError As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Friend WithEvents Timer1 As System.Windows.Forms.Timer
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents Panel2 As System.Windows.Forms.Panel
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents BindingNavigator1 As System.Windows.Forms.BindingNavigator
|
||||
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
|
||||
Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents BindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
|
||||
Friend WithEvents BindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtArtikelNr As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtMerkmal1 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents FlatButton3 As VERAG_PROG_ALLGEMEIN.FlatButton
|
||||
Friend WithEvents Label11 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtBeschreibung As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label10 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtWarencodenummer As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtKurztext As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtWarencodeZusatz2 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtMerkmal2 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtWarencodeZusatz1 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblErfassung As System.Windows.Forms.Label
|
||||
Friend WithEvents Label15 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblAenderung As System.Windows.Forms.Label
|
||||
Friend WithEvents lblSachbearb As System.Windows.Forms.Label
|
||||
Friend WithEvents btnKdSearch As System.Windows.Forms.Button
|
||||
Friend WithEvents Label16 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtKdNr As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents lblFirma As System.Windows.Forms.Label
|
||||
Friend WithEvents Panel3 As System.Windows.Forms.Panel
|
||||
Friend WithEvents lblAufschubKtoZoll As System.Windows.Forms.Label
|
||||
Friend WithEvents lblEORINr As System.Windows.Forms.Label
|
||||
Friend WithEvents lblOrt As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStrasse As System.Windows.Forms.Label
|
||||
Friend WithEvents lblAufschubKtoEUST As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStatus As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents cbxUeberschreiben As System.Windows.Forms.CheckBox
|
||||
Public WithEvents btnSave As VERAG_PROG_ALLGEMEIN.FlatButton
|
||||
Friend WithEvents Label17 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label18 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label19 As System.Windows.Forms.Label
|
||||
Friend WithEvents Panel4 As System.Windows.Forms.Panel
|
||||
Public WithEvents cbxSBG As System.Windows.Forms.CheckBox
|
||||
Public WithEvents cbxSUB As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents cboJumpToKd_Firma As System.Windows.Forms.ComboBox
|
||||
Friend WithEvents errWarencodenummer As System.Windows.Forms.Label
|
||||
Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripLabel1 As System.Windows.Forms.ToolStripLabel
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
End Class
|
||||
1050
SDL/zoll/frmAddArtikelATLAS.resx
Normal file
1050
SDL/zoll/frmAddArtikelATLAS.resx
Normal file
File diff suppressed because it is too large
Load Diff
395
SDL/zoll/frmAddArtikelATLAS.vb
Normal file
395
SDL/zoll/frmAddArtikelATLAS.vb
Normal file
@@ -0,0 +1,395 @@
|
||||
Imports System.ComponentModel
|
||||
Imports System.Text
|
||||
Imports System.IO
|
||||
|
||||
Public Class frmAddArtikelATLAS
|
||||
' Public bindingDataAdapter As New SqlDataAdapter
|
||||
Public WithEvents bindingdataTable As New DataTable
|
||||
Public bindingdataSet As New DataSet
|
||||
Public WithEvents bindingSource As New BindingSource
|
||||
Dim bList As New BindingList(Of cArtikel)
|
||||
Public WithEvents binding As New cBinding("FMZOLL") 'fürs Binding
|
||||
Public WithEvents bindingUnterArt As New cBinding("FMZOLL") 'fürs Binding
|
||||
Public kdNr As String = ""
|
||||
Dim kundenSQL As New kundenSQL
|
||||
Public cursorAtID As String
|
||||
Public newEntry As Boolean
|
||||
Public editAllowed As Boolean = True
|
||||
Dim ATLAS_CONN_ART = "ATLAS" 'ATLAS_SBG
|
||||
Public parentKundenblatt As Boolean = True
|
||||
Dim currentId As Integer
|
||||
Dim acd As List(Of cAutoCompleteData) = kundenSQL.getKundenShort()
|
||||
Dim freigabe As Boolean = True
|
||||
Private Sub frmAddArtikelATLAS_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
If Not editAllowed Then e.Cancel = False : Exit Sub
|
||||
If btnSave.Enabled Then
|
||||
Select Case MessageBox.Show("Möchten Sie die Änderungen speichern? ", "Änderungen speichern", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
|
||||
Case vbYes : btnSave.PerformClick()
|
||||
If freigabe Then
|
||||
e.Cancel = False
|
||||
Else
|
||||
e.Cancel = True
|
||||
End If
|
||||
Case vbNo : e.Cancel = False
|
||||
Case vbCancel : e.Cancel = True
|
||||
End Select
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmAddArtikelATLAS_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If Not editAllowed Then
|
||||
BindingNavigatorAddNewItem.Visible = False
|
||||
BindingNavigatorDeleteItem.Visible = False
|
||||
ToolStripButton1.Visible = False
|
||||
ToolStripButton1.Visible = False
|
||||
btnSave.Visible = False
|
||||
Panel4.Visible = False
|
||||
Panel2.Visible = False
|
||||
Me.Height = 480
|
||||
End If
|
||||
|
||||
If newEntry Or parentKundenblatt Then
|
||||
If parentKundenblatt Then
|
||||
Panel2.Visible = False
|
||||
Me.Height = Me.Height - Panel2.Height
|
||||
Else
|
||||
Panel2.Visible = True
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
|
||||
initDataBinding()
|
||||
BindingNavigator1.BindingSource = binding.bindingSource
|
||||
|
||||
'initDataBindingUnterArt()
|
||||
|
||||
|
||||
|
||||
|
||||
Dim acsc As New AutoCompleteStringCollection
|
||||
|
||||
For Each a In acd
|
||||
acsc.Add(a.AutoCompleteString)
|
||||
' cboJumpToKd_Firma.Items.Add(a.AutoCompleteString)
|
||||
Next
|
||||
cboJumpToKd_Firma.AutoCompleteMode = AutoCompleteMode.SuggestAppend
|
||||
cboJumpToKd_Firma.AutoCompleteSource = AutoCompleteSource.CustomSource
|
||||
cboJumpToKd_Firma.AutoCompleteCustomSource = acsc
|
||||
|
||||
|
||||
|
||||
|
||||
Exit Sub
|
||||
Dim ll As New cArtikel
|
||||
ll.Kurzbezeichnung = "test"
|
||||
ll.Artikelnummer = 1
|
||||
|
||||
bList.Add(ll)
|
||||
|
||||
bindingSource.DataSource = bList
|
||||
BindingNavigator1.BindingSource = bindingSource
|
||||
|
||||
AddHandler bList.ListChanged, AddressOf myList_ListChanged
|
||||
|
||||
txtArtikelNr.Focus()
|
||||
End Sub
|
||||
Sub initDataBinding()
|
||||
Try
|
||||
' MsgBox(kdNr)
|
||||
'binding
|
||||
Dim tmpKdNR As String = ""
|
||||
If kdNr <> "" Then tmpKdNR = " AND KundenNr='" & kdNr & "'"
|
||||
binding.initBinding("SELECT * FROM tblZollArtikel WHERE 1=1 " & tmpKdNR, "tblZollArtikel") ' " ' AND KfzKennzeichen='" & KfzKennzeichen & "' AND SDLNr='" & SDLNr & "' " & tmpHist, "SDL")
|
||||
|
||||
RemoveHandler binding.bindingdataTable.ColumnChanged, AddressOf BindingTableColumnChanged
|
||||
RemoveHandler binding.bindingdataTable.TableNewRow, AddressOf bindingdataTable_TableNewRow_Adressen
|
||||
|
||||
AddHandler binding.bindingdataTable.ColumnChanged, AddressOf BindingTableColumnChanged
|
||||
AddHandler binding.bindingdataTable.TableNewRow, AddressOf bindingdataTable_TableNewRow_Adressen
|
||||
|
||||
txtKdNr.DataBindings.Clear()
|
||||
txtKdNr.DataBindings.Add(New Binding("Text", binding.bindingSource, "KundenNr", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
If txtKdNr.Text <> "" Then kdNr = txtKdNr.Text : cboJumpToKd_Firma.Text = ""
|
||||
txtArtikelNr.DataBindings.Clear()
|
||||
txtArtikelNr.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Artikelnummer", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
txtMerkmal1.DataBindings.Clear()
|
||||
txtMerkmal1.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Dynamische_Ergaenzung_1", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
txtMerkmal2.DataBindings.Clear()
|
||||
txtMerkmal2.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Dynamische_Ergaenzung_2", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
txtWarencodenummer.DataBindings.Clear()
|
||||
txtWarencodenummer.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Warencodenummer", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
|
||||
txtWarencodeZusatz1.DataBindings.Clear()
|
||||
txtWarencodeZusatz1.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Zusatzcode_1", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
txtWarencodeZusatz1.DataBindings.Clear()
|
||||
txtWarencodeZusatz1.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Zusatzcode_2", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
txtKurztext.DataBindings.Clear()
|
||||
txtKurztext.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Kurzbezeichnung", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
txtBeschreibung.DataBindings.Clear()
|
||||
txtBeschreibung.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Warenbeschreibung", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
|
||||
lblErfassung.DataBindings.Clear()
|
||||
lblErfassung.DataBindings.Add(New Binding("Text", binding.bindingSource, "Erfassungsdatum", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
lblAenderung.DataBindings.Clear()
|
||||
lblAenderung.DataBindings.Add(New Binding("Text", binding.bindingSource, "Aenderungsdatum", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
lblSachbearb.DataBindings.Clear()
|
||||
lblSachbearb.DataBindings.Add(New Binding("Text", binding.bindingSource, "Sachbearbeiter", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
lblStatus.DataBindings.Clear()
|
||||
lblStatus.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Status", True, DataSourceUpdateMode.OnPropertyChanged, ""))
|
||||
|
||||
|
||||
|
||||
Try
|
||||
binding.bindingSource.Position = binding.bindingSource.Find("zollArt_id", cursorAtID)
|
||||
Catch ex As Exception
|
||||
'MsgBox("ERR1: " & ex.Message)
|
||||
End Try
|
||||
|
||||
|
||||
|
||||
'Dim aktId = binding.bindingSource.Current
|
||||
'If newEntry Then binding.bindingdataTable.NewRow() 'NEUER EINTRAG!
|
||||
If newEntry Then
|
||||
Dim row = binding.bindingdataTable.NewRow()
|
||||
binding.bindingdataTable.Rows.Add(row)
|
||||
binding.bindingSource.MoveLast()
|
||||
End If
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("ERR2: " & ex.Message)
|
||||
End Try
|
||||
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
Public Sub bindingdataTable_TableNewRow_Adressen(sender As Object, e As DataTableNewRowEventArgs)
|
||||
'Dim currentHisId = 0
|
||||
'Try : currentHisId = sender.Select("History=MAX(History)")(0).Item("History") : Catch : End Try
|
||||
' currentHisId += 1
|
||||
' MsgBox(currentHisId)
|
||||
Dim kundenSQL As New kundenSQL
|
||||
|
||||
Dim row As DataRow = e.Row
|
||||
'MsgBox(kdNr)
|
||||
row("KundenNr") = 0
|
||||
cboJumpToKd_Firma.Text = ""
|
||||
' txtJumpToKd_KdNR.Text = ""
|
||||
If IsNumeric(kdNr) And parentKundenblatt Then
|
||||
row("KundenNr") = kdNr
|
||||
row("zollArt_Kundennummer") = kdNr
|
||||
txtKdNr.Text = kdNr
|
||||
End If
|
||||
'If parentKundenblatt Then row("KundenNr") = kdNr
|
||||
row("zollArt_Status") = "Erfassung"
|
||||
row("Erfassungsdatum") = Now
|
||||
row("Sachbearbeiter") = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME
|
||||
|
||||
bindingSource.MoveLast()
|
||||
End Sub
|
||||
|
||||
|
||||
Sub BindingTableColumnChanged(sender As Object, e As System.Data.DataColumnChangeEventArgs)
|
||||
lblSachbearb.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME
|
||||
lblAenderung.Text = Now.ToString("dd.MM.yyyy HH:mm")
|
||||
btnSave.Enabled = True
|
||||
End Sub
|
||||
Private Sub bindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles bindingSource.CurrentChanged
|
||||
Dim l As cArtikel = bindingSource.Current
|
||||
txtArtikelNr.Text = l.Artikelnummer
|
||||
txtMerkmal1.Text = l.Kurzbezeichnung
|
||||
|
||||
End Sub
|
||||
Sub myList_ListChanged(ByVal sender As Object, ByVal e As ListChangedEventArgs)
|
||||
' MessageBox.Show(e.ListChangedType.ToString() + ": at index: " + e.NewIndex.ToString() + ", """ + bList(e.NewIndex).Bez + """")
|
||||
End Sub
|
||||
Private Sub bindingSourcea_CurrentChanged(sender As Object, e As EventArgs) Handles bindingSource.CurrentItemChanged
|
||||
'MsgBox("ITEM")
|
||||
|
||||
End Sub
|
||||
Private Sub FlatButton2_Click(sender As Object, e As EventArgs)
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Function initArtikel() As cArtikel
|
||||
Dim artikel As New cArtikel
|
||||
artikel.Teilsatzschlüssel = "ART"
|
||||
artikel.zollArt_id = binding.bindingSource.Current.Item("zollArt_id").ToString()
|
||||
'If lblStatus.Text <> "" And lblStatus.Text <> "Angelegt" And lblStatus.Text <> "Erfassung" Then
|
||||
|
||||
cbxUeberschreiben.Checked = False
|
||||
If cbxUeberschreiben.Checked Then
|
||||
artikel.Verarbeitungskennzeichen = "1"
|
||||
Else
|
||||
artikel.Verarbeitungskennzeichen = "0"
|
||||
End If
|
||||
|
||||
artikel.Artikelnummer = txtArtikelNr.Text
|
||||
artikel.Dynamische_Ergänzung_1 = txtMerkmal1.Text
|
||||
artikel.Dynamische_Ergänzung_2 = txtMerkmal2.Text
|
||||
|
||||
artikel.Kurzbezeichnung = txtKurztext.Text
|
||||
|
||||
artikel.Kundennummer = txtKdNr.Text
|
||||
artikel.Warencodenummer = txtWarencodenummer.Text
|
||||
'artikel.Löschkennzeichen_Warencodenummer As String = ""
|
||||
artikel.Zusatzcode_1 = txtWarencodeZusatz1.Text
|
||||
'Property Löschkennzeichen_Zusatzcode_1 As String = ""
|
||||
artikel.Zusatzcode_2 = txtWarencodeZusatz2.Text
|
||||
' Property Löschkennzeichen_Zusatzcode_2 As String = ""
|
||||
artikel.Kennzeichen_Gültig = "1"
|
||||
|
||||
' Property Löschkennzeichen_Kurzbezeichnung As String = ""
|
||||
artikel.Warenbeschreibung = txtBeschreibung.Text
|
||||
Return artikel
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub FlatButton3_Click(sender As Object, e As EventArgs) Handles FlatButton3.Click
|
||||
btnSave.PerformClick()
|
||||
If freigabe Then
|
||||
Dim artikel As New List(Of cArtikel)
|
||||
artikel.Add(initArtikel)
|
||||
|
||||
frmStatusFSSAtlas.artikel = artikel
|
||||
frmStatusFSSAtlas.Show()
|
||||
newEntry = False
|
||||
AddHandler frmStatusFSSAtlas.FormClosing, AddressOf initDataBinding
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Function checkPflichtfeld(t As VERAG_PROG_ALLGEMEIN.MyTextBox) As Boolean
|
||||
If t.Text <> "" Then
|
||||
t.BackColor = Color.White
|
||||
Return True
|
||||
Else
|
||||
t.BackColor = Color.FromArgb(255, 230, 230)
|
||||
Return False
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Sub FlatButton4_Click(sender As Object, e As EventArgs) Handles btnSave.Click
|
||||
freigabe = True
|
||||
lblError.Text = ""
|
||||
lblError.Visible = False
|
||||
If Not checkPflichtfeld(txtKurztext) Then freigabe = False
|
||||
If Not checkPflichtfeld(txtBeschreibung) Then freigabe = False
|
||||
If Not checkPflichtfeld(txtArtikelNr) Then freigabe = False
|
||||
If Not checkPflichtfeld(txtKdNr) Then freigabe = False
|
||||
|
||||
If Not freigabe Then lblError.Text = "Pflichtfelder ausfüllen!" : lblError.Visible = True : Exit Sub
|
||||
|
||||
If lblStatus.Text = "" Or lblStatus.Text = "Erfassung" Then lblStatus.Text = "Angelegt"
|
||||
|
||||
If binding.updateBinding() Then
|
||||
btnSave.Enabled = False
|
||||
Else
|
||||
lblStatus.Text = "Erfassung"
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub cboJumpToKd_Firma_KeyDown(sender As Object, e As KeyEventArgs) Handles cboJumpToKd_Firma.KeyUp
|
||||
' txtJumpToKd_KdNR.Text = ""
|
||||
If (e.KeyCode = Keys.Enter Or e.KeyCode = Keys.Return Or e.KeyCode = Keys.Tab) AndAlso sender.text <> "" Then
|
||||
getKdNrSearch()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Sub getKdNrSearch()
|
||||
For Each a In acd
|
||||
If a.AutoCompleteString.ToLower = cboJumpToKd_Firma.Text.ToLower Then
|
||||
kdNr = a.AutoCompleteProperty
|
||||
txtKdNr.Text = kdNr
|
||||
End If
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Private Sub txtKdNr_TextChanged_1(sender As Object, e As EventArgs) Handles txtKdNr.TextChanged
|
||||
If IsNumeric(txtKdNr.Text) Then
|
||||
Dim k As cKundenFMZOLL = kundenSQL.getKundeFMZOLLByKdNr(txtKdNr.Text)
|
||||
lblFirma.Text = k.Ordnungsbegriff
|
||||
lblEORINr.Text = k.EORITIN
|
||||
lblAufschubKtoZoll.Text = k.Aufschubkonto_Zoll
|
||||
lblAufschubKtoEUST.Text = k.Aufschubkonto_EUSt
|
||||
lblStrasse.Text = k.Straße
|
||||
lblOrt.Text = k.LandKz & " " & k.PLZ & " " & k.Ort
|
||||
|
||||
Else
|
||||
lblFirma.Text = ""
|
||||
lblEORINr.Text = ""
|
||||
lblAufschubKtoZoll.Text = ""
|
||||
lblAufschubKtoEUST.Text = ""
|
||||
lblStrasse.Text = ""
|
||||
lblOrt.Text = ""
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Public Sub setStatus(s As String)
|
||||
' lblStatus.Text = s
|
||||
' FlatButton4.PerformClick()
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub lblStatus_TextChanged(sender As Object, e As EventArgs) Handles lblStatus.TextChanged
|
||||
If sender.Text <> "" And sender.Text <> "Angelegt" And sender.Text <> "Erfassung" Then
|
||||
'cbxUeberschreiben.Checked = True ' KEIN ÜBERSCHREIBEN MÖGLICH
|
||||
Else
|
||||
cbxUeberschreiben.Checked = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub txtWarencodenummer_TextChanged(sender As Object, e As EventArgs) Handles txtWarencodenummer.TextChanged
|
||||
errWarencodenummer.Text = ""
|
||||
sender.ForeColor = Color.Red
|
||||
If sender.text <> "" And IsNumeric(sender.text) Then
|
||||
Dim WcNr As kundenSQL.WcNr = kundenSQL.existByWarencodeNummer(sender.text, ATLAS_CONN_ART)
|
||||
If WcNr.wcnr_exists Then
|
||||
sender.ForeColor = Color.Green
|
||||
|
||||
If WcNr.txtart = "H" Then
|
||||
errWarencodenummer.Text = "Hinweis: Die Warencodenummer ist eine Hierachietext und kann nicht verwendet werden."
|
||||
Else
|
||||
errWarencodenummer.Text = WcNr.text
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
|
||||
btnSave.PerformClick()
|
||||
End Sub
|
||||
|
||||
Private Sub FlatButton2_Click_1(sender As Object, e As EventArgs)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripLabel1_Click(sender As Object, e As EventArgs) Handles ToolStripLabel1.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub btnKdSearch_Click(sender As Object, e As EventArgs) Handles btnKdSearch.Click
|
||||
getKdNrSearch()
|
||||
End Sub
|
||||
|
||||
Private Sub lblFirma_Click(sender As Object, e As EventArgs) Handles lblFirma.Click
|
||||
If IsNumeric(txtKdNr.Text) And lblFirma.Text.Trim <> "" Then
|
||||
cProgramFunctions.openKundenblatt(txtKdNr.Text, Me, True)
|
||||
' cProgramFunctions.openKundenblatt(txtKdNr.Text)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
244
SDL/zoll/frmFiskalSchreiben.Designer.vb
generated
Normal file
244
SDL/zoll/frmFiskalSchreiben.Designer.vb
generated
Normal file
@@ -0,0 +1,244 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmFiskalSchreiben
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFiskalSchreiben))
|
||||
Me.txtFA = New System.Windows.Forms.TextBox()
|
||||
Me.txtSB = New System.Windows.Forms.TextBox()
|
||||
Me.Button16 = New System.Windows.Forms.Button()
|
||||
Me.Button15 = New System.Windows.Forms.Button()
|
||||
Me.Button14 = New System.Windows.Forms.Button()
|
||||
Me.Button13 = New System.Windows.Forms.Button()
|
||||
Me.cbxCMR = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxSB = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxFA = New System.Windows.Forms.CheckBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.txtKunde = New System.Windows.Forms.Label()
|
||||
Me.txtAbf = New System.Windows.Forms.Label()
|
||||
Me.tmrFiskal = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.lblFiskGespeichert = New System.Windows.Forms.Label()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'txtFA
|
||||
'
|
||||
Me.txtFA.Location = New System.Drawing.Point(12, 232)
|
||||
Me.txtFA.Multiline = True
|
||||
Me.txtFA.Name = "txtFA"
|
||||
Me.txtFA.Size = New System.Drawing.Size(308, 90)
|
||||
Me.txtFA.TabIndex = 29
|
||||
'
|
||||
'txtSB
|
||||
'
|
||||
Me.txtSB.Location = New System.Drawing.Point(12, 112)
|
||||
Me.txtSB.Multiline = True
|
||||
Me.txtSB.Name = "txtSB"
|
||||
Me.txtSB.Size = New System.Drawing.Size(308, 90)
|
||||
Me.txtSB.TabIndex = 28
|
||||
'
|
||||
'Button16
|
||||
'
|
||||
Me.Button16.BackgroundImage = CType(resources.GetObject("Button16.BackgroundImage"), System.Drawing.Image)
|
||||
Me.Button16.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button16.FlatAppearance.BorderSize = 0
|
||||
Me.Button16.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button16.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button16.Location = New System.Drawing.Point(323, 54)
|
||||
Me.Button16.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3)
|
||||
Me.Button16.Name = "Button16"
|
||||
Me.Button16.Size = New System.Drawing.Size(44, 25)
|
||||
Me.Button16.TabIndex = 25
|
||||
Me.Button16.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button16.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button15
|
||||
'
|
||||
Me.Button15.BackgroundImage = CType(resources.GetObject("Button15.BackgroundImage"), System.Drawing.Image)
|
||||
Me.Button15.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button15.FlatAppearance.BorderSize = 0
|
||||
Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button15.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button15.Location = New System.Drawing.Point(323, 232)
|
||||
Me.Button15.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3)
|
||||
Me.Button15.Name = "Button15"
|
||||
Me.Button15.Size = New System.Drawing.Size(44, 25)
|
||||
Me.Button15.TabIndex = 26
|
||||
Me.Button15.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button15.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button14
|
||||
'
|
||||
Me.Button14.BackgroundImage = CType(resources.GetObject("Button14.BackgroundImage"), System.Drawing.Image)
|
||||
Me.Button14.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button14.FlatAppearance.BorderSize = 0
|
||||
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button14.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button14.Location = New System.Drawing.Point(323, 112)
|
||||
Me.Button14.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3)
|
||||
Me.Button14.Name = "Button14"
|
||||
Me.Button14.Size = New System.Drawing.Size(44, 25)
|
||||
Me.Button14.TabIndex = 27
|
||||
Me.Button14.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button14.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button13
|
||||
'
|
||||
Me.Button13.BackColor = System.Drawing.Color.White
|
||||
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button13.Image = Global.SDL.My.Resources.druck
|
||||
Me.Button13.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button13.Location = New System.Drawing.Point(12, 344)
|
||||
Me.Button13.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3)
|
||||
Me.Button13.Name = "Button13"
|
||||
Me.Button13.Size = New System.Drawing.Size(159, 56)
|
||||
Me.Button13.TabIndex = 24
|
||||
Me.Button13.Text = "Markierte drucken"
|
||||
Me.Button13.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button13.UseVisualStyleBackColor = False
|
||||
'
|
||||
'cbxCMR
|
||||
'
|
||||
Me.cbxCMR.AutoSize = True
|
||||
Me.cbxCMR.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbxCMR.Location = New System.Drawing.Point(12, 59)
|
||||
Me.cbxCMR.Name = "cbxCMR"
|
||||
Me.cbxCMR.Size = New System.Drawing.Size(177, 17)
|
||||
Me.cbxCMR.TabIndex = 23
|
||||
Me.cbxCMR.Text = "CMR-Schreiben an den Kunden"
|
||||
Me.cbxCMR.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxSB
|
||||
'
|
||||
Me.cbxSB.AutoSize = True
|
||||
Me.cbxSB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbxSB.Location = New System.Drawing.Point(12, 95)
|
||||
Me.cbxSB.Name = "cbxSB"
|
||||
Me.cbxSB.Size = New System.Drawing.Size(156, 17)
|
||||
Me.cbxSB.TabIndex = 21
|
||||
Me.cbxSB.Text = "Schreiben an Steuerberater"
|
||||
Me.cbxSB.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxFA
|
||||
'
|
||||
Me.cbxFA.AutoSize = True
|
||||
Me.cbxFA.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cbxFA.Location = New System.Drawing.Point(12, 213)
|
||||
Me.cbxFA.Name = "cbxFA"
|
||||
Me.cbxFA.Size = New System.Drawing.Size(140, 17)
|
||||
Me.cbxFA.TabIndex = 22
|
||||
Me.cbxFA.Text = "Schreiben an Finanzamt"
|
||||
Me.cbxFA.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.BackColor = System.Drawing.Color.White
|
||||
Me.Button1.BackgroundImage = Global.SDL.My.Resources.save
|
||||
Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.Button1.FlatAppearance.BorderSize = 0
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button1.Location = New System.Drawing.Point(321, 371)
|
||||
Me.Button1.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(44, 29)
|
||||
Me.Button1.TabIndex = 32
|
||||
Me.Button1.UseVisualStyleBackColor = False
|
||||
'
|
||||
'txtKunde
|
||||
'
|
||||
Me.txtKunde.AutoSize = True
|
||||
Me.txtKunde.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtKunde.Location = New System.Drawing.Point(12, 13)
|
||||
Me.txtKunde.Name = "txtKunde"
|
||||
Me.txtKunde.Size = New System.Drawing.Size(11, 13)
|
||||
Me.txtKunde.TabIndex = 31
|
||||
Me.txtKunde.Text = "-"
|
||||
'
|
||||
'txtAbf
|
||||
'
|
||||
Me.txtAbf.AutoSize = True
|
||||
Me.txtAbf.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.txtAbf.Location = New System.Drawing.Point(12, 26)
|
||||
Me.txtAbf.Name = "txtAbf"
|
||||
Me.txtAbf.Size = New System.Drawing.Size(11, 13)
|
||||
Me.txtAbf.TabIndex = 33
|
||||
Me.txtAbf.Text = "-"
|
||||
'
|
||||
'tmrFiskal
|
||||
'
|
||||
Me.tmrFiskal.Interval = 1500
|
||||
'
|
||||
'lblFiskGespeichert
|
||||
'
|
||||
Me.lblFiskGespeichert.AutoSize = True
|
||||
Me.lblFiskGespeichert.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblFiskGespeichert.ForeColor = System.Drawing.Color.Green
|
||||
Me.lblFiskGespeichert.Location = New System.Drawing.Point(245, 382)
|
||||
Me.lblFiskGespeichert.Name = "lblFiskGespeichert"
|
||||
Me.lblFiskGespeichert.Size = New System.Drawing.Size(73, 13)
|
||||
Me.lblFiskGespeichert.TabIndex = 41
|
||||
Me.lblFiskGespeichert.Text = "gespeichert"
|
||||
Me.lblFiskGespeichert.Visible = False
|
||||
'
|
||||
'frmFiskalSchreiben
|
||||
'
|
||||
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(374, 409)
|
||||
Me.Controls.Add(Me.lblFiskGespeichert)
|
||||
Me.Controls.Add(Me.txtAbf)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Controls.Add(Me.txtKunde)
|
||||
Me.Controls.Add(Me.txtFA)
|
||||
Me.Controls.Add(Me.txtSB)
|
||||
Me.Controls.Add(Me.Button16)
|
||||
Me.Controls.Add(Me.Button15)
|
||||
Me.Controls.Add(Me.Button14)
|
||||
Me.Controls.Add(Me.Button13)
|
||||
Me.Controls.Add(Me.cbxCMR)
|
||||
Me.Controls.Add(Me.cbxSB)
|
||||
Me.Controls.Add(Me.cbxFA)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmFiskalSchreiben"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
|
||||
Me.Text = "Fiskal - Schreiben"
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents txtFA As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtSB As System.Windows.Forms.TextBox
|
||||
Friend WithEvents Button16 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button15 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button14 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button13 As System.Windows.Forms.Button
|
||||
Friend WithEvents cbxCMR As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents cbxSB As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents cbxFA As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents txtKunde As System.Windows.Forms.Label
|
||||
Friend WithEvents txtAbf As System.Windows.Forms.Label
|
||||
Friend WithEvents tmrFiskal As System.Windows.Forms.Timer
|
||||
Friend WithEvents lblFiskGespeichert As System.Windows.Forms.Label
|
||||
End Class
|
||||
1148
SDL/zoll/frmFiskalSchreiben.resx
Normal file
1148
SDL/zoll/frmFiskalSchreiben.resx
Normal file
File diff suppressed because it is too large
Load Diff
439
SDL/zoll/frmFiskalSchreiben.vb
Normal file
439
SDL/zoll/frmFiskalSchreiben.vb
Normal file
@@ -0,0 +1,439 @@
|
||||
Public Class frmFiskalSchreiben
|
||||
|
||||
' Dim KUNDE As cKunde = Nothing
|
||||
Dim ADRESSE As VERAG_PROG_ALLGEMEIN.cAdressen = Nothing
|
||||
Dim KUNDE As VERAG_PROG_ALLGEMEIN.cKunde = Nothing
|
||||
Dim SPED As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch = Nothing
|
||||
Dim FISKAL As cFiskal_Daten = Nothing
|
||||
'Dim SPED_LIST As cSpeditionsbuchList = Nothing
|
||||
|
||||
' Dim SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen
|
||||
|
||||
Sub New(kdnr As Integer, SPED As VERAG_PROG_ALLGEMEIN.cSpeditionsbuch)
|
||||
InitializeComponent()
|
||||
|
||||
Me.ADRESSE = New VERAG_PROG_ALLGEMEIN.cAdressen(kdnr)
|
||||
Me.KUNDE = New VERAG_PROG_ALLGEMEIN.cKunde(kdnr)
|
||||
Me.FISKAL = New cFiskal_Daten(kdnr)
|
||||
Me.SPED = SPED
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmFiskalSchreiben_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
Try
|
||||
VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.clearTMPPath()
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub frmFiskalSchreiben_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If Not ADRESSE.hasEntry Then
|
||||
MsgBox("Keine Kunden-Nummer gefunden!")
|
||||
Me.Close()
|
||||
End If
|
||||
|
||||
cbxCMR.Checked = FISKAL.fisk_schreibenCMR
|
||||
cbxFA.Checked = FISKAL.fisk_schreibenFA
|
||||
cbxSB.Checked = FISKAL.fisk_schreibenSB
|
||||
|
||||
txtSB.Text = FISKAL.fisk_schreibenSB_Adr
|
||||
txtFA.Text = FISKAL.fisk_schreibenFA_Adr
|
||||
|
||||
txtKunde.Text = ADRESSE.Ordnungsbegriff
|
||||
txtAbf.Text = String.Format("{0} - {1} - {2}", SPED.FilialenNr, SPED.AbfertigungsNr, SPED.UnterNr)
|
||||
|
||||
|
||||
|
||||
'
|
||||
' If SENDUNG.FilialenNr > 0 And SENDUNG.AbfertigungsNr > 0 Then
|
||||
'SPED_LIST = New cSpeditionsbuchList(SENDUNG.FilialenNr, SENDUNG.AbfertigungsNr)
|
||||
' End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Sub loadDatatToSFiskal()
|
||||
FISKAL.fisk_schreibenCMR = cbxCMR.Checked
|
||||
FISKAL.fisk_schreibenFA = cbxFA.Checked
|
||||
FISKAL.fisk_schreibenSB = cbxSB.Checked
|
||||
|
||||
FISKAL.fisk_schreibenSB_Adr = txtSB.Text
|
||||
FISKAL.fisk_schreibenFA_Adr = txtFA.Text
|
||||
End Sub
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
loadDatatToSFiskal()
|
||||
If FISKAL.SAVE() Then
|
||||
lblFiskGespeichert.Visible = True
|
||||
tmrFiskal.Enabled = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
' Dim ds As New VERAG_PROG_ALLGEMEIN.cDATENSERVER
|
||||
Sub Finanzamt(showPrint)
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim odoc As Microsoft.Office.Interop.Word.Document = Nothing
|
||||
Try
|
||||
If ADRESSE Is Nothing Then Exit Sub
|
||||
If KUNDE Is Nothing Then Exit Sub
|
||||
If FISKAL Is Nothing Then Exit Sub
|
||||
If SPED Is Nothing Then Exit Sub
|
||||
|
||||
Dim path As String = ""
|
||||
Select Case SPED.Abfertigungsart
|
||||
Case 26 'AT FISK
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_CS_DE.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "F"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_CS_FR.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case Else
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_CS_EN.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
End Select
|
||||
Case 28 'DE FISK
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_DE_GMBH_DE.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "F"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_DE_GMBH_FR.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "N", "NL"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_DE_GMBH_NL.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case Else
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Finanzamt_VERAG_DE_GMBH_EN.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
End Select
|
||||
Case Else
|
||||
MsgBox("KEINE FISKAL - VZ!")
|
||||
Me.Close()
|
||||
End Select
|
||||
|
||||
|
||||
Dim oWord As New Microsoft.Office.Interop.Word.Application
|
||||
|
||||
oWord.Visible = False 'Word sehen zum Test?
|
||||
Dim m As Object = System.Reflection.Missing.Value
|
||||
odoc = oWord.Documents.Open(path, m, m, m, m, m, m, m, m, m, m, m)
|
||||
|
||||
|
||||
|
||||
Dim split() As String = If(FISKAL.fisk_schreibenFA_Adr, "").ToString.Split(New String() {Environment.NewLine}, StringSplitOptions.None)
|
||||
odoc.FormFields("Adr1").Range.Text = If(split.Count > 0, split(0), "")
|
||||
odoc.FormFields("Adr2").Range.Text = If(split.Count > 1, split(1), "")
|
||||
odoc.FormFields("Adr3").Range.Text = If(split.Count > 2, split(2), "")
|
||||
odoc.FormFields("Adr4").Range.Text = If(split.Count > 3, split(3), "")
|
||||
odoc.FormFields("Adr5").Range.Text = If(split.Count > 4, split(4), "")
|
||||
odoc.FormFields("Eori").Range.Text = If(KUNDE.EORITIN, "")
|
||||
odoc.FormFields("Uid").Range.Text = If(ADRESSE.UstIdKz, "") & If(ADRESSE.UstIdNr, "")
|
||||
'MsgBox((If(ADRESSE.Name_1, "") & " " & If(ADRESSE.Name_2, "")).Trim)
|
||||
odoc.FormFields("Firma1").Range.Text = (If(ADRESSE.Name_1, "") & " " & If(ADRESSE.Name_2, "")).Trim
|
||||
odoc.FormFields("Firma2").Range.Text = If(ADRESSE.Straße, " ")
|
||||
odoc.FormFields("Firma3").Range.Text = (If(ADRESSE.LandKz IsNot Nothing, ADRESSE.LandKz & " ", "") & If(ADRESSE.PLZ IsNot Nothing, ADRESSE.PLZ & " ", "") & If(ADRESSE.Ort, "")).trim
|
||||
odoc.FormFields("Firma4").Range.Text = ""
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
odoc.FormFields("Anlage1").Range.Text = "Zollbeleg (Kopie)"
|
||||
odoc.FormFields("Anlage2").Range.Text = "Rechnung"
|
||||
Case "F"
|
||||
odoc.FormFields("Anlage1").Range.Text = "Documents de douanes (copie)"
|
||||
odoc.FormFields("Anlage2").Range.Text = "Facture"
|
||||
Case Else
|
||||
odoc.FormFields("Anlage1").Range.Text = "customs documents(copy)"
|
||||
odoc.FormFields("Anlage2").Range.Text = "account"
|
||||
|
||||
End Select
|
||||
odoc.FormFields("Anlage3").Range.Text = ""
|
||||
odoc.FormFields("Anlage4").Range.Text = ""
|
||||
odoc.FormFields("Anlage5").Range.Text = ""
|
||||
|
||||
|
||||
|
||||
' odoc.FormFields("SB").Range.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME 'VERAG_PROG_ALLGEMEIN.cglobal.AktiverMitarbeiter.Mitarbeiter
|
||||
odoc.Save()
|
||||
odoc.Activate()
|
||||
|
||||
Select Case showPrint
|
||||
Case "print"
|
||||
oWord.DisplayAlerts = False
|
||||
oWord.PrintOut()
|
||||
oWord.Documents.Close()
|
||||
'Quit word application
|
||||
oWord.Quit()
|
||||
|
||||
'Release
|
||||
oWord = Nothing
|
||||
Case Else
|
||||
oWord.Visible = True
|
||||
End Select
|
||||
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.ToString)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
|
||||
Sub Steuerberater(showPrint)
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim odoc As Microsoft.Office.Interop.Word.Document = Nothing
|
||||
Try
|
||||
If ADRESSE Is Nothing Then Exit Sub
|
||||
If KUNDE Is Nothing Then Exit Sub
|
||||
If FISKAL Is Nothing Then Exit Sub
|
||||
If SPED Is Nothing Then Exit Sub
|
||||
|
||||
Dim path As String = ""
|
||||
|
||||
Select Case SPED.Abfertigungsart
|
||||
Case 26 'AT FISK
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_CS_DE.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "F"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_CS_FR.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "N", "NL"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_CS_NL.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case Else
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_CS_EN.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
End Select
|
||||
Case 28 'DE FISK
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_DE_GMBH_DE.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "F"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_DE_GMBH_FR.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "N", "NL"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_DE_GMBH_NL.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case Else
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_Steuerberater_VERAG_DE_GMBH_EN.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
End Select
|
||||
Case Else
|
||||
MsgBox("KEINE FISKAL - VZ!")
|
||||
Me.Close()
|
||||
End Select
|
||||
|
||||
If path = "" Then Exit Sub : Me.Cursor = Cursors.Default
|
||||
|
||||
Dim oWord As New Microsoft.Office.Interop.Word.Application
|
||||
|
||||
oWord.Visible = False 'Word sehen zum Test?
|
||||
Dim m As Object = System.Reflection.Missing.Value
|
||||
odoc = oWord.Documents.Open(path, m, m, m, m, m, m, m, m, m, m, m)
|
||||
|
||||
|
||||
Dim split() As String = If(FISKAL.fisk_schreibenSB_Adr, "").ToString.Split(New String() {Environment.NewLine}, StringSplitOptions.None)
|
||||
odoc.FormFields("Adr1").Range.Text = If(split.Count > 0, split(0), "")
|
||||
odoc.FormFields("Adr2").Range.Text = If(split.Count > 1, split(1), "")
|
||||
odoc.FormFields("Adr3").Range.Text = If(split.Count > 2, split(2), "")
|
||||
odoc.FormFields("Adr4").Range.Text = If(split.Count > 3, split(3), "")
|
||||
odoc.FormFields("Adr5").Range.Text = If(split.Count > 4, split(4), "")
|
||||
odoc.FormFields("Eori").Range.Text = If(KUNDE.EORITIN, "")
|
||||
odoc.FormFields("Uid").Range.Text = If(ADRESSE.UstIdKz, "") & If(ADRESSE.UstIdNr, "")
|
||||
'MsgBox((If(ADRESSE.Name_1, "") & " " & If(ADRESSE.Name_2, "")).Trim)
|
||||
odoc.FormFields("Firma1").Range.Text = (If(ADRESSE.Name_1, "") & " " & If(ADRESSE.Name_2, "")).Trim
|
||||
odoc.FormFields("Firma2").Range.Text = If(ADRESSE.Straße, " ")
|
||||
odoc.FormFields("Firma3").Range.Text = (If(ADRESSE.LandKz IsNot Nothing, ADRESSE.LandKz & " ", "") & If(ADRESSE.PLZ IsNot Nothing, ADRESSE.PLZ & " ", "") & If(ADRESSE.Ort, "")).trim
|
||||
odoc.FormFields("Firma4").Range.Text = ""
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
odoc.FormFields("Anlage1").Range.Text = "Zollbeleg (Kopie)"
|
||||
odoc.FormFields("Anlage2").Range.Text = "Rechnung"
|
||||
Case "F"
|
||||
odoc.FormFields("Anlage1").Range.Text = "Documents de douanes (copie)"
|
||||
odoc.FormFields("Anlage2").Range.Text = "Facture"
|
||||
Case Else
|
||||
odoc.FormFields("Anlage1").Range.Text = "customs documents(copy)"
|
||||
odoc.FormFields("Anlage2").Range.Text = "account"
|
||||
|
||||
End Select
|
||||
odoc.FormFields("Anlage3").Range.Text = ""
|
||||
odoc.FormFields("Anlage4").Range.Text = ""
|
||||
odoc.FormFields("Anlage5").Range.Text = ""
|
||||
' odoc.FormFields("SB").Range.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME 'VERAG_PROG_ALLGEMEIN.cglobal.AktiverMitarbeiter.Mitarbeiter
|
||||
odoc.Save()
|
||||
odoc.Activate()
|
||||
|
||||
Select Case showPrint
|
||||
Case "print"
|
||||
oWord.DisplayAlerts = False
|
||||
oWord.PrintOut()
|
||||
oWord.Documents.Close()
|
||||
'Quit word application
|
||||
oWord.Quit()
|
||||
|
||||
'Release
|
||||
oWord = Nothing
|
||||
Case Else
|
||||
oWord.Visible = True
|
||||
End Select
|
||||
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.ToString)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Sub CMR(showPrint)
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim odoc As Microsoft.Office.Interop.Word.Document = Nothing
|
||||
Try
|
||||
If ADRESSE Is Nothing Then Exit Sub
|
||||
If KUNDE Is Nothing Then Exit Sub
|
||||
If FISKAL Is Nothing Then Exit Sub
|
||||
If SPED Is Nothing Then Exit Sub
|
||||
|
||||
Dim path As String = ""
|
||||
|
||||
Select Case SPED.Abfertigungsart
|
||||
Case 26 'AT FISK
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_CS_DE.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "F"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_CS_FR.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "CZ"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_CS_CZ.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "H"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_CS_HU.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case Else
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_CS_EN.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
End Select
|
||||
Case 28 'DE FISK
|
||||
Select Case ADRESSE.LandKz
|
||||
Case "A", "D", "CH"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_DE_GMBH_DE.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "F"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_DE_GMBH_FR.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "E"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_DE_GMBH_ES.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case "NL", "N"
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_DE_GMBH_NL.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
Case Else
|
||||
Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "VORLAGEN", "FISKALSCHREIBEN", "", "", "Fiskal_Schreiben_CMR_VERAG_DE_GMBH_EN.docx")
|
||||
path = DS.OPEN_SINGLE(False)
|
||||
End Select
|
||||
Case Else
|
||||
MsgBox("KEINE FISKAL - VZ!")
|
||||
Me.Close()
|
||||
End Select
|
||||
|
||||
If path = "" Then Exit Sub : Me.Cursor = Cursors.Default
|
||||
|
||||
Dim oWord As New Microsoft.Office.Interop.Word.Application
|
||||
|
||||
oWord.Visible = False 'Word sehen zum Test?
|
||||
Dim m As Object = System.Reflection.Missing.Value
|
||||
odoc = oWord.Documents.Open(path, m, m, m, m, m, m, m, m, m, m, m)
|
||||
|
||||
|
||||
|
||||
Dim split() As String = If(FISKAL.fisk_schreibenSB_Adr, "").ToString.Split(vbNewLine)
|
||||
odoc.FormFields("Adr1").Range.Text = (If(ADRESSE.Name_1, "") & " " & If(ADRESSE.Name_2, "")).Trim
|
||||
odoc.FormFields("Adr2").Range.Text = If(ADRESSE.Straße, " ")
|
||||
odoc.FormFields("Adr3").Range.Text = ""
|
||||
odoc.FormFields("Adr4").Range.Text = (If(ADRESSE.LandKz IsNot Nothing, ADRESSE.LandKz & " ", "") & If(ADRESSE.PLZ IsNot Nothing, ADRESSE.PLZ & " ", "") & If(ADRESSE.Ort, "")).trim
|
||||
odoc.FormFields("Sachbearbeiter").Range.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
|
||||
|
||||
If SPED IsNot Nothing Then
|
||||
odoc.FormFields("PosNr").Range.Text = "Pos.Nr: " & SPED.FilialenNr & " " & SPED.AbfertigungsNr & " " & SPED.UnterNr
|
||||
End If
|
||||
|
||||
If SPED IsNot Nothing Then
|
||||
odoc.FormFields("VzDat").Range.Text = If(SPED.Abfertigungsdatum, "")
|
||||
odoc.FormFields("ZollNr").Range.Text = If(SPED.BelegNr, "")
|
||||
End If
|
||||
|
||||
' odoc.FormFields("SB").Range.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME 'VERAG_PROG_ALLGEMEIN.cglobal.AktiverMitarbeiter.Mitarbeiter
|
||||
odoc.Save()
|
||||
odoc.Activate()
|
||||
|
||||
Select Case showPrint
|
||||
Case "print"
|
||||
oWord.DisplayAlerts = False
|
||||
oWord.PrintOut()
|
||||
Try
|
||||
oWord.Documents.Close()
|
||||
'Quit word application
|
||||
oWord.Quit()
|
||||
|
||||
'Release
|
||||
oWord = Nothing
|
||||
Catch ex As Exception
|
||||
'NIX, kann sein, dass noch offen..
|
||||
End Try
|
||||
|
||||
Case Else
|
||||
oWord.Visible = True
|
||||
End Select
|
||||
|
||||
Catch ex As Exception
|
||||
MessageBox.Show(ex.ToString)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click
|
||||
loadDatatToSFiskal()
|
||||
CMR("show")
|
||||
End Sub
|
||||
|
||||
Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
|
||||
loadDatatToSFiskal()
|
||||
Finanzamt("show")
|
||||
End Sub
|
||||
|
||||
Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
|
||||
loadDatatToSFiskal()
|
||||
Steuerberater("show")
|
||||
End Sub
|
||||
|
||||
Private Sub tmrFiskal_Tick(sender As Object, e As EventArgs) Handles tmrFiskal.Tick
|
||||
lblFiskGespeichert.Visible = False
|
||||
tmrFiskal.Enabled = False
|
||||
End Sub
|
||||
|
||||
Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
|
||||
loadDatatToSFiskal()
|
||||
If cbxCMR.Checked Then CMR("print")
|
||||
If cbxSB.Checked Then Steuerberater("print")
|
||||
If cbxFA.Checked Then Finanzamt("print")
|
||||
End Sub
|
||||
End Class
|
||||
183
SDL/zoll/frmLKWEingetroffen nach.Designer.vb
generated
Normal file
183
SDL/zoll/frmLKWEingetroffen nach.Designer.vb
generated
Normal file
@@ -0,0 +1,183 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmLKWEingetroffen_nach
|
||||
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(frmLKWEingetroffen_nach))
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.txtDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtUhrzeit = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.cboNL = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.btn = New System.Windows.Forms.Button()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Location = New System.Drawing.Point(13, 38)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(115, 13)
|
||||
Me.lbl.TabIndex = 0
|
||||
Me.lbl.Text = "LKWs eingetroffen am:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(240, 38)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(31, 13)
|
||||
Me.Label1.TabIndex = 2
|
||||
Me.Label1.Text = "nach"
|
||||
'
|
||||
'txtDatum
|
||||
'
|
||||
Me.txtDatum._DateTimeOnly = False
|
||||
Me.txtDatum._numbersOnly = False
|
||||
Me.txtDatum._numbersOnlyKommastellen = ""
|
||||
Me.txtDatum._Prozent = False
|
||||
Me.txtDatum._ShortDateNew = True
|
||||
Me.txtDatum._ShortDateOnly = False
|
||||
Me.txtDatum._TimeOnly = False
|
||||
Me.txtDatum._value = ""
|
||||
Me.txtDatum._Waehrung = False
|
||||
Me.txtDatum._WaehrungZeichen = True
|
||||
Me.txtDatum.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtDatum.Location = New System.Drawing.Point(134, 35)
|
||||
Me.txtDatum.MaxLength = 10
|
||||
Me.txtDatum.MaxLineLength = -1
|
||||
Me.txtDatum.MaxLines_Warning = ""
|
||||
Me.txtDatum.MaxLines_Warning_Label = Nothing
|
||||
Me.txtDatum.Name = "txtDatum"
|
||||
Me.txtDatum.Size = New System.Drawing.Size(100, 20)
|
||||
Me.txtDatum.TabIndex = 1
|
||||
'
|
||||
'txtUhrzeit
|
||||
'
|
||||
Me.txtUhrzeit._DateTimeOnly = False
|
||||
Me.txtUhrzeit._numbersOnly = False
|
||||
Me.txtUhrzeit._numbersOnlyKommastellen = ""
|
||||
Me.txtUhrzeit._Prozent = False
|
||||
Me.txtUhrzeit._ShortDateNew = False
|
||||
Me.txtUhrzeit._ShortDateOnly = False
|
||||
Me.txtUhrzeit._TimeOnly = True
|
||||
Me.txtUhrzeit._value = ""
|
||||
Me.txtUhrzeit._Waehrung = False
|
||||
Me.txtUhrzeit._WaehrungZeichen = True
|
||||
Me.txtUhrzeit.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtUhrzeit.Location = New System.Drawing.Point(277, 35)
|
||||
Me.txtUhrzeit.MaxLength = 8
|
||||
Me.txtUhrzeit.MaxLineLength = -1
|
||||
Me.txtUhrzeit.MaxLines_Warning = ""
|
||||
Me.txtUhrzeit.MaxLines_Warning_Label = Nothing
|
||||
Me.txtUhrzeit.Name = "txtUhrzeit"
|
||||
Me.txtUhrzeit.Size = New System.Drawing.Size(58, 20)
|
||||
Me.txtUhrzeit.TabIndex = 3
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(341, 38)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(24, 13)
|
||||
Me.Label2.TabIndex = 4
|
||||
Me.Label2.Text = "Uhr"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(13, 67)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(77, 13)
|
||||
Me.Label3.TabIndex = 5
|
||||
Me.Label3.Text = "Niederlassung:"
|
||||
'
|
||||
'cboNL
|
||||
'
|
||||
Me.cboNL._allowedValuesFreiText = Nothing
|
||||
Me.cboNL._allowFreiText = False
|
||||
Me.cboNL._value = ""
|
||||
Me.cboNL.FormattingEnabled = True
|
||||
Me.cboNL.Location = New System.Drawing.Point(134, 64)
|
||||
Me.cboNL.Name = "cboNL"
|
||||
Me.cboNL.Size = New System.Drawing.Size(100, 21)
|
||||
Me.cboNL.TabIndex = 6
|
||||
'
|
||||
'btn
|
||||
'
|
||||
Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn.Image = Global.SDL.My.Resources.Excel_logo
|
||||
Me.btn.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btn.Location = New System.Drawing.Point(277, 64)
|
||||
Me.btn.Name = "btn"
|
||||
Me.btn.Size = New System.Drawing.Size(88, 46)
|
||||
Me.btn.TabIndex = 7
|
||||
Me.btn.Text = "Excel"
|
||||
Me.btn.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btn.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(13, 9)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(340, 13)
|
||||
Me.Label4.TabIndex = 8
|
||||
Me.Label4.Text = "Gibte eine Liste der LKWs aus die derzeit auf Status ""Ankunft"" stehen."
|
||||
'
|
||||
'frmLKWEingetroffen_nach
|
||||
'
|
||||
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(380, 120)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.btn)
|
||||
Me.Controls.Add(Me.cboNL)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.txtUhrzeit)
|
||||
Me.Controls.Add(Me.txtDatum)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.lbl)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmLKWEingetroffen_nach"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "LKW eingetroffen"
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents txtDatum As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtUhrzeit As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents cboNL As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents btn As Button
|
||||
Friend WithEvents Label4 As Label
|
||||
End Class
|
||||
980
SDL/zoll/frmLKWEingetroffen nach.resx
Normal file
980
SDL/zoll/frmLKWEingetroffen nach.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>
|
||||
71
SDL/zoll/frmLKWEingetroffen nach.vb
Normal file
71
SDL/zoll/frmLKWEingetroffen nach.vb
Normal file
@@ -0,0 +1,71 @@
|
||||
Public Class frmLKWEingetroffen_nach
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
|
||||
If txtDatum.Text = "" Then Exit Sub
|
||||
If txtUhrzeit.Text = "" Then Exit Sub
|
||||
If Not IsDate(txtDatum.Text) Then Exit Sub
|
||||
If txtUhrzeit.Text.Length <> 5 And txtUhrzeit.Text.Length <> 8 Then Exit Sub
|
||||
|
||||
'Dim dt = SQL.loadDgvBySql("SELECT tblSnd_SendungID,FilialenNr,tblSnd_Abfertigungsart_ID,AbfertigungsNr,[Ankunft], LKW_Nr, [Auftraggeber] As Avisierer, [Frächter], [ImEx], Auftraggeber, isnull(tblSnd_Colli,'') as Colli,isnull(tblSnd_Gewicht,'') as Gewicht,isnull(tblSnd_Warenbezeichnung,'') as Ware,isnull(tblSnd_ATANr,'') as ATA
|
||||
' From [Aviso] INNER Join tblSendungen On tblSnd_AvisoID=AvisoID
|
||||
' Where status IN (3) And Ankunft >'" & txtDatum.Text & " " & txtUhrzeit.Text & "' and Grenzstelle='" & cboNL._value & "' and Firma='VERAG' order by AvisoID, Ankunft", "AVISO")
|
||||
Dim dt = SQL.loadDgvBySql("SELECT tblSnd_SendungID,FilialenNr,tblSnd_Abfertigungsart_ID,AbfertigungsNr,[Ankunft], LKW_Nr, [Auftraggeber] As Avisierer, [Frächter], [ImEx], Auftraggeber, isnull(tblSnd_Colli,'') as Colli,isnull(tblSnd_Gewicht,'') as Gewicht,isnull(tblSnd_Warenbezeichnung,'') as Ware,isnull(tblSnd_ATANr,'') as ATA
|
||||
From [Aviso] INNER Join tblSendungen On tblSnd_AvisoID=AvisoID
|
||||
Where status IN (3,4,5,0) And Datum > DATEADD(week, -2, GETDATE()) and Grenzstelle='" & cboNL._value & "' and Firma='VERAG' order by AvisoID, Ankunft", "AVISO")
|
||||
For Each dr In dt.Rows
|
||||
For Each dc In dt.Columns
|
||||
dc.ReadOnly = False
|
||||
Next
|
||||
Next
|
||||
|
||||
If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
|
||||
For Each r As DataRow In dt.Rows
|
||||
r("ATA") = getATCMRN(r("tblSnd_Abfertigungsart_ID"), r("tblSnd_SendungID"), r("FilialenNr"), r("AbfertigungsNr"))
|
||||
Next
|
||||
VERAG_PROG_ALLGEMEIN.cProgramFunctions.genExcelFromDT_NEW(dt,,,,, True)
|
||||
Else
|
||||
MsgBox("Keine Daten!")
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmLKWEingetroffen_nach_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Case "VERAG", "ATILLA"
|
||||
Case Else : Me.Close()
|
||||
End Select
|
||||
|
||||
txtDatum.Text = Now.ToShortDateString
|
||||
txtUhrzeit.Text = "14:00:00"
|
||||
cboNL.Items.Clear()
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG", "SBG"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WAI", "WAI"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NKD", "NKD"))
|
||||
cboNL.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG)
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Function getATCMRN(tblSnd_Abfertigungsart_ID, tblSnd_SendungID, FilialenNr, AbfertigungsNr) As String
|
||||
getATCMRN = ""
|
||||
If tblSnd_Abfertigungsart_ID Is DBNull.Value Then Return ""
|
||||
Select Case tblSnd_Abfertigungsart_ID.ToString
|
||||
Case "5", "6"
|
||||
getATCMRN = SQL.getValueTxtBySql("SELECT TOP 1 isnull(ncts_MRN,ncts_ANR) FROM tblDakosy_Zollanmeldungen INNER JOIN tblDakosy_NCTSOut ON ncts_dyaAnmID=dy_Id where dy_SendungsId = '" & tblSnd_SendungID & "' and ( ncts_MRN is not null or ncts_ANR is not null ) order by dy_id desc", "FMZOLL")
|
||||
Case "9", "23", ""
|
||||
'NIX..
|
||||
Case Else
|
||||
getATCMRN = SQL.getValueTxtBySql("SELECT TOP 1 isnull(eza_ANR,'') FROM tblDakosy_Zollanmeldungen INNER JOIN tblDakosy_EZA ON eza_dyaAnmID=dy_Id where dy_SendungsId = '" & tblSnd_SendungID & "' and eza_ANR is not null order by dy_id desc", "FMZOLL")
|
||||
If getATCMRN = "" Then
|
||||
If AbfertigungsNr > 0 Then
|
||||
getATCMRN = SQL.getValueTxtBySql("SELECT TOP 1 isnull(zbant_arbnr,'') FROM [zbant] where zbant_stat BETWEEN 40 AND 71 and zbant_beznr like '" & FilialenNr & "/" & CInt(AbfertigungsNr.ToString.Substring(2)) & "%' order by zbant_beznr desc", "ATLAS")
|
||||
End If
|
||||
End If
|
||||
|
||||
End Select
|
||||
End Function
|
||||
|
||||
End Class
|
||||
529
SDL/zoll/frmStatusFSSAtlas.Designer.vb
generated
Normal file
529
SDL/zoll/frmStatusFSSAtlas.Designer.vb
generated
Normal file
@@ -0,0 +1,529 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmStatusFSSAtlas
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.lblStat_1 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_2 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_3 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_4 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_5 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_6 = New System.Windows.Forms.Label()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.picStat_1 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_2 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_3 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_4 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_5 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_6 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_11 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_8 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_10 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_7 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.picStat_9 = New VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE()
|
||||
Me.lblStat_11 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_10 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_9 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_8 = New System.Windows.Forms.Label()
|
||||
Me.lblStat_7 = New System.Windows.Forms.Label()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.lblStat_Uebertragen = New System.Windows.Forms.Label()
|
||||
Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.lblStat_FERTIG = New System.Windows.Forms.Label()
|
||||
Me.lblStat_ERROR = New System.Windows.Forms.Label()
|
||||
Me.txtSuben = New System.Windows.Forms.RichTextBox()
|
||||
Me.txtSalzburg = New System.Windows.Forms.RichTextBox()
|
||||
CType(Me.picStat_1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_6, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_11, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_8, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_10, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_7, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picStat_9, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lblStat_1
|
||||
'
|
||||
Me.lblStat_1.AutoSize = True
|
||||
Me.lblStat_1.Location = New System.Drawing.Point(35, 47)
|
||||
Me.lblStat_1.Name = "lblStat_1"
|
||||
Me.lblStat_1.Size = New System.Drawing.Size(86, 13)
|
||||
Me.lblStat_1.TabIndex = 0
|
||||
Me.lblStat_1.Text = "1. Datei erstellen"
|
||||
Me.lblStat_1.Visible = False
|
||||
'
|
||||
'lblStat_2
|
||||
'
|
||||
Me.lblStat_2.AutoSize = True
|
||||
Me.lblStat_2.Location = New System.Drawing.Point(35, 63)
|
||||
Me.lblStat_2.Name = "lblStat_2"
|
||||
Me.lblStat_2.Size = New System.Drawing.Size(240, 13)
|
||||
Me.lblStat_2.TabIndex = 0
|
||||
Me.lblStat_2.Text = "2. Datei auf ATLAS-SERVER SUBEN übertragen"
|
||||
Me.lblStat_2.Visible = False
|
||||
'
|
||||
'lblStat_3
|
||||
'
|
||||
Me.lblStat_3.AutoSize = True
|
||||
Me.lblStat_3.Location = New System.Drawing.Point(35, 81)
|
||||
Me.lblStat_3.Name = "lblStat_3"
|
||||
Me.lblStat_3.Size = New System.Drawing.Size(248, 13)
|
||||
Me.lblStat_3.TabIndex = 0
|
||||
Me.lblStat_3.Text = "3. Fremdschnittstelle auf ATLAS SUBEN ausführen"
|
||||
Me.lblStat_3.Visible = False
|
||||
'
|
||||
'lblStat_4
|
||||
'
|
||||
Me.lblStat_4.AutoSize = True
|
||||
Me.lblStat_4.Location = New System.Drawing.Point(35, 99)
|
||||
Me.lblStat_4.Name = "lblStat_4"
|
||||
Me.lblStat_4.Size = New System.Drawing.Size(80, 13)
|
||||
Me.lblStat_4.TabIndex = 0
|
||||
Me.lblStat_4.Text = "4. Import läuft..."
|
||||
Me.lblStat_4.Visible = False
|
||||
'
|
||||
'lblStat_5
|
||||
'
|
||||
Me.lblStat_5.AutoSize = True
|
||||
Me.lblStat_5.Location = New System.Drawing.Point(35, 115)
|
||||
Me.lblStat_5.Name = "lblStat_5"
|
||||
Me.lblStat_5.Size = New System.Drawing.Size(122, 13)
|
||||
Me.lblStat_5.TabIndex = 0
|
||||
Me.lblStat_5.Text = "5. Import abgeschlossen"
|
||||
Me.lblStat_5.Visible = False
|
||||
'
|
||||
'lblStat_6
|
||||
'
|
||||
Me.lblStat_6.AutoSize = True
|
||||
Me.lblStat_6.Location = New System.Drawing.Point(35, 133)
|
||||
Me.lblStat_6.Name = "lblStat_6"
|
||||
Me.lblStat_6.Size = New System.Drawing.Size(172, 13)
|
||||
Me.lblStat_6.TabIndex = 0
|
||||
Me.lblStat_6.Text = "6. Informationen werden abgerufen"
|
||||
Me.lblStat_6.Visible = False
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(13, 266)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(73, 13)
|
||||
Me.Label9.TabIndex = 0
|
||||
Me.Label9.Text = "Import Suben:"
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
Me.Label10.Location = New System.Drawing.Point(13, 401)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(83, 13)
|
||||
Me.Label10.TabIndex = 0
|
||||
Me.Label10.Text = "Import Salzburg:"
|
||||
'
|
||||
'picStat_1
|
||||
'
|
||||
Me.picStat_1.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_1.linkedPictureBox = Nothing
|
||||
Me.picStat_1.linkedTextBox = Nothing
|
||||
Me.picStat_1.Location = New System.Drawing.Point(16, 42)
|
||||
Me.picStat_1.Name = "picStat_1"
|
||||
Me.picStat_1.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_1.TabIndex = 2
|
||||
Me.picStat_1.TabStop = False
|
||||
Me.picStat_1.valuename = Nothing
|
||||
Me.picStat_1.Visible = False
|
||||
'
|
||||
'picStat_2
|
||||
'
|
||||
Me.picStat_2.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_2.linkedPictureBox = Nothing
|
||||
Me.picStat_2.linkedTextBox = Nothing
|
||||
Me.picStat_2.Location = New System.Drawing.Point(16, 58)
|
||||
Me.picStat_2.Name = "picStat_2"
|
||||
Me.picStat_2.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_2.TabIndex = 2
|
||||
Me.picStat_2.TabStop = False
|
||||
Me.picStat_2.valuename = Nothing
|
||||
Me.picStat_2.Visible = False
|
||||
'
|
||||
'picStat_3
|
||||
'
|
||||
Me.picStat_3.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_3.linkedPictureBox = Nothing
|
||||
Me.picStat_3.linkedTextBox = Nothing
|
||||
Me.picStat_3.Location = New System.Drawing.Point(16, 76)
|
||||
Me.picStat_3.Name = "picStat_3"
|
||||
Me.picStat_3.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_3.TabIndex = 2
|
||||
Me.picStat_3.TabStop = False
|
||||
Me.picStat_3.valuename = Nothing
|
||||
Me.picStat_3.Visible = False
|
||||
'
|
||||
'picStat_4
|
||||
'
|
||||
Me.picStat_4.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_4.linkedPictureBox = Nothing
|
||||
Me.picStat_4.linkedTextBox = Nothing
|
||||
Me.picStat_4.Location = New System.Drawing.Point(16, 94)
|
||||
Me.picStat_4.Name = "picStat_4"
|
||||
Me.picStat_4.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_4.TabIndex = 2
|
||||
Me.picStat_4.TabStop = False
|
||||
Me.picStat_4.valuename = Nothing
|
||||
Me.picStat_4.Visible = False
|
||||
'
|
||||
'picStat_5
|
||||
'
|
||||
Me.picStat_5.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_5.linkedPictureBox = Nothing
|
||||
Me.picStat_5.linkedTextBox = Nothing
|
||||
Me.picStat_5.Location = New System.Drawing.Point(16, 110)
|
||||
Me.picStat_5.Name = "picStat_5"
|
||||
Me.picStat_5.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_5.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_5.TabIndex = 2
|
||||
Me.picStat_5.TabStop = False
|
||||
Me.picStat_5.valuename = Nothing
|
||||
Me.picStat_5.Visible = False
|
||||
'
|
||||
'picStat_6
|
||||
'
|
||||
Me.picStat_6.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_6.linkedPictureBox = Nothing
|
||||
Me.picStat_6.linkedTextBox = Nothing
|
||||
Me.picStat_6.Location = New System.Drawing.Point(16, 128)
|
||||
Me.picStat_6.Name = "picStat_6"
|
||||
Me.picStat_6.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_6.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_6.TabIndex = 2
|
||||
Me.picStat_6.TabStop = False
|
||||
Me.picStat_6.valuename = Nothing
|
||||
Me.picStat_6.Visible = False
|
||||
'
|
||||
'picStat_11
|
||||
'
|
||||
Me.picStat_11.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_11.linkedPictureBox = Nothing
|
||||
Me.picStat_11.linkedTextBox = Nothing
|
||||
Me.picStat_11.Location = New System.Drawing.Point(16, 215)
|
||||
Me.picStat_11.Name = "picStat_11"
|
||||
Me.picStat_11.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_11.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_11.TabIndex = 8
|
||||
Me.picStat_11.TabStop = False
|
||||
Me.picStat_11.valuename = Nothing
|
||||
Me.picStat_11.Visible = False
|
||||
'
|
||||
'picStat_8
|
||||
'
|
||||
Me.picStat_8.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_8.linkedPictureBox = Nothing
|
||||
Me.picStat_8.linkedTextBox = Nothing
|
||||
Me.picStat_8.Location = New System.Drawing.Point(16, 163)
|
||||
Me.picStat_8.Name = "picStat_8"
|
||||
Me.picStat_8.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_8.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_8.TabIndex = 9
|
||||
Me.picStat_8.TabStop = False
|
||||
Me.picStat_8.valuename = Nothing
|
||||
Me.picStat_8.Visible = False
|
||||
'
|
||||
'picStat_10
|
||||
'
|
||||
Me.picStat_10.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_10.linkedPictureBox = Nothing
|
||||
Me.picStat_10.linkedTextBox = Nothing
|
||||
Me.picStat_10.Location = New System.Drawing.Point(16, 197)
|
||||
Me.picStat_10.Name = "picStat_10"
|
||||
Me.picStat_10.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_10.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_10.TabIndex = 10
|
||||
Me.picStat_10.TabStop = False
|
||||
Me.picStat_10.valuename = Nothing
|
||||
Me.picStat_10.Visible = False
|
||||
'
|
||||
'picStat_7
|
||||
'
|
||||
Me.picStat_7.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_7.linkedPictureBox = Nothing
|
||||
Me.picStat_7.linkedTextBox = Nothing
|
||||
Me.picStat_7.Location = New System.Drawing.Point(16, 145)
|
||||
Me.picStat_7.Name = "picStat_7"
|
||||
Me.picStat_7.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_7.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_7.TabIndex = 11
|
||||
Me.picStat_7.TabStop = False
|
||||
Me.picStat_7.valuename = Nothing
|
||||
Me.picStat_7.Visible = False
|
||||
'
|
||||
'picStat_9
|
||||
'
|
||||
Me.picStat_9.Image = Global.SDL.My.Resources.ok
|
||||
Me.picStat_9.linkedPictureBox = Nothing
|
||||
Me.picStat_9.linkedTextBox = Nothing
|
||||
Me.picStat_9.Location = New System.Drawing.Point(16, 181)
|
||||
Me.picStat_9.Name = "picStat_9"
|
||||
Me.picStat_9.Size = New System.Drawing.Size(20, 18)
|
||||
Me.picStat_9.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picStat_9.TabIndex = 12
|
||||
Me.picStat_9.TabStop = False
|
||||
Me.picStat_9.valuename = Nothing
|
||||
Me.picStat_9.Visible = False
|
||||
'
|
||||
'lblStat_11
|
||||
'
|
||||
Me.lblStat_11.AutoSize = True
|
||||
Me.lblStat_11.Location = New System.Drawing.Point(35, 220)
|
||||
Me.lblStat_11.Name = "lblStat_11"
|
||||
Me.lblStat_11.Size = New System.Drawing.Size(178, 13)
|
||||
Me.lblStat_11.TabIndex = 3
|
||||
Me.lblStat_11.Text = "11. Informationen werden abgerufen"
|
||||
Me.lblStat_11.Visible = False
|
||||
'
|
||||
'lblStat_10
|
||||
'
|
||||
Me.lblStat_10.AutoSize = True
|
||||
Me.lblStat_10.Location = New System.Drawing.Point(35, 202)
|
||||
Me.lblStat_10.Name = "lblStat_10"
|
||||
Me.lblStat_10.Size = New System.Drawing.Size(128, 13)
|
||||
Me.lblStat_10.TabIndex = 4
|
||||
Me.lblStat_10.Text = "10. Import abgeschlossen"
|
||||
Me.lblStat_10.Visible = False
|
||||
'
|
||||
'lblStat_9
|
||||
'
|
||||
Me.lblStat_9.AutoSize = True
|
||||
Me.lblStat_9.Location = New System.Drawing.Point(35, 186)
|
||||
Me.lblStat_9.Name = "lblStat_9"
|
||||
Me.lblStat_9.Size = New System.Drawing.Size(80, 13)
|
||||
Me.lblStat_9.TabIndex = 5
|
||||
Me.lblStat_9.Text = "9. Import läuft..."
|
||||
Me.lblStat_9.Visible = False
|
||||
'
|
||||
'lblStat_8
|
||||
'
|
||||
Me.lblStat_8.AutoSize = True
|
||||
Me.lblStat_8.Location = New System.Drawing.Point(35, 168)
|
||||
Me.lblStat_8.Name = "lblStat_8"
|
||||
Me.lblStat_8.Size = New System.Drawing.Size(248, 13)
|
||||
Me.lblStat_8.TabIndex = 6
|
||||
Me.lblStat_8.Text = "8. Fremdschnittstelle auf ATLAS SUBEN ausführen"
|
||||
Me.lblStat_8.Visible = False
|
||||
'
|
||||
'lblStat_7
|
||||
'
|
||||
Me.lblStat_7.AutoSize = True
|
||||
Me.lblStat_7.Location = New System.Drawing.Point(35, 150)
|
||||
Me.lblStat_7.Name = "lblStat_7"
|
||||
Me.lblStat_7.Size = New System.Drawing.Size(240, 13)
|
||||
Me.lblStat_7.TabIndex = 7
|
||||
Me.lblStat_7.Text = "7. Datei auf ATLAS-SERVER SUBEN übertragen"
|
||||
Me.lblStat_7.Visible = False
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(16, 13)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(252, 13)
|
||||
Me.Label4.TabIndex = 13
|
||||
Me.Label4.Text = "Bitte warten Sie bis die Schritte abgeschlossen sind."
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Panel1.Controls.Add(Me.txtSalzburg)
|
||||
Me.Panel1.Controls.Add(Me.txtSuben)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_Uebertragen)
|
||||
Me.Panel1.Controls.Add(Me.FlatButton1)
|
||||
Me.Panel1.Controls.Add(Me.Label4)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_1)
|
||||
Me.Panel1.Controls.Add(Me.picStat_11)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_2)
|
||||
Me.Panel1.Controls.Add(Me.picStat_8)
|
||||
Me.Panel1.Controls.Add(Me.Label9)
|
||||
Me.Panel1.Controls.Add(Me.picStat_10)
|
||||
Me.Panel1.Controls.Add(Me.Label10)
|
||||
Me.Panel1.Controls.Add(Me.picStat_7)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_3)
|
||||
Me.Panel1.Controls.Add(Me.picStat_9)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_4)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_FERTIG)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_ERROR)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_11)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_5)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_10)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_6)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_9)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_8)
|
||||
Me.Panel1.Controls.Add(Me.lblStat_7)
|
||||
Me.Panel1.Controls.Add(Me.picStat_1)
|
||||
Me.Panel1.Controls.Add(Me.picStat_6)
|
||||
Me.Panel1.Controls.Add(Me.picStat_4)
|
||||
Me.Panel1.Controls.Add(Me.picStat_3)
|
||||
Me.Panel1.Controls.Add(Me.picStat_2)
|
||||
Me.Panel1.Controls.Add(Me.picStat_5)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(464, 572)
|
||||
Me.Panel1.TabIndex = 14
|
||||
'
|
||||
'lblStat_Uebertragen
|
||||
'
|
||||
Me.lblStat_Uebertragen.AutoSize = True
|
||||
Me.lblStat_Uebertragen.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblStat_Uebertragen.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.lblStat_Uebertragen.Location = New System.Drawing.Point(62, 106)
|
||||
Me.lblStat_Uebertragen.Name = "lblStat_Uebertragen"
|
||||
Me.lblStat_Uebertragen.Size = New System.Drawing.Size(310, 62)
|
||||
Me.lblStat_Uebertragen.TabIndex = 15
|
||||
Me.lblStat_Uebertragen.Text = "Die Daten wurden" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "erfolgreich übertragen!"
|
||||
Me.lblStat_Uebertragen.TextAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.lblStat_Uebertragen.Visible = False
|
||||
'
|
||||
'FlatButton1
|
||||
'
|
||||
Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.FlatButton1.ForeColor = System.Drawing.Color.Black
|
||||
Me.FlatButton1.Location = New System.Drawing.Point(175, 539)
|
||||
Me.FlatButton1.Name = "FlatButton1"
|
||||
Me.FlatButton1.Size = New System.Drawing.Size(108, 23)
|
||||
Me.FlatButton1.TabIndex = 14
|
||||
Me.FlatButton1.Text = "Schließen"
|
||||
Me.FlatButton1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblStat_FERTIG
|
||||
'
|
||||
Me.lblStat_FERTIG.AutoSize = True
|
||||
Me.lblStat_FERTIG.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblStat_FERTIG.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.lblStat_FERTIG.Location = New System.Drawing.Point(372, 246)
|
||||
Me.lblStat_FERTIG.Name = "lblStat_FERTIG"
|
||||
Me.lblStat_FERTIG.Size = New System.Drawing.Size(68, 17)
|
||||
Me.lblStat_FERTIG.TabIndex = 3
|
||||
Me.lblStat_FERTIG.Text = "FERTIG!"
|
||||
Me.lblStat_FERTIG.Visible = False
|
||||
'
|
||||
'lblStat_ERROR
|
||||
'
|
||||
Me.lblStat_ERROR.AutoSize = True
|
||||
Me.lblStat_ERROR.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblStat_ERROR.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblStat_ERROR.Location = New System.Drawing.Point(13, 246)
|
||||
Me.lblStat_ERROR.Name = "lblStat_ERROR"
|
||||
Me.lblStat_ERROR.Size = New System.Drawing.Size(222, 13)
|
||||
Me.lblStat_ERROR.TabIndex = 3
|
||||
Me.lblStat_ERROR.Text = "ERROR: es ist ein Fehler aufgetreten!"
|
||||
Me.lblStat_ERROR.Visible = False
|
||||
'
|
||||
'txtSuben
|
||||
'
|
||||
Me.txtSuben.AccessibleName = ""
|
||||
Me.txtSuben.Location = New System.Drawing.Point(16, 282)
|
||||
Me.txtSuben.Name = "txtSuben"
|
||||
Me.txtSuben.ReadOnly = True
|
||||
Me.txtSuben.Size = New System.Drawing.Size(424, 116)
|
||||
Me.txtSuben.TabIndex = 16
|
||||
Me.txtSuben.Text = ""
|
||||
'
|
||||
'txtSalzburg
|
||||
'
|
||||
Me.txtSalzburg.AccessibleName = ""
|
||||
Me.txtSalzburg.Location = New System.Drawing.Point(16, 417)
|
||||
Me.txtSalzburg.Name = "txtSalzburg"
|
||||
Me.txtSalzburg.ReadOnly = True
|
||||
Me.txtSalzburg.Size = New System.Drawing.Size(424, 116)
|
||||
Me.txtSalzburg.TabIndex = 17
|
||||
Me.txtSalzburg.Text = ""
|
||||
'
|
||||
'frmStatusFSSAtlas
|
||||
'
|
||||
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(464, 572)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Name = "frmStatusFSSAtlas"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "frmStatusFSSAtlas"
|
||||
CType(Me.picStat_1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_6, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_11, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_8, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_10, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_7, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picStat_9, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents lblStat_1 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_2 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_3 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_4 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_5 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_6 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label10 As System.Windows.Forms.Label
|
||||
Friend WithEvents picStat_1 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_2 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_3 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_4 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_5 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_6 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_11 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_8 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_10 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_7 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents picStat_9 As VERAG_PROG_ALLGEMEIN.MyLinkPicBoxVALUE
|
||||
Friend WithEvents lblStat_11 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_10 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_9 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_8 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_7 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Friend WithEvents FlatButton1 As VERAG_PROG_ALLGEMEIN.FlatButton
|
||||
Friend WithEvents lblStat_Uebertragen As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_ERROR As System.Windows.Forms.Label
|
||||
Friend WithEvents lblStat_FERTIG As System.Windows.Forms.Label
|
||||
Friend WithEvents txtSalzburg As System.Windows.Forms.RichTextBox
|
||||
Friend WithEvents txtSuben As System.Windows.Forms.RichTextBox
|
||||
End Class
|
||||
120
SDL/zoll/frmStatusFSSAtlas.resx
Normal file
120
SDL/zoll/frmStatusFSSAtlas.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
270
SDL/zoll/frmStatusFSSAtlas.vb
Normal file
270
SDL/zoll/frmStatusFSSAtlas.vb
Normal file
@@ -0,0 +1,270 @@
|
||||
Imports System.Threading
|
||||
Imports System.Security
|
||||
|
||||
Public Class frmStatusFSSAtlas
|
||||
' Public verarbeitungskennzeichen As String = ""
|
||||
Public artikel As List(Of cArtikel)
|
||||
Dim SQLZoll As New SQLZoll
|
||||
WithEvents Timer1 As New System.Windows.Forms.Timer
|
||||
Private Sub Panel1_Paint(sender As Object, e As PaintEventArgs) Handles Panel1.Paint
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmStatusFSSAtlas_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Timer1.Interval = 1000
|
||||
Timer1.Enabled = False
|
||||
End Sub
|
||||
|
||||
Private Sub frmStatusFSSAtlas_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
' frmAddArtikelATLAS.setStatus("TEST")
|
||||
Dim st As New Thread(AddressOf doWorkEinzeln)
|
||||
st.IsBackground = True
|
||||
st.Start()
|
||||
|
||||
End Sub
|
||||
Sub doWorkEinzeln()
|
||||
Me.BringToFront()
|
||||
Thread.Sleep(1000)
|
||||
Dim FSS As New cATLAS_FSS
|
||||
Dim SC As New cServerClient
|
||||
Dim boolSUB As Boolean = False
|
||||
Dim boolSBG As Boolean = False
|
||||
Dim subOUT As String = ""
|
||||
Dim sbgOUT As String = ""
|
||||
|
||||
|
||||
Dim schnittstelleEinlesen As Boolean = True
|
||||
' Netzlaufwerk verbinden
|
||||
' Dim sDrive As String = "T:"
|
||||
' Dim NET As New cNetworkDrive
|
||||
Try
|
||||
'SUBEN
|
||||
|
||||
If frmAddArtikelATLAS.cbxSUB.Checked Then
|
||||
|
||||
' Try
|
||||
'System.Diagnostics.Process.Start("net use t: " & FSS.serverpath_SUB & " /user:VERAGOST\Administrator BmWr501956")
|
||||
' Catch ex As Exception
|
||||
'MsgBox(ex.Message)
|
||||
' End Try
|
||||
|
||||
|
||||
|
||||
' System.Diagnostics.Process.Start("\\192.168.133.98\G\atlas\atlas\", "Administrator", securePwd, "VERAGSBG")
|
||||
' If Not NET.AddNetworkDrive(sDrive, FSS.serverpath_SUB, "VERASGOST\Administrator", "BmWr501956") Then MsgBox("FEHLER beim Verbinden mit dem Netzwerklaufwerk ATLAS-SUB") : Exit Sub
|
||||
' Netzlaufwerk verbinden
|
||||
|
||||
' If NET.MapDrive(sDrive, FSS.serverpath_SUB) = True Then
|
||||
' MsgBox("Laufwerk verbunden (" & sDrive & ")")
|
||||
'End If
|
||||
|
||||
txtSuben.Text = ""
|
||||
setVisible(lblStat_1, True)
|
||||
setVisible(picStat_1, True)
|
||||
For Each a In artikel
|
||||
a.tmp_rueckgabeFileSUB = FSS.sendArtikelToATLAS("SUB", a)
|
||||
|
||||
If a.tmp_rueckgabeFileSUB = "" Then
|
||||
setVisible(lblStat_ERROR, True)
|
||||
Exit Sub
|
||||
ElseIf a.tmp_rueckgabeFileSUB.Contains("ERROR") Then
|
||||
setVisible(lblStat_ERROR, True)
|
||||
End If
|
||||
Next
|
||||
setVisible(lblStat_2, True)
|
||||
setVisible(picStat_2, True)
|
||||
setVisible(lblStat_3, True)
|
||||
setVisible(picStat_3, True)
|
||||
|
||||
If schnittstelleEinlesen Then
|
||||
SC.begin("192.168.0.95", "FSSAtlasStart") '192.168.0.95 = atlas suben
|
||||
setVisible(lblStat_4, True)
|
||||
setVisible(picStat_4, True)
|
||||
|
||||
SC.waitTillFinished()
|
||||
Thread.Sleep(1000)
|
||||
|
||||
If SC.status = "TaskSuccess" Then
|
||||
' MsgBox("OK" & vbNewLine & ev.Message)
|
||||
setVisible(lblStat_5, True)
|
||||
setVisible(picStat_5, True)
|
||||
|
||||
For Each a In artikel
|
||||
Try : a.tmp_rueckgabetextSUB = System.IO.File.ReadAllText(a.tmp_rueckgabeFileSUB)
|
||||
Catch ex As Exception
|
||||
a.tmp_rueckgabetextSUB = ex.Message
|
||||
End Try
|
||||
a.tmp_rueckgabeSUB = EinarbeitungSuccessful(a.tmp_rueckgabetextSUB)
|
||||
txtSuben.Text &= "<b>" & a.tmp_rueckgabeFileSUB & "</b>" & vbNewLine & vbNewLine & a.tmp_rueckgabetextSUB & vbNewLine & vbNewLine
|
||||
If a.tmp_rueckgabeSUB Then
|
||||
SQLZoll.setStatusArtikel(a.zollArt_id, "ATLAS OK")
|
||||
Else
|
||||
SQLZoll.setStatusArtikel(a.zollArt_id, "ATLAS ERR")
|
||||
End If
|
||||
Next
|
||||
Else
|
||||
setVisible(lblStat_ERROR, True)
|
||||
' MsgBox(SC.ev.Message)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
'AddHandler SC.FunctionFinished, Sub(se As Object, ev As FunctionFinishedArgs)
|
||||
'If ev.Result = FunctionFinishedArgs.EventResult.OK Then
|
||||
'lblStat_5, True)
|
||||
'picStat_5, True)
|
||||
'Else
|
||||
'lblStat_ERROR, True)
|
||||
' MsgBox(ev.Message)
|
||||
' Exit Sub
|
||||
' End If
|
||||
'End Sub
|
||||
setVisible(lblStat_6, True) ' noch keine Function
|
||||
setVisible(picStat_6, True)
|
||||
' boolSUB = True
|
||||
' NET.RemoveNetworkDrive(sDrive)
|
||||
Else
|
||||
txtSuben.Text = "Einarbeitung SUBEN deaktiviert."
|
||||
End If
|
||||
|
||||
'SALZBURG
|
||||
If frmAddArtikelATLAS.cbxSBG.Checked Then
|
||||
|
||||
' System.Diagnostics.Process.Start("net use t: " & FSS.serverpath_SBG & " /user:VERAGSBG\Administrator wassermann")
|
||||
|
||||
|
||||
' If Not NET.AddNetworkDrive(sDrive, FSS.serverpath_SBG, "veragsbg\Administrator", "wassermann") Then MsgBox("FEHLER beim Verbinden mit dem Netzwerklaufwerk ATLAS-SBG") : Exit Sub
|
||||
txtSalzburg.Text = ""
|
||||
For Each a In artikel
|
||||
a.tmp_rueckgabeFileSBG = FSS.sendArtikelToATLAS("SBG", a)
|
||||
If a.tmp_rueckgabeFileSBG = "" Then
|
||||
setVisible(lblStat_ERROR, True)
|
||||
Exit Sub
|
||||
ElseIf a.tmp_rueckgabeFileSBG.Contains("ERROR") Then
|
||||
setVisible(lblStat_ERROR, True)
|
||||
End If
|
||||
Next
|
||||
setVisible(lblStat_7, True)
|
||||
setVisible(picStat_7, True)
|
||||
setVisible(lblStat_8, True)
|
||||
setVisible(picStat_8, True)
|
||||
|
||||
If schnittstelleEinlesen Then
|
||||
SC.begin("192.168.133.98", "FSSAtlasStart") '192.168.0.95 = atlas suben
|
||||
setVisible(lblStat_9, True)
|
||||
setVisible(picStat_9, True)
|
||||
|
||||
SC.waitTillFinished()
|
||||
Thread.Sleep(1000)
|
||||
If SC.status = "TaskSuccess" Then
|
||||
' MsgBox("OK" & vbNewLine & ev.Message)
|
||||
setVisible(lblStat_10, True)
|
||||
setVisible(picStat_10, True)
|
||||
|
||||
For Each a In artikel
|
||||
Try : a.tmp_rueckgabetextSBG = System.IO.File.ReadAllText(a.tmp_rueckgabeFileSBG)
|
||||
Catch ex As Exception
|
||||
a.tmp_rueckgabetextSBG = ex.Message
|
||||
End Try
|
||||
a.tmp_rueckgabeSBG = EinarbeitungSuccessful(a.tmp_rueckgabetextSBG)
|
||||
txtSalzburg.Text &= "<b>" & a.tmp_rueckgabeFileSBG & "</b>" & vbNewLine & vbNewLine & a.tmp_rueckgabetextSBG & vbNewLine & vbNewLine
|
||||
If a.tmp_rueckgabeSBG Then
|
||||
SQLZoll.setStatusArtikel(a.zollArt_id, "ATLAS OK")
|
||||
Else
|
||||
SQLZoll.setStatusArtikel(a.zollArt_id, "ATLAS ERR")
|
||||
End If
|
||||
Next
|
||||
Else
|
||||
setVisible(lblStat_ERROR, True)
|
||||
' MsgBox(SC.ev.Message)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
End If
|
||||
' AddHandler SC.FunctionFinished, Sub(se As Object, ev As FunctionFinishedArgs)
|
||||
'If ev.Result = FunctionFinishedArgs.EventResult.OK Then
|
||||
'lblStat_10, True)
|
||||
' picStat_10, True)
|
||||
' Else
|
||||
' lblStat_ERROR, True)
|
||||
' MsgBox(ev.Message)
|
||||
' Exit Sub
|
||||
' End If
|
||||
' End Sub
|
||||
setVisible(lblStat_11, True) ' noch keine Function
|
||||
setVisible(picStat_11, True)
|
||||
'boolSBG = True
|
||||
' NET.RemoveNetworkDrive(sDrive)
|
||||
Else
|
||||
txtSalzburg.Text = "Einarbeitung SALZBURG deaktiviert."
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
If checkErrors(artikel, frmAddArtikelATLAS.cbxSUB.Checked, frmAddArtikelATLAS.cbxSBG.Checked) Then ' Fehler aufgetreten?
|
||||
setVisible(lblStat_FERTIG, True)
|
||||
setVisible(lblStat_Uebertragen, True)
|
||||
Timer1.Enabled = True
|
||||
' frmAddArtikelATLAS.setStatus("ATLAS OK")
|
||||
Else
|
||||
' frmAddArtikelATLAS.setStatus("ATLAS ERR")
|
||||
setVisible(lblStat_ERROR, True)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Function checkErrors(ByVal artikel As List(Of cArtikel), ByVal suben As Boolean, ByVal sbg As Boolean) As Boolean
|
||||
For Each a In artikel
|
||||
If suben And Not a.tmp_rueckgabeSUB Then Return False
|
||||
If sbg And Not a.tmp_rueckgabeSBG Then Return False
|
||||
Next
|
||||
Return True
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
'threadsicherer Aufruf
|
||||
Delegate Sub setStatusCallback(s As String)
|
||||
Private Sub setStatus(s As String)
|
||||
If Me.InvokeRequired Then
|
||||
Dim d As New setStatusCallback(AddressOf setStatus)
|
||||
Me.Invoke(d, New Object() {s})
|
||||
Else
|
||||
frmAddArtikelATLAS.lblStatus.Text = s
|
||||
frmAddArtikelATLAS.btnSave.PerformClick()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Function EinarbeitungSuccessful(txt As String) As Boolean
|
||||
If txt.Contains("BAR-Nachricht fehlerfrei eingearbeitet") Then Return True
|
||||
If txt.Contains("BAR-Nachricht mit") And txt.Contains("Warnungen eingearbeitet") Then Return True
|
||||
Return False
|
||||
End Function
|
||||
|
||||
|
||||
'threadsicherer Aufruf
|
||||
Delegate Sub setVisibleCallback(o As Object, visible As Boolean)
|
||||
Private Sub setVisible(o As Object, visible As Boolean)
|
||||
If Me.InvokeRequired Then
|
||||
Dim d As New setVisibleCallback(AddressOf setVisible)
|
||||
Me.Invoke(d, New Object() {o, visible})
|
||||
Else
|
||||
o.visible = visible
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
|
||||
lblStat_Uebertragen.Visible = False
|
||||
End Sub
|
||||
|
||||
Private Sub FlatButton1_Click(sender As Object, e As EventArgs) Handles FlatButton1.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
End Class
|
||||
37
SDL/zoll/frmZollBrgBuchungenFremd.Designer.vb
generated
Normal file
37
SDL/zoll/frmZollBrgBuchungenFremd.Designer.vb
generated
Normal file
@@ -0,0 +1,37 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmZollBrgBuchungenFremd
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'frmZollBrgBuchungenFremd
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1128, 658)
|
||||
Me.Name = "frmZollBrgBuchungenFremd"
|
||||
Me.Text = "Brg-Buchungen Fremd"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
120
SDL/zoll/frmZollBrgBuchungenFremd.resx
Normal file
120
SDL/zoll/frmZollBrgBuchungenFremd.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
3
SDL/zoll/frmZollBrgBuchungenFremd.vb
Normal file
3
SDL/zoll/frmZollBrgBuchungenFremd.vb
Normal file
@@ -0,0 +1,3 @@
|
||||
Public Class frmZollBrgBuchungenFremd
|
||||
|
||||
End Class
|
||||
122
SDL/zoll/frmZolltarif.Designer.vb
generated
Normal file
122
SDL/zoll/frmZolltarif.Designer.vb
generated
Normal file
@@ -0,0 +1,122 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmZolltarif
|
||||
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(frmZolltarif))
|
||||
Me.DataGridView1 = New System.Windows.Forms.DataGridView()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'DataGridView1
|
||||
'
|
||||
Me.DataGridView1.AllowUserToAddRows = False
|
||||
Me.DataGridView1.AllowUserToDeleteRows = False
|
||||
Me.DataGridView1.AllowUserToOrderColumns = True
|
||||
Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView1.Location = New System.Drawing.Point(12, 33)
|
||||
Me.DataGridView1.Name = "DataGridView1"
|
||||
Me.DataGridView1.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.DataGridView1.Size = New System.Drawing.Size(929, 503)
|
||||
Me.DataGridView1.TabIndex = 0
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Location = New System.Drawing.Point(93, 4)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(113, 23)
|
||||
Me.Button1.TabIndex = 1
|
||||
Me.Button1.Text = "Anfang"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Location = New System.Drawing.Point(12, 4)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(75, 23)
|
||||
Me.Button2.TabIndex = 1
|
||||
Me.Button2.Text = "<< Zurück"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(676, 4)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Label1.TabIndex = 2
|
||||
Me.Label1.Text = "Label1"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(798, 4)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Label2.TabIndex = 2
|
||||
Me.Label2.Text = "Label1"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.Location = New System.Drawing.Point(244, 9)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(48, 13)
|
||||
Me.Label3.TabIndex = 3
|
||||
Me.Label3.Text = "START"
|
||||
'
|
||||
'frmZolltarif
|
||||
'
|
||||
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(953, 548)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.Button2)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Controls.Add(Me.DataGridView1)
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmZolltarif"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Zolltarif"
|
||||
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents DataGridView1 As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
End Class
|
||||
980
SDL/zoll/frmZolltarif.resx
Normal file
980
SDL/zoll/frmZolltarif.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>
|
||||
94
SDL/zoll/frmZolltarif.vb
Normal file
94
SDL/zoll/frmZolltarif.vb
Normal file
@@ -0,0 +1,94 @@
|
||||
|
||||
Public Class frmZolltarif
|
||||
|
||||
Dim HISTORY As New List(Of String)
|
||||
|
||||
Private Sub frmZolltarif_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
resetDGV()
|
||||
|
||||
End Sub
|
||||
|
||||
Sub resetDGV()
|
||||
Dim sql = "SELECT substring([ezttxt_code],0,3) as kapitel,[ezttxt_code],[ezttxt_hirnr],[ezttxt_cdesid],[ezttxt_datbeg],[ezttxt_datend],[ezttxt_txtart],[ezttxt_text] " &
|
||||
" FROM [atlas].[dbo].[ezttxt] " &
|
||||
" where [ezttxt_datend] > getdate() " &
|
||||
" and [ezttxt_code] like '%000000000' order by [ezttxt_code],[ezttxt_datend]"
|
||||
initDGV(sql)
|
||||
HISTORY = New List(Of String)
|
||||
HISTORY.Add(sql)
|
||||
End Sub
|
||||
Private Sub DataGridView1_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick
|
||||
' MsgBox(DataGridView1.Rows(e.RowIndex).Cells("ezttxt_hirnr").Value().ToString)
|
||||
If Not DataGridView1.Rows(e.RowIndex).Cells("ezttxt_txtart").Value().ToString = "H" Then Exit Sub
|
||||
|
||||
Dim code As String = DataGridView1.Rows(e.RowIndex).Cells("ezttxt_code").Value().ToString
|
||||
Dim hirNr As Integer = CInt(DataGridView1.Rows(e.RowIndex).Cells("ezttxt_hirnr").Value().ToString) + 1
|
||||
Dim zeros As String = ""
|
||||
' MsgBox(code)
|
||||
While code.ToString.EndsWith("0")
|
||||
code = code.Substring(0, code.Length - 1)
|
||||
zeros &= "0"
|
||||
End While
|
||||
If code = "" Then Exit Sub
|
||||
Dim tmpFrom = code & zeros
|
||||
Dim tmpTo = (CInt(code) + 1) & zeros
|
||||
|
||||
Label1.Text = tmpFrom
|
||||
Label2.Text = tmpTo
|
||||
Label3.Text = DataGridView1.Rows(e.RowIndex).Cells("ezttxt_text").Value().ToString
|
||||
|
||||
Dim sql = "SELECT substring([ezttxt_code],0,3) as kapitel,[ezttxt_code],[ezttxt_hirnr],[ezttxt_cdesid],[ezttxt_datbeg],[ezttxt_datend],[ezttxt_txtart],[ezttxt_text] " &
|
||||
" FROM [atlas].[dbo].[ezttxt] " &
|
||||
" where [ezttxt_datend] > getdate() " &
|
||||
" and convert(bigint,ezttxt_code ) > '" & tmpFrom & "' and convert(bigint,ezttxt_code ) < '" & tmpTo & "' and ezttxt_hirnr<=" & hirNr & " order by [ezttxt_code],[ezttxt_datend]"
|
||||
initDGV(sql)
|
||||
End Sub
|
||||
|
||||
Sub initDGV(sql)
|
||||
With DataGridView1
|
||||
.DataSource = (New SQL).loadDgvBySql(sql, "ATLAS")
|
||||
HISTORY.Add(sql)
|
||||
|
||||
.Columns("ezttxt_cdesid").Visible = False
|
||||
.Columns("ezttxt_datbeg").Visible = False
|
||||
.Columns("ezttxt_datend").Visible = False
|
||||
.Columns("ezttxt_txtart").Visible = False
|
||||
|
||||
.Columns("ezttxt_hirnr").Visible = False
|
||||
.Columns("ezttxt_hirnr").Visible = False
|
||||
|
||||
|
||||
.Columns("kapitel").HeaderText = "Kapitel"
|
||||
.Columns("kapitel").MinimumWidth = 100
|
||||
|
||||
.Columns("ezttxt_text").HeaderText = "Text"
|
||||
.Columns("ezttxt_text").MinimumWidth = 300
|
||||
.Columns("ezttxt_text").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
If False Then
|
||||
|
||||
For Each r As DataGridViewRow In .Rows
|
||||
If r.Cells("ezttxt_txtart").Value <> "H" Then
|
||||
' r.DefaultCellStyle.Font = New Font(Me.Font.FontFamily, Me.Font.Size, FontStyle.Italic)
|
||||
Else
|
||||
r.DefaultCellStyle.Font = New Font(Me.Font.FontFamily, Me.Font.Size, FontStyle.Bold)
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
End With
|
||||
|
||||
End Sub
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
resetDGV()
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
If HISTORY.Count > 1 Then
|
||||
HISTORY.RemoveAt(HISTORY.Count - 1)
|
||||
initDGV(HISTORY(HISTORY.Count - 1))
|
||||
Else
|
||||
resetDGV()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
690
SDL/zoll/rptAbgabenliste.Designer.vb
generated
Normal file
690
SDL/zoll/rptAbgabenliste.Designer.vb
generated
Normal file
@@ -0,0 +1,690 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Public Class rptAbgabenliste
|
||||
Inherits GrapeCity.ActiveReports.SectionReport
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'NOTE: The following procedure is required by the ActiveReports Designer
|
||||
'It can be modified using the ActiveReports Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Private WithEvents PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader
|
||||
Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptAbgabenliste))
|
||||
Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader()
|
||||
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
|
||||
Me.lblRegNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblAbfDatum = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblBezNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblArt = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblBetrag = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
|
||||
Me.Label28 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line2 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.ReportInfo2 = New GrapeCity.ActiveReports.SectionReportModel.ReportInfo()
|
||||
Me.lblDat = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader()
|
||||
Me.picVERAG = New GrapeCity.ActiveReports.SectionReportModel.Picture()
|
||||
Me.Label3 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblSachbearbeiter = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblFilterTxt = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.txtFilter = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
|
||||
Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
|
||||
Me.Label10 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesGesSumAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line8 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.Line9 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.Label9 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesgesSumRe = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
|
||||
Me.lblFiskalvertretung = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
|
||||
Me.Line1 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.lblGesSumTxt = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line6 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.lblGesSumRe = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label1 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesSumAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupHeader4 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
|
||||
Me.Label11 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label5 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label4 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label8 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label6 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line4 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.GroupFooter4 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
|
||||
Me.lblEingabeDat = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblFaelligkeitsDatum = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblKontoFilter = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
CType(Me.lblRegNr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblAbfDatum, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblBezNr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblArt, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblBetrag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label28, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblDat, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFilterTxt, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtFilter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label10, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesGesSumAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label9, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesgesSumRe, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFiskalvertretung, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumTxt, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumRe, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label11, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label8, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label6, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblEingabeDat, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFaelligkeitsDatum, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblKontoFilter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
'
|
||||
'PageHeader
|
||||
'
|
||||
Me.PageHeader.Height = 0.0!
|
||||
Me.PageHeader.Name = "PageHeader"
|
||||
'
|
||||
'Detail
|
||||
'
|
||||
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblRegNr, Me.lblAbfDatum, Me.lblBezNr, Me.lblArt, Me.lblBetrag})
|
||||
Me.Detail.Height = 0.1574804!
|
||||
Me.Detail.KeepTogether = True
|
||||
Me.Detail.Name = "Detail"
|
||||
'
|
||||
'lblRegNr
|
||||
'
|
||||
Me.lblRegNr.Height = 0.1574803!
|
||||
Me.lblRegNr.HyperLink = Nothing
|
||||
Me.lblRegNr.Left = 0.7141733!
|
||||
Me.lblRegNr.Name = "lblRegNr"
|
||||
Me.lblRegNr.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblRegNr.Text = "ATC400018080520177701"
|
||||
Me.lblRegNr.Top = 0.0!
|
||||
Me.lblRegNr.Width = 2.038976!
|
||||
'
|
||||
'lblAbfDatum
|
||||
'
|
||||
Me.lblAbfDatum.Height = 0.1574803!
|
||||
Me.lblAbfDatum.HyperLink = Nothing
|
||||
Me.lblAbfDatum.Left = 0.01417324!
|
||||
Me.lblAbfDatum.Name = "lblAbfDatum"
|
||||
Me.lblAbfDatum.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
|
||||
Me.lblAbfDatum.Text = "01.01.2017"
|
||||
Me.lblAbfDatum.Top = 0.0!
|
||||
Me.lblAbfDatum.Width = 0.693307!
|
||||
'
|
||||
'lblBezNr
|
||||
'
|
||||
Me.lblBezNr.Height = 0.1574803!
|
||||
Me.lblBezNr.HyperLink = Nothing
|
||||
Me.lblBezNr.Left = 2.75315!
|
||||
Me.lblBezNr.Name = "lblBezNr"
|
||||
Me.lblBezNr.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblBezNr.Text = "4803/18000000/AAAA"
|
||||
Me.lblBezNr.Top = 0.0!
|
||||
Me.lblBezNr.Width = 1.966142!
|
||||
'
|
||||
'lblArt
|
||||
'
|
||||
Me.lblArt.Height = 0.1574803!
|
||||
Me.lblArt.HyperLink = Nothing
|
||||
Me.lblArt.Left = 4.719292!
|
||||
Me.lblArt.Name = "lblArt"
|
||||
Me.lblArt.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblArt.Text = "B0000"
|
||||
Me.lblArt.Top = 0.0!
|
||||
Me.lblArt.Width = 1.196457!
|
||||
'
|
||||
'lblBetrag
|
||||
'
|
||||
Me.lblBetrag.Height = 0.1574803!
|
||||
Me.lblBetrag.HyperLink = Nothing
|
||||
Me.lblBetrag.Left = 5.915749!
|
||||
Me.lblBetrag.Name = "lblBetrag"
|
||||
Me.lblBetrag.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
|
||||
Me.lblBetrag.Text = "EUSt-Wert <20>"
|
||||
Me.lblBetrag.Top = 0.0!
|
||||
Me.lblBetrag.Width = 1.554331!
|
||||
'
|
||||
'PageFooter
|
||||
'
|
||||
Me.PageFooter.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label28, Me.Line2, Me.ReportInfo2, Me.lblDat})
|
||||
Me.PageFooter.Name = "PageFooter"
|
||||
'
|
||||
'Label28
|
||||
'
|
||||
Me.Label28.Height = 0.1330709!
|
||||
Me.Label28.HyperLink = Nothing
|
||||
Me.Label28.Left = 2.451181!
|
||||
Me.Label28.Name = "Label28"
|
||||
Me.Label28.Style = "font-size: 8pt; font-weight: bold; text-align: center; ddo-char-set: 1"
|
||||
Me.Label28.Text = "VERAG Spediton AG"
|
||||
Me.Label28.Top = 0.08622044!
|
||||
Me.Label28.Width = 2.581103!
|
||||
'
|
||||
'Line2
|
||||
'
|
||||
Me.Line2.Height = 0.0!
|
||||
Me.Line2.Left = 0.0!
|
||||
Me.Line2.LineWeight = 1.0!
|
||||
Me.Line2.Name = "Line2"
|
||||
Me.Line2.Top = 0.03070864!
|
||||
Me.Line2.Width = 7.480313!
|
||||
Me.Line2.X1 = 0.0!
|
||||
Me.Line2.X2 = 7.480313!
|
||||
Me.Line2.Y1 = 0.03070864!
|
||||
Me.Line2.Y2 = 0.03070864!
|
||||
'
|
||||
'ReportInfo2
|
||||
'
|
||||
Me.ReportInfo2.FormatString = "Seite {PageNumber} von {PageCount} Seiten "
|
||||
Me.ReportInfo2.Height = 0.1330709!
|
||||
Me.ReportInfo2.Left = 5.032284!
|
||||
Me.ReportInfo2.Name = "ReportInfo2"
|
||||
Me.ReportInfo2.Style = "font-size: 8pt; text-align: right"
|
||||
Me.ReportInfo2.Top = 0.08622048!
|
||||
Me.ReportInfo2.Width = 2.44296!
|
||||
'
|
||||
'lblDat
|
||||
'
|
||||
Me.lblDat.Height = 0.1330709!
|
||||
Me.lblDat.HyperLink = Nothing
|
||||
Me.lblDat.Left = 0.01023622!
|
||||
Me.lblDat.Name = "lblDat"
|
||||
Me.lblDat.Style = "font-size: 8pt; text-align: left"
|
||||
Me.lblDat.Text = "Mittwoch, 02.11.2016"
|
||||
Me.lblDat.Top = 0.08622044!
|
||||
Me.lblDat.Width = 2.440945!
|
||||
'
|
||||
'ReportHeader1
|
||||
'
|
||||
Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.picVERAG, Me.Label3, Me.lblUeberschrift, Me.lblSachbearbeiter, Me.lblFilterTxt, Me.txtFilter})
|
||||
Me.ReportHeader1.Height = 0.844882!
|
||||
Me.ReportHeader1.Name = "ReportHeader1"
|
||||
'
|
||||
'picVERAG
|
||||
'
|
||||
Me.picVERAG.Height = 0.4169292!
|
||||
Me.picVERAG.HyperLink = Nothing
|
||||
Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
|
||||
Me.picVERAG.Left = 5.281889!
|
||||
Me.picVERAG.Name = "picVERAG"
|
||||
Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
||||
Me.picVERAG.Top = 0.0!
|
||||
Me.picVERAG.Width = 2.198425!
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Height = 0.1759842!
|
||||
Me.Label3.HyperLink = Nothing
|
||||
Me.Label3.Left = 5.032284!
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Style = "font-size: 8pt; font-weight: normal; text-align: right; vertical-align: middle; d" & _
|
||||
"do-char-set: 1"
|
||||
Me.Label3.Text = "Sachbearbeiter:"
|
||||
Me.Label3.Top = 0.5208662!
|
||||
Me.Label3.Width = 1.19685!
|
||||
'
|
||||
'lblUeberschrift
|
||||
'
|
||||
Me.lblUeberschrift.Height = 0.2311024!
|
||||
Me.lblUeberschrift.HyperLink = Nothing
|
||||
Me.lblUeberschrift.Left = 0.01023622!
|
||||
Me.lblUeberschrift.Name = "lblUeberschrift"
|
||||
Me.lblUeberschrift.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblUeberschrift.Text = "Abgabenliste 01.10.2016 bis 31.10.2016"
|
||||
Me.lblUeberschrift.Top = 0.1858268!
|
||||
Me.lblUeberschrift.Width = 4.357087!
|
||||
'
|
||||
'lblSachbearbeiter
|
||||
'
|
||||
Me.lblSachbearbeiter.Height = 0.1759843!
|
||||
Me.lblSachbearbeiter.HyperLink = Nothing
|
||||
Me.lblSachbearbeiter.Left = 5.032284!
|
||||
Me.lblSachbearbeiter.Name = "lblSachbearbeiter"
|
||||
Me.lblSachbearbeiter.Style = "font-size: 8pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" & _
|
||||
"-char-set: 1"
|
||||
Me.lblSachbearbeiter.Text = "Hanslmayr Hubert"
|
||||
Me.lblSachbearbeiter.Top = 0.5208662!
|
||||
Me.lblSachbearbeiter.Width = 2.448031!
|
||||
'
|
||||
'lblFilterTxt
|
||||
'
|
||||
Me.lblFilterTxt.Height = 0.1377953!
|
||||
Me.lblFilterTxt.HyperLink = Nothing
|
||||
Me.lblFilterTxt.Left = 0.01023626!
|
||||
Me.lblFilterTxt.Name = "lblFilterTxt"
|
||||
Me.lblFilterTxt.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
|
||||
Me.lblFilterTxt.Text = "Filter:"
|
||||
Me.lblFilterTxt.Top = 0.5590551!
|
||||
Me.lblFilterTxt.Visible = False
|
||||
Me.lblFilterTxt.Width = 4.312599!
|
||||
'
|
||||
'txtFilter
|
||||
'
|
||||
Me.txtFilter.CanShrink = True
|
||||
Me.txtFilter.Height = 0.1480315!
|
||||
Me.txtFilter.Left = 0.0!
|
||||
Me.txtFilter.Name = "txtFilter"
|
||||
Me.txtFilter.Style = "font-size: 8pt; ddo-char-set: 1"
|
||||
Me.txtFilter.Text = "-"
|
||||
Me.txtFilter.Top = 0.6968505!
|
||||
Me.txtFilter.Visible = False
|
||||
Me.txtFilter.Width = 7.480316!
|
||||
'
|
||||
'ReportFooter1
|
||||
'
|
||||
Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label10, Me.lblGesGesSumAnzahl, Me.Line8, Me.Line9, Me.Label9, Me.lblGesgesSumRe})
|
||||
Me.ReportFooter1.Height = 0.5988846!
|
||||
Me.ReportFooter1.KeepTogether = True
|
||||
Me.ReportFooter1.Name = "ReportFooter1"
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.Height = 0.1574803!
|
||||
Me.Label10.HyperLink = Nothing
|
||||
Me.Label10.Left = 0.361811!
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label10.Text = " Abfertigungen"
|
||||
Me.Label10.Top = 0.4413386!
|
||||
Me.Label10.Width = 1.266142!
|
||||
'
|
||||
'lblGesGesSumAnzahl
|
||||
'
|
||||
Me.lblGesGesSumAnzahl.Height = 0.1574803!
|
||||
Me.lblGesGesSumAnzahl.HyperLink = Nothing
|
||||
Me.lblGesGesSumAnzahl.Left = 0.003937008!
|
||||
Me.lblGesGesSumAnzahl.Name = "lblGesGesSumAnzahl"
|
||||
Me.lblGesGesSumAnzahl.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.lblGesGesSumAnzahl.Text = "0000"
|
||||
Me.lblGesGesSumAnzahl.Top = 0.4413386!
|
||||
Me.lblGesGesSumAnzahl.Width = 0.3606307!
|
||||
'
|
||||
'Line8
|
||||
'
|
||||
Me.Line8.Height = 0.0!
|
||||
Me.Line8.Left = 0.00393627!
|
||||
Me.Line8.LineWeight = 2.0!
|
||||
Me.Line8.Name = "Line8"
|
||||
Me.Line8.Top = 0.2343176!
|
||||
Me.Line8.Width = 7.475195!
|
||||
Me.Line8.X1 = 0.00393627!
|
||||
Me.Line8.X2 = 7.479131!
|
||||
Me.Line8.Y1 = 0.2343176!
|
||||
Me.Line8.Y2 = 0.2343176!
|
||||
'
|
||||
'Line9
|
||||
'
|
||||
Me.Line9.Height = 0.0!
|
||||
Me.Line9.Left = 0.002755167!
|
||||
Me.Line9.LineWeight = 2.0!
|
||||
Me.Line9.Name = "Line9"
|
||||
Me.Line9.Top = 0.1980972!
|
||||
Me.Line9.Width = 7.475194!
|
||||
Me.Line9.X1 = 0.002755167!
|
||||
Me.Line9.X2 = 7.477949!
|
||||
Me.Line9.Y1 = 0.1980972!
|
||||
Me.Line9.Y2 = 0.1980972!
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.Height = 0.1574803!
|
||||
Me.Label9.HyperLink = Nothing
|
||||
Me.Label9.Left = 0.007480315!
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label9.Text = "Gesamtsumme:"
|
||||
Me.Label9.Top = 0.2838583!
|
||||
Me.Label9.Width = 5.659056!
|
||||
'
|
||||
'lblGesgesSumRe
|
||||
'
|
||||
Me.lblGesgesSumRe.Height = 0.1574803!
|
||||
Me.lblGesgesSumRe.HyperLink = Nothing
|
||||
Me.lblGesgesSumRe.Left = 5.666536!
|
||||
Me.lblGesgesSumRe.Name = "lblGesgesSumRe"
|
||||
Me.lblGesgesSumRe.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblGesgesSumRe.Text = "Re.Betrag <20>"
|
||||
Me.lblGesgesSumRe.Top = 0.2838583!
|
||||
Me.lblGesgesSumRe.Width = 1.803544!
|
||||
'
|
||||
'GroupHeader1
|
||||
'
|
||||
Me.GroupHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblFiskalvertretung, Me.lblEingabeDat, Me.lblFaelligkeitsDatum, Me.lblKontoFilter})
|
||||
Me.GroupHeader1.GroupKeepTogether = GrapeCity.ActiveReports.SectionReportModel.GroupKeepTogether.FirstDetail
|
||||
Me.GroupHeader1.Height = 0.8421917!
|
||||
Me.GroupHeader1.Name = "GroupHeader1"
|
||||
'
|
||||
'lblFiskalvertretung
|
||||
'
|
||||
Me.lblFiskalvertretung.Height = 0.2275591!
|
||||
Me.lblFiskalvertretung.HyperLink = Nothing
|
||||
Me.lblFiskalvertretung.Left = 0.01023622!
|
||||
Me.lblFiskalvertretung.Name = "lblFiskalvertretung"
|
||||
Me.lblFiskalvertretung.Padding = New GrapeCity.ActiveReports.PaddingEx(5, 1, 0, 0)
|
||||
Me.lblFiskalvertretung.Style = "background-color: #002660; color: White; font-size: 12pt; font-weight: bold; text" & _
|
||||
"-align: left; vertical-align: top; ddo-char-set: 1"
|
||||
Me.lblFiskalvertretung.Text = "Fiskalvertretung - Belgien"
|
||||
Me.lblFiskalvertretung.Top = 0.06850394!
|
||||
Me.lblFiskalvertretung.Width = 7.475197!
|
||||
'
|
||||
'GroupFooter1
|
||||
'
|
||||
Me.GroupFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Line1, Me.lblGesSumTxt, Me.Line6, Me.lblGesSumRe, Me.Label1, Me.lblGesSumAnzahl})
|
||||
Me.GroupFooter1.Height = 0.6354166!
|
||||
Me.GroupFooter1.KeepTogether = True
|
||||
Me.GroupFooter1.Name = "GroupFooter1"
|
||||
'
|
||||
'Line1
|
||||
'
|
||||
Me.Line1.Height = 0.0!
|
||||
Me.Line1.Left = 0.0!
|
||||
Me.Line1.LineWeight = 1.0!
|
||||
Me.Line1.Name = "Line1"
|
||||
Me.Line1.Top = 0.0!
|
||||
Me.Line1.Width = 7.475197!
|
||||
Me.Line1.X1 = 0.0!
|
||||
Me.Line1.X2 = 7.475197!
|
||||
Me.Line1.Y1 = 0.0!
|
||||
Me.Line1.Y2 = 0.0!
|
||||
'
|
||||
'lblGesSumTxt
|
||||
'
|
||||
Me.lblGesSumTxt.Height = 0.1574803!
|
||||
Me.lblGesSumTxt.HyperLink = Nothing
|
||||
Me.lblGesSumTxt.Left = 0.0!
|
||||
Me.lblGesSumTxt.Name = "lblGesSumTxt"
|
||||
Me.lblGesSumTxt.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblGesSumTxt.Text = "Summe BE:"
|
||||
Me.lblGesSumTxt.Top = 0.02992126!
|
||||
Me.lblGesSumTxt.Width = 5.659056!
|
||||
'
|
||||
'Line6
|
||||
'
|
||||
Me.Line6.Height = 0.0!
|
||||
Me.Line6.Left = 0.01023622!
|
||||
Me.Line6.LineWeight = 6.0!
|
||||
Me.Line6.Name = "Line6"
|
||||
Me.Line6.Top = 0.0!
|
||||
Me.Line6.Width = 7.475196!
|
||||
Me.Line6.X1 = 0.01023622!
|
||||
Me.Line6.X2 = 7.485432!
|
||||
Me.Line6.Y1 = 0.0!
|
||||
Me.Line6.Y2 = 0.0!
|
||||
'
|
||||
'lblGesSumRe
|
||||
'
|
||||
Me.lblGesSumRe.Height = 0.1574803!
|
||||
Me.lblGesSumRe.HyperLink = Nothing
|
||||
Me.lblGesSumRe.Left = 5.666536!
|
||||
Me.lblGesSumRe.Name = "lblGesSumRe"
|
||||
Me.lblGesSumRe.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblGesSumRe.Text = "Re.Betrag <20>"
|
||||
Me.lblGesSumRe.Top = 0.02992126!
|
||||
Me.lblGesSumRe.Width = 1.803544!
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Height = 0.1574803!
|
||||
Me.Label1.HyperLink = Nothing
|
||||
Me.Label1.Left = 0.3720472!
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label1.Text = " Abfertigungen"
|
||||
Me.Label1.Top = 0.1874016!
|
||||
Me.Label1.Width = 1.266142!
|
||||
'
|
||||
'lblGesSumAnzahl
|
||||
'
|
||||
Me.lblGesSumAnzahl.Height = 0.1574803!
|
||||
Me.lblGesSumAnzahl.HyperLink = Nothing
|
||||
Me.lblGesSumAnzahl.Left = 0.01417327!
|
||||
Me.lblGesSumAnzahl.Name = "lblGesSumAnzahl"
|
||||
Me.lblGesSumAnzahl.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.lblGesSumAnzahl.Text = "0000"
|
||||
Me.lblGesSumAnzahl.Top = 0.1874016!
|
||||
Me.lblGesSumAnzahl.Width = 0.3606307!
|
||||
'
|
||||
'GroupHeader4
|
||||
'
|
||||
Me.GroupHeader4.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label11, Me.Label5, Me.Label4, Me.Label8, Me.Label6, Me.Line4})
|
||||
Me.GroupHeader4.Height = 0.2189305!
|
||||
Me.GroupHeader4.KeepTogether = True
|
||||
Me.GroupHeader4.Name = "GroupHeader4"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.Height = 0.1433071!
|
||||
Me.Label11.HyperLink = Nothing
|
||||
Me.Label11.Left = 4.719292!
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" & _
|
||||
"-set: 1"
|
||||
Me.Label11.Text = "Art"
|
||||
Me.Label11.Top = 0.06732284!
|
||||
Me.Label11.Width = 1.196457!
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.Height = 0.1433071!
|
||||
Me.Label5.HyperLink = Nothing
|
||||
Me.Label5.Left = 0.7074803!
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label5.Text = "Registriernummer"
|
||||
Me.Label5.Top = 0.06732279!
|
||||
Me.Label5.Width = 2.045669!
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.Height = 0.1433071!
|
||||
Me.Label4.HyperLink = Nothing
|
||||
Me.Label4.Left = 0.01417324!
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" & _
|
||||
"-set: 1"
|
||||
Me.Label4.Text = "Datum"
|
||||
Me.Label4.Top = 0.06732284!
|
||||
Me.Label4.Width = 0.6933072!
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.Height = 0.1433071!
|
||||
Me.Label8.HyperLink = Nothing
|
||||
Me.Label8.Left = 2.75315!
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" & _
|
||||
"-set: 1"
|
||||
Me.Label8.Text = "Bezugs-Nr"
|
||||
Me.Label8.Top = 0.06732284!
|
||||
Me.Label8.Width = 1.966142!
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.Height = 0.143307!
|
||||
Me.Label6.HyperLink = Nothing
|
||||
Me.Label6.Left = 5.915749!
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.Label6.Text = "Abgabenbetrag <20>"
|
||||
Me.Label6.Top = 0.06732284!
|
||||
Me.Label6.Width = 1.554331!
|
||||
'
|
||||
'Line4
|
||||
'
|
||||
Me.Line4.Height = 0.0!
|
||||
Me.Line4.Left = 0.005118111!
|
||||
Me.Line4.LineWeight = 1.0!
|
||||
Me.Line4.Name = "Line4"
|
||||
Me.Line4.Top = 0.2106299!
|
||||
Me.Line4.Width = 7.475195!
|
||||
Me.Line4.X1 = 0.005118111!
|
||||
Me.Line4.X2 = 7.480313!
|
||||
Me.Line4.Y1 = 0.2106299!
|
||||
Me.Line4.Y2 = 0.2106299!
|
||||
'
|
||||
'GroupFooter4
|
||||
'
|
||||
Me.GroupFooter4.Height = 0.0!
|
||||
Me.GroupFooter4.Name = "GroupFooter4"
|
||||
'
|
||||
'lblEingabeDat
|
||||
'
|
||||
Me.lblEingabeDat.Height = 0.2311024!
|
||||
Me.lblEingabeDat.HyperLink = Nothing
|
||||
Me.lblEingabeDat.Left = 0.01417323!
|
||||
Me.lblEingabeDat.Name = "lblEingabeDat"
|
||||
Me.lblEingabeDat.Style = "font-size: 10pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblEingabeDat.Text = "Eingabedatum: 01.10.2016 bis 31.10.2016"
|
||||
Me.lblEingabeDat.Top = 0.6110237!
|
||||
Me.lblEingabeDat.Width = 3.377953!
|
||||
'
|
||||
'lblFaelligkeitsDatum
|
||||
'
|
||||
Me.lblFaelligkeitsDatum.Height = 0.2311024!
|
||||
Me.lblFaelligkeitsDatum.HyperLink = Nothing
|
||||
Me.lblFaelligkeitsDatum.Left = 3.392126!
|
||||
Me.lblFaelligkeitsDatum.Name = "lblFaelligkeitsDatum"
|
||||
Me.lblFaelligkeitsDatum.Style = "font-size: 10pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblFaelligkeitsDatum.Text = "F<EFBFBD>lligkeitsdatum: 01.10.2016 bis 31.10.2016"
|
||||
Me.lblFaelligkeitsDatum.Top = 0.6110237!
|
||||
Me.lblFaelligkeitsDatum.Width = 3.377954!
|
||||
'
|
||||
'lblKontoFilter
|
||||
'
|
||||
Me.lblKontoFilter.Height = 0.2311024!
|
||||
Me.lblKontoFilter.HyperLink = Nothing
|
||||
Me.lblKontoFilter.Left = 0.01023626!
|
||||
Me.lblKontoFilter.Name = "lblKontoFilter"
|
||||
Me.lblKontoFilter.Style = "font-size: 10pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblKontoFilter.Text = "Konto: M00000"
|
||||
Me.lblKontoFilter.Top = 0.3799213!
|
||||
Me.lblKontoFilter.Width = 3.377954!
|
||||
'
|
||||
'rptAbgabenliste
|
||||
'
|
||||
Me.MasterReport = False
|
||||
Me.PageSettings.Margins.Bottom = 0.3937008!
|
||||
Me.PageSettings.Margins.Left = 0.3937008!
|
||||
Me.PageSettings.Margins.Right = 0.3937008!
|
||||
Me.PageSettings.Margins.Top = 0.3937008!
|
||||
Me.PageSettings.PaperHeight = 11.0!
|
||||
Me.PageSettings.PaperWidth = 8.5!
|
||||
Me.PrintWidth = 7.480315!
|
||||
Me.Sections.Add(Me.ReportHeader1)
|
||||
Me.Sections.Add(Me.PageHeader)
|
||||
Me.Sections.Add(Me.GroupHeader1)
|
||||
Me.Sections.Add(Me.GroupHeader4)
|
||||
Me.Sections.Add(Me.Detail)
|
||||
Me.Sections.Add(Me.GroupFooter4)
|
||||
Me.Sections.Add(Me.GroupFooter1)
|
||||
Me.Sections.Add(Me.PageFooter)
|
||||
Me.Sections.Add(Me.ReportFooter1)
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & _
|
||||
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & _
|
||||
"lic", "Heading2", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
|
||||
CType(Me.lblRegNr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblAbfDatum, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblBezNr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblArt, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblBetrag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label28, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblDat, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFilterTxt, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtFilter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label10, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesGesSumAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label9, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesgesSumRe, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFiskalvertretung, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumTxt, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumRe, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label11, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label8, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label6, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblEingabeDat, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFaelligkeitsDatum, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblKontoFilter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
|
||||
End Sub
|
||||
Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
|
||||
Private WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture
|
||||
Private WithEvents Label3 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Line2 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
|
||||
Public WithEvents lblUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblSachbearbeiter As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents Label28 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents ReportInfo2 As GrapeCity.ActiveReports.SectionReportModel.ReportInfo
|
||||
Public WithEvents lblDat As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
|
||||
Public WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
|
||||
Public WithEvents lblRegNr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFiskalvertretung As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFilterTxt As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents txtFilter As GrapeCity.ActiveReports.SectionReportModel.TextBox
|
||||
Public WithEvents lblAbfDatum As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblBezNr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents Line1 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents lblGesSumTxt As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Line6 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Label10 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Line8 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Line9 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
|
||||
Public WithEvents lblGesGesSumAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents GroupHeader4 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
|
||||
Private WithEvents Line4 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Label6 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label8 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label4 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label5 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents GroupFooter4 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
|
||||
Private WithEvents Label11 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label9 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblArt As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblBetrag As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesSumRe As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesgesSumRe As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label1 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesSumAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblEingabeDat As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFaelligkeitsDatum As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblKontoFilter As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
End Class
|
||||
752
SDL/zoll/rptAbgabenliste.resx
Normal file
752
SDL/zoll/rptAbgabenliste.resx
Normal file
@@ -0,0 +1,752 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="picVERAG.ImageData" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAEAQAAABZTeXN0ZW0uSU8uTWVtb3J5U3RyZWFtCgAAAAdfYnVmZmVyB19v
|
||||
cmlnaW4JX3Bvc2l0aW9uB19sZW5ndGgJX2NhcGFjaXR5C19leHBhbmRhYmxlCV93cml0YWJsZQpfZXhw
|
||||
b3NhYmxlB19pc09wZW4dTWFyc2hhbEJ5UmVmT2JqZWN0K19faWRlbnRpdHkHAAAAAAAAAAACAggICAgB
|
||||
AQEBCQIAAAAAAAAAAAAAAL6QAAC+kAAAAQEBAQoPAgAAAL6QAAACArmQAACJUE5HDQoaCgAAAA1JSERS
|
||||
AAAIMAAAAZIIBgAAAB9io5MAAAABc1JHQgCuzhzpAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29mdHdh
|
||||
cmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAJA+SURBVHhe7d0HlG1Fte7xAxwySBCQJKKgIgZA4YgBxQDy
|
||||
RL2IiBgwBwxgzuEeFRUTIiYQUdRWQVExY0LMIEowICiioEgUBBGQdN832Rx3r95fd6/urqq9wt8xfuON
|
||||
V5fTVWuuqtp7r5qratH//d//AQAAAAAAAAAAAAAAjJUtBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAA
|
||||
lGQLAQAAAAAAAAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABA
|
||||
SbYQAAAAAAAAAAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACU
|
||||
ZAsBAAAAAAAAAAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJ
|
||||
thAAAAAAAAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRk
|
||||
CwEAAAAAAAAAAAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2
|
||||
EAAAAAAAAAAAAAAAoCRbCAAAAAAAAAAAAAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQL
|
||||
AQAAAAAAAAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQ
|
||||
AAAAAAAAAAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsB
|
||||
AAAAAAAAAAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAA
|
||||
AAAAAAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFpa0aMlSAAAAAAAAAACANlhN
|
||||
NpMdZDd5irxQXivvkA/Jp+UrcqL8RE6X38lf5AL5562uk/9DMTfIstiH8yTuSThT4j79UuK+fVuOk8/J
|
||||
UfJBea8slZfKs2Uf2V0eLNvI7WV1cf2md9yaIADUYQtLcpMaAAAAAAAAAABAQSvI5rKTPFFeJe+XL8rJ
|
||||
Eovd14hbGAcm+4/8XX4rP5LPywckklyeIZH4ci9ZR1xf7AS3JggAddjCktykBgAAAAAAAAAAkMHGsqvs
|
||||
L5Gg8HU5S64XtxgN5BQ7QcTOD1+WgyV289hZ1hfXf1vDrQkCQB22MAdNVj8VNzmj6lrZSEYme6Chlpcz
|
||||
xPVnDDCu03mJuBgDaKfYitGNdTRLPExx9w/omqnbyP5a4kFibPn7LYm3pj4uh8ib5RXyNHmU3E/uIrcV
|
||||
N44AoI4l4uYnpBHzejzDcLEH0E0rSRzzsJ/E9v9xLMDl4uYIoIkulei3kdgQx1XcSVxfbyS3VggAddjC
|
||||
HDRZPUjcBIxR8WVqZLIHGiq2vHL9GEMHiYsd5o4EBqBbSGBoBxIYgLmJN/fOl5/LsRK/714je0s8QCfJ
|
||||
AcB0YotpN68gnaeKiz2AbthSniyxVf9JEtv4u7kAaLNIaojnKfGc9B6ynLjxMHZurRAA6rCFuWjCirdW
|
||||
3ISLqnjgdQcZmfCBhllNLhDXjzEQiz5ri4sf5o4EBqBbSGBoBxIYgPSuktPkaHmTPE7uLiuKG4cAuu/R
|
||||
4uYLpBU77MQb2e4eAGifeIb+dDlKYny7cQ903cXyadlL1hA3VsbCrRMCQB22MBdNWNuJm2AxKr50jUz4
|
||||
QMO8UVz/xVC8bedih/khgQHoFhIY2oEEBqCcG+RUOUJiq+PYsWFlcWMTQHcslt+JmxeQ3ovF3QcAzRfz
|
||||
5c7yXjlb3BgH+uw6+Zo8ReLlQzeOinHrhABQhy3MSZPWMeImVlTdKHeTkUkfaIgN5Wpx/RcDF8qq4uKH
|
||||
+SGBAegWEhjagQQGYLziIWRsK/822U1uI26sAmivZ4kb/8gjtt5eU9y9ANA8kcz5WPmMXC5uXAMY9S/5
|
||||
uOwkbmxl59YIAaAOW5iTJq27SCzOuwkVVZ+XkUkfaIjDxPVbDD1PXOwwfyQwAN1CAkM7kMAANEv8no6E
|
||||
htfLvaWxZ94CqCWS3jmasbw3i7sfAJpheYmdFmJXqivEjWMA9cXxdU+VoscouTVCAKjDFuamiSu+eLhJ
|
||||
FKPi2I2RiR8Ys62FRKSZnSOxrZ2LH+aPBAagW0hgaAcSGIBmu0giufhhEg/73TgG0FyRjOTGNvKKHSU3
|
||||
EHdPAIxPjMuYF88XN3YBLMzfJZ6vFtk12K0PAkAdtjA3TVy3l2vFTaCo+qaMTPzAmH1dXH/F0BPExQ4L
|
||||
QwID0C0kMLQDCQxAe8QDyUOFRHigHdaTK8WNZ+QX86W7LwDKu7/EERHXixuvANKKJKHnStYX8Nz6IADU
|
||||
YQtL0OR1sLiJE6MeICOTPzAm8WaX66cYOlXYyjcPEhiAbiGBoR1IYADa6VcSDyU55x1orlhAd+MXZcRC
|
||||
6Z3E3RsAZcRzxhPFjVEA+f1Gsq0/ubVBAKjDFpagySuyzK8SN2miKr7EjUz+wBjElrSxOO/6KYYeIS5+
|
||||
WDgSGIBuIYGhHUhgANotxvA7ZENxYxzAeGwhvGk8fhPi7g+AvOLZ2UnixiWA8j4ma4sbr/Pm1gYBoA5b
|
||||
WIomsKXiJkuMYkEUTbCvuP6JoR+Iix3SIIEB6BYSGNqBBAagG66Tw2RjcWMdQFlHixurKOtm2UbcPQKQ
|
||||
3t3l2+LGI4DxOk+S7sbg1gUBoA5bWIomsDXkMnGTJapOEbakxzitKn8V1z8xtKO4+CENEhiAbiGBoR1I
|
||||
YAC65Ro5UNYSN+YB5Le9uPGJ8fiGuPsEIJ3bykfkRnHjEEAzxBh9oyRZi3LrggBQhy0sSZPYS8VNlBi1
|
||||
h4x8CACFvE5cv8TQl8XFDumQwAB0CwkM7UACA9BNl8gTxY17AHmdIG5cYnweJO5eAVi4eKZ9kbixB6CZ
|
||||
jpHVxI3p2tyaIADUYQtL0iQWb3WfL26SRNWZsryMfBAAmW0gV4nrlxiI7NStxcUP6ZDAAHQLCQztQAID
|
||||
0G3fks3EjX8A6e0ubixivH4u7n4BmL/YdeEz4sYcgOb7hWwobnzX4tYEAaAOW1jSrRPZs8RNkBi1r1Q+
|
||||
BIACPiiuP2LoE+Jih7RIYAC6hQSGdiCBAei+K+Sx4uYAAOnESym/ETcOMX7sfAqk80D5m7ixBqA9zpFN
|
||||
xY3zWbk1QQCowxaWdOtEtljOFjdBoio+MFaUygcBkNFdhfPpZnad8NZaGSQwAN1CAkM7kMAA9Mchwu9N
|
||||
IJ9niht7aIbY+XQFcfcOQH3x7IZniUB3zDuJwa0JAkAdtrCkSZPZ3uImR4zaTybHDsjpK+L6IYYOFhc7
|
||||
pEcCA9AtJDC0AwkMQL8cL2uImw8AzF8cocrbyM0XSSbu/gGYXSRBHilubAFot0hiWF/c2J+WWxMEgDps
|
||||
YUmTJrPl5DRxkyOq4gdv/PCdHD8ghweL64MYukrWExc/pEcCA9AtJDC0AwkMQP/8Uub8gBLAjF4tbryh
|
||||
Wc4XnrkBc7eafFvcuALQDSdLjHU3B1huTRAA6rCFJU2Z0HYTNzFi1EtlavyAlCKpKB5cuv6HoTeJix/y
|
||||
IIEB6BYSGNqBBAagn+KcfpIYgDRuK3yetsfLxd1HAN5a8lNx4wlAt8RuzbFu4OaCEW5NEADqsIUlmUnt
|
||||
RHETI6ouE7b1RE5PEtf3MHSJMA7LIoEB6BYSGNqBBRegvyKhORYl3NwAoL44dtCNMTRTPHNbW9y9BFC1
|
||||
psRb2W4sAeim14ubD0a4NUEAqMMWlmQmtfuLmxQxije/kcsq8hdx/Q5DB4iLH/IhgQHoFhIY2oEEBqDf
|
||||
fihxprWbHwDM7o5yvbjxheZ6m7j7CWBoJfm+uDEEoLtukjh62s0LFW5NEADqsIUluUlNviZuYkRVPExe
|
||||
V1wMgYV4lbg+h6E/S/xQc/FDPiQwAN1CAkM7kMAA4CPi5gcAs/uMuHGFZvu3bCTungIYbCF/jLjxA6D7
|
||||
LpR1xM0P/+XWBAGgDltYkpvUZBu5WdzEiKqDxMUQmK/1hIWK2T1VXPyQFwkMQLeQwNAOfC8AEJ4rbo4A
|
||||
ML17ixtPaIcPi7uvAJYsfYO4cQOgP44SNz/8l1sTBIA6bGFJblK7FRnq9VwjZIQjpUPF9TUM/UaWFxc/
|
||||
5EUCA9AtJDC0AwkMAMK1cjdx8wQA73vixhPa4QbZUty9BfrsUcLLhwDCruLmiVu4NUEAqMMWluQmtVvF
|
||||
D4T4oeAmRVR9QFwMgbm6s3A25+weLS5+yI8EBqBbSGBoBxIYACxzqqwobq4AUPUIceMI7RJb5Lv7C/RV
|
||||
PLPn9wGAZc6VaY9ZdmuCAFCHLSzJTWqTHCZuUkRVLDhvJi6GwFx8UVwfw9BPxcUOZZDAAHQLCQztwANK
|
||||
AJO9WdxcAWAoduw7Q9wYQvvEUSDuPgN9s4L8XNw4AdBfLxc3Z9g1QQCowxaW5Ca1SeJohNim0k2KqJr1
|
||||
vCFgFg8U17dQtZO4+KEMEhiAbiGBoR1IYAAw2XWyhbj5AsDAU8WNH7TTd8TdZ6Bv3iBujADotytkXRmZ
|
||||
N9yaIADUYQtLcpPaFO8UNymi6kbZSlwMgdksJyeL61sY+oa4+KEcEhiAbiGBoR1IYAAwFd+LgemtKueL
|
||||
Gztor4eJu99AX2wnHPcMYDoHycjc4dYEAaAOW1iSm9SmiMwtHprWw7l8mK+9xfUpDN0s24iLH8ohgQHo
|
||||
FhIY2oHv4gCcON/fzRlA371S3JhBu50i8fKHu+dA18WxOLz4BGAmV8naUpk/3JogANRhC0uaOqFNg+2p
|
||||
6otsWBdDYDorybni+hOGJsTFD2WRwAB0CwkM7UACAwAnFjJYzAOq1pHYRtmNGbTfXuLuO9B1zxE3JgBg
|
||||
stdLZf5wa4IAUIctLGnqhDaNNeRicZMiqtjKE3P1cnF9CUPXC+f8NgMJDEC3kMDQDiQwAJjOHuLmDaCv
|
||||
3iNurKAbzpbF4u490FWRmHWJuDEBAJNdKivLf+cQtyYIAHXYwpImT2azOEDcpIhR9xcXQ2CqOKKFt0Nm
|
||||
90Fx8UN5JDAA3UICQzuQwABgOr8SN28AfXQHuU7cWEF3PFfc/Qe66n3ixgIAOHFU9X/nELcmCAB12MKS
|
||||
Jk9ms4ht7s8TNymi6kRxMQSmOlhcH8LQ1bKhuPihPBIYgG4hgaEdSGAAMJOdxM0dQN98WtwYQbf8XVYV
|
||||
1weArtlIrhU3FgDA+b78dx5xa4IAUIctLGnyZFbD08VNihi1i7gYAsvcSeJoBNd/MHSguPhhPEhgALqF
|
||||
BIZ2IIEBwEyOFTd3AH2yrdwsboyge14trh8AXXOIuDEAADPZUm6ZR9yaIADUYQtLWjaR1bSCnCluUkTV
|
||||
ybKcuDgC4fPi+g6GLpO1xcUP40ECA9AtJDC0AwkMAGZyo9xe3PwB9MV3xY0PdFN8N1pHXF8AumIzYfcF
|
||||
APPxRrllLnFrggBQhy0sadlENgd7ipsUMWoPcTEE7ieuz6DqFeLih/EhgQHoFhIY2oEEBgCzeb24+QPo
|
||||
g4eLGxfotneJ6w9AV0Qfd30fAGZzutwyl7g1QQCowxaWtGwim4PYVeAX4iZGVP1WlhcXR/RXjKGfiusz
|
||||
GPqrcK5l85DAAHQLCQztQAIDgNmcLW7+ALounrmcKm5coNvizfRNxPULoO1WlyvE9X0AqGMLsWuCAFCH
|
||||
LSwpJrF5ILu9vieLiyH663Hi+gqqniUufhgvEhiAbiGBoR1IYABQxxJxcwjQZU8RNx7QD0eI6xdA2+0n
|
||||
rs8DQF2vFLsmCAB12MKSYhKbpxPETYyoOkcWi4sh+mcl+aO4voKhs4Rx00wkMADdQgJDO5DAAKCOg8XN
|
||||
IUBXrSx/ETce0A83ylbi+gfQVrFz6+/F9XkAqOu7YtcEAaAOW1hSTGLzdF9xEyNGPU9cDNE/LxbXR1AV
|
||||
u1S4+GH8SGAAuoUEhnYggQFAHZE87+YQoKteLm4soF++KK5/AG11f3F9HQDm4jpZxa0JAkAdtrAkTWIL
|
||||
EQ+93eSIKs7yR1hb/iGuj2DoFxLZ5i6GGD8SGIBuIYGhHUhgAFDX1uLmEaBr4vf15eLGAfqHI3TQJYeJ
|
||||
6+cAMFcPd2uCAFCHLSxJk9hCxMORm8VNjqiKRT8XQ/THe8T1DVQ9TFz80AwkMADdQgJDO5DAAKCu14ib
|
||||
R4Cueae4MYB+imNuXT8B2iaOxrlCXD8HgLl6u1sTBIA6bGFJmsQW6pPiJkdUXSZriIshum9ziW2bXN/A
|
||||
0C1nc6HRSGAAuoUEhnYggQFAXd8TN48AXXJ7uVbcGEB/7SquvwBtEkequv4NAPPxPbcmCAB12MKSNIkt
|
||||
1B3lenETJKreKC6G6L7PiusTqNpeXPzQHCQwAN1CAkM7kMAAoK5rZCVxcwnQFUeJ6//ot9OE4yjRdkeL
|
||||
698AMB9XyfJuXRAAZmMLS9IElsIHxE2QqIqHz+uIiyG6awdx/QFVXxAXPzQLCQxAt5DA0A4kMACYiweK
|
||||
m0uALriXcJQppvNEcf0GaIMV5UpxfRsA5mtrty4IALOxhSVpAkthI7la3ASJqoPExRDd9WNxfQFDN8pd
|
||||
xMUPzUICA9AtJDC0AwkMAObiDeLmEqALviWu3wPhHIlFYNd3gKbbRVy/BoCF2NetCwLAbGxhSZrAUnm7
|
||||
uAkSVf+WSPhwMUT3PFZcP0DVEeLih+YhgQHoFhIY2oEEBgBz8Q1xcwnQdg8T1+eByV4orv8ATccOxwBy
|
||||
OMitCwLAbGxhSZrAUllbeLhaz6HiYohuWSxni+sDGLpWNhEXQzQPCQxAt5DA0A58xwYwFxeJm0uANltO
|
||||
fimuzwOTXShriOtHQJP9WVyfBoCF+KpbFwSA2djCkjSBpfQacZMkqq6XzcTFEN3xInH3H1XvEhc/NBMJ
|
||||
DEC3kMDQDiQwAJgrEoTRNU8U19cBh6N00Dabi+vLALBQ57p1QQCYjS0sSRNYSqtKZDq7iRJVHxcXQ3TD
|
||||
WnKpuHuPoViQWVdcDNFMJDAA3UICQzuQwABgrh4jbj4B2mglOVdcXwec+O60nrj+BDTR08X1ZQBYqJtl
|
||||
Fbc2CAAzsYUlafJK7QXiJkpU3Sh3ERdDtN9B4u47ql4nLn5oLhIYgG4hgaEdSGAAMFdvFDefAG3EbxDM
|
||||
x8Hi+hPQREeJ68cAkMJWbm0QAGZiC0vS5JVaZMb/SdxEiaqjxcUQ7RbHg1wr7p5jKHZrWV1cDNFcPDwE
|
||||
uoUEhnYggQHAXE2Im0+AtllbLhPXz4GZXCcc34q2+Iu4fgwAKezm1gYBYCa2sCRNXjnsK26iRFVs37Od
|
||||
uBiivT4t7n6jKnZrcfFDs5HAAHQLCQztQAIDgLk6Vdx8ArTN28X1caCOT4jrV0CTbCSu/wJAKvu5tUEA
|
||||
mIktLEmTVw7Ly2/ETZao+pq4GKKd7iORmOLuNYbOkRXFxRDNRgID0C0kMLQDCQwA5upqcfMJ0CabCLsb
|
||||
Tu8aU4aqm+Tu4voX0BSPEdd/MV4xf8Tusb+Ub8hH5Z3yBnmxPF0eKw+X+8q2ckfZ/FZ3kNhFqM3WkWXX
|
||||
E2I+jZcxd5bdZA95mjxXXiPvko9JPGf4sZwp/xAXX5T1drc2CAAzsYUlafLK5X/ETZYYtaO4GKJ9fiDu
|
||||
HqPqSeLih+YjgQHoFhIY2oEEBgDzsbG4OQVoiyPF9W0MPFFiYc393zD0FXH9C2iKt4jru8gvfmf9SI6Q
|
||||
V8qesr3ErhgriLtfmLs4QngreYQ8W6LPf0EiweFGcfcGaX3KrQ0CwExsYUmavHI6SdyEiaoTxcUP7fJo
|
||||
cfcXVadJ7NLiYojmI4FhVBey6tFf8SDBjXU0CwkMAOaDRHm02T0k3n51fRtLlv5KlpOHTCrD9O4vrp8B
|
||||
TRBv97t+i7Rid6rvyIESz3A3FXc/UNZKci95shwmvxd3/7Aw33JrgwAwE1tYkiavnGI7ITdhYlRsN+Vi
|
||||
iHZYLHzBqueR4mKIdiCBYVQsArtYAUAqJDBUnS9Tk3HQDreV2H42ttiNbWefKbEVbzy4/7u4+435e4K4
|
||||
OQVog6+L69cYmPwMiVjNLt6wnty/gCa5SFy/xcKdKv8rD5B4duvij+ZZX/aST8vl4u4t5uYUtzYIADOx
|
||||
hSVp8srt2+ImTVTFbhWRPe9iiObbT9x9RdUPxcUP7UECw6hYkHGxAoBUSGCo+ou4OKH9YmvZ/SW+M7p7
|
||||
j7l5hbg4A03HyzAz+55MjlfsVsEW3LN7lEyOG9AE64nrr5i/s+R1spm4mKNdVpZIyuX3wcKc79YGAWAm
|
||||
trAkTV653UfcpIlRe4iLIZptTblY3D1F1f3ExRDtQQLDKBIYAORGAkMVCQz9sIUcIteK6weY3aHiYgs0
|
||||
WbzYcYq4Po2BeM42NW4fE/ffYujXwnGWaJoHieuvmLvjZRfhBcHuiufKPxN3/zGza93aIADMxBaWpMmr
|
||||
hGPFTZyo+o3wY6p94uw0dz9R9RVx8UO7kMAwigQGALmRwFBFAkO/bCRHiesLmNkx4mIKNNnjxfVnDBwt
|
||||
Lm4by7/F/RsM7SsufsC4PEdcX0V9saAdR0S4+KJ7IkHlAPmPuP6A6S1264MAMB1bWJImrhLuJmxnV8+T
|
||||
xMUQzbSp8FbY7G6Wu4uLIdqFBIZRJDAAyI0EhioSGPopdqv7h7g+AW/qNvNA060k54jrz1iy9HrZUlzs
|
||||
wlvF/TsM/Vmin7n4AePwPnF9FbOL57EvEl4G7Kf7yqXi+ga8td36IABMxxaWpImrlI+LmzhRFT/WF4uL
|
||||
IZrnE+LuI6rirTkXP7QPCQyjSGAAkBsJDFUkMPTXXSQWn1y/wKjY4c/FEWiq/cX1ZQx8UFzcluF4y3pe
|
||||
LC5+wDh8S1w/xcz+KtuJiyn6Yyvhc6++O7j1QQCYji0sSRNXKZsJW/vU81xxMUSzbCOxs4C7hxiKt0Tu
|
||||
IC6GaB8SGEaRwAAgNxIYqkhg6LfN5e/i+gaqIk4uhkAT3UZ4k3J6V8uG4mI32QvF/XsMRT9bQ1z8gNLO
|
||||
EtdPMb14+S92xHXxRP/cWzhCqZ67u/VBAJiOLSxJE1dJh4ibPFF1vqwqLoZojtiS1d0/VMW4d/FDO5HA
|
||||
MIoEBgC5kcBQRQIDYsvYG8T1DwxFIrGLH9BEB4rrxxh4i7i4TRU7ep4t7m9gaKm4+AGlcSzt3MRxYjMd
|
||||
pYN+eoa4/oKqHdz6IABMxxaWpImrpPUlssbdBIqqWCR0MUQzPFLcfUNVjPcY9y6GaCcSGEaRwAAgNxIY
|
||||
qkhgQGCxsx7OekcbbCzXiOvDGOwYEMdDuNg5jxX3dzAUzyo2EBc/oJR4Xub6J6a3i7hYAt8Q12cwtLNb
|
||||
HwSA6djCkjRxlRZZ424CRdUlwpZ2zbSC/FbcfUMVbzV0DwkMo0hgAJAbCQxVJDAgrCx/EtdHMMT3FLTB
|
||||
EeL6LwYOEBe3mfxE3N/C0KHiYgeUch9xfRPeweLiCIQtJHYfc30HAyQwAJgTW1iSJq7S1pLLxE2iqHq9
|
||||
uBhivJ4t7n6hKsY5STjdQwLDKBYGAORGAkMVCQxY5uni+giGNhcXO6Ap7iY3iuu/WLL0zzKfnVTuJ+7v
|
||||
YSgWuu4oLn5ACeyWUt9fZXVxcQSWOVxc/8EACQwA5sQWlqSJaxxeIW4SRVU8rGZhrFliQf5CcfcLVRyD
|
||||
0k0kMIxingaQGwkMVSQwYJk46/18cf0EA1uLix3QFF8V13cx8BRxcavjWHF/E0OfFhc7oIQXiOuXGBVJ
|
||||
qy6GwGR3Edd/MPBwtz4IANOxhSVp4hqHVeUCcRMpqt4hLoYYjzeLu0+oOk84b7ebSGAYRQIDgNxIYKgi
|
||||
gQGTvU1cP8HAtuLiBjTBTuL6LQZOl+XFxa6OOwvbac/sZrmXuPgBucWxq65fouqPEkmrLobAVD8U14+w
|
||||
ZOkebn0QAKZjC0vSxDUuzxU3kaLqatlQXAxR1sbyb3H3CVVkRncXCQyjSGAAkBsJDFUkMGCyrcT1Eww8
|
||||
QFzcgHFbTk4S128xsJu42M3FB8T9bQx9Q1zsgNw+JK5PoirWEFz8AGc/cf0IJDAAmCNbWJImrnGJzMlz
|
||||
xE2mqDpEXAxR1sfE3R9U/U4W8pYImo0EhlEkMADIjQSGKhIYMBW/K6e3s7iYAeO2l7g+i4EfiIvbXK0v
|
||||
V4qrA0MPEhc/IKdjxPVHDF0hq4mLH+BsIq4vYcnSXd36IABMxxaWpIlrnPYRN5miKrb820xcDFHGPeUm
|
||||
cfcHVXuIiyG6gQSGUSQwAMiNBIYqEhgwFYnG0yOBAU0UL7T8QVyfxcAScbGbj9eLqwNDPxMXOyCn74vr
|
||||
jxg6TFzsgJnE70XXn/puZ7c+CADTsYUlaeIap3hL+zRxEyqqjhQXQ5RxvLj7gqqfi4sfuoMEhlEkMADI
|
||||
jQSGKhIYMNW+4voKSGBAM71QXH/FwLHi4jZfq8rfxNWFof8RFz8gl1+L64sYeqC42AEz+ay4/tR3JDAA
|
||||
mBNbWJImrnHbXdyEiqob5c7iYoi8dhV3TzDqweJiiO4ggWEUCQwAciOBoYoEBky1rbi+giVLHyouZsC4
|
||||
rCEXi+uvGDz7uYu42C3EM8TVh6EzZQVx8QNy4C3xmV0kHFGL+ThAXJ/qOxIYAMyJLSxJE1cT/FjcpIqq
|
||||
o8XFD/nEF2Uyouv5lrgYoltIYBhFAgOA3EhgqCKBAVOtIhz35rEDA5rmLeL6KgZybZfOs416ItHDxQ/I
|
||||
4TJx/RADHxcXN2A2jxTXp/qOBAYAc2ILS9LE1QQ7iZtUUXWzxNtFLobIg7cU6om+uZ24GKJbSGAYRQID
|
||||
gNxIYKgigQEObzF6JDCgSTaSq8X1VSxZeo1EjFzsUthNXL0YOl8iKc7FD0jtWnH9EAN7i4sbMJutxfWp
|
||||
viOBAcCc2MKSNHE1xTfFTayo+qq4+CG91eQCcfcBVXG2mIshuocEhlEkMADIjQSGKhIY4Jwkrr/0HUe8
|
||||
oUkOF9dPMfA2cXFL6Xvi6sbQy8XFDkhpOXH9D0MbiosdMJt4pu/6VN/d360PAsB0bGFJmriaIt7edhMr
|
||||
Ru0oLoZI643i4o+qG2RLcTFE95DAMIoEBgC5kcBQRQIDnK+I6y99xw5+aIq7yo3i+ikGW8mX+F0Rz95i
|
||||
B0XXBgyUuhfot+hjrv9h4GxxcQPqulJc3+qzbdz6IABMxxaWpImrSY4WN7mi6gfi4od0IsuXrS3r+bC4
|
||||
GKKbSGAYxcMtALmRwFBFAgOco8T1l74jgQFN8SVxfRQDLxMXtxw+La4NGDpQXOyAVDYV1/cw8BlxcQPq
|
||||
ulhc3+qzzd36IABMxxaWpImrSeItbjLy63mYuBgiDba2rCf3GZ1oHhIYRpHAACA3EhiqSGCA80Fx/aXv
|
||||
SGBAEzxAXP/EwPmysrjY5XAH4ez9mcULLTzrQE6bi+t7GCiZ1IVuit+Mrm/12fpufRAApmMLS9LE1TQf
|
||||
FTfBoirOeHXxw8JtLSTS1PN2cTFEd5HAMIoEBgC5kcBQRQIDnEPE9Ze+20JcvICSfiquf2LgaeLiltO7
|
||||
xbUFQ+w2iZxIYJgZL+5hoX4jrm/12WpufRAApmMLS9LE1TSxhRaZ4PX8j7gYYmG+Li7eqLpcWLjtHxIY
|
||||
RjEOAORGAkMVCQxwSGDweIMY47anuL6JgVhgWV5c7HKK3zD/ENcmDNwgsVOsix+wUCQwzGwTcXED6nqL
|
||||
xBFzuJVbGwSAmdjCkjR5NdF7xX15QdUZMo4ful0WGb4u1hj1KnExRLeRwDCKBAYAuZHAUEUCAxwSGLxV
|
||||
xcULKGGxnC2ub2LgUeJiV8JLxbUJQ58TFztgoe4hrs9hydKrxMUMwDy4NUEAqMMWluQmtQZYT64U9yUG
|
||||
VfuIiyHmLpJBThMXZ1RdIDwM7ScSGEaRwAAgNxIYqkhggEMCw6jrxcUKKOV54vomBn4kLm6lrCTnimsb
|
||||
hu4tLn7AQmwrrr9hydLTxcUMwDy4NUEAqMMWluQmtYb4X3FfYlB1jsRbDS6GmJt9xcUYo54jLoboPhIY
|
||||
RpHAACA3EhiqSGCAc4S4/tJnl4iLFVDCGnKhuL6JgfuJi11J8VKMaxuGviMudsBCkMAwvePExQzAPLg1
|
||||
QQCowxaW5Ca1hogfu5eJ+yKDqmeLiyHqi90E/iouvqj6g5A0018kMIwigQFAbiQwVJHAAOeT4vpLn8X3
|
||||
dhcroIQ3ieuXGPiyuLiVtpycIq6NGHqouPgB80UCw/Q+KC5mAObBrQkCQB22sCQ3qTUIC2X1nC8ri4sh
|
||||
6nmduNhi1OPFxRD9wLw8igQGALmRwFBFAgOcr4rrL30Wi5IuVkBut5OrxfVLLFl6o9xNXOzG4cHi2omh
|
||||
X0gke7j4AfNBAsP03iAuZgDmwa0JAkAdtrAkN6k1SCzKx+K8+zKDqlhUdDHE7DaQq8TFFVW/En609xsJ
|
||||
DKNIYACQGwkMVSQwwPmJuP7SZ8eLixWQ24fE9UkMfExc3Mbpa+LaiqG9xMUOmA8SGKb3fHExAzAPbk0Q
|
||||
AOqwhSW5Sa1hninuywyqLpY4dsPFEDPj4Up9u4iLIfqDBIZRJDAAyI0EhioSGOCcKa6/9NkR4mIF5HQX
|
||||
iR0GXJ/EkqXXyibiYjdOWwv3bWZnC8dpIhUSGKa3t7iYAZgHtyYIAHXYwpLcpNYw8ePgLHFfaFAVxyC4
|
||||
GGJ6dxV+pNfzfXExRL+QwAC0AzszdQsJDFUkMMC5XFx/6bM3i4sVkNOx4vojBt4lLm5NEElPrs0Yeo64
|
||||
2AFzRQLD9B4mLmYA5sGtCQJAHbawJDepNVCcue++0KAqHm7zJvDcfEVcLDFqibgYol9IYADagQSGbiGB
|
||||
oYoEBkx1G3F9pe9YaENpO4rrixi4Qpr8zGYjuVpc2zFwgawqLn7AXJDAML1txMUMwDy4NUEAqMMWluQm
|
||||
tQaKM/fj7H33pQZVbxcXQ4x6sLgYYtQXxcUQ/UMCA9AOJDB0CwkMVSQwYKp7iesrfbebuHgBufxYXF/E
|
||||
wCvFxa1JYucW13YMvVpc7IC5IIFhek08ZgdoLbcmCAB12MKS3KTWUI8Q96UGVZEtfztxMcRQJMX8UlwM
|
||||
URVHbGwlLo7oHxIYgHYggaFbSGCoIoEBU+0hrq/03d3FxQvI4THi+iEG/ipteHN/DblI3DVggN1PkQIJ
|
||||
DNNjfAEJuTVBAKjDFpbkJrUGO1HcFxtUHSIufhh6irjYYdSR4mKIfiKBAWgHEhi6hQSGKhIYMNVbxPWV
|
||||
vltTXLyA1BbL78X1Qww8U1zsmmg/cdeAoXeKix1QFwkM0yOBAUjIrQkCQB22sCQ3qTXY/cR9sUHVf2Qz
|
||||
cTHEkqWrSDz4drFD1bVye3FxRD+RwAC0AwkM3UICQxUJDJjqG+L6Sp+dLy5WQA7PEdcPMXCmRJKHi10T
|
||||
RVvPEnctGIhnJWxzj4UggWF6K4qLGYB5cGuCAFCHLSzJTWoN91VxX25Q9TFx8cOSpa8SFzOMeq+4GKK/
|
||||
SGAA2oEEhm4hgaGKBAZMdaG4vtJnx4uLFZDaasIYnNn/iItdk0Wb3bVg6AhxsQPqIIFhei5eAObJrQkC
|
||||
QB22sCQ3qTXcPeVmcV9wMHSjbCkuhn22nrAIUE/EKeLl4oj+IoEBaAcSGLqF7y5VJDBgsnuJ6yd9d7C4
|
||||
eAGpvUFcH8TAT8XFrQ1+LO6aMBDP3e4qLnbAbEhgmJ6LV99wjDZy2tmtEwLAVLawJE1YbTQhbvJF1efE
|
||||
xa/PPiAuVhgVD6JcDNFvJDAA7UACQ7eQwFBFAgMmY3c1r03n7aO91perxPVBDDxQXOza4L7irglDx4qL
|
||||
HTAbEhi8K8XFq29IYEBOJDAAqMUWlqQJq41iZ4HrxU3AGIqdKuKNJBfDPrqz3CAuVqi6SNYQF0f0GwkM
|
||||
QDuQwNAtJDBUkcCAyeLtZtdP+m5HcfECUuIFgZl9TVzc2uTz4q4NQzuIix0wExIYvPjd4+LVNyQwICcS
|
||||
GADUYgtL0oTVVh8WNwGj6jhx8eujL4qLEUa9SFwMARIYgHYggaFbSGCoIoEBy9xNXB/pu5uEZGTkxosl
|
||||
M4sXSu4hLnZtsoVwn2d2grjYATMhgcEjgWGABAbkRAIDgFpsYUmasNpqI7lW3CSMKt6+GWzb6GKDUefK
|
||||
SuLiCJDAALQDCQzdQgJDFQkMWOZgcX2k784QFy8gpS+I638Y+IS4uLXR+8VdI4Z2FRc7YDokMHgkMAyQ
|
||||
wICcSGAAUIstLEkTVpsdJG4SRtX3xcWvL5aTk8XFBqOeIi6OQCCBAWgHEhi6hQSGKhIYECKh/RpxfaTv
|
||||
PiouZkAqsWW+63sYiJdtNhMXuzZaT/guMrNTJZ49ufgBDgkMHgkMAyQwICcSGADUYgtL0oTVZusIP6Lq
|
||||
eYi4GPbBPuJiglHxttby4uIIBBIYgHYggaFb+L5bRQIDwuHi+gdISEZ+LKzM7L3i4tZmrxF3rRiKZ08u
|
||||
doBDAoNHAsMAn7PIiQQGALXYwpI0YbXd68VNxKg6SVz8ui6OQogjEVxMMOpR4uIILEMCA9AOJDB0CwkM
|
||||
VSQw4EES58u7/oElSzcVFzcghfjN6PodBuIz+7biYtdmq8pfxV0zBs6RFcXFD5iKBAaPBIYBEhiQEwkM
|
||||
AGqxhSVpwmq7NeRCcZMxqh4jLoZd9nJxscCoH4uLITAZCQxAO5DA0C0kMFSRwNBvsTjP77/p/V5c3IAU
|
||||
VpDfiut7GHiduNh1wdPEXTOGXiAudsBUJDB4JDAMkMCAnEhgAFCLLSxJE1YX7C9uMkbV6dKn4wHWlSvE
|
||||
xQKjHiAujsBkJDAA7UACQ7eQwFBFAkN/RfLCWeL6BQa6uHU9muNZ4vodBv4usVOBi10XxPOkOHbSXTsG
|
||||
IsFudXHxAyYjgcEjgWGABAbkRAIDgFpsYUmasLogjgmIB5luQkZVn87ke5+4GGDU18TFEJiKBAagHUhg
|
||||
6BYSGKpIYOin+wrbl8/uIeLiByxULMxfIK7fYeA54mLXJbuKu3YMvUFc7IDJSGDwSGAYIIEBOZHAAKAW
|
||||
W1iSJqyueLq4CRlVf5TF4mLYJVvI9eJigKo4P/ie4uIITEUCA9AOJDB0CwkMVSQw9Mva8k65UVx/wNAl
|
||||
Elv8uzgCCxVHI7h+h4GzpQ/PWsJ3xMUAA/G9bT1xsQOWIYHBI4FhgAQG5EQCA4BabGFJmrC6IrayO1Pc
|
||||
pIyq2PbRxbBLPi/u2jHq0+JiCDgkMADtQAJDt5DAUEUCQz9sIK+Ry8T1A4w6TFwsgYWKxVg+i2b2OHGx
|
||||
66JtJF6EcHHAAMf5YDYkMHgkMAyQwICcSGAAUIstLEkTVpfsIW5SRtX5EsduuBh2wf3EXTdGxS4VdxQX
|
||||
R8AhgQFoBxIYuoVFoyoSGLprE3mmfFluEHf/Mb0HiIsrsFCHiOtzGDhZlhMXu676pLhYYOBa2Uxc7IBA
|
||||
AoNHAsMACQzIiQQGALXYwpI0YXVJ/GCMH45uYkZVVxc2og/8VNw1Y9Sh4uIITIcEBqAdSGDoFhIYqkhg
|
||||
aJ/YVj2OgritbC73kEdIHAP4ZjlO/iTufqOes8TFHlioOwnHM87sweJi12W3l1ikd/HAwCfExQ4IJDB4
|
||||
JDAMkMCAnEhgAFCLLSxJE1bXPEzcxIyqi2QNcTFss73EXS9GXS23ExdHYDokMADtQAJDt5DAAGA2zPvI
|
||||
5XPi+hwGvikubn1wkLiYYOAm2Vpc7AASGDwSGAZIYEBOJDAAqMUWlqQJq4u+L25yRtVrxcWvreJYjHPE
|
||||
XStGvUVcHIGZkMAAtAMLWd1CAgOAmVwltxE3fwALsb24PoeBm2UbcbHrg9hZ5zJxscFA7DDkYgeQwOCR
|
||||
wDBAAgNyIoEBQC22sCRNWF20RNzkjKr4Uhg/OF0M2+jF4q4To+IhAw85MR8kMADtQAJDt5DAAGAm8Ra0
|
||||
mzuAheLlkJl9Wlzc+oTnMLO7v7jYod9IYPBIYBgggQE5kcAAoBZbWJImrK76srgJGlUHiotf20Qixj/E
|
||||
XSNGvUxcHIHZkMAAtAMJDN1CAgOA6cSxcOuJmzuAhfh/4vocBq6XzcXFrk9iJ8w/iYsRBn4kLnboNxIY
|
||||
PBIYBkhgQE4kMACoxRaWpAmrq+KcudjOz03SGIoHXuuLi2GbvEfc9WHU+bKKuDgCsyGBAWgHEhi6hQQG
|
||||
ANPpSkI6mmV5+bW4PoeB94mLXR/tLS5GGNpdXOzQXyQweCQwDJDAgJxIYABQiy0sSRNWlx0lbpJG1SHi
|
||||
4tcWd5T/iLs2jHqmuDgCdZDAALQDCQzdQgIDAOfvsoa4eQNYiKeL63MYuErY+WRoOTlZXKwwcIZEYpCL
|
||||
H/qJBAaPBIYBEhiQEwkMAGqxhSVpwuqyO0hs6+cmagxdK5uJi2EbfFbcdWHUmbJYXByBOkhgANqBBIZu
|
||||
IYEBgPMEcXMGsBCryl/F9TkMvFFc7PpsJ3GxwtC+4mKHfiKBwSOBYYAEBuREAgOAWmxhSZqwuu5QcRM1
|
||||
qj4qLn5Nt4O464H3WHFxBOoigQFoBxIYuoUEBgBTHSduvgAW6tXi+hwGLhR2PvG+Ii5mGPizrCQudugf
|
||||
Ehg8EhgGSGBATiQwAKjFFpakCavrNpSrxU3WGLpRthQXwyb7sbjrwajY0jG2dnRxBOoigQFoBxIYuoUE
|
||||
BgCTxdER64ubL4CFWFf4zJnZC8TFDkuWbiXxbMnFDQMHiIsd+ocEBo8EhgESGJATCQwAarGFJWnC6oO3
|
||||
iZusURVHMbj4NVXsJuCuA95DxMURmAsSGIB2IIGhW1hMArBMLA7yvR65vFdcv8PAOcKRjDM7TFzsMHCJ
|
||||
sIMHAgkMHgkMAyQwICcSGADUYgtL0oTVB2vL5eImbAzdLPcUF8OmiYcGfxB3HRj1bXFxBOaKBAagHUhg
|
||||
6BYSGAAs8yJx8wSwUJvLf8T1OwzsLS52GGIX1NktFRc79AsJDB4JDAMkMCAnEhgA1GILS9KE1Rec41hP
|
||||
W85SjQd3rv3w7i0ujsBckcAAtAMJDN1CAgOAEG/HuzkCSGFCXL/DwC+FIxnr+V9xMcRAJHhwDBBIYPBI
|
||||
YBgggQE5kcAAoBZbWJImrL5YVS4UN2mjakdxMWyKteRScW3HqGPExRGYDxIYgHYggaFbSGAAcLiweIpc
|
||||
IuE9dmR0fQ8DDxMXO4yKIxJ4/jaz94uLHfqDBAaPBIYBEhiQEwkMAGqxhSVpwuqT54ubtFH1PXHxa4qD
|
||||
xLUbo+KM3DuLiyMwHyQwAO1AAkO3kMAA9NtHhOQF5BTPAFzfw8B3xMUN03uuuFhi4HqJY1tc7NAPJDB4
|
||||
JDAMkMCAnEhgAFCLLSxJE1afrCTniJu4UbWzuBiO2x3kWnFtxqh4U8vFEZgvEhiAdiCBoVtIYAD6K85K
|
||||
J3kBOe0qru9haDtxscP0FsuZ4uKJgU+Lix36gQQGjwSGARIYkBMJDABqsYUlacLqmyeLm7hRdZK4+I1b
|
||||
/MBz7cWoSPTYSFwcgfkigQFoBxIYuoUEBqB/rpGniJsTgFSWl9PF9UEMfFZc7DC7R4uLKQbi2JZ7iYsd
|
||||
uo8EBo8EhgESGJATCQwAarGFJWnC6pv4gf5rcZM3quLHpovhuNxHOJezvneKiyOwECQwAO1AAkO3kMAA
|
||||
9MvZwqIWSthXXB/EQGzzv4W42KGeH4qLLQa+Li5u6D4SGDwSGAZIYEBOJDAAqMUWlqQJq48eI27yRtVp
|
||||
EgkfLobj8ANx7cSo+MK/trg4AgtBAgPQDiQwdAsJDEB/fFBWEzcXACmtIueJ64cY+IC42KG+HcTFFkM7
|
||||
iYsduo0EBo8EhgESGJATCQwAarGFJWnC6qufiZvAUbWPuPiVxtaDc/MacXEEFooEBqAdSGDoFhIYgO77
|
||||
nTxA3BwA5PAKcX0RA1fLBuJih7k5WlyMMRDPJ13c0G0kMHgkMAyQwICcSGAAUIstLEkTVl/tLG4CR1Vs
|
||||
X7pYXAxLifrPEtc+jLpQVhUXS2ChSGAA2oEEhm4hgQHorkvlRTLu31zol3XkCnF9EgNvFhc7zN2dJI7j
|
||||
cHHGwP+Iix26iwQGL+YKF6++IYEBOZHAAKAWW1iSJqw+O17cJI6qZ4iLXyn7iWsXvIiXiyOQAgkMQDuQ
|
||||
wNAtJDAA3XOZxK5pa4gb90BO7xbXLzFwiTA203qfuFhjIHbhadIRrsiPBIbpuXj1DQkMyIkEBgC12MKS
|
||||
NGH12b3FTeKoOl9WEhfD3NaUi8W1C6POEd7eQk4kMADtQAJDt5DAAHTHHyR2XGBxFOOymVwrrn9iYH9x
|
||||
scP83Vb4PjOzcb88hLJIYJjeKuJi1ickMCAnEhgA1GILS9KE1XdfEDeRo+oAcfHL7UBx7YH3BHFxBFIh
|
||||
gQFoBxIYuoUH/kC7xWLx5+Rhspy4cQ6U8ilx/RTAeMXLQyzc9gcJDNNbW1zM+oQEBuREAgOAWmxhSZqw
|
||||
+u6ucqO4yRxDF8rq4mKYy6bCmyH1nSY8EEVuJDAA7UACQ7eQwAC0z7/lOHmysNsCmmIbuVlcnwUwfi8T
|
||||
N3bRPSQwTO924mLWJyQwICcSGADUYgtL0oSFJUuPFDeZoyrOaHXxy+Uoce2A9whxcQRSIoEBaAcSGLqF
|
||||
BAagHc6Q90h8L19Z3HgGxunb4vougGa4TNYSN37RLSQwTG9LcTHrExIYkBMJDABqsYUlacLC4AzI68RN
|
||||
6Bi6Qkpt48WbIXPzA3FxBFIjgWHUHSTmRqBJWDjrFhIYgHa4Ur4sL5S7iBvPwLg8XFy/BdAscZSqG8Po
|
||||
FhIYpndfcTHrExIYkBMJDABqsYUlacLCwCHiJnRUvVVc/FL7nrj64e0oLo5AaiQwjIrFYhcrAEiFBAag
|
||||
nf4kB0kkZ7uxDZQSRw2eKq6fAmiWq2UjcWMZ3UECw/R2FxezPiGBATmRwACgFltYkiYsDKwn8SPBTeoY
|
||||
ihhFrFwMU3mkuLrhxVteLo5ADiQwjCKBAUBuJDAA7XeWvElYlMI4PFlcvwTQTB8SN5bRHSQwTO854mLW
|
||||
JyQwICcSGADUYgtL0oSFoaXiJnVUxW4VLn4pLJbfiqsXo26SrcXFEsiBBIZRJDAAyI0EBqA7bpBj5MHi
|
||||
xjuQ2kryZ3H9EUAzXS9bihvT6AYSGKZXavffJiOBATmRwACgFltYkiYsDN1GLhM3sWPoWrm9uBguVGTZ
|
||||
ujrhfUJcHIFcSGAYRQIDgNxIYAC66STZTdy4B1J5mbj+B6DZPiduTKMbSGCY3lHiYtYnJDAgJxIYANRi
|
||||
C0vShIWql4ub2FF1uLj4LcQacqG4+jDqOtlMXCyBXEhgGEUCA4DcSGAAuu2n8iBx4x9YiPie+g9x/Q5A
|
||||
820nbmyj/UhgmN7PxcWsT+IZeXyGY37uKa5vYYAEBgC12MKSNGGhalX5m7jJHUM3Surt7N4sri547xMX
|
||||
RyAnEhhGxY8jFysASIUEBqAfJuR24uYBYD7eKa6vAWiHb4sb22g/Ehimd4W4mAF1rSyub2GABAYAtdjC
|
||||
kjRhYRTHGNTzGXHxm4+N5d/i6sGoq2Q9cbEEciKBYRQJDAByI4EB6I94aP88WU7cfADUtanE8Y+unwFo
|
||||
j4eKG+NoNxIYZraJuLgBdV0krm+BBAYANdnCkjRhYdRi+aO4CR5DN8s9xMVwro4UVwe8N4mLI5AbCQyj
|
||||
SGAAkBsJDED/fEs2EDcnAHV8XFzfAtAuvxCS2rqHBIaZPUZc3IC6ThLXt0ACA4CabGFJmrDg7SNugkfV
|
||||
ceLiNxdxLlUkQ7i/j1GXSJyF5mIJ5EYCwygSGADkRgID0E8XyP3EzQvATPiNDXTL48SNdbQXCQwze6u4
|
||||
uAF1fV5c3wIJDABqsoUlacKCF9nNp4mb5FG1RFwM6zpe3N+Fd4C4OAIlkMAwigQGALmRwAD01/XyFHFz
|
||||
AzCdb4jrTwDa6SyJ3WLdeEc7kcAwsxPFxQ2o66Pi+hZIYABQky0sSRMWpvf/xE3yqPqOuPjVsau4vwnv
|
||||
L7KSuFgCJZDAMIoEBgC5kcAA4BXi5gdgqjgv3/UhAO32HHFjHu10F3H3GQPXyariYgfU8S5xfQskMACo
|
||||
yRaWpAkLM/uRuIkeVTuLi99Mlpdfi/t78J4qLpZAKSQwjCKBAUBuJDAACK8RN0cAy8ROkr8U138AtFsc
|
||||
K8SCbndsLu4+Y2h3cbED6jhYXL8CCQwAarKFJWnCwsweKG6iR9XPxMVvJs8S97fg/UYi6cPFEiiFBIZR
|
||||
JDAAyI0EBgDLvFTcPAGEfcT1GwDd8CpxYx/tQwLD7A4XFzugjo+J61cggQFATbawJE1YmB3nR9Yzl8zY
|
||||
1SSyx93fgfcYcbEESiKBYRQJDAByI4EBwDI3y+PEzRXotzhq8E/i+g2AbrhC+P3ZDSQwzO4SWVFc/IDZ
|
||||
HCOuX4EEBgA12cKSNGFhdttKPChyEz6GTpPYstLFcKo3ivsb8H4qLo5AaSQwjOIBEoDcSGAAMNm/5V7i
|
||||
5gv01wHi+guAbnmnuDkA7bKuuPuLqkeJix8wmx+K61MggQFATbawJE1YqOdz4iZ8VD1BXPwm21CuFvfv
|
||||
4T1IXCyB0khgGEUCA4DcSGAAMNUfZA1xcwb6Zy25TFxfAdAt18rG4uYCtMfK4u4vqr4mLn7AbC4S16dA
|
||||
AgOAmmxhSZqwUM+WcqO4SR9DZ8licTFc5qPi/i28OMLExREYBxIYRpHAACA3EhgAOPG7ys0Z6J+3iesj
|
||||
ALqJ+b8bbhB3fzEUOyJvIS5+wHQ2EdefMEACA4BabGFJmrBQ3+HiJn1UPV1c/MLdhUSQ+uKL+jbiYgmM
|
||||
AwkMo0hgAJAbCQwApvMwcfMG+iMe0scb2a5/AOimeK52F3FzAtrjcnH3F1VHiosfMJ2niOtLGCCBAUAt
|
||||
trAkTViojwcD9ZwvK4mL4dfF/Rt4nxEXR2BcSGAYRQIDgNxIYAAwnbNlRXFzB/ohFnZc3wDQbceKmxPQ
|
||||
Hn8Rd29RFQk7dxYXQ8A5WlxfwgAJDABqsYUlacLC3Lxb3MSPqv1lauzi7SD338K7XtgmDU1DAsMoEhgA
|
||||
5EYCA4CZvFjc3IHuY4dDoN92EDc3oB3OEHdfMYrjdVHXmnKNuH6EARIYANRiC0vShIW5WU94iDy7C2U1
|
||||
WRa35eU0cf8tvA/K5L4HNAEJDKNIYACQG989AcwkfnutIm7+QLd9TVyfANAP3xc3N6AdfiDuvsJ7rLg4
|
||||
ApO9VFz/wRAJDABqsYUlacLC3L1J3OSPqtfIspg97dYy1HO1bCST+x3QBCQwjCKBAUBuJDAAmM1+4uYP
|
||||
dNeDxPUFAP2yi7g5As3HNvdzc6nwrBQzWV0isdf1HwyRwACgFltYkiYszN0acom4DwAMXS6xsLeq/PXW
|
||||
MtRzoLi+B4wbCQyjSGAAkBsJDABmc56sIG4OQfcsJ78Q1xcA9MupEnOCmyvQbO8Xd08xvR/JSuLiCbxd
|
||||
XL9BFQkMAGqxhSVpwsL8sIhXz1vkdVPKMLN/CAuiaCrmvlGMVwC5kcAAoI5HiptD0D2PF9cHAPTTE8TN
|
||||
FWi214q7n5jZx4WkHUy1o9wors+gigQGALXYwpI0YWF+ItvzfHEfAhiKoxCumlKGmb1CXJ8DmoAEhlEk
|
||||
MADIjQQGAHUcI24OQbesKOeI6wMA+inmhMXi5gw017PE3U/M7iNCEgOW2UTY/bk+EhgA1GILS9KEhfl7
|
||||
hrgPAWC+4stWHLnh+hvQBCQwjCKBAUBuJDAAqOM64XtJ971I3P0H0G8vEDdnoLkeIe5eop6jZWVxsUV/
|
||||
rC+/EddH4JHAAKAWW1iSJizMX2Q3/17cBwEwH88W19eApiCBYRQLBQByI4EBQF37iptH0A1ryiXi7j2A
|
||||
frtQVhc3d6CZ7izuXqK+X8kW4uKL7ot7z9rM3JHAAKAWW1iSJiwszOPEfRAAc3WWsOUfmo4EhlEkMADI
|
||||
jQQGAHV9Stw8gm54q7j7DgDh9eLmDjRTHE98k7h7ifr+LXEcL89U+2VPuVxcn8DMSGAAUIstLEkTFhYm
|
||||
ztv6pbgPA2AuIhnG9TGgSUhgGEUCA4DcSGAAUFe8gcuZ0N20kcQijbvvABDiO+Ntxc0haKbzxN1LzN2Z
|
||||
EovafA/qtk0kjg9xfQD1kMAAoBZbWJImLCzcruI+DIC6ThG+YKMNSGAYRQIDgNxIYAAwF/cQN5eg3Y4Q
|
||||
d78BYLL3iptD0Ew/EHcfMX+/lWfJKuJijnbaWN4t14q776iPBAYAtdjCkjRhIY0TxX0gAHU8TFy/ApqG
|
||||
BIZRJDAAyI0EhqrzJeZeNNuGsrncUx4ou8uT5dXyAfminC7XibvPmL+ni5tL0F53kxvF3W8AmCwW9zYT
|
||||
N5egeT4q7j5i4eI31EfkAbK8uPij2eJYkHhxNHZcuF7cfcbckcAAoBZbWJImLKSxo7gPBGA23xPXp4Am
|
||||
IoFhVCzSuFgBQCokMFT9RVyc0E4ryF1kb/mg/EZuFnfvUc8h4mKN9jpO3L0GAOfj4uYSNM/+4u4h0vq7
|
||||
HCaPlbXE3Qs0wzryJPmsXCHufmJhSGAAUIstLEkTFtLhoQLmY3tx/QloIhIYRpHAACA3EhiqSGDovtgi
|
||||
Nr5z/EJcH8DMYjtqF1e0U+xg4u4zAEwndmzZWtycgmZ5sLh7iHxukl/KofJEiURadmgYj5Ukdmt7rnxM
|
||||
zhQSmfMjgQFALbawJE1YSCfOGuVDFnPxBXF9CWgqEhhGkcAAIDcSGKpIYOiX+8u3xPUFeJeIiyXaZzn5
|
||||
mbj7DAAziZes3LyCZonnCe7+oayr5efyCYnjzmKnhh0kjkSLz2J371DP6rKV7CLPkIMk5qezheOxxoME
|
||||
BgC12MKSNGEhrU+L+2AApoovaXcV14+ApiKBAeguzkxvLhIYqkhg6KdHyAXi+gRGrSwujmiXx4m7vwBQ
|
||||
x/3EzS1olvPE3T80w/USvz9+KkdL7NzwVnmFPEceL7vKfWVb2UI2v1XsKhZJKss0eaeHFWVyW8O6suxa
|
||||
4rri+iK5eGfZQ+IIuGfJK+UdcrjEy3rfl98KR0A003ZunRAAprKFJWnCQlrxYR5fbNyHAzDZEeL6ENBk
|
||||
JDAA3UUCQ3ORwFBFAkN/3U5iy1/XL1B1J3ExRHsslj+Iu78AUMcPxc0vaJYvibt/AJDDtm6dEACmsoUl
|
||||
acJCeh8S9+EALHOtbCKu/wBNRgID0F0kMDQXCQxVJDD021ryG3F9A0MPFBc/tMcLxN1bAJiL3cXNMWiO
|
||||
l4u7dwCQw9ZunRAAprKFJWnCQnobyTXiPiCA8G5xfQdoOhIYgO4igaG5SGCoIoEBsbvAVeL6Bwbi6AEX
|
||||
O7TDGnKRuHsLAHNxhjR523oMjh5w9w4ActjQrRMCwFS2sCRNWMjjIHEfEEAsQsQZYq7fAE1HAgPQXSQw
|
||||
NBcJDFUkMCDsL65/YIA5vd2WiruvADAfTxE316AZVhRehANQykpunRAAprKFJWnCQh5rCw+b4bxeXJ8B
|
||||
2oAEBqC7WOxqLr5TVpHAgLBYzhbXR7Bk6XPExQ3Nt6FcLe6+AsB8nCsriZtz0Aw/EHfvACClf7k1QgBw
|
||||
bGFJmrSQz2vFfVCgvy6U1cX1F6ANSGAAuosEhuYigaGKBAYs8wxxfQSD72wuZmi+j4i7pwCwEAeIm3PQ
|
||||
DK8Wd98AIKVz3BohADi2sCRNWsgnFqpjwdp9WKCfXiCurwBtQQID0F0kMDQXCQxVJDBgmdWE8eG9RlzM
|
||||
0Gx3lRvF3VMAWIhLZA1xcw/G757i7hsApPR9t0YIAI4tLEmTFvJ6kbgPC/TPOcKWfWg7EhiA7iKBoblY
|
||||
oK0igQGTHSmun/TdUnHxQrN9Sdz9BIAU/lfc3INmOF/cfQOAVD7m1ggBwLGFJWnSQl6xYP1ncR8Y6Jcn
|
||||
iesjQJuQwAB0FwkMzUUCQxUJDJhsL3H9pO9IYGif+4u7lwCQyr9kPXFzEMaPI4QA5PYGt0YIAI4tLEmT
|
||||
FvJ7qrgPDPTHabK8uP4BtAkJDEB3kcDQXCQwVJHAgMnWlpvF9ZU+I4GhfX4i7l4CQErvFzcHYfweLu6e
|
||||
AUAqj3NrhADg2MKSNGkhv1i4/p24Dw30wyPF9Q2gbUhgALqLBIbmIoGhigQGTBVHtbm+0mckMLTLHuLu
|
||||
IwCkdr1sLm4uwnjF8+MLxN03AEhhS7dGCACOLSxJkxbK4IFEf/1QXJ8A2ogEBqC7SGBoLhIYqkhgwFRf
|
||||
FNdX+owEhvZYLGeJu48AkMOnxM1HGL93i7tnALBQcYzQcm6NEAAcW1iSJi2UsZycJO7DA90WZ5m6PgG0
|
||||
EQkMQHeRwNBcJDBUkcCAqQ4U11f6jASG9nieuHsIALnE0Uv3FDcnYby2FXfPAGChfuzWBwFgOrawJE1c
|
||||
KOeh4j480F1fEdcXgLYigQHoLhIYmosEhioSGDDV88X1lT4jgaEd1pALxd1DAMjp6+LmJYzfL8TdMwBY
|
||||
iAPd+iAATMcWlqSJC2V9V9wHCLonMtrvLq4fAG1FAgPQXSQwNBcJDFUkMGAqjusbRQJDO7xR3P0DgBJ2
|
||||
Ejc3YbyeIu5+AcBCPNytDwLAdGxhSZq4UNYO4j5A0D2fFNcHgDYjgQHoLhIYmosEhioSGDDVg8T1lT4j
|
||||
gaH5NpA4i9jdP4z6u2wkawPTWE/OFdd/4P1U3PyE8VpJ2J0HQEr/kdXc+iAATMcWlqSJC+V9SdwHCbrj
|
||||
ermDuPsPtBkJDEB3kcDQXCQwVJHAgKk4L3oUCQzN90Fx9w4e31NQx57i+g+m9xhxscR4vUnc/QKA+fiW
|
||||
WxsEgJnYwpI0eaG8reVGcR8m6IZDxN17oO1IYAC6i4WB5iKBoYoEBky1jbi+0mckMDTbneUGcfcOo06R
|
||||
5cXFEpjqRHH9CN7vhPHVPLGrCL8BAKTyHLc2CAAzsYUlafLCeBwl7sME7Xe1rC/uvgNtRwID0F0kMDQX
|
||||
Dy+rSGDAVJuL6yt9RgJDsx0r7r7Bu7+4OAJO7Mpzs7i+BI/fAc0Un+XufgHAXMRn4gZubRAAZmILS9Lk
|
||||
hfHYTOKYAfehgnbjYSG6jAQGoLt4cNlcJDBUkcCAqUhgGMVvkua6r7h7Bu9z4uIIzOQIcf0J3vmysrhY
|
||||
YnxuI5eJu2cAUNc33bogAMzGFpakCQzj835xHypor/hhsaa4+w10AQkMQHeRwNBcJDBUkcCAqUhgGEUC
|
||||
Q3P9SNw9w6hr5Pbi4gjM5HZylbh+Be9l4mKJ8XqluPsFAHU9zq0LAsBsbGFJmsAwPvGDKo4bcB8saKdY
|
||||
3HX3GugKEhiA7iKBoblIYKgigQFTkcAwigSGZnq0uPsFj36MhXi1uH4FL17IWUtcLDE+K8lZ4u4ZAMzm
|
||||
IlnRrQsCwGxsYUmawDBebxX34YL2iS334oeFu89AV5DAAHQXCQzNRQJDFQkMmIoEhlEs/DbPYvmduPuF
|
||||
UX+V1cTFEqgjjkQ4V1z/ghfPKF0sMV67iLtfADCbN7g1QQCowxaWpEkM47W2/EPcBwzahYUf9AEJDEB3
|
||||
8TnWXCQwVJHAgKlIYBhFAkPzPFvcvYL3RHFxBOZiT3H9C17sEruhuFhivL4g7p4BwHTiKKW13ZogANRh
|
||||
C0vSJIbxe5W4Dxm0R7xJs7y4+wt0CQkMQHeRwNBcJDBUkcCAqUhgGEUCQ7PETgJ/F3evMOpnspy4WAJz
|
||||
daK4fgbvQ+LiiPHaSHgBDsBcHCR2TRAA6rCFJcUkhrFbVS4U90GDdthD3L0FuoYEBqC7SGBoLhIYqkhg
|
||||
wFQkMIwigaFZ3iDuPmHUzbJEXByB+dhWol+5/oZR18uW4mKJ8XqcuHsGAFNFwtM6YtcEAaAOW1hSTGJo
|
||||
hP3Efdig+X4u7p4CXUQCA9BdJDA0FwkMVSQwYCoSGEaRwNAc68mV4u4TRh0lLo7AQhwhrr/B+6y4OGL8
|
||||
PinungHAZC+SW+YNtyYIAHXYwpKWTWQYu8VyjrgPHDTbzuLuKdBFJDAA3UUCQ3ORwFBFAgOmIoFhFAkM
|
||||
zXGouHuEUXH+/sbi4ggsxO0kzgJ3/Q6jYseK7cTFEuN1G+H5MYCZ/FZiremWecOtCQJAHbawpGUTGRrh
|
||||
SeI+dNBc3xJ3L4GuIoEB6C4SGJqLBIYqEhgwFQkMo0hgaIYtJLZjd/cIo14rLo5ACq8W1+/gfVtcHDF+
|
||||
95BI+HL3DUC/3Sjby3/nDLcmCAB12MKSJk9mGLvl5QxxHz5oHjLS0UckMADdRQJDc5HAUEUCA6YigWEU
|
||||
CQzNcIy4+4NRf5ZVxMURSGFlOVdc/4P3EHGxxPjtJe6eAei3t0llvnBrggBQhy0saeqEhrF7tLgPHzTP
|
||||
58TdQ6DLSGAAuosEhuYigaGKBAZMRQLDKBIYxm8HcfcGXizGuTgCKe0prv/BO1mWExdLjN9bxd03AP0U
|
||||
c/ZKUpkr3JogANRhC0uaOqGhEX4q7kMIzXGDbCnu/gFdRgID0F0kMDQXCQxVJDBgKhIYRpHAMH4/EHdv
|
||||
MOpEcTEEcoj+5vohvMeJiyPGL5JLPi7uvgHol4tlUxmZK9yaIADUYQtLcpMaxu7B4j6I0BwfEXfvgK4j
|
||||
gQHoLhIYmosEhioSGDAVCQyjSGAYr93F3ReMiqMZtxUXRyCH6G/R71x/xKizZLG4WGL8VpDjxN07AP1w
|
||||
vUx75I9bEwSAOmxhSW5SQyMcL+4DCeN3jWwk7r4BXUcCA9BdJDA0FwkMVSQwYCoSGEaRwDA+y8tvxN0X
|
||||
jDpcXByBnI4Q1x/hPVtcHNEMq8oJ4u4dgG6LhLx9xM0Nt3BrggBQhy0syU1qaITtxH0oYfzeLu6eAX1A
|
||||
AgPQXSQwNBcJDFUkMGAqEhhGkcAwPs8Ud08w6krZQFwcgZxuJ1eJ65cY9TeJRXIXSzTDakISA9A/B4ib
|
||||
E/7LrQkCQB22sCQ3qaExjhH3wYTxuULWFne/gD4ggQHoLhIYmosEhioSGDAVCQyjSGAYj1jgi4U+d08w
|
||||
6pXi4giU8Gpx/RLeq8TFEc0RSQzs6Av0x6zJC8GtCQJAHbawJDepoTHuIjeK+4DCePCDDX1HAgPQXSQw
|
||||
NBcJDFUkMGAqEhhGkcAwHq8Vdz8w6g+ykrg4AiWsLOeK658YxQs97RDz6ufE3UMA3XCTxI5fbg4Y4dYE
|
||||
AaAOW1iSm9TQKB8T90GF8i4QtsxD35HAAHQXCQzNRQJDFQkMmIoEhlEkMJS3njBf1/cYcXEEStpTXP+E
|
||||
9w5xcUSzLCdvEXcPAbRbHH/0KHFj33JrggBQhy0syU1qaJTN5FpxH1go67ni7hHQJyQwAN1FAkNzsSBW
|
||||
RQIDpiKBYRQJDOUdLO5eYNR3xMUQGIcTxfVTjIrnkxuJiyOa50lynbh7CaB9zpGtxY33abk1QQCowxaW
|
||||
5CY1NA4PQsYvtrdcLO7+AH1CAgPQXSQwNBcJDFUkMGAqEhhGkcBQ1h3lenH3AlVxTObdxcURGIdt5WZx
|
||||
/RWjPioujmim+8n54u4lgPY4WuZ1jI9bEwSAOmxhSW5SQ+PEVpT/EvfhhTL2FndvgL4hgQHoLhIYmosE
|
||||
hioSGDAVCQyjSGAo6zPi7gNGfUhcDIFxOkJcf8WoSEK6i7g4opnWlS+Lu58Ami2OjNhX3Niuxa0JAkAd
|
||||
trAkN6mhkeIBlPsQQ36/kjg/zt0XoG9IYAC6iwSG5iKBoYoEBkxFAsMoEhjKuY+4e4BRl0sspLk4AuN0
|
||||
O4lFItdvMeoL4uKI5ornmi+Uf4u7pwCaJ+baTcWN6drcmiAA1GELS3KTGhppTblM3IcZ8tpF3D0B+ogE
|
||||
BqC7SGBoLhIYqkhgwFQkMIwigaGc74u7Bxh1gLgYAk3wanH9Ft724uKIZosjj74j7p4CaIY/ym7ixvCc
|
||||
uTVBAKjDFpbkJjU01svEfaghnxPE3Qugr0hgALqLBIbmIoGhigQGTEUCwygSGMr4f+Lij1G/l8Xi4gg0
|
||||
wcpyrrj+i1GRvOXiiOaL3Rjit9/F4u4tgPH4qzxHkn5fcmuCAFCHLSzJTWporFXlfHEfcMhjibh7AfQV
|
||||
CQxAd5HA0FwkMFSRwICpSGAYRQJDfsvLGeLij1GPEBdHoEn2FNd/4bFjabvdRt4h14q7vwDK+LPsL7H2
|
||||
48bqgrg1QQCowxaW5CY1NNqzxX3QIb0virsHQJ+RwAB0FwkMzUUCQxUJDJiKBIZRJDDk91Rxsceob4iL
|
||||
IdBEPxTXjzHqVxJv87s4oj3ie9RRcqO4+wwgj5Pk8ZJ1hyq3JggAddjCktykhkaLD7Q/iPvQQzrxpf1u
|
||||
4u4B0GckMADdRQJDc5HAUEUCA6YigWEUCQx5sTtifdfLXcXFEWiie8vN4vozRu0tLo5ony3lcIl5291r
|
||||
AAt3uXxAthE3DpNza4IAUIctLMlNami8+HHgPgCRzpHiYg/0HQkMQHeRwNBcJDBUkcCAqUhgGEUCQ16v
|
||||
FBd3jDpYXAyBJvu4uP6MUedI1reHUdzt5e1yibh7DmBu4piW2On5CbKKuHGXjVsTBIA6bGFJblJD48X2
|
||||
bKeJ+0DEwsWXis3ExR7oOxIYgO4igaG5SGCoIoEBU5HAMIoEhnzWFeblei6VtcXFEWiyDeVf4vo1Rj1f
|
||||
XBzRbitLHJf0E3H3HcD0rpBjZB9ZQ9wYK8KtCQJAHbawJDepoRV2E/fhiIV7r7iYAyCBAegyEhiai4Wy
|
||||
KhIYMBUJDKNIYMgnfi+6mGPU88TFEGiD14rr1xh1oawmLo7ohjvJG+RscX0A6Lub5JfyDnmgrCBuLBXn
|
||||
1gQBoA5bWJKb1NAaPxT3gYn5iwWC9cTFGwAJDECXkcDQXCQwVJHAgKlIYBhFAkMed5DrxMUcVb+Wxjy8
|
||||
B+Yhtvn+s7j+jVGvFxdHdM+9JO73yXKzuP4AdN0N8gt5jzxK1hI3XsbOrQkCQB22sCQ3qaE1HiDuAxTz
|
||||
90ZxsQYwQAID0F0kMDQXCQxVJDBgKhIYRpHAkMenxcUbox4iLoZAmzxeXP/GqPi+eltxcUR3xXErT5GP
|
||||
yTni+gbQdrG7wu9lQvaXHSWOWHFjonHcmiAA1GELS3KTGlrla+I+WDF3F8lYz6QCWoAEBqC7SGBoLhIY
|
||||
qkhgwFQkMIwigSG9bYU3Tev5krgYAm30I3H9HKPiTWQXQ/THpvIEOUi+K5eL6ytAE8X3vPPkO/I+eYbc
|
||||
R1YV199bwa0JAkAdtrAkN6mhVSLbb20ksbq4GAMYYs4BumslceMe4xfbUbp71le3ERcn9Nfy4vpKn8XW
|
||||
5y5WmD++B9fHdwp0CWO/vjXFxRD9Fomm/0/ihZgPywnyVyEpEOMQR4GdJcfLR+W18jiJo1FanagwHbcm
|
||||
CAB12MKS3KQGAAAAAAAAAACQwYoSyQ07yZMlFpI/JJ+XEyW27L9U3CI0MNUV8kc5Sb4uh0vsSPY8eZRs
|
||||
L3HkieuLnebWBAGgDltYkpvUAAAAAAAAAAAAxmix3E7uKveVXWVvea68Ut4sh8hhcpR8Wb4pkQTxKzld
|
||||
fidxDF2II4TjiL5wo7jFcORxkyyL/cWy7J7E/Yn79BOJHTqOk89J3M+4t2+XV8t+8iTZXR4od5dISohk
|
||||
GNd3IG5NEADqsIUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAAAAAA
|
||||
AAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAA
|
||||
AAAAAAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAA
|
||||
AAAAAAAAoCRbCAAAAAAAAAAAAAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQLAQAAAAAA
|
||||
AAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQAAAAAAAA
|
||||
AAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsBAAAAAAAA
|
||||
AAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAAAAAAAAAA
|
||||
AAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAAAAAA
|
||||
AAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAAVC1a
|
||||
srS0jeTB8ix5vRwqn5XvyIlyspw+xc/lBPmSfFzeLS+Vx8sSWVtcXQAAAGie28h95AnyKjlY4vvgN+Qn
|
||||
MvW74E8lvid+U+K/i++Cr5QnyQOE74Kozf0m6pOJiQkgt7Vle9lbXinvlvjfV+VEOd2I8h/IsXK4vE1e
|
||||
JLvLXWUlcXXNiRsTJdlCAAAAAABQ5R7qJbSh7CXvkXgY/S/5v0wukEiCeJs8Sm4rrk1dd5RMfejfBKdK
|
||||
LDyEuE9fkI9JLFj8r7xA/kdiMeN24q6tSz4nLk599jVZRVy8Svm6uLaVFIt035Xj5JMSSV6R7LWfxBjZ
|
||||
VtYR134M5BxfHxRXZw6xqOvagIGfSSRFutjl0JV+NQ6LZUeJhINIRj1X3He5hfqbHC8HysNlNXHt6YtS
|
||||
3zV2Fld/CZEU7do0H7fMKe73Ute4Rd2Ge624Be9cloprB7y15BEScfum/FX+L4Ob5HfyKdlftpHlxLVp
|
||||
Wm5MlGQLAQAAAABA1SL/MHAh7iWxIH2KuIfLpdwssZvDUtlOXFu7ZkW5Rlw82uY6OU1iAfcV8jDpykJE
|
||||
XMf14q6772LBycWshPXFtampLpcfyWHyPNlGVhB3bX1SYnxFX3F1p3aSuPox9GJxsUutS/2qlLVkXzlW
|
||||
rhJ3zbnFPYvEyf2lZLJLE5T8rvErWV5cO3J7q7g2zddL3O+lrnGLug12X7lR3IJ2Lr8V1xYM3VMiYeGn
|
||||
Uvr+THaxfFoeL6uIa2uFGxMl2UIAAAAAAFC1yD8MnKs15bkSDzDdw8AmOFNeKxuIu4YuiLcb3bV3xX8k
|
||||
3qyMxdrYetrFoA3iTUV3fX13o6whLmYl7CGuXW0Su9x8VZ4vm4q7zq7LPb7+KK7e1GLx8QZxbcDQ9uLi
|
||||
l1pX+lVusYi9m8QuC/GZ7a51XG6S78tTJBI+Xfu7pPR3jaeJa0duPxDXnvm6r/u91DVuUbehYkH6LHEL
|
||||
17mtK65NfXZHiaSFP4mL2bhdKR+XJeLafws3JkqyhQAAAAAAoGqRfxhYV5w3HDsc/FPcQ8Amijf7j5St
|
||||
xF1Tm8VOBe6au+jf8hHZQlwsmuwN4q6p734pLl6lxFE3rl1tFbvQxMLO02VlcdfcRbnH1yfE1ZvaQ8TV
|
||||
j6GrJY4mcPFLrSv9KpdV5YXyJ3HX1zRx1EQcZxHfY931dEHp7xoR0+gHri25pN55LP7WYvd7qWvcom5D
|
||||
vVvcQnUJjxbXpr6JIxoeKceLi1NT/UQeIyNHTLgxUZItBAAAAAAAVYv8A8HZxDblL5E2JS5MFW97f0w2
|
||||
EXeNbfQVcdfaZXEf4+zwdcXFpIliFwl3LX33XnHxKqXL2/VfIm+SNu9cUlfu8fVMcfWmFvfL1Y+huNcu
|
||||
djl0pV+ltpIcIBeJu66mu0IikaGLSV7j+K4RSROuLbmk3nnsBPdbqYumLug21I5yk7jF6RLeJa5dfbG8
|
||||
7CNxnIaLT1ucLA+U/16bGxMl2UIAAAAAAFC1yD8QnEmcs36KuAd/bRRbrr9IxnV2byrLyWXirrEPLpU9
|
||||
xcWmSSL5Z1xngTddHOHgYlZCX7brjzni5VLqrfXSSoyvu4irO7XviKsfQ6UWS7vUr1LaXdqy48Js4giP
|
||||
XcRdZxuN67tGfKfeUFybcki989hb3G+lLpq8mNtQ4zw6YpmTxLWtD3aRM8TFpa3if7cVOyZKsoUAAAAA
|
||||
AKBqkX8gOJ3YHvh6cQ/92u5HsrG4626Du4m7rr75kMQboS5GTbCduHZjvLtoPFRcm7rqN3J/cbFos9zj
|
||||
62Jx9aYWi49xPIJrA4Z2Ehe/1LrSr1KJBeovi7uWtvuwlD4GIYd7i7u+Ej4qrk05pO6Hu7rfSl0Ui7gN
|
||||
N86jI5a5XlYT176u2kyOExePLrhIdndjoiRbCAAAAAAAqhb5B4JTxdvJnxH3sK9LYhEhzh13MWi654q7
|
||||
pj76oawlLk7jFlttuzb33W/FxauUPm7Xf5McKF3ajSH3+PqiuHpT215c/Ri6TlYRF7/UutKvUoidcv4h
|
||||
7jq6IhK82rgjxmTj/K4RR3vdQ1y7Uovdt1wb5iM+E9dwv5W6aMIvXjfFuI+OmOwh4trYNcvJC+RqcXHo
|
||||
mjfLcm5slGALAQAAAABA1SL/QHCyWAg+UdzDvi6KHSYeLy4WTfYpcdfTV7+WJiYxfF5ce/su3np18Sql
|
||||
z9v1x/y+nri4tE3u8fVScfWm9hJx9WModk1yscuhK/1qIVaUQ8S1v4uukLYmtIZxf9f4lrh2pbSVuLrn
|
||||
61fud1JXTfhF7CZowtERk71RXDu7ZAM5Xtz1d9kXZFU3PnKzhQAAAAAAoGqRfyi4TCwAnyruQV+XxVtY
|
||||
TxcXk6Y6V9y19NlJUuoN3bouFNfWvttHXLxKYLv+JUv/LLEY5OLTJrnH1w7i6k3tWHH1Yyh2D3Gxy6Er
|
||||
/Wq+1pbviWt7l0VC6+PExaTpmvBdY1dxbUvl2eLqna9D3O+krprwC9lN0ISjIyb7jrh2dsUD5QJx194H
|
||||
J8hqbozkZAsBAAAAAEDVIv9QMKwkJ4h7yNcHkcTwGHGxaZqNxV0Dliz9uLiYjcMW4tqIQR92MSvhPuLa
|
||||
1DexFfc24mLUBrnHVyS5lDpuI44zcm3A0CPExS61LvWr+dhUfi+u7X3Qpu+CyzTlu0bshLW8uDam8Alx
|
||||
9c7XXu53UldN+MXscWvS0RHLxJEKi8W1t+2eIdeLu+4++Yas4MZJLrYQAAAAAABULfIPBcOR4h7w9ck1
|
||||
sq24+DTJE8S1HwNNWXx4mrj29d054uJVyovFtauPYtv0e4qLU9PlHl/xBrqrN7U4e9/Vj6E4Y38NcfFL
|
||||
rSv9aj62lNidxbW7T2Inhp3ExaiJmvRdI3ZJcG1M4Y/i6pyvDd3vpK6a8Ava49S0oyMm215cm9vsreKu
|
||||
ta8OduMkF1sIAAAAAACqFvmHgnuKe7jXR/GANI7ScHFqig+IazsG/iKxo4iLXUlHiGtf38VblC5epXxB
|
||||
XLv66gK5o7hYNVnu8fW/4upN7Vni6sfQL8TFLofc/WqpuHrH7Q7yN3Ft7qN/yObiYtU0TfquEUdZ5Eg2
|
||||
2lBcffP1R/cbqcsm/KL2ODXt6IjJXiquzW20nHxY3HX23ZPdWMnBFgIAAAAAgKpFow8F46zj2ErcPeDL
|
||||
Ld5yu1xiwTkSB+L/jf//teL++1LGvcA6m9PEtRtD+4mLXUlniWtb3z1dXLxKuUhcu1KIrddPn8XvJOa6
|
||||
ODYg5kD3d0r7rZR6wz2V3OPrYeLqTY1Ep9m9R1zscuhKv5qLWByOnXFce0u6UiKJYtn3wXF9N13mZFlR
|
||||
XMyapGnfNd4srp0LsZe4uubrE+43UpdN+MXtcdlJbha3qNwEXxTX7raJ5IWPiLvGcbhM/iJ/lL/Jv8T9
|
||||
d6X8UzZx4yU1WwgAAAAAAKoWjT4UfIu4h3up3SwnSdQXZ1nHG78riGtTuJ3cT54pR8l54v5uLg8R165x
|
||||
u43EGc2uzSnE33aLrtOJBdtYaAiXyX/E/d3SzhAXv1LWF9eulCLm7p403Z3ExayE2CLdxTKFSEZYVVy9
|
||||
M1lPtpMny7sk5snYMt/VkdOXxLWviXKPr4j/6uLqTm0HiaQ0N1ZSiB023DWm8k9x9aa0i7jYpdalflVX
|
||||
JC6dKq69OUWy6mfkGRJjYLoEqthNKT4z9pCDpHRbm7pjxjIlvmvM1b9lE3Htna/3iatrvp7lfiN12YRf
|
||||
4B6H1SQWsN2CclNcIq7tbfMBcddXwjlyqDxRtpY4MsS1cQXZQh4rsSvHmeL+Xi5fceMlNVsIAAAAAACq
|
||||
FlUfCMZi+NXiHu6lEg/sD5O7ytT65+oBEskMJd5ajreklxfXjnHaTVx7U4mFNFfvXMRCRNzvXWV/iXuW
|
||||
+uziOu4hrn0lPFZcm1K6j7i6Mb1YLHOxTOHn4uqcj3XlOfJLcXXl8lxx7Wma3OOr5JEFuX1Q3DWm8g5x
|
||||
9bZRLJK7a0ylaf1qOfmKuLbm8hP5H5kpgXU2W8vhcoO4OlKKpMxIfHPtaIIS3zXmI/VOZqeIq2e+7up+
|
||||
I3XZhF88HodDxC0kN81W4trfFq8Wd105XStxXMV9xLWprh3kGHF15LCzGzMp2UIAAAAAAFC1qPpAMOdi
|
||||
XohtbbeXqfUuVLyN921xdaa0r7j6x+lAcW1N5VBx9aZwN/mAlFh0CC8R144S3iuuTalE4tFCFoD66khx
|
||||
8Uwhdk9wdS7UwyWOeHB1phb9qg3nvuceXweLq7eNYgcDd42pPFJcvW3Ut34VW/27duYQuzWlPj7j7lJi
|
||||
R4Yvi6u/CXL32fmKXde2EdfmuYqk2JS7El3ifh913YRfKC6t6UdHTPZscdfQBrGbgbumnD4mG4lrz3xF
|
||||
f4mdHFx9Kf3cjZmUbCEAAAAAAKhaVH0omDMJIN64j61tp9aZSrw5GFv7urpT+bq4usfpRHFtTWVvcfWm
|
||||
FDsHxDnXrv6UPieu/hLi7GzXplRi7Lp6MbOzxcUzhceIqzOFxRIJEq7e1Jq8WLdM7vG1p7h622YtyXnk
|
||||
UCxSri2u7jbqU7+KZIK4f66dqX1EVhHXjoVaTb4qrt6U4pgfV/+45e6zC/E9cW2eq0jic39/vr7kfh91
|
||||
3YRfIC4px9ERfzBlqXxS3HU0XRzX8C9x15TD3+RB4tqSwrpysri6U8q6C4MtBAAAAAAAVYuGDwTjeISr
|
||||
xD3cS+HRMrm+XFInMcQD/T/LNySOrHB1jkucBX2NuHanspG4ulOLLZkvFteGVH4lru7cYkEl5duCzhvF
|
||||
1Y3pbSAulqncVly9KT1Fci5IL/NgcfU3QYnxFX3F1d02uY8c+rW4etuoT/0q5qq/i2tjSvF9Ko6Rcm1I
|
||||
aVWJ4zlcG1KZEFf3OJXoswv1KHFtn4vU3/Nf6n4fdd2EXxwuKfXRESfKPlPKUjpX3HU02crya3HXk8NP
|
||||
ZD1xbUlpLTlDXBtS+awbN6nYQgAAAAAAULVo+EDwzrc+yMtlZZlcXy6xE8O3xLVhJnGMQRxx8SWJYxme
|
||||
LPGGXTwQdvU0wY7iriWVP4mrN5fdxbUjlfPE1ZvbQ8W1J6WdxdWN6cXbzy6WKfxOXJ05vEhcG1I6QVzd
|
||||
TZB7fMUuHa7eNnqbuGtM5cPi6m2jPvWrz4hrY2rPF1d/DpEUeZ24dqTwHymRpDYXJb5rLNSZEjsIufbX
|
||||
9V1xf3u+dnC/j7puwi8Ml5L66IjrJXYauNOkshw2Fnc9TXWwuOvI4auyqrh25HBnuUZcW1L4j6zrxk4K
|
||||
thAAAAAAAFQtGj4QzP3gs+SbhneU68W141qJM8A/K2+SWMSMc5NXFPe3muyV4q4xlaPE1ZvTz8W1JYV/
|
||||
iqszt+hnrj2pRF9vcqJNU8X58y6eKRwmrs5cviCuHSktEVf3uOUeXx8TV28b/VDcNabyRHH1tlFf+tUu
|
||||
4tqXWiTPuPpzyjnHh/3E1TsuuftsKgtJZInkh6vF/d35iL+12P0+6roJvyhcQo6jI94uy/7+ZbeW5RA7
|
||||
PEy+libbQW4Sdx2pfV9WEteOnF4nrj2pPMWNnRRsIQAAAAAAqFo0fCj4OHEP91J5jkyuL7dYQDxJYhE+
|
||||
FvrjCIs7SRyV4f77NvqKuFin8mxx9eb0VnFtSeFycXXm9h1x7Ukl+rmrFzPLucV4HO3g6sxlE0m5qON8
|
||||
VFzd45Z7fD1dXL1tE0cORQKfu8ZUbi+u7jbqQ7+KxM3Yecq1L6WfyAri2pBTJLPGsRWuTSl8W1y945K7
|
||||
z6ZyidxG3DXMZntxf3O+vud+G/XBhF8QLiH10RF/lkiKWPb3jxf336XwQZl8LU21vJwm7hpS+73EkQ6u
|
||||
HbnFff+HuHalMOHGTgq2EAAAAAAAVC0aPhTMncBwlbDNfTpxVMY/xMU6la3E1Z3TAeLaksIfxdWZUyza
|
||||
5F5Yfpe4ujG91SXnWeGbi6s3p9xvG18pcba8q3tcSoyv2Ire1d029xN3famM64ieHPrSr+JNeNe2lOK7
|
||||
XyQSuPpLOFlcu1KIIypWEVdvaan7bByr5spTebu465jNi8X9vfla6n4b9cGEXxDOLfXREeGRMrmOA8X9
|
||||
dymcIZPraqpniGt/anGEw1bi2lDKu8W1LYUfubGTgi0EAAAAAABVi4YPBXe99WFebp+QbWVy3Zi7rcXF
|
||||
N5VLxdWbW84dGH4grs6cUr8t6DxGXN2Y3sPFxTKFv4mrM7ctxLUnpd3F1T0uucfXReLqbaNXibvGVD4j
|
||||
rt426kO/imSkC8W1L6WXiau/lJzfKcIDxdVbWuo++0bJuXtF7Aazmbhrmckx4v7efD3c/Tbqgwm/GJxT
|
||||
jqMjjpWp9TxG3H+bQiRfrC1T62ySOMrhfHHtT+0F4tpQ0n3EtW2u/iVnSuzgcYS8Ue7sxk4KthAAAAAA
|
||||
AFQtGj4UjLcB3cO9XM6QOBP5/hLbGE9uC2b3PHFxTeXL4urNLbaadu1J4VBxdeb0EnFtSem24urG9JaK
|
||||
i2UKR4urs4TTxLUplXGMoZnkHl9fEFdvG31N3DWmsp+4etuoD/2qxO4Lf5A4usTVX8qe4tqWSsTR1Vta
|
||||
6j4buwh9fEpZahPirmUmfxH3t+YjdmFaw/026oMJvxic06HiFo7nKxacN5Wp9Wwk7r9PZeqOD02zn7h2
|
||||
p3ayxFEVrg0lLSeXimvjMjdIHDXyI/mMvEOeL7vLvWQdN0ZysoUAAAAAAKBq0fCh4PLyT3EP+XK7RuLt
|
||||
+ANlD5nPW1l982lxsUxlHG9N5t7ifB9x9eZ0rLi2pPI7cfViZt8TF88UXiiuzhIOEtemVCLxzNU7LrnH
|
||||
V2xX7uptmzhy6HJx15jKPcTV3UZd71fRHyK5wLUtpb3E1V/SPcW1LZVDxNVbWso+G9/Jo49sKP+6tSyX
|
||||
2DnCXY+zkbi/MV+nuN9FfTHhF4NzeYi4heWFeKm4usIF4v5NCgeJq7MJYjE/9S4X07mfuDaMw5FyinxJ
|
||||
3i8vl71lR9lYRhIt3JgoyRYCAAAAAICqRdWHg18U95BvHGKxJRYZ3yNPlrtLnPE7tc199WdxcUtlibh6
|
||||
c1lTYjHetSWFm2Q9cXXnFFuFu/akcpi4ejG9xZLzfPttxNVbwuPEtSmVeGN1ZXF1j0Pu8XUfcfW2TXx+
|
||||
uutLJT6vIwnS1d1GXe9Xu4hrV0pnShP6RHzuu/al8i1x9ZaWss+eIsv+7mtvLcvlhzL5OmbyWHF/Y77e
|
||||
534X9cXUBd2M1pB4+90tgs/X6bJYXH3hOHH/LoWfiKuzCXYT1+bUviqu/tZwY6IkWwgAAAAAAKoWVR8O
|
||||
xtty7iFfU8SZuSfLh2VfuYtMvYY+2ERcfFL5t8Qir6s7h7XkBHFtSeW74urO6c7i2pLS3+X0homt6lcR
|
||||
F5Mm2EFcLFOIXWzGuWh3N3HtSune4uouLff4iiSXriTNxfEO7hpT+bq4etuoD/0qjrlxbUspEk9d3aXF
|
||||
EWWufanEZ56rt6TUffZwWfa347M8d8JsJCZMvp7pvFPcv5+vPd3vor5wi7qZfEjcIvh83SzxZr2ra5nX
|
||||
i/u3KfxHVhFX77h9XlybU9tJXP2t4cZESbYQAAAAAABULao+HIxF6/PFPehrqsvkm/Ia2VH6sEtDHIXg
|
||||
YpHK98XVm0Ps9HC2uHakNI6trJ8hri19EG/4upg0wUvFtTmFmItcnaWsLq5dKdVdbMot9/j6jrh62yjO
|
||||
mnfXmEp8/rp626jr/WoNybkDTbhEVhJX/zi4NqZyjrg6S0rdZyPhafLff4K4/y6VOM4kEk0m1+nEbg3u
|
||||
38/XBu53UV+4Rd0Mchwdcbi4uibbVdy/TeVB4uodp7XkWnHtTelUcfW3ihsTJdlCAAAAAABQtWj0AWHs
|
||||
bOAe9LXFlRJvg8YZ03cSd41t90Fx157KUnH1phJnKz9QjpGbxbUhpVhgKLmjxDJHimtP18U9XVtcTJog
|
||||
51E5sd22q7Ok2KnGtS2V/cXVW1ru8fVGcfW20V/EXWMqDxBXbxt1vV/tKa5dKb1LXN3jkDup60Jx9ZaU
|
||||
us/GLkWT/358Z/uJuP82lQNkcp1TxXe42B3M/dv5ONv9JuoTt6ibWI6jIy6RdcTVN9m64v59Kq8TV+84
|
||||
7SOurantL67+VnFjoiRbCAAAAAAAqhaNPiSMB5U/EPfAr41+K2+T7cRdbxvFlsXuWlN5uLh65yP600YS
|
||||
C1zxVt9R8ldx9eYSbye6tuVWYmeJJoqzz108muJice1OYSdxdZZ0ubi2pZI7wamu3OPrIeLqbZtNxV1f
|
||||
KtfJyuLqbqOu96uPiWtXSvcUV/c4rC+ujanEsUGu3pJS9tkbxI3n7SVnwuk/ZKbExzi6yP27+TrS/Sbq
|
||||
E7eom1jqoyPCvuLqcv4o7m+kcLy4Osfp0+LamtJNsoG4+lvFjYmSbCEAAAAAAKha5B8UbiwXiXvo12aR
|
||||
zBBvD68p7rrbYC25Sdz1pRIL0JEkMV9/knjjN473yN3W2Zwqy4uLZU63E9eePjhCXEya4K7i2pzCfyTO
|
||||
C3f1lhQLQa59qTTh7erc4ysW8VYTV3fb5D5y6Mfi6m2jDcRdYypN6FfnimtbKnEcgKt3XO4hrp2pjDuB
|
||||
IfVc+Ctx9YRIQHX/JpX3iKs3PF/cv5mvZ7jfRH3iFnUTynF0xA9kOXH1OUeL+zspXCkriKt3XC4U19aU
|
||||
fiyu7tZxY6IkWwgAAAAAAKoW+QeFIbaQ/Ze4B39tFw+c4y3iSAZw195ku4m7Joy6UeKtQRfH3B4nrk19
|
||||
8ExxMWmCZ4lrcwo/FVdnabnn7UPE1VtS7vF1krh62+hD4q4xlbeLq7eNut6vYjck166UmnR8RMj9nek8
|
||||
cfWWkrrPxnzh6gmR3Hy1uH+XQiQB3lFc3Z8S92/m687uN1GfuEXdRHIcHXG93E1cfdN5ubi/lcp24uod
|
||||
hy3EtTG1V4mrv657yekt8Cu5uxs3qdhCAAAAAABQtcg/KFzmgXKluId/XXCJxIJmHHPgrr+J4jgMdy0Y
|
||||
9QZxMSzhfeLa1Ad3ExeTJviEuDancJC4OktaUVzbUprpLdlSco+vJlxjKmeIu8ZU/p+4etuo6/3qUeLa
|
||||
lVIkDLi6xyV23XLtTOU34uotJXWffZK4epZ5k7h/l8rnxdUbO3u4/34+Yoc5+5uoTyb8AnMKOY6OeJu4
|
||||
umbyIHF/K5UDxNU7Dk8U18bUthZXf10RM/d3m+h9btykYgsBAAAAAEBVPMSbxb0kjgNwDwG74tuyobjr
|
||||
b5ofirsGVH1RxnF0xDKniGtX18XxBU1OCPqjuHansLu4OkuKt1dd21KK3Wtc3SXlHl97iKu3bWKXoZzn
|
||||
1sffbuNORtPper96rbh2pRK7Hq0hru5xOUxcW1M5QVy9paTus3cSV88yq8r54v5tKveTyXWuI+6/m69j
|
||||
xf4m6pMJv8C8UDmOjviTrCquvpmsLjeJ+5spfF5cvePwdnFtTOkv4uqei5zHeqS2lxs3qdhCAAAAAABQ
|
||||
FQ/xalhXviTuQWBX/F3i2Ax3/U2xklwrrv0YigWFcZ4zHgs4sZDj2tZ13xQXkyaIJCXX5hRiITcWWVy9
|
||||
JT1EXPtSOkBc3aWUGF/ri6u7bWJ3BHd9qcTuDq7eNupDv/q4uHalcrq4esfpZHFtTSWONnD1lpC6z14s
|
||||
rp6pniju36cSxzFNToTcRdx/N18vFvubqE8m/ALzQuQ4OiL8P3H11fE7cX8zhYvE1TkOXxLXxpTif67u
|
||||
uThf3N9uovXduEnFFgIAAAAAgKp4iDcHe0nuN6/GKc72fai4a2+CeCvNtRtDx8s4kxfCw8W1rQ/GeWzH
|
||||
bGL+cm1OYdzbiC/zMnHtS+kJ4uouJff4OktcvW30dnHXmMpM5+W3TR/6VST3ubalMiGu3nGJ7wK5k1Le
|
||||
LK7uElL32ePE1TNVJBf8TNzfSGVvWVbf628tS+U+Yn8T9cmEX2BeiI+KWwheiC+Iq6uuT4j7u6lsKa7e
|
||||
0k4V176U9hNXd12bivu7TfQ7N2ZSsoUAAAAAAKAqHuLNUWwf+xKJHQvcg8G2u0ruLe7ax+1V4tqMgTgL
|
||||
egVxsSsptth37euDJicAHSKuzSl8RFydpX1GXPtSuq+4ukvJPb4+Kq7eNvqRuGtMZR9x9bZRH/rV78W1
|
||||
LZU4osLVOy4lkgnHmdCVus++Wlw9zhJxfyOVcyV2HYu6vnxrWQqRqHzL90T3m6hPJvwi83ztKm4heCGu
|
||||
kk3E1VfXC8X97VSeIa7e0i4V176U7iGu7rqeIO7vNtFhbsykZAsBAAAAAEBVPMSbp3iwGIsX35WbxD0o
|
||||
bKvz5LbirnucviquvX0XyTSPFhezcfieuHZ2XcwDTTv/fLJfimt3Ck8SV2dJ8VZsicSy24irv5Tc4+up
|
||||
4uptm/iMvk7cNaayqbi626gP/SqOCHBtSyWOFnD1jkskNbp2pnQ3cXWXkLrPPkhcPdOJHTfc30nl5RL1
|
||||
XDCpbKG+I7e03/0m6pMJv8g8H7eRHEcDvERcfXOxg7i/ncrHxdVb2s3i2pfKDbKiuLrrer+4v91E+7gx
|
||||
k5ItBAAAAAAAVcse5C3QBvJ8OVFuEPfQsG3Gea6xE4uT/xDX1r76j7xX1hIXs3FYLPGGn2tv150mLiZN
|
||||
kPt8+83E1VvStuLaltKfxdVdSonxdSdxdbfN/cVdXyp/EVdvG/WlX/1TXNtS2VlcveMSb/G7dqZyhSwv
|
||||
ru7cUvfZ+O4eO6y5uqYTCUzXiPt7KUR/veeUsoV6k9zSfvebqE8m/CLzfBwhbhF4IU6TxeLqm4uVJRbf
|
||||
XR0p/FFcvSWtLa5tKZ0lru65+IW4v91EG7oxk5ItBAAAAAAAVcse5CUUb+fuIYfLOeIeILbFDuKucRzu
|
||||
Lq6NfXStvF+asGg8Ve5tlZvsw+Ji0gS7imtzCueLq7O0t4trX0rjPuM+9/iKHSxcvW0U28G7a0xl3H0h
|
||||
pfisd9eYSlP6lWtbSncVV+84xFFgro0pfV1c3SWkngt/Ia6e2eQ+euW3pmwh/nvMlftN1CcTfpF5rnIc
|
||||
HRG7CdxXXH3zcYq4elLZUFy9pawvrl0pHSeu7rpWkxvF/e2mOduNl9RsIQAAAAAAqFr2IC+jjWRvOVRi
|
||||
C/c27dBwnLhrGof9xLWxT/4q8bB8PXExaoKXiWt7Sqc31P+Ii0kTvEVcLFP4jLg6S4q3gCORwrUvpeeJ
|
||||
q7+U3OPrGHH1ttHXxF1jKvGZ5Opto770q9i1yLUvlc3F1TsO8Z3TtTGlA8TVXULqPhvxcvXMZjX5m7i/
|
||||
2TSxC1O095a2u99EfTLhF5rnItfRER8RV998HSaunlT2EldvKZuLa1dKscuGq7uuB4v7u030MTdeUrOF
|
||||
AAAAAACgatmDvIJWlu3lOXKYnCK5H6rPVzzs3FDcdZSW+6zhpootkmPx59GygrjYNMmXxF1HKr8XVy9m
|
||||
doK4eKbQhIXcR4lrW2q3F1d/KbnH1/7i6m2bSGi5XNw1phK7Arm626gv/Sr3MVTriKu3tPieeZm4NqY0
|
||||
zmNBUvfZJ4qrp44ni/ubTXOy/Lfd7jdRn0z4hea5yHF0RIhjGU5P6O/i6knl/eLiU8p64tqV0nvE1V3X
|
||||
a8X93SZ6ihsvqdlCAAAAAABQNflh3hitKLHd77KkhlPlJnEPIEt7trg2lxbnjbv2dc118jN5t8SibCxE
|
||||
uHg01SXiriuVj4qrF9OLs8JzntN9D3H1lvRjcW1LKXbQcXWXlHt8bSeu3raJPumuL5VIjlhOXN1t1Jd+
|
||||
lft7xNri6i3tmeLal9KvxNVdSuo+u5DdM2IuiCMo3N9tkvfIf9vtfhP1yYRfaK4rx9ERbXWquBiVsqq4
|
||||
dqW0VFzddX1d3N9tok3deEnNFgIAAAAAgKrJD/MaZg3ZRf5Xvi/j2qXhU+LaV9Km4tqWShzr4Y4ESOkk
|
||||
OVG+IrGjwpHyLnmVPF0eJneQeHPYxaAN4vxvF9+UniqubkzvvuJimUIs5I67z8aZ3q5tqb1UXP2l5B5f
|
||||
V0kbdnmpI/eRQ3E8hau3jXL3qyulKf0qkkNdG1PZTFy9pf1aXPtSGud8mLrPxhEQrp65uL+4v90ke8h/
|
||||
2+x+E/XJhF9oriPX0RFtdZNETFysSok2uLalspAdGJaTf4j7u01zrhsrOdhCAAAAAABQNflhXsOtLnGM
|
||||
QLyBHgtN7uFkDvEg3LWnpH3EtS2VeHvb1Yu5eZa4+KZ0R3F1Y3ovFxfLFL4urs5S4s3X2BnBtS2lSCBb
|
||||
T1wbSsk9vo4XV28bfUbcNabyanH1tlGf+tXnxbUxldhJy9Vb0m7i2pZS7BS1rrj6S0jdZ48WV89cfU7c
|
||||
32+K9eW/7XW/ifpkwi8215Hr6Ig2201crErJfUzGZ8XVW8edxf3NJjrKjZUcbCEAAAAAAKia/DCvRVaT
|
||||
l8nV4h5SpnSFuDaU9CFxbUvlHeLqxdx8Qlx8U7lAXL2Y2ZfFxTOF14irs5QSSTOhCTvR5B5frxdXbxud
|
||||
J+4aU4m3rV29bdSnfvVmcW1M5bHi6i2l1FEGHxdXfymp++wLxdUzV7EDx7Xi6hi3s6TSXvebqE8m/GLz
|
||||
bDg6wjtQXLxKOVFcu1L5tbh664gdGI6S0xP5p7g2pvB0N1ZysIUAAAAAAKBq6gO9STaQOEf7ERLb1sdC
|
||||
3fsltv+PN/b/IBuJ+7elbC/xJpx7WJmSq7ukM8S1K5X/J65ezM0fxcU3lVRvSfbNpeLimcIDxNVZwoby
|
||||
T3HtSu3u4tpQUu7x9WBx9bbN7cVdXyrxmbuSuLrbqE/96gni2pjKW8TVW0okULh2pXSz3E1c/aWk7rPb
|
||||
iKtnPqIPuDrG7QiptNX9JuqTCb/YPJO1haMjvB+Ki1kph4trVyo3y7ri6i5pDblMXBtT2NyNlRxsIQAA
|
||||
AAAAfbZoydIVZRNZInEcw/NkqRwmX5WTJc7CvV7cA8CpYheEygPBMThUXNtScvWWspbEA3PXrhTib0cd
|
||||
rm7UF4vJLr4pvUhc3ZjeVuJimUIs5K4srt7c4k3jb4hrV2pfFNeGknKPr/jMW1Vc3W3zRHHXmMqPxNXb
|
||||
Rn3rV5uKa2cqPxRXbwkxF+dORglxTIKrv5TUfTaS4JYXV9d8xHFvfxdX1zg9TSptdb+T+mTCLxDPJN6i
|
||||
d4u+mJi4TlYSF7cS9hfXrpSeJ67ukt4qrm0p/NWNk1xsIQAAAAAAfbNo8GAyFqAuEfdQbyHOl3G/ibmP
|
||||
uLalcpW4ekuJ3RFcu1KJ3R1cvZibx4uLb0op35Lsi+eIi2UK41zIfZu4NqV2g9xZXBtKyj2+fi6u3jb6
|
||||
sLhrTOXt4uptoz72q9g9y7U1hZskFthdvbnFUViuTSnFfLiluPpLSd1nvymunoV4uri6xmkLqbTT/Wbq
|
||||
kwm/QDyd3cUt+mLoAeJiV8J24tqU0pkSx0G4+kvYSiJRxLUthQk3TnKxhQAAAAAA9M2iwcNW9zAvlXGf
|
||||
AZ97gf/P4uotJRaLXLtS+ZC4ejE3cbyKi28qV0rKtyT74pPi4pnCOBZyY+eF3OfYT3awuHaUlnt8vUtc
|
||||
vW30a3HXmMpu4uptoz72q2iTa2sq4zhGIo46y7lT1TLvFld/San77GvF1bMQ8V3ll+LqG4cLZaSd7jdT
|
||||
n0z4RWInjo64QNyiL4ZeIy5+JSwvl4hrV0rPFFd/bivLKeLalMqz3TjJxRYCAAAAANBHi/Juq/sfua+M
|
||||
PBws5A3i2pXKt8TVW0q85e3alUrsYOHqxdz8Slx8Uxl3P2yrP4mLZwqRPOXqzGVt+YK4tuRwnqwhri2l
|
||||
5R5fjxFXb9tEH8m5kBtv2HfpyKE+9qt7iWtrKv+SjcXVnUNcTyT4ubakFDuOrSmuDSWl7rMPFFfPQsXf
|
||||
dfWNw+dlpI3u91KfTPiFYoejI+r5urj4lXKEuHaldLlsJq7+XGLXh0+Ja09KW7pxkostBAAAAACgjxYt
|
||||
WXqIuId6qVwq28rIA8LMYnHtb+LalEq87ezqLiGO54hz9l27UtlEXN2oL/phLOy5+KaS4y3JrttIXCxT
|
||||
iEXiUgu58TbrvhJvkbq25BJvNbv2lFZifN1WXN1t80hx15fK6eLqbaM+96uTxbU3le/KCuLqTuneEt8/
|
||||
XRtS21VcG0pK3Wfj++Uq4upK4Rhx9Za2v4y0z/1e6pMJv1g8FUdH1HeFxE4ILo4l7CSuXamdKmuJa0Nq
|
||||
Ec+PiGtHShe5MZKTLQQAAAAAoI8WDc7Odw/1Uoq37p4gIw8JM1lZviGuLSk9SFz9JdxfXJtSGffxGF0R
|
||||
CxsuvintJK5uTG9vcbFM4Qxxdaa0ujxTfieuDTm9T1ybxiH3+DpTXL1t9A5x15jKB8XV20a5+1WMW1dv
|
||||
EzxeXJtT+oysKK7+FJ4k/xZXd2pN6fep++xPxNWTyuaSOwm3ju1kpH3u91KfTPgF48k4OmLu7iUuliXE
|
||||
TgW/Edeu1H4m64lrRyqRJPFVcfWndrQbIznZQgAAAAAA+mrRkqU/FPdgL7WvytYy8rAwobtL7q2fw18k
|
||||
zpx3bSjh1eLalcqnxdWLuYkzv118U4ljWnK+JdlVh4qLZwofElfnQt1Oni6x5fVV4urO7SSJBDHXvnHI
|
||||
Pb4OE1dvG/1Y3DWm0qUjh/rcr2JXl9hNw7U7pTgC607i2jBfm0nJo3Tiu2ZT5sPUffYgcfWklDupajbx
|
||||
OWp3A3G/lfpkwi8aT8bREXP3QnGxLOVp4tqVw/nyCHHtWKg95a/i6s1hPzdGcrKFAAAAAAD01aIlSx8l
|
||||
7uFeDrG9euyOEG9Ax1vEIw8O5ym2Cz5KbhRXb2pLxbWjlK+Ja1cqzxVXL+bmBHHxTSX3W5Jddaq4eKaw
|
||||
kIXcOBomFuF2lD3ljXKsnCOurpL+LnH0hmv3uOQeX08RV2/bxCIrRw7V1/d+9TBx7U7tWokdXRaayBDH
|
||||
lH1UrhdXTw6XyB3EtWccUvfZOHLG1ZPSmnKRuPpLOF5cu+xvpT6Z8AvHy+Q6OuJfcvoYXS6uXakcLS6e
|
||||
pawgvxPXtlxOlEfJiuLaVNfKsrecJK6enLZyYyQnWwgAAAAAQJ8tGpxL7B7w5RRvj58o8RbWU+WBsrGM
|
||||
PEycIv6b+G/jbeSPyB/F/f1crpT1xLWthNj54XJxbUvlbuLqRn2xRfY14uKbSvSDeFu2bey504XcRnKe
|
||||
b3+2uGt24qiW2M3lCvmnuL/XBDHnxXFDLp7jUmJ8xTbnru62eYC460ulS0cOLRb61ZKlE+LansvJcqBE
|
||||
Qm0kNEx3xEQked1LIlEsdtKJ+dP9vZwiGahJRzelngsj0XhtcXWlFkchuTaU8AZxbbK/k/pkwi8ih5xH
|
||||
R8QOAa7OUt4srl2pRNxcvSU9TFzbcrtUIoHjBfIg2UDiWAvXxrCu7CwvkmPkCnF/N7do93JujORkCwEA
|
||||
AAAA6LNFS5beQ24Q95BvHGIx70KJhZFIUDj/1rImnJn7Uhl54FlQ3CvXrlQuk3Eej9EV8Ra9iy+WLP2b
|
||||
uJiVsJu4NsGLhbEmLdYtk3t8jbOPpvYacdeYSpeOHKJfDawj0VZ3DaXELgeRoBA70ERbIpHK/XclRfLb
|
||||
48TFbFxS99lfi6snhziyJOeOSDPZWVyb7O+kPpnwi8oh19ER8ab+TAvaJeTaWWKyO4qru6QjxbWttBvk
|
||||
7/IX+b2cI5fIdeL++3E41o2P3GwhAAAAAAB9t2jJ0teLe8iHoZ+LPTO3oP3EtS2Vr4irF3PzCnHxxZKl
|
||||
R4uLWQnxlq9rE0bFgmETkxdC7vE1zj6a2tfFXWMqzxNXbxvRr4ZiYbzksQxNF8kLTxYXq3FK3Wc/LK6e
|
||||
XB4krh05Rb9eTVx77G+kPpnwC9+5Fvivl63F1VnShuLal9JTxdVd0hpylrj2oepFbnzkZgsBAAAAAOi7
|
||||
RYM3ob4h7mEfliy9VOJ8+pGHnYV9Rlz7UomH4a5ezM1x4uKLJUtfJC5mJcSxNa5NqIodcLYXF8MmyD2+
|
||||
Xiiu3raJz/XcRw5tLa7uNqJfVe0r7jr6JpIXniUuRuOWus/G8Ryunpy+JK4tuZwkrh23cL+R+mRidNH7
|
||||
tnKhuEXehXqbuDrH4XxxbUzlCHH1lraVXCmujRi6pxsfudlCAAAAAABwSxLDmnKauAd+fRbbqN9fRh50
|
||||
jsF54tqYSrx16epFfXEERyS8uPhiydJ7iotbbnF+eu7z7bsgPgOakKw1nRLjaxtxdbdN7iOH/iFdOXKI
|
||||
fuW9TNy19EW8rb+XuNiMW44+u6m4unK6k/xHXHtyeJe4dtzC/T7qk4nRBe/PiFvgXahzZVVxdY7Dl8S1
|
||||
M5XY+cDVOw47yTXi2omJictleTc+crOFAAAAAABgYNGSpetLnIHrHvr1USx4PlRGHnKOwe3FtTGVuNYV
|
||||
xdWN+rYSF18M3gaPt8Jd3HLLfb59Fxwmq4iLX1PkHl9xdMa4+mhqzxd3jal8VVy9bZS7X/1T2tqvXiLu
|
||||
mrruEokjDlxMmiB1n/2LuHpKeKe4NuXwGHFtuIX7bdQnE9WF7j3ELfCm8EiZWt84vUZcO1NaX1zd4/BQ
|
||||
IYnBO86NjRJsIQAAAAAAGFq0ZOlacoK4B399Em+23U9GHnCOyRPFtTOVH4irF3PzHHHxxZKlXxEXsxJe
|
||||
Ka5NWLL0ItlTXNyaJvf4+qa4etvos+KuMZVXiau3jehXM4ujBa4Vd21d9CvZXFwsmiJ1n50QV08Jt5GL
|
||||
xbUrtduKa8Mt3O+iPpkYLnDH0REXiVvgXahjZXJdTbCLuLam9FhxdY/LfSTX8SBt9hI3NkqwhQAAAAAA
|
||||
oGrRkqWL5b1ys7gHgF33C2naw+sPi2trKm8VVy/m5pPi4oslS18hLmYlRPKEa1Ofxfz+cZlxQadhco+v
|
||||
14qrt43OF3eNqTQpwW+h6Fez20HiLX13fV3yPokjh1wMmiR1n32euHpKKZH8eaa4uv/L/Sbqk4nh4nau
|
||||
oyP+JZvK5LqaYC1x7U3pYHF1j9PG8hNx7W2ruJ63Timbi3u7sVGCLQQAAAAAAFWTHuY9RM4T9yCwi26S
|
||||
A6WJRynkPtpjV3H1Ym7+JC6+WLJ0ibiY5RZnhV8mrk199TMZ1/1YiNzjaydx9bbNZuKuL5V4G78Ni7x1
|
||||
0a/qWUc+L+4a2+6P0qb7lLrPbi2unlJWkNzfcw8XV/d/ud9EfTIxWNTOeXTES2XyAnqT/FFcm1M5RVy9
|
||||
47ZYXi//EdfuNnmfrCT3mFQ2F1fKCm5slGALAQAAAABA1ZQHemtKLOpfI+6BYFecJE1d0Ftbcu6GEYkb
|
||||
a4irG/VtLC6+WLL0aomdXVzccouFGdemPjpNHi0uTk2Xe3z9R1YRV3fbPEncNabyQ3H1ttFG4q4xlS71
|
||||
q2X2kgvEXW/b/FteJ226R6nnwn9IJPq5ukp6qLj2pbKvuHr/y/0m6pOJvEdHnC6xWD51Ab0pcu06scyN
|
||||
soa4uptgK/m5uLY33fmyqyy7luXkYnH/7Uy+7sZFKbYQAAAAAABUuYd6sol8RLp2DnJssx0PNZvw8HY6
|
||||
jxTX9lTivGdXL+bmCeLiiyVLvyMuZiXE1tiuTX1yguwmTZ7nZpN7fP1UXL1tFJ/V7hpTeZu4etuIfjU/
|
||||
y5JbIznNXXfTRWLJIRIJLO76mix1n40jllw943CcuDamcEdxdf6X+03UJxP5FvFvlh1l2QJzE8XuEK7t
|
||||
Ke0iru6miIX/J8m54trfNNfLu2VNmXotR4v7NzN5hRsXpdhCAAAAAABQ5R7qTbK+/K9cKO4BYVv8UuIt
|
||||
1XG9FT4X7xB3DanEQ3xXL+bmA+LiiyVL3yAuZiV8Wlybui7m6IPlbuLi0ja5x9dB4upto9+Iu8ZUIhnG
|
||||
1dtG9KuFuZ1EIkNbjum5XOI7Vexi4K6nDVL32VeKq2cctpTrxbVzIWLHEFdfhftN1BcTeY+OOFymLjA3
|
||||
zQPEtT2lN4uru2niGIb9pamJDJG4cJhsJq79YT9x/3Ym93VjoxRbCAAAAAAAqtxDPSPOq41FjM9KW97A
|
||||
u1jiwe+O4q6pqX4s7npSie2gXb2Ym9ie38UXS5Y+WFzMSvizuDZ1UZzjHglJsRV3zNEuHm2Ve3w9Sly9
|
||||
bbOO5D5yaC1xdbcR/SqNVeX5crK4OIxT9NnYheYpEu107W+T1H22ad+J3yOunQtxtLi6Ktxvoj6YyHt0
|
||||
xCWyjkxdYG6a1eUmcdeQygni6m6q5SUSW6LdsYuGu6aSLpODZabEhWXuLO5vTOdqWezGRym2EAAAAAAA
|
||||
VLmHerNYWXaV98vvxT08HIdYxImdFt4pbV3Qix0ich/bsaG4ulHf6hKLJC6+fXedjOt88ejbrk1tFzE9
|
||||
S74u8Tbx3tLGrdDryj2+4rNiXXF1t00kFrprTCUWT129bUS/ymMLeY3E969xfS7+W2J+3E82ENfONkrd
|
||||
Z6+RlcTVNS5ry6Xi2jtfLxRXV4X7TdQHExMT75i0kJvavjJ1cbmpfi3uGlL5t6wgru6m21heLidJyWSG
|
||||
iNlX5PESO0O4tk3nb+L+pnO8Gxsl2UIAAAAAAFDlHurN0W1ld4ltheM823grOPdD7BvlHPmCvF4eKV1Z
|
||||
OHiLnJ7Jt8TVibl7t7gY992EuHiVcrhEO/4gf5mj8+Sf8xAJBm6eCvF/m/zfxpbmUdfvJBb8TpSvyeck
|
||||
doyJ4zdiEe7xcn9p89bnC5FzfDXpDPiFijfMvynuOlMY53EwOeTsV/H9x9XZJ7FbR+xCEW/V/0hivnPz
|
||||
4kL9Sb4kr5YHSCTWuvZ0Qco+e5S4OsbtGeLaO193F1dPhftN1AcTExPbyukZfE6Wk6kLy011oLjrSOVN
|
||||
4uptm3Uldmb4gPxKrhGXFDAf/5Ify3vl4bKyuDbUEf9zdTivcWOjJFsIAAAAAACq3EO9BOIN7DiL/RHy
|
||||
bHmTHCpxPn28JReLdj+TqQ8dT5H4v4VYDDhS4uHta+WZEjsr3ElWFFcvAAAAmiF2i3m4PEteJx+SSD79
|
||||
nsR3vfjeN/l7YOz6EeWRaPQpiV21XiaPk21lDXH1AHPifhP1yYRfBAZmE7tKxJENe8oBcpB8Sr4tJ8rJ
|
||||
siyJ45e3lh0vkeDyTtlfHit3lTi2wtUxH3vJ5ASSmezgxkRJthAAAAAAAAAAAAAAAKAkWwgAAAAAAAAA
|
||||
AAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAAAAAAAAAAAEqyhQAAAAAAAAAA
|
||||
AAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAAAAAAAAAAoCRbCAAAAAAAAAAA
|
||||
AAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQLAQAAAAAAAAAAAAAASrKFAAAAAAAAAAAA
|
||||
AAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQAAAAAAAAAAAAAACgJFsIAAAAAAAAAAAA
|
||||
AABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsBAAAAAAAAAAAAAADK+b9F/x9qbIygM988
|
||||
TgAAAABJRU5ErkJgggs=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="$this.ScriptEditorPositionForUndo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>0, 0</value>
|
||||
</metadata>
|
||||
<metadata name="$this.ScriptEditorPositionForRedo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>0, 0</value>
|
||||
</metadata>
|
||||
</root>
|
||||
9
SDL/zoll/rptAbgabenliste.vb
Normal file
9
SDL/zoll/rptAbgabenliste.vb
Normal file
@@ -0,0 +1,9 @@
|
||||
Imports GrapeCity.ActiveReports
|
||||
Imports GrapeCity.ActiveReports.Document
|
||||
|
||||
Public Class rptAbgabenliste
|
||||
|
||||
Private Sub GroupHeader3_Format(sender As Object, e As EventArgs)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
905
SDL/zoll/rptFiskalvertretungVorschau.Designer.vb
generated
Normal file
905
SDL/zoll/rptFiskalvertretungVorschau.Designer.vb
generated
Normal file
@@ -0,0 +1,905 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Public Class rptFiskalvertretungVorschau
|
||||
Inherits GrapeCity.ActiveReports.SectionReport
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'NOTE: The following procedure is required by the ActiveReports Designer
|
||||
'It can be modified using the ActiveReports Designer.
|
||||
'Do not modify it using the code editor.
|
||||
Private WithEvents PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader
|
||||
Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptFiskalvertretungVorschau))
|
||||
Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader()
|
||||
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
|
||||
Me.lblRegNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblAbfDatum = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblBezNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblNL = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblEUST = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblReBetrag = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblKurs = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblReBetragEUR = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblReBetrWaehr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
|
||||
Me.Label28 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line2 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.ReportInfo2 = New GrapeCity.ActiveReports.SectionReportModel.ReportInfo()
|
||||
Me.lblDat = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader()
|
||||
Me.picVERAG = New GrapeCity.ActiveReports.SectionReportModel.Picture()
|
||||
Me.Label3 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblSachbearbeiter = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblFilterTxt = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.txtFilter = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
|
||||
Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
|
||||
Me.Label10 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesGesSumAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line8 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.Line9 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.Label9 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesgesSumEust = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesgesSumRe = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
|
||||
Me.lblFiskalvertretung = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblFiskalvertretungLand = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
|
||||
Me.Line1 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.lblGesSumTxt = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line6 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.lblGesSumEust = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesSumRe = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupHeader2 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
|
||||
Me.lblUIDNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblFirmenname = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupFooter2 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
|
||||
Me.Line5 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.lblSumEust = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblSumRe = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.GroupHeader4 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
|
||||
Me.Label20 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label18 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label12 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label11 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label5 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label4 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label8 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Label6 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.Line4 = New GrapeCity.ActiveReports.SectionReportModel.Line()
|
||||
Me.GroupFooter4 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
|
||||
Me.Label1 = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
Me.lblGesSumAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
|
||||
CType(Me.lblRegNr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblAbfDatum, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblBezNr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblNL, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblEUST, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblReBetrag, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblKurs, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblReBetragEUR, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblReBetrWaehr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label28, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblDat, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFilterTxt, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtFilter, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label10, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesGesSumAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label9, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesgesSumEust, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesgesSumRe, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFiskalvertretung, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFiskalvertretungLand, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumTxt, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumEust, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumRe, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblUIDNr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblFirmenname, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblSumEust, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblSumRe, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label20, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label18, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label12, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label11, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label8, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label6, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.Label1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.lblGesSumAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
'
|
||||
'PageHeader
|
||||
'
|
||||
Me.PageHeader.Height = 0.0!
|
||||
Me.PageHeader.Name = "PageHeader"
|
||||
'
|
||||
'Detail
|
||||
'
|
||||
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblRegNr, Me.lblAbfDatum, Me.lblBezNr, Me.lblNL, Me.lblEUST, Me.lblReBetrag, Me.lblKurs, Me.lblReBetragEUR, Me.lblReBetrWaehr})
|
||||
Me.Detail.Height = 0.1574804!
|
||||
Me.Detail.KeepTogether = True
|
||||
Me.Detail.Name = "Detail"
|
||||
'
|
||||
'lblRegNr
|
||||
'
|
||||
Me.lblRegNr.Height = 0.1574803!
|
||||
Me.lblRegNr.HyperLink = Nothing
|
||||
Me.lblRegNr.Left = 0.01417323!
|
||||
Me.lblRegNr.Name = "lblRegNr"
|
||||
Me.lblRegNr.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblRegNr.Text = "ATC400018080520177701"
|
||||
Me.lblRegNr.Top = 0.0!
|
||||
Me.lblRegNr.Width = 1.559843!
|
||||
'
|
||||
'lblAbfDatum
|
||||
'
|
||||
Me.lblAbfDatum.Height = 0.1574803!
|
||||
Me.lblAbfDatum.HyperLink = Nothing
|
||||
Me.lblAbfDatum.Left = 1.574016!
|
||||
Me.lblAbfDatum.Name = "lblAbfDatum"
|
||||
Me.lblAbfDatum.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
|
||||
Me.lblAbfDatum.Text = "01.01.2017"
|
||||
Me.lblAbfDatum.Top = 0.0!
|
||||
Me.lblAbfDatum.Width = 0.693307!
|
||||
'
|
||||
'lblBezNr
|
||||
'
|
||||
Me.lblBezNr.Height = 0.1574803!
|
||||
Me.lblBezNr.HyperLink = Nothing
|
||||
Me.lblBezNr.Left = 2.267323!
|
||||
Me.lblBezNr.Name = "lblBezNr"
|
||||
Me.lblBezNr.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblBezNr.Text = "4803/18000000/AAAA"
|
||||
Me.lblBezNr.Top = 0.0!
|
||||
Me.lblBezNr.Width = 1.267717!
|
||||
'
|
||||
'lblNL
|
||||
'
|
||||
Me.lblNL.Height = 0.1574803!
|
||||
Me.lblNL.HyperLink = Nothing
|
||||
Me.lblNL.Left = 3.535039!
|
||||
Me.lblNL.Name = "lblNL"
|
||||
Me.lblNL.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblNL.Text = "4803/18000000/AAAA"
|
||||
Me.lblNL.Top = 0.0!
|
||||
Me.lblNL.Width = 0.383858!
|
||||
'
|
||||
'lblEUST
|
||||
'
|
||||
Me.lblEUST.Height = 0.1574803!
|
||||
Me.lblEUST.HyperLink = Nothing
|
||||
Me.lblEUST.Left = 6.564568!
|
||||
Me.lblEUST.Name = "lblEUST"
|
||||
Me.lblEUST.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
|
||||
Me.lblEUST.Text = "EUSt-Wert <20>"
|
||||
Me.lblEUST.Top = 0.0!
|
||||
Me.lblEUST.Width = 0.9055118!
|
||||
'
|
||||
'lblReBetrag
|
||||
'
|
||||
Me.lblReBetrag.Height = 0.1574803!
|
||||
Me.lblReBetrag.HyperLink = Nothing
|
||||
Me.lblReBetrag.Left = 3.918898!
|
||||
Me.lblReBetrag.Name = "lblReBetrag"
|
||||
Me.lblReBetrag.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblReBetrag.Text = "Re.Betrag"
|
||||
Me.lblReBetrag.Top = 0.0!
|
||||
Me.lblReBetrag.Width = 0.9055118!
|
||||
'
|
||||
'lblKurs
|
||||
'
|
||||
Me.lblKurs.Height = 0.1574804!
|
||||
Me.lblKurs.HyperLink = Nothing
|
||||
Me.lblKurs.Left = 5.211418!
|
||||
Me.lblKurs.Name = "lblKurs"
|
||||
Me.lblKurs.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblKurs.Text = "Kurs"
|
||||
Me.lblKurs.Top = 0.0!
|
||||
Me.lblKurs.Width = 0.4476376!
|
||||
'
|
||||
'lblReBetragEUR
|
||||
'
|
||||
Me.lblReBetragEUR.Height = 0.1574803!
|
||||
Me.lblReBetragEUR.HyperLink = Nothing
|
||||
Me.lblReBetragEUR.Left = 5.659056!
|
||||
Me.lblReBetragEUR.Name = "lblReBetragEUR"
|
||||
Me.lblReBetragEUR.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblReBetragEUR.Text = "Re.Betrag <20>"
|
||||
Me.lblReBetragEUR.Top = 0.0!
|
||||
Me.lblReBetragEUR.Width = 0.9055118!
|
||||
'
|
||||
'lblReBetrWaehr
|
||||
'
|
||||
Me.lblReBetrWaehr.Height = 0.1574804!
|
||||
Me.lblReBetrWaehr.HyperLink = Nothing
|
||||
Me.lblReBetrWaehr.Left = 4.82441!
|
||||
Me.lblReBetrWaehr.Name = "lblReBetrWaehr"
|
||||
Me.lblReBetrWaehr.Padding = New GrapeCity.ActiveReports.PaddingEx(2, 0, 0, 0)
|
||||
Me.lblReBetrWaehr.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" & _
|
||||
"ar-set: 1"
|
||||
Me.lblReBetrWaehr.Text = "EUR"
|
||||
Me.lblReBetrWaehr.Top = 0.0!
|
||||
Me.lblReBetrWaehr.Width = 0.3870077!
|
||||
'
|
||||
'PageFooter
|
||||
'
|
||||
Me.PageFooter.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label28, Me.Line2, Me.ReportInfo2, Me.lblDat})
|
||||
Me.PageFooter.Name = "PageFooter"
|
||||
'
|
||||
'Label28
|
||||
'
|
||||
Me.Label28.Height = 0.1330709!
|
||||
Me.Label28.HyperLink = Nothing
|
||||
Me.Label28.Left = 2.451181!
|
||||
Me.Label28.Name = "Label28"
|
||||
Me.Label28.Style = "font-size: 8pt; font-weight: bold; text-align: center; ddo-char-set: 1"
|
||||
Me.Label28.Text = "VERAG Spediton AG"
|
||||
Me.Label28.Top = 0.08622044!
|
||||
Me.Label28.Width = 2.581103!
|
||||
'
|
||||
'Line2
|
||||
'
|
||||
Me.Line2.Height = 0.0!
|
||||
Me.Line2.Left = 0.0!
|
||||
Me.Line2.LineWeight = 1.0!
|
||||
Me.Line2.Name = "Line2"
|
||||
Me.Line2.Top = 0.03070864!
|
||||
Me.Line2.Width = 7.480313!
|
||||
Me.Line2.X1 = 0.0!
|
||||
Me.Line2.X2 = 7.480313!
|
||||
Me.Line2.Y1 = 0.03070864!
|
||||
Me.Line2.Y2 = 0.03070864!
|
||||
'
|
||||
'ReportInfo2
|
||||
'
|
||||
Me.ReportInfo2.FormatString = "Seite {PageNumber} von {PageCount} Seiten "
|
||||
Me.ReportInfo2.Height = 0.1330709!
|
||||
Me.ReportInfo2.Left = 5.032284!
|
||||
Me.ReportInfo2.Name = "ReportInfo2"
|
||||
Me.ReportInfo2.Style = "font-size: 8pt; text-align: right"
|
||||
Me.ReportInfo2.Top = 0.08622048!
|
||||
Me.ReportInfo2.Width = 2.44296!
|
||||
'
|
||||
'lblDat
|
||||
'
|
||||
Me.lblDat.Height = 0.1330709!
|
||||
Me.lblDat.HyperLink = Nothing
|
||||
Me.lblDat.Left = 0.01023622!
|
||||
Me.lblDat.Name = "lblDat"
|
||||
Me.lblDat.Style = "font-size: 8pt; text-align: left"
|
||||
Me.lblDat.Text = "Mittwoch, 02.11.2016"
|
||||
Me.lblDat.Top = 0.08622044!
|
||||
Me.lblDat.Width = 2.440945!
|
||||
'
|
||||
'ReportHeader1
|
||||
'
|
||||
Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.picVERAG, Me.Label3, Me.lblUeberschrift, Me.lblSachbearbeiter, Me.lblFilterTxt, Me.txtFilter})
|
||||
Me.ReportHeader1.Height = 0.844882!
|
||||
Me.ReportHeader1.Name = "ReportHeader1"
|
||||
'
|
||||
'picVERAG
|
||||
'
|
||||
Me.picVERAG.Height = 0.4169292!
|
||||
Me.picVERAG.HyperLink = Nothing
|
||||
Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
|
||||
Me.picVERAG.Left = 5.281889!
|
||||
Me.picVERAG.Name = "picVERAG"
|
||||
Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
|
||||
Me.picVERAG.Top = 0.0!
|
||||
Me.picVERAG.Width = 2.198425!
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.Height = 0.1759842!
|
||||
Me.Label3.HyperLink = Nothing
|
||||
Me.Label3.Left = 5.032284!
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Style = "font-size: 8pt; font-weight: normal; text-align: right; vertical-align: middle; d" & _
|
||||
"do-char-set: 1"
|
||||
Me.Label3.Text = "Sachbearbeiter:"
|
||||
Me.Label3.Top = 0.5208662!
|
||||
Me.Label3.Width = 1.19685!
|
||||
'
|
||||
'lblUeberschrift
|
||||
'
|
||||
Me.lblUeberschrift.Height = 0.2311024!
|
||||
Me.lblUeberschrift.HyperLink = Nothing
|
||||
Me.lblUeberschrift.Left = 0.01023622!
|
||||
Me.lblUeberschrift.Name = "lblUeberschrift"
|
||||
Me.lblUeberschrift.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblUeberschrift.Text = "Fiskalvertretung 01.10.2016 bis 31.10.2016"
|
||||
Me.lblUeberschrift.Top = 0.1858268!
|
||||
Me.lblUeberschrift.Width = 4.357087!
|
||||
'
|
||||
'lblSachbearbeiter
|
||||
'
|
||||
Me.lblSachbearbeiter.Height = 0.1759843!
|
||||
Me.lblSachbearbeiter.HyperLink = Nothing
|
||||
Me.lblSachbearbeiter.Left = 5.032284!
|
||||
Me.lblSachbearbeiter.Name = "lblSachbearbeiter"
|
||||
Me.lblSachbearbeiter.Style = "font-size: 8pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" & _
|
||||
"-char-set: 1"
|
||||
Me.lblSachbearbeiter.Text = "Hanslmayr Hubert"
|
||||
Me.lblSachbearbeiter.Top = 0.5208662!
|
||||
Me.lblSachbearbeiter.Width = 2.448031!
|
||||
'
|
||||
'lblFilterTxt
|
||||
'
|
||||
Me.lblFilterTxt.Height = 0.1377953!
|
||||
Me.lblFilterTxt.HyperLink = Nothing
|
||||
Me.lblFilterTxt.Left = 0.01023626!
|
||||
Me.lblFilterTxt.Name = "lblFilterTxt"
|
||||
Me.lblFilterTxt.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
|
||||
Me.lblFilterTxt.Text = "Filter:"
|
||||
Me.lblFilterTxt.Top = 0.5590551!
|
||||
Me.lblFilterTxt.Visible = False
|
||||
Me.lblFilterTxt.Width = 4.312599!
|
||||
'
|
||||
'txtFilter
|
||||
'
|
||||
Me.txtFilter.CanShrink = True
|
||||
Me.txtFilter.Height = 0.1480315!
|
||||
Me.txtFilter.Left = 0.0!
|
||||
Me.txtFilter.Name = "txtFilter"
|
||||
Me.txtFilter.Style = "font-size: 8pt; ddo-char-set: 1"
|
||||
Me.txtFilter.Text = "-"
|
||||
Me.txtFilter.Top = 0.6968505!
|
||||
Me.txtFilter.Visible = False
|
||||
Me.txtFilter.Width = 7.480316!
|
||||
'
|
||||
'ReportFooter1
|
||||
'
|
||||
Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label10, Me.lblGesGesSumAnzahl, Me.Line8, Me.Line9, Me.Label9, Me.lblGesgesSumEust, Me.lblGesgesSumRe})
|
||||
Me.ReportFooter1.Height = 0.5988846!
|
||||
Me.ReportFooter1.KeepTogether = True
|
||||
Me.ReportFooter1.Name = "ReportFooter1"
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.Height = 0.1574803!
|
||||
Me.Label10.HyperLink = Nothing
|
||||
Me.Label10.Left = 0.361811!
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label10.Text = " Abfertigungen"
|
||||
Me.Label10.Top = 0.4413386!
|
||||
Me.Label10.Width = 1.266142!
|
||||
'
|
||||
'lblGesGesSumAnzahl
|
||||
'
|
||||
Me.lblGesGesSumAnzahl.Height = 0.1574803!
|
||||
Me.lblGesGesSumAnzahl.HyperLink = Nothing
|
||||
Me.lblGesGesSumAnzahl.Left = 0.003937008!
|
||||
Me.lblGesGesSumAnzahl.Name = "lblGesGesSumAnzahl"
|
||||
Me.lblGesGesSumAnzahl.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.lblGesGesSumAnzahl.Text = "0000"
|
||||
Me.lblGesGesSumAnzahl.Top = 0.4413386!
|
||||
Me.lblGesGesSumAnzahl.Width = 0.3606307!
|
||||
'
|
||||
'Line8
|
||||
'
|
||||
Me.Line8.Height = 0.0!
|
||||
Me.Line8.Left = 0.00393627!
|
||||
Me.Line8.LineWeight = 2.0!
|
||||
Me.Line8.Name = "Line8"
|
||||
Me.Line8.Top = 0.2343176!
|
||||
Me.Line8.Width = 7.475195!
|
||||
Me.Line8.X1 = 0.00393627!
|
||||
Me.Line8.X2 = 7.479131!
|
||||
Me.Line8.Y1 = 0.2343176!
|
||||
Me.Line8.Y2 = 0.2343176!
|
||||
'
|
||||
'Line9
|
||||
'
|
||||
Me.Line9.Height = 0.0!
|
||||
Me.Line9.Left = 0.002755167!
|
||||
Me.Line9.LineWeight = 2.0!
|
||||
Me.Line9.Name = "Line9"
|
||||
Me.Line9.Top = 0.1980972!
|
||||
Me.Line9.Width = 7.475194!
|
||||
Me.Line9.X1 = 0.002755167!
|
||||
Me.Line9.X2 = 7.477949!
|
||||
Me.Line9.Y1 = 0.1980972!
|
||||
Me.Line9.Y2 = 0.1980972!
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.Height = 0.1574803!
|
||||
Me.Label9.HyperLink = Nothing
|
||||
Me.Label9.Left = 0.007480315!
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label9.Text = "Gesamtsumme:"
|
||||
Me.Label9.Top = 0.2838583!
|
||||
Me.Label9.Width = 5.659056!
|
||||
'
|
||||
'lblGesgesSumEust
|
||||
'
|
||||
Me.lblGesgesSumEust.Height = 0.1574803!
|
||||
Me.lblGesgesSumEust.HyperLink = Nothing
|
||||
Me.lblGesgesSumEust.Left = 6.572048!
|
||||
Me.lblGesgesSumEust.Name = "lblGesgesSumEust"
|
||||
Me.lblGesgesSumEust.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
|
||||
Me.lblGesgesSumEust.Text = "EUSt-Wert <20>"
|
||||
Me.lblGesgesSumEust.Top = 0.2838583!
|
||||
Me.lblGesgesSumEust.Width = 0.9055118!
|
||||
'
|
||||
'lblGesgesSumRe
|
||||
'
|
||||
Me.lblGesgesSumRe.Height = 0.1574803!
|
||||
Me.lblGesgesSumRe.HyperLink = Nothing
|
||||
Me.lblGesgesSumRe.Left = 5.666536!
|
||||
Me.lblGesgesSumRe.Name = "lblGesgesSumRe"
|
||||
Me.lblGesgesSumRe.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblGesgesSumRe.Text = "Re.Betrag <20>"
|
||||
Me.lblGesgesSumRe.Top = 0.2838583!
|
||||
Me.lblGesgesSumRe.Width = 0.9055118!
|
||||
'
|
||||
'GroupHeader1
|
||||
'
|
||||
Me.GroupHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblFiskalvertretung, Me.lblFiskalvertretungLand})
|
||||
Me.GroupHeader1.GroupKeepTogether = GrapeCity.ActiveReports.SectionReportModel.GroupKeepTogether.FirstDetail
|
||||
Me.GroupHeader1.Height = 0.352592!
|
||||
Me.GroupHeader1.Name = "GroupHeader1"
|
||||
'
|
||||
'lblFiskalvertretung
|
||||
'
|
||||
Me.lblFiskalvertretung.Height = 0.2275591!
|
||||
Me.lblFiskalvertretung.HyperLink = Nothing
|
||||
Me.lblFiskalvertretung.Left = 0.01023622!
|
||||
Me.lblFiskalvertretung.Name = "lblFiskalvertretung"
|
||||
Me.lblFiskalvertretung.Padding = New GrapeCity.ActiveReports.PaddingEx(5, 1, 0, 0)
|
||||
Me.lblFiskalvertretung.Style = "background-color: #002660; color: White; font-size: 12pt; font-weight: bold; text" & _
|
||||
"-align: left; vertical-align: top; ddo-char-set: 1"
|
||||
Me.lblFiskalvertretung.Text = "Fiskalvertretung - Belgien"
|
||||
Me.lblFiskalvertretung.Top = 0.06850394!
|
||||
Me.lblFiskalvertretung.Width = 5.905512!
|
||||
'
|
||||
'lblFiskalvertretungLand
|
||||
'
|
||||
Me.lblFiskalvertretungLand.Height = 0.2275591!
|
||||
Me.lblFiskalvertretungLand.HyperLink = Nothing
|
||||
Me.lblFiskalvertretungLand.Left = 5.915749!
|
||||
Me.lblFiskalvertretungLand.Name = "lblFiskalvertretungLand"
|
||||
Me.lblFiskalvertretungLand.Padding = New GrapeCity.ActiveReports.PaddingEx(10, 1, 10, 0)
|
||||
Me.lblFiskalvertretungLand.Style = "background-color: #002660; color: White; font-size: 12pt; font-weight: bold; text" & _
|
||||
"-align: right; text-justify: auto; vertical-align: top; ddo-char-set: 1"
|
||||
Me.lblFiskalvertretungLand.Text = "BE"
|
||||
Me.lblFiskalvertretungLand.Top = 0.06850394!
|
||||
Me.lblFiskalvertretungLand.Width = 1.559449!
|
||||
'
|
||||
'GroupFooter1
|
||||
'
|
||||
Me.GroupFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Line1, Me.lblGesSumTxt, Me.Line6, Me.lblGesSumEust, Me.lblGesSumRe, Me.Label1, Me.lblGesSumAnzahl})
|
||||
Me.GroupFooter1.Height = 0.6354166!
|
||||
Me.GroupFooter1.KeepTogether = True
|
||||
Me.GroupFooter1.Name = "GroupFooter1"
|
||||
'
|
||||
'Line1
|
||||
'
|
||||
Me.Line1.Height = 0.0!
|
||||
Me.Line1.Left = 0.0!
|
||||
Me.Line1.LineWeight = 1.0!
|
||||
Me.Line1.Name = "Line1"
|
||||
Me.Line1.Top = 0.0!
|
||||
Me.Line1.Width = 7.475197!
|
||||
Me.Line1.X1 = 0.0!
|
||||
Me.Line1.X2 = 7.475197!
|
||||
Me.Line1.Y1 = 0.0!
|
||||
Me.Line1.Y2 = 0.0!
|
||||
'
|
||||
'lblGesSumTxt
|
||||
'
|
||||
Me.lblGesSumTxt.Height = 0.1574803!
|
||||
Me.lblGesSumTxt.HyperLink = Nothing
|
||||
Me.lblGesSumTxt.Left = 0.0!
|
||||
Me.lblGesSumTxt.Name = "lblGesSumTxt"
|
||||
Me.lblGesSumTxt.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.lblGesSumTxt.Text = "Summe BE:"
|
||||
Me.lblGesSumTxt.Top = 0.02992126!
|
||||
Me.lblGesSumTxt.Width = 5.659056!
|
||||
'
|
||||
'Line6
|
||||
'
|
||||
Me.Line6.Height = 0.0!
|
||||
Me.Line6.Left = 0.01023622!
|
||||
Me.Line6.LineWeight = 6.0!
|
||||
Me.Line6.Name = "Line6"
|
||||
Me.Line6.Top = 0.0!
|
||||
Me.Line6.Width = 7.475196!
|
||||
Me.Line6.X1 = 0.01023622!
|
||||
Me.Line6.X2 = 7.485432!
|
||||
Me.Line6.Y1 = 0.0!
|
||||
Me.Line6.Y2 = 0.0!
|
||||
'
|
||||
'lblGesSumEust
|
||||
'
|
||||
Me.lblGesSumEust.Height = 0.1574803!
|
||||
Me.lblGesSumEust.HyperLink = Nothing
|
||||
Me.lblGesSumEust.Left = 6.564568!
|
||||
Me.lblGesSumEust.Name = "lblGesSumEust"
|
||||
Me.lblGesSumEust.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
|
||||
Me.lblGesSumEust.Text = "EUSt-Wert <20>"
|
||||
Me.lblGesSumEust.Top = 0.02992126!
|
||||
Me.lblGesSumEust.Width = 0.9055118!
|
||||
'
|
||||
'lblGesSumRe
|
||||
'
|
||||
Me.lblGesSumRe.Height = 0.1574803!
|
||||
Me.lblGesSumRe.HyperLink = Nothing
|
||||
Me.lblGesSumRe.Left = 5.659056!
|
||||
Me.lblGesSumRe.Name = "lblGesSumRe"
|
||||
Me.lblGesSumRe.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblGesSumRe.Text = "Re.Betrag <20>"
|
||||
Me.lblGesSumRe.Top = 0.02992126!
|
||||
Me.lblGesSumRe.Width = 0.9055118!
|
||||
'
|
||||
'GroupHeader2
|
||||
'
|
||||
Me.GroupHeader2.ColumnGroupKeepTogether = True
|
||||
Me.GroupHeader2.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblUIDNr, Me.lblFirmenname})
|
||||
Me.GroupHeader2.GroupKeepTogether = GrapeCity.ActiveReports.SectionReportModel.GroupKeepTogether.FirstDetail
|
||||
Me.GroupHeader2.Height = 0.2200788!
|
||||
Me.GroupHeader2.KeepTogether = True
|
||||
Me.GroupHeader2.Name = "GroupHeader2"
|
||||
'
|
||||
'lblUIDNr
|
||||
'
|
||||
Me.lblUIDNr.Height = 0.2200788!
|
||||
Me.lblUIDNr.HyperLink = Nothing
|
||||
Me.lblUIDNr.Left = 0.005118111!
|
||||
Me.lblUIDNr.Name = "lblUIDNr"
|
||||
Me.lblUIDNr.Style = "font-family: Arial Black; font-size: 9pt; font-style: normal; font-weight: bold; " & _
|
||||
"text-align: left; text-decoration: none; ddo-char-set: 0"
|
||||
Me.lblUIDNr.Text = "Ust-ID: AT123456789"
|
||||
Me.lblUIDNr.Top = 0.0!
|
||||
Me.lblUIDNr.Width = 2.262205!
|
||||
'
|
||||
'lblFirmenname
|
||||
'
|
||||
Me.lblFirmenname.Height = 0.2200787!
|
||||
Me.lblFirmenname.HyperLink = Nothing
|
||||
Me.lblFirmenname.Left = 2.267323!
|
||||
Me.lblFirmenname.Name = "lblFirmenname"
|
||||
Me.lblFirmenname.Style = "font-family: Arial Black; font-size: 9pt; font-style: normal; font-weight: bold; " & _
|
||||
"text-align: left; text-decoration: none; ddo-char-set: 0"
|
||||
Me.lblFirmenname.Text = "VERAG Spedition AG"
|
||||
Me.lblFirmenname.Top = 0.0!
|
||||
Me.lblFirmenname.Width = 5.218111!
|
||||
'
|
||||
'GroupFooter2
|
||||
'
|
||||
Me.GroupFooter2.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Line5, Me.lblSumEust, Me.lblSumRe})
|
||||
Me.GroupFooter2.Height = 0.242044!
|
||||
Me.GroupFooter2.KeepTogether = True
|
||||
Me.GroupFooter2.Name = "GroupFooter2"
|
||||
'
|
||||
'Line5
|
||||
'
|
||||
Me.Line5.Height = 0.0!
|
||||
Me.Line5.Left = 0.002755906!
|
||||
Me.Line5.LineWeight = 1.0!
|
||||
Me.Line5.Name = "Line5"
|
||||
Me.Line5.Top = 0.0!
|
||||
Me.Line5.Width = 7.475196!
|
||||
Me.Line5.X1 = 0.002755906!
|
||||
Me.Line5.X2 = 7.477952!
|
||||
Me.Line5.Y1 = 0.0!
|
||||
Me.Line5.Y2 = 0.0!
|
||||
'
|
||||
'lblSumEust
|
||||
'
|
||||
Me.lblSumEust.Height = 0.1574803!
|
||||
Me.lblSumEust.HyperLink = Nothing
|
||||
Me.lblSumEust.Left = 6.564568!
|
||||
Me.lblSumEust.Name = "lblSumEust"
|
||||
Me.lblSumEust.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
|
||||
Me.lblSumEust.Text = "EUSt-Wert <20>"
|
||||
Me.lblSumEust.Top = 0.01968504!
|
||||
Me.lblSumEust.Width = 0.9055118!
|
||||
'
|
||||
'lblSumRe
|
||||
'
|
||||
Me.lblSumRe.Height = 0.1574803!
|
||||
Me.lblSumRe.HyperLink = Nothing
|
||||
Me.lblSumRe.Left = 5.659056!
|
||||
Me.lblSumRe.Name = "lblSumRe"
|
||||
Me.lblSumRe.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" & _
|
||||
"har-set: 1"
|
||||
Me.lblSumRe.Text = "Re.Betrag <20>"
|
||||
Me.lblSumRe.Top = 0.01968504!
|
||||
Me.lblSumRe.Width = 0.9055118!
|
||||
'
|
||||
'GroupHeader4
|
||||
'
|
||||
Me.GroupHeader4.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label20, Me.Label18, Me.Label12, Me.Label11, Me.Label5, Me.Label4, Me.Label8, Me.Label6, Me.Line4})
|
||||
Me.GroupHeader4.Height = 0.2189305!
|
||||
Me.GroupHeader4.KeepTogether = True
|
||||
Me.GroupHeader4.Name = "GroupHeader4"
|
||||
'
|
||||
'Label20
|
||||
'
|
||||
Me.Label20.Height = 0.143307!
|
||||
Me.Label20.HyperLink = Nothing
|
||||
Me.Label20.Left = 5.659056!
|
||||
Me.Label20.Name = "Label20"
|
||||
Me.Label20.Style = "font-size: 8pt; font-weight: bold; text-align: right; text-justify: auto; ddo-cha" & _
|
||||
"r-set: 1"
|
||||
Me.Label20.Text = "Re.Betrag <20>"
|
||||
Me.Label20.Top = 0.06732284!
|
||||
Me.Label20.Width = 0.9055118!
|
||||
'
|
||||
'Label18
|
||||
'
|
||||
Me.Label18.Height = 0.1433071!
|
||||
Me.Label18.HyperLink = Nothing
|
||||
Me.Label18.Left = 5.211418!
|
||||
Me.Label18.Name = "Label18"
|
||||
Me.Label18.Style = "font-size: 8pt; font-weight: bold; text-align: right; text-justify: auto; ddo-cha" & _
|
||||
"r-set: 1"
|
||||
Me.Label18.Text = "Kurs"
|
||||
Me.Label18.Top = 0.06732284!
|
||||
Me.Label18.Width = 0.4476376!
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.Height = 0.143307!
|
||||
Me.Label12.HyperLink = Nothing
|
||||
Me.Label12.Left = 3.918898!
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Style = "font-size: 8pt; font-weight: bold; text-align: right; text-justify: auto; ddo-cha" & _
|
||||
"r-set: 1"
|
||||
Me.Label12.Text = "Re.Betrag"
|
||||
Me.Label12.Top = 0.06732284!
|
||||
Me.Label12.Width = 0.9055118!
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.Height = 0.1433071!
|
||||
Me.Label11.HyperLink = Nothing
|
||||
Me.Label11.Left = 3.535039!
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" & _
|
||||
"-set: 1"
|
||||
Me.Label11.Text = "NL"
|
||||
Me.Label11.Top = 0.06732284!
|
||||
Me.Label11.Width = 0.3838584!
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.Height = 0.1433071!
|
||||
Me.Label5.HyperLink = Nothing
|
||||
Me.Label5.Left = 0.007480315!
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label5.Text = "Registriernummer"
|
||||
Me.Label5.Top = 0.06732279!
|
||||
Me.Label5.Width = 1.566536!
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.Height = 0.1433071!
|
||||
Me.Label4.HyperLink = Nothing
|
||||
Me.Label4.Left = 1.574016!
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" & _
|
||||
"-set: 1"
|
||||
Me.Label4.Text = "Datum"
|
||||
Me.Label4.Top = 0.06732284!
|
||||
Me.Label4.Width = 0.6933072!
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.Height = 0.1433071!
|
||||
Me.Label8.HyperLink = Nothing
|
||||
Me.Label8.Left = 2.267323!
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" & _
|
||||
"-set: 1"
|
||||
Me.Label8.Text = "Bezugs-Nr"
|
||||
Me.Label8.Top = 0.06732284!
|
||||
Me.Label8.Width = 1.267717!
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.Height = 0.143307!
|
||||
Me.Label6.HyperLink = Nothing
|
||||
Me.Label6.Left = 6.564568!
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.Label6.Text = "EUSt-Wert <20>"
|
||||
Me.Label6.Top = 0.06732284!
|
||||
Me.Label6.Width = 0.9055118!
|
||||
'
|
||||
'Line4
|
||||
'
|
||||
Me.Line4.Height = 0.0!
|
||||
Me.Line4.Left = 0.005118111!
|
||||
Me.Line4.LineWeight = 1.0!
|
||||
Me.Line4.Name = "Line4"
|
||||
Me.Line4.Top = 0.2106299!
|
||||
Me.Line4.Width = 7.475195!
|
||||
Me.Line4.X1 = 0.005118111!
|
||||
Me.Line4.X2 = 7.480313!
|
||||
Me.Line4.Y1 = 0.2106299!
|
||||
Me.Line4.Y2 = 0.2106299!
|
||||
'
|
||||
'GroupFooter4
|
||||
'
|
||||
Me.GroupFooter4.Height = 0.0!
|
||||
Me.GroupFooter4.Name = "GroupFooter4"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Height = 0.1574803!
|
||||
Me.Label1.HyperLink = Nothing
|
||||
Me.Label1.Left = 0.3720472!
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
|
||||
Me.Label1.Text = " Abfertigungen"
|
||||
Me.Label1.Top = 0.1874016!
|
||||
Me.Label1.Width = 1.266142!
|
||||
'
|
||||
'lblGesSumAnzahl
|
||||
'
|
||||
Me.lblGesSumAnzahl.Height = 0.1574803!
|
||||
Me.lblGesSumAnzahl.HyperLink = Nothing
|
||||
Me.lblGesSumAnzahl.Left = 0.01417327!
|
||||
Me.lblGesSumAnzahl.Name = "lblGesSumAnzahl"
|
||||
Me.lblGesSumAnzahl.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
|
||||
Me.lblGesSumAnzahl.Text = "0000"
|
||||
Me.lblGesSumAnzahl.Top = 0.1874016!
|
||||
Me.lblGesSumAnzahl.Width = 0.3606307!
|
||||
'
|
||||
'rptFiskalvertretungVorschau
|
||||
'
|
||||
Me.MasterReport = False
|
||||
Me.PageSettings.Margins.Bottom = 0.3937008!
|
||||
Me.PageSettings.Margins.Left = 0.3937008!
|
||||
Me.PageSettings.Margins.Right = 0.3937008!
|
||||
Me.PageSettings.Margins.Top = 0.3937008!
|
||||
Me.PageSettings.PaperHeight = 11.0!
|
||||
Me.PageSettings.PaperWidth = 8.5!
|
||||
Me.PrintWidth = 7.485432!
|
||||
Me.Sections.Add(Me.ReportHeader1)
|
||||
Me.Sections.Add(Me.PageHeader)
|
||||
Me.Sections.Add(Me.GroupHeader1)
|
||||
Me.Sections.Add(Me.GroupHeader2)
|
||||
Me.Sections.Add(Me.GroupHeader4)
|
||||
Me.Sections.Add(Me.Detail)
|
||||
Me.Sections.Add(Me.GroupFooter4)
|
||||
Me.Sections.Add(Me.GroupFooter2)
|
||||
Me.Sections.Add(Me.GroupFooter1)
|
||||
Me.Sections.Add(Me.PageFooter)
|
||||
Me.Sections.Add(Me.ReportFooter1)
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & _
|
||||
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & _
|
||||
"lic", "Heading2", "Normal"))
|
||||
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
|
||||
CType(Me.lblRegNr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblAbfDatum, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblBezNr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblNL, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblEUST, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblReBetrag, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblKurs, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblReBetragEUR, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblReBetrWaehr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label28, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblDat, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFilterTxt, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtFilter, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label10, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesGesSumAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label9, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesgesSumEust, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesgesSumRe, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFiskalvertretung, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFiskalvertretungLand, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumTxt, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumEust, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumRe, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblUIDNr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblFirmenname, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblSumEust, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblSumRe, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label20, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label18, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label12, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label11, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label8, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label6, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.Label1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.lblGesSumAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
|
||||
End Sub
|
||||
Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
|
||||
Private WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture
|
||||
Private WithEvents Label3 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Line2 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
|
||||
Public WithEvents lblUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblSachbearbeiter As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents Label28 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents ReportInfo2 As GrapeCity.ActiveReports.SectionReportModel.ReportInfo
|
||||
Public WithEvents lblDat As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
|
||||
Public WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
|
||||
Public WithEvents lblRegNr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFiskalvertretung As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFilterTxt As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents txtFilter As GrapeCity.ActiveReports.SectionReportModel.TextBox
|
||||
Public WithEvents lblAbfDatum As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblBezNr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblUIDNr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents Line1 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents GroupHeader2 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
|
||||
Public WithEvents GroupFooter2 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
|
||||
Public WithEvents lblGesSumTxt As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Line6 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Line5 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Label10 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Line8 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Line9 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Public WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
|
||||
Public WithEvents lblGesGesSumAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents GroupHeader4 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
|
||||
Private WithEvents Line4 As GrapeCity.ActiveReports.SectionReportModel.Line
|
||||
Private WithEvents Label6 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label8 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label4 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label5 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents GroupFooter4 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
|
||||
Private WithEvents Label11 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label12 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label18 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label20 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label9 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblNL As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblEUST As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblReBetrag As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblKurs As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblReBetragEUR As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblReBetrWaehr As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFiskalvertretungLand As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblFirmenname As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblSumEust As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblSumRe As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesSumEust As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesSumRe As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesgesSumEust As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesgesSumRe As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Private WithEvents Label1 As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
Public WithEvents lblGesSumAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
|
||||
End Class
|
||||
752
SDL/zoll/rptFiskalvertretungVorschau.resx
Normal file
752
SDL/zoll/rptFiskalvertretungVorschau.resx
Normal file
@@ -0,0 +1,752 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<data name="picVERAG.ImageData" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAEAQAAABZTeXN0ZW0uSU8uTWVtb3J5U3RyZWFtCgAAAAdfYnVmZmVyB19v
|
||||
cmlnaW4JX3Bvc2l0aW9uB19sZW5ndGgJX2NhcGFjaXR5C19leHBhbmRhYmxlCV93cml0YWJsZQpfZXhw
|
||||
b3NhYmxlB19pc09wZW4dTWFyc2hhbEJ5UmVmT2JqZWN0K19faWRlbnRpdHkHAAAAAAAAAAACAggICAgB
|
||||
AQEBCQIAAAAAAAAAAAAAAL6QAAC+kAAAAQEBAQoPAgAAAL6QAAACArmQAACJUE5HDQoaCgAAAA1JSERS
|
||||
AAAIMAAAAZIIBgAAAB9io5MAAAABc1JHQgCuzhzpAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29mdHdh
|
||||
cmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAJA+SURBVHhe7d0HlG1Fte7xAxwySBCQJKKgIgZA4YgBxQDy
|
||||
RL2IiBgwBwxgzuEeFRUTIiYQUdRWQVExY0LMIEowICiioEgUBBGQdN832Rx3r95fd6/urqq9wt8xfuON
|
||||
V5fTVWuuqtp7r5qratH//d//AQAAAAAAAAAAAAAAjJUtBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAA
|
||||
lGQLAQAAAAAAAAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABA
|
||||
SbYQAAAAAAAAAAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACU
|
||||
ZAsBAAAAAAAAAAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJ
|
||||
thAAAAAAAAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRk
|
||||
CwEAAAAAAAAAAAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2
|
||||
EAAAAAAAAAAAAAAAoCRbCAAAAAAAAAAAAAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQL
|
||||
AQAAAAAAAAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQ
|
||||
AAAAAAAAAAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsB
|
||||
AAAAAAAAAAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAA
|
||||
AAAAAAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFpa0aMlSAAAAAAAAAACANlhN
|
||||
NpMdZDd5irxQXivvkA/Jp+UrcqL8RE6X38lf5AL5562uk/9DMTfIstiH8yTuSThT4j79UuK+fVuOk8/J
|
||||
UfJBea8slZfKs2Uf2V0eLNvI7WV1cf2md9yaIADUYQtLcpMaAAAAAAAAAABAQSvI5rKTPFFeJe+XL8rJ
|
||||
Eovd14hbGAcm+4/8XX4rP5LPywckklyeIZH4ci9ZR1xf7AS3JggAddjCktykBgAAAAAAAAAAkMHGsqvs
|
||||
L5Gg8HU5S64XtxgN5BQ7QcTOD1+WgyV289hZ1hfXf1vDrQkCQB22MAdNVj8VNzmj6lrZSEYme6Chlpcz
|
||||
xPVnDDCu03mJuBgDaKfYitGNdTRLPExx9w/omqnbyP5a4kFibPn7LYm3pj4uh8ib5RXyNHmU3E/uIrcV
|
||||
N44AoI4l4uYnpBHzejzDcLEH0E0rSRzzsJ/E9v9xLMDl4uYIoIkulei3kdgQx1XcSVxfbyS3VggAddjC
|
||||
HDRZPUjcBIxR8WVqZLIHGiq2vHL9GEMHiYsd5o4EBqBbSGBoBxIYgLmJN/fOl5/LsRK/714je0s8QCfJ
|
||||
AcB0YotpN68gnaeKiz2AbthSniyxVf9JEtv4u7kAaLNIaojnKfGc9B6ynLjxMHZurRAA6rCFuWjCirdW
|
||||
3ISLqnjgdQcZmfCBhllNLhDXjzEQiz5ri4sf5o4EBqBbSGBoBxIYgPSuktPkaHmTPE7uLiuKG4cAuu/R
|
||||
4uYLpBU77MQb2e4eAGifeIb+dDlKYny7cQ903cXyadlL1hA3VsbCrRMCQB22MBdNWNuJm2AxKr50jUz4
|
||||
QMO8UVz/xVC8bedih/khgQHoFhIY2oEEBqCcG+RUOUJiq+PYsWFlcWMTQHcslt+JmxeQ3ovF3QcAzRfz
|
||||
5c7yXjlb3BgH+uw6+Zo8ReLlQzeOinHrhABQhy3MSZPWMeImVlTdKHeTkUkfaIgN5Wpx/RcDF8qq4uKH
|
||||
+SGBAegWEhjagQQGYLziIWRsK/822U1uI26sAmivZ4kb/8gjtt5eU9y9ANA8kcz5WPmMXC5uXAMY9S/5
|
||||
uOwkbmxl59YIAaAOW5iTJq27SCzOuwkVVZ+XkUkfaIjDxPVbDD1PXOwwfyQwAN1CAkM7kMAANEv8no6E
|
||||
htfLvaWxZ94CqCWS3jmasbw3i7sfAJpheYmdFmJXqivEjWMA9cXxdU+VoscouTVCAKjDFuamiSu+eLhJ
|
||||
FKPi2I2RiR8Ys62FRKSZnSOxrZ2LH+aPBAagW0hgaAcSGIBmu0giufhhEg/73TgG0FyRjOTGNvKKHSU3
|
||||
EHdPAIxPjMuYF88XN3YBLMzfJZ6vFtk12K0PAkAdtjA3TVy3l2vFTaCo+qaMTPzAmH1dXH/F0BPExQ4L
|
||||
QwID0C0kMLQDCQxAe8QDyUOFRHigHdaTK8WNZ+QX86W7LwDKu7/EERHXixuvANKKJKHnStYX8Nz6IADU
|
||||
YQtL0OR1sLiJE6MeICOTPzAm8WaX66cYOlXYyjcPEhiAbiGBoR1IYADa6VcSDyU55x1orlhAd+MXZcRC
|
||||
6Z3E3RsAZcRzxhPFjVEA+f1Gsq0/ubVBAKjDFpagySuyzK8SN2miKr7EjUz+wBjElrSxOO/6KYYeIS5+
|
||||
WDgSGIBuIYGhHUhgANotxvA7ZENxYxzAeGwhvGk8fhPi7g+AvOLZ2UnixiWA8j4ma4sbr/Pm1gYBoA5b
|
||||
WIomsKXiJkuMYkEUTbCvuP6JoR+Iix3SIIEB6BYSGNqBBAagG66Tw2RjcWMdQFlHixurKOtm2UbcPQKQ
|
||||
3t3l2+LGI4DxOk+S7sbg1gUBoA5bWIomsDXkMnGTJapOEbakxzitKn8V1z8xtKO4+CENEhiAbiGBoR1I
|
||||
YAC65Ro5UNYSN+YB5Le9uPGJ8fiGuPsEIJ3bykfkRnHjEEAzxBh9oyRZi3LrggBQhy0sSZPYS8VNlBi1
|
||||
h4x8CACFvE5cv8TQl8XFDumQwAB0CwkM7UACA9BNl8gTxY17AHmdIG5cYnweJO5eAVi4eKZ9kbixB6CZ
|
||||
jpHVxI3p2tyaIADUYQtL0iQWb3WfL26SRNWZsryMfBAAmW0gV4nrlxiI7NStxcUP6ZDAAHQLCQztQAID
|
||||
0G3fks3EjX8A6e0ubixivH4u7n4BmL/YdeEz4sYcgOb7hWwobnzX4tYEAaAOW1jSrRPZs8RNkBi1r1Q+
|
||||
BIACPiiuP2LoE+Jih7RIYAC6hQSGdiCBAei+K+Sx4uYAAOnESym/ETcOMX7sfAqk80D5m7ixBqA9zpFN
|
||||
xY3zWbk1QQCowxaWdOtEtljOFjdBoio+MFaUygcBkNFdhfPpZnad8NZaGSQwAN1CAkM7kMAA9Mchwu9N
|
||||
IJ9niht7aIbY+XQFcfcOQH3x7IZniUB3zDuJwa0JAkAdtrCkSZPZ3uImR4zaTybHDsjpK+L6IYYOFhc7
|
||||
pEcCA9AtJDC0AwkMQL8cL2uImw8AzF8cocrbyM0XSSbu/gGYXSRBHilubAFot0hiWF/c2J+WWxMEgDps
|
||||
YUmTJrPl5DRxkyOq4gdv/PCdHD8ghweL64MYukrWExc/pEcCA9AtJDC0AwkMQP/8Uub8gBLAjF4tbryh
|
||||
Wc4XnrkBc7eafFvcuALQDSdLjHU3B1huTRAA6rCFJU2Z0HYTNzFi1EtlavyAlCKpKB5cuv6HoTeJix/y
|
||||
IIEB6BYSGNqBBAagn+KcfpIYgDRuK3yetsfLxd1HAN5a8lNx4wlAt8RuzbFu4OaCEW5NEADqsIUlmUnt
|
||||
RHETI6ouE7b1RE5PEtf3MHSJMA7LIoEB6BYSGNqBBRegvyKhORYl3NwAoL44dtCNMTRTPHNbW9y9BFC1
|
||||
psRb2W4sAeim14ubD0a4NUEAqMMWlmQmtfuLmxQxije/kcsq8hdx/Q5DB4iLH/IhgQHoFhIY2oEEBqDf
|
||||
fihxprWbHwDM7o5yvbjxheZ6m7j7CWBoJfm+uDEEoLtukjh62s0LFW5NEADqsIUluUlNviZuYkRVPExe
|
||||
V1wMgYV4lbg+h6E/S/xQc/FDPiQwAN1CAkM7kMAA4CPi5gcAs/uMuHGFZvu3bCTungIYbCF/jLjxA6D7
|
||||
LpR1xM0P/+XWBAGgDltYkpvUZBu5WdzEiKqDxMUQmK/1hIWK2T1VXPyQFwkMQLeQwNAOfC8AEJ4rbo4A
|
||||
ML17ixtPaIcPi7uvAJYsfYO4cQOgP44SNz/8l1sTBIA6bGFJblK7FRnq9VwjZIQjpUPF9TUM/UaWFxc/
|
||||
5EUCA9AtJDC0AwkMAMK1cjdx8wQA73vixhPa4QbZUty9BfrsUcLLhwDCruLmiVu4NUEAqMMWluQmtVvF
|
||||
D4T4oeAmRVR9QFwMgbm6s3A25+weLS5+yI8EBqBbSGBoBxIYACxzqqwobq4AUPUIceMI7RJb5Lv7C/RV
|
||||
PLPn9wGAZc6VaY9ZdmuCAFCHLSzJTWqTHCZuUkRVLDhvJi6GwFx8UVwfw9BPxcUOZZDAAHQLCQztwANK
|
||||
AJO9WdxcAWAoduw7Q9wYQvvEUSDuPgN9s4L8XNw4AdBfLxc3Z9g1QQCowxaW5Ca1SeJohNim0k2KqJr1
|
||||
vCFgFg8U17dQtZO4+KEMEhiAbiGBoR1IYAAw2XWyhbj5AsDAU8WNH7TTd8TdZ6Bv3iBujADotytkXRmZ
|
||||
N9yaIADUYQtLcpPaFO8UNymi6kbZSlwMgdksJyeL61sY+oa4+KEcEhiAbiGBoR1IYAAwFd+LgemtKueL
|
||||
Gztor4eJu99AX2wnHPcMYDoHycjc4dYEAaAOW1iSm9SmiMwtHprWw7l8mK+9xfUpDN0s24iLH8ohgQHo
|
||||
FhIY2oHv4gCcON/fzRlA371S3JhBu50i8fKHu+dA18WxOLz4BGAmV8naUpk/3JogANRhC0uaOqFNg+2p
|
||||
6otsWBdDYDorybni+hOGJsTFD2WRwAB0CwkM7UACAwAnFjJYzAOq1pHYRtmNGbTfXuLuO9B1zxE3JgBg
|
||||
stdLZf5wa4IAUIctLGnqhDaNNeRicZMiqtjKE3P1cnF9CUPXC+f8NgMJDEC3kMDQDiQwAJjOHuLmDaCv
|
||||
3iNurKAbzpbF4u490FWRmHWJuDEBAJNdKivLf+cQtyYIAHXYwpImT2azOEDcpIhR9xcXQ2CqOKKFt0Nm
|
||||
90Fx8UN5JDAA3UICQzuQwABgOr8SN28AfXQHuU7cWEF3PFfc/Qe66n3ixgIAOHFU9X/nELcmCAB12MKS
|
||||
Jk9ms4ht7s8TNymi6kRxMQSmOlhcH8LQ1bKhuPihPBIYgG4hgaEdSGAAMJOdxM0dQN98WtwYQbf8XVYV
|
||||
1weArtlIrhU3FgDA+b78dx5xa4IAUIctLGnyZFbD08VNihi1i7gYAsvcSeJoBNd/MHSguPhhPEhgALqF
|
||||
BIZ2IIEBwEyOFTd3AH2yrdwsboyge14trh8AXXOIuDEAADPZUm6ZR9yaIADUYQtLWjaR1bSCnCluUkTV
|
||||
ybKcuDgC4fPi+g6GLpO1xcUP40ECA9AtJDC0AwkMAGZyo9xe3PwB9MV3xY0PdFN8N1pHXF8AumIzYfcF
|
||||
APPxRrllLnFrggBQhy0sadlENgd7ipsUMWoPcTEE7ieuz6DqFeLih/EhgQHoFhIY2oEEBgCzeb24+QPo
|
||||
g4eLGxfotneJ6w9AV0Qfd30fAGZzutwyl7g1QQCowxaWtGwim4PYVeAX4iZGVP1WlhcXR/RXjKGfiusz
|
||||
GPqrcK5l85DAAHQLCQztQAIDgNmcLW7+ALounrmcKm5coNvizfRNxPULoO1WlyvE9X0AqGMLsWuCAFCH
|
||||
LSwpJrF5ILu9vieLiyH663Hi+gqqniUufhgvEhiAbiGBoR1IYABQxxJxcwjQZU8RNx7QD0eI6xdA2+0n
|
||||
rs8DQF2vFLsmCAB12MKSYhKbpxPETYyoOkcWi4sh+mcl+aO4voKhs4Rx00wkMADdQgJDO5DAAKCOg8XN
|
||||
IUBXrSx/ETce0A83ylbi+gfQVrFz6+/F9XkAqOu7YtcEAaAOW1hSTGLzdF9xEyNGPU9cDNE/LxbXR1AV
|
||||
u1S4+GH8SGAAuoUEhnYggQFAHZE87+YQoKteLm4soF++KK5/AG11f3F9HQDm4jpZxa0JAkAdtrAkTWIL
|
||||
EQ+93eSIKs7yR1hb/iGuj2DoFxLZ5i6GGD8SGIBuIYGhHUhgAFDX1uLmEaBr4vf15eLGAfqHI3TQJYeJ
|
||||
6+cAMFcPd2uCAFCHLSxJk9hCxMORm8VNjqiKRT8XQ/THe8T1DVQ9TFz80AwkMADdQgJDO5DAAKCu14ib
|
||||
R4Cueae4MYB+imNuXT8B2iaOxrlCXD8HgLl6u1sTBIA6bGFJmsQW6pPiJkdUXSZriIshum9ziW2bXN/A
|
||||
0C1nc6HRSGAAuoUEhnYggQFAXd8TN48AXXJ7uVbcGEB/7SquvwBtEkequv4NAPPxPbcmCAB12MKSNIkt
|
||||
1B3lenETJKreKC6G6L7PiusTqNpeXPzQHCQwAN1CAkM7kMAAoK5rZCVxcwnQFUeJ6//ot9OE4yjRdkeL
|
||||
698AMB9XyfJuXRAAZmMLS9IElsIHxE2QqIqHz+uIiyG6awdx/QFVXxAXPzQLCQxAt5DA0A4kMACYiweK
|
||||
m0uALriXcJQppvNEcf0GaIMV5UpxfRsA5mtrty4IALOxhSVpAkthI7la3ASJqoPExRDd9WNxfQFDN8pd
|
||||
xMUPzUICA9AtJDC0AwkMAObiDeLmEqALviWu3wPhHIlFYNd3gKbbRVy/BoCF2NetCwLAbGxhSZrAUnm7
|
||||
uAkSVf+WSPhwMUT3PFZcP0DVEeLih+YhgQHoFhIY2oEEBgBz8Q1xcwnQdg8T1+eByV4orv8ATccOxwBy
|
||||
OMitCwLAbGxhSZrAUllbeLhaz6HiYohuWSxni+sDGLpWNhEXQzQPCQxAt5DA0A58xwYwFxeJm0uANltO
|
||||
fimuzwOTXShriOtHQJP9WVyfBoCF+KpbFwSA2djCkjSBpfQacZMkqq6XzcTFEN3xInH3H1XvEhc/NBMJ
|
||||
DEC3kMDQDiQwAJgrEoTRNU8U19cBh6N00Dabi+vLALBQ57p1QQCYjS0sSRNYSqtKZDq7iRJVHxcXQ3TD
|
||||
WnKpuHuPoViQWVdcDNFMJDAA3UICQzuQwABgrh4jbj4B2mglOVdcXwec+O60nrj+BDTR08X1ZQBYqJtl
|
||||
Fbc2CAAzsYUlafJK7QXiJkpU3Sh3ERdDtN9B4u47ql4nLn5oLhIYgG4hgaEdSGAAMFdvFDefAG3EbxDM
|
||||
x8Hi+hPQREeJ68cAkMJWbm0QAGZiC0vS5JVaZMb/SdxEiaqjxcUQ7RbHg1wr7p5jKHZrWV1cDNFcPDwE
|
||||
uoUEhnYggQHAXE2Im0+AtllbLhPXz4GZXCcc34q2+Iu4fgwAKezm1gYBYCa2sCRNXjnsK26iRFVs37Od
|
||||
uBiivT4t7n6jKnZrcfFDs5HAAHQLCQztQAIDgLk6Vdx8ArTN28X1caCOT4jrV0CTbCSu/wJAKvu5tUEA
|
||||
mIktLEmTVw7Ly2/ETZao+pq4GKKd7iORmOLuNYbOkRXFxRDNRgID0C0kMLQDCQwA5upqcfMJ0CabCLsb
|
||||
Tu8aU4aqm+Tu4voX0BSPEdd/MV4xf8Tusb+Ub8hH5Z3yBnmxPF0eKw+X+8q2ckfZ/FZ3kNhFqM3WkWXX
|
||||
E2I+jZcxd5bdZA95mjxXXiPvko9JPGf4sZwp/xAXX5T1drc2CAAzsYUlafLK5X/ETZYYtaO4GKJ9fiDu
|
||||
HqPqSeLih+YjgQHoFhIY2oEEBgDzsbG4OQVoiyPF9W0MPFFiYc393zD0FXH9C2iKt4jru8gvfmf9SI6Q
|
||||
V8qesr3ErhgriLtfmLs4QngreYQ8W6LPf0EiweFGcfcGaX3KrQ0CwExsYUmavHI6SdyEiaoTxcUP7fJo
|
||||
cfcXVadJ7NLiYojmI4FhVBey6tFf8SDBjXU0CwkMAOaDRHm02T0k3n51fRtLlv5KlpOHTCrD9O4vrp8B
|
||||
TRBv97t+i7Rid6rvyIESz3A3FXc/UNZKci95shwmvxd3/7Aw33JrgwAwE1tYkiavnGI7ITdhYlRsN+Vi
|
||||
iHZYLHzBqueR4mKIdiCBYVQsArtYAUAqJDBUnS9Tk3HQDreV2H42ttiNbWefKbEVbzy4/7u4+435e4K4
|
||||
OQVog6+L69cYmPwMiVjNLt6wnty/gCa5SFy/xcKdKv8rD5B4duvij+ZZX/aST8vl4u4t5uYUtzYIADOx
|
||||
hSVp8srt2+ImTVTFbhWRPe9iiObbT9x9RdUPxcUP7UECw6hYkHGxAoBUSGCo+ou4OKH9YmvZ/SW+M7p7
|
||||
j7l5hbg4A03HyzAz+55MjlfsVsEW3LN7lEyOG9AE64nrr5i/s+R1spm4mKNdVpZIyuX3wcKc79YGAWAm
|
||||
trAkTV653UfcpIlRe4iLIZptTblY3D1F1f3ExRDtQQLDKBIYAORGAkMVCQz9sIUcIteK6weY3aHiYgs0
|
||||
WbzYcYq4Po2BeM42NW4fE/ffYujXwnGWaJoHieuvmLvjZRfhBcHuiufKPxN3/zGza93aIADMxBaWpMmr
|
||||
hGPFTZyo+o3wY6p94uw0dz9R9RVx8UO7kMAwigQGALmRwFBFAkO/bCRHiesLmNkx4mIKNNnjxfVnDBwt
|
||||
Lm4by7/F/RsM7SsufsC4PEdcX0V9saAdR0S4+KJ7IkHlAPmPuP6A6S1264MAMB1bWJImrhLuJmxnV8+T
|
||||
xMUQzbSp8FbY7G6Wu4uLIdqFBIZRJDAAyI0EhioSGPopdqv7h7g+AW/qNvNA060k54jrz1iy9HrZUlzs
|
||||
wlvF/TsM/Vmin7n4AePwPnF9FbOL57EvEl4G7Kf7yqXi+ga8td36IABMxxaWpImrlI+LmzhRFT/WF4uL
|
||||
IZrnE+LuI6rirTkXP7QPCQyjSGAAkBsJDFUkMPTXXSQWn1y/wKjY4c/FEWiq/cX1ZQx8UFzcluF4y3pe
|
||||
LC5+wDh8S1w/xcz+KtuJiyn6Yyvhc6++O7j1QQCYji0sSRNXKZsJW/vU81xxMUSzbCOxs4C7hxiKt0Tu
|
||||
IC6GaB8SGEaRwAAgNxIYqkhg6LfN5e/i+gaqIk4uhkAT3UZ4k3J6V8uG4mI32QvF/XsMRT9bQ1z8gNLO
|
||||
EtdPMb14+S92xHXxRP/cWzhCqZ67u/VBAJiOLSxJE1dJh4ibPFF1vqwqLoZojtiS1d0/VMW4d/FDO5HA
|
||||
MIoEBgC5kcBQRQIDYsvYG8T1DwxFIrGLH9BEB4rrxxh4i7i4TRU7ep4t7m9gaKm4+AGlcSzt3MRxYjMd
|
||||
pYN+eoa4/oKqHdz6IABMxxaWpImrpPUlssbdBIqqWCR0MUQzPFLcfUNVjPcY9y6GaCcSGEaRwAAgNxIY
|
||||
qkhgQGCxsx7OekcbbCzXiOvDGOwYEMdDuNg5jxX3dzAUzyo2EBc/oJR4Xub6J6a3i7hYAt8Q12cwtLNb
|
||||
HwSA6djCkjRxlRZZ424CRdUlwpZ2zbSC/FbcfUMVbzV0DwkMo0hgAJAbCQxVJDAgrCx/EtdHMMT3FLTB
|
||||
EeL6LwYOEBe3mfxE3N/C0KHiYgeUch9xfRPeweLiCIQtJHYfc30HAyQwAJgTW1iSJq7S1pLLxE2iqHq9
|
||||
uBhivJ4t7n6hKsY5STjdQwLDKBYGAORGAkMVCQxY5uni+giGNhcXO6Ap7iY3iuu/WLL0zzKfnVTuJ+7v
|
||||
YSgWuu4oLn5ACeyWUt9fZXVxcQSWOVxc/8EACQwA5sQWlqSJaxxeIW4SRVU8rGZhrFliQf5CcfcLVRyD
|
||||
0k0kMIxingaQGwkMVSQwYJk46/18cf0EA1uLix3QFF8V13cx8BRxcavjWHF/E0OfFhc7oIQXiOuXGBVJ
|
||||
qy6GwGR3Edd/MPBwtz4IANOxhSVp4hqHVeUCcRMpqt4hLoYYjzeLu0+oOk84b7ebSGAYRQIDgNxIYKgi
|
||||
gQGTvU1cP8HAtuLiBjTBTuL6LQZOl+XFxa6OOwvbac/sZrmXuPgBucWxq65fouqPEkmrLobAVD8U14+w
|
||||
ZOkebn0QAKZjC0vSxDUuzxU3kaLqatlQXAxR1sbyb3H3CVVkRncXCQyjSGAAkBsJDFUkMGCyrcT1Eww8
|
||||
QFzcgHFbTk4S128xsJu42M3FB8T9bQx9Q1zsgNw+JK5PoirWEFz8AGc/cf0IJDAAmCNbWJImrnGJzMlz
|
||||
xE2mqDpEXAxR1sfE3R9U/U4W8pYImo0EhlEkMADIjQSGKhIYMBW/K6e3s7iYAeO2l7g+i4EfiIvbXK0v
|
||||
V4qrA0MPEhc/IKdjxPVHDF0hq4mLH+BsIq4vYcnSXd36IABMxxaWpIlrnPYRN5miKrb820xcDFHGPeUm
|
||||
cfcHVXuIiyG6gQSGUSQwAMiNBIYqEhgwFYnG0yOBAU0UL7T8QVyfxcAScbGbj9eLqwNDPxMXOyCn74vr
|
||||
jxg6TFzsgJnE70XXn/puZ7c+CADTsYUlaeIap3hL+zRxEyqqjhQXQ5RxvLj7gqqfi4sfuoMEhlEkMADI
|
||||
jQSGKhIYMNW+4voKSGBAM71QXH/FwLHi4jZfq8rfxNWFof8RFz8gl1+L64sYeqC42AEz+ay4/tR3JDAA
|
||||
mBNbWJImrnHbXdyEiqob5c7iYoi8dhV3TzDqweJiiO4ggWEUCQwAciOBoYoEBky1rbi+giVLHyouZsC4
|
||||
rCEXi+uvGDz7uYu42C3EM8TVh6EzZQVx8QNy4C3xmV0kHFGL+ThAXJ/qOxIYAMyJLSxJE1cT/FjcpIqq
|
||||
o8XFD/nEF2Uyouv5lrgYoltIYBhFAgOA3EhgqCKBAVOtIhz35rEDA5rmLeL6KgZybZfOs416ItHDxQ/I
|
||||
4TJx/RADHxcXN2A2jxTXp/qOBAYAc2ILS9LE1QQ7iZtUUXWzxNtFLobIg7cU6om+uZ24GKJbSGAYRQID
|
||||
gNxIYKgigQEObzF6JDCgSTaSq8X1VSxZeo1EjFzsUthNXL0YOl8iKc7FD0jtWnH9EAN7i4sbMJutxfWp
|
||||
viOBAcCc2MKSNHE1xTfFTayo+qq4+CG91eQCcfcBVXG2mIshuocEhlEkMADIjQSGKhIY4Jwkrr/0HUe8
|
||||
oUkOF9dPMfA2cXFL6Xvi6sbQy8XFDkhpOXH9D0MbiosdMJt4pu/6VN/d360PAsB0bGFJmriaIt7edhMr
|
||||
Ru0oLoZI643i4o+qG2RLcTFE95DAMIoEBgC5kcBQRQIDnK+I6y99xw5+aIq7yo3i+ikGW8mX+F0Rz95i
|
||||
B0XXBgyUuhfot+hjrv9h4GxxcQPqulJc3+qzbdz6IABMxxaWpImrSY4WN7mi6gfi4od0IsuXrS3r+bC4
|
||||
GKKbSGAYxcMtALmRwFBFAgOco8T1l74jgQFN8SVxfRQDLxMXtxw+La4NGDpQXOyAVDYV1/cw8BlxcQPq
|
||||
ulhc3+qzzd36IABMxxaWpImrSeItbjLy63mYuBgiDba2rCf3GZ1oHhIYRpHAACA3EhiqSGCA80Fx/aXv
|
||||
SGBAEzxAXP/EwPmysrjY5XAH4ez9mcULLTzrQE6bi+t7GCiZ1IVuit+Mrm/12fpufRAApmMLS9LE1TQf
|
||||
FTfBoirOeHXxw8JtLSTS1PN2cTFEd5HAMIoEBgC5kcBQRQIDnEPE9Ze+20JcvICSfiquf2LgaeLiltO7
|
||||
xbUFQ+w2iZxIYJgZL+5hoX4jrm/12WpufRAApmMLS9LE1TSxhRaZ4PX8j7gYYmG+Li7eqLpcWLjtHxIY
|
||||
RjEOAORGAkMVCQxwSGDweIMY47anuL6JgVhgWV5c7HKK3zD/ENcmDNwgsVOsix+wUCQwzGwTcXED6nqL
|
||||
xBFzuJVbGwSAmdjCkjR5NdF7xX15QdUZMo4ful0WGb4u1hj1KnExRLeRwDCKBAYAuZHAUEUCAxwSGLxV
|
||||
xcULKGGxnC2ub2LgUeJiV8JLxbUJQ58TFztgoe4hrs9hydKrxMUMwDy4NUEAqMMWluQmtQZYT64U9yUG
|
||||
VfuIiyHmLpJBThMXZ1RdIDwM7ScSGEaRwAAgNxIYqkhggEMCw6jrxcUKKOV54vomBn4kLm6lrCTnimsb
|
||||
hu4tLn7AQmwrrr9hydLTxcUMwDy4NUEAqMMWluQmtYb4X3FfYlB1jsRbDS6GmJt9xcUYo54jLoboPhIY
|
||||
RpHAACA3EhiqSGCAc4S4/tJnl4iLFVDCGnKhuL6JgfuJi11J8VKMaxuGviMudsBCkMAwvePExQzAPLg1
|
||||
QQCowxaW5Ca1hogfu5eJ+yKDqmeLiyHqi90E/iouvqj6g5A0018kMIwigQFAbiQwVJHAAOeT4vpLn8X3
|
||||
dhcroIQ3ieuXGPiyuLiVtpycIq6NGHqouPgB80UCw/Q+KC5mAObBrQkCQB22sCQ3qTUIC2X1nC8ri4sh
|
||||
6nmduNhi1OPFxRD9wLw8igQGALmRwFBFAgOcr4rrL30Wi5IuVkBut5OrxfVLLFl6o9xNXOzG4cHi2omh
|
||||
X0gke7j4AfNBAsP03iAuZgDmwa0JAkAdtrAkN6k1SCzKx+K8+zKDqlhUdDHE7DaQq8TFFVW/En609xsJ
|
||||
DKNIYACQGwkMVSQwwPmJuP7SZ8eLixWQ24fE9UkMfExc3Mbpa+LaiqG9xMUOmA8SGKb3fHExAzAPbk0Q
|
||||
AOqwhSW5Sa1hninuywyqLpY4dsPFEDPj4Up9u4iLIfqDBIZRJDAAyI0EhioSGOCcKa6/9NkR4mIF5HQX
|
||||
iR0GXJ/EkqXXyibiYjdOWwv3bWZnC8dpIhUSGKa3t7iYAZgHtyYIAHXYwpLcpNYw8ePgLHFfaFAVxyC4
|
||||
GGJ6dxV+pNfzfXExRL+QwAC0AzszdQsJDFUkMMC5XFx/6bM3i4sVkNOx4vojBt4lLm5NEElPrs0Yeo64
|
||||
2AFzRQLD9B4mLmYA5sGtCQJAHbawJDepNVCcue++0KAqHm7zJvDcfEVcLDFqibgYol9IYADagQSGbiGB
|
||||
oYoEBkx1G3F9pe9YaENpO4rrixi4Qpr8zGYjuVpc2zFwgawqLn7AXJDAML1txMUMwDy4NUEAqMMWluQm
|
||||
tQaKM/fj7H33pQZVbxcXQ4x6sLgYYtQXxcUQ/UMCA9AOJDB0CwkMVSQwYKp7iesrfbebuHgBufxYXF/E
|
||||
wCvFxa1JYucW13YMvVpc7IC5IIFhek08ZgdoLbcmCAB12MKS3KTWUI8Q96UGVZEtfztxMcRQJMX8UlwM
|
||||
URVHbGwlLo7oHxIYgHYggaFbSGCoIoEBU+0hrq/03d3FxQvI4THi+iEG/ipteHN/DblI3DVggN1PkQIJ
|
||||
DNNjfAEJuTVBAKjDFpbkJrUGO1HcFxtUHSIufhh6irjYYdSR4mKIfiKBAWgHEhi6hQSGKhIYMNVbxPWV
|
||||
vltTXLyA1BbL78X1Qww8U1zsmmg/cdeAoXeKix1QFwkM0yOBAUjIrQkCQB22sCQ3qTXY/cR9sUHVf2Qz
|
||||
cTHEkqWrSDz4drFD1bVye3FxRD+RwAC0AwkM3UICQxUJDJjqG+L6Sp+dLy5WQA7PEdcPMXCmRJKHi10T
|
||||
RVvPEnctGIhnJWxzj4UggWF6K4qLGYB5cGuCAFCHLSzJTWoN91VxX25Q9TFx8cOSpa8SFzOMeq+4GKK/
|
||||
SGAA2oEEhm4hgaGKBAZMdaG4vtJnx4uLFZDaasIYnNn/iItdk0Wb3bVg6AhxsQPqIIFhei5eAObJrQkC
|
||||
QB22sCQ3qTXcPeVmcV9wMHSjbCkuhn22nrAIUE/EKeLl4oj+IoEBaAcSGLqF7y5VJDBgsnuJ6yd9d7C4
|
||||
eAGpvUFcH8TAT8XFrQ1+LO6aMBDP3e4qLnbAbEhgmJ6LV99wjDZy2tmtEwLAVLawJE1YbTQhbvJF1efE
|
||||
xa/PPiAuVhgVD6JcDNFvJDAA7UACQ7eQwFBFAgMmY3c1r03n7aO91perxPVBDDxQXOza4L7irglDx4qL
|
||||
HTAbEhi8K8XFq29IYEBOJDAAqMUWlqQJq41iZ4HrxU3AGIqdKuKNJBfDPrqz3CAuVqi6SNYQF0f0GwkM
|
||||
QDuQwNAtJDBUkcCAyeLtZtdP+m5HcfECUuIFgZl9TVzc2uTz4q4NQzuIix0wExIYvPjd4+LVNyQwICcS
|
||||
GADUYgtL0oTVVh8WNwGj6jhx8eujL4qLEUa9SFwMARIYgHYggaFbSGCoIoEBy9xNXB/pu5uEZGTkxosl
|
||||
M4sXSu4hLnZtsoVwn2d2grjYATMhgcEjgWGABAbkRAIDgFpsYUmasNpqI7lW3CSMKt6+GWzb6GKDUefK
|
||||
SuLiCJDAALQDCQzdQgJDFQkMWOZgcX2k784QFy8gpS+I638Y+IS4uLXR+8VdI4Z2FRc7YDokMHgkMAyQ
|
||||
wICcSGAAUIstLEkTVpsdJG4SRtX3xcWvL5aTk8XFBqOeIi6OQCCBAWgHEhi6hQSGKhIYECKh/RpxfaTv
|
||||
PiouZkAqsWW+63sYiJdtNhMXuzZaT/guMrNTJZ49ufgBDgkMHgkMAyQwICcSGADUYgtL0oTVZusIP6Lq
|
||||
eYi4GPbBPuJiglHxttby4uIIBBIYgHYggaFb+L5bRQIDwuHi+gdISEZ+LKzM7L3i4tZmrxF3rRiKZ08u
|
||||
doBDAoNHAsMAn7PIiQQGALXYwpI0YbXd68VNxKg6SVz8ui6OQogjEVxMMOpR4uIILEMCA9AOJDB0CwkM
|
||||
VSQw4EES58u7/oElSzcVFzcghfjN6PodBuIz+7biYtdmq8pfxV0zBs6RFcXFD5iKBAaPBIYBEhiQEwkM
|
||||
AGqxhSVpwmq7NeRCcZMxqh4jLoZd9nJxscCoH4uLITAZCQxAO5DA0C0kMFSRwNBvsTjP77/p/V5c3IAU
|
||||
VpDfiut7GHiduNh1wdPEXTOGXiAudsBUJDB4JDAMkMCAnEhgAFCLLSxJE1YX7C9uMkbV6dKn4wHWlSvE
|
||||
xQKjHiAujsBkJDAA7UACQ7eQwFBFAkN/RfLCWeL6BQa6uHU9muNZ4vodBv4usVOBi10XxPOkOHbSXTsG
|
||||
IsFudXHxAyYjgcEjgWGABAbkRAIDgFpsYUmasLogjgmIB5luQkZVn87ke5+4GGDU18TFEJiKBAagHUhg
|
||||
6BYSGKpIYOin+wrbl8/uIeLiByxULMxfIK7fYeA54mLXJbuKu3YMvUFc7IDJSGDwSGAYIIEBOZHAAKAW
|
||||
W1iSJqyueLq4CRlVf5TF4mLYJVvI9eJigKo4P/ie4uIITEUCA9AOJDB0CwkMVSQw9Mva8k65UVx/wNAl
|
||||
Elv8uzgCCxVHI7h+h4GzpQ/PWsJ3xMUAA/G9bT1xsQOWIYHBI4FhgAQG5EQCA4BabGFJmrC6IrayO1Pc
|
||||
pIyq2PbRxbBLPi/u2jHq0+JiCDgkMADtQAJDt5DAUEUCQz9sIK+Ry8T1A4w6TFwsgYWKxVg+i2b2OHGx
|
||||
66JtJF6EcHHAAMf5YDYkMHgkMAyQwICcSGAAUIstLEkTVpfsIW5SRtX5EsduuBh2wf3EXTdGxS4VdxQX
|
||||
R8AhgQFoBxIYuoVFoyoSGLprE3mmfFluEHf/Mb0HiIsrsFCHiOtzGDhZlhMXu676pLhYYOBa2Uxc7IBA
|
||||
AoNHAsMACQzIiQQGALXYwpI0YXVJ/GCMH45uYkZVVxc2og/8VNw1Y9Sh4uIITIcEBqAdSGDoFhIYqkhg
|
||||
aJ/YVj2OgritbC73kEdIHAP4ZjlO/iTufqOes8TFHlioOwnHM87sweJi12W3l1ikd/HAwCfExQ4IJDB4
|
||||
JDAMkMCAnEhgAFCLLSxJE1bXPEzcxIyqi2QNcTFss73EXS9GXS23ExdHYDokMADtQAJDt5DAAGA2zPvI
|
||||
5XPi+hwGvikubn1wkLiYYOAm2Vpc7AASGDwSGAZIYEBOJDAAqMUWlqQJq4u+L25yRtVrxcWvreJYjHPE
|
||||
XStGvUVcHIGZkMAAtAMLWd1CAgOAmVwltxE3fwALsb24PoeBm2UbcbHrg9hZ5zJxscFA7DDkYgeQwOCR
|
||||
wDBAAgNyIoEBQC22sCRNWF20RNzkjKr4Uhg/OF0M2+jF4q4To+IhAw85MR8kMADtQAJDt5DAAGAm8Ra0
|
||||
mzuAheLlkJl9Wlzc+oTnMLO7v7jYod9IYPBIYBgggQE5kcAAoBZbWJImrK76srgJGlUHiotf20Qixj/E
|
||||
XSNGvUxcHIHZkMAAtAMJDN1CAgOA6cSxcOuJmzuAhfh/4vocBq6XzcXFrk9iJ8w/iYsRBn4kLnboNxIY
|
||||
PBIYBkhgQE4kMACoxRaWpAmrq+KcudjOz03SGIoHXuuLi2GbvEfc9WHU+bKKuDgCsyGBAWgHEhi6hQQG
|
||||
ANPpSkI6mmV5+bW4PoeB94mLXR/tLS5GGNpdXOzQXyQweCQwDJDAgJxIYABQiy0sSRNWlx0lbpJG1SHi
|
||||
4tcWd5T/iLs2jHqmuDgCdZDAALQDCQzdQgIDAOfvsoa4eQNYiKeL63MYuErY+WRoOTlZXKwwcIZEYpCL
|
||||
H/qJBAaPBIYBEhiQEwkMAGqxhSVpwuqyO0hs6+cmagxdK5uJi2EbfFbcdWHUmbJYXByBOkhgANqBBIZu
|
||||
IYEBgPMEcXMGsBCryl/F9TkMvFFc7PpsJ3GxwtC+4mKHfiKBwSOBYYAEBuREAgOAWmxhSZqwuu5QcRM1
|
||||
qj4qLn5Nt4O464H3WHFxBOoigQFoBxIYuoUEBgBTHSduvgAW6tXi+hwGLhR2PvG+Ii5mGPizrCQudugf
|
||||
Ehg8EhgGSGBATiQwAKjFFpakCavrNpSrxU3WGLpRthQXwyb7sbjrwajY0jG2dnRxBOoigQFoBxIYuoUE
|
||||
BgCTxdER64ubL4CFWFf4zJnZC8TFDkuWbiXxbMnFDQMHiIsd+ocEBo8EhgESGJATCQwAarGFJWnC6oO3
|
||||
iZusURVHMbj4NVXsJuCuA95DxMURmAsSGIB2IIGhW1hMArBMLA7yvR65vFdcv8PAOcKRjDM7TFzsMHCJ
|
||||
sIMHAgkMHgkMAyQwICcSGADUYgtL0oTVB2vL5eImbAzdLPcUF8OmiYcGfxB3HRj1bXFxBOaKBAagHUhg
|
||||
6BYSGAAs8yJx8wSwUJvLf8T1OwzsLS52GGIX1NktFRc79AsJDB4JDAMkMCAnEhgA1GILS9KE1Rec41hP
|
||||
W85SjQd3rv3w7i0ujsBckcAAtAMJDN1CAgOAEG/HuzkCSGFCXL/DwC+FIxnr+V9xMcRAJHhwDBBIYPBI
|
||||
YBgggQE5kcAAoBZbWJImrL5YVS4UN2mjakdxMWyKteRScW3HqGPExRGYDxIYgHYggaFbSGAAcLiweIpc
|
||||
IuE9dmR0fQ8DDxMXO4yKIxJ4/jaz94uLHfqDBAaPBIYBEhiQEwkMAGqxhSVpwuqT54ubtFH1PXHxa4qD
|
||||
xLUbo+KM3DuLiyMwHyQwAO1AAkO3kMAA9NtHhOQF5BTPAFzfw8B3xMUN03uuuFhi4HqJY1tc7NAPJDB4
|
||||
JDAMkMCAnEhgAFCLLSxJE1afrCTniJu4UbWzuBiO2x3kWnFtxqh4U8vFEZgvEhiAdiCBoVtIYAD6K85K
|
||||
J3kBOe0qru9haDtxscP0FsuZ4uKJgU+Lix36gQQGjwSGARIYkBMJDABqsYUlacLqmyeLm7hRdZK4+I1b
|
||||
/MBz7cWoSPTYSFwcgfkigQFoBxIYuoUEBqB/rpGniJsTgFSWl9PF9UEMfFZc7DC7R4uLKQbi2JZ7iYsd
|
||||
uo8EBo8EhgESGJATCQwAarGFJWnC6pv4gf5rcZM3quLHpovhuNxHOJezvneKiyOwECQwAO1AAkO3kMAA
|
||||
9MvZwqIWSthXXB/EQGzzv4W42KGeH4qLLQa+Li5u6D4SGDwSGAZIYEBOJDAAqMUWlqQJq48eI27yRtVp
|
||||
EgkfLobj8ANx7cSo+MK/trg4AgtBAgPQDiQwdAsJDEB/fFBWEzcXACmtIueJ64cY+IC42KG+HcTFFkM7
|
||||
iYsduo0EBo8EhgESGJATCQwAarGFJWnC6qufiZvAUbWPuPiVxtaDc/MacXEEFooEBqAdSGDoFhIYgO77
|
||||
nTxA3BwA5PAKcX0RA1fLBuJih7k5WlyMMRDPJ13c0G0kMHgkMAyQwICcSGAAUIstLEkTVl/tLG4CR1Vs
|
||||
X7pYXAxLifrPEtc+jLpQVhUXS2ChSGAA2oEEhm4hgQHorkvlRTLu31zol3XkCnF9EgNvFhc7zN2dJI7j
|
||||
cHHGwP+Iix26iwQGL+YKF6++IYEBOZHAAKAWW1iSJqw+O17cJI6qZ4iLXyn7iWsXvIiXiyOQAgkMQDuQ
|
||||
wNAtJDAA3XOZxK5pa4gb90BO7xbXLzFwiTA203qfuFhjIHbhadIRrsiPBIbpuXj1DQkMyIkEBgC12MKS
|
||||
NGH12b3FTeKoOl9WEhfD3NaUi8W1C6POEd7eQk4kMADtQAJDt5DAAHTHHyR2XGBxFOOymVwrrn9iYH9x
|
||||
scP83Vb4PjOzcb88hLJIYJjeKuJi1ickMCAnEhgA1GILS9KE1XdfEDeRo+oAcfHL7UBx7YH3BHFxBFIh
|
||||
gQFoBxIYuoUH/kC7xWLx5+Rhspy4cQ6U8ilx/RTAeMXLQyzc9gcJDNNbW1zM+oQEBuREAgOAWmxhSZqw
|
||||
+u6ucqO4yRxDF8rq4mKYy6bCmyH1nSY8EEVuJDAA7UACQ7eQwAC0z7/lOHmysNsCmmIbuVlcnwUwfi8T
|
||||
N3bRPSQwTO924mLWJyQwICcSGADUYgtL0oSFJUuPFDeZoyrOaHXxy+Uoce2A9whxcQRSIoEBaAcSGLqF
|
||||
BAagHc6Q90h8L19Z3HgGxunb4vougGa4TNYSN37RLSQwTG9LcTHrExIYkBMJDABqsYUlacLC4AzI68RN
|
||||
6Bi6Qkpt48WbIXPzA3FxBFIjgWHUHSTmRqBJWDjrFhIYgHa4Ur4sL5S7iBvPwLg8XFy/BdAscZSqG8Po
|
||||
FhIYpndfcTHrExIYkBMJDABqsYUlacLCwCHiJnRUvVVc/FL7nrj64e0oLo5AaiQwjIrFYhcrAEiFBAag
|
||||
nf4kB0kkZ7uxDZQSRw2eKq6fAmiWq2UjcWMZ3UECw/R2FxezPiGBATmRwACgFltYkiYsDKwn8SPBTeoY
|
||||
ihhFrFwMU3mkuLrhxVteLo5ADiQwjCKBAUBuJDAA7XeWvElYlMI4PFlcvwTQTB8SN5bRHSQwTO854mLW
|
||||
JyQwICcSGADUYgtL0oSFoaXiJnVUxW4VLn4pLJbfiqsXo26SrcXFEsiBBIZRJDAAyI0EBqA7bpBj5MHi
|
||||
xjuQ2kryZ3H9EUAzXS9bihvT6AYSGKZXavffJiOBATmRwACgFltYkiYsDN1GLhM3sWPoWrm9uBguVGTZ
|
||||
ujrhfUJcHIFcSGAYRQIDgNxIYAC66STZTdy4B1J5mbj+B6DZPiduTKMbSGCY3lHiYtYnJDAgJxIYANRi
|
||||
C0vShIWql4ub2FF1uLj4LcQacqG4+jDqOtlMXCyBXEhgGEUCA4DcSGAAuu2n8iBx4x9YiPie+g9x/Q5A
|
||||
820nbmyj/UhgmN7PxcWsT+IZeXyGY37uKa5vYYAEBgC12MKSNGGhalX5m7jJHUM3Surt7N4sri547xMX
|
||||
RyAnEhhGxY8jFysASIUEBqAfJuR24uYBYD7eKa6vAWiHb4sb22g/Ehimd4W4mAF1rSyub2GABAYAtdjC
|
||||
kjRhYRTHGNTzGXHxm4+N5d/i6sGoq2Q9cbEEciKBYRQJDAByI4EB6I94aP88WU7cfADUtanE8Y+unwFo
|
||||
j4eKG+NoNxIYZraJuLgBdV0krm+BBAYANdnCkjRhYdRi+aO4CR5DN8s9xMVwro4UVwe8N4mLI5AbCQyj
|
||||
SGAAkBsJDED/fEs2EDcnAHV8XFzfAtAuvxCS2rqHBIaZPUZc3IC6ThLXt0ACA4CabGFJmrDg7SNugkfV
|
||||
ceLiNxdxLlUkQ7i/j1GXSJyF5mIJ5EYCwygSGADkRgID0E8XyP3EzQvATPiNDXTL48SNdbQXCQwze6u4
|
||||
uAF1fV5c3wIJDABqsoUlacKCF9nNp4mb5FG1RFwM6zpe3N+Fd4C4OAIlkMAwigQGALmRwAD01/XyFHFz
|
||||
AzCdb4jrTwDa6SyJ3WLdeEc7kcAwsxPFxQ2o66Pi+hZIYABQky0sSRMWpvf/xE3yqPqOuPjVsau4vwnv
|
||||
L7KSuFgCJZDAMIoEBgC5kcAA4BXi5gdgqjgv3/UhAO32HHFjHu10F3H3GQPXyariYgfU8S5xfQskMACo
|
||||
yRaWpAkLM/uRuIkeVTuLi99Mlpdfi/t78J4qLpZAKSQwjCKBAUBuJDAACK8RN0cAy8ROkr8U138AtFsc
|
||||
K8SCbndsLu4+Y2h3cbED6jhYXL8CCQwAarKFJWnCwsweKG6iR9XPxMVvJs8S97fg/UYi6cPFEiiFBIZR
|
||||
JDAAyI0EBgDLvFTcPAGEfcT1GwDd8CpxYx/tQwLD7A4XFzugjo+J61cggQFATbawJE1YmB3nR9Yzl8zY
|
||||
1SSyx93fgfcYcbEESiKBYRQJDAByI4EBwDI3y+PEzRXotzhq8E/i+g2AbrhC+P3ZDSQwzO4SWVFc/IDZ
|
||||
HCOuX4EEBgA12cKSNGFhdttKPChyEz6GTpPYstLFcKo3ivsb8H4qLo5AaSQwjOIBEoDcSGAAMNm/5V7i
|
||||
5gv01wHi+guAbnmnuDkA7bKuuPuLqkeJix8wmx+K61MggQFATbawJE1YqOdz4iZ8VD1BXPwm21CuFvfv
|
||||
4T1IXCyB0khgGEUCA4DcSGAAMNUfZA1xcwb6Zy25TFxfAdAt18rG4uYCtMfK4u4vqr4mLn7AbC4S16dA
|
||||
AgOAmmxhSZqwUM+WcqO4SR9DZ8licTFc5qPi/i28OMLExREYBxIYRpHAACA3EhgAOPG7ys0Z6J+3iesj
|
||||
ALqJ+b8bbhB3fzEUOyJvIS5+wHQ2EdefMEACA4BabGFJmrBQ3+HiJn1UPV1c/MLdhUSQ+uKL+jbiYgmM
|
||||
AwkMo0hgAJAbCQwApvMwcfMG+iMe0scb2a5/AOimeK52F3FzAtrjcnH3F1VHiosfMJ2niOtLGCCBAUAt
|
||||
trAkTViojwcD9ZwvK4mL4dfF/Rt4nxEXR2BcSGAYRQIDgNxIYAAwnbNlRXFzB/ohFnZc3wDQbceKmxPQ
|
||||
Hn8Rd29RFQk7dxYXQ8A5WlxfwgAJDABqsYUlacLC3Lxb3MSPqv1lauzi7SD338K7XtgmDU1DAsMoEhgA
|
||||
5EYCA4CZvFjc3IHuY4dDoN92EDc3oB3OEHdfMYrjdVHXmnKNuH6EARIYANRiC0vShIW5WU94iDy7C2U1
|
||||
WRa35eU0cf8tvA/K5L4HNAEJDKNIYACQG989AcwkfnutIm7+QLd9TVyfANAP3xc3N6AdfiDuvsJ7rLg4
|
||||
ApO9VFz/wRAJDABqsYUlacLC3L1J3OSPqtfIspg97dYy1HO1bCST+x3QBCQwjCKBAUBuJDAAmM1+4uYP
|
||||
dNeDxPUFAP2yi7g5As3HNvdzc6nwrBQzWV0isdf1HwyRwACgFltYkiYszN0acom4DwAMXS6xsLeq/PXW
|
||||
MtRzoLi+B4wbCQyjSGAAkBsJDABmc56sIG4OQfcsJ78Q1xcA9MupEnOCmyvQbO8Xd08xvR/JSuLiCbxd
|
||||
XL9BFQkMAGqxhSVpwsL8sIhXz1vkdVPKMLN/CAuiaCrmvlGMVwC5kcAAoI5HiptD0D2PF9cHAPTTE8TN
|
||||
FWi214q7n5jZx4WkHUy1o9wors+gigQGALXYwpI0YWF+ItvzfHEfAhiKoxCumlKGmb1CXJ8DmoAEhlEk
|
||||
MADIjQQGAHUcI24OQbesKOeI6wMA+inmhMXi5gw017PE3U/M7iNCEgOW2UTY/bk+EhgA1GILS9KEhfl7
|
||||
hrgPAWC+4stWHLnh+hvQBCQwjCKBAUBuJDAAqOM64XtJ971I3P0H0G8vEDdnoLkeIe5eop6jZWVxsUV/
|
||||
rC+/EddH4JHAAKAWW1iSJizMX2Q3/17cBwEwH88W19eApiCBYRQLBQByI4EBQF37iptH0A1ryiXi7j2A
|
||||
frtQVhc3d6CZ7izuXqK+X8kW4uKL7ot7z9rM3JHAAKAWW1iSJiwszOPEfRAAc3WWsOUfmo4EhlEkMADI
|
||||
jQQGAHV9Stw8gm54q7j7DgDh9eLmDjRTHE98k7h7ifr+LXEcL89U+2VPuVxcn8DMSGAAUIstLEkTFhYm
|
||||
ztv6pbgPA2AuIhnG9TGgSUhgGEUCA4DcSGAAUFe8gcuZ0N20kcQijbvvABDiO+Ntxc0haKbzxN1LzN2Z
|
||||
EovafA/qtk0kjg9xfQD1kMAAoBZbWJImLCzcruI+DIC6ThG+YKMNSGAYRQIDgNxIYAAwF/cQN5eg3Y4Q
|
||||
d78BYLL3iptD0Ew/EHcfMX+/lWfJKuJijnbaWN4t14q776iPBAYAtdjCkjRhIY0TxX0gAHU8TFy/ApqG
|
||||
BIZRJDAAyI0EhqrzJeZeNNuGsrncUx4ou8uT5dXyAfminC7XibvPmL+ni5tL0F53kxvF3W8AmCwW9zYT
|
||||
N5egeT4q7j5i4eI31EfkAbK8uPij2eJYkHhxNHZcuF7cfcbckcAAoBZbWJImLKSxo7gPBGA23xPXp4Am
|
||||
IoFhVCzSuFgBQCokMFT9RVyc0E4ryF1kb/mg/EZuFnfvUc8h4mKN9jpO3L0GAOfj4uYSNM/+4u4h0vq7
|
||||
HCaPlbXE3Qs0wzryJPmsXCHufmJhSGAAUIstLEkTFtLhoQLmY3tx/QloIhIYRpHAACA3EhiqSGDovtgi
|
||||
Nr5z/EJcH8DMYjtqF1e0U+xg4u4zAEwndmzZWtycgmZ5sLh7iHxukl/KofJEiURadmgYj5Ukdmt7rnxM
|
||||
zhQSmfMjgQFALbawJE1YSCfOGuVDFnPxBXF9CWgqEhhGkcAAIDcSGKpIYOiX+8u3xPUFeJeIiyXaZzn5
|
||||
mbj7DAAziZes3LyCZonnCe7+oayr5efyCYnjzmKnhh0kjkSLz2J371DP6rKV7CLPkIMk5qezheOxxoME
|
||||
BgC12MKSNGEhrU+L+2AApoovaXcV14+ApiKBAeguzkxvLhIYqkhg6KdHyAXi+gRGrSwujmiXx4m7vwBQ
|
||||
x/3EzS1olvPE3T80w/USvz9+KkdL7NzwVnmFPEceL7vKfWVb2UI2v1XsKhZJKss0eaeHFWVyW8O6suxa
|
||||
4rri+iK5eGfZQ+IIuGfJK+UdcrjEy3rfl98KR0A003ZunRAAprKFJWnCQlrxYR5fbNyHAzDZEeL6ENBk
|
||||
JDAA3UUCQ3ORwFBFAkN/3U5iy1/XL1B1J3ExRHsslj+Iu78AUMcPxc0vaJYvibt/AJDDtm6dEACmsoUl
|
||||
acJCeh8S9+EALHOtbCKu/wBNRgID0F0kMDQXCQxVJDD021ryG3F9A0MPFBc/tMcLxN1bAJiL3cXNMWiO
|
||||
l4u7dwCQw9ZunRAAprKFJWnCQnobyTXiPiCA8G5xfQdoOhIYgO4igaG5SGCoIoEBsbvAVeL6Bwbi6AEX
|
||||
O7TDGnKRuHsLAHNxhjR523oMjh5w9w4ActjQrRMCwFS2sCRNWMjjIHEfEEAsQsQZYq7fAE1HAgPQXSQw
|
||||
NBcJDFUkMCDsL65/YIA5vd2WiruvADAfTxE316AZVhRehANQykpunRAAprKFJWnCQh5rCw+b4bxeXJ8B
|
||||
2oAEBqC7WOxqLr5TVpHAgLBYzhbXR7Bk6XPExQ3Nt6FcLe6+AsB8nCsriZtz0Aw/EHfvACClf7k1QgBw
|
||||
bGFJmrSQz2vFfVCgvy6U1cX1F6ANSGAAuosEhuYigaGKBAYs8wxxfQSD72wuZmi+j4i7pwCwEAeIm3PQ
|
||||
DK8Wd98AIKVz3BohADi2sCRNWsgnFqpjwdp9WKCfXiCurwBtQQID0F0kMDQXCQxVJDBgmdWE8eG9RlzM
|
||||
0Gx3lRvF3VMAWIhLZA1xcw/G757i7hsApPR9t0YIAI4tLEmTFvJ6kbgPC/TPOcKWfWg7EhiA7iKBoblY
|
||||
oK0igQGTHSmun/TdUnHxQrN9Sdz9BIAU/lfc3INmOF/cfQOAVD7m1ggBwLGFJWnSQl6xYP1ncR8Y6Jcn
|
||||
iesjQJuQwAB0FwkMzUUCQxUJDJhsL3H9pO9IYGif+4u7lwCQyr9kPXFzEMaPI4QA5PYGt0YIAI4tLEmT
|
||||
FvJ7qrgPDPTHabK8uP4BtAkJDEB3kcDQXCQwVJHAgMnWlpvF9ZU+I4GhfX4i7l4CQErvFzcHYfweLu6e
|
||||
AUAqj3NrhADg2MKSNGkhv1i4/p24Dw30wyPF9Q2gbUhgALqLBIbmIoGhigQGTBVHtbm+0mckMLTLHuLu
|
||||
IwCkdr1sLm4uwnjF8+MLxN03AEhhS7dGCACOLSxJkxbK4IFEf/1QXJ8A2ogEBqC7SGBoLhIYqkhgwFRf
|
||||
FNdX+owEhvZYLGeJu48AkMOnxM1HGL93i7tnALBQcYzQcm6NEAAcW1iSJi2UsZycJO7DA90WZ5m6PgG0
|
||||
EQkMQHeRwNBcJDBUkcCAqQ4U11f6jASG9nieuHsIALnE0Uv3FDcnYby2FXfPAGChfuzWBwFgOrawJE1c
|
||||
KOeh4j480F1fEdcXgLYigQHoLhIYmosEhioSGDDV88X1lT4jgaEd1pALxd1DAMjp6+LmJYzfL8TdMwBY
|
||||
iAPd+iAATMcWlqSJC2V9V9wHCLonMtrvLq4fAG1FAgPQXSQwNBcJDFUkMGAqjusbRQJDO7xR3P0DgBJ2
|
||||
Ejc3YbyeIu5+AcBCPNytDwLAdGxhSZq4UNYO4j5A0D2fFNcHgDYjgQHoLhIYmosEhioSGDDVg8T1lT4j
|
||||
gaH5NpA4i9jdP4z6u2wkawPTWE/OFdd/4P1U3PyE8VpJ2J0HQEr/kdXc+iAATMcWlqSJC+V9SdwHCbrj
|
||||
ermDuPsPtBkJDEB3kcDQXCQwVJHAgKk4L3oUCQzN90Fx9w4e31NQx57i+g+m9xhxscR4vUnc/QKA+fiW
|
||||
WxsEgJnYwpI0eaG8reVGcR8m6IZDxN17oO1IYAC6i4WB5iKBoYoEBky1jbi+0mckMDTbneUGcfcOo06R
|
||||
5cXFEpjqRHH9CN7vhPHVPLGrCL8BAKTyHLc2CAAzsYUlafLCeBwl7sME7Xe1rC/uvgNtRwID0F0kMDQX
|
||||
Dy+rSGDAVJuL6yt9RgJDsx0r7r7Bu7+4OAJO7Mpzs7i+BI/fAc0Un+XufgHAXMRn4gZubRAAZmILS9Lk
|
||||
hfHYTOKYAfehgnbjYSG6jAQGoLt4cNlcJDBUkcCAqUhgGMVvkua6r7h7Bu9z4uIIzOQIcf0J3vmysrhY
|
||||
YnxuI5eJu2cAUNc33bogAMzGFpakCQzj835xHypor/hhsaa4+w10AQkMQHeRwNBcJDBUkcCAqUhgGEUC
|
||||
Q3P9SNw9w6hr5Pbi4gjM5HZylbh+Be9l4mKJ8XqluPsFAHU9zq0LAsBsbGFJmsAwPvGDKo4bcB8saKdY
|
||||
3HX3GugKEhiA7iKBoblIYKgigQFTkcAwigSGZnq0uPsFj36MhXi1uH4FL17IWUtcLDE+K8lZ4u4ZAMzm
|
||||
IlnRrQsCwGxsYUmawDBebxX34YL2iS334oeFu89AV5DAAHQXCQzNRQJDFQkMmIoEhlEs/DbPYvmduPuF
|
||||
UX+V1cTFEqgjjkQ4V1z/ghfPKF0sMV67iLtfADCbN7g1QQCowxaWpEkM47W2/EPcBwzahYUf9AEJDEB3
|
||||
8TnWXCQwVJHAgKlIYBhFAkPzPFvcvYL3RHFxBOZiT3H9C17sEruhuFhivL4g7p4BwHTiKKW13ZogANRh
|
||||
C0vSJIbxe5W4Dxm0R7xJs7y4+wt0CQkMQHeRwNBcJDBUkcCAqUhgGEUCQ7PETgJ/F3evMOpnspy4WAJz
|
||||
daK4fgbvQ+LiiPHaSHgBDsBcHCR2TRAA6rCFJcUkhrFbVS4U90GDdthD3L0FuoYEBqC7SGBoLhIYqkhg
|
||||
wFQkMIwigaFZ3iDuPmHUzbJEXByB+dhWol+5/oZR18uW4mKJ8XqcuHsGAFNFwtM6YtcEAaAOW1hSTGJo
|
||||
hP3Efdig+X4u7p4CXUQCA9BdJDA0FwkMVSQwYCoSGEaRwNAc68mV4u4TRh0lLo7AQhwhrr/B+6y4OGL8
|
||||
PinungHAZC+SW+YNtyYIAHXYwpKWTWQYu8VyjrgPHDTbzuLuKdBFJDAA3UUCQ3ORwFBFAgOmIoFhFAkM
|
||||
zXGouHuEUXH+/sbi4ggsxO0kzgJ3/Q6jYseK7cTFEuN1G+H5MYCZ/FZiremWecOtCQJAHbawpGUTGRrh
|
||||
SeI+dNBc3xJ3L4GuIoEB6C4SGJqLBIYqEhgwFQkMo0hgaIYtJLZjd/cIo14rLo5ACq8W1+/gfVtcHDF+
|
||||
95BI+HL3DUC/3Sjby3/nDLcmCAB12MKSJk9mGLvl5QxxHz5oHjLS0UckMADdRQJDc5HAUEUCA6YigWEU
|
||||
CQzNcIy4+4NRf5ZVxMURSGFlOVdc/4P3EHGxxPjtJe6eAei3t0llvnBrggBQhy0saeqEhrF7tLgPHzTP
|
||||
58TdQ6DLSGAAuosEhuYigaGKBAZMRQLDKBIYxm8HcfcGXizGuTgCKe0prv/BO1mWExdLjN9bxd03AP0U
|
||||
c/ZKUpkr3JogANRhC0uaOqGhEX4q7kMIzXGDbCnu/gFdRgID0F0kMDQXCQxVJDBgKhIYRpHAMH4/EHdv
|
||||
MOpEcTEEcoj+5vohvMeJiyPGL5JLPi7uvgHol4tlUxmZK9yaIADUYQtLcpMaxu7B4j6I0BwfEXfvgK4j
|
||||
gQHoLhIYmosEhioSGDAVCQyjSGAYr93F3ReMiqMZtxUXRyCH6G/R71x/xKizZLG4WGL8VpDjxN07AP1w
|
||||
vUx75I9bEwSAOmxhSW5SQyMcL+4DCeN3jWwk7r4BXUcCA9BdJDA0FwkMVSQwYCoSGEaRwDA+y8tvxN0X
|
||||
jDpcXByBnI4Q1x/hPVtcHNEMq8oJ4u4dgG6LhLx9xM0Nt3BrggBQhy0syU1qaITtxH0oYfzeLu6eAX1A
|
||||
AgPQXSQwNBcJDFUkMGAqEhhGkcAwPs8Ud08w6krZQFwcgZxuJ1eJ65cY9TeJRXIXSzTDakISA9A/B4ib
|
||||
E/7LrQkCQB22sCQ3qaExjhH3wYTxuULWFne/gD4ggQHoLhIYmosEhioSGDAVCQyjSGAYj1jgi4U+d08w
|
||||
6pXi4giU8Gpx/RLeq8TFEc0RSQzs6Av0x6zJC8GtCQJAHbawJDepoTHuIjeK+4DCePCDDX1HAgPQXSQw
|
||||
NBcJDFUkMGAqEhhGkcAwHq8Vdz8w6g+ykrg4AiWsLOeK658YxQs97RDz6ufE3UMA3XCTxI5fbg4Y4dYE
|
||||
AaAOW1iSm9TQKB8T90GF8i4QtsxD35HAAHQXCQzNRQJDFQkMmIoEhlEkMJS3njBf1/cYcXEEStpTXP+E
|
||||
9w5xcUSzLCdvEXcPAbRbHH/0KHFj33JrggBQhy0syU1qaJTN5FpxH1go67ni7hHQJyQwAN1FAkNzsSBW
|
||||
RQIDpiKBYRQJDOUdLO5eYNR3xMUQGIcTxfVTjIrnkxuJiyOa50lynbh7CaB9zpGtxY33abk1QQCowxaW
|
||||
5CY1NA4PQsYvtrdcLO7+AH1CAgPQXSQwNBcJDFUkMGAqEhhGkcBQ1h3lenH3AlVxTObdxcURGIdt5WZx
|
||||
/RWjPioujmim+8n54u4lgPY4WuZ1jI9bEwSAOmxhSW5SQ+PEVpT/EvfhhTL2FndvgL4hgQHoLhIYmosE
|
||||
hioSGDAVCQyjSGAo6zPi7gNGfUhcDIFxOkJcf8WoSEK6i7g4opnWlS+Lu58Ami2OjNhX3Niuxa0JAkAd
|
||||
trAkN6mhkeIBlPsQQ36/kjg/zt0XoG9IYAC6iwSG5iKBoYoEBkxFAsMoEhjKuY+4e4BRl0sspLk4AuN0
|
||||
O4lFItdvMeoL4uKI5ornmi+Uf4u7pwCaJ+baTcWN6drcmiAA1GELS3KTGhppTblM3IcZ8tpF3D0B+ogE
|
||||
BqC7SGBoLhIYqkhgwFQkMIwigaGc74u7Bxh1gLgYAk3wanH9Ft724uKIZosjj74j7p4CaIY/ym7ixvCc
|
||||
uTVBAKjDFpbkJjU01svEfaghnxPE3Qugr0hgALqLBIbmIoGhigQGTEUCwygSGMr4f+Lij1G/l8Xi4gg0
|
||||
wcpyrrj+i1GRvOXiiOaL3Rjit9/F4u4tgPH4qzxHkn5fcmuCAFCHLSzJTWporFXlfHEfcMhjibh7AfQV
|
||||
CQxAd5HA0FwkMFSRwICpSGAYRQJDfsvLGeLij1GPEBdHoEn2FNd/4bFjabvdRt4h14q7vwDK+LPsL7H2
|
||||
48bqgrg1QQCowxaW5CY1NNqzxX3QIb0virsHQJ+RwAB0FwkMzUUCQxUJDJiKBIZRJDDk91Rxsceob4iL
|
||||
IdBEPxTXjzHqVxJv87s4oj3ie9RRcqO4+wwgj5Pk8ZJ1hyq3JggAddjCktykhkaLD7Q/iPvQQzrxpf1u
|
||||
4u4B0GckMADdRQJDc5HAUEUCA6YigWEUCQx5sTtifdfLXcXFEWiie8vN4vozRu0tLo5ony3lcIl5291r
|
||||
AAt3uXxAthE3DpNza4IAUIctLMlNami8+HHgPgCRzpHiYg/0HQkMQHeRwNBcJDBUkcCAqUhgGEUCQ16v
|
||||
FBd3jDpYXAyBJvu4uP6MUedI1reHUdzt5e1yibh7DmBu4piW2On5CbKKuHGXjVsTBIA6bGFJblJD48X2
|
||||
bKeJ+0DEwsWXis3ExR7oOxIYgO4igaG5SGCoIoEBU5HAMIoEhnzWFeblei6VtcXFEWiyDeVf4vo1Rj1f
|
||||
XBzRbitLHJf0E3H3HcD0rpBjZB9ZQ9wYK8KtCQJAHbawJDepoRV2E/fhiIV7r7iYAyCBAegyEhiai4Wy
|
||||
KhIYMBUJDKNIYMgnfi+6mGPU88TFEGiD14rr1xh1oawmLo7ohjvJG+RscX0A6Lub5JfyDnmgrCBuLBXn
|
||||
1gQBoA5bWJKb1NAaPxT3gYn5iwWC9cTFGwAJDECXkcDQXCQwVJHAgKlIYBhFAkMed5DrxMUcVb+Wxjy8
|
||||
B+Yhtvn+s7j+jVGvFxdHdM+9JO73yXKzuP4AdN0N8gt5jzxK1hI3XsbOrQkCQB22sCQ3qaE1HiDuAxTz
|
||||
90ZxsQYwQAID0F0kMDQXCQxVJDBgKhIYRpHAkMenxcUbox4iLoZAmzxeXP/GqPi+eltxcUR3xXErT5GP
|
||||
yTni+gbQdrG7wu9lQvaXHSWOWHFjonHcmiAA1GELS3KTGlrla+I+WDF3F8lYz6QCWoAEBqC7SGBoLhIY
|
||||
qkhgwFQkMIwigSG9bYU3Tev5krgYAm30I3H9HKPiTWQXQ/THpvIEOUi+K5eL6ytAE8X3vPPkO/I+eYbc
|
||||
R1YV199bwa0JAkAdtrAkN6mhVSLbb20ksbq4GAMYYs4BumslceMe4xfbUbp71le3ERcn9Nfy4vpKn8XW
|
||||
5y5WmD++B9fHdwp0CWO/vjXFxRD9Fomm/0/ihZgPywnyVyEpEOMQR4GdJcfLR+W18jiJo1FanagwHbcm
|
||||
CAB12MKS3KQGAAAAAAAAAACQwYoSyQ07yZMlFpI/JJ+XEyW27L9U3CI0MNUV8kc5Sb4uh0vsSPY8eZRs
|
||||
L3HkieuLnebWBAGgDltYkpvUAAAAAAAAAAAAxmix3E7uKveVXWVvea68Ut4sh8hhcpR8Wb4pkQTxKzld
|
||||
fidxDF2II4TjiL5wo7jFcORxkyyL/cWy7J7E/Yn79BOJHTqOk89J3M+4t2+XV8t+8iTZXR4od5dISohk
|
||||
GNd3IG5NEADqsIUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAAAAAA
|
||||
AAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAA
|
||||
AAAAAAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAA
|
||||
AAAAAAAAoCRbCAAAAAAAAAAAAAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQLAQAAAAAA
|
||||
AAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQAAAAAAAA
|
||||
AAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsBAAAAAAAA
|
||||
AAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAAAAAAAAAA
|
||||
AAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAAAAAA
|
||||
AAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAAVC1a
|
||||
srS0jeTB8ix5vRwqn5XvyIlyspw+xc/lBPmSfFzeLS+Vx8sSWVtcXQAAAGie28h95AnyKjlY4vvgN+Qn
|
||||
MvW74E8lvid+U+K/i++Cr5QnyQOE74Kozf0m6pOJiQkgt7Vle9lbXinvlvjfV+VEOd2I8h/IsXK4vE1e
|
||||
JLvLXWUlcXXNiRsTJdlCAAAAAABQ5R7qJbSh7CXvkXgY/S/5v0wukEiCeJs8Sm4rrk1dd5RMfejfBKdK
|
||||
LDyEuE9fkI9JLFj8r7xA/kdiMeN24q6tSz4nLk599jVZRVy8Svm6uLaVFIt035Xj5JMSSV6R7LWfxBjZ
|
||||
VtYR134M5BxfHxRXZw6xqOvagIGfSSRFutjl0JV+NQ6LZUeJhINIRj1X3He5hfqbHC8HysNlNXHt6YtS
|
||||
3zV2Fld/CZEU7do0H7fMKe73Ute4Rd2Ge624Be9cloprB7y15BEScfum/FX+L4Ob5HfyKdlftpHlxLVp
|
||||
Wm5MlGQLAQAAAABA1SL/MHAh7iWxIH2KuIfLpdwssZvDUtlOXFu7ZkW5Rlw82uY6OU1iAfcV8jDpykJE
|
||||
XMf14q6772LBycWshPXFtampLpcfyWHyPNlGVhB3bX1SYnxFX3F1p3aSuPox9GJxsUutS/2qlLVkXzlW
|
||||
rhJ3zbnFPYvEyf2lZLJLE5T8rvErWV5cO3J7q7g2zddL3O+lrnGLug12X7lR3IJ2Lr8V1xYM3VMiYeGn
|
||||
Uvr+THaxfFoeL6uIa2uFGxMl2UIAAAAAAFC1yD8MnKs15bkSDzDdw8AmOFNeKxuIu4YuiLcb3bV3xX8k
|
||||
3qyMxdrYetrFoA3iTUV3fX13o6whLmYl7CGuXW0Su9x8VZ4vm4q7zq7LPb7+KK7e1GLx8QZxbcDQ9uLi
|
||||
l1pX+lVusYi9m8QuC/GZ7a51XG6S78tTJBI+Xfu7pPR3jaeJa0duPxDXnvm6r/u91DVuUbehYkH6LHEL
|
||||
17mtK65NfXZHiaSFP4mL2bhdKR+XJeLafws3JkqyhQAAAAAAoGqRfxhYV5w3HDsc/FPcQ8Amijf7j5St
|
||||
xF1Tm8VOBe6au+jf8hHZQlwsmuwN4q6p734pLl6lxFE3rl1tFbvQxMLO02VlcdfcRbnH1yfE1ZvaQ8TV
|
||||
j6GrJY4mcPFLrSv9KpdV5YXyJ3HX1zRx1EQcZxHfY931dEHp7xoR0+gHri25pN55LP7WYvd7qWvcom5D
|
||||
vVvcQnUJjxbXpr6JIxoeKceLi1NT/UQeIyNHTLgxUZItBAAAAAAAVYv8A8HZxDblL5E2JS5MFW97f0w2
|
||||
EXeNbfQVcdfaZXEf4+zwdcXFpIliFwl3LX33XnHxKqXL2/VfIm+SNu9cUlfu8fVMcfWmFvfL1Y+huNcu
|
||||
djl0pV+ltpIcIBeJu66mu0IikaGLSV7j+K4RSROuLbmk3nnsBPdbqYumLug21I5yk7jF6RLeJa5dfbG8
|
||||
7CNxnIaLT1ucLA+U/16bGxMl2UIAAAAAAFC1yD8QnEmcs36KuAd/bRRbrr9IxnV2byrLyWXirrEPLpU9
|
||||
xcWmSSL5Z1xngTddHOHgYlZCX7brjzni5VLqrfXSSoyvu4irO7XviKsfQ6UWS7vUr1LaXdqy48Js4giP
|
||||
XcRdZxuN67tGfKfeUFybcki989hb3G+lLpq8mNtQ4zw6YpmTxLWtD3aRM8TFpa3if7cVOyZKsoUAAAAA
|
||||
AKBqkX8gOJ3YHvh6cQ/92u5HsrG4626Du4m7rr75kMQboS5GTbCduHZjvLtoPFRcm7rqN3J/cbFos9zj
|
||||
62Jx9aYWi49xPIJrA4Z2Ehe/1LrSr1KJBeovi7uWtvuwlD4GIYd7i7u+Ej4qrk05pO6Hu7rfSl0Ui7gN
|
||||
N86jI5a5XlYT176u2kyOExePLrhIdndjoiRbCAAAAAAAqhb5B4JTxdvJnxH3sK9LYhEhzh13MWi654q7
|
||||
pj76oawlLk7jFlttuzb33W/FxauUPm7Xf5McKF3ajSH3+PqiuHpT215c/Ri6TlYRF7/UutKvUoidcv4h
|
||||
7jq6IhK82rgjxmTj/K4RR3vdQ1y7Uovdt1wb5iM+E9dwv5W6aMIvXjfFuI+OmOwh4trYNcvJC+RqcXHo
|
||||
mjfLcm5slGALAQAAAABA1SL/QHCyWAg+UdzDvi6KHSYeLy4WTfYpcdfTV7+WJiYxfF5ce/su3np18Sql
|
||||
z9v1x/y+nri4tE3u8fVScfWm9hJx9WModk1yscuhK/1qIVaUQ8S1v4uukLYmtIZxf9f4lrh2pbSVuLrn
|
||||
61fud1JXTfhF7CZowtERk71RXDu7ZAM5Xtz1d9kXZFU3PnKzhQAAAAAAoGqRfyi4TCwAnyruQV+XxVtY
|
||||
TxcXk6Y6V9y19NlJUuoN3bouFNfWvttHXLxKYLv+JUv/LLEY5OLTJrnH1w7i6k3tWHH1Yyh2D3Gxy6Er
|
||||
/Wq+1pbviWt7l0VC6+PExaTpmvBdY1dxbUvl2eLqna9D3O+krprwC9lN0ISjIyb7jrh2dsUD5QJx194H
|
||||
J8hqbozkZAsBAAAAAEDVIv9QMKwkJ4h7yNcHkcTwGHGxaZqNxV0Dliz9uLiYjcMW4tqIQR92MSvhPuLa
|
||||
1DexFfc24mLUBrnHVyS5lDpuI44zcm3A0CPExS61LvWr+dhUfi+u7X3Qpu+CyzTlu0bshLW8uDam8Alx
|
||||
9c7XXu53UldN+MXscWvS0RHLxJEKi8W1t+2eIdeLu+4++Yas4MZJLrYQAAAAAABULfIPBcOR4h7w9ck1
|
||||
sq24+DTJE8S1HwNNWXx4mrj29d054uJVyovFtauPYtv0e4qLU9PlHl/xBrqrN7U4e9/Vj6E4Y38NcfFL
|
||||
rSv9aj62lNidxbW7T2Inhp3ExaiJmvRdI3ZJcG1M4Y/i6pyvDd3vpK6a8Ava49S0oyMm215cm9vsreKu
|
||||
ta8OduMkF1sIAAAAAACqFvmHgnuKe7jXR/GANI7ScHFqig+IazsG/iKxo4iLXUlHiGtf38VblC5epXxB
|
||||
XLv66gK5o7hYNVnu8fW/4upN7Vni6sfQL8TFLofc/WqpuHrH7Q7yN3Ft7qN/yObiYtU0TfquEUdZ5Eg2
|
||||
2lBcffP1R/cbqcsm/KL2ODXt6IjJXiquzW20nHxY3HX23ZPdWMnBFgIAAAAAgKpFow8F46zj2ErcPeDL
|
||||
Ld5yu1xiwTkSB+L/jf//teL++1LGvcA6m9PEtRtD+4mLXUlniWtb3z1dXLxKuUhcu1KIrddPn8XvJOa6
|
||||
ODYg5kD3d0r7rZR6wz2V3OPrYeLqTY1Ep9m9R1zscuhKv5qLWByOnXFce0u6UiKJYtn3wXF9N13mZFlR
|
||||
XMyapGnfNd4srp0LsZe4uubrE+43UpdN+MXtcdlJbha3qNwEXxTX7raJ5IWPiLvGcbhM/iJ/lL/Jv8T9
|
||||
d6X8UzZx4yU1WwgAAAAAAKoWjT4UfIu4h3up3SwnSdQXZ1nHG78riGtTuJ3cT54pR8l54v5uLg8R165x
|
||||
u43EGc2uzSnE33aLrtOJBdtYaAiXyX/E/d3SzhAXv1LWF9eulCLm7p403Z3ExayE2CLdxTKFSEZYVVy9
|
||||
M1lPtpMny7sk5snYMt/VkdOXxLWviXKPr4j/6uLqTm0HiaQ0N1ZSiB023DWm8k9x9aa0i7jYpdalflVX
|
||||
JC6dKq69OUWy6mfkGRJjYLoEqthNKT4z9pCDpHRbm7pjxjIlvmvM1b9lE3Htna/3iatrvp7lfiN12YRf
|
||||
4B6H1SQWsN2CclNcIq7tbfMBcddXwjlyqDxRtpY4MsS1cQXZQh4rsSvHmeL+Xi5fceMlNVsIAAAAAACq
|
||||
FlUfCMZi+NXiHu6lEg/sD5O7ytT65+oBEskMJd5ajreklxfXjnHaTVx7U4mFNFfvXMRCRNzvXWV/iXuW
|
||||
+uziOu4hrn0lPFZcm1K6j7i6Mb1YLHOxTOHn4uqcj3XlOfJLcXXl8lxx7Wma3OOr5JEFuX1Q3DWm8g5x
|
||||
9bZRLJK7a0ylaf1qOfmKuLbm8hP5H5kpgXU2W8vhcoO4OlKKpMxIfHPtaIIS3zXmI/VOZqeIq2e+7up+
|
||||
I3XZhF88HodDxC0kN81W4trfFq8Wd105XStxXMV9xLWprh3kGHF15LCzGzMp2UIAAAAAAFC1qPpAMOdi
|
||||
XohtbbeXqfUuVLyN921xdaa0r7j6x+lAcW1N5VBx9aZwN/mAlFh0CC8R144S3iuuTalE4tFCFoD66khx
|
||||
8Uwhdk9wdS7UwyWOeHB1phb9qg3nvuceXweLq7eNYgcDd42pPFJcvW3Ut34VW/27duYQuzWlPj7j7lJi
|
||||
R4Yvi6u/CXL32fmKXde2EdfmuYqk2JS7El3ifh913YRfKC6t6UdHTPZscdfQBrGbgbumnD4mG4lrz3xF
|
||||
f4mdHFx9Kf3cjZmUbCEAAAAAAKhaVH0omDMJIN64j61tp9aZSrw5GFv7urpT+bq4usfpRHFtTWVvcfWm
|
||||
FDsHxDnXrv6UPieu/hLi7GzXplRi7Lp6MbOzxcUzhceIqzOFxRIJEq7e1Jq8WLdM7vG1p7h622YtyXnk
|
||||
UCxSri2u7jbqU7+KZIK4f66dqX1EVhHXjoVaTb4qrt6U4pgfV/+45e6zC/E9cW2eq0jic39/vr7kfh91
|
||||
3YRfIC4px9ERfzBlqXxS3HU0XRzX8C9x15TD3+RB4tqSwrpysri6U8q6C4MtBAAAAAAAVYuGDwTjeISr
|
||||
xD3cS+HRMrm+XFInMcQD/T/LNySOrHB1jkucBX2NuHanspG4ulOLLZkvFteGVH4lru7cYkEl5duCzhvF
|
||||
1Y3pbSAulqncVly9KT1Fci5IL/NgcfU3QYnxFX3F1d02uY8c+rW4etuoT/0q5qq/i2tjSvF9Ko6Rcm1I
|
||||
aVWJ4zlcG1KZEFf3OJXoswv1KHFtn4vU3/Nf6n4fdd2EXxwuKfXRESfKPlPKUjpX3HU02crya3HXk8NP
|
||||
ZD1xbUlpLTlDXBtS+awbN6nYQgAAAAAAULVo+EDwzrc+yMtlZZlcXy6xE8O3xLVhJnGMQRxx8SWJYxme
|
||||
LPGGXTwQdvU0wY7iriWVP4mrN5fdxbUjlfPE1ZvbQ8W1J6WdxdWN6cXbzy6WKfxOXJ05vEhcG1I6QVzd
|
||||
TZB7fMUuHa7eNnqbuGtM5cPi6m2jPvWrz4hrY2rPF1d/DpEUeZ24dqTwHymRpDYXJb5rLNSZEjsIufbX
|
||||
9V1xf3u+dnC/j7puwi8Ml5L66IjrJXYauNOkshw2Fnc9TXWwuOvI4auyqrh25HBnuUZcW1L4j6zrxk4K
|
||||
thAAAAAAAFQtGj4QzP3gs+SbhneU68W141qJM8A/K2+SWMSMc5NXFPe3muyV4q4xlaPE1ZvTz8W1JYV/
|
||||
iqszt+hnrj2pRF9vcqJNU8X58y6eKRwmrs5cviCuHSktEVf3uOUeXx8TV28b/VDcNabyRHH1tlFf+tUu
|
||||
4tqXWiTPuPpzyjnHh/3E1TsuuftsKgtJZInkh6vF/d35iL+12P0+6roJvyhcQo6jI94uy/7+ZbeW5RA7
|
||||
PEy+libbQW4Sdx2pfV9WEteOnF4nrj2pPMWNnRRsIQAAAAAAqFo0fCj4OHEP91J5jkyuL7dYQDxJYhE+
|
||||
FvrjCIs7SRyV4f77NvqKuFin8mxx9eb0VnFtSeFycXXm9h1x7Ukl+rmrFzPLucV4HO3g6sxlE0m5qON8
|
||||
VFzd45Z7fD1dXL1tE0cORQKfu8ZUbi+u7jbqQ7+KxM3Yecq1L6WfyAri2pBTJLPGsRWuTSl8W1y945K7
|
||||
z6ZyidxG3DXMZntxf3O+vud+G/XBhF8QLiH10RF/lkiKWPb3jxf336XwQZl8LU21vJwm7hpS+73EkQ6u
|
||||
HbnFff+HuHalMOHGTgq2EAAAAAAAVC0aPhTMncBwlbDNfTpxVMY/xMU6la3E1Z3TAeLaksIfxdWZUyza
|
||||
5F5Yfpe4ujG91SXnWeGbi6s3p9xvG18pcba8q3tcSoyv2Ire1d029xN3famM64ieHPrSr+JNeNe2lOK7
|
||||
XyQSuPpLOFlcu1KIIypWEVdvaan7bByr5spTebu465jNi8X9vfla6n4b9cGEXxDOLfXREeGRMrmOA8X9
|
||||
dymcIZPraqpniGt/anGEw1bi2lDKu8W1LYUfubGTgi0EAAAAAABVi4YPBXe99WFebp+QbWVy3Zi7rcXF
|
||||
N5VLxdWbW84dGH4grs6cUr8t6DxGXN2Y3sPFxTKFv4mrM7ctxLUnpd3F1T0uucfXReLqbaNXibvGVD4j
|
||||
rt426kO/imSkC8W1L6WXiau/lJzfKcIDxdVbWuo++0bJuXtF7Aazmbhrmckx4v7efD3c/Tbqgwm/GJxT
|
||||
jqMjjpWp9TxG3H+bQiRfrC1T62ySOMrhfHHtT+0F4tpQ0n3EtW2u/iVnSuzgcYS8Ue7sxk4KthAAAAAA
|
||||
AFQtGj4UjLcB3cO9XM6QOBP5/hLbGE9uC2b3PHFxTeXL4urNLbaadu1J4VBxdeb0EnFtSem24urG9JaK
|
||||
i2UKR4urs4TTxLUplXGMoZnkHl9fEFdvG31N3DWmsp+4etuoD/2qxO4Lf5A4usTVX8qe4tqWSsTR1Vta
|
||||
6j4buwh9fEpZahPirmUmfxH3t+YjdmFaw/026oMJvxic06HiFo7nKxacN5Wp9Wwk7r9PZeqOD02zn7h2
|
||||
p3ayxFEVrg0lLSeXimvjMjdIHDXyI/mMvEOeL7vLvWQdN0ZysoUAAAAAAKBq0fCh4PLyT3EP+XK7RuLt
|
||||
+ANlD5nPW1l982lxsUxlHG9N5t7ifB9x9eZ0rLi2pPI7cfViZt8TF88UXiiuzhIOEtemVCLxzNU7LrnH
|
||||
V2xX7uptmzhy6HJx15jKPcTV3UZd71fRHyK5wLUtpb3E1V/SPcW1LZVDxNVbWso+G9/Jo49sKP+6tSyX
|
||||
2DnCXY+zkbi/MV+nuN9FfTHhF4NzeYi4heWFeKm4usIF4v5NCgeJq7MJYjE/9S4X07mfuDaMw5FyinxJ
|
||||
3i8vl71lR9lYRhIt3JgoyRYCAAAAAICqRdWHg18U95BvHGKxJRYZ3yNPlrtLnPE7tc199WdxcUtlibh6
|
||||
c1lTYjHetSWFm2Q9cXXnFFuFu/akcpi4ejG9xZLzfPttxNVbwuPEtSmVeGN1ZXF1j0Pu8XUfcfW2TXx+
|
||||
uutLJT6vIwnS1d1GXe9Xu4hrV0pnShP6RHzuu/al8i1x9ZaWss+eIsv+7mtvLcvlhzL5OmbyWHF/Y77e
|
||||
534X9cXUBd2M1pB4+90tgs/X6bJYXH3hOHH/LoWfiKuzCXYT1+bUviqu/tZwY6IkWwgAAAAAAKoWVR8O
|
||||
xtty7iFfU8SZuSfLh2VfuYtMvYY+2ERcfFL5t8Qir6s7h7XkBHFtSeW74urO6c7i2pLS3+X0homt6lcR
|
||||
F5Mm2EFcLFOIXWzGuWh3N3HtSune4uouLff4iiSXriTNxfEO7hpT+bq4etuoD/0qjrlxbUspEk9d3aXF
|
||||
EWWufanEZ56rt6TUffZwWfa347M8d8JsJCZMvp7pvFPcv5+vPd3vor5wi7qZfEjcIvh83SzxZr2ra5nX
|
||||
i/u3KfxHVhFX77h9XlybU9tJXP2t4cZESbYQAAAAAABULao+HIxF6/PFPehrqsvkm/Ia2VH6sEtDHIXg
|
||||
YpHK98XVm0Ps9HC2uHakNI6trJ8hri19EG/4upg0wUvFtTmFmItcnaWsLq5dKdVdbMot9/j6jrh62yjO
|
||||
mnfXmEp8/rp626jr/WoNybkDTbhEVhJX/zi4NqZyjrg6S0rdZyPhafLff4K4/y6VOM4kEk0m1+nEbg3u
|
||||
38/XBu53UV+4Rd0Mchwdcbi4uibbVdy/TeVB4uodp7XkWnHtTelUcfW3ihsTJdlCAAAAAABQtWj0AWHs
|
||||
bOAe9LXFlRJvg8YZ03cSd41t90Fx157KUnH1phJnKz9QjpGbxbUhpVhgKLmjxDJHimtP18U9XVtcTJog
|
||||
51E5sd22q7Ok2KnGtS2V/cXVW1ru8fVGcfW20V/EXWMqDxBXbxt1vV/tKa5dKb1LXN3jkDup60Jx9ZaU
|
||||
us/GLkWT/358Z/uJuP82lQNkcp1TxXe42B3M/dv5ONv9JuoTt6ibWI6jIy6RdcTVN9m64v59Kq8TV+84
|
||||
7SOurantL67+VnFjoiRbCAAAAAAAqhaNPiSMB5U/EPfAr41+K2+T7cRdbxvFlsXuWlN5uLh65yP600YS
|
||||
C1zxVt9R8ldx9eYSbye6tuVWYmeJJoqzz108muJice1OYSdxdZZ0ubi2pZI7wamu3OPrIeLqbZtNxV1f
|
||||
KtfJyuLqbqOu96uPiWtXSvcUV/c4rC+ujanEsUGu3pJS9tkbxI3n7SVnwuk/ZKbExzi6yP27+TrS/Sbq
|
||||
E7eom1jqoyPCvuLqcv4o7m+kcLy4Osfp0+LamtJNsoG4+lvFjYmSbCEAAAAAAKha5B8UbiwXiXvo12aR
|
||||
zBBvD68p7rrbYC25Sdz1pRIL0JEkMV9/knjjN473yN3W2Zwqy4uLZU63E9eePjhCXEya4K7i2pzCfyTO
|
||||
C3f1lhQLQa59qTTh7erc4ysW8VYTV3fb5D5y6Mfi6m2jDcRdYypN6FfnimtbKnEcgKt3XO4hrp2pjDuB
|
||||
IfVc+Ctx9YRIQHX/JpX3iKs3PF/cv5mvZ7jfRH3iFnUTynF0xA9kOXH1OUeL+zspXCkriKt3XC4U19aU
|
||||
fiyu7tZxY6IkWwgAAAAAAKoW+QeFIbaQ/Ze4B39tFw+c4y3iSAZw195ku4m7Joy6UeKtQRfH3B4nrk19
|
||||
8ExxMWmCZ4lrcwo/FVdnabnn7UPE1VtS7vF1krh62+hD4q4xlbeLq7eNut6vYjck166UmnR8RMj9nek8
|
||||
cfWWkrrPxnzh6gmR3Hy1uH+XQiQB3lFc3Z8S92/m687uN1GfuEXdRHIcHXG93E1cfdN5ubi/lcp24uod
|
||||
hy3EtTG1V4mrv657yekt8Cu5uxs3qdhCAAAAAABQtcg/KFzmgXKluId/XXCJxIJmHHPgrr+J4jgMdy0Y
|
||||
9QZxMSzhfeLa1Ad3ExeTJviEuDancJC4OktaUVzbUprpLdlSco+vJlxjKmeIu8ZU/p+4etuo6/3qUeLa
|
||||
lVIkDLi6xyV23XLtTOU34uotJXWffZK4epZ5k7h/l8rnxdUbO3u4/34+Yoc5+5uoTyb8AnMKOY6OeJu4
|
||||
umbyIHF/K5UDxNU7Dk8U18bUthZXf10RM/d3m+h9btykYgsBAAAAAEBVPMSbxb0kjgNwDwG74tuyobjr
|
||||
b5ofirsGVH1RxnF0xDKniGtX18XxBU1OCPqjuHansLu4OkuKt1dd21KK3Wtc3SXlHl97iKu3bWKXoZzn
|
||||
1sffbuNORtPper96rbh2pRK7Hq0hru5xOUxcW1M5QVy9paTus3cSV88yq8r54v5tKveTyXWuI+6/m69j
|
||||
xf4m6pMJv8C8UDmOjviTrCquvpmsLjeJ+5spfF5cvePwdnFtTOkv4uqei5zHeqS2lxs3qdhCAAAAAABQ
|
||||
FQ/xalhXviTuQWBX/F3i2Ax3/U2xklwrrv0YigWFcZ4zHgs4sZDj2tZ13xQXkyaIJCXX5hRiITcWWVy9
|
||||
JT1EXPtSOkBc3aWUGF/ri6u7bWJ3BHd9qcTuDq7eNupDv/q4uHalcrq4esfpZHFtTSWONnD1lpC6z14s
|
||||
rp6pniju36cSxzFNToTcRdx/N18vFvubqE8m/ALzQuQ4OiL8P3H11fE7cX8zhYvE1TkOXxLXxpTif67u
|
||||
uThf3N9uovXduEnFFgIAAAAAgKp4iDcHe0nuN6/GKc72fai4a2+CeCvNtRtDx8s4kxfCw8W1rQ/GeWzH
|
||||
bGL+cm1OYdzbiC/zMnHtS+kJ4uouJff4OktcvW30dnHXmMpM5+W3TR/6VST3ubalMiGu3nGJ7wK5k1Le
|
||||
LK7uElL32ePE1TNVJBf8TNzfSGVvWVbf628tS+U+Yn8T9cmEX2BeiI+KWwheiC+Iq6uuT4j7u6lsKa7e
|
||||
0k4V176U9hNXd12bivu7TfQ7N2ZSsoUAAAAAAKAqHuLNUWwf+xKJHQvcg8G2u0ruLe7ax+1V4tqMgTgL
|
||||
egVxsSsptth37euDJicAHSKuzSl8RFydpX1GXPtSuq+4ukvJPb4+Kq7eNvqRuGtMZR9x9bZRH/rV78W1
|
||||
LZU4osLVOy4lkgnHmdCVus++Wlw9zhJxfyOVcyV2HYu6vnxrWQqRqHzL90T3m6hPJvwi83ztKm4heCGu
|
||||
kk3E1VfXC8X97VSeIa7e0i4V176U7iGu7rqeIO7vNtFhbsykZAsBAAAAAEBVPMSbp3iwGIsX35WbxD0o
|
||||
bKvz5LbirnucviquvX0XyTSPFhezcfieuHZ2XcwDTTv/fLJfimt3Ck8SV2dJ8VZsicSy24irv5Tc4+up
|
||||
4uptm/iMvk7cNaayqbi626gP/SqOCHBtSyWOFnD1jkskNbp2pnQ3cXWXkLrPPkhcPdOJHTfc30nl5RL1
|
||||
XDCpbKG+I7e03/0m6pMJv8g8H7eRHEcDvERcfXOxg7i/ncrHxdVb2s3i2pfKDbKiuLrrer+4v91E+7gx
|
||||
k5ItBAAAAAAAVcse5C3QBvJ8OVFuEPfQsG3Gea6xE4uT/xDX1r76j7xX1hIXs3FYLPGGn2tv150mLiZN
|
||||
kPt8+83E1VvStuLaltKfxdVdSonxdSdxdbfN/cVdXyp/EVdvG/WlX/1TXNtS2VlcveMSb/G7dqZyhSwv
|
||||
ru7cUvfZ+O4eO6y5uqYTCUzXiPt7KUR/veeUsoV6k9zSfvebqE8m/CLzfBwhbhF4IU6TxeLqm4uVJRbf
|
||||
XR0p/FFcvSWtLa5tKZ0lru65+IW4v91EG7oxk5ItBAAAAAAAVcse5CUUb+fuIYfLOeIeILbFDuKucRzu
|
||||
Lq6NfXStvF+asGg8Ve5tlZvsw+Ji0gS7imtzCueLq7O0t4trX0rjPuM+9/iKHSxcvW0U28G7a0xl3H0h
|
||||
pfisd9eYSlP6lWtbSncVV+84xFFgro0pfV1c3SWkngt/Ia6e2eQ+euW3pmwh/nvMlftN1CcTfpF5rnIc
|
||||
HRG7CdxXXH3zcYq4elLZUFy9pawvrl0pHSeu7rpWkxvF/e2mOduNl9RsIQAAAAAAqFr2IC+jjWRvOVRi
|
||||
C/c27dBwnLhrGof9xLWxT/4q8bB8PXExaoKXiWt7Sqc31P+Ii0kTvEVcLFP4jLg6S4q3gCORwrUvpeeJ
|
||||
q7+U3OPrGHH1ttHXxF1jKvGZ5Opto770q9i1yLUvlc3F1TsO8Z3TtTGlA8TVXULqPhvxcvXMZjX5m7i/
|
||||
2TSxC1O095a2u99EfTLhF5rnItfRER8RV998HSaunlT2EldvKZuLa1dKscuGq7uuB4v7u030MTdeUrOF
|
||||
AAAAAACgatmDvIJWlu3lOXKYnCK5H6rPVzzs3FDcdZSW+6zhpootkmPx59GygrjYNMmXxF1HKr8XVy9m
|
||||
doK4eKbQhIXcR4lrW2q3F1d/KbnH1/7i6m2bSGi5XNw1phK7Arm626gv/Sr3MVTriKu3tPieeZm4NqY0
|
||||
zmNBUvfZJ4qrp44ni/ubTXOy/Lfd7jdRn0z4hea5yHF0RIhjGU5P6O/i6knl/eLiU8p64tqV0nvE1V3X
|
||||
a8X93SZ6ihsvqdlCAAAAAABQNflh3hitKLHd77KkhlPlJnEPIEt7trg2lxbnjbv2dc118jN5t8SibCxE
|
||||
uHg01SXiriuVj4qrF9OLs8JzntN9D3H1lvRjcW1LKXbQcXWXlHt8bSeu3raJPumuL5VIjlhOXN1t1Jd+
|
||||
lft7xNri6i3tmeLal9KvxNVdSuo+u5DdM2IuiCMo3N9tkvfIf9vtfhP1yYRfaK4rx9ERbXWquBiVsqq4
|
||||
dqW0VFzddX1d3N9tok3deEnNFgIAAAAAgKrJD/MaZg3ZRf5Xvi/j2qXhU+LaV9Km4tqWShzr4Y4ESOkk
|
||||
OVG+IrGjwpHyLnmVPF0eJneQeHPYxaAN4vxvF9+UniqubkzvvuJimUIs5I67z8aZ3q5tqb1UXP2l5B5f
|
||||
V0kbdnmpI/eRQ3E8hau3jXL3qyulKf0qkkNdG1PZTFy9pf1aXPtSGud8mLrPxhEQrp65uL+4v90ke8h/
|
||||
2+x+E/XJhF9oriPX0RFtdZNETFysSok2uLalspAdGJaTf4j7u01zrhsrOdhCAAAAAABQNflhXsOtLnGM
|
||||
QLyBHgtN7uFkDvEg3LWnpH3EtS2VeHvb1Yu5eZa4+KZ0R3F1Y3ovFxfLFL4urs5S4s3X2BnBtS2lSCBb
|
||||
T1wbSsk9vo4XV28bfUbcNabyanH1tlGf+tXnxbUxldhJy9Vb0m7i2pZS7BS1rrj6S0jdZ48WV89cfU7c
|
||||
32+K9eW/7XW/ifpkwi8215Hr6Ig2201crErJfUzGZ8XVW8edxf3NJjrKjZUcbCEAAAAAAKia/DCvRVaT
|
||||
l8nV4h5SpnSFuDaU9CFxbUvlHeLqxdx8Qlx8U7lAXL2Y2ZfFxTOF14irs5QSSTOhCTvR5B5frxdXbxud
|
||||
J+4aU4m3rV29bdSnfvVmcW1M5bHi6i2l1FEGHxdXfymp++wLxdUzV7EDx7Xi6hi3s6TSXvebqE8m/GLz
|
||||
bDg6wjtQXLxKOVFcu1L5tbh664gdGI6S0xP5p7g2pvB0N1ZysIUAAAAAAKBq6gO9STaQOEf7ERLb1sdC
|
||||
3fsltv+PN/b/IBuJ+7elbC/xJpx7WJmSq7ukM8S1K5X/J65ezM0fxcU3lVRvSfbNpeLimcIDxNVZwoby
|
||||
T3HtSu3u4tpQUu7x9WBx9bbN7cVdXyrxmbuSuLrbqE/96gni2pjKW8TVW0okULh2pXSz3E1c/aWk7rPb
|
||||
iKtnPqIPuDrG7QiptNX9JuqTCb/YPJO1haMjvB+Ki1kph4trVyo3y7ri6i5pDblMXBtT2NyNlRxsIQAA
|
||||
AAAAfbZoydIVZRNZInEcw/NkqRwmX5WTJc7CvV7cA8CpYheEygPBMThUXNtScvWWspbEA3PXrhTib0cd
|
||||
rm7UF4vJLr4pvUhc3ZjeVuJimUIs5K4srt7c4k3jb4hrV2pfFNeGknKPr/jMW1Vc3W3zRHHXmMqPxNXb
|
||||
Rn3rV5uKa2cqPxRXbwkxF+dORglxTIKrv5TUfTaS4JYXV9d8xHFvfxdX1zg9TSptdb+T+mTCLxDPJN6i
|
||||
d4u+mJi4TlYSF7cS9hfXrpSeJ67ukt4qrm0p/NWNk1xsIQAAAAAAfbNo8GAyFqAuEfdQbyHOl3G/ibmP
|
||||
uLalcpW4ekuJ3RFcu1KJ3R1cvZibx4uLb0op35Lsi+eIi2UK41zIfZu4NqV2g9xZXBtKyj2+fi6u3jb6
|
||||
sLhrTOXt4uptoz72q9g9y7U1hZskFthdvbnFUViuTSnFfLiluPpLSd1nvymunoV4uri6xmkLqbTT/Wbq
|
||||
kwm/QDyd3cUt+mLoAeJiV8J24tqU0pkSx0G4+kvYSiJRxLUthQk3TnKxhQAAAAAA9M2iwcNW9zAvlXGf
|
||||
AZ97gf/P4uotJRaLXLtS+ZC4ejE3cbyKi28qV0rKtyT74pPi4pnCOBZyY+eF3OfYT3awuHaUlnt8vUtc
|
||||
vW30a3HXmMpu4uptoz72q2iTa2sq4zhGIo46y7lT1TLvFld/San77GvF1bMQ8V3ll+LqG4cLZaSd7jdT
|
||||
n0z4RWInjo64QNyiL4ZeIy5+JSwvl4hrV0rPFFd/bivLKeLalMqz3TjJxRYCAAAAANBHi/Juq/sfua+M
|
||||
PBws5A3i2pXKt8TVW0q85e3alUrsYOHqxdz8Slx8Uxl3P2yrP4mLZwqRPOXqzGVt+YK4tuRwnqwhri2l
|
||||
5R5fjxFXb9tEH8m5kBtv2HfpyKE+9qt7iWtrKv+SjcXVnUNcTyT4ubakFDuOrSmuDSWl7rMPFFfPQsXf
|
||||
dfWNw+dlpI3u91KfTPiFYoejI+r5urj4lXKEuHaldLlsJq7+XGLXh0+Ja09KW7pxkostBAAAAACgjxYt
|
||||
WXqIuId6qVwq28rIA8LMYnHtb+LalEq87ezqLiGO54hz9l27UtlEXN2oL/phLOy5+KaS4y3JrttIXCxT
|
||||
iEXiUgu58TbrvhJvkbq25BJvNbv2lFZifN1WXN1t80hx15fK6eLqbaM+96uTxbU3le/KCuLqTuneEt8/
|
||||
XRtS21VcG0pK3Wfj++Uq4upK4Rhx9Za2v4y0z/1e6pMJv1g8FUdH1HeFxE4ILo4l7CSuXamdKmuJa0Nq
|
||||
Ec+PiGtHShe5MZKTLQQAAAAAoI8WDc7Odw/1Uoq37p4gIw8JM1lZviGuLSk9SFz9JdxfXJtSGffxGF0R
|
||||
CxsuvintJK5uTG9vcbFM4Qxxdaa0ujxTfieuDTm9T1ybxiH3+DpTXL1t9A5x15jKB8XV20a5+1WMW1dv
|
||||
EzxeXJtT+oysKK7+FJ4k/xZXd2pN6fep++xPxNWTyuaSOwm3ju1kpH3u91KfTPgF48k4OmLu7iUuliXE
|
||||
TgW/Edeu1H4m64lrRyqRJPFVcfWndrQbIznZQgAAAAAA+mrRkqU/FPdgL7WvytYy8rAwobtL7q2fw18k
|
||||
zpx3bSjh1eLalcqnxdWLuYkzv118U4ljWnK+JdlVh4qLZwofElfnQt1Oni6x5fVV4urO7SSJBDHXvnHI
|
||||
Pb4OE1dvG/1Y3DWm0qUjh/rcr2JXl9hNw7U7pTgC607i2jBfm0nJo3Tiu2ZT5sPUffYgcfWklDupajbx
|
||||
OWp3A3G/lfpkwi8aT8bREXP3QnGxLOVp4tqVw/nyCHHtWKg95a/i6s1hPzdGcrKFAAAAAAD01aIlSx8l
|
||||
7uFeDrG9euyOEG9Ax1vEIw8O5ym2Cz5KbhRXb2pLxbWjlK+Ja1cqzxVXL+bmBHHxTSX3W5Jddaq4eKaw
|
||||
kIXcOBomFuF2lD3ljXKsnCOurpL+LnH0hmv3uOQeX08RV2/bxCIrRw7V1/d+9TBx7U7tWokdXRaayBDH
|
||||
lH1UrhdXTw6XyB3EtWccUvfZOHLG1ZPSmnKRuPpLOF5cu+xvpT6Z8AvHy+Q6OuJfcvoYXS6uXakcLS6e
|
||||
pawgvxPXtlxOlEfJiuLaVNfKsrecJK6enLZyYyQnWwgAAAAAQJ8tGpxL7B7w5RRvj58o8RbWU+WBsrGM
|
||||
PEycIv6b+G/jbeSPyB/F/f1crpT1xLWthNj54XJxbUvlbuLqRn2xRfY14uKbSvSDeFu2bey504XcRnKe
|
||||
b3+2uGt24qiW2M3lCvmnuL/XBDHnxXFDLp7jUmJ8xTbnru62eYC460ulS0cOLRb61ZKlE+LansvJcqBE
|
||||
Qm0kNEx3xEQked1LIlEsdtKJ+dP9vZwiGahJRzelngsj0XhtcXWlFkchuTaU8AZxbbK/k/pkwi8ih5xH
|
||||
R8QOAa7OUt4srl2pRNxcvSU9TFzbcrtUIoHjBfIg2UDiWAvXxrCu7CwvkmPkCnF/N7do93JujORkCwEA
|
||||
AAAA6LNFS5beQ24Q95BvHGIx70KJhZFIUDj/1rImnJn7Uhl54FlQ3CvXrlQuk3Eej9EV8Ra9iy+WLP2b
|
||||
uJiVsJu4NsGLhbEmLdYtk3t8jbOPpvYacdeYSpeOHKJfDawj0VZ3DaXELgeRoBA70ERbIpHK/XclRfLb
|
||||
48TFbFxS99lfi6snhziyJOeOSDPZWVyb7O+kPpnwi8oh19ER8ab+TAvaJeTaWWKyO4qru6QjxbWttBvk
|
||||
7/IX+b2cI5fIdeL++3E41o2P3GwhAAAAAAB9t2jJ0teLe8iHoZ+LPTO3oP3EtS2Vr4irF3PzCnHxxZKl
|
||||
R4uLWQnxlq9rE0bFgmETkxdC7vE1zj6a2tfFXWMqzxNXbxvRr4ZiYbzksQxNF8kLTxYXq3FK3Wc/LK6e
|
||||
XB4krh05Rb9eTVx77G+kPpnwC9+5Fvivl63F1VnShuLal9JTxdVd0hpylrj2oepFbnzkZgsBAAAAAOi7
|
||||
RYM3ob4h7mEfliy9VOJ8+pGHnYV9Rlz7UomH4a5ezM1x4uKLJUtfJC5mJcSxNa5NqIodcLYXF8MmyD2+
|
||||
Xiiu3raJz/XcRw5tLa7uNqJfVe0r7jr6JpIXniUuRuOWus/G8Ryunpy+JK4tuZwkrh23cL+R+mRidNH7
|
||||
tnKhuEXehXqbuDrH4XxxbUzlCHH1lraVXCmujRi6pxsfudlCAAAAAABwSxLDmnKauAd+fRbbqN9fRh50
|
||||
jsF54tqYSrx16epFfXEERyS8uPhiydJ7iotbbnF+eu7z7bsgPgOakKw1nRLjaxtxdbdN7iOH/iFdOXKI
|
||||
fuW9TNy19EW8rb+XuNiMW44+u6m4unK6k/xHXHtyeJe4dtzC/T7qk4nRBe/PiFvgXahzZVVxdY7Dl8S1
|
||||
M5XY+cDVOw47yTXi2omJictleTc+crOFAAAAAABgYNGSpetLnIHrHvr1USx4PlRGHnKOwe3FtTGVuNYV
|
||||
xdWN+rYSF18M3gaPt8Jd3HLLfb59Fxwmq4iLX1PkHl9xdMa4+mhqzxd3jal8VVy9bZS7X/1T2tqvXiLu
|
||||
mrruEokjDlxMmiB1n/2LuHpKeKe4NuXwGHFtuIX7bdQnE9WF7j3ELfCm8EiZWt84vUZcO1NaX1zd4/BQ
|
||||
IYnBO86NjRJsIQAAAAAAGFq0ZOlacoK4B399Em+23U9GHnCOyRPFtTOVH4irF3PzHHHxxZKlXxEXsxJe
|
||||
Ka5NWLL0ItlTXNyaJvf4+qa4etvos+KuMZVXiau3jehXM4ujBa4Vd21d9CvZXFwsmiJ1n50QV08Jt5GL
|
||||
xbUrtduKa8Mt3O+iPpkYLnDH0REXiVvgXahjZXJdTbCLuLam9FhxdY/LfSTX8SBt9hI3NkqwhQAAAAAA
|
||||
oGrRkqWL5b1ys7gHgF33C2naw+sPi2trKm8VVy/m5pPi4oslS18hLmYlRPKEa1Ofxfz+cZlxQadhco+v
|
||||
14qrt43OF3eNqTQpwW+h6Fez20HiLX13fV3yPokjh1wMmiR1n32euHpKKZH8eaa4uv/L/Sbqk4nh4nau
|
||||
oyP+JZvK5LqaYC1x7U3pYHF1j9PG8hNx7W2ruJ63Timbi3u7sVGCLQQAAAAAAFWTHuY9RM4T9yCwi26S
|
||||
A6WJRynkPtpjV3H1Ym7+JC6+WLJ0ibiY5RZnhV8mrk199TMZ1/1YiNzjaydx9bbNZuKuL5V4G78Ni7x1
|
||||
0a/qWUc+L+4a2+6P0qb7lLrPbi2unlJWkNzfcw8XV/d/ud9EfTIxWNTOeXTES2XyAnqT/FFcm1M5RVy9
|
||||
47ZYXi//EdfuNnmfrCT3mFQ2F1fKCm5slGALAQAAAABA1ZQHemtKLOpfI+6BYFecJE1d0Ftbcu6GEYkb
|
||||
a4irG/VtLC6+WLL0aomdXVzccouFGdemPjpNHi0uTk2Xe3z9R1YRV3fbPEncNabyQ3H1ttFG4q4xlS71
|
||||
q2X2kgvEXW/b/FteJ226R6nnwn9IJPq5ukp6qLj2pbKvuHr/y/0m6pOJvEdHnC6xWD51Ab0pcu06scyN
|
||||
soa4uptgK/m5uLY33fmyqyy7luXkYnH/7Uy+7sZFKbYQAAAAAABUuYd6sol8RLp2DnJssx0PNZvw8HY6
|
||||
jxTX9lTivGdXL+bmCeLiiyVLvyMuZiXE1tiuTX1yguwmTZ7nZpN7fP1UXL1tFJ/V7hpTeZu4etuIfjU/
|
||||
y5JbIznNXXfTRWLJIRIJLO76mix1n40jllw943CcuDamcEdxdf6X+03UJxP5FvFvlh1l2QJzE8XuEK7t
|
||||
Ke0iru6miIX/J8m54trfNNfLu2VNmXotR4v7NzN5hRsXpdhCAAAAAABQ5R7qTbK+/K9cKO4BYVv8UuIt
|
||||
1XG9FT4X7xB3DanEQ3xXL+bmA+LiiyVL3yAuZiV8Wlybui7m6IPlbuLi0ja5x9dB4upto9+Iu8ZUIhnG
|
||||
1dtG9KuFuZ1EIkNbjum5XOI7Vexi4K6nDVL32VeKq2cctpTrxbVzIWLHEFdfhftN1BcTeY+OOFymLjA3
|
||||
zQPEtT2lN4uru2niGIb9pamJDJG4cJhsJq79YT9x/3Ym93VjoxRbCAAAAAAAqtxDPSPOq41FjM9KW97A
|
||||
u1jiwe+O4q6pqX4s7npSie2gXb2Ym9ie38UXS5Y+WFzMSvizuDZ1UZzjHglJsRV3zNEuHm2Ve3w9Sly9
|
||||
bbOO5D5yaC1xdbcR/SqNVeX5crK4OIxT9NnYheYpEu107W+T1H22ad+J3yOunQtxtLi6Ktxvoj6YyHt0
|
||||
xCWyjkxdYG6a1eUmcdeQygni6m6q5SUSW6LdsYuGu6aSLpODZabEhWXuLO5vTOdqWezGRym2EAAAAAAA
|
||||
VLmHerNYWXaV98vvxT08HIdYxImdFt4pbV3Qix0ich/bsaG4ulHf6hKLJC6+fXedjOt88ejbrk1tFzE9
|
||||
S74u8Tbx3tLGrdDryj2+4rNiXXF1t00kFrprTCUWT129bUS/ymMLeY3E969xfS7+W2J+3E82ENfONkrd
|
||||
Z6+RlcTVNS5ry6Xi2jtfLxRXV4X7TdQHExMT75i0kJvavjJ1cbmpfi3uGlL5t6wgru6m21heLidJyWSG
|
||||
iNlX5PESO0O4tk3nb+L+pnO8Gxsl2UIAAAAAAFDlHurN0W1ld4ltheM823grOPdD7BvlHPmCvF4eKV1Z
|
||||
OHiLnJ7Jt8TVibl7t7gY992EuHiVcrhEO/4gf5mj8+Sf8xAJBm6eCvF/m/zfxpbmUdfvJBb8TpSvyeck
|
||||
doyJ4zdiEe7xcn9p89bnC5FzfDXpDPiFijfMvynuOlMY53EwOeTsV/H9x9XZJ7FbR+xCEW/V/0hivnPz
|
||||
4kL9Sb4kr5YHSCTWuvZ0Qco+e5S4OsbtGeLaO193F1dPhftN1AcTExPbyukZfE6Wk6kLy011oLjrSOVN
|
||||
4uptm3Uldmb4gPxKrhGXFDAf/5Ify3vl4bKyuDbUEf9zdTivcWOjJFsIAAAAAACq3EO9BOIN7DiL/RHy
|
||||
bHmTHCpxPn28JReLdj+TqQ8dT5H4v4VYDDhS4uHta+WZEjsr3ElWFFcvAAAAmiF2i3m4PEteJx+SSD79
|
||||
nsR3vfjeN/l7YOz6EeWRaPQpiV21XiaPk21lDXH1AHPifhP1yYRfBAZmE7tKxJENe8oBcpB8Sr4tJ8rJ
|
||||
siyJ45e3lh0vkeDyTtlfHit3lTi2wtUxH3vJ5ASSmezgxkRJthAAAAAAAAAAAAAAAKAkWwgAAAAAAAAA
|
||||
AAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAAAAAAAAAAAEqyhQAAAAAAAAAA
|
||||
AAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAAAAAAAAAAoCRbCAAAAAAAAAAA
|
||||
AAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQLAQAAAAAAAAAAAAAASrKFAAAAAAAAAAAA
|
||||
AAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQAAAAAAAAAAAAAACgJFsIAAAAAAAAAAAA
|
||||
AABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsBAAAAAAAAAAAAAADK+b9F/x9qbIygM988
|
||||
TgAAAABJRU5ErkJgggs=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="$this.ScriptEditorPositionForUndo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>0, 0</value>
|
||||
</metadata>
|
||||
<metadata name="$this.ScriptEditorPositionForRedo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>0, 0</value>
|
||||
</metadata>
|
||||
</root>
|
||||
9
SDL/zoll/rptFiskalvertretungVorschau.vb
Normal file
9
SDL/zoll/rptFiskalvertretungVorschau.vb
Normal file
@@ -0,0 +1,9 @@
|
||||
Imports GrapeCity.ActiveReports
|
||||
Imports GrapeCity.ActiveReports.Document
|
||||
|
||||
Public Class rptFiskalvertretungVorschau
|
||||
|
||||
Private Sub GroupHeader3_Format(sender As Object, e As EventArgs)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
135
SDL/zoll/usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER.Designer.vb
generated
Normal file
135
SDL/zoll/usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER.Designer.vb
generated
Normal file
@@ -0,0 +1,135 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.lnlCnt = New System.Windows.Forms.Label()
|
||||
Me.cbx = New System.Windows.Forms.CheckBox()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(102, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "Abgabenliste"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.cbx)
|
||||
Me.GroupBox2.Controls.Add(Me.lnlCnt)
|
||||
Me.GroupBox2.Controls.Add(Me.Button3)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 99)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button3.Location = New System.Drawing.Point(9, 16)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button3.TabIndex = 33
|
||||
Me.Button3.Text = "Liste auswählen ..."
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 83)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(414, 26)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Prüft die ausgewähle Liste der Abgaben von Trier mit den fakturierten Datensätzen" &
|
||||
" ab." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Bei Differenz wird der Eintrag angezeigt."
|
||||
'
|
||||
'lnlCnt
|
||||
'
|
||||
Me.lnlCnt.ForeColor = System.Drawing.Color.Black
|
||||
Me.lnlCnt.Location = New System.Drawing.Point(9, 56)
|
||||
Me.lnlCnt.Name = "lnlCnt"
|
||||
Me.lnlCnt.Size = New System.Drawing.Size(121, 13)
|
||||
Me.lnlCnt.TabIndex = 34
|
||||
Me.lnlCnt.Text = "-"
|
||||
Me.lnlCnt.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'cbx
|
||||
'
|
||||
Me.cbx.AutoSize = True
|
||||
Me.cbx.Checked = True
|
||||
Me.cbx.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbx.Location = New System.Drawing.Point(148, 56)
|
||||
Me.cbx.Name = "cbx"
|
||||
Me.cbx.Size = New System.Drawing.Size(150, 17)
|
||||
Me.cbx.TabIndex = 35
|
||||
Me.cbx.Text = "Nur Differenzen ausgeben"
|
||||
Me.cbx.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER"
|
||||
Me.Size = New System.Drawing.Size(708, 120)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
Friend WithEvents lnlCnt As Label
|
||||
Friend WithEvents cbx As CheckBox
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
209
SDL/zoll/usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER.vb
Normal file
209
SDL/zoll/usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER.vb
Normal file
@@ -0,0 +1,209 @@
|
||||
Imports System.IO
|
||||
Imports System.Globalization
|
||||
|
||||
Public Class usrCntlAuswertungenAufschub_AbgabenKontrolleTRIER
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Property rst As Object
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Function get_DT() As DataTable
|
||||
Return SQL.loadDgvBySql("", "FMZOLL")
|
||||
End Function
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Try
|
||||
|
||||
Dim displayFilter = False
|
||||
|
||||
Dim srchAufschubnehmer = ""
|
||||
Dim AKTO = ""
|
||||
Dim AKTONr = ""
|
||||
Dim Faelligkeit = ""
|
||||
|
||||
Dim erg = ""
|
||||
Dim TMPFIRMA = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
|
||||
Dim fd As New OpenFileDialog
|
||||
|
||||
If fd.ShowDialog = DialogResult.OK Then
|
||||
|
||||
Dim dt As New DataTable
|
||||
dt.Columns.Add("AKTO")
|
||||
dt.Columns.Add("Faelligkeit")
|
||||
dt.Columns.Add("ATC")
|
||||
dt.Columns.Add("BUDat")
|
||||
dt.Columns.Add("Abfertigungsort")
|
||||
dt.Columns.Add("Betrag")
|
||||
dt.Columns.Add("Fakturiert")
|
||||
dt.Columns.Add("Differenz")
|
||||
|
||||
' Dim fileReader() = System.IO.File.ReadAllLines(fd.FileName, System.Text.Encoding.UTF32)
|
||||
Dim cnt = 1
|
||||
' For Each line In fileReader
|
||||
' Dim Flines = System.IO.File.ReadLines(fd.FileName)
|
||||
For Each line As String In System.IO.File.ReadLines(fd.FileName, System.Text.Encoding.Default)
|
||||
'MsgBox(line.Length)
|
||||
If srchAufschubnehmer = "" AndAlso line.Contains("Aufschubnehmer: ") Then
|
||||
srchAufschubnehmer = line.Replace("Aufschubnehmer: ", "").Trim
|
||||
AKTO = srchAufschubnehmer.Substring(0, 13).Trim
|
||||
If AKTO.Contains("-") Then Dim sp = AKTO.Split("-") : AKTONr = sp(1) 'String.Format("{000000}", sp(1))
|
||||
|
||||
If srchAufschubnehmer.ToUpper.Contains("VERAG") Then
|
||||
TMPFIRMA = "VERAG"
|
||||
ElseIf srchAufschubnehmer.ToUpper.Contains("UNISPED") Then
|
||||
TMPFIRMA = "UNISPED"
|
||||
ElseIf srchAufschubnehmer.ToUpper.Contains("IMEX") Then
|
||||
TMPFIRMA = "IMEX"
|
||||
|
||||
End If
|
||||
End If
|
||||
If Faelligkeit = "" AndAlso line.Contains("Fälligkeit: ") Then
|
||||
Faelligkeit = line.Replace("Fälligkeit: ", "").Trim
|
||||
End If
|
||||
|
||||
|
||||
If line.Length = "79" And line.Contains("ATC") Then
|
||||
Dim zollamt As String = line.Substring(0, 28).Trim
|
||||
Dim atc As String = line.Substring(28, 25).Trim
|
||||
Dim datum As Date = CDate(line.Substring(53, 10).Trim)
|
||||
Dim betrag As Double = CDbl(line.Substring(63, 16).Trim)
|
||||
|
||||
' Dim fakturiert = CDbl(SQL.DLookup("Betrag", "Zkteing", "[Status]='F' AND [Registriernummer]='" & atc & "' AND [AKTO]=" & AKTONr & "", "FMZOLL", "0"))
|
||||
Dim fakturiert = CDbl(SQL.DLookup("sum(Preis)", "Rechnungsausgang inner join [RechnungsausgangPositionen] On Rechnungsausgang.RK_ID=[RechnungsausgangPositionen].RK_ID", " [Status]<>0 and DruckDatumZeit is not null and left([RechnungsausgangPositionen].Belegdaten,21)='" & atc & "' AND [AufschubkontoNr]='" & AKTO & "'", "FMZOLL", "0"))
|
||||
|
||||
Dim differenz = fakturiert - betrag
|
||||
|
||||
If Not cbx.Checked OrElse differenz <> 0 Then
|
||||
erg &= zollamt & " - " & atc & ": " & betrag & " | " & differenz & vbNewLine
|
||||
dt.Rows.Add({AKTO, Faelligkeit, atc, datum, zollamt, betrag, fakturiert, differenz})
|
||||
End If
|
||||
|
||||
End If
|
||||
cnt += 1
|
||||
lnlCnt.Text = cnt '& "/" & Flines.Count
|
||||
Me.Refresh()
|
||||
Next
|
||||
|
||||
If dt.Rows.Count = 0 Then
|
||||
MsgBox("Keine Differenzen gefunden!")
|
||||
Else
|
||||
Dim rpt As New rptAufschubabgleich
|
||||
rpt.DataSource = dt
|
||||
|
||||
Dim print As New frmPrintLayout
|
||||
|
||||
print.Text = "Abgabenliste"
|
||||
|
||||
If rpt.DataSource Is Nothing OrElse rpt.DataSource.rows.count = 0 Then
|
||||
rpt.Dispose() : print.Dispose()
|
||||
MsgBox("Keine Daten vorhanden!")
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Select Case TMPFIRMA
|
||||
Case "IMEX" : rpt.picVERAG.Image = My.Resources.IMEX_LOGO_simple : rpt.Label8.Text = "IMEX Customs Service GmbH"
|
||||
Case "ATILLA" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label8.Text = "ATILLA Spedition"
|
||||
Case "UNISPED" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label8.Text = "UNISPED Spedition"
|
||||
Case "AMBAR" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label8.Text = "AMBAR"
|
||||
Case "FRONTOFFICE" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label8.Text = "FRONTOFFICE"
|
||||
Case Else
|
||||
End Select
|
||||
|
||||
|
||||
Dim sum = 0
|
||||
rpt.lblKontoBez.Text = srchAufschubnehmer
|
||||
rpt.lblFaelligkeit.Text = Faelligkeit
|
||||
' rpt.lblAnzahl.Text = cnt
|
||||
rpt.lblDetails.Text = Now.ToLongDateString & ", " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
|
||||
|
||||
Dim sumBetrag As Double = 0
|
||||
Dim sumFakturiert As Double = 0
|
||||
Dim sumDifferenz As Double = 0
|
||||
|
||||
Dim Anz = 0
|
||||
AddHandler rpt.Detail.Format, Sub()
|
||||
|
||||
rpt.lblAKTO.Text = checkNull(rpt.Fields.Item("AKTO").Value)
|
||||
'rpt.lblFaelligkeit.Text = checkNull(rpt.Fields.Item("Faelligkeit").Value)
|
||||
rpt.lblATC.Text = checkNull(rpt.Fields.Item("ATC").Value)
|
||||
|
||||
rpt.lblBUDatValue.Text = checkNull(rpt.Fields.Item("BUDat").Value)
|
||||
rpt.lblAbfertigungsort.Text = checkNull(rpt.Fields.Item("Abfertigungsort").Value)
|
||||
rpt.lblBetrag.Text = checkNull(rpt.Fields.Item("Betrag").Value)
|
||||
rpt.lblFakturiert.Text = checkNull(rpt.Fields.Item("Fakturiert").Value)
|
||||
rpt.lblDifferenz.Text = checkNull(rpt.Fields.Item("Differenz").Value)
|
||||
|
||||
Dim tmp_betrag As Double = 0
|
||||
Dim tmp_fakturiert As Double = 0
|
||||
Dim tmp_differenz As Double = 0
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("betrag").Value)) Then tmp_betrag = CDbl(rpt.Fields.Item("Betrag").Value())
|
||||
rpt.lblBetrag.Text = CDbl(tmp_betrag).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("Fakturiert").Value)) Then tmp_fakturiert = CDbl(rpt.Fields.Item("Fakturiert").Value())
|
||||
rpt.lblFakturiert.Text = CDbl(tmp_fakturiert).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("Differenz").Value)) Then tmp_differenz = CDbl(rpt.Fields.Item("Differenz").Value())
|
||||
rpt.lblDifferenz.Text = CDbl(tmp_differenz).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
|
||||
sumBetrag += tmp_betrag
|
||||
sumFakturiert += tmp_fakturiert
|
||||
sumDifferenz += tmp_differenz
|
||||
|
||||
Anz += 1
|
||||
|
||||
If Anz Mod 2 = 0 Then
|
||||
rpt.Detail.BackColor = Color.FromArgb(240, 240, 240)
|
||||
Else
|
||||
rpt.Detail.BackColor = Color.White
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
AddHandler rpt.ReportFooter1.Format, Sub()
|
||||
|
||||
rpt.lblBetragSum.Text = sumBetrag.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblFakturiertSum.Text = sumFakturiert.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblDifferenzSum.Text = sumDifferenz.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblAnzahl.Text = Anz.ToString("N0") & "(" & Anz.ToString("N0") & " im Datensatz)"
|
||||
|
||||
End Sub
|
||||
|
||||
print.Viewer.LoadDocument(rpt)
|
||||
print.Viewer.ViewType = GrapeCity.Viewer.Common.Model.ViewType.Continuous
|
||||
print.Show()
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Function checkNull(o As Object, Optional ret As String = "") As Object
|
||||
If o Is Nothing Then Return ret
|
||||
If o Is DBNull.Value Then Return ret
|
||||
Return o
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
223
SDL/zoll/usrCntlAuswertungenAufschub_Abgabenliste.Designer.vb
generated
Normal file
223
SDL/zoll/usrCntlAuswertungenAufschub_Abgabenliste.Designer.vb
generated
Normal file
@@ -0,0 +1,223 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlAuswertungenAufschub_Abgabenliste
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.datFaellig = New System.Windows.Forms.DateTimePicker()
|
||||
Me.cboKonto = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.datBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.datVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(102, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "Abgabenliste"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Button4)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.datFaellig)
|
||||
Me.GroupBox2.Controls.Add(Me.cboKonto)
|
||||
Me.GroupBox2.Controls.Add(Me.Label12)
|
||||
Me.GroupBox2.Controls.Add(Me.Button3)
|
||||
Me.GroupBox2.Controls.Add(Me.Label9)
|
||||
Me.GroupBox2.Controls.Add(Me.datBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label13)
|
||||
Me.GroupBox2.Controls.Add(Me.datVon)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 99)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button4.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.Button4.Location = New System.Drawing.Point(9, 50)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Padding = New System.Windows.Forms.Padding(0, 0, 25, 0)
|
||||
Me.Button4.Size = New System.Drawing.Size(121, 38)
|
||||
Me.Button4.TabIndex = 38
|
||||
Me.Button4.Text = "Excel"
|
||||
Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(454, 59)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(101, 13)
|
||||
Me.Label1.TabIndex = 37
|
||||
Me.Label1.Text = "Fälligkeitsdatum bis:"
|
||||
'
|
||||
'datFaellig
|
||||
'
|
||||
Me.datFaellig.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datFaellig.Location = New System.Drawing.Point(561, 56)
|
||||
Me.datFaellig.Name = "datFaellig"
|
||||
Me.datFaellig.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datFaellig.TabIndex = 36
|
||||
'
|
||||
'cboKonto
|
||||
'
|
||||
Me.cboKonto._allowedValuesFreiText = Nothing
|
||||
Me.cboKonto._allowFreiText = False
|
||||
Me.cboKonto._value = ""
|
||||
Me.cboKonto.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboKonto.DropDownWidth = 320
|
||||
Me.cboKonto.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
|
||||
Me.cboKonto.FormattingEnabled = True
|
||||
Me.cboKonto.Location = New System.Drawing.Point(212, 45)
|
||||
Me.cboKonto.Name = "cboKonto"
|
||||
Me.cboKonto.Size = New System.Drawing.Size(155, 24)
|
||||
Me.cboKonto.TabIndex = 35
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Location = New System.Drawing.Point(145, 50)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(38, 13)
|
||||
Me.Label12.TabIndex = 34
|
||||
Me.Label12.Text = "Konto:"
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button3.Location = New System.Drawing.Point(9, 16)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button3.TabIndex = 33
|
||||
Me.Button3.Text = "Liste erstellen"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(532, 36)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label9.TabIndex = 31
|
||||
Me.Label9.Text = "bis:"
|
||||
'
|
||||
'datBis
|
||||
'
|
||||
Me.datBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datBis.Location = New System.Drawing.Point(561, 33)
|
||||
Me.datBis.Name = "datBis"
|
||||
Me.datBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datBis.TabIndex = 30
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(399, 36)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label13.TabIndex = 29
|
||||
Me.Label13.Text = "von:"
|
||||
'
|
||||
'datVon
|
||||
'
|
||||
Me.datVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVon.Location = New System.Drawing.Point(433, 33)
|
||||
Me.datVon.Name = "datVon"
|
||||
Me.datVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVon.TabIndex = 28
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(145, 83)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(425, 13)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Liefert eine Abgabenliste entsprechend dem Konto und Zeitraum aus den Dakosy-Date" &
|
||||
"n."
|
||||
'
|
||||
'usrCntlAuswertungenAufschub_Abgabenliste
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenAufschub_Abgabenliste"
|
||||
Me.Size = New System.Drawing.Size(708, 120)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents datBis As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents datVon As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
Friend WithEvents cboKonto As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents datFaellig As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Button4 As Button
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenAufschub_Abgabenliste.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenAufschub_Abgabenliste.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
167
SDL/zoll/usrCntlAuswertungenAufschub_Abgabenliste.vb
Normal file
167
SDL/zoll/usrCntlAuswertungenAufschub_Abgabenliste.vb
Normal file
@@ -0,0 +1,167 @@
|
||||
Imports System.IO
|
||||
Imports System.Globalization
|
||||
|
||||
Public Class usrCntlAuswertungenAufschub_Abgabenliste
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Property rst As Object
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
datVon.Value = CDate("01." & Now.AddMonths(-1).Month & "." & Now.AddMonths(-1).Year)
|
||||
datBis.Value = datVon.Value.AddMonths(1).AddDays(-1)
|
||||
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Case "UNISPED"
|
||||
cboKonto.Items.Clear()
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED Speditions GmbH - EUST (M006146)", "M006146"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED Speditions GmbH - ZOLL (M006145)", "M006145"))
|
||||
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED Deutschland - EUST (M006077)", "M006077"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED Deutschland - ZOLL (M006078)", "M006078"))
|
||||
|
||||
|
||||
Case "IMEX"
|
||||
cboKonto.Items.Clear()
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M002718 - IMEX ZOLL", "M002718"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M002719 - IMEX EUST", "M002719"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M001994 - GLOBAL EUST", "M001994"))
|
||||
Case Else
|
||||
cboKonto.Items.Clear()
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M006128 - VERAG ZOLL", "M006128"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M006136 - VERAG EUST", "M006136"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M002718 - IMEX ZOLL", "M002718"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M002719 - IMEX EUST", "M002719"))
|
||||
cboKonto.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("M001994 - GLOBAL EUST", "M001994"))
|
||||
End Select
|
||||
|
||||
End Sub
|
||||
|
||||
Function get_DT() As DataTable
|
||||
Return SQL.loadDgvBySql("SELECT eza_firma,eza_niederlassung,Eingabedatum, eza_ANR,Belegart, eza_ObjectName,betrag " &
|
||||
" FROM [tblDakosy_EZA] inner join [Zkteing] on [Zkteing].Registriernummer=eza_ANR " &
|
||||
" where Eingabedatum between '" & datVon.Value & "' and '" & datBis.Value & "' and akto='" & cboKonto._value.ToString.Substring(1) & "' and AOFD='" & cboKonto._value.ToString.Substring(0, 1) & "' and convert(date,Fälligkeitsdatum,104)<='" & datFaellig.Value & "' " &
|
||||
" order by eza_firma,eza_niederlassung,Eingabedatum,eza_ANR", "FMZOLL")
|
||||
End Function
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
|
||||
|
||||
Dim displayFilter = False
|
||||
|
||||
|
||||
If cboKonto._value = "" Then MsgBox("Bitte Konto auswählen") : Exit Sub
|
||||
|
||||
Dim print As New frmPrintLayout
|
||||
print.Text = "Abgabenliste"
|
||||
|
||||
Dim rpt As New rptAbgabenliste
|
||||
|
||||
rpt.DataSource = get_DT()
|
||||
|
||||
rpt.GroupHeader1.DataField = "eza_niederlassung" 'Gruppierung
|
||||
|
||||
' MsgBox(rpt.DataSource.rows.count)
|
||||
If rpt.DataSource.rows.count = 0 Then
|
||||
rpt.Dispose() : print.Dispose()
|
||||
MsgBox("Keine Daten vorhanden!")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim sum = 0
|
||||
rpt.lblUeberschrift.Text = "Abgabenliste " & datVon.Text & " bis " & datBis.Text
|
||||
rpt.lblEingabeDat.Text = "Eingabedatum: " & datVon.Text & " bis " & datBis.Text
|
||||
rpt.lblFaelligkeitsDatum.Text = "Fälligkeitsdatum: " & datFaellig.Text
|
||||
rpt.lblKontoFilter.Text = "Konto: " & cboKonto._value
|
||||
|
||||
|
||||
rpt.lblSachbearbeiter.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
|
||||
'rpt.lblMandantNiederlassung.Text = PERSONAL.Mandant & " / " & PERSONAL.Niederlassung
|
||||
|
||||
'Dim cnt As Integer = 0
|
||||
rpt.lblDat.Text = Now.ToLongDateString
|
||||
Dim sumBt As Double = 0
|
||||
Dim Anz As Double = 0
|
||||
Dim gesSumBt As Double = 0
|
||||
Dim gesAnz As Double = 0
|
||||
|
||||
AddHandler rpt.Detail.Format, Sub()
|
||||
' rpt.lblVon.Text = CDate(rpt.Fields.Item("von").Value).ToShortDateString
|
||||
' rpt.lblLKWNr.Text = CDate(rpt.Fields.Item("bis").Value).ToShortDateString
|
||||
|
||||
rpt.lblAbfDatum.Text = checkNull(rpt.Fields.Item("Eingabedatum").Value)
|
||||
rpt.lblRegNr.Text = checkNull(rpt.Fields.Item("eza_ANR").Value)
|
||||
|
||||
rpt.lblBezNr.Text = checkNull(rpt.Fields.Item("eza_ObjectName").Value)
|
||||
rpt.lblArt.Text = checkNull(rpt.Fields.Item("Belegart").Value)
|
||||
' rpt.lblBetrag.Text = rpt.Fields.Item("betrag").Value
|
||||
|
||||
Dim bt As Double = 0
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("betrag").Value)) Then bt = CDbl(rpt.Fields.Item("betrag").Value())
|
||||
rpt.lblBetrag.Text = CDbl(bt).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
|
||||
sumBt += bt
|
||||
gesSumBt += bt
|
||||
|
||||
Anz += 1
|
||||
gesAnz += 1
|
||||
|
||||
If Anz Mod 2 = 0 Then
|
||||
rpt.Detail.BackColor = Color.FromArgb(240, 240, 240)
|
||||
Else
|
||||
rpt.Detail.BackColor = Color.White
|
||||
End If
|
||||
End Sub
|
||||
AddHandler rpt.GroupHeader1.Format, Sub()
|
||||
rpt.lblFiskalvertretung.Text = checkNull(rpt.Fields.Item("eza_niederlassung").Value)
|
||||
|
||||
sumBt = 0
|
||||
Anz = 0
|
||||
|
||||
rpt.lblGesSumTxt.Text = "Summe " & checkNull(rpt.Fields.Item("eza_niederlassung").Value) & ":"
|
||||
End Sub
|
||||
|
||||
|
||||
AddHandler rpt.GroupFooter1.Format, Sub()
|
||||
rpt.lblGesSumRe.Text = sumBt.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblGesSumAnzahl.Text = Anz.ToString("N0")
|
||||
|
||||
End Sub
|
||||
AddHandler rpt.ReportFooter1.Format, Sub()
|
||||
|
||||
rpt.lblGesgesSumRe.Text = gesSumBt.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblGesGesSumAnzahl.Text = gesAnz.ToString("N0")
|
||||
|
||||
End Sub
|
||||
|
||||
print.Viewer.LoadDocument(rpt)
|
||||
print.Viewer.ViewType = GrapeCity.Viewer.Common.Model.ViewType.Continuous
|
||||
print.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Function checkNull(o As Object, Optional ret As String = "") As Object
|
||||
If o Is Nothing Then Return ret
|
||||
If o Is DBNull.Value Then Return ret
|
||||
Return o
|
||||
|
||||
End Function
|
||||
|
||||
Private Sub datBis_ValueChanged(sender As Object, e As EventArgs) Handles datBis.ValueChanged
|
||||
datFaellig.Value = CDate("26." & datBis.Value.AddMonths(2).Month & "." & datBis.Value.AddMonths(1).Year)
|
||||
' datFaellig.Value = CDate("16." & datBis.Value.AddMonths(1).Month & "." & datBis.Value.AddMonths(1).Year)
|
||||
End Sub
|
||||
|
||||
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
|
||||
Dim dt As DataTable = get_DT() 'SQL.loadDgvBySql(getSQL_NCTS_ATLAS(datVon.Text, datBis.Text, txtStatVon.Text, txtStatbis.Text, DirectCast(ComboBox2.SelectedItem, VERAG_PROG_ALLGEMEIN.MyListItem).Value, DirectCast(ComboBox1.SelectedItem, VERAG_PROG_ALLGEMEIN.MyListItem).Value), "FMZOLL")
|
||||
If dt IsNot Nothing Then
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt)
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
266
SDL/zoll/usrCntlAuswertungenCBAM_DE.Designer.vb
generated
Normal file
266
SDL/zoll/usrCntlAuswertungenCBAM_DE.Designer.vb
generated
Normal file
@@ -0,0 +1,266 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class usrCntlAuswertungenCBAM_DE
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.kdKunde = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
|
||||
Me.lblCnt2 = New System.Windows.Forms.Label()
|
||||
Me.txtJahr = New System.Windows.Forms.NumericUpDown()
|
||||
Me.cboMonat = New System.Windows.Forms.ComboBox()
|
||||
Me.Label77 = New System.Windows.Forms.Label()
|
||||
Me.datAuswertBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label78 = New System.Windows.Forms.Label()
|
||||
Me.Label79 = New System.Windows.Forms.Label()
|
||||
Me.Label80 = New System.Windows.Forms.Label()
|
||||
Me.datAuswertVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.lblCnt = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
CType(Me.txtJahr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(118, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "CBAM DAKOSY"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.kdKunde)
|
||||
Me.GroupBox2.Controls.Add(Me.lblCnt2)
|
||||
Me.GroupBox2.Controls.Add(Me.txtJahr)
|
||||
Me.GroupBox2.Controls.Add(Me.cboMonat)
|
||||
Me.GroupBox2.Controls.Add(Me.Label77)
|
||||
Me.GroupBox2.Controls.Add(Me.datAuswertBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label78)
|
||||
Me.GroupBox2.Controls.Add(Me.Label79)
|
||||
Me.GroupBox2.Controls.Add(Me.Label80)
|
||||
Me.GroupBox2.Controls.Add(Me.datAuswertVon)
|
||||
Me.GroupBox2.Controls.Add(Me.Button3)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Controls.Add(Me.lblCnt)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 86)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(145, 63)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(41, 13)
|
||||
Me.Label1.TabIndex = 45
|
||||
Me.Label1.Text = "Kunde:"
|
||||
'
|
||||
'kdKunde
|
||||
'
|
||||
Me.kdKunde._AlleFirmenCLUSTER = True
|
||||
Me.kdKunde._AllowSetValue = True
|
||||
Me.kdKunde._autoSizeGross = False
|
||||
Me.kdKunde._display_Name1 = False
|
||||
Me.kdKunde._displayAVISO_Email = False
|
||||
Me.kdKunde._displayFullName = False
|
||||
Me.kdKunde._displayWoelflKd = False
|
||||
Me.kdKunde._hideIfListEmpty = True
|
||||
Me.kdKunde._loadKdData = False
|
||||
Me.kdKunde._searchName1 = True
|
||||
Me.kdKunde._UseFIRMA = ""
|
||||
Me.kdKunde._ValueKdAndName = True
|
||||
Me.kdKunde.dgvpos = "LEFT"
|
||||
Me.kdKunde.KdName = ""
|
||||
Me.kdKunde.KdNr = "-1"
|
||||
Me.kdKunde.kdNrField = Nothing
|
||||
Me.kdKunde.KdNrNullInt = Nothing
|
||||
Me.kdKunde.Location = New System.Drawing.Point(186, 60)
|
||||
Me.kdKunde.Name = "kdKunde"
|
||||
Me.kdKunde.nurAktive = True
|
||||
Me.kdKunde.searchActive = True
|
||||
Me.kdKunde.Size = New System.Drawing.Size(177, 20)
|
||||
Me.kdKunde.TabIndex = 44
|
||||
Me.kdKunde.TIMER_SEARCH = True
|
||||
Me.kdKunde.usrcntl = Nothing
|
||||
'
|
||||
'lblCnt2
|
||||
'
|
||||
Me.lblCnt2.Location = New System.Drawing.Point(52, 69)
|
||||
Me.lblCnt2.Name = "lblCnt2"
|
||||
Me.lblCnt2.Size = New System.Drawing.Size(78, 13)
|
||||
Me.lblCnt2.TabIndex = 43
|
||||
Me.lblCnt2.Text = "99/99"
|
||||
Me.lblCnt2.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtJahr
|
||||
'
|
||||
Me.txtJahr.Location = New System.Drawing.Point(315, 37)
|
||||
Me.txtJahr.Maximum = New Decimal(New Integer() {2050, 0, 0, 0})
|
||||
Me.txtJahr.Minimum = New Decimal(New Integer() {1999, 0, 0, 0})
|
||||
Me.txtJahr.Name = "txtJahr"
|
||||
Me.txtJahr.Size = New System.Drawing.Size(48, 20)
|
||||
Me.txtJahr.TabIndex = 40
|
||||
Me.txtJahr.Value = New Decimal(New Integer() {2016, 0, 0, 0})
|
||||
'
|
||||
'cboMonat
|
||||
'
|
||||
Me.cboMonat.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMonat.FormattingEnabled = True
|
||||
Me.cboMonat.Items.AddRange(New Object() {"", "Q1", "Q2", "Q3", "Q4"})
|
||||
Me.cboMonat.Location = New System.Drawing.Point(186, 36)
|
||||
Me.cboMonat.Name = "cboMonat"
|
||||
Me.cboMonat.Size = New System.Drawing.Size(87, 21)
|
||||
Me.cboMonat.TabIndex = 41
|
||||
'
|
||||
'Label77
|
||||
'
|
||||
Me.Label77.AutoSize = True
|
||||
Me.Label77.Location = New System.Drawing.Point(569, 40)
|
||||
Me.Label77.Name = "Label77"
|
||||
Me.Label77.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label77.TabIndex = 39
|
||||
Me.Label77.Text = "bis:"
|
||||
'
|
||||
'datAuswertBis
|
||||
'
|
||||
Me.datAuswertBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datAuswertBis.Location = New System.Drawing.Point(598, 37)
|
||||
Me.datAuswertBis.Name = "datAuswertBis"
|
||||
Me.datAuswertBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datAuswertBis.TabIndex = 38
|
||||
'
|
||||
'Label78
|
||||
'
|
||||
Me.Label78.AutoSize = True
|
||||
Me.Label78.Location = New System.Drawing.Point(279, 40)
|
||||
Me.Label78.Name = "Label78"
|
||||
Me.Label78.Size = New System.Drawing.Size(30, 13)
|
||||
Me.Label78.TabIndex = 35
|
||||
Me.Label78.Text = "Jahr:"
|
||||
'
|
||||
'Label79
|
||||
'
|
||||
Me.Label79.AutoSize = True
|
||||
Me.Label79.Location = New System.Drawing.Point(145, 40)
|
||||
Me.Label79.Name = "Label79"
|
||||
Me.Label79.Size = New System.Drawing.Size(41, 13)
|
||||
Me.Label79.TabIndex = 36
|
||||
Me.Label79.Text = "Quartal"
|
||||
'
|
||||
'Label80
|
||||
'
|
||||
Me.Label80.AutoSize = True
|
||||
Me.Label80.Location = New System.Drawing.Point(436, 40)
|
||||
Me.Label80.Name = "Label80"
|
||||
Me.Label80.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label80.TabIndex = 37
|
||||
Me.Label80.Text = "von:"
|
||||
'
|
||||
'datAuswertVon
|
||||
'
|
||||
Me.datAuswertVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datAuswertVon.Location = New System.Drawing.Point(470, 37)
|
||||
Me.datAuswertVon.Name = "datAuswertVon"
|
||||
Me.datAuswertVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datAuswertVon.TabIndex = 34
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button3.Location = New System.Drawing.Point(9, 16)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button3.TabIndex = 33
|
||||
Me.Button3.Text = "CBAM Kunden"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 56)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(222, 13)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Erstellt Excel Dateien für dei EV Veranlagung."
|
||||
'
|
||||
'lblCnt
|
||||
'
|
||||
Me.lblCnt.Location = New System.Drawing.Point(52, 56)
|
||||
Me.lblCnt.Name = "lblCnt"
|
||||
Me.lblCnt.Size = New System.Drawing.Size(78, 13)
|
||||
Me.lblCnt.TabIndex = 42
|
||||
Me.lblCnt.Text = "99/99"
|
||||
Me.lblCnt.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'usrCntlAuswertungenCBAM_DE
|
||||
'
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
CType(Me.txtJahr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
Friend WithEvents txtJahr As NumericUpDown
|
||||
Friend WithEvents cboMonat As ComboBox
|
||||
Friend WithEvents Label77 As Label
|
||||
Friend WithEvents datAuswertBis As DateTimePicker
|
||||
Friend WithEvents Label78 As Label
|
||||
Friend WithEvents Label79 As Label
|
||||
Friend WithEvents Label80 As Label
|
||||
Friend WithEvents datAuswertVon As DateTimePicker
|
||||
Friend WithEvents lblCnt As Label
|
||||
Friend WithEvents lblCnt2 As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents kdKunde As VERAG_PROG_ALLGEMEIN.KdSearchBox
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenCBAM_DE.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenCBAM_DE.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
241
SDL/zoll/usrCntlAuswertungenCBAM_DE.vb
Normal file
241
SDL/zoll/usrCntlAuswertungenCBAM_DE.vb
Normal file
@@ -0,0 +1,241 @@
|
||||
Imports System.IO
|
||||
|
||||
Public Class usrCntlAuswertungenCBAM_DE
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Property rst As Object
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs)
|
||||
kdKunde.initKdBox(Me.FindForm)
|
||||
'datVon.Value = CDate("01." & Now.AddMonths(-1).Month & "." & Now.AddMonths(-1).Year)
|
||||
'datBis.Value = datVon.Value.AddMonths(1).AddDays(-1)
|
||||
|
||||
txtJahr.Value = Now.Year
|
||||
cboMonat.SelectedIndex = Now.AddMonths(-1).Month
|
||||
|
||||
'datVon_NCTSTR.Value = Now
|
||||
'datBis_NCTSTR.Value = Now.AddDays(3)
|
||||
lblErr.Visible = False
|
||||
lblCnt.Text = ""
|
||||
lblCnt2.Text = ""
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs)
|
||||
Try
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
lblCnt.Text = ""
|
||||
lblCnt2.Text = ""
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT [kde_KundenNr], [Name 1] Name FROM [tblKundenErweitert] INNER JOIN ADRESSEN on adressennr = kde_KundenNr WHERE " & If(kdKunde.KdNr_value > 0, " kde_KundenNr='" & kdKunde.KdNr_value & "' AND ", "") & " [Veranlagungskunde]=1 and Auswahl='A' ", "FMZOLL")
|
||||
If dt Is Nothing Then lblErr.Visible = True : Exit Sub
|
||||
Dim folderpath = ""
|
||||
Dim FolderBrowserDialog1 As New FolderBrowserDialog
|
||||
If FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
|
||||
folderpath = FolderBrowserDialog1.SelectedPath
|
||||
If vbYes = MsgBox("Es werden '" & dt.Rows.Count & "' Kunden ausgewertet. Möchten Sie fortfahren?", vbYesNoCancel) Then
|
||||
Dim cnt = 1
|
||||
For Each r In dt.Rows
|
||||
lblCnt.Text = cnt & "/ " & dt.Rows.Count
|
||||
Me.Refresh()
|
||||
genExcelKd(r("kde_KundenNr"), folderpath, r("Name"))
|
||||
cnt += 1
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Sub genExcelKd(KdNr, sPath, Optional EmpfName = "")
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT [FilialenNr],[AbfertigungsNr],[UnterNr],Empfänger FROM [Speditionsbuch] where (EmpfängerKundenNr='" & KdNr & "' OR VermittlerKundenNr='" & KdNr & "') and cast(Abfertigungsdatum as date) between '" & datAuswertVon.Value & "' and '" & datAuswertBis.Value & "' and Abfertigungsart=38 ORDER BY Abfertigungsdatum ", "FMZOLL")
|
||||
lblCnt2.Text = ""
|
||||
|
||||
'EXCEL
|
||||
Try
|
||||
|
||||
'Dim sPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Personal) & "\VERAG\SR\" ' My.Computer.FileSystem.GetTempFileName
|
||||
'If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
|
||||
' My.Computer.FileSystem.CreateDirectory(sPath)
|
||||
'End If
|
||||
|
||||
Dim Path = ""
|
||||
Dim exclApp As Object 'as Application
|
||||
Dim Datei As Object 'as WorkBook
|
||||
Dim Blatt As Object 'Microsoft.Office.Interop.Excel.Worksheet 'As Object 'as Worksheet
|
||||
exclApp = CreateObject("Excel.Application")
|
||||
|
||||
Dim nodata = False
|
||||
If dt Is Nothing Or dt.Rows.Count = 0 Then nodata = True
|
||||
|
||||
|
||||
Try
|
||||
Path = sPath & "\" & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(EmpfName) & ".xlsx"
|
||||
While System.IO.File.Exists(Path)
|
||||
Path = sPath & "\" & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(EmpfName) & "_" & Now.ToString("ddMMyyyyHHmmss") & ".xlsx"
|
||||
End While
|
||||
My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.FA_Graz_EV_Veranlagung_Muster, False)
|
||||
'Path = sPath & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(dt.Rows(0)("Empfänger")) & ".xlsx"
|
||||
'While System.IO.File.Exists(Path)
|
||||
' Path = sPath & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(dt.Rows(0)("Empfänger")) & "_" & Now.ToString("ddMMyyyyHHmmss") & ".xlsx"
|
||||
'End While
|
||||
'My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.FA_Graz_EV_Veranlagung_Muster, False)
|
||||
|
||||
|
||||
Catch ex As System.Exception
|
||||
' MsgBox(ex.Message)
|
||||
MsgBox("ERROR 01: " & ex.Message & vbNewLine & ex.StackTrace)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
|
||||
With exclApp
|
||||
.Visible = False
|
||||
Datei = .Workbooks.Open(Path)
|
||||
Blatt = Datei.Worksheets(1)
|
||||
|
||||
Blatt.Range("A2").Value = EmpfName & " / Finanzamt Graz " & datAuswertVon.Value.ToShortDateString & "-" & datAuswertBis.Value.ToShortDateString
|
||||
'Blatt.Range("A2").Value = dt.Rows(0)("Empfänger") & " / Finanzamt Graz " & datAuswertVon.Value.ToShortDateString & "-" & datAuswertBis.Value.ToShortDateString
|
||||
|
||||
|
||||
|
||||
If Not nodata Then
|
||||
Dim cnt = 8
|
||||
Dim cnt_zeile = 1
|
||||
For Each r In dt.Rows
|
||||
lblCnt2.Text = cnt_zeile & "/" & dt.Rows.Count
|
||||
Dim SPEDBUCH As New VERAG_PROG_ALLGEMEIN.cSpeditionsbuch(r("FilialenNr"), r("AbfertigungsNr"), r("UnterNr"))
|
||||
If SPEDBUCH.hasEntry Then
|
||||
'LRN
|
||||
Dim BezugsNr = If(SPEDBUCH.AtlasBezNrEZA, "")
|
||||
If BezugsNr = "" Then BezugsNr = SPEDBUCH.FilialenNr & "/" & SPEDBUCH.AbfertigungsNr
|
||||
|
||||
'Handelsrechnungen
|
||||
Dim handelsrechnungen = "" : Dim semi = ""
|
||||
|
||||
|
||||
'EUST
|
||||
Dim EUST_Basis As Double = 0
|
||||
Dim EUST_5EV As Double = 0
|
||||
|
||||
Select Case r("FilialenNr")
|
||||
Case "5501"
|
||||
'EUST
|
||||
Dim dtEUST = SQL.loadDgvBySql(" select sum(base) Base,sum(Amnt)Amnt FROM tblTelotec_Anmeldung as TC inner join tblTelotec_PositionsdatenAbgaben as AGB on AGB.telposAbg_telanmId=TC.telanm_id
|
||||
where Ty IN ('5EV') and tc.telanm_BezugsNr LIKE '" & BezugsNr & "' AND telanm_Status between 50 and 60", "FMZOLL")
|
||||
If dtEUST IsNot Nothing AndAlso dtEUST.Rows.Count >= 0 Then
|
||||
If dtEUST(0)("Base") IsNot DBNull.Value Then EUST_Basis = dtEUST(0)("Base")
|
||||
If dtEUST(0)("Amnt") IsNot DBNull.Value Then EUST_5EV = dtEUST(0)("Amnt")
|
||||
End If
|
||||
|
||||
'Handelsrechnungen
|
||||
For Each rg In SQL.DLookupArray("distinct([DocCerts_DRef]) ", "[tblTelotec_PositionsdatenDokumente] As DOC inner join tblTelotec_Anmeldung As ANM ON telanm_id=[telposAbg_telanmId]", " (ANM.Refs_LRN = '" & BezugsNr & "') and [DocCerts_DocCd] IN ('N380','N325')", "FMZOLL", "DocCerts_DRef")
|
||||
handelsrechnungen &= semi & rg : semi = ","
|
||||
Next
|
||||
|
||||
Case Else
|
||||
'EUST
|
||||
Dim dtEUST = SQL.loadDgvBySql("select sum(base) Base,sum(Amnt)Amnt FROM ztIMsgGdsItemDutyCalc as GDS inner join zzAktivitaet as AKT on GDS.OperatorID=AKT.OperatorID AND GDS.LizenzNr=AKT.LizenzNr AND GDS.IMsgID=AKT.IMsgID
|
||||
inner join zsAnmRefs as ANM on ANM.LizenzNr=AKT.LizenzNr And ANM.OperatorID=AKT.OperatorID And ANM.AnmID=AKT.AnmID
|
||||
where Ty IN ('5EV') and LRN LIKE '" & BezugsNr & "' AND ErledigungsTypID LIKE 'F%'", "EZOLL")
|
||||
If dtEUST IsNot Nothing AndAlso dtEUST.Rows.Count >= 0 Then
|
||||
If dtEUST(0)("Base") IsNot DBNull.Value Then EUST_Basis = dtEUST(0)("Base")
|
||||
If dtEUST(0)("Amnt") IsNot DBNull.Value Then EUST_5EV = dtEUST(0)("Amnt")
|
||||
End If
|
||||
|
||||
'Handelsrechnungen
|
||||
For Each rg In SQL.DLookupArray("distinct(DRef)", "[zsAnmGdsItemDocCerts] As DOC inner join zsAnmRefs As ANM On ANM.LizenzNr=DOC.LizenzNr And ANM.OperatorID=DOC.OperatorID And ANM.AnmID=DOC.AnmID", "(LRN = '" & BezugsNr & "') and DocCd IN ('N380','N325')", "EZOLL", "DRef")
|
||||
handelsrechnungen &= semi & rg : semi = ","
|
||||
Next
|
||||
End Select
|
||||
|
||||
|
||||
If SPEDBUCH.ENDEMPFAENGER.Count > 0 Then
|
||||
Dim cnt2 = 0
|
||||
For Each EEMPF In SPEDBUCH.ENDEMPFAENGER
|
||||
|
||||
Blatt.Range("A" & cnt).EntireRow.Copy()
|
||||
Blatt.Range("A" & cnt).EntireRow.Insert(Microsoft.Office.Interop.Excel.XlDirection.xlDown)
|
||||
|
||||
Blatt.Range("A" & cnt).Value = SPEDBUCH.FilialenNr & "/" & SPEDBUCH.AbfertigungsNr
|
||||
Blatt.Range("B" & cnt).Value = SPEDBUCH.Abfertigungsdatum
|
||||
Blatt.Range("C" & cnt).Value = handelsrechnungen
|
||||
|
||||
If cnt2 = 0 Then 'Nur oberste Zeile je Abfertigung
|
||||
Blatt.Range("D" & cnt).Value = EUST_Basis
|
||||
Blatt.Range("E" & cnt).Value = EUST_5EV
|
||||
'Blatt.Range("D" & cnt).Value = EUST_Basis.ToString("0.00")
|
||||
'Blatt.Range("E" & cnt).Value = EUST_5EV.ToString("0.00")
|
||||
'Blatt.Range("D" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
'Blatt.Range("E" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
Else
|
||||
Blatt.Range("D" & cnt).Value = "-"
|
||||
Blatt.Range("E" & cnt).Value = "-"
|
||||
End If
|
||||
|
||||
Blatt.Range("F" & cnt).Value = EEMPF.EndEmpfaenger
|
||||
Blatt.Range("G" & cnt).Value = If(EEMPF.UstIdKz, "") & If(EEMPF.UstIdNr, "")
|
||||
If EEMPF.Rechnungsbetrag IsNot Nothing AndAlso IsNumeric(EEMPF.Rechnungsbetrag) Then
|
||||
Blatt.Range("H" & cnt).Value = CDbl(EEMPF.Rechnungsbetrag)
|
||||
'Blatt.Range("H" & cnt).Value = CDbl(EEMPF.Rechnungsbetrag).ToString("0.00")
|
||||
'Blatt.Range("H" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
End If
|
||||
|
||||
cnt += 1
|
||||
cnt2 += 1
|
||||
'+Zeile
|
||||
Next
|
||||
Else
|
||||
Blatt.Range("A" & cnt).EntireRow.Copy()
|
||||
Blatt.Range("A" & cnt).EntireRow.Insert(Microsoft.Office.Interop.Excel.XlDirection.xlDown)
|
||||
|
||||
Blatt.Range("A" & cnt).Value = SPEDBUCH.FilialenNr & "/" & SPEDBUCH.AbfertigungsNr
|
||||
Blatt.Range("B" & cnt).Value = SPEDBUCH.Abfertigungsdatum
|
||||
|
||||
Blatt.Range("C" & cnt).Value = handelsrechnungen
|
||||
Blatt.Range("D" & cnt).Value = EUST_Basis
|
||||
Blatt.Range("E" & cnt).Value = EUST_5EV
|
||||
'Blatt.Range("D" & cnt).Value = EUST_Basis.ToString("0.00")
|
||||
'Blatt.Range("E" & cnt).Value = EUST_5EV.ToString("0.00")
|
||||
'Blatt.Range("D" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
'Blatt.Range("E" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
|
||||
cnt += 1
|
||||
'+Zeile
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
cnt_zeile += 1
|
||||
Next
|
||||
End If
|
||||
|
||||
Datei.Save
|
||||
Datei.Close
|
||||
' .Visible = True 'TEST
|
||||
End With
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Private Function AdjustPath(Input As String) As String
|
||||
Return System.Text.RegularExpressions.Regex.Replace(Input, "[\\/:*?""<>|]", String.Empty)
|
||||
End Function
|
||||
Private Sub Nctstr_SelectedIndexChanged(sender As Object, e As EventArgs)
|
||||
If cboMonat.SelectedIndex <= 0 Then Exit Sub
|
||||
Dim d As Date = CDate("01." & (cboMonat.SelectedIndex) & "." & txtJahr.Text)
|
||||
datAuswertVon.Value = d
|
||||
datAuswertBis.Value = d.AddMonths(1).AddDays(-1)
|
||||
End Sub
|
||||
End Class
|
||||
296
SDL/zoll/usrCntlAuswertungenEV_Veranlagungen.Designer.vb
generated
Normal file
296
SDL/zoll/usrCntlAuswertungenEV_Veranlagungen.Designer.vb
generated
Normal file
@@ -0,0 +1,296 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class usrCntlAuswertungenEV_Veranlagungen
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.kdKunde = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
|
||||
Me.lblCnt2 = New System.Windows.Forms.Label()
|
||||
Me.txtJahr = New System.Windows.Forms.NumericUpDown()
|
||||
Me.cboMonat = New System.Windows.Forms.ComboBox()
|
||||
Me.Label77 = New System.Windows.Forms.Label()
|
||||
Me.datAuswertBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label78 = New System.Windows.Forms.Label()
|
||||
Me.Label79 = New System.Windows.Forms.Label()
|
||||
Me.Label80 = New System.Windows.Forms.Label()
|
||||
Me.datAuswertVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.lblCnt = New System.Windows.Forms.Label()
|
||||
Me.cboEzollSRV = New System.Windows.Forms.ComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
CType(Me.txtJahr, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(125, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "EV Veranlagung"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||
Me.GroupBox2.Controls.Add(Me.cboEzollSRV)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.kdKunde)
|
||||
Me.GroupBox2.Controls.Add(Me.lblCnt2)
|
||||
Me.GroupBox2.Controls.Add(Me.txtJahr)
|
||||
Me.GroupBox2.Controls.Add(Me.cboMonat)
|
||||
Me.GroupBox2.Controls.Add(Me.Label77)
|
||||
Me.GroupBox2.Controls.Add(Me.datAuswertBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label78)
|
||||
Me.GroupBox2.Controls.Add(Me.Label79)
|
||||
Me.GroupBox2.Controls.Add(Me.Label80)
|
||||
Me.GroupBox2.Controls.Add(Me.datAuswertVon)
|
||||
Me.GroupBox2.Controls.Add(Me.Button3)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Controls.Add(Me.lblCnt)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 86)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(145, 63)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(41, 13)
|
||||
Me.Label1.TabIndex = 45
|
||||
Me.Label1.Text = "Kunde:"
|
||||
'
|
||||
'kdKunde
|
||||
'
|
||||
Me.kdKunde._AlleFirmenCLUSTER = True
|
||||
Me.kdKunde._AllowSetValue = True
|
||||
Me.kdKunde._autoSizeGross = False
|
||||
Me.kdKunde._display_Name1 = False
|
||||
Me.kdKunde._displayAVISO_Email = False
|
||||
Me.kdKunde._displayFullName = False
|
||||
Me.kdKunde._displayWoelflKd = False
|
||||
Me.kdKunde._hideIfListEmpty = True
|
||||
Me.kdKunde._loadKdData = False
|
||||
Me.kdKunde._searchName1 = True
|
||||
Me.kdKunde._UseFIRMA = ""
|
||||
Me.kdKunde._ValueKdAndName = True
|
||||
Me.kdKunde.dgvpos = "LEFT"
|
||||
Me.kdKunde.KdName = ""
|
||||
Me.kdKunde.KdNr = "-1"
|
||||
Me.kdKunde.kdNrField = Nothing
|
||||
Me.kdKunde.KdNrNullInt = Nothing
|
||||
Me.kdKunde.Location = New System.Drawing.Point(186, 60)
|
||||
Me.kdKunde.Name = "kdKunde"
|
||||
Me.kdKunde.nurAktive = True
|
||||
Me.kdKunde.searchActive = True
|
||||
Me.kdKunde.Size = New System.Drawing.Size(177, 20)
|
||||
Me.kdKunde.TabIndex = 44
|
||||
Me.kdKunde.TIMER_SEARCH = True
|
||||
Me.kdKunde.usrcntl = Nothing
|
||||
'
|
||||
'lblCnt2
|
||||
'
|
||||
Me.lblCnt2.Location = New System.Drawing.Point(52, 69)
|
||||
Me.lblCnt2.Name = "lblCnt2"
|
||||
Me.lblCnt2.Size = New System.Drawing.Size(78, 13)
|
||||
Me.lblCnt2.TabIndex = 43
|
||||
Me.lblCnt2.Text = "99/99"
|
||||
Me.lblCnt2.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'txtJahr
|
||||
'
|
||||
Me.txtJahr.Location = New System.Drawing.Point(315, 37)
|
||||
Me.txtJahr.Maximum = New Decimal(New Integer() {2050, 0, 0, 0})
|
||||
Me.txtJahr.Minimum = New Decimal(New Integer() {1999, 0, 0, 0})
|
||||
Me.txtJahr.Name = "txtJahr"
|
||||
Me.txtJahr.Size = New System.Drawing.Size(48, 20)
|
||||
Me.txtJahr.TabIndex = 40
|
||||
Me.txtJahr.Value = New Decimal(New Integer() {2016, 0, 0, 0})
|
||||
'
|
||||
'cboMonat
|
||||
'
|
||||
Me.cboMonat.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMonat.FormattingEnabled = True
|
||||
Me.cboMonat.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.cboMonat.Location = New System.Drawing.Point(186, 36)
|
||||
Me.cboMonat.Name = "cboMonat"
|
||||
Me.cboMonat.Size = New System.Drawing.Size(87, 21)
|
||||
Me.cboMonat.TabIndex = 41
|
||||
'
|
||||
'Label77
|
||||
'
|
||||
Me.Label77.AutoSize = True
|
||||
Me.Label77.Location = New System.Drawing.Point(569, 40)
|
||||
Me.Label77.Name = "Label77"
|
||||
Me.Label77.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label77.TabIndex = 39
|
||||
Me.Label77.Text = "bis:"
|
||||
'
|
||||
'datAuswertBis
|
||||
'
|
||||
Me.datAuswertBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datAuswertBis.Location = New System.Drawing.Point(598, 37)
|
||||
Me.datAuswertBis.Name = "datAuswertBis"
|
||||
Me.datAuswertBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datAuswertBis.TabIndex = 38
|
||||
'
|
||||
'Label78
|
||||
'
|
||||
Me.Label78.AutoSize = True
|
||||
Me.Label78.Location = New System.Drawing.Point(279, 40)
|
||||
Me.Label78.Name = "Label78"
|
||||
Me.Label78.Size = New System.Drawing.Size(30, 13)
|
||||
Me.Label78.TabIndex = 35
|
||||
Me.Label78.Text = "Jahr:"
|
||||
'
|
||||
'Label79
|
||||
'
|
||||
Me.Label79.AutoSize = True
|
||||
Me.Label79.Location = New System.Drawing.Point(145, 40)
|
||||
Me.Label79.Name = "Label79"
|
||||
Me.Label79.Size = New System.Drawing.Size(40, 13)
|
||||
Me.Label79.TabIndex = 36
|
||||
Me.Label79.Text = "Monat:"
|
||||
'
|
||||
'Label80
|
||||
'
|
||||
Me.Label80.AutoSize = True
|
||||
Me.Label80.Location = New System.Drawing.Point(436, 40)
|
||||
Me.Label80.Name = "Label80"
|
||||
Me.Label80.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label80.TabIndex = 37
|
||||
Me.Label80.Text = "von:"
|
||||
'
|
||||
'datAuswertVon
|
||||
'
|
||||
Me.datAuswertVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datAuswertVon.Location = New System.Drawing.Point(470, 37)
|
||||
Me.datAuswertVon.Name = "datAuswertVon"
|
||||
Me.datAuswertVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datAuswertVon.TabIndex = 34
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button3.Location = New System.Drawing.Point(9, 16)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button3.TabIndex = 33
|
||||
Me.Button3.Text = "Excel-Auswertungen erstellen"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 56)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(222, 13)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Erstellt Excel Dateien für dei EV Veranlagung."
|
||||
'
|
||||
'lblCnt
|
||||
'
|
||||
Me.lblCnt.Location = New System.Drawing.Point(52, 56)
|
||||
Me.lblCnt.Name = "lblCnt"
|
||||
Me.lblCnt.Size = New System.Drawing.Size(78, 13)
|
||||
Me.lblCnt.TabIndex = 42
|
||||
Me.lblCnt.Text = "99/99"
|
||||
Me.lblCnt.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'cboEzollSRV
|
||||
'
|
||||
Me.cboEzollSRV.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboEzollSRV.FormattingEnabled = True
|
||||
Me.cboEzollSRV.Items.AddRange(New Object() {"VERAG", "UNISPED"})
|
||||
Me.cboEzollSRV.Location = New System.Drawing.Point(470, 59)
|
||||
Me.cboEzollSRV.Name = "cboEzollSRV"
|
||||
Me.cboEzollSRV.Size = New System.Drawing.Size(87, 21)
|
||||
Me.cboEzollSRV.TabIndex = 46
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(397, 62)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(67, 13)
|
||||
Me.Label2.TabIndex = 47
|
||||
Me.Label2.Text = "eZoll-Server:"
|
||||
'
|
||||
'usrCntlAuswertungenEV_Veranlagungen
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenEV_Veranlagungen"
|
||||
Me.Size = New System.Drawing.Size(708, 105)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
CType(Me.txtJahr, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
Friend WithEvents txtJahr As NumericUpDown
|
||||
Friend WithEvents cboMonat As ComboBox
|
||||
Friend WithEvents Label77 As Label
|
||||
Friend WithEvents datAuswertBis As DateTimePicker
|
||||
Friend WithEvents Label78 As Label
|
||||
Friend WithEvents Label79 As Label
|
||||
Friend WithEvents Label80 As Label
|
||||
Friend WithEvents datAuswertVon As DateTimePicker
|
||||
Friend WithEvents lblCnt As Label
|
||||
Friend WithEvents lblCnt2 As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents kdKunde As VERAG_PROG_ALLGEMEIN.KdSearchBox
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents cboEzollSRV As ComboBox
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenEV_Veranlagungen.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenEV_Veranlagungen.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
246
SDL/zoll/usrCntlAuswertungenEV_Veranlagungen.vb
Normal file
246
SDL/zoll/usrCntlAuswertungenEV_Veranlagungen.vb
Normal file
@@ -0,0 +1,246 @@
|
||||
Imports System.IO
|
||||
|
||||
Public Class usrCntlAuswertungenEV_Veranlagungen
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Property rst As Object
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
kdKunde.initKdBox(Me.FindForm)
|
||||
'datVon.Value = CDate("01." & Now.AddMonths(-1).Month & "." & Now.AddMonths(-1).Year)
|
||||
'datBis.Value = datVon.Value.AddMonths(1).AddDays(-1)
|
||||
|
||||
txtJahr.Value = Now.Year
|
||||
cboMonat.SelectedIndex = Now.AddMonths(-1).Month
|
||||
|
||||
'datVon_NCTSTR.Value = Now
|
||||
'datBis_NCTSTR.Value = Now.AddDays(3)
|
||||
lblErr.Visible = False
|
||||
lblCnt.Text = ""
|
||||
lblCnt2.Text = ""
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
|
||||
Try
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
lblCnt.Text = ""
|
||||
lblCnt2.Text = ""
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT [kde_KundenNr], [Name 1] Name FROM [tblKundenErweitert] INNER JOIN ADRESSEN on adressennr = kde_KundenNr WHERE " & If(kdKunde.KdNr_value > 0, " kde_KundenNr='" & kdKunde.KdNr_value & "' AND ", "") & " [Veranlagungskunde]=1 and Auswahl='A' ", "FMZOLL")
|
||||
If dt Is Nothing Then lblErr.Visible = True : Exit Sub
|
||||
Dim folderpath = ""
|
||||
Dim FolderBrowserDialog1 As New FolderBrowserDialog
|
||||
If FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
|
||||
folderpath = FolderBrowserDialog1.SelectedPath
|
||||
If vbYes = MsgBox("Es werden '" & dt.Rows.Count & "' Kunden ausgewertet. Möchten Sie fortfahren?", vbYesNoCancel) Then
|
||||
Dim cnt = 1
|
||||
For Each r In dt.Rows
|
||||
lblCnt.Text = cnt & "/ " & dt.Rows.Count
|
||||
Me.Refresh()
|
||||
Dim EZOLL_SQLSRV = "EZOLL"
|
||||
If cboEzollSRV.Text = "UNISPED" Then
|
||||
EZOLL_SQLSRV = "EZOLL_UNISPED"
|
||||
End If
|
||||
genExcelKd(r("kde_KundenNr"), folderpath, EZOLL_SQLSRV, r("Name"))
|
||||
cnt += 1
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Sub genExcelKd(KdNr, sPath, EZOLL_SQLSRV, Optional EmpfName = "")
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT [FilialenNr],[AbfertigungsNr],[UnterNr],Empfänger FROM [Speditionsbuch] where (EmpfängerKundenNr='" & KdNr & "' OR VermittlerKundenNr='" & KdNr & "') and cast(Abfertigungsdatum as date) between '" & datAuswertVon.Value & "' and '" & datAuswertBis.Value & "' and Abfertigungsart=38 ORDER BY Abfertigungsdatum ", "FMZOLL")
|
||||
lblCnt2.Text = ""
|
||||
|
||||
'EXCEL
|
||||
Try
|
||||
|
||||
'Dim sPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Personal) & "\VERAG\SR\" ' My.Computer.FileSystem.GetTempFileName
|
||||
'If Not My.Computer.FileSystem.DirectoryExists(sPath) Then
|
||||
' My.Computer.FileSystem.CreateDirectory(sPath)
|
||||
'End If
|
||||
|
||||
Dim Path = ""
|
||||
Dim exclApp As Object 'as Application
|
||||
Dim Datei As Object 'as WorkBook
|
||||
Dim Blatt As Object 'Microsoft.Office.Interop.Excel.Worksheet 'As Object 'as Worksheet
|
||||
exclApp = CreateObject("Excel.Application")
|
||||
|
||||
Dim nodata = False
|
||||
If dt Is Nothing Or dt.Rows.Count = 0 Then nodata = True
|
||||
|
||||
|
||||
Try
|
||||
Path = sPath & "\" & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(EmpfName) & ".xlsx"
|
||||
While System.IO.File.Exists(Path)
|
||||
Path = sPath & "\" & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(EmpfName) & "_" & Now.ToString("ddMMyyyyHHmmss") & ".xlsx"
|
||||
End While
|
||||
My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.FA_Graz_EV_Veranlagung_Muster, False)
|
||||
'Path = sPath & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(dt.Rows(0)("Empfänger")) & ".xlsx"
|
||||
'While System.IO.File.Exists(Path)
|
||||
' Path = sPath & If(nodata, "nodata_", "") & "FA_Graz_" & AdjustPath(dt.Rows(0)("Empfänger")) & "_" & Now.ToString("ddMMyyyyHHmmss") & ".xlsx"
|
||||
'End While
|
||||
'My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.FA_Graz_EV_Veranlagung_Muster, False)
|
||||
|
||||
|
||||
Catch ex As System.Exception
|
||||
' MsgBox(ex.Message)
|
||||
MsgBox("ERROR 01: " & ex.Message & vbNewLine & ex.StackTrace)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
|
||||
With exclApp
|
||||
.Visible = False
|
||||
Datei = .Workbooks.Open(Path)
|
||||
Blatt = Datei.Worksheets(1)
|
||||
|
||||
Blatt.Range("A2").Value = EmpfName & " / Finanzamt Graz " & datAuswertVon.Value.ToShortDateString & "-" & datAuswertBis.Value.ToShortDateString
|
||||
'Blatt.Range("A2").Value = dt.Rows(0)("Empfänger") & " / Finanzamt Graz " & datAuswertVon.Value.ToShortDateString & "-" & datAuswertBis.Value.ToShortDateString
|
||||
|
||||
|
||||
|
||||
If Not nodata Then
|
||||
Dim cnt = 8
|
||||
Dim cnt_zeile = 1
|
||||
For Each r In dt.Rows
|
||||
lblCnt2.Text = cnt_zeile & "/" & dt.Rows.Count
|
||||
Dim SPEDBUCH As New VERAG_PROG_ALLGEMEIN.cSpeditionsbuch(r("FilialenNr"), r("AbfertigungsNr"), r("UnterNr"))
|
||||
If SPEDBUCH.hasEntry Then
|
||||
'LRN
|
||||
Dim BezugsNr = If(SPEDBUCH.AtlasBezNrEZA, "")
|
||||
If BezugsNr = "" Then BezugsNr = SPEDBUCH.FilialenNr & "/" & SPEDBUCH.AbfertigungsNr
|
||||
|
||||
'Handelsrechnungen
|
||||
Dim handelsrechnungen = "" : Dim semi = ""
|
||||
|
||||
|
||||
'EUST
|
||||
Dim EUST_Basis As Double = 0
|
||||
Dim EUST_5EV As Double = 0
|
||||
|
||||
Select Case r("FilialenNr")
|
||||
Case "5501"
|
||||
'EUST
|
||||
Dim dtEUST = SQL.loadDgvBySql(" select sum(base) Base,sum(Amnt)Amnt FROM tblTelotec_Anmeldung as TC inner join tblTelotec_PositionsdatenAbgaben as AGB on AGB.telposAbg_telanmId=TC.telanm_id
|
||||
where Ty IN ('5EV') and tc.telanm_BezugsNr LIKE '" & BezugsNr & "' AND telanm_Status between 50 and 60", "FMZOLL")
|
||||
If dtEUST IsNot Nothing AndAlso dtEUST.Rows.Count >= 0 Then
|
||||
If dtEUST(0)("Base") IsNot DBNull.Value Then EUST_Basis = dtEUST(0)("Base")
|
||||
If dtEUST(0)("Amnt") IsNot DBNull.Value Then EUST_5EV = dtEUST(0)("Amnt")
|
||||
End If
|
||||
|
||||
'Handelsrechnungen
|
||||
For Each rg In SQL.DLookupArray("distinct([DocCerts_DRef]) ", "[tblTelotec_PositionsdatenDokumente] As DOC inner join tblTelotec_Anmeldung As ANM ON telanm_id=[telposAbg_telanmId]", " (ANM.Refs_LRN = '" & BezugsNr & "') and [DocCerts_DocCd] IN ('N380','N325')", "FMZOLL", "DocCerts_DRef")
|
||||
handelsrechnungen &= semi & rg : semi = ","
|
||||
Next
|
||||
|
||||
Case Else
|
||||
'EUST
|
||||
Dim dtEUST = SQL.loadDgvBySql("select sum(base) Base,sum(Amnt)Amnt FROM ztIMsgGdsItemDutyCalc as GDS inner join zzAktivitaet as AKT on GDS.OperatorID=AKT.OperatorID AND GDS.LizenzNr=AKT.LizenzNr AND GDS.IMsgID=AKT.IMsgID
|
||||
inner join zsAnmRefs as ANM on ANM.LizenzNr=AKT.LizenzNr And ANM.OperatorID=AKT.OperatorID And ANM.AnmID=AKT.AnmID
|
||||
where Ty IN ('5EV') and LRN LIKE '" & BezugsNr & "' AND ErledigungsTypID LIKE 'F%'", EZOLL_SQLSRV)
|
||||
If dtEUST IsNot Nothing AndAlso dtEUST.Rows.Count >= 0 Then
|
||||
If dtEUST(0)("Base") IsNot DBNull.Value Then EUST_Basis = dtEUST(0)("Base")
|
||||
If dtEUST(0)("Amnt") IsNot DBNull.Value Then EUST_5EV = dtEUST(0)("Amnt")
|
||||
End If
|
||||
|
||||
'Handelsrechnungen
|
||||
Dim dtRg = SQL.DLookupArray("distinct(DRef)", "[zsAnmGdsItemDocCerts] As DOC inner join zsAnmRefs As ANM On ANM.LizenzNr=DOC.LizenzNr And ANM.OperatorID=DOC.OperatorID And ANM.AnmID=DOC.AnmID", "(LRN = '" & BezugsNr & "') and DocCd IN ('N380','N325')", EZOLL_SQLSRV, "DRef")
|
||||
For Each rg In dtRg
|
||||
handelsrechnungen &= semi & rg : semi = ","
|
||||
Next
|
||||
End Select
|
||||
|
||||
|
||||
If SPEDBUCH.ENDEMPFAENGER.Count > 0 Then
|
||||
Dim cnt2 = 0
|
||||
For Each EEMPF In SPEDBUCH.ENDEMPFAENGER
|
||||
|
||||
Blatt.Range("A" & cnt).EntireRow.Copy()
|
||||
Blatt.Range("A" & cnt).EntireRow.Insert(Microsoft.Office.Interop.Excel.XlDirection.xlDown)
|
||||
|
||||
Blatt.Range("A" & cnt).Value = SPEDBUCH.FilialenNr & "/" & SPEDBUCH.AbfertigungsNr
|
||||
Blatt.Range("B" & cnt).Value = SPEDBUCH.Abfertigungsdatum
|
||||
Blatt.Range("C" & cnt).Value = handelsrechnungen
|
||||
|
||||
If cnt2 = 0 Then 'Nur oberste Zeile je Abfertigung
|
||||
Blatt.Range("D" & cnt).Value = EUST_Basis
|
||||
Blatt.Range("E" & cnt).Value = EUST_5EV
|
||||
'Blatt.Range("D" & cnt).Value = EUST_Basis.ToString("0.00")
|
||||
'Blatt.Range("E" & cnt).Value = EUST_5EV.ToString("0.00")
|
||||
'Blatt.Range("D" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
'Blatt.Range("E" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
Else
|
||||
Blatt.Range("D" & cnt).Value = "-"
|
||||
Blatt.Range("E" & cnt).Value = "-"
|
||||
End If
|
||||
|
||||
Blatt.Range("F" & cnt).Value = EEMPF.EndEmpfaenger
|
||||
Blatt.Range("G" & cnt).Value = If(EEMPF.UstIdKz, "") & If(EEMPF.UstIdNr, "")
|
||||
If EEMPF.Rechnungsbetrag IsNot Nothing AndAlso IsNumeric(EEMPF.Rechnungsbetrag) Then
|
||||
Blatt.Range("H" & cnt).Value = CDbl(EEMPF.Rechnungsbetrag)
|
||||
'Blatt.Range("H" & cnt).Value = CDbl(EEMPF.Rechnungsbetrag).ToString("0.00")
|
||||
'Blatt.Range("H" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
End If
|
||||
|
||||
cnt += 1
|
||||
cnt2 += 1
|
||||
'+Zeile
|
||||
Next
|
||||
Else
|
||||
Blatt.Range("A" & cnt).EntireRow.Copy()
|
||||
Blatt.Range("A" & cnt).EntireRow.Insert(Microsoft.Office.Interop.Excel.XlDirection.xlDown)
|
||||
|
||||
Blatt.Range("A" & cnt).Value = SPEDBUCH.FilialenNr & "/" & SPEDBUCH.AbfertigungsNr
|
||||
Blatt.Range("B" & cnt).Value = SPEDBUCH.Abfertigungsdatum
|
||||
|
||||
Blatt.Range("C" & cnt).Value = handelsrechnungen
|
||||
Blatt.Range("D" & cnt).Value = EUST_Basis
|
||||
Blatt.Range("E" & cnt).Value = EUST_5EV
|
||||
'Blatt.Range("D" & cnt).Value = EUST_Basis.ToString("0.00")
|
||||
'Blatt.Range("E" & cnt).Value = EUST_5EV.ToString("0.00")
|
||||
'Blatt.Range("D" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
'Blatt.Range("E" & cnt).Style.NumberFormat = "###,###,##0.00 €"
|
||||
|
||||
cnt += 1
|
||||
'+Zeile
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
cnt_zeile += 1
|
||||
Next
|
||||
End If
|
||||
|
||||
Datei.Save
|
||||
Datei.Close
|
||||
' .Visible = True 'TEST
|
||||
End With
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Private Function AdjustPath(Input As String) As String
|
||||
Return System.Text.RegularExpressions.Regex.Replace(Input, "[\\/:*?""<>|]", String.Empty)
|
||||
End Function
|
||||
Private Sub Nctstr_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboMonat.SelectedIndexChanged, txtJahr.ValueChanged
|
||||
If cboMonat.SelectedIndex <= 0 Then Exit Sub
|
||||
Dim d As Date = CDate("01." & (cboMonat.SelectedIndex) & "." & txtJahr.Text)
|
||||
datAuswertVon.Value = d
|
||||
datAuswertBis.Value = d.AddMonths(1).AddDays(-1)
|
||||
End Sub
|
||||
End Class
|
||||
222
SDL/zoll/usrCntlAuswertungenFiskal_IntrastatMeldung.Designer.vb
generated
Normal file
222
SDL/zoll/usrCntlAuswertungenFiskal_IntrastatMeldung.Designer.vb
generated
Normal file
@@ -0,0 +1,222 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlAuswertungenFiskal_IntrastatMeldung
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.datBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.datVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.CheckBox2 = New System.Windows.Forms.CheckBox()
|
||||
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxDatenAusDakosyLaden = New System.Windows.Forms.CheckBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(197, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "Intrastatmeldung erstellen"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Button4)
|
||||
Me.GroupBox2.Controls.Add(Me.Button3)
|
||||
Me.GroupBox2.Controls.Add(Me.Label9)
|
||||
Me.GroupBox2.Controls.Add(Me.datBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label13)
|
||||
Me.GroupBox2.Controls.Add(Me.datVon)
|
||||
Me.GroupBox2.Controls.Add(Me.CheckBox2)
|
||||
Me.GroupBox2.Controls.Add(Me.CheckBox1)
|
||||
Me.GroupBox2.Controls.Add(Me.cbxDatenAusDakosyLaden)
|
||||
Me.GroupBox2.Controls.Add(Me.Button1)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 164)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button4.Location = New System.Drawing.Point(9, 119)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button4.TabIndex = 35
|
||||
Me.Button4.Text = "Zielordner öffnen"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button3.Location = New System.Drawing.Point(9, 16)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button3.TabIndex = 33
|
||||
Me.Button3.Text = "Vorschau erstellen"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(532, 36)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label9.TabIndex = 31
|
||||
Me.Label9.Text = "bis:"
|
||||
'
|
||||
'datBis
|
||||
'
|
||||
Me.datBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datBis.Location = New System.Drawing.Point(561, 33)
|
||||
Me.datBis.Name = "datBis"
|
||||
Me.datBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datBis.TabIndex = 30
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(399, 36)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label13.TabIndex = 29
|
||||
Me.Label13.Text = "von:"
|
||||
'
|
||||
'datVon
|
||||
'
|
||||
Me.datVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVon.Location = New System.Drawing.Point(433, 33)
|
||||
Me.datVon.Name = "datVon"
|
||||
Me.datVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVon.TabIndex = 28
|
||||
'
|
||||
'CheckBox2
|
||||
'
|
||||
Me.CheckBox2.AutoSize = True
|
||||
Me.CheckBox2.Location = New System.Drawing.Point(148, 84)
|
||||
Me.CheckBox2.Name = "CheckBox2"
|
||||
Me.CheckBox2.Size = New System.Drawing.Size(172, 17)
|
||||
Me.CheckBox2.TabIndex = 27
|
||||
Me.CheckBox2.Text = "Daten aus BLUJAY SBG laden"
|
||||
Me.CheckBox2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'CheckBox1
|
||||
'
|
||||
Me.CheckBox1.AutoSize = True
|
||||
Me.CheckBox1.Location = New System.Drawing.Point(148, 61)
|
||||
Me.CheckBox1.Name = "CheckBox1"
|
||||
Me.CheckBox1.Size = New System.Drawing.Size(172, 17)
|
||||
Me.CheckBox1.TabIndex = 26
|
||||
Me.CheckBox1.Text = "Daten aus BLUJAY SUB laden"
|
||||
Me.CheckBox1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxDatenAusDakosyLaden
|
||||
'
|
||||
Me.cbxDatenAusDakosyLaden.AutoSize = True
|
||||
Me.cbxDatenAusDakosyLaden.Checked = True
|
||||
Me.cbxDatenAusDakosyLaden.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbxDatenAusDakosyLaden.Location = New System.Drawing.Point(148, 38)
|
||||
Me.cbxDatenAusDakosyLaden.Name = "cbxDatenAusDakosyLaden"
|
||||
Me.cbxDatenAusDakosyLaden.Size = New System.Drawing.Size(151, 17)
|
||||
Me.cbxDatenAusDakosyLaden.TabIndex = 25
|
||||
Me.cbxDatenAusDakosyLaden.Text = "Daten aus DAKOSY laden"
|
||||
Me.cbxDatenAusDakosyLaden.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button1.Location = New System.Drawing.Point(9, 59)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button1.TabIndex = 24
|
||||
Me.Button1.Text = "ASCI erstellen"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(145, 131)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(62, 13)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Liefert eine "
|
||||
'
|
||||
'usrCntlAuswertungenFiskal_IntrastatMeldung
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenFiskal_IntrastatMeldung"
|
||||
Me.Size = New System.Drawing.Size(708, 180)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents cbxDatenAusDakosyLaden As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents datBis As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents datVon As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button4 As System.Windows.Forms.Button
|
||||
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenFiskal_IntrastatMeldung.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenFiskal_IntrastatMeldung.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
205
SDL/zoll/usrCntlAuswertungenFiskal_IntrastatMeldung.vb
Normal file
205
SDL/zoll/usrCntlAuswertungenFiskal_IntrastatMeldung.vb
Normal file
@@ -0,0 +1,205 @@
|
||||
Imports System.IO
|
||||
|
||||
Public Class usrCntlAuswertungenFiskal_IntrastatMeldung
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Property rst As Object
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
datVon.Value = CDate("01." & Now.AddMonths(-1).Month & "." & Now.AddMonths(-1).Year)
|
||||
datBis.Value = datVon.Value.AddMonths(1).AddDays(-1)
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
Try
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim dt = getFiskal_Data()
|
||||
|
||||
If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
|
||||
|
||||
If Not System.IO.Directory.Exists("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\") Then System.IO.Directory.CreateDirectory("\\FMZoll.verag.ost.dmn\FMZoll\ZM\")
|
||||
Dim fs As New FileStream("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\KA221.ASC", FileMode.Create)
|
||||
Dim sw As New StreamWriter(fs)
|
||||
|
||||
' File.AppendAllLines(Path.Combine(mydocpath,"WriteFile.txt"), lines);
|
||||
|
||||
' XML-Datei anlegen.
|
||||
' fso = New FileSystemObject
|
||||
' strPath = fso.BuildPath("\\FMZoll.verag.ost.dmn\FMZoll\ZM", "ZM_Formular_online.xml")
|
||||
' txt = fso.CreateTextFile(strPath, True, False)
|
||||
'With txt
|
||||
|
||||
Dim ATC_tmp = ""
|
||||
|
||||
' rst.MoveLast()
|
||||
' Call SysCmd(acSysCmdInitMeter, "Fortschritt: ", rst.RecordCount)
|
||||
'rst.MoveFirst()
|
||||
'intZeile = 0
|
||||
' Schleife zum Lesen der Fiskalvertretungsdaten.
|
||||
Dim zeile_m = 1
|
||||
For Each r As DataRow In dt.Rows
|
||||
' Inc intZeile 'addiert 1
|
||||
' Call SysCmd(acSysCmdUpdateMeter, intZeile)
|
||||
If zeile_m < 1000 Then
|
||||
' Schreiben der Fiskalvertretungsdaten im XML-Format.
|
||||
Dim Outputline = ""
|
||||
Outputline &= "2" ' r("Versendung") 'Versendung
|
||||
Outputline &= "2" ' r("Anmeldeform") 'Anmeldeform
|
||||
Outputline &= " " 'Blank1
|
||||
Outputline &= Format(Month(r("Bezugszeitraum")), "00") 'Anmeldemonat
|
||||
Outputline &= "00" 'Null1
|
||||
Outputline &= CInt(zeile_m).ToString("000000") 'Format(lngZlr, "000000") 'Paginiernummer
|
||||
Outputline &= " " 'Blank2
|
||||
Outputline &= "09" '& r("BundeslandFinanzamt") 'BundeslandFinanzamt
|
||||
Outputline &= "15314120202" 'r("Steuernummer") 'Steuernummer
|
||||
Outputline &= "000" ' r("Unterscheidungsnummer") 'Unterscheidungsnummer
|
||||
Outputline &= " " & r("Bestimmungsland") 'Bestimmungsland
|
||||
Outputline &= "09" ' r("Ursprungsregion") 'Ursprungsregion
|
||||
Outputline &= If(r("Geschäftsart") = "", "99", r("Geschäftsart")) 'Geschäftsart
|
||||
Outputline &= r("Verkehrszweig") 'Verkehrszweig
|
||||
Outputline &= " " 'Blank3
|
||||
Outputline &= " " 'Blank4
|
||||
Outputline &= " " 'Blank5
|
||||
Outputline &= r("Warennummer") 'Warennummer
|
||||
Outputline &= " " 'Blank6
|
||||
Outputline &= " " 'Blank7
|
||||
Outputline &= " " 'Blank8
|
||||
Outputline &= Format(r("Eigenmasse"), "00000000000") 'Eingenmasse
|
||||
Outputline &= IIf(r("BesondereMasseinheit") = 0, " ", Format(r("BesondereMasseinheit"), "00000000000")) 'BesondereMasseinheit
|
||||
Outputline &= " " 'Blank9
|
||||
Outputline &= Format(r("Rechnungsbetrag"), "00000000000") 'Rechnungsbetrag
|
||||
Outputline &= Format(r("StatistischerWert"), "00000000000") 'StatistischerWert
|
||||
Outputline &= " " 'Blank10
|
||||
Outputline &= CDate(r("Bezugszeitraum")).ToString("MM") 'Bezugsmonat
|
||||
Outputline &= CDate(r("Bezugszeitraum")).ToString("yy") 'Bezugsjahr
|
||||
Outputline &= "2" 'Währungskennziffer
|
||||
Outputline &= " " 'Blank11
|
||||
ATC_tmp = r("Registrierkennzeichen")
|
||||
|
||||
|
||||
sw.WriteLine(Outputline)
|
||||
zeile_m += 1
|
||||
End If
|
||||
' DoEvents()
|
||||
' rst.MoveNext()
|
||||
Next
|
||||
'.Close()
|
||||
' End With
|
||||
' txt = Nothing
|
||||
' fso = Nothing
|
||||
' Me!strNachrichtenzeile = "Die XML-Datei finden Sie unter \\FMZoll.verag.ost.dmn\FMZoll\ZM\ZM_Formular_online.xml"
|
||||
|
||||
' rst.Close()
|
||||
' rst = Nothing
|
||||
sw.Close()
|
||||
|
||||
|
||||
If Not Directory.Exists("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\ArchivNEU\") Then Directory.CreateDirectory("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\ArchivNEU\")
|
||||
|
||||
Try
|
||||
File.Copy("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\KA221.ASC", "\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\ArchivNEU\" & Now.ToString("dd.MM.yyyy HH.mm.ss") & " " & datVon.Value.ToShortDateString & " " & datBis.Value.ToShortDateString & " KA221.ASC")
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
|
||||
|
||||
Process.Start("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\")
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Function getFiskal_Data() As DataTable
|
||||
Dim sqlStr = ""
|
||||
|
||||
sqlStr &= " SELECT basman_nr as Mandant, basman_nl as Niederlassung, zbant_beznr as Bezugsnummer, zbpos_posnr as Positionsnummer, zbabg_regkz as Registrierkennzeichen, Bestimmungsland, isnull(zbant_gesart,99) as Geschäftsart, Verkehrszweig, isnull(Warennummer,'00000000') as Warennummer, isnull(zbpos_eigm,'0') as Eigenmasse, zbpos_wmahst as BesondereMasseinheit, CASE WHEN GesamtRechnungspreis>0 THEN CASE WHEN zbpos_posnr=1 THEN GesamtRechnungspreis ELSE 0 END ELSE zbapo_eustwe END AS Rechnungsbetrag, isnull(zbapo_zollw,'0') as StatistischerWert, zbant_dsenda as Bezugszeitraum, zbpos_wabes as Warenbeschreibung,GesamtRechnungspreis "
|
||||
sqlStr &= " FROM ( "
|
||||
|
||||
If CheckBox2.Checked Then
|
||||
|
||||
sqlStr &= " SELECT zbant.basman_nr, zbant.basman_nl, zbant.zbant_beznr, zbpos.zbpos_posnr, zbapo.zbabg_regkz, case WHEN zbadz.baslnd_alpha is not null THEN zbadz.baslnd_alpha ELSE zbaaz.baslnd_alpha END as Bestimmungsland, zbant.zbant_gesart, Right([zbant_bfvkzg],1) AS Verkehrszweig, Left([zbpos_wanr],8) AS Warennummer, zbpos.zbpos_eigm, zbpos.zbpos_wmahst, zbapo.zbapo_eustwe, zbapo.zbapo_zollw, zbant.zbant_dsenda, zbpos.zbpos_wabes,0 as GesamtRechnungspreis "
|
||||
sqlStr &= " FROM [192.168.133.98].[atlas].[dbo].[vwVERAG_Fiskal_zbant] as zbant"
|
||||
sqlStr &= " INNER JOIN [192.168.133.98].atlas.dbo.vwVERAG_Fiskal_zbpos as zbpos ON zbant.[basman_nr]=zbpos.[basman_nr] AND zbant.[basman_nl]=zbpos.[basman_nl] AND zbant.[zbant_beznr]=zbpos.[zbant_beznr] AND zbant.[zbant_regnr]=zbpos.[zbant_regnr] AND zbant.[zbant_korant]=zbpos.[zbant_korant]"
|
||||
sqlStr &= " INNER JOIN [192.168.133.98].atlas.dbo.vwVERAG_Fiskal_zbapo as zbapo ON zbant.[basman_nr]=zbapo.[basman_nr] AND zbant.[basman_nl]=zbapo.[basman_nl] AND zbant.[zbant_beznr]=zbapo.[zbant_beznr] AND zbant.[zbant_regnr]=zbapo.[zbant_regnr] AND zbant.[zbant_korant]=zbapo.[zbant_korant] AND zbpos.zbpos_posnr=zbapo.zbapo_posnr"
|
||||
sqlStr &= " left outer JOIN [192.168.133.98].atlas.dbo.vwVERAG_Fiskal_zbadz as zbadz ON zbant.[basman_nr]=zbadz.[basman_nr] AND zbant.[basman_nl]=zbadz.[basman_nl] AND zbant.[zbant_beznr]=zbadz.[zbant_beznr] AND zbant.[zbant_regnr]=zbadz.[zbant_regnr] AND zbant.[zbant_korant]=zbadz.[zbant_korant]"
|
||||
sqlStr &= " left outer JOIN [192.168.133.98].atlas.dbo.vwVERAG_Fiskal_zbaaz as zbaaz ON zbant.[basman_nr]=zbaaz.[basman_nr] AND zbant.[basman_nl]=zbaaz.[basman_nl] AND zbaaz.zbabg_regkz =zbapo.zbabg_regkz "
|
||||
sqlStr &= " WHERE zbant.zbant_dsenda Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If CheckBox2.Checked And (CheckBox1.Checked Or cbxDatenAusDakosyLaden.Checked) Then sqlStr &= " UNION"
|
||||
|
||||
If CheckBox1.Checked Then
|
||||
|
||||
sqlStr &= " SELECT zbant.basman_nr, zbant.basman_nl, zbant.zbant_beznr, zbpos.zbpos_posnr, zbapo.zbabg_regkz, case WHEN zbadz.baslnd_alpha is not null THEN zbadz.baslnd_alpha ELSE zbaaz.baslnd_alpha END as Bestimmungsland, zbant.zbant_gesart, Right([zbant_bfvkzg],1) AS Verkehrszweig, Left([zbpos_wanr],8) AS Warennummer, zbpos.zbpos_eigm, zbpos.zbpos_wmahst, zbapo.zbapo_eustwe, zbapo.zbapo_zollw, zbant.zbant_dsenda, zbpos.zbpos_wabes,0 as GesamtRechnungspreis "
|
||||
sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].[atlas].[dbo].[vwVERAG_Fiskal_zbant] as zbant"
|
||||
sqlStr &= " INNER JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.vwVERAG_Fiskal_zbpos as zbpos ON zbant.[basman_nr]=zbpos.[basman_nr] AND zbant.[basman_nl]=zbpos.[basman_nl] AND zbant.[zbant_beznr]=zbpos.[zbant_beznr] AND zbant.[zbant_regnr]=zbpos.[zbant_regnr] AND zbant.[zbant_korant]=zbpos.[zbant_korant]"
|
||||
sqlStr &= " INNER JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.vwVERAG_Fiskal_zbapo as zbapo ON zbant.[basman_nr]=zbapo.[basman_nr] AND zbant.[basman_nl]=zbapo.[basman_nl] AND zbant.[zbant_beznr]=zbapo.[zbant_beznr] AND zbant.[zbant_regnr]=zbapo.[zbant_regnr] AND zbant.[zbant_korant]=zbapo.[zbant_korant] AND zbpos.zbpos_posnr=zbapo.zbapo_posnr"
|
||||
sqlStr &= " left outer JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.vwVERAG_Fiskal_zbadz as zbadz ON zbant.[basman_nr]=zbadz.[basman_nr] AND zbant.[basman_nl]=zbadz.[basman_nl] AND zbant.[zbant_beznr]=zbadz.[zbant_beznr] AND zbant.[zbant_regnr]=zbadz.[zbant_regnr] AND zbant.[zbant_korant]=zbadz.[zbant_korant]"
|
||||
sqlStr &= " left outer JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.vwVERAG_Fiskal_zbaaz as zbaaz ON zbant.[basman_nr]=zbaaz.[basman_nr] AND zbant.[basman_nl]=zbaaz.[basman_nl] AND zbaaz.zbabg_regkz =zbapo.zbabg_regkz "
|
||||
sqlStr &= " WHERE zbant.zbant_dsenda Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If (CheckBox2.Checked Or CheckBox1.Checked) And (cbxDatenAusDakosyLaden.Checked) Then sqlStr &= " UNION"
|
||||
|
||||
|
||||
|
||||
If cbxDatenAusDakosyLaden.Checked Then
|
||||
|
||||
sqlStr &= " select replace(eza_firma,'VERAG','VERA') as basman_nr,eza_niederlassung as basman_nl,eza_ObjectName as zbant_beznr,ezaWP_PositionsNummer as zbpos_posnr,replace(eza_ANR,'ATC42','ATC0042') as zbabg_regkz,eza_Bestimmungsland as Bestimmungsland,eza_ArtGeschaeftCode as zbant_gesart,eza_VerkehrszweigGrenze as Verkehrszweig,lefT(ezaWP_WarennummerEZT,8) as Warennummer,ezaWP_Eigenmasse as zbpos_eigm,0 as zbpos_wmahst,0 as zbapo_eustwe,/*ezaWP_Zollwert*/[ezaWP_AHStatWert] as zbapo_zollw, CONVERT( date, (SELECT TOP 1 dySt_ergZeitpunkt FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=eza_dyaAnmID AND [dySt_status] between 60 and 70 order by dySt_ergZeitpunkt DESC) ,104) as zbant_dsenda,ezaWP_Warenbezeichnung as zbpos_wabes,eza_Rechnungspreis as GesamtRechnungspreis"
|
||||
sqlStr &= " from tblDakosy_EZA inner join tblDakosy_EZA_Adressen ON ezaAd_EZAId=eza_Id"
|
||||
sqlStr &= " inner join tblDakosy_EZA_Warenposition on ezaWP_EzaId=eza_Id"
|
||||
' sqlStr &= " WHERE (eza_Trans_DatumZeit) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " WHERE (SELECT COUNT(*) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=eza_dyaAnmID AND [dySt_status] between 60 and 70 AND CONVERT(date, [dySt_ergZeitpunkt] ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' )>0 "
|
||||
sqlStr &= "and ezaAd_AdressTyp='UC' and /*eza_VerfahrenBeantragtCode LIKE '42%' and */ eza_ANR LIKE 'ATC42%' and [eza_UstIdAnmelder]='DE813667748' and ezaAd_UStIDAnmelder is not null and [eza_FinanzamtAnmelder]='9153' "
|
||||
' sqlStr &= " group by eza_Id,eza_firma,eza_niederlassung,eza_ObjectName,eza_ANR,eza_Bestimmungsland,eza_ArtGeschaeftCode,eza_VerkehrszweigGrenze,eza_GesamtRohmasse,eza_Rechnungspreis,eza_Trans_DatumZeit "
|
||||
|
||||
End If
|
||||
|
||||
|
||||
'sqlStr &= " UNION"
|
||||
sqlStr &= " )"
|
||||
sqlStr &= " as Tb"
|
||||
sqlStr &= " ORDER BY Tb.basman_nr, Tb.basman_nl, Tb.zbant_beznr"
|
||||
|
||||
' sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
'sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag"
|
||||
' sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbant"
|
||||
' sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
'sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
'sqlStr &= " AND [zbant_erwust] <>''"
|
||||
|
||||
Return SQL.loadDgvBySql(sqlStr, "FMZOLL", 600)
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
|
||||
|
||||
cProgramFunctions.genExcelFromDT_NEW(getFiskal_Data)
|
||||
|
||||
Exit Sub
|
||||
Dim f As New frmTableVorschau
|
||||
f.MyDatagridview1.DataSource = getFiskal_Data()
|
||||
f.Show(Me)
|
||||
End Sub
|
||||
|
||||
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
|
||||
Process.Start("\\FMZoll.verag.ost.dmn\FMZoll\Intrastat\")
|
||||
End Sub
|
||||
End Class
|
||||
275
SDL/zoll/usrCntlAuswertungenFiskalvertretung_4200.Designer.vb
generated
Normal file
275
SDL/zoll/usrCntlAuswertungenFiskalvertretung_4200.Designer.vb
generated
Normal file
@@ -0,0 +1,275 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlAuswertungenFiskalvertretung_4200
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.datBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.datVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.CheckBox2 = New System.Windows.Forms.CheckBox()
|
||||
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
|
||||
Me.cbxDatenAusDakosyLaden = New System.Windows.Forms.CheckBox()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.cboUID = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.lblErrUID = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(125, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "Fiskalvertretung"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.lblErrUID)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.cboUID)
|
||||
Me.GroupBox2.Controls.Add(Me.Button4)
|
||||
Me.GroupBox2.Controls.Add(Me.Button3)
|
||||
Me.GroupBox2.Controls.Add(Me.Button2)
|
||||
Me.GroupBox2.Controls.Add(Me.Label9)
|
||||
Me.GroupBox2.Controls.Add(Me.datBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label13)
|
||||
Me.GroupBox2.Controls.Add(Me.datVon)
|
||||
Me.GroupBox2.Controls.Add(Me.CheckBox2)
|
||||
Me.GroupBox2.Controls.Add(Me.CheckBox1)
|
||||
Me.GroupBox2.Controls.Add(Me.cbxDatenAusDakosyLaden)
|
||||
Me.GroupBox2.Controls.Add(Me.Button1)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 216)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button4.Location = New System.Drawing.Point(9, 173)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button4.TabIndex = 34
|
||||
Me.Button4.Text = "Zielordner öffnen"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button3.Location = New System.Drawing.Point(9, 16)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button3.TabIndex = 33
|
||||
Me.Button3.Text = "Vorschau erstellen"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button2.Location = New System.Drawing.Point(9, 59)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button2.TabIndex = 32
|
||||
Me.Button2.Text = "CSV erstellen"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(532, 36)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label9.TabIndex = 31
|
||||
Me.Label9.Text = "bis:"
|
||||
'
|
||||
'datBis
|
||||
'
|
||||
Me.datBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datBis.Location = New System.Drawing.Point(561, 33)
|
||||
Me.datBis.Name = "datBis"
|
||||
Me.datBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datBis.TabIndex = 30
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(399, 36)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label13.TabIndex = 29
|
||||
Me.Label13.Text = "von:"
|
||||
'
|
||||
'datVon
|
||||
'
|
||||
Me.datVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVon.Location = New System.Drawing.Point(433, 33)
|
||||
Me.datVon.Name = "datVon"
|
||||
Me.datVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVon.TabIndex = 28
|
||||
'
|
||||
'CheckBox2
|
||||
'
|
||||
Me.CheckBox2.AutoSize = True
|
||||
Me.CheckBox2.Location = New System.Drawing.Point(148, 84)
|
||||
Me.CheckBox2.Name = "CheckBox2"
|
||||
Me.CheckBox2.Size = New System.Drawing.Size(172, 17)
|
||||
Me.CheckBox2.TabIndex = 27
|
||||
Me.CheckBox2.Text = "Daten aus BLUJAY SBG laden"
|
||||
Me.CheckBox2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'CheckBox1
|
||||
'
|
||||
Me.CheckBox1.AutoSize = True
|
||||
Me.CheckBox1.Location = New System.Drawing.Point(148, 61)
|
||||
Me.CheckBox1.Name = "CheckBox1"
|
||||
Me.CheckBox1.Size = New System.Drawing.Size(172, 17)
|
||||
Me.CheckBox1.TabIndex = 26
|
||||
Me.CheckBox1.Text = "Daten aus BLUJAY SUB laden"
|
||||
Me.CheckBox1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbxDatenAusDakosyLaden
|
||||
'
|
||||
Me.cbxDatenAusDakosyLaden.AutoSize = True
|
||||
Me.cbxDatenAusDakosyLaden.Checked = True
|
||||
Me.cbxDatenAusDakosyLaden.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbxDatenAusDakosyLaden.Location = New System.Drawing.Point(148, 38)
|
||||
Me.cbxDatenAusDakosyLaden.Name = "cbxDatenAusDakosyLaden"
|
||||
Me.cbxDatenAusDakosyLaden.Size = New System.Drawing.Size(151, 17)
|
||||
Me.cbxDatenAusDakosyLaden.TabIndex = 25
|
||||
Me.cbxDatenAusDakosyLaden.Text = "Daten aus DAKOSY laden"
|
||||
Me.cbxDatenAusDakosyLaden.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Button1.Location = New System.Drawing.Point(9, 102)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(121, 37)
|
||||
Me.Button1.TabIndex = 24
|
||||
Me.Button1.Text = "XML erstellen"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(145, 144)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(62, 13)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Liefert eine "
|
||||
'
|
||||
'cboUID
|
||||
'
|
||||
Me.cboUID._allowedValuesFreiText = Nothing
|
||||
Me.cboUID._allowFreiText = False
|
||||
Me.cboUID._value = ""
|
||||
Me.cboUID.FormattingEnabled = True
|
||||
Me.cboUID.Location = New System.Drawing.Point(433, 61)
|
||||
Me.cboUID.Name = "cboUID"
|
||||
Me.cboUID.Size = New System.Drawing.Size(221, 21)
|
||||
Me.cboUID.TabIndex = 35
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(399, 65)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(29, 13)
|
||||
Me.Label1.TabIndex = 36
|
||||
Me.Label1.Text = "UID:"
|
||||
'
|
||||
'lblErrUID
|
||||
'
|
||||
Me.lblErrUID.AutoSize = True
|
||||
Me.lblErrUID.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErrUID.Location = New System.Drawing.Point(510, 85)
|
||||
Me.lblErrUID.Name = "lblErrUID"
|
||||
Me.lblErrUID.Size = New System.Drawing.Size(144, 13)
|
||||
Me.lblErrUID.TabIndex = 37
|
||||
Me.lblErrUID.Text = "UID Fiskalvertretung wählen!"
|
||||
Me.lblErrUID.Visible = False
|
||||
'
|
||||
'usrCntlAuswertungenFiskalvertretung_4200
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenFiskalvertretung_4200"
|
||||
Me.Size = New System.Drawing.Size(708, 234)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents CheckBox2 As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents cbxDatenAusDakosyLaden As System.Windows.Forms.CheckBox
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents datBis As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents datVon As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Button3 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button4 As System.Windows.Forms.Button
|
||||
Friend WithEvents lblErrUID As Label
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents cboUID As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenFiskalvertretung_4200.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenFiskalvertretung_4200.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
579
SDL/zoll/usrCntlAuswertungenFiskalvertretung_4200.vb
Normal file
579
SDL/zoll/usrCntlAuswertungenFiskalvertretung_4200.vb
Normal file
@@ -0,0 +1,579 @@
|
||||
Imports System.IO
|
||||
Imports System.Globalization
|
||||
|
||||
Public Class usrCntlAuswertungenFiskalvertretung_4200
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Property rst As Object
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
datVon.Value = CDate("01." & Now.AddMonths(-3).Month & "." & Now.AddMonths(-1).Year)
|
||||
datBis.Value = datVon.Value.AddMonths(3).AddDays(-1)
|
||||
|
||||
cboUID.Items.Clear()
|
||||
cboUID.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("DE813667748 - VERAG Spedition GmbH", "DE813667748"))
|
||||
cboUID.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("DE295575575 - Global-Logistics GmbH", "DE295575575"))
|
||||
End Sub
|
||||
|
||||
Function getDir() As String
|
||||
Select Case cboUID._value
|
||||
Case "DE813667748"
|
||||
Return "\\FMZoll.verag.ost.dmn\FMZoll\ZM\"
|
||||
Case "DE295575575"
|
||||
Return "\\192.168.1.20\Daten\ZM\"
|
||||
Case Else
|
||||
Return ""
|
||||
End Select
|
||||
End Function
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
Try
|
||||
|
||||
lblErrUID.Visible = False
|
||||
If cboUID._value = "" Then
|
||||
lblErrUID.Visible = True
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim dt = getZM_Datat()
|
||||
|
||||
If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
|
||||
|
||||
If Not Directory.Exists(getDir) Then Directory.CreateDirectory(getDir)
|
||||
Dim fs As New FileStream(getDir() & "\ZM_Formular_online.xml", FileMode.Create)
|
||||
Dim sw As New StreamWriter(fs)
|
||||
|
||||
' File.AppendAllLines(Path.Combine(mydocpath,"WriteFile.txt"), lines);
|
||||
|
||||
' XML-Datei anlegen.
|
||||
' fso = New FileSystemObject
|
||||
' strPath = fso.BuildPath("\\FMZoll.verag.ost.dmn\FMZoll\ZM", "ZM_Formular_online.xml")
|
||||
' txt = fso.CreateTextFile(strPath, True, False)
|
||||
'With txt
|
||||
sw.WriteLine("<?xml version=""1.0"" encoding=""UTF-8"" ?>")
|
||||
sw.WriteLine("<xml-data xmlns=""http://www.lucom.com/ffw/xml-data-1.0.xsd"">")
|
||||
sw.WriteLine("<form>catalog://A-Z/ust/ZM_Formular_online</form>")
|
||||
sw.WriteLine("<instance>")
|
||||
sw.WriteLine("<datarow>")
|
||||
sw.WriteLine("<element id=""ID_USER"">.anonymous</element>")
|
||||
sw.WriteLine("<element id=""berichtigung"">false</element>")
|
||||
sw.WriteLine("<element id=""knri1"">DE</element>")
|
||||
sw.WriteLine("<element id=""ffw_version"">ZM_Formular_online V2.0</element>")
|
||||
sw.WriteLine("</datarow>")
|
||||
sw.WriteLine("<dataset id=""tbl_ZM_tabelle"">")
|
||||
' rst.MoveLast()
|
||||
' Call SysCmd(acSysCmdInitMeter, "Fortschritt: ", rst.RecordCount)
|
||||
'rst.MoveFirst()
|
||||
'intZeile = 0
|
||||
' Schleife zum Lesen der Fiskalvertretungsdaten.
|
||||
Dim zeile_m = 1
|
||||
For Each r As DataRow In dt.Rows
|
||||
' Inc intZeile 'addiert 1
|
||||
' Call SysCmd(acSysCmdUpdateMeter, intZeile)
|
||||
If zeile_m < 1000 Then
|
||||
' Schreiben der Fiskalvertretungsdaten im XML-Format.
|
||||
sw.WriteLine("<datarow>")
|
||||
sw.WriteLine("<element id=""knre1"">" & r("knre1") & "</element>")
|
||||
sw.WriteLine("<element id=""knre2"">" & r("knre2").trim & "</element>")
|
||||
sw.WriteLine("<element id=""betrag"">" & r("Betrag") & "</element>")
|
||||
sw.WriteLine("<element id=""zeile_m"">" & zeile_m & "</element>")
|
||||
sw.WriteLine("<element id=""umsatz_art"">0</element>") '" & r("umsatz_art") & "</element>")
|
||||
sw.WriteLine("</datarow>")
|
||||
zeile_m += 1
|
||||
End If
|
||||
' DoEvents()
|
||||
' rst.MoveNext()
|
||||
Next
|
||||
sw.WriteLine("</dataset>")
|
||||
sw.WriteLine("</instance>")
|
||||
sw.WriteLine("</xml-data>")
|
||||
'.Close()
|
||||
' End With
|
||||
' txt = Nothing
|
||||
' fso = Nothing
|
||||
' Me!strNachrichtenzeile = "Die XML-Datei finden Sie unter \\FMZoll.verag.ost.dmn\FMZoll\ZM\ZM_Formular_online.xml"
|
||||
|
||||
' rst.Close()
|
||||
' rst = Nothing
|
||||
sw.Close()
|
||||
|
||||
'Process.Start("\\FMZoll.verag.ost.dmn\FMZoll\ZM\ZM_Formular_online_TEST.xml")
|
||||
|
||||
Process.Start(getDir())
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
|
||||
Function getZM_Datat() As DataTable
|
||||
Dim sqlStr = ""
|
||||
|
||||
sqlStr &= " SELECT Tb.knre1, Tb.knre2, cast(round(sum(Tb.betrag),0)as int) as betrag FROM ("
|
||||
|
||||
If CheckBox2.Checked Then
|
||||
|
||||
sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag,zbant.zbant_regnr" ' ,zbant.zbant_regnr --> sonst streicht "UNION" geliche beträge
|
||||
sqlStr &= " FROM [192.168.133.98].atlas.dbo.zbant "
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
|
||||
sqlStr &= " UNION"
|
||||
|
||||
sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag,zbhant.zbant_regnr" ' ,zbant.zbant_regnr --> sonst streicht "UNION" geliche beträge
|
||||
sqlStr &= " FROM [192.168.133.98].atlas.dbo.zbhant "
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
End If
|
||||
|
||||
|
||||
If CheckBox2.Checked And (CheckBox1.Checked Or cbxDatenAusDakosyLaden.Checked) Then sqlStr &= " UNION"
|
||||
|
||||
If CheckBox1.Checked Then
|
||||
sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag,zbant.zbant_regnr" ' ,zbant.zbant_regnr --> sonst streicht "UNION" geliche beträge
|
||||
sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbant"
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
|
||||
sqlStr &= " UNION"
|
||||
|
||||
sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag,zbhant.zbant_regnr" ' ,zbant.zbant_regnr --> sonst streicht "UNION" geliche beträge
|
||||
sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbhant"
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
End If
|
||||
|
||||
If (CheckBox2.Checked Or CheckBox1.Checked) And (cbxDatenAusDakosyLaden.Checked) Then sqlStr &= " UNION"
|
||||
|
||||
|
||||
If cbxDatenAusDakosyLaden.Checked Then
|
||||
|
||||
sqlStr &= " select Left(ezaAd_UStIDAnmelder,2) AS knre1, substring(ezaAd_UStIDAnmelder,3,len(ezaAd_UStIDAnmelder)) AS knre2 ,eza_Rechnungspreis as betrag ,eza_ANR"
|
||||
sqlStr &= " from tblDakosy_EZA inner join tblDakosy_EZA_Adressen ON ezaAd_EZAId=eza_Id"
|
||||
' sqlStr &= " WHERE (eza_Trans_DatumZeit) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " WHERE (SELECT COUNT(*) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=eza_dyaAnmID AND [dySt_status] between 40 and 70 AND CONVERT(date, [dySt_ergZeitpunkt] ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' )>0 "
|
||||
sqlStr &= " and ezaAd_AdressTyp='UC' and eza_ANR LIKE 'ATC42%' /*eza_VerfahrenBeantragtCode LIKE '42%'*/ and [eza_UstIdAnmelder]='" & cboUID._value & "' and ezaAd_UStIDAnmelder is not null and [eza_FinanzamtAnmelder]='9153' "
|
||||
sqlStr &= " AND [eza_Status] IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1) "
|
||||
End If
|
||||
|
||||
sqlStr &= " )"
|
||||
sqlStr &= " as Tb"
|
||||
sqlStr &= " GROUP BY Tb.knre1, Tb.knre2"
|
||||
sqlStr &= " ORDER BY Tb.knre1, Tb.knre2"
|
||||
|
||||
'sqlStr &= " UNION"
|
||||
|
||||
' sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
'sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag"
|
||||
' sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbant"
|
||||
' sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
'sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
'sqlStr &= " AND [zbant_erwust] <>''"
|
||||
Return SQL.loadDgvBySql(sqlStr, "FMZOLL", 600)
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
Function getZM_DataVorschau() As DataTable
|
||||
Dim sqlStr = ""
|
||||
|
||||
sqlStr &= " select basman_nl, zbant_beznr, zbant_regnr, zbant_erwust, zbant_nadat,zbaaz_name1, baslnd_alpha, zbant_preisr, zbant_waehr, zbant_kurs, "
|
||||
sqlStr &= " curEuro, eustwe, zollw FROM "
|
||||
sqlStr &= " ("
|
||||
|
||||
If CheckBox1.Checked Then
|
||||
|
||||
sqlStr &= " ("
|
||||
sqlStr &= " SELECT zbant.basman_nl, zbant.zbant_beznr, zbant.zbant_regnr, zbant.zbant_erwust, zbant.zbant_nadat, zbaaz.[zbaaz_name1], zbaaz.baslnd_alpha, zbant.zbant_preisr, zbant.zbant_waehr, zbant.zbant_kurs, "
|
||||
sqlStr &= " CASE WHEN [zbant].[zbant_kurs]=0 THEN [zbant].[zbant_preisr] ELSE cast((([zbant].[zbant_preisr]/[zbant].[zbant_kurs])*100)/100 as decimal(17,2)) END AS curEuro"
|
||||
sqlStr &= " ,Sum(zbapo.zbapo_eustwe) AS eustwe, Sum(zbapo.zbapo_zollw) AS zollw"
|
||||
sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbant "
|
||||
sqlStr &= " left JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbaaz"
|
||||
sqlStr &= " ON zbant.[basman_nr] = zbaaz.[basman_nr] "
|
||||
sqlStr &= " AND zbant.[basman_nl] = zbaaz.[basman_nl]"
|
||||
sqlStr &= " AND zbaaz.zbabg_regkz = REPLACE(zbant.zbant_regnr,'ATC42','ATC0042')"
|
||||
sqlStr &= " AND zbaaz.[zbaaz_typ] = 1 "
|
||||
sqlStr &= " INNER JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbapo "
|
||||
sqlStr &= " ON zbant.[basman_nr] = zbapo.[basman_nr] "
|
||||
sqlStr &= " AND zbant.[basman_nl] = zbapo.[basman_nl]"
|
||||
sqlStr &= " AND zbant.[zbant_beznr] = zbapo.[zbant_beznr]"
|
||||
sqlStr &= " AND zbant.[zbant_regnr] = zbapo.[zbant_regnr]"
|
||||
sqlStr &= " AND zbant.[zbant_korant] = zbapo.[zbant_korant]"
|
||||
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
sqlStr &= " GROUP BY zbant.basman_nl, zbant.zbant_beznr, zbant.zbant_regnr, zbant.zbant_erwust, zbant.zbant_nadat, zbaaz.[zbaaz_name1], zbaaz.baslnd_alpha, zbant.zbant_preisr, zbant.zbant_waehr, zbant.zbant_kurs"
|
||||
sqlStr &= " ) "
|
||||
|
||||
|
||||
sqlStr &= " UNION"
|
||||
|
||||
sqlStr &= " ("
|
||||
sqlStr &= " SELECT zbhant.basman_nl, zbhant.zbant_beznr, zbhant.zbant_regnr, zbhant.zbant_erwust, zbhant.zbant_nadat, zbhaaz.[zbaaz_name1], zbhaaz.baslnd_alpha, zbhant.zbant_preisr, zbhant.zbant_waehr, zbhant.zbant_kurs, "
|
||||
sqlStr &= " CASE WHEN [zbhant].[zbant_kurs]=0 THEN [zbhant].[zbant_preisr] ELSE cast((([zbhant].[zbant_preisr]/[zbhant].[zbant_kurs])*100)/100 as decimal(17,2)) END AS curEuro"
|
||||
sqlStr &= " ,Sum(zbhapo.zbapo_eustwe) AS eustwe, Sum(zbhapo.zbapo_zollw) AS zollw"
|
||||
sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbhant "
|
||||
sqlStr &= " left JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbhaaz"
|
||||
sqlStr &= " ON zbhant.[basman_nr] = zbhaaz.[basman_nr] "
|
||||
sqlStr &= " AND zbhant.[basman_nl] = zbhaaz.[basman_nl]"
|
||||
sqlStr &= " AND zbhaaz.zbabg_regkz = REPLACE(zbhant.zbant_regnr,'ATC42','ATC0042')"
|
||||
sqlStr &= " AND zbhaaz.[zbaaz_typ] = 1 "
|
||||
sqlStr &= " INNER JOIN [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbhapo "
|
||||
sqlStr &= " ON zbhant.[basman_nr] = zbhapo.[basman_nr] "
|
||||
sqlStr &= " AND zbhant.[basman_nl] = zbhapo.[basman_nl]"
|
||||
sqlStr &= " AND zbhant.[zbant_beznr] = zbhapo.[zbant_beznr]"
|
||||
sqlStr &= " AND zbhant.[zbant_regnr] = zbhapo.[zbant_regnr]"
|
||||
sqlStr &= " AND zbhant.[zbant_korant] = zbhapo.[zbant_korant]"
|
||||
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
sqlStr &= " GROUP BY zbhant.basman_nl, zbhant.zbant_beznr, zbhant.zbant_regnr, zbhant.zbant_erwust, zbhant.zbant_nadat, zbhaaz.[zbaaz_name1], zbhaaz.baslnd_alpha, zbhant.zbant_preisr, zbhant.zbant_waehr, zbhant.zbant_kurs"
|
||||
sqlStr &= " ) "
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If (CheckBox2.Checked Or cbxDatenAusDakosyLaden.Checked) And CheckBox1.Checked Then sqlStr &= " UNION"
|
||||
|
||||
If CheckBox2.Checked Then
|
||||
|
||||
sqlStr &= " ("
|
||||
sqlStr &= " SELECT zbant.basman_nl, zbant.zbant_beznr, zbant.zbant_regnr, zbant.zbant_erwust, zbant.zbant_nadat, zbaaz.[zbaaz_name1], zbaaz.baslnd_alpha, zbant.zbant_preisr, zbant.zbant_waehr, zbant.zbant_kurs, "
|
||||
sqlStr &= " CASE WHEN [zbant].[zbant_kurs]=0 THEN [zbant].[zbant_preisr] ELSE cast((([zbant].[zbant_preisr]/[zbant].[zbant_kurs])*100)/100 as decimal(17,2)) END AS curEuro"
|
||||
|
||||
sqlStr &= " ,Sum(zbapo.zbapo_eustwe) AS eustwe, Sum(zbapo.zbapo_zollw) AS zollw"
|
||||
sqlStr &= " FROM [192.168.133.98].atlas.dbo.zbant "
|
||||
sqlStr &= " left JOIN [192.168.133.98].atlas.dbo.zbaaz"
|
||||
sqlStr &= " ON zbant.[basman_nr] = zbaaz.[basman_nr] "
|
||||
sqlStr &= " AND zbant.[basman_nl] = zbaaz.[basman_nl]"
|
||||
sqlStr &= " AND zbaaz.zbabg_regkz = REPLACE(zbant.zbant_regnr,'ATC42','ATC0042')"
|
||||
sqlStr &= " AND zbaaz.[zbaaz_typ] = 1 "
|
||||
sqlStr &= " INNER JOIN [192.168.133.98].atlas.dbo.zbapo "
|
||||
sqlStr &= " ON zbant.[basman_nr] = zbapo.[basman_nr] "
|
||||
sqlStr &= " AND zbant.[basman_nl] = zbapo.[basman_nl]"
|
||||
sqlStr &= " AND zbant.[zbant_beznr] = zbapo.[zbant_beznr]"
|
||||
sqlStr &= " AND zbant.[zbant_regnr] = zbapo.[zbant_regnr]"
|
||||
sqlStr &= " AND zbant.[zbant_korant] = zbapo.[zbant_korant]"
|
||||
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
sqlStr &= " GROUP BY zbant.basman_nl, zbant.zbant_beznr, zbant.zbant_regnr, zbant.zbant_erwust, zbant.zbant_nadat,zbaaz.[zbaaz_name1], zbaaz.baslnd_alpha, zbant.zbant_preisr, zbant.zbant_waehr, zbant.zbant_kurs"
|
||||
sqlStr &= " )"
|
||||
|
||||
sqlStr &= " UNION"
|
||||
|
||||
sqlStr &= " ("
|
||||
sqlStr &= " SELECT zbhant.basman_nl, zbhant.zbant_beznr, zbhant.zbant_regnr, zbhant.zbant_erwust, zbhant.zbant_nadat, zbhaaz.[zbaaz_name1], zbhaaz.baslnd_alpha, zbhant.zbant_preisr, zbhant.zbant_waehr, zbhant.zbant_kurs, "
|
||||
sqlStr &= " CASE WHEN [zbhant].[zbant_kurs]=0 THEN [zbhant].[zbant_preisr] ELSE cast((([zbhant].[zbant_preisr]/[zbhant].[zbant_kurs])*100)/100 as decimal(17,2)) END AS curEuro"
|
||||
sqlStr &= " ,Sum(zbhapo.zbapo_eustwe) AS eustwe, Sum(zbhapo.zbapo_zollw) AS zollw"
|
||||
sqlStr &= " FROM [192.168.133.98].atlas.dbo.zbhant "
|
||||
sqlStr &= " left JOIN [192.168.133.98].atlas.dbo.zbhaaz"
|
||||
sqlStr &= " ON zbhant.[basman_nr] = zbhaaz.[basman_nr] "
|
||||
sqlStr &= " AND zbhant.[basman_nl] = zbhaaz.[basman_nl]"
|
||||
sqlStr &= " AND zbhaaz.zbabg_regkz = REPLACE(zbhant.zbant_regnr,'ATC42','ATC0042')"
|
||||
sqlStr &= " AND zbhaaz.[zbaaz_typ] = 1 "
|
||||
sqlStr &= " INNER JOIN [192.168.133.98].atlas.dbo.zbhapo "
|
||||
sqlStr &= " ON zbhant.[basman_nr] = zbhapo.[basman_nr] "
|
||||
sqlStr &= " AND zbhant.[basman_nl] = zbhapo.[basman_nl]"
|
||||
sqlStr &= " AND zbhant.[zbant_beznr] = zbhapo.[zbant_beznr]"
|
||||
sqlStr &= " AND zbhant.[zbant_regnr] = zbhapo.[zbant_regnr]"
|
||||
sqlStr &= " AND zbhant.[zbant_korant] = zbhapo.[zbant_korant]"
|
||||
|
||||
sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
sqlStr &= " AND [zbant_erwust] <>''"
|
||||
sqlStr &= " AND [zbant_anmust] = '" & cboUID._value & "' "
|
||||
sqlStr &= " GROUP BY zbhant.basman_nl, zbhant.zbant_beznr, zbhant.zbant_regnr, zbhant.zbant_erwust, zbhant.zbant_nadat, zbhaaz.[zbaaz_name1], zbhaaz.baslnd_alpha, zbhant.zbant_preisr, zbhant.zbant_waehr, zbhant.zbant_kurs"
|
||||
sqlStr &= " ) "
|
||||
End If
|
||||
|
||||
|
||||
|
||||
If (CheckBox2.Checked Or CheckBox1.Checked) And (cbxDatenAusDakosyLaden.Checked) Then sqlStr &= " UNION"
|
||||
|
||||
If cbxDatenAusDakosyLaden.Checked Then
|
||||
|
||||
sqlStr &= " select eza_niederlassung as basman_nl, eza_ObjectName as zbant_beznr,eza_ANR as zbant_regnr, ezaAd_UStIDAnmelder as zbant_erwust,eza_Trans_DatumZeit as zbant_nadat,"
|
||||
sqlStr &= " (CASE WHEN ezaAd_NameFirma1 is null THEN (SELECT TOP 1 [Name 1] FROM Kunden INNER JOIN Adressen on Adressennr=kundennr WHERE EORITIN=ezaAd_TeilnehmerEORI) ELSE ezaAd_NameFirma1 END) as zbaaz_name1,"
|
||||
sqlStr &= " (CASE WHEN ezaAd_LandCode is null THEN (SELECT TOP 1 (SELECT TOP 1 isnull([Länderverzeichnis für die Außenhandelsstatistik].LandKz,'') AS LandKzISO2 FROM [Länderverzeichnis für die Außenhandelsstatistik] LEFT JOIN Währungstabelle ON [Länderverzeichnis für die Außenhandelsstatistik].LandNr = Währungstabelle.Währungsschlüssel WHERE Währungstabelle.LandKz=Adressen.LandKz) FROM Kunden INNER JOIN Adressen on Adressennr=kundennr WHERE EORITIN=ezaAd_TeilnehmerEORI) ELSE ezaAd_LandCode END) as baslnd_alpha,"
|
||||
sqlStr &= " eza_Rechnungspreis as zbant_preisr,eza_Rechnungswaehrung as zbant_waehr "
|
||||
sqlStr &= " ,0 as zbant_kurs,eza_Rechnungspreis as curEuro,0 as eustwe,0 as zollw"
|
||||
sqlStr &= " from tblDakosy_EZA inner join tblDakosy_EZA_Adressen ON ezaAd_EZAId=eza_Id"
|
||||
' sqlStr &= " WHERE (eza_Trans_DatumZeit) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlStr &= " WHERE (SELECT COUNT(*) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=eza_dyaAnmID AND [dySt_status] between 40 and 70 AND CONVERT(date, [dySt_ergZeitpunkt] ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' )>0 "
|
||||
sqlStr &= " and ezaAd_AdressTyp='UC' and eza_ANR LIKE 'ATC42%' /*eza_VerfahrenBeantragtCode LIKE '42%'*/ and [eza_UstIdAnmelder]='" & cboUID._value & "' and ezaAd_UStIDAnmelder is not null and [eza_FinanzamtAnmelder]='9153' "
|
||||
sqlStr &= " AND [eza_Status] IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1) "
|
||||
|
||||
' sqlStr &= " select Left(ezaAd_UStIDAnmelder,2) AS knre1, substring(ezaAd_UStIDAnmelder,3,len(ezaAd_UStIDAnmelder)) AS knre2 ,eza_Rechnungspreis as betrag"
|
||||
' sqlStr &= " from tblDakosy_EZA inner join tblDakosy_EZA_Adressen ON ezaAd_EZAId=eza_Id"
|
||||
' sqlStr &= " WHERE (eza_Trans_DatumZeit) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
'sqlStr &= " and ezaAd_AdressTyp='DT' and eza_VerfahrenBeantragtCode=42 and eza_FiskalvertretungKz=1 /*AND ezaAd_UStIDAnmelder='" & cboUID._value & "'*/ and ezaAd_UStIDAnmelder is not null"
|
||||
End If
|
||||
|
||||
|
||||
|
||||
sqlStr &= " ) as Tb"
|
||||
sqlStr &= " order by zbant_erwust"
|
||||
|
||||
|
||||
|
||||
'sqlStr &= " UNION"
|
||||
|
||||
' sqlStr &= " SELECT Left([zbant_erwust],2) AS knre1, substring([zbant_erwust],3,len([zbant_erwust])) AS knre2"
|
||||
'sqlStr &= " ,(CASE WHEN [zbant_kurs]=0 THEN [zbant_preisr] ELSE (([zbant_preisr]/[zbant_kurs])*100)/100 END) as betrag"
|
||||
' sqlStr &= " FROM [VERAG-ATLAS1\SQLATLAS].atlas.dbo.zbant"
|
||||
' sqlStr &= " WHERE (zbant_nadat) Between '" & datVon.Value.ToShortDateString & "' And '" & datBis.Value.ToShortDateString & "' "
|
||||
'sqlStr &= " AND zbant_stat IN(SELECT [zbant_stat] FROM [atlas_status] where fiskal_freigabe=1)"
|
||||
'sqlStr &= " AND [zbant_erwust] <>''"
|
||||
Return SQL.loadDgvBySql(sqlStr, "FMZOLL", 600)
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
Try
|
||||
|
||||
|
||||
lblErrUID.Visible = False
|
||||
If cboUID._value = "" Then
|
||||
lblErrUID.Visible = True
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
|
||||
Dim dt = getZM_Datat()
|
||||
|
||||
If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
|
||||
|
||||
If Not System.IO.Directory.Exists(getDir()) Then System.IO.Directory.CreateDirectory(getDir())
|
||||
Dim fs As New FileStream(getDir() & "\ZM_Formular_online.csv", FileMode.Create)
|
||||
Dim sw As New StreamWriter(fs)
|
||||
|
||||
|
||||
sw.WriteLine("#v1.1")
|
||||
sw.WriteLine("Laenderkennzeichen;USt-IdNr.;Betrag(EUR); Art der Leistung")
|
||||
|
||||
Dim umsatz_art = 0
|
||||
Dim zeile_m = 1
|
||||
For Each r As DataRow In dt.Rows
|
||||
' If zeile_m < 1000 Then
|
||||
sw.WriteLine(r("knre1") & ";" & r("knre2").trim & ";" & r("Betrag") & ";" & IIf(umsatz_art = 0, "L", IIf(umsatz_art = 1, "S", IIf(umsatz_art = 2, "D", "?"))))
|
||||
zeile_m += 1
|
||||
' End If
|
||||
Next
|
||||
sw.Close()
|
||||
fs.Close()
|
||||
Process.Start(getDir() & "\ZM_Formular_online.csv")
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
|
||||
|
||||
Dim displayFilter = False
|
||||
|
||||
lblErrUID.Visible = False
|
||||
If cboUID._value = "" Then
|
||||
lblErrUID.Visible = True
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim print As New frmPrintLayout
|
||||
print.Text = "Fiskalvertretung"
|
||||
|
||||
Dim rpt As New rptFiskalvertretungVorschau
|
||||
|
||||
rpt.DataSource = getZM_DataVorschau()
|
||||
|
||||
'Filter anzeigen
|
||||
' If displayFilter Then
|
||||
' rpt.lblFilterTxt.Visible = displayFilter
|
||||
'rpt.txtFilter.Visible = displayFilter
|
||||
'rpt.txtFilter.Text = SQL.getStringReplaceScalarVar(getSpedBuchWhere, getSpedbuchList)
|
||||
'Else
|
||||
'If txtUeberschr.Text <> "" Then
|
||||
' rpt.txtFilter.Text = txtUeberschr.Text
|
||||
'rpt.txtFilter.Visible = True
|
||||
'rpt.lblFilterTxt.Visible = True
|
||||
'rpt.lblFilterTxt.Text = "Beschreibung:"
|
||||
'End If
|
||||
'End If
|
||||
|
||||
|
||||
|
||||
rpt.GroupHeader1.DataField = "baslnd_alpha" 'Gruppierung
|
||||
|
||||
rpt.GroupHeader2.DataField = "zbant_erwust" 'Gruppierung
|
||||
|
||||
|
||||
|
||||
' rpt.GroupHeader2.DataField = "AvisoId" 'Gruppierung
|
||||
|
||||
' MsgBox(rpt.DataSource.rows.count)
|
||||
If rpt.DataSource.rows.count = 0 Then
|
||||
rpt.Dispose() : print.Dispose()
|
||||
MsgBox("Keine Daten vorhanden!")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
Dim sum = 0
|
||||
rpt.lblUeberschrift.Text = "Fiskalvertretung " & datVon.Text & " bis " & datBis.Text
|
||||
rpt.lblSachbearbeiter.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
|
||||
'rpt.lblMandantNiederlassung.Text = PERSONAL.Mandant & " / " & PERSONAL.Niederlassung
|
||||
|
||||
'Dim cnt As Integer = 0
|
||||
rpt.lblDat.Text = Now.ToLongDateString
|
||||
Dim sumEust As Double = 0
|
||||
Dim sumRg As Double = 0
|
||||
Dim gesSumEust As Double = 0
|
||||
Dim gesSumRg As Double = 0
|
||||
Dim gesgesSumEust As Double = 0
|
||||
Dim gesgesSumRg As Double = 0
|
||||
Dim gesgesSumAnz = 0
|
||||
Dim gesSumAnz = 0
|
||||
AddHandler rpt.Detail.Format, Sub()
|
||||
' rpt.lblVon.Text = CDate(rpt.Fields.Item("von").Value).ToShortDateString
|
||||
' rpt.lblLKWNr.Text = CDate(rpt.Fields.Item("bis").Value).ToShortDateString
|
||||
|
||||
rpt.lblAbfDatum.Text = rpt.Fields.Item("zbant_nadat").Value
|
||||
rpt.lblRegNr.Text = rpt.Fields.Item("zbant_regnr").Value
|
||||
|
||||
rpt.lblBezNr.Text = rpt.Fields.Item("zbant_beznr").Value
|
||||
rpt.lblNL.Text = rpt.Fields.Item("basman_nl").Value
|
||||
rpt.lblReBetrWaehr.Text = rpt.Fields.Item("zbant_waehr").Value
|
||||
|
||||
Dim re As Double = 0
|
||||
Dim rg As Double = 0
|
||||
Dim eust As Double = 0
|
||||
Dim kurs As Double = 0
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("zbant_preisr").Value)) Then re = CDbl(rpt.Fields.Item("zbant_preisr").Value())
|
||||
rpt.lblReBetrag.Text = CDbl(re).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("curEuro").Value)) Then rg = CDbl(rpt.Fields.Item("curEuro").Value())
|
||||
rpt.lblReBetragEUR.Text = CDbl(rg).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("eustwe").Value)) Then eust = CDbl(rpt.Fields.Item("eustwe").Value())
|
||||
rpt.lblEUST.Text = CDbl(eust).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
If IsNumeric(checkNull(rpt.Fields.Item("zbant_kurs").Value)) Then kurs = CDbl(rpt.Fields.Item("zbant_kurs").Value())
|
||||
rpt.lblKurs.Text = CDbl(kurs).ToString("N2", Globalization.CultureInfo.CurrentCulture)
|
||||
|
||||
' sumAbfBez = checkNull(rpt.Fields.Item("Abfertigungsbezeichnung").Value)
|
||||
|
||||
sumRg += rg
|
||||
sumEust += eust
|
||||
|
||||
gesSumRg += rg
|
||||
gesSumEust += eust
|
||||
|
||||
gesgesSumRg += rg
|
||||
gesgesSumEust += eust
|
||||
|
||||
gesSumAnz += 1
|
||||
gesgesSumAnz += 1
|
||||
|
||||
End Sub
|
||||
AddHandler rpt.GroupHeader1.Format, Sub()
|
||||
rpt.lblFiskalvertretung.Text = "Fiskalvertretung - " & SQL.getValueTxtBySql("SELECT TOP 1 isnull([LandBez],'') FROM [Länderverzeichnis für die Außenhandelsstatistik] WHERE [LandKz]='" & checkNull(rpt.Fields.Item("baslnd_alpha").Value) & "'", "FMZOLL")
|
||||
rpt.lblFiskalvertretungLand.Text = checkNull(rpt.Fields.Item("baslnd_alpha").Value)
|
||||
|
||||
gesSumEust = 0
|
||||
gesSumRg = 0
|
||||
gesSumAnz = 0
|
||||
rpt.lblGesSumTxt.Text = "Summe " & checkNull(rpt.Fields.Item("baslnd_alpha").Value) & ":"
|
||||
End Sub
|
||||
AddHandler rpt.GroupHeader2.Format, Sub()
|
||||
rpt.lblUIDNr.Text = "USt-ID: " & checkNull(rpt.Fields.Item("zbant_erwust").Value)
|
||||
rpt.lblFirmenname.Text = checkNull(rpt.Fields.Item("zbaaz_name1").Value)
|
||||
|
||||
sumEust = 0
|
||||
sumRg = 0
|
||||
|
||||
End Sub
|
||||
|
||||
AddHandler rpt.GroupFooter2.Format, Sub()
|
||||
'rpt.lblSumAbfertigungsart.Text = sumAbfBez
|
||||
'rpt.lblSumBarzahlungsbetrag.Text = sumBar.ToString("N2", CultureInfo.CurrentCulture)
|
||||
'rpt.lblSumRechnungsbetrag.Text = sumRg.ToString("N2", CultureInfo.CurrentCulture)
|
||||
'rpt.lblSumAnzahl.Text = sumAnz.ToString("N0")
|
||||
'rpt.lblSuag.Text = sumRg.ToString("C")
|
||||
rpt.lblSumRe.Text = sumRg.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblSumEust.Text = sumEust.ToString("N2", CultureInfo.CurrentCulture)
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
AddHandler rpt.GroupFooter1.Format, Sub()
|
||||
rpt.lblGesSumRe.Text = gesSumRg.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblGesSumEust.Text = gesSumEust.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblGesSumAnzahl.Text = gesSumAnz.ToString("N0")
|
||||
|
||||
End Sub
|
||||
AddHandler rpt.ReportFooter1.Format, Sub()
|
||||
|
||||
rpt.lblGesgesSumRe.Text = gesgesSumRg.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblGesgesSumEust.Text = gesgesSumEust.ToString("N2", CultureInfo.CurrentCulture)
|
||||
rpt.lblGesGesSumAnzahl.Text = gesgesSumAnz.ToString("N0")
|
||||
|
||||
End Sub
|
||||
|
||||
print.Viewer.LoadDocument(rpt)
|
||||
print.Viewer.ViewType = GrapeCity.Viewer.Common.Model.ViewType.Continuous
|
||||
print.Show()
|
||||
|
||||
End Sub
|
||||
|
||||
Function checkNull(o As Object, Optional ret As String = "") As Object
|
||||
If o Is Nothing Then Return ret
|
||||
If o Is DBNull.Value Then Return ret
|
||||
Return o
|
||||
End Function
|
||||
|
||||
|
||||
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
|
||||
|
||||
lblErrUID.Visible = False
|
||||
|
||||
Dim dir = getDir()
|
||||
|
||||
If dir = "" Then
|
||||
lblErrUID.Visible = True
|
||||
Else
|
||||
Process.Start(dir)
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
370
SDL/zoll/usrCntlAuswertungenKunden_Auftragsrueckgang.Designer.vb
generated
Normal file
370
SDL/zoll/usrCntlAuswertungenKunden_Auftragsrueckgang.Designer.vb
generated
Normal file
@@ -0,0 +1,370 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlAuswertungenKunden_Auftragsrueckgang
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.picDurmaz = New System.Windows.Forms.PictureBox()
|
||||
Me.cboMonatDurmaz = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.datBisDurmaz = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.txtAbfArt = New System.Windows.Forms.TextBox()
|
||||
Me.txtletztePeriode = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.txtAnz12Monate = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.txtSchwellenwertPeriode = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.txtFilialen = New System.Windows.Forms.TextBox()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.datVonDurmaz = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.btnNCTSDurmaz = New System.Windows.Forms.Button()
|
||||
CType(Me.picDurmaz, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'picDurmaz
|
||||
'
|
||||
Me.picDurmaz.Image = Global.SDL.My.Resources.kunden
|
||||
Me.picDurmaz.Location = New System.Drawing.Point(470, 12)
|
||||
Me.picDurmaz.Name = "picDurmaz"
|
||||
Me.picDurmaz.Size = New System.Drawing.Size(221, 44)
|
||||
Me.picDurmaz.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picDurmaz.TabIndex = 12
|
||||
Me.picDurmaz.TabStop = False
|
||||
'
|
||||
'cboMonatDurmaz
|
||||
'
|
||||
Me.cboMonatDurmaz._allowedValuesFreiText = Nothing
|
||||
Me.cboMonatDurmaz._allowFreiText = False
|
||||
Me.cboMonatDurmaz._value = ""
|
||||
Me.cboMonatDurmaz.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMonatDurmaz.FormattingEnabled = True
|
||||
Me.cboMonatDurmaz.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.cboMonatDurmaz.Location = New System.Drawing.Point(222, 65)
|
||||
Me.cboMonatDurmaz.Name = "cboMonatDurmaz"
|
||||
Me.cboMonatDurmaz.Size = New System.Drawing.Size(173, 21)
|
||||
Me.cboMonatDurmaz.TabIndex = 11
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(569, 69)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label9.TabIndex = 10
|
||||
Me.Label9.Text = "bis:"
|
||||
Me.Label9.Visible = False
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Location = New System.Drawing.Point(145, 69)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(71, 13)
|
||||
Me.Label12.TabIndex = 8
|
||||
Me.Label12.Text = "Kunde-Rolle :"
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(225, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "Rückgang Abfertigungszahlen"
|
||||
'
|
||||
'datBisDurmaz
|
||||
'
|
||||
Me.datBisDurmaz.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datBisDurmaz.Location = New System.Drawing.Point(598, 66)
|
||||
Me.datBisDurmaz.Name = "datBisDurmaz"
|
||||
Me.datBisDurmaz.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datBisDurmaz.TabIndex = 9
|
||||
Me.datBisDurmaz.Visible = False
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(436, 69)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label13.TabIndex = 8
|
||||
Me.Label13.Text = "von:"
|
||||
Me.Label13.Visible = False
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.Label6)
|
||||
Me.GroupBox2.Controls.Add(Me.txtAbfArt)
|
||||
Me.GroupBox2.Controls.Add(Me.txtletztePeriode)
|
||||
Me.GroupBox2.Controls.Add(Me.Label5)
|
||||
Me.GroupBox2.Controls.Add(Me.txtAnz12Monate)
|
||||
Me.GroupBox2.Controls.Add(Me.txtSchwellenwertPeriode)
|
||||
Me.GroupBox2.Controls.Add(Me.Label4)
|
||||
Me.GroupBox2.Controls.Add(Me.Label3)
|
||||
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.txtFilialen)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.picDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.cboMonatDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.Label9)
|
||||
Me.GroupBox2.Controls.Add(Me.datBisDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.Label12)
|
||||
Me.GroupBox2.Controls.Add(Me.Label13)
|
||||
Me.GroupBox2.Controls.Add(Me.datVonDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Controls.Add(Me.btnNCTSDurmaz)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 216)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(145, 121)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(53, 13)
|
||||
Me.Label6.TabIndex = 23
|
||||
Me.Label6.Text = "Abf.arten:"
|
||||
'
|
||||
'txtAbfArt
|
||||
'
|
||||
Me.txtAbfArt.Location = New System.Drawing.Point(222, 118)
|
||||
Me.txtAbfArt.Name = "txtAbfArt"
|
||||
Me.txtAbfArt.Size = New System.Drawing.Size(469, 20)
|
||||
Me.txtAbfArt.TabIndex = 22
|
||||
Me.txtAbfArt.Text = "1,2,3,4,5,6,7,8,12,13,17,23,26,27,28,29,33,34,37,38"
|
||||
'
|
||||
'txtletztePeriode
|
||||
'
|
||||
Me.txtletztePeriode._DateTimeOnly = False
|
||||
Me.txtletztePeriode._numbersOnly = True
|
||||
Me.txtletztePeriode._numbersOnlyKommastellen = ""
|
||||
Me.txtletztePeriode._Prozent = False
|
||||
Me.txtletztePeriode._ShortDateNew = False
|
||||
Me.txtletztePeriode._ShortDateOnly = False
|
||||
Me.txtletztePeriode._TimeOnly = False
|
||||
Me.txtletztePeriode._value = "8"
|
||||
Me.txtletztePeriode._Waehrung = False
|
||||
Me.txtletztePeriode.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtletztePeriode.Location = New System.Drawing.Point(367, 186)
|
||||
Me.txtletztePeriode.MaxLineLength = -1
|
||||
Me.txtletztePeriode.MaxLines_Warning = ""
|
||||
Me.txtletztePeriode.MaxLines_Warning_Label = Nothing
|
||||
Me.txtletztePeriode.Name = "txtletztePeriode"
|
||||
Me.txtletztePeriode.Size = New System.Drawing.Size(28, 20)
|
||||
Me.txtletztePeriode.TabIndex = 20
|
||||
Me.txtletztePeriode.Text = "0"
|
||||
Me.txtletztePeriode.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(145, 189)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(219, 13)
|
||||
Me.Label5.TabIndex = 21
|
||||
Me.Label5.Text = "Abfertigungen in letzter Periode kleiner gleich"
|
||||
'
|
||||
'txtAnz12Monate
|
||||
'
|
||||
Me.txtAnz12Monate._DateTimeOnly = False
|
||||
Me.txtAnz12Monate._numbersOnly = True
|
||||
Me.txtAnz12Monate._numbersOnlyKommastellen = ""
|
||||
Me.txtAnz12Monate._Prozent = False
|
||||
Me.txtAnz12Monate._ShortDateNew = False
|
||||
Me.txtAnz12Monate._ShortDateOnly = False
|
||||
Me.txtAnz12Monate._TimeOnly = False
|
||||
Me.txtAnz12Monate._value = "12"
|
||||
Me.txtAnz12Monate._Waehrung = False
|
||||
Me.txtAnz12Monate.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtAnz12Monate.Location = New System.Drawing.Point(351, 148)
|
||||
Me.txtAnz12Monate.MaxLineLength = -1
|
||||
Me.txtAnz12Monate.MaxLines_Warning = ""
|
||||
Me.txtAnz12Monate.MaxLines_Warning_Label = Nothing
|
||||
Me.txtAnz12Monate.Name = "txtAnz12Monate"
|
||||
Me.txtAnz12Monate.Size = New System.Drawing.Size(44, 20)
|
||||
Me.txtAnz12Monate.TabIndex = 19
|
||||
Me.txtAnz12Monate.Text = "12"
|
||||
Me.txtAnz12Monate.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
'
|
||||
'txtSchwellenwertPeriode
|
||||
'
|
||||
Me.txtSchwellenwertPeriode._DateTimeOnly = False
|
||||
Me.txtSchwellenwertPeriode._numbersOnly = True
|
||||
Me.txtSchwellenwertPeriode._numbersOnlyKommastellen = ""
|
||||
Me.txtSchwellenwertPeriode._Prozent = False
|
||||
Me.txtSchwellenwertPeriode._ShortDateNew = False
|
||||
Me.txtSchwellenwertPeriode._ShortDateOnly = False
|
||||
Me.txtSchwellenwertPeriode._TimeOnly = False
|
||||
Me.txtSchwellenwertPeriode._value = "8"
|
||||
Me.txtSchwellenwertPeriode._Waehrung = False
|
||||
Me.txtSchwellenwertPeriode.ForeColor = System.Drawing.Color.Black
|
||||
Me.txtSchwellenwertPeriode.Location = New System.Drawing.Point(351, 167)
|
||||
Me.txtSchwellenwertPeriode.MaxLineLength = -1
|
||||
Me.txtSchwellenwertPeriode.MaxLines_Warning = ""
|
||||
Me.txtSchwellenwertPeriode.MaxLines_Warning_Label = Nothing
|
||||
Me.txtSchwellenwertPeriode.Name = "txtSchwellenwertPeriode"
|
||||
Me.txtSchwellenwertPeriode.Size = New System.Drawing.Size(44, 20)
|
||||
Me.txtSchwellenwertPeriode.TabIndex = 19
|
||||
Me.txtSchwellenwertPeriode.Text = "8"
|
||||
Me.txtSchwellenwertPeriode.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(401, 170)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(124, 13)
|
||||
Me.Label4.TabIndex = 18
|
||||
Me.Label4.Text = "Abfertigungen pro Monat"
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(145, 151)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(192, 13)
|
||||
Me.Label3.TabIndex = 17
|
||||
Me.Label3.Text = "Abf.Anzahl letzte 12 Monate größer als:"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(145, 170)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(200, 13)
|
||||
Me.Label2.TabIndex = 17
|
||||
Me.Label2.Text = "Grenze wöchentlicher Schwellenwert, ab"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(145, 95)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(42, 13)
|
||||
Me.Label1.TabIndex = 15
|
||||
Me.Label1.Text = "Filialen:"
|
||||
'
|
||||
'txtFilialen
|
||||
'
|
||||
Me.txtFilialen.Location = New System.Drawing.Point(222, 92)
|
||||
Me.txtFilialen.Name = "txtFilialen"
|
||||
Me.txtFilialen.Size = New System.Drawing.Size(469, 20)
|
||||
Me.txtFilialen.TabIndex = 14
|
||||
Me.txtFilialen.Text = "4803,4805,4807,4809,4811,5003,5103,5303"
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 59)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'datVonDurmaz
|
||||
'
|
||||
Me.datVonDurmaz.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVonDurmaz.Location = New System.Drawing.Point(470, 66)
|
||||
Me.datVonDurmaz.Name = "datVonDurmaz"
|
||||
Me.datVonDurmaz.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVonDurmaz.TabIndex = 7
|
||||
Me.datVonDurmaz.Visible = False
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(265, 26)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Liefert eine Liste von Kunden, die einen Rückgang an " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Abfertigungszahlen aufweis" & _
|
||||
"en."
|
||||
'
|
||||
'btnNCTSDurmaz
|
||||
'
|
||||
Me.btnNCTSDurmaz.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnNCTSDurmaz.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnNCTSDurmaz.Location = New System.Drawing.Point(6, 19)
|
||||
Me.btnNCTSDurmaz.Name = "btnNCTSDurmaz"
|
||||
Me.btnNCTSDurmaz.Size = New System.Drawing.Size(121, 37)
|
||||
Me.btnNCTSDurmaz.TabIndex = 4
|
||||
Me.btnNCTSDurmaz.Text = "Auswertung starten"
|
||||
Me.btnNCTSDurmaz.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlAuswertungenKunden_Auftragsrueckgang
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenKunden_Auftragsrueckgang"
|
||||
Me.Size = New System.Drawing.Size(708, 234)
|
||||
CType(Me.picDurmaz, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents picDurmaz As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents cboMonatDurmaz As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents datBisDurmaz As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents datVonDurmaz As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents btnNCTSDurmaz As System.Windows.Forms.Button
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtFilialen As System.Windows.Forms.TextBox
|
||||
Friend WithEvents txtAnz12Monate As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents txtSchwellenwertPeriode As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtletztePeriode As VERAG_PROG_ALLGEMEIN.MyTextBox
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents txtAbfArt As System.Windows.Forms.TextBox
|
||||
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenKunden_Auftragsrueckgang.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenKunden_Auftragsrueckgang.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
95
SDL/zoll/usrCntlAuswertungenKunden_Auftragsrueckgang.vb
Normal file
95
SDL/zoll/usrCntlAuswertungenKunden_Auftragsrueckgang.vb
Normal file
@@ -0,0 +1,95 @@
|
||||
Public Class usrCntlAuswertungenKunden_Auftragsrueckgang
|
||||
|
||||
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
cboMonatDurmaz.Items.Clear()
|
||||
cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Auftraggeber", "Vermittler"))
|
||||
cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Empfänger", "Empfänger"))
|
||||
cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Avisierer", "Avisierer"))
|
||||
cboMonatDurmaz.SelectedIndex = 1
|
||||
' cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
End Sub
|
||||
|
||||
Private Sub btnNCTSDurmaz_Click(sender As Object, e As EventArgs) Handles btnNCTSDurmaz.Click
|
||||
|
||||
Try
|
||||
txtFilialen.ForeColor = Color.Black
|
||||
If txtFilialen.Text.Contains(",") Then
|
||||
For Each s In txtFilialen.Text.Split(",")
|
||||
If Not IsNumeric(s) Then txtFilialen.ForeColor = Color.Red : Exit Sub
|
||||
Next
|
||||
Else
|
||||
If Not IsNumeric(txtFilialen.Text) Then txtFilialen.ForeColor = Color.Red : Exit Sub
|
||||
End If
|
||||
|
||||
txtAbfArt.ForeColor = Color.Black
|
||||
If txtAbfArt.Text.Contains(",") Then
|
||||
For Each s In txtAbfArt.Text.Split(",")
|
||||
If Not IsNumeric(s) Then txtAbfArt.ForeColor = Color.Red : Exit Sub
|
||||
Next
|
||||
Else
|
||||
If Not IsNumeric(txtAbfArt.Text) Then txtAbfArt.ForeColor = Color.Red : Exit Sub
|
||||
End If
|
||||
|
||||
lblErr.Visible = False
|
||||
If cboMonatDurmaz._value = "" Then Exit Sub
|
||||
Dim sqlStr = ""
|
||||
sqlStr &= " select * FROM("
|
||||
sqlStr &= " select * ,"
|
||||
sqlStr &= " case when monatsdurchschn >" & txtSchwellenwertPeriode.Text & " then 'W'"
|
||||
sqlStr &= " else 'M'"
|
||||
sqlStr &= " end as DurschnBerechnung"
|
||||
sqlStr &= " FROM("
|
||||
sqlStr &= " SELECT SUM (abfertigungsanzahl) as [Abf.Anzahl], VermittlerKundenNr, MAX(Vermittler) as Vermittler"
|
||||
sqlStr &= " , cast(SUM (cast(abfertigungsanzahl as float) /12) as decimal(10,1) ) as Monatsdurchschn "
|
||||
sqlStr &= " , (SELECT "
|
||||
sqlStr &= " isnull(SUM(sp2.abfertigungsanzahl), 0)"
|
||||
sqlStr &= " FROM [VERAG].[dbo].[Speditionsbuch] as sp2"
|
||||
|
||||
sqlStr &= " where sp2.Abfertigungsdatum between cast(DATEADD (MONTH , -1 , GETDATE() ) as date) AND GETDATE()"
|
||||
sqlStr &= " and sp2.FilialenNr IN (" & txtFilialen.Text & ")"
|
||||
sqlStr &= " and sp2.Abfertigungsart IN(" & txtAbfArt.Text & ") "
|
||||
sqlStr &= " and sp2.VermittlerKundenNr=sp1.VermittlerKundenNr"
|
||||
sqlStr &= " ) as LetzterMonat,"
|
||||
|
||||
sqlStr &= " (SELECT "
|
||||
sqlStr &= " isnull(SUM(sp2.abfertigungsanzahl), 0)"
|
||||
sqlStr &= " FROM [VERAG].[dbo].[Speditionsbuch] as sp2"
|
||||
sqlStr &= " where sp2.Abfertigungsdatum between cast(DATEADD (WEEK , -1 , GETDATE() ) as date) AND GETDATE()"
|
||||
sqlStr &= " and sp2.FilialenNr IN (" & txtFilialen.Text & ")"
|
||||
sqlStr &= " and sp2.Abfertigungsart IN(" & txtAbfArt.Text & ") "
|
||||
sqlStr &= " and sp2.VermittlerKundenNr=sp1.VermittlerKundenNr"
|
||||
sqlStr &= " ) as LetzeWoche"
|
||||
|
||||
sqlStr &= " FROM [VERAG].[dbo].[Speditionsbuch] as sp1"
|
||||
|
||||
sqlStr &= " where Abfertigungsdatum between cast(DATEADD (YEAR , -1 , GETDATE() ) as date) AND GETDATE()"
|
||||
sqlStr &= " and VermittlerKundenNr is not null and VermittlerKundenNr > 0 "
|
||||
sqlStr &= " and FilialenNr IN (" & txtFilialen.Text & ")"
|
||||
sqlStr &= " and Abfertigungsart IN(" & txtAbfArt.Text & ") "
|
||||
|
||||
sqlStr &= " group by VermittlerKundenNr"
|
||||
sqlStr &= " ) as T where [Abf.Anzahl]> " & txtAnz12Monate.Text & " "
|
||||
sqlStr &= " ) as T2"
|
||||
sqlStr &= " where"
|
||||
sqlStr &= " (DurschnBerechnung='M' and LetzterMonat<='" & txtletztePeriode.Text & "') or (DurschnBerechnung='W' and LetzeWoche<='" & txtletztePeriode.Text & "') "
|
||||
sqlStr &= " order by [Abf.Anzahl] desc"
|
||||
|
||||
sqlStr = sqlStr.Replace("Vermittler", cboMonatDurmaz._value)
|
||||
Dim dt As DataTable = SQL.loadDgvBySql(sqlStr, "FMZOLL")
|
||||
If dt Is Nothing OrElse dt.Rows.Count = 0 Then lblErr.Visible = True : Exit Sub
|
||||
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt) ', {"E1:E" & (dt.Rows.Count + 1)})
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
161
SDL/zoll/usrCntlAuswertungenUIDPruefung.Designer.vb
generated
Normal file
161
SDL/zoll/usrCntlAuswertungenUIDPruefung.Designer.vb
generated
Normal file
@@ -0,0 +1,161 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class usrCntlAuswertungenUIDPruefung
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.DataGridView = New System.Windows.Forms.DataGridView()
|
||||
Me.lbl = New System.Windows.Forms.Label()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.datVonDurmaz = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.btnNCTSDurmaz = New System.Windows.Forms.Button()
|
||||
Me.cbx = New System.Windows.Forms.CheckBox()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(96, 17)
|
||||
Me.Label8.TabIndex = 16
|
||||
Me.Label8.Text = "UID Prüfung"
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.cbx)
|
||||
Me.GroupBox2.Controls.Add(Me.DataGridView)
|
||||
Me.GroupBox2.Controls.Add(Me.lbl)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.datVonDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Controls.Add(Me.btnNCTSDurmaz)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 162)
|
||||
Me.GroupBox2.TabIndex = 15
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'DataGridView
|
||||
'
|
||||
Me.DataGridView.AllowUserToAddRows = False
|
||||
Me.DataGridView.AllowUserToDeleteRows = False
|
||||
Me.DataGridView.AllowUserToResizeRows = False
|
||||
Me.DataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.DataGridView.Location = New System.Drawing.Point(351, 12)
|
||||
Me.DataGridView.Name = "DataGridView"
|
||||
Me.DataGridView.RowHeadersVisible = False
|
||||
Me.DataGridView.Size = New System.Drawing.Size(340, 144)
|
||||
Me.DataGridView.TabIndex = 15
|
||||
'
|
||||
'lbl
|
||||
'
|
||||
Me.lbl.AutoSize = True
|
||||
Me.lbl.Location = New System.Drawing.Point(145, 86)
|
||||
Me.lbl.Name = "lbl"
|
||||
Me.lbl.Size = New System.Drawing.Size(86, 13)
|
||||
Me.lbl.TabIndex = 14
|
||||
Me.lbl.Text = "Prüfung älter als:"
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 59)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'datVonDurmaz
|
||||
'
|
||||
Me.datVonDurmaz.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVonDurmaz.Location = New System.Drawing.Point(240, 80)
|
||||
Me.datVonDurmaz.Name = "datVonDurmaz"
|
||||
Me.datVonDurmaz.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVonDurmaz.TabIndex = 7
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(188, 56)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Führ eine Abfrage aller Kunden aus und startet eine UID-Abfrage bei allen Einträg" &
|
||||
"en, die älter als das u.a. Datum sind."
|
||||
'
|
||||
'btnNCTSDurmaz
|
||||
'
|
||||
Me.btnNCTSDurmaz.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnNCTSDurmaz.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnNCTSDurmaz.Location = New System.Drawing.Point(6, 19)
|
||||
Me.btnNCTSDurmaz.Name = "btnNCTSDurmaz"
|
||||
Me.btnNCTSDurmaz.Size = New System.Drawing.Size(121, 37)
|
||||
Me.btnNCTSDurmaz.TabIndex = 4
|
||||
Me.btnNCTSDurmaz.Text = "Prüfung starten"
|
||||
Me.btnNCTSDurmaz.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cbx
|
||||
'
|
||||
Me.cbx.AutoSize = True
|
||||
Me.cbx.Checked = True
|
||||
Me.cbx.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbx.Location = New System.Drawing.Point(148, 115)
|
||||
Me.cbx.Name = "cbx"
|
||||
Me.cbx.Size = New System.Drawing.Size(197, 17)
|
||||
Me.cbx.TabIndex = 16
|
||||
Me.cbx.Text = "Ergebnis in Kundenstamm speichern"
|
||||
Me.cbx.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlAuswertungenUIDPruefung
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlAuswertungenUIDPruefung"
|
||||
Me.Size = New System.Drawing.Size(708, 176)
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents datVonDurmaz As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents btnNCTSDurmaz As System.Windows.Forms.Button
|
||||
Friend WithEvents lbl As Label
|
||||
Friend WithEvents DataGridView As DataGridView
|
||||
Friend WithEvents cbx As CheckBox
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlAuswertungenUIDPruefung.resx
Normal file
120
SDL/zoll/usrCntlAuswertungenUIDPruefung.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
35
SDL/zoll/usrCntlAuswertungenUIDPruefung.vb
Normal file
35
SDL/zoll/usrCntlAuswertungenUIDPruefung.vb
Normal file
@@ -0,0 +1,35 @@
|
||||
Public Class usrCntlAuswertungenUIDPruefung
|
||||
|
||||
|
||||
Dim PF As New SDL.cProgramFunctions
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
datVonDurmaz.Value = CDate(Now.ToString("01.MM.yyyy")).AddMonths(-2)
|
||||
End Sub
|
||||
|
||||
Private Sub btnNCTSDurmaz_Click(sender As Object, e As EventArgs) Handles btnNCTSDurmaz.Click
|
||||
Dim dt = VERAG_PROG_ALLGEMEIN.cUIDPruefung.doUIDPruefungALL(datVonDurmaz.Value, cbx.Checked)
|
||||
If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
|
||||
DataGridView.DataSource = dt
|
||||
PF.genExcelFromDT_NEW(dt)
|
||||
With DataGridView
|
||||
If .Columns.Count > 0 Then
|
||||
.Columns("KdNr").Width = 50
|
||||
.Columns("KdNr").HeaderText = "KdNr"
|
||||
.Columns("Firma").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
.Columns("Firma").MinimumWidth = 60
|
||||
.Columns("Firma").HeaderText = "Firma"
|
||||
.Columns("UstIdKz").Width = 25
|
||||
.Columns("UstIdKz").HeaderText = "UID"
|
||||
.Columns("UstIdnr").Width = 60
|
||||
.Columns("UstIdnr").HeaderText = "Nr"
|
||||
.Columns("letzte Prüfung").Width = 60
|
||||
.Columns("letzte Prüfung").HeaderText = "letztePrüf."
|
||||
.Columns("Ergebnis").Width = 60
|
||||
.Columns("Ergebnis").HeaderText = "Erg."
|
||||
End If
|
||||
End With
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
241
SDL/zoll/usrCntlBrgBuchungenFremd.Designer.vb
generated
Normal file
241
SDL/zoll/usrCntlBrgBuchungenFremd.Designer.vb
generated
Normal file
@@ -0,0 +1,241 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlBrgBuchungenFremd
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.btnNCTSDurmaz = New System.Windows.Forms.Button()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.datVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.datBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.cboBRG = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.picDurmaz = New System.Windows.Forms.PictureBox()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.cbxEZollDaten = New System.Windows.Forms.CheckBox()
|
||||
Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
CType(Me.picDurmaz, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'btnNCTSDurmaz
|
||||
'
|
||||
Me.btnNCTSDurmaz.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnNCTSDurmaz.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnNCTSDurmaz.Location = New System.Drawing.Point(6, 19)
|
||||
Me.btnNCTSDurmaz.Name = "btnNCTSDurmaz"
|
||||
Me.btnNCTSDurmaz.Size = New System.Drawing.Size(121, 37)
|
||||
Me.btnNCTSDurmaz.TabIndex = 4
|
||||
Me.btnNCTSDurmaz.Text = "Auswertung starten"
|
||||
Me.btnNCTSDurmaz.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(276, 26)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Liefert eine Liste der im definierten Zeitraum verarbeiteten" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Bürgschaftsbuchunge" &
|
||||
"n."
|
||||
'
|
||||
'datVon
|
||||
'
|
||||
Me.datVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVon.Location = New System.Drawing.Point(470, 71)
|
||||
Me.datVon.Name = "datVon"
|
||||
Me.datVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVon.TabIndex = 7
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(436, 74)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label13.TabIndex = 8
|
||||
Me.Label13.Text = "von:"
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Location = New System.Drawing.Point(145, 55)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(61, 13)
|
||||
Me.Label12.TabIndex = 8
|
||||
Me.Label12.Text = "Bürgschaft:"
|
||||
'
|
||||
'datBis
|
||||
'
|
||||
Me.datBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datBis.Location = New System.Drawing.Point(598, 71)
|
||||
Me.datBis.Name = "datBis"
|
||||
Me.datBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datBis.TabIndex = 9
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(569, 74)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label9.TabIndex = 10
|
||||
Me.Label9.Text = "bis:"
|
||||
'
|
||||
'cboBRG
|
||||
'
|
||||
Me.cboBRG._allowedValuesFreiText = Nothing
|
||||
Me.cboBRG._allowFreiText = False
|
||||
Me.cboBRG._value = ""
|
||||
Me.cboBRG.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboBRG.FormattingEnabled = True
|
||||
Me.cboBRG.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.cboBRG.Location = New System.Drawing.Point(212, 51)
|
||||
Me.cboBRG.Name = "cboBRG"
|
||||
Me.cboBRG.Size = New System.Drawing.Size(218, 21)
|
||||
Me.cboBRG.TabIndex = 11
|
||||
'
|
||||
'picDurmaz
|
||||
'
|
||||
Me.picDurmaz.Image = Global.SDL.My.Resources.Resources.sicherheit11
|
||||
Me.picDurmaz.InitialImage = Global.SDL.My.Resources.Resources.durmaz
|
||||
Me.picDurmaz.Location = New System.Drawing.Point(470, 12)
|
||||
Me.picDurmaz.Name = "picDurmaz"
|
||||
Me.picDurmaz.Size = New System.Drawing.Size(221, 44)
|
||||
Me.picDurmaz.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picDurmaz.TabIndex = 12
|
||||
Me.picDurmaz.TabStop = False
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 59)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.cbxEZollDaten)
|
||||
Me.GroupBox2.Controls.Add(Me.MyComboBox1)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.picDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.cboBRG)
|
||||
Me.GroupBox2.Controls.Add(Me.Label9)
|
||||
Me.GroupBox2.Controls.Add(Me.datBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label12)
|
||||
Me.GroupBox2.Controls.Add(Me.Label13)
|
||||
Me.GroupBox2.Controls.Add(Me.datVon)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Controls.Add(Me.btnNCTSDurmaz)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 127)
|
||||
Me.GroupBox2.TabIndex = 13
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'cbxEZollDaten
|
||||
'
|
||||
Me.cbxEZollDaten.AutoSize = True
|
||||
Me.cbxEZollDaten.Checked = True
|
||||
Me.cbxEZollDaten.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbxEZollDaten.Location = New System.Drawing.Point(212, 98)
|
||||
Me.cbxEZollDaten.Name = "cbxEZollDaten"
|
||||
Me.cbxEZollDaten.Size = New System.Drawing.Size(85, 17)
|
||||
Me.cbxEZollDaten.TabIndex = 16
|
||||
Me.cbxEZollDaten.Text = "E-Zoll Daten"
|
||||
Me.cbxEZollDaten.UseVisualStyleBackColor = True
|
||||
'
|
||||
'MyComboBox1
|
||||
'
|
||||
Me.MyComboBox1._allowedValuesFreiText = Nothing
|
||||
Me.MyComboBox1._allowFreiText = False
|
||||
Me.MyComboBox1._value = ""
|
||||
Me.MyComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.MyComboBox1.FormattingEnabled = True
|
||||
Me.MyComboBox1.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.MyComboBox1.Location = New System.Drawing.Point(212, 71)
|
||||
Me.MyComboBox1.Name = "MyComboBox1"
|
||||
Me.MyComboBox1.Size = New System.Drawing.Size(218, 21)
|
||||
Me.MyComboBox1.TabIndex = 15
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(145, 75)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label1.TabIndex = 14
|
||||
Me.Label1.Text = "Firma:"
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(224, 17)
|
||||
Me.Label8.TabIndex = 14
|
||||
Me.Label8.Text = "Bürgschaftsbuchungen Fremd"
|
||||
'
|
||||
'usrCntlBrgBuchungenFremd
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlBrgBuchungenFremd"
|
||||
Me.Size = New System.Drawing.Size(702, 141)
|
||||
CType(Me.picDurmaz, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents btnNCTSDurmaz As System.Windows.Forms.Button
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents datVon As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents datBis As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents cboBRG As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents picDurmaz As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents cbxEZollDaten As System.Windows.Forms.CheckBox
|
||||
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlBrgBuchungenFremd.resx
Normal file
120
SDL/zoll/usrCntlBrgBuchungenFremd.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
179
SDL/zoll/usrCntlBrgBuchungenFremd.vb
Normal file
179
SDL/zoll/usrCntlBrgBuchungenFremd.vb
Normal file
@@ -0,0 +1,179 @@
|
||||
Imports ClosedXML.Excel
|
||||
|
||||
Public Class usrCntlBrgBuchungenFremd
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
cboBRG.Items.Clear()
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
'cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TOBB - 15TR0004000020917 / 12TR0004000004665 / 17TR0004000032349 / 17TR0004000029518 / 21TR0004000079552 / 21TR0004000078157 / 21TR0004000092350 / 21TR0004000097157", " '12TR0004000004665','15TR0004000020917','17TR0004000032349','17TR0004000029518','21TR0004000079552','21TR0004000078157','21TR0004000092350','21TR0004000097157'"))
|
||||
'cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SGS - 16DE0000000068410", "'16DE0000000068410'"))
|
||||
'cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("MARS - 15TR0004000020908", "'15TR0004000020908'"))
|
||||
'cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EKOL - 13TR0004000005094", "'13TR0004000005094'"))
|
||||
'cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("OREGON - 18DE0000000073276 / 19DE0000000075520 / 18DE0000000075520 / 15TR0004000020500 / 21DE0000000079716", "'18DE0000000073276','19DE0000000075520','18DE0000000075520','15TR0004000020500','21DE0000000079716'"))
|
||||
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("TOBB - " & VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSlashList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.TOBB), VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSQLList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.TOBB)))
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SGS - " & VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSlashList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.SGS), VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSQLList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.SGS)))
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("MARS - " & VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSlashList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.MARS), VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSQLList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.MARS)))
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EKOL - " & VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSlashList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.EKOL), VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSQLList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.EKOL)))
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("OREGON - " & VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSlashList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.OREGON), VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.getSQLList(VERAG_PROG_ALLGEMEIN.cNCTS_GUARANTEES.OREGON)))
|
||||
|
||||
|
||||
|
||||
cboBRG.SelectedIndex = 1
|
||||
|
||||
MyComboBox1.Items.Clear()
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Case "IMEX"
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("IMEX", "IMEX"))
|
||||
Case "UNISPED"
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED", "UNISPED"))
|
||||
Case Else
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG/ATILLA", "VERAG/ATILLA"))
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("IMEX", "IMEX"))
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED", "UNISPED"))
|
||||
End Select
|
||||
MyComboBox1.SelectedIndex = 1
|
||||
|
||||
' cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
datVon.Value = Now.AddDays(-1)
|
||||
datBis.Value = Now.AddDays(-1)
|
||||
End Sub
|
||||
|
||||
Private Sub btnNCTSDurmaz_Click(sender As Object, e As EventArgs) Handles btnNCTSDurmaz.Click
|
||||
|
||||
lblErr.Visible = False
|
||||
Dim _erg = VERAG_PROG_ALLGEMEIN.cNCTS_Helper.getXLS_FremdBRG(MyComboBox1._value, cboBRG.Text, cboBRG._value, datVon.Value, datBis.Value, cbxEZollDaten.Checked)
|
||||
' MsgBox(_erg)
|
||||
Select Case _erg
|
||||
Case "NO_RESULT"
|
||||
MsgBox("Keine Daten!")
|
||||
lblErr.Visible = False
|
||||
Case ""
|
||||
Case Else
|
||||
Process.Start(_erg)
|
||||
End Select
|
||||
|
||||
Exit Sub
|
||||
|
||||
Try
|
||||
|
||||
lblErr.Visible = False
|
||||
If cboBRG._value = "" Then Exit Sub
|
||||
|
||||
Dim where = ""
|
||||
Select Case MyComboBox1._value
|
||||
Case "IMEX" : where = " and ncts_firma = 'IMEX' "
|
||||
Case "UNISPED" : where = " and ncts_firma = 'UNISPED' "
|
||||
Case "VERAG/ATILLA" : where = " and (ncts_firma is null OR ncts_firma IN ('VERAG','ATILLA','DURMAZ','FRONTOFFICE')) "
|
||||
End Select
|
||||
|
||||
|
||||
''DAKOSY:
|
||||
'Dim sqlatr = " SELECT (SELECT TOP 1 CONVERT(varchar, [dySt_ergZeitpunkt] ,104 ) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=ncts_dyaAnmID AND [dySt_status] = 50 ) as Datum, ncts_Befoerderungsmittel_KennzeichenAbgang as Kennzeichen, isnull(ncts_MRN,'') as MRN, ncts_SumA_Befoerderer_Land as Land, nctsSA_AbgabenBetrag as GarantieBetrag, ncts_SumA_Befoerderer_Name as Firma " &
|
||||
' " " & If(cboBRG.Text.Contains("TOBB") Or cboBRG.Text.Contains("OREGON"), ", isnull(ncts_BestimmungsstelleDienststellennummer,'') as Bestimmungsstelle ", "") & " " &
|
||||
' " ,ncts_ObjectName as Bezugsnummer " &
|
||||
' "FROM [tblDakosy_NCTSOut] INNER JOIN [tblDakosy_NCTSOut_Sicherheitsangaben] on ncts_Id=[nctsSA_NctsId] "
|
||||
|
||||
'sqlatr &= " WHERE nctsSA_GRN IN (" & cboBRG._value & ") and ncts_Status between 50 and 60 " ' CONVERT(date, ncts_Trans_DatumZeit ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "'"
|
||||
'sqlatr &= where
|
||||
'sqlatr &= " AND (SELECT COUNT(*) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=ncts_dyaAnmID AND [dySt_status] = 50 AND CONVERT(date, [dySt_ergZeitpunkt] ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "')>0 "
|
||||
'Dim dt As DataTable = SQL.loadDgvBySql(sqlatr, "FMZOLL", 120)
|
||||
|
||||
'DAKOSY NCTS 004:
|
||||
Dim sqlatr = " SELECT (SELECT TOP 1 CONVERT(varchar, [dySt_ergZeitpunkt] ,104 ) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=ncts_dyaAnmID AND [dySt_status] = 50 ) as Datum, ncts_ActiveBorderTransportMeans_1_IdentificationNumber as Kennzeichen, isnull(ncts_MRN,'') as MRN, '' as Land, nctsGRT_AmountToBeCovered as GarantieBetrag, ncts_Carrier_IdentificationNumber as Firma " &
|
||||
" " & If(cboBRG.Text.Contains("TOBB") Or cboBRG.Text.Contains("OREGON"), ", isnull(ncts_CustomsOfficeOfDestinationDeclared,'') as Bestimmungsstelle ", "") & " " &
|
||||
" ,ncts_ObjectName as Bezugsnummer " &
|
||||
"FROM [tblDakosy_NCTSOut004] INNER JOIN tblDakosy_NCTSOut004_Guarantee on ncts_Id=[nctsGRT_NctsId] "
|
||||
|
||||
sqlatr &= " WHERE [nctsGRT_GRN] IN (" & cboBRG._value & ") and ncts_Status between 50 and 60 " ' CONVERT(date, ncts_Trans_DatumZeit ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "'"
|
||||
sqlatr &= where
|
||||
sqlatr &= " AND and ncts_Eroeffnung BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "' "
|
||||
Dim dt As DataTable = SQL.loadDgvBySql(sqlatr, "FMZOLL", 120)
|
||||
|
||||
'MsgBox(sqlatr)
|
||||
|
||||
'Bei IMEX kein E-ZOLL
|
||||
If MyComboBox1._value = "VERAG/ATILLA" Then
|
||||
If cbxEZollDaten.Checked Then
|
||||
|
||||
'EZOLL:
|
||||
sqlatr = " Select TOP 100 AnmeldungsDatum As Datum , (Select [CrossIdnt] FROM [zsAnmTransp] where [zsAnmTransp].AnmID=vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme_Eroeffnung.AnmID ) As Kennzeichen, isnull(CRN,'') as MRN, (select [CrossIdntNat] FROM [zsAnmTransp] where [zsAnmTransp].AnmID=vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme_Eroeffnung.AnmID ) as Land, cast(GarantieWert as Decimal(17,2)) as GarantieBetrag,(SELECT [Na] FROM [ezoll].[dbo].[zsAnmCarrTra] where [zsAnmCarrTra].AnmID=vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme_Eroeffnung.AnmID) as Firma "
|
||||
sqlatr &= " " & If(cboBRG.Text.Contains("TOBB") Or cboBRG.Text.Contains("OREGON"), ", isnull(Bestimmungszollstelle,'') as Bestimmungsstelle ", "") & " "
|
||||
sqlatr &= " ,LRN as Bezugsnummer "
|
||||
sqlatr &= " FROM vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme_Eroeffnung "
|
||||
sqlatr &= " WHERE GRN IN (" & cboBRG._value & ") and cast( AnmeldungsDatum as date) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "' "
|
||||
|
||||
Dim dt2 As DataTable = SQL.loadDgvBySql(sqlatr, "EZOLL", 120)
|
||||
|
||||
If dt Is Nothing Then
|
||||
dt = dt2
|
||||
Else
|
||||
'zusammenführen:
|
||||
If dt2 IsNot Nothing Then
|
||||
dt.Merge(dt2, True, MissingSchemaAction.Add)
|
||||
|
||||
'For Each r As DataRow In dt2.Rows
|
||||
' dt.Rows.Add(r)
|
||||
'Next
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
If dt Is Nothing OrElse dt.Rows.Count = 0 Then lblErr.Visible = True : Exit Sub
|
||||
getEmptyFraechter(dt)
|
||||
dt.Columns.Remove("Bezugsnummer")
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt, {"E1:E" & (dt.Rows.Count + 1)}, , "Bürgschaftsbuchungen " & cboBRG.Text, "Datum: " & Now.ToShortDateString)
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Sub getEmptyFraechter(ByRef dt As DataTable)
|
||||
If dt IsNot Nothing Then
|
||||
For Each r In dt.Rows
|
||||
Try
|
||||
If r("Firma") Is DBNull.Value OrElse r("Firma") = "" Then
|
||||
Dim Bezugsnummer = If(r("Bezugsnummer"), "")
|
||||
Dim FirmaTmp = ""
|
||||
Dim FirmaNat = ""
|
||||
Dim FirmaTmpKdNR = SQL.DLookup("isnull([FrachtführerKundenNr],'')", "Speditionsbuch", " ([AtlasBezNrEZA]='" & Bezugsnummer & "' OR [AtlasBezNrNCTS]='" & Bezugsnummer & "')", "FMZOLL")
|
||||
If IsNumeric(FirmaTmpKdNR) Then
|
||||
Dim AD As New VERAG_PROG_ALLGEMEIN.cAdressen(FirmaTmpKdNR)
|
||||
If AD.hasEntry Then
|
||||
FirmaTmp = AD.Name_1
|
||||
FirmaNat = AD.LandKz
|
||||
End If
|
||||
Else
|
||||
FirmaTmp = SQL.DLookup("isnull([Frachtführer],'')", "Speditionsbuch", " ([AtlasBezNrEZA]='" & Bezugsnummer & "' OR [AtlasBezNrNCTS]='" & Bezugsnummer & "')", "FMZOLL")
|
||||
End If
|
||||
|
||||
If FirmaTmp.ToString.Contains(";") Then FirmaTmp = FirmaTmp.ToString.Split(";")(0)
|
||||
|
||||
If FirmaTmp.Length > 30 Then
|
||||
FirmaTmp = FirmaTmp.ToString.Substring(0, 30)
|
||||
End If
|
||||
r("Firma") = FirmaTmp
|
||||
r("Land") = FirmaNat
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
Next
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub MyComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles MyComboBox1.SelectedIndexChanged
|
||||
cbxEZollDaten.Enabled = (MyComboBox1._value = "VERAG/ATILLA")
|
||||
End Sub
|
||||
End Class
|
||||
269
SDL/zoll/usrCntlBrgBuchungenVERAG.Designer.vb
generated
Normal file
269
SDL/zoll/usrCntlBrgBuchungenVERAG.Designer.vb
generated
Normal file
@@ -0,0 +1,269 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlBrgBuchungenVERAG
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.btnNCTSDurmaz = New System.Windows.Forms.Button()
|
||||
Me.Label14 = New System.Windows.Forms.Label()
|
||||
Me.datVon = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.datBis = New System.Windows.Forms.DateTimePicker()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.cboBRG = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.picDurmaz = New System.Windows.Forms.PictureBox()
|
||||
Me.lblErr = New System.Windows.Forms.Label()
|
||||
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||
Me.cboNL = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.cbxEZollDaten = New System.Windows.Forms.CheckBox()
|
||||
CType(Me.picDurmaz, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox2.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'btnNCTSDurmaz
|
||||
'
|
||||
Me.btnNCTSDurmaz.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnNCTSDurmaz.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnNCTSDurmaz.Location = New System.Drawing.Point(6, 19)
|
||||
Me.btnNCTSDurmaz.Name = "btnNCTSDurmaz"
|
||||
Me.btnNCTSDurmaz.Size = New System.Drawing.Size(121, 37)
|
||||
Me.btnNCTSDurmaz.TabIndex = 4
|
||||
Me.btnNCTSDurmaz.Text = "Auswertung starten"
|
||||
Me.btnNCTSDurmaz.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label14
|
||||
'
|
||||
Me.Label14.AutoSize = True
|
||||
Me.Label14.Location = New System.Drawing.Point(145, 16)
|
||||
Me.Label14.Name = "Label14"
|
||||
Me.Label14.Size = New System.Drawing.Size(276, 26)
|
||||
Me.Label14.TabIndex = 5
|
||||
Me.Label14.Text = "Liefert eine Liste der im definierten Zeitraum verarbeiteten" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Bürgschaftsbuchunge" & _
|
||||
"n."
|
||||
'
|
||||
'datVon
|
||||
'
|
||||
Me.datVon.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datVon.Location = New System.Drawing.Point(470, 71)
|
||||
Me.datVon.Name = "datVon"
|
||||
Me.datVon.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datVon.TabIndex = 7
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(436, 74)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(28, 13)
|
||||
Me.Label13.TabIndex = 8
|
||||
Me.Label13.Text = "von:"
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Location = New System.Drawing.Point(145, 55)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(61, 13)
|
||||
Me.Label12.TabIndex = 8
|
||||
Me.Label12.Text = "Bürgschaft:"
|
||||
'
|
||||
'datBis
|
||||
'
|
||||
Me.datBis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
|
||||
Me.datBis.Location = New System.Drawing.Point(598, 71)
|
||||
Me.datBis.Name = "datBis"
|
||||
Me.datBis.Size = New System.Drawing.Size(93, 20)
|
||||
Me.datBis.TabIndex = 9
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(569, 74)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(23, 13)
|
||||
Me.Label9.TabIndex = 10
|
||||
Me.Label9.Text = "bis:"
|
||||
'
|
||||
'cboBRG
|
||||
'
|
||||
Me.cboBRG._allowedValuesFreiText = Nothing
|
||||
Me.cboBRG._allowFreiText = False
|
||||
Me.cboBRG._value = ""
|
||||
Me.cboBRG.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboBRG.FormattingEnabled = True
|
||||
Me.cboBRG.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.cboBRG.Location = New System.Drawing.Point(212, 51)
|
||||
Me.cboBRG.Name = "cboBRG"
|
||||
Me.cboBRG.Size = New System.Drawing.Size(218, 21)
|
||||
Me.cboBRG.TabIndex = 11
|
||||
'
|
||||
'picDurmaz
|
||||
'
|
||||
Me.picDurmaz.Image = Global.SDL.My.Resources.sicherheit11
|
||||
Me.picDurmaz.InitialImage = Global.SDL.My.Resources.durmaz
|
||||
Me.picDurmaz.Location = New System.Drawing.Point(470, 12)
|
||||
Me.picDurmaz.Name = "picDurmaz"
|
||||
Me.picDurmaz.Size = New System.Drawing.Size(221, 44)
|
||||
Me.picDurmaz.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
|
||||
Me.picDurmaz.TabIndex = 12
|
||||
Me.picDurmaz.TabStop = False
|
||||
'
|
||||
'lblErr
|
||||
'
|
||||
Me.lblErr.AutoSize = True
|
||||
Me.lblErr.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblErr.Location = New System.Drawing.Point(6, 59)
|
||||
Me.lblErr.Name = "lblErr"
|
||||
Me.lblErr.Size = New System.Drawing.Size(69, 13)
|
||||
Me.lblErr.TabIndex = 13
|
||||
Me.lblErr.Text = "Keine Daten!"
|
||||
Me.lblErr.Visible = False
|
||||
'
|
||||
'GroupBox2
|
||||
'
|
||||
Me.GroupBox2.Controls.Add(Me.cbxEZollDaten)
|
||||
Me.GroupBox2.Controls.Add(Me.cboNL)
|
||||
Me.GroupBox2.Controls.Add(Me.Label2)
|
||||
Me.GroupBox2.Controls.Add(Me.MyComboBox1)
|
||||
Me.GroupBox2.Controls.Add(Me.Label1)
|
||||
Me.GroupBox2.Controls.Add(Me.lblErr)
|
||||
Me.GroupBox2.Controls.Add(Me.picDurmaz)
|
||||
Me.GroupBox2.Controls.Add(Me.cboBRG)
|
||||
Me.GroupBox2.Controls.Add(Me.Label9)
|
||||
Me.GroupBox2.Controls.Add(Me.datBis)
|
||||
Me.GroupBox2.Controls.Add(Me.Label12)
|
||||
Me.GroupBox2.Controls.Add(Me.Label13)
|
||||
Me.GroupBox2.Controls.Add(Me.datVon)
|
||||
Me.GroupBox2.Controls.Add(Me.Label14)
|
||||
Me.GroupBox2.Controls.Add(Me.btnNCTSDurmaz)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(2, 11)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(697, 142)
|
||||
Me.GroupBox2.TabIndex = 13
|
||||
Me.GroupBox2.TabStop = False
|
||||
'
|
||||
'cboNL
|
||||
'
|
||||
Me.cboNL._allowedValuesFreiText = Nothing
|
||||
Me.cboNL._allowFreiText = False
|
||||
Me.cboNL._value = ""
|
||||
Me.cboNL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboNL.FormattingEnabled = True
|
||||
Me.cboNL.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.cboNL.Location = New System.Drawing.Point(212, 91)
|
||||
Me.cboNL.Name = "cboNL"
|
||||
Me.cboNL.Size = New System.Drawing.Size(218, 21)
|
||||
Me.cboNL.TabIndex = 17
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(145, 95)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(24, 13)
|
||||
Me.Label2.TabIndex = 16
|
||||
Me.Label2.Text = "NL:"
|
||||
'
|
||||
'MyComboBox1
|
||||
'
|
||||
Me.MyComboBox1._allowedValuesFreiText = Nothing
|
||||
Me.MyComboBox1._allowFreiText = False
|
||||
Me.MyComboBox1._value = ""
|
||||
Me.MyComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.MyComboBox1.FormattingEnabled = True
|
||||
Me.MyComboBox1.Items.AddRange(New Object() {"", "Jänner", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", "September", "Oktober", "November", "Dezember"})
|
||||
Me.MyComboBox1.Location = New System.Drawing.Point(212, 71)
|
||||
Me.MyComboBox1.Name = "MyComboBox1"
|
||||
Me.MyComboBox1.Size = New System.Drawing.Size(218, 21)
|
||||
Me.MyComboBox1.TabIndex = 15
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(145, 75)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(35, 13)
|
||||
Me.Label1.TabIndex = 14
|
||||
Me.Label1.Text = "Firma:"
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
|
||||
Me.Label8.Location = New System.Drawing.Point(3, 0)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(232, 17)
|
||||
Me.Label8.TabIndex = 14
|
||||
Me.Label8.Text = "Bürgschaftsbuchungen VERAG"
|
||||
'
|
||||
'cbxEZollDaten
|
||||
'
|
||||
Me.cbxEZollDaten.AutoSize = True
|
||||
Me.cbxEZollDaten.Checked = True
|
||||
Me.cbxEZollDaten.CheckState = System.Windows.Forms.CheckState.Checked
|
||||
Me.cbxEZollDaten.Location = New System.Drawing.Point(212, 118)
|
||||
Me.cbxEZollDaten.Name = "cbxEZollDaten"
|
||||
Me.cbxEZollDaten.Size = New System.Drawing.Size(85, 17)
|
||||
Me.cbxEZollDaten.TabIndex = 18
|
||||
Me.cbxEZollDaten.Text = "E-Zoll Daten"
|
||||
Me.cbxEZollDaten.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlBrgBuchungenVERAG
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.GroupBox2)
|
||||
Me.Name = "usrCntlBrgBuchungenVERAG"
|
||||
Me.Size = New System.Drawing.Size(702, 160)
|
||||
CType(Me.picDurmaz, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox2.ResumeLayout(False)
|
||||
Me.GroupBox2.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents btnNCTSDurmaz As System.Windows.Forms.Button
|
||||
Friend WithEvents Label14 As System.Windows.Forms.Label
|
||||
Friend WithEvents datVon As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label13 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label12 As System.Windows.Forms.Label
|
||||
Friend WithEvents datBis As System.Windows.Forms.DateTimePicker
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents cboBRG As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents picDurmaz As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents lblErr As System.Windows.Forms.Label
|
||||
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents cboNL As VERAG_PROG_ALLGEMEIN.MyComboBox
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents cbxEZollDaten As System.Windows.Forms.CheckBox
|
||||
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlBrgBuchungenVERAG.resx
Normal file
120
SDL/zoll/usrCntlBrgBuchungenVERAG.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
129
SDL/zoll/usrCntlBrgBuchungenVERAG.vb
Normal file
129
SDL/zoll/usrCntlBrgBuchungenVERAG.vb
Normal file
@@ -0,0 +1,129 @@
|
||||
Imports ClosedXML.Excel
|
||||
|
||||
Public Class usrCntlBrgBuchungenVERAG
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Public Sub New()
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub usrCntlBrgBuchungenFremd_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
cboBRG.Items.Clear()
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG AG (AT) - 05AT510000G000FP7", "05AT510000G000FP7"))
|
||||
cboBRG.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG GmbH (DE)- 17DE0000000071678", "17DE0000000071678"))
|
||||
cboBRG.SelectedIndex = 1
|
||||
|
||||
|
||||
MyComboBox1.Items.Clear()
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG", "VERAG"))
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATILLA", "ATILLA"))
|
||||
MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("IMEX", "IMEX"))
|
||||
MyComboBox1.SelectedIndex = 1
|
||||
|
||||
' cboMonatDurmaz.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
datVon.Value = CDate("01." & Now.AddMonths(-1).Month & "." & Now.AddMonths(-1).Year)
|
||||
datBis.Value = datVon.Value.AddMonths(1).AddDays(-1)
|
||||
End Sub
|
||||
|
||||
Private Sub btnNCTSDurmaz_Click(sender As Object, e As EventArgs) Handles btnNCTSDurmaz.Click
|
||||
Try
|
||||
|
||||
lblErr.Visible = False
|
||||
If cboBRG._value = "" Then Exit Sub
|
||||
|
||||
Dim where = ""
|
||||
Dim whereEZOLL = ""
|
||||
|
||||
If MyComboBox1._value <> "" Then
|
||||
where &= " and ncts_firma = '" & MyComboBox1._value & "' "
|
||||
End If
|
||||
|
||||
If cboNL._value <> "" Then
|
||||
where &= " and ncts_niederlassung = '" & cboNL._value & "' "
|
||||
Select Case cboNL._value
|
||||
Case "SUB" : whereEZOLL &= " and OperatorId IN (1) "
|
||||
Case "SBG" : whereEZOLL &= " and OperatorId IN (2) "
|
||||
Case "SUW" : whereEZOLL &= " and OperatorId IN (4,5,6,7) "
|
||||
Case "NKD" : whereEZOLL &= " and OperatorId IN (3) "
|
||||
End Select
|
||||
|
||||
|
||||
End If
|
||||
|
||||
|
||||
Dim sqlatr = " SELECT (SELECT TOP 1 CONVERT(varchar, [dySt_ergZeitpunkt] ,104 ) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=ncts_dyaAnmID AND [dySt_status] = 50 ) as Datum, ncts_Befoerderungsmittel_KennzeichenAbgang as Kennzeichen, isnull(ncts_MRN,'') as MRN, ncts_SumA_Befoerderer_Land as Land, nctsSA_AbgabenBetrag as GarantieBetrag, ncts_SumA_Befoerderer_Name as Firma,isnull(ncts_BestimmungsstelleDienststellennummer,'') as Bestimmungsstelle " &
|
||||
"FROM [tblDakosy_NCTSOut] INNER JOIN [tblDakosy_NCTSOut_Sicherheitsangaben] on ncts_Id=[nctsSA_NctsId] "
|
||||
|
||||
sqlatr &= " WHERE nctsSA_GRN='" & cboBRG._value & "' and ncts_Status between 50 and 60 " ' CONVERT(date, ncts_Trans_DatumZeit ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "'"
|
||||
sqlatr &= where
|
||||
sqlatr &= " AND (SELECT COUNT(*) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=ncts_dyaAnmID AND [dySt_status] = 50 AND CONVERT(date, [dySt_ergZeitpunkt] ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "')>0 "
|
||||
|
||||
Dim dt As DataTable = SQL.loadDgvBySql(sqlatr, "FMZOLL")
|
||||
If dt Is Nothing OrElse dt.Rows.Count = 0 Then lblErr.Visible = True : Exit Sub
|
||||
|
||||
If cbxEZollDaten.Checked And (cboNL._value = "SUB" Or cboNL._value = "SBG" Or cboNL._value = "SUW" Or cboNL._value = "NKD") Then
|
||||
|
||||
'EZOLL:
|
||||
sqlatr = " SELECT TOP 100 AnmeldungsDatum as Datum , (select [CrossIdnt] FROM [zsAnmTransp] where [zsAnmTransp].AnmID=vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme.AnmID ) as Kennzeichen, isnull(CRN,'') as MRN, (select [CrossIdntNat] FROM [zsAnmTransp] where [zsAnmTransp].AnmID=vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme.AnmID ) as Land, cast(GarantieWert as Decimal(17,2)) as GarantieBetrag,(SELECT [Na] FROM [ezoll].[dbo].[zsAnmCarrTra] where [zsAnmCarrTra].AnmID=vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme.AnmID) as Firma, isnull(Bestimmungszollstelle,'') as Bestimmungsstelle "
|
||||
|
||||
sqlatr &= " FROM vwVERAG_Zolaris_EZoll_NCTS_Datenübernahme "
|
||||
sqlatr &= " WHERE GRN IN (" & cboBRG._value & ") and AnmeldungsDatum BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "' "
|
||||
sqlatr &= whereEZOLL
|
||||
|
||||
Dim dt2 As DataTable = SQL.loadDgvBySql(sqlatr, "EZOLL")
|
||||
|
||||
If dt Is Nothing Then
|
||||
dt = dt2
|
||||
Else
|
||||
'zusammenführen:
|
||||
If dt2 IsNot Nothing Then
|
||||
dt.Merge(dt2, True, MissingSchemaAction.Add)
|
||||
|
||||
'For Each r As DataRow In dt2.Rows
|
||||
' dt.Rows.Add(r)
|
||||
'Next
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
cProgramFunctions.genExcelFromDT_NEW(dt, {"E1:E" & (dt.Rows.Count + 1)}, , "Bürgschaftsbuchungen " & cboBRG.Text, "Datum: " & Now.ToShortDateString)
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub MyComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles MyComboBox1.SelectedIndexChanged
|
||||
cboNL.Items.Clear()
|
||||
cboNL.Enabled = False
|
||||
If MyComboBox1._value = "VERAG" Then
|
||||
cboNL.Enabled = True
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG", "SBG"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WAI", "WAI"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEU", "NEU"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NKD", "NKD"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUW", "SUW"))
|
||||
|
||||
cboNL.SelectedIndex = 0
|
||||
ElseIf MyComboBox1._value = "ATILLA" Then
|
||||
cboNL.Enabled = True
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB"))
|
||||
cboNL.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG (Durmaz)", "SBG"))
|
||||
cboNL.SelectedIndex = 0
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
3163
SDL/zoll/usrCntlZOLLAuswertungen.Designer.vb
generated
Normal file
3163
SDL/zoll/usrCntlZOLLAuswertungen.Designer.vb
generated
Normal file
File diff suppressed because it is too large
Load Diff
120
SDL/zoll/usrCntlZOLLAuswertungen.resx
Normal file
120
SDL/zoll/usrCntlZOLLAuswertungen.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
1067
SDL/zoll/usrCntlZOLLAuswertungen.vb
Normal file
1067
SDL/zoll/usrCntlZOLLAuswertungen.vb
Normal file
File diff suppressed because it is too large
Load Diff
480
SDL/zoll/usrCntlZollArtikel.Designer.vb
generated
Normal file
480
SDL/zoll/usrCntlZollArtikel.Designer.vb
generated
Normal file
@@ -0,0 +1,480 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlZollArtikel
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.pnlFilter = New System.Windows.Forms.Panel()
|
||||
Me.dgvZollArtikel = New System.Windows.Forms.DataGridView()
|
||||
Me.cntxtRightClick = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.TarifnummerKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.KurzbeschreibungKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.BeschreibungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.btnRefresh = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.lblTestsystem = New System.Windows.Forms.Label()
|
||||
Me.btnExcel = New System.Windows.Forms.Button()
|
||||
Me.cntxtExcel = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ExcelEinlesenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ExcelListeÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.TabelleInExcelÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.btnEdit = New System.Windows.Forms.Button()
|
||||
Me.btnNew = New System.Windows.Forms.Button()
|
||||
Me.btnDel = New System.Windows.Forms.Button()
|
||||
Me.FlatButton1 = New System.Windows.Forms.Button()
|
||||
Me.dgvKdVermerke = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.btnAtlas = New System.Windows.Forms.Button()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.pnlOptions1 = New System.Windows.Forms.Panel()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.btnTarifnummerKopieren = New System.Windows.Forms.Button()
|
||||
Me.cntxtVermerk = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.btnDelAll = New System.Windows.Forms.Button()
|
||||
CType(Me.dgvZollArtikel, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.cntxtRightClick.SuspendLayout()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.cntxtExcel.SuspendLayout()
|
||||
CType(Me.dgvKdVermerke, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.pnlOptions1.SuspendLayout()
|
||||
Me.cntxtVermerk.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pnlFilter
|
||||
'
|
||||
Me.pnlFilter.BackColor = System.Drawing.Color.White
|
||||
Me.pnlFilter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnlFilter.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnlFilter.Location = New System.Drawing.Point(0, 34)
|
||||
Me.pnlFilter.Name = "pnlFilter"
|
||||
Me.pnlFilter.Size = New System.Drawing.Size(1278, 28)
|
||||
Me.pnlFilter.TabIndex = 11
|
||||
'
|
||||
'dgvZollArtikel
|
||||
'
|
||||
Me.dgvZollArtikel.AllowUserToAddRows = False
|
||||
Me.dgvZollArtikel.AllowUserToDeleteRows = False
|
||||
Me.dgvZollArtikel.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
|
||||
Me.dgvZollArtikel.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3
|
||||
Me.dgvZollArtikel.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvZollArtikel.ContextMenuStrip = Me.cntxtRightClick
|
||||
Me.dgvZollArtikel.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.dgvZollArtikel.Location = New System.Drawing.Point(0, 62)
|
||||
Me.dgvZollArtikel.MultiSelect = False
|
||||
Me.dgvZollArtikel.Name = "dgvZollArtikel"
|
||||
Me.dgvZollArtikel.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvZollArtikel.Size = New System.Drawing.Size(1278, 482)
|
||||
Me.dgvZollArtikel.TabIndex = 14
|
||||
'
|
||||
'cntxtRightClick
|
||||
'
|
||||
Me.cntxtRightClick.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TarifnummerKopierenToolStripMenuItem, Me.KurzbeschreibungKopierenToolStripMenuItem, Me.BeschreibungToolStripMenuItem})
|
||||
Me.cntxtRightClick.Name = "cntxtRightClick"
|
||||
Me.cntxtRightClick.Size = New System.Drawing.Size(215, 70)
|
||||
Me.cntxtRightClick.Text = "RightClick"
|
||||
'
|
||||
'TarifnummerKopierenToolStripMenuItem
|
||||
'
|
||||
Me.TarifnummerKopierenToolStripMenuItem.Name = "TarifnummerKopierenToolStripMenuItem"
|
||||
Me.TarifnummerKopierenToolStripMenuItem.Size = New System.Drawing.Size(214, 22)
|
||||
Me.TarifnummerKopierenToolStripMenuItem.Text = "Tarifnummer kopieren"
|
||||
'
|
||||
'KurzbeschreibungKopierenToolStripMenuItem
|
||||
'
|
||||
Me.KurzbeschreibungKopierenToolStripMenuItem.Name = "KurzbeschreibungKopierenToolStripMenuItem"
|
||||
Me.KurzbeschreibungKopierenToolStripMenuItem.Size = New System.Drawing.Size(214, 22)
|
||||
Me.KurzbeschreibungKopierenToolStripMenuItem.Text = "Kurzbezeichnung kopieren"
|
||||
'
|
||||
'BeschreibungToolStripMenuItem
|
||||
'
|
||||
Me.BeschreibungToolStripMenuItem.Name = "BeschreibungToolStripMenuItem"
|
||||
Me.BeschreibungToolStripMenuItem.Size = New System.Drawing.Size(214, 22)
|
||||
Me.BeschreibungToolStripMenuItem.Text = "Beschreibung kopieren"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Label1.Location = New System.Drawing.Point(3, 6)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(94, 20)
|
||||
Me.Label1.TabIndex = 1
|
||||
Me.Label1.Text = "Zoll Artikel"
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.Panel1.Controls.Add(Me.btnDelAll)
|
||||
Me.Panel1.Controls.Add(Me.btnRefresh)
|
||||
Me.Panel1.Controls.Add(Me.lblTestsystem)
|
||||
Me.Panel1.Controls.Add(Me.btnExcel)
|
||||
Me.Panel1.Controls.Add(Me.btnEdit)
|
||||
Me.Panel1.Controls.Add(Me.btnNew)
|
||||
Me.Panel1.Controls.Add(Me.btnDel)
|
||||
Me.Panel1.Controls.Add(Me.Label1)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(1278, 34)
|
||||
Me.Panel1.TabIndex = 13
|
||||
'
|
||||
'btnRefresh
|
||||
'
|
||||
Me.btnRefresh.allowBorder = False
|
||||
Me.btnRefresh.BackgroundImage = Global.SDL.My.Resources.Resources.refresh
|
||||
Me.btnRefresh.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.btnRefresh.FlatAppearance.BorderSize = 0
|
||||
Me.btnRefresh.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnRefresh.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnRefresh.Location = New System.Drawing.Point(114, 3)
|
||||
Me.btnRefresh.Name = "btnRefresh"
|
||||
Me.btnRefresh.Size = New System.Drawing.Size(52, 27)
|
||||
Me.btnRefresh.TabIndex = 23
|
||||
Me.btnRefresh.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnRefresh.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblTestsystem
|
||||
'
|
||||
Me.lblTestsystem.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.lblTestsystem.AutoSize = True
|
||||
Me.lblTestsystem.ForeColor = System.Drawing.Color.Red
|
||||
Me.lblTestsystem.Location = New System.Drawing.Point(1178, 11)
|
||||
Me.lblTestsystem.Name = "lblTestsystem"
|
||||
Me.lblTestsystem.Size = New System.Drawing.Size(97, 13)
|
||||
Me.lblTestsystem.TabIndex = 22
|
||||
Me.lblTestsystem.Text = "!! TESTSYSTEM !!"
|
||||
Me.lblTestsystem.Visible = False
|
||||
'
|
||||
'btnExcel
|
||||
'
|
||||
Me.btnExcel.ContextMenuStrip = Me.cntxtExcel
|
||||
Me.btnExcel.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.btnExcel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnExcel.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnExcel.Image = Global.SDL.My.Resources.Resources.Excel_logo
|
||||
Me.btnExcel.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnExcel.Location = New System.Drawing.Point(576, 3)
|
||||
Me.btnExcel.Name = "btnExcel"
|
||||
Me.btnExcel.Size = New System.Drawing.Size(103, 27)
|
||||
Me.btnExcel.TabIndex = 21
|
||||
Me.btnExcel.Text = "Excel"
|
||||
Me.btnExcel.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnExcel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cntxtExcel
|
||||
'
|
||||
Me.cntxtExcel.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ExcelEinlesenToolStripMenuItem, Me.ExcelListeÖffnenToolStripMenuItem, Me.TabelleInExcelÖffnenToolStripMenuItem})
|
||||
Me.cntxtExcel.Name = "cntxtExcel"
|
||||
Me.cntxtExcel.Size = New System.Drawing.Size(192, 70)
|
||||
'
|
||||
'ExcelEinlesenToolStripMenuItem
|
||||
'
|
||||
Me.ExcelEinlesenToolStripMenuItem.Name = "ExcelEinlesenToolStripMenuItem"
|
||||
Me.ExcelEinlesenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
|
||||
Me.ExcelEinlesenToolStripMenuItem.Text = "Excel einlesen"
|
||||
'
|
||||
'ExcelListeÖffnenToolStripMenuItem
|
||||
'
|
||||
Me.ExcelListeÖffnenToolStripMenuItem.Name = "ExcelListeÖffnenToolStripMenuItem"
|
||||
Me.ExcelListeÖffnenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
|
||||
Me.ExcelListeÖffnenToolStripMenuItem.Text = "Excel Liste öffnen"
|
||||
'
|
||||
'TabelleInExcelÖffnenToolStripMenuItem
|
||||
'
|
||||
Me.TabelleInExcelÖffnenToolStripMenuItem.Name = "TabelleInExcelÖffnenToolStripMenuItem"
|
||||
Me.TabelleInExcelÖffnenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
|
||||
Me.TabelleInExcelÖffnenToolStripMenuItem.Text = "Tabelle in Excel öffnen"
|
||||
'
|
||||
'btnEdit
|
||||
'
|
||||
Me.btnEdit.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.btnEdit.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnEdit.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnEdit.Image = Global.SDL.My.Resources.Resources.stift
|
||||
Me.btnEdit.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnEdit.Location = New System.Drawing.Point(314, 3)
|
||||
Me.btnEdit.Name = "btnEdit"
|
||||
Me.btnEdit.Size = New System.Drawing.Size(117, 27)
|
||||
Me.btnEdit.TabIndex = 19
|
||||
Me.btnEdit.Text = "Bearbeiten"
|
||||
Me.btnEdit.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnEdit.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnNew
|
||||
'
|
||||
Me.btnNew.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.btnNew.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnNew.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnNew.Image = Global.SDL.My.Resources.Resources.plus
|
||||
Me.btnNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnNew.Location = New System.Drawing.Point(191, 3)
|
||||
Me.btnNew.Name = "btnNew"
|
||||
Me.btnNew.Size = New System.Drawing.Size(117, 27)
|
||||
Me.btnNew.TabIndex = 18
|
||||
Me.btnNew.Text = "Neuer Eintrag"
|
||||
Me.btnNew.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnNew.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnDel
|
||||
'
|
||||
Me.btnDel.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.btnDel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnDel.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnDel.Image = Global.SDL.My.Resources.Resources.del
|
||||
Me.btnDel.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnDel.Location = New System.Drawing.Point(437, 3)
|
||||
Me.btnDel.Name = "btnDel"
|
||||
Me.btnDel.Size = New System.Drawing.Size(117, 27)
|
||||
Me.btnDel.TabIndex = 17
|
||||
Me.btnDel.Text = "Löschen"
|
||||
Me.btnDel.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnDel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'FlatButton1
|
||||
'
|
||||
Me.FlatButton1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.FlatButton1.BackgroundImage = Global.SDL.My.Resources.Resources.plus
|
||||
Me.FlatButton1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
|
||||
Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.FlatButton1.ForeColor = System.Drawing.Color.Black
|
||||
Me.FlatButton1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.FlatButton1.Location = New System.Drawing.Point(1252, 3)
|
||||
Me.FlatButton1.Name = "FlatButton1"
|
||||
Me.FlatButton1.Size = New System.Drawing.Size(23, 18)
|
||||
Me.FlatButton1.TabIndex = 28
|
||||
Me.FlatButton1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.FlatButton1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'dgvKdVermerke
|
||||
'
|
||||
Me.dgvKdVermerke.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.dgvKdVermerke.AllowUserToAddRows = False
|
||||
Me.dgvKdVermerke.AllowUserToDeleteRows = False
|
||||
Me.dgvKdVermerke.AllowUserToOrderColumns = True
|
||||
Me.dgvKdVermerke.AllowUserToResizeColumns = False
|
||||
Me.dgvKdVermerke.AllowUserToResizeRows = False
|
||||
Me.dgvKdVermerke.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.dgvKdVermerke.AutoSizeRowsMode = System.Windows.Forms.DataGridViewAutoSizeRowsMode.AllCells
|
||||
Me.dgvKdVermerke.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvKdVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.dgvKdVermerke.DefaultCellStyle = DataGridViewCellStyle1
|
||||
Me.dgvKdVermerke.Location = New System.Drawing.Point(156, 3)
|
||||
Me.dgvKdVermerke.Name = "dgvKdVermerke"
|
||||
Me.dgvKdVermerke.RowHeadersVisible = False
|
||||
Me.dgvKdVermerke.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.dgvKdVermerke.Size = New System.Drawing.Size(1119, 83)
|
||||
Me.dgvKdVermerke.TabIndex = 24
|
||||
'
|
||||
'btnAtlas
|
||||
'
|
||||
Me.btnAtlas.Enabled = False
|
||||
Me.btnAtlas.FlatAppearance.BorderSize = 0
|
||||
Me.btnAtlas.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnAtlas.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnAtlas.Image = Global.SDL.My.Resources.Resources.transfer
|
||||
Me.btnAtlas.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnAtlas.Location = New System.Drawing.Point(550, 204)
|
||||
Me.btnAtlas.Name = "btnAtlas"
|
||||
Me.btnAtlas.Size = New System.Drawing.Size(144, 39)
|
||||
Me.btnAtlas.TabIndex = 15
|
||||
Me.btnAtlas.Text = "Ausgewählte Daten" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "an ATLAS senden"
|
||||
Me.btnAtlas.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnAtlas.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(620, 263)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(322, 39)
|
||||
Me.Label4.TabIndex = 20
|
||||
Me.Label4.Text = "Der Datensatz wurde erfasst" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Der Datensatz wurde erfolgreich an das ATLAS System " &
|
||||
"übertragen" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Es ist ein Fehler bei der Übertragung aufgetreten" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
|
||||
Me.Label4.Visible = False
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(547, 263)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(67, 39)
|
||||
Me.Label3.TabIndex = 20
|
||||
Me.Label3.Text = "Angelegt" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ATLAS OK" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ATLAS ERR"
|
||||
Me.Label3.Visible = False
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(501, 263)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(40, 13)
|
||||
Me.Label2.TabIndex = 20
|
||||
Me.Label2.Text = "Status:"
|
||||
Me.Label2.Visible = False
|
||||
'
|
||||
'pnlOptions1
|
||||
'
|
||||
Me.pnlOptions1.BackColor = System.Drawing.Color.LightGray
|
||||
Me.pnlOptions1.Controls.Add(Me.FlatButton1)
|
||||
Me.pnlOptions1.Controls.Add(Me.Button2)
|
||||
Me.pnlOptions1.Controls.Add(Me.dgvKdVermerke)
|
||||
Me.pnlOptions1.Controls.Add(Me.Button1)
|
||||
Me.pnlOptions1.Controls.Add(Me.btnTarifnummerKopieren)
|
||||
Me.pnlOptions1.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.pnlOptions1.Location = New System.Drawing.Point(0, 544)
|
||||
Me.pnlOptions1.Name = "pnlOptions1"
|
||||
Me.pnlOptions1.Size = New System.Drawing.Size(1278, 86)
|
||||
Me.pnlOptions1.TabIndex = 15
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.AutoSize = True
|
||||
Me.Button2.Location = New System.Drawing.Point(7, 50)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(143, 23)
|
||||
Me.Button2.TabIndex = 0
|
||||
Me.Button2.Text = "Beschreibung kopieren"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.AutoSize = True
|
||||
Me.Button1.Location = New System.Drawing.Point(7, 28)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(143, 23)
|
||||
Me.Button1.TabIndex = 0
|
||||
Me.Button1.Text = "Kurzbezeichnung kopieren"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnTarifnummerKopieren
|
||||
'
|
||||
Me.btnTarifnummerKopieren.AutoSize = True
|
||||
Me.btnTarifnummerKopieren.Location = New System.Drawing.Point(7, 6)
|
||||
Me.btnTarifnummerKopieren.Name = "btnTarifnummerKopieren"
|
||||
Me.btnTarifnummerKopieren.Size = New System.Drawing.Size(143, 23)
|
||||
Me.btnTarifnummerKopieren.TabIndex = 0
|
||||
Me.btnTarifnummerKopieren.Text = "Tarifnummer kopieren"
|
||||
Me.btnTarifnummerKopieren.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cntxtVermerk
|
||||
'
|
||||
Me.cntxtVermerk.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1})
|
||||
Me.cntxtVermerk.Name = "cntxtExcel"
|
||||
Me.cntxtVermerk.Size = New System.Drawing.Size(119, 26)
|
||||
'
|
||||
'ToolStripMenuItem1
|
||||
'
|
||||
Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
|
||||
Me.ToolStripMenuItem1.Size = New System.Drawing.Size(118, 22)
|
||||
Me.ToolStripMenuItem1.Text = "Löschen"
|
||||
'
|
||||
'btnDelAll
|
||||
'
|
||||
Me.btnDelAll.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.btnDelAll.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnDelAll.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnDelAll.Image = Global.SDL.My.Resources.Resources.del
|
||||
Me.btnDelAll.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.btnDelAll.Location = New System.Drawing.Point(740, 4)
|
||||
Me.btnDelAll.Name = "btnDelAll"
|
||||
Me.btnDelAll.Size = New System.Drawing.Size(126, 27)
|
||||
Me.btnDelAll.TabIndex = 24
|
||||
Me.btnDelAll.Text = "Alle Löschen"
|
||||
Me.btnDelAll.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
Me.btnDelAll.UseVisualStyleBackColor = True
|
||||
'
|
||||
'usrCntlZollArtikel
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.btnAtlas)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.dgvZollArtikel)
|
||||
Me.Controls.Add(Me.pnlFilter)
|
||||
Me.Controls.Add(Me.pnlOptions1)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.Name = "usrCntlZollArtikel"
|
||||
Me.Size = New System.Drawing.Size(1278, 630)
|
||||
CType(Me.dgvZollArtikel, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.cntxtRightClick.ResumeLayout(False)
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
Me.cntxtExcel.ResumeLayout(False)
|
||||
CType(Me.dgvKdVermerke, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.pnlOptions1.ResumeLayout(False)
|
||||
Me.pnlOptions1.PerformLayout()
|
||||
Me.cntxtVermerk.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents pnlFilter As System.Windows.Forms.Panel
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents btnEdit As System.Windows.Forms.Button
|
||||
Friend WithEvents btnNew As System.Windows.Forms.Button
|
||||
Friend WithEvents btnDel As System.Windows.Forms.Button
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label4 As System.Windows.Forms.Label
|
||||
Friend WithEvents btnAtlas As System.Windows.Forms.Button
|
||||
Friend WithEvents btnExcel As System.Windows.Forms.Button
|
||||
Friend WithEvents cntxtExcel As System.Windows.Forms.ContextMenuStrip
|
||||
Friend WithEvents ExcelEinlesenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents ExcelListeÖffnenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents lblTestsystem As System.Windows.Forms.Label
|
||||
Friend WithEvents cntxtRightClick As System.Windows.Forms.ContextMenuStrip
|
||||
Friend WithEvents TarifnummerKopierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents btnRefresh As VERAG_PROG_ALLGEMEIN.FlatButton
|
||||
Friend WithEvents KurzbeschreibungKopierenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents BeschreibungToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents btnTarifnummerKopieren As System.Windows.Forms.Button
|
||||
Public WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Public WithEvents pnlOptions1 As System.Windows.Forms.Panel
|
||||
Public WithEvents dgvZollArtikel As System.Windows.Forms.DataGridView
|
||||
Friend WithEvents dgvKdVermerke As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||
Friend WithEvents FlatButton1 As System.Windows.Forms.Button
|
||||
Friend WithEvents cntxtVermerk As System.Windows.Forms.ContextMenuStrip
|
||||
Friend WithEvents ToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents TabelleInExcelÖffnenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents btnDelAll As Button
|
||||
End Class
|
||||
129
SDL/zoll/usrCntlZollArtikel.resx
Normal file
129
SDL/zoll/usrCntlZollArtikel.resx
Normal file
@@ -0,0 +1,129 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="cntxtRightClick.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>122, 17</value>
|
||||
</metadata>
|
||||
<metadata name="cntxtExcel.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 23</value>
|
||||
</metadata>
|
||||
<metadata name="cntxtVermerk.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>255, 17</value>
|
||||
</metadata>
|
||||
</root>
|
||||
852
SDL/zoll/usrCntlZollArtikel.vb
Normal file
852
SDL/zoll/usrCntlZollArtikel.vb
Normal file
@@ -0,0 +1,852 @@
|
||||
Imports System.Data.SqlClient
|
||||
Imports Microsoft.Office.Interop
|
||||
|
||||
Public Class usrCntlZollArtikel
|
||||
|
||||
Dim _berechtigungNew As Boolean = True
|
||||
Dim _berechtigungEdit As Boolean = True
|
||||
Dim _berechtigungDel As Boolean = True
|
||||
Dim _berechtigungExcel As Boolean = True
|
||||
Dim _berechtigungAtlas As Boolean = True
|
||||
Dim editAllowed As Boolean = True
|
||||
|
||||
Dim kundenSQL As New kundenSQL
|
||||
Private bindingSDL As New BindingSource
|
||||
Private dataAdapterLKW As New SqlDataAdapter
|
||||
Dim SQLZoll As New SQLZoll
|
||||
Dim FUNC As New cProgramFunctions
|
||||
Dim bindingString As String
|
||||
Dim aktbtn As String = ""
|
||||
Dim dgvInitWait As Boolean = False
|
||||
Public kdnr As Integer
|
||||
Public benutzeransicht = False
|
||||
Public displayFilter As Boolean = True
|
||||
Public parentKundenblatt As Boolean = False
|
||||
|
||||
Private Sub Me_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then lblTestsystem.Visible = True
|
||||
|
||||
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ZOLL_Kundenzolltarif", "SDL") Then
|
||||
btnNew.Enabled = True
|
||||
btnEdit.Enabled = True
|
||||
btnDel.Enabled = True
|
||||
btnDelAll.Enabled = True
|
||||
btnExcel.Enabled = True
|
||||
' btnAtlas.Visible = True
|
||||
editAllowed = True
|
||||
Else
|
||||
btnNew.Visible = False
|
||||
btnEdit.Visible = False
|
||||
btnDel.Visible = False
|
||||
btnDelAll.Visible = False
|
||||
btnExcel.Visible = False
|
||||
' btnAtlas.Enabled = False
|
||||
editAllowed = False
|
||||
End If
|
||||
|
||||
btnAtlas.Visible = False
|
||||
|
||||
'initDGVVermerke()
|
||||
|
||||
FlatButton1.Visible = VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Kunden_Vermerke_Erfassen", "SDL")
|
||||
|
||||
|
||||
btnExcel.ContextMenuStrip = cntxtExcel
|
||||
' btnAtlas.Visible = parentKundenblatt
|
||||
' btnFilter.Left = Panel4.Width - btnFilter.Width
|
||||
pnlFilter.AutoScroll = False
|
||||
Me.dgvZollArtikel.DataSource = Me.bindingSDL
|
||||
Dim where = ""
|
||||
Dim top = ""
|
||||
If kdnr > 0 Then
|
||||
where = " AND KundenNr='" & kdnr & "' "
|
||||
Else
|
||||
top = " TOP 200 "
|
||||
End If
|
||||
|
||||
newBinding("SELECT " & top & " zollArt_id, KundenNr, zollArt_Status, zollArt_Artikelnummer , zollArt_Warencodenummer, zollArt_Kennzeichen_Gueltig, zollArt_Kurzbezeichnung, Erfassungsdatum, Aenderungsdatum, Sachbearbeiter,zollArt_Warenbeschreibung FROM tblZollArtikel WHERE 1=1 " & where)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Sub initDGVVermerke()
|
||||
With dgvKdVermerke
|
||||
.DataSource = VERAG_PROG_ALLGEMEIN.cKundenVermerke.getDT(kdnr, {"ZOLLTARIF"})
|
||||
.Columns("kvm_id").Visible = False
|
||||
.Columns("kvm_art").Visible = False
|
||||
.Columns("kvm_sbId").Visible = False
|
||||
.Columns("kvm_kundennr").Visible = False
|
||||
.Columns("kvm_text").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
.Columns("kvm_text").HeaderText = "Vermerk"
|
||||
.Columns("kvm_datum").Width = 90
|
||||
.Columns("kvm_datum").HeaderText = "Datum"
|
||||
.Columns("kvm_datum").DefaultCellStyle.Format = "dd.MM.yyyy"
|
||||
.Columns("kvm_sb").HeaderText = "Sachbearbeiter"
|
||||
.Columns("kvm_sb").Width = 110
|
||||
.ClearSelection()
|
||||
End With
|
||||
End Sub
|
||||
|
||||
|
||||
Sub newBinding(ByVal sql As String)
|
||||
dgvInitWait = True
|
||||
' bindingSDL = Nothing
|
||||
dgvZollArtikel.Columns.Clear()
|
||||
txtchanged = True
|
||||
clearFilter()
|
||||
setBindingstring(sql)
|
||||
initSDLBinding()
|
||||
initAllg()
|
||||
If displayFilter Then : initFilter()
|
||||
Else : pnlFilter.Visible = False ' : Panel1.Height = 119
|
||||
End If
|
||||
txtchanged = False
|
||||
dgvInitWait = False
|
||||
If dgvZollArtikel.RowCount > 0 Then dgvZollArtikel.Rows(0).Selected = True
|
||||
dgvZollArtikel_SelectionChanged(dgvZollArtikel, New EventArgs)
|
||||
initDGVVermerke()
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub initSDLBinding()
|
||||
dgvInitWait = True
|
||||
Dim sqlstr As String = bindingString
|
||||
' dgvLKW.DataSource = bindingSDL
|
||||
Dim d As New SqlDataAdapter()
|
||||
Try
|
||||
Dim connectionString As String = cSqlDb.GetFMZOLLConnectionString
|
||||
|
||||
Dim filter As String = getFilter()
|
||||
If filter <> "" Then sqlstr &= " AND " & filter
|
||||
|
||||
Me.dataAdapterLKW = New SqlDataAdapter(sqlstr, connectionString)
|
||||
Catch ex As SqlException
|
||||
MessageBox.Show("Der Connection-String kann nicht verarbeitet werden. Wenden Sie sich an den Programmbetreuer.")
|
||||
End Try
|
||||
Dim commandBuilder As New SqlCommandBuilder(Me.dataAdapterLKW)
|
||||
Dim table As New DataTable()
|
||||
Me.dataAdapterLKW.Fill(table)
|
||||
' table.Columns("KundenNr").DefaultValue = kdNr
|
||||
table.Locale = System.Globalization.CultureInfo.InvariantCulture
|
||||
'bindingSDL.Clear()
|
||||
dgvZollArtikel.DataBindings.Clear()
|
||||
bindingSDL.DataSource = table
|
||||
dgvInitWait = False
|
||||
End Sub
|
||||
|
||||
Sub initFilter()
|
||||
dgvInitWait = True
|
||||
Dim left_value As Integer = 40 - dgvZollArtikel.HorizontalScrollingOffset
|
||||
pnlFilter.Controls.Clear()
|
||||
Dim l As New Label
|
||||
l.Left = left_value - 38 : l.Top = 7
|
||||
l.Width = 36 : l.Text = "Filter:"
|
||||
pnlFilter.Controls.Add(l)
|
||||
|
||||
If dgvZollArtikel.Rows.Count > 0 Then
|
||||
' MsgBox(dgvZollArtikel.Columns(0).CellType.Name)
|
||||
For i As Integer = 0 To dgvZollArtikel.ColumnCount - 1 Step 1
|
||||
Dim c As DataGridViewColumn = dgvZollArtikel.Columns(i)
|
||||
|
||||
If c.Visible Then '
|
||||
Try
|
||||
' MsgBox(c.CellType.Name)
|
||||
If c.Name = "clmnVerarbeiten" Then
|
||||
' MsgBox("aaa")
|
||||
Dim t As New Panel
|
||||
' t.Enabled = False
|
||||
t.Left = left_value
|
||||
t.Top = 5
|
||||
t.Width = c.Width
|
||||
pnlFilter.Controls.Add(t)
|
||||
left_value += c.Width
|
||||
Exit Try
|
||||
End If
|
||||
' MsgBox(c.ValueType.Name)
|
||||
If c.ValueType.Name = "Boolean" Then
|
||||
Dim t As New CheckBox
|
||||
t.Left = left_value
|
||||
t.Top = 5
|
||||
t.CheckAlign = ContentAlignment.MiddleCenter
|
||||
t.ThreeState = True
|
||||
t.CheckState = CheckState.Indeterminate
|
||||
t.Name = "cbxSrch_" & c.Name
|
||||
AddHandler t.CheckStateChanged, AddressOf initSearch
|
||||
t.Width = c.Width
|
||||
pnlFilter.Controls.Add(t)
|
||||
left_value += c.Width
|
||||
Exit Try
|
||||
End If
|
||||
If c.ValueType.Name = "String" Or c.ValueType.Name = "Int32" Or c.ValueType.Name = "Decimal" Then
|
||||
Dim t As New TextBox
|
||||
t.Left = left_value
|
||||
t.Top = 5
|
||||
t.Name = "txtSrch_" & c.Name
|
||||
AddHandler t.TextChanged, AddressOf initSearch
|
||||
t.Width = c.Width
|
||||
pnlFilter.Controls.Add(t)
|
||||
left_value += c.Width
|
||||
Exit Try
|
||||
End If
|
||||
If c.ValueType.Name = "DateTime" Then
|
||||
Dim t As New TextBox
|
||||
t.Left = left_value
|
||||
t.Top = 5
|
||||
t.Name = "datSrch_" & c.Name
|
||||
AddHandler t.TextChanged, AddressOf initSearch
|
||||
t.Width = c.Width
|
||||
pnlFilter.Controls.Add(t)
|
||||
left_value += c.Width
|
||||
Exit Try
|
||||
End If
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
dgvInitWait = False
|
||||
End Sub
|
||||
Dim txtchanged As Boolean = False
|
||||
Sub initSearch()
|
||||
txtchanged = True
|
||||
initSDLBinding()
|
||||
initAllg()
|
||||
txtchanged = False
|
||||
' If dgvZollArtikel.RowCount > 0 Then dgvZollArtikel.Rows(0).Cells(0).Selected = True
|
||||
dgvZollArtikel_SelectionChanged(dgvZollArtikel, New EventArgs)
|
||||
End Sub
|
||||
|
||||
Function getSqlText(t) As String
|
||||
Return t.Replace("'", "")
|
||||
End Function
|
||||
Function getFilter() As String
|
||||
Dim filter As String = ""
|
||||
Dim andstr As String = ""
|
||||
If pnlFilter.HasChildren Then
|
||||
For Each c In pnlFilter.Controls
|
||||
If c.GetType.Name = "TextBox" Then
|
||||
Try
|
||||
Dim t As TextBox = DirectCast(c, TextBox)
|
||||
If t.Text <> "" Then
|
||||
If t.Name.Contains("txtSrch_") Then
|
||||
' MsgBox(t.Name.Replace("txtSrch_", ""))
|
||||
filter &= andstr & " [" & t.Name.Replace("txtSrch_", "") & "] LIKE '%" & getSqlText(t.Text) & "%' "
|
||||
andstr = " AND "
|
||||
End If
|
||||
If t.Name.Contains("datSrch_") AndAlso t.Text.Length = 10 Then
|
||||
filter &= andstr & " ( [" & t.Name.Replace("datSrch_", "") & "] BETWEEN '" & getSqlText(t.Text) & "' AND '" & getSqlText(t.Text) & "' ) "
|
||||
andstr = " AND "
|
||||
End If
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
ElseIf c.GetType.Name = "CheckBox" Then
|
||||
Try
|
||||
Dim t As CheckBox = DirectCast(c, CheckBox)
|
||||
If Not t.CheckState = CheckState.Indeterminate Then
|
||||
filter &= andstr & " [" & t.Name.Replace("cbxSrch_", "") & "] = '" & t.CheckState & "' "
|
||||
andstr = " AND "
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End If
|
||||
Next
|
||||
' Me.bindingSDL = New BindingSource
|
||||
' Me.dgvZollArtikel.DataSource = Me.bindingSDL
|
||||
End If
|
||||
Return filter
|
||||
End Function
|
||||
|
||||
Sub clearFilter()
|
||||
If pnlFilter.HasChildren Then
|
||||
pnlFilter.Controls.Clear()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub dgvZollArtikel_CellMouseUp(sender As Object, e As DataGridViewCellMouseEventArgs) Handles dgvZollArtikel.CellMouseUp
|
||||
If e.Button = MouseButtons.Right Then dgvZollArtikel.Rows(e.RowIndex).Selected = True
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub dgvZollArtikel_ColumnWidthChanged(sender As Object, e As DataGridViewColumnEventArgs) Handles dgvZollArtikel.ColumnWidthChanged
|
||||
If Not txtchanged Then initFilter()
|
||||
End Sub
|
||||
|
||||
Sub setBindingstring(ByVal b As String)
|
||||
bindingString = b
|
||||
End Sub
|
||||
|
||||
Sub initAllg()
|
||||
With dgvZollArtikel
|
||||
If .ColumnCount = 0 Then Exit Sub
|
||||
.RowTemplate.Height = 20
|
||||
.AllowUserToOrderColumns = False
|
||||
.AllowUserToResizeRows = False
|
||||
'.Columns("Vermerk").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
'.Columns("Vermerk").MinimumWidth = 150
|
||||
.Columns("zollArt_id").Visible = False
|
||||
.Columns("zollArt_id").ReadOnly = True
|
||||
.Columns("KundenNr").HeaderText = "KundenNr"
|
||||
.Columns("KundenNr").Width = 80
|
||||
' .Columns("KundenNr").Visible = False
|
||||
.Columns("KundenNr").ReadOnly = True
|
||||
.Columns("zollArt_Status").HeaderText = "Status"
|
||||
.Columns("zollArt_Status").ReadOnly = True
|
||||
.Columns("zollArt_Status").Visible = False
|
||||
|
||||
'Exit Sub
|
||||
'.Columns("zollArt_Verarbeitungskennzeichen").Visible = False
|
||||
.Columns("zollArt_Artikelnummer").HeaderText = "Artikelnummer"
|
||||
.Columns("zollArt_Artikelnummer").Width = 110
|
||||
.Columns("zollArt_Artikelnummer").ReadOnly = True
|
||||
|
||||
' .Columns("zollArt_Dynamische_Ergaenzung_1").HeaderText = "Ergänzung 1"
|
||||
' .Columns("zollArt_Dynamische_Ergaenzung_2").HeaderText = "Ergänzung 2"
|
||||
.Columns("zollArt_Warencodenummer").HeaderText = "Tarifnummer"
|
||||
.Columns("zollArt_Warencodenummer").Width = 150
|
||||
.Columns("zollArt_Warencodenummer").ReadOnly = True
|
||||
' .Columns("zollArt_Zusatzcode_1").HeaderText = "Zusatz 1"
|
||||
' .Columns("zollArt_Zusatzcode_2").HeaderText = "Zusatz 2"
|
||||
.Columns("zollArt_Kennzeichen_Gueltig").Visible = False
|
||||
.Columns("zollArt_Kurzbezeichnung").HeaderText = "Kurzbezeichnung"
|
||||
.Columns("zollArt_Kurzbezeichnung").MinimumWidth = 220
|
||||
.Columns("zollArt_Kurzbezeichnung").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
.Columns("zollArt_Kurzbezeichnung").ReadOnly = True
|
||||
.Columns("zollArt_Warenbeschreibung").Visible = False
|
||||
'.Columns("zollArt_Warenbeschreibung").MinimumWidth = 150
|
||||
'.Columns("zollArt_Warenbeschreibung").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
'.Columns("zollArt_Statistische_Maßeinheit").Visible = False
|
||||
'.Columns("zollArt_Statistische_Maßeinheit_Qualifikator").Visible = False
|
||||
'.Columns("zollArt_Besondere_Maßeinheit").Visible = False
|
||||
'.Columns("zollArt_Besondere_Maßeinheit_Qualifikator").Visible = False
|
||||
'.Columns("zollArt_Gewicht").Visible = False
|
||||
'.Columns("zollArt_Menge").Visible = False
|
||||
' .Columns("Erfassungsdatum").HeaderText = "XXXXX"
|
||||
' .Columns("Aenderungsdatum").HeaderText = "XXXXX"
|
||||
' .Columns("Sachbearbeiter").HeaderText = "XXXXX"
|
||||
|
||||
.Columns("Aenderungsdatum").Width = 125
|
||||
.Columns("Erfassungsdatum").Width = 125
|
||||
.Columns("Erfassungsdatum").ReadOnly = True
|
||||
.Columns("Aenderungsdatum").HeaderText = "Änderungsdatum"
|
||||
.Columns("Aenderungsdatum").ReadOnly = True
|
||||
.Columns("Sachbearbeiter").ReadOnly = True
|
||||
|
||||
If .Columns("clmnVerarbeiten") Is Nothing Then
|
||||
Dim c As New DataGridViewCheckBoxColumn
|
||||
c.Name = "clmnVerarbeiten"
|
||||
c.HeaderText = "ATLAS"
|
||||
c.Width = 50
|
||||
c.ReadOnly = False
|
||||
c.Visible = False
|
||||
.Columns.Insert(0, c)
|
||||
End If
|
||||
|
||||
If benutzeransicht Then
|
||||
|
||||
.Columns("Erfassungsdatum").Visible = False
|
||||
.Columns("Aenderungsdatum").Visible = False
|
||||
.Columns("Sachbearbeiter").Visible = False
|
||||
.Columns("KundenNr").Visible = False
|
||||
.Columns("zollArt_Warenbeschreibung").Visible = True
|
||||
.Columns("zollArt_Warenbeschreibung").HeaderText = "Warenbeschreibung"
|
||||
.Columns("zollArt_Warenbeschreibung").MinimumWidth = 350
|
||||
.Columns("zollArt_Warenbeschreibung").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||
|
||||
End If
|
||||
End With
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub dgvLKW_CellValueChanged(sender As Object, e As DataGridViewCellEventArgs) Handles dgvZollArtikel.CellValueChanged
|
||||
'btnDel.Enabled = True
|
||||
End Sub
|
||||
Private Sub dgvZollArtikel_SelectionChanged(sender As Object, e As EventArgs) Handles dgvZollArtikel.SelectionChanged
|
||||
btnEdit.Enabled = (dgvZollArtikel.SelectedCells.Count > 0)
|
||||
End Sub
|
||||
|
||||
Private Sub btnDel_Click(sender As Object, e As EventArgs) Handles btnDel.Click
|
||||
If dgvZollArtikel.SelectedRows.Count > 0 Then
|
||||
If dgvZollArtikel.CurrentRow.Selected Then
|
||||
If vbYes = MsgBox("Möchten Sie den Eintrag wirklich löschen?", vbYesNoCancel) Then
|
||||
dgvZollArtikel.Rows.Remove(dgvZollArtikel.CurrentRow)
|
||||
save()
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
'If dgvZollArtikel.SelectedRows.Count > 0 Then
|
||||
' If vbYes = MsgBox("Möchten Sie '" & dgvZollArtikel.SelectedRows.Count & "' Einträge wirklich löschen?", vbYesNoCancel) Then
|
||||
' For Each r In dgvZollArtikel.SelectedRows
|
||||
' If dgvZollArtikel.CurrentRow.Selected Then
|
||||
' If vbYes = MsgBox("Möchten Sie den Eintrag wirklich löschen?", vbYesNoCancel) Then
|
||||
' dgvZollArtikel.Rows.Remove(dgvZollArtikel.CurrentRow)
|
||||
' save()
|
||||
' End If
|
||||
' End If
|
||||
' Next
|
||||
' End If
|
||||
'End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub save()
|
||||
Try
|
||||
Me.dataAdapterLKW.Update(CType(Me.bindingSDL.DataSource, DataTable))
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, "Es ist ein Fehler aufgetreten:")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub btnNew_Click(sender As Object, e As EventArgs) Handles btnNew.Click
|
||||
showDetails(kdnr, True, parentKundenblatt)
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnEdit.Click
|
||||
If dgvZollArtikel.SelectedCells.Count > 0 Then
|
||||
showDetails(dgvZollArtikel.CurrentRow.Cells("KundenNr").Value, False, parentKundenblatt, dgvZollArtikel.CurrentRow.Cells("zollArt_id").Value)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Sub showDetails(kdnr As String, newEntry As Boolean, parentKundenblatt As Boolean, Optional cursorAtID As String = "")
|
||||
Dim newartikel As New frmAddArtikelATLAS
|
||||
If parentKundenblatt Then newartikel.kdNr = kdnr
|
||||
newartikel.parentKundenblatt = parentKundenblatt
|
||||
newartikel.newEntry = newEntry
|
||||
newartikel.cursorAtID = cursorAtID
|
||||
newartikel.editAllowed = editAllowed
|
||||
newartikel.Show()
|
||||
AddHandler newartikel.FormClosed, Sub()
|
||||
' Me_Load(Me, New EventArgs)
|
||||
End Sub
|
||||
End Sub
|
||||
|
||||
Private Sub dgvZollArtikel_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvZollArtikel.CellDoubleClick
|
||||
Button1_Click(btnEdit, New EventArgs)
|
||||
End Sub
|
||||
|
||||
Function getZollArtIDs() As List(Of Integer)
|
||||
Dim ii As New List(Of Integer)
|
||||
For Each r As DataGridViewRow In dgvZollArtikel.Rows
|
||||
If r.Cells("clmnVerarbeiten").Value Then
|
||||
ii.Add(r.Cells("zollArt_id").Value)
|
||||
End If
|
||||
Next
|
||||
Return ii
|
||||
End Function
|
||||
|
||||
Private Sub btnAtlas_Click(sender As Object, e As EventArgs) Handles btnAtlas.Click
|
||||
Dim ii As List(Of Integer) = getZollArtIDs()
|
||||
If ii.Count = 0 Then Exit Sub
|
||||
If vbYes = MsgBox("Möchten Sie wirklich " & ii.Count & " Zeilen einarbeiten?", vbYesNoCancel) Then
|
||||
'FlatButton4.PerformClick()
|
||||
Dim artikel As List(Of cArtikel) = SQLZoll.getArtikelByIDs(ii)
|
||||
For Each a In artikel
|
||||
If a.status <> "" And a.status <> "Angelegt" And a.status <> "Erfassung" Then
|
||||
a.Verarbeitungskennzeichen = "1"
|
||||
Else
|
||||
a.Verarbeitungskennzeichen = "0"
|
||||
End If
|
||||
Next
|
||||
|
||||
'zollArt_id
|
||||
'artikel.Add(initArtikel)
|
||||
frmStatusFSSAtlas.artikel = artikel
|
||||
frmStatusFSSAtlas.Show()
|
||||
End If
|
||||
'If btnUpdate.Enabled Then
|
||||
' btnUpdate.PerformClick()
|
||||
' End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub genExcelArtikelstamm()
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim exclApp As Object 'as Application
|
||||
Dim Datei As Object 'as WorkBook
|
||||
'Dim Blatt As Object 'as WorkSheet
|
||||
exclApp = CreateObject("Excel.Application")
|
||||
|
||||
|
||||
Try
|
||||
If Not My.Computer.FileSystem.DirectoryExists(Environment.GetFolderPath(Environment.SpecialFolder.Personal) & "\VERAG\tmp\") Then
|
||||
My.Computer.FileSystem.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.Personal) & "\VERAG\tmp\")
|
||||
End If
|
||||
|
||||
Dim strFileName As String = Environment.GetFolderPath(Environment.SpecialFolder.Personal) & "\VERAG\tmp\tmp.xlsx"
|
||||
With exclApp
|
||||
.DisplayAlerts = False
|
||||
|
||||
.Visible = False
|
||||
Datei = .Workbooks.Open(AppDomain.CurrentDomain.BaseDirectory & "Resources\Artikelstamm.xlsx")
|
||||
' Blatt = Datei.Worksheets("DIENSTPLAN")
|
||||
.Visible = True
|
||||
' .DisplayAlerts = exclApp.WdAlertLevel.wdAlertsNone
|
||||
Try : Datei.SaveAs(strFileName) : Catch : End Try
|
||||
|
||||
End With
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub importExcel()
|
||||
Dim kdnrTmp As String = ""
|
||||
If kdnr > 0 Then
|
||||
kdnrTmp = kdnr
|
||||
Else
|
||||
kdnrTmp = InputBox("Bitte geben Sie die Kundennummer ein: ", "Daten aus Excel Einlesen", "")
|
||||
If kdnrTmp.Trim = "" Then MsgBox("Kundennummer ungültig") : Exit Sub
|
||||
If Not IsNumeric(kdnrTmp) Then MsgBox("Kundennummer ungültig") : Exit Sub
|
||||
If Not kundenSQL.existByKdNr(kdnrTmp) Then MsgBox("Kundennummer ungültig") : Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
|
||||
Dim fd As New OpenFileDialog
|
||||
fd.Filter = "Excel Dateien|*.xls;*.xlsx"
|
||||
Dim result As DialogResult = fd.ShowDialog()
|
||||
|
||||
If Not fd.FileName.EndsWith(".xls") And Not fd.FileName.EndsWith(".xlsx") Then
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If result = System.Windows.Forms.DialogResult.OK Then
|
||||
|
||||
|
||||
Me.Cursor = Cursors.WaitCursor
|
||||
Dim exclApp As New Excel.Application 'Object 'as Application
|
||||
Dim Datei As Excel.Workbook ' 'as WorkBook
|
||||
Dim Blatt As Excel.Worksheet 'Object 'as WorkSheet
|
||||
|
||||
With exclApp
|
||||
Try
|
||||
|
||||
.CutCopyMode = False
|
||||
|
||||
.DisplayAlerts = False
|
||||
|
||||
|
||||
Datei = .Workbooks.Open(fd.FileName)
|
||||
Blatt = Datei.Worksheets(1)
|
||||
|
||||
Datei.Activate()
|
||||
|
||||
Try
|
||||
Blatt.ShowAllData() 'Falls Filter ausgewählt wurde
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Dim startFound As Boolean = False
|
||||
Dim endFound As Boolean = False
|
||||
|
||||
|
||||
Dim startRows As Integer = 2
|
||||
While startRows < Blatt.UsedRange.Rows.Count
|
||||
If Not Blatt.Range("B" & startRows) Is Nothing And Blatt.Range("B" & startRows).Value.ToString.Contains("Artikel-Nr") Then
|
||||
startRows += 1
|
||||
startFound = True
|
||||
Exit While
|
||||
End If
|
||||
startRows += 1
|
||||
End While
|
||||
|
||||
If startFound = False Then
|
||||
MsgBox("Falsches Format!")
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim endRows As Integer = startRows
|
||||
While endRows < Blatt.UsedRange.Rows.Count
|
||||
If Not Blatt.Range("B" & endRows) Is Nothing AndAlso Not Blatt.Range("B" & endRows).Value Is Nothing AndAlso Not Blatt.Range("B" & endRows).Value.ToString.Trim = "" Then
|
||||
endFound = True
|
||||
Else
|
||||
Exit While
|
||||
End If
|
||||
endRows += 1
|
||||
End While
|
||||
endRows -= 1
|
||||
|
||||
If Not startFound Or Not endFound Then
|
||||
MsgBox("Keine Daten vorhanden!")
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
|
||||
'Laden des Bereiches aus dem Excel:
|
||||
Dim myRange As Excel.Range
|
||||
myRange = Blatt.Range("B" & startRows & ":G" & endRows & "")
|
||||
Dim myArray As Object(,) '<-- declared as 2D Array
|
||||
myArray = myRange.Value 'store the content of each cell
|
||||
'myArray(i_soll2 - startRows + 1, 4)
|
||||
|
||||
|
||||
'Prüfung
|
||||
Try
|
||||
For i As Integer = 1 To endRows - startRows + 1 Step 1
|
||||
Dim c As Boolean
|
||||
If myArray(i, 1) Is Nothing Or myArray(i, 1).ToString() = "" Or myArray(i, 1).ToString().Length > 35 Then c = True : fehler(i, 1, myArray(i, 1).ToString())
|
||||
If Not myArray(i, 2) Is Nothing Then
|
||||
If myArray(i, 2).ToString().Length > 200 Then c = True : fehler(i, 2, myArray(i, 2).ToString())
|
||||
End If
|
||||
If Not myArray(i, 3) Is Nothing Then
|
||||
If myArray(i, 3).ToString().Length > 200 Then c = True : fehler(i, 3, myArray(i, 3).ToString())
|
||||
End If
|
||||
If myArray(i, 4) Is Nothing Or myArray(i, 4).ToString() = "" Or myArray(i, 4).ToString().Replace(" ", "").Replace(".", "").Length > 11 Or Not IsNumeric(myArray(i, 4).ToString().Replace(" ", "").Replace(".", "")) Then c = True : fehler(i, 4, myArray(i, 4).ToString())
|
||||
If myArray(i, 5) Is Nothing Or myArray(i, 5).ToString() = "" Or myArray(i, 5).ToString().Length > 60 Then c = True : fehler(i, 5, myArray(i, 5).ToString())
|
||||
If myArray(i, 6) Is Nothing Or myArray(i, 6).ToString() = "" Or myArray(i, 6).ToString().Length > 240 Then c = True : fehler(i, 6, myArray(i, 6).ToString())
|
||||
|
||||
If c Then
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler bei der Prüfung!" & ex.Message)
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
|
||||
Dim artikel As New List(Of cArtikel)
|
||||
Try
|
||||
For i As Integer = 1 To endRows - startRows + 1 Step 1
|
||||
Dim a As New cArtikel
|
||||
a.Artikelnummer = myArray(i, 1).ToString
|
||||
If Not myArray(i, 2) Is Nothing Then a.Dynamische_Ergänzung_1 = myArray(i, 2).ToString
|
||||
If Not myArray(i, 3) Is Nothing Then a.Dynamische_Ergänzung_2 = myArray(i, 3).ToString
|
||||
a.Warencodenummer = myArray(i, 4).ToString.Replace(" ", "").Replace(".", "")
|
||||
a.Kurzbezeichnung = myArray(i, 5).ToString
|
||||
a.Warenbeschreibung = myArray(i, 6).ToString
|
||||
a.Verarbeitungskennzeichen = "0"
|
||||
a.Kundennummer = kdnrTmp
|
||||
|
||||
a.status = "Angelegt"
|
||||
|
||||
artikel.Add(a)
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Einlesen der Excel-Datei!" & vbNewLine & vbNewLine & ex.Message & ex.StackTrace)
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
Try
|
||||
For Each a In artikel
|
||||
Dim id_tmp = SQLZoll.insertArtikel(a)
|
||||
If id_tmp < 0 Then
|
||||
Throw New Exception
|
||||
Else
|
||||
a.zollArt_id = id_tmp
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Einlesen in die Datenbank!" & vbNewLine & vbNewLine & ex.Message & ex.StackTrace)
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
If False Then 'ATLAS
|
||||
If vbYes = MsgBox(artikel.Count & " Datensätze wurden eingelesen. " & vbNewLine & vbNewLine & " Sollen die Daten in ATLAS eingelesen werden?", vbYesNo) Then 'einlesen
|
||||
Try
|
||||
|
||||
frmStatusFSSAtlas.artikel = artikel
|
||||
frmStatusFSSAtlas.Show()
|
||||
' AddHandler frmStatusFSSAtlas.FormClosed, AddressOf Me_Load
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Einlesen in ATLAS!" & vbNewLine & vbNewLine & ex.Message & ex.StackTrace)
|
||||
Me.Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
.Visible = False
|
||||
|
||||
' AddHandler exclApp.WorkbookBeforeClose, AddressOf BeforeBookClose
|
||||
'Excelobjekte freistellten
|
||||
' For Each obj In New Object() {exclApp, Datei, Datei, Blatt, Blatt}
|
||||
' System.Runtime.InteropServices.Marshal.FinalReleaseComObject(obj)
|
||||
' Next
|
||||
Datei.Close()
|
||||
|
||||
Me_Load(Me, New EventArgs)
|
||||
|
||||
MsgBox("Import erfolgreich!")
|
||||
Catch ex As Exception
|
||||
'
|
||||
Me.Cursor = Cursors.Default
|
||||
MsgBox("FEHLER! Datei im richtigen Format?" & vbNewLine & vbNewLine & ex.Message & ex.StackTrace)
|
||||
' Return False
|
||||
End Try
|
||||
End With
|
||||
'Return True
|
||||
Else
|
||||
MsgBox("Keine Datei ausgewählt!")
|
||||
End If
|
||||
|
||||
Me.Cursor = Cursors.Default
|
||||
|
||||
|
||||
End Sub
|
||||
Sub fehler(zeile, spalte, wert)
|
||||
MsgBox("Es sind fehlerhafte Daten vorhanden! " & vbNewLine & vbNewLine & "Zeile: " & zeile & " Spalte: " & spalte & " Wert: '" & wert & "'" & vbNewLine & vbNewLine & " Bitte prüfen und erneut versuchen!")
|
||||
End Sub
|
||||
|
||||
Private Sub ExcelEinlesenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ExcelEinlesenToolStripMenuItem.Click
|
||||
importExcel()
|
||||
End Sub
|
||||
|
||||
Private Sub ExcelListeÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ExcelListeÖffnenToolStripMenuItem.Click
|
||||
genExcelArtikelstamm()
|
||||
End Sub
|
||||
|
||||
Private Sub FlatButton1_Click(sender As Object, e As MouseEventArgs) Handles btnExcel.MouseClick, btnExcel.Click
|
||||
btnExcel.ContextMenuStrip = cntxtExcel
|
||||
btnExcel.ContextMenuStrip.Show(btnExcel, e.Location)
|
||||
' FlatButton1.ContextMenuStrip.Show()
|
||||
End Sub
|
||||
|
||||
Private Sub FlatButton1_MouseLeave(sender As Object, e As EventArgs) Handles btnExcel.MouseLeave
|
||||
' FlatButton1.ContextMenuStrip.Hide()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub TarifnummerKopierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TarifnummerKopierenToolStripMenuItem.Click
|
||||
If dgvZollArtikel.SelectedRows.Count > 0 Then
|
||||
Dim tmp As String = dgvZollArtikel.SelectedRows(0).Cells("zollArt_Warencodenummer").Value
|
||||
Clipboard.SetDataObject(tmp, True)
|
||||
Dim iData As IDataObject = Clipboard.GetDataObject()
|
||||
If iData.GetDataPresent(DataFormats.Text) Then
|
||||
If tmp = CType(iData.GetData(DataFormats.Text), String) Then
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
MsgBox("Problem beim Zwischenspeichern der Daten!")
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub FlatButton1_Click(sender As Object, e As EventArgs) Handles btnRefresh.Click, btnExcel.MouseClick, btnExcel.Click
|
||||
initSearch()
|
||||
End Sub
|
||||
|
||||
Private Sub KurzbeschreibungKopierenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KurzbeschreibungKopierenToolStripMenuItem.Click
|
||||
If dgvZollArtikel.SelectedRows.Count > 0 Then
|
||||
Dim tmp As String = dgvZollArtikel.SelectedRows(0).Cells("zollArt_Kurzbezeichnung").Value
|
||||
Clipboard.SetDataObject(tmp, True)
|
||||
Dim iData As IDataObject = Clipboard.GetDataObject()
|
||||
If iData.GetDataPresent(DataFormats.Text) Then
|
||||
If tmp = CType(iData.GetData(DataFormats.Text), String) Then
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
MsgBox("Problem beim Zwischenspeichern der Daten!")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub BeschreibungToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BeschreibungToolStripMenuItem.Click
|
||||
If dgvZollArtikel.SelectedRows.Count > 0 Then
|
||||
Dim tmp As String = dgvZollArtikel.SelectedRows(0).Cells("zollArt_Warenbeschreibung").Value
|
||||
Clipboard.SetDataObject(tmp, True)
|
||||
Dim iData As IDataObject = Clipboard.GetDataObject()
|
||||
If iData.GetDataPresent(DataFormats.Text) Then
|
||||
If tmp = CType(iData.GetData(DataFormats.Text), String) Then
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
MsgBox("Problem beim Zwischenspeichern der Daten!")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub pnl_Paint(sender As Object, e As PaintEventArgs) Handles pnlOptions1.Paint
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnTarifnummerKopieren_Click(sender As Object, e As EventArgs) Handles btnTarifnummerKopieren.Click
|
||||
TarifnummerKopierenToolStripMenuItem.PerformClick()
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
KurzbeschreibungKopierenToolStripMenuItem.PerformClick()
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
BeschreibungToolStripMenuItem.PerformClick()
|
||||
End Sub
|
||||
|
||||
Private Sub FlatButton1_Click_1(sender As Object, e As EventArgs) Handles FlatButton1.Click
|
||||
|
||||
If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Kunden_Vermerke_Erfassen", "SDL") Then Exit Sub
|
||||
|
||||
Dim f As New VERAG_PROG_ALLGEMEIN.frmKdVermerkAdd(kdnr, "ZOLLTARIF")
|
||||
If f.ShowDialog(Me) = vbOK Then
|
||||
initDGVVermerke()
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub dgvKdVermerke_CellMouseDown(sender As Object, e As DataGridViewCellMouseEventArgs) Handles dgvKdVermerke.CellMouseDown
|
||||
If e.Button = Windows.Forms.MouseButtons.Right Then
|
||||
dgvKdVermerke.ClearSelection()
|
||||
dgvKdVermerke.Rows(e.RowIndex).Selected = True
|
||||
cntxtVermerk.Show(System.Windows.Forms.Cursor.Position)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem1.Click
|
||||
If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Kunden_Vermerke_Erfassen", "SDL") Then Exit Sub
|
||||
If dgvKdVermerke.SelectedRows.Count > 0 Then
|
||||
If IsNumeric(dgvKdVermerke.SelectedRows(0).Cells("kvm_id").Value) Then
|
||||
If vbYes = MsgBox("Möchten Sie den Eintrag wirklich löschen?", vbYesNoCancel) Then
|
||||
If VERAG_PROG_ALLGEMEIN.cKundenVermerke.DELETE(dgvKdVermerke.SelectedRows(0).Cells("kvm_id").Value) Then
|
||||
initDGVVermerke()
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Label6_Click(sender As Object, e As EventArgs)
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub TabelleInExcelÖffnenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TabelleInExcelÖffnenToolStripMenuItem.Click
|
||||
FUNC.genExcelFromDGV_NEW(dgvZollArtikel)
|
||||
End Sub
|
||||
|
||||
Private Sub btnDelAll_Click(sender As Object, e As EventArgs) Handles btnDelAll.Click
|
||||
If vbYes = MsgBox("Möchten Sie wirklich ALLE Einträge löschen (" & dgvZollArtikel.RowCount & ")?", vbYesNoCancel) Then
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
If SQL.doSQL("DELETE [tblZollArtikel] where KundenNr='" & kdnr & "'", "FMZOLL") Then
|
||||
initSearch()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
93
SDL/zoll/usrCntlZollHauptmenue.Designer.vb
generated
Normal file
93
SDL/zoll/usrCntlZollHauptmenue.Designer.vb
generated
Normal file
@@ -0,0 +1,93 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class usrCntlZollHauptmenue
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.btnWord = New System.Windows.Forms.Button()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'btnWord
|
||||
'
|
||||
Me.btnWord.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnWord.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.btnWord.Location = New System.Drawing.Point(6, 19)
|
||||
Me.btnWord.Name = "btnWord"
|
||||
Me.btnWord.Size = New System.Drawing.Size(121, 49)
|
||||
Me.btnWord.TabIndex = 4
|
||||
Me.btnWord.Text = "Artikel tarifieren"
|
||||
Me.btnWord.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Controls.Add(Me.btnWord)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(8, 34)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(697, 86)
|
||||
Me.GroupBox1.TabIndex = 8
|
||||
Me.GroupBox1.TabStop = False
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(145, 30)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(278, 13)
|
||||
Me.Label1.TabIndex = 5
|
||||
Me.Label1.Text = "Hier können Sie Artikel verwalten und an ATLAS senden." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.Label3.Location = New System.Drawing.Point(9, 14)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(125, 17)
|
||||
Me.Label3.TabIndex = 9
|
||||
Me.Label3.Text = "Artikel tarifieren"
|
||||
'
|
||||
'usrCntlZollHauptmenue
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Name = "usrCntlZollHauptmenue"
|
||||
Me.Size = New System.Drawing.Size(970, 614)
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents btnWord As System.Windows.Forms.Button
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
|
||||
End Class
|
||||
120
SDL/zoll/usrCntlZollHauptmenue.resx
Normal file
120
SDL/zoll/usrCntlZollHauptmenue.resx
Normal file
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
8
SDL/zoll/usrCntlZollHauptmenue.vb
Normal file
8
SDL/zoll/usrCntlZollHauptmenue.vb
Normal file
@@ -0,0 +1,8 @@
|
||||
Public Class usrCntlZollHauptmenue
|
||||
Public BERECHTIGUNEN As List(Of cBerechtigungen)
|
||||
Private Sub btnWord_Click(sender As Object, e As EventArgs) Handles btnWord.Click
|
||||
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG("ZOLL_Kundenzolltarif", Me.FindForm) = 0 Then
|
||||
frmMain.ToolStripMenuItem1_Click(frmMain.ToolStripMenuItem1, New EventArgs)
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user