Timas, Fremdwährungen, Asfinag
This commit is contained in:
@@ -467,6 +467,12 @@
|
|||||||
<Compile Include="frmPrintLayout.vb">
|
<Compile Include="frmPrintLayout.vb">
|
||||||
<SubType>Form</SubType>
|
<SubType>Form</SubType>
|
||||||
</Compile>
|
</Compile>
|
||||||
|
<Compile Include="Mitarbeiter\frmMitarbTimas.Designer.vb">
|
||||||
|
<DependentUpon>frmMitarbTimas.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Mitarbeiter\frmMitarbTimas.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
<Compile Include="My Project\Resources.Designer.vb">
|
<Compile Include="My Project\Resources.Designer.vb">
|
||||||
<AutoGen>True</AutoGen>
|
<AutoGen>True</AutoGen>
|
||||||
<DesignTime>True</DesignTime>
|
<DesignTime>True</DesignTime>
|
||||||
@@ -727,6 +733,10 @@
|
|||||||
<EmbeddedResource Include="frmPrintLayout.resx">
|
<EmbeddedResource Include="frmPrintLayout.resx">
|
||||||
<DependentUpon>frmPrintLayout.vb</DependentUpon>
|
<DependentUpon>frmPrintLayout.vb</DependentUpon>
|
||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Mitarbeiter\frmMitarbTimas.resx">
|
||||||
|
<DependentUpon>frmMitarbTimas.vb</DependentUpon>
|
||||||
|
<SubType>Designer</SubType>
|
||||||
|
</EmbeddedResource>
|
||||||
<EmbeddedResource Include="My Project\licenses.licx" />
|
<EmbeddedResource Include="My Project\licenses.licx" />
|
||||||
<EmbeddedResource Include="Programme\frmBenutzerBerGruppenKopieren.resx">
|
<EmbeddedResource Include="Programme\frmBenutzerBerGruppenKopieren.resx">
|
||||||
<DependentUpon>frmBenutzerBerGruppenKopieren.vb</DependentUpon>
|
<DependentUpon>frmBenutzerBerGruppenKopieren.vb</DependentUpon>
|
||||||
@@ -757,6 +767,7 @@
|
|||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
<EmbeddedResource Include="Mitarbeiter\frmMitarbDetails.resx">
|
<EmbeddedResource Include="Mitarbeiter\frmMitarbDetails.resx">
|
||||||
<DependentUpon>frmMitarbDetails.vb</DependentUpon>
|
<DependentUpon>frmMitarbDetails.vb</DependentUpon>
|
||||||
|
<SubType>Designer</SubType>
|
||||||
</EmbeddedResource>
|
</EmbeddedResource>
|
||||||
<EmbeddedResource Include="Mitarbeiter\frmMitarbeiter.resx">
|
<EmbeddedResource Include="Mitarbeiter\frmMitarbeiter.resx">
|
||||||
<DependentUpon>frmMitarbeiter.vb</DependentUpon>
|
<DependentUpon>frmMitarbeiter.vb</DependentUpon>
|
||||||
|
|||||||
2
UID/Mitarbeiter/frmMitarbDetails.Designer.vb
generated
2
UID/Mitarbeiter/frmMitarbDetails.Designer.vb
generated
@@ -820,7 +820,7 @@ Partial Class frmMitarbDetails
|
|||||||
Me.TabControl1.Location = New System.Drawing.Point(5, 26)
|
Me.TabControl1.Location = New System.Drawing.Point(5, 26)
|
||||||
Me.TabControl1.Name = "TabControl1"
|
Me.TabControl1.Name = "TabControl1"
|
||||||
Me.TabControl1.SelectedIndex = 0
|
Me.TabControl1.SelectedIndex = 0
|
||||||
Me.TabControl1.Size = New System.Drawing.Size(360, 145)
|
Me.TabControl1.Size = New System.Drawing.Size(287, 145)
|
||||||
Me.TabControl1.TabIndex = 122
|
Me.TabControl1.TabIndex = 122
|
||||||
'
|
'
|
||||||
'PictureBox9
|
'PictureBox9
|
||||||
|
|||||||
@@ -864,7 +864,7 @@ Public Class frmMitarbDetails
|
|||||||
|
|
||||||
If IsNothing(mitarbeiter.mit_timasId) Then
|
If IsNothing(mitarbeiter.mit_timasId) Then
|
||||||
cbxTimasAngelegt.Checked = False
|
cbxTimasAngelegt.Checked = False
|
||||||
timas.getGroups(dtTimas)
|
timas.getAllGroups(dtTimas)
|
||||||
initDGV(dtTimas)
|
initDGV(dtTimas)
|
||||||
Else
|
Else
|
||||||
cbxTimasAngelegt.Checked = True
|
cbxTimasAngelegt.Checked = True
|
||||||
@@ -1141,8 +1141,8 @@ Public Class frmMitarbDetails
|
|||||||
|
|
||||||
|
|
||||||
If checkMandatoryFields() Then
|
If checkMandatoryFields() Then
|
||||||
timas.createMA(mitarbeiter, rtfInfoTimas.Text, dtTimas)
|
timas.createEmployee(mitarbeiter, rtfInfoTimas.Text, dtTimas)
|
||||||
tbcntr_TabIndexChanged(sender, e)
|
tbcntr_TabIndexChanged(sender, e)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|||||||
759
UID/Mitarbeiter/frmMitarbTimas.Designer.vb
generated
Normal file
759
UID/Mitarbeiter/frmMitarbTimas.Designer.vb
generated
Normal file
@@ -0,0 +1,759 @@
|
|||||||
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||||
|
Partial Class frmMitarbTimas
|
||||||
|
Inherits System.Windows.Forms.Form
|
||||||
|
|
||||||
|
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||||
|
<System.Diagnostics.DebuggerNonUserCode()>
|
||||||
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||||
|
Try
|
||||||
|
If disposing AndAlso components IsNot Nothing Then
|
||||||
|
components.Dispose()
|
||||||
|
End If
|
||||||
|
Finally
|
||||||
|
MyBase.Dispose(disposing)
|
||||||
|
End Try
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
'Wird vom Windows Form-Designer benötigt.
|
||||||
|
Private components As System.ComponentModel.IContainer
|
||||||
|
|
||||||
|
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||||
|
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||||
|
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||||
|
<System.Diagnostics.DebuggerStepThrough()>
|
||||||
|
Private Sub InitializeComponent()
|
||||||
|
Me.components = New System.ComponentModel.Container()
|
||||||
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMitarbTimas))
|
||||||
|
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
|
||||||
|
Me.Label1 = New System.Windows.Forms.Label()
|
||||||
|
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||||
|
Me.Label48 = New System.Windows.Forms.Label()
|
||||||
|
Me.Label47 = New System.Windows.Forms.Label()
|
||||||
|
Me.btnCancel = New System.Windows.Forms.Button()
|
||||||
|
Me.btnOK = New System.Windows.Forms.Button()
|
||||||
|
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||||
|
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.cbxTestaccount = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.cbxGebDat = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.txtGebDat = New System.Windows.Forms.DateTimePicker()
|
||||||
|
Me.lblgeb = New System.Windows.Forms.Label()
|
||||||
|
Me.txtMobiltel = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label18 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtOrt = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label16 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtPlz = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label14 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtStrasse = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label13 = New System.Windows.Forms.Label()
|
||||||
|
Me.rbtnGeschlechtW = New System.Windows.Forms.RadioButton()
|
||||||
|
Me.rbtnGeschlechtM = New System.Windows.Forms.RadioButton()
|
||||||
|
Me.txtNname = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label5 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtVname = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label2 = New System.Windows.Forms.Label()
|
||||||
|
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||||
|
Me.Label3 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtUsername = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label19 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtDurchwahl = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label20 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtEmail = New System.Windows.Forms.TextBox()
|
||||||
|
Me.cbxGekuendigt = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.datGekuendigtAm = New System.Windows.Forms.DateTimePicker()
|
||||||
|
Me.datEinstiegsdatum = New System.Windows.Forms.DateTimePicker()
|
||||||
|
Me.Label30 = New System.Windows.Forms.Label()
|
||||||
|
Me.cbxEinsteigsDat = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.txtTelNr = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label6 = New System.Windows.Forms.Label()
|
||||||
|
Me.txtPwd = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label8 = New System.Windows.Forms.Label()
|
||||||
|
Me.lkl = New System.Windows.Forms.LinkLabel()
|
||||||
|
Me.lblInfo = New System.Windows.Forms.Label()
|
||||||
|
Me.txtInfo = New System.Windows.Forms.TextBox()
|
||||||
|
Me.lblCard = New System.Windows.Forms.Label()
|
||||||
|
Me.txtCard = New System.Windows.Forms.TextBox()
|
||||||
|
Me.Label7 = New System.Windows.Forms.Label()
|
||||||
|
Me.TextBox2 = New System.Windows.Forms.TextBox()
|
||||||
|
Me.cbxAccount = New System.Windows.Forms.CheckBox()
|
||||||
|
Me.lblLohnNr = New System.Windows.Forms.Label()
|
||||||
|
Me.txtLohn = New System.Windows.Forms.TextBox()
|
||||||
|
Me.TabControl1 = New System.Windows.Forms.TabControl()
|
||||||
|
Me.dgvData = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
Me.Panel1.SuspendLayout()
|
||||||
|
Me.GroupBox2.SuspendLayout()
|
||||||
|
Me.GroupBox1.SuspendLayout()
|
||||||
|
Me.GroupBox3.SuspendLayout()
|
||||||
|
CType(Me.dgvData, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'PictureBox1
|
||||||
|
'
|
||||||
|
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
|
||||||
|
Me.PictureBox1.Location = New System.Drawing.Point(12, 7)
|
||||||
|
Me.PictureBox1.Name = "PictureBox1"
|
||||||
|
Me.PictureBox1.Size = New System.Drawing.Size(198, 41)
|
||||||
|
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||||
|
Me.PictureBox1.TabIndex = 13
|
||||||
|
Me.PictureBox1.TabStop = False
|
||||||
|
'
|
||||||
|
'Label1
|
||||||
|
'
|
||||||
|
Me.Label1.AutoSize = True
|
||||||
|
Me.Label1.Cursor = System.Windows.Forms.Cursors.Default
|
||||||
|
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label1.Location = New System.Drawing.Point(216, 19)
|
||||||
|
Me.Label1.Name = "Label1"
|
||||||
|
Me.Label1.Size = New System.Drawing.Size(101, 16)
|
||||||
|
Me.Label1.TabIndex = 18
|
||||||
|
Me.Label1.Text = "Zeiterfassung"
|
||||||
|
'
|
||||||
|
'Panel1
|
||||||
|
'
|
||||||
|
Me.Panel1.Controls.Add(Me.Label48)
|
||||||
|
Me.Panel1.Controls.Add(Me.Label47)
|
||||||
|
Me.Panel1.Controls.Add(Me.Label1)
|
||||||
|
Me.Panel1.Controls.Add(Me.PictureBox1)
|
||||||
|
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
|
||||||
|
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||||
|
Me.Panel1.Name = "Panel1"
|
||||||
|
Me.Panel1.Size = New System.Drawing.Size(570, 57)
|
||||||
|
Me.Panel1.TabIndex = 23
|
||||||
|
'
|
||||||
|
'Label48
|
||||||
|
'
|
||||||
|
Me.Label48.Cursor = System.Windows.Forms.Cursors.Default
|
||||||
|
Me.Label48.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label48.Location = New System.Drawing.Point(449, 22)
|
||||||
|
Me.Label48.Name = "Label48"
|
||||||
|
Me.Label48.Size = New System.Drawing.Size(82, 16)
|
||||||
|
Me.Label48.TabIndex = 93
|
||||||
|
Me.Label48.Text = "00"
|
||||||
|
Me.Label48.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||||
|
'
|
||||||
|
'Label47
|
||||||
|
'
|
||||||
|
Me.Label47.AutoSize = True
|
||||||
|
Me.Label47.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label47.Location = New System.Drawing.Point(508, 9)
|
||||||
|
Me.Label47.Name = "Label47"
|
||||||
|
Me.Label47.Size = New System.Drawing.Size(21, 13)
|
||||||
|
Me.Label47.TabIndex = 92
|
||||||
|
Me.Label47.Text = "ID:"
|
||||||
|
'
|
||||||
|
'btnCancel
|
||||||
|
'
|
||||||
|
Me.btnCancel.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||||
|
Me.btnCancel.BackColor = System.Drawing.Color.White
|
||||||
|
Me.btnCancel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||||
|
Me.btnCancel.Location = New System.Drawing.Point(191, 871)
|
||||||
|
Me.btnCancel.Name = "btnCancel"
|
||||||
|
Me.btnCancel.Size = New System.Drawing.Size(88, 36)
|
||||||
|
Me.btnCancel.TabIndex = 52
|
||||||
|
Me.btnCancel.Text = "Abbrechen"
|
||||||
|
Me.btnCancel.UseVisualStyleBackColor = False
|
||||||
|
'
|
||||||
|
'btnOK
|
||||||
|
'
|
||||||
|
Me.btnOK.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||||
|
Me.btnOK.BackColor = System.Drawing.Color.White
|
||||||
|
Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||||
|
Me.btnOK.Location = New System.Drawing.Point(12, 871)
|
||||||
|
Me.btnOK.Name = "btnOK"
|
||||||
|
Me.btnOK.Size = New System.Drawing.Size(173, 36)
|
||||||
|
Me.btnOK.TabIndex = 51
|
||||||
|
Me.btnOK.Text = "OK"
|
||||||
|
Me.btnOK.UseVisualStyleBackColor = False
|
||||||
|
'
|
||||||
|
'ContextMenuStrip1
|
||||||
|
'
|
||||||
|
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
|
||||||
|
Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4)
|
||||||
|
'
|
||||||
|
'GroupBox2
|
||||||
|
'
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtLohn)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.lblLohnNr)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.cbxAccount)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.TextBox2)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label7)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtCard)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.lblCard)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtInfo)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.lblInfo)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.lkl)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label8)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtPwd)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label6)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtTelNr)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.cbxEinsteigsDat)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label30)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.datEinstiegsdatum)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.datGekuendigtAm)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.cbxGekuendigt)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtEmail)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label20)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtDurchwahl)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label19)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.txtUsername)
|
||||||
|
Me.GroupBox2.Controls.Add(Me.Label3)
|
||||||
|
Me.GroupBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.GroupBox2.Location = New System.Drawing.Point(6, 289)
|
||||||
|
Me.GroupBox2.Name = "GroupBox2"
|
||||||
|
Me.GroupBox2.Size = New System.Drawing.Size(552, 303)
|
||||||
|
Me.GroupBox2.TabIndex = 86
|
||||||
|
Me.GroupBox2.TabStop = False
|
||||||
|
Me.GroupBox2.Text = "Timas - User"
|
||||||
|
'
|
||||||
|
'GroupBox1
|
||||||
|
'
|
||||||
|
Me.GroupBox1.Controls.Add(Me.cbxTestaccount)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.cbxGebDat)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtGebDat)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.lblgeb)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtMobiltel)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.Label18)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtOrt)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.Label16)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtPlz)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.Label14)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtStrasse)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.Label13)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.rbtnGeschlechtW)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.rbtnGeschlechtM)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtNname)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.txtVname)
|
||||||
|
Me.GroupBox1.Controls.Add(Me.Label2)
|
||||||
|
Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.GroupBox1.Location = New System.Drawing.Point(12, 63)
|
||||||
|
Me.GroupBox1.Name = "GroupBox1"
|
||||||
|
Me.GroupBox1.Size = New System.Drawing.Size(552, 220)
|
||||||
|
Me.GroupBox1.TabIndex = 85
|
||||||
|
Me.GroupBox1.TabStop = False
|
||||||
|
Me.GroupBox1.Text = "Person"
|
||||||
|
'
|
||||||
|
'cbxTestaccount
|
||||||
|
'
|
||||||
|
Me.cbxTestaccount.AutoSize = True
|
||||||
|
Me.cbxTestaccount.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.cbxTestaccount.Location = New System.Drawing.Point(389, 61)
|
||||||
|
Me.cbxTestaccount.Name = "cbxTestaccount"
|
||||||
|
Me.cbxTestaccount.Size = New System.Drawing.Size(86, 17)
|
||||||
|
Me.cbxTestaccount.TabIndex = 92
|
||||||
|
Me.cbxTestaccount.Text = "Testaccount"
|
||||||
|
Me.cbxTestaccount.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'cbxGebDat
|
||||||
|
'
|
||||||
|
Me.cbxGebDat.AutoSize = True
|
||||||
|
Me.cbxGebDat.Checked = True
|
||||||
|
Me.cbxGebDat.CheckState = System.Windows.Forms.CheckState.Checked
|
||||||
|
Me.cbxGebDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.cbxGebDat.Location = New System.Drawing.Point(9, 196)
|
||||||
|
Me.cbxGebDat.Name = "cbxGebDat"
|
||||||
|
Me.cbxGebDat.Size = New System.Drawing.Size(15, 14)
|
||||||
|
Me.cbxGebDat.TabIndex = 91
|
||||||
|
Me.cbxGebDat.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'txtGebDat
|
||||||
|
'
|
||||||
|
Me.txtGebDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtGebDat.Location = New System.Drawing.Point(30, 194)
|
||||||
|
Me.txtGebDat.Name = "txtGebDat"
|
||||||
|
Me.txtGebDat.Size = New System.Drawing.Size(200, 20)
|
||||||
|
Me.txtGebDat.TabIndex = 10
|
||||||
|
'
|
||||||
|
'lblgeb
|
||||||
|
'
|
||||||
|
Me.lblgeb.AutoSize = True
|
||||||
|
Me.lblgeb.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.lblgeb.Location = New System.Drawing.Point(6, 178)
|
||||||
|
Me.lblgeb.Name = "lblgeb"
|
||||||
|
Me.lblgeb.Size = New System.Drawing.Size(62, 13)
|
||||||
|
Me.lblgeb.TabIndex = 82
|
||||||
|
Me.lblgeb.Text = "Geburtstag:"
|
||||||
|
'
|
||||||
|
'txtMobiltel
|
||||||
|
'
|
||||||
|
Me.txtMobiltel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtMobiltel.Location = New System.Drawing.Point(9, 155)
|
||||||
|
Me.txtMobiltel.Name = "txtMobiltel"
|
||||||
|
Me.txtMobiltel.Size = New System.Drawing.Size(286, 20)
|
||||||
|
Me.txtMobiltel.TabIndex = 8
|
||||||
|
'
|
||||||
|
'Label18
|
||||||
|
'
|
||||||
|
Me.Label18.AutoSize = True
|
||||||
|
Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label18.Location = New System.Drawing.Point(6, 139)
|
||||||
|
Me.Label18.Name = "Label18"
|
||||||
|
Me.Label18.Size = New System.Drawing.Size(84, 13)
|
||||||
|
Me.Label18.TabIndex = 79
|
||||||
|
Me.Label18.Text = "Mobiltelefon-Nr.:"
|
||||||
|
'
|
||||||
|
'txtOrt
|
||||||
|
'
|
||||||
|
Me.txtOrt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtOrt.Location = New System.Drawing.Point(196, 116)
|
||||||
|
Me.txtOrt.Name = "txtOrt"
|
||||||
|
Me.txtOrt.Size = New System.Drawing.Size(177, 20)
|
||||||
|
Me.txtOrt.TabIndex = 7
|
||||||
|
'
|
||||||
|
'Label16
|
||||||
|
'
|
||||||
|
Me.Label16.AutoSize = True
|
||||||
|
Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label16.Location = New System.Drawing.Point(193, 100)
|
||||||
|
Me.Label16.Name = "Label16"
|
||||||
|
Me.Label16.Size = New System.Drawing.Size(24, 13)
|
||||||
|
Me.Label16.TabIndex = 75
|
||||||
|
Me.Label16.Text = "Ort:"
|
||||||
|
'
|
||||||
|
'txtPlz
|
||||||
|
'
|
||||||
|
Me.txtPlz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtPlz.Location = New System.Drawing.Point(10, 116)
|
||||||
|
Me.txtPlz.Name = "txtPlz"
|
||||||
|
Me.txtPlz.Size = New System.Drawing.Size(177, 20)
|
||||||
|
Me.txtPlz.TabIndex = 6
|
||||||
|
'
|
||||||
|
'Label14
|
||||||
|
'
|
||||||
|
Me.Label14.AutoSize = True
|
||||||
|
Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label14.Location = New System.Drawing.Point(7, 100)
|
||||||
|
Me.Label14.Name = "Label14"
|
||||||
|
Me.Label14.Size = New System.Drawing.Size(30, 13)
|
||||||
|
Me.Label14.TabIndex = 73
|
||||||
|
Me.Label14.Text = "PLZ:"
|
||||||
|
'
|
||||||
|
'txtStrasse
|
||||||
|
'
|
||||||
|
Me.txtStrasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtStrasse.Location = New System.Drawing.Point(9, 77)
|
||||||
|
Me.txtStrasse.Name = "txtStrasse"
|
||||||
|
Me.txtStrasse.Size = New System.Drawing.Size(286, 20)
|
||||||
|
Me.txtStrasse.TabIndex = 3
|
||||||
|
'
|
||||||
|
'Label13
|
||||||
|
'
|
||||||
|
Me.Label13.AutoSize = True
|
||||||
|
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label13.Location = New System.Drawing.Point(6, 61)
|
||||||
|
Me.Label13.Name = "Label13"
|
||||||
|
Me.Label13.Size = New System.Drawing.Size(45, 13)
|
||||||
|
Me.Label13.TabIndex = 71
|
||||||
|
Me.Label13.Text = "Strasse:"
|
||||||
|
'
|
||||||
|
'rbtnGeschlechtW
|
||||||
|
'
|
||||||
|
Me.rbtnGeschlechtW.AutoSize = True
|
||||||
|
Me.rbtnGeschlechtW.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.rbtnGeschlechtW.Location = New System.Drawing.Point(389, 35)
|
||||||
|
Me.rbtnGeschlechtW.Name = "rbtnGeschlechtW"
|
||||||
|
Me.rbtnGeschlechtW.Size = New System.Drawing.Size(33, 17)
|
||||||
|
Me.rbtnGeschlechtW.TabIndex = 65
|
||||||
|
Me.rbtnGeschlechtW.Text = "w"
|
||||||
|
Me.rbtnGeschlechtW.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'rbtnGeschlechtM
|
||||||
|
'
|
||||||
|
Me.rbtnGeschlechtM.AutoSize = True
|
||||||
|
Me.rbtnGeschlechtM.Checked = True
|
||||||
|
Me.rbtnGeschlechtM.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.rbtnGeschlechtM.Location = New System.Drawing.Point(389, 19)
|
||||||
|
Me.rbtnGeschlechtM.Name = "rbtnGeschlechtM"
|
||||||
|
Me.rbtnGeschlechtM.Size = New System.Drawing.Size(33, 17)
|
||||||
|
Me.rbtnGeschlechtM.TabIndex = 64
|
||||||
|
Me.rbtnGeschlechtM.TabStop = True
|
||||||
|
Me.rbtnGeschlechtM.Text = "m"
|
||||||
|
Me.rbtnGeschlechtM.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'txtNname
|
||||||
|
'
|
||||||
|
Me.txtNname.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtNname.Location = New System.Drawing.Point(193, 32)
|
||||||
|
Me.txtNname.Name = "txtNname"
|
||||||
|
Me.txtNname.Size = New System.Drawing.Size(177, 20)
|
||||||
|
Me.txtNname.TabIndex = 2
|
||||||
|
'
|
||||||
|
'Label5
|
||||||
|
'
|
||||||
|
Me.Label5.AutoSize = True
|
||||||
|
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label5.Location = New System.Drawing.Point(190, 16)
|
||||||
|
Me.Label5.Name = "Label5"
|
||||||
|
Me.Label5.Size = New System.Drawing.Size(62, 13)
|
||||||
|
Me.Label5.TabIndex = 61
|
||||||
|
Me.Label5.Text = "Nachname:"
|
||||||
|
'
|
||||||
|
'txtVname
|
||||||
|
'
|
||||||
|
Me.txtVname.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtVname.Location = New System.Drawing.Point(10, 32)
|
||||||
|
Me.txtVname.Name = "txtVname"
|
||||||
|
Me.txtVname.Size = New System.Drawing.Size(177, 20)
|
||||||
|
Me.txtVname.TabIndex = 1
|
||||||
|
'
|
||||||
|
'Label2
|
||||||
|
'
|
||||||
|
Me.Label2.AutoSize = True
|
||||||
|
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label2.Location = New System.Drawing.Point(7, 16)
|
||||||
|
Me.Label2.Name = "Label2"
|
||||||
|
Me.Label2.Size = New System.Drawing.Size(52, 13)
|
||||||
|
Me.Label2.TabIndex = 60
|
||||||
|
Me.Label2.Text = "Vorname:"
|
||||||
|
'
|
||||||
|
'GroupBox3
|
||||||
|
'
|
||||||
|
Me.GroupBox3.Controls.Add(Me.dgvData)
|
||||||
|
Me.GroupBox3.Controls.Add(Me.TabControl1)
|
||||||
|
Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.GroupBox3.Location = New System.Drawing.Point(6, 598)
|
||||||
|
Me.GroupBox3.Name = "GroupBox3"
|
||||||
|
Me.GroupBox3.Size = New System.Drawing.Size(552, 261)
|
||||||
|
Me.GroupBox3.TabIndex = 87
|
||||||
|
Me.GroupBox3.TabStop = False
|
||||||
|
Me.GroupBox3.Text = "Timas - Gruppen"
|
||||||
|
'
|
||||||
|
'Label3
|
||||||
|
'
|
||||||
|
Me.Label3.AutoSize = True
|
||||||
|
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label3.Location = New System.Drawing.Point(13, 39)
|
||||||
|
Me.Label3.Name = "Label3"
|
||||||
|
Me.Label3.Size = New System.Drawing.Size(58, 13)
|
||||||
|
Me.Label3.TabIndex = 56
|
||||||
|
Me.Label3.Text = "Username:"
|
||||||
|
'
|
||||||
|
'txtUsername
|
||||||
|
'
|
||||||
|
Me.txtUsername.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtUsername.Location = New System.Drawing.Point(16, 55)
|
||||||
|
Me.txtUsername.Name = "txtUsername"
|
||||||
|
Me.txtUsername.Size = New System.Drawing.Size(177, 20)
|
||||||
|
Me.txtUsername.TabIndex = 0
|
||||||
|
'
|
||||||
|
'Label19
|
||||||
|
'
|
||||||
|
Me.Label19.AutoSize = True
|
||||||
|
Me.Label19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label19.Location = New System.Drawing.Point(15, 188)
|
||||||
|
Me.Label19.Name = "Label19"
|
||||||
|
Me.Label19.Size = New System.Drawing.Size(108, 13)
|
||||||
|
Me.Label19.TabIndex = 81
|
||||||
|
Me.Label19.Text = "Telefon / Durchwahl:"
|
||||||
|
'
|
||||||
|
'txtDurchwahl
|
||||||
|
'
|
||||||
|
Me.txtDurchwahl.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtDurchwahl.Location = New System.Drawing.Point(138, 204)
|
||||||
|
Me.txtDurchwahl.Name = "txtDurchwahl"
|
||||||
|
Me.txtDurchwahl.Size = New System.Drawing.Size(54, 20)
|
||||||
|
Me.txtDurchwahl.TabIndex = 6
|
||||||
|
'
|
||||||
|
'Label20
|
||||||
|
'
|
||||||
|
Me.Label20.AutoSize = True
|
||||||
|
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label20.Location = New System.Drawing.Point(207, 188)
|
||||||
|
Me.Label20.Name = "Label20"
|
||||||
|
Me.Label20.Size = New System.Drawing.Size(39, 13)
|
||||||
|
Me.Label20.TabIndex = 83
|
||||||
|
Me.Label20.Text = "E-Mail:"
|
||||||
|
'
|
||||||
|
'txtEmail
|
||||||
|
'
|
||||||
|
Me.txtEmail.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtEmail.Location = New System.Drawing.Point(210, 204)
|
||||||
|
Me.txtEmail.Name = "txtEmail"
|
||||||
|
Me.txtEmail.Size = New System.Drawing.Size(178, 20)
|
||||||
|
Me.txtEmail.TabIndex = 7
|
||||||
|
'
|
||||||
|
'cbxGekuendigt
|
||||||
|
'
|
||||||
|
Me.cbxGekuendigt.AutoSize = True
|
||||||
|
Me.cbxGekuendigt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.cbxGekuendigt.Location = New System.Drawing.Point(16, 262)
|
||||||
|
Me.cbxGekuendigt.Name = "cbxGekuendigt"
|
||||||
|
Me.cbxGekuendigt.Size = New System.Drawing.Size(69, 17)
|
||||||
|
Me.cbxGekuendigt.TabIndex = 8
|
||||||
|
Me.cbxGekuendigt.Text = "Ende DV"
|
||||||
|
Me.cbxGekuendigt.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'datGekuendigtAm
|
||||||
|
'
|
||||||
|
Me.datGekuendigtAm.Enabled = False
|
||||||
|
Me.datGekuendigtAm.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.datGekuendigtAm.Location = New System.Drawing.Point(118, 259)
|
||||||
|
Me.datGekuendigtAm.Name = "datGekuendigtAm"
|
||||||
|
Me.datGekuendigtAm.Size = New System.Drawing.Size(200, 20)
|
||||||
|
Me.datGekuendigtAm.TabIndex = 9
|
||||||
|
'
|
||||||
|
'datEinstiegsdatum
|
||||||
|
'
|
||||||
|
Me.datEinstiegsdatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.datEinstiegsdatum.Location = New System.Drawing.Point(118, 236)
|
||||||
|
Me.datEinstiegsdatum.Name = "datEinstiegsdatum"
|
||||||
|
Me.datEinstiegsdatum.Size = New System.Drawing.Size(200, 20)
|
||||||
|
Me.datEinstiegsdatum.TabIndex = 2
|
||||||
|
'
|
||||||
|
'Label30
|
||||||
|
'
|
||||||
|
Me.Label30.AutoSize = True
|
||||||
|
Me.Label30.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label30.Location = New System.Drawing.Point(31, 238)
|
||||||
|
Me.Label30.Name = "Label30"
|
||||||
|
Me.Label30.Size = New System.Drawing.Size(81, 13)
|
||||||
|
Me.Label30.TabIndex = 89
|
||||||
|
Me.Label30.Text = "Einstiegsdatum:"
|
||||||
|
'
|
||||||
|
'cbxEinsteigsDat
|
||||||
|
'
|
||||||
|
Me.cbxEinsteigsDat.AutoSize = True
|
||||||
|
Me.cbxEinsteigsDat.Checked = True
|
||||||
|
Me.cbxEinsteigsDat.CheckState = System.Windows.Forms.CheckState.Checked
|
||||||
|
Me.cbxEinsteigsDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.cbxEinsteigsDat.Location = New System.Drawing.Point(16, 238)
|
||||||
|
Me.cbxEinsteigsDat.Name = "cbxEinsteigsDat"
|
||||||
|
Me.cbxEinsteigsDat.Size = New System.Drawing.Size(15, 14)
|
||||||
|
Me.cbxEinsteigsDat.TabIndex = 90
|
||||||
|
Me.cbxEinsteigsDat.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'txtTelNr
|
||||||
|
'
|
||||||
|
Me.txtTelNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtTelNr.Location = New System.Drawing.Point(18, 204)
|
||||||
|
Me.txtTelNr.Name = "txtTelNr"
|
||||||
|
Me.txtTelNr.Size = New System.Drawing.Size(114, 20)
|
||||||
|
Me.txtTelNr.TabIndex = 113
|
||||||
|
'
|
||||||
|
'Label6
|
||||||
|
'
|
||||||
|
Me.Label6.AutoSize = True
|
||||||
|
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label6.Location = New System.Drawing.Point(202, 36)
|
||||||
|
Me.Label6.Name = "Label6"
|
||||||
|
Me.Label6.Size = New System.Drawing.Size(53, 13)
|
||||||
|
Me.Label6.TabIndex = 116
|
||||||
|
Me.Label6.Text = "Passwort:"
|
||||||
|
'
|
||||||
|
'txtPwd
|
||||||
|
'
|
||||||
|
Me.txtPwd.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtPwd.Location = New System.Drawing.Point(204, 52)
|
||||||
|
Me.txtPwd.Name = "txtPwd"
|
||||||
|
Me.txtPwd.Size = New System.Drawing.Size(178, 20)
|
||||||
|
Me.txtPwd.TabIndex = 115
|
||||||
|
'
|
||||||
|
'Label8
|
||||||
|
'
|
||||||
|
Me.Label8.AutoSize = True
|
||||||
|
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label8.Location = New System.Drawing.Point(206, 55)
|
||||||
|
Me.Label8.Name = "Label8"
|
||||||
|
Me.Label8.Size = New System.Drawing.Size(146, 13)
|
||||||
|
Me.Label8.TabIndex = 114
|
||||||
|
Me.Label8.Text = "(erst bei Doppelklick sichtbar)"
|
||||||
|
'
|
||||||
|
'lkl
|
||||||
|
'
|
||||||
|
Me.lkl.AutoSize = True
|
||||||
|
Me.lkl.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.lkl.Location = New System.Drawing.Point(347, 36)
|
||||||
|
Me.lkl.Name = "lkl"
|
||||||
|
Me.lkl.Size = New System.Drawing.Size(35, 13)
|
||||||
|
Me.lkl.TabIndex = 117
|
||||||
|
Me.lkl.TabStop = True
|
||||||
|
Me.lkl.Text = "Reset"
|
||||||
|
'
|
||||||
|
'lblInfo
|
||||||
|
'
|
||||||
|
Me.lblInfo.AutoSize = True
|
||||||
|
Me.lblInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.lblInfo.Location = New System.Drawing.Point(13, 125)
|
||||||
|
Me.lblInfo.Name = "lblInfo"
|
||||||
|
Me.lblInfo.Size = New System.Drawing.Size(28, 13)
|
||||||
|
Me.lblInfo.TabIndex = 119
|
||||||
|
Me.lblInfo.Text = "Info:"
|
||||||
|
'
|
||||||
|
'txtInfo
|
||||||
|
'
|
||||||
|
Me.txtInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtInfo.Location = New System.Drawing.Point(16, 141)
|
||||||
|
Me.txtInfo.Name = "txtInfo"
|
||||||
|
Me.txtInfo.Size = New System.Drawing.Size(179, 20)
|
||||||
|
Me.txtInfo.TabIndex = 118
|
||||||
|
'
|
||||||
|
'lblCard
|
||||||
|
'
|
||||||
|
Me.lblCard.AutoSize = True
|
||||||
|
Me.lblCard.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.lblCard.Location = New System.Drawing.Point(202, 80)
|
||||||
|
Me.lblCard.Name = "lblCard"
|
||||||
|
Me.lblCard.Size = New System.Drawing.Size(55, 13)
|
||||||
|
Me.lblCard.TabIndex = 123
|
||||||
|
Me.lblCard.Text = "Karten-Nr:"
|
||||||
|
'
|
||||||
|
'txtCard
|
||||||
|
'
|
||||||
|
Me.txtCard.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtCard.Location = New System.Drawing.Point(205, 96)
|
||||||
|
Me.txtCard.Name = "txtCard"
|
||||||
|
Me.txtCard.Size = New System.Drawing.Size(179, 20)
|
||||||
|
Me.txtCard.TabIndex = 122
|
||||||
|
'
|
||||||
|
'Label7
|
||||||
|
'
|
||||||
|
Me.Label7.AutoSize = True
|
||||||
|
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.Label7.Location = New System.Drawing.Point(13, 80)
|
||||||
|
Me.Label7.Name = "Label7"
|
||||||
|
Me.Label7.Size = New System.Drawing.Size(49, 13)
|
||||||
|
Me.Label7.TabIndex = 125
|
||||||
|
Me.Label7.Text = "RFID-Nr:"
|
||||||
|
'
|
||||||
|
'TextBox2
|
||||||
|
'
|
||||||
|
Me.TextBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.TextBox2.Location = New System.Drawing.Point(16, 96)
|
||||||
|
Me.TextBox2.Name = "TextBox2"
|
||||||
|
Me.TextBox2.Size = New System.Drawing.Size(179, 20)
|
||||||
|
Me.TextBox2.TabIndex = 124
|
||||||
|
'
|
||||||
|
'cbxAccount
|
||||||
|
'
|
||||||
|
Me.cbxAccount.AutoSize = True
|
||||||
|
Me.cbxAccount.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.cbxAccount.Location = New System.Drawing.Point(16, 19)
|
||||||
|
Me.cbxAccount.Name = "cbxAccount"
|
||||||
|
Me.cbxAccount.Size = New System.Drawing.Size(52, 17)
|
||||||
|
Me.cbxAccount.TabIndex = 126
|
||||||
|
Me.cbxAccount.Text = "Login"
|
||||||
|
Me.cbxAccount.UseVisualStyleBackColor = True
|
||||||
|
'
|
||||||
|
'lblLohnNr
|
||||||
|
'
|
||||||
|
Me.lblLohnNr.AutoSize = True
|
||||||
|
Me.lblLohnNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.lblLohnNr.Location = New System.Drawing.Point(204, 125)
|
||||||
|
Me.lblLohnNr.Name = "lblLohnNr"
|
||||||
|
Me.lblLohnNr.Size = New System.Drawing.Size(48, 13)
|
||||||
|
Me.lblLohnNr.TabIndex = 128
|
||||||
|
Me.lblLohnNr.Text = "Lohn-Nr:"
|
||||||
|
'
|
||||||
|
'txtLohn
|
||||||
|
'
|
||||||
|
Me.txtLohn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.txtLohn.Location = New System.Drawing.Point(207, 141)
|
||||||
|
Me.txtLohn.Name = "txtLohn"
|
||||||
|
Me.txtLohn.Size = New System.Drawing.Size(179, 20)
|
||||||
|
Me.txtLohn.TabIndex = 127
|
||||||
|
'
|
||||||
|
'TabControl1
|
||||||
|
'
|
||||||
|
Me.TabControl1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||||
|
Me.TabControl1.Location = New System.Drawing.Point(6, 19)
|
||||||
|
Me.TabControl1.Name = "TabControl1"
|
||||||
|
Me.TabControl1.SelectedIndex = 0
|
||||||
|
Me.TabControl1.Size = New System.Drawing.Size(546, 242)
|
||||||
|
Me.TabControl1.TabIndex = 123
|
||||||
|
'
|
||||||
|
'dgvData
|
||||||
|
'
|
||||||
|
Me.dgvData.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvData.BackgroundColor = System.Drawing.Color.White
|
||||||
|
Me.dgvData.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvData.Location = New System.Drawing.Point(6, 19)
|
||||||
|
Me.dgvData.Name = "dgvData"
|
||||||
|
Me.dgvData.Size = New System.Drawing.Size(546, 242)
|
||||||
|
Me.dgvData.TabIndex = 124
|
||||||
|
'
|
||||||
|
'frmMitarbTimas
|
||||||
|
'
|
||||||
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||||
|
Me.BackColor = System.Drawing.Color.WhiteSmoke
|
||||||
|
Me.ClientSize = New System.Drawing.Size(570, 919)
|
||||||
|
Me.Controls.Add(Me.GroupBox3)
|
||||||
|
Me.Controls.Add(Me.GroupBox2)
|
||||||
|
Me.Controls.Add(Me.GroupBox1)
|
||||||
|
Me.Controls.Add(Me.btnCancel)
|
||||||
|
Me.Controls.Add(Me.btnOK)
|
||||||
|
Me.Controls.Add(Me.Panel1)
|
||||||
|
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||||
|
Me.Name = "frmMitarbTimas"
|
||||||
|
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||||
|
Me.Text = "frmMitarbDetails"
|
||||||
|
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
Me.Panel1.ResumeLayout(False)
|
||||||
|
Me.Panel1.PerformLayout()
|
||||||
|
Me.GroupBox2.ResumeLayout(False)
|
||||||
|
Me.GroupBox2.PerformLayout()
|
||||||
|
Me.GroupBox1.ResumeLayout(False)
|
||||||
|
Me.GroupBox1.PerformLayout()
|
||||||
|
Me.GroupBox3.ResumeLayout(False)
|
||||||
|
CType(Me.dgvData, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
|
||||||
|
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||||
|
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||||
|
Friend WithEvents btnCancel As System.Windows.Forms.Button
|
||||||
|
Friend WithEvents btnOK As System.Windows.Forms.Button
|
||||||
|
Friend WithEvents Label48 As System.Windows.Forms.Label
|
||||||
|
Friend WithEvents Label47 As System.Windows.Forms.Label
|
||||||
|
Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
|
||||||
|
Private WithEvents GroupBox2 As GroupBox
|
||||||
|
Friend WithEvents GroupBox1 As GroupBox
|
||||||
|
Friend WithEvents cbxTestaccount As CheckBox
|
||||||
|
Friend WithEvents cbxGebDat As CheckBox
|
||||||
|
Friend WithEvents txtGebDat As DateTimePicker
|
||||||
|
Friend WithEvents lblgeb As Label
|
||||||
|
Friend WithEvents txtMobiltel As TextBox
|
||||||
|
Friend WithEvents Label18 As Label
|
||||||
|
Friend WithEvents txtOrt As TextBox
|
||||||
|
Friend WithEvents Label16 As Label
|
||||||
|
Friend WithEvents txtPlz As TextBox
|
||||||
|
Friend WithEvents Label14 As Label
|
||||||
|
Friend WithEvents txtStrasse As TextBox
|
||||||
|
Friend WithEvents Label13 As Label
|
||||||
|
Friend WithEvents rbtnGeschlechtW As RadioButton
|
||||||
|
Friend WithEvents rbtnGeschlechtM As RadioButton
|
||||||
|
Friend WithEvents txtNname As TextBox
|
||||||
|
Friend WithEvents Label5 As Label
|
||||||
|
Friend WithEvents txtVname As TextBox
|
||||||
|
Friend WithEvents Label2 As Label
|
||||||
|
Friend WithEvents txtLohn As TextBox
|
||||||
|
Friend WithEvents lblLohnNr As Label
|
||||||
|
Friend WithEvents cbxAccount As CheckBox
|
||||||
|
Friend WithEvents TextBox2 As TextBox
|
||||||
|
Friend WithEvents Label7 As Label
|
||||||
|
Friend WithEvents txtCard As TextBox
|
||||||
|
Friend WithEvents lblCard As Label
|
||||||
|
Friend WithEvents txtInfo As TextBox
|
||||||
|
Friend WithEvents lblInfo As Label
|
||||||
|
Friend WithEvents lkl As LinkLabel
|
||||||
|
Friend WithEvents Label8 As Label
|
||||||
|
Friend WithEvents txtPwd As TextBox
|
||||||
|
Friend WithEvents Label6 As Label
|
||||||
|
Friend WithEvents txtTelNr As TextBox
|
||||||
|
Friend WithEvents cbxEinsteigsDat As CheckBox
|
||||||
|
Friend WithEvents Label30 As Label
|
||||||
|
Friend WithEvents datEinstiegsdatum As DateTimePicker
|
||||||
|
Friend WithEvents datGekuendigtAm As DateTimePicker
|
||||||
|
Friend WithEvents cbxGekuendigt As CheckBox
|
||||||
|
Friend WithEvents txtEmail As TextBox
|
||||||
|
Friend WithEvents Label20 As Label
|
||||||
|
Friend WithEvents txtDurchwahl As TextBox
|
||||||
|
Friend WithEvents Label19 As Label
|
||||||
|
Friend WithEvents txtUsername As TextBox
|
||||||
|
Friend WithEvents Label3 As Label
|
||||||
|
Private WithEvents GroupBox3 As GroupBox
|
||||||
|
Friend WithEvents TabControl1 As TabControl
|
||||||
|
Friend WithEvents dgvData As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||||
|
End Class
|
||||||
835
UID/Mitarbeiter/frmMitarbTimas.resx
Normal file
835
UID/Mitarbeiter/frmMitarbTimas.resx
Normal file
@@ -0,0 +1,835 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<root>
|
||||||
|
<!--
|
||||||
|
Microsoft ResX Schema
|
||||||
|
|
||||||
|
Version 2.0
|
||||||
|
|
||||||
|
The primary goals of this format is to allow a simple XML format
|
||||||
|
that is mostly human readable. The generation and parsing of the
|
||||||
|
various data types are done through the TypeConverter classes
|
||||||
|
associated with the data types.
|
||||||
|
|
||||||
|
Example:
|
||||||
|
|
||||||
|
... ado.net/XML headers & schema ...
|
||||||
|
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||||
|
<resheader name="version">2.0</resheader>
|
||||||
|
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||||
|
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||||
|
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||||
|
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||||
|
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||||
|
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||||
|
</data>
|
||||||
|
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||||
|
<comment>This is a comment</comment>
|
||||||
|
</data>
|
||||||
|
|
||||||
|
There are any number of "resheader" rows that contain simple
|
||||||
|
name/value pairs.
|
||||||
|
|
||||||
|
Each data row contains a name, and value. The row also contains a
|
||||||
|
type or mimetype. Type corresponds to a .NET class that support
|
||||||
|
text/value conversion through the TypeConverter architecture.
|
||||||
|
Classes that don't support this are serialized and stored with the
|
||||||
|
mimetype set.
|
||||||
|
|
||||||
|
The mimetype is used for serialized objects, and tells the
|
||||||
|
ResXResourceReader how to depersist the object. This is currently not
|
||||||
|
extensible. For a given mimetype the value must be set accordingly:
|
||||||
|
|
||||||
|
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||||
|
that the ResXResourceWriter will generate, however the reader can
|
||||||
|
read any of the formats listed below.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.binary.base64
|
||||||
|
value : The object must be serialized with
|
||||||
|
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.soap.base64
|
||||||
|
value : The object must be serialized with
|
||||||
|
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
|
||||||
|
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||||
|
value : The object must be serialized into a byte array
|
||||||
|
: using a System.ComponentModel.TypeConverter
|
||||||
|
: and then encoded with base64 encoding.
|
||||||
|
-->
|
||||||
|
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||||
|
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||||
|
<xsd:element name="root" msdata:IsDataSet="true">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:choice maxOccurs="unbounded">
|
||||||
|
<xsd:element name="metadata">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||||
|
<xsd:attribute ref="xml:space" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="assembly">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:attribute name="alias" type="xsd:string" />
|
||||||
|
<xsd:attribute name="name" type="xsd:string" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="data">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||||
|
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||||
|
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||||
|
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||||
|
<xsd:attribute ref="xml:space" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
<xsd:element name="resheader">
|
||||||
|
<xsd:complexType>
|
||||||
|
<xsd:sequence>
|
||||||
|
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||||
|
</xsd:sequence>
|
||||||
|
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
</xsd:choice>
|
||||||
|
</xsd:complexType>
|
||||||
|
</xsd:element>
|
||||||
|
</xsd:schema>
|
||||||
|
<resheader name="resmimetype">
|
||||||
|
<value>text/microsoft-resx</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="version">
|
||||||
|
<value>2.0</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="reader">
|
||||||
|
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
<resheader name="writer">
|
||||||
|
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||||
|
</resheader>
|
||||||
|
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||||
|
<data name="PictureBox1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAABAQAAADDCAYAAAAVxcPwAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
|
||||||
|
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAADM2SURBVHhe7d154H37XO9xwzEdU+YkyTkoTbiHUBwl
|
||||||
|
SoUIpUw3R4YrGaKruA0iEnUJodwIR6au6WSI7jnIPEbI1HF0UYbrZJ5yX2+n7eyzf6/9/X7ea6+9Pp/1
|
||||||
|
Wc8/Hv98fr/v2u/1Xp+19+fzXmt91tm+/vWvAwAAAACAhbGNAAAAAACgb7YRAAAAAAD0zTYCAAAAAIC+
|
||||||
|
2UYAAAAAANA32wgAAAAAAPpmGwEAAAAAQN9sIwAAAAAA6JttBAAAAAAAfbONAAAAAACgb7YRAAAAAAD0
|
||||||
|
zTYCAAAAAIC+2UYAAAAAANA32wgAAAAAAPpmGwEAAAAAQN9sIwAAAAAA6JttBAAAAAAAfbONAAAAAACg
|
||||||
|
b7YRAAAAAAD0zTYCAAAAAIC+2caMs/3g7wAAAABYhnPJMXJ9uaP8pjxCniR/LafIO+RU+Vf59H/6knx9
|
||||||
|
hlbxh09I7Nc75Y1ysrxQniWx/38g95Pbyo3k6nIZOYe4XA7i5mTAULYxw3VSAAAAALN2fjle7i6Pl5j8
|
||||||
|
xmT4q+Imztjuy/J+eYn8kdxBvkcGFQrcnAwYyjYeRJ3wluI6ei1xgl1ejjhZMMh3yhfF5bqGO4mLsxX/
|
||||||
|
VVzc6MO3iDvuc/Q/xe0jxhe/S6urSR+X98kb5GUSV5GeKA+Vu8pPy/fLhcUdNyzDA8T1pRY9Rdw+YP4u
|
||||||
|
ITHOj8n/2+Vr4voAxhO/E8+TKLpcVtxxOYKbowFD2caDqBOeXd4krlPX8mQ54mTBICeKy3EN75GjxMXZ
|
||||||
|
CgoCfaMggCnFwPBV8hi5s1xTjhZ3PNGPi8vp4vpEi/5Doojl9gXzc6z8hrxG4ti6Y47pvFaiWHwhccfr
|
||||||
|
G9wcDRjKNh5GHfHHxXXiWuILLG67OeKEQco1xOW3lluIi7MlFAT6RkEAtcUdW/9HHijXltaLpMh7tLhj
|
||||||
|
37J4ZtrtC+YhCo0nSEw+3fFFff8uj5RLyxHH0M3PgKFsYwl1xhiguA5cy3PliBMGKXFlyuW2hri9Nu5G
|
||||||
|
cXG2hIJA3ygIoDWfkli46kdkDt+RONgVJB4xcce6ddcVt09oV9yN8hCJ7xF3TNGez8pvyXnkm8fSzc2A
|
||||||
|
oWxjCXXGa4nruDUdJ988WZByc3E5rSVWrnVxtoaCQN8oCKBl/yTx3On5xB1ztO/Z4o7tHPy9uH1Ce+I7
|
||||||
|
IiaVMbl0xxLte7dcTb5xTN3cDBjKNpZSh4xFMFynrSVW7lz/AkSZeH3Me8XltIaXiouzRRQE+kZBAHPw
|
||||||
|
Ubmb8DjBvPyguOM5Jz8jbt/Qjh+VeDOAO36Yl3ht4+3EzsuAoWxjKXXIeG6/tQVI4jbKzS9DHOwe4nJZ
|
||||||
|
yzcroDNAQaBvFAQwJ2+Wq4g7/mjPK8Udxzl5l5xT3P6hrigQxuvt3HHDvN3fzcuAoWxjhjplrPDvOmst
|
||||||
|
r5bNL0VsFxOeT4jLZQ3PEBdnqygI9I2CAOYmFiH8ZXF9AO24ibjjN0d3FLePqCdeY3qKuOOFPtzHzcuA
|
||||||
|
IWxjhjrk5aS1BXF+Sja/HOE9XFwOa/iKxAJLLs5WURDoGwUBzNWDxfUD1BdXbuPKujtuc3SasI5FOy4h
|
||||||
|
bxd3rNCXm7u5GZBlGzPUGcOj1jpnC94qrL58uMtLXE1yOazhceLibBkFgb5REMCcURRoU9zB4Y7XnN1X
|
||||||
|
3L5iWnFnQDw65I4R+nO6XMHNz4AM25ihjhguJa2tXPpzsv4liSP9lbjc1fA5se9abRwFgb5REMDc3V5c
|
||||||
|
f0Ad55dYBNIdqzn7pPT0fTlH55AXiTs+6Fe8Mvwcbo4GlLKNGeqEK78nrqPW8h5hxeXtrikub7XEe3Fd
|
||||||
|
nK2jINA3CgKYu8/Ld4vrE5je/xB3nHrw++L2GdPouW/hYCe4ORpQyjZmqBOuxMC5pcXpwi/Jeow4Uyy+
|
||||||
|
6HJWw5yvLFAQ6BsFAfTg9RJXD12/wHQuKZ8Rd4x68AWZ451+Pbi6fFXccUH/4q6j87t5GlDCNmaoA66L
|
||||||
|
Z8hcR60lFro5t2zGuXS3EJevWub87CEFgb5REEAvThDXLzCdx4g7Nj15orh9x/7Eax/fJu54YDnu6eZp
|
||||||
|
QAnbmKEOuC5Wmf0XcR21ll+VzTiXLAok7xOXqxo+LHNenZiCQN8oCKAXc/+unbsrSbxJxx2bnsRV6thX
|
||||||
|
lwPsx38TdyywLKcKawlgENuYoc63qbXVc+M2mguIi3WJ7ikuT7XM/aoVBYG+URBAT+4qrm9g/54r7pj0
|
||||||
|
6DnicoDxRZGvx0UqMcxPurkacBjbmKHOtykW8nuvuI5ay/3Fxbo0MbmJ5/Vdjmp4t8x94UcKAn2jIICe
|
||||||
|
xHcur+Sd3g+JOx49u4a4XGBc9xCXfyzTU91cDTiMbcxQ53PilX+uo9byaelpYD/UI8Tlp5afFRfnnFAQ
|
||||||
|
6BsFAfQmJqeuf2B/WlrEdyp/Jy4XGE8sFNrSI6Co73Q5t5uvAQexjRnqeE5cgXiruM5ay1xfazeWy8uX
|
||||||
|
xOWmhlj1uocrVRQE+kZBAL15nLj+gf24mbjjsAQ/IS4nGEfk1+Udy3Y9N18DDmIbM9TxtrmRuI5ay2fl
|
||||||
|
UuJiXYK/EpeXWn5UXJxzQ0GgbxQE0JtY+JfHBqYRj8S9R9xxWIK4MMTrLvfnRHF5x7I9yM3XgIPYxgx1
|
||||||
|
vIOcLK6z1hIDYhdn764pLh+1vFRcnHNEQaBvFATQo6uK6yMY193E5X9JflFcbrCbWEzw8+JyjmV7mZuv
|
||||||
|
AQexjRnqeAe5trjOWkvcMv8d4mLtVVwJau35xauJi3WOKAj0jYIAenQvcX0E44m3G31MXP6X5AMSrzt2
|
||||||
|
OcJwPyMu38Cn3XwNOIhtzFDHO8zzxXXYWp4kLs5e3VJcHmp5hrg454qCQN8oCKBHzxbXRzCe3xGX+yWK
|
||||||
|
lfBdjjDcE8XlGgjf4eZswDa2MUOd7jDfJ/8hrsPW8FW5orhYexNV+ajOuzzU8BW5grhY54qCQN8oCKBH
|
||||||
|
/ySuj2Ac3yqxbpHL/RL9q8QdEy5XGOb94nINhBu6ORuwjW3MUKcr8ZfiOmwtscCei7M39xa3/7X0uLo1
|
||||||
|
BYG+URBAj74mR4vrJ9jdn4rL+5L9trhcIe8y4nIMrJzg5mzANrYxQ52uRLzy7sviOm0NccdCT8+xOxeR
|
||||||
|
T4nb/xriasmlxcU6ZxQE+kZBAL26urh+gt18l8SdiC7nS/YZuYS4nCHnZ8XluHVflLfLs+QRcl/5Bbmh
|
||||||
|
xOLX3yOXk/jdnUqMS79TYqHVa8lPye3kPvJH8hx5s8xtAccHujkbsI1tzFCnK/UYcZ22lheJi7MXjxS3
|
||||||
|
37U8WFycc9dKQeBh4n7ssJueXs9GQQDrbi+un2A3zxOX7xpebtpqepS4nCHnIeLy25p/kyfLCRKFsjm/
|
||||||
|
gvKcciWJMd9TpKULbs6fujkbsI1tzFCnKxVVuNaeqYu3ILhY5+4YaemOjE9ITK5crHPXSkEgFrBy8QEr
|
||||||
|
rRQEbiybhZceXFziCtdN5XfldeL2vxX3F9dPMNx1xOW6hg/JeeSNa221xbgk7hh1uUO5uKDl8tuCuAM3
|
||||||
|
imI/JjGJdvH3IM6tn5N3ictDbS9wczZgG9uYoU6X0VpV82Rxcc5d3I7l9reWXxMXZw8oCGAuWikI/Ii4
|
||||||
|
+HoUBYK45dTlobboDy5mDBN3E71GXK5ruINEXHG+uX+v5WmymTvkfFBcbmv7e4mFxF3MvTpKWrsjN5zs
|
||||||
|
5mzANrYxQ50uI66itHabzY+Li3Wu4q4Ht5+1nCbnExdrDygIYC4oCNRzW2nprq3wTHGxYphbiMtzDe+U
|
||||||
|
9duzW7qiHFeQryLruUO5uDIdi4K63Nb0dInJsYt5CX5PXF5qeZubswHb2MYMdbqsXxfXeWuJ2+l6eU44
|
||||||
|
9iMqtG4/a7mjuFh7QUEAc0FBoK5YPMvlo5ZXiYsTeTEReq+4PNdwE1mPL67atjSJ/BtZjw/l4tXNLqc1
|
||||||
|
vUJ6fjygRIy/Iw8uPzVQEECKbcxQp8uKq8UfEdeBa7mZuFjn5pbi9q+WeLaq94oxBQHMBQWB+uKVty4n
|
||||||
|
NbxNXIzI+xVxOa7h1eJifJK4/1/L9cTFiYNdX1w+a4m1wWKVfhfr0sQjYnEHjMvT1E51czZgG9uYoU43
|
||||||
|
xF3EdeBaYuI659VPw7nlA+L2r5abi4u1JxQEMBcUBOqLq3utDBjfLS5G5FxQYjV1l+MaYmFDF+e3SUuv
|
||||||
|
Tnu99PQWl6ncRlw+a3mouDiX6iRxeZoaBQGk2MYMdboh4qrx+8V14lrm/gqme4vbr1pihe0l/NhTEMBc
|
||||||
|
UBBowyni8jK1U8XFh5yWnh1+obgYV+L1v+7vaon36bs4sV1LY70vSbxBzMW5VDGXcLma2ofcnA3YxjZm
|
||||||
|
qNMNdWtxnbiWKFDEVXYXa+suKq0t1riUQT8FAcwFBYE23E9cXqb2f8XFh3IxGfqcuPxOLe48+X5xca5c
|
||||||
|
SD4u7u9reI8seSG6IX5fXC5riKvhLsYlu5y4XE2NOwSQYhsz1OmGilv03yquI9dyV3Gxtu6Pxe1PLS8W
|
||||||
|
F2ePKAhgLigItOF4cXmZ2qfFxYdyfyYutzX8pbgYN91D3N/XcidxccJr5Xs8nCAuxqX7pLh8TYmCAFJs
|
||||||
|
Y4Y63S5+SlxHruWjMrdX5B0rLb3OKq5SXE1crD2iIIC5oCDQhkuKy8vUKAjs5sryVXG5nVqMAUoXdos7
|
||||||
|
IVt6ZDPuVOn51cRje6K4PNbAYoLem8Tla0oUBJBiGzPU6Xb1SnGduZa4ndPF2arniNuPWk4UF2evKAhg
|
||||||
|
LigItCHWVmlhIhkFcBcfysTz+i6vNTxKXIzb3ErcdmqJ11G7OHGkJ4vL4dQ+Ji4+tLGw4D+5ORuwjW3M
|
||||||
|
UKfb1Q+L68y1fELiOTsXa2tay11cpYhVtF2svaIggLmgINCOuDrvcjMlFhUcrpXHPkK89u0S4uLcJopS
|
||||||
|
bxC3vRrifLiIuFhxVq28upT1A7Z7nricTemtbs4GbGMbM9TpxtBSpT3MYXIVP+ivFRd/LY8VF2vPKAhg
|
||||||
|
LigItKOFgsD7xMWGg7U2mR763d9SUSM8XFycOKsWJpshe1fKkhwnN6vsOm7OBmxjGzPU6cbwA9LKu5nD
|
||||||
|
Z+Ti4mJtxc+Ji72WuEqxxNfPUBDAXFAQaMe/i8vNlN4oLjYcrKXb7eONARcQF2eJli7GfEG+XVycOFMr
|
||||||
|
BYFYnNLFh4m4ORkwlG3McJ10oKeJ+9Kp5RHi4mxBLAr0QXFx1xLvN3ax9o6CAOaCgkA7XF6m9nJxsWG7
|
||||||
|
1hbku6e4OEt9r7SyMGL4c3Fx4kytFARuIS4+TMTNyYChbGOG66QDxbPnLa2WH9XqbxMXa22/Ji7mWmLd
|
||||||
|
hW8RF2vvKAhgLigItCGu6Lq8TO1Z4uLDdi29si/WgIgChYszIybhbvs1RHEi3t7g4sQZWikIxCMnLj5M
|
||||||
|
xM3JgKFsY4brpDt4nLgvnloeLy7Omi4q/09cvLVEgcLFugQUBDAXFATaELdFu7xM7Y/FxQfvwhLFb5fL
|
||||||
|
Gm4vLs6suPDxeXGfUcNfi4sTZ2ilIBB3l7j4MBE3JwOGso0ZrpPuIJ5Bb+mH6SvS2qr5MYhzsdZymiz5
|
||||||
|
HcKtFASwu97fqUxBoA3XEZeXqS25kDvEQ8TlsYZ/kHOIi3OIeOTPfU4t1xYXJ9opCPT+e9k8NycDhrKN
|
||||||
|
Ga6T7uih4r58anmquDhrOFZaeqwi/JK4WJeCgkA/KAhMY+kFgbuIy8vUbikuPhzpMhKPEbo81nBjcXEO
|
||||||
|
Fa9ajgUK3WfVcIq4ONFOQeCy4uLDRNycDBjKNma4TrqjeBa9hVcyrcTbD1q5Neo54mKs5V1yTnGxLgUF
|
||||||
|
gX5QEJjG0gsCrTyzzS2/5Z4kLoc1vEpcjLtqaX2E8NPi4ly6VgoCNdeNit9qFxPO6lQ3bwMc25ihDrcP
|
||||||
|
9xfXuWuJL2AX55Rauc10Xbzr1MW6JBQE+kFBYBpLLgjEO+zjMSuXlynF43DnEhcjzur75Gvi8ljDD4uL
|
||||||
|
c1etvUHh7TLmYxG9oCBAQaAUBQEUs40Z6nD7EM+kf1RcB6/lmuJinUIMIl8vLq5aXisu1qWhINAPCgLT
|
||||||
|
WHJB4HricjK1t4iLD0d6kbgc1vACcTGO5VbiPreW24mLc8koCFAQKEVBAMVsY4Y63L7cTVwHr+VvxcU5
|
||||||
|
hVuLi6mmGNi6WJeGgkA/KAhMY8kFgZeIy8nU/kRcfDir64vLXw3x+GLcreDiHEtcfHiDuM+vYaxXK/aE
|
||||||
|
ggAFgVIUBFDMNmaow+1L3M7Y0u1rocZA9jzyz+LiqeVvxMW6RBQE+kFBYBpLLQjcVlw+avh5cTHiTDE5
|
||||||
|
fpO4/NXwFHFxji3eL+8+v5Z7iotzqSgIUBAoRUEAxWxjhjrcPt1GXCev5XXi4tyn+4qLpZa4SnFVcbEu
|
||||||
|
EQWBflAQmMYSCwK3kFbeEBPrB8Q79V2cONMviMtfDdF3Licuzn14obg4aviEXFBcnEtEQYCCQCkKAihm
|
||||||
|
GzPU4fYpFpSJhWVcR6/lJuJi3YeLSUtvXAhPFxfrUlEQ6AcFgWksqSAQfep/ictDLS8TFyvOFLepf1Bc
|
||||||
|
/mqIc9fFuS/xBoqvioulhgeJi3OJKAhQEChFQQDFbGOGOty+xft2XUev5W0y1cq3jxIXQy1xleJYcbEu
|
||||||
|
FQWBflAQmEaPBYF4j3sUcK8s8bq0B8jJEndUuRzUFI8uuH3Ame4lLnc1fEYuLi7OfWrl9Zjhs3IpcXEu
|
||||||
|
DQUBCgKlKAigmG3MUIebwqvFdfZaYpE/F+eYriit3GK68hhxsS4ZBYF+UBBA7+L261iXxvUPnCEmOp8U
|
||||||
|
l78afltcnPt2afmcuJhqYPxxBgoCFARKURBAMduYoQ43heuK6+y1xGKHR4mLdSzPFffZtUSF/lvFxbpk
|
||||||
|
FAT6QUEAvftNcX0DZ/oDcbmr4d/kAuLinMLviYurhrhAcgVxcS4JBQEKAqUoCKCYbcxQh5vKSeI6fC13
|
||||||
|
EhfnGK4j7jNrioGBi3XpKAj0g4IAevYROb+4voEzXFa+IC5/NfyquDinEov5RVHCxVbDieLiXBIKAhQE
|
||||||
|
SlEQQDHbmKEON5VY2b6l5zFPk/OKi3UX8aqj14v7zFriNlNWpfYoCPSDggB6djNx/QJnerK43NUQrxtu
|
||||||
|
4R38vyIuvlquJi7OpaAgQEGgFAUBFLONGepwU3qGuE5fSyw85OLcRaxP4D6rpvuIixUUBHpCQQC9eqK4
|
||||||
|
PoEz/YC0dNGhlcUfzyXvExdjDUt/SwYFAQoCpSgIoJhtzFCHm1I8P9bSq3DGfr4v7jiIqwLus2rZ150Q
|
||||||
|
vaAg0A8KAujRK6SFK82te7G4/NUQr1ue6m1GJW4pLs5ari8uziWgIEBBoBQFARSzjRnqcFN7vLiOX8sD
|
||||||
|
xcU5xK+L+4yafklcrDgDBYF+UBBAb14uNRelm4sbiMtfLfHqShdnLfEo4+vExVrDGyVicrH2joIABYFS
|
||||||
|
FARQzDZmqMNNLV6F09KiP5+Wi4iLNSPeMxzbcp9Ry7vknOLixRkoCPSDggB68iThzoDDxZX4t4jLYQ2v
|
||||||
|
FBdnba297elW4uLsHQUBCgKlKAigmG3MUIeroaXXAoWHiYsz40/EbbsmFqE6HAWBflAQQA9iEdjbiOsD
|
||||||
|
OFI8q+/yWMsPiYuzBS8QF3MN75V9v/65RRQEKAiUoiCAYrYxQx2uhrgi39LV9M9J3LngYi1xJfmKuG3X
|
||||||
|
8lpxseKsKAj0g4IA5uyLEoXli4o7/jjSeeRUcfms4fni4mzFlaWldZzuIi7OnrVSELiMuPimQEGgDAUB
|
||||||
|
FLONGepwtfymuBOglhiIuThL/G9x26zpeHGx4qwoCPSDggDm6KPyUNmlKL1UvyYupzXEGw6+V1ycLfkz
|
||||||
|
cfHXEH3/aHFx9qqVgkDN30sKAmUoCKCYbcxQh6vl/BI/Bu4kqOHL8h3iYj1Ia8/lhZPExYojURDoBwUB
|
||||||
|
zMUH5XHyE8I6L8PELc+fEpdfzMcDxB3fXrVSELiKuPimQEGgDAUBFLONGepwNd1d3ElQy5PFxblNrJIb
|
||||||
|
q+W6bdUSVylqftHPTSsFgVjHIga4GK6l13ztAwWBfsSCr4+WHxMKAsM8QlxuMS/x+OjFxB3jHrVSELiR
|
||||||
|
uPimQEGgDAUBFLONGepwNcUKynGlxJ0INcSzdfGMnYvV+UVx26npaeJihddKQeB3xMUHrFAQ6NO/yR/K
|
||||||
|
seKOO450OYk1F1w+MT+PFHece9RKQeCO4uKbAgWBMhQEUMw2ZqjD1XY7cSdCLc8WF+em80pLixmFeOzh
|
||||||
|
GHHxwqMggLmgINC3uLvrqUJh4HCRJ5dDzFO8inrII5tz1EpB4OHi4ptC3M3n7vJrxZvE5WxqFARQzDZm
|
||||||
|
qMPVFl8M7xB3MtRyNXGxrvt1cX9b0y4LIy4VBQHMBQWBZfiSPEjiDjrXD5buqhLFE5c7zNdfiDvevWml
|
||||||
|
IPAScfGhnddzUhBAMduYoQ7XgpuKOxlqebG4OFcuLi29NjF8Vi4lLl5sR0EAc0FBYFneLJcX1xeW7G/F
|
||||||
|
5Qvz9jWZw1sadtVKQeCT0vu6O0M9QVzOpkZBAMVsY4Y6XCteI+6EqCXeHuDiDHEl3v1NTXFFycWKg1EQ
|
||||||
|
wFxQEFiej8s1xPWHJfpxcXlCH+LKrDvuPWmlIBD4bvHicQqXr6lREEAx25ihDteK64k7IWp5pbg4v0ti
|
||||||
|
8UH3N7V8Qi4kLl4cjIIA5oKCwDKdLnGbvOsTSxJXM98uLkfoxw+LO/69aKkg8BBxMS7dY8Xla2oUBFDM
|
||||||
|
Nmaow7UkbtV3J0Ut7rUszxf3f2u6t2zGiTIUBDAXFASW62PyreL6xVLcXlxu0JdXizv+vXi6uP2u4SNy
|
||||||
|
lLg4lyzWV3D5mhoFARSzjRnqcC2JxfzcSVHLW+TssoqvtbsYwmlyHlnPI8pREMBcUBBYtnh2fv33aEnO
|
||||||
|
J/Fb5/KC/txEXD/owePF7XMttxUX51KdU+KuW5erqVEQQDHbmKEO15pnijsxarmlRFwxEGvlVSTrYkK7
|
||||||
|
mUOUoyCAuaAggHhNr+sbvbufuHygT++UXhe8+0Nx+1zLhyQKbi7WJfoJcXmqgYIAitnGDHW41lxRWnpG
|
||||||
|
/10SFcOoorp/r+kfhVVid0NBAHNBQQBxlXxpryO8qLT2Vh/s3x3E9Ye5a/GV1bGqvot1iU4Rl6MaKAig
|
||||||
|
mG3MUIdr0RPFnRy13E2iiur+raafEZc/lKMggLmgIIBwR3H9o1ePFJcH9C2KX+cV1yfmLO7ycftb293F
|
||||||
|
xbskdxaXm1ooCKCYbcxQh2vRZeQL4k6QGr5i2mqL1zS63CGHggDmgoIAwrY34PTo8vJlcXlA/+4jrl/M
|
||||||
|
2Q3E7WsLHiBLvev0ZtLadw0FARSzjRnqcK1q7Tmr1hwvLm/IoSCAuaAggJVLi+sjvWlpRXZMLxZ3+xZx
|
||||||
|
fWOujhG3r614lcQC3y72HsX6CQ+W/xCXj5ooCKCYbcxQh2vVxYTnBr2TxOUMeRQEMBcUBLASr+BzfaQn
|
||||||
|
x4nbdyxLTNZc/5ireM1fS+tkbfNCibc99LpmSRSa7imnitv/FlAQQDHbmKEO17IHijtJliyqmFcRly/k
|
||||||
|
URDAXLRSELixxGCqB/Fu/++U75d4rWwsHvsgiaLrp8TtfwseK66P9OQV4vYdy/I56e2OmHiLgtvXFsX3
|
||||||
|
4DPkrnJliUW23T61Lu4E+CG5r7xMviRuf1tCQQDFbGOGOlzLLiAfE3eiLNXTxOUKw1AQwFy0UhD4EXHx
|
||||||
|
9SYGvvG87/PF5aGmuK3XxdyLnxS331imPxXXT+bqRHH7OQdflLdJ7MMfyD0kXs/9o/Jf5FiJQuuq6Hph
|
||||||
|
cTkYKuYFsd2LSxRzw/fJVeW6EmsBnCCxHsLj5cXyQWnxkYDDvNPN2wDHNmaow7XuV8WdKEsUC57E82cu
|
||||||
|
TximlYIA9ieOsTv2c0NBoJ64K+J0cfmo4cPi4uxBLGr2DnH7jWWKW+zjldSuv8zRvcXtJ7Du9W7eBji2
|
||||||
|
MUMdrnXx/FLLz/hM6dHicoThKAj0j4LAuJZYEAhxBexr4nIytXjzjYuxB/FaRbfPWLZniesvc/SD4vYR
|
||||||
|
WPcKN28DHNuYoQ43B3cQd7IsyWflkuLyg+EoCPSPgsC4lloQCPHsvstJDT0u9hXP+f6LuP0Fri6u38xN
|
||||||
|
LCzIotk4zHPdvA1wbGOGOtwcxC2E/yjuhFmK3xWXG+yGgkD/KAiMa8kFgXhkq5VnUeM5WhfjnP2GuH0F
|
||||||
|
wsvF9Zs5ijse3D4CK49y8zbAsY0Z6nBzEQuFuBNmCeJdvBcUlxfshoJA/ygIjGvJBYHwBnF5mVpvBYFY
|
||||||
|
JIyrpjjMDcX1n7m5jbj9A1bu4eZtgGMbM9Th5uR14k6a3t1LXD6wOwoC/aMgMK6lFwQeKS4vU+utINBK
|
||||||
|
/0bb3iJnF9eH5iRWy49HQd0+AuF4N28DHNuYoQ43JzEQdSdNzz4kPT4r2goKAv2jIDCupRcE4pVWLi9T
|
||||||
|
66kgEK8qi7fouP0ENt1aXD+am78Qt39AfB8e7eZtgGMbM9Th5ual4k6eXsWCii4PGAcFgf5REBjX0gsC
|
||||||
|
NxKXl6n1VBB4prh9BJz3y7nE9aU5iXfnu/0DXuXmbMA2tjFDnW5ujhN38vTonRILKro8YBwUBPpHQWBc
|
||||||
|
Sy8IXFdcXqbWS0HgGuL2r6ZYt+eyEjleuu+VL4rLU013F9ef5uYl4vYPy3Y/N2cDtrGNGep0c/RscSdQ
|
||||||
|
b24qbv8xHgoC/aMgMK6lFwRauaoXkzUX39ycLG7/arqzuFiX6sHi8lTTRyWew3fxzsm1xO0fliveZHM5
|
||||||
|
N2cDtrGNGep0c/Rd8lVxJ1Iv/l7cvmNcFAT6R0FgXBQEfF6m1kNB4Mbi9q2mNwt35p3V0fJhcfmq6X+I
|
||||||
|
i3duni5u/7BML3LzNeAgtjFDHW+u/lzcidSLuC3V7TfGRUGgfxQExkVBwOdlanMvCBwl8Vic27eari0u
|
||||||
|
3qX7eXH5qunfJV5X6eKdk0sLr9zEynXdfA04iG3MUMebq3i+7wviTqa5e5G4fcb4KAj0j4LAuCgI+LxM
|
||||||
|
be4FgTuJ26+aniIuVpzhFHF5q+mPxcU6N78gbv+wLCe5uRpwGNuYoc43Z628D3pM8ezQD4jbX4yPgkD/
|
||||||
|
KAiMi4KAz8vU5lwQiFvQPyJuv2qJq82XEhcvzhBjk9Ye14zXs11OXLxz82Rx+4hl+Lxc0c3VgMPYxgx1
|
||||||
|
vjmLW8VOF3dizdVTxe0r9oOCQP8oCIyLgoDPy9TmXBB4oLh9quk+4mLFWT1GXP5q+ktxsc7NeeWN4vYR
|
||||||
|
/buHm6cBJWxjhjrg3P2WuBNrjqLSfXlx+4n9oCDQPwoC46Ig4PMytbkWBC4hcTXe7VMt75Ie3ms/hYtK
|
||||||
|
vJbR5bGWnu6sjPPjfeL2E/060c3RgFK2MUOdcO7itTMfF3eCzc2jxe0j9oeCQP8oCIyLgoDPy9TmWhD4
|
||||||
|
E3H7U9MNxcUK767i8lhTT2svfbu8X9x+oj+vkHO7ORpQyjZmqBP24F7iTrI5+axcUtz+YX8oCPSPgsC4
|
||||||
|
KAj4vExtjgWBK0rcCef2p5bniosV251T3iounzUdLy7eOYqiQNy54vYT/ThJjnbzMyDDNmaoI/bg3HKa
|
||||||
|
uJNtLn5X3L5hvygI9I+CwLgoCPi8TG2OBYHniNuXWuJNRb0sSDe164jLaU2vERfrXF1YXipuXzF/8Zt+
|
||||||
|
lJubAVm2MUOdsRdzntjF83gXFLdf2C8KAv2jIDAuCgI+L1ObW0HgWuL2o6bfFhcrypwoLq813UxcrHMV
|
||||||
|
d2PEBaOvidtfzM+/yk3dnAwYyjZmqFP2Ir4053p7VTzy4PYJ+0dBoH8UBMZFQcDnZWpzKwi8Stx+1PLP
|
||||||
|
cj5xsaLMZSQed3T5rSXGgUeJi3fOoqD2j+L2GfMQj0vFGioXETsnA4ayjRnRKTtyc3EnYctOlXjkwe0P
|
||||||
|
9o+CQP8oCIyLgoDPy9TmVBC4qbh9qCnGCy5W5NxfXH5rOkFcrHMXY8V7y6fE7TfaFI8mPUGOkW8eTzcn
|
||||||
|
A4ayjRnrnbMDZ5fXizshW3V7cfuCaVAQ6B8FgXFREPB5mdpcCgJxtfbd4vahlngu28WKvPNIayvif1h6
|
||||||
|
vvsj1haIQkzceu72H234B4kCzsXkiOPo5mTAULYxw3XSmbu+uBOzRe+Qc4jbD0yDgkD/KAiMi4KAz8vU
|
||||||
|
5lIQuIu4+GuJ23a/W1ysGObG4nJd0/3ExdqTuGPgF+VlwhoD9X1R4hWCvyGHfse4ORkwlG3McJ20Ay8X
|
||||||
|
d7K25ibi4sd0KAj0j4LAuCgI+LxMbQ4FgQvIR8XFX8sfiosVu/kbcfmuJW6rn9s6G7u4tPyyvEBOF5cT
|
||||||
|
jOvjEncbPVRuIKm7UtycDBjKNma4TtqBa4g7eVvyanGxY1oUBPpHQWBcFAR8XqY2h8nOb4mLvZYoTlxI
|
||||||
|
XKzYzZUk7r5wea/lYeJi7V0ssn2c3FkeL68UHi8YJu68iLW+/k7+XOJRjbiYFwtqutwXc3MyYCjbmOE6
|
||||||
|
aSfiGasYMLXqvOLixrTiljt3fNCPXhbtjKsPbv+m1uMK3hkx2HZ5mVqsmePia0ncIeBir+VocXFiHPH6
|
||||||
|
ZJf3Wnid81lF/4/CzfFya7mPPFyeJM+Uk+QUeZt8QKKI8Ok1c30sIe6YWO3DaRJrmrxJTpbnydPlsfJA
|
||||||
|
iUecYsHRa8uxsrfxg5uTAUPZRgAAAAAA0DfbCAAAAAAA+mYbAQAAAABA32wjAAAAAADom20EAAAAAAB9
|
||||||
|
s40AAAAAAKBvthEAAAAAAPTNNgIAAAAAgL7ZRgAAAAAA0DfbCAAAAAAA+mYbAQAAAABA32wjAAAAAADo
|
||||||
|
m20EAAAAAAB9s40AAAAAAKBvthEAAAAAAPTNNgIA0Lp3nO1sADBHd5b/Lk+Qrx/iAxL/NxwjbntTmnPs
|
||||||
|
LTlOVrn5lLj8rVvP5XHuNxEYyjYCANA6DYp29SZxA6+DPEvctsYQ23afOUQM1leDx4uI+7yxDcnnuhgU
|
||||||
|
u+0eZtfPDTHJcds+TOaY/a24bZQY0jcyE7CYnLhtbIr+5P5+KmMc613ssv+3kjHO8dXE0H3Gvswp9oeJ
|
||||||
|
+2xnl3NyiPgujv0vKQCUiG0d434fgQzbCABA6zQQ2kVm0Lhu6KS1xFiDRCe2HYPHfRYHxog/JqZu29vE
|
||||||
|
PrntZGU/dyUmOG57zi4ToSG5jaKQ25ZTmseheRpD9F0X05SG7P8NZF+FjKGFrFJzjD0T7y7nZFbsr4th
|
||||||
|
DE9wv5FAKdsIAEDrNAgaqvRq6Db7mBTF1Vz3Wfuwj0HwrjldyUwSxvrMoUWe7AQ1rrK67Rxml/2MCZ3b
|
||||||
|
5qaSq79D8zSWyJ+LaypD9r/ktvpdxVXufRT65hj7VOdkRsQU++k+f0xRnORRAgxiGwEAaJ0GP0Nlruo6
|
||||||
|
+5hQTz3ZiatoYz7TW3qF+TBx54bbvjPWlcuYDLvtHyZ7zIZOfHbpG6W3RJfcgTA0T2MZelfPWDL7H8d6
|
||||||
|
X1fWnfhOG+t8nnPsU52TpabOZZzHFAWQZhsBAGidBj5DjDGpyExaS9WY7Iw5EB/j+eIQg2e3/U1jFSDC
|
||||||
|
0AJP5piV7peza9847Cpo6R0I+yiEZexayNtV6d0rQyeBMZmLHIch51N85q4T3DnHHqY6J0sNyUX8zSqX
|
||||||
|
Q45FnCcXcb+ZwDa2EQCA1mnQkzXWLeb7GEhmBn4x6F0NGHcZOIZvDB7FxZRRcoW5RGzHbX/dWMdxJbbn
|
||||||
|
Pucw2WPmtlFi6LFdiWPstrsS/cf93aaheRrLZp/fJlM4iNy6bTil50n2eMVdHNtymy0G7dLPwpxjD1Od
|
||||||
|
kyXicR33udscFE82l6wpgBTbCABA6zToyRrzCuMYk+iV2Jb7DOewCXNMXLKT87gi5bZVauoJ+q4T5HUl
|
||||||
|
BQgnc8zCYVfpt8l+zjbRL9z2Q8mz4kPzVEOm/x+UlyH2MQnO3gY/9K6fOccepjonS2XuDijph9kCA48O
|
||||||
|
oJhtBACgdRrwZGQHu4cZczCZGTSXTN5jYJxdxGqX/YnBrNvmUAfdmj32Z5U+Y78pO9GJY+K2c5js52wT
|
||||||
|
k+RtMZQUWHYtGk0lW5w6rPiUkT1WJRPqlcwCf5m3S6zMOfaVqc7JUpkCdGksB33/Re7i31d4HSGK2UYA
|
||||||
|
AFqnAU+p0klC5spiZkB8mEyxIgZ6bhubYoCZvXXabadE6ZWw0vxuy+3YdyKEoccxc8x2yW3mcw7j9jX6
|
||||||
|
ifu/m0r7XW2ZV7uNeddD9nyL/+u2s02m72f3a86xr5vqnCzlPneb0jsj4lgx6cfobCMAAK3TYKhE6WA3
|
||||||
|
BqKZWzLHHFCWXKFdyVzRzL73OrPtdSXxx/8pLRxsy23J52SuRoa4qug+6zCZYza06BAyn1Nic+JRelV1
|
||||||
|
aJ6mlpkUDr07xInJmfuMbTKv11wpLaiFzLk859jXTXVOlnKfu03Ennpcwv0mAkPZRgAAWucGSUbpBGE1
|
||||||
|
yM0MXKPYsPl5WbENt20ne/Uss+0QEwO3nYOUfkYch9KJh9vPkr+NCV52cjPkGGbzOnQynf2cEpu3/pee
|
||||||
|
H0PyVEOtSeE+r7CvZPYt0+fmHPu6zHf3FAWuzD6vxPkZ32FRnHbb/Cb3mwgMZRsBAGidGyRtKL3iv36l
|
||||||
|
cIqB67rYhtu2M+Q57n1PkErjj/+XuXV4/Sphyd/FZCCusJXehRAiN+v7UipzzMLQyXTp52T2OaxPNkr6
|
||||||
|
x9A8TW2qQs2m7GJvQwpvIbMuSOlV/DnHvi7z3RKmKHBli5PbxPkX2wrfjNv9JgJD2UYAAFq3GhhtEQOn
|
||||||
|
0itf67dqll4xDWNcYcx83pDBeGYgPqTgUBr/aiDr/s1ZnxSUTFpXuclcJRx6/DID/aFXVEMmt5njvCqA
|
||||||
|
xd+5f980Rj+fwlSFmk2ZczgM/dzMlfzS74o5x75uqnMyI3KV+T7K+MYCgu53ERjCNgIA0DoNiA5SOtDd
|
||||||
|
HHxmJhVjXDnNXN0d8mztkIliRslkfX0AXvL/w2oSWjLQX8WdvUo49Apx5pgNKbKslORq1QezV3qj4FLa
|
||||||
|
18e6kr5vmcntGOfuSmmfDrt8bmZyWXqVfc6xr5vqnMzKnpdDRL+/iPuNBErZRgAAWqdB0DalgzB3pWjq
|
||||||
|
W09LB8rx/9zfHyYz4M8OlGPf3XY2rW+3dNIWcWceFYhtZ64ShiEFlpCZ3Ay52rlS8jnruc0sqBh9vzRf
|
||||||
|
u/bxqWT6+qrgNIZMfxj6uaXn2krppHrOsa+b6pwcIn6PMvENEdu/gfudBErYRgAAWqcBkBODz9LbU2Og
|
||||||
|
5raRGbwNnVSGTPFh6NU5t61tsu8AL73CvD4AL/2bOAYlE7z1bWcmxLH91d9lZAtGQ/tH6ees738URsae
|
||||||
|
eAztd1PLTjrHuush+7lDJ6Ol583Ktu+2dXOOfd1U5+SuSouhu6AogEFsIwAArdPgxykddB00+c3cfjp0
|
||||||
|
kBzib902nSFX57ID8ey+lOZ6fQAek1b3f4bYfMQhc4V46G3DmWM2tOgQSj9nc3KTia9Ept9lHk9xsv1v
|
||||||
|
XXZSGJNht52sbH/OTnZXspPJkv2bc+zrpjonxxLxZnNSKvaPxweQZhsBAGidBj6bMlefDxp0ZgZrQyeW
|
||||||
|
IVN4GHJFM3PFPGSvnJXE7wbg0eb+b0ZsY/WoQJjqamfmmO27b7jcRh5K75Apkel3ux7XXa7c1poUTjWp
|
||||||
|
zuS29K6OOce+bqpzcl+i745ZJGCxQaTZRgAAWqeBz7qxJ0KldplcZAbK2atm8f8z23frKRymZPtuAJ4Z
|
||||||
|
wG+zOaHP3g0xdPKZyenQokMYmtsQz2C7/z9Eab/LXqF3sn18Xa1JYcTsPmOb9SJWqZiIu21tU9rv5hz7
|
||||||
|
uqnOySnF+RSxZu56WnmT+70EDmIbAQBonQY+67JXw8c0ZHKZmUANuWqWzUd2oFwav9tutLn/W8q9DSFz
|
||||||
|
dS0mEJt/XyI76R3SL8IuuV0ZMpHYlOl3ux7TIX18Xc1JYeazh1xlzxbQMhP3Occepjona8oWVT7gfi+B
|
||||||
|
g9hGAABap4HPSvbq8NiGTDAyE6iY7LptbJMdJMekIHt1tjR+NwDPDnDXRaxu0pCZAA+9Qpw5ZhGn20aJ
|
||||||
|
XXK7skuOVzL9Ljvx25Tt4+tqTwozfS/7XRF93W1nm4PWRnHmHHvIfPfvck4eJvY18uNs3rk25Psn9TjB
|
||||||
|
5m8lcBjbCABA6zTwCTGRrfGowLohA7zMBCrzHHdMdjJX/cI+3/vt/jZ7q/K6GGDvur2hk8/MMRvSJ1ZK
|
||||||
|
P+ewIs6ud81k+l30oc2JUMYuk/T4exe/s49JYebz3d0tB8ku1Ji9wj7n2ENmorzLOXmYbFFqn8eJOwSQ
|
||||||
|
ZhsBAGidBj6h5qMCK0MmGZlJe+nV+9RVpP80dJBcEv9Bt4FnrkyubJuQZK+GZya66zKFpxjAu22U2DW3
|
||||||
|
K9krtJtK+11tUxVqtsnmufTW++z5PKTPzTn2sM87HLIy3w8l5++6THHlWe73EjiIbQQAoHUa+GRuF40B
|
||||||
|
agwIS2ULDZkrnJlB+EEDxxicR6yZCdG62PaQSV/p1bDIufv7kJ0wxCR521W1yIH7m22G7HP8jdvWNkOL
|
||||||
|
DmPkdl02NyvZCUtNUxVqDpL5voi+fNjEOntO71LomGvsU52TpbLnWkzyt32nrcv+Ft3Z/V4CB7GNAAC0
|
||||||
|
TIOeGAyWTgSGDDizg83MRCNTyNiXocWAUDrwPWgAns3BQY81ZCYgQye62Xhr5nZdxFFyx8Gm0oJDbdnz
|
||||||
|
tPQKd1bEkX10KSZ668cxikFx/LPHa5dzOcw19uw5uauSR6uyeQyRy83fjygURFt2e7xhAIPYRgAAWqaB
|
||||||
|
T+kkMAaoJVdhnBisum06maJD9ur42IZekVspjf+ggX7plfBwWLyZScjQiW7mmA0tOoQxcrtpyGsISwsO
|
||||||
|
tWUnhbtMnA8TfXpI8WUXuxYDVuYY+9Tfo5EjF8e6zPfa2OL4Hed+L4HD2EYAAFqlQU9mErB55SUjc6tm
|
||||||
|
ZhKYKTSMKa42jTHRK4m/JB8lE5D4PwcVdLID8KH7nzlmQ4sOYazcbsrEH/Y5cR7TVIWaUlNOrOOW8zGP
|
||||||
|
09xiz/bpXWT6TtyFMlUeV+LzKAZgMNsIAECLNOiJQWTpYCsmwJuDtYwoJrjtblMywI3/4/52nyJfuxRG
|
||||||
|
1pXGXzIpLrnL47DbdPdxjDZlj9nQosOYud0UkxS3LWeKifNYMpPCXQo1GVHAyiwCN0TJ7etDzCX2qb9H
|
||||||
|
s31nijyuxOcc434vgVK2EQCAFv3n4McNipxdnxfOXn0uGegOuX17iFURYIw7AtaVxl/yuYdN5ksebSgp
|
||||||
|
KqxETtw2DhP74ra3zZCiQxgzt05prqaaOO9qqkLNUPF5Y1/FjnNmaP/KaD327Dm5q6F9J/5uX4WBOD63
|
||||||
|
cr+TQJZtBACgRRoAxaCyxBhXoYLb9jYlBYj4P+5vx+I+c0yl8ZcM/KPg4v52pWTthzjO7m+doX3isDg3
|
||||||
|
uW2UGDO3TuTTbW9T7K/7+9ZEHlz820wxkXZWx9VN6kpEgWas77OsVmPPnpO72rXvrPpqpoDpRBEgtsPj
|
||||||
|
ARiVbQQAoHUaFAHA3JQUfoZekd63OcfemsiTy59zxN+730RgKNsIAAAAAAD6ZhsBAAAAAEDfbCMAAAAA
|
||||||
|
AOibbQQAAAAAAH2zjQAAAAAAoG+2EQAAAAAA9M02AgAAAACAvtlGAAAAAADQN9sIAAAAAAD6ZhsBAAAA
|
||||||
|
AEDfbCMAAAAAAOibbQQAAAAAAH2zjQAAAAAAoG+2EQAAAAAA9M02AgAAAACAvtlGAAAAAADQs6+f7f8D
|
||||||
|
B3v2d44WCwAAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
|
<value>17, 17</value>
|
||||||
|
</metadata>
|
||||||
|
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
AAABAAEAYGAAAAEAGACocAAAFgAAACgAAABgAAAAwAAAAAEAGAAAAAAAgHAAAMQOAADEDgAAAAAAAAAA
|
||||||
|
AAB6TSF6TSFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSF6TSF6TSFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSFnNQJnNQJmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBtPAttPAtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBtPAtt
|
||||||
|
PAtwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwDLv7j////////////39fR0
|
||||||
|
SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////////////////////////////
|
||||||
|
//+AXUJmMwBmMwBmMwBmMwDUy8X///////////90SSZmMwBmMwBmMwBmMwBmMwDu6+n///////////+A
|
||||||
|
XUJmMwBmMwBmMwDd1tH///////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////39fRm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zd1tH////////////39fS3p5x0SSaYfWv////Uy8VmMwBmMwBm
|
||||||
|
MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwDm4N3////////////////Lv7hmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwD///////////////////////////////////////////////+jjH1mMwBmMwBm
|
||||||
|
MwBmMwC3p5z///////////+jjH1mMwBmMwBmMwBmMwCYfWv////////////Uy8VmMwBmMwBmMwBmMwCA
|
||||||
|
XUL39fT////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////Uy8VmMwBmMwBmMwBmMwBm
|
||||||
|
MwCMblju6+n////////////////////////////////d1tH////39fRmMwBmMwBmMwBmMwBmMwBwQRFw
|
||||||
|
QRFwQRFwQRFmMwBmMwBmMwBmMwD///////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwDm4N3////////////////////////////////////////////Bs6pmMwBmMwBmMwBmMwCMblj/////
|
||||||
|
///////Bs6pmMwBmMwBmMwBmMwDLv7j///////////+jjH1mMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||||
|
//+YfWtmMwBmMwBmMwBmMwBmMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwB0SSbu6+n/////////
|
||||||
|
///////////////Lv7jd1tH///////////////+jjH1mMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
|
||||||
|
MwBmMwCMblj////////////u6+n////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////
|
||||||
|
//+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////m4N1mMwBm
|
||||||
|
MwBmMwB0SSb39fT////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////////////////////
|
||||||
|
//////////////////////////+MblhmMwBmMwBmMwBmMwC3p5z///////////////+tmo1mMwBmMwBm
|
||||||
|
MwBmMwDBs6r////////////Bs6pmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwCtmo3/////
|
||||||
|
//////+3p5zUy8X///////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////Uy8VmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3////////39fRmMwBmMwBmMwCtmo3/////
|
||||||
|
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////////////////////////
|
||||||
|
//////////90SSZmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwDUy8X/////////////////
|
||||||
|
///////m4N1mMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwDBs6r///////////+jjH2AXUL/
|
||||||
|
///////39fSAXUJmMwBmMwBmMwBmMwBmMwB0SSb////////////////////////////////////////m
|
||||||
|
4N1mMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////////////////////////////+3p5xmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////////////////////////m4N1mMwBm
|
||||||
|
MwBmMwBmMwBmMwDd1tH///////////+tmo1mMwBmMwC3p5z///////////////////////////+AXUJm
|
||||||
|
MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwDm4N3///////////90SSZmMwDBs6r////////Uy8Vm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwD39fT///////////////////////////////////////9mMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwCjjH3///////////////////////////////////////////////+3p5xmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwDu6+n////////Lv7hmMwBmMwC3p5z////////////Bs6pmMwBmMwBmMwBmMwBmMwDU
|
||||||
|
y8X////////////Bs6pmMwBmMwCYfWv///////////////////////////+3p5xmMwBmMwBmMwBwQRFw
|
||||||
|
QRFwQRFwQRFmMwBmMwBmMwD39fT////////39fRmMwBmMwB0SSb39fT///////+jjH1mMwBmMwBmMwBm
|
||||||
|
MwBmMwDUy8X///////////////////////////////////////+MblhmMwBmMwBmMwBmMwBmMwCAXUL/
|
||||||
|
//////////////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCY
|
||||||
|
fWv///////////+MblhmMwDLv7j///////////+jjH1mMwBmMwBmMwBmMwBmMwC3p5z////////////u
|
||||||
|
6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
|
||||||
|
MwCMblj////////////d1tFmMwBmMwBmMwCtmo3////////u6+lmMwBmMwBmMwBmMwBmMwC3p5z/////
|
||||||
|
///////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT////////m4N1m
|
||||||
|
MwBmMwBmMwBmMwBmMwC3p5z////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////d
|
||||||
|
1tFmMwDm4N3///////////90SSZmMwBmMwBmMwBmMwBmMwCAXUL///////////////+3p5xmMwBmMwBm
|
||||||
|
MwBmMwBmMwDBs6r////d1tG3p5yMblhmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwCjjH3/////////
|
||||||
|
///Bs6pmMwBmMwBmMwBmMwDm4N3///////+3p5xmMwBmMwBmMwBmMwCMblj////////////m4N1mMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////90SSZmMwBmMwBmMwBm
|
||||||
|
MwCjjH3///////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSbu6+n///////+3p5z/////////
|
||||||
|
///39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Bs6p0SSZmMwBmMwC3p5z/////
|
||||||
|
///////39fR0SSZmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwDBs6r///////////+3p5xmMwBmMwBm
|
||||||
|
MwBmMwCYfWv///////////+AXUJmMwBmMwBmMwBmMwD/////////////////////////////////////
|
||||||
|
//////////+jjH1mMwBmMwBmMwBmMwC3p5z/////////////////////////////////////////////
|
||||||
|
///d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3////////////////////////Uy8VmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////////////////////////+3p5xmMwBm
|
||||||
|
MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwDUy8X///////////+MblhmMwBmMwBmMwBmMwBmMwDLv7j/
|
||||||
|
///////d1tFmMwBmMwBmMwBmMwDm4N3///////////////////////////////////////////+3p5xm
|
||||||
|
MwBmMwBmMwBmMwCMblj////////////////////////////////////////////u6+mAXUJmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwC3p5z////////////////////////////////////Bs6pmMwBmMwBmMwBmMwBmMwBwQRFw
|
||||||
|
QRFwQRFwQRFmMwBmMwD39fT///////////90SSZmMwBmMwBmMwBmMwBmMwCAXUL///////////+3p5xm
|
||||||
|
MwBmMwBmMwDBs6r////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwB0
|
||||||
|
SSb////////////////////////////////////m4N23p5x0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwCAXUL39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCA
|
||||||
|
XUK3p5zm4N3///////////////+3p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFw
|
||||||
|
QRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFwQRFwQRFmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBwQRFwQRFtPAttPAtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBtPAttPAtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBnNQJnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||||
|
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJnNQJ6TSF6TSFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSF6TSF6TSFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFwQRFw
|
||||||
|
QRFwQRFwQRFwQRFwQRFwQRFwQRF6TSF6TSH/////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
///////////////////////////////////////R0e+rq+Krq+Krq+Krq+LR0e//////////////////
|
||||||
|
//////////+rq+Krq+Krq+Krq+Krq+Ld3fP////d3fOrq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Kr
|
||||||
|
q+K4uOb////////////////////////////d3fOrq+Krq+Krq+Krq+L////////////////Fxeqrq+Kr
|
||||||
|
q+Krq+L////////////p6ferq+Krq+Krq+Krq+Krq+L///////////////+4uOarq+Krq+Krq+Krq+Lp
|
||||||
|
6ff///////////+4uOarq+Krq+Krq+LR0e////////////////////////+rq+Krq+Krq+Krq+LR0e//
|
||||||
|
///////////////////////FxeoDA70DA70DA70DA71sbND///////////////////////////8DA70D
|
||||||
|
A70DA70DA70DA73Fxer////R0e8DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72Ojtn0
|
||||||
|
9Pv////////////////R0e8DA70DA70DA70DA73p6ff///////////9ZWcsDA70DA70DA73R0e//////
|
||||||
|
///d3fMDA70DA70DA70DA70DA7309Pv///////////9+ftQDA70DA70DA70DA72rq+L///////////9+
|
||||||
|
ftQDA70DA70DA72Ojtn////////////////////R0e8DA70DA70DA70DA72Ojtn/////////////////
|
||||||
|
//////////9sbNADA70DA70DA70DA73R0e/////////////////////p6fcDA70DA70DA70DA70DA73p
|
||||||
|
6ff////09PsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ERMfd3fP/////////
|
||||||
|
///09PsDA70DA70DA70DA73Fxer///////////8pKcIDA70DA70DA71sbND///////////8pKcIDA70D
|
||||||
|
A70DA70DA73R0e////////////+dnd0DA70DA70DA70DA72dnd3///////////+dnd0DA70DA70DA71Z
|
||||||
|
Wcv///////////////////+OjtkDA70DA70DA70DA71ZWcv////////////////////////////R0e8D
|
||||||
|
A70DA70DA70DA71+ftT////////////////////R0e8DA70DA70DA70DA70pKcL///////////9ERMcD
|
||||||
|
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcLp6ff///////////9ERMcDA70D
|
||||||
|
A70DA72rq+L////////p6fcDA70DA70DA70DA70DA73R0e////////9ZWcsDA70DA70DA70DA72rq+L/
|
||||||
|
//////////+4uOYDA70DA70DA70DA71sbND///////////+4uOYDA70DA70DA70DA73/////////////
|
||||||
|
///09PsDA70DA70DA70DA70DA70pKcL///////////////////////////////9sbNADA70DA70DA70D
|
||||||
|
A72rq+Krq+Krq+Krq+Krq+J+ftQDA70DA70DA70DA71ZWcv///////////9+ftQDA70DA70DA70DA73F
|
||||||
|
xer////////d3fOOjtkDA70DA70DA70DA70DA71sbND///////////9+ftQDA70DA70DA71+ftT/////
|
||||||
|
///FxeoDA70DA70DA70DA70DA71sbND///////+dnd0DA70DA70DA70DA72dnd3////////////d3fMD
|
||||||
|
A70DA70DA70DA70pKcL////////////d3fMDA70DA70DA70DA73d3fP///////////+rq+IDA70DA70D
|
||||||
|
A70DA70DA70DA73d3fP////////////////////////////R0e8DA70DA70DA70DA70DA70DA70DA70D
|
||||||
|
A70DA70DA70DA70DA70DA70DA72Ojtn///////////+dnd0DA70DA70DA70DA72rq+L/////////////
|
||||||
|
//+rq+IDA70DA70DA70DA70DA73R0e////////+dnd0DA70DA70DA71ZWcv///////+rq+IDA70DA70D
|
||||||
|
A70DA70DA70DA73R0e////+rq+IDA70DA70DA70DA71sbND///////////////8DA70DA70DA70DA70D
|
||||||
|
A73p6ff////////09PsDA70DA70DA70DA73Fxer///////////9ERMcDA70DA70DA70DA70DA70DA73F
|
||||||
|
xer///////////////////////////////9sbNADA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||||
|
A70DA70DA72rq+L///////////+4uOYDA70DA70DA70DA72Ojtn///////////////////9ZWcsDA70D
|
||||||
|
A70DA70DA71+ftT////////FxeoDA70DA70DA70DA73///////+OjtkDA70DA70DA70DA70DA70DA71s
|
||||||
|
bND////R0e8DA70DA70DA70DA70pKcL///////////////9ZWcsDA70DA70DA70DA73Fxer/////////
|
||||||
|
//9ZWcsDA70DA70DA72rq+L////////FxeoDA70DA70DA70DA70DA70DA70DA72rq+L/////////////
|
||||||
|
///////////////////R0e8DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73Fxer/
|
||||||
|
///////////d3fMDA70DA70DA70DA71ZWcv///////////////////+rq+IDA70DA70DA70DA70DA730
|
||||||
|
9Pv////d3fMDA70DA70DA70DA73d3fP///9ZWcsDA70DA70DA70DA70DA70DA70DA73R0e/09PsDA70D
|
||||||
|
A70DA70DA70DA73p6ff///////////9+ftQDA70DA70DA70DA72rq+L///////////9+ftQDA70DA70D
|
||||||
|
A71+ftT///////9sbNADA70DA70DA70DA70DA70DA70DA71+ftT/////////////////////////////
|
||||||
|
//////9sbNADA70DA70DA70pKcL09Pv///////8DA70DA70DA70DA70DA73p6ff///////////////8D
|
||||||
|
A70DA70DA70DA70pKcL////////////////////09PsDA70DA70DA70DA70DA73d3fP///////8DA70D
|
||||||
|
A70DA70DA724uOb///8pKcIDA70DA70DA70DA70DA70DA70DA71sbND///8pKcIDA70DA70DA70DA73F
|
||||||
|
xer///////////+rq+IDA70DA70DA70DA72Ojtn///////////+rq+IDA70DA70DA71ERMf////p6fcD
|
||||||
|
A70DA70DA70DA70DA70DA70DA70DA71ZWcv////////////////////////////////////R0e8DA70D
|
||||||
|
A70DA70DA724uOb////d3fMDA70DA70DA70DA70pKcL///////////////////9ZWcsDA70DA70DA70D
|
||||||
|
A73d3fP///////////////////8pKcIDA70DA70DA70DA73Fxer///////9ZWcsDA70DA70DA72dnd3p
|
||||||
|
6fcDA70DA70DA70DA71ZWcsDA70DA70DA70DA73p6fdsbNADA70DA70DA70DA72rq+L////////////F
|
||||||
|
xeoDA70DA70DA70DA71ZWcv////////////FxeoDA70DA70DA70DA7309Pudnd0DA70DA70DA70DA70p
|
||||||
|
KcIDA70DA70DA70DA7309Pv///////////////////////////////////9sbNADA70DA70DA71ERMf/
|
||||||
|
///FxeoDA70DA70DA70DA71ZWcv///////////////////9+ftQDA70DA70DA70DA73Fxer/////////
|
||||||
|
//////////9ERMcDA70DA70DA70DA724uOb///////+OjtkDA70DA70DA71+ftTFxeoDA70DA70DA70D
|
||||||
|
A724uOZsbNADA70DA70DA72Ojtmdnd0DA70DA70DA70DA72Ojtn////////////d3fMDA70DA70DA70D
|
||||||
|
A70pKcL////////////d3fMDA70DA70DA70DA73R0e8pKcIDA70DA70DA70DA72rq+IDA70DA70DA70D
|
||||||
|
A73d3fP////////////////////////////////////R0e8DA70DA70DA70DA73Fxeqrq+IDA70DA70D
|
||||||
|
A70DA72Ojtn///////////////////+rq+IDA70DA70DA70DA72rq+L///////////////////9ERMcD
|
||||||
|
A70DA70DA70DA73Fxer///////+rq+IDA70DA70DA71ERMerq+IDA70DA70DA70DA73d3fPR0e8DA70D
|
||||||
|
A70DA70DA72rq+IDA70DA70DA70DA71ZWcv///////////////8pKcIDA70DA70DA70DA73d3fP/////
|
||||||
|
//////8DA70DA70DA70DA71+ftQDA70DA70DA70DA71ERMf///8pKcIDA70DA70DA724uOb/////////
|
||||||
|
//////////////////////////////9sbNADA70DA70DA71sbNCdnd0DA70DA70DA70DA72rq+L/////
|
||||||
|
///////////////FxeoDA70DA70DA70DA71+ftT///////////////////8DA70DA70DA70DA70DA73d
|
||||||
|
3fP////////FxeoDA70DA70DA70DA71sbNADA70DA70DA70DA7309Pv///9sbNADA70DA70DA71ZWcsD
|
||||||
|
A70DA70DA70DA70pKcL///////////////9ZWcsDA70DA70DA70DA73Fxer///////////9ZWcsDA70D
|
||||||
|
A70DA70DA70DA70DA70DA70DA72rq+L///9ZWcsDA70DA70DA72dnd3/////////////////////////
|
||||||
|
///////////////FxeoDA70DA70DA70DA70pKcIDA70DA70DA70DA73Fxer////////////////////p
|
||||||
|
6fcDA70DA70DA70DA71ZWcv///////////////+4uOYDA70DA70DA70DA70pKcL09Pv////////p6fcD
|
||||||
|
A70DA70DA70DA70DA70DA70DA70DA71ERMf////////R0e8DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||||
|
A73d3fP///////////+OjtkDA70DA70DA70DA72rq+L///////////+OjtkDA70DA70DA70DA70DA70D
|
||||||
|
A70DA70DA73p6ff///+dnd0DA70DA70DA71sbND/////////////////////////////////////////
|
||||||
|
//9ERMcDA70DA70DA70DA70DA70DA70DA70DA73p6ff///////////////////////8pKcIDA70DA70D
|
||||||
|
A70DA73////////////p6fdERMcDA70DA70DA70DA72Ojtn///////////////8pKcIDA70DA70DA70D
|
||||||
|
A70DA70DA70DA71sbND///////////9sbNADA70DA70DA70DA70DA70DA70DA70DA73Fxer/////////
|
||||||
|
//+rq+IDA70DA70DA70DA71+ftT///////////+rq+IDA70DA70DA70DA70DA70DA70DA71+ftT/////
|
||||||
|
//+rq+IDA70DA70DA70pKcL///////////////////////////////////////////+4uOYDA70DA70D
|
||||||
|
A70DA70DA70DA70DA70pKcL///////////////////////////9ZWcsDA70DA70DA70DA72dnd2rq+Kd
|
||||||
|
nd0DA70DA70DA70DA70DA70DA73p6ff///////////////9sbNADA70DA70DA70DA70DA70DA70DA72d
|
||||||
|
nd3////////////R0e8DA70DA70DA70DA70DA70DA70DA70DA72rq+L////////////FxeoDA70DA70D
|
||||||
|
A70DA71ZWcv////////////FxeoDA70DA70DA70DA70DA70DA70DA73R0e/////////R0e8DA70DA70D
|
||||||
|
A70DA7309Pv///////////////////////////////////////////9ERMcDA70DA70DA70DA70DA70D
|
||||||
|
A71ZWcv///////////////////////////+OjtkDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||||
|
A70DA72rq+L///////////////////+dnd0DA70DA70DA70DA70DA70DA70DA72rq+L/////////////
|
||||||
|
//9sbNADA70DA70DA70DA70DA70DA70DA71+ftT////////////p6fcDA70DA70DA70DA70DA73/////
|
||||||
|
///////p6fcDA70DA70DA70DA70DA70DA71ERMf////////////09PsDA70DA70DA70DA73Fxer/////
|
||||||
|
//////////////////////////////////////+4uOYDA70DA70DA70DA70DA70DA72Ojtn/////////
|
||||||
|
//////////////////+rq+IDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L/////////
|
||||||
|
//////////////+rq+IDA70DA70DA70DA70DA70DA70DA73R0e/////////////////R0e8DA70DA70D
|
||||||
|
A70DA70DA70DA70DA71ZWcv///////////////8pKcIDA70DA70DA70DA73d3fP///////////8pKcID
|
||||||
|
A70DA70DA70DA70DA72rq+L///////////////9ERMcDA70DA70DA72rq+L/////////////////////
|
||||||
|
//////////////////////////9ERMcDA70DA70DA70DA70DA72rq+L/////////////////////////
|
||||||
|
///FxeoDA70DA70DA70DA70DA70DA70DA70DA71ERMerq+Ld3fP////////////////////////////d
|
||||||
|
3fMDA70DA70DA70DA70DA70DA70DA73p6ff///////////////////9sbNADA70DA70DA70DA70DA70D
|
||||||
|
A70DA73///////////////9sbNADA70DA70DA70DA724uOb///////////9ZWcsDA70DA70DA70DA70p
|
||||||
|
KcL09Pv///////////////9+ftQDA70DA70DA72Ojtn/////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////
|
||||||
|
//////////////////////////////////////////////////////////////////8AAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAA=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
</root>
|
||||||
307
UID/Mitarbeiter/frmMitarbTimas.vb
Normal file
307
UID/Mitarbeiter/frmMitarbTimas.vb
Normal file
@@ -0,0 +1,307 @@
|
|||||||
|
|
||||||
|
Imports System.DirectoryServices
|
||||||
|
Imports System.Globalization
|
||||||
|
Imports System.IO
|
||||||
|
Imports System.Net
|
||||||
|
Imports System.Net.Http
|
||||||
|
Imports System.Net.WebRequestMethods
|
||||||
|
Imports System.Security.Policy
|
||||||
|
Imports System.Text
|
||||||
|
Imports System.Text.RegularExpressions
|
||||||
|
Imports System.Windows
|
||||||
|
Imports System.Windows.Forms.VisualStyles.VisualStyleElement.StartPanel
|
||||||
|
Imports DAKOSY_Worker.DEERRE
|
||||||
|
Imports DocumentFormat.OpenXml.Spreadsheet
|
||||||
|
Imports GrapeCity.ActiveReports.ReportsCore.Tools
|
||||||
|
Imports itextsharp.text.pdf.codec.wmf
|
||||||
|
Imports Microsoft.VisualBasic.ApplicationServices
|
||||||
|
Imports Newtonsoft.Json
|
||||||
|
Imports VERAG_PROG_ALLGEMEIN
|
||||||
|
|
||||||
|
Public Class frmMitarbTimas
|
||||||
|
|
||||||
|
Public mid As Integer = -1
|
||||||
|
Public isUpdate As Boolean = False
|
||||||
|
Dim emp As cTimasEmployee
|
||||||
|
Dim timas As cTimasAPI
|
||||||
|
Dim dtTimas As New DataTable
|
||||||
|
|
||||||
|
Sub New()
|
||||||
|
|
||||||
|
' Dieser Aufruf ist für den Designer erforderlich.
|
||||||
|
InitializeComponent()
|
||||||
|
|
||||||
|
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub frmMitarbDetails_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||||
|
|
||||||
|
txtPwd.Visible = False
|
||||||
|
cbxEinsteigsDat.Checked = False
|
||||||
|
cbxGebDat.Checked = False
|
||||||
|
|
||||||
|
|
||||||
|
txtGebDat.Format = DateTimePickerFormat.Custom
|
||||||
|
txtGebDat.CustomFormat = "dd.MM.yyyy"
|
||||||
|
datGekuendigtAm.Format = DateTimePickerFormat.Custom
|
||||||
|
datGekuendigtAm.CustomFormat = "dd.MM.yyyy"
|
||||||
|
datEinstiegsdatum.Format = DateTimePickerFormat.Custom
|
||||||
|
datEinstiegsdatum.CustomFormat = "dd.MM.yyyy"
|
||||||
|
|
||||||
|
|
||||||
|
If mid > 0 Then
|
||||||
|
initMitarbeiter(mid)
|
||||||
|
Else
|
||||||
|
MsgBox("Fehler beim Laden der Daten!")
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
Private Sub initMitarbeiter(Optional _isUpdate As Boolean = True)
|
||||||
|
timas = New cTimasAPI
|
||||||
|
emp = timas.getEmployee(mid)
|
||||||
|
|
||||||
|
timas.getAllGroups(dtTimas)
|
||||||
|
|
||||||
|
initDGV(dtTimas)
|
||||||
|
|
||||||
|
isUpdate = _isUpdate
|
||||||
|
Label48.Text = emp.externid
|
||||||
|
txtUsername.Text = emp.login
|
||||||
|
txtVname.Text = emp.firstname
|
||||||
|
txtNname.Text = emp.lastname
|
||||||
|
txtPwd.Text = emp.password
|
||||||
|
If emp.gender = "male" Then rbtnGeschlechtM.Checked = True
|
||||||
|
If emp.gender = "female" Then rbtnGeschlechtW.Checked = True
|
||||||
|
|
||||||
|
If emp.birthdayDate = "null" Then
|
||||||
|
cbxGebDat.Checked = False
|
||||||
|
Else
|
||||||
|
cbxGebDat.Checked = True : txtGebDat.Text = emp.birthdayDate
|
||||||
|
End If
|
||||||
|
txtStrasse.Text = emp.street
|
||||||
|
txtLohn.Text = emp.pnr1
|
||||||
|
txtPlz.Text = emp.zipcode
|
||||||
|
txtCard.Text = emp.card
|
||||||
|
txtOrt.Text = emp.city
|
||||||
|
txtInfo.Text = emp.info
|
||||||
|
'cboNiederlassung.changeItem(mitarbeiter.mit_niederlassung)
|
||||||
|
'cboAbteilung.changeItem(mitarbeiter.mit_abteilung)
|
||||||
|
txtTelNr.Text = emp.phone1
|
||||||
|
txtEmail.Text = emp.email
|
||||||
|
txtMobiltel.Text = emp.phone2
|
||||||
|
|
||||||
|
'txtPersonalNr.Text = emp.pnr1
|
||||||
|
|
||||||
|
cbxAccount.Checked = emp.loginActive
|
||||||
|
|
||||||
|
If emp.entryDate = "null" Then
|
||||||
|
cbxEinsteigsDat.Checked = False
|
||||||
|
Else
|
||||||
|
cbxEinsteigsDat.Checked = True : datEinstiegsdatum.Text = emp.entryDate
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
If emp.exitDate <> "null" Then
|
||||||
|
cbxGekuendigt.Checked = True
|
||||||
|
datGekuendigtAm.Text = emp.exitDate
|
||||||
|
Else
|
||||||
|
cbxGekuendigt.Checked = False
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
|
||||||
|
Me.Close()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
|
||||||
|
Dim newMid As Integer = 0
|
||||||
|
If txtVname.Text = "" And txtNname.Text = "" Then MsgBox("Bitte geben Sie einen Namen ein!") : Exit Sub
|
||||||
|
getMitarbeiter()
|
||||||
|
Me.Refresh()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub getMitarbeiter()
|
||||||
|
|
||||||
|
emp.login = txtUsername.Text
|
||||||
|
emp.password = txtPwd.Text
|
||||||
|
If rbtnGeschlechtM.Checked Then emp.gender = "male"
|
||||||
|
If rbtnGeschlechtW.Checked Then emp.gender = "female"
|
||||||
|
emp.firstname = txtVname.Text
|
||||||
|
emp.lastname = txtNname.Text
|
||||||
|
If cbxGebDat.Checked Then emp.birthdayDate = txtGebDat.Text Else emp.birthdayDate = "null"
|
||||||
|
emp.street = txtStrasse.Text
|
||||||
|
emp.zipcode = txtPlz.Text
|
||||||
|
emp.street = txtOrt.Text
|
||||||
|
|
||||||
|
emp.phone1 = txtTelNr.Text & " " & txtDurchwahl.Text
|
||||||
|
emp.email = txtEmail.Text
|
||||||
|
emp.phone2 = txtMobiltel.Text
|
||||||
|
emp.info = txtInfo.Text
|
||||||
|
|
||||||
|
|
||||||
|
If cbxEinsteigsDat.Checked Then emp.entryDate = datEinstiegsdatum.Text Else emp.entryDate = "null"
|
||||||
|
If cbxGekuendigt.Checked Then emp.exitDate = datGekuendigtAm.Text Else emp.exitDate = "null"
|
||||||
|
|
||||||
|
'mitarbeiter.mit_TESTonly = cbxTestaccount.Checked
|
||||||
|
If checkMandatoryFields() Then
|
||||||
|
timas.updateEmployee(emp, dgvData)
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub Label8_Click_1(sender As Object, e As EventArgs)
|
||||||
|
txtPwd.Visible = True
|
||||||
|
Label8.Visible = False
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub btnSave_Click(sender As Object, e As EventArgs)
|
||||||
|
If txtVname.Text = "" And txtNname.Text = "" Then MsgBox("Bitte geben Sie einen Namen ein!") : Exit Sub
|
||||||
|
getMitarbeiter()
|
||||||
|
If isUpdate Then
|
||||||
|
emp.ID = mid
|
||||||
|
'If UID.updateMitarbeiter(mitarbeiter) Then Me.Close()
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs)
|
||||||
|
datEinstiegsdatum.Enabled = cbxEinsteigsDat.Checked
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs)
|
||||||
|
txtGebDat.Enabled = cbxGebDat.Checked
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub cbxGekuendigt_CheckedChanged(sender As Object, e As EventArgs)
|
||||||
|
datGekuendigtAm.Enabled = cbxGekuendigt.Checked
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub cboNiederlassung_SelectedIndexChanged(sender As Object, e As EventArgs)
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub Button5_Click(sender As Object, e As EventArgs)
|
||||||
|
Dim frmBenutzerBerGruppen As New frmBenutzerBerGruppen(mid, 3, "DISPO")
|
||||||
|
frmBenutzerBerGruppen.Show(Me)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub lkl_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles lkl.LinkClicked
|
||||||
|
If vbYes = MsgBox("Möchten Sie das Kennwort wirklich zurücksetzen? " & vbNewLine & "Der Benutzer wird beim nächsten Login zur Eingabe aufgefordert.", vbYesNoCancel) Then
|
||||||
|
' txtPwd.Text = "0000"
|
||||||
|
getMitarbeiter()
|
||||||
|
emp.password = "null"
|
||||||
|
If checkMandatoryFields() Then
|
||||||
|
timas.updateEmployee(emp, Nothing)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Private Function checkMandatoryFields() As Boolean
|
||||||
|
|
||||||
|
|
||||||
|
If Not cbxEinsteigsDat.Checked Or emp.entryDate = "" Then
|
||||||
|
MsgBox("Einstiegsdatum prüfen!")
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
|
||||||
|
If CDate(emp.entryDate).ToShortDateString <= DateTime.Parse("01/01/2000") Then
|
||||||
|
MsgBox("Einstiegsdatum darf nicht vor 01.01.2000 liegen!")
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
If emp.firstname = "" Or emp.lastname = "" Then
|
||||||
|
MsgBox("Vor- und Nachnamen angeben!")
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
|
||||||
|
If emp.info = "" Then
|
||||||
|
MsgBox("Firma/Info angeben!")
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Sub initDGV(dt As DataTable)
|
||||||
|
|
||||||
|
|
||||||
|
If dtTimas.Columns.Count > 0 Then
|
||||||
|
|
||||||
|
If TabControl1.TabCount = 0 Then
|
||||||
|
For Each row As DataRow In dt.DefaultView.ToTable(True, "groupType").Rows
|
||||||
|
Dim TabIndex As Integer 'Anzahl der erstellten Tabs, bei keinem Tab ist der Index 0
|
||||||
|
TabIndex = TabControl1.TabCount
|
||||||
|
TabControl1.TabPages.Add(row("groupType"))
|
||||||
|
If TabIndex = 0 Then
|
||||||
|
Dim tab As TabPage = Me.TabControl1.SelectedTab
|
||||||
|
Dim dv = New DataView(dt)
|
||||||
|
dv.RowFilter = "groupType = '" & tab.Text & "'"
|
||||||
|
dgvData.DataSource = dv
|
||||||
|
If dgvData.Columns.Count > 0 Then
|
||||||
|
With dgvData
|
||||||
|
.RowHeadersWidth = 10
|
||||||
|
.Columns("id").Visible = True
|
||||||
|
.Columns("name").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||||
|
.Columns("groupType").Visible = False
|
||||||
|
.Columns("info").Width = 200
|
||||||
|
.Columns("set").Width = 20
|
||||||
|
.Columns("set").HeaderText = "X"
|
||||||
|
.Dock = DockStyle.Fill
|
||||||
|
|
||||||
|
For Each r As DataGridViewRow In dgvData.Rows
|
||||||
|
For Each i As cTimasGruppe In emp.Gruppen
|
||||||
|
If r.Cells("id").Value = i.Id Then r.Cells("set").Value = True
|
||||||
|
Next
|
||||||
|
Next
|
||||||
|
End With
|
||||||
|
tab.Controls.Add(Me.dgvData)
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
Next
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub PictureBox9_Click_1(sender As Object, e As EventArgs)
|
||||||
|
Dim webAddress As String = "https://zeit.verag.ag/"
|
||||||
|
Process.Start(webAddress)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub TabControl1_SelectedIndexChanged_1(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
|
||||||
|
If dgvData Is Nothing And dgvData.Rows.Count < 1 Then Exit Sub
|
||||||
|
Dim tab As TabPage = Me.TabControl1.SelectedTab
|
||||||
|
If ((Not tab Is Nothing) AndAlso (Not tab.Controls.Contains(Me.dgvData))) Then
|
||||||
|
Dim dv = New DataView(dtTimas)
|
||||||
|
dv.RowFilter = "groupType = '" & tab.Text & "'"
|
||||||
|
dgvData.DataSource = dv
|
||||||
|
If dgvData.Columns.Count > 0 Then
|
||||||
|
tab.Controls.Add(Me.dgvData)
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
End If
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
End Class
|
||||||
|
|
||||||
209
UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
generated
209
UID/Mitarbeiter/usrCntlMitarbeiter.Designer.vb
generated
@@ -31,21 +31,13 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.Button3 = New System.Windows.Forms.Button()
|
Me.Button3 = New System.Windows.Forms.Button()
|
||||||
Me.TabControl1 = New System.Windows.Forms.TabControl()
|
Me.TabControl1 = New System.Windows.Forms.TabControl()
|
||||||
Me.TabPage1 = New System.Windows.Forms.TabPage()
|
Me.TabPage1 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvVERAG = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage2 = New System.Windows.Forms.TabPage()
|
Me.TabPage2 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvATILLA = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage3 = New System.Windows.Forms.TabPage()
|
Me.TabPage3 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage4 = New System.Windows.Forms.TabPage()
|
Me.TabPage4 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvUNISPED = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage5 = New System.Windows.Forms.TabPage()
|
Me.TabPage5 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvAMBAR = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage6 = New System.Windows.Forms.TabPage()
|
Me.TabPage6 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvFRONTOFFICE = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage7 = New System.Windows.Forms.TabPage()
|
Me.TabPage7 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvVERIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.TabPage8 = New System.Windows.Forms.TabPage()
|
Me.TabPage8 = New System.Windows.Forms.TabPage()
|
||||||
Me.dgvTimasNew = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
||||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||||
Me.cbx = New System.Windows.Forms.CheckBox()
|
Me.cbx = New System.Windows.Forms.CheckBox()
|
||||||
Me.txtSuche = New System.Windows.Forms.TextBox()
|
Me.txtSuche = New System.Windows.Forms.TextBox()
|
||||||
@@ -57,27 +49,35 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.UserKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
Me.UserKopierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
Me.BerechtigungenSetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
Me.BerechtigungenSetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||||
Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||||
|
Me.dgvVERAG = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvATILLA = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvUNISPED = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvAMBAR = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvFRONTOFFICE = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvVERIMEX = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
|
Me.dgvTimasNew = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||||
Me.Panel2.SuspendLayout()
|
Me.Panel2.SuspendLayout()
|
||||||
Me.TabControl1.SuspendLayout()
|
Me.TabControl1.SuspendLayout()
|
||||||
Me.TabPage1.SuspendLayout()
|
Me.TabPage1.SuspendLayout()
|
||||||
CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage2.SuspendLayout()
|
Me.TabPage2.SuspendLayout()
|
||||||
CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage3.SuspendLayout()
|
Me.TabPage3.SuspendLayout()
|
||||||
CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage4.SuspendLayout()
|
Me.TabPage4.SuspendLayout()
|
||||||
CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage5.SuspendLayout()
|
Me.TabPage5.SuspendLayout()
|
||||||
CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage6.SuspendLayout()
|
Me.TabPage6.SuspendLayout()
|
||||||
CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage7.SuspendLayout()
|
Me.TabPage7.SuspendLayout()
|
||||||
CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.TabPage8.SuspendLayout()
|
Me.TabPage8.SuspendLayout()
|
||||||
CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
||||||
Me.Panel1.SuspendLayout()
|
Me.Panel1.SuspendLayout()
|
||||||
Me.Panel3.SuspendLayout()
|
Me.Panel3.SuspendLayout()
|
||||||
Me.ContextMenuStrip1.SuspendLayout()
|
Me.ContextMenuStrip1.SuspendLayout()
|
||||||
|
CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
|
CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||||
Me.SuspendLayout()
|
Me.SuspendLayout()
|
||||||
'
|
'
|
||||||
'Button6
|
'Button6
|
||||||
@@ -175,16 +175,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage1.Text = "VERAG"
|
Me.TabPage1.Text = "VERAG"
|
||||||
Me.TabPage1.UseVisualStyleBackColor = True
|
Me.TabPage1.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvVERAG
|
|
||||||
'
|
|
||||||
Me.dgvVERAG.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvVERAG.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvVERAG.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvVERAG.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvVERAG.Name = "dgvVERAG"
|
|
||||||
Me.dgvVERAG.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvVERAG.TabIndex = 24
|
|
||||||
'
|
|
||||||
'TabPage2
|
'TabPage2
|
||||||
'
|
'
|
||||||
Me.TabPage2.Controls.Add(Me.dgvATILLA)
|
Me.TabPage2.Controls.Add(Me.dgvATILLA)
|
||||||
@@ -196,16 +186,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage2.Text = "ATILLA"
|
Me.TabPage2.Text = "ATILLA"
|
||||||
Me.TabPage2.UseVisualStyleBackColor = True
|
Me.TabPage2.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvATILLA
|
|
||||||
'
|
|
||||||
Me.dgvATILLA.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvATILLA.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvATILLA.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvATILLA.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvATILLA.Name = "dgvATILLA"
|
|
||||||
Me.dgvATILLA.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvATILLA.TabIndex = 25
|
|
||||||
'
|
|
||||||
'TabPage3
|
'TabPage3
|
||||||
'
|
'
|
||||||
Me.TabPage3.Controls.Add(Me.dgvIMEX)
|
Me.TabPage3.Controls.Add(Me.dgvIMEX)
|
||||||
@@ -217,16 +197,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage3.Text = "IMEX"
|
Me.TabPage3.Text = "IMEX"
|
||||||
Me.TabPage3.UseVisualStyleBackColor = True
|
Me.TabPage3.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvIMEX
|
|
||||||
'
|
|
||||||
Me.dgvIMEX.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvIMEX.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvIMEX.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvIMEX.Name = "dgvIMEX"
|
|
||||||
Me.dgvIMEX.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvIMEX.TabIndex = 25
|
|
||||||
'
|
|
||||||
'TabPage4
|
'TabPage4
|
||||||
'
|
'
|
||||||
Me.TabPage4.Controls.Add(Me.dgvUNISPED)
|
Me.TabPage4.Controls.Add(Me.dgvUNISPED)
|
||||||
@@ -238,16 +208,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage4.Text = "UNISPED"
|
Me.TabPage4.Text = "UNISPED"
|
||||||
Me.TabPage4.UseVisualStyleBackColor = True
|
Me.TabPage4.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvUNISPED
|
|
||||||
'
|
|
||||||
Me.dgvUNISPED.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvUNISPED.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvUNISPED.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvUNISPED.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvUNISPED.Name = "dgvUNISPED"
|
|
||||||
Me.dgvUNISPED.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvUNISPED.TabIndex = 25
|
|
||||||
'
|
|
||||||
'TabPage5
|
'TabPage5
|
||||||
'
|
'
|
||||||
Me.TabPage5.Controls.Add(Me.dgvAMBAR)
|
Me.TabPage5.Controls.Add(Me.dgvAMBAR)
|
||||||
@@ -259,16 +219,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage5.Text = "AMBAR"
|
Me.TabPage5.Text = "AMBAR"
|
||||||
Me.TabPage5.UseVisualStyleBackColor = True
|
Me.TabPage5.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvAMBAR
|
|
||||||
'
|
|
||||||
Me.dgvAMBAR.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvAMBAR.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvAMBAR.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvAMBAR.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvAMBAR.Name = "dgvAMBAR"
|
|
||||||
Me.dgvAMBAR.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvAMBAR.TabIndex = 25
|
|
||||||
'
|
|
||||||
'TabPage6
|
'TabPage6
|
||||||
'
|
'
|
||||||
Me.TabPage6.Controls.Add(Me.dgvFRONTOFFICE)
|
Me.TabPage6.Controls.Add(Me.dgvFRONTOFFICE)
|
||||||
@@ -280,16 +230,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage6.Text = "FRONT-OFFICE"
|
Me.TabPage6.Text = "FRONT-OFFICE"
|
||||||
Me.TabPage6.UseVisualStyleBackColor = True
|
Me.TabPage6.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvFRONTOFFICE
|
|
||||||
'
|
|
||||||
Me.dgvFRONTOFFICE.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvFRONTOFFICE.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvFRONTOFFICE.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvFRONTOFFICE.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvFRONTOFFICE.Name = "dgvFRONTOFFICE"
|
|
||||||
Me.dgvFRONTOFFICE.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvFRONTOFFICE.TabIndex = 26
|
|
||||||
'
|
|
||||||
'TabPage7
|
'TabPage7
|
||||||
'
|
'
|
||||||
Me.TabPage7.Controls.Add(Me.dgvVERIMEX)
|
Me.TabPage7.Controls.Add(Me.dgvVERIMEX)
|
||||||
@@ -301,16 +241,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage7.Text = "VERIMEX"
|
Me.TabPage7.Text = "VERIMEX"
|
||||||
Me.TabPage7.UseVisualStyleBackColor = True
|
Me.TabPage7.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvVERIMEX
|
|
||||||
'
|
|
||||||
Me.dgvVERIMEX.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvVERIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvVERIMEX.Dock = System.Windows.Forms.DockStyle.Fill
|
|
||||||
Me.dgvVERIMEX.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvVERIMEX.Name = "dgvVERIMEX"
|
|
||||||
Me.dgvVERIMEX.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvVERIMEX.TabIndex = 27
|
|
||||||
'
|
|
||||||
'TabPage8
|
'TabPage8
|
||||||
'
|
'
|
||||||
Me.TabPage8.Controls.Add(Me.dgvTimasNew)
|
Me.TabPage8.Controls.Add(Me.dgvTimasNew)
|
||||||
@@ -321,16 +251,6 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.TabPage8.Text = "Zeiterfassung"
|
Me.TabPage8.Text = "Zeiterfassung"
|
||||||
Me.TabPage8.UseVisualStyleBackColor = True
|
Me.TabPage8.UseVisualStyleBackColor = True
|
||||||
'
|
'
|
||||||
'dgvTimasNew
|
|
||||||
'
|
|
||||||
Me.dgvTimasNew.AKTUALISIERUNGS_INTERVALL = -1
|
|
||||||
Me.dgvTimasNew.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
||||||
Me.dgvTimasNew.Location = New System.Drawing.Point(3, 3)
|
|
||||||
Me.dgvTimasNew.Name = "dgvTimasNew"
|
|
||||||
Me.dgvTimasNew.ReadOnly = True
|
|
||||||
Me.dgvTimasNew.Size = New System.Drawing.Size(875, 616)
|
|
||||||
Me.dgvTimasNew.TabIndex = 0
|
|
||||||
'
|
|
||||||
'Panel1
|
'Panel1
|
||||||
'
|
'
|
||||||
Me.Panel1.Controls.Add(Me.cbx)
|
Me.Panel1.Controls.Add(Me.cbx)
|
||||||
@@ -421,6 +341,87 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
|
Me.ContextMenuStrip2.Name = "ContextMenuStrip2"
|
||||||
Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4)
|
Me.ContextMenuStrip2.Size = New System.Drawing.Size(61, 4)
|
||||||
'
|
'
|
||||||
|
'dgvVERAG
|
||||||
|
'
|
||||||
|
Me.dgvVERAG.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvVERAG.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvVERAG.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvVERAG.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvVERAG.Name = "dgvVERAG"
|
||||||
|
Me.dgvVERAG.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvVERAG.TabIndex = 24
|
||||||
|
'
|
||||||
|
'dgvATILLA
|
||||||
|
'
|
||||||
|
Me.dgvATILLA.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvATILLA.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvATILLA.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvATILLA.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvATILLA.Name = "dgvATILLA"
|
||||||
|
Me.dgvATILLA.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvATILLA.TabIndex = 25
|
||||||
|
'
|
||||||
|
'dgvIMEX
|
||||||
|
'
|
||||||
|
Me.dgvIMEX.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvIMEX.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvIMEX.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvIMEX.Name = "dgvIMEX"
|
||||||
|
Me.dgvIMEX.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvIMEX.TabIndex = 25
|
||||||
|
'
|
||||||
|
'dgvUNISPED
|
||||||
|
'
|
||||||
|
Me.dgvUNISPED.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvUNISPED.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvUNISPED.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvUNISPED.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvUNISPED.Name = "dgvUNISPED"
|
||||||
|
Me.dgvUNISPED.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvUNISPED.TabIndex = 25
|
||||||
|
'
|
||||||
|
'dgvAMBAR
|
||||||
|
'
|
||||||
|
Me.dgvAMBAR.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvAMBAR.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvAMBAR.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvAMBAR.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvAMBAR.Name = "dgvAMBAR"
|
||||||
|
Me.dgvAMBAR.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvAMBAR.TabIndex = 25
|
||||||
|
'
|
||||||
|
'dgvFRONTOFFICE
|
||||||
|
'
|
||||||
|
Me.dgvFRONTOFFICE.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvFRONTOFFICE.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvFRONTOFFICE.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvFRONTOFFICE.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvFRONTOFFICE.Name = "dgvFRONTOFFICE"
|
||||||
|
Me.dgvFRONTOFFICE.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvFRONTOFFICE.TabIndex = 26
|
||||||
|
'
|
||||||
|
'dgvVERIMEX
|
||||||
|
'
|
||||||
|
Me.dgvVERIMEX.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvVERIMEX.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvVERIMEX.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvVERIMEX.Location = New System.Drawing.Point(3, 3)
|
||||||
|
Me.dgvVERIMEX.Name = "dgvVERIMEX"
|
||||||
|
Me.dgvVERIMEX.Size = New System.Drawing.Size(875, 616)
|
||||||
|
Me.dgvVERIMEX.TabIndex = 27
|
||||||
|
'
|
||||||
|
'dgvTimasNew
|
||||||
|
'
|
||||||
|
Me.dgvTimasNew.AKTUALISIERUNGS_INTERVALL = -1
|
||||||
|
Me.dgvTimasNew.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||||
|
Me.dgvTimasNew.Dock = System.Windows.Forms.DockStyle.Fill
|
||||||
|
Me.dgvTimasNew.Location = New System.Drawing.Point(0, 0)
|
||||||
|
Me.dgvTimasNew.Name = "dgvTimasNew"
|
||||||
|
Me.dgvTimasNew.ReadOnly = True
|
||||||
|
Me.dgvTimasNew.Size = New System.Drawing.Size(881, 622)
|
||||||
|
Me.dgvTimasNew.TabIndex = 0
|
||||||
|
'
|
||||||
'usrCntlMitarbeiter
|
'usrCntlMitarbeiter
|
||||||
'
|
'
|
||||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
@@ -434,25 +435,25 @@ Partial Class usrCntlMitarbeiter
|
|||||||
Me.Panel2.ResumeLayout(False)
|
Me.Panel2.ResumeLayout(False)
|
||||||
Me.TabControl1.ResumeLayout(False)
|
Me.TabControl1.ResumeLayout(False)
|
||||||
Me.TabPage1.ResumeLayout(False)
|
Me.TabPage1.ResumeLayout(False)
|
||||||
CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage2.ResumeLayout(False)
|
Me.TabPage2.ResumeLayout(False)
|
||||||
CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage3.ResumeLayout(False)
|
Me.TabPage3.ResumeLayout(False)
|
||||||
CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage4.ResumeLayout(False)
|
Me.TabPage4.ResumeLayout(False)
|
||||||
CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage5.ResumeLayout(False)
|
Me.TabPage5.ResumeLayout(False)
|
||||||
CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage6.ResumeLayout(False)
|
Me.TabPage6.ResumeLayout(False)
|
||||||
CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage7.ResumeLayout(False)
|
Me.TabPage7.ResumeLayout(False)
|
||||||
CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.TabPage8.ResumeLayout(False)
|
Me.TabPage8.ResumeLayout(False)
|
||||||
CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).EndInit()
|
|
||||||
Me.Panel1.ResumeLayout(False)
|
Me.Panel1.ResumeLayout(False)
|
||||||
Me.Panel1.PerformLayout()
|
Me.Panel1.PerformLayout()
|
||||||
Me.Panel3.ResumeLayout(False)
|
Me.Panel3.ResumeLayout(False)
|
||||||
Me.ContextMenuStrip1.ResumeLayout(False)
|
Me.ContextMenuStrip1.ResumeLayout(False)
|
||||||
|
CType(Me.dgvVERAG, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvATILLA, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvIMEX, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvUNISPED, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvAMBAR, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvFRONTOFFICE, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvVERIMEX, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
|
CType(Me.dgvTimasNew, System.ComponentModel.ISupportInitialize).EndInit()
|
||||||
Me.ResumeLayout(False)
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|||||||
@@ -226,6 +226,7 @@ Public Class usrCntlMitarbeiter
|
|||||||
.RowHeadersVisible = False
|
.RowHeadersVisible = False
|
||||||
.SelectionMode = DataGridViewSelectionMode.FullRowSelect
|
.SelectionMode = DataGridViewSelectionMode.FullRowSelect
|
||||||
.AllowUserToOrderColumns = True
|
.AllowUserToOrderColumns = True
|
||||||
|
.Columns(6).AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
|
||||||
End With
|
End With
|
||||||
|
|
||||||
|
|
||||||
@@ -824,4 +825,14 @@ Public Class usrCntlMitarbeiter
|
|||||||
End Function
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub dgvTimasNew_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvTimasNew.CellDoubleClick
|
||||||
|
Me.Cursor = Cursors.WaitCursor
|
||||||
|
'neue GUI für Änderungen im Timas
|
||||||
|
|
||||||
|
Dim frmMitarbDetails As New frmMitarbTimas()
|
||||||
|
frmMitarbDetails.mid = sender.CurrentRow.Cells(0).Value
|
||||||
|
frmMitarbDetails.Show(Me)
|
||||||
|
sender.RELOAD()
|
||||||
|
Me.Cursor = Cursors.Default
|
||||||
|
End Sub
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
|||||||
' übernehmen, indem Sie "*" eingeben:
|
' übernehmen, indem Sie "*" eingeben:
|
||||||
' <Assembly: AssemblyVersion("1.0.*")>
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
<Assembly: AssemblyVersion("1.2.1.9")>
|
<Assembly: AssemblyVersion("1.2.2.0")>
|
||||||
<Assembly: AssemblyFileVersion("1.2.1.9")>
|
<Assembly: AssemblyFileVersion("1.2.2.0")>
|
||||||
|
|||||||
@@ -1,7 +1,10 @@
|
|||||||
Imports System.Data.SqlClient
|
Imports System.Data.SqlClient
|
||||||
|
Imports System.IO
|
||||||
Imports System.Reflection
|
Imports System.Reflection
|
||||||
Imports System.Security.Cryptography
|
Imports System.Security.Cryptography
|
||||||
|
Imports com.itextpdf.text.pdf
|
||||||
Imports DocumentFormat.OpenXml.VariantTypes
|
Imports DocumentFormat.OpenXml.VariantTypes
|
||||||
|
Imports RoutineManager.cAsfinag
|
||||||
|
|
||||||
Public Class cAsfinag
|
Public Class cAsfinag
|
||||||
|
|
||||||
@@ -165,7 +168,7 @@ Public Class cAsfinag
|
|||||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKLine", PKLine))
|
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKLine", PKLine))
|
||||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("RecordType", recordType))
|
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("RecordType", RecordType))
|
||||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
|
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
|
||||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
|
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
|
||||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("cardNumber", cardNumber))
|
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("cardNumber", cardNumber))
|
||||||
@@ -812,4 +815,423 @@ Public Class cAsfinag
|
|||||||
|
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
|
Public Class Exportist
|
||||||
|
|
||||||
|
Structure Header ' Format Muss von bis Kommentar
|
||||||
|
Dim SortField As String ' N3 Y 1 3 "000"
|
||||||
|
Dim RecordID As String ' N2 Y 4 5 "00"
|
||||||
|
Dim FileName As String ' C3 Y 6 8 "TBL"
|
||||||
|
Dim LiveTestIndicator As String ' C1 Y 9 9 "L" oder "T"
|
||||||
|
Dim FileCreationDate As String ' N8 Y 10 17 YYYYMMDD
|
||||||
|
Dim FileCreationTime As String ' N4 Y 18 21 HHMM (24hr)
|
||||||
|
Dim RunNumber As String ' N3 Y 22 24 Laufende Nummer pro File-Type
|
||||||
|
Dim SenderID As String ' C2 Y 25 26 "VG"
|
||||||
|
Dim ReceiverID As String ' C2 Y 27 28 "EP"
|
||||||
|
Dim Filler As String ' C3 Y 29 31 Leerzeichen
|
||||||
|
End Structure
|
||||||
|
|
||||||
|
Structure Body ' Format Muss von bis Kommentar
|
||||||
|
Dim SortField As String ' N3 Y 1 3 "000"
|
||||||
|
Dim RecordID As String ' N2 Y 4 5 "50"
|
||||||
|
Dim ISOCountryCode As String ' N3 Y 6 8 "040" (Österreich)
|
||||||
|
Dim CardNumber As String ' C22 Y 9 30 Komplette Tankkartennummer
|
||||||
|
'onlyBlacklist
|
||||||
|
Dim StopType As String ' N1 Y 31 31 "3" Stopped for Post-Pay
|
||||||
|
'only Whitelist
|
||||||
|
Dim ValidFrom As String ' N8 Y 31 38 YYYYMMDD
|
||||||
|
Dim ValidTo As String ' N8 Y 39 46 YYYYMMDD
|
||||||
|
Dim NewCardNumber As String ' N22 N 47 68 Tankkartennummer der Folge- oder Ersatzkarte
|
||||||
|
Dim NewValidFrom As String ' N8 N 69 76 YYYYMMDD der Folge- oder Ersatzkarte
|
||||||
|
Dim NewValidTo As String
|
||||||
|
End Structure
|
||||||
|
|
||||||
|
Private Structure Trailer ' Format Muss von bis Kommentar
|
||||||
|
Dim SortField As String ' N3 Y 1 3 "999"
|
||||||
|
Dim RecordID As String ' N2 Y 4 5 "99"
|
||||||
|
Dim FileName As String ' C3 Y 6 8 "TBL"
|
||||||
|
Dim RunNumber As String ' N3 Y 9 11 Gleiche Nr. wie im Header
|
||||||
|
Dim RecordCount As String ' N7 Y 12 18 Anzahl der Sätze inkl. Header und Trailer
|
||||||
|
Dim Filler As String ' C13 Y 19 31 Leerzeichen
|
||||||
|
End Structure
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
' Private Type TWLHeader ' Format Muss von bis Kommentar
|
||||||
|
' SortField As String * 3 ' N3 Y 1 3 "000"
|
||||||
|
' RecordID As String * 2 ' N2 Y 4 5 "00"
|
||||||
|
' FileName As String * 3 ' C3 Y 6 8 "TWL"
|
||||||
|
' LiveTestIndicator As String * 1 ' C1 Y 9 9 "L" oder "T"
|
||||||
|
' FileCreationDate As String * 8 ' N8 Y 10 17 YYYYMMDD
|
||||||
|
' FileCreationTime As String * 4 ' N4 Y 18 21 HHMM (24hr)
|
||||||
|
' RunNumber As String * 3 ' N3 Y 22 24 Laufende Nummer pro File-Type
|
||||||
|
' SenderID As String * 2 ' C2 Y 25 26 "VG"
|
||||||
|
' ReceiverID As String * 2 ' C2 Y 27 28 "EP"
|
||||||
|
' Filler As String * 56 ' C56 Y 29 84 Leerzeichen
|
||||||
|
'End Type
|
||||||
|
|
||||||
|
'Private Type TWLBody ' Format Muss von bis Kommentar
|
||||||
|
' SortField As String * 3 ' N3 Y 1 3 "000"
|
||||||
|
' RecordID As String * 2 ' N2 Y 4 5 "40"
|
||||||
|
' ISOCountryCode As String * 3 ' N3 Y 6 8 "040" (Österreich)
|
||||||
|
' CardNumber As String * 22 ' N22 Y 9 30 Komplette Tankkartennummer
|
||||||
|
' ValidFrom As String * 8 ' N8 Y 31 38 YYYYMMDD
|
||||||
|
' ValidTo As String * 8 ' N8 Y 39 46 YYYYMMDD
|
||||||
|
' NewCardNumber As String * 22 ' N22 N 47 68 Tankkartennummer der Folge- oder Ersatzkarte
|
||||||
|
' NewValidFrom As String * 8 ' N8 N 69 76 YYYYMMDD der Folge- oder Ersatzkarte
|
||||||
|
' NewValidTo As String * 8 ' N8 N 77 84 YYYYMMDD der Folge- oder Ersatzkarte
|
||||||
|
'End Type
|
||||||
|
|
||||||
|
'Private Type TWLTrailer ' Format Muss von bis Kommentar
|
||||||
|
' SortField As String * 3 ' N3 Y 1 3 "999"
|
||||||
|
' RecordID As String * 2 ' N2 Y 4 5 "99"
|
||||||
|
' FileName As String * 3 ' C3 Y 6 8 "TWL"
|
||||||
|
' RunNumber As String * 3 ' N3 Y 9 11 Gleiche Nr. wie im Header
|
||||||
|
' RecordCount As String * 7 ' N7 Y 12 18 Anzahl der Sätze inkl. Header und Trailer
|
||||||
|
' Filler As String * 66 ' C66 Y 19 84 Leerzeichen
|
||||||
|
'End Type
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Dim ASFINAG_PFAD, FTP_PFAD_TEST, FTP_PFAD
|
||||||
|
Dim sw As StreamWriter
|
||||||
|
Dim Dateiname = ""
|
||||||
|
|
||||||
|
Public Function initPFad()
|
||||||
|
|
||||||
|
ASFINAG_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("BEREITSTELLUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
|
FTP_PFAD_TEST = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_Out_Test", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
|
FTP_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_Out", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
|
|
||||||
|
If Not IO.Directory.Exists(ASFINAG_PFAD) Then IO.Directory.CreateDirectory(ASFINAG_PFAD)
|
||||||
|
If Not IO.Directory.Exists(FTP_PFAD_TEST) Then IO.Directory.CreateDirectory(FTP_PFAD_TEST)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function exportiereBlackList() As Boolean
|
||||||
|
|
||||||
|
Dim fileName = "TBL"
|
||||||
|
Dim sucess = False
|
||||||
|
Dim Header As Header
|
||||||
|
Dim Body As Body
|
||||||
|
Dim Trailer As Trailer
|
||||||
|
Dim intRunNumber As Integer = 1
|
||||||
|
Dim lngAnzahlSätze As Long
|
||||||
|
|
||||||
|
|
||||||
|
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||||
|
'qryExportiereBlackList
|
||||||
|
Dim sqlstr As String = "
|
||||||
|
SELECT Kreditkarten.KartenNr AS CardNumber, Kreditkarten.Kartensperre AS StopType FROM Kreditkarten
|
||||||
|
LEFT JOIN Kreditkarten AS Kreditkarten_1 ON Kreditkarten.NeueKartenNr = Kreditkarten_1.KartenNr
|
||||||
|
WHERE Kreditkarten.Kartensperre > 0
|
||||||
|
AND ((Kreditkarten.Kartensperrdatum)<=GETDATE())
|
||||||
|
AND ((Left([Kreditkarten].[KartenNr],6))='990001')
|
||||||
|
AND [Kreditkarten].[Kartenfreischaltungsdatum] <= GETDATE()
|
||||||
|
And [Kreditkarten].[Kartenfreischaltungsdatum] <> ''
|
||||||
|
AND DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))) >= GETDATE()
|
||||||
|
AND DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))) <> ''
|
||||||
|
AND (Kreditkarten_1.Kartenfreischaltungsdatum) Is Null Or (Kreditkarten_1.Kartenfreischaltungsdatum) > GETDATE()
|
||||||
|
ORDER BY Kreditkarten.KartenNr"
|
||||||
|
|
||||||
|
|
||||||
|
Dim dt As DataTable = SQL.loadDgvBySql_Param(sqlstr, "FMZOLL")
|
||||||
|
'qry_ASFINAG_FileInfo_TBL
|
||||||
|
Dim currentFileNr As Integer = SQL.getValueTxtBySql("SELECT fileVersion FROM [FileINfo] where [filename]='" & fileName & "'", "ASFINAG")
|
||||||
|
If currentFileNr = 999 Then currentFileNr = 0
|
||||||
|
currentFileNr = currentFileNr + 1
|
||||||
|
Dim preFilename As String = ""
|
||||||
|
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||||
|
preFilename = "LVGEP"
|
||||||
|
Else
|
||||||
|
preFilename = "TVGEP"
|
||||||
|
End If
|
||||||
|
|
||||||
|
Dim strFile As String = ASFINAG_PFAD & "\" & preFilename & fileName & "." & currentFileNr
|
||||||
|
|
||||||
|
Try
|
||||||
|
|
||||||
|
|
||||||
|
'Dim fileExists As Boolean = File.Exists(ASFINAG_PFAD & "\" & strFile)
|
||||||
|
|
||||||
|
Using sw As New StreamWriter(File.Open(strFile, FileMode.OpenOrCreate))
|
||||||
|
|
||||||
|
|
||||||
|
With Header
|
||||||
|
.SortField = "000"
|
||||||
|
.RecordID = "00"
|
||||||
|
.FileName = fileName
|
||||||
|
.LiveTestIndicator = "L" 'T für Testfile, L Livesystem
|
||||||
|
.FileCreationDate = Today.ToString("yyyymmdd")
|
||||||
|
.FileCreationTime = Now().ToString("hhmm")
|
||||||
|
.RunNumber = Format(currentFileNr, "000")
|
||||||
|
.SenderID = "VG"
|
||||||
|
.ReceiverID = "EP"
|
||||||
|
.Filler = New String(" ", 3)
|
||||||
|
sw.Write(Header.SortField)
|
||||||
|
sw.Write(Header.RecordID)
|
||||||
|
sw.Write(Header.FileName)
|
||||||
|
sw.Write(Header.LiveTestIndicator)
|
||||||
|
sw.Write(Header.FileCreationDate)
|
||||||
|
sw.Write(Header.FileCreationTime)
|
||||||
|
sw.Write(Header.RunNumber)
|
||||||
|
sw.Write(Header.SenderID)
|
||||||
|
sw.Write(Header.ReceiverID)
|
||||||
|
sw.Write(Header.Filler)
|
||||||
|
sw.WriteLine()
|
||||||
|
End With
|
||||||
|
|
||||||
|
lngAnzahlSätze = 1
|
||||||
|
For Each row As DataRow In dt.Rows
|
||||||
|
|
||||||
|
lngAnzahlSätze = lngAnzahlSätze + 1
|
||||||
|
With Body
|
||||||
|
.SortField = "000"
|
||||||
|
.RecordID = "50"
|
||||||
|
.ISOCountryCode = "040"
|
||||||
|
.CardNumber = row.Item("CardNumber") + New String(" ", 22 - Len(row.Item("CardNumber")))
|
||||||
|
.StopType = row.Item("StopType")
|
||||||
|
sw.Write(Body.SortField)
|
||||||
|
sw.Write(Body.RecordID)
|
||||||
|
sw.Write(Body.ISOCountryCode)
|
||||||
|
sw.Write(Body.CardNumber)
|
||||||
|
sw.Write(Body.StopType)
|
||||||
|
sw.WriteLine()
|
||||||
|
End With
|
||||||
|
Next
|
||||||
|
|
||||||
|
lngAnzahlSätze = lngAnzahlSätze + 1
|
||||||
|
With Trailer
|
||||||
|
.SortField = "999"
|
||||||
|
.RecordID = "99"
|
||||||
|
.FileName = "TBL"
|
||||||
|
.RunNumber = Format(currentFileNr, "000")
|
||||||
|
.RecordCount = Format(lngAnzahlSätze, "0000000")
|
||||||
|
.Filler = New String(" ", 13)
|
||||||
|
sw.Write(Trailer.SortField)
|
||||||
|
sw.Write(Trailer.RecordID)
|
||||||
|
sw.Write(Trailer.FileName)
|
||||||
|
sw.Write(Trailer.RunNumber)
|
||||||
|
sw.Write(Trailer.RecordCount)
|
||||||
|
sw.Write(Trailer.Filler)
|
||||||
|
sw.WriteLine()
|
||||||
|
End With
|
||||||
|
sw.Close()
|
||||||
|
|
||||||
|
SQL.doSQL("UPDATE [dbo].[FileINfo] SET FileVersion=" & currentFileNr & " WHERE [filename]='" & fileName & "'", "ASFINAG")
|
||||||
|
MsgBox("Files uploaded: " & uploadListToFTP(fileName))
|
||||||
|
Return True
|
||||||
|
|
||||||
|
End Using
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox(ex.Message)
|
||||||
|
End Try
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function exportiereWhiteList() As Boolean
|
||||||
|
|
||||||
|
Dim fileName = "TWL"
|
||||||
|
Dim sucess = False
|
||||||
|
Dim Header As Header
|
||||||
|
Dim Body As Body
|
||||||
|
Dim Trailer As Trailer
|
||||||
|
Dim intRunNumber As Integer = 1
|
||||||
|
Dim lngAnzahlSätze As Long
|
||||||
|
|
||||||
|
|
||||||
|
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||||
|
'qryExportiereWhiteList
|
||||||
|
Dim sqlstr As String = "
|
||||||
|
SELECT Kreditkarten.KartenNr AS CardNumber,
|
||||||
|
CONVERT(varchar, [Kreditkarten].[Kartenfreischaltungsdatum],112) AS ValidFrom,
|
||||||
|
CONVERT(varchar,DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))),112) AS ValidTo,
|
||||||
|
Kreditkarten_1.KartenNr AS NewCardNumber,
|
||||||
|
IIf(Not IsNull(Kreditkarten_1.KartenNr,0) <> 0 ,CONVERT(varchar,[Kreditkarten_1].[Kartenfreischaltungsdatum],112),'') AS NewValidFrom,
|
||||||
|
IIf(Not IsNull(Kreditkarten_1.KartenNr,0) <> 0,CONVERT(varchar, DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))),112),'') AS NewValidTo,
|
||||||
|
Kreditkarten.NeueKartenNrGemeldet
|
||||||
|
FROM Kreditkarten AS Kreditkarten_1
|
||||||
|
RIGHT JOIN Kreditkarten ON Kreditkarten_1.KartenNr = Kreditkarten.NeueKartenNr
|
||||||
|
WHERE (([Kreditkarten].[Kartenfreischaltungsdatum])<= GETDATE() And ([Kreditkarten].[Kartenfreischaltungsdatum] <>'')
|
||||||
|
AND DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))) >= GETDATE()
|
||||||
|
AND ((Kreditkarten_1.KartenNr) Is Null)) OR (((Kreditkarten_1.KartenNr) Is Not Null) AND ((Kreditkarten.NeueKartenNrGemeldet)= 0))
|
||||||
|
ORDER BY Kreditkarten.KartenNr, [Kreditkarten].[Kartenfreischaltungsdatum], CONVERT(varchar, DateAdd(DAY, -1, DateAdd(MONTH,1,DATEFROMPARTS(2000 + [Kreditkarten].[Kartenablaufjahr],[Kreditkarten].[Kartenablaufmonat],1))))
|
||||||
|
"
|
||||||
|
|
||||||
|
Dim dt As DataTable = SQL.loadDgvBySql_Param(sqlstr, "FMZOLL")
|
||||||
|
'qry_ASFINAG_FileInfo_TWL
|
||||||
|
Dim currentFileNr As Integer = SQL.getValueTxtBySql("SELECT fileVersion FROM [FileINfo] where [filename]='" & fileName & "'", "ASFINAG")
|
||||||
|
If currentFileNr = 999 Then currentFileNr = 0
|
||||||
|
currentFileNr = currentFileNr + 1
|
||||||
|
Dim preFilename As String = ""
|
||||||
|
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||||
|
preFilename = "LVGEP"
|
||||||
|
Else
|
||||||
|
preFilename = "TVGEP"
|
||||||
|
End If
|
||||||
|
|
||||||
|
Dim strFile As String = ASFINAG_PFAD & "\" & preFilename & fileName & "." & currentFileNr
|
||||||
|
|
||||||
|
Try
|
||||||
|
|
||||||
|
|
||||||
|
Using sw As New StreamWriter(File.Open(strFile, FileMode.OpenOrCreate))
|
||||||
|
|
||||||
|
|
||||||
|
With Header
|
||||||
|
.SortField = "000"
|
||||||
|
.RecordID = "00"
|
||||||
|
.FileName = fileName
|
||||||
|
.LiveTestIndicator = "L" 'T für Testfile, L Livesystem
|
||||||
|
.FileCreationDate = Today.ToString("yyyymmdd")
|
||||||
|
.FileCreationTime = Now().ToString("hhmm")
|
||||||
|
.RunNumber = Format(currentFileNr, "000")
|
||||||
|
.SenderID = "VG"
|
||||||
|
.ReceiverID = "EP"
|
||||||
|
.Filler = New String(" ", 56)
|
||||||
|
sw.Write(Header.SortField)
|
||||||
|
sw.Write(Header.RecordID)
|
||||||
|
sw.Write(Header.FileName)
|
||||||
|
sw.Write(Header.LiveTestIndicator)
|
||||||
|
sw.Write(Header.FileCreationDate)
|
||||||
|
sw.Write(Header.FileCreationTime)
|
||||||
|
sw.Write(Header.RunNumber)
|
||||||
|
sw.Write(Header.SenderID)
|
||||||
|
sw.Write(Header.ReceiverID)
|
||||||
|
sw.Write(Header.Filler)
|
||||||
|
sw.WriteLine()
|
||||||
|
End With
|
||||||
|
|
||||||
|
lngAnzahlSätze = 1
|
||||||
|
For Each row As DataRow In dt.Rows
|
||||||
|
|
||||||
|
lngAnzahlSätze = lngAnzahlSätze + 1
|
||||||
|
With Body
|
||||||
|
If Not IsDBNull(row.Item("NewCardNumber")) Then
|
||||||
|
If Not row.Item("NeueKartenNrGemeldet") Then
|
||||||
|
|
||||||
|
lngAnzahlSätze = lngAnzahlSätze + 1
|
||||||
|
.SortField = "000"
|
||||||
|
.RecordID = "40"
|
||||||
|
.ISOCountryCode = "040"
|
||||||
|
.CardNumber = row.Item("CardNumber") + New String(" ", 22 - Len(row.Item("CardNumber")))
|
||||||
|
.ValidFrom = row.Item("ValidFrom")
|
||||||
|
.ValidTo = row.Item("ValidTo")
|
||||||
|
.NewCardNumber = row.Item("NewCardNumber") + New String(" ", 22 - Len(row.Item("NewCardNumber")))
|
||||||
|
.NewValidFrom = row.Item("NewValidFrom")
|
||||||
|
.NewValidTo = row.Item("NewValidTo")
|
||||||
|
sw.Write(.SortField)
|
||||||
|
sw.Write(.RecordID)
|
||||||
|
sw.Write(.ISOCountryCode)
|
||||||
|
sw.Write(.CardNumber)
|
||||||
|
sw.Write(.ValidFrom)
|
||||||
|
sw.Write(.ValidTo)
|
||||||
|
sw.Write(.NewCardNumber)
|
||||||
|
sw.Write(.NewValidFrom)
|
||||||
|
sw.Write(.NewValidTo)
|
||||||
|
sw.WriteLine()
|
||||||
|
row.Item("NeueKartenNrGemeldet") = True
|
||||||
|
End If
|
||||||
|
Else
|
||||||
|
lngAnzahlSätze = lngAnzahlSätze + 1
|
||||||
|
.SortField = "000"
|
||||||
|
.RecordID = "40"
|
||||||
|
.ISOCountryCode = "040"
|
||||||
|
.CardNumber = row.Item("CardNumber") + New String(" ", 22 - Len(row.Item("CardNumber")))
|
||||||
|
.ValidFrom = row.Item("ValidFrom")
|
||||||
|
.ValidTo = row.Item("ValidTo")
|
||||||
|
.NewCardNumber = "0000000000000000000000"
|
||||||
|
.NewValidFrom = "00000000"
|
||||||
|
.NewValidTo = "00000000"
|
||||||
|
sw.Write(.SortField)
|
||||||
|
sw.Write(.RecordID)
|
||||||
|
sw.Write(.ISOCountryCode)
|
||||||
|
sw.Write(.CardNumber)
|
||||||
|
sw.Write(.ValidFrom)
|
||||||
|
sw.Write(.ValidTo)
|
||||||
|
sw.Write(.NewCardNumber)
|
||||||
|
sw.Write(.NewValidFrom)
|
||||||
|
sw.Write(.NewValidTo)
|
||||||
|
sw.WriteLine()
|
||||||
|
End If
|
||||||
|
End With
|
||||||
|
Next
|
||||||
|
|
||||||
|
lngAnzahlSätze = lngAnzahlSätze + 1
|
||||||
|
With Trailer
|
||||||
|
.SortField = "999"
|
||||||
|
.RecordID = "99"
|
||||||
|
.FileName = "TBL"
|
||||||
|
.RunNumber = Format(currentFileNr, "000")
|
||||||
|
.RecordCount = Format(lngAnzahlSätze, "0000000")
|
||||||
|
.Filler = New String(" ", 13)
|
||||||
|
sw.Write(Trailer.SortField)
|
||||||
|
sw.Write(Trailer.RecordID)
|
||||||
|
sw.Write(Trailer.FileName)
|
||||||
|
sw.Write(Trailer.RunNumber)
|
||||||
|
sw.Write(Trailer.RecordCount)
|
||||||
|
sw.Write(Trailer.Filler)
|
||||||
|
sw.WriteLine()
|
||||||
|
End With
|
||||||
|
sw.Close()
|
||||||
|
|
||||||
|
|
||||||
|
SQL.doSQL("UPDATE [dbo].[FileINfo] SET FileVersion=" & currentFileNr & " WHERE [filename]='" & fileName & "'", "ASFINAG")
|
||||||
|
|
||||||
|
MsgBox("Files uploaded: " & uploadListToFTP(fileName))
|
||||||
|
Return True
|
||||||
|
|
||||||
|
End Using
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox(ex.Message)
|
||||||
|
End Try
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function uploadListToFTP(filename As String) As Integer
|
||||||
|
|
||||||
|
Dim cnt = 0
|
||||||
|
Try
|
||||||
|
Dim SERVER_Path = ""
|
||||||
|
|
||||||
|
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||||
|
|
||||||
|
SERVER_Path = Me.FTP_PFAD_TEST
|
||||||
|
Else
|
||||||
|
|
||||||
|
SERVER_Path = Me.FTP_PFAD
|
||||||
|
End If
|
||||||
|
|
||||||
|
For Each f In IO.Directory.GetFiles(ASFINAG_PFAD)
|
||||||
|
Dim fi As New IO.FileInfo(f)
|
||||||
|
|
||||||
|
If Not fi.Name.StartsWith(".") AndAlso fi.Name.Contains(filename) Then
|
||||||
|
Dim zielPfad = SERVER_Path
|
||||||
|
'While IO.File.Exists(zielPfad)
|
||||||
|
' zielPfad = SERVER_Path & "\" & Now.ToString("yyyyMMdd_HHmmss_") & fi.Name
|
||||||
|
'End While
|
||||||
|
IO.File.Copy(f, zielPfad & "\" & fi.Name)
|
||||||
|
If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||||
|
If IO.File.Exists(zielPfad) Then IO.File.Delete(f)
|
||||||
|
End If
|
||||||
|
cnt += 1
|
||||||
|
End If
|
||||||
|
|
||||||
|
Next
|
||||||
|
|
||||||
|
|
||||||
|
Return cnt
|
||||||
|
|
||||||
|
Catch ex As Exception
|
||||||
|
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||||
|
End Try
|
||||||
|
|
||||||
|
Return cnt
|
||||||
|
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
End Class
|
||||||
|
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
@@ -46,8 +46,8 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Sub initPfade()
|
Sub initPfade()
|
||||||
Me.SERVER_Path = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
Me.SERVER_Path = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_In", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
Me.SERVER_Path_TEST = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_TEST", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
Me.SERVER_Path_TEST = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_In_Test", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
Me.ASFINAG_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("BEREITSTELLUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
Me.ASFINAG_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("BEREITSTELLUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
Me.VERARBEITUNGS_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("VERARBEITUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
Me.VERARBEITUNGS_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("VERARBEITUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
Me.ZIEL_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("ZIEL_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
Me.ZIEL_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("ZIEL_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||||
@@ -69,7 +69,7 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
|
|
||||||
If FileType <> "" Then
|
If FileType <> "" Then
|
||||||
|
|
||||||
Label2.Text &= " " & FileType
|
Label2.Text &= " " & FileType.ToUpper
|
||||||
|
|
||||||
For Each d In System.IO.Directory.GetFiles(VERARBEITUNGS_PFAD)
|
For Each d In System.IO.Directory.GetFiles(VERARBEITUNGS_PFAD)
|
||||||
Dim filename = frmStartOptions.cut_file(d)
|
Dim filename = frmStartOptions.cut_file(d)
|
||||||
@@ -120,40 +120,39 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
Function getNachrichtenDatenFromFTP() As Integer
|
Function getNachrichtenDatenFromFTP() As Integer
|
||||||
Dim cnt = 0
|
Dim cnt = 0
|
||||||
Try
|
Try
|
||||||
Dim SERVER_Path = ""
|
Dim SERVERPath = ""
|
||||||
|
|
||||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||||
|
|
||||||
SERVER_Path = Me.SERVER_Path '"\\ftps.verag.ag\FTP\MAVI\IN\"
|
SERVERPath = Me.SERVER_Path '"\\ftps.verag.ag\FTP\MAVI\IN\"
|
||||||
Else
|
Else
|
||||||
|
|
||||||
SERVER_Path = Me.SERVER_Path_TEST '"\\ftps.verag.ag\FTP\MAVI\IN\"
|
SERVERPath = Me.SERVER_Path_TEST '"\\ftps.verag.ag\FTP\MAVI\IN\"
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
For Each f In IO.Directory.GetFiles(SERVER_Path)
|
For Each f In IO.Directory.GetFiles(SERVER_Path)
|
||||||
Dim fi As New IO.FileInfo(f)
|
Dim fi As New IO.FileInfo(f)
|
||||||
If Not fi.Name.StartsWith(".") Then
|
If fi.Name.ToLower.Contains(FileType) Then
|
||||||
Dim zielPfad = VERARBEITUNGS_PFAD & "\" & fi.Name
|
If Not fi.Name.StartsWith(".") Then
|
||||||
While IO.File.Exists(zielPfad)
|
Dim zielPfad = VERARBEITUNGS_PFAD & "\" & fi.Name
|
||||||
zielPfad = VERARBEITUNGS_PFAD & "\" & Now.ToString("yyyyMMdd_HHmmss_") & fi.Name
|
While IO.File.Exists(zielPfad)
|
||||||
End While
|
zielPfad = VERARBEITUNGS_PFAD & "\" & Now.ToString("yyyyMMdd_HHmmss_") & fi.Name
|
||||||
IO.File.Copy(f, zielPfad)
|
End While
|
||||||
If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
IO.File.Copy(f, zielPfad)
|
||||||
If IO.File.Exists(zielPfad) Then IO.File.Delete(f)
|
If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||||
|
If IO.File.Exists(zielPfad) Then IO.File.Delete(f)
|
||||||
|
End If
|
||||||
|
|
||||||
|
Dim filename = frmStartOptions.cut_file((New FileInfo(zielPfad)).Name)
|
||||||
|
If filename.ToLower.Contains(FileType) Then
|
||||||
|
ListBox3.Items.Add(filename)
|
||||||
|
cnt += 1
|
||||||
|
End If
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Dim filename = frmStartOptions.cut_file((New FileInfo(zielPfad)).Name)
|
|
||||||
If filename.ToLower.Contains(FileType) Then
|
|
||||||
ListBox3.Items.Add(filename)
|
|
||||||
cnt += 1
|
|
||||||
End If
|
|
||||||
|
|
||||||
|
|
||||||
'ListBox3.Items.Add(frmStartOptions.cut_file((New FileInfo(zielPfad)).Name)) 'zur Liste hinzufügen
|
|
||||||
|
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
|
||||||
@@ -167,121 +166,6 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
End Function
|
End Function
|
||||||
|
|
||||||
|
|
||||||
Function getNachrichtenDatenFromAsfinag_ALTERNATIV() As Integer
|
|
||||||
Dim cnt = 0
|
|
||||||
Try
|
|
||||||
For Each f In IO.Directory.GetFiles(ASFINAG_PFAD)
|
|
||||||
Dim FI As New FileInfo(f)
|
|
||||||
If Not FI.Name.StartsWith(".") Then
|
|
||||||
'Temp. DownloadPfad
|
|
||||||
Dim destFilenameTMP = VERARBEITUNGS_PFAD + "." & If(IO.File.Exists(VERARBEITUNGS_PFAD & "." & FI.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & FI.Name
|
|
||||||
|
|
||||||
'Datei herunterladen
|
|
||||||
IO.File.Copy(f, destFilenameTMP)
|
|
||||||
If IO.File.Exists(destFilenameTMP) Then IO.File.Delete(f) 'Datei nach erfolgreichem Herunterladen vom Server löschen
|
|
||||||
|
|
||||||
'Gültiger Filename
|
|
||||||
Dim destFilename = VERARBEITUNGS_PFAD & If(IO.File.Exists(VERARBEITUNGS_PFAD & FI.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & FI.Name
|
|
||||||
IO.File.Move(destFilenameTMP, destFilename) 'Datei umbenennen
|
|
||||||
|
|
||||||
Dim fi_dest As FileInfo = New FileInfo(destFilename)
|
|
||||||
ListBox3.Items.Add(frmStartOptions.cut_file(fi_dest.Name)) 'zur Liste hinzufügen
|
|
||||||
cnt += 1
|
|
||||||
lblDatenCnt.Text = cnt
|
|
||||||
Me.Refresh()
|
|
||||||
End If
|
|
||||||
Next
|
|
||||||
Catch ex As Exception
|
|
||||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
|
||||||
End Try
|
|
||||||
|
|
||||||
Return cnt
|
|
||||||
|
|
||||||
'Dim cnt = 0
|
|
||||||
'Try
|
|
||||||
' Dim DY_server = ""
|
|
||||||
' Dim DY_name = ""
|
|
||||||
' Dim DY_pwd = ""
|
|
||||||
' Dim DY_port = ""
|
|
||||||
' Dim DY_PFAD_out = ""
|
|
||||||
|
|
||||||
' DAKOSY_Worker.cDakosyFunftions.getSFTPLoginData(DY_server, DY_name, DY_pwd, DY_port, "", DY_PFAD_out)
|
|
||||||
|
|
||||||
|
|
||||||
' Dim ConnectionInfo As New ConnectionInfo(DY_server, DY_port, DY_name, New PasswordAuthenticationMethod(DY_name, DY_pwd))
|
|
||||||
' Using client = New SftpClient(ConnectionInfo)
|
|
||||||
' client.Connect()
|
|
||||||
|
|
||||||
' For Each f In client.ListDirectory(DY_PFAD_out)
|
|
||||||
' ' MsgBox(f.Name)
|
|
||||||
' If Not f.Name.StartsWith(".") Then
|
|
||||||
' 'Temp. DownloadPfad
|
|
||||||
' Dim destFilenameTMP = VERARBEITUNGS_PFAD + "." & If(IO.File.Exists(VERARBEITUNGS_PFAD & "." & f.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & f.Name
|
|
||||||
|
|
||||||
' 'Datei herunterladen
|
|
||||||
' Dim downloadFileStream As Stream = File.OpenWrite(destFilenameTMP)
|
|
||||||
' client.DownloadFile(f.FullName, downloadFileStream)
|
|
||||||
' If IO.File.Exists(destFilenameTMP) Then client.DeleteFile(f.FullName) 'Datei nach erfolgreichem Herunterladen vom Server löschen
|
|
||||||
' downloadFileStream.Dispose()
|
|
||||||
|
|
||||||
' 'Gültiger Filename
|
|
||||||
' Dim destFilename = VERARBEITUNGS_PFAD & If(IO.File.Exists(VERARBEITUNGS_PFAD & f.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & f.Name
|
|
||||||
' IO.File.Move(destFilenameTMP, destFilename) 'Datei umbenennen
|
|
||||||
|
|
||||||
' Dim fi As FileInfo = New FileInfo(destFilename)
|
|
||||||
' ListBox3.Items.Add(frmStartOptions.cut_file(fi.Name)) 'zur Liste hinzufügen
|
|
||||||
' cnt += 1
|
|
||||||
' End If
|
|
||||||
' Next
|
|
||||||
' client.Disconnect()
|
|
||||||
' End Using
|
|
||||||
'Catch ex As Exception
|
|
||||||
' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
|
||||||
'End Try
|
|
||||||
|
|
||||||
'Return cnt
|
|
||||||
End Function
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
' Dim toEncodeAsBytes() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes(toEncode)
|
|
||||||
' string returnValue = System.Convert.ToBase64String(toEncodeAsBytes)
|
|
||||||
Public Function stripNonValidXMLCharacters(ByVal textIn As String) As String
|
|
||||||
Dim textOut As System.Text.StringBuilder = New System.Text.StringBuilder()
|
|
||||||
Dim current As Char
|
|
||||||
If textIn Is Nothing OrElse textIn = String.Empty Then Return String.Empty
|
|
||||||
For i As Integer = 0 To textIn.Length - 1
|
|
||||||
current = textIn(i)
|
|
||||||
If (current = "9" OrElse current = "10" OrElse current = "13") OrElse ((current >= "32") AndAlso (current <= "55295")) OrElse ((current >= "57344") AndAlso (current <= "65533")) OrElse ((current >= "65536") AndAlso (current <= "1114111")) Then
|
|
||||||
textOut.Append(current)
|
|
||||||
End If
|
|
||||||
Next
|
|
||||||
|
|
||||||
Return textOut.ToString()
|
|
||||||
End Function
|
|
||||||
|
|
||||||
Public Function SanitizeXmlString(ByVal xml As String) As String
|
|
||||||
If xml Is Nothing Then
|
|
||||||
Throw New ArgumentNullException("xml")
|
|
||||||
End If
|
|
||||||
|
|
||||||
Dim buffer As System.Text.StringBuilder = New System.Text.StringBuilder(xml.Length)
|
|
||||||
For Each c As Char In xml
|
|
||||||
If IsLegalXmlChar(Asc(c)) Then
|
|
||||||
buffer.Append(c)
|
|
||||||
End If
|
|
||||||
Next
|
|
||||||
|
|
||||||
Return buffer.ToString()
|
|
||||||
End Function
|
|
||||||
|
|
||||||
Public Function IsLegalXmlChar(ByVal character As Integer) As Boolean
|
|
||||||
Return (character = 9 OrElse character = 10 OrElse character = 13 OrElse (character >= 32 AndAlso character <= 55295) OrElse (character >= 57344 AndAlso character <= 65533) OrElse (character >= 65536 AndAlso character <= 1114111))
|
|
||||||
End Function
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Sub DatenEinlesen()
|
Sub DatenEinlesen()
|
||||||
|
|
||||||
@@ -333,6 +217,8 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
If readAndSaveCLF(objFileRead, fi) Then
|
If readAndSaveCLF(objFileRead, fi) Then
|
||||||
addDGVEinarbeitung(fi.Name, "OK")
|
addDGVEinarbeitung(fi.Name, "OK")
|
||||||
found = True
|
found = True
|
||||||
|
Else
|
||||||
|
addDGVEinarbeitung(fi.Name, "Fehler")
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
@@ -341,6 +227,8 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
If readAndSaveTTR(objFileRead, fi) Then
|
If readAndSaveTTR(objFileRead, fi) Then
|
||||||
addDGVEinarbeitung(fi.Name, "OK")
|
addDGVEinarbeitung(fi.Name, "OK")
|
||||||
found = True
|
found = True
|
||||||
|
Else
|
||||||
|
addDGVEinarbeitung(fi.Name, "Fehler")
|
||||||
End If
|
End If
|
||||||
|
|
||||||
End If
|
End If
|
||||||
@@ -348,8 +236,8 @@ Public Class frmAsfinag_NachrichtenVerabeitung
|
|||||||
End If
|
End If
|
||||||
|
|
||||||
If found Then
|
If found Then
|
||||||
If Not IO.Directory.Exists(ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("yyyyMMdd") & "\") Then IO.Directory.CreateDirectory(ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("yyyyMMdd") & "\")
|
If Not IO.Directory.Exists(ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("MMdd") & "\") Then IO.Directory.CreateDirectory(ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("MMdd") & "\")
|
||||||
frmStartOptions.moveFile(d, ZIEL_PFAD & "\" & Now.ToString("yyyyMMdd") & "\", VERARBEITUNGS_PFAD)
|
frmStartOptions.moveFile(d, ZIEL_PFAD & "\" & Now.Year & "\" & Now.ToString("MMdd") & "\", VERARBEITUNGS_PFAD)
|
||||||
cntDatenEingelesen += 1
|
cntDatenEingelesen += 1
|
||||||
Else
|
Else
|
||||||
If Not found Then
|
If Not found Then
|
||||||
|
|||||||
704
initATLASAufschubkonten/frmStartOptions.Designer.vb
generated
704
initATLASAufschubkonten/frmStartOptions.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
@@ -142,79 +142,7 @@
|
|||||||
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
</value>
|
</value>
|
||||||
</data>
|
</data>
|
||||||
<data name="PictureBox12.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
<data name="PictureBox20.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
<value>
|
|
||||||
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
|
||||||
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
|
||||||
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
|
||||||
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
|
||||||
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
|
||||||
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
|
||||||
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
|
||||||
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
|
||||||
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
|
||||||
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
|
||||||
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
|
||||||
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
|
||||||
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
|
||||||
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
|
||||||
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
|
||||||
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
|
||||||
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
|
||||||
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
|
||||||
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
|
||||||
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
|
||||||
</value>
|
|
||||||
</data>
|
|
||||||
<data name="PictureBox11.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
|
||||||
<value>
|
|
||||||
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
|
||||||
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
|
||||||
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
|
||||||
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
|
||||||
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
|
||||||
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
|
||||||
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
|
||||||
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
|
||||||
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
|
||||||
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
|
||||||
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
|
||||||
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
|
||||||
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
|
||||||
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
|
||||||
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
|
||||||
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
|
||||||
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
|
||||||
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
|
||||||
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
|
||||||
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
|
||||||
</value>
|
|
||||||
</data>
|
|
||||||
<data name="PictureBox10.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
|
||||||
<value>
|
|
||||||
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
|
||||||
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
|
||||||
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
|
||||||
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
|
||||||
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
|
||||||
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
|
||||||
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
|
||||||
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
|
||||||
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
|
||||||
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
|
||||||
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
|
||||||
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
|
||||||
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
|
||||||
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
|
||||||
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
|
||||||
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
|
||||||
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
|
||||||
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
|
||||||
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
|
||||||
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
|
||||||
</value>
|
|
||||||
</data>
|
|
||||||
<data name="PictureBox9.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
|
||||||
<value>
|
<value>
|
||||||
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
@@ -577,9 +505,150 @@
|
|||||||
<metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
<metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||||
<value>True</value>
|
<value>True</value>
|
||||||
</metadata>
|
</metadata>
|
||||||
<metadata name="clmnMRN.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
<data name="PictureBox19.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
<value>True</value>
|
<value>
|
||||||
</metadata>
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
|
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
||||||
|
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
||||||
|
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
||||||
|
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
||||||
|
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
||||||
|
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
||||||
|
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
||||||
|
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
||||||
|
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
||||||
|
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
||||||
|
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
||||||
|
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
||||||
|
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
||||||
|
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
||||||
|
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
||||||
|
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
||||||
|
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
||||||
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="PictureBox18.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
|
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
||||||
|
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
||||||
|
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
||||||
|
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
||||||
|
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
||||||
|
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
||||||
|
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
||||||
|
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
||||||
|
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
||||||
|
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
||||||
|
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
||||||
|
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
||||||
|
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
||||||
|
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
||||||
|
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
||||||
|
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
||||||
|
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
||||||
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="PictureBox12.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
|
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
||||||
|
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
||||||
|
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
||||||
|
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
||||||
|
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
||||||
|
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
||||||
|
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
||||||
|
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
||||||
|
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
||||||
|
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
||||||
|
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
||||||
|
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
||||||
|
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
||||||
|
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
||||||
|
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
||||||
|
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
||||||
|
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
||||||
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="PictureBox11.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
|
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
||||||
|
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
||||||
|
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
||||||
|
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
||||||
|
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
||||||
|
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
||||||
|
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
||||||
|
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
||||||
|
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
||||||
|
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
||||||
|
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
||||||
|
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
||||||
|
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
||||||
|
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
||||||
|
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
||||||
|
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
||||||
|
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
||||||
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="PictureBox10.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
|
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
||||||
|
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
||||||
|
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
||||||
|
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
||||||
|
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
||||||
|
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
||||||
|
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
||||||
|
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
||||||
|
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
||||||
|
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
||||||
|
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
||||||
|
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
||||||
|
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
||||||
|
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
||||||
|
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
||||||
|
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
||||||
|
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
||||||
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="PictureBox9.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAABEhJREFUSEtj
|
||||||
|
oDZg4WThlrSSdLPOtc53zHaMl5SUZGBnZ4fKUhMwMjCK6IloGhUYZdn32a/wX+Z/0Ge2z0L9eH0rQVVB
|
||||||
|
QSZ2JqhCKgEBNQFFoyKjnPAj4cdjz8d+jb8U/z/iaMR9z2WeE3XSdByEdYWFGVkYGaHKKQdWTVYF4YfC
|
||||||
|
j8VdjPsHwiALYezo89HTzWrNHNj42VigyikHDv0OC2POxrwDWYSOgZY+DNoRNMV5urMdVDn5gFOUU0rJ
|
||||||
|
VynOd7XvBSwW/QHiHx4LPPYDQ6DUpMzEEKqNPMDKw8on5ywXBHT9w+hT0d/QLPsefTr6Rei+0Iuqwaox
|
||||||
|
XGJcElBt5AMFT4UIYDBtjzkT8zPuQtxfNAuv+G/wn6CdoG3Bp8AnysjMSH78MXMyc0tZSbnZtNksDtsf
|
||||||
|
9hJoODiRgC26EPcD6IDbPit9Oo3yjWz4Ffm5gXmTGaqVPMAuwC6il6ZXgx5vsedif4YfDH/kNsdtIlDe
|
||||||
|
VlRflDo5HpeFkUcj33jM89gqbigux8bNBlVNIeCR4pFX9ldO8F7qfTLyWORHmGUx52N+2/XYrRTRFTFh
|
||||||
|
42PjAMYZVAcOwMzBzA2MXHUFDwVLGXsZDS4JLjZ0TeyC7CLghDLVeWvU8ahPyL7z3+u/STNdMwSqFD8A
|
||||||
|
pSBeOV41rTitYr/1ftNd57jmKnorygKDjpUBqQgU1BA0NKsym4JsESifAfFzyxmWXhKeEqxQpfgBpxin
|
||||||
|
lEqgSnLI3pBn0Wei30aeiNzlucQzWdxEXBKY1+DJGYeF12IuxBTJe8srsfAQkfKBQckFzJgp7vPdD4KS
|
||||||
|
d9ylOJAhL4AF73aHCQ5RwKpGjomViZWVl1VAP0u/wXeN70WYZbEXYi/7b/Lv0c3Q1eGR5eGBGokfKLgp
|
||||||
|
hALjZBuyq0EYaOkHoIErzWvN/cWMxSSAcSoLTO57oXK/gPhp4PbAqUAfO7MLsbMBHUVcTQD2FVLGRbIQ
|
||||||
|
LA5MfdNdZrnYolkIcswSs0ozL2Aw80KNIg5I20h7ApN5lGWdZQfQoPtAA8F1GZLFD4HVznGQZUD6NUgs
|
||||||
|
8kjka5t2m25pW2kzFm4yShFgvuGVMJEwNq0wrXSd6bopeGfwA2RLkTHIUrfZbnvkXOWCQYkNagT5QNZZ
|
||||||
|
NsCu225Z9MnoD8By8TfQEkQ5eTHuJzDRHAMmnkJ2EXYhqBbKADCIeIGZ29t9nvvSqJNRL4AW/UKy8L7P
|
||||||
|
ap8Juum6BsBCgHotI25JbgkZBxkHtVC1JGDc7Qa2UX4CE8n3oJ1B64GpMlpYR5ifmZ2Zyq0iKFANUk3x
|
||||||
|
WOhxEFgYvLZus64EJhQtqBTtALDEsQ/aHnRf3FTcASpEWwBsbQkBLQW1uqiTUJABFxcXg7y8PJupqSm/
|
||||||
|
nZ2diL29vSgyBooJm5ub88nKyrIC1VLezgQ2zRk9PT0F6urqVCdNmmQwbdo0Y2Q8efJk3ebmZkVXV1de
|
||||||
|
CQkJEjM9AwMAOTMC2xlgxuQAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
<value>
|
<value>
|
||||||
AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
|
AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
|
||||||
|
|||||||
@@ -1,10 +1,13 @@
|
|||||||
Imports System.Data.OleDb
|
Imports System.Data.OleDb
|
||||||
|
Imports System.DirectoryServices.ActiveDirectory
|
||||||
Imports System.IO
|
Imports System.IO
|
||||||
Imports System.Net
|
Imports System.Net
|
||||||
Imports System.Text
|
Imports System.Text
|
||||||
Imports System.Xml
|
Imports System.Xml
|
||||||
Imports DocumentFormat.OpenXml.Drawing.Diagrams
|
Imports DocumentFormat.OpenXml.Drawing.Diagrams
|
||||||
Imports DocumentFormat.OpenXml.Wordprocessing
|
Imports DocumentFormat.OpenXml.Wordprocessing
|
||||||
|
Imports iTextSharp.text.pdf.qrcode.Version
|
||||||
|
Imports Org.BouncyCastle.Asn1.Pkcs
|
||||||
Imports Renci.SshNet
|
Imports Renci.SshNet
|
||||||
Imports VERAG_PROG_ALLGEMEIN
|
Imports VERAG_PROG_ALLGEMEIN
|
||||||
|
|
||||||
@@ -1961,6 +1964,9 @@ Public Class frmStartOptions
|
|||||||
PictureBox12.Visible = False
|
PictureBox12.Visible = False
|
||||||
PictureBox13.Visible = False
|
PictureBox13.Visible = False
|
||||||
PictureBox14.Visible = False
|
PictureBox14.Visible = False
|
||||||
|
PictureBox18.Visible = False
|
||||||
|
PictureBox19.Visible = False
|
||||||
|
PictureBox20.Visible = False
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
@@ -3453,10 +3459,114 @@ Public Class frmStartOptions
|
|||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub LinkLabel42_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel42.LinkClicked
|
Private Sub LinkLabel42_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel42.LinkClicked
|
||||||
|
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
|
||||||
|
Me.Cursor = Cursors.WaitCursor
|
||||||
|
Dim blt = New cAsfinag.Exportist
|
||||||
|
blt.initPFad()
|
||||||
|
showPic(blt.exportiereWhiteList, PictureBox18)
|
||||||
|
Me.Cursor = Cursors.Default
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub LinkLabel41_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel41.LinkClicked
|
Private Sub LinkLabel41_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel41.LinkClicked
|
||||||
|
VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
|
||||||
|
Me.Cursor = Cursors.WaitCursor
|
||||||
|
Dim blt = New cAsfinag.Exportist
|
||||||
|
blt.initPFad()
|
||||||
|
showPic(blt.exportiereBlackList, PictureBox19)
|
||||||
|
Me.Cursor = Cursors.Default
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub LinkLabel45_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel45.LinkClicked
|
||||||
|
|
||||||
|
Dim MyData As String = ""
|
||||||
|
Dim SQL = New SQL
|
||||||
|
Dim erg = True
|
||||||
|
|
||||||
|
Dim firstDaycurrentMonth = DateTime.Now.AddMonths(0)
|
||||||
|
firstDaycurrentMonth = New DateTime(firstDaycurrentMonth.Year, firstDaycurrentMonth.Month, 1)
|
||||||
|
|
||||||
|
Dim lastDaycurrentMonth = DateTime.Now.AddMonths(1)
|
||||||
|
lastDaycurrentMonth = New DateTime(lastDaycurrentMonth.Year, lastDaycurrentMonth.Month, 1).AddDays(-1)
|
||||||
|
|
||||||
|
Dim kursart = "1" 'notirete Währung
|
||||||
|
Dim startdatum_tag2 = firstDaycurrentMonth.Day
|
||||||
|
Dim startdatum_monat2 = firstDaycurrentMonth.Month
|
||||||
|
Dim startdatum_jahr2 = firstDaycurrentMonth.Year
|
||||||
|
Dim enddatum_tag2 = lastDaycurrentMonth.Day
|
||||||
|
Dim enddatum_monat2 = lastDaycurrentMonth.Month
|
||||||
|
Dim enddatum_jahr2 = lastDaycurrentMonth.Year
|
||||||
|
|
||||||
|
Try
|
||||||
|
System.Net.ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
|
||||||
|
|
||||||
|
Using WC As New System.Net.WebClient()
|
||||||
|
' C0008_URL()
|
||||||
|
WC.Encoding = ASCIIEncoding.UTF8
|
||||||
|
Dim URL = "https://www.zoll.de/SiteGlobals/Functions/Kurse/KursExport.xml?view=xmlexportkursesearchresultZOLLWeb&kursart=" & kursart &
|
||||||
|
"&startdatum_tag2=" & startdatum_tag2 &
|
||||||
|
"&startdatum_monat2=" & startdatum_monat2 &
|
||||||
|
"&startdatum_jahr2=" & startdatum_jahr2 &
|
||||||
|
"&enddatum_tag2=" & enddatum_tag2 &
|
||||||
|
"&enddatum_monat2=" & enddatum_monat2 &
|
||||||
|
"&enddatum_jahr2=" & enddatum_jahr2 &
|
||||||
|
"&sort=asc&spalte=gueltigkeit"
|
||||||
|
If URL = String.Empty Then Exit Sub
|
||||||
|
|
||||||
|
MyData = WC.DownloadString(URL)
|
||||||
|
Dim doc As New XmlDocument()
|
||||||
|
doc.LoadXml(MyData)
|
||||||
|
If doc.HasChildNodes Then
|
||||||
|
|
||||||
|
If doc.GetElementsByTagName("kurs").Count > 0 Then
|
||||||
|
Dim endDatum, startDatum
|
||||||
|
Dim count As Integer = 1
|
||||||
|
For Each node As XmlElement In doc.GetElementsByTagName("kurs")
|
||||||
|
Dim wk As New cFremdwaehrungskurse()
|
||||||
|
If node.Attributes("id") IsNot Nothing Then wk.fw_id = node.Attributes("id").Value
|
||||||
|
If node.HasChildNodes Then
|
||||||
|
For Each element As XmlElement In node.ChildNodes
|
||||||
|
If element.Name = "land" AndAlso element.InnerText <> "" Then wk.fw_land = element.InnerText
|
||||||
|
If element.Name = "iso2" AndAlso element.InnerText <> "" Then wk.fw_iso2 = element.InnerText
|
||||||
|
If element.Name = "iso3" AndAlso element.InnerText <> "" Then wk.fw_iso3 = element.InnerText
|
||||||
|
If element.Name = "kurswert" AndAlso element.InnerText <> "" Then wk.fw_kurswert = element.InnerText
|
||||||
|
If element.Name = "startdatum" AndAlso element.InnerText <> "" Then
|
||||||
|
wk.fw_startdatum = element.InnerText
|
||||||
|
startDatum = wk.fw_startdatum
|
||||||
|
End If
|
||||||
|
If element.Name = "enddatum" AndAlso element.InnerText <> "" Then
|
||||||
|
wk.fw_enddatum = element.InnerText
|
||||||
|
endDatum = wk.fw_enddatum
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
count = count + 1
|
||||||
|
wk.SAVE()
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
Dim wk_euro As New cFremdwaehrungskurse()
|
||||||
|
wk_euro.fw_id = 0
|
||||||
|
wk_euro.fw_land = "Europa"
|
||||||
|
wk_euro.fw_kurswert = 1
|
||||||
|
wk_euro.fw_iso3 = "EUR"
|
||||||
|
wk_euro.fw_iso2 = "EU"
|
||||||
|
wk_euro.fw_startdatum = firstDaycurrentMonth.ToShortDateString()
|
||||||
|
wk_euro.fw_enddatum = lastDaycurrentMonth.ToShortDateString()
|
||||||
|
wk_euro.SAVE()
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Dim sqlCount = SQL.getValueTxtBySqlVarList("SELECT isnull(count(*),0) FROM tblZOLL_Wechselkurse WHERE [fw_startdatum]='" & startDatum & "' AND fw_enddatum='" & endDatum & "'", "FMZOLL")
|
||||||
|
If count <> sqlCount Then
|
||||||
|
MsgBox("Anzahl der Importierten Datensätze:" & sqlCount & vbNewLine & "Anzahl Datensätze in Datei: " & count)
|
||||||
|
erg = False
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
showPic(erg, PictureBox20)
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Using
|
||||||
|
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox(ex.Message & ex.StackTrace)
|
||||||
|
End Try
|
||||||
End Sub
|
End Sub
|
||||||
End Class
|
End Class
|
||||||
Reference in New Issue
Block a user