diff --git a/Aviso/Anhänge/frmAddSendnung.Designer.vb b/Aviso/Anhänge/frmAddSendnung.Designer.vb new file mode 100644 index 0000000..f370d17 --- /dev/null +++ b/Aviso/Anhänge/frmAddSendnung.Designer.vb @@ -0,0 +1,229 @@ + _ +Partial Class frmAddSendnung + Inherits System.Windows.Forms.Form + + 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. + _ + 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. + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAddSendnung)) + Me.cboAbfertigungsart = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.txtEmpfaenger = New VERAG_PROG_ALLGEMEIN.KdSearchBox() + Me.txtGewicht = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.Label19 = New System.Windows.Forms.Label() + Me.Label17 = New System.Windows.Forms.Label() + Me.txtColli = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.rtbWarenbezeichnung = New System.Windows.Forms.RichTextBox() + Me.Label23 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.btn = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'cboAbfertigungsart + ' + Me.cboAbfertigungsart._allowedValuesFreiText = Nothing + Me.cboAbfertigungsart._allowFreiText = False + Me.cboAbfertigungsart._value = "" + Me.cboAbfertigungsart.BackColor = System.Drawing.Color.White + Me.cboAbfertigungsart.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboAbfertigungsart.FormattingEnabled = True + Me.cboAbfertigungsart.Location = New System.Drawing.Point(12, 29) + Me.cboAbfertigungsart.Name = "cboAbfertigungsart" + Me.cboAbfertigungsart.Size = New System.Drawing.Size(359, 24) + Me.cboAbfertigungsart.TabIndex = 1 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.ForeColor = System.Drawing.Color.Black + Me.Label1.Location = New System.Drawing.Point(10, 9) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(109, 17) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Abfertigungsart:" + ' + 'txtEmpfaenger + ' + Me.txtEmpfaenger._AllowSetValue = True + Me.txtEmpfaenger._autoSizeGross = True + Me.txtEmpfaenger._display_Name1 = False + Me.txtEmpfaenger._displayAVISO_Email = False + Me.txtEmpfaenger._displayFullName = False + Me.txtEmpfaenger._displayWoelflKd = False + Me.txtEmpfaenger._hideIfListEmpty = True + Me.txtEmpfaenger._loadKdData = True + Me.txtEmpfaenger._ValueKdAndName = False + Me.txtEmpfaenger.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.txtEmpfaenger.dgvpos = "LEFT" + Me.txtEmpfaenger.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.txtEmpfaenger.KdName = Nothing + Me.txtEmpfaenger.KdNr = "-1" + Me.txtEmpfaenger.kdNrField = Nothing + Me.txtEmpfaenger.KdNrNullInt = Nothing + Me.txtEmpfaenger.Location = New System.Drawing.Point(12, 84) + Me.txtEmpfaenger.Name = "txtEmpfaenger" + Me.txtEmpfaenger.nurAktive = True + Me.txtEmpfaenger.searchActive = True + Me.txtEmpfaenger.Size = New System.Drawing.Size(359, 23) + Me.txtEmpfaenger.TabIndex = 3 + Me.txtEmpfaenger.usrcntl = Nothing + ' + 'txtGewicht + ' + Me.txtGewicht._DateTimeOnly = False + Me.txtGewicht._numbersOnly = False + Me.txtGewicht._numbersOnlyKommastellen = "" + Me.txtGewicht._Prozent = False + Me.txtGewicht._ShortDateNew = False + Me.txtGewicht._ShortDateOnly = False + Me.txtGewicht._TimeOnly = False + Me.txtGewicht._value = Nothing + Me.txtGewicht._Waehrung = False + Me.txtGewicht._WaehrungZeichen = True + Me.txtGewicht.ForeColor = System.Drawing.Color.Black + Me.txtGewicht.Location = New System.Drawing.Point(152, 165) + Me.txtGewicht.MaxLineLength = -1 + Me.txtGewicht.MaxLines_Warning = "" + Me.txtGewicht.MaxLines_Warning_Label = Nothing + Me.txtGewicht.Name = "txtGewicht" + Me.txtGewicht.Size = New System.Drawing.Size(60, 20) + Me.txtGewicht.TabIndex = 9 + Me.txtGewicht.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'Label19 + ' + Me.Label19.AutoSize = True + Me.Label19.Location = New System.Drawing.Point(9, 117) + Me.Label19.Name = "Label19" + Me.Label19.Size = New System.Drawing.Size(100, 13) + Me.Label19.TabIndex = 4 + Me.Label19.Text = "Warenbezeichnung" + ' + 'Label17 + ' + Me.Label17.AutoSize = True + Me.Label17.Location = New System.Drawing.Point(10, 168) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(73, 13) + Me.Label17.TabIndex = 6 + Me.Label17.Text = "Colli/Gewicht:" + ' + 'txtColli + ' + Me.txtColli._DateTimeOnly = False + Me.txtColli._numbersOnly = False + Me.txtColli._numbersOnlyKommastellen = "" + Me.txtColli._Prozent = False + Me.txtColli._ShortDateNew = False + Me.txtColli._ShortDateOnly = False + Me.txtColli._TimeOnly = False + Me.txtColli._value = Nothing + Me.txtColli._Waehrung = False + Me.txtColli._WaehrungZeichen = True + Me.txtColli.ForeColor = System.Drawing.Color.Black + Me.txtColli.Location = New System.Drawing.Point(84, 165) + Me.txtColli.MaxLineLength = -1 + Me.txtColli.MaxLines_Warning = "" + Me.txtColli.MaxLines_Warning_Label = Nothing + Me.txtColli.Name = "txtColli" + Me.txtColli.Size = New System.Drawing.Size(46, 20) + Me.txtColli.TabIndex = 7 + Me.txtColli.TextAlign = System.Windows.Forms.HorizontalAlignment.Right + ' + 'rtbWarenbezeichnung + ' + Me.rtbWarenbezeichnung.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.rtbWarenbezeichnung.Cursor = System.Windows.Forms.Cursors.IBeam + Me.rtbWarenbezeichnung.Location = New System.Drawing.Point(12, 133) + Me.rtbWarenbezeichnung.MaxLength = 500 + Me.rtbWarenbezeichnung.Name = "rtbWarenbezeichnung" + Me.rtbWarenbezeichnung.Size = New System.Drawing.Size(359, 32) + Me.rtbWarenbezeichnung.TabIndex = 5 + Me.rtbWarenbezeichnung.Text = "" + ' + 'Label23 + ' + Me.Label23.AutoSize = True + Me.Label23.Location = New System.Drawing.Point(129, 168) + Me.Label23.Name = "Label23" + Me.Label23.Size = New System.Drawing.Size(23, 13) + Me.Label23.TabIndex = 8 + Me.Label23.Text = "Pk." + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.Label2.Location = New System.Drawing.Point(10, 64) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(81, 17) + Me.Label2.TabIndex = 2 + Me.Label2.Text = "Empfänger:" + ' + 'btn + ' + Me.btn.DialogResult = System.Windows.Forms.DialogResult.OK + Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn.Location = New System.Drawing.Point(12, 197) + Me.btn.Name = "btn" + Me.btn.Size = New System.Drawing.Size(359, 52) + Me.btn.TabIndex = 10 + Me.btn.Text = "OK" + Me.btn.UseVisualStyleBackColor = True + ' + 'frmAddSendnung + ' + 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(389, 261) + Me.Controls.Add(Me.btn) + Me.Controls.Add(Me.Label2) + Me.Controls.Add(Me.txtGewicht) + Me.Controls.Add(Me.Label19) + Me.Controls.Add(Me.Label17) + Me.Controls.Add(Me.txtColli) + Me.Controls.Add(Me.rtbWarenbezeichnung) + Me.Controls.Add(Me.Label23) + Me.Controls.Add(Me.txtEmpfaenger) + Me.Controls.Add(Me.cboAbfertigungsart) + Me.Controls.Add(Me.Label1) + Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.Name = "frmAddSendnung" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "Sendnung hinzufügen" + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + + Friend WithEvents cboAbfertigungsart As VERAG_PROG_ALLGEMEIN.MyComboBox + Friend WithEvents Label1 As Label + Friend WithEvents txtEmpfaenger As VERAG_PROG_ALLGEMEIN.KdSearchBox + Friend WithEvents txtGewicht As VERAG_PROG_ALLGEMEIN.MyTextBox + Friend WithEvents Label19 As Label + Friend WithEvents Label17 As Label + Friend WithEvents txtColli As VERAG_PROG_ALLGEMEIN.MyTextBox + Friend WithEvents rtbWarenbezeichnung As RichTextBox + Friend WithEvents Label23 As Label + Friend WithEvents Label2 As Label + Friend WithEvents btn As Button +End Class diff --git a/Aviso/Anhänge/frmAddSendnung.resx b/Aviso/Anhänge/frmAddSendnung.resx new file mode 100644 index 0000000..f7f78d5 --- /dev/null +++ b/Aviso/Anhänge/frmAddSendnung.resx @@ -0,0 +1,1253 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA + AABmMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/5uDd///////////////////////39fT/dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP+AXUL///////////////////////////////////////////////////////// + /////////////////////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/3RJJv/39fT///////// + /////////////2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+AXUL///////////////////////// + //+YfWv/ZjMA/2YzAP9mMwD/ZjMA/3RJJv/u6+n/////////////////9/X0/3RJJv9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/39fT//////////////////////8Gzqv9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec/9TLxf//////////////////////y7+4/62a + jf9mMwD/ZjMA/5h9a////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/3RJJv////////////////////////////// + ///Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/u6+n///////// + ////////////////////////////////////////////////////////////////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+bg3f//////////////////////jG5Y/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/7ennP//////////////////////5uDd/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/5h9 + a///////////////////////wbOq/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm//// + ////////////////////////o4x9/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/rZqN//// + /////////////////////////////////////////////+bg3f+Mblj/t6ec////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/jG5Y//////////////////////////////////////+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/9TLxf////////////////////////////////////////////// + ///////////////////////////////////Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/wbOq//// + //////////////////+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/5uDd//////////////////// + //+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/9TLxf//////////////////////gF1C/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////////////////////////90SSb/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/8u/uP////////////////////////////////////////////// + //////////////f19P/m4N3///////////+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////// + /////////////93W0f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//// + ///////////////////39fT/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+jjH3//////////////////////8u/uP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/4BdQv///////////////////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/gF1C//f19P/////////////////Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7en + nP//////////////////////9/X0/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////// + ///////////////////Uy8X/gF1C/2YzAP9mMwD/t6ec//f19P///////////////////////////9TL + xf9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/8Gzqv//////////////////////7uvp/////////////////62ajf9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+Mblj///////////////////////////90SSb/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/4xu + WP//////////////////////5uDd/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//////////////////// + ///Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//////////////////// + ///////////////////////////////////////////////////////////////////Uy8X/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA//f19P//////////////////////y7+4/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/gF1C/+7r6f//////////////////////9/X0/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/5uDd//////////////////// + //+jjH3/////////////////7uvp/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/3RJ + Jv///////////////////////////6OMff9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA//f19P//////////////////////dEkm/2Yz + AP9mMwD/ZjMA/2YzAP/m4N3//////////////////////6OMff9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/7uvp//////////////////////////////////////////////////// + /////////////////////////////7ennP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+jjH3///////// + //////////////////+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/jG5Y//////////////////// + ////////dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP/39fT//////////////////////2YzAP/Lv7j/////////////////t6ec/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+bg3f//////////////////////wbOq/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/1MvF//////////////////////+YfWv/ZjMA/2YzAP9mMwD/gF1C//////////////////// + ///39fT/dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////// + ////////////////////////////////////////////////////////////////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP///////////////////////////2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/1MvF//////////////////////+jjH3/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/jG5Y//////////////////// + ///m4N3/ZjMA/4BdQv/39fT////////////39fT/gF1C/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/wbOq///////////////////////Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////// + /////////////////////////////////////////////+7r6f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Uy8X/////////////////7uvp/2YzAP9mMwD/ZjMA/2Yz + AP+Mblj///////////////////////////90SSb/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//// + ////////////////////////ZjMA/2YzAP9mMwD/dEkm//////////////////////////////////// + /////////////7ennP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP+jjH3//////////////////////9TLxf9mMwD/ZjMA/7ennP////////////// + ///Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////// + /////////////////////////////////////////////+bg3f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/6OMff////////////////////////////////////////////////////////////// + ///////////////////d1tH/jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/4Bd + Qv//////////////////////rZqN/2YzAP9mMwD/ZjMA/62ajf//////////////////////5uDd/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////////90SSb/ZjMA/2Yz + AP9mMwD/5uDd////////////////////////////////////////////1MvF/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP////////////// + ////////t6ec/2YzAP9mMwD/dEkm//f19P////////////////+YfWv/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/4xuWP////////////////////////////////////////////////////////////// + /////////////2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm//////////////////// + ////////////////////////////////////////////////////////////////////////mH1r/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP/////////////////39fT/dEkm/2Yz + AP9mMwD/wbOq///////////////////////Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/6OM + ff///////////////////////////6OMff9mMwD/ZjMA/2YzAP/Bs6r///////////////////////// + ///////////////////39fT/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/1MvF//////////////////////+tmo3/ZjMA/2YzAP9mMwD/rZqN//// + /////////////+bg3f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA//f19P////////////// + ////////////////////////////////////////////////////////mH1r/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/7uvp//////////////////////90SSb/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP+jjH3/5uDd///////////////////////39fT/dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/+7r6f////////////////+3p5z/ZjMA/2YzAP/Uy8X//////////////////////7en + nP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm////////////////////////////wbOq/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/u6+n///////// + /////////////4xuWP9mMwD/ZjMA/2YzAP9mMwD/7uvp/////////////////62ajf9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/3dbR///////////////////////Bs6r/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Uy8X///////// + /////////////5h9a/9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP90SSb/7uvp//////////////////// + //+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/o4x9//////////////////f1 + 9P+AXUL/ZjMA//f19P//////////////////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/1MvF///////////////////////39fT/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/Bs6r//////9TLxf+3p5z/t6ec/5h9a/9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/dEkm////////////////////////////dEkm/2YzAP9mMwD/ZjMA/2Yz + AP+tmo3/////////////////7uvp/3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Bs6r///////// + /////////////+bg3f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP//////////////////////t6ec/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP/Lv7j//////////////////////8Gzqv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/1MvF/////////////////8u/uP90SSb///////////////////////// + //90SSb/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////////////////////// + //+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+7r6f//////////////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////// + /////////////+7r6f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/d1tH/////////////////t6ec/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/6OMff///////////////////////////3RJJv9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/mH1r//// + ///////////////////Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+bg3f////////////// + ////////t6ec/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+AXUL///////// + /////////////62ajf//////////////////////5uDd/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP/Bs6r///////////////////////////+YfWv/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP+tmo3//////////////////////+7r6f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP//////////////////////1MvF/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/5h9a///////////////////////gF1C/2YzAP9mMwD/ZjMA/2YzAP9mMwD/gF1C//// + ////////////////////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP90SSb//////////////////////+7r6f9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/4BdQv/Lv7j///////////////////////////+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////////////////////// + ///Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/d1tH///////// + //////////////////+3p5z/dEkm/2YzAP9mMwD/t6ec////////////////////////////rZqN/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/y7+4//// + ///////////////////Bs6r/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/93W0f////////////// + ///Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/9/X0//////////////////////////////////// + /////////////////////////////////////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/m4N3///////////////////////////////////////////////////////////////////////// + ////////wbOq/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/u6+n//////////////////////////////////////7ennP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Uy8X///////////////////////////////////////// + /////////////////////////////8u/uP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/m4N3//////////////////////62ajf9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/gF1C//////////////////////+YfWv/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/Uy8X///////////////////////////////////////////////////////////////////////// + ////////mH1r/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/8u/uP////////////////////////////// + /////////////////////////////////////////////9TLxf9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/6OMff////////////////////////////// + ////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP+tmo3/9/X0//////////////////////////////////////////////////////+tmo3/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm//// + ////////////////////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/y7+4//// + /////////////+7r6f90SSb/ZjMA/2YzAP9mMwD/ZjMA/7ennP////////////////////////////// + //////////////////////////////////////////////////+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/t6ec////////////////////////////////////////////////////////////5uDd/7en + nP+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/93W0f////////////////////////////////9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/o4x9/7ennP/39fT///////// + /////////////9TLxf+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/AAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAA + AAEAAAACAAAAAwAAAAMAAAAFAAAABwAAAAkBAQEMAQEBEAMDAxQFBQUYBwcHHQUFBSAGBgYkBQUFJwQE + BCsFBQUtBQUFLwUFBTEFBQUxBgYGLgYGBioFBQUkBQUFHgMDAxgEBAQSAQEBDQEBAQkAAAAGAAAABAAA + AAIAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAQAAAAAAAAABAAAAAgAAAAIAAAADAAAABAAAAAcAAAAJAgICDAICAhAEBAQVBAQEGgUF + BSAFBQUnBQUFLQUFBTQGBgY6BgYGPwUFBUQEBARIBQUFSgUFBU0GBgZPBgYGUAYGBk8GBgZMBQUFRwUF + BUAFBQU5BQUFMQYGBikGBgYhBgYGGQQEBBMBAQENAAAACQAAAAUAAAADAAAAAgAAAAEAAAABAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAQAAAAIAAAACAAAAAwAAAAUAAAAHAAAACAIC + AgwCAgIPBQUFFAQEBBkGBgYgBQUFJgUFBS4FBQU2BQUFPgUFBUYGBgZPBQUFVwUFBV0FBQVhBAQEZgQE + BGgFBQVqBQUFawUFBWwFBQVsBQUFawUFBWkFBQVlBQUFYAYGBlkFBQVSBQUFSAUFBT8GBgY0BQUFKgUF + BSAEBAQXAgICEAAAAAoAAAAGAAAABAAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAQAAAAEAAAABAAAAAgAA + AAMAAAAEAAAABgAAAAgBAQELAgICDwMDAxMFBQUYBgYGHgUFBSUGBgYsBQUFNAUFBT0FBQVGBQUFTwUF + BVgGBgZgBQUFaQYGBm8FBQV2BgYGegUFBX4FBQV/BQUFgQUFBYEFBQWBBQUFgQUFBYAFBQWABAQEfQIC + AngCAgJ1AwMDcQMDA2wDAwNkAwMDWwQEBFIFBQVKBQUFPgUFBTEFBQUmBAQEHAICAhMBAQEMAAAACAAA + AAQAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAEAAAABAAAAAQAAAAIAAAADAAAABAAAAAYAAAAIAQEBCwICAg4DAwMTBQUFGAUFBR4GBgYkBQUFKwUF + BTMFBQU7BQUFRAYGBk4FBQVXBQUFXwUFBWgGBgZwBQUFdwYGBn0FBQWDBQUFhwUFBYsFBQWNBQUFjgUF + BY8FBQWPBQUFjwUFBY8EBASLAwMDiAQEBIkLCwuSFhYWpioqKsA3NzfeNzc34jMzM94lJSW7Dw8PhwQE + BGUFBQVeBgYGUgUFBUQFBQU2BQUFKQUFBR8DAwMVAQEBDgAAAAkAAAAFAAAAAwAAAAIAAAABAAAAAQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAEAAAACAAAAAgAAAAQAAAAFAAAABwAAAAoCAgINAgICEQUF + BRcFBQUcBgYGIwUFBSsFBQUyBQUFOgYGBkQFBQVNBgYGVQUFBV8FBQVnBgYGbgUFBXYGBgZ9BQUFggUF + BYcFBQWLBQUFjwUFBZEFBQWUBQUFlQUFBZYFBQWWBQUFlgUFBZYFBQWVAwMDkA0NDaEdHR3ALCws2jc3 + N/FJSUn/Tk5O/0lJSf9FRUX/QUFB/z09Pf81NTX4HBwcuAUFBXkFBQVvBQUFZQUFBVcFBQVJBQUFOwUF + BS0EBAQiAgICGAICAhABAQEKAAAABgAAAAMAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAIAAAADAAAABAAA + AAcAAAAKAQEBDQMDAxEFBQUWBQUFGwYGBiIFBQUpBgYGMQUFBTkGBgZCBQUFSwUFBVUFBQVdBQUFZgUF + BW4FBQV1BgYGfAUFBYEFBQWHBQUFiwUFBY4FBQWRBQUFkwQEBZUEBASVAgIClgAAAJQAAACSAAAAkgEB + ApUFBQWYBQUFmAQEBJQYGBjBMDAw+DY2Nv80NDT/Pz8//01NTf9ISEj/RERE/0BAQP87Ozv/ODg4/zU1 + Nf8zMzP/Hh4ezwUFBYYFBQV+BQUFdQYGBmkFBQVbBQUFTgUFBT8EBAQxBgYGJQQEBBsBAQESAAAADAAA + AAgAAAAEAAAAAgAAAAEAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAEAAAACAAAABQAAAAkAAAAOAgICFAUFBRoFBQUgBgYGKAUFBS8FBQU4BQUFQQUF + BUoGBgZTBQUFXAYGBmUFBQVtBQUFdAUFBXsFBQWABQUFhgUFBYsFBQWOBQUFkQUFBZMEBASVAwMDlQAA + AJUAAACSAAAAkwQEBZcTExCgKyghsTYxKL80Lya+GxkUqAEBApQBAQKREhISvSgoKP8oKCj/JSUl/yoq + Kv9JSUn/SkpK/0VFRf9AQED/ODg4/zIyMv8vLy//MDAw/y4uLv8sLCz/GBgYzAQEBIoFBQWJBQUFggYG + BnkFBQVuBQUFYAUFBVIFBQVDBQUFNQUFBSkFBQUeBAQEFAEBAQ4AAAAJAAAABQAAAAMAAAABAAAAAQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAYAAAANAQEBFQMD + AyEFBQUrBQUFNQUFBT8FBQVIBgYGUQUFBVsGBgZjBQUFawYGBnMFBQV6BgYGgAUFBYUFBQWKBQUFjgUF + BZAFBQWTBAQElQICApUAAACUAAAAkQAAAJQICAiZJSQhp0NBObtkYFPPgnxq542Eb/aNg2r+i35k/4l7 + Yf96bVX6SUAx0A4NDKcXFxjzGxsb/xoaGv8XFxf/Li4u/05OTv9HR0f/QEBA/0RERP9oaGj/dXV1/1VV + Vf8uLi7/Jycn/ygoKP8lJSX/Dg4OswMDA48FBQWRBgYGjAUFBYQFBQV8BQUFcQUFBWUFBQVXBQUFSAQE + BDoFBQUtBAQEIQMDAxcDAwMQAAAACgAAAAYAAAADAAAAAgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAEAAAAEAAAACgMDAxYFBQUlBQUFNgUFBUQFBQVSBQUFXgUFBWcFBQVxBQUFeAUF + BX8FBQWFBQUFiQUFBY0FBQWQBQUFkgQEBJQCAgKUAAAAkwAAAJEAAQGUDQwMmzAvK6tSUEfAfHlr1p2Z + h+ywq5b6uLKb/7Stlf+ooIj/m5J7/4yCav+Dd17/gXRc/35xWP9/cFT/SD8v9ggJCv8PDw//EBAQ/w4O + Dv81NTX/TExM/0RERP9GRkb/amlp/39/f//S0tP/3Nzd/5CQkP8xMTH/ICAg/yIiIv8aGhrtBgYGmgQE + BJUFBQWVBQUFkgUFBY0FBQWHBgYGfwYGBnUFBQVoBQUFWwYGBk0FBQU+BAQEMAUFBSQEBAQaAwMDEgAA + AAsAAAAHAAAABAAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAQCAgINBgYGGwQE + BC4FBQVCBQUFVQUFBWQFBQVwBQUFegYGBoMGBgaJBQUFjgUFBZEEBASTAQECkwAAAJMAAACRAQEBlRAQ + D5w4NzKuXFpQxIOBc9mqp5Xwvrum/MfErf/Fwav/v7mk/7iznP+xq5T/qqON/6Kag/+Yj3j/i4Fp/4N3 + Xv+BdFz/fG9X/3hqUP9fU0D/GRkZ/wEBAv8AAAH/BAQD/zk5Of9ISEj/Pj4+/2JiYv9paWn/SkpK/2ho + aP/e3t//+vr6/5ubm/8kJCT/HBwc/xsbG/8NDQ3ABAQEkgUFBZgFBQWXBQUFlQUFBZMFBQWPBQUFiQUF + BYIFBQV4BQUFbQYGBl8FBQVRBQUFQwUFBTUFBQUoBAQEHQMDAxQCAgINAAAACAAAAAUAAAADAAAAAQAA + AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAACAAAABAICAgwHBwcaBQUFKwUFBT4FBQVQBgYGYAYGBm4FBQV5BAQEgQEB + AoYAAACJAAAAigAAAZAQEA6bNTQurGFfVMSMiXrapKGO8qShjv3Bvqn/zMmz/8XCrP/Bvqj/vbqk/7u3 + ov+5tJ//tbCa/7CqlP+qo43/o5uE/5mRev+Ng2v/hXpg/4N2Xv99cVj/c2VM/4ByXP+dj4T/bWRd/xkY + GP8FBQb/Pj4+/0ZGRv8+Pj7/cXFx/3x8fP92dnb/X19f/4SEhP/5+fn/7u7u/2JiYv8VFRX/GBgY/xER + EeUFBQWXBQUFmAUFBZkFBQWYBQUFmAUFBZYFBQWUBQUFkAUFBYsGBgaEBQUFfAUFBXAGBgZkBgYGVQUF + BUcEBAQ5BQUFLAUFBSADAwMWAQEBDwAAAAoAAAAGAAAAAwAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAADAAAACAIC + AhEEBAQeBAQELAICAjoAAAFFAAAATgAAAFcEBARnFRUTgDs6NJ1jYle9iYd416imkvCoppL+paKS/5WT + iP+cm5X/qKem/6yqm//DwKr/wL2o/7+8pv+9uqT/u7ei/7q1oP+4s53/tK+Z/6+okv+hmYL/kYhw/35y + Wf9wYkf/cmRF/3RmS/9yZEr/gXJc/6majP+xoZP/dm1m/xMTFP85OTn/Q0ND/z09Pf98fHz/k5OU/5CQ + kf+Li4r/ampq/7e3t//j4+P/oKCg/yAgIP8TExP/EhIS/AcHB6gFBQWWBQUFmQUFBZkFBQWZBQUFmAUF + BZgFBQWXBQUFlAUFBZIFBQWNBQUFhwYGBn4GBgZ0BQUFaAUFBVkFBQVLBQUFPAUFBS8FBQUjAwMDGQEB + AREAAAALAAAABwAAAAQAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAADAAAABAAAAAYAAAAKDAsLFxwcGThDQjtjcG5im5KQ + f8ixrprrsK2Z/q2rmf+fnZH/n56X/7KysP/Ozs7/8PDx//7+////////ubep/8G+p//Cv6r/w8Cq/8PA + qv/AvKf/tbCa/6agif+OhW3/fG9X/3NjTf9lUz7/a15N/2xmZP9NSFL/V0xB/1tONv93aVP/p5iL/6aX + iv+fkYX/NzY1/zg5Of9AQED/ODg4/4SEhP+DhIX/goKD/6Wlpv98fHz/gYGB/76+vv+srKz/Ojo6/w4O + Dv8SEhL/CQkJvgQEBJMFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgFBQWYBQUFlwUFBZYFBQWSBQUFjwYG + BokGBgaBBgYGdwYGBmsGBgZeBQUFTwQEBEEEBAQzBAQEJgMDAxwBAQETAAAADQAAAAcAAAAFAAAAAwAA + AAEAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAgIBwNNjUvMXt5bHCem4qxwL2o3r+8pv+0sZ//p6aZ/6emn/+5ubb/zc3N/+7u7//8/P3///////// + ///////////////////Bv7H/x8Wt/7+7pf+wqpT/l494/4F4Y/90aVX/bGFQ/3Vyaf93f33/fpmf/3y0 + xv9twtP/R37e/woW6v8qNK7/e3Jj/31yY/+mlon/pJWI/6qajf9jXln/PT0+/0JCQv8yMjL/dHR0/4KD + hP9ZWlz/iYmK/4KCgv9ubm7/mpqa/5iYmP9KSkr/DAwM/w8PD/8JCQnNBAQEkgUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmAUFBZcFBQWWBQUFlAUFBZAGBgaLBgYGgwUFBXoFBQVvBQUFYgUF + BVMFBQVFBAQENwQEBCkEBAQfAgICFQAAAA8AAAAJAAAABQAAAAMAAAACAAAAAQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAzcmzCsjFryuWk4Nlioh5pMXCrdPGw67+zsu0/8nFsP/DwKn/xsS3/9DQ + 0P/v7/D//f3+/////////////////////////////////////f/t7Ob/0MzA/5mSff94b1r/YllH/0pB + NP8/OjL/nJSO/5uUjv+ls7n/xuXt/5Pp//9m4///eOr//03l//9opfj/U0zw/zg/vP+Ce3H/jYV7/6WW + iP+klYj/qJiL/4l/dv9DQ0P/SEhI/zExMf9NTU3/lZWV/1tcXf9paWr/eHh4/2FhYf97e3v/gICA/0hI + SP8LCwv/DQ0N/wgICNYFBQWUBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUF + BZgFBQWYBQUFlgUFBZQFBQWRBQUFjAUFBYYFBQV9BQUFcgUFBWUFBQVXBAQESQUFBTsEBAQuAwMDIgMD + AxgBAQEQAAAACwAAAAYAAAAEAAAAAgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMK/qpnCv6rSwr+q/crH + sf/MyLL/w8Cr/8PAq//Cv6r/wr+q/767o//f3tL///////////////////////////////3/7Ovk/83K + vv+mn4//e3Ri/1lRQP9COy7/OjUu/zc1Mv81NTX/NTU2/zM0Nf+wqqf/r6af/7TDyf/Z+///oOz//1Xg + //9j4///gOz//6G89P9GPuT/NDi1/4F7cP+Gfnb/oJKG/6WWiP+lloj/opSH/01LSf9KS0v/Nzc3/y0t + Lf93d3f/h4eH/3Jycv9hYWH/U1NT/2FhYf9ubm7/Pj4+/wkJCf8KCgr/BgYG2QUFBZQFBQWYBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWYBQUFmAUFBZcFBQWVBQUFkgUF + BY4FBQWIBQUFgAUFBXUFBQVqBQUFXAUFBU4EBAQ/BAQEMgQEBCUDAwMbAQEBEgAAAAwAAAAIAAAABQAA + AAIAAAABAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAwr+q+8K/qv/Cv6r/wr+q/8K/qv/Cv6r/wr+q/8K/qv/Cv6r/v7yl/+Lh + 1v/////////+/+zr5P/NyL3/o5yN/3dvXv9WTj7/PTcr/zEtJv8uLCr/LS0t/y0uL/8tLi//MDEy/0A/ + P/9PTU3/ZGNi/7Wuqv+6sKj/wb26/8Xd5f/E6vT/uOXx/7/i6//j5+b/x8DL/2tli/9oZYT/gntz/4F7 + dP+ZjYL/ppaJ/6WWif+uoJP/dG1n/z09Pv9GRkb/KCgo/zo6Ov97e3v/YGBg/0lJSf9JSUn/UVFR/2xs + bP8fHx//CAgI/wgICP8FBQXUBQUFkQUFBZQFBQWXBAQEmQAAAZYAAAGVAgIDlwUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmAUFBZgFBQWXBQUFlQUFBZMFBQWPBQUFiQUFBYIGBgZ5BQUFbQUF + BWAFBQVSBQUFRAQEBDUEBAQpBAQEHgICAhUAAAAOAAAACQAAAAUAAAADAAAAAQAAAAEAAAABAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADCv6rvwr+q/8K/ + qv/Cv6r/wr+q/8PAq//GxK//yMWw/8jFsP++uqP/ubSj/6agkf93cF//Uks7/zYxJv8rJyH/JyYj/yUl + Jv8mJyj/KCkq/y8vMP9DQ0P/VlZW/29ubv9/fn7/hYSD/358e/9qamn/rqei/7atpP/Tzsr/2tTR/9rT + 0P/e1NH/3dXS/97Y1v/LxsD/hX5w/4R9cP+BenT/gHpz/4+FfP+nmIv/qZuQ/7Cil/+lmpH/Ozs6/0tL + TP80NDT/ICAg/zk5Of9oaGj/ZGRk/19fX/9sbGz/PDw8/wkJCf8JCQn/BQUF/wEBAfkBAQHhAwMDuwAA + AZ0EBQWXHx0ZqCQiHa0TEhCgAQEClQAAAJUEBASYBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUF + BZgFBQWYBQUFlwUFBZcFBQWUBQUFkAYGBosGBgaFBQUFfAYGBnEFBQVkBQUFVgUFBUgEBAQ6BAQELAMD + AyEDAwMXAQEBEAAAAAoAAAAGAAAAAwAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAMK/qu/DwKv/xsSv/8jFsP/Fwqz/vbmj/66okv+UjXf/b2dV/1BJ + O/80LyX/JCEb/x8eHP8dHR7/HyAi/yQlJv8xMDD/RURD/1pYV/9ycG//gX9+/4B/f/91dHT/YGBg/1BP + T/9BQUH/OTo6/zY3N/+gmZX/tayj/9HMx//a1dL/2dTS/9nV0v/a1dP/3tnY/8rFwv+AenT/f3hy/4F6 + dP+AenT/hX12/6aZjv+uoZb/sqab/72xp/90b2r/Kyss/05OTv8nJyf/Ghoa/yMjI/86Ojr/Pj4+/ycn + J/8LCwv/CwsL/wcHB/8DAwP/AAAA/wAAAP8AAAD/FhUS73BpWOaLgWn5hnph/XNoUfJVTT3WLSslsQgI + CJgAAACUAgIDmAUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgFBQWXBQUFlQUF + BZIGBgaNBQUFhwUFBX4FBQV0BQUFZwUFBVoFBQVMBAQEPQUFBTAEBAQkBAQEGQEBAREAAAALAAAABwAA + AAQAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAxsOv8MG9 + pv+qo4v/kIVu/39zXv9rYlP/UUpB/x4cF/8ZGBf/FRYX/xobHP8iIiL/MzIx/0dFQ/9eW1j/cW5r/3h1 + dP9ycG//ZWRj/1FQUP9CQkL/NTU1/zExMf8vLy//MjIy/zg4OP9HRkb/V1ZV/6efmv+xp57/0MrH/9nU + 0P/Z09D/2dTR/9rV0v/e2df/ycTB/4B6dP9+eHL/gHp0/4B3av+AeXH/nJKJ/7Sonv+1q6L/vLKp/7qx + qv9BPz3/Li4v/0lJSf8hISH/FhYW/xEREf8ODg7/DQ0N/w0NDf8JCQn/BAQE/wEBAf8AAAD/AAAA/wkJ + B/97dGD/lIhu/35yWP90ZUv/cWJI/3RlSf+FeWD/bWVS5j88M7wODw2cAAAAkwEBApcFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWYBQUFlwUFBZYFBQWTBQUFjgUFBYkFBQWBBQUFdwUF + BWwFBQVeBQUFUAUFBUEEBAQ0BAQEJgQEBBwCAgITAQEBDQAAAAgAAAAEAAAAAgAAAAEAAAABAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB6b1nzV01C/1xfXf9ngIH/X5us/23F4f9Sg5b/HRgW/zYz + Mf9JRkP/X1tX/25pZf9uamf/ZWNg/1VUUv9CQkH/NTU1/ywsLf8qKir/Kikp/zAwMP85OTn/Tk1N/2Ri + Yv93d3b/hYSD/4SDgv96eHj/qaGa/66kmv/Qysb/2dPQ/9jSz//Z09D/2tTR/93Y1f/JxMH/gHl0/354 + cv+AenX/fnRi/393af+Jgnz/s6if/7uxqf++ta7/yL+4/7KqpP8vLy3/JCUl/0BAQP8lJSX/ExMT/xAQ + EP8ODg7/CwsL/wcHB/8CAgL/AAAA/wAAAP8AAAD/Ojct/5SIb/97bVX/bmBG/25gRv90Zkz/dmlQ/3hq + UP9uYkj/fnRc/4Z+au9NST3GGRgVoQAAAJMAAAGWBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmAUFBZcFBQWWBQUFlAUFBZAFBQWLBQUFgwUFBXoGBgZvBQUFYgYGBlQFBQVFBQUFNwUF + BSoFBQUfAgICFgICAg4AAAAJAAAABQAAAAMAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEw8 + G40rKWT/erT2/4L1//9n6f//j/D//6i7wP9hWFH/Yl1Z/1dUUf9EQkH/NDQz/ykpKv8kJSX/IyQk/yYm + Jv8tLS3/Ozo5/09OTf9lY2L/fHt6/4WDg/+Af3//c3Ny/15eXv9QUFD/RERE/z4+P/+akYv/rqSZ/9DK + xv/Y09D/19LP/9jT0P/Y09H/3dfV/8nDwP+AenT/f3hy/4F6df9/dmb/gHZk/4B4b/+elY7/wbix/8O6 + tP/Iv7r/1MvF/7q0r/9SUE7/JSUk/ycoKP8iIiP/GRkZ/xEREf8JCQn/BAQE/wAAAP8AAAD/AAAA/wAA + AP9OSTv/i31j/3BhR/9wYkf/e25U/4J3X/+IfWT/gnZd/2laQf9PRDL/g3Ze/4J2W/96cVv0XllNzh0d + GaYAAQGUAAABlgUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgFBQWXBQUFlgUF + BZQFBQWRBQUFjAUFBYUEBAR6AQEBbAEBAV0BAQFPAwMDRQUFBToFBQUtBQUFIgQEBBgBAQEQAAAACgAA + AAYAAAAEAAAAAgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZFxEFD07kPZ+vP//eOz//4Lk+//L5ev/p5+a/yEg + IP8fHyD/HB0e/x0dHv8jIiP/LCsr/z08Ov9SUE3/aWZk/3l2c/96eHb/c3Fw/2VkY/9QT0//RERE/zg4 + OP81NTX/NDU1/zk5Of9AQED/U1JR/6Wdlv+topj/0MnF/9fSzv/X0c7/19LP/9jT0P/c19T/yMPA/4F7 + dP+AeXL/gXp1/392aP+BeW//gHZm/4R9dv+yqqP/zcO+/8zEv//Qy8b/2tTR/9zX1P+0sK7/cW9t/z07 + Ov8aGhr/BQYG/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/0tFNv+Bc1j/bl9E/3lsUv+Ge2L/koly/5qR + ev+UinL/e25V/0Y7Kv9vYUr/a11D/1lOOP+Sh27/hXtj+VlTQ9YiIB2nAAAAlQUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgEBASYBAQElgICApICAgKPBQUFkhAQEJofHx+vIiIitR8f + H6oRERF/BAQEVgQEBEsFBQU/BQUFMQQEBCUFBQUaAgICEgAAAAwAAAAHAAAABAAAAAIAAAABAAAAAQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAB0c24UeXaY9a7D3P/N2Nb/zs3J/97Syf+emZL/FRUV/yopJ/9APTr/VVFO/2lkYf9ybWr/b2xp/2Vi + Yf9UU1L/QkJC/zc3N/8vMDD/LS4u/zExMf85ODj/R0ZG/19dXf9vbm7/gH5+/4eFhf+DgYD/sqmj/6+l + m//OyMT/19HO/9fQzf/X0c7/2NLP/9vX0//Iw7//g3t1/4B6c/+Ce3X/gHZo/4N8df+CeGz/gHZn/42E + fv/Fvrn/2tTQ/9XQzf/Y1NL/3dnY/+He3f/j3tv/0cvH/6+ppP+HgX3/YV1a/w0MDP8AAAD/AAAA/wAA + AP8AAAD/Lioh/3prUP9wYkn/f3Na/5CGbv+hmoP/rqiS/6ihi/+Jf2n/YVZE/4N3X/9zZkv/Sz8t/29i + TP93aU7/a19H/4mAa/YuKySxAAAAkwQEBJkFBQWZBQUFmQUFBZkFBQWZBQUFmQQEBJcCAgKVAgICkwYG + BpgMDAyhFxcXtiMjI80yMjLmRkZG+UxMTP9ISEj/QkJC/zk5OfojIyPBCAgIcQQEBFwGBgZRBAQEQwUF + BTUFBQUoBAQEHQMDAxQBAQENAAAACQAAAAUAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAG1rahaqo5n12czB/9PIwP/SycH/1c7H/7Ot + pv9sZmH/cmxo/2FcWf9UUU//QkFA/zU1Nf8sLC3/Jygo/ygoKP8wMDD/Ojk5/09OTf9lY2L/eXd2/4SD + gv+Hhob/fXx8/21tbf9ZWVn/S0tL/z4+P/+poZz/tqyi/87Iw//W0c3/1tDN/9bRzv/X0c//3NXT/8jC + v/+DfHX/gnpz/4N8dv+Ad2j/g3x0/4V9d/+CeWv/f3Vn/46Gf//Iw7//5+Tj/+Ti4f/i4OD/39zc/9rX + 1f/X0tD/1c/J/9fNx//FvLb/GxoY/wAAAP8AAAD/AAAA/wAAAP8HAQD/W043/3lqTv+Cdl3/lItz/6ii + jP+7t6L/wLym/4uBbf+KgG7/npV+/4qBaP9XTDn/dmpU/3BhRv9NQCv/cmZQ/3RoU+8cGhemAAAAlAAA + AJQDAwOYBQUFmQUFBZgEBASUCAgInRUVFbIkJCTMODg45DQ0NPgyMjL/MzMz/0NDQ/9NTU3/RUVF/z4+ + Pv85OTn/NjY2/zQ0NP8jIyPaCAgIgAUFBW4FBQVkBgYGVgUFBUcFBQU5BQUFLAQEBCECAgIXAQEBDwEB + AQoAAAAGAAAAAwAAAAIAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAbmxrFqSdmPXTysP/0MrC/9HJwv/Uzcb/t7Ks/21sbP9nZ2f/S0xM/zAwMf8lJSX/LS0s/z48 + O/9WU1H/aGVj/3h2c/99enj/d3Z0/2xra/9ZWVj/SEhI/zw8PP81NTX/ODg5/0FAQf9PTk7/YmFh/7u0 + sP+4r6b/zcbC/9bQzP/W0Mz/1tHN/9fRzv/b1dL/yMK//4R9dv+Ce3T/g3x2/4F3aP+EfXX/hX52/4Z+ + d/+Eemz/gHVl/4Z+dP+vqaT/3NrY/+3t7f/v7e7/6Obl/9/c2//Z09D/zsbB/7auqP8aFBD/AAMF/wAO + F/8AJ0H/AD9r/wAcOP8OEBD/WEct/4NyU/+ViW7/oJiB/6Sdh/+Ph3H/jYJw/7y4pP+3spz/mJB6/29j + UP+TinP/hXlf/1FFMf9mWkX/dGVK/4t8bfltZFvYMCwosQUGBZgAAACSAgIClhsbG8UxMTHxNjY2/0ND + Q/8zMzP/ISEh/yAgIP8oKCj/SkpK/0hISP8/Pz//Q0ND/z4+Pv8xMTH/Kioq/ywsLP8bGxvYBQUFhAUF + BX4GBgZ0BQUFaAUFBVoFBQVMBQUFPgUFBTAFBQUkBgYGGgMDAxIBAQELAAAABwAAAAQAAAACAAAAAQAA + AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABubmsWo52Y9dLJwv/QycH/0cnC/9XO + xv+wq6X/Xl1d/25sa/+Cf33/i4iF/4SBfv+EgH3/d3Nw/2JgX/9XVVT/RUVE/zk6Ov8wMTH/Ly8v/zo6 + Ov9HRkb/X11e/3Jxcf+Bf3//iYeH/4ODgv92dHT/wby5/7y0q//NxsH/19DM/9bPy//W0Mz/1tHN/9rV + 0f/Iwr7/hX53/4N8df+FfXf/gXho/4V+df+Gfnf/h393/4iAeP+GfXL/gndn/350ZP+If3P/oZqS/7Ot + pv+8trH/urWw/62moP+imJD/k4d9/xdhkv8Ac8P/AI7v/wCZ//8Amv//AG3X/wBXr/8BO3L/KDlF/1tQ + Pv9vXD7/aFg+/3JlUP+gmIP/tbCZ/7KumP+GfGj/pZ2K/6ymj/+ZkXn/ZFlG/4N3Yv94a1H/jn9v/6uc + jv+omIv/g3dt5kU/ObocGxrJICAh/yIiI/8rKyv/PDw8/xQUFP8TExP/EBAQ/ysrK/9NTU3/QUFB/1NT + U/+BgYH/urq7/5aWl/89PT3/ISEh/yIiIv8PDw+5BAQEigUFBYkEBAR+AgICcwEBAWUBAQFXAgICSgMD + Az8FBQU0BQUFKAUFBRwDAwMUAAAADQAAAAgAAAAFAAAAAwAAAAIAAAABAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAG9uaxajnJf10cfB/9DIwf/QycH/08zE/722r/+NiYX/lJCN/4+Miv+GhIP/fn59/3R0 + dP9jZGT/T09Q/0JDQ/8+Pj3/TkxM/2JgX/92dHL/g4GA/4KCgf97enr/bm1t/1lZWf9KSkr/RERE/0FC + Qv+8uLb/wbqy/8zGwP/V0Mv/1c/L/9bQzP/X0M3/2tTR/8jCvv+Gfnf/hH11/4V+d/+CeGj/hn52/4d/ + d/+Hf3f/iH94/4mAef+JgXn/iH50/4V7bP+Bd2f/f3Rl/4F2Zv+Cd2f/gnZl/4Z6af+NgXf/F4fP/wCS + 9v8Amv//AJn//wCU/f8Abtf/AG/a/wBy4P8AadL/AFao/xVFb/88R0v/bmFI/4d0Vf97blT/bWJN/5SL + d/++u6X/wb2o/5OKdf+LgW7/o5uE/5CGb/+ThHX/pJWI/6WWif+rm43/rJyO/5SHfP9iWlT/KScl/ykq + K/8kJSX/AgIC/wUFBf8CAgL/LCws/0lJSf9ISEj/cnJy/1RUVf+FhYb/8vP0/7u7u/80NDT/Gxsb/xcX + F+4EBASVBAQEjwsLC5gaGhqpKioqwSoqKsUfHx+jCwsLbwMDA04FBQVGBQUFOQQEBCsEBAQgAwMDFgEB + AQ4AAAAJAAAABQAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAb25rFqKclvXRx8D/0MjA/9DI + wf/UzcX/ta+p/2RkZP9iYmP/X2Bg/2NjY/9vbm3/eXh3/4yJiP+cmpf/op+d/5+dnP+cmpr/iYiH/3Rz + c/9dXV3/VFRU/05PT/9TU1P/X15e/3BwcP9/fn//lJKS/9jV0//BurL/y8S//9XPy//Vz8v/1dDL/9bQ + zP/Z1ND/y8TB/4iAef+FfXb/hn54/4J4af+Hf3b/iH94/4iAeP+JgHj/iYB4/4qBef+Lgnr/jIN7/4yD + e/+Ng3r/jYN5/42Def+OhHr/h3xr/4+CeP8XebX/AIfi/wCX/v8AmP//AJT8/wBv1/8AbdX/AG7W/wBw + 2f8AdOH/AHPi/wBs0/8FWaP/I1B0/0VKSP90ZUz/mIhp/5mNc/+DemX/iX9s/8G9qP+8uKH/m5F//5uM + fv+llon/pJWI/6SViP+klYj/qJmL/6ycjv+cjYH/gndv/z47OP8HCAf/CgoK/wgICP8tLS3/Q0ND/1RU + VP+EhIT/e3t7/2FhYf+tra3//v7+/4aGhv8XFxf/FRUV/xwcHNgsLCzdPj4+9ExMTP9JSUn/RERE/z4+ + Pv8yMjLuFhYWngQEBGEFBQVZBQUFSgUFBTwFBQUuBAQEIQEBARYAAAAOAAAABwAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABvb2wWopyW9dHHv//PyMD/z8jA/9TNxf+xrKb/ZmRj/316eP+Kh4T/lJCO/5uX + lf+YlZP/j42M/4iHh/99fX3/dnd3/3N0dP90dHT/d3h3/4GBgf+Lior/m5ub/6inp/+wr6//s7Ky/6ur + qv+gn5//29rY/9DKw//Lxb//1c/L/9XPy//Wz8v/1tDM/9jTz//RzMj/i4N7/4Z+dv+Hf3j/gnhp/4h/ + d/+IgHj/iYB4/4mBef+KgXn/ioF5/4uCev+Mg3r/jYN7/42Ee/+OhHv/j4V8/5CGfP+IfWz/j4N4/xd3 + rv8Ahd3/AJf+/wCY//8AlPz/AHDY/wBu1v8AcNj/AHDY/wBx2f8Actr/AHTd/wB55v8AduT/AGzO/wla + n/8nTmn/QEI9/2hZQf+Yi3D/n5eA/1ZUSv94bWP/q5uO/6SViP+klYj/pJWI/6SViP+klYj/pJWI/6aX + iv+vnpD/mIuA/yQkI/8bGxr/Gxsb/zQ0NP8+Pj7/WVlY/5SUlP+Ojo//kpGS/3Z2dv/IyMj/srKy/y0t + Lf8ODg7/Hx8f/zU1Nf9JSUn/SUlJ/0FBQf85OTn/NDQ0/zMzM/8vLy//FBQUrgQEBHAFBQVpBQUFWgUF + BUoFBQU5BAQEKQICAhoAAAAPAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHBvbBaim5b10Ma//8/I + wP/PyMD/0svD/7y2r/+JhYL/h4SC/358e/90c3P/ampr/2hoaP9mZ2f/a2tr/3Z1df+BgID/kI+O/6Cd + nP+opqX/qqqo/6inpv+cnJz/k5OT/4iHiP+FhYX/kJCQ/5+fn//m5eT/2NPO/8vEv//Vz8v/1c/K/9bP + y//W0Mz/2dLP/9HLx/+MhHz/h393/4iAef+DeWn/iYB3/4mAeP+JgXn/ioF5/4qCef+Lgnr/jIJ6/4yD + ev+NhHv/joR7/4+FfP+QhXz/kIZ9/4l9bP+Qg3j/F3as/wCE3P8Alv7/AJj//wCU/P8Acdn/AG/X/wBx + 2f8Actr/AHLa/wBz2/8AdNz/AHbe/wB33/8AeuP/AH3r/wB66P8Abcz/BVWW/xk7Vf8YHiH/IRYL/4Bt + XP+kk4T/pZaK/6aXiv+llon/pJWI/6SViP+klYj/pJWI/6majf+ajoP/ODc3/y4uL/8vLy//PT09/z4+ + Pv9NTU3/hoaH/2hqa/+UlZb/dnZ2/5GRkf+pqan/RUVF/wsLC/8PDw//MzMz/0xMTP9CQkL/RUVE/1tb + W/9NTU3/Li4u/ykpKf8mJib9DQ0NoQQEBHYFBQVvBQUFXwUFBU0FBQU4BQUFJgICAhYAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAcG9sFqGblfXQxb7/z8fA/8/IwP/UzcT/sKqk/1ZXWP9cXFz/X19f/2pp + aP93dXT/hYOB/5SRj/+dmpj/oJ6c/5+dnP+Tk5P/jIyM/4OEhP+AgID/iYiH/5WTkv+op6X/wb+9/9nX + 1f/s6+r///7+///////Z1dD/y8O9/9XPy//Vzsr/1c/L/9bQy//Z087/0cvH/4yEfP+If3f/iYB5/4N5 + av+JgHj/ioF5/4qBef+Lgnn/i4J6/4yDev+Mg3r/jYN7/46Ee/+PhXz/j4V8/5CGfP+Rhn3/iX1s/46D + ev8Wdq3/AITb/wCW/v8AmP//AJT8/wBz2/8Acdn/AHLa/wBz2/8AdNz/AHTc/wB13f8Adt7/AHjg/wB5 + 4f8AeuL/AHvj/wCA6v8Ag/H/AH7q/wVzzf85fbD/XnSC/3tvYv+Od2L/nIh1/6SUhv+nmIv/pZaJ/6SV + iP+klYj/qZuO/5yQhv9DQkH/OTo6/zo6Ov9DQ0P/RERE/zU1Nf+EhIT/ZWVm/25vb/9ubm7/c3Nz/4iI + iP9JSUn/CgoK/woKCv86Ojr/SEhI/0hISP9qamr/lpaX/9DQ0f+Ki4v/LS0t/yAgIP8aGhrlBQUFfAUF + BW4GBgZgBQUFTwUFBTsFBQUoAwMDGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABwb2wWoZqV9c/F + vf/PyL//z8i//9PLw/+1rqj/dHFv/4iDgP+RjYr/lJGN/5OQjf+HhoT/fn5+/3l5ef90dHX/e3p5/4WD + gP+VkY7/qqSf/721sP/Mxr//29XQ/+Te2v/q5eL/8Ozo//Lw7v/39vX//////+Dd2f/Kw7z/1c/K/9XO + yv/Vz8r/1tDM/9jSz//Ry8f/jYV9/4mAeP+KgXr/hHlq/4qBeP+Lgnn/i4J6/4yCev+Mg3r/jYN6/42D + e/+OhHv/joV8/4+FfP+Qhnz/kYZ9/5GHff+LfWz/h4R//xB2sf8Ag9r/AJb+/wCY//8AlPz/AHTc/wBy + 2v8Ac9v/AHTc/wB13f8Adt7/AHbe/wB33/8AeOD/AHri/wB74/8AfOT/AH3l/wB/5/8AgOn/AITv/wCE + 8/8AhO//FoDS/zl4pv9fb3b/f3Bf/5V+av+ijn3/p5eK/6eYi/+rnJD/mo+E/zo5Of8yMjP/NDQ0/zY2 + Nv9LS0v/Ly8v/1VVVf+Kior/ampq/1ZWVv9YWFj/cXFx/zo6Ov8GBgb/BgYG/zs7O/9CQkL/YmJi/29v + b/9TU1P/pKSl//7+/v+Hh4f/HBwc/xoaGv8MDAyWBAQEVAYGBk4FBQU+BQUFLgUFBR8BAQESAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAHFvbhagmpT1z8S8/8/Hv//PyMH/1MvD/7u1rv93dHP/b25t/2tr + av9naGj/c3Jy/4GAfv+RjYr/oZuW/6yjnP+vpZv/tamg/72yqP/CuLD/yr+3/87Gvv/TzMX/2tTQ/+Ld + 2f/l4d7/6OXi/+jl4v/g3dr/x8K7/83GwP/Vzsr/1c7K/9XPyv/W0Mv/2NLO/9HLx/+Ohn3/ioF4/4uC + ev+Eemr/i4J5/4yCev+Mg3r/jIN6/42De/+NhHv/joR7/46Ee/+PhXz/kIZ8/5CGff+Rh33/kod+/4t9 + bP+IhH//EHaw/wCD2v8Alv7/AJj//wCU/P8Adt7/AHPb/wB13f8Add3/AHbe/wB33/8AeOD/AHnh/wB5 + 4f8Ae+P/AHzk/wB95f8Afub/AH/n/wCB6f8Agur/AIPr/wCE7f8Ah/P/AIn3/wKI7v8YgdD/PXWc/2Vu + cf+GdGT/nYZy/6+cjP+ZjoT/LCws/ysrK/8sLCz/KSkp/0BAQP9CQkL/JiYm/2BgYP9qamr/UVFR/1pa + Wv9oaGj/FxcX/wcHB/8GBgb/Ozs7/0BAQP9ycnL/jo6O/4ODhP9tbW3/0dHR/9TU1P9AQED/ERER/xAQ + EMMEBAQ1BQUFMQUFBSYFBQUbAQEBEgAAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcnBtFqGa + lfXQxb7/0cnC/9HLw//Wzsf/uLKs/3t6ev+WlZP/r6yq/8O/u//MxsH/0cnD/9DFvv/Iv7b/wbiv/7uw + p/+1qaD/tKmf/7qwp/++taz/wrix/8e+tv/Du7P/v7ev/762rv+5sqj/ubKo/8G4sP/Hv7j/1M3I/9TO + yf/Vzsn/1c/L/9bQy//Z087/0svH/4+Gfv+LgXn/jIN7/4V6av+Mgnn/jIN6/42De/+NhHv/jYR7/46E + e/+OhXz/j4V8/5CGfP+Qhn3/kYd9/5KHff+SiH7/i35s/4iFgP8QdrD/AIPa/wCW/v8AmP//AJX9/wB3 + 3/8Add3/AHbe/wB33/8Ad9//AHjg/wB54f8AeuL/AHvj/wB85P8AfeX/AH7m/wB/5/8AgOj/AIHp/wCD + 6/8AhOz/AIXt/wCG7v8AiPD/AInz/wCM+f8Ajv3/BIvv/xuAyf9Dc5L/cXd2/4V2aP85MSz/IR4c/yMi + Iv8iIiL/JCQk/0pKSv8wMDD/Hx8f/0ZGRv9dXV3/WFhY/yUlJf8ICAj/BAQE/w4ODv8/Pz//Ozs7/3R0 + dP+EhIb/lJSW/4aGhv+MjIz/wsLC/2pqav8PDw//EBAQ4QYGBiwDAwMUAgICEQEBAQwAAAAHAAAABAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABxcG0XopyX9tLJwf/TzMb/083I/9LMxv/a1ND/8O3s//Lu + 6//r5+P/5N/b/97Z1P/X0cv/08vE/8/Gv//Ivrf/vLOr/7Wqof+rn5X/pZmO/6yil/+vppv/s6qg/722 + rP/CurH/ycG4/9HKw//TzcX/1M7H/9XPyf/Uzcj/1M7J/9XOyv/Vz8r/1tDL/9jSzv/Sy8f/j4d+/4uC + ef+NhHv/hXtr/42Cev+NhHv/joR7/46Ee/+OhHv/j4V8/4+FfP+QhXz/kYZ9/5GHff+Sh33/koh+/5OI + fv+Lfmz/iIWA/xB2sP8Ag9r/AJb+/wCY//8Alf3/AHjg/wB33/8Ad9//AHjg/wB44P8AeeH/AHri/wB7 + 4/8AfOT/AH3l/wB+5v8Afub/AIDo/wCB6f8Agur/AIPr/wCF7f8Ahu7/AIfv/wCI8P8AivL/AIvz/wCN + 9f8Ajvj/AJH//wCT//8Gje3/GHq9/zBjh/8cJi7/GhMP/xoTDv8YFhT/JSUk/0hJSf8oKCj/EhIS/xAQ + EP8MDAz/CgoK/wgICP8CAgL/Kioq/0hISP84ODj/YGBg/3t8ff9lZmf/hISF/3Fxcf+Wlpb/eHh4/xAQ + EP8NDQ31AwMDMgAAAAIAAAAGAAAABAAAAAMAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHJy + bxOhm5bt1MvE/9XPyv/Vz8v/083I/+Db1//5+Pb/8u/t/+/s6v/q5+P/39rW/9XQyv/Jwrv/ubGn/7Sr + ov+zqZ//s6qg/721q//EvbP/ycK5/9DJwf/Sy8P/0svD/9PMxP/SzMT/0cvD/9HKw//Sy8T/08zG/9PM + xv/SzMf/08zH/9TNyP/Vz8r/2dPO/9HLx/+Qh3//jIN6/46EfP+MgHD/kod+/46Ee/+OhHv/j4V8/4+F + fP+QhXz/kIZ8/5CGff+Rh33/kod9/5KIfv+TiH7/lIl//4x+bP+JhoD/EHaw/wCD2v8Alv7/AJj//wCV + /f8AeuH/AHjg/wB54f8AeeH/AHri/wB64v8Ae+P/AHzk/wB95f8Afub/AH7m/wB/5/8Agen/AILq/wCD + 6/8AhOz/AIbu/wCH7/8AiPD/AInx/wCK8v8AjPT/AI31/wCO9v8AkPj/AJH5/wCU/v8Al///AJn//wOL + 6P8IZaL/DjpW/xIXG/8QCAP/IRoW/z49PP8qKir/FhYW/w8PD/8JCQn/AgIC/xcXF/85OTn/RERE/0FB + Qf88PDz/iYmJ/2xtbv9tbm7/W1tb/3Fxcf9paWn/Dw8P/woKCvkBAQEvAAAAAAAAAAIAAAABAAAAAQAA + AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAdnVyDJ6aldvVzcX/19HN/9fSzf/V0Mv/4t3a//b0 + 8//p5uL/0c3H/8XAuP+/uLD/urKp/7+3sP/IwLr/zca//9TOyP/X0cz/1s/J/9TNx//Sy8T/z8nB/8/H + vv/Oxr7/zsa+/8/Hv//RycH/08zE/9XOyP/X0cz/3djU/+Ld2v/k4N3/5ODd/+Hc2f/d19T/0szH/5GH + f/+Qhnz/hHtz/0tEO/9za2T/koh//4+FfP+QhXz/kIZ8/5CGff+Rhn3/kod9/5KHfv+SiH7/k4h+/5SJ + f/+UiX//jH5s/4qGgf8QdrD/AIPa/wCW/v8AmP//AJX9/wB74/8AeuL/AHri/wB74/8Ae+P/AHzk/wB9 + 5f8AfeX/AH7m/wB/5/8AgOj/AIHp/wCC6v8Ag+v/AITs/wCF7f8Ahu7/AIjw/wCJ8f8AivL/AIvz/wCM + 9f8Ajvb/AI/3/wCQ+P8Akvr/AJP7/wCV/f8Alv//AJr//wCg//8CnP//BYfe/whbkv8IK0H/DxAR/yIZ + E/8iHBj/FxYV/xISEv8ZGRn/Ly8v/zAwMP8zMzP/TExM/ysrK/9WVlb/fn5+/1RUVP9JSUn/ZmZm/0lJ + Sf8ICAj/BwcH+AEBASwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAB1dHEMn5uW3NbPyP/Z1M//2dTQ/9nU0P/c2NP/y8W+/8S8tf/MxL7/z8nC/9bPyv/b1dH/29TQ/9rT + z//Z0s3/1tDL/9TOyf/SzMf/0szG/9TNx//Vz8j/2dPN/9/a1f/k4dz/6+jl//Lv7f/39fT/+ff3//f3 + 9v/x7+3/6ufl/+Pf3P/d2NP/2tTQ/9nTzv/TzMj/lImB/4+Fe/+OhXz/b2ZZ/0VAO/+Adm7/k4l//5CG + ff+Rhn3/kod9/5KHff+SiH7/k4h+/5SJfv+UiX//lIl//5WKf/+Nf23/ioaB/xB2sP8Ag9r/AJb+/wCY + //8Alf3/AHzk/wB74/8AfOT/AHzk/wB95f8AfeX/AH7m/wB+5v8Af+f/AIDo/wCB6f8Agur/AIPr/wCE + 7P8Ahe3/AIbu/wCH7/8AiPD/AIry/wCL8/8AjPT/AI71/wCP9/8AkPj/AJL6/wCS+v8AlPz/AJX9/wCX + //8Bl///Apj//wOa//8Env//BKP//wad/v8Ff83/BE5+/xk2SP8tKyv/SkE7/zItK/8lJCP/JiYm/yQk + JP89PT3/QkJC/yEhIf9PT0//ampq/2hoaP9eXl7/FxcX/wcHB/8EBAThAQEBEwAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHJwbgyemZTc19DK/9rV0P/c19L/3NfT/9vW + 0v/d2NT/3tjU/93X1P/d19P/3NbR/9rU0P/Z0s7/2NLN/9rTz//b1dH/39vX/+bi4P/t6uj/8/Hv//n4 + +P/9/fz//f39//z8/P/49vX/7+3q/+fj3//e2dX/19DL/9TMx//RysT/083H/9jRzP/f2NP/3dfS/9TO + yv+bkYj/j4R6/5CGff+YjHv/ZF1V/25mXv+VioD/kod9/5KHfv+SiH7/koh+/5OIfv+UiH7/lIh+/5WJ + f/+VioD/loqA/41/bf+Kh4H/EHaw/wCD2v8Alv7/AJj//wCV/f8Afub/AH3l/wB95f8Afub/AH7m/wB/ + 5/8Af+f/AIDo/wCB6f8Agen/AILq/wCD6/8Ahe3/AIbu/wCH7/8AiPD/AInx/wCK8v8AivL/AIz0/wCN + 9f8Ajvf/AI/3/wCR+f8Akvr/AJT8/wCV/f8Alv7/AJf//wGY//8Cmf//A5r//wSa//8Fm///Bp7//wei + //8Jp///DJ/9/xKCyP8ucJv/N0pW/xwYF/8dFQ//HBkW/x0cHP9DRET/NDQ0/xcXF/8jIyP/Kioq/xMT + E/8JCQn/BgYG/wEBAa0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAbmxpDJuWkd3X0cr/3NfT/97Z1f/e2dX/3tnV/93Y1P/d2NT/3djU/9zX0//d2NT/39rX/+Tf + 3P/p5uP/7+zq//Xz8v/39/b/+Pj3//f29f/08vD/7ero/+fj3//f2db/2NHM/9HKw//QyL//0cnC/9fQ + yf/e19L/5uDb/+zn4//l4d//2NXU/8LBwP/Ev7v/2NLN/5uSif+PhXv/k4l+/3x3cP9ZVlX/fHZw/6GX + jv+TiH7/kYZ7/5KHff+UiH7/lIh+/5WJf/+fk4n/nJCF/5eLgP+Win//jX9t/4yIgf8RdrD/AIPa/wCW + /v8AmP//AJX9/wB/5/8Afub/AH/n/wB/5/8Af+f/AIDo/wCA6P8Agen/AILq/wCD6/8AhOz/AITs/wCG + 7v8Ah+//AIjw/wCJ8f8AivL/AIvz/wCM9P8AjfX/AI72/wCP9/8Akfn/AJL6/wCT+/8AlP3/AJb+/wCX + //8BmP//Apj//wOZ//8Emv//BZv//wab//8HnP//CJ3//wme//8KoP//CaX//wmm//8Qnvf/EXq6/xNM + bv8UIiv/Ew0J/xkRDP88OTf/MjIy/xUVFf8NDQ3/DAwM/wkJCf8DAwP/AAAA5AAAAI4AAAAvAAAAAwAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABta2gLmpWQ2tjSy//d2dX/3trX/9/a + 1v/f2tb/4NvY/+Ld2v/l4d7/6efk/+3r6f/x7+7/8fDu//Lw7v/v7Ov/6+jm/+bk4P/h3dr/3NfT/9jS + zf/W0Mr/2NDL/93W0f/j3Nj/6OPe/+vn4v/f3Nn/0M7M/7W0tP+UlJP/c3Ny/1pZWP9CQD7/IiEf/4F/ + e//h29f/nZOL/5CFfP+YjoP/SUVA/yUjIf9NTEr/iYWD/56Zlf+ooJn/n5SK/5SIff+Thnz/lIl//2xo + ZP9ybWn/lYyE/56SiP+PgG3/jIiB/xF2sP8Ag9r/AJb+/wCY//8Alf3/AIDo/wB/5/8AgOj/AIDo/wCB + 6f8Agen/AILq/wCC6v8Ag+v/AITs/wCF7f8Ahu7/AIbu/wCI8P8AifH/AIry/wCL8/8AjPT/AI31/wCO + 9v8Aj/f/AJD4/wCR+f8Ak/v/AJT8/wCV/f8Al///AZf//wGY//8Cmf//A5r//wSa//8Fm///Bpz//wed + //8Inv//Cp7//wqf//8LoP//DKH//wyj//8Oqf//D6n//xCZ7f8Rcav/Dj1Z/w4XHf8lHRj/KSIe/xwZ + GP8ODg7/BQUF/wAAAP8AAAD/AAAA/wAAAPcAAAA8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAHBubAOVkY3F2NLN/9/a1//i3tv/5eHe/+jk4v/q5+X/7Ono/+zq6P/s6ef/6ebk/+bi + 3//j39z/39vX/93X1P/d2NP/4NvX/+bh3f/q5uP/8e3q//Lv7P/g3dz/zs3M/62srP+KiYn/aWho/1RS + Uf9IRED/SEQ+/1BKQ/9VTkf/W1RO/19ZUv88ODP/fXl3/+Te2v+kmpL/kIV7/5SJf/9zamL/opOH/56P + gf+JfHH/Pjw6/1ZWV/+GhIT/qqWi/7CnoP+hloz/bGNb/zk0Mf9ZU07/fXZv/5WLf/+PioT/EXaw/wCD + 2v8Alv7/AJj//wCV/f8Agur/AIHp/wCC6v8Agur/AILq/wCD6/8Ag+v/AITs/wCF7f8Ahe3/AIbu/wCH + 7/8AiPD/AInx/wCK8v8Ai/P/AIz0/wCN9f8Ajvb/AI/3/wCQ+P8Akfn/AJL6/wCT+/8Alf3/AJb+/wCX + //8BmP//Apn//wOZ//8Emv//BZv//wab//8HnP//CJ3//wme//8Kn///C6D//wyg//8Nof//DqL//w+j + //8QpP//Eaf//xKt//8Tq///EZXh/wxlmf8LM0v/CQ8T/wIAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AEwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAamhlAZGOisDb1dH/5N/c/+fj + 4P/n4+L/5uPh/+Xi3//j393/4t7b/+Hd2f/j39v/6OTh/+7q5//y7+z/+PXz//Hv7f/b2tn/xsbF/6Sk + pP96enn/WVlY/z49PP87NzT/Lion/0hCPP9aUkv/aGBY/3RrYv98cmn/fHJq/3ZtZf9tZl7/amNc/zw3 + M/9taWf/5+Hc/6aclP+Rhnz/lYl//3tyav+0qJ7/saOY/6GUiP92bmT/XFRN/z46Nv8+PDz/ZWZm/5qZ + mP+7tbH/s6mi/5eMgv9+c2n/j4R4/4+LhP8Sd7D/AIPa/wCW/v8AmP//AJX9/wCE7P8Ag+v/AIPr/wCD + 6/8AhOz/AITs/wCF7f8Ahe3/AIbu/wCG7v8AiPD/AIjw/wCJ8f8AivL/AIvz/wCM9P8AjfX/AI72/wCP + 9/8AkPj/AJH5/wCS+v8Ak/v/AJX9/wCW/v8Al///AZj//wKY//8Dmf//BJr//wSb//8Fm///Bpz//wed + //8Inf//CZ7//wqf//8LoP//DKH//w2i//8Oov//D6P//xCk//8Rpf//EqX//xOm//8Tq///FLH//xSr + //8RjdD/DF6L/wUlN/8BAwX/AAAA/wAAAP8AAAD/AAAASgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAjYqGrdrU0f/i3tv/49/c/+Pf3f/n4+H/7+vp//Tx7v/39fP//fv5/+3s + 7P/X19b/vr6+/5WVlf9tbGz/T09O/zg3Nf8qJyT/Mi4q/zkzLv8WExH/KSYj/yglIv8yLir/Z19Y/2tj + W/9tZV3/cGhg/3RrYv92bWX/eG9n/3RsZP9waWH/Qjw3/2hlY//q5OD/raOb/5GGe/+ViX7/gXlz/8jA + uv/DubH/q6CW/3VtY/9tZV3/amJa/1pTTP8+OTT/LCkn/0FBQf93dnj/q6mo/8G7t/+bjn7/jIeB/xN4 + sP8AhNr/AJf+/wCY//8Alv7/AIXt/wCE7P8AhOz/AIXt/wCF7f8Ahe3/AIbu/wCH7/8Ah+//AIjw/wCI + 8P8AivL/AIry/wCL8/8AjPT/AI31/wCO9v8Aj/f/AJD4/wCR+f8Akvr/AJP7/wCU/P8Alf3/AJf//wGX + //8BmP//Apn//wOa//8Emv//BZv//wac//8HnP//CJ3//wme//8Kn///C6D//wyg//8Nof//DqL//w+j + //8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//Far//xew//8YtP//GKz//xSLyv8NVHv/BR0r/wAA + AP8AAABGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABta2io3dnV/+Tg + 3v/18/H//fz7/+vq6f/Ozs3/tLS0/4WFhf9cXFv/Ozs7/ycmJv8JCAj/EQ8O/xMRD/8YFRP/Pzs2/0pE + QP9JRD//Ih8d/xIQEP8wLSr/S0VB/2FaU/9iW1T/ZV5X/2lhWf9sZV3/cGhg/3NrYv92bmX/eXBn/3Zu + Zf9RS0X/XlpZ/+fh3f+xqKH/kYZ7/5WJfv+Gf3r/2tbU/9TOyP+0qqL/aWJa/15XUP9ZU0z/VE5I/1JL + Rv9MRkH/OjUx/yQgHv8kIiL/Tk5Q/6qjnv+NiIH/EXeu/wCG2v8BmP7/AJj//wCW/v8Ahu7/AIXt/wCG + 7v8Ahu7/AIbu/wCH7/8Ah+//AIjw/wCI8P8AifH/AIry/wCK8v8AjPT/AIz0/wCN9f8Ajvb/AI/3/wCQ + +P8Akfn/AJL6/wCT+/8AlPz/AJX9/wCW/v8Al///AZj//wKZ//8Dmf//BJr//wWb//8Gm///B5z//wed + //8Inv//CZ7//wqf//8LoP//DaH//w2i//8Oov//D6P//xCk//8Rpf//EqX//xOm//8Tp///E6j//xSo + //8Wqv//F6r//xir//8Zrf//G7T//xy2//8bq/n/FoK9/xJqmnEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEJBQKbe2db/8e3r/7i4uP9GRkb/Ly8w/xMSEv8EBAT/CAcH/w4N + DP8aGBf/FhUT/wwLC/8XFhX/HRwa/zEuK/81MS7/KCYk/yIgHv8uKyn/SUM//1ZQSv9YUkz/WlNN/15X + UP9hWlP/Zl5X/2lhWv9tZV3/cGhg/3NrYv92bmX/e3Jp/1lSS/9VUlD/5eDc/7eup/+Shnv/lYl9/42H + gv/n5eX/3trX/7iwqf9dVlD/U0xH/09JRP9JRD//RD87/z87N/87NzT/ODQx/y8sKP8YFxb/lY+K/5GM + hf8SeK7/AYfa/wOZ/v8Bmf//AJb+/wCI8P8Ah+//AIfv/wCH7/8AiPD/AIjw/wCJ8f8AifH/AIry/wCK + 8v8Ai/P/AIz0/wCM9P8Ajvb/AI72/wCP9/8AkPj/AJH5/wCS+v8Ak/v/AJT8/wCV/f8Alv7/AJf//wGY + //8Cmf//A5n//wSa//8Em///BZv//wac//8Hnf//CJ3//wme//8Kn///C6D//wyg//8Nof//DqL//w+j + //8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//Fan//xaq//8Xq///GKz//xms//8arf//G67//xyx + //8et///H7j/qAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACmlohYg3t06M7K + x//28vD/jo2N/wAAAP8PDg7/EhER/xUUFP8UFBT/FxUV/xYWFv8PDw7/GhkY/yglI/8wLSv/HBoZ/xgX + Fv8rKSb/Pzo2/0hDP/9LRkH/TkhD/1JMRv9WUEr/WlNN/15XUP9iW1T/Zl5X/2piWv9tZV3/cGhf/3Nq + Yf92bWX/Zl1V/1BOTP/h3Nj/vrau/5WIff+ViX7/mZKL/+Xj4v/f29f/vbWv/19ZVP9FQDv/RD86/z87 + N/86NjP/NTIv/zEuK/8sKSf/KCYj/xkYGP+RioX/ko2H/xR4r/8CiNr/BZr+/wOa//8Bl/7/AInx/wCI + 8P8AifH/AInx/wCJ8f8AivL/AIry/wCL8/8Ai/P/AIz0/wCM9P8AjfX/AI72/wCP9/8AkPj/AJD4/wCR + +f8Akvr/AJP7/wCU/P8Alf3/AJb+/wCX//8BmP//AZn//wOZ//8Dmv//BJr//wWb//8GnP//B5z//wid + //8Jnv//Cp///wqf//8LoP//DaH//w6i//8Oov//D6P//xCk//8Rpf//EqX//xOm//8Tp///E6j//xSo + //8Wqf//Fqr//xer//8YrP//Ga3//xqt//8brv//HK///x2w//8esf+kAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAKaWiaeakIb/xcK///Tw7v+srKv/DAwM/xgXF/8TEhL/Dg0N/wsL + C/8REBD/FRQU/xwbGv8iIB//JiMi/yonJf8nJCP/My8s/zo2M/89ODX/QTw4/0ZBPP9KRT//TkhD/1JM + Rv9WUEr/WVNN/15WUP9gWVL/Y1xU/2dfV/9rY1v/cmpi/4F5cf91bWb/REJA/93Y1P/EvLb/l4p+/5aJ + fv+elY3/4t7b/9/Z1f+8tK3/e3dz/1NPS/84NDD/NDAt/zEuK/8sKif/KCYk/yQiIf8iIB//CQkJ/4iB + fP+Uj4j/FHmv/wOJ2v8Gm/7/BJv//wKY/v8Ai/P/AIry/wCK8v8AivL/AIvz/wCL8/8Ai/P/AIz0/wCM + 9P8AjfX/AI72/wCO9v8Aj/f/AJD4/wCR+f8Akvr/AJL6/wCT+/8AlPz/AJX9/wCW/v8Al///AZj//wGY + //8Dmf//A5r//wSa//8Fm///Bpz//wec//8Hnf//CJ7//wme//8Kn///C6D//wyg//8Nov//DqL//w+j + //8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//Fan//xaq//8Xq///GKz//xms//8arf//G67//xyv + //8dr///HrD//x+x/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqp2Rn6Oa + kv+8ubf/8/Du/8C/v/8cHBz/Ozo6/ywsLP8cHBz/GBgY/xQUFP8TEhL/FhUU/xoYF/8eHBv/IyEf/yon + Jf8tKij/Mi4r/zYyL/87NjP/Pzo2/0M+Of9HQTz/S0ZB/1BKRf9VT0n/XldR/2hhW/9zbWf/gXp0/5CK + hP+clpH/qqWf/5CKhP9EQT7/2NTQ/8vDvv+ZjIH/mIt//6SYjv/NxsD/z8a//6yimv9yb2z/cG1r/1ZT + Uf8zMC7/JSMg/yIgHv8gHh3/HRsa/xsZGf8FBQX/iYJ9/5WQif8Weq//BIra/wec/v8GnP//A5n+/wCM + 9P8Ai/P/AIvz/wCM9P8AjPT/AIz0/wCN9f8AjfX/AI72/wCO9v8Aj/f/AJD4/wCR+f8Akfn/AJL6/wCT + +/8AlPz/AJT8/wCV/f8Alv7/AJf//wGY//8BmP//A5n//wOa//8Emv//BZv//wab//8HnP//B53//wid + //8Jnv//Cp///wug//8MoP//DaH//w6i//8Po///EKP//xGk//8Rpf//Eqb//xOm//8Tp///E6j//xSo + //8Vqf//Fqr//xer//8YrP//Ga3//xqt//8brv//HK///x2w//8esP//H7H/pAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC1qqCftKym/7Wyr//x7ez/zczM/yYmJv9BQUH/QUFB/0FB + Qf89PDz/ODc3/zIxMf8uLSz/LCsq/y0sK/8wLi3/Mi8t/zQxL/85NjT/PTo3/0M/Pf9LSET/Uk5K/1tX + U/9kYFz/b2tm/3p2cv+FgXz/jYiE/5WQjP+alZH/nJeT/5+alf+loJv/kIqE/zs4Nf/Szsv/083G/5uO + g/+fkof/gndu/yklI/9gXFj/b2pn/2RiYP9lYmD/Z2Vk/15cW/9BQD//JyUk/xkXFv8TERH/ERER/wME + BP+Kg33/lpCJ/xZ7r/8Gi9r/CZ3+/wed//8Fmv7/AI71/wCN9f8AjfX/AI31/wCN9f8Ajvb/AI72/wCP + 9/8Aj/f/AJD4/wCQ+P8Akfn/AJL6/wCS+v8Ak/v/AJT8/wCV/f8Alv7/AJb+/wCX//8BmP//Apj//wKZ + //8Dmf//BJr//wWb//8Gm///Bpz//wed//8Inf//CZ7//wqf//8Ln///C6D//wyh//8Oov//DqL//w+j + //8QpP//EaX//xKl//8Tpv//E6f//xOn//8UqP//Fan//xaq//8Xq///GKz//xms//8arf//G67//xyv + //8dr///HrD//x+x//8gsv+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALyy + qZ/Evbf/sK2q/+vo5v/Z2Nf/MTEx/zg4OP86OTn/Ojk5/zo5Of87Ojr/PDw8/z49Pf9BQED/RURE/0pJ + SP9NTEv/UlBP/1dVU/9cWVj/Yl9d/2lmY/9va2n/dXJv/3l1cv98eXX/gX15/4WAfP+JhID/jIeD/5CL + hv+Tj4r/mZSP/6Cblv+Vj4n/QT47/9DMyP/a1ND/nZCF/5+Rhf+QhHr/ExEQ/0RCQf9dW1n/WVdV/1lX + Vv9YV1b/W1lY/11cXP9XVlb/SEdH/zc2Nv8qKyr/EhIT/5aPiv+Uj4f/F3uv/weM2v8Knv7/CZ7//wab + /v8Aj/b/AI72/wCP9/8Aj/f/AI/3/wCP9/8AkPj/AJD4/wCR+f8Akfn/AJL6/wCS+v8Ak/v/AJT8/wCV + /f8Alf3/AJb+/wCX//8Al///AZj//wKY//8Cmf//A5n//wSb//8Em///Bpv//wac//8Hnf//CJ3//wme + //8Kn///Cp///wug//8Mof//DaH//w6i//8Po///EKT//xGk//8Spf//E6b//xOm//8Tp///E6j//xSp + //8Vqf//Fqr//xir//8YrP//Ga3//xqt//8brv//HK///x2w//8esP//H7H//yCy/6QAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAvbOsn83Fwf+tqaf/5eLg/+bk4/89PT3/MTAw/zc1 + Nf81NTX/NTQ0/zU0NP81NDT/NTQ0/zc2Nv85ODj/Pj08/0RCQv9KSEf/T01M/1VSUf9aV1X/Xlxa/2Rh + Xv9pZWP/bmpn/3NvbP95dXH/f3t3/4SAfP+Ggn3/iYR//4qEf/+CfXj/e3Vw/2tlX/8kIh//y8fE/9/a + 1f+lmI7/mIt//4+Def8sKCT/GxoZ/z8+Pf9QTk3/UE9O/09NTf9PTk3/UE9P/1NTU/9YV1f/X15e/1tb + W/8cHB3/lo+K/5WQh/8YfK//CYza/wyf/v8Kn///B5z+/wCR+P8AkPj/AJD4/wCQ+P8Akfn/AJH5/wCR + +f8Akvr/AJL6/wCT+/8Ak/v/AJT8/wCV/f8Alf3/AJb+/wCW//8Al///AZj//wGY//8Cmf//A5n//wSa + //8Emv//BZv//wab//8GnP//CJ3//wid//8Jnv//Cp///wqf//8LoP//DKD//w2h//8Oov//D6L//xCj + //8RpP//EaX//xKm//8Tpv//E6f//xOo//8UqP//Fan//xaq//8Xqv//GKv//xms//8arf//G67//xyv + //8dr///HrD//x+x//8gsv//IbL/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAC5rqafyL+5/6mkoP/Z19b/9vX0/0lJSf8qKSn/NDMz/zExMf8wMDD/Ly4u/y8uLv8vLi7/MS8w/zEx + Mf80MzP/OTg4/z8+Pf9GREL/S0pI/1JQTv9YVVP/W1hV/15bWP9gXFn/XFhV/1ZSTv9OSkb/RUE9/0I/ + O/8+Ozj/Ozg1/0dDQf9UUk//ZmNh/4WCf//c1tT/4dzY/62hlv+Qg3j/W1NM/2phWf9sY1r/LCcl/x0c + HP8tLi7/QUFB/0lJSf9LSkr/Tk1N/1BQUP9WVVX/UlFR/x4eH/+ck43/lY6H/xp9rv8Kjdr/DaD+/wuh + //8Jnf//AJL5/wCR+f8Akfn/AJL6/wCS+v8Akvr/AJP7/wCT+/8Ak/v/AJT8/wCV/f8Alf3/AJb+/wCX + //8Al///AJf//wGY//8CmP//Apn//wOZ//8Dmv//BJr//wWb//8Gm///B5z//wid//8Inf//CZ7//wme + //8Kn///C6D//wyg//8Nof//DaL//w6i//8Qo///EKT//xGl//8Spf//E6b//xOn//8Tp///FKj//xWp + //8Vqv//Fqr//xir//8YrP//Gq3//xuu//8brv//HK///x6w//8esP//H7H//yCy//8hs/+kAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALGkmqjCtqz/qKCa/8vIx//+/Pz/XVxc/yUk + JP8xMTH/Li4u/y0sLP8rKir/Kyoq/ysqKv8rKir/LCsr/ywrK/8rKir/Li0s/y4sK/8sKSj/KCYl/yMi + IP8nJST/Kyoo/y4sKv88OTj/UlBO/2hmY/99e3j/lZKQ/62qp//JxcL/1dHN/9/b1//q5uL/7unl/+Hd + 2P/g29j/s6mf/5yMgP+klYj/pZeK/6aYi/+dj4T/cWde/zo1MP8aGRj/HBwd/zIyMv9ERET/T09P/1dX + V/9KSUn/JCUl/6uhmv+TjYT/Gn6u/wuP2v8Pov7/DaH//wqf//8AlPv/AJP7/wCT+/8Ak/v/AJT8/wCU + /P8AlPz/AJX9/wCV/f8Alf3/AJb+/wCW/v8Al///AJj//wGY//8Cmf//Apn//wOZ//8Emf//BJr//wWb + //8Fm///Bpz//wad//8Hnf//CJ7//wme//8Kn///C5///wug//8Mof//DaH//w6i//8Oov//D6P//xCk + //8RpP//EqX//xOm//8Tpv//E6f//xOo//8Vqf//Far//xaq//8Xq///GKz//xms//8arf//G67//xyv + //8dsP//HrD//x+x//8gsv//IbP//yKz/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAqpuOaHduZr6EfHVYuba18vz7+v91dXX/IyIi/zIyMv8sKyv/KCcn/yMjI/8dHBz/FhYW/xAP + D/8JCQn/Dw4P/xcXF/8gHx//MzIy/0xKSv9nZmX/g4KB/56bmv+4trX/1NLP/+Lf3f/o5uP/8e3q//Lu + 6v/r5+P/5uHc/9/Z1P/Y0s3/1M3H/9DJw//NxsD/zMW+/8vDvf/Hvrn/vLGq/62imf+ilIn/nY+C/5+Q + hP+nmIv/pZeK/4yAdf9bU0z/Lysn/xsaGf8eHh//LCwt/x8fIP84Ojz/uq2k/5CKgv8bf6//DJDa/xCj + /v8Oov//C5///wCV/P8AlPz/AJX9/wCV/f8Alf3/AJb+/wCW/v8Alv7/AJb//wCX//8Al///AJj//wGY + //8Cmf//Apn//wOZ//8Dmv//BJr//wSb//8Fm///Bpv//wac//8GnP//CJ3//wme//8Jnv//Cp///wuf + //8LoP//DKH//w2h//8Oov//DqL//w+j//8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//FKn//xWp + //8Wqv//F6v//xir//8ZrP//Gq3//xuu//8cr///Ha///x6w//8fsf//ILL//yCy//8hs///IrT/pAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADg0MYAIDAl6OjIrh/Pr4/42M + jP8RERH/Ghoa/xcXF/8eHh3/JCQk/zIxMf9PTk7/bW1s/4yLiv+npqb/w8LB/97d3P/u7Ov/8/Hw//j3 + 9f/59/T/8+7s/+rm4//i3Nj/2NPN/9HJxP/Kwrz/xr22/8K5sf+/ta7/vbSs/7+1rv+/tq//wLex/8K5 + s//GvLf/yL65/8vCvf/OxsH/zsjC/8nCu/+8sqr/raGW/6KTh/+fkIL/o5SH/6qajf+klYn/jYB1/2ph + WP9PSEH/OzUw/4R8d/+xoZT/koyE/x1/r/8Nkdr/EaT+/w+j//8Mof//AZb+/wCW/v8Alv7/AJb+/wCX + //8Al///AJf//wCX//8BmP//AZj//wGY//8CmP//Apn//wOZ//8Dmv//BJr//wSa//8Fm///BZv//wac + //8HnP//B53//wid//8Inv//CZ7//wqf//8LoP//C6D//wyh//8Nof//DqL//w6i//8Po///EKT//xGk + //8Spf//E6b//xOm//8Tp///E6j//xSo//8Vqf//Fqr//xeq//8Yq///GKz//xmt//8arf//G67//xyv + //8dsP//HrD//x+x//8gsv//IbP//yKz//8jtP+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAQAAAASmBfXaPt6+n/xsXF/2tqav+SkpL/r6+w/8bHx//h4eH/9fX1//v6 + +/////////z8//bz8f/t6uj/4t3Z/9fQyv/NxL3/xLuz/760q/+4raT/tKie/7Omnf+zqJ7/tKif/7Wq + oP+3rKP/ua+m/7uxqf+9tKz/v7av/8G4sf/CurP/xLu1/8e+uP/JwLr/y8K9/8zDv//OxsH/0MvF/9TO + yv/Tzcn/ysO+/7yyq/+sn5T/opSH/6CRg/+llYj/rJyO/6ucjv+pmYz/qJiL/6iWiP+Sj4n/G4Cx/w+R + 2v8Spf7/EKT//w2h//8BmP//AJf//wCX//8Bl///AZj//wGY//8BmP//AZj//wKY//8Cmf//Apn//wOZ + //8Dmv//BJr//wSa//8Fm///BZv//wac//8GnP//B5z//wed//8Inf//CZ7//wme//8Kn///C6D//wyg + //8Mof//DaH//w6i//8Oov//D6P//xCk//8RpP//EaX//xOm//8Tpv//E6f//xOo//8UqP//Fan//xaq + //8Wqv//F6v//xis//8ZrP//Gq3//xuu//8crv//HbD//x6w//8fsf//ILL//yGy//8is///I7T//yO1 + /6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcG5rMr+8 + u//49vb/+/r6//37+//39fP/7+zq/+Le2v/Vzsj/yL+3/76zqv+2qp//rqCV/6maj/+nmIz/qJqN/6ia + jv+pm4//q56S/66hlv+wpJr/s6ee/7SpoP+2q6L/uK2k/7mvpv+7san/vLKr/760rf+/tq//wbix/8K6 + s//EvLb/x724/8nAu//Lwr3/zMS//87Hwf/PycP/0cvG/9LNyv/W0c7/2NPS/9fS0P/MxsH/u7Gp/6yf + lP+jk4b/opKF/6SUh/+llon/q5mK/4uPjP8VgLT/EZPa/xOl/v8Rpf//DqL//wKY//8BmP//AZj//wKY + //8Cmf//Apn//wKZ//8Dmf//A5n//wOZ//8Dmv//BJr//wSb//8Fm///BZv//wac//8GnP//B5z//wed + //8Inf//CJ7//wme//8Kn///Cp///wug//8MoP//DKH//w2h//8Oov//DqL//w+j//8QpP//EaT//xGl + //8Tpf//E6b//xOn//8TqP//FKj//xWp//8Vqv//Fqr//xer//8YrP//Gaz//xqt//8brv//HK7//x2v + //8esP//H7H//x+x//8gsv//IbP//yK0//8jtP//JLX/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABta2gBgX98kLewqPa7r6X/tKec/62fkv+llon/opKF/6GS + hP+gkIP/oJCC/6GRhP+jlIf/ppeL/6iajv+qnJD/q56S/62flP+uoZf/sKOZ/7Glm/+zqJ7/tamg/7ar + ov+4raT/ua+n/7uxqf+8s6v/vrSt/7+2r//BuLH/wrqz/8W8tv/Ivrn/ycC7/8vCvf/MxL//zsjB/8/J + xP/Ry8j/0s3K/9TPzP/V0c7/19PR/9vX1f/d2tn/29fV/9LLx//EuLD/uKib/7Gdj/+0mYf/aoiS/wyC + u/8Tk9r/E6b+/xKm//8Po///A5n//wOZ//8Dmf//A5n//wOZ//8Dmf//A5r//wSa//8Emv//BJr//wSb + //8Fm///BZv//wac//8GnP//B5z//wed//8Inf//CJ3//wme//8Jnv//Cp///wqf//8LoP//DKD//w2h + //8Nov//DqL//w+j//8Po///EKT//xGk//8Rpf//EqX//xOm//8Tp///E6j//xSo//8Vqf//Fan//xaq + //8Xq///GKv//xms//8Zrf//Gq3//xuu//8cr///HbD//x6w//8fsf//ILL//yGz//8is///I7T//yS1 + //8ltf+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAeHJsLX52b3KRhnu5mIuA5qGShf+llon/ppaJ/6aWif+lloj/pJWI/6WWif+nmIz/qJqO/6qc + kP+rnpL/rZ+U/66hl/+wo5n/saWb/7Oonv+1qaD/tqui/7itpP+5r6f/u7Gp/7yzq/++tK3/v7av/8G4 + sf/CurP/xb22/8i+uf/JwLv/y8K9/83Ev//OyMH/0MrE/9HLyP/Uzsv/19LO/9zV0f/g2NP/4tnU/+Pa + 1//h2db/1tPR/8PMz/+pusD/gZ6p/1aGmv8fga3/EYe//xOW3f8Tp/7/E6b//xCk//8Emv//BJr//wSa + //8Emv//BJr//wSa//8Emv//BZv//wWb//8Fm///Bpv//wac//8GnP//B5z//wed//8Inf//CJ3//wme + //8Jnv//Cp///wqf//8LoP//C6D//wyg//8Nof//DaL//w6i//8Po///EKP//xCk//8RpP//EqX//xKm + //8Tpv//E6f//xOo//8TqP//FKn//xWp//8Wqv//F6v//xir//8YrP//Ga3//xqt//8brv//HK///x2v + //8esP//H7H//yCy//8hsv//IrP//yK0//8jtf//JLX//yW2/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB9dnEchX52SId/ + d4mUiX7Bm46C56GThv+llon/p5iK/6majf+pm4//qpyQ/6uekv+tn5T/rqGW/7Cjmf+xpZv/s6ie/7Wp + oP+2q6L/uK2k/7mvpv+7san/vLOr/760rf+/tq//wbix/8K6s//EvLb/yL65/8vCvf/Qxb//08jC/9bM + w//XzMX/2M7J/9LJxf/Fwr//tbu8/6Cwtf+Ho63/aZan/06Npf83h6b/In6j/xV+qf8Pg7T/D4a6/xKJ + v/8Ujsr/FJvl/xSo/v8Tp///EaT//wWb//8Fm///BZv//wWb//8Fm///BZv//wab//8Gm///Bpz//wac + //8HnP//B5z//wed//8Inf//CJ3//wme//8Jnv//Cp///wqf//8Ln///C6D//wyg//8Mof//DaH//w6i + //8Oov//D6P//xCj//8QpP//EaT//xKl//8Spv//E6b//xOn//8Tp///E6j//xSo//8Vqf//Fqr//xer + //8Yq///GKz//xms//8arf//G67//xyu//8cr///HrD//x+x//8fsf//ILL//yGz//8itP//I7T//yS1 + //8ltv//Jrb/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACBenQbgnt0Q4Z+dnuPhnyzmY2D2aKW + iv+pnJD/rZ+T/7Cilv+wo5f/sKSZ/7Glm/+zp57/tKmg/7arov+4raT/ua+m/7yxqP++s6z/wrav/8W5 + sf/Ju7P/yby0/8q+tv/Jvbf/wriy/7Syr/+kra3/kKOm/3eXn/9ci5j/RYOW/zR9lP8kd5P/GHaX/xR6 + n/8UfaX/FIGq/xWEsf8Yi7z/Go/D/xqSyv8amdj/GJzh/xeg6v8Wpvf/Fan//xOo//8Spf//B5v//wab + //8GnP//Bpz//wac//8GnP//B5z//wec//8Hnf//B53//wid//8Inf//CJ7//wme//8Jnv//Cp///wqf + //8Ln///C6D//wug//8Mof//DaH//w2h//8Oov//D6P//w+j//8QpP//EaT//xGl//8Spf//E6b//xOm + //8Tp///E6f//xOo//8UqP//Fan//xaq//8Xq///GKv//xis//8ZrP//Gq3//xuu//8crv//HK///x2w + //8esP//H7H//yCy//8hs///IrP//yO0//8ktf//JbX//yW2//8mt/+kAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB7dnAQioJ7L4B6dGOSiYGblo2FxaOYj/CsoZb/saWb/7Wo + n/+4raP/t6yj/7uroP+9rKH/vK6l/7aro/+qp6L/nKOh/4ydnv96lZn/Zo6X/0+Gkv8+gpL/MX2Q/yR4 + j/8ceJL/GnqV/xt7mP8bfZz/HYKj/yCJrv8ijrj/I5TB/yOcz/8joNj/IqPg/yGp7P8hrfX/H675/x6v + /v8cr///Gq7//xis//8Wqv//FKj//xKm//8InP//B5z//wec//8Hnf//B53//wed//8Inf//CJ3//wid + //8Inv//CZ7//wme//8Jnv//Cp///wqf//8Ln///C6D//wug//8Mof//DaH//w2h//8Oov//DqL//w+j + //8Qo///EKT//xGk//8Rpf//EqX//xOm//8Tpv//E6f//xOn//8TqP//FKj//xWp//8Wqv//F6v//xir + //8YrP//Gaz//xqt//8brv//G67//xyv//8dsP//HrD//x+x//8gsv//IbP//yKz//8jtP//I7X//yS1 + //8ltv//Jrf//ye3/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABta2gCi4R+Hnt2cUSSioN7mZGJrJSNhrmhkIaihKix0Gexxv9SlaX/QoeW/zaB + kf8sfY7/JX2Q/yJ/lP8jf5b/JIGZ/ySEnf8nh6L/KY2r/yqRs/8slrv/LJ/I/yyk0/8tqt7/LbHp/y22 + 8v8suPn/K7n9/ym5//8nuf//Jbf//yO1//8hs///H7H//x2v//8brf//Gaz//xeq//8Vqf//Eqb//wmd + //8Inf//CJ3//wid//8Inf//CJ7//wme//8Jnv//CZ7//wme//8Kn///Cp///wqf//8LoP//C6D//wyg + //8Mof//DaH//w2h//8Nov//DqL//w6i//8Po///EKP//xCk//8RpP//EqX//xKl//8Tpv//E6b//xOn + //8TqP//FKj//xSp//8Vqf//Fqr//xar//8Yq///GKz//xms//8arf//G67//xuu//8cr///Ha///x6w + //8fsf//H7H//yGy//8is///IrT//yO0//8ktf//Jbb//ya2//8nt///KLj/pAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABH1v17Pc77/zSmxv8ukqn/Lo2i/y+No/8xkqv/M5iz/zOcu/81pcf/N6zT/zey + 3P84uuj/OL/y/zjC+f83w/3/NsT//zTD//8ywv//MMD//y69//8su///Kbn//ye3//8ltv//I7T//yGz + //8fsf//HbD//xuu//8ZrP//Fqr//xOo//8PpP//CJ7//wme//8Jnv//CZ7//wme//8Kn///Cp///wqf + //8Kn///Cp///wug//8LoP//C6D//wyg//8Mof//DaH//w2h//8Nov//DqL//w6i//8Po///D6P//xCk + //8RpP//EaX//xKl//8Tpv//E6b//xOn//8Tp///E6j//xSo//8Uqf//Fan//xaq//8Wqv//GKv//xis + //8ZrP//Gq3//xuu//8brv//HK///x2v//8esP//HrH//x+x//8gsv//IbP//yK0//8jtP//JLX//yW2 + //8mtv//Jrf//ye4//8ouP+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEba/4RIz/n/Qbrf/z6y + 1P8+ttf/P7re/0HB6P9DyPL/Q8z5/0PO/v9Bzv//QM///z7O//88y///O8r//znH//83xP7/NcL+/zPA + /v8xv/7/L73+/yy7/v8quv7/KLj//yW2//8jtP//ILL//xyw//8Zrf//GKz//xmt//8arf//IrD//xKl + //8Hnf//BJv//wed//8Jnv//Cp///wuf//8LoP//C6D//wug//8MoP//DKD//wyg//8Nof//DaH//w2i + //8Oov//DqL//w+i//8Po///D6P//xCk//8QpP//EaT//xGl//8Tpf//E6b//xOm//8Tp///E6f//xOo + //8UqP//Fan//xWp//8Wqv//F6r//xes//8YrP//Gaz//xqt//8brv//G67//xyv//8dr///HrD//x6x + //8fsf//ILL//yGz//8is///I7T//yS1//8ltf//Jbb//ya3//8nt///KLj//ym5/6QAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAS9T+hErV/f9K1Pz/StT+/0vW//9K1///Sdb//0jU//9G0///RNH//0PP + /v9Bzv7/P8z+/z3K/v87yf7/Ocj+/zjF/v82w/7/M8H+/zG//v8uvf7/Krv+/ye4/v8mt///J7f//yi3 + //8tuv//N7///0HG//9MzP//WNT//2Xb//9v4f//Z9z//0/N//84vv//IK///xCj//8Jn///BZz//wie + //8Kn///DKD//w2h//8Nov//DaH//w6i//8Oov//DqL//w+j//8Po///EKT//xCk//8QpP//EaT//xGl + //8Spv//E6b//xOn//8Tp///E6f//xOo//8UqP//Faj//xWp//8Vqv//Fqr//xer//8Xq///Gaz//xqs + //8arf//G67//xuu//8cr///Ha///x6w//8esf//H7H//yCy//8hsv//IrP//yO0//8jtf//JLX//yW2 + //8mt///J7f//yi4//8puf//Kbn/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABN1v6ETdf+/03X + //9N1///Tdf+/0zW/v9L1f7/SNT+/0jT/v9G0f7/RND+/0LO/v8/zf7/Psv+/zvJ/v84x/7/NcT+/zXD + /v81wv7/NsL+/zrE/v9CyP7/Ssz+/1PS//9d1///Z93//23g//9y4///dub//3jm//935v//duX//3Xl + //925v//euj//3rp//9z5P//aN3//1LP//89wP//JrL//xWn//8Mof//B57//wmf//8Mof//DaL//w+j + //8QpP//EKP//xGk//8QpP//EaT//xKl//8Spv//E6b//xOm//8Tpv//E6f//xOn//8TqP//FKj//xSp + //8Vqv//Fqr//xeq//8Xq///GKv//xms//8ZrP//Gq3//xuu//8brv//HK///x2v//8esP//H7H//x+x + //8gsv//IbL//yGz//8jtP//I7X//yW2//8ltv//Jrf//ye3//8ouP//Kbn//ym5//8puf+kAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAE/Z/olP2f7/UNn+/0/Z/v9P2P7/Ttf+/0zW/v9K1f7/SNP+/0XS + /v9D0P7/Qs/+/0PO/v9Dzv7/R8/+/0zR//9S0///Wtb//2Da//9o3v//beD//2/i//9z5P//dOX//3Tk + //9z5P//cuP//3Pk//9y4///c+P//3Pk//9z5P//dOT//3Tk//905P//deX//3bm//945///e+n//3vp + //935v//buH//1nT//9Exv//Lbf//xqr//8Rpf//CqD//wuh//8Oo///D6P//xGl//8Spv//E6b//xOm + //8Tp///E6f//xOn//8UqP//FKj//xWo//8Vqf//Fqr//xaq//8Wq///GKv//xis//8YrP//Ga3//xqu + //8brv//HK///x2v//8dsP//HrD//x6x//8fsf//ILL//yGz//8hs///I7T//yO1//8ktf//Jbb//ya3 + //8nt///KLj//ym5//8puf//Kbn//ym5/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAStT/S1Hb + /vpS2/7/Utv+/1Lb/v9Q2f7/T9j+/0/X/v9R1v7/Vtj//1rZ//9e2v//Y9z//2ne//9s3///buH//3Di + //9w4v//cOL//2/i//9w4f//cOL//3Di//9x4v//ceL//3Lj//9y4///cuP//3Pj//9z4///dOT//3Tk + //915P//deX//3Xl//915f//duX//3bl//925f//duX//3fm//945///e+n//3zq//945///ceP//2DY + //9Ny///N73//yGv//8WqP//D6P//w2i//8PpP//Eab//xKn//8TqP//FKj//xSp//8Vqf//Fqr//xaq + //8Xqv//F6v//xir//8YrP//Gaz//xqt//8arf//G67//xyu//8dr///HbD//x6w//8fsf//ILL//yCy + //8hs///IrP//yO0//8jtf//JbX//yW2//8mt///J7f//yi4//8ouf//Kbn//ym5//8puf//Kbn/pAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAU9z+OFLa/qdI0f/oSdD//03S//9T1P//Wtb//1/Z + //9j2v//Z93//2rf//9r3///bN///23g//9u4P//buH//2/h//9v4f//b+H//3Dh//9w4v//ceL//3Hj + //9y4///cuP//3Pj//9z4///dOT//3Tk//905P//deT//3Xk//915f//deX//3bl//925f//duX//3bl + //925f//duX//3bl//925f//duX//3fm//935v//euf//3zp//945///c+T//2Xb//9Tz///QMT//yq2 + //8brP//Eqf//w6k//8Qpv//Eqj//xSp//8Wqv//F6v//xir//8YrP//Gaz//xmt//8arf//G67//xuu + //8cr///Ha///x6w//8esP//H7H//yCy//8gsv//IbP//yKz//8jtP//I7X//yS1//8ltv//Jrf//ye3 + //8ouP//KLn//ym5//8puf//Kbn//ym5//8puf+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAADjC/xk6wf9IO8P/dT7F/6dDyP/XRsv/8kzO//9T0v//V9X//13Y//9i2v//Zdz//2nd + //9q3///beD//27h//9w4f//ceL//3Hi//9y4///cuP//3Pj//9z4///dOP//3Tk//905P//dOT//3Xk + //915f//deX//3bl//925f//duX//3bl//925f//dub//3fm//935v//d+b//3fm//925v//duX//3bl + //925f//duX//3bl//925f//d+b//3nn//945///dOX//2ne//9Z1P//R8n//zK8//8isv//Gav//xKo + //8Uqf//Far//xer//8ZrP//Gq3//xuu//8brv//HK///x2v//8esP//HrH//x+x//8gsv//ILL//yGz + //8is///I7T//yO1//8ktf//Jbb//ya3//8mt///KLj//yi4//8puf//Kbn//ym5//8puf//Kbn//ym5 + /6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADnB + /wM3wP8qO8P/TDzD/35ByP+3RMr/2krM//tQ0f//VtT//1zX//9h2v//Zdz//2je//9r4P//buH//3Hi + //9x4///c+P//3Pk//905P//dOT//3Xk//915P//deT//3Xl//925f//duX//3fl//935f//d+X//3fl + //935v//d+X//3fm//935v//d+b//3fm//935v//dub//3bl//925f//duX//3Xl//905f//dOT//3Tl + //905P//deX//3fm//925v//dOX//23h//9e1///T87//zzC//8qt///H7H//xis//8XrP//GKz//xqu + //8cr///HrD//x+w//8fsf//ILL//yGy//8hs///IrP//yO0//8jtf//JLX//yW2//8mtv//Jrf//yi3 + //8ouP//Kbn//ym5//8puf//Kbn//ym5//8puf//Kbn/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA3wP8KPMP/NDvE + /1k+xv+LQ8r/xEjM/+FNz///VNP//1nW//9f2f//Zdz//2nf//9t4P//b+H//3Li//9z5P//dOT//3Xl + //925f//duX//3fl//935f//d+X//3fm//935v//d+b//3fm//945f//d+b//3fm//935v//d+b//3fl + //935f//duX//3bl//925f//duX//3Xl//915P//deT//3Tk//9z5P//c+P//3Lj//9y4///cuP//3Pk + //905P//cuP//27h//9i2v//VNH//0TI//8yvf//J7b//x6w//8brv//HK///x2w//8gsv//IbP//yK0 + //8jtP//I7X//yS1//8ltv//Jrb//ya3//8ot///KLj//ym5//8puf//Kbn//ym5//8puf//Kbn//ym5 + //8puf+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAO8P/Fj/H/zc+x/9nQcn/m0bM + /8dMz//sU9P//1nW//9e2f//ZNz//2je//9s4P//cOL//3Hi//9z5P//deX//3bl//935f//eOb//3jm + //945v//eOb//3jm//945v//eOb//3jm//945v//eOb//3fl//935f//d+X//3fl//925f//duX//3Xl + //915P//dOT//3Pk//9z4///cuP//3Lj//9x4v//cOL//3Di//9v4f//buH//2/i//9x4v//cOL//27h + //9l3P//WtX//0zM//87w///Lrv//yW1//8fsv//ILP//yGz//8jtP//Jbb//ya2//8mt///J7j//yi4 + //8puf//Kbn//ym5//8puf//Kbn//ym5//8puf//Kbn//ym5/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/I/yFCyf8+Qsr/cEfN/6hLz//NUNL/8lbV + //9c2P//Ydr//2bd//9q3///buH//3Hi//9z5P//deX//3fm//945v//eOb//3nm//955v//eOb//3jm + //945v//d+b//3fm//935f//d+X//3bl//925f//deX//3Xl//915P//dOT//3Tk//9z5P//cuP//3Lj + //9x4v//cOL//2/i//9v4f//buH//23g//9t4P//bN///2zg//9t4P//beD//2vf//9m3f//XNb//1HP + //9Cx///Nb///yy7//8ltv//JLb//yS2//8mt///KLj//ym5//8puf//Kbn//ym5//8puf//Kbn//ym5 + //8puf//Kbn/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEDJ/wVEy/8kQ8v/SEbN/39Kz/+xTdH/01LT//pZ1///Xtn//2Tc + //9p3///beH//3Hi//9z4///deX//3fl//935v//eOb//3jm//945v//eOb//3fm//935f//d+X//3bl + //925f//deX//3Xk//905P//dOT//3Pj//9y4///cuP//3Hi//9x4v//cOL//2/h//9v4f//buD//23g + //9s4P//a9///2rf//9q3v//aN7//2jd//9p3v//ad7//2nd//9m3P//X9j//1bT//9JzP//PcX//zTA + //8ruv//J7j//ya3//8nuP//KLj//ym5//8puf//Kbn//ym5//8puf+kAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABDy/8LRsz/J0XM/1RHzv+ITND/tFDT/+BX1v/+XNj//2Hb//9m3f//at///27h + //9w4v//cuP//3Xl//925f//d+X//3fl//935f//d+X//3bl//925f//duT//3Xk//905P//dOT//3Pj + //9z4///cuP//3Hi//9x4v//cOL//2/h//9u4f//buH//23g//9s4P//a9///2vf//9p3v//ad3//2jd + //9n3P//Ztz//2bc//9n3f//aN3//2fd//9n3f//Ytr//1vV//9Pz///Qsf//zfB//8uvP//Kbn//yi4 + //8ouP//Kbn//ym5/6UAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAR83/FEbO/yxHzv9eTND/kU3R/7xS0//oWNb//1zY//9i2///Zt7//2rf//9u4f//cOL//3Lk + //905P//dOX//3Xl//915f//deX//3Xk//905P//dOT//3Pj//9y4///cuP//3Hi//9w4v//cOL//2/h + //9u4f//beD//23g//9s3///a9///2ne//9o3v//Z93//2Xc//9k2///ZNv//2Pa//9h2v//X9n//17Y + //9d2P//XNf//1rW//9Z1f//VdP//07P//9Eyv//OML//y+9//8ruv//Kbn/owAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEnO + /xZGzf80SM7/Z0vQ/5dN0f/CUtP/7lfW//9b2P//Ydr//2Xc//9p3///bOD//27h//9w4v//cuL//3Lj + //9z4///c+P//3Hi//9w4v//b+L//27g//9t4P//a9///2vf//9p3v//Z93//2Xc//9j2///Ydr//1/Y + //9c1///WdX//1fU//9W1P//VNP//1HR//9Nz///Ss3//0jM//9Fyv/8Qcf/8j7G/9o+xf/FPcX/rj7F + /5g7w/9/NsD/YjG9/0Qsu/8cAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAETM/wJIzf8WQ8z/PEfO + /25Jzv+bTND/xVDS/+9V1P//Wdf//1/Z//9j2///Zt3//2je//9o3v//Zt3//2Tc//9h2v//X9j//13Y + //9c1///Wtf//1nW//9V0///UNH//03P//9Lzf//Sc3/+0bL//VCyP/kP8b/zj7G/7k8xf+iPsT/jjrC + /3Y3wf9eNsD/RDW//ys4wP8YNsD/DTW//wQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABDzP8DRcz/FkHL/z9GzP9vRsz/mEnO + /8NO0P/oUdL/71HS/+9R0v/vTdD/70jN/+NEy//UQ8r/x0PK/7lByP+lQsn/k0HJ/4M8xf9sOcL/WzjB + /0Y2wf8wOsT/GjrC/w83wP8HAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + 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 + AAAAAAAAAAAAAAAAAAAAAAAA//////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////AAAAA////////////////wAAAAP///////////8AAAAAAAAAP///////////AAAAAAAAAD//// + ///8AAAAAAAAAAAAAP///////AAAAAAAAAAAAAD////AAAAAAAAAAAAAAAAAP///wAAAAAAAAAAAAAAA + AD//8AAAAAAAAAAAAAAAAAAP//AAAAAAAAAAAAAAAAAAD//AAAAAAAAAAAAAAAAAAAP/wAAAAAAAAAAA + AAAAAAAD/wAAAAAAAAAAAAAAAAAAAP8AAAAAAAAAAAAAAAAAAAD8AAAAAAAAAAAAAAAAAAAA/AAAAAAA + AAAAAAAAAAAAAPAAAAAAAAAAAAAAAAAAAADwAAAAAAAAAAAAAAAAAAAA8AAAAAAAAAAAAAAAAAAAAPAA + AAAAAAAAAAAAAAAAAADwAAAAAAAAAAAAAAAAAAAA8AAAAAAAAAAAAAAAAAAAAPAAAAAAAAAAAAAAAAAA + AADwAAAAAAAAAAAAAAAAAAAA8AAAAAAAAAAAAAAAAAAAAPAAAAAAAAAAAAAAAAAAAADwAAAAAAAAAAAA + AAAAAAAA8AAAAAAAAAAAAAAAAAAAAPwAAAAAAAAAAAAAAAAAAAD8AAAAAAAAAAAAAAAAAAAA/AAAAAAA + AAAAAAAAAAAAAPwAAAAAAAAAAAAAAAAAAAD/AAAAAAAAAAAAAAAAAAAA/wAAAAAAAAAAAAAAAAAAAP/A + AAAAAAAAAAAAAAAAAAD/wAAAAAAAAAAAAAAAAAAA//AAAAAAAAAAAAAAAAAAAP/wAAAAAAAAAAAAAAAA + AAD/+AAAAAAAAAAAAAAAAAAA//gAAAAAAAAAAAAAAAAAAP/4AAAAAAAAAAAAAAAAAAD/+AAAAAAAAAAA + AAAAAAAA//gAAAAAAAAAAAAAAAAAAP/4AAAAAAAAAAAAAAAAAAD/+AAAAAAAAAAAAAAAAAAA//gAAAAA + AAAAAAAAAAAAAP/4AAAAAAAAAAAAAAAAAAD/+AAAAAAAAAAAAAAAAAAA//gAAAAAAAAAAAAAAAAAA//4 + AAAAAAAAAAAAAAAAAAP/+AAAAAAAAAAAAAAAAAA///gAAAAAAAAAAAAAAAAAP//4AAAAAAAAAAAAAAAA + H///+AAAAAAAAAAAAAAAAB////gAAAAAAAAAAAAAAAAf///4AAAAAAAAAAAAAAAAH///+AAAAAAAAAAA + AAAAAB////gAAAAAAAAAAAAAAAAf///4AAAAAAAAAAAAAAAAH///8AAAAAAAAAAAAAAAAB////AAAAAA + AAAAAAAAAAAf///wAAAAAAAAAAAAAAAAH///8AAAAAAAAAAAAAAAAB////AAAAAAAAAAAAAAAAAf///w + AAAAAAAAAAAAAAAAH///8AAAAAAAAAAAAAAAAB////AAAAAAAAAAAAAAAAAf///wAAAAAAAAAAAAAAAA + H///8AAAAAAAAAAAAAAAAB////AAAAAAAAAAAAAAAAAf///wAAAAAAAAAAAAAAAAH///8AAAAAAAAAAA + AAAAAB////AAAAAAAAAAAAAAAAAf///wAAAAAAAAAAAAAAAAH///+AAAAAAAAAAAAAAAAB////gAAAAA + AAAAAAAAAAAf///8AAAAAAAAAAAAAAAAH////gAAAAAAAAAAAAAAAB////8AAAAAAAAAAAAAAAA///// + gAAAAAAAAAAAAAAAf////+AAAAAAAAAAAAAAAH/////wAAAAAAAAAAAAAAH/////+AAAAAAAAAAAAAAD + //////4AAAAAAAAAAAAP////////AAAAAAAAAAAA/////////4AAAAAAAAAAAH/////////gAAAAAAAA + AAA/////////8AAAAAAAAAAAH/////////4//AAAAAAAAA////////////wAAAAAAAAH///////////8 + AAAAAAAAA////////////AAAAAAAAAH///////////wAAAAAQAAA///////////8AAAAAOAAAH////// + /////AAAAAHwAAA///////////wAAAAD+AAAP//////////+AAAAB/4AAD///////////wAAAA//AAA/ + //////////+AAAAf/4AAH///////////wAAAP//AAD////////////AAAD//4AA////////////4AAB/ + //AAP////////////AAA///4AH////////////8AAf///gD/////////////gAP///+D//////////// + /8AH///////////////////wH/////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////////////////////////////////8= + + + \ No newline at end of file diff --git a/Aviso/Anhänge/frmAddSendnung.vb b/Aviso/Anhänge/frmAddSendnung.vb new file mode 100644 index 0000000..d2aef8f --- /dev/null +++ b/Aviso/Anhänge/frmAddSendnung.vb @@ -0,0 +1,38 @@ +Public Class frmAddSendnung + + Public Sendung As VERAG_PROG_ALLGEMEIN.cSendungen + Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL + Dim AvisoId As Integer + Sub New(AvisoId) + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + Me.AvisoId = AvisoId + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + + End Sub + Private Sub frmAddSendnung_Load(sender As Object, e As EventArgs) Handles Me.Load + cboAbfertigungsart.fillWithSQL("SELECT [Abfertigungsart],[Abfertigungsbezeichnung] FROM [Abfertigungsarten] ", True, "FMZOLL", True) + txtEmpfaenger.initKdBox(Me) + txtEmpfaenger.usrcntlWIDTH = 360 + txtEmpfaenger.usrcntlHEIGHT = 100 + End Sub + + Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click + + Sendung = New VERAG_PROG_ALLGEMEIN.cSendungen(AvisoId, SQL.getValueTxtBySql("SELECT Count(*)+1 FROM tblSendungen WHERE tblSnd_AvisoID=" & AvisoId & "", "AVISO"),,,, 0) + Sendung.tblSnd_Abfertigungsart_ID = cboAbfertigungsart._value + Sendung.tblSnd_Empfaenger = txtEmpfaenger.Text + Sendung.tblSnd_EmpfaengerKdNr = txtEmpfaenger.KdNr + Sendung.tblSnd_Colli = txtColli.Text + Sendung.tblSnd_Gewicht = txtGewicht.Text + Sendung.tblSnd_Warenbezeichnung = rtbWarenbezeichnung.Text + + If Sendung.SAVE Then + Me.DialogResult = DialogResult.OK + Else + Me.DialogResult = DialogResult.None + End If + End Sub + +End Class \ No newline at end of file diff --git a/Aviso/frmSendungAnhangImport.Designer.vb b/Aviso/Anhänge/frmSendungAnhangImport.Designer.vb similarity index 74% rename from Aviso/frmSendungAnhangImport.Designer.vb rename to Aviso/Anhänge/frmSendungAnhangImport.Designer.vb index ea5bf62..34c8703 100644 --- a/Aviso/frmSendungAnhangImport.Designer.vb +++ b/Aviso/Anhänge/frmSendungAnhangImport.Designer.vb @@ -26,35 +26,39 @@ Partial Class frmSendungAnhangImport Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungAnhangImport)) Me.lbl = New System.Windows.Forms.Label() Me.flpnlAviso = New System.Windows.Forms.FlowLayoutPanel() - Me.UsrCntlSendungAnhangElement1 = New AVISO.usrCntlSendungAnhangElement() - Me.UsrCntlSendungAnhangElement2 = New AVISO.usrCntlSendungAnhangElement() - Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() Me.flpnlSendungen = New System.Windows.Forms.FlowLayoutPanel() Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.pnlAnfuegen = New System.Windows.Forms.Panel() Me.btnAnfuegenAll = New System.Windows.Forms.Button() - Me.txtDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label7 = New System.Windows.Forms.Label() - Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label6 = New System.Windows.Forms.Label() Me.Label5 = New System.Windows.Forms.Label() - Me.cboArt = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.btnAnfuegen = New System.Windows.Forms.Button() - Me.txtSeiten = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label4 = New System.Windows.Forms.Label() Me.cbxDelPDF = New System.Windows.Forms.CheckBox() Me.btn = New System.Windows.Forms.Button() Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.DateiHochladenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DateiScannenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.AusZwischenablageeinfügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.Button2 = New System.Windows.Forms.Button() Me.pnl = New System.Windows.Forms.Panel() + Me.Button5 = New System.Windows.Forms.Button() + Me.PdfViewer = New Spire.PdfViewer.Forms.PdfViewer() + Me.WebBrowser = New System.Windows.Forms.WebBrowser() Me.Button3 = New System.Windows.Forms.Button() Me.Button4 = New System.Windows.Forms.Button() - Me.cboSendungen = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.PrintDocument1 = New System.Drawing.Printing.PrintDocument() + Me.Button1 = New System.Windows.Forms.Button() + Me.cboSendungen = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.cboArt = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtSeiten = New VERAG_PROG_ALLGEMEIN.MyTextBox() + Me.UsrCntlSendungAnhangElement1 = New AVISO.usrCntlSendungAnhangElement() + Me.UsrCntlSendungAnhangElement2 = New AVISO.usrCntlSendungAnhangElement() Me.flpnlAviso.SuspendLayout() Me.pnlAnfuegen.SuspendLayout() Me.cntxt.SuspendLayout() @@ -72,6 +76,8 @@ Partial Class frmSendungAnhangImport ' 'flpnlAviso ' + Me.flpnlAviso.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.flpnlAviso.AutoScroll = True Me.flpnlAviso.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.flpnlAviso.Controls.Add(Me.UsrCntlSendungAnhangElement1) @@ -79,8 +85,360 @@ Partial Class frmSendungAnhangImport Me.flpnlAviso.FlowDirection = System.Windows.Forms.FlowDirection.TopDown Me.flpnlAviso.Location = New System.Drawing.Point(15, 30) Me.flpnlAviso.Name = "flpnlAviso" - Me.flpnlAviso.Size = New System.Drawing.Size(200, 661) - Me.flpnlAviso.TabIndex = 1 + Me.flpnlAviso.Size = New System.Drawing.Size(200, 825) + Me.flpnlAviso.TabIndex = 7 + ' + 'flpnlSendungen + ' + Me.flpnlSendungen.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.flpnlSendungen.AutoScroll = True + Me.flpnlSendungen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.flpnlSendungen.Location = New System.Drawing.Point(1073, 62) + Me.flpnlSendungen.Name = "flpnlSendungen" + Me.flpnlSendungen.Size = New System.Drawing.Size(230, 731) + Me.flpnlSendungen.TabIndex = 11 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(221, 182) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(55, 13) + Me.Label1.TabIndex = 10 + Me.Label1.Text = "Vorschau:" + ' + 'Label2 + ' + Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(1070, 14) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(65, 13) + Me.Label2.TabIndex = 6 + Me.Label2.Text = "Sendungen:" + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(221, 14) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(39, 13) + Me.Label3.TabIndex = 5 + Me.Label3.Text = "Import:" + ' + 'pnlAnfuegen + ' + Me.pnlAnfuegen.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.pnlAnfuegen.BackColor = System.Drawing.Color.FloralWhite + Me.pnlAnfuegen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlAnfuegen.Controls.Add(Me.btnAnfuegenAll) + Me.pnlAnfuegen.Controls.Add(Me.txtDateiname) + Me.pnlAnfuegen.Controls.Add(Me.Label7) + Me.pnlAnfuegen.Controls.Add(Me.MyTextBox2) + Me.pnlAnfuegen.Controls.Add(Me.Label6) + Me.pnlAnfuegen.Controls.Add(Me.Label5) + Me.pnlAnfuegen.Controls.Add(Me.cboArt) + Me.pnlAnfuegen.Controls.Add(Me.btnAnfuegen) + Me.pnlAnfuegen.Controls.Add(Me.txtSeiten) + Me.pnlAnfuegen.Controls.Add(Me.Label4) + Me.pnlAnfuegen.Controls.Add(Me.cbxDelPDF) + Me.pnlAnfuegen.Location = New System.Drawing.Point(221, 30) + Me.pnlAnfuegen.Name = "pnlAnfuegen" + Me.pnlAnfuegen.Size = New System.Drawing.Size(846, 142) + Me.pnlAnfuegen.TabIndex = 8 + ' + 'btnAnfuegenAll + ' + Me.btnAnfuegenAll.BackColor = System.Drawing.Color.Wheat + Me.btnAnfuegenAll.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAnfuegenAll.Location = New System.Drawing.Point(527, 47) + Me.btnAnfuegenAll.Name = "btnAnfuegenAll" + Me.btnAnfuegenAll.Size = New System.Drawing.Size(273, 56) + Me.btnAnfuegenAll.TabIndex = 8 + Me.btnAnfuegenAll.Text = ">> Ganzes Dokument anfügen >>" + Me.btnAnfuegenAll.UseVisualStyleBackColor = False + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(3, 14) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(35, 13) + Me.Label7.TabIndex = 0 + Me.Label7.Text = "Datei:" + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(3, 112) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(53, 13) + Me.Label6.TabIndex = 9 + Me.Label6.Text = "Sendung:" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(3, 83) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(23, 13) + Me.Label5.TabIndex = 5 + Me.Label5.Text = "Art:" + ' + 'btnAnfuegen + ' + Me.btnAnfuegen.BackColor = System.Drawing.Color.Wheat + Me.btnAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAnfuegen.Location = New System.Drawing.Point(316, 47) + Me.btnAnfuegen.Name = "btnAnfuegen" + Me.btnAnfuegen.Size = New System.Drawing.Size(205, 56) + Me.btnAnfuegen.TabIndex = 7 + Me.btnAnfuegen.Text = ">> Anfügen >>" + Me.btnAnfuegen.UseVisualStyleBackColor = False + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(3, 55) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(40, 13) + Me.Label4.TabIndex = 3 + Me.Label4.Text = "Seiten:" + ' + 'cbxDelPDF + ' + Me.cbxDelPDF.AutoSize = True + Me.cbxDelPDF.Checked = True + Me.cbxDelPDF.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDelPDF.Location = New System.Drawing.Point(316, 31) + Me.cbxDelPDF.Name = "cbxDelPDF" + Me.cbxDelPDF.Size = New System.Drawing.Size(244, 17) + Me.cbxDelPDF.TabIndex = 2 + Me.cbxDelPDF.Text = "angefügte Dateien aus Original PDF entfernen" + Me.cbxDelPDF.UseVisualStyleBackColor = True + ' + 'btn + ' + Me.btn.ContextMenuStrip = Me.cntxt + Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn.Location = New System.Drawing.Point(71, 3) + Me.btn.Name = "btn" + Me.btn.Size = New System.Drawing.Size(75, 25) + Me.btn.TabIndex = 3 + Me.btn.Text = "Hinzufügen" + Me.btn.UseVisualStyleBackColor = True + ' + 'cntxt + ' + Me.cntxt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiHochladenToolStripMenuItem, Me.DateiScannenToolStripMenuItem, Me.AusZwischenablageeinfügenToolStripMenuItem}) + Me.cntxt.Name = "cntxt" + Me.cntxt.Size = New System.Drawing.Size(250, 70) + ' + 'DateiHochladenToolStripMenuItem + ' + Me.DateiHochladenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdf11 + Me.DateiHochladenToolStripMenuItem.Name = "DateiHochladenToolStripMenuItem" + Me.DateiHochladenToolStripMenuItem.Size = New System.Drawing.Size(249, 22) + Me.DateiHochladenToolStripMenuItem.Text = "Datei hochladen..." + ' + 'DateiScannenToolStripMenuItem + ' + Me.DateiScannenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.scanner + Me.DateiScannenToolStripMenuItem.Name = "DateiScannenToolStripMenuItem" + Me.DateiScannenToolStripMenuItem.Size = New System.Drawing.Size(249, 22) + Me.DateiScannenToolStripMenuItem.Text = "Datei scannen..." + ' + 'AusZwischenablageeinfügenToolStripMenuItem + ' + Me.AusZwischenablageeinfügenToolStripMenuItem.Name = "AusZwischenablageeinfügenToolStripMenuItem" + Me.AusZwischenablageeinfügenToolStripMenuItem.Size = New System.Drawing.Size(249, 22) + Me.AusZwischenablageeinfügenToolStripMenuItem.Text = "Aus Zwischenablage (einfügen)..." + ' + 'Button2 + ' + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Location = New System.Drawing.Point(152, 3) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(63, 25) + Me.Button2.TabIndex = 4 + Me.Button2.Text = "Löschen" + Me.Button2.UseVisualStyleBackColor = True + ' + 'pnl + ' + Me.pnl.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.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnl.Controls.Add(Me.Button5) + Me.pnl.Controls.Add(Me.PdfViewer) + Me.pnl.Controls.Add(Me.WebBrowser) + Me.pnl.Location = New System.Drawing.Point(221, 198) + Me.pnl.Name = "pnl" + Me.pnl.Size = New System.Drawing.Size(846, 657) + Me.pnl.TabIndex = 12 + ' + 'Button5 + ' + Me.Button5.Location = New System.Drawing.Point(766, 3) + Me.Button5.Name = "Button5" + Me.Button5.Size = New System.Drawing.Size(75, 23) + Me.Button5.TabIndex = 2 + Me.Button5.UseVisualStyleBackColor = True + Me.Button5.Visible = False + ' + 'PdfViewer + ' + Me.PdfViewer.Dock = System.Windows.Forms.DockStyle.Fill + Me.PdfViewer.FindTextHighLightColor = System.Drawing.Color.FromArgb(CType(CType(200, Byte), Integer), CType(CType(153, Byte), Integer), CType(CType(193, Byte), Integer), CType(CType(218, Byte), Integer)) + Me.PdfViewer.IgnoreCase = False + Me.PdfViewer.IsToolBarVisible = True + Me.PdfViewer.Location = New System.Drawing.Point(0, 0) + Me.PdfViewer.MultiPagesThreshold = 60 + Me.PdfViewer.Name = "PdfViewer" + Me.PdfViewer.Size = New System.Drawing.Size(844, 655) + Me.PdfViewer.TabIndex = 0 + Me.PdfViewer.Threshold = 60 + Me.PdfViewer.ViewerBackgroundColor = System.Drawing.Color.FromArgb(CType(CType(229, Byte), Integer), CType(CType(229, Byte), Integer), CType(CType(229, Byte), Integer)) + ' + 'WebBrowser + ' + Me.WebBrowser.Dock = System.Windows.Forms.DockStyle.Fill + Me.WebBrowser.Location = New System.Drawing.Point(0, 0) + Me.WebBrowser.MinimumSize = New System.Drawing.Size(20, 20) + Me.WebBrowser.Name = "WebBrowser" + Me.WebBrowser.Size = New System.Drawing.Size(844, 655) + Me.WebBrowser.TabIndex = 1 + ' + 'Button3 + ' + Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button3.BackColor = System.Drawing.Color.Wheat + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(1073, 799) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(230, 56) + Me.Button3.TabIndex = 13 + Me.Button3.Text = "<< zurück <<" + Me.Button3.UseVisualStyleBackColor = False + ' + 'Button4 + ' + Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.Location = New System.Drawing.Point(1240, 2) + Me.Button4.Name = "Button4" + Me.Button4.Size = New System.Drawing.Size(63, 25) + Me.Button4.TabIndex = 2 + Me.Button4.Text = "Löschen" + Me.Button4.UseVisualStyleBackColor = True + ' + 'Button1 + ' + Me.Button1.ContextMenuStrip = Me.cntxt + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(1125, 2) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(75, 25) + Me.Button1.TabIndex = 1 + Me.Button1.Text = "Hinzufügen" + Me.Button1.UseVisualStyleBackColor = True + ' + 'cboSendungen + ' + Me.cboSendungen._allowedValuesFreiText = Nothing + Me.cboSendungen._allowFreiText = False + Me.cboSendungen._value = "" + Me.cboSendungen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.cboSendungen.DropDownWidth = 450 + Me.cboSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboSendungen.FormattingEnabled = True + Me.cboSendungen.Location = New System.Drawing.Point(1073, 30) + Me.cboSendungen.Name = "cboSendungen" + Me.cboSendungen.Size = New System.Drawing.Size(230, 28) + Me.cboSendungen.TabIndex = 9 + ' + 'txtDateiname + ' + Me.txtDateiname._DateTimeOnly = False + Me.txtDateiname._numbersOnly = False + Me.txtDateiname._numbersOnlyKommastellen = "" + Me.txtDateiname._Prozent = False + Me.txtDateiname._ShortDateNew = False + Me.txtDateiname._ShortDateOnly = False + Me.txtDateiname._TimeOnly = False + Me.txtDateiname._value = "" + Me.txtDateiname._Waehrung = False + Me.txtDateiname._WaehrungZeichen = True + Me.txtDateiname.ForeColor = System.Drawing.Color.Black + Me.txtDateiname.Location = New System.Drawing.Point(62, 11) + Me.txtDateiname.MaxLineLength = -1 + Me.txtDateiname.MaxLines_Warning = "" + Me.txtDateiname.MaxLines_Warning_Label = Nothing + Me.txtDateiname.Name = "txtDateiname" + Me.txtDateiname.ReadOnly = True + Me.txtDateiname.Size = New System.Drawing.Size(738, 20) + Me.txtDateiname.TabIndex = 1 + ' + 'MyTextBox2 + ' + Me.MyTextBox2._DateTimeOnly = False + Me.MyTextBox2._numbersOnly = False + Me.MyTextBox2._numbersOnlyKommastellen = "" + Me.MyTextBox2._Prozent = False + Me.MyTextBox2._ShortDateNew = False + Me.MyTextBox2._ShortDateOnly = False + Me.MyTextBox2._TimeOnly = False + Me.MyTextBox2._value = "" + Me.MyTextBox2._Waehrung = False + Me.MyTextBox2._WaehrungZeichen = True + Me.MyTextBox2.ForeColor = System.Drawing.Color.Black + Me.MyTextBox2.Location = New System.Drawing.Point(62, 109) + Me.MyTextBox2.MaxLineLength = -1 + Me.MyTextBox2.MaxLines_Warning = "" + Me.MyTextBox2.MaxLines_Warning_Label = Nothing + Me.MyTextBox2.Name = "MyTextBox2" + Me.MyTextBox2.ReadOnly = True + Me.MyTextBox2.Size = New System.Drawing.Size(738, 20) + Me.MyTextBox2.TabIndex = 10 + ' + 'cboArt + ' + Me.cboArt._allowedValuesFreiText = Nothing + Me.cboArt._allowFreiText = False + Me.cboArt._value = "" + Me.cboArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboArt.FormattingEnabled = True + Me.cboArt.Location = New System.Drawing.Point(62, 75) + Me.cboArt.Name = "cboArt" + Me.cboArt.Size = New System.Drawing.Size(248, 28) + Me.cboArt.TabIndex = 6 + ' + 'txtSeiten + ' + Me.txtSeiten._DateTimeOnly = False + Me.txtSeiten._numbersOnly = False + Me.txtSeiten._numbersOnlyKommastellen = "" + Me.txtSeiten._Prozent = False + Me.txtSeiten._ShortDateNew = False + Me.txtSeiten._ShortDateOnly = False + Me.txtSeiten._TimeOnly = False + Me.txtSeiten._value = "" + Me.txtSeiten._Waehrung = False + Me.txtSeiten._WaehrungZeichen = True + Me.txtSeiten.BackColor = System.Drawing.Color.White + Me.txtSeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtSeiten.ForeColor = System.Drawing.Color.Black + Me.txtSeiten.Location = New System.Drawing.Point(62, 47) + Me.txtSeiten.MaxLineLength = -1 + Me.txtSeiten.MaxLines_Warning = "" + Me.txtSeiten.MaxLines_Warning_Label = Nothing + Me.txtSeiten.Name = "txtSeiten" + Me.txtSeiten.Size = New System.Drawing.Size(248, 26) + Me.txtSeiten.TabIndex = 4 ' 'UsrCntlSendungAnhangElement1 ' @@ -112,309 +470,13 @@ Partial Class frmSendungAnhangImport Me.UsrCntlSendungAnhangElement2.Size = New System.Drawing.Size(130, 64) Me.UsrCntlSendungAnhangElement2.TabIndex = 1 ' - 'WebBrowser1 - ' - Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Fill - Me.WebBrowser1.Location = New System.Drawing.Point(0, 0) - Me.WebBrowser1.Name = "WebBrowser1" - Me.WebBrowser1.Size = New System.Drawing.Size(736, 491) - Me.WebBrowser1.TabIndex = 2 - ' - 'flpnlSendungen - ' - Me.flpnlSendungen.AutoScroll = True - Me.flpnlSendungen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.flpnlSendungen.Location = New System.Drawing.Point(965, 62) - Me.flpnlSendungen.Name = "flpnlSendungen" - Me.flpnlSendungen.Size = New System.Drawing.Size(200, 630) - Me.flpnlSendungen.TabIndex = 2 - ' - 'Label1 - ' - Me.Label1.AutoSize = True - Me.Label1.Location = New System.Drawing.Point(221, 182) - Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(55, 13) - Me.Label1.TabIndex = 3 - Me.Label1.Text = "Vorschau:" - ' - 'Label2 - ' - Me.Label2.AutoSize = True - Me.Label2.Location = New System.Drawing.Point(962, 14) - Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(65, 13) - Me.Label2.TabIndex = 4 - Me.Label2.Text = "Sendungen:" - ' - 'Label3 - ' - Me.Label3.AutoSize = True - Me.Label3.Location = New System.Drawing.Point(221, 14) - Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(39, 13) - Me.Label3.TabIndex = 5 - Me.Label3.Text = "Import:" - ' - 'pnlAnfuegen - ' - Me.pnlAnfuegen.BackColor = System.Drawing.Color.FloralWhite - Me.pnlAnfuegen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.pnlAnfuegen.Controls.Add(Me.btnAnfuegenAll) - Me.pnlAnfuegen.Controls.Add(Me.txtDateiname) - Me.pnlAnfuegen.Controls.Add(Me.Label7) - Me.pnlAnfuegen.Controls.Add(Me.MyTextBox2) - Me.pnlAnfuegen.Controls.Add(Me.Label6) - Me.pnlAnfuegen.Controls.Add(Me.Label5) - Me.pnlAnfuegen.Controls.Add(Me.cboArt) - Me.pnlAnfuegen.Controls.Add(Me.btnAnfuegen) - Me.pnlAnfuegen.Controls.Add(Me.txtSeiten) - Me.pnlAnfuegen.Controls.Add(Me.Label4) - Me.pnlAnfuegen.Controls.Add(Me.cbxDelPDF) - Me.pnlAnfuegen.Location = New System.Drawing.Point(221, 30) - Me.pnlAnfuegen.Name = "pnlAnfuegen" - Me.pnlAnfuegen.Size = New System.Drawing.Size(737, 142) - Me.pnlAnfuegen.TabIndex = 3 - ' - 'btnAnfuegenAll - ' - Me.btnAnfuegenAll.BackColor = System.Drawing.Color.Wheat - Me.btnAnfuegenAll.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAnfuegenAll.Location = New System.Drawing.Point(524, 47) - Me.btnAnfuegenAll.Name = "btnAnfuegenAll" - Me.btnAnfuegenAll.Size = New System.Drawing.Size(200, 56) - Me.btnAnfuegenAll.TabIndex = 16 - Me.btnAnfuegenAll.Text = ">> Ganzes Dokument anfügen >>" - Me.btnAnfuegenAll.UseVisualStyleBackColor = False - ' - 'txtDateiname - ' - Me.txtDateiname._DateTimeOnly = False - Me.txtDateiname._numbersOnly = False - Me.txtDateiname._numbersOnlyKommastellen = "" - Me.txtDateiname._Prozent = False - Me.txtDateiname._ShortDateNew = False - Me.txtDateiname._ShortDateOnly = False - Me.txtDateiname._TimeOnly = False - Me.txtDateiname._value = "" - Me.txtDateiname._Waehrung = False - Me.txtDateiname._WaehrungZeichen = True - Me.txtDateiname.ForeColor = System.Drawing.Color.Black - Me.txtDateiname.Location = New System.Drawing.Point(62, 11) - Me.txtDateiname.MaxLineLength = -1 - Me.txtDateiname.MaxLines_Warning = "" - Me.txtDateiname.MaxLines_Warning_Label = Nothing - Me.txtDateiname.Name = "txtDateiname" - Me.txtDateiname.ReadOnly = True - Me.txtDateiname.Size = New System.Drawing.Size(662, 20) - Me.txtDateiname.TabIndex = 14 - ' - 'Label7 - ' - Me.Label7.AutoSize = True - Me.Label7.Location = New System.Drawing.Point(3, 14) - Me.Label7.Name = "Label7" - Me.Label7.Size = New System.Drawing.Size(35, 13) - Me.Label7.TabIndex = 13 - Me.Label7.Text = "Datei:" - ' - 'MyTextBox2 - ' - Me.MyTextBox2._DateTimeOnly = False - Me.MyTextBox2._numbersOnly = False - Me.MyTextBox2._numbersOnlyKommastellen = "" - Me.MyTextBox2._Prozent = False - Me.MyTextBox2._ShortDateNew = False - Me.MyTextBox2._ShortDateOnly = False - Me.MyTextBox2._TimeOnly = False - Me.MyTextBox2._value = "" - Me.MyTextBox2._Waehrung = False - Me.MyTextBox2._WaehrungZeichen = True - Me.MyTextBox2.ForeColor = System.Drawing.Color.Black - Me.MyTextBox2.Location = New System.Drawing.Point(62, 109) - Me.MyTextBox2.MaxLineLength = -1 - Me.MyTextBox2.MaxLines_Warning = "" - Me.MyTextBox2.MaxLines_Warning_Label = Nothing - Me.MyTextBox2.Name = "MyTextBox2" - Me.MyTextBox2.ReadOnly = True - Me.MyTextBox2.Size = New System.Drawing.Size(662, 20) - Me.MyTextBox2.TabIndex = 12 - ' - 'Label6 - ' - Me.Label6.AutoSize = True - Me.Label6.Location = New System.Drawing.Point(3, 112) - Me.Label6.Name = "Label6" - Me.Label6.Size = New System.Drawing.Size(53, 13) - Me.Label6.TabIndex = 11 - Me.Label6.Text = "Sendung:" - ' - 'Label5 - ' - Me.Label5.AutoSize = True - Me.Label5.Location = New System.Drawing.Point(3, 83) - Me.Label5.Name = "Label5" - Me.Label5.Size = New System.Drawing.Size(23, 13) - Me.Label5.TabIndex = 10 - Me.Label5.Text = "Art:" - ' - 'cboArt - ' - Me.cboArt._allowedValuesFreiText = Nothing - Me.cboArt._allowFreiText = False - Me.cboArt._value = "" - Me.cboArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboArt.FormattingEnabled = True - Me.cboArt.Location = New System.Drawing.Point(62, 75) - Me.cboArt.Name = "cboArt" - Me.cboArt.Size = New System.Drawing.Size(248, 28) - Me.cboArt.TabIndex = 9 - ' - 'btnAnfuegen - ' - Me.btnAnfuegen.BackColor = System.Drawing.Color.Wheat - Me.btnAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAnfuegen.Location = New System.Drawing.Point(316, 47) - Me.btnAnfuegen.Name = "btnAnfuegen" - Me.btnAnfuegen.Size = New System.Drawing.Size(205, 56) - Me.btnAnfuegen.TabIndex = 8 - Me.btnAnfuegen.Text = ">> Anfügen >>" - Me.btnAnfuegen.UseVisualStyleBackColor = False - ' - 'txtSeiten - ' - Me.txtSeiten._DateTimeOnly = False - Me.txtSeiten._numbersOnly = False - Me.txtSeiten._numbersOnlyKommastellen = "" - Me.txtSeiten._Prozent = False - Me.txtSeiten._ShortDateNew = False - Me.txtSeiten._ShortDateOnly = False - Me.txtSeiten._TimeOnly = False - Me.txtSeiten._value = "" - Me.txtSeiten._Waehrung = False - Me.txtSeiten._WaehrungZeichen = True - Me.txtSeiten.BackColor = System.Drawing.Color.White - Me.txtSeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtSeiten.ForeColor = System.Drawing.Color.Black - Me.txtSeiten.Location = New System.Drawing.Point(62, 47) - Me.txtSeiten.MaxLineLength = -1 - Me.txtSeiten.MaxLines_Warning = "" - Me.txtSeiten.MaxLines_Warning_Label = Nothing - Me.txtSeiten.Name = "txtSeiten" - Me.txtSeiten.Size = New System.Drawing.Size(248, 26) - Me.txtSeiten.TabIndex = 7 - ' - 'Label4 - ' - Me.Label4.AutoSize = True - Me.Label4.Location = New System.Drawing.Point(3, 55) - Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(40, 13) - Me.Label4.TabIndex = 6 - Me.Label4.Text = "Seiten:" - ' - 'cbxDelPDF - ' - Me.cbxDelPDF.AutoSize = True - Me.cbxDelPDF.Checked = True - Me.cbxDelPDF.CheckState = System.Windows.Forms.CheckState.Checked - Me.cbxDelPDF.Location = New System.Drawing.Point(316, 31) - Me.cbxDelPDF.Name = "cbxDelPDF" - Me.cbxDelPDF.Size = New System.Drawing.Size(244, 17) - Me.cbxDelPDF.TabIndex = 15 - Me.cbxDelPDF.Text = "angefügte Dateien aus Original PDF entfernen" - Me.cbxDelPDF.UseVisualStyleBackColor = True - ' - 'btn - ' - Me.btn.ContextMenuStrip = Me.cntxt - Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btn.Location = New System.Drawing.Point(71, 3) - Me.btn.Name = "btn" - Me.btn.Size = New System.Drawing.Size(75, 25) - Me.btn.TabIndex = 6 - Me.btn.Text = "Hinzufügen" - Me.btn.UseVisualStyleBackColor = True - ' - 'cntxt - ' - Me.cntxt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiHochladenToolStripMenuItem, Me.DateiScannenToolStripMenuItem}) - Me.cntxt.Name = "cntxt" - Me.cntxt.Size = New System.Drawing.Size(170, 48) - ' - 'DateiHochladenToolStripMenuItem - ' - Me.DateiHochladenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdf11 - Me.DateiHochladenToolStripMenuItem.Name = "DateiHochladenToolStripMenuItem" - Me.DateiHochladenToolStripMenuItem.Size = New System.Drawing.Size(169, 22) - Me.DateiHochladenToolStripMenuItem.Text = "Datei hochladen..." - ' - 'DateiScannenToolStripMenuItem - ' - Me.DateiScannenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.scanner - Me.DateiScannenToolStripMenuItem.Name = "DateiScannenToolStripMenuItem" - Me.DateiScannenToolStripMenuItem.Size = New System.Drawing.Size(169, 22) - Me.DateiScannenToolStripMenuItem.Text = "Datei scannen..." - ' - 'Button2 - ' - Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button2.Location = New System.Drawing.Point(152, 3) - Me.Button2.Name = "Button2" - Me.Button2.Size = New System.Drawing.Size(63, 25) - Me.Button2.TabIndex = 7 - Me.Button2.Text = "Löschen" - Me.Button2.UseVisualStyleBackColor = True - ' - 'pnl - ' - Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.pnl.Controls.Add(Me.WebBrowser1) - Me.pnl.Location = New System.Drawing.Point(221, 198) - Me.pnl.Name = "pnl" - Me.pnl.Size = New System.Drawing.Size(738, 493) - Me.pnl.TabIndex = 8 - ' - 'Button3 - ' - Me.Button3.BackColor = System.Drawing.Color.Wheat - Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button3.Location = New System.Drawing.Point(1171, 78) - Me.Button3.Name = "Button3" - Me.Button3.Size = New System.Drawing.Size(187, 56) - Me.Button3.TabIndex = 18 - Me.Button3.Text = "<< zurück <<" - Me.Button3.UseVisualStyleBackColor = False - ' - 'Button4 - ' - Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button4.Location = New System.Drawing.Point(1102, 2) - Me.Button4.Name = "Button4" - Me.Button4.Size = New System.Drawing.Size(63, 25) - Me.Button4.TabIndex = 19 - Me.Button4.Text = "Löschen" - Me.Button4.UseVisualStyleBackColor = True - ' - 'cboSendungen - ' - Me.cboSendungen._allowedValuesFreiText = Nothing - Me.cboSendungen._allowFreiText = False - Me.cboSendungen._value = "" - Me.cboSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboSendungen.FormattingEnabled = True - Me.cboSendungen.Location = New System.Drawing.Point(965, 30) - Me.cboSendungen.Name = "cboSendungen" - Me.cboSendungen.Size = New System.Drawing.Size(393, 28) - Me.cboSendungen.TabIndex = 16 - ' 'frmSendungAnhangImport ' 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(1370, 698) + Me.ClientSize = New System.Drawing.Size(1309, 860) + Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.Button4) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.cboSendungen) @@ -445,7 +507,6 @@ Partial Class frmSendungAnhangImport Friend WithEvents lbl As Label Friend WithEvents flpnlAviso As FlowLayoutPanel - Friend WithEvents WebBrowser1 As WebBrowser Friend WithEvents flpnlSendungen As FlowLayoutPanel Friend WithEvents Label1 As Label Friend WithEvents Label2 As Label @@ -474,4 +535,9 @@ Partial Class frmSendungAnhangImport Friend WithEvents DateiHochladenToolStripMenuItem As ToolStripMenuItem Friend WithEvents Button4 As Button Friend WithEvents PrintDocument1 As Printing.PrintDocument + Friend WithEvents PdfViewer As Spire.PdfViewer.Forms.PdfViewer + Friend WithEvents WebBrowser As WebBrowser + Friend WithEvents Button1 As Button + Friend WithEvents Button5 As Button + Friend WithEvents AusZwischenablageeinfügenToolStripMenuItem As ToolStripMenuItem End Class diff --git a/Aviso/frmSendungAnhangImport.resx b/Aviso/Anhänge/frmSendungAnhangImport.resx similarity index 100% rename from Aviso/frmSendungAnhangImport.resx rename to Aviso/Anhänge/frmSendungAnhangImport.resx diff --git a/Aviso/frmSendungAnhangImport.vb b/Aviso/Anhänge/frmSendungAnhangImport.vb similarity index 60% rename from Aviso/frmSendungAnhangImport.vb rename to Aviso/Anhänge/frmSendungAnhangImport.vb index 64a2196..bd56688 100644 --- a/Aviso/frmSendungAnhangImport.vb +++ b/Aviso/Anhänge/frmSendungAnhangImport.vb @@ -1,17 +1,19 @@  -Imports iTextSharp.text.pdf -Imports iTextSharp.text +'Imports iTextSharp.text.pdf +'Imports iTextSharp.text Imports System.IO -Imports GrapeCity.Documents.Pdf - +'Imports GrapeCity.Documents.Pdf +Imports Spire.Pdf Public Class frmSendungAnhangImport Public AvisoId As Integer + Public SendungsId As Integer Dim SENDUNG_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cSendungen) Dim CURRENT_INDEX As Integer + Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL Dim BrowserLoaded = True @@ -24,6 +26,16 @@ Public Class frmSendungAnhangImport 'Dim f As New GroupDocs.Viewer End Sub + Sub New(AvisoId, SendungsId) + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + Me.AvisoId = AvisoId + Me.SendungsId = SendungsId + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + + 'Dim f As New GroupDocs.Viewer + End Sub Sub initElement(USRCNTL As usrCntlSendungAnhangElement) @@ -40,10 +52,10 @@ Public Class frmSendungAnhangImport USRCNTL.ACTIVE = True 'WebBrowser1.Navigate(USRCNTL.FILE_PATH) If File.Exists(USRCNTL.FILE_PATH) Then - initLocationViewer(USRCNTL.FILE_PATH) + initLocationViewer(USRCNTL.FILE_PATH, USRCNTL.FILE_TYPE) Else - initLocationViewer("") + initLocationViewer("", "PDF") End If ' PdfViewer.DocumentLoaded += New EventHandler(AddressOf radPdfViewer1_DocumentLoaded) @@ -53,6 +65,11 @@ Public Class frmSendungAnhangImport ' End If End Sub + AddHandler USRCNTL.ME_DELETE, Sub(docId, anhId) + deleteElement(docId, anhId) + initFlpANH_LIST() + End Sub + AddHandler USRCNTL.KeyDown, Sub(ob As Object, ev As KeyEventArgs) If ev.KeyCode = Keys.Delete Then deleteActiveElement(getAcitvePnl()) @@ -60,12 +77,18 @@ Public Class frmSendungAnhangImport End Sub End Sub - Sub initLocationViewer(loc) - If WebBrowser1.Url.AbsoluteUri <> loc Then - WebBrowser1.Navigate(loc) - BrowserLoaded = False + Sub initLocationViewer(loc, typ) + PdfViewer.CloseDocument() + WebBrowser.Navigate("") + If typ = "PDF" Then + WebBrowser.Visible = False + PdfViewer.Visible = (loc <> "") + PdfViewer.LoadFromFile(loc) + ElseIf typ = "BILD" Then + PdfViewer.Visible = False + WebBrowser.Visible = (loc <> "") + WebBrowser.Navigate(loc) End If - If loc = "" Then BrowserLoaded = True End Sub Function getAcitvePnl() As FlowLayoutPanel @@ -77,33 +100,42 @@ Public Class frmSendungAnhangImport Next Return Nothing End Function - - Public Function ExtractPdfPages(ByVal SourceFile As String, ByVal TargetFile As String, ByVal IntStr As Integer, ByVal IntEnd As Integer) - Try - Dim impPage As pdf.PdfImportedPage = Nothing - Dim Reader As New PdfReader(SourceFile) - - Dim srcDoc As New Document(Reader.GetPageSizeWithRotation(IntStr)) - Dim PdfCopyProvider As New PdfCopy(srcDoc, New System.IO.FileStream(TargetFile, System.IO.FileMode.Create)) - PdfCopyProvider.SetFullCompression() - srcDoc.Open() - For X = IntStr To IntEnd - impPage = PdfCopyProvider.GetImportedPage(Reader, X) - ' ----- Ermitteln der Seitenauflösung und setzen für die neue Seite - PdfCopyProvider.SetPageSize(New Rectangle(0.0F, 0.0F, impPage.Width, impPage.Height)) - ' ----- PDF Seite in das neue Dokument einfügen - PdfCopyProvider.AddPage(impPage) - - Next - ' ----- neues PDF Dokument und den Reader schließen - srcDoc.Close() - Reader.Close() - Catch ex As Exception - Throw ex - End Try + Function getAcitveCntl() As usrCntlSendungAnhangElement + For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls + If u.ACTIVE Then Return u + Next + For Each u As usrCntlSendungAnhangElement In flpnlSendungen.Controls + If u.ACTIVE Then Return u + Next + Return Nothing End Function + 'Public Function ExtractPdfPages(ByVal SourceFile As String, ByVal TargetFile As String, ByVal IntStr As Integer, ByVal IntEnd As Integer) + ' Try + ' Dim impPage As pdf.PdfImportedPage = Nothing + ' Dim Reader As New PdfReader(SourceFile) + ' Dim srcDoc As New Document(Reader.GetPageSizeWithRotation(IntStr)) + ' Dim PdfCopyProvider As New PdfCopy(srcDoc, New System.IO.FileStream(TargetFile, System.IO.FileMode.Create)) + ' PdfCopyProvider.SetFullCompression() + ' srcDoc.Open() + ' For X = IntStr To IntEnd + ' impPage = PdfCopyProvider.GetImportedPage(Reader, X) + ' ' ----- Ermitteln der Seitenauflösung und setzen für die neue Seite + ' PdfCopyProvider.SetPageSize(New Rectangle(0.0F, 0.0F, impPage.Width, impPage.Height)) + ' ' ----- PDF Seite in das neue Dokument einfügen + ' PdfCopyProvider.AddPage(impPage) + + ' Next + ' ' ----- neues PDF Dokument und den Reader schließen + ' srcDoc.Close() + ' Reader.Close() + ' Catch ex As Exception + ' Throw ex + ' End Try + 'End Function + + Dim tmpPageMove = 0 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnAnfuegen.Click If txtSeiten.Text = "" Then Exit Sub ' If cboArt._value = "" Then Exit Sub @@ -135,7 +167,8 @@ Public Class frmSendungAnhangImport Dim PagesLeft = 0 If removePagesFromPdf_Spire(u.FILE_PATH, TMP_Path_New, getPagesFromText(), PagesLeft, False) Then If PagesLeft = 0 Then - delFromDS(u.FILE_DOCID) + 'delFromDS(u.FILE_DOCID) + deleteElement(u.FILE_DOCID, u.FILE_ANHID, False) flpnlAviso.Controls.Remove(u) Else Dim destPath = "" @@ -147,19 +180,43 @@ Public Class frmSendungAnhangImport End If End If - initLocationViewer("") - If flpnlAviso.Controls.Count > 0 Then - DirectCast(flpnlAviso.Controls(0), usrCntlSendungAnhangElement).CLICK_Me() - End If + initLocationViewer("", "PDF") + End If '------------- End If Next clearPnlAnfuegen() ' initSendungen() + + Dim CurrentPageNumber = PdfViewer.CurrentPageNumber + Dim pages = getPagesFromText() + Dim cntl = getAcitveCntl() initFlpANH_LIST() + + If flpnlAviso.Controls.Count > 0 Then + If Not setAvtive(flpnlAviso, CurrentPageNumber, pages, cntl) Then + DirectCast(flpnlAviso.Controls(0), usrCntlSendungAnhangElement).CLICK_Me() + End If + End If End Sub + Function setAvtive(pnl, CurrentPageNumber, listDelPages, u) As Boolean + For Each p As usrCntlSendungAnhangElement In flpnlAviso.Controls + If p Is u Then + p.ACTIVE = True + Dim newCurrentPageNumber = CurrentPageNumber + For Each s In getPagesFromText() ' vorheirge Seiten, die gelöscht wurden werden abgezogen + If s < CurrentPageNumber Then CurrentPageNumber -= 1 + Next + If newCurrentPageNumber > 0 Then PdfViewer.GoToPage(newCurrentPageNumber) + Return True + End If + Next + Return False + End Function + + Private Sub Button1_ClickALL(sender As Object, e As EventArgs) Handles btnAnfuegenAll.Click If cboSendungen._value = "" Then Exit Sub For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls @@ -179,8 +236,8 @@ Public Class frmSendungAnhangImport ANH.anh_SendungsId = SendngsId ANH.SAVE() 'Eintrag wird überschreiben flpnlAviso.Controls.Remove(u) - If cbxDelPDF.Checked Then tryDelete(u.FILE_PATH) - initLocationViewer("") + ' If cbxDelPDF.Checked Then tryDelete(u.FILE_PATH) + initLocationViewer("", "PDF") If flpnlAviso.Controls.Count > 0 Then DirectCast(flpnlAviso.Controls(0), usrCntlSendungAnhangElement).CLICK_Me() End If @@ -197,11 +254,19 @@ Public Class frmSendungAnhangImport End Sub Sub clearPnlAnfuegen() - MyTextBox2.Text = "" txtDateiname.Text = "" txtSeiten.Text = "" cboArt.Text = "" txtSeiten.Focus() + + Dim u As usrCntlSendungAnhangElement = getAcitveCntl() + If u IsNot Nothing Then + txtDateiname.Text = u.FILE_NAME + Else + txtDateiname.Text = "" + End If + + MyTextBox2.Text = cboSendungen.Text End Sub Sub tryDelete(TMP_Path_New) @@ -212,70 +277,70 @@ Public Class frmSendungAnhangImport End Try End Sub - Public Sub DeletePages(ByVal pageRange As String, ByVal SourcePdfPath As String, ByVal OutputPdfPath As String, ByVal Optional Password As String = "") - Dim pagesToDelete As New List(Of Integer) + 'Public Sub DeletePages(ByVal pageRange As String, ByVal SourcePdfPath As String, ByVal OutputPdfPath As String, ByVal Optional Password As String = "") + ' Dim pagesToDelete As New List(Of Integer) - If pageRange.IndexOf(",") <> -1 Then - Dim tmpHold As String() = pageRange.Split(","c) + ' If pageRange.IndexOf(",") <> -1 Then + ' Dim tmpHold As String() = pageRange.Split(","c) - For Each nonconseq As String In tmpHold + ' For Each nonconseq As String In tmpHold - If nonconseq.IndexOf("-") <> -1 Then - Dim rangeHold As String() = nonconseq.Split("-"c) + ' If nonconseq.IndexOf("-") <> -1 Then + ' Dim rangeHold As String() = nonconseq.Split("-"c) - For i As Integer = Convert.ToInt32(rangeHold(0)) To Convert.ToInt32(rangeHold(1)) - pagesToDelete.Add(i) - Next - Else - pagesToDelete.Add(Convert.ToInt32(nonconseq)) - End If - Next - Else + ' For i As Integer = Convert.ToInt32(rangeHold(0)) To Convert.ToInt32(rangeHold(1)) + ' pagesToDelete.Add(i) + ' Next + ' Else + ' pagesToDelete.Add(Convert.ToInt32(nonconseq)) + ' End If + ' Next + ' Else - If pageRange.IndexOf("-") <> -1 Then - Dim rangeHold As String() = pageRange.Split("-"c) + ' If pageRange.IndexOf("-") <> -1 Then + ' Dim rangeHold As String() = pageRange.Split("-"c) - For i As Integer = Convert.ToInt32(rangeHold(0)) To Convert.ToInt32(rangeHold(1)) - pagesToDelete.Add(i) - Next - Else - pagesToDelete.Add(Convert.ToInt32(pageRange)) - End If - End If + ' For i As Integer = Convert.ToInt32(rangeHold(0)) To Convert.ToInt32(rangeHold(1)) + ' pagesToDelete.Add(i) + ' Next + ' Else + ' pagesToDelete.Add(Convert.ToInt32(pageRange)) + ' End If + ' End If - Dim doc As Document = New Document() - Dim reader As PdfReader = New PdfReader(SourcePdfPath, New System.Text.ASCIIEncoding().GetBytes(Password)) + ' Dim doc As Document = New Document() + ' Dim reader As PdfReader = New PdfReader(SourcePdfPath, New System.Text.ASCIIEncoding().GetBytes(Password)) - Using memoryStream As MemoryStream = New MemoryStream() - Dim writer As PdfWriter = PdfWriter.GetInstance(doc, memoryStream) - doc.Open() - doc.AddDocListener(writer) + ' Using memoryStream As MemoryStream = New MemoryStream() + ' Dim writer As PdfWriter = PdfWriter.GetInstance(doc, memoryStream) + ' doc.Open() + ' doc.AddDocListener(writer) - For p As Integer = 1 To reader.NumberOfPages + ' For p As Integer = 1 To reader.NumberOfPages - If pagesToDelete.FindIndex(Function(s) s = p) <> -1 Then - Continue For - End If + ' If pagesToDelete.FindIndex(Function(s) s = p) <> -1 Then + ' Continue For + ' End If - doc.SetPageSize(reader.GetPageSize(p)) - doc.NewPage() - Dim cb As PdfContentByte = writer.DirectContent - Dim pageImport As pdf.PdfImportedPage = writer.GetImportedPage(reader, p) - Dim rot As Integer = reader.GetPageRotation(p) + ' doc.SetPageSize(reader.GetPageSize(p)) + ' doc.NewPage() + ' Dim cb As PdfContentByte = writer.DirectContent + ' Dim pageImport As pdf.PdfImportedPage = writer.GetImportedPage(reader, p) + ' Dim rot As Integer = reader.GetPageRotation(p) - If rot = 90 OrElse rot = 270 Then - cb.AddTemplate(pageImport, 0, -1.0F, 1.0F, 0, 0, reader.GetPageSizeWithRotation(p).Height) - Else - cb.AddTemplate(pageImport, 1.0F, 0, 0, 1.0F, 0, 0) - End If - Next + ' If rot = 90 OrElse rot = 270 Then + ' cb.AddTemplate(pageImport, 0, -1.0F, 1.0F, 0, 0, reader.GetPageSizeWithRotation(p).Height) + ' Else + ' cb.AddTemplate(pageImport, 1.0F, 0, 0, 1.0F, 0, 0) + ' End If + ' Next - reader.Close() - File.WriteAllBytes(OutputPdfPath, memoryStream.ToArray()) - doc.Close() - End Using - End Sub + ' reader.Close() + ' File.WriteAllBytes(OutputPdfPath, memoryStream.ToArray()) + ' doc.Close() + ' End Using + 'End Sub Function getPagesFromText() As List(Of Integer) @@ -311,7 +376,7 @@ Public Class frmSendungAnhangImport Try PagesLeft = 0 - Dim pdf As New Spire.Pdf.PdfDocument() + Dim pdf As New PdfDocument() pdf.LoadFromFile(sourceFile) ' Dim r As PdfReader = New PdfReader(sourceFile) Dim pagesToKeep As New List(Of Integer) @@ -328,13 +393,14 @@ Public Class frmSendungAnhangImport Next - Dim pdf1 As New Spire.Pdf.PdfDocument() - Dim page As Spire.Pdf.PdfPageBase + Dim pdf1 As New PdfDocument() + Dim page As PdfPageBase For Each p In pagesToKeep - Dim pageInt = p - 1 ' Nciht SeitenNr. sonder Aufzählung + ' Dim pageInt = p - 1 ' Nciht SeitenNr. sonder Aufzählung + Dim pageInt = p If pageInt >= 0 And pageInt < pdf.Pages.Count Then - page = pdf1.Pages.Add(pdf.Pages(p).Size, New Spire.Pdf.Graphics.PdfMargins(0)) + page = pdf1.Pages.Add(pdf.Pages(p).Size, New Graphics.PdfMargins(0)) pdf.Pages(p).CreateTemplate().Draw(page, New System.Drawing.PointF(0, 0)) PagesLeft += 1 End If @@ -356,16 +422,16 @@ Public Class frmSendungAnhangImport Try - Dim pdf As New Spire.Pdf.PdfDocument() + Dim pdf As New PdfDocument() pdf.LoadFromFile(sourceFile) - Dim pdf1 As New Spire.Pdf.PdfDocument() - Dim page As Spire.Pdf.PdfPageBase + Dim pdf1 As New PdfDocument() + Dim page As PdfPageBase For Each p In pagesToExtract Dim pageInt = p - 1 ' Nciht SeitenNr. sonder Aufzählung If pageInt >= 0 And pageInt < pdf.Pages.Count Then - page = pdf1.Pages.Add(pdf.Pages(pageInt).Size, New Spire.Pdf.Graphics.PdfMargins(0)) + page = pdf1.Pages.Add(pdf.Pages(pageInt).Size, New Graphics.PdfMargins(0)) pdf.Pages(pageInt).CreateTemplate().Draw(page, New System.Drawing.PointF(0, 0)) End If Next @@ -373,12 +439,12 @@ Public Class frmSendungAnhangImport 'MsgBox("P: " &pdf.Pages.Count) - 'Dim pdf1 As New Spire.Pdf.PdfDocument() - ''Dim page As New Spire.Pdf.PdfPageBase + 'Dim pdf1 As New PdfDocument() + ''Dim page As New PdfPageBase ''For i As Integer = 0 To 4 'For Each p In pagesToKeep - ' pdf1.Pages.Add(pdf.Pages(p).Size, New Spire.Pdf.Graphics.PdfMargins(0)) + ' pdf1.Pages.Add(pdf.Pages(p).Size, New Graphics.PdfMargins(0)) ' 'Dim page = ' 'pdf.Pages(p).CreateTemplate().Draw(page, New System.Drawing.PointF(0, 0)) ' MsgBox(p) @@ -414,44 +480,44 @@ Public Class frmSendungAnhangImport Return True End Function - Public Sub removePagesFromPdf(ByVal sourceFile As String, ByVal destinationFile As String, pagesToDelete As List(Of Integer), ByRef PagesLeft As Integer) + 'Public Sub removePagesFromPdf(ByVal sourceFile As String, ByVal destinationFile As String, pagesToDelete As List(Of Integer), ByRef PagesLeft As Integer) - Try - PagesLeft = 0 - Dim r As PdfReader = New PdfReader(sourceFile) - Dim pagesToKeep As New List(Of Integer) - For p = 1 To r.NumberOfPages - Dim del = False - For Each i In pagesToDelete - If p = i Then - del = True : Exit For - End If - Next - If Not del Then - pagesToKeep.Add(p) - End If - Next - Using fs As FileStream = New FileStream(destinationFile, FileMode.Create, FileAccess.Write, FileShare.None) + ' Try + ' PagesLeft = 0 + ' Dim r As PdfReader = New PdfReader(sourceFile) + ' Dim pagesToKeep As New List(Of Integer) + ' For p = 1 To r.NumberOfPages + ' Dim del = False + ' For Each i In pagesToDelete + ' If p = i Then + ' del = True : Exit For + ' End If + ' Next + ' If Not del Then + ' pagesToKeep.Add(p) + ' End If + ' Next + ' Using fs As FileStream = New FileStream(destinationFile, FileMode.Create, FileAccess.Write, FileShare.None) - Using doc As Document = New Document() + ' Using doc As Document = New Document() - Using w As PdfWriter = PdfWriter.GetInstance(doc, fs) - doc.Open() - For Each page As Integer In pagesToKeep - doc.NewPage() - w.DirectContent.AddTemplate(w.GetImportedPage(r, page), 0, 0) - PagesLeft += 1 - Next - doc.Close() - End Using - End Using - End Using + ' Using w As PdfWriter = PdfWriter.GetInstance(doc, fs) + ' doc.Open() + ' For Each page As Integer In pagesToKeep + ' doc.NewPage() + ' w.DirectContent.AddTemplate(w.GetImportedPage(r, page), 0, 0) + ' PagesLeft += 1 + ' Next + ' doc.Close() + ' End Using + ' End Using + ' End Using - Catch ex As Exception + ' Catch ex As Exception - End Try + ' End Try - End Sub + 'End Sub Private Sub txtSeiten_TextChanged(sender As Object, e As EventArgs) Handles txtSeiten.TextChanged txtSeiten.BackColor = Color.White If txtSeiten.Text = "" Then Exit Sub @@ -490,35 +556,60 @@ Public Class frmSendungAnhangImport Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click deleteActiveElement(flpnlAviso) End Sub + Sub deleteActiveElement(flpnl As FlowLayoutPanel) If flpnl Is Nothing Then Exit Sub For Each u As usrCntlSendungAnhangElement In flpnl.Controls If u.ACTIVE Then - If vbYes = MsgBox("Möchten Sie das Element löschen?", vbYesNoCancel) Then - Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(u.FILE_DOCID) - If DS.DELETE_COMPLETE Then - flpnl.Controls.Remove(u) - initLocationViewer("") - If flpnl.Controls.Count > 0 Then - DirectCast(flpnl.Controls(0), usrCntlSendungAnhangElement).CLICK_Me() - End If + If deleteElement(u.FILE_DOCID, u.FILE_ANHID) Then + flpnl.Controls.Remove(u) + initLocationViewer("", "PDF") + If flpnl.Controls.Count > 0 Then + DirectCast(flpnl.Controls(0), usrCntlSendungAnhangElement).CLICK_Me() End If End If End If Next End Sub + Function deleteElement(FILE_DOCID, FILE_ANHID, Optional showMessage = True) As Boolean + If Not showMessage OrElse vbYes = MsgBox("Möchten Sie das Element löschen?", vbYesNoCancel) Then + Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(FILE_DOCID) + If DS.DELETE_COMPLETE AndAlso VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.DELETE(FILE_ANHID) Then + Return True + End If + End If + Return False + End Function + Private Sub frmSendungAnhangImport_Load(sender As Object, e As EventArgs) Handles Me.Load - WebBrowser1.Navigate("") + + Me.Height = Screen.PrimaryScreen.WorkingArea.Height + Me.Top = 0 + + Try + DirectCast(PdfViewer.Controls(0).Controls(0).Controls(0), ToolStrip).Items(0).Visible = False + DirectCast(PdfViewer.Controls(0).Controls(0).Controls(0), ToolStrip).Items(1).Visible = False + + Catch ex As Exception + + End Try + + PdfViewer.CanSave = False + + + 'WebBrowser1.Navigate("") flpnlAviso.Controls.Clear() flpnlSendungen.Controls.Clear() cboArt.Items.Clear() + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", "")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATR", "ATR")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Rechnung", "Rechnung")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("CMR", "CMR")) - cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Auftrag", "Auftrag")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Ausfuhr", "Ausfuhr")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Packliste", "Packliste")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Auftrag", "Auftrag")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Sonstiges", "Sonstiges")) initSendungen() @@ -541,8 +632,13 @@ Public Class frmSendungAnhangImport VERAG_PROG_ALLGEMEIN.cSendungen.LOAD_LIST(SENDUNG_LIST, CURRENT_INDEX, AvisoId) 'LÄDT alle SENDUNGSDATEN Dim cnt = 1 For Each s In SENDUNG_LIST - cboSendungen.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem(cnt & ". " & s.tblSnd_Empfaenger & " (" & s.tblSnd_Abfertigungsart_ID & ")", s.tblSnd_SendungID)) + Dim abfertigungsArt = SQL.getValueTxtBySql("SELECT isnull([Abfertigungsbezeichnung],'') FROM [Abfertigungsarten] WHERE Abfertigungsart='" & s.tblSnd_Abfertigungsart_ID & "'", "FMZOLL") + Dim empfTmp = If(s.tblSnd_Empfaenger.Length > 15, s.tblSnd_Empfaenger.Substring(0, 15), s.tblSnd_Empfaenger) + + cboSendungen.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem(cnt & ". " & empfTmp & " (" & abfertigungsArt & ")", s.tblSnd_SendungID)) + cnt += 1 Next + If SendungsId > 0 Then cboSendungen.changeItem(SendungsId) End Sub Private Sub cboSendungen_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboSendungen.SelectedIndexChanged @@ -561,7 +657,7 @@ Public Class frmSendungAnhangImport ' VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_ByAviso(ANH_LIST, AvisoId) 'LÄDT alle Sendungs-Anhänge 'End If VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_ByAviso(ANH_LIST, AvisoId) 'LÄDT alle Aviso-Anhänge - flpnlSendungen.Controls.Clear + flpnlSendungen.Controls.Clear() flpnlAviso.Controls.Clear() For Each a In ANH_LIST @@ -585,6 +681,7 @@ Public Class frmSendungAnhangImport flpnlAviso.Controls.Add(USRCNTL) End If Next + initLocationViewer("", "PDF") End Sub Private Sub Button3_Click(sender As Object, e As EventArgs) Handles btnAnfuegenAll.Click @@ -593,7 +690,7 @@ Public Class frmSendungAnhangImport Private Sub Button3_Click_1(sender As Object, e As EventArgs) Handles Button3.Click If cboSendungen._value = "" Then Exit Sub - For Each u As usrCntlSendungAnhangElement In flpnlAviso.Controls + For Each u As usrCntlSendungAnhangElement In flpnlSendungen.Controls If u.ACTIVE Then Dim ANH = New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(u.FILE_ANHID) @@ -619,7 +716,7 @@ Public Class frmSendungAnhangImport Function saveChangeToDS_daId(daId, sourcePath, ByRef destPath) As Boolean Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(daId) - If Not DS.uploadDataToDATENSERVER(sourcePath) Then MsgBox("Fehler beim Speichern: Datenserver!") : Return False + If Not DS.uploadDataToDATENSERVER(sourcePath,,, False) Then MsgBox("Fehler beim Speichern: Datenserver!") : Return False If DS.da_id <= 0 Then MsgBox("Keine DocId!") : Return False destPath = DS.GET_TOP1_PATH @@ -693,17 +790,22 @@ Public Class frmSendungAnhangImport Dim fi As New FileInfo(F_listItem) Dim filename = fi.Name - ' Dim TMP_Path = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(filename, fi.Extension,, False, "SendungsAnhaenge") - ' MsgBox(TMP_Path) - ' File.Copy(F_listItem, TMP_Path) - Dim da_id = -1 + If filename = "" Then + MsgBox("Dateiname konnte nicht ermittelt werden." & vbNewLine & F_listItem) + Else + + ' Dim TMP_Path = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(filename, fi.Extension,, False, "SendungsAnhaenge") + ' MsgBox(TMP_Path) + ' File.Copy(F_listItem, TMP_Path) + Dim da_id = -1 Dim anhId = -1 Dim destPath = "" Dim Typ = "" - If getFileTypeValid(fi.Extension.Replace(".", ""), Typ) Then - If saveToDS(AvisoId, fi.Name, F_listItem, "", Typ, da_id, anhId, destPath) Then - addUsrcnlToPnl(destPath, da_id, anhId, filename, Typ) + If getFileTypeValid(fi.Extension.Replace(".", ""), Typ) Then + If saveToDS(AvisoId, filename, F_listItem, "", Typ, da_id, anhId, destPath) Then + addUsrcnlToPnl(destPath, da_id, anhId, filename, Typ) + End If End If End If Next @@ -729,9 +831,9 @@ Public Class frmSendungAnhangImport End Sub Public Shared Function getFileTypeValid(extension, ByRef Typ) As Boolean - Select Case extension + Select Case extension.ToString.Replace(".", "").ToUpper Case "PDF" : Typ = "PDF" - Case "XLS", "XLXS" : Typ = "EXCEL" + Case "XLS", "XLM", "XLSM", "XLSX", "CSV" : Typ = "EXCEL" Case "DOC", "DOCX" : Typ = "WORD" Case "TXT" : Typ = "TEXT" Case "JPEG", "JPG", "GIF", "TFF" : Typ = "BILD" @@ -741,9 +843,7 @@ Public Class frmSendungAnhangImport Return True End Function - - - Public Shared Function saveToDS(AvisoId, fileName, sourcePath, Art, Typ, Optional ByRef da_id = -1, Optional anhId = -1, Optional ByRef destPath = "", Optional SendungsId = Nothing) As Boolean + Public Shared Function saveToDS(AvisoId, fileName, sourcePath, Art, Typ, Optional ByRef da_id = -1, Optional ByRef anhId = -1, Optional ByRef destPath = "", Optional SendungsId = Nothing) As Boolean Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER("DOKUMENTE", "AVISO_ANHAENGE", AvisoId, Now.ToString("ddMMyy_HHmmss.sss"), "", fileName, -1, False) If Not DS.uploadDataToDATENSERVER(sourcePath) Then MsgBox("Fehler beim Speichern: Datenserver!") : Return False If DS.da_id <= 0 Then MsgBox("Keine DocId!") : Return False @@ -755,7 +855,76 @@ Public Class frmSendungAnhangImport Return True End Function - Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted + Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) BrowserLoaded = True End Sub + + Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click + Dim f As New frmAddSendnung(AvisoId) + f.ShowDialog(Me) + initSendungen() + initFlpANH_LIST() + End Sub + + Private Sub AusZwischenablageeinfügenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AusZwischenablageeinfügenToolStripMenuItem.Click + Dim data As IDataObject = Clipboard.GetDataObject + If True Then 'data.GetDataPresent(DataFormats.FileDrop) Then + For Each s As String In My.Computer.Clipboard.GetFileDropList() 'GetData(DataFormats.) 'data.GetData(DataFormats.FileDrop) 'DataFormats.FileDrop) + ' Dim F_listItem As String = Path.Combine("c:\mynewpath", Path.GetFileName(s)) + ' File.Copy(s, newFile) + ' MsgBox(s) + If IO.File.Exists(s) Then + + Dim fi As New FileInfo(s) + Dim filename = fi.Name + If filename = "" Then + MsgBox("Dateiname konnte nicht ermittelt werden." & vbNewLine & s) + Else + + Dim da_id = -1 + Dim anhId = -1 + Dim destPath = "" + + Dim Typ = "" + If getFileTypeValid(fi.Extension.Replace(".", ""), Typ) Then + If saveToDS(AvisoId, filename, s, "", Typ, da_id, anhId, destPath) Then + addUsrcnlToPnl(destPath, da_id, anhId, filename, Typ) + End If + End If + End If + End If + Next + If flpnlAviso.Controls.Count > 0 Then DirectCast(flpnlAviso.Controls(0), usrCntlSendungAnhangElement).CLICK_Me() + + End If + End Sub + + Private Sub txtSeiten_PreviewKeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles txtSeiten.PreviewKeyDown, cboArt.PreviewKeyDown + If e.Modifiers = Keys.Control Then + If e.KeyCode = Keys.PageDown Then + cboSendungen.SelectedIndex = cboSendungen.SelectedIndex + 1 + End If + If e.KeyCode = Keys.PageUp Then + cboSendungen.SelectedIndex = cboSendungen.SelectedIndex - 1 + End If + Else + If e.KeyCode = Keys.PageDown Then + PdfViewer.GoToPage(PdfViewer.CurrentPageNumber + 1) + End If + If e.KeyCode = Keys.PageUp Then + PdfViewer.GoToPage(PdfViewer.CurrentPageNumber - 1) + End If + End If + + End Sub + + + 'Dim angle = 0 + 'Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click + ' angle += 90 + ' If angle > 270 Then + ' angle = 0 + ' End If + ' PdfViewer.Rotate(angle) + 'End Sub End Class \ No newline at end of file diff --git a/Aviso/Anhänge/usrCntlSendungAnhangElement.Designer.vb b/Aviso/Anhänge/usrCntlSendungAnhangElement.Designer.vb index 36a7ca6..33e7801 100644 --- a/Aviso/Anhänge/usrCntlSendungAnhangElement.Designer.vb +++ b/Aviso/Anhänge/usrCntlSendungAnhangElement.Designer.vb @@ -22,27 +22,46 @@ Partial Class usrCntlSendungAnhangElement 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() Me.pic = New System.Windows.Forms.PictureBox() + Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.UmbenennenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.lbl = New System.Windows.Forms.Label() + Me.LöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit() + Me.cntxt.SuspendLayout() Me.SuspendLayout() ' 'pic ' Me.pic.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.pic.BackgroundImage = Global.AVISO.My.Resources.Resources.pdf + Me.pic.BackgroundImage = Global.AVISO.My.Resources.Resources.docAllgemein Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.pic.ContextMenuStrip = Me.cntxt Me.pic.Location = New System.Drawing.Point(3, 0) Me.pic.Name = "pic" Me.pic.Size = New System.Drawing.Size(174, 43) Me.pic.TabIndex = 0 Me.pic.TabStop = False ' + 'cntxt + ' + Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.UmbenennenToolStripMenuItem, Me.LöschenToolStripMenuItem}) + Me.cntxt.Name = "cntxt" + Me.cntxt.Size = New System.Drawing.Size(181, 70) + ' + 'UmbenennenToolStripMenuItem + ' + Me.UmbenennenToolStripMenuItem.Name = "UmbenennenToolStripMenuItem" + Me.UmbenennenToolStripMenuItem.Size = New System.Drawing.Size(180, 22) + Me.UmbenennenToolStripMenuItem.Text = "Umbenennen" + ' 'lbl ' Me.lbl.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbl.ContextMenuStrip = Me.cntxt Me.lbl.Location = New System.Drawing.Point(4, 46) Me.lbl.Name = "lbl" Me.lbl.Size = New System.Drawing.Size(173, 18) @@ -50,20 +69,32 @@ Partial Class usrCntlSendungAnhangElement Me.lbl.Text = "NAME" Me.lbl.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' + 'LöschenToolStripMenuItem + ' + Me.LöschenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.del + Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem" + Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(180, 22) + Me.LöschenToolStripMenuItem.Text = "Löschen" + ' 'usrCntlSendungAnhangElement ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White + Me.ContextMenuStrip = Me.cntxt Me.Controls.Add(Me.lbl) Me.Controls.Add(Me.pic) Me.Name = "usrCntlSendungAnhangElement" Me.Size = New System.Drawing.Size(180, 64) CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit() + Me.cntxt.ResumeLayout(False) Me.ResumeLayout(False) End Sub Friend WithEvents pic As PictureBox Friend WithEvents lbl As Label + Friend WithEvents cntxt As ContextMenuStrip + Friend WithEvents UmbenennenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents LöschenToolStripMenuItem As ToolStripMenuItem End Class diff --git a/Aviso/Anhänge/usrCntlSendungAnhangElement.resx b/Aviso/Anhänge/usrCntlSendungAnhangElement.resx index 1af7de1..1c67451 100644 --- a/Aviso/Anhänge/usrCntlSendungAnhangElement.resx +++ b/Aviso/Anhänge/usrCntlSendungAnhangElement.resx @@ -117,4 +117,7 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 17, 17 + \ No newline at end of file diff --git a/Aviso/Anhänge/usrCntlSendungAnhangElement.vb b/Aviso/Anhänge/usrCntlSendungAnhangElement.vb index 23ffb49..eeed4a7 100644 --- a/Aviso/Anhänge/usrCntlSendungAnhangElement.vb +++ b/Aviso/Anhänge/usrCntlSendungAnhangElement.vb @@ -7,7 +7,7 @@ Public Class usrCntlSendungAnhangElement ' Property FILE_NAME = "" Property FILE_PATH - Property FILE_TYPE + 'Property FILE_TYPE Property FILE_PAGES Property FILE_DOCID @@ -15,6 +15,7 @@ Public Class usrCntlSendungAnhangElement Public Event ME_CLICK() + Public Event ME_DELETE(FILE_DOCID, FILE_ANHID) 'Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged @@ -61,6 +62,31 @@ Public Class usrCntlSendungAnhangElement End Set End Property + + + Private FILE_TYPE_Value As String = False + Public Property FILE_TYPE As String + Get + Return Me.FILE_TYPE_Value + End Get + + Set(ByVal value As String) + If Not (value = FILE_TYPE) Then + Me.FILE_TYPE_Value = value + + Select Case value + Case "PDF" : pic.BackgroundImage = My.Resources.pdf + Case "EXCEL" : pic.BackgroundImage = My.Resources.Excel_2013_logo_155x110 + Case "WORD" : pic.BackgroundImage = My.Resources.word + Case "BILD" : pic.BackgroundImage = My.Resources.ImageIcon + Case "TEXT" : pic.BackgroundImage = My.Resources.android_note + Case Else : pic.BackgroundImage = My.Resources.docAllgemein + End Select + ' NotifyPropertyChanged("FILE_TYPE") + End If + End Set + + End Property Private Sub pic_Click(sender As Object, e As EventArgs) Handles pic.Click, lbl.Click, Me.Click RaiseEvent ME_CLICK() End Sub @@ -69,6 +95,47 @@ Public Class usrCntlSendungAnhangElement End Sub Private Sub pic_doubleClick(sender As Object, e As EventArgs) Handles pic.DoubleClick, lbl.DoubleClick, Me.DoubleClick - Process.Start(Me.FILE_PATH) + If IO.File.Exists(Me.FILE_PATH) Then + Process.Start(Me.FILE_PATH) 'damit Orginial bearbeitet werden kann + End If + Exit Sub + + 'Dim p = New System.Diagnostics.Process() + 'p.StartInfo.FileName = Me.FILE_PATH + '' p.StartInfo.Arguments = "/c echo Foo && echo Bar" + 'p.StartInfo.RedirectStandardOutput = False + 'p.StartInfo.UseShellExecute = False + 'p.StartInfo.CreateNoWindow = True + 'p.Start() + + Exit Sub + + Dim ds As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(FILE_DOCID) + If ds IsNot Nothing Then + ds.OPEN_SINGLE() + End If + + End Sub + + Private Sub UmbenennenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UmbenennenToolStripMenuItem.Click + Dim bez = InputBox("Bitte geben Sie den neuen Dateinamen ein:") + If bez <> "" Then + Try + Dim ANH As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(FILE_ANHID) + ANH.anh_Name = bez + ANH.SAVE() + FILE_NAME = bez + Catch ex As Exception + MsgBox(ex.Message) + End Try + End If + End Sub + + Private Sub LöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LöschenToolStripMenuItem.Click + RaiseEvent ME_DELETE(FILE_DOCID, FILE_ANHID) + End Sub + + Private Sub cntxt_Opening(sender As Object, e As CancelEventArgs) Handles cntxt.Opening + CLICK_Me() End Sub End Class diff --git a/Aviso/App.config b/Aviso/App.config index 7a87e9d..03ccbd6 100644 --- a/Aviso/App.config +++ b/Aviso/App.config @@ -1,15 +1,15 @@ - + -
+
- + - + @@ -21,43 +21,43 @@ 200, 200 - + - + - + - - + + - - + + - - + + - - - + + + - - - + + + diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj index 8330882..4178922 100644 --- a/Aviso/Aviso.vbproj +++ b/Aviso/Aviso.vbproj @@ -17,7 +17,7 @@ false - publish\ + D:\Andreas\Programmierung\VB\OutlookAddIN\BEREITSTELLUNG\ true Disk false @@ -97,10 +97,6 @@ ..\packages\esendex-dotnet-sdk.3.4.0\lib\net35\com.esendex.sdk.dll True - - - - False C:\Program Files (x86)\Open XML SDK\V2.5\lib\DocumentFormat.OpenXml.dll @@ -129,9 +125,6 @@ ..\packages\GrapeCity.Documents.Pdf.2.2.0.315\lib\net461\GrapeCity.Documents.Pdf.dll - - ..\packages\GroupDocs.Viewer.19.8.0\lib\GroupDocs.Viewer.dll - False ..\..\..\dll\itextsharp.dll @@ -164,11 +157,14 @@ ..\..\..\dll\NumericBox.dll - - ..\..\..\dll\PDF Spire\Spire.Pdf.dll + + ..\packages\Spire.PDFViewer.4.5.1\lib\net46\Spire.License.dll - - ..\..\..\dll\PDF Spire\Spire.PdfViewer.Forms.dll + + ..\packages\Spire.PDFViewer.4.5.1\lib\net46\Spire.Pdf.dll + + + ..\packages\Spire.PDFViewer.4.5.1\lib\net46\Spire.PdfViewer.Forms.dll @@ -227,6 +223,12 @@ Form + + frmAddSendnung.vb + + + Form + usrCntlSendungAnhangElement.vb @@ -592,10 +594,10 @@ Component - + frmSendungAnhangImport.vb - + Form @@ -664,6 +666,9 @@ frmZuordnungKd.vb + + frmAddSendnung.vb + usrCntlSendungAnhangElement.vb @@ -834,7 +839,7 @@ rptLKWBericht.vb - + frmSendungAnhangImport.vb @@ -951,6 +956,14 @@ + + + + + + + + diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index 7a52d83..10f470b 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/My Project/Resources.Designer.vb b/Aviso/My Project/Resources.Designer.vb index 25d8fad..7b29861 100644 --- a/Aviso/My Project/Resources.Designer.vb +++ b/Aviso/My Project/Resources.Designer.vb @@ -129,6 +129,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ambar_simple() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ambar_simple", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -349,6 +359,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property docAllgemein() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("docAllgemein", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -369,6 +389,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property email() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("email", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -379,6 +409,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property Excel_2013_logo_155x110() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("Excel_2013_logo_155x110", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -419,6 +459,15 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die ähnelt. + ''' + Friend ReadOnly Property hdfesdfsdfsdfsdaf2() As String + Get + Return ResourceManager.GetString("hdfesdfsdfsdfsdaf2", resourceCulture) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -449,6 +498,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property ImageIcon() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ImageIcon", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -679,6 +738,26 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property pdfprint() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("pdfprint", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property pdfprint1() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("pdfprint1", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -989,6 +1068,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property Unisped_logo() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("Unisped_logo", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Zeichenfolge, die 4.0 ähnelt. ''' @@ -1039,7 +1128,7 @@ Namespace My.Resources End Property ''' - ''' Sucht eine lokalisierte Zeichenfolge, die 3.3.2.2 ähnelt. + ''' Sucht eine lokalisierte Zeichenfolge, die 3.3.2.5 ähnelt. ''' Friend ReadOnly Property Version() As String Get @@ -1164,6 +1253,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property word1() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("word1", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' diff --git a/Aviso/My Project/Resources.resx b/Aviso/My Project/Resources.resx index fe5c0d8..79a5b17 100644 --- a/Aviso/My Project/Resources.resx +++ b/Aviso/My Project/Resources.resx @@ -148,6 +148,9 @@ ..\Resources\els.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\Unisped_logo.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\spedbuch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -172,8 +175,8 @@ ..\Resources\zoll1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\auftrag3.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\noAviso_s1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\igl.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -193,6 +196,9 @@ ..\Resources\android-add-contact.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\word.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\android-note.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -208,20 +214,23 @@ ..\Resources\NDK.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\sanduhr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\tranparent30Perc.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\tts.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\noAviso_s1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - ..\Resources\android-clock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\MUSTER.nlc;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + ..\Resources\parkplatz.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\arrow-left-a.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\personInaktiv.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -232,6 +241,9 @@ ..\Resources\kasse1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\ImageIcon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\printer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -265,8 +277,8 @@ ..\Resources\Atilla.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\scanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\fremdSped.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -274,12 +286,12 @@ ..\Resources\handy1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\image_443x282.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\plus.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\parkplatz.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - ..\Resources\bundesanzeiger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -289,6 +301,9 @@ ..\Resources\cartable_ouvert.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\Excel_2013_logo-155x110.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\plus1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -301,8 +316,8 @@ ..\Resources\android-add-contact.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\sanduhr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\auftrag3.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\abgeklaertInaktiv.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -319,14 +334,14 @@ ..\Resources\Aviso.ico;System.Drawing.Icon, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\image_443x282.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\docAllgemein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\akt_ATILLA.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - 3.3.2.2 + 3.3.2.5 ..\Resources\Verag-AG-Logopng.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -346,6 +361,9 @@ ..\Resources\kasse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\pdfprint.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\handy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -394,6 +412,9 @@ ..\Resources\disconnect.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\pdfprint1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + 4.0 @@ -418,6 +439,9 @@ ..\Resources\pdf.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\MUSTER.nlc;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + ..\Resources\evolog.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -445,8 +469,8 @@ ..\Resources\stift.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\arrow-left-a.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\vorauszahlung2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -457,7 +481,13 @@ ..\Resources\del.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\scanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\ambar_simple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\email.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + \ No newline at end of file diff --git a/Aviso/My Project/license.elic.xml b/Aviso/My Project/license.elic.xml new file mode 100644 index 0000000..9bba7f4 --- /dev/null +++ b/Aviso/My Project/license.elic.xml @@ -0,0 +1,24 @@ + + + Runtime + VERAG Spedition AG + al@verag.ag + VERAG Spedition AG + 2019-09-12T00:00:00Z + 2020-09-12T00:00:00Z + + + Spire.PDF Platinum + 5.8 + + 1 + 1 + + + + + e-iceblue + sales@e-iceblue.com + http://www.e-iceblue.com + + diff --git a/Aviso/My Project/licenses.licx b/Aviso/My Project/licenses.licx index 7926021..5e51f2f 100644 --- a/Aviso/My Project/licenses.licx +++ b/Aviso/My Project/licenses.licx @@ -1,4 +1,5 @@ -GrapeCity.ActiveReports.Export.Excel.Section.XlsExport, GrapeCity.ActiveReports.Export.Excel.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff -GrapeCity.ActiveReports.Viewer.Win.Viewer, GrapeCity.ActiveReports.Viewer.Win.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff -GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport, GrapeCity.ActiveReports.Export.Pdf.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff GrapeCity.ActiveReports.SectionReport, GrapeCity.ActiveReports.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff +GrapeCity.ActiveReports.Viewer.Win.Viewer, GrapeCity.ActiveReports.Viewer.Win.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff +Spire.PdfViewer.Forms.PdfDocumentViewer, Spire.PdfViewer.Forms, Version=4.5.1.3046, Culture=neutral, PublicKeyToken=663f351905198cb3 +GrapeCity.ActiveReports.Export.Excel.Section.XlsExport, GrapeCity.ActiveReports.Export.Excel.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff +GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport, GrapeCity.ActiveReports.Export.Pdf.v12, Version=12.2.13986.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff diff --git a/Aviso/Resources/Excel_2013_logo-155x110.png b/Aviso/Resources/Excel_2013_logo-155x110.png new file mode 100644 index 0000000..b45c725 Binary files /dev/null and b/Aviso/Resources/Excel_2013_logo-155x110.png differ diff --git a/Aviso/Resources/ImageIcon.png b/Aviso/Resources/ImageIcon.png new file mode 100644 index 0000000..5359824 Binary files /dev/null and b/Aviso/Resources/ImageIcon.png differ diff --git a/Aviso/Resources/Unisped_logo.jpg b/Aviso/Resources/Unisped_logo.jpg new file mode 100644 index 0000000..b36b587 Binary files /dev/null and b/Aviso/Resources/Unisped_logo.jpg differ diff --git a/Aviso/Resources/ambar_simple.png b/Aviso/Resources/ambar_simple.png new file mode 100644 index 0000000..12946ee Binary files /dev/null and b/Aviso/Resources/ambar_simple.png differ diff --git a/Aviso/Resources/docAllgemein.png b/Aviso/Resources/docAllgemein.png new file mode 100644 index 0000000..283d346 Binary files /dev/null and b/Aviso/Resources/docAllgemein.png differ diff --git a/Aviso/Resources/email.png b/Aviso/Resources/email.png new file mode 100644 index 0000000..3c45711 Binary files /dev/null and b/Aviso/Resources/email.png differ diff --git a/Aviso/Resources/license.elic.xml b/Aviso/Resources/license.elic.xml new file mode 100644 index 0000000..9bba7f4 --- /dev/null +++ b/Aviso/Resources/license.elic.xml @@ -0,0 +1,24 @@ + + + Runtime + VERAG Spedition AG + al@verag.ag + VERAG Spedition AG + 2019-09-12T00:00:00Z + 2020-09-12T00:00:00Z + + + Spire.PDF Platinum + 5.8 + + 1 + 1 + + + + + e-iceblue + sales@e-iceblue.com + http://www.e-iceblue.com + + diff --git a/Aviso/Resources/pdfprint.png b/Aviso/Resources/pdfprint.png new file mode 100644 index 0000000..4702b35 Binary files /dev/null and b/Aviso/Resources/pdfprint.png differ diff --git a/Aviso/Resources/pdfprint1.png b/Aviso/Resources/pdfprint1.png new file mode 100644 index 0000000..4702b35 Binary files /dev/null and b/Aviso/Resources/pdfprint1.png differ diff --git a/Aviso/frmAddSendungsvermerkShort.Designer.vb b/Aviso/frmAddSendungsvermerkShort.Designer.vb index 362b489..50bd559 100644 --- a/Aviso/frmAddSendungsvermerkShort.Designer.vb +++ b/Aviso/frmAddSendungsvermerkShort.Designer.vb @@ -27,6 +27,7 @@ Partial Class frmAddSendungsvermerkShort Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.pnlMain = New System.Windows.Forms.Panel() Me.pnlSendungsVermker = New System.Windows.Forms.Panel() + Me.optUeberwachungsdok = New System.Windows.Forms.CheckBox() Me.lblErrSpedition = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.lblErrGrund = New System.Windows.Forms.Label() @@ -63,7 +64,7 @@ Partial Class frmAddSendungsvermerkShort Me.PictureBox4 = New System.Windows.Forms.PictureBox() Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.Panel4 = New System.Windows.Forms.Panel() - Me.optUeberwachungsdok = New System.Windows.Forms.CheckBox() + Me.cbxRgBest = New System.Windows.Forms.CheckBox() Me.pnlMain.SuspendLayout() Me.pnlSendungsVermker.SuspendLayout() CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit() @@ -89,6 +90,7 @@ Partial Class frmAddSendungsvermerkShort ' Me.pnlSendungsVermker.BackColor = System.Drawing.Color.White Me.pnlSendungsVermker.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlSendungsVermker.Controls.Add(Me.cbxRgBest) Me.pnlSendungsVermker.Controls.Add(Me.optUeberwachungsdok) Me.pnlSendungsVermker.Controls.Add(Me.lblErrSpedition) Me.pnlSendungsVermker.Controls.Add(Me.Label2) @@ -131,6 +133,16 @@ Partial Class frmAddSendungsvermerkShort Me.pnlSendungsVermker.Size = New System.Drawing.Size(434, 388) Me.pnlSendungsVermker.TabIndex = 0 ' + 'optUeberwachungsdok + ' + Me.optUeberwachungsdok.AutoSize = True + Me.optUeberwachungsdok.Location = New System.Drawing.Point(270, 138) + Me.optUeberwachungsdok.Name = "optUeberwachungsdok" + Me.optUeberwachungsdok.Size = New System.Drawing.Size(114, 17) + Me.optUeberwachungsdok.TabIndex = 85 + Me.optUeberwachungsdok.Text = "Ü-Dok. angefodert" + Me.optUeberwachungsdok.UseVisualStyleBackColor = True + ' 'lblErrSpedition ' Me.lblErrSpedition.AutoSize = True @@ -523,15 +535,15 @@ Partial Class frmAddSendungsvermerkShort Me.Panel4.Size = New System.Drawing.Size(434, 0) Me.Panel4.TabIndex = 1 ' - 'optUeberwachungsdok + 'cbxRgBest ' - Me.optUeberwachungsdok.AutoSize = True - Me.optUeberwachungsdok.Location = New System.Drawing.Point(270, 138) - Me.optUeberwachungsdok.Name = "optUeberwachungsdok" - Me.optUeberwachungsdok.Size = New System.Drawing.Size(114, 17) - Me.optUeberwachungsdok.TabIndex = 85 - Me.optUeberwachungsdok.Text = "Ü-Dok. angefodert" - Me.optUeberwachungsdok.UseVisualStyleBackColor = True + Me.cbxRgBest.AutoSize = True + Me.cbxRgBest.Location = New System.Drawing.Point(270, 161) + Me.cbxRgBest.Name = "cbxRgBest" + Me.cbxRgBest.Size = New System.Drawing.Size(146, 17) + Me.cbxRgBest.TabIndex = 86 + Me.cbxRgBest.Text = "Rechnungsbestät. angef." + Me.cbxRgBest.UseVisualStyleBackColor = True ' 'frmAddSendungsvermerkShort ' @@ -594,4 +606,5 @@ Partial Class frmAddSendungsvermerkShort Friend WithEvents Button1 As System.Windows.Forms.Button Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents optUeberwachungsdok As System.Windows.Forms.CheckBox + Friend WithEvents cbxRgBest As CheckBox End Class diff --git a/Aviso/frmAddSendungsvermerkShort.vb b/Aviso/frmAddSendungsvermerkShort.vb index 69d16dd..95e3a4d 100644 --- a/Aviso/frmAddSendungsvermerkShort.vb +++ b/Aviso/frmAddSendungsvermerkShort.vb @@ -95,6 +95,8 @@ Public Class frmAddSendungsvermerkShort Me.Text = "AKT " & myAviso.LKW_Nr & "" ' optKeineAuswahl.Checked = True ' optDokumente.Focus() + + End Sub @@ -136,6 +138,7 @@ Public Class frmAddSendungsvermerkShort If cbxATR.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "ATR für Sendung '" & txtSendung.Text.Trim & "' fehlt - angefordert", 7) If cbxVollmacht.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Vollmacht für Sendung '" & txtSendung.Text.Trim & "' fehlt - angefordert", 9) If cbxCMR.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "CMR für Fiskal VZ bei Sendung '" & txtSendung.Text.Trim & "' angefordert", 11) + If cbxRgBest.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Rechnungsbestätigung bei Sendung '" & txtSendung.Text.Trim & "' angefordert", 55) If optUeberwachungsdok.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Ü-Dok bei Sendung '" & txtSendung.Text.Trim & "' angefordert", 53) diff --git a/Aviso/frmHauptfenster.Designer.vb b/Aviso/frmHauptfenster.Designer.vb index bb37469..9f1d326 100644 --- a/Aviso/frmHauptfenster.Designer.vb +++ b/Aviso/frmHauptfenster.Designer.vb @@ -24,12 +24,12 @@ Partial Class frmHauptfenster Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmHauptfenster)) - Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.mnuInfo = New System.Windows.Forms.ToolStripMenuItem() Me.conÜbernehmen = New System.Windows.Forms.ToolStripMenuItem() Me.conMenuAviso = New System.Windows.Forms.ContextMenuStrip(Me.components) @@ -172,7 +172,6 @@ Partial Class frmHauptfenster Me.Label3 = New System.Windows.Forms.Label() Me.Timer1 = New System.Windows.Forms.Timer(Me.components) Me.btnWichtige = New System.Windows.Forms.Button() - Me.lblAnzahl = New System.Windows.Forms.Label() Me.btnWichtigeStandort = New System.Windows.Forms.Button() Me.btnMinimieren = New System.Windows.Forms.Button() Me.lblSuche = New System.Windows.Forms.Label() @@ -185,7 +184,6 @@ Partial Class frmHauptfenster Me.lblVersion = New System.Windows.Forms.Label() Me.pnlLinksOben = New System.Windows.Forms.Panel() Me.btnNeu = New System.Windows.Forms.Button() - Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Panel6 = New System.Windows.Forms.Panel() Me.lblMeineAviso = New System.Windows.Forms.Label() Me.lblAkte = New System.Windows.Forms.Label() @@ -205,7 +203,6 @@ Partial Class frmHauptfenster Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() Me.pnlDetailsLinks = New System.Windows.Forms.Panel() Me.splitMain = New System.Windows.Forms.SplitContainer() - Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Panel1 = New System.Windows.Forms.Panel() Me.lklErweitereSuche = New System.Windows.Forms.LinkLabel() Me.Label8 = New System.Windows.Forms.Label() @@ -213,7 +210,6 @@ Partial Class frmHauptfenster Me.cboGrenzstelle = New System.Windows.Forms.ComboBox() Me.Label4 = New System.Windows.Forms.Label() Me.pnlTime = New System.Windows.Forms.Panel() - Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.pnlSearch = New System.Windows.Forms.Panel() Me.Label15 = New System.Windows.Forms.Label() Me.txtlkwId = New System.Windows.Forms.TextBox() @@ -230,7 +226,6 @@ Partial Class frmHauptfenster Me.Button4 = New System.Windows.Forms.Button() Me.Label12 = New System.Windows.Forms.Label() Me.txtEmpfänger = New System.Windows.Forms.TextBox() - Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.txtAbfertigungsnummer = New System.Windows.Forms.TextBox() Me.Label11 = New System.Windows.Forms.Label() Me.Label13 = New System.Windows.Forms.Label() @@ -241,7 +236,6 @@ Partial Class frmHauptfenster Me.timerStandzeit = New System.Windows.Forms.Timer(Me.components) Me.Label9 = New System.Windows.Forms.Label() Me.TimerUPDATE = New System.Windows.Forms.Timer(Me.components) - Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() Me.pnlOptionen = New System.Windows.Forms.Panel() Me.btnKasse_User = New System.Windows.Forms.Button() @@ -251,6 +245,11 @@ Partial Class frmHauptfenster Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.BundesanzeigerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.EUTaricToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() + Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.conMenuAviso.SuspendLayout() Me.MenuStrip1.SuspendLayout() Me.Top.SuspendLayout() @@ -261,7 +260,6 @@ Partial Class frmHauptfenster Me.pnlLinks.SuspendLayout() CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlLinksOben.SuspendLayout() - CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel6.SuspendLayout() Me.tbcntrAviso.SuspendLayout() CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit() @@ -273,12 +271,13 @@ Partial Class frmHauptfenster Me.splitMain.Panel1.SuspendLayout() Me.splitMain.Panel2.SuspendLayout() Me.splitMain.SuspendLayout() - CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.pnlTime.SuspendLayout() Me.pnlSearch.SuspendLayout() Me.pnlOptionen.SuspendLayout() Me.cntxt.SuspendLayout() + CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'mnuInfo @@ -1403,16 +1402,6 @@ Partial Class frmHauptfenster Me.btnWichtige.Text = "WICHTIG" Me.btnWichtige.UseVisualStyleBackColor = True ' - 'lblAnzahl - ' - Me.lblAnzahl.AutoSize = True - Me.lblAnzahl.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.lblAnzahl.Location = New System.Drawing.Point(854, 32) - Me.lblAnzahl.Name = "lblAnzahl" - Me.lblAnzahl.Size = New System.Drawing.Size(154, 13) - Me.lblAnzahl.TabIndex = 5 - Me.lblAnzahl.Text = "123 ausgewählt / 1254 gesamt" - ' 'btnWichtigeStandort ' Me.btnWichtigeStandort.FlatStyle = System.Windows.Forms.FlatStyle.Flat @@ -1576,25 +1565,6 @@ Partial Class frmHauptfenster Me.btnNeu.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnNeu.UseVisualStyleBackColor = True ' - 'gridMyAviso - ' - Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1 - Me.gridMyAviso.AllowUserToAddRows = False - Me.gridMyAviso.AllowUserToDeleteRows = False - Me.gridMyAviso.AllowUserToOrderColumns = True - Me.gridMyAviso.AllowUserToResizeRows = False - DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure - Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 - Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White - Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill - Me.gridMyAviso.Location = New System.Drawing.Point(0, 21) - Me.gridMyAviso.Name = "gridMyAviso" - Me.gridMyAviso.ReadOnly = True - Me.gridMyAviso.RowHeadersVisible = False - Me.gridMyAviso.Size = New System.Drawing.Size(650, 207) - Me.gridMyAviso.TabIndex = 0 - ' 'Panel6 ' Me.Panel6.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) @@ -1847,58 +1817,6 @@ Partial Class frmHauptfenster Me.splitMain.SplitterDistance = 360 Me.splitMain.TabIndex = 0 ' - 'gridAviso - ' - Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1 - Me.gridAviso.AllowUserToAddRows = False - Me.gridAviso.AllowUserToDeleteRows = False - Me.gridAviso.AllowUserToResizeRows = False - DataGridViewCellStyle2.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2 - Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray - Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable - DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle3.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle3.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle3 - Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing - DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle4 - Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill - Me.gridAviso.Location = New System.Drawing.Point(0, 208) - Me.gridAviso.MultiSelect = False - Me.gridAviso.Name = "gridAviso" - Me.gridAviso.ReadOnly = True - DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle5 - Me.gridAviso.RowHeadersVisible = False - Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle6 - Me.gridAviso.RowTemplate.ReadOnly = True - Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.gridAviso.Size = New System.Drawing.Size(720, 152) - Me.gridAviso.TabIndex = 1 - Me.gridAviso.TabStop = False - ' 'Panel1 ' Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) @@ -1914,7 +1832,6 @@ Partial Class frmHauptfenster Me.Panel1.Controls.Add(Me.Label1) Me.Panel1.Controls.Add(Me.Label3) Me.Panel1.Controls.Add(Me.btnWichtige) - Me.Panel1.Controls.Add(Me.lblAnzahl) Me.Panel1.Controls.Add(Me.btnWichtigeStandort) Me.Panel1.Controls.Add(Me.btnAlleAnzeigen) Me.Panel1.Controls.Add(Me.lblSuche) @@ -1999,22 +1916,6 @@ Partial Class frmHauptfenster Me.pnlTime.Size = New System.Drawing.Size(274, 57) Me.pnlTime.TabIndex = 12 ' - 'MyComboBox1 - ' - Me.MyComboBox1._allowedValuesFreiText = Nothing - Me.MyComboBox1._allowFreiText = False - Me.MyComboBox1._value = "" - Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) - Me.MyComboBox1.ForeColor = System.Drawing.Color.White - Me.MyComboBox1.FormattingEnabled = True - Me.MyComboBox1.Location = New System.Drawing.Point(3, 3) - Me.MyComboBox1.MaxLength = 4 - Me.MyComboBox1.Name = "MyComboBox1" - Me.MyComboBox1.Size = New System.Drawing.Size(98, 21) - Me.MyComboBox1.TabIndex = 7 - ' 'pnlSearch ' Me.pnlSearch.Controls.Add(Me.Label15) @@ -2201,20 +2102,6 @@ Partial Class frmHauptfenster Me.txtEmpfänger.Size = New System.Drawing.Size(236, 23) Me.txtEmpfänger.TabIndex = 5 ' - 'cboFiliale - ' - Me.cboFiliale._allowedValuesFreiText = Nothing - Me.cboFiliale._allowFreiText = False - Me.cboFiliale._value = "" - Me.cboFiliale.DropDownWidth = 300 - Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.cboFiliale.FormattingEnabled = True - Me.cboFiliale.Location = New System.Drawing.Point(389, 11) - Me.cboFiliale.MaxLength = 4 - Me.cboFiliale.Name = "cboFiliale" - Me.cboFiliale.Size = New System.Drawing.Size(70, 24) - Me.cboFiliale.TabIndex = 3 - ' 'txtAbfertigungsnummer ' Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) @@ -2294,17 +2181,6 @@ Partial Class frmHauptfenster ' Me.TimerUPDATE.Interval = 900000 ' - 'UsrCntlTestsystem1 - ' - Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White - Me.UsrCntlTestsystem1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.UsrCntlTestsystem1.ForeColor = System.Drawing.Color.Red - Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(632, -1) - Me.UsrCntlTestsystem1.Margin = New System.Windows.Forms.Padding(5, 6, 5, 6) - Me.UsrCntlTestsystem1.Name = "UsrCntlTestsystem1" - Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28) - Me.UsrCntlTestsystem1.TabIndex = 8 - ' 'ToolStripMenuItem1 ' Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1" @@ -2403,6 +2279,118 @@ Partial Class frmHauptfenster Me.EUTaricToolStripMenuItem.Size = New System.Drawing.Size(157, 22) Me.EUTaricToolStripMenuItem.Text = "EU-Taric" ' + 'UsrCntlTestsystem1 + ' + Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White + Me.UsrCntlTestsystem1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.UsrCntlTestsystem1.ForeColor = System.Drawing.Color.Red + Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(632, -1) + Me.UsrCntlTestsystem1.Margin = New System.Windows.Forms.Padding(5, 6, 5, 6) + Me.UsrCntlTestsystem1.Name = "UsrCntlTestsystem1" + Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28) + Me.UsrCntlTestsystem1.TabIndex = 8 + ' + 'gridAviso + ' + Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1 + Me.gridAviso.AllowUserToAddRows = False + Me.gridAviso.AllowUserToDeleteRows = False + Me.gridAviso.AllowUserToResizeRows = False + DataGridViewCellStyle2.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2 + Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray + Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable + DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle3.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle3.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle3 + Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing + DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Window + DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.ControlText + DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle4 + Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill + Me.gridAviso.Location = New System.Drawing.Point(0, 208) + Me.gridAviso.MultiSelect = False + Me.gridAviso.Name = "gridAviso" + Me.gridAviso.ReadOnly = True + DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Control + DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle5 + Me.gridAviso.RowHeadersVisible = False + Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing + DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle6 + Me.gridAviso.RowTemplate.ReadOnly = True + Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.gridAviso.Size = New System.Drawing.Size(720, 152) + Me.gridAviso.TabIndex = 1 + Me.gridAviso.TabStop = False + ' + 'MyComboBox1 + ' + Me.MyComboBox1._allowedValuesFreiText = Nothing + Me.MyComboBox1._allowFreiText = False + Me.MyComboBox1._value = "" + Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) + Me.MyComboBox1.ForeColor = System.Drawing.Color.White + Me.MyComboBox1.FormattingEnabled = True + Me.MyComboBox1.Location = New System.Drawing.Point(3, 3) + Me.MyComboBox1.MaxLength = 4 + Me.MyComboBox1.Name = "MyComboBox1" + Me.MyComboBox1.Size = New System.Drawing.Size(98, 21) + Me.MyComboBox1.TabIndex = 7 + ' + 'cboFiliale + ' + Me.cboFiliale._allowedValuesFreiText = Nothing + Me.cboFiliale._allowFreiText = False + Me.cboFiliale._value = "" + Me.cboFiliale.DropDownWidth = 300 + Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboFiliale.FormattingEnabled = True + Me.cboFiliale.Location = New System.Drawing.Point(389, 11) + Me.cboFiliale.MaxLength = 4 + Me.cboFiliale.Name = "cboFiliale" + Me.cboFiliale.Size = New System.Drawing.Size(70, 24) + Me.cboFiliale.TabIndex = 3 + ' + 'gridMyAviso + ' + Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1 + Me.gridMyAviso.AllowUserToAddRows = False + Me.gridMyAviso.AllowUserToDeleteRows = False + Me.gridMyAviso.AllowUserToOrderColumns = True + Me.gridMyAviso.AllowUserToResizeRows = False + DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure + Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 + Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White + Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill + Me.gridMyAviso.Location = New System.Drawing.Point(0, 21) + Me.gridMyAviso.Name = "gridMyAviso" + Me.gridMyAviso.ReadOnly = True + Me.gridMyAviso.RowHeadersVisible = False + Me.gridMyAviso.Size = New System.Drawing.Size(650, 207) + Me.gridMyAviso.TabIndex = 0 + ' 'frmHauptfenster ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -2439,7 +2427,6 @@ Partial Class frmHauptfenster Me.pnlLinks.PerformLayout() CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit() Me.pnlLinksOben.ResumeLayout(False) - CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel6.ResumeLayout(False) Me.Panel6.PerformLayout() Me.tbcntrAviso.ResumeLayout(False) @@ -2454,7 +2441,6 @@ Partial Class frmHauptfenster Me.splitMain.Panel2.ResumeLayout(False) CType(Me.splitMain, System.ComponentModel.ISupportInitialize).EndInit() Me.splitMain.ResumeLayout(False) - CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.pnlTime.ResumeLayout(False) @@ -2463,6 +2449,8 @@ Partial Class frmHauptfenster Me.pnlSearch.PerformLayout() Me.pnlOptionen.ResumeLayout(False) Me.cntxt.ResumeLayout(False) + CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() @@ -2523,7 +2511,6 @@ Partial Class frmHauptfenster Friend WithEvents Label3 As System.Windows.Forms.Label Friend WithEvents Timer1 As System.Windows.Forms.Timer Friend WithEvents btnWichtige As System.Windows.Forms.Button - Friend WithEvents lblAnzahl As System.Windows.Forms.Label Friend WithEvents btnWichtigeStandort As System.Windows.Forms.Button Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip Friend WithEvents btnMinimieren As System.Windows.Forms.Button diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb index 3b69ff9..14613fd 100644 --- a/Aviso/frmHauptfenster.vb +++ b/Aviso/frmHauptfenster.vb @@ -133,11 +133,12 @@ Public Class frmHauptfenster ' FIMRA_COLOR = Color.FromArgb(0, 54, 128) ' ' FIMRA_COLOR = Color.Red ' Case Else - ' FIMRA_COLOR = Color.FromArgb(0, 54, 128) + ' FIMRA_COLOR = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor 'End Select - 'Panel1.BackColor = FIMRA_COLOR - 'Panel6.BackColor = FIMRA_COLOR - 'pnlSearch.BackColor = FIMRA_COLOR + + Panel1.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + Panel6.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + pnlSearch.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor UpdateUpdater.Interval = 5000 UpdateUpdater.Enabled = True @@ -158,7 +159,11 @@ Public Class frmHauptfenster cboGrenzstelle.SelectedIndex = 0 Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA - Case "VERAG", "IMEX" + Case "ATILLA" ' Case "VERAG", "IMEX" + lklErweitereSuche.Visible = False + MDMParkplatzkartenToolStripMenuItem.Visible = False + + Case Else 'AVISO vom PC übernehmen Dim zeilen As Integer = OptionenDAL.setAVISOFromPcName() @@ -171,9 +176,6 @@ Public Class frmHauptfenster If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_abteilung <> "QS" Then cboGrenzstelle.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_niederlassung End If - Case Else - lklErweitereSuche.Visible = False - MDMParkplatzkartenToolStripMenuItem.Visible = False End Select @@ -502,34 +504,21 @@ Public Class frmHauptfenster pnlDetailsRechts.Visible = True Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA - Case "VERAG" - If pnlDetailsRechts.Controls.Count = 0 Then - Dim usrCntl As New usrcntlAktDetails(id) - usrCntl.Dock = DockStyle.Fill - pnlDetailsRechts.Controls.Add(usrCntl) - Else - If reloadIfSameId Then - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - Else - If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> id Then - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - End If - End If - End If - Case "IMEX" - If pnlDetailsRechts.Controls.Count = 0 Then - Dim usrCntl As New usrcntlAktDetails(id) - usrCntl.Dock = DockStyle.Fill - pnlDetailsRechts.Controls.Add(usrCntl) - Else - If reloadIfSameId Then - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - Else - If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> id Then - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - End If - End If - End If + 'Case "VERAG" + ' If pnlDetailsRechts.Controls.Count = 0 Then + ' Dim usrCntl As New usrcntlAktDetails(id) + ' usrCntl.Dock = DockStyle.Fill + ' pnlDetailsRechts.Controls.Add(usrCntl) + ' Else + ' If reloadIfSameId Then + ' DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) + ' Else + ' If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> id Then + ' DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) + ' End If + ' End If + ' End If + Case "ATILLA" If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DAKOSY", Me.FindForm) Then @@ -549,6 +538,20 @@ Public Class frmHauptfenster DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLA).reload(id) End If End If + Case Else + If pnlDetailsRechts.Controls.Count = 0 Then + Dim usrCntl As New usrcntlAktDetails(id) + usrCntl.Dock = DockStyle.Fill + pnlDetailsRechts.Controls.Add(usrCntl) + Else + If reloadIfSameId Then + DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) + Else + If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> id Then + DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) + End If + End If + End If End Select @@ -692,7 +695,7 @@ Public Class frmHauptfenster 'Anzeige der Anzahl gewählter Datensätze VERAG_PROG_ALLGEMEIN.cGlobal.AnzahlAuswahl = gridAviso.RowCount 'If AnzahlAuswahl > AnzahlAlle Then AnzahlAlle = AnzahlAuswahl - lblAnzahl.Text = "Einträge: " & Format(VERAG_PROG_ALLGEMEIN.cGlobal.AnzahlAuswahl, "#,##0") & " ausgewählt" ' / " & Format(AnzahlAlle, "#,##0") & " gesamt" + ' lblAnzahl.Text = "Einträge: " & Format(VERAG_PROG_ALLGEMEIN.cGlobal.AnzahlAuswahl, "#,##0") & " ausgewählt" ' / " & Format(AnzahlAlle, "#,##0") & " gesamt" hMerkZeit = Now lblZeit_aktuell.Text = "letzte Aktualisierung: " & Format(Now, "HH:mm") @@ -1197,7 +1200,8 @@ Public Class frmHauptfenster selectRow(avisoidTmp) Try Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA - Case "VERAG", "IMEX" + Case "ATILLA" + Case Else ' "VERAG", "IMEX" DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).openSnd(sndidTmp) End Select Catch ex As Exception @@ -1575,15 +1579,7 @@ Public Class frmHauptfenster Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) End If End If - Case "IMEX" - Dim usrcntl As usrcntlAktDetails = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails) - If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - Else - If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - End If - End If + Case "ATILLA" If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DAKOSY", Me.FindForm) Then Dim usrcntl As usrcntlAktDetailsATILLANeu = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu) @@ -1604,7 +1600,15 @@ Public Class frmHauptfenster End If End If End If - + Case Else + Dim usrcntl As usrcntlAktDetails = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails) + If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then + Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + Else + If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) + Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + End If + End If End Select End If @@ -2719,9 +2723,13 @@ Public Class AvisoStatusFunctions Else Aviso.Ankunft = Now End If - If Aviso.Grenzstelle.Replace("???", "") <> "" Then - If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then Aviso.Grenzstelle = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG + + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERAG" Then + If Aviso.Grenzstelle.Replace("???", "") <> "" Then + If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then Aviso.Grenzstelle = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG + End If End If + Aviso.Status = VERAG_PROG_ALLGEMEIN.cGlobal.Status_Ankunft Aviso.Änderungen = "auf ANKUNFT gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm") & vbCrLf & Trim(VarToStr(Aviso.Änderungen)) Aviso.letzterMitarbeiter = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter @@ -3429,9 +3437,11 @@ Public Class AvisoStatusFunctions Aviso.Änderungen = "LKW ist fertig - nicht gesetzt, deshalb automatisch gesetzt mit FREIGABE" & vbCrLf & Trim(VarToStr(Aviso.Änderungen)) End If - If Aviso.Grenzstelle.Replace("???", "") <> "" Then - If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then Aviso.Grenzstelle = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG - End If + 'If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERAG" Then + ' If Aviso.Grenzstelle.Replace("???", "") <> "" Then + ' If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then Aviso.Grenzstelle = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG + ' End If + 'End If tmpid = AvisoDAL.SpeichernAviso(Aviso) AvisoDAL.addAenderung(tmpid, "auf FREIGABE gesetzt", "auf FREIGABE gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) If Not Aviso.LKW_fertig Then @@ -3569,9 +3579,12 @@ Public Class AvisoStatusFunctions End If 'Status ist Ankunft, Vorbereitet, Vorgeschrieben oder Erfasst - aktiver Mitarbeiter wird geändert Aviso.letzterMitarbeiter = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter - If Aviso.Grenzstelle.Replace("???", "") <> "" Then - If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then Aviso.Grenzstelle = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG - End If + + 'If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERAG" Then + ' If Aviso.Grenzstelle.Replace("???", "") <> "" Then + ' If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then Aviso.Grenzstelle = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG + ' End If + 'End If Aviso.Änderungen = "Akt übernommen von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm") & vbCrLf & Trim(VarToStr(Aviso.Änderungen)) Dim tmpid = AvisoDAL.SpeichernAviso(Aviso) @@ -3580,14 +3593,10 @@ Public Class AvisoStatusFunctions Try If frmHauptfenster.pnlDetailsRechts.Controls.Count > 0 Then Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA - Case "VERAG" - If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID = AvisoID Then - DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).showInfo("Akt übernommen", 2) - End If - Case "IMEX" - If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID = AvisoID Then - DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).showInfo("Akt übernommen", 2) - End If + 'Case "VERAG" + ' If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID = AvisoID Then + ' DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).showInfo("Akt übernommen", 2) + ' End If Case "ATILLA" If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DAKOSY", "AVISO") Then If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).AvisoID = AvisoID Then @@ -3598,6 +3607,10 @@ Public Class AvisoStatusFunctions DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLA).showInfo("Akt übernommen", 2) End If End If + Case Else + If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID = AvisoID Then + DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).showInfo("Akt übernommen", 2) + End If End Select End If diff --git a/Aviso/frmLogin.designer.vb b/Aviso/frmLogin.designer.vb index 44e48f9..9fcb103 100644 --- a/Aviso/frmLogin.designer.vb +++ b/Aviso/frmLogin.designer.vb @@ -29,10 +29,8 @@ Partial Class frmLogin Me.btnOK = New System.Windows.Forms.Button() Me.txtSachbear = New System.Windows.Forms.TextBox() Me.Panel1 = New System.Windows.Forms.Panel() - Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.lblTESTSYSTEM = New System.Windows.Forms.Label() Me.Panel2 = New System.Windows.Forms.Panel() - Me.FlatButton2 = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() Me.VERAGToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() @@ -51,6 +49,8 @@ Partial Class frmLogin Me.UpdateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.FlatButton1 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.FlatButton2 = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.Panel1.SuspendLayout() Me.Panel2.SuspendLayout() Me.ContextMenuStrip2.SuspendLayout() @@ -122,20 +122,6 @@ Partial Class frmLogin Me.Panel1.Size = New System.Drawing.Size(306, 218) Me.Panel1.TabIndex = 0 ' - 'FlatButton1 - ' - Me.FlatButton1.allowBorder = False - Me.FlatButton1.Cursor = System.Windows.Forms.Cursors.Hand - Me.FlatButton1.FlatAppearance.BorderSize = 0 - Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton1.ForeColor = System.Drawing.Color.Black - Me.FlatButton1.Image = CType(resources.GetObject("FlatButton1.Image"), System.Drawing.Image) - Me.FlatButton1.Location = New System.Drawing.Point(267, -1) - Me.FlatButton1.Name = "FlatButton1" - Me.FlatButton1.Size = New System.Drawing.Size(38, 35) - Me.FlatButton1.TabIndex = 0 - Me.FlatButton1.UseVisualStyleBackColor = True - ' 'lblTESTSYSTEM ' Me.lblTESTSYSTEM.AutoSize = True @@ -160,22 +146,6 @@ Partial Class frmLogin Me.Panel2.Size = New System.Drawing.Size(304, 22) Me.Panel2.TabIndex = 8 ' - 'FlatButton2 - ' - Me.FlatButton2.allowBorder = False - Me.FlatButton2.BackgroundImage = Global.AVISO.My.Resources.Resources.wheel - Me.FlatButton2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.FlatButton2.ContextMenuStrip = Me.ContextMenuStrip2 - Me.FlatButton2.Cursor = System.Windows.Forms.Cursors.Hand - Me.FlatButton2.FlatAppearance.BorderSize = 0 - Me.FlatButton2.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.FlatButton2.ForeColor = System.Drawing.Color.Black - Me.FlatButton2.Location = New System.Drawing.Point(283, 2) - Me.FlatButton2.Name = "FlatButton2" - Me.FlatButton2.Size = New System.Drawing.Size(18, 18) - Me.FlatButton2.TabIndex = 13 - Me.FlatButton2.UseVisualStyleBackColor = True - ' 'ContextMenuStrip2 ' Me.ContextMenuStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem2, Me.TESTSYSTEMToolStripMenuItem, Me.UpdateToolStripMenuItem1}) @@ -308,6 +278,36 @@ Partial Class frmLogin Me.ToolStripMenuItem1.Size = New System.Drawing.Size(112, 22) Me.ToolStripMenuItem1.Text = "Update" ' + 'FlatButton1 + ' + Me.FlatButton1.allowBorder = False + Me.FlatButton1.Cursor = System.Windows.Forms.Cursors.Hand + Me.FlatButton1.FlatAppearance.BorderSize = 0 + Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton1.ForeColor = System.Drawing.Color.Black + Me.FlatButton1.Image = CType(resources.GetObject("FlatButton1.Image"), System.Drawing.Image) + Me.FlatButton1.Location = New System.Drawing.Point(267, -1) + Me.FlatButton1.Name = "FlatButton1" + Me.FlatButton1.Size = New System.Drawing.Size(38, 35) + Me.FlatButton1.TabIndex = 0 + Me.FlatButton1.UseVisualStyleBackColor = True + ' + 'FlatButton2 + ' + Me.FlatButton2.allowBorder = False + Me.FlatButton2.BackgroundImage = Global.AVISO.My.Resources.Resources.wheel + Me.FlatButton2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.FlatButton2.ContextMenuStrip = Me.ContextMenuStrip2 + Me.FlatButton2.Cursor = System.Windows.Forms.Cursors.Hand + Me.FlatButton2.FlatAppearance.BorderSize = 0 + Me.FlatButton2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.FlatButton2.ForeColor = System.Drawing.Color.Black + Me.FlatButton2.Location = New System.Drawing.Point(283, 2) + Me.FlatButton2.Name = "FlatButton2" + Me.FlatButton2.Size = New System.Drawing.Size(18, 18) + Me.FlatButton2.TabIndex = 13 + Me.FlatButton2.UseVisualStyleBackColor = True + ' 'frmLogin ' Me.AcceptButton = Me.btnOK diff --git a/Aviso/frmLogin.vb b/Aviso/frmLogin.vb index 1e359bb..5f1d8a8 100644 --- a/Aviso/frmLogin.vb +++ b/Aviso/frmLogin.vb @@ -32,7 +32,19 @@ Public Class frmLogin End If End If If e.Modifiers = Keys.Control And e.KeyCode = Keys.A Then - firma = If(firma = "VERAG", "ATILLA", If(firma = "ATILLA", "IMEX", "VERAG")) + Panel2.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + lblVersion.ForeColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor + Label3.ForeColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor + + Select Case firma + Case "VERAG" : firma = "ATILLA" + Case "ATILLA" : firma = "IMEX" + Case "IMEX" : firma = "UNISPED" + Case "UNISPED" : firma = "AMBAR" + Case "AMBAR" : firma = "VERAG" + + End Select + ' firma = If(firma = "VERAG", "ATILLA", If(firma = "ATILLA", "IMEX", "VERAG")) initstart() If Environment.MachineName = "YLPS023046" Then txtSachbear.Text = "ADMIN" @@ -142,6 +154,10 @@ Public Class frmLogin ' cGlobal.ConnStrADMIN = VERAG_PROG_ALLGEMEIN.My.MySettings.Default.ADMINConnectionString picLogin.Image = My.Resources.IMEX_LOGO_simple ' If TESTSYSTEM Then cGlobal.ConnStr = VERAG_PROG_ALLGEMEIN.My.MySettings.Default.AVISOConnectionStringTEST + Case "UNISPED" + picLogin.Image = My.Resources.Unisped_logo + Case "AMBAR" + picLogin.Image = My.Resources.ambar_simple End Select 'DEV FMZOLL diff --git a/Aviso/frmSendungsdetailsNEU.Designer.vb b/Aviso/frmSendungsdetailsNEU.Designer.vb index 24e5e43..18ec236 100644 --- a/Aviso/frmSendungsdetailsNEU.Designer.vb +++ b/Aviso/frmSendungsdetailsNEU.Designer.vb @@ -23,13 +23,13 @@ Partial Class frmSendungsdetailsNEU _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() - Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungsdetailsNEU)) + Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.pnl = New System.Windows.Forms.Panel() Me.Panel4 = New System.Windows.Forms.Panel() Me.TabControl1 = New System.Windows.Forms.TabControl() @@ -85,6 +85,8 @@ Partial Class frmSendungsdetailsNEU Me.tbAnhang = New System.Windows.Forms.TabPage() Me.dgvAnhang = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Panel19 = New System.Windows.Forms.Panel() + Me.Button20 = New System.Windows.Forms.Button() + Me.Button19 = New System.Windows.Forms.Button() Me.Button18 = New System.Windows.Forms.Button() Me.Label52 = New System.Windows.Forms.Label() Me.Panel14 = New System.Windows.Forms.Panel() @@ -137,35 +139,10 @@ Partial Class frmSendungsdetailsNEU Me.btnAvisierer = New VERAG_PROG_ALLGEMEIN.FlatButton() Me.Button4 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() - Me.cntlFrachtfuehrer_Sonst = New AVISO.usrcntlCheckBox() - Me.cntlAbsender_Sonst = New AVISO.usrcntlCheckBox() - Me.cntlEmpfaenger_Sonst = New AVISO.usrcntlCheckBox() - Me.cntlAuftraggeber_Sonst = New AVISO.usrcntlCheckBox() - Me.cntlAvisierer_Sonst = New AVISO.usrcntlCheckBox() Me.Label4 = New System.Windows.Forms.Label() Me.btnAufschub_Atr = New System.Windows.Forms.Button() Me.btnAufschub_Empf = New System.Windows.Forms.Button() Me.btnAufschub_VERAG = New System.Windows.Forms.Button() - Me.cntlFrachtf_Clear = New AVISO.usrcntlCheckBox() - Me.cntlFrachtf_Abf = New AVISO.usrcntlCheckBox() - Me.cntlFrachtf_Eust = New AVISO.usrcntlCheckBox() - Me.cntlFrachtf_Zoll = New AVISO.usrcntlCheckBox() - Me.cntlAbsender_Clear = New AVISO.usrcntlCheckBox() - Me.cntlAbsender_Abf = New AVISO.usrcntlCheckBox() - Me.cntlAbsender_Eust = New AVISO.usrcntlCheckBox() - Me.cntlAbsender_Zoll = New AVISO.usrcntlCheckBox() - Me.cntlEmpf_Clear = New AVISO.usrcntlCheckBox() - Me.cntlEmpf_Abf = New AVISO.usrcntlCheckBox() - Me.cntlEmpf_Eust = New AVISO.usrcntlCheckBox() - Me.cntlEmpf_Zoll = New AVISO.usrcntlCheckBox() - Me.cntlAuftr_Clear = New AVISO.usrcntlCheckBox() - Me.cntlAuftr_Abf = New AVISO.usrcntlCheckBox() - Me.cntlAuftr_Eust = New AVISO.usrcntlCheckBox() - Me.cntlAuftr_Zoll = New AVISO.usrcntlCheckBox() - Me.cntlAvisierer_Clear = New AVISO.usrcntlCheckBox() - Me.cntlAvisierer_Abf = New AVISO.usrcntlCheckBox() - Me.cntlAvisierer_Eust = New AVISO.usrcntlCheckBox() - Me.cntlAvisierer_Zoll = New AVISO.usrcntlCheckBox() Me.Panel15 = New System.Windows.Forms.Panel() Me.txtAvisierer = New VERAG_PROG_ALLGEMEIN.KdSearchBox() Me.txtAuftraggeber = New VERAG_PROG_ALLGEMEIN.KdSearchBox() @@ -179,7 +156,6 @@ Partial Class frmSendungsdetailsNEU Me.lblEmpfAufschubEust = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label42 = New System.Windows.Forms.Label() Me.pnlT1 = New System.Windows.Forms.Panel() - Me.UsrCntlSND_NCTSGestellungsadresse1 = New AVISO.usrCntlSND_NCTSGestellungsadresse() Me.Label43 = New System.Windows.Forms.Label() Me.txtFrachtfuehrer = New VERAG_PROG_ALLGEMEIN.KdSearchBox() Me.Label40 = New System.Windows.Forms.Label() @@ -239,6 +215,8 @@ Partial Class frmSendungsdetailsNEU Me.pnlheader = New System.Windows.Forms.Panel() Me.Label2 = New System.Windows.Forms.Label() Me.Panel7 = New System.Windows.Forms.Panel() + Me.lblGrenze = New System.Windows.Forms.Label() + Me.Label15 = New System.Windows.Forms.Label() Me.Button17 = New System.Windows.Forms.Button() Me.Panel3 = New System.Windows.Forms.Panel() Me.btnDelQS = New System.Windows.Forms.Button() @@ -248,8 +226,8 @@ Partial Class frmSendungsdetailsNEU Me.Panel9 = New System.Windows.Forms.Panel() Me.Button10 = New System.Windows.Forms.Button() Me.Button2 = New System.Windows.Forms.Button() - Me.cbxSpedBuch = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components) Me.btn = New System.Windows.Forms.Button() + Me.cbxSpedBuch = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components) Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem() @@ -277,7 +255,36 @@ Partial Class frmSendungsdetailsNEU Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() Me.GelangensbestätigungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolTip = New System.Windows.Forms.ToolTip(Me.components) - Me.Button19 = New System.Windows.Forms.Button() + Me.cntxtAnh = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.MarkiertePDFsDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.EMailAnfügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.KopierenZwischenablageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.cntlFrachtfuehrer_Sonst = New AVISO.usrcntlCheckBox() + Me.cntlAbsender_Sonst = New AVISO.usrcntlCheckBox() + Me.cntlEmpfaenger_Sonst = New AVISO.usrcntlCheckBox() + Me.cntlAuftraggeber_Sonst = New AVISO.usrcntlCheckBox() + Me.cntlAvisierer_Sonst = New AVISO.usrcntlCheckBox() + Me.cntlFrachtf_Clear = New AVISO.usrcntlCheckBox() + Me.cntlFrachtf_Abf = New AVISO.usrcntlCheckBox() + Me.cntlFrachtf_Eust = New AVISO.usrcntlCheckBox() + Me.cntlFrachtf_Zoll = New AVISO.usrcntlCheckBox() + Me.cntlAbsender_Clear = New AVISO.usrcntlCheckBox() + Me.cntlAbsender_Abf = New AVISO.usrcntlCheckBox() + Me.cntlAbsender_Eust = New AVISO.usrcntlCheckBox() + Me.cntlAbsender_Zoll = New AVISO.usrcntlCheckBox() + Me.cntlEmpf_Clear = New AVISO.usrcntlCheckBox() + Me.cntlEmpf_Abf = New AVISO.usrcntlCheckBox() + Me.cntlEmpf_Eust = New AVISO.usrcntlCheckBox() + Me.cntlEmpf_Zoll = New AVISO.usrcntlCheckBox() + Me.cntlAuftr_Clear = New AVISO.usrcntlCheckBox() + Me.cntlAuftr_Abf = New AVISO.usrcntlCheckBox() + Me.cntlAuftr_Eust = New AVISO.usrcntlCheckBox() + Me.cntlAuftr_Zoll = New AVISO.usrcntlCheckBox() + Me.cntlAvisierer_Clear = New AVISO.usrcntlCheckBox() + Me.cntlAvisierer_Abf = New AVISO.usrcntlCheckBox() + Me.cntlAvisierer_Eust = New AVISO.usrcntlCheckBox() + Me.cntlAvisierer_Zoll = New AVISO.usrcntlCheckBox() + Me.UsrCntlSND_NCTSGestellungsadresse1 = New AVISO.usrCntlSND_NCTSGestellungsadresse() Me.pnl.SuspendLayout() Me.Panel4.SuspendLayout() Me.TabControl1.SuspendLayout() @@ -320,6 +327,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel9.SuspendLayout() Me.cntxtVorauskasse.SuspendLayout() Me.cntxtOptions.SuspendLayout() + Me.cntxtAnh.SuspendLayout() Me.SuspendLayout() ' 'pnl @@ -343,7 +351,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel4.Location = New System.Drawing.Point(0, 419) Me.Panel4.Name = "Panel4" - Me.Panel4.Size = New System.Drawing.Size(1112, 389) + Me.Panel4.Size = New System.Drawing.Size(1112, 380) Me.Panel4.TabIndex = 2 ' 'TabControl1 @@ -357,7 +365,7 @@ Partial Class frmSendungsdetailsNEU Me.TabControl1.Location = New System.Drawing.Point(0, 5) Me.TabControl1.Name = "TabControl1" Me.TabControl1.SelectedIndex = 0 - Me.TabControl1.Size = New System.Drawing.Size(1112, 384) + Me.TabControl1.Size = New System.Drawing.Size(1112, 375) Me.TabControl1.TabIndex = 1 ' 'tbZollabfertigung @@ -365,7 +373,7 @@ Partial Class frmSendungsdetailsNEU Me.tbZollabfertigung.Controls.Add(Me.Panel16) Me.tbZollabfertigung.Location = New System.Drawing.Point(4, 22) Me.tbZollabfertigung.Name = "tbZollabfertigung" - Me.tbZollabfertigung.Size = New System.Drawing.Size(1104, 358) + Me.tbZollabfertigung.Size = New System.Drawing.Size(1104, 349) Me.tbZollabfertigung.TabIndex = 2 Me.tbZollabfertigung.Text = "Zollabfertigung" Me.tbZollabfertigung.UseVisualStyleBackColor = True @@ -378,7 +386,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel16.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel16.Location = New System.Drawing.Point(0, 0) Me.Panel16.Name = "Panel16" - Me.Panel16.Size = New System.Drawing.Size(1104, 358) + Me.Panel16.Size = New System.Drawing.Size(1104, 349) Me.Panel16.TabIndex = 0 ' 'dgvZollAnmeldungen @@ -395,7 +403,7 @@ Partial Class frmSendungsdetailsNEU Me.dgvZollAnmeldungen.ReadOnly = True Me.dgvZollAnmeldungen.RowTemplate.Height = 30 Me.dgvZollAnmeldungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1104, 296) + Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1104, 287) Me.dgvZollAnmeldungen.TabIndex = 1 ' 'Panel17 @@ -404,7 +412,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel17.Controls.Add(Me.Button6) Me.Panel17.Controls.Add(Me.Button5) Me.Panel17.Dock = System.Windows.Forms.DockStyle.Bottom - Me.Panel17.Location = New System.Drawing.Point(0, 320) + Me.Panel17.Location = New System.Drawing.Point(0, 311) Me.Panel17.Name = "Panel17" Me.Panel17.Size = New System.Drawing.Size(1104, 38) Me.Panel17.TabIndex = 2 @@ -523,7 +531,7 @@ Partial Class frmSendungsdetailsNEU Me.TabPage1.Location = New System.Drawing.Point(4, 22) Me.TabPage1.Name = "TabPage1" Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage1.Size = New System.Drawing.Size(1104, 358) + Me.TabPage1.Size = New System.Drawing.Size(1104, 349) Me.TabPage1.TabIndex = 0 Me.TabPage1.Text = "Kunden - Zolltarif" Me.TabPage1.UseVisualStyleBackColor = True @@ -539,7 +547,7 @@ Partial Class frmSendungsdetailsNEU Me.pnlKundenZolltarif.Location = New System.Drawing.Point(3, 33) Me.pnlKundenZolltarif.MinimumSize = New System.Drawing.Size(2, 103) Me.pnlKundenZolltarif.Name = "pnlKundenZolltarif" - Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1098, 322) + Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1098, 313) Me.pnlKundenZolltarif.TabIndex = 1 Me.pnlKundenZolltarif.TabStop = True ' @@ -548,7 +556,7 @@ Partial Class frmSendungsdetailsNEU Me.Label22.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label22.AutoSize = True - Me.Label22.Location = New System.Drawing.Point(4, 281) + Me.Label22.Location = New System.Drawing.Point(4, 272) Me.Label22.Name = "Label22" Me.Label22.Size = New System.Drawing.Size(209, 13) Me.Label22.TabIndex = 0 @@ -560,7 +568,7 @@ Partial Class frmSendungsdetailsNEU Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.AutoSize = True - Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 295) + Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 286) Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Name = "lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden" Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Size = New System.Drawing.Size(338, 13) Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.TabIndex = 1 @@ -604,7 +612,7 @@ Partial Class frmSendungsdetailsNEU Me.TabPage2.Location = New System.Drawing.Point(4, 22) Me.TabPage2.Name = "TabPage2" Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage2.Size = New System.Drawing.Size(1104, 358) + Me.TabPage2.Size = New System.Drawing.Size(1104, 349) Me.TabPage2.TabIndex = 1 Me.TabPage2.Text = "Speditionsbuch" Me.TabPage2.UseVisualStyleBackColor = True @@ -621,7 +629,7 @@ Partial Class frmSendungsdetailsNEU Me.DataGridView.Dock = System.Windows.Forms.DockStyle.Fill Me.DataGridView.Location = New System.Drawing.Point(3, 94) Me.DataGridView.Name = "DataGridView" - Me.DataGridView.Size = New System.Drawing.Size(1098, 261) + Me.DataGridView.Size = New System.Drawing.Size(1098, 252) Me.DataGridView.TabIndex = 1 ' 'pnlSpedBuchNacherfassung @@ -925,7 +933,7 @@ Partial Class frmSendungsdetailsNEU Me.TabPage3.Controls.Add(Me.gridVermerke) Me.TabPage3.Location = New System.Drawing.Point(4, 22) Me.TabPage3.Name = "TabPage3" - Me.TabPage3.Size = New System.Drawing.Size(1104, 358) + Me.TabPage3.Size = New System.Drawing.Size(1104, 349) Me.TabPage3.TabIndex = 3 Me.TabPage3.Text = "Vermerke" Me.TabPage3.UseVisualStyleBackColor = True @@ -935,51 +943,51 @@ Partial Class frmSendungsdetailsNEU Me.gridVermerke.AllowUserToAddRows = False Me.gridVermerke.AllowUserToDeleteRows = False Me.gridVermerke.AllowUserToResizeRows = False - DataGridViewCellStyle8.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle8 + DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.gridVermerke.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle9.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle9.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle9 + DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2 Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing - DataGridViewCellStyle10.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle10.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle10.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle10.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle10.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle10 + DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window + DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText + DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle3 Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill Me.gridVermerke.Location = New System.Drawing.Point(0, 0) Me.gridVermerke.MultiSelect = False Me.gridVermerke.Name = "gridVermerke" Me.gridVermerke.ReadOnly = True - DataGridViewCellStyle11.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle11.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle11.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle11.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle11 + DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control + DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle4 Me.gridVermerke.RowHeadersVisible = False Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle12 + DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle5 Me.gridVermerke.RowTemplate.Height = 20 Me.gridVermerke.RowTemplate.ReadOnly = True Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.gridVermerke.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.gridVermerke.ShowCellErrors = False Me.gridVermerke.ShowRowErrors = False - Me.gridVermerke.Size = New System.Drawing.Size(1104, 358) + Me.gridVermerke.Size = New System.Drawing.Size(1104, 349) Me.gridVermerke.TabIndex = 71 Me.gridVermerke.TabStop = False ' @@ -989,7 +997,7 @@ Partial Class frmSendungsdetailsNEU Me.tbAnhang.Controls.Add(Me.Panel19) Me.tbAnhang.Location = New System.Drawing.Point(4, 22) Me.tbAnhang.Name = "tbAnhang" - Me.tbAnhang.Size = New System.Drawing.Size(1104, 358) + Me.tbAnhang.Size = New System.Drawing.Size(1104, 349) Me.tbAnhang.TabIndex = 4 Me.tbAnhang.Text = "Anhang" Me.tbAnhang.UseVisualStyleBackColor = True @@ -1002,27 +1010,28 @@ Partial Class frmSendungsdetailsNEU Me.dgvAnhang.AllowUserToResizeColumns = False Me.dgvAnhang.AllowUserToResizeRows = False Me.dgvAnhang.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.dgvAnhang.DefaultCellStyle = DataGridViewCellStyle7 + Me.dgvAnhang.ContextMenuStrip = Me.cntxtAnh + DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle6.BackColor = System.Drawing.SystemColors.Window + DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.ControlText + DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.dgvAnhang.DefaultCellStyle = DataGridViewCellStyle6 Me.dgvAnhang.Dock = System.Windows.Forms.DockStyle.Fill Me.dgvAnhang.Location = New System.Drawing.Point(0, 45) - Me.dgvAnhang.MultiSelect = False Me.dgvAnhang.Name = "dgvAnhang" Me.dgvAnhang.ReadOnly = True Me.dgvAnhang.RowHeadersVisible = False Me.dgvAnhang.RowTemplate.Height = 40 Me.dgvAnhang.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvAnhang.Size = New System.Drawing.Size(1104, 313) + Me.dgvAnhang.Size = New System.Drawing.Size(1104, 304) Me.dgvAnhang.TabIndex = 3 ' 'Panel19 ' + Me.Panel19.Controls.Add(Me.Button20) Me.Panel19.Controls.Add(Me.Button19) Me.Panel19.Controls.Add(Me.Button18) Me.Panel19.Controls.Add(Me.Label52) @@ -1032,6 +1041,34 @@ Partial Class frmSendungsdetailsNEU Me.Panel19.Size = New System.Drawing.Size(1104, 45) Me.Panel19.TabIndex = 2 ' + 'Button20 + ' + Me.Button20.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button20.Image = CType(resources.GetObject("Button20.Image"), System.Drawing.Image) + Me.Button20.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button20.Location = New System.Drawing.Point(116, 5) + Me.Button20.Name = "Button20" + Me.Button20.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) + Me.Button20.Size = New System.Drawing.Size(119, 34) + Me.Button20.TabIndex = 3 + Me.Button20.Text = "Optionen" + Me.Button20.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button20.UseVisualStyleBackColor = True + ' + 'Button19 + ' + Me.Button19.Enabled = False + Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button19.Image = CType(resources.GetObject("Button19.Image"), System.Drawing.Image) + Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button19.Location = New System.Drawing.Point(970, 5) + Me.Button19.Name = "Button19" + Me.Button19.Size = New System.Drawing.Size(129, 34) + Me.Button19.TabIndex = 2 + Me.Button19.Text = "Direkt anfügen ..." + Me.Button19.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button19.UseVisualStyleBackColor = True + ' 'Button18 ' Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Flat @@ -1847,66 +1884,6 @@ Partial Class frmSendungsdetailsNEU Me.Button1.Text = "BAR - Beleg" Me.Button1.UseVisualStyleBackColor = False ' - 'cntlFrachtfuehrer_Sonst - ' - Me.cntlFrachtfuehrer_Sonst._abrArt = "SONST" - Me.cntlFrachtfuehrer_Sonst._beteiligter = "FRACHTF" - Me.cntlFrachtfuehrer_Sonst._readOnly = True - Me.cntlFrachtfuehrer_Sonst.Location = New System.Drawing.Point(632, 168) - Me.cntlFrachtfuehrer_Sonst.Name = "cntlFrachtfuehrer_Sonst" - Me.cntlFrachtfuehrer_Sonst.Size = New System.Drawing.Size(21, 20) - Me.cntlFrachtfuehrer_Sonst.TabIndex = 78 - Me.cntlFrachtfuehrer_Sonst.TabStop = False - Me.cntlFrachtfuehrer_Sonst.value = "" - ' - 'cntlAbsender_Sonst - ' - Me.cntlAbsender_Sonst._abrArt = "SONST" - Me.cntlAbsender_Sonst._beteiligter = "ABS" - Me.cntlAbsender_Sonst._readOnly = True - Me.cntlAbsender_Sonst.Location = New System.Drawing.Point(632, 133) - Me.cntlAbsender_Sonst.Name = "cntlAbsender_Sonst" - Me.cntlAbsender_Sonst.Size = New System.Drawing.Size(21, 20) - Me.cntlAbsender_Sonst.TabIndex = 66 - Me.cntlAbsender_Sonst.TabStop = False - Me.cntlAbsender_Sonst.value = "" - ' - 'cntlEmpfaenger_Sonst - ' - Me.cntlEmpfaenger_Sonst._abrArt = "SONST" - Me.cntlEmpfaenger_Sonst._beteiligter = "EMPF" - Me.cntlEmpfaenger_Sonst._readOnly = True - Me.cntlEmpfaenger_Sonst.Location = New System.Drawing.Point(632, 94) - Me.cntlEmpfaenger_Sonst.Name = "cntlEmpfaenger_Sonst" - Me.cntlEmpfaenger_Sonst.Size = New System.Drawing.Size(21, 20) - Me.cntlEmpfaenger_Sonst.TabIndex = 51 - Me.cntlEmpfaenger_Sonst.TabStop = False - Me.cntlEmpfaenger_Sonst.value = "" - ' - 'cntlAuftraggeber_Sonst - ' - Me.cntlAuftraggeber_Sonst._abrArt = "SONST" - Me.cntlAuftraggeber_Sonst._beteiligter = "AUFTR" - Me.cntlAuftraggeber_Sonst._readOnly = True - Me.cntlAuftraggeber_Sonst.Location = New System.Drawing.Point(632, 57) - Me.cntlAuftraggeber_Sonst.Name = "cntlAuftraggeber_Sonst" - Me.cntlAuftraggeber_Sonst.Size = New System.Drawing.Size(21, 20) - Me.cntlAuftraggeber_Sonst.TabIndex = 35 - Me.cntlAuftraggeber_Sonst.TabStop = False - Me.cntlAuftraggeber_Sonst.value = "" - ' - 'cntlAvisierer_Sonst - ' - Me.cntlAvisierer_Sonst._abrArt = "SONST" - Me.cntlAvisierer_Sonst._beteiligter = "AVISIERER" - Me.cntlAvisierer_Sonst._readOnly = True - Me.cntlAvisierer_Sonst.Location = New System.Drawing.Point(632, 20) - Me.cntlAvisierer_Sonst.Name = "cntlAvisierer_Sonst" - Me.cntlAvisierer_Sonst.Size = New System.Drawing.Size(21, 20) - Me.cntlAvisierer_Sonst.TabIndex = 20 - Me.cntlAvisierer_Sonst.TabStop = False - Me.cntlAvisierer_Sonst.value = "" - ' 'Label4 ' Me.Label4.AutoSize = True @@ -1974,246 +1951,6 @@ Partial Class frmSendungsdetailsNEU Me.btnAufschub_VERAG.UseVisualStyleBackColor = False Me.btnAufschub_VERAG.Visible = False ' - 'cntlFrachtf_Clear - ' - Me.cntlFrachtf_Clear._abrArt = "CLEARING" - Me.cntlFrachtf_Clear._beteiligter = "FRACHTF" - Me.cntlFrachtf_Clear._readOnly = False - Me.cntlFrachtf_Clear.Location = New System.Drawing.Point(600, 168) - Me.cntlFrachtf_Clear.Name = "cntlFrachtf_Clear" - Me.cntlFrachtf_Clear.Size = New System.Drawing.Size(21, 20) - Me.cntlFrachtf_Clear.TabIndex = 77 - Me.cntlFrachtf_Clear.TabStop = False - Me.cntlFrachtf_Clear.value = "" - ' - 'cntlFrachtf_Abf - ' - Me.cntlFrachtf_Abf._abrArt = "ABFKOST" - Me.cntlFrachtf_Abf._beteiligter = "FRACHTF" - Me.cntlFrachtf_Abf._readOnly = False - Me.cntlFrachtf_Abf.Location = New System.Drawing.Point(569, 168) - Me.cntlFrachtf_Abf.Name = "cntlFrachtf_Abf" - Me.cntlFrachtf_Abf.Size = New System.Drawing.Size(21, 20) - Me.cntlFrachtf_Abf.TabIndex = 76 - Me.cntlFrachtf_Abf.TabStop = False - Me.cntlFrachtf_Abf.value = "" - ' - 'cntlFrachtf_Eust - ' - Me.cntlFrachtf_Eust._abrArt = "EUST" - Me.cntlFrachtf_Eust._beteiligter = "FRACHTF" - Me.cntlFrachtf_Eust._readOnly = False - Me.cntlFrachtf_Eust.Location = New System.Drawing.Point(538, 168) - Me.cntlFrachtf_Eust.Name = "cntlFrachtf_Eust" - Me.cntlFrachtf_Eust.Size = New System.Drawing.Size(21, 20) - Me.cntlFrachtf_Eust.TabIndex = 75 - Me.cntlFrachtf_Eust.TabStop = False - Me.cntlFrachtf_Eust.value = "" - ' - 'cntlFrachtf_Zoll - ' - Me.cntlFrachtf_Zoll._abrArt = "ZOLL" - Me.cntlFrachtf_Zoll._beteiligter = "FRACHTF" - Me.cntlFrachtf_Zoll._readOnly = False - Me.cntlFrachtf_Zoll.Location = New System.Drawing.Point(507, 168) - Me.cntlFrachtf_Zoll.Name = "cntlFrachtf_Zoll" - Me.cntlFrachtf_Zoll.Size = New System.Drawing.Size(21, 20) - Me.cntlFrachtf_Zoll.TabIndex = 74 - Me.cntlFrachtf_Zoll.TabStop = False - Me.cntlFrachtf_Zoll.value = "" - ' - 'cntlAbsender_Clear - ' - Me.cntlAbsender_Clear._abrArt = "CLEARING" - Me.cntlAbsender_Clear._beteiligter = "ABS" - Me.cntlAbsender_Clear._readOnly = False - Me.cntlAbsender_Clear.Location = New System.Drawing.Point(600, 133) - Me.cntlAbsender_Clear.Name = "cntlAbsender_Clear" - Me.cntlAbsender_Clear.Size = New System.Drawing.Size(21, 20) - Me.cntlAbsender_Clear.TabIndex = 65 - Me.cntlAbsender_Clear.TabStop = False - Me.cntlAbsender_Clear.value = "" - ' - 'cntlAbsender_Abf - ' - Me.cntlAbsender_Abf._abrArt = "ABFKOST" - Me.cntlAbsender_Abf._beteiligter = "ABS" - Me.cntlAbsender_Abf._readOnly = False - Me.cntlAbsender_Abf.Location = New System.Drawing.Point(569, 133) - Me.cntlAbsender_Abf.Name = "cntlAbsender_Abf" - Me.cntlAbsender_Abf.Size = New System.Drawing.Size(21, 20) - Me.cntlAbsender_Abf.TabIndex = 64 - Me.cntlAbsender_Abf.TabStop = False - Me.cntlAbsender_Abf.value = "" - ' - 'cntlAbsender_Eust - ' - Me.cntlAbsender_Eust._abrArt = "EUST" - Me.cntlAbsender_Eust._beteiligter = "ABS" - Me.cntlAbsender_Eust._readOnly = False - Me.cntlAbsender_Eust.Location = New System.Drawing.Point(538, 133) - Me.cntlAbsender_Eust.Name = "cntlAbsender_Eust" - Me.cntlAbsender_Eust.Size = New System.Drawing.Size(21, 20) - Me.cntlAbsender_Eust.TabIndex = 63 - Me.cntlAbsender_Eust.TabStop = False - Me.cntlAbsender_Eust.value = "" - ' - 'cntlAbsender_Zoll - ' - Me.cntlAbsender_Zoll._abrArt = "ZOLL" - Me.cntlAbsender_Zoll._beteiligter = "ABS" - Me.cntlAbsender_Zoll._readOnly = False - Me.cntlAbsender_Zoll.Location = New System.Drawing.Point(507, 133) - Me.cntlAbsender_Zoll.Name = "cntlAbsender_Zoll" - Me.cntlAbsender_Zoll.Size = New System.Drawing.Size(21, 20) - Me.cntlAbsender_Zoll.TabIndex = 62 - Me.cntlAbsender_Zoll.TabStop = False - Me.cntlAbsender_Zoll.value = "" - ' - 'cntlEmpf_Clear - ' - Me.cntlEmpf_Clear._abrArt = "CLEARING" - Me.cntlEmpf_Clear._beteiligter = "EMPF" - Me.cntlEmpf_Clear._readOnly = False - Me.cntlEmpf_Clear.Location = New System.Drawing.Point(600, 94) - Me.cntlEmpf_Clear.Name = "cntlEmpf_Clear" - Me.cntlEmpf_Clear.Size = New System.Drawing.Size(21, 20) - Me.cntlEmpf_Clear.TabIndex = 50 - Me.cntlEmpf_Clear.TabStop = False - Me.cntlEmpf_Clear.value = "" - ' - 'cntlEmpf_Abf - ' - Me.cntlEmpf_Abf._abrArt = "ABFKOST" - Me.cntlEmpf_Abf._beteiligter = "EMPF" - Me.cntlEmpf_Abf._readOnly = False - Me.cntlEmpf_Abf.Location = New System.Drawing.Point(569, 94) - Me.cntlEmpf_Abf.Name = "cntlEmpf_Abf" - Me.cntlEmpf_Abf.Size = New System.Drawing.Size(21, 20) - Me.cntlEmpf_Abf.TabIndex = 49 - Me.cntlEmpf_Abf.TabStop = False - Me.cntlEmpf_Abf.value = "" - ' - 'cntlEmpf_Eust - ' - Me.cntlEmpf_Eust._abrArt = "EUST" - Me.cntlEmpf_Eust._beteiligter = "EMPF" - Me.cntlEmpf_Eust._readOnly = False - Me.cntlEmpf_Eust.Location = New System.Drawing.Point(538, 94) - Me.cntlEmpf_Eust.Name = "cntlEmpf_Eust" - Me.cntlEmpf_Eust.Size = New System.Drawing.Size(21, 20) - Me.cntlEmpf_Eust.TabIndex = 48 - Me.cntlEmpf_Eust.TabStop = False - Me.cntlEmpf_Eust.value = "" - ' - 'cntlEmpf_Zoll - ' - Me.cntlEmpf_Zoll._abrArt = "ZOLL" - Me.cntlEmpf_Zoll._beteiligter = "EMPF" - Me.cntlEmpf_Zoll._readOnly = False - Me.cntlEmpf_Zoll.Location = New System.Drawing.Point(507, 94) - Me.cntlEmpf_Zoll.Name = "cntlEmpf_Zoll" - Me.cntlEmpf_Zoll.Size = New System.Drawing.Size(21, 20) - Me.cntlEmpf_Zoll.TabIndex = 47 - Me.cntlEmpf_Zoll.TabStop = False - Me.cntlEmpf_Zoll.value = "" - ' - 'cntlAuftr_Clear - ' - Me.cntlAuftr_Clear._abrArt = "CLEARING" - Me.cntlAuftr_Clear._beteiligter = "AUFTR" - Me.cntlAuftr_Clear._readOnly = False - Me.cntlAuftr_Clear.Location = New System.Drawing.Point(600, 57) - Me.cntlAuftr_Clear.Name = "cntlAuftr_Clear" - Me.cntlAuftr_Clear.Size = New System.Drawing.Size(21, 20) - Me.cntlAuftr_Clear.TabIndex = 34 - Me.cntlAuftr_Clear.TabStop = False - Me.cntlAuftr_Clear.value = "" - ' - 'cntlAuftr_Abf - ' - Me.cntlAuftr_Abf._abrArt = "ABFKOST" - Me.cntlAuftr_Abf._beteiligter = "AUFTR" - Me.cntlAuftr_Abf._readOnly = False - Me.cntlAuftr_Abf.Location = New System.Drawing.Point(569, 57) - Me.cntlAuftr_Abf.Name = "cntlAuftr_Abf" - Me.cntlAuftr_Abf.Size = New System.Drawing.Size(21, 20) - Me.cntlAuftr_Abf.TabIndex = 33 - Me.cntlAuftr_Abf.TabStop = False - Me.cntlAuftr_Abf.value = "" - ' - 'cntlAuftr_Eust - ' - Me.cntlAuftr_Eust._abrArt = "EUST" - Me.cntlAuftr_Eust._beteiligter = "AUFTR" - Me.cntlAuftr_Eust._readOnly = False - Me.cntlAuftr_Eust.Location = New System.Drawing.Point(538, 57) - Me.cntlAuftr_Eust.Name = "cntlAuftr_Eust" - Me.cntlAuftr_Eust.Size = New System.Drawing.Size(21, 20) - Me.cntlAuftr_Eust.TabIndex = 32 - Me.cntlAuftr_Eust.TabStop = False - Me.cntlAuftr_Eust.value = "" - ' - 'cntlAuftr_Zoll - ' - Me.cntlAuftr_Zoll._abrArt = "ZOLL" - Me.cntlAuftr_Zoll._beteiligter = "AUFTR" - Me.cntlAuftr_Zoll._readOnly = False - Me.cntlAuftr_Zoll.Location = New System.Drawing.Point(507, 57) - Me.cntlAuftr_Zoll.Name = "cntlAuftr_Zoll" - Me.cntlAuftr_Zoll.Size = New System.Drawing.Size(21, 20) - Me.cntlAuftr_Zoll.TabIndex = 31 - Me.cntlAuftr_Zoll.TabStop = False - Me.cntlAuftr_Zoll.value = "" - ' - 'cntlAvisierer_Clear - ' - Me.cntlAvisierer_Clear._abrArt = "CLEARING" - Me.cntlAvisierer_Clear._beteiligter = "AVISIERER" - Me.cntlAvisierer_Clear._readOnly = False - Me.cntlAvisierer_Clear.Location = New System.Drawing.Point(600, 20) - Me.cntlAvisierer_Clear.Name = "cntlAvisierer_Clear" - Me.cntlAvisierer_Clear.Size = New System.Drawing.Size(21, 20) - Me.cntlAvisierer_Clear.TabIndex = 19 - Me.cntlAvisierer_Clear.TabStop = False - Me.cntlAvisierer_Clear.value = "" - ' - 'cntlAvisierer_Abf - ' - Me.cntlAvisierer_Abf._abrArt = "ABFKOST" - Me.cntlAvisierer_Abf._beteiligter = "AVISIERER" - Me.cntlAvisierer_Abf._readOnly = False - Me.cntlAvisierer_Abf.Location = New System.Drawing.Point(569, 20) - Me.cntlAvisierer_Abf.Name = "cntlAvisierer_Abf" - Me.cntlAvisierer_Abf.Size = New System.Drawing.Size(21, 20) - Me.cntlAvisierer_Abf.TabIndex = 18 - Me.cntlAvisierer_Abf.TabStop = False - Me.cntlAvisierer_Abf.value = "" - ' - 'cntlAvisierer_Eust - ' - Me.cntlAvisierer_Eust._abrArt = "EUST" - Me.cntlAvisierer_Eust._beteiligter = "AVISIERER" - Me.cntlAvisierer_Eust._readOnly = False - Me.cntlAvisierer_Eust.Location = New System.Drawing.Point(538, 20) - Me.cntlAvisierer_Eust.Name = "cntlAvisierer_Eust" - Me.cntlAvisierer_Eust.Size = New System.Drawing.Size(21, 20) - Me.cntlAvisierer_Eust.TabIndex = 17 - Me.cntlAvisierer_Eust.TabStop = False - Me.cntlAvisierer_Eust.value = "" - ' - 'cntlAvisierer_Zoll - ' - Me.cntlAvisierer_Zoll._abrArt = "ZOLL" - Me.cntlAvisierer_Zoll._beteiligter = "AVISIERER" - Me.cntlAvisierer_Zoll._readOnly = False - Me.cntlAvisierer_Zoll.Location = New System.Drawing.Point(507, 20) - Me.cntlAvisierer_Zoll.Name = "cntlAvisierer_Zoll" - Me.cntlAvisierer_Zoll.Size = New System.Drawing.Size(21, 20) - Me.cntlAvisierer_Zoll.TabIndex = 16 - Me.cntlAvisierer_Zoll.TabStop = False - Me.cntlAvisierer_Zoll.value = "" - ' 'Panel15 ' Me.Panel15.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) @@ -2403,14 +2140,6 @@ Partial Class frmSendungsdetailsNEU Me.pnlT1.Size = New System.Drawing.Size(549, 92) Me.pnlT1.TabIndex = 82 ' - 'UsrCntlSND_NCTSGestellungsadresse1 - ' - Me.UsrCntlSND_NCTSGestellungsadresse1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlSND_NCTSGestellungsadresse1.Location = New System.Drawing.Point(0, 0) - Me.UsrCntlSND_NCTSGestellungsadresse1.Name = "UsrCntlSND_NCTSGestellungsadresse1" - Me.UsrCntlSND_NCTSGestellungsadresse1.Size = New System.Drawing.Size(549, 92) - Me.UsrCntlSND_NCTSGestellungsadresse1.TabIndex = 0 - ' 'Label43 ' Me.Label43.AutoSize = True @@ -3253,7 +2982,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel2.Location = New System.Drawing.Point(0, 0) Me.Panel2.MaximumSize = New System.Drawing.Size(0, 510) Me.Panel2.Name = "Panel2" - Me.Panel2.Size = New System.Drawing.Size(1112, 55) + Me.Panel2.Size = New System.Drawing.Size(0, 55) Me.Panel2.TabIndex = 0 ' 'FlowLayoutPanel @@ -3265,7 +2994,7 @@ Partial Class frmSendungsdetailsNEU Me.FlowLayoutPanel.MaximumSize = New System.Drawing.Size(0, 550) Me.FlowLayoutPanel.MinimumSize = New System.Drawing.Size(0, 53) Me.FlowLayoutPanel.Name = "FlowLayoutPanel" - Me.FlowLayoutPanel.Size = New System.Drawing.Size(1112, 55) + Me.FlowLayoutPanel.Size = New System.Drawing.Size(0, 55) Me.FlowLayoutPanel.TabIndex = 0 ' 'FlatButton2 @@ -3304,18 +3033,38 @@ Partial Class frmSendungsdetailsNEU ' 'Panel7 ' + Me.Panel7.Controls.Add(Me.lblGrenze) + Me.Panel7.Controls.Add(Me.Label15) Me.Panel7.Controls.Add(Me.Button17) Me.Panel7.Controls.Add(Me.Panel3) Me.Panel7.Controls.Add(Me.Panel9) - Me.Panel7.Controls.Add(Me.cbxSpedBuch) Me.Panel7.Controls.Add(Me.btn) + Me.Panel7.Controls.Add(Me.cbxSpedBuch) Me.Panel7.Dock = System.Windows.Forms.DockStyle.Bottom - Me.Panel7.Location = New System.Drawing.Point(0, 808) + Me.Panel7.Location = New System.Drawing.Point(0, 799) Me.Panel7.MinimumSize = New System.Drawing.Size(0, 51) Me.Panel7.Name = "Panel7" - Me.Panel7.Size = New System.Drawing.Size(1112, 55) + Me.Panel7.Size = New System.Drawing.Size(1112, 64) Me.Panel7.TabIndex = 3 ' + 'lblGrenze + ' + Me.lblGrenze.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.lblGrenze.Location = New System.Drawing.Point(156, 15) + Me.lblGrenze.Name = "lblGrenze" + Me.lblGrenze.Size = New System.Drawing.Size(248, 44) + Me.lblGrenze.TabIndex = 85 + Me.lblGrenze.Text = "SUB" + ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.Location = New System.Drawing.Point(156, 0) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(44, 13) + Me.Label15.TabIndex = 4 + Me.Label15.Text = "Grenze:" + ' 'Button17 ' Me.Button17.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom @@ -3341,7 +3090,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel3.Dock = System.Windows.Forms.DockStyle.Right Me.Panel3.Location = New System.Drawing.Point(518, 0) Me.Panel3.Name = "Panel3" - Me.Panel3.Size = New System.Drawing.Size(278, 55) + Me.Panel3.Size = New System.Drawing.Size(278, 64) Me.Panel3.TabIndex = 2 ' 'btnDelQS @@ -3403,7 +3152,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel9.Dock = System.Windows.Forms.DockStyle.Right Me.Panel9.Location = New System.Drawing.Point(796, 0) Me.Panel9.Name = "Panel9" - Me.Panel9.Size = New System.Drawing.Size(316, 55) + Me.Panel9.Size = New System.Drawing.Size(316, 64) Me.Panel9.TabIndex = 3 ' 'Button10 @@ -3428,19 +3177,6 @@ Partial Class frmSendungsdetailsNEU Me.Button2.Text = "OK" Me.Button2.UseVisualStyleBackColor = True ' - 'cbxSpedBuch - ' - Me.cbxSpedBuch._value = "" - Me.cbxSpedBuch.AutoSize = True - Me.cbxSpedBuch.Checked_value = False - Me.cbxSpedBuch.CheckedValue = False - Me.cbxSpedBuch.Location = New System.Drawing.Point(158, 19) - Me.cbxSpedBuch.Name = "cbxSpedBuch" - Me.cbxSpedBuch.Size = New System.Drawing.Size(189, 17) - Me.cbxSpedBuch.TabIndex = 1 - Me.cbxSpedBuch.Text = "Speditionsbuch Eintrag vorhanden" - Me.cbxSpedBuch.UseVisualStyleBackColor = True - ' 'btn ' Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat @@ -3454,6 +3190,19 @@ Partial Class frmSendungsdetailsNEU Me.btn.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btn.UseVisualStyleBackColor = True ' + 'cbxSpedBuch + ' + Me.cbxSpedBuch._value = "" + Me.cbxSpedBuch.AutoSize = True + Me.cbxSpedBuch.Checked_value = False + Me.cbxSpedBuch.CheckedValue = False + Me.cbxSpedBuch.Location = New System.Drawing.Point(6, 46) + Me.cbxSpedBuch.Name = "cbxSpedBuch" + Me.cbxSpedBuch.Size = New System.Drawing.Size(113, 17) + Me.cbxSpedBuch.TabIndex = 1 + Me.cbxSpedBuch.Text = "Eintrag vorhanden" + Me.cbxSpedBuch.UseVisualStyleBackColor = True + ' 'ToolStripMenuItem3 ' Me.ToolStripMenuItem3.Image = Global.AVISO.My.Resources.Resources.plus @@ -3647,19 +3396,337 @@ Partial Class frmSendungsdetailsNEU Me.GelangensbestätigungToolStripMenuItem.Size = New System.Drawing.Size(202, 22) Me.GelangensbestätigungToolStripMenuItem.Text = "Gelangensbestätigung" ' - 'Button19 + 'cntxtAnh ' - Me.Button19.Enabled = False - Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button19.Image = CType(resources.GetObject("Button19.Image"), System.Drawing.Image) - Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button19.Location = New System.Drawing.Point(970, 5) - Me.Button19.Name = "Button19" - Me.Button19.Size = New System.Drawing.Size(129, 34) - Me.Button19.TabIndex = 2 - Me.Button19.Text = "Direkt anfügen ..." - Me.Button19.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button19.UseVisualStyleBackColor = True + Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem}) + Me.cntxtAnh.Name = "cntxtAnh" + Me.cntxtAnh.Size = New System.Drawing.Size(218, 70) + ' + 'MarkiertePDFsDruckenToolStripMenuItem + ' + Me.MarkiertePDFsDruckenToolStripMenuItem.Name = "MarkiertePDFsDruckenToolStripMenuItem" + Me.MarkiertePDFsDruckenToolStripMenuItem.Size = New System.Drawing.Size(217, 22) + Me.MarkiertePDFsDruckenToolStripMenuItem.Text = "Markierte PDFs drucken" + ' + 'EMailAnfügenToolStripMenuItem + ' + Me.EMailAnfügenToolStripMenuItem.Name = "EMailAnfügenToolStripMenuItem" + Me.EMailAnfügenToolStripMenuItem.Size = New System.Drawing.Size(217, 22) + Me.EMailAnfügenToolStripMenuItem.Text = "E-Mail anfügen" + ' + 'KopierenZwischenablageToolStripMenuItem + ' + Me.KopierenZwischenablageToolStripMenuItem.Name = "KopierenZwischenablageToolStripMenuItem" + Me.KopierenZwischenablageToolStripMenuItem.Size = New System.Drawing.Size(217, 22) + Me.KopierenZwischenablageToolStripMenuItem.Text = "Kopieren (Zwischenablage)" + ' + 'cntlFrachtfuehrer_Sonst + ' + Me.cntlFrachtfuehrer_Sonst._abrArt = "SONST" + Me.cntlFrachtfuehrer_Sonst._beteiligter = "FRACHTF" + Me.cntlFrachtfuehrer_Sonst._readOnly = True + Me.cntlFrachtfuehrer_Sonst.Location = New System.Drawing.Point(632, 168) + Me.cntlFrachtfuehrer_Sonst.Name = "cntlFrachtfuehrer_Sonst" + Me.cntlFrachtfuehrer_Sonst.Size = New System.Drawing.Size(21, 20) + Me.cntlFrachtfuehrer_Sonst.TabIndex = 78 + Me.cntlFrachtfuehrer_Sonst.TabStop = False + Me.cntlFrachtfuehrer_Sonst.value = "" + ' + 'cntlAbsender_Sonst + ' + Me.cntlAbsender_Sonst._abrArt = "SONST" + Me.cntlAbsender_Sonst._beteiligter = "ABS" + Me.cntlAbsender_Sonst._readOnly = True + Me.cntlAbsender_Sonst.Location = New System.Drawing.Point(632, 133) + Me.cntlAbsender_Sonst.Name = "cntlAbsender_Sonst" + Me.cntlAbsender_Sonst.Size = New System.Drawing.Size(21, 20) + Me.cntlAbsender_Sonst.TabIndex = 66 + Me.cntlAbsender_Sonst.TabStop = False + Me.cntlAbsender_Sonst.value = "" + ' + 'cntlEmpfaenger_Sonst + ' + Me.cntlEmpfaenger_Sonst._abrArt = "SONST" + Me.cntlEmpfaenger_Sonst._beteiligter = "EMPF" + Me.cntlEmpfaenger_Sonst._readOnly = True + Me.cntlEmpfaenger_Sonst.Location = New System.Drawing.Point(632, 94) + Me.cntlEmpfaenger_Sonst.Name = "cntlEmpfaenger_Sonst" + Me.cntlEmpfaenger_Sonst.Size = New System.Drawing.Size(21, 20) + Me.cntlEmpfaenger_Sonst.TabIndex = 51 + Me.cntlEmpfaenger_Sonst.TabStop = False + Me.cntlEmpfaenger_Sonst.value = "" + ' + 'cntlAuftraggeber_Sonst + ' + Me.cntlAuftraggeber_Sonst._abrArt = "SONST" + Me.cntlAuftraggeber_Sonst._beteiligter = "AUFTR" + Me.cntlAuftraggeber_Sonst._readOnly = True + Me.cntlAuftraggeber_Sonst.Location = New System.Drawing.Point(632, 57) + Me.cntlAuftraggeber_Sonst.Name = "cntlAuftraggeber_Sonst" + Me.cntlAuftraggeber_Sonst.Size = New System.Drawing.Size(21, 20) + Me.cntlAuftraggeber_Sonst.TabIndex = 35 + Me.cntlAuftraggeber_Sonst.TabStop = False + Me.cntlAuftraggeber_Sonst.value = "" + ' + 'cntlAvisierer_Sonst + ' + Me.cntlAvisierer_Sonst._abrArt = "SONST" + Me.cntlAvisierer_Sonst._beteiligter = "AVISIERER" + Me.cntlAvisierer_Sonst._readOnly = True + Me.cntlAvisierer_Sonst.Location = New System.Drawing.Point(632, 20) + Me.cntlAvisierer_Sonst.Name = "cntlAvisierer_Sonst" + Me.cntlAvisierer_Sonst.Size = New System.Drawing.Size(21, 20) + Me.cntlAvisierer_Sonst.TabIndex = 20 + Me.cntlAvisierer_Sonst.TabStop = False + Me.cntlAvisierer_Sonst.value = "" + ' + 'cntlFrachtf_Clear + ' + Me.cntlFrachtf_Clear._abrArt = "CLEARING" + Me.cntlFrachtf_Clear._beteiligter = "FRACHTF" + Me.cntlFrachtf_Clear._readOnly = False + Me.cntlFrachtf_Clear.Location = New System.Drawing.Point(600, 168) + Me.cntlFrachtf_Clear.Name = "cntlFrachtf_Clear" + Me.cntlFrachtf_Clear.Size = New System.Drawing.Size(21, 20) + Me.cntlFrachtf_Clear.TabIndex = 77 + Me.cntlFrachtf_Clear.TabStop = False + Me.cntlFrachtf_Clear.value = "" + ' + 'cntlFrachtf_Abf + ' + Me.cntlFrachtf_Abf._abrArt = "ABFKOST" + Me.cntlFrachtf_Abf._beteiligter = "FRACHTF" + Me.cntlFrachtf_Abf._readOnly = False + Me.cntlFrachtf_Abf.Location = New System.Drawing.Point(569, 168) + Me.cntlFrachtf_Abf.Name = "cntlFrachtf_Abf" + Me.cntlFrachtf_Abf.Size = New System.Drawing.Size(21, 20) + Me.cntlFrachtf_Abf.TabIndex = 76 + Me.cntlFrachtf_Abf.TabStop = False + Me.cntlFrachtf_Abf.value = "" + ' + 'cntlFrachtf_Eust + ' + Me.cntlFrachtf_Eust._abrArt = "EUST" + Me.cntlFrachtf_Eust._beteiligter = "FRACHTF" + Me.cntlFrachtf_Eust._readOnly = False + Me.cntlFrachtf_Eust.Location = New System.Drawing.Point(538, 168) + Me.cntlFrachtf_Eust.Name = "cntlFrachtf_Eust" + Me.cntlFrachtf_Eust.Size = New System.Drawing.Size(21, 20) + Me.cntlFrachtf_Eust.TabIndex = 75 + Me.cntlFrachtf_Eust.TabStop = False + Me.cntlFrachtf_Eust.value = "" + ' + 'cntlFrachtf_Zoll + ' + Me.cntlFrachtf_Zoll._abrArt = "ZOLL" + Me.cntlFrachtf_Zoll._beteiligter = "FRACHTF" + Me.cntlFrachtf_Zoll._readOnly = False + Me.cntlFrachtf_Zoll.Location = New System.Drawing.Point(507, 168) + Me.cntlFrachtf_Zoll.Name = "cntlFrachtf_Zoll" + Me.cntlFrachtf_Zoll.Size = New System.Drawing.Size(21, 20) + Me.cntlFrachtf_Zoll.TabIndex = 74 + Me.cntlFrachtf_Zoll.TabStop = False + Me.cntlFrachtf_Zoll.value = "" + ' + 'cntlAbsender_Clear + ' + Me.cntlAbsender_Clear._abrArt = "CLEARING" + Me.cntlAbsender_Clear._beteiligter = "ABS" + Me.cntlAbsender_Clear._readOnly = False + Me.cntlAbsender_Clear.Location = New System.Drawing.Point(600, 133) + Me.cntlAbsender_Clear.Name = "cntlAbsender_Clear" + Me.cntlAbsender_Clear.Size = New System.Drawing.Size(21, 20) + Me.cntlAbsender_Clear.TabIndex = 65 + Me.cntlAbsender_Clear.TabStop = False + Me.cntlAbsender_Clear.value = "" + ' + 'cntlAbsender_Abf + ' + Me.cntlAbsender_Abf._abrArt = "ABFKOST" + Me.cntlAbsender_Abf._beteiligter = "ABS" + Me.cntlAbsender_Abf._readOnly = False + Me.cntlAbsender_Abf.Location = New System.Drawing.Point(569, 133) + Me.cntlAbsender_Abf.Name = "cntlAbsender_Abf" + Me.cntlAbsender_Abf.Size = New System.Drawing.Size(21, 20) + Me.cntlAbsender_Abf.TabIndex = 64 + Me.cntlAbsender_Abf.TabStop = False + Me.cntlAbsender_Abf.value = "" + ' + 'cntlAbsender_Eust + ' + Me.cntlAbsender_Eust._abrArt = "EUST" + Me.cntlAbsender_Eust._beteiligter = "ABS" + Me.cntlAbsender_Eust._readOnly = False + Me.cntlAbsender_Eust.Location = New System.Drawing.Point(538, 133) + Me.cntlAbsender_Eust.Name = "cntlAbsender_Eust" + Me.cntlAbsender_Eust.Size = New System.Drawing.Size(21, 20) + Me.cntlAbsender_Eust.TabIndex = 63 + Me.cntlAbsender_Eust.TabStop = False + Me.cntlAbsender_Eust.value = "" + ' + 'cntlAbsender_Zoll + ' + Me.cntlAbsender_Zoll._abrArt = "ZOLL" + Me.cntlAbsender_Zoll._beteiligter = "ABS" + Me.cntlAbsender_Zoll._readOnly = False + Me.cntlAbsender_Zoll.Location = New System.Drawing.Point(507, 133) + Me.cntlAbsender_Zoll.Name = "cntlAbsender_Zoll" + Me.cntlAbsender_Zoll.Size = New System.Drawing.Size(21, 20) + Me.cntlAbsender_Zoll.TabIndex = 62 + Me.cntlAbsender_Zoll.TabStop = False + Me.cntlAbsender_Zoll.value = "" + ' + 'cntlEmpf_Clear + ' + Me.cntlEmpf_Clear._abrArt = "CLEARING" + Me.cntlEmpf_Clear._beteiligter = "EMPF" + Me.cntlEmpf_Clear._readOnly = False + Me.cntlEmpf_Clear.Location = New System.Drawing.Point(600, 94) + Me.cntlEmpf_Clear.Name = "cntlEmpf_Clear" + Me.cntlEmpf_Clear.Size = New System.Drawing.Size(21, 20) + Me.cntlEmpf_Clear.TabIndex = 50 + Me.cntlEmpf_Clear.TabStop = False + Me.cntlEmpf_Clear.value = "" + ' + 'cntlEmpf_Abf + ' + Me.cntlEmpf_Abf._abrArt = "ABFKOST" + Me.cntlEmpf_Abf._beteiligter = "EMPF" + Me.cntlEmpf_Abf._readOnly = False + Me.cntlEmpf_Abf.Location = New System.Drawing.Point(569, 94) + Me.cntlEmpf_Abf.Name = "cntlEmpf_Abf" + Me.cntlEmpf_Abf.Size = New System.Drawing.Size(21, 20) + Me.cntlEmpf_Abf.TabIndex = 49 + Me.cntlEmpf_Abf.TabStop = False + Me.cntlEmpf_Abf.value = "" + ' + 'cntlEmpf_Eust + ' + Me.cntlEmpf_Eust._abrArt = "EUST" + Me.cntlEmpf_Eust._beteiligter = "EMPF" + Me.cntlEmpf_Eust._readOnly = False + Me.cntlEmpf_Eust.Location = New System.Drawing.Point(538, 94) + Me.cntlEmpf_Eust.Name = "cntlEmpf_Eust" + Me.cntlEmpf_Eust.Size = New System.Drawing.Size(21, 20) + Me.cntlEmpf_Eust.TabIndex = 48 + Me.cntlEmpf_Eust.TabStop = False + Me.cntlEmpf_Eust.value = "" + ' + 'cntlEmpf_Zoll + ' + Me.cntlEmpf_Zoll._abrArt = "ZOLL" + Me.cntlEmpf_Zoll._beteiligter = "EMPF" + Me.cntlEmpf_Zoll._readOnly = False + Me.cntlEmpf_Zoll.Location = New System.Drawing.Point(507, 94) + Me.cntlEmpf_Zoll.Name = "cntlEmpf_Zoll" + Me.cntlEmpf_Zoll.Size = New System.Drawing.Size(21, 20) + Me.cntlEmpf_Zoll.TabIndex = 47 + Me.cntlEmpf_Zoll.TabStop = False + Me.cntlEmpf_Zoll.value = "" + ' + 'cntlAuftr_Clear + ' + Me.cntlAuftr_Clear._abrArt = "CLEARING" + Me.cntlAuftr_Clear._beteiligter = "AUFTR" + Me.cntlAuftr_Clear._readOnly = False + Me.cntlAuftr_Clear.Location = New System.Drawing.Point(600, 57) + Me.cntlAuftr_Clear.Name = "cntlAuftr_Clear" + Me.cntlAuftr_Clear.Size = New System.Drawing.Size(21, 20) + Me.cntlAuftr_Clear.TabIndex = 34 + Me.cntlAuftr_Clear.TabStop = False + Me.cntlAuftr_Clear.value = "" + ' + 'cntlAuftr_Abf + ' + Me.cntlAuftr_Abf._abrArt = "ABFKOST" + Me.cntlAuftr_Abf._beteiligter = "AUFTR" + Me.cntlAuftr_Abf._readOnly = False + Me.cntlAuftr_Abf.Location = New System.Drawing.Point(569, 57) + Me.cntlAuftr_Abf.Name = "cntlAuftr_Abf" + Me.cntlAuftr_Abf.Size = New System.Drawing.Size(21, 20) + Me.cntlAuftr_Abf.TabIndex = 33 + Me.cntlAuftr_Abf.TabStop = False + Me.cntlAuftr_Abf.value = "" + ' + 'cntlAuftr_Eust + ' + Me.cntlAuftr_Eust._abrArt = "EUST" + Me.cntlAuftr_Eust._beteiligter = "AUFTR" + Me.cntlAuftr_Eust._readOnly = False + Me.cntlAuftr_Eust.Location = New System.Drawing.Point(538, 57) + Me.cntlAuftr_Eust.Name = "cntlAuftr_Eust" + Me.cntlAuftr_Eust.Size = New System.Drawing.Size(21, 20) + Me.cntlAuftr_Eust.TabIndex = 32 + Me.cntlAuftr_Eust.TabStop = False + Me.cntlAuftr_Eust.value = "" + ' + 'cntlAuftr_Zoll + ' + Me.cntlAuftr_Zoll._abrArt = "ZOLL" + Me.cntlAuftr_Zoll._beteiligter = "AUFTR" + Me.cntlAuftr_Zoll._readOnly = False + Me.cntlAuftr_Zoll.Location = New System.Drawing.Point(507, 57) + Me.cntlAuftr_Zoll.Name = "cntlAuftr_Zoll" + Me.cntlAuftr_Zoll.Size = New System.Drawing.Size(21, 20) + Me.cntlAuftr_Zoll.TabIndex = 31 + Me.cntlAuftr_Zoll.TabStop = False + Me.cntlAuftr_Zoll.value = "" + ' + 'cntlAvisierer_Clear + ' + Me.cntlAvisierer_Clear._abrArt = "CLEARING" + Me.cntlAvisierer_Clear._beteiligter = "AVISIERER" + Me.cntlAvisierer_Clear._readOnly = False + Me.cntlAvisierer_Clear.Location = New System.Drawing.Point(600, 20) + Me.cntlAvisierer_Clear.Name = "cntlAvisierer_Clear" + Me.cntlAvisierer_Clear.Size = New System.Drawing.Size(21, 20) + Me.cntlAvisierer_Clear.TabIndex = 19 + Me.cntlAvisierer_Clear.TabStop = False + Me.cntlAvisierer_Clear.value = "" + ' + 'cntlAvisierer_Abf + ' + Me.cntlAvisierer_Abf._abrArt = "ABFKOST" + Me.cntlAvisierer_Abf._beteiligter = "AVISIERER" + Me.cntlAvisierer_Abf._readOnly = False + Me.cntlAvisierer_Abf.Location = New System.Drawing.Point(569, 20) + Me.cntlAvisierer_Abf.Name = "cntlAvisierer_Abf" + Me.cntlAvisierer_Abf.Size = New System.Drawing.Size(21, 20) + Me.cntlAvisierer_Abf.TabIndex = 18 + Me.cntlAvisierer_Abf.TabStop = False + Me.cntlAvisierer_Abf.value = "" + ' + 'cntlAvisierer_Eust + ' + Me.cntlAvisierer_Eust._abrArt = "EUST" + Me.cntlAvisierer_Eust._beteiligter = "AVISIERER" + Me.cntlAvisierer_Eust._readOnly = False + Me.cntlAvisierer_Eust.Location = New System.Drawing.Point(538, 20) + Me.cntlAvisierer_Eust.Name = "cntlAvisierer_Eust" + Me.cntlAvisierer_Eust.Size = New System.Drawing.Size(21, 20) + Me.cntlAvisierer_Eust.TabIndex = 17 + Me.cntlAvisierer_Eust.TabStop = False + Me.cntlAvisierer_Eust.value = "" + ' + 'cntlAvisierer_Zoll + ' + Me.cntlAvisierer_Zoll._abrArt = "ZOLL" + Me.cntlAvisierer_Zoll._beteiligter = "AVISIERER" + Me.cntlAvisierer_Zoll._readOnly = False + Me.cntlAvisierer_Zoll.Location = New System.Drawing.Point(507, 20) + Me.cntlAvisierer_Zoll.Name = "cntlAvisierer_Zoll" + Me.cntlAvisierer_Zoll.Size = New System.Drawing.Size(21, 20) + Me.cntlAvisierer_Zoll.TabIndex = 16 + Me.cntlAvisierer_Zoll.TabStop = False + Me.cntlAvisierer_Zoll.value = "" + ' + 'UsrCntlSND_NCTSGestellungsadresse1 + ' + Me.UsrCntlSND_NCTSGestellungsadresse1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlSND_NCTSGestellungsadresse1.Location = New System.Drawing.Point(0, 0) + Me.UsrCntlSND_NCTSGestellungsadresse1.Name = "UsrCntlSND_NCTSGestellungsadresse1" + Me.UsrCntlSND_NCTSGestellungsadresse1.Size = New System.Drawing.Size(549, 92) + Me.UsrCntlSND_NCTSGestellungsadresse1.TabIndex = 0 ' 'frmSendungsdetailsNEU ' @@ -3733,6 +3800,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel9.ResumeLayout(False) Me.cntxtVorauskasse.ResumeLayout(False) Me.cntxtOptions.ResumeLayout(False) + Me.cntxtAnh.ResumeLayout(False) Me.ResumeLayout(False) End Sub @@ -3985,4 +4053,11 @@ Partial Class frmSendungsdetailsNEU Friend WithEvents Label52 As Label Friend WithEvents Button18 As Button Friend WithEvents Button19 As Button + Friend WithEvents Button20 As Button + Friend WithEvents cntxtAnh As ContextMenuStrip + Friend WithEvents MarkiertePDFsDruckenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents EMailAnfügenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents KopierenZwischenablageToolStripMenuItem As ToolStripMenuItem + Friend WithEvents lblGrenze As Label + Friend WithEvents Label15 As Label End Class diff --git a/Aviso/frmSendungsdetailsNEU.resx b/Aviso/frmSendungsdetailsNEU.resx index fb0e7be..f1e67c8 100644 --- a/Aviso/frmSendungsdetailsNEU.resx +++ b/Aviso/frmSendungsdetailsNEU.resx @@ -118,6 +118,28 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V + kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw + fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx + mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== + + + + 296, 17 + + + 496, 17 + + + + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V + kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw + fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx + mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== + + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V @@ -134,20 +156,6 @@ mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== - - 296, 17 - - - - iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V - kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw - fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx - mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== - - - - 296, 17 - iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAABGdBTUEAALGPC/xhBQAACQpJREFUaEPl @@ -470,9 +478,6 @@ 174, 17 - - 404, 17 - AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb index f10dfca..4271c36 100644 --- a/Aviso/frmSendungsdetailsNEU.vb +++ b/Aviso/frmSendungsdetailsNEU.vb @@ -5,6 +5,7 @@ Imports System.Drawing.Printing Imports System.Management Imports System.Data.SqlClient Imports iTextSharp.text.pdf +Imports Microsoft.Office.Interop Public Class frmSendungsdetailsNEU Public AvisoId As Integer @@ -90,13 +91,13 @@ Public Class frmSendungsdetailsNEU Next SENDUNG_LIST(CURRENT_INDEX).SAVE_Abrechnung() End Sub - + Function SAVE_ME() As Boolean If AVISO.Abgeschlossen Then 'MsgBox("Keine Änderung möglich - Akt bereits abgeschlossen.") Return True End If - + SAVE_ME = True For Each s In SENDUNG_LIST If s.SAVE() = False Then SAVE_ME = False @@ -202,7 +203,19 @@ Public Class frmSendungsdetailsNEU Private Sub frmSendungsdetails_Load(sender As Object, e As EventArgs) Handles Me.Load + Panel5.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + Panel15.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + pnlFremd.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + cbxFremdspedition.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + AVISO = AvisoDAL.LesenAviso(AvisoId, "") + + If AVISO.Grenzstelle.Replace("???", "") = "" Then + lblGrenze.Text = SQL.getValueTxtBySql("SELECT basncd_dstnr +' - ' + [basncd_name] FROM basncd WHERE basncd_dstnr='" & If(AVISO.Zollstelle, "") & "' ", "ATLAS") + Else + lblGrenze.Text = AVISO.Grenzstelle + End If + If AVISO.Abgeschlossen Then Label8.Visible = True End If @@ -489,16 +502,16 @@ Public Class frmSendungsdetailsNEU Try pic.Visible = False - ToolTip.SetToolTip(pic, "") - Dim InfoText = "" - If kdSearch.KdData_ADRESSEN IsNot Nothing Then - If kdSearch.KdData_ADRESSEN.Auswahl = "I" Then - InfoText &= "KUNDE INAKTIV!" & vbNewLine & vbNewLine + ToolTip.SetToolTip(pic, "") + Dim InfoText = "" + If kdSearch.KdData_ADRESSEN IsNot Nothing Then + If kdSearch.KdData_ADRESSEN.Auswahl = "I" Then + InfoText &= "KUNDE INAKTIV!" & vbNewLine & vbNewLine + End If End If - End If - If kdSearch.KdData_KUNDE IsNot Nothing Then - If kdSearch.KdData_KUNDE.Abfertigungsverbot Then + If kdSearch.KdData_KUNDE IsNot Nothing Then + If kdSearch.KdData_KUNDE.Abfertigungsverbot Then pic.Visible = True Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Case "VERAG" : InfoText &= "ACHTUNG!" & vbNewLine @@ -520,7 +533,7 @@ Public Class frmSendungsdetailsNEU End If - ToolTip.SetToolTip(pic, InfoText.Trim) + ToolTip.SetToolTip(pic, InfoText.Trim) Catch ex As Exception MsgBox(ex.Message & ex.StackTrace) @@ -573,10 +586,10 @@ Public Class frmSendungsdetailsNEU ' If Not da.RowState = DataRowState.Deleted Then Dim pos As Integer = CURRENT_INDEX 'SENDUNG_LIST.IndexOf(SENDUNG_LIST(b.value)) ')bsSendungen.Position - b.pnl.BackColor = IIf(b.value = pos, Color.FromArgb(0, 54, 128), Color.LightGray) - b.lblAbfBez.ForeColor = IIf(b.value = pos, Color.White, Color.Black) - b.lblAuftr.ForeColor = IIf(b.value = pos, Color.White, Color.Black) - b.lblNr.ForeColor = IIf(b.value = pos, Color.White, Color.Black) + b.pnl.BackColor = IIf(b.value = pos, VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor, Color.LightGray) + b.lblAbfBez.ForeColor = IIf(b.value = pos, VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor, Color.Black) + b.lblAuftr.ForeColor = IIf(b.value = pos, VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor, Color.Black) + b.lblNr.ForeColor = IIf(b.value = pos, VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor, Color.Black) ' Dim r As DataRow = AVISO_newDataSet.tblSendungen.Rows(b.value) ' MsgBox(da("tblSnd_PosUnterNr") & ". ") @@ -2417,9 +2430,19 @@ Public Class frmSendungsdetailsNEU End Sub Sub initAnhang() - Dim hSQL As String = " SELECT [anh_id],[anh_Name],[anh_docId],[anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] - WHERE [anh_SendungsId]='" & SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID & "' - order by [anh_Reihenfolge],[anh_id]" + Dim hSQL As String = " SELECT [anh_id],[anh_Name],[anh_docId],CASE WHEN anh_SendungsId is null THEN '***' ELSE [anh_Art] END as [anh_Art],[anh_Typ] ,anh_SendungsId FROM [tblAvisoAnhaenge] + WHERE anh_AvisoId=" & AvisoId & " AND (anh_SendungsId is null OR anh_SendungsId=" & SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID & ") + ORDER BY anh_SendungsId desc, + case + when [anh_Art] ='ATR' then 0 + when [anh_Art] ='Rechnung' then 1 + when [anh_Art] ='CMR' then 2 + when [anh_Art] ='Ausfuhr' then 3 + when [anh_Art] ='Packliste' then 4 + when [anh_Art] ='Auftrag' then 5 + when [anh_Art] ='Sonstiges' then 6 + when [anh_Art] ='' then 7 + END, [anh_Reihenfolge],[anh_id]" dgvAnhang.DataSource = SQL.loadDgvBySql(hSQL, "AVISO") @@ -2428,8 +2451,8 @@ Public Class frmSendungsdetailsNEU If dgvAnhang.RowCount = 0 Then dgvAnhang.Columns.Clear() : Exit Sub With dgvAnhang - - .RowTemplate.MinimumHeight = 40 + .RowTemplate.Height = 30 + '.RowTemplate.MinimumHeight = 30 .AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells .Columns("anh_id").Visible = False 'VermerkID nicht anzeigen .Columns("anh_docId").Visible = False 'AvisoID nicht anzeigen @@ -2447,6 +2470,7 @@ Public Class frmSendungsdetailsNEU .Columns("anh_Art").DefaultCellStyle.Alignment = DataGridViewContentAlignment.TopCenter End With + End Sub Private Sub btnAutomatischeNacherfassung_Click(sender As Object, e As EventArgs) Handles btnAutomatischeNacherfassung.Click ' ZollSystem: 0=ATLAS 1= EZOLL @@ -3004,7 +3028,7 @@ Public Class frmSendungsdetailsNEU Dim frMZA As New SDL.frmZollanmeldung("EZA", Nothing, AVISO, SENDUNG_LIST(CURRENT_INDEX), Now.ToString("yy")) ' Dim u As New SDL.usrCntlATLAS_EZA(DAKOSY_Worker.cDakosy_ZollanmeldungenArten.EZA, AvisoId, SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID, Now.ToString("yy"), "") ' u.Dock = DockStyle.Fill - frMZA.ShowDialog(Me) + frMZA.Show(Me) initdgvZollAnmeldungen() 'tbZollabfertigung.Controls.Clear() ' tbZollabfertigung.Controls.Add(u) @@ -3014,7 +3038,7 @@ Public Class frmSendungsdetailsNEU Me.loadDataInLIST() : SAVE_ME() If Not IsNumeric(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) OrElse CInt(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) < 100000 Then MsgBox("Abfertigungsnummer angeben!") : Exit Sub Dim frMZA As New SDL.frmZollanmeldung("T1", Nothing, AVISO, SENDUNG_LIST(CURRENT_INDEX), Now.ToString("yy")) - frMZA.ShowDialog(Me) + frMZA.Show(Me) initdgvZollAnmeldungen() End Sub @@ -3022,7 +3046,7 @@ Public Class frmSendungsdetailsNEU Me.loadDataInLIST() : SAVE_ME() If Not IsNumeric(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) OrElse CInt(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) < 100000 Then MsgBox("Abfertigungsnummer angeben!") : Exit Sub Dim frMZA As New SDL.frmZollanmeldung("T2", Nothing, AVISO, SENDUNG_LIST(CURRENT_INDEX), Now.ToString("yy")) - frMZA.ShowDialog(Me) + frMZA.Show(Me) initdgvZollAnmeldungen() End Sub @@ -3030,7 +3054,7 @@ Public Class frmSendungsdetailsNEU Me.loadDataInLIST() : SAVE_ME() If Not IsNumeric(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) OrElse CInt(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) < 100000 Then MsgBox("Abfertigungsnummer angeben!") : Exit Sub Dim frMZA As New SDL.frmZollanmeldung("AES", Nothing, AVISO, SENDUNG_LIST(CURRENT_INDEX), Now.ToString("yy")) - frMZA.ShowDialog(Me) + frMZA.Show(Me) initdgvZollAnmeldungen() End Sub @@ -3045,7 +3069,7 @@ Public Class frmSendungsdetailsNEU Me.loadDataInLIST() : SAVE_ME() If Not IsNumeric(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) OrElse CInt(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) < 100000 Then MsgBox("Abfertigungsnummer angeben!") : Exit Sub Dim frMZA As New SDL.frmZollanmeldung("ÜT", Nothing, AVISO, SENDUNG_LIST(CURRENT_INDEX), Now.ToString("yy")) - frMZA.ShowDialog(Me) + frMZA.Show(Me) initdgvZollAnmeldungen() End Sub @@ -3128,7 +3152,93 @@ Public Class frmSendungsdetailsNEU End Sub Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click - Dim f As New frmSendungAnhangImport(AvisoId) - f.Show(Me) + loadDataInLIST() + SAVE_ME() + + Dim f As New frmSendungAnhangImport(AvisoId, SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID) + f.ShowDialog(Me) + VERAG_PROG_ALLGEMEIN.cSendungen.LOAD_LIST(SENDUNG_LIST, CURRENT_INDEX, AvisoId, False) 'LÄDT alle SENDUNGSDATEN + initDataBinding() + + 'frmSendungsdetails_Load(Me, New EventArgs) End Sub + + Private Sub MarkiertePDFsDruckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MarkiertePDFsDruckenToolStripMenuItem.Click + For Each r As DataGridViewRow In dgvAnhang.SelectedRows + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("anh_docId").Value)}) + Next + End Sub + + Private Sub Button20_Click(sender As Object, e As EventArgs) Handles Button20.Click + cntxtAnh.Show(Cursor.Position) + End Sub + + Private Sub KopierenZwischenablageToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KopierenZwischenablageToolStripMenuItem.Click + If dgvAnhang.SelectedRows.Count >= 1 Then + Dim f As New List(Of String) + 'For Each SI In MyListBox1.SelectedItems + ' Dim item As MyListItem = DirectCast(SI, MyListItem) 'DirectCast(MyListBox1.SelectedItems(0), MyListItem) + ' For Each ii In ds.DATA_LIST.LIST + ' If ii.coll_id = item.Value Then + ' 'Dim f() As String = {ii.coll_pfad} + ' If ii.coll_pfad <> "" Then + ' f(cnt) = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.copyToTmp_KeepFilename(ii.coll_pfad, ii.coll_bezeichnung) + ' cnt += 1 + ' 'Exit For + ' End If + ' End If + ' Next + 'Next + For Each r As DataGridViewRow In dgvAnhang.SelectedRows + f.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("anh_docId").Value)) + Next + + 'Zwischenablage + Clipboard.Clear() + Dim d As New DataObject(DataFormats.FileDrop, f.ToArray) + Clipboard.SetDataObject(d, True) + Exit Sub + End If + End Sub + + Private Sub EMailAnfügenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EMailAnfügenToolStripMenuItem.Click + Try + VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.clearTMPPath("ClipBoard_TMP") + If dgvAnhang.SelectedRows.Count >= 1 Then + Try + Dim outl As New Outlook.Application + Dim Mail As Microsoft.Office.Interop.Outlook.MailItem + Mail = outl.CreateItem(0) + + 'For Each SI In MyListBox1.SelectedItems + ' Dim item As MyListItem = DirectCast(SI, MyListItem) 'DirectCast(MyListBox1.SelectedItems(0), MyListItem) + ' For Each ii In ds.DATA_LIST.LIST + ' If ii.coll_id = item.Value Then + ' If ii.coll_pfad <> "" Then + ' Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.copyToTmp_KeepFilename(ii.coll_pfad, ii.coll_bezeichnung), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + ' End If + ' End If + ' Next + 'Next + + For Each r As DataGridViewRow In dgvAnhang.SelectedRows + Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("anh_docId").Value), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + Next + Mail.Subject = "Kennzeichen: " & AVISO.LKW_Nr + Mail.Display() + Catch ex As Exception + MsgBox("Fehler beim Öffnen der Mail!") + End Try + End If + Catch ex As Exception + MsgBox("Fehler beim Öffnen der Mail!") + End Try + End Sub + + + 'Private Sub dgvAnhang_MouseClick(sender As Object, e As MouseEventArgs) Handles dgvAnhang.MouseClick + ' If e.Button = MouseButtons.Right Then + ' e. + ' End If + 'End Sub End Class diff --git a/Aviso/packages.config b/Aviso/packages.config index bfd01ab..2d4b9b9 100644 --- a/Aviso/packages.config +++ b/Aviso/packages.config @@ -7,6 +7,7 @@ + diff --git a/Aviso/usrcntlAktDetails.Designer.vb b/Aviso/usrcntlAktDetails.Designer.vb index aed8e84..43a8dba 100644 --- a/Aviso/usrcntlAktDetails.Designer.vb +++ b/Aviso/usrcntlAktDetails.Designer.vb @@ -23,17 +23,17 @@ Partial Class usrcntlAktDetails _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() - Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle14 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAktDetails)) - Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.pnlDetailsRechts = New System.Windows.Forms.Panel() Me.Panel3 = New System.Windows.Forms.Panel() Me.SplitContainer = New System.Windows.Forms.SplitContainer() @@ -62,10 +62,10 @@ Partial Class usrcntlAktDetails Me.btn = New System.Windows.Forms.Button() Me.dgvSendungen = New System.Windows.Forms.DataGridView() Me.Panel7 = New System.Windows.Forms.Panel() + Me.Button18 = New System.Windows.Forms.Button() Me.Panel4 = New System.Windows.Forms.Panel() Me.btnKasse_User = New System.Windows.Forms.Button() Me.btnKasse_LG = New System.Windows.Forms.Button() - Me.Button9 = New System.Windows.Forms.Button() Me.gridVermerke = New System.Windows.Forms.DataGridView() Me.pnlVermerkeTop = New System.Windows.Forms.Panel() Me.Panel1 = New System.Windows.Forms.Panel() @@ -77,6 +77,7 @@ Partial Class usrcntlAktDetails Me.TabPage1 = New System.Windows.Forms.TabPage() Me.TabPage2 = New System.Windows.Forms.TabPage() Me.TabPage3 = New System.Windows.Forms.TabPage() + Me.tbAnhang = New System.Windows.Forms.TabPage() Me.addVermerk = New System.Windows.Forms.Button() Me.Panel8 = New System.Windows.Forms.Panel() Me.Button7 = New System.Windows.Forms.Button() @@ -131,7 +132,7 @@ Partial Class usrcntlAktDetails Me.btnLöschen = New System.Windows.Forms.Button() Me.btnÄndern = New System.Windows.Forms.Button() Me.btnTV = New System.Windows.Forms.Button() - Me.tbAnhang = New System.Windows.Forms.TabPage() + Me.Button9 = New System.Windows.Forms.Button() Me.pnlDetailsRechts.SuspendLayout() Me.Panel3.SuspendLayout() CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit() @@ -207,6 +208,7 @@ Partial Class usrcntlAktDetails ' 'SplitContainer.Panel2 ' + Me.SplitContainer.Panel2.Controls.Add(Me.Button18) Me.SplitContainer.Panel2.Controls.Add(Me.Panel4) Me.SplitContainer.Panel2.Controls.Add(Me.gridVermerke) Me.SplitContainer.Panel2.Controls.Add(Me.pnlVermerkeTop) @@ -542,44 +544,44 @@ Partial Class usrcntlAktDetails Me.dgvSendungen.AllowUserToAddRows = False Me.dgvSendungen.AllowUserToDeleteRows = False Me.dgvSendungen.AllowUserToResizeRows = False - DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 + DataGridViewCellStyle11.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle11 Me.dgvSendungen.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2 + DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle12.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle12.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle12.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle12.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle12.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle12.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle12 Me.dgvSendungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing - DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle3 + DataGridViewCellStyle13.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle13.BackColor = System.Drawing.SystemColors.Window + DataGridViewCellStyle13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle13.ForeColor = System.Drawing.SystemColors.ControlText + DataGridViewCellStyle13.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle13.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle13.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle13 Me.dgvSendungen.Dock = System.Windows.Forms.DockStyle.Fill Me.dgvSendungen.Location = New System.Drawing.Point(0, 0) Me.dgvSendungen.MultiSelect = False Me.dgvSendungen.Name = "dgvSendungen" Me.dgvSendungen.ReadOnly = True - DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle4 + DataGridViewCellStyle14.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle14.BackColor = System.Drawing.SystemColors.Control + DataGridViewCellStyle14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle14.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle14.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle14.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle14.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle14 Me.dgvSendungen.RowHeadersVisible = False Me.dgvSendungen.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle5 + DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle15 Me.dgvSendungen.RowTemplate.Height = 20 Me.dgvSendungen.RowTemplate.ReadOnly = True Me.dgvSendungen.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] @@ -601,17 +603,32 @@ Partial Class usrcntlAktDetails Me.Panel7.Size = New System.Drawing.Size(0, 30) Me.Panel7.TabIndex = 15 ' + 'Button18 + ' + Me.Button18.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button18.Image = CType(resources.GetObject("Button18.Image"), System.Drawing.Image) + Me.Button18.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button18.Location = New System.Drawing.Point(446, 153) + Me.Button18.Name = "Button18" + Me.Button18.Size = New System.Drawing.Size(129, 34) + Me.Button18.TabIndex = 103 + Me.Button18.Text = "Import-Assistent ..." + Me.Button18.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button18.UseVisualStyleBackColor = True + Me.Button18.Visible = False + ' 'Panel4 ' Me.Panel4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Panel4.BackColor = System.Drawing.Color.Black Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel4.Controls.Add(Me.Button9) Me.Panel4.Controls.Add(Me.btnKasse_User) Me.Panel4.Controls.Add(Me.btnKasse_LG) - Me.Panel4.Controls.Add(Me.Button9) Me.Panel4.Location = New System.Drawing.Point(376, 26) Me.Panel4.Name = "Panel4" - Me.Panel4.Size = New System.Drawing.Size(93, 66) + Me.Panel4.Size = New System.Drawing.Size(93, 105) Me.Panel4.TabIndex = 102 Me.Panel4.Visible = False ' @@ -626,7 +643,7 @@ Partial Class usrcntlAktDetails Me.btnKasse_User.Name = "btnKasse_User" Me.btnKasse_User.Size = New System.Drawing.Size(88, 36) Me.btnKasse_User.TabIndex = 4 - Me.btnKasse_User.Text = "alle Sendugnen" + Me.btnKasse_User.Text = "alle Sendg. PDF" Me.btnKasse_User.UseVisualStyleBackColor = False ' 'btnKasse_LG @@ -644,65 +661,49 @@ Partial Class usrcntlAktDetails Me.btnKasse_LG.Text = "Standard" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(nur T1/T2)" Me.btnKasse_LG.UseVisualStyleBackColor = False ' - 'Button9 - ' - Me.Button9.BackColor = System.Drawing.Color.White - Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button9.ForeColor = System.Drawing.Color.Black - Me.Button9.Image = CType(resources.GetObject("Button9.Image"), System.Drawing.Image) - Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button9.Location = New System.Drawing.Point(3, 65) - Me.Button9.Name = "Button9" - Me.Button9.Size = New System.Drawing.Size(108, 28) - Me.Button9.TabIndex = 100 - Me.Button9.TabStop = False - Me.Button9.Text = "TV-Hinweis" - Me.Button9.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button9.UseVisualStyleBackColor = False - ' 'gridVermerke ' Me.gridVermerke.AllowUserToAddRows = False Me.gridVermerke.AllowUserToDeleteRows = False Me.gridVermerke.AllowUserToResizeRows = False - DataGridViewCellStyle6.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6 + DataGridViewCellStyle16.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle16 Me.gridVermerke.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle7.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle7.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7 + DataGridViewCellStyle17.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle17.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle17.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle17.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle17.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle17.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle17 Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing - DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle8 + DataGridViewCellStyle18.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle18.BackColor = System.Drawing.SystemColors.Window + DataGridViewCellStyle18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle18.ForeColor = System.Drawing.SystemColors.ControlText + DataGridViewCellStyle18.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle18.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle18 Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill Me.gridVermerke.Location = New System.Drawing.Point(0, 30) Me.gridVermerke.MultiSelect = False Me.gridVermerke.Name = "gridVermerke" Me.gridVermerke.ReadOnly = True - DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle9 + DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle19.BackColor = System.Drawing.SystemColors.Control + DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle19.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle19.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle19 Me.gridVermerke.RowHeadersVisible = False Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle10 + DataGridViewCellStyle20.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle20 Me.gridVermerke.RowTemplate.Height = 20 Me.gridVermerke.RowTemplate.ReadOnly = True Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] @@ -837,6 +838,16 @@ Partial Class usrcntlAktDetails Me.TabPage3.Text = "Sendungsvermerke" Me.TabPage3.UseVisualStyleBackColor = True ' + 'tbAnhang + ' + Me.tbAnhang.Location = New System.Drawing.Point(4, 30) + Me.tbAnhang.Name = "tbAnhang" + Me.tbAnhang.Padding = New System.Windows.Forms.Padding(3) + Me.tbAnhang.Size = New System.Drawing.Size(563, 0) + Me.tbAnhang.TabIndex = 3 + Me.tbAnhang.Text = "Anhang" + Me.tbAnhang.UseVisualStyleBackColor = True + ' 'addVermerk ' Me.addVermerk.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) @@ -1560,15 +1571,19 @@ Partial Class usrcntlAktDetails Me.btnTV.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnTV.UseVisualStyleBackColor = False ' - 'tbAnhang + 'Button9 ' - Me.tbAnhang.Location = New System.Drawing.Point(4, 30) - Me.tbAnhang.Name = "tbAnhang" - Me.tbAnhang.Padding = New System.Windows.Forms.Padding(3) - Me.tbAnhang.Size = New System.Drawing.Size(563, 0) - Me.tbAnhang.TabIndex = 3 - Me.tbAnhang.Text = "Anhang" - Me.tbAnhang.UseVisualStyleBackColor = True + Me.Button9.BackColor = System.Drawing.Color.White + Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button9.ForeColor = System.Drawing.Color.Black + Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button9.Location = New System.Drawing.Point(2, 66) + Me.Button9.Margin = New System.Windows.Forms.Padding(0) + Me.Button9.Name = "Button9" + Me.Button9.Size = New System.Drawing.Size(88, 36) + Me.Button9.TabIndex = 5 + Me.Button9.Text = "alle Sendg. Mail" + Me.Button9.UseVisualStyleBackColor = False ' 'usrcntlAktDetails ' @@ -1720,6 +1735,7 @@ Partial Class usrcntlAktDetails Friend WithEvents Panel4 As Panel Friend WithEvents btnKasse_User As Button Friend WithEvents btnKasse_LG As Button - Friend WithEvents Button9 As Button Friend WithEvents tbAnhang As TabPage + Friend WithEvents Button18 As Button + Friend WithEvents Button9 As Button End Class diff --git a/Aviso/usrcntlAktDetails.resx b/Aviso/usrcntlAktDetails.resx index 326b221..e0c388c 100644 --- a/Aviso/usrcntlAktDetails.resx +++ b/Aviso/usrcntlAktDetails.resx @@ -118,20 +118,12 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - + - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAAkRJREFUOE9joClQ3/CaV37+fQ4olzSgvfqhm+bqh6+A+IbKymeiIDGNlY8CNVc9 - OqK9/IksWBEuoLv+kW76oZf/9NY++q+5GohXPTptvO5xhemGR380Vj96h9UAkFOBkhM0Vz3cr7Hq4bbo - /S/+L7vz6b8W0AB9oEGbHnz5H7//5U/t1Y+DtFa95IFqgwCLzY+kTTc8vqS95tF/baAGkCaQzVlHXv1v - v/Du/0aQ5gMvIa6B4O+aq+8bQrUzMBivf5z+5Mvv/9///Pv/5vuf/3c//vp/+tWP/7uefP2/8u7n/9Ov - fQQbVHbyzX+3bU/BFmitfhgK1c7AYL7hcerzr7//9116D5a03Pjkv9f2Z/9j97/8n3/s9f/6M2//T77y - 4f+nX3//rwIaCHKF2uqH/lDtDAzOm5/Eg1wwCagIyZkYGOSyFXcgBqjOv+QN1Y4wYMpVwgYsBxqgAwwr - scjSAKBWFrABNmvvRzz49IugAY8+//6/8NYnsAE8ejaZQK0SYAPU65ZGg0yfRsAAkCthBnBpWpQCtWqC - DRDySg46+uL7/w8///4/8/rH/+2Pv/5ffPvT//7L7/9XnX77P/XQq/+Bu57/fwWModk3Pv7XXHz9C7Ow - lB9QqzjYAAYVFXax0OIM6aTGHpPqGUt9J2/al7HuzNWGk8/fTrv6/t+ae5//H3z27f+19z//N559+4/X - wqsQqAuUGiFhgAQYoZiJgSGUmcHenkXYyoqX1yVSVSKp3k48piaC1y7YEyjPC8QYmskADAwACfSzwjHl - AmsAAAAASUVORK5CYII= + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V + kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw + fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx + mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb index 73038be..d4ed0a1 100644 --- a/Aviso/usrcntlAktDetails.vb +++ b/Aviso/usrcntlAktDetails.vb @@ -131,6 +131,9 @@ Public Class usrcntlAktDetails timerAktUebernommen.Interval = 1500 timer.Interval = 100 reload(AvisoID) + pnl.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + txtLKW_Nr.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor + txtLKW_Nr.ForeColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_ForeColor If My.Computer.Screen.WorkingArea.Width < 1300 Or VERAG_PROG_ALLGEMEIN.cAllgemein.dpi > 96 Then @@ -141,7 +144,7 @@ Public Class usrcntlAktDetails ' btnVorgeschrieben.AutoSize = False ' btnFreigabe.AutoSize = False - btnAnkunft.Text = "ANKUNFT." + btnAnkunft.Text = "ANKUNFT" btnErfasst.Text = "ERFASST" btnVorbereitet.Text = "VORB.QS" btnVorgeschrieben.Text = "VORGESCHR." @@ -176,9 +179,9 @@ Public Class usrcntlAktDetails btnVorbereitet.Visible = True End If - If VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME <> "ADMIN" Then - tbcntlVermerke.TabPages.Remove(tbAnhang) - End If + 'If VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME <> "ADMIN" Then + ' tbcntlVermerke.TabPages.Remove(tbAnhang) + 'End If If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG = "WAI" Then Button8.Text = "Gest.Liste" @@ -478,11 +481,11 @@ Public Class usrcntlAktDetails ' If setAkive_AuswahlID() = -1 Then Exit Sub If AvisoID <= 0 Then Exit Sub - + Button18.Visible = False Select Case tbcntlVermerke.SelectedIndex Case 0, 1, 2 : Vermerke_anzeigen2(rowindex) Case 3 - + Button18.Visible = True Dim hSQL As String = " SELECT [anh_id],[anh_Name],[anh_docId],[anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] WHERE [anh_AvisoId]='" & AvisoID & "' AND isnull(anh_SendungsId,0) <=0 order by [anh_Reihenfolge],[anh_id]" @@ -626,36 +629,43 @@ Public Class usrcntlAktDetails VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex) ' initDgvSendungen() + Case "3" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 4 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "5" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 6 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "7" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 8 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "9" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 10 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "11" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 12 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "13" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 14 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "17" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("eingereicht", "fertig") myVermerk.VermerkCodeId = 18 @@ -664,26 +674,31 @@ Public Class usrcntlAktDetails ' avisoAktualisierenAktiveIdBehalten(myVermerk.AvisoID) 'Vermerke_aktualisieren() init = True ' Vermerke_anzeigen(e.RowIndex) + Case "19" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("eingereicht", "fertig") myVermerk.VermerkCodeId = 20 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "25" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 30 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "31" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("in Vorbereitung", "Vorbereitung abgeschl.") myVermerk.VermerkCodeId = 32 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "33" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 34 VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "36" myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") myVermerk.VermerkCodeId = 37 @@ -696,6 +711,12 @@ Public Class usrcntlAktDetails VermerkeDAL.SpeichernVermerk(myVermerk) init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + Case "55" + myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(e.RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten") + myVermerk.VermerkCodeId = 56 + VermerkeDAL.SpeichernVermerk(myVermerk) + init = True 'Vermerke_anzeigen(e.RowIndex)': initDgvSendungen() + End Select loaded = False @@ -797,6 +818,11 @@ Public Class usrcntlAktDetails optionCell.Value = "Ü-Dok erhalten" optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'Ü-Dok erhalten' einzutragen." End If + Case 55 + If Not existCodeInGridVermerke(56, CStr(r.Cells("Hinweis_Vermerk").Value)) Then + optionCell.Value = "Rg-Best. erhalten" + optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'Rg-Best. erhalten' einzutragen." + End If End Select End If Next @@ -951,11 +977,24 @@ Public Class usrcntlAktDetails If dgvSendungen.SelectedRows.Count > 0 Then sendId = dgvSendungen.SelectedRows(0).Cells("tblSnd_SendungID").Value End If - Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm() + + 'Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm() + 'Dim frmSendungsdetails As New frmSendungsdetailsNEU(AvisoID, sendId) + 'frmSendungsdetails.ShowDialog(frmGrayOut) + 'frmGrayOut.Close() + + 'If Not Application.OpenForms.Item("frmSendungsdetails") Is Nothing Then + ' Application.OpenForms.Item("frmSendungsdetails").BringToFront() + ' MsgBox("Sendugns-Fenster bereits geöffnet!") + ' Exit Sub + 'Else + ' Dim frmSendungsdetails As New frmSendungsdetailsNEU(AvisoID, sendId) + ' frmSendungsdetails.Show(Me) + 'End If Dim frmSendungsdetails As New frmSendungsdetailsNEU(AvisoID, sendId) - frmSendungsdetails.ShowDialog(frmGrayOut) - frmGrayOut.Close() + frmSendungsdetails.ShowDialog(Me) + initDgvSendungen() @@ -1509,7 +1548,6 @@ Public Class usrcntlAktDetails Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click - If FUNC.AktUebernehmen(AvisoID) Then frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) @@ -1902,23 +1940,32 @@ Public Class usrcntlAktDetails Case "IMEX" Process.Start(path) Case Else - Try - Dim outl As New Outlook.Application - Dim Mail As Microsoft.Office.Interop.Outlook.MailItem - Mail = outl.CreateItem(0) - Mail.Subject = "Dispoliste LKW-Nr: " & AVISO.LKW_Nr - ' Mail.HTMLBody = "Sehr geehrte Damen und Herren,

anbei erhalten Sie die Rechnung Nr. " & RECHNUNG.RechnungsNr & "." - Mail.Attachments.Add(path, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue, , "Dispoliste.pdf") - Mail.Display() - - Catch ex As Exception - MsgBox("Fehler bim Öffnen des Mail-Programmes. PDF wird geladen!") + If sender Is Button9 Then Process.Start(path) - End Try + Else + Try + Dim outl As New Outlook.Application + Dim Mail As Microsoft.Office.Interop.Outlook.MailItem + Mail = outl.CreateItem(0) + Mail.Subject = "Dispoliste LKW-Nr: " & AVISO.LKW_Nr + ' Mail.HTMLBody = "Sehr geehrte Damen und Herren,

anbei erhalten Sie die Rechnung Nr. " & RECHNUNG.RechnungsNr & "." + Mail.Attachments.Add(path, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue, , "Dispoliste.pdf") + Mail.Display() + + Catch ex As Exception + MsgBox("Fehler beim Öffnen des Mail-Programmes. PDF wird geladen!") + Process.Start(path) + End Try + End If End Select End If Panel4.Visible = False End Sub + Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click + Dim f As New frmSendungAnhangImport(AvisoID) + f.Show(Me) + End Sub + End Class diff --git a/Diverses/Excel_2013_logo-155x110.png b/Diverses/Excel_2013_logo-155x110.png new file mode 100644 index 0000000..b45c725 Binary files /dev/null and b/Diverses/Excel_2013_logo-155x110.png differ diff --git a/Diverses/docAllgemein.png b/Diverses/docAllgemein.png new file mode 100644 index 0000000..283d346 Binary files /dev/null and b/Diverses/docAllgemein.png differ diff --git a/Gemeinsames/App.config b/Gemeinsames/App.config index 1729194..5f70bbd 100644 --- a/Gemeinsames/App.config +++ b/Gemeinsames/App.config @@ -1,6 +1,6 @@ - + diff --git a/Gemeinsames/Gemeinsames.vbproj b/Gemeinsames/Gemeinsames.vbproj index 5bb0f44..949ca3f 100644 --- a/Gemeinsames/Gemeinsames.vbproj +++ b/Gemeinsames/Gemeinsames.vbproj @@ -1,5 +1,5 @@  - + Debug x86 @@ -14,7 +14,7 @@ Gemeinsames 512 Windows - v4.5 + v4.7 false diff --git a/Gemeinsames/My Project/Resources.Designer.vb b/Gemeinsames/My Project/Resources.Designer.vb index 5470657..b87770a 100644 --- a/Gemeinsames/My Project/Resources.Designer.vb +++ b/Gemeinsames/My Project/Resources.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ diff --git a/Gemeinsames/My Project/Settings.Designer.vb b/Gemeinsames/My Project/Settings.Designer.vb index 6271c4d..1fd9fbb 100644 --- a/Gemeinsames/My Project/Settings.Designer.vb +++ b/Gemeinsames/My Project/Settings.Designer.vb @@ -15,21 +15,21 @@ Option Explicit On Namespace My _ Partial Friend NotInheritable Class MySettings Inherits Global.System.Configuration.ApplicationSettingsBase Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) -#Region "Funktion zum automatischen Speichern von My.Settings" +#Region "Automatische My.Settings-Speicherfunktion" #If _MyType = "WindowsForms" Then Private Shared addedHandler As Boolean Private Shared addedHandlerLockObject As New Object _ - Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) + Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs) If My.Application.SaveMySettingsOnExit Then My.Settings.Save() End If