X

2019-08-23 16:28:41 +02:00
parent 1101edb939
commit 8f8b0f4252
37 changed files with 7560 additions and 254 deletions
--- a/SDL/mdm/usrCntlMDMAuswertungen.Designer.vb
+++ b/SDL/mdm/usrCntlMDMAuswertungen.Designer.vb
@@ -102,6 +102,7 @@ Partial Class usrCntlMDMAuswertungen
        Me.Label29 = New System.Windows.Forms.Label()
        Me.datIDSVon = New System.Windows.Forms.DateTimePicker()
        Me.GroupBox8 = New System.Windows.Forms.GroupBox()
+        Me.cboIDSDateType = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.txtOrt = New System.Windows.Forms.TextBox()
        Me.lbl = New System.Windows.Forms.Label()
        Me.cbxLand = New System.Windows.Forms.CheckBox()
@@ -125,8 +126,30 @@ Partial Class usrCntlMDMAuswertungen
        Me.GroupBox10 = New System.Windows.Forms.GroupBox()
        Me.Label38 = New System.Windows.Forms.Label()
        Me.Button10 = New System.Windows.Forms.Button()
+        Me.tbPLOSE = New System.Windows.Forms.TabPage()
+        Me.Label37 = New System.Windows.Forms.Label()
+        Me.GroupBox11 = New System.Windows.Forms.GroupBox()
+        Me.Label39 = New System.Windows.Forms.Label()
+        Me.Label40 = New System.Windows.Forms.Label()
+        Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.Label41 = New System.Windows.Forms.Label()
+        Me.Button12 = New System.Windows.Forms.Button()
+        Me.Label42 = New System.Windows.Forms.Label()
+        Me.GroupBox12 = New System.Windows.Forms.GroupBox()
+        Me.lblPloseAnh_Proz = New System.Windows.Forms.Label()
+        Me.Button13 = New System.Windows.Forms.Button()
+        Me.pbPloseAnh_Proz = New System.Windows.Forms.ProgressBar()
+        Me.txtPloseAnh_Einarbeitung = New System.Windows.Forms.TextBox()
+        Me.datPLOSE_Sum_Von = New System.Windows.Forms.DateTimePicker()
+        Me.Label44 = New System.Windows.Forms.Label()
+        Me.Label45 = New System.Windows.Forms.Label()
+        Me.Label46 = New System.Windows.Forms.Label()
+        Me.Button14 = New System.Windows.Forms.Button()
+        Me.datPLOSE_Sum_Bis = New System.Windows.Forms.DateTimePicker()
        Me.pnl = New System.Windows.Forms.Panel()
-        Me.cboIDSDateType = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.datPloseAnhang = New System.Windows.Forms.DateTimePicker()
+        Me.Label43 = New System.Windows.Forms.Label()
        Me.GroupBox1.SuspendLayout()
        Me.GroupBox2.SuspendLayout()
        CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -148,6 +171,9 @@ Partial Class usrCntlMDMAuswertungen
        Me.tbIDS.SuspendLayout()
        Me.TabPage2.SuspendLayout()
        Me.GroupBox10.SuspendLayout()
+        Me.tbPLOSE.SuspendLayout()
+        Me.GroupBox11.SuspendLayout()
+        Me.GroupBox12.SuspendLayout()
        Me.pnl.SuspendLayout()
        Me.SuspendLayout()
        '
@@ -288,7 +314,7 @@ Partial Class usrCntlMDMAuswertungen
        '
        'pic
        '
-        Me.pic.Image = Global.SDL.My.Resources.woelfl
+        Me.pic.Image = Global.SDL.My.Resources.Resources.woelfl
        Me.pic.Location = New System.Drawing.Point(640, 8)
        Me.pic.Name = "pic"
        Me.pic.Size = New System.Drawing.Size(51, 37)
@@ -455,7 +481,7 @@ Partial Class usrCntlMDMAuswertungen
        '
        'PictureBox1
        '
-        Me.PictureBox1.Image = Global.SDL.My.Resources.sanduhr
+        Me.PictureBox1.Image = Global.SDL.My.Resources.Resources.sanduhr
        Me.PictureBox1.Location = New System.Drawing.Point(640, 8)
        Me.PictureBox1.Name = "PictureBox1"
        Me.PictureBox1.Size = New System.Drawing.Size(51, 24)
@@ -706,7 +732,7 @@ Partial Class usrCntlMDMAuswertungen
        '
        'PictureBox3
        '
-        Me.PictureBox3.Image = Global.SDL.My.Resources.cards
+        Me.PictureBox3.Image = Global.SDL.My.Resources.Resources.cards
        Me.PictureBox3.Location = New System.Drawing.Point(640, 8)
        Me.PictureBox3.Name = "PictureBox3"
        Me.PictureBox3.Size = New System.Drawing.Size(51, 24)
@@ -1029,6 +1055,17 @@ Partial Class usrCntlMDMAuswertungen
        Me.GroupBox8.TabIndex = 23
        Me.GroupBox8.TabStop = False
        '
+        'cboIDSDateType
+        '
+        Me.cboIDSDateType._allowedValuesFreiText = Nothing
+        Me.cboIDSDateType._allowFreiText = False
+        Me.cboIDSDateType._value = ""
+        Me.cboIDSDateType.FormattingEnabled = True
+        Me.cboIDSDateType.Location = New System.Drawing.Point(9, 63)
+        Me.cboIDSDateType.Name = "cboIDSDateType"
+        Me.cboIDSDateType.Size = New System.Drawing.Size(152, 21)
+        Me.cboIDSDateType.TabIndex = 27
+        '
        'txtOrt
        '
        Me.txtOrt.Location = New System.Drawing.Point(201, 87)
@@ -1095,6 +1132,7 @@ Partial Class usrCntlMDMAuswertungen
        Me.tbcntr.Controls.Add(Me.TabPage3)
        Me.tbcntr.Controls.Add(Me.tbIDS)
        Me.tbcntr.Controls.Add(Me.TabPage2)
+        Me.tbcntr.Controls.Add(Me.tbPLOSE)
        Me.tbcntr.Dock = System.Windows.Forms.DockStyle.Fill
        Me.tbcntr.Location = New System.Drawing.Point(0, 54)
        Me.tbcntr.Name = "tbcntr"
@@ -1154,7 +1192,7 @@ Partial Class usrCntlMDMAuswertungen
        Me.Button9.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button9.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Button9.Image = Global.SDL.My.Resources.Excel_logo
+        Me.Button9.Image = Global.SDL.My.Resources.Resources.Excel_logo
        Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.Button9.Location = New System.Drawing.Point(6, 62)
        Me.Button9.Name = "Button9"
@@ -1169,7 +1207,7 @@ Partial Class usrCntlMDMAuswertungen
        Me.Button11.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.Button11.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
-        Me.Button11.Image = Global.SDL.My.Resources.Excel_logo
+        Me.Button11.Image = Global.SDL.My.Resources.Resources.Excel_logo
        Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.Button11.Location = New System.Drawing.Point(6, 19)
        Me.Button11.Name = "Button11"
@@ -1302,6 +1340,221 @@ Partial Class usrCntlMDMAuswertungen
        Me.Button10.Text = "Durchführen"
        Me.Button10.UseVisualStyleBackColor = True
        '
+        'tbPLOSE
+        '
+        Me.tbPLOSE.Controls.Add(Me.datPloseAnhang)
+        Me.tbPLOSE.Controls.Add(Me.Label37)
+        Me.tbPLOSE.Controls.Add(Me.GroupBox11)
+        Me.tbPLOSE.Controls.Add(Me.Label42)
+        Me.tbPLOSE.Controls.Add(Me.GroupBox12)
+        Me.tbPLOSE.Location = New System.Drawing.Point(4, 22)
+        Me.tbPLOSE.Name = "tbPLOSE"
+        Me.tbPLOSE.Padding = New System.Windows.Forms.Padding(3)
+        Me.tbPLOSE.Size = New System.Drawing.Size(1049, 990)
+        Me.tbPLOSE.TabIndex = 4
+        Me.tbPLOSE.Text = "PLOSE"
+        Me.tbPLOSE.UseVisualStyleBackColor = True
+        '
+        'Label37
+        '
+        Me.Label37.AutoSize = True
+        Me.Label37.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label37.ForeColor = System.Drawing.SystemColors.ControlDarkDark
+        Me.Label37.Location = New System.Drawing.Point(7, 11)
+        Me.Label37.Name = "Label37"
+        Me.Label37.Size = New System.Drawing.Size(173, 17)
+        Me.Label37.TabIndex = 19
+        Me.Label37.Text = "PLOSE Daten einlesen"
+        '
+        'GroupBox11
+        '
+        Me.GroupBox11.Controls.Add(Me.Label39)
+        Me.GroupBox11.Controls.Add(Me.Label40)
+        Me.GroupBox11.Controls.Add(Me.ProgressBar1)
+        Me.GroupBox11.Controls.Add(Me.TextBox1)
+        Me.GroupBox11.Controls.Add(Me.Label41)
+        Me.GroupBox11.Controls.Add(Me.Button12)
+        Me.GroupBox11.Enabled = False
+        Me.GroupBox11.Location = New System.Drawing.Point(6, 22)
+        Me.GroupBox11.Name = "GroupBox11"
+        Me.GroupBox11.Size = New System.Drawing.Size(297, 145)
+        Me.GroupBox11.TabIndex = 18
+        Me.GroupBox11.TabStop = False
+        '
+        'Label39
+        '
+        Me.Label39.Location = New System.Drawing.Point(131, 19)
+        Me.Label39.Name = "Label39"
+        Me.Label39.Size = New System.Drawing.Size(165, 52)
+        Me.Label39.TabIndex = 23
+        Me.Label39.Text = "Lädt die CSV-Daten vom PLOSE FTP-Server herunter und liest diese in die Datenbank" &
+    " ein."
+        '
+        'Label40
+        '
+        Me.Label40.Location = New System.Drawing.Point(220, 103)
+        Me.Label40.Name = "Label40"
+        Me.Label40.Size = New System.Drawing.Size(69, 13)
+        Me.Label40.TabIndex = 22
+        Me.Label40.Text = "0%"
+        Me.Label40.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'ProgressBar1
+        '
+        Me.ProgressBar1.Location = New System.Drawing.Point(6, 74)
+        Me.ProgressBar1.Name = "ProgressBar1"
+        Me.ProgressBar1.Size = New System.Drawing.Size(283, 23)
+        Me.ProgressBar1.TabIndex = 20
+        '
+        'TextBox1
+        '
+        Me.TextBox1.BackColor = System.Drawing.Color.White
+        Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.TextBox1.Location = New System.Drawing.Point(78, 103)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(106, 13)
+        Me.TextBox1.TabIndex = 19
+        '
+        'Label41
+        '
+        Me.Label41.AutoSize = True
+        Me.Label41.Location = New System.Drawing.Point(3, 103)
+        Me.Label41.Name = "Label41"
+        Me.Label41.Size = New System.Drawing.Size(69, 13)
+        Me.Label41.TabIndex = 18
+        Me.Label41.Text = "Einarbeitung:"
+        '
+        'Button12
+        '
+        Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button12.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button12.Location = New System.Drawing.Point(6, 19)
+        Me.Button12.Name = "Button12"
+        Me.Button12.Size = New System.Drawing.Size(121, 49)
+        Me.Button12.TabIndex = 4
+        Me.Button12.Text = "Datei einlesen ..." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
+        Me.Button12.UseVisualStyleBackColor = True
+        '
+        'Label42
+        '
+        Me.Label42.AutoSize = True
+        Me.Label42.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label42.ForeColor = System.Drawing.SystemColors.ControlDarkDark
+        Me.Label42.Location = New System.Drawing.Point(325, 11)
+        Me.Label42.Name = "Label42"
+        Me.Label42.Size = New System.Drawing.Size(199, 17)
+        Me.Label42.TabIndex = 24
+        Me.Label42.Text = "PLOSE Datenverarbeitung"
+        '
+        'GroupBox12
+        '
+        Me.GroupBox12.Controls.Add(Me.Label43)
+        Me.GroupBox12.Controls.Add(Me.lblPloseAnh_Proz)
+        Me.GroupBox12.Controls.Add(Me.Button13)
+        Me.GroupBox12.Controls.Add(Me.pbPloseAnh_Proz)
+        Me.GroupBox12.Controls.Add(Me.txtPloseAnh_Einarbeitung)
+        Me.GroupBox12.Controls.Add(Me.datPLOSE_Sum_Von)
+        Me.GroupBox12.Controls.Add(Me.Label44)
+        Me.GroupBox12.Controls.Add(Me.Label45)
+        Me.GroupBox12.Controls.Add(Me.Label46)
+        Me.GroupBox12.Controls.Add(Me.Button14)
+        Me.GroupBox12.Controls.Add(Me.datPLOSE_Sum_Bis)
+        Me.GroupBox12.Location = New System.Drawing.Point(322, 22)
+        Me.GroupBox12.Name = "GroupBox12"
+        Me.GroupBox12.Size = New System.Drawing.Size(587, 169)
+        Me.GroupBox12.TabIndex = 23
+        Me.GroupBox12.TabStop = False
+        '
+        'lblPloseAnh_Proz
+        '
+        Me.lblPloseAnh_Proz.Location = New System.Drawing.Point(495, 117)
+        Me.lblPloseAnh_Proz.Name = "lblPloseAnh_Proz"
+        Me.lblPloseAnh_Proz.Size = New System.Drawing.Size(69, 13)
+        Me.lblPloseAnh_Proz.TabIndex = 27
+        Me.lblPloseAnh_Proz.Text = "0%"
+        Me.lblPloseAnh_Proz.TextAlign = System.Drawing.ContentAlignment.TopRight
+        '
+        'Button13
+        '
+        Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button13.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button13.Location = New System.Drawing.Point(37, 88)
+        Me.Button13.Name = "Button13"
+        Me.Button13.Size = New System.Drawing.Size(238, 37)
+        Me.Button13.TabIndex = 26
+        Me.Button13.Text = "Anhänge erstellen"
+        Me.Button13.UseVisualStyleBackColor = True
+        '
+        'pbPloseAnh_Proz
+        '
+        Me.pbPloseAnh_Proz.Location = New System.Drawing.Point(281, 88)
+        Me.pbPloseAnh_Proz.Name = "pbPloseAnh_Proz"
+        Me.pbPloseAnh_Proz.Size = New System.Drawing.Size(283, 23)
+        Me.pbPloseAnh_Proz.TabIndex = 26
+        '
+        'txtPloseAnh_Einarbeitung
+        '
+        Me.txtPloseAnh_Einarbeitung.BackColor = System.Drawing.Color.White
+        Me.txtPloseAnh_Einarbeitung.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.txtPloseAnh_Einarbeitung.Location = New System.Drawing.Point(353, 117)
+        Me.txtPloseAnh_Einarbeitung.Name = "txtPloseAnh_Einarbeitung"
+        Me.txtPloseAnh_Einarbeitung.Size = New System.Drawing.Size(106, 13)
+        Me.txtPloseAnh_Einarbeitung.TabIndex = 25
+        '
+        'datPLOSE_Sum_Von
+        '
+        Me.datPLOSE_Sum_Von.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.datPLOSE_Sum_Von.Location = New System.Drawing.Point(37, 19)
+        Me.datPLOSE_Sum_Von.Name = "datPLOSE_Sum_Von"
+        Me.datPLOSE_Sum_Von.Size = New System.Drawing.Size(103, 20)
+        Me.datPLOSE_Sum_Von.TabIndex = 18
+        '
+        'Label44
+        '
+        Me.Label44.AutoSize = True
+        Me.Label44.Location = New System.Drawing.Point(278, 117)
+        Me.Label44.Name = "Label44"
+        Me.Label44.Size = New System.Drawing.Size(56, 13)
+        Me.Label44.TabIndex = 24
+        Me.Label44.Text = "Fortschritt:"
+        '
+        'Label45
+        '
+        Me.Label45.AutoSize = True
+        Me.Label45.Location = New System.Drawing.Point(143, 22)
+        Me.Label45.Name = "Label45"
+        Me.Label45.Size = New System.Drawing.Size(23, 13)
+        Me.Label45.TabIndex = 21
+        Me.Label45.Text = "bis:"
+        '
+        'Label46
+        '
+        Me.Label46.AutoSize = True
+        Me.Label46.Location = New System.Drawing.Point(3, 22)
+        Me.Label46.Name = "Label46"
+        Me.Label46.Size = New System.Drawing.Size(28, 13)
+        Me.Label46.TabIndex = 19
+        Me.Label46.Text = "von:"
+        '
+        'Button14
+        '
+        Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button14.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+        Me.Button14.Location = New System.Drawing.Point(37, 45)
+        Me.Button14.Name = "Button14"
+        Me.Button14.Size = New System.Drawing.Size(238, 37)
+        Me.Button14.TabIndex = 21
+        Me.Button14.Text = "Summenbericht erstellen"
+        Me.Button14.UseVisualStyleBackColor = True
+        '
+        'datPLOSE_Sum_Bis
+        '
+        Me.datPLOSE_Sum_Bis.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.datPLOSE_Sum_Bis.Location = New System.Drawing.Point(172, 19)
+        Me.datPLOSE_Sum_Bis.Name = "datPLOSE_Sum_Bis"
+        Me.datPLOSE_Sum_Bis.Size = New System.Drawing.Size(103, 20)
+        Me.datPLOSE_Sum_Bis.TabIndex = 20
+        '
        'pnl
        '
        Me.pnl.Controls.Add(Me.Label2)
@@ -1311,16 +1564,22 @@ Partial Class usrCntlMDMAuswertungen
        Me.pnl.Size = New System.Drawing.Size(1057, 54)
        Me.pnl.TabIndex = 26
        '
-        'cboIDSDateType
+        'datPloseAnhang
        '
-        Me.cboIDSDateType._allowedValuesFreiText = Nothing
-        Me.cboIDSDateType._allowFreiText = False
-        Me.cboIDSDateType._value = ""
-        Me.cboIDSDateType.FormattingEnabled = True
-        Me.cboIDSDateType.Location = New System.Drawing.Point(9, 63)
-        Me.cboIDSDateType.Name = "cboIDSDateType"
-        Me.cboIDSDateType.Size = New System.Drawing.Size(152, 21)
-        Me.cboIDSDateType.TabIndex = 27
+        Me.datPloseAnhang.Format = System.Windows.Forms.DateTimePickerFormat.[Short]
+        Me.datPloseAnhang.Location = New System.Drawing.Point(494, 153)
+        Me.datPloseAnhang.Name = "datPloseAnhang"
+        Me.datPloseAnhang.Size = New System.Drawing.Size(103, 20)
+        Me.datPloseAnhang.TabIndex = 28
+        '
+        'Label43
+        '
+        Me.Label43.AutoSize = True
+        Me.Label43.Location = New System.Drawing.Point(85, 137)
+        Me.Label43.Name = "Label43"
+        Me.Label43.Size = New System.Drawing.Size(81, 13)
+        Me.Label43.TabIndex = 28
+        Me.Label43.Text = "Datum Anhang:"
        '
        'usrCntlMDMAuswertungen
        '
@@ -1366,6 +1625,12 @@ Partial Class usrCntlMDMAuswertungen
        Me.TabPage2.PerformLayout()
        Me.GroupBox10.ResumeLayout(False)
        Me.GroupBox10.PerformLayout()
+        Me.tbPLOSE.ResumeLayout(False)
+        Me.tbPLOSE.PerformLayout()
+        Me.GroupBox11.ResumeLayout(False)
+        Me.GroupBox11.PerformLayout()
+        Me.GroupBox12.ResumeLayout(False)
+        Me.GroupBox12.PerformLayout()
        Me.pnl.ResumeLayout(False)
        Me.pnl.PerformLayout()
        Me.ResumeLayout(False)
@@ -1475,4 +1740,27 @@ Partial Class usrCntlMDMAuswertungen
    Friend WithEvents txtOrt As TextBox
    Friend WithEvents lbl As Label
    Friend WithEvents cboIDSDateType As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents tbPLOSE As TabPage
+    Friend WithEvents Label37 As Label
+    Friend WithEvents GroupBox11 As GroupBox
+    Friend WithEvents Label39 As Label
+    Friend WithEvents Label40 As Label
+    Friend WithEvents ProgressBar1 As ProgressBar
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents Label41 As Label
+    Friend WithEvents Button12 As Button
+    Friend WithEvents Label42 As Label
+    Friend WithEvents GroupBox12 As GroupBox
+    Friend WithEvents datPLOSE_Sum_Von As DateTimePicker
+    Friend WithEvents Label45 As Label
+    Friend WithEvents Label46 As Label
+    Friend WithEvents datPLOSE_Sum_Bis As DateTimePicker
+    Friend WithEvents Button13 As Button
+    Friend WithEvents Button14 As Button
+    Friend WithEvents lblPloseAnh_Proz As Label
+    Friend WithEvents pbPloseAnh_Proz As ProgressBar
+    Friend WithEvents txtPloseAnh_Einarbeitung As TextBox
+    Friend WithEvents Label44 As Label
+    Friend WithEvents datPloseAnhang As DateTimePicker
+    Friend WithEvents Label43 As Label
 End Class