diff --git a/Aviso/ATEZ/frmATEZ_EZA.Designer.vb b/Aviso/ATEZ/frmATEZ_EZA.Designer.vb index 371d3e6..a0deea1 100644 --- a/Aviso/ATEZ/frmATEZ_EZA.Designer.vb +++ b/Aviso/ATEZ/frmATEZ_EZA.Designer.vb @@ -26,6 +26,7 @@ Partial Class frmATEZ_EZA Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmATEZ_EZA)) Me.btnSend = New System.Windows.Forms.Button() Me.pnlHead = New System.Windows.Forms.Panel() + Me.Label4 = New System.Windows.Forms.Label() Me.lblInfo = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label() Me.cboStammreferenz = New VERAG_PROG_ALLGEMEIN.MyComboBox() @@ -48,7 +49,6 @@ Partial Class frmATEZ_EZA Me.btnAgg_desc = New System.Windows.Forms.Button() Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.Label4 = New System.Windows.Forms.Label() Me.Button2 = New System.Windows.Forms.Button() Me.pnlHead.SuspendLayout() CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit() @@ -59,23 +59,24 @@ Partial Class frmATEZ_EZA Me.btnSend.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnSend.BackColor = System.Drawing.Color.White Me.btnSend.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center - Me.btnSend.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnSend.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.btnSend.Image = Global.AVISO.My.Resources.Resources.Declarant - Me.btnSend.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.btnSend.Location = New System.Drawing.Point(486, 348) + Me.btnSend.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.btnSend.Image = Global.AVISO.My.Resources.Resources.ico_atez_declarantAI + Me.btnSend.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnSend.Location = New System.Drawing.Point(473, 348) Me.btnSend.Margin = New System.Windows.Forms.Padding(2) Me.btnSend.Name = "btnSend" - Me.btnSend.Size = New System.Drawing.Size(192, 58) + Me.btnSend.Padding = New System.Windows.Forms.Padding(5, 0, 5, 0) + Me.btnSend.Size = New System.Drawing.Size(205, 58) Me.btnSend.TabIndex = 26 Me.btnSend.Text = "An ATEZ senden >>" - Me.btnSend.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.btnSend.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnSend.UseVisualStyleBackColor = False ' 'pnlHead ' Me.pnlHead.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.pnlHead.BackColor = System.Drawing.Color.White + Me.pnlHead.Controls.Add(Me.Label1) Me.pnlHead.Controls.Add(Me.Label4) Me.pnlHead.Controls.Add(Me.lblInfo) Me.pnlHead.Controls.Add(Me.Label8) @@ -85,7 +86,6 @@ Partial Class frmATEZ_EZA Me.pnlHead.Controls.Add(Me.Label9) Me.pnlHead.Controls.Add(Me.sbAdressierteZollstelle) Me.pnlHead.Controls.Add(Me.txtDyMandant) - Me.pnlHead.Controls.Add(Me.Label1) Me.pnlHead.Controls.Add(Me.txtDyNiederlassung) Me.pnlHead.Controls.Add(Me.lblBezugsnummer) Me.pnlHead.Location = New System.Drawing.Point(3, 2) @@ -93,6 +93,15 @@ Partial Class frmATEZ_EZA Me.pnlHead.Size = New System.Drawing.Size(675, 151) Me.pnlHead.TabIndex = 112 ' + 'Label4 + ' + Me.Label4.BackColor = System.Drawing.Color.White + Me.Label4.Location = New System.Drawing.Point(108, 13) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(45, 12) + Me.Label4.TabIndex = 149 + Me.Label4.Text = "SUB" + ' 'lblInfo ' Me.lblInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) @@ -106,9 +115,9 @@ Partial Class frmATEZ_EZA ' Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label8.AutoSize = True - Me.Label8.Location = New System.Drawing.Point(10, 61) + Me.Label8.Location = New System.Drawing.Point(6, 61) Me.Label8.Name = "Label8" - Me.Label8.Size = New System.Drawing.Size(80, 13) + Me.Label8.Size = New System.Drawing.Size(86, 13) Me.Label8.TabIndex = 146 Me.Label8.Text = "Stammreferenz:" Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight @@ -154,17 +163,19 @@ Partial Class frmATEZ_EZA ' 'Label3 ' - Me.Label3.Location = New System.Drawing.Point(10, 91) + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(6, 91) Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(103, 17) + Me.Label3.Size = New System.Drawing.Size(48, 13) Me.Label3.TabIndex = 113 Me.Label3.Text = "LKW-KZ:" ' 'Label9 ' - Me.Label9.Location = New System.Drawing.Point(10, 117) + Me.Label9.AutoSize = True + Me.Label9.Location = New System.Drawing.Point(6, 117) Me.Label9.Name = "Label9" - Me.Label9.Size = New System.Drawing.Size(103, 17) + Me.Label9.Size = New System.Drawing.Size(117, 13) Me.Label9.TabIndex = 110 Me.Label9.Text = "Adressierte-Zollstelle:" ' @@ -196,10 +207,11 @@ Partial Class frmATEZ_EZA ' 'txtDyMandant ' + Me.txtDyMandant.AutoSize = True Me.txtDyMandant.BackColor = System.Drawing.Color.White - Me.txtDyMandant.Location = New System.Drawing.Point(2, 7) + Me.txtDyMandant.Location = New System.Drawing.Point(6, 13) Me.txtDyMandant.Name = "txtDyMandant" - Me.txtDyMandant.Size = New System.Drawing.Size(44, 13) + Me.txtDyMandant.Size = New System.Drawing.Size(35, 13) Me.txtDyMandant.TabIndex = 109 Me.txtDyMandant.Text = "VERG" Me.txtDyMandant.TextAlign = System.Drawing.ContentAlignment.TopRight @@ -209,16 +221,16 @@ Partial Class frmATEZ_EZA Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label1.AutoSize = True Me.Label1.BackColor = System.Drawing.Color.White - Me.Label1.Location = New System.Drawing.Point(387, 20) + Me.Label1.Location = New System.Drawing.Point(387, 13) Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(82, 13) + Me.Label1.Size = New System.Drawing.Size(89, 13) Me.Label1.TabIndex = 106 Me.Label1.Text = "Bezugsnummer:" ' 'txtDyNiederlassung ' Me.txtDyNiederlassung.BackColor = System.Drawing.Color.White - Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 7) + Me.txtDyNiederlassung.Location = New System.Drawing.Point(55, 13) Me.txtDyNiederlassung.Name = "txtDyNiederlassung" Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12) Me.txtDyNiederlassung.TabIndex = 108 @@ -229,7 +241,7 @@ Partial Class frmATEZ_EZA Me.lblBezugsnummer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblBezugsnummer.BackColor = System.Drawing.Color.White Me.lblBezugsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblBezugsnummer.Location = New System.Drawing.Point(475, 14) + Me.lblBezugsnummer.Location = New System.Drawing.Point(475, 8) Me.lblBezugsnummer.Name = "lblBezugsnummer" Me.lblBezugsnummer.Size = New System.Drawing.Size(193, 23) Me.lblBezugsnummer.TabIndex = 107 @@ -238,10 +250,9 @@ Partial Class frmATEZ_EZA ' 'Button3 ' - Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button3.Location = New System.Drawing.Point(473, 159) + Me.Button3.Location = New System.Drawing.Point(473, 157) Me.Button3.Name = "Button3" - Me.Button3.Size = New System.Drawing.Size(205, 23) + Me.Button3.Size = New System.Drawing.Size(205, 25) Me.Button3.TabIndex = 152 Me.Button3.Text = "alle Anhänge auswählen" Me.Button3.UseVisualStyleBackColor = True @@ -264,7 +275,6 @@ Partial Class frmATEZ_EZA ' 'Button1 ' - Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button1.Location = New System.Drawing.Point(3, 383) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(178, 23) @@ -275,8 +285,7 @@ Partial Class frmATEZ_EZA 'btnAgg_Tnr ' Me.btnAgg_Tnr.BackColor = System.Drawing.Color.DeepSkyBlue - Me.btnAgg_Tnr.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAgg_Tnr.Location = New System.Drawing.Point(71, 344) + Me.btnAgg_Tnr.Location = New System.Drawing.Point(79, 345) Me.btnAgg_Tnr.Name = "btnAgg_Tnr" Me.btnAgg_Tnr.Size = New System.Drawing.Size(83, 23) Me.btnAgg_Tnr.TabIndex = 154 @@ -286,6 +295,7 @@ Partial Class frmATEZ_EZA ' 'Label2 ' + Me.Label2.Font = New System.Drawing.Font("Segoe UI", 8.0!) Me.Label2.Location = New System.Drawing.Point(6, 350) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(103, 17) @@ -295,10 +305,9 @@ Partial Class frmATEZ_EZA 'btnAgg_Origin ' Me.btnAgg_Origin.BackColor = System.Drawing.Color.DeepSkyBlue - Me.btnAgg_Origin.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAgg_Origin.Location = New System.Drawing.Point(160, 344) + Me.btnAgg_Origin.Location = New System.Drawing.Point(165, 345) Me.btnAgg_Origin.Name = "btnAgg_Origin" - Me.btnAgg_Origin.Size = New System.Drawing.Size(90, 23) + Me.btnAgg_Origin.Size = New System.Drawing.Size(92, 23) Me.btnAgg_Origin.TabIndex = 155 Me.btnAgg_Origin.Tag = "1" Me.btnAgg_Origin.Text = "Ursprungsland" @@ -306,8 +315,7 @@ Partial Class frmATEZ_EZA ' 'btnAgg_Unit ' - Me.btnAgg_Unit.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAgg_Unit.Location = New System.Drawing.Point(255, 344) + Me.btnAgg_Unit.Location = New System.Drawing.Point(260, 345) Me.btnAgg_Unit.Name = "btnAgg_Unit" Me.btnAgg_Unit.Size = New System.Drawing.Size(79, 23) Me.btnAgg_Unit.TabIndex = 156 @@ -317,8 +325,7 @@ Partial Class frmATEZ_EZA ' 'btnAgg_desc ' - Me.btnAgg_desc.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnAgg_desc.Location = New System.Drawing.Point(340, 344) + Me.btnAgg_desc.Location = New System.Drawing.Point(342, 345) Me.btnAgg_desc.Name = "btnAgg_desc" Me.btnAgg_desc.Size = New System.Drawing.Size(126, 23) Me.btnAgg_desc.TabIndex = 157 @@ -351,19 +358,9 @@ Partial Class frmATEZ_EZA Me.columnName.Name = "columnName" Me.columnName.ReadOnly = True ' - 'Label4 - ' - Me.Label4.BackColor = System.Drawing.Color.White - Me.Label4.Location = New System.Drawing.Point(106, 8) - Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(45, 12) - Me.Label4.TabIndex = 149 - Me.Label4.Text = "SUB" - ' 'Button2 ' - Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button2.Location = New System.Drawing.Point(416, 383) + Me.Button2.Location = New System.Drawing.Point(402, 383) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(65, 23) Me.Button2.TabIndex = 158 @@ -389,6 +386,7 @@ Partial Class frmATEZ_EZA Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.btnSend) Me.Controls.Add(Me.dgvAnhaenge) + Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmATEZ_EZA" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen diff --git a/Aviso/ATEZ/frmATEZ_EZA.vb b/Aviso/ATEZ/frmATEZ_EZA.vb index 92f98a2..9d072dc 100644 --- a/Aviso/ATEZ/frmATEZ_EZA.vb +++ b/Aviso/ATEZ/frmATEZ_EZA.vb @@ -474,7 +474,7 @@ Public Class frmATEZ_EZA ' Case "IMEX" : txtDyMandant.Text = "IMEX" : txtDyNiederlassung.Text = "IME" ' Case "AMBAR" : txtDyMandant.Text = "ATIL" : txtDyNiederlassung.Text = "AMBWO" 'End Select - FIRMA_DY = cDakosyFunftions.getFirma_DY(FilialenNr.ToString, Me) + FIRMA_DY = cDakosyFunftions.getFirma_DY(FilialenNr.ToString, Me, "EZA") txtDyMandant.Text = cDakosyFunftions.getIOPartner(FIRMA_DY, "EZA") txtDyNiederlassung.Text = cDakosyFunftions.getDivision(FIRMA_DY, "EZA") @@ -566,7 +566,7 @@ Public Class frmATEZ_EZA case WHEN [anh_size] > 0 Then ROUND([anh_size] / 1000000,2) End as anh_size, [anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] - WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ = 'PDF' + WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ NOT IN ('MSG', 'SONSTIGES') ORDER BY anh_SendungsId desc, case when [anh_Art] = 'ATR-EUR1' then 0 diff --git a/Aviso/ATEZ/frmATEZ_NCTS.Designer.vb b/Aviso/ATEZ/frmATEZ_NCTS.Designer.vb index 4f828a4..844f7f9 100644 --- a/Aviso/ATEZ/frmATEZ_NCTS.Designer.vb +++ b/Aviso/ATEZ/frmATEZ_NCTS.Designer.vb @@ -39,11 +39,9 @@ Partial Class frmATEZ_NCTS Me.lblC = New System.Windows.Forms.Label() Me.txtTransporttemp = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.cbxTemperatur = New System.Windows.Forms.CheckBox() - Me.sbDurchgangszollstelle5 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.sbDurchgangszollstelle9 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.sbDurchgangszollstelle8 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.sbDurchgangszollstelle7 = New VERAG_PROG_ALLGEMEIN.MySearchBox() - Me.sbDurchgangszollstelle6 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.sbDurchgangszollstelle4 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.sbDurchgangszollstelle3 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.sbDurchgangszollstelle2 = New VERAG_PROG_ALLGEMEIN.MySearchBox() @@ -69,11 +67,14 @@ Partial Class frmATEZ_NCTS Me.Label1 = New System.Windows.Forms.Label() Me.txtDyNiederlassung = New System.Windows.Forms.Label() Me.lblBezugsnummer = New System.Windows.Forms.Label() + Me.sbDurchgangszollstelle5 = New VERAG_PROG_ALLGEMEIN.MySearchBox() + Me.sbDurchgangszollstelle6 = New VERAG_PROG_ALLGEMEIN.MySearchBox() Me.Button3 = New System.Windows.Forms.Button() Me.Label6 = New System.Windows.Forms.Label() Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.lblAnh = New System.Windows.Forms.Label() + Me.Button2 = New System.Windows.Forms.Button() Me.pnlHead.SuspendLayout() CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() @@ -83,17 +84,17 @@ Partial Class frmATEZ_NCTS Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button1.BackColor = System.Drawing.Color.White Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center - Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Button1.Image = Global.AVISO.My.Resources.Resources.Transcode - Me.Button1.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.Button1.Location = New System.Drawing.Point(395, 773) + Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.Button1.Image = Global.AVISO.My.Resources.Resources.ico_atez_transitAI + Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button1.Location = New System.Drawing.Point(379, 773) Me.Button1.Margin = New System.Windows.Forms.Padding(2) Me.Button1.Name = "Button1" - Me.Button1.Size = New System.Drawing.Size(192, 58) + Me.Button1.Padding = New System.Windows.Forms.Padding(5, 0, 5, 0) + Me.Button1.Size = New System.Drawing.Size(208, 58) Me.Button1.TabIndex = 26 Me.Button1.Text = "An ATEZ senden >>" - Me.Button1.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.Button1.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.Button1.UseVisualStyleBackColor = False ' 'pnlHead @@ -154,7 +155,7 @@ Partial Class frmATEZ_NCTS Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(10, 59) Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(52, 13) + Me.Label2.Size = New System.Drawing.Size(56, 13) Me.Label2.TabIndex = 150 Me.Label2.Text = "Prozedur:" Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopRight @@ -168,7 +169,7 @@ Partial Class frmATEZ_NCTS Me.cboProzedur.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboProzedur.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboProzedur.FormattingEnabled = True - Me.cboProzedur.Location = New System.Drawing.Point(151, 56) + Me.cboProzedur.Location = New System.Drawing.Point(157, 56) Me.cboProzedur.Name = "cboProzedur" Me.cboProzedur.Size = New System.Drawing.Size(100, 21) Me.cboProzedur.TabIndex = 149 @@ -186,9 +187,9 @@ Partial Class frmATEZ_NCTS ' Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label8.AutoSize = True - Me.Label8.Location = New System.Drawing.Point(389, 88) + Me.Label8.Location = New System.Drawing.Point(378, 88) Me.Label8.Name = "Label8" - Me.Label8.Size = New System.Drawing.Size(57, 13) + Me.Label8.Size = New System.Drawing.Size(61, 13) Me.Label8.TabIndex = 146 Me.Label8.Text = "Stammref.:" Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight @@ -222,12 +223,12 @@ Partial Class frmATEZ_NCTS Me.txtLKWId._Waehrung = False Me.txtLKWId._WaehrungZeichen = True Me.txtLKWId.ForeColor = System.Drawing.Color.Black - Me.txtLKWId.Location = New System.Drawing.Point(151, 86) + Me.txtLKWId.Location = New System.Drawing.Point(157, 86) Me.txtLKWId.MaxLineLength = -1 Me.txtLKWId.MaxLines_Warning = "" Me.txtLKWId.MaxLines_Warning_Label = Nothing Me.txtLKWId.Name = "txtLKWId" - Me.txtLKWId.Size = New System.Drawing.Size(196, 20) + Me.txtLKWId.Size = New System.Drawing.Size(196, 22) Me.txtLKWId.TabIndex = 144 ' 'usrCntl_Carrier @@ -255,7 +256,7 @@ Partial Class frmATEZ_NCTS Me.txtDat._WaehrungZeichen = True Me.txtDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!) Me.txtDat.ForeColor = System.Drawing.Color.Black - Me.txtDat.Location = New System.Drawing.Point(151, 160) + Me.txtDat.Location = New System.Drawing.Point(157, 160) Me.txtDat.MaxLength = 10 Me.txtDat.MaxLineLength = -1 Me.txtDat.MaxLines_Warning = "" @@ -270,7 +271,7 @@ Partial Class frmATEZ_NCTS Me.dtpDat.CustomFormat = "''" Me.dtpDat.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.dtpDat.Format = System.Windows.Forms.DateTimePickerFormat.Custom - Me.dtpDat.Location = New System.Drawing.Point(151, 160) + Me.dtpDat.Location = New System.Drawing.Point(157, 160) Me.dtpDat.Margin = New System.Windows.Forms.Padding(0) Me.dtpDat.Name = "dtpDat" Me.dtpDat.Size = New System.Drawing.Size(110, 24) @@ -278,16 +279,17 @@ Partial Class frmATEZ_NCTS ' 'Label7 ' - Me.Label7.Location = New System.Drawing.Point(10, 160) + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(10, 165) Me.Label7.Name = "Label7" - Me.Label7.Size = New System.Drawing.Size(134, 17) + Me.Label7.Size = New System.Drawing.Size(145, 13) Me.Label7.TabIndex = 140 Me.Label7.Text = "Wiedergestellungs-Datum:" ' 'lblC ' Me.lblC.AutoSize = True - Me.lblC.Location = New System.Drawing.Point(251, 191) + Me.lblC.Location = New System.Drawing.Point(257, 191) Me.lblC.Name = "lblC" Me.lblC.Size = New System.Drawing.Size(18, 13) Me.lblC.TabIndex = 139 @@ -308,51 +310,26 @@ Partial Class frmATEZ_NCTS Me.txtTransporttemp._Waehrung = False Me.txtTransporttemp._WaehrungZeichen = True Me.txtTransporttemp.ForeColor = System.Drawing.Color.Black - Me.txtTransporttemp.Location = New System.Drawing.Point(151, 187) + Me.txtTransporttemp.Location = New System.Drawing.Point(157, 187) Me.txtTransporttemp.MaxLineLength = -1 Me.txtTransporttemp.MaxLines_Warning = "" Me.txtTransporttemp.MaxLines_Warning_Label = Nothing Me.txtTransporttemp.Name = "txtTransporttemp" - Me.txtTransporttemp.Size = New System.Drawing.Size(100, 20) + Me.txtTransporttemp.Size = New System.Drawing.Size(100, 22) Me.txtTransporttemp.TabIndex = 138 ' 'cbxTemperatur ' Me.cbxTemperatur.AutoSize = True - Me.cbxTemperatur.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cbxTemperatur.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cbxTemperatur.Location = New System.Drawing.Point(13, 187) Me.cbxTemperatur.Name = "cbxTemperatur" - Me.cbxTemperatur.Size = New System.Drawing.Size(131, 17) + Me.cbxTemperatur.Size = New System.Drawing.Size(138, 17) Me.cbxTemperatur.TabIndex = 137 Me.cbxTemperatur.TabStop = False Me.cbxTemperatur.Text = "Transport-Temperatur:" Me.cbxTemperatur.UseVisualStyleBackColor = True ' - 'sbDurchgangszollstelle5 - ' - Me.sbDurchgangszollstelle5._allowFreitext = False - Me.sbDurchgangszollstelle5._AllowSetValue = False - Me.sbDurchgangszollstelle5._allowSpaceAsSplitter = False - Me.sbDurchgangszollstelle5._autoSizeGross = False - Me.sbDurchgangszollstelle5._hideIfListEmpty = True - Me.sbDurchgangszollstelle5._value = "" - Me.sbDurchgangszollstelle5.conn_art = "FMZOLL" - Me.sbDurchgangszollstelle5.dgvpos = "LEFT" - Me.sbDurchgangszollstelle5.DISPLAY_PARAM = Nothing - Me.sbDurchgangszollstelle5.INVISIBLE_COLUMNS = Nothing - Me.sbDurchgangszollstelle5.key_visible = False - Me.sbDurchgangszollstelle5.KEYPARAM = Nothing - Me.sbDurchgangszollstelle5.Location = New System.Drawing.Point(206, 415) - Me.sbDurchgangszollstelle5.Name = "sbDurchgangszollstelle5" - Me.sbDurchgangszollstelle5.searchActive = True - Me.sbDurchgangszollstelle5.Size = New System.Drawing.Size(171, 20) - Me.sbDurchgangszollstelle5.SQL_ORDER_BY = Nothing - Me.sbDurchgangszollstelle5.SQL_SELECT = Nothing - Me.sbDurchgangszollstelle5.SQL_WHERE = Nothing - Me.sbDurchgangszollstelle5.SQL_WhereParamList = Nothing - Me.sbDurchgangszollstelle5.TabIndex = 132 - Me.sbDurchgangszollstelle5.usrcntl = Nothing - ' 'sbDurchgangszollstelle9 ' Me.sbDurchgangszollstelle9._allowFreitext = False @@ -370,7 +347,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle9.Location = New System.Drawing.Point(376, 434) Me.sbDurchgangszollstelle9.Name = "sbDurchgangszollstelle9" Me.sbDurchgangszollstelle9.searchActive = True - Me.sbDurchgangszollstelle9.Size = New System.Drawing.Size(198, 20) + Me.sbDurchgangszollstelle9.Size = New System.Drawing.Size(198, 22) Me.sbDurchgangszollstelle9.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle9.SQL_SELECT = Nothing Me.sbDurchgangszollstelle9.SQL_WHERE = Nothing @@ -395,7 +372,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle8.Location = New System.Drawing.Point(207, 434) Me.sbDurchgangszollstelle8.Name = "sbDurchgangszollstelle8" Me.sbDurchgangszollstelle8.searchActive = True - Me.sbDurchgangszollstelle8.Size = New System.Drawing.Size(171, 20) + Me.sbDurchgangszollstelle8.Size = New System.Drawing.Size(171, 22) Me.sbDurchgangszollstelle8.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle8.SQL_SELECT = Nothing Me.sbDurchgangszollstelle8.SQL_WHERE = Nothing @@ -420,7 +397,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle7.Location = New System.Drawing.Point(13, 434) Me.sbDurchgangszollstelle7.Name = "sbDurchgangszollstelle7" Me.sbDurchgangszollstelle7.searchActive = True - Me.sbDurchgangszollstelle7.Size = New System.Drawing.Size(197, 20) + Me.sbDurchgangszollstelle7.Size = New System.Drawing.Size(197, 22) Me.sbDurchgangszollstelle7.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle7.SQL_SELECT = Nothing Me.sbDurchgangszollstelle7.SQL_WHERE = Nothing @@ -428,31 +405,6 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle7.TabIndex = 134 Me.sbDurchgangszollstelle7.usrcntl = Nothing ' - 'sbDurchgangszollstelle6 - ' - Me.sbDurchgangszollstelle6._allowFreitext = False - Me.sbDurchgangszollstelle6._AllowSetValue = False - Me.sbDurchgangszollstelle6._allowSpaceAsSplitter = False - Me.sbDurchgangszollstelle6._autoSizeGross = False - Me.sbDurchgangszollstelle6._hideIfListEmpty = True - Me.sbDurchgangszollstelle6._value = "" - Me.sbDurchgangszollstelle6.conn_art = "FMZOLL" - Me.sbDurchgangszollstelle6.dgvpos = "LEFT" - Me.sbDurchgangszollstelle6.DISPLAY_PARAM = Nothing - Me.sbDurchgangszollstelle6.INVISIBLE_COLUMNS = Nothing - Me.sbDurchgangszollstelle6.key_visible = False - Me.sbDurchgangszollstelle6.KEYPARAM = Nothing - Me.sbDurchgangszollstelle6.Location = New System.Drawing.Point(375, 415) - Me.sbDurchgangszollstelle6.Name = "sbDurchgangszollstelle6" - Me.sbDurchgangszollstelle6.searchActive = True - Me.sbDurchgangszollstelle6.Size = New System.Drawing.Size(199, 20) - Me.sbDurchgangszollstelle6.SQL_ORDER_BY = Nothing - Me.sbDurchgangszollstelle6.SQL_SELECT = Nothing - Me.sbDurchgangszollstelle6.SQL_WHERE = Nothing - Me.sbDurchgangszollstelle6.SQL_WhereParamList = Nothing - Me.sbDurchgangszollstelle6.TabIndex = 133 - Me.sbDurchgangszollstelle6.usrcntl = Nothing - ' 'sbDurchgangszollstelle4 ' Me.sbDurchgangszollstelle4._allowFreitext = False @@ -470,7 +422,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle4.Location = New System.Drawing.Point(13, 415) Me.sbDurchgangszollstelle4.Name = "sbDurchgangszollstelle4" Me.sbDurchgangszollstelle4.searchActive = True - Me.sbDurchgangszollstelle4.Size = New System.Drawing.Size(195, 20) + Me.sbDurchgangszollstelle4.Size = New System.Drawing.Size(195, 22) Me.sbDurchgangszollstelle4.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle4.SQL_SELECT = Nothing Me.sbDurchgangszollstelle4.SQL_WHERE = Nothing @@ -495,7 +447,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle3.Location = New System.Drawing.Point(376, 396) Me.sbDurchgangszollstelle3.Name = "sbDurchgangszollstelle3" Me.sbDurchgangszollstelle3.searchActive = True - Me.sbDurchgangszollstelle3.Size = New System.Drawing.Size(198, 20) + Me.sbDurchgangszollstelle3.Size = New System.Drawing.Size(198, 22) Me.sbDurchgangszollstelle3.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle3.SQL_SELECT = Nothing Me.sbDurchgangszollstelle3.SQL_WHERE = Nothing @@ -520,7 +472,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle2.Location = New System.Drawing.Point(207, 396) Me.sbDurchgangszollstelle2.Name = "sbDurchgangszollstelle2" Me.sbDurchgangszollstelle2.searchActive = True - Me.sbDurchgangszollstelle2.Size = New System.Drawing.Size(171, 20) + Me.sbDurchgangszollstelle2.Size = New System.Drawing.Size(171, 22) Me.sbDurchgangszollstelle2.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle2.SQL_SELECT = Nothing Me.sbDurchgangszollstelle2.SQL_WHERE = Nothing @@ -545,7 +497,7 @@ Partial Class frmATEZ_NCTS Me.sbDurchgangszollstelle1.Location = New System.Drawing.Point(13, 396) Me.sbDurchgangszollstelle1.Name = "sbDurchgangszollstelle1" Me.sbDurchgangszollstelle1.searchActive = True - Me.sbDurchgangszollstelle1.Size = New System.Drawing.Size(197, 20) + Me.sbDurchgangszollstelle1.Size = New System.Drawing.Size(197, 22) Me.sbDurchgangszollstelle1.SQL_ORDER_BY = Nothing Me.sbDurchgangszollstelle1.SQL_SELECT = Nothing Me.sbDurchgangszollstelle1.SQL_WHERE = Nothing @@ -567,7 +519,7 @@ Partial Class frmATEZ_NCTS Me.lklRoutenauswahl.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.lklRoutenauswahl.Location = New System.Drawing.Point(493, 475) Me.lklRoutenauswahl.Name = "lklRoutenauswahl" - Me.lklRoutenauswahl.Size = New System.Drawing.Size(81, 13) + Me.lklRoutenauswahl.Size = New System.Drawing.Size(88, 13) Me.lklRoutenauswahl.TabIndex = 117 Me.lklRoutenauswahl.TabStop = True Me.lklRoutenauswahl.Text = "Routenauswahl" @@ -589,7 +541,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute5.Location = New System.Drawing.Point(205, 510) Me.sbRoute5.Name = "sbRoute5" Me.sbRoute5.searchActive = True - Me.sbRoute5.Size = New System.Drawing.Size(183, 20) + Me.sbRoute5.Size = New System.Drawing.Size(183, 22) Me.sbRoute5.SQL_ORDER_BY = Nothing Me.sbRoute5.SQL_SELECT = Nothing Me.sbRoute5.SQL_WHERE = Nothing @@ -614,7 +566,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute9.Location = New System.Drawing.Point(387, 529) Me.sbRoute9.Name = "sbRoute9" Me.sbRoute9.searchActive = True - Me.sbRoute9.Size = New System.Drawing.Size(187, 20) + Me.sbRoute9.Size = New System.Drawing.Size(187, 22) Me.sbRoute9.SQL_ORDER_BY = Nothing Me.sbRoute9.SQL_SELECT = Nothing Me.sbRoute9.SQL_WHERE = Nothing @@ -639,7 +591,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute8.Location = New System.Drawing.Point(205, 529) Me.sbRoute8.Name = "sbRoute8" Me.sbRoute8.searchActive = True - Me.sbRoute8.Size = New System.Drawing.Size(183, 20) + Me.sbRoute8.Size = New System.Drawing.Size(183, 22) Me.sbRoute8.SQL_ORDER_BY = Nothing Me.sbRoute8.SQL_SELECT = Nothing Me.sbRoute8.SQL_WHERE = Nothing @@ -664,7 +616,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute7.Location = New System.Drawing.Point(13, 529) Me.sbRoute7.Name = "sbRoute7" Me.sbRoute7.searchActive = True - Me.sbRoute7.Size = New System.Drawing.Size(195, 20) + Me.sbRoute7.Size = New System.Drawing.Size(195, 22) Me.sbRoute7.SQL_ORDER_BY = Nothing Me.sbRoute7.SQL_SELECT = Nothing Me.sbRoute7.SQL_WHERE = Nothing @@ -689,7 +641,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute6.Location = New System.Drawing.Point(387, 510) Me.sbRoute6.Name = "sbRoute6" Me.sbRoute6.searchActive = True - Me.sbRoute6.Size = New System.Drawing.Size(187, 20) + Me.sbRoute6.Size = New System.Drawing.Size(187, 22) Me.sbRoute6.SQL_ORDER_BY = Nothing Me.sbRoute6.SQL_SELECT = Nothing Me.sbRoute6.SQL_WHERE = Nothing @@ -714,7 +666,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute4.Location = New System.Drawing.Point(13, 510) Me.sbRoute4.Name = "sbRoute4" Me.sbRoute4.searchActive = True - Me.sbRoute4.Size = New System.Drawing.Size(195, 20) + Me.sbRoute4.Size = New System.Drawing.Size(195, 22) Me.sbRoute4.SQL_ORDER_BY = Nothing Me.sbRoute4.SQL_SELECT = Nothing Me.sbRoute4.SQL_WHERE = Nothing @@ -739,7 +691,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute3.Location = New System.Drawing.Point(387, 491) Me.sbRoute3.Name = "sbRoute3" Me.sbRoute3.searchActive = True - Me.sbRoute3.Size = New System.Drawing.Size(187, 20) + Me.sbRoute3.Size = New System.Drawing.Size(187, 22) Me.sbRoute3.SQL_ORDER_BY = Nothing Me.sbRoute3.SQL_SELECT = Nothing Me.sbRoute3.SQL_WHERE = Nothing @@ -764,7 +716,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute2.Location = New System.Drawing.Point(205, 491) Me.sbRoute2.Name = "sbRoute2" Me.sbRoute2.searchActive = True - Me.sbRoute2.Size = New System.Drawing.Size(183, 20) + Me.sbRoute2.Size = New System.Drawing.Size(183, 22) Me.sbRoute2.SQL_ORDER_BY = Nothing Me.sbRoute2.SQL_SELECT = Nothing Me.sbRoute2.SQL_WHERE = Nothing @@ -789,7 +741,7 @@ Partial Class frmATEZ_NCTS Me.sbRoute1.Location = New System.Drawing.Point(13, 491) Me.sbRoute1.Name = "sbRoute1" Me.sbRoute1.searchActive = True - Me.sbRoute1.Size = New System.Drawing.Size(195, 20) + Me.sbRoute1.Size = New System.Drawing.Size(195, 22) Me.sbRoute1.SQL_ORDER_BY = Nothing Me.sbRoute1.SQL_SELECT = Nothing Me.sbRoute1.SQL_WHERE = Nothing @@ -807,9 +759,9 @@ Partial Class frmATEZ_NCTS ' 'Label4 ' - Me.Label4.Location = New System.Drawing.Point(10, 138) + Me.Label4.Location = New System.Drawing.Point(10, 141) Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(121, 17) + Me.Label4.Size = New System.Drawing.Size(135, 17) Me.Label4.TabIndex = 114 Me.Label4.Text = "Bestimmungs-Zollstelle:" ' @@ -827,10 +779,10 @@ Partial Class frmATEZ_NCTS Me.sbBestimmungsZollstelle.INVISIBLE_COLUMNS = Nothing Me.sbBestimmungsZollstelle.key_visible = False Me.sbBestimmungsZollstelle.KEYPARAM = Nothing - Me.sbBestimmungsZollstelle.Location = New System.Drawing.Point(151, 138) + Me.sbBestimmungsZollstelle.Location = New System.Drawing.Point(157, 138) Me.sbBestimmungsZollstelle.Name = "sbBestimmungsZollstelle" Me.sbBestimmungsZollstelle.searchActive = True - Me.sbBestimmungsZollstelle.Size = New System.Drawing.Size(196, 20) + Me.sbBestimmungsZollstelle.Size = New System.Drawing.Size(196, 22) Me.sbBestimmungsZollstelle.SQL_ORDER_BY = Nothing Me.sbBestimmungsZollstelle.SQL_SELECT = Nothing Me.sbBestimmungsZollstelle.SQL_WHERE = Nothing @@ -868,10 +820,10 @@ Partial Class frmATEZ_NCTS Me.sbAbgangZollstelle.INVISIBLE_COLUMNS = Nothing Me.sbAbgangZollstelle.key_visible = False Me.sbAbgangZollstelle.KEYPARAM = Nothing - Me.sbAbgangZollstelle.Location = New System.Drawing.Point(151, 112) + Me.sbAbgangZollstelle.Location = New System.Drawing.Point(157, 112) Me.sbAbgangZollstelle.Name = "sbAbgangZollstelle" Me.sbAbgangZollstelle.searchActive = True - Me.sbAbgangZollstelle.Size = New System.Drawing.Size(196, 20) + Me.sbAbgangZollstelle.Size = New System.Drawing.Size(196, 22) Me.sbAbgangZollstelle.SQL_ORDER_BY = Nothing Me.sbAbgangZollstelle.SQL_SELECT = Nothing Me.sbAbgangZollstelle.SQL_WHERE = Nothing @@ -896,14 +848,14 @@ Partial Class frmATEZ_NCTS Me.Label1.BackColor = System.Drawing.Color.White Me.Label1.Location = New System.Drawing.Point(296, 19) Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(82, 13) + Me.Label1.Size = New System.Drawing.Size(89, 13) Me.Label1.TabIndex = 106 Me.Label1.Text = "Bezugsnummer:" ' 'txtDyNiederlassung ' Me.txtDyNiederlassung.BackColor = System.Drawing.Color.White - Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 15) + Me.txtDyNiederlassung.Location = New System.Drawing.Point(52, 14) Me.txtDyNiederlassung.Name = "txtDyNiederlassung" Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12) Me.txtDyNiederlassung.TabIndex = 108 @@ -921,9 +873,58 @@ Partial Class frmATEZ_NCTS Me.lblBezugsnummer.Text = "4800/000000/17 AAA" Me.lblBezugsnummer.TextAlign = System.Drawing.ContentAlignment.MiddleRight ' + 'sbDurchgangszollstelle5 + ' + Me.sbDurchgangszollstelle5._allowFreitext = False + Me.sbDurchgangszollstelle5._AllowSetValue = False + Me.sbDurchgangszollstelle5._allowSpaceAsSplitter = False + Me.sbDurchgangszollstelle5._autoSizeGross = False + Me.sbDurchgangszollstelle5._hideIfListEmpty = True + Me.sbDurchgangszollstelle5._value = "" + Me.sbDurchgangszollstelle5.conn_art = "FMZOLL" + Me.sbDurchgangszollstelle5.dgvpos = "LEFT" + Me.sbDurchgangszollstelle5.DISPLAY_PARAM = Nothing + Me.sbDurchgangszollstelle5.INVISIBLE_COLUMNS = Nothing + Me.sbDurchgangszollstelle5.key_visible = False + Me.sbDurchgangszollstelle5.KEYPARAM = Nothing + Me.sbDurchgangszollstelle5.Location = New System.Drawing.Point(206, 415) + Me.sbDurchgangszollstelle5.Name = "sbDurchgangszollstelle5" + Me.sbDurchgangszollstelle5.searchActive = True + Me.sbDurchgangszollstelle5.Size = New System.Drawing.Size(171, 22) + Me.sbDurchgangszollstelle5.SQL_ORDER_BY = Nothing + Me.sbDurchgangszollstelle5.SQL_SELECT = Nothing + Me.sbDurchgangszollstelle5.SQL_WHERE = Nothing + Me.sbDurchgangszollstelle5.SQL_WhereParamList = Nothing + Me.sbDurchgangszollstelle5.TabIndex = 132 + Me.sbDurchgangszollstelle5.usrcntl = Nothing + ' + 'sbDurchgangszollstelle6 + ' + Me.sbDurchgangszollstelle6._allowFreitext = False + Me.sbDurchgangszollstelle6._AllowSetValue = False + Me.sbDurchgangszollstelle6._allowSpaceAsSplitter = False + Me.sbDurchgangszollstelle6._autoSizeGross = False + Me.sbDurchgangszollstelle6._hideIfListEmpty = True + Me.sbDurchgangszollstelle6._value = "" + Me.sbDurchgangszollstelle6.conn_art = "FMZOLL" + Me.sbDurchgangszollstelle6.dgvpos = "LEFT" + Me.sbDurchgangszollstelle6.DISPLAY_PARAM = Nothing + Me.sbDurchgangszollstelle6.INVISIBLE_COLUMNS = Nothing + Me.sbDurchgangszollstelle6.key_visible = False + Me.sbDurchgangszollstelle6.KEYPARAM = Nothing + Me.sbDurchgangszollstelle6.Location = New System.Drawing.Point(375, 415) + Me.sbDurchgangszollstelle6.Name = "sbDurchgangszollstelle6" + Me.sbDurchgangszollstelle6.searchActive = True + Me.sbDurchgangszollstelle6.Size = New System.Drawing.Size(199, 22) + Me.sbDurchgangszollstelle6.SQL_ORDER_BY = Nothing + Me.sbDurchgangszollstelle6.SQL_SELECT = Nothing + Me.sbDurchgangszollstelle6.SQL_WHERE = Nothing + Me.sbDurchgangszollstelle6.SQL_WhereParamList = Nothing + Me.sbDurchgangszollstelle6.TabIndex = 133 + Me.sbDurchgangszollstelle6.usrcntl = Nothing + ' 'Button3 ' - Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button3.Location = New System.Drawing.Point(409, 584) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(178, 23) @@ -970,18 +971,30 @@ Partial Class frmATEZ_NCTS Me.lblAnh.TabIndex = 151 Me.lblAnh.Visible = False ' + 'Button2 + ' + Me.Button2.Location = New System.Drawing.Point(3, 807) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(178, 23) + Me.Button2.TabIndex = 155 + Me.Button2.Text = "JSON" + Me.Button2.UseVisualStyleBackColor = True + Me.Button2.Visible = False + ' 'frmATEZ_NCTS ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.ClientSize = New System.Drawing.Size(589, 842) + Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.lblAnh) Me.Controls.Add(Me.pnlHead) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.dgvAnhaenge) + Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmATEZ_NCTS" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen @@ -1042,4 +1055,5 @@ Partial Class frmATEZ_NCTS Friend WithEvents cboProzedur As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents lblAnh As Label Friend WithEvents Button3 As Button + Friend WithEvents Button2 As Button End Class diff --git a/Aviso/ATEZ/frmATEZ_NCTS.vb b/Aviso/ATEZ/frmATEZ_NCTS.vb index ea867c3..46e5d1c 100644 --- a/Aviso/ATEZ/frmATEZ_NCTS.vb +++ b/Aviso/ATEZ/frmATEZ_NCTS.vb @@ -72,7 +72,7 @@ Public Class frmATEZ_NCTS End Sub - Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click, Button2.Click Try @@ -148,6 +148,11 @@ Public Class frmATEZ_NCTS saveRoute(atez_data) setDurchgangszolstellen() setRoute() + + If sender Is Button2 Then + MsgBox(getJSONAtezData(atez_data, atez)) + Exit Sub + End If If sendAtezData(atez_data, atez) Then AvisoStatusFunctions.insertSendungsVermerk(SENDUNG.tblSnd_SendungID, SENDUNG.tblSnd_AvisoID, "An ATEZ gesendet", 109) Me.Close() @@ -165,6 +170,10 @@ Public Class frmATEZ_NCTS End Sub + Private Function getJSONAtezData(atezData As cATEZ_NCTS_DATA, atez As cATEZ_NCTS_IN) As String + Dim jsonData = atez.setJsonPDF(atezData, dgvAnhaenge) + Return (jsonData.Emit()) + End Function Private Function sendAtezData(atezData As cATEZ_NCTS_DATA, atez As cATEZ_NCTS_IN) As Boolean Dim failreDesc As String @@ -446,7 +455,7 @@ Public Class frmATEZ_NCTS when [anh_Art] = 'Sonstiges' then 'OTHER' when [anh_Art] ='' then 'OTHER' End [anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] - WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ = 'PDF' + WHERE [anh_AvisoId]=" & AVISO.AvisoID & "AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId='" & SENDUNG.tblSnd_SendungID & "') And anh_Typ NOT IN ('MSG', 'SONSTIGES') ORDER BY anh_SendungsId desc, case when [anh_Art] = 'ATR-EUR1' then 0 diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj index 05ab612..03af2e5 100644 --- a/Aviso/Aviso.vbproj +++ b/Aviso/Aviso.vbproj @@ -1905,6 +1905,54 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Always diff --git a/Aviso/AvisoStatusFunctions.vb b/Aviso/AvisoStatusFunctions.vb index 9457bd1..ff2ce7c 100644 --- a/Aviso/AvisoStatusFunctions.vb +++ b/Aviso/AvisoStatusFunctions.vb @@ -1,4 +1,5 @@ -Imports SDL +Imports Confluent.Kafka +Imports SDL Imports VERAG_PROG_ALLGEMEIN Imports VERAG_PROG_ALLGEMEIN.cGlobal Imports VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO @@ -1813,8 +1814,8 @@ ELSE_ATILLA: If SendungsId Is Nothing Then Return False If Not IsNumeric(SendungsId) Then Return False - If AvisoID Is Nothing Then Return False - If Not IsNumeric(AvisoID) Then Return False + 'If AvisoID Is Nothing Then Return False + 'If Not IsNumeric(AvisoID) Then Return False Dim SENDUNG_TMP = New VERAG_PROG_ALLGEMEIN.cSendungen(SendungsId) @@ -1837,10 +1838,10 @@ ELSE_ATILLA: If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId IsNot Nothing Then SENDUNG_TMP.tblSnd_TeamId = VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId End If SENDUNG_TMP.tblSnd_Vorbereitet = Now 'SENDUNG_TMP.tblSnd_Status=VERAG_PROG_ALLGEMEIN.vor ' Status macht keinen Sinn.. - AvisoDAL.addAenderung(AvisoID, "Sendung auf VORBEREITET gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf VORBEREITET gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf VORBEREITET gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf VORBEREITET gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) Else SENDUNG_TMP.tblSnd_Vorbereitet = Nothing - AvisoDAL.addAenderung(AvisoID, "Sendung auf NICHT VORBEREITET gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT VORBEREITET gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf NICHT VORBEREITET gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT VORBEREITET gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) End If Return SENDUNG_TMP.SAVE() @@ -1850,8 +1851,8 @@ ELSE_ATILLA: If SendungsId Is Nothing Then Return False If Not IsNumeric(SendungsId) Then Return False - If AvisoID Is Nothing Then Return False - If Not IsNumeric(AvisoID) Then Return False + 'If AvisoID Is Nothing Then Return False + 'If Not IsNumeric(AvisoID) Then Return False Dim SENDUNG_TMP = New VERAG_PROG_ALLGEMEIN.cSendungen(SendungsId) @@ -1876,21 +1877,39 @@ ELSE_ATILLA: 'If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId IsNot Nothing Then SENDUNG_TMP.tblSnd_TeamId = VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId SENDUNG_TMP.tblSnd_AbklaerungTR = Now 'SENDUNG_TMP.tblSnd_Status=VERAG_PROG_ALLGEMEIN.vor ' Status macht keinen Sinn.. - AvisoDAL.addAenderung(AvisoID, "Sendung auf ABGEKLÄRT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf ABGEKLÄRT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf ABGEKLÄRT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf ABGEKLÄRT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) Else SENDUNG_TMP.tblSnd_AbklaerungTR = Nothing - AvisoDAL.addAenderung(AvisoID, "Sendung auf NICHT ABGEKLÄRT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT ABGEKLÄRT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf NICHT ABGEKLÄRT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT ABGEKLÄRT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) End If Return SENDUNG_TMP.SAVE() End Function + Public Function setSendungSpeditionsbuchEintrag(SendungsId, AvisoID) As Boolean + + Dim FUNC As New AvisoStatusFunctions + + Dim posnr As posNr = FUNC.SpeditionsbuchEintrag(AvisoID, SendungsId) + If posnr IsNot Nothing Then + Dim sndEntry As New VERAG_PROG_ALLGEMEIN.cSendungen(SendungsId) + sndEntry.FilialenNr = posnr.Filiale + sndEntry.AbfertigungsNr = posnr.Abfertigungsnummer + sndEntry.UnterNr = posnr.UnterNr + 'sndEntry.tblSnd_SpeditionsbuchEingetragen = (posnr.Filiale > 0 And posnr.Abfertigungsnummer > 0 And posnr.UnterNr >= 0) ' Wenn Sped Eintrag gelöscht-> - 1, dann ist der Eintrag nicht mehr vorhanden + Dim vorhanden = SQL.getValueTxtBySql("SELECT COUNT(*) FROM [Speditionsbuch] WHERE [FilialenNr]='" & sndEntry.FilialenNr & "' AND AbfertigungsNr='" & sndEntry.AbfertigungsNr & "' AND UnterNr='" & sndEntry.UnterNr & "'", "FMZOLL") + sndEntry.tblSnd_SpeditionsbuchEingetragen = (vorhanden > 0) + sndEntry.SAVE() + End If + 'Vermerke_anzeigen() + + End Function Public Function setSendungAbfertigungTR(SendungsId, AvisoID, Optional anzahl = 1, Optional anzahlPos = 1) As Boolean If SendungsId Is Nothing Then Return False If Not IsNumeric(SendungsId) Then Return False - If AvisoID Is Nothing Then Return False - If Not IsNumeric(AvisoID) Then Return False + 'If AvisoID Is Nothing Then Return False + 'If Not IsNumeric(AvisoID) Then Return False Dim SENDUNG_TMP = New VERAG_PROG_ALLGEMEIN.cSendungen(SendungsId) @@ -1917,10 +1936,10 @@ ELSE_ATILLA: ' If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId IsNot Nothing Then SENDUNG_TMP.tblSnd_TeamId = VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId SENDUNG_TMP.tblSnd_AbfertigungTR = Now 'SENDUNG_TMP.tblSnd_Status=VERAG_PROG_ALLGEMEIN.vor ' Status macht keinen Sinn.. - AvisoDAL.addAenderung(AvisoID, "Sendung auf ABGEFERTIGT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf ABGEFERTIGT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm") & "(Anz:" & SENDUNG_TMP.tblSnd_AbfertigungTRAnzahl & ", Pos:" & SENDUNG_TMP.tblSnd_AbfertigungTRAnzahlPos & ")") + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf ABGEFERTIGT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf ABGEFERTIGT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm") & "(Anz:" & SENDUNG_TMP.tblSnd_AbfertigungTRAnzahl & ", Pos:" & SENDUNG_TMP.tblSnd_AbfertigungTRAnzahlPos & ")") Else SENDUNG_TMP.tblSnd_AbfertigungTR = Nothing - AvisoDAL.addAenderung(AvisoID, "Sendung auf NICHT ABGEFERTIGT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT ABGEFERTIGT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf NICHT ABGEFERTIGT (TR) gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT ABGEFERTIGT (TR) gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) End If Return SENDUNG_TMP.SAVE() @@ -1930,8 +1949,8 @@ ELSE_ATILLA: If SendungsId Is Nothing Then Return False If Not IsNumeric(SendungsId) Then Return False - If AvisoID Is Nothing Then Return False - If Not IsNumeric(AvisoID) Then Return False + 'If AvisoID Is Nothing Then Return False + 'If Not IsNumeric(AvisoID) Then Return False Dim SENDUNG_TMP = New VERAG_PROG_ALLGEMEIN.cSendungen(SendungsId) @@ -1940,10 +1959,10 @@ ELSE_ATILLA: If SENDUNG_TMP.tblSnd_Fakturiert Is Nothing Then SENDUNG_TMP.tblSnd_Fakturiert = Now 'SENDUNG_TMP.tblSnd_Status=VERAG_PROG_ALLGEMEIN.vor ' Status macht keinen Sinn.. - AvisoDAL.addAenderung(AvisoID, "Sendung auf FAKTURIERT gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf FAKTURIERT gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf FAKTURIERT gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf FAKTURIERT gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) Else SENDUNG_TMP.tblSnd_Fakturiert = Nothing - AvisoDAL.addAenderung(AvisoID, "Sendung auf NICHT FAKTURIERT gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT FAKTURIERT gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) + AvisoDAL.addAenderung(If(AvisoID, -1), "Sendung auf NICHT FAKTURIERT gesetzt", "Sendung '" & SENDUNG_TMP.tblSnd_PosUnterNr & " " & SENDUNG_TMP.tblSnd_Empfaenger & "' auf NICHT FAKTURIERT gesetzt von " & VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter & " am " & Format(Now, "dd.MM.yyyy HH:mm")) End If Return SENDUNG_TMP.SAVE() @@ -1955,9 +1974,9 @@ ELSE_ATILLA: If sendId Is Nothing Then Return Nothing - If AvisoID Is Nothing Then Return Nothing + ' If AvisoID Is Nothing Then Return Nothing If sendId <= 0 Then Return Nothing - If AvisoID <= 0 Then Return Nothing + ' If AvisoID <= 0 Then Return Nothing For Each openForm In Application.OpenForms() If TypeOf (openForm) Is frmSendungsdetailsNEU Then diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index ae9a434..5d87ae2 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/My Project/Resources.Designer.vb b/Aviso/My Project/Resources.Designer.vb index 98625bf..8af5c68 100644 --- a/Aviso/My Project/Resources.Designer.vb +++ b/Aviso/My Project/Resources.Designer.vb @@ -878,6 +878,466 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_add() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_add", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_atez_declarantAI() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_atez_declarantAI", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_atez_logicust() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_atez_logicust", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_atez_tariffAI() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_atez_tariffAI", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_atez_transitAI() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_atez_transitAI", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_ATR() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_ATR", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_checklist() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_checklist", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_CMR() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_CMR", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_dienstplan() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_dienstplan", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_DocEdit() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_DocEdit", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_docFin() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_docFin", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_docSave() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_docSave", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_docSearch() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_docSearch", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_fakturierung() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_fakturierung", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_handshake() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_handshake", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_ImportAssistant() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_ImportAssistant", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_importaviso() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_importaviso", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_inventor() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_inventor", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_kasse() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_kasse", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_kassenbuch() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_kassenbuch", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_kunden() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_kunden", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_loupe() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_loupe", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_mail() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_mail", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_mitarbeiter() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_mitarbeiter", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_Options() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_Options", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_organigram() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_organigram", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_parkzeit() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_parkzeit", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_persDocument() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_persDocument", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_rechnungen() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_rechnungen", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_security() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_security", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_settings() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_settings", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_speditionsbuch() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_speditionsbuch", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_statistic() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_statistic", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_support() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_support", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_truck() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_truck", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_verknuepfung() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_verknuepfung", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_verzeichnis() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_verzeichnis", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_vorkasse() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_vorkasse", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_webSearch() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_webSearch", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_webSecurity() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_webSecurity", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_webWww() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_webWww", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_weel() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_weel", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_weitereForm() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_weitereForm", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_www() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_www", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_zeiterfassung() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_zeiterfassung", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property ico_zertifikate() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("ico_zertifikate", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' @@ -1518,6 +1978,26 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property SND_loesen() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("SND_loesen", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Public ReadOnly Property SND_verbinden() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("SND_verbinden", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' diff --git a/Aviso/My Project/Resources.resx b/Aviso/My Project/Resources.resx index 6206a41..966b030 100644 --- a/Aviso/My Project/Resources.resx +++ b/Aviso/My Project/Resources.resx @@ -730,4 +730,148 @@ ..\Resources\AVISO_DCS.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\SND_loesen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\SND_verbinden.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_add.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_checklist.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_dienstplan.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_DocEdit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_docFin.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_docSave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_docSearch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_fakturierung.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_handshake.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_inventor.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_kassenbuch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_kunden.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_loupe.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_mail.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_mitarbeiter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_parkzeit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_persDocument.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_rechnungen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_security.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_settings.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_truck.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_verzeichnis.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_weel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_zeiterfassung.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_organigram.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_speditionsbuch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_statistic.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_support.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_verknuepfung.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_webSearch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_webSecurity.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_webWww.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_www.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_zertifikate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_ATR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_CMR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_ImportAssistant.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_Options.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_atez_declarantAI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_atez_logicust.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_atez_tariffAI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_atez_transitAI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_importaviso.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_kasse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_vorkasse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\ico_weitereForm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + \ No newline at end of file diff --git a/Aviso/Resources/SND_loesen.png b/Aviso/Resources/SND_loesen.png new file mode 100644 index 0000000..75ddc54 Binary files /dev/null and b/Aviso/Resources/SND_loesen.png differ diff --git a/Aviso/Resources/SND_verbinden.png b/Aviso/Resources/SND_verbinden.png new file mode 100644 index 0000000..ada25f7 Binary files /dev/null and b/Aviso/Resources/SND_verbinden.png differ diff --git a/Aviso/Resources/ico_ATR.png b/Aviso/Resources/ico_ATR.png new file mode 100644 index 0000000..923c7af Binary files /dev/null and b/Aviso/Resources/ico_ATR.png differ diff --git a/Aviso/Resources/ico_CMR.png b/Aviso/Resources/ico_CMR.png new file mode 100644 index 0000000..e618e98 Binary files /dev/null and b/Aviso/Resources/ico_CMR.png differ diff --git a/Aviso/Resources/ico_DocEdit.png b/Aviso/Resources/ico_DocEdit.png new file mode 100644 index 0000000..e48ad96 Binary files /dev/null and b/Aviso/Resources/ico_DocEdit.png differ diff --git a/Aviso/Resources/ico_ImportAssistant.png b/Aviso/Resources/ico_ImportAssistant.png new file mode 100644 index 0000000..70c1035 Binary files /dev/null and b/Aviso/Resources/ico_ImportAssistant.png differ diff --git a/Aviso/Resources/ico_Options.png b/Aviso/Resources/ico_Options.png new file mode 100644 index 0000000..5289bc5 Binary files /dev/null and b/Aviso/Resources/ico_Options.png differ diff --git a/Aviso/Resources/ico_add.png b/Aviso/Resources/ico_add.png new file mode 100644 index 0000000..9eb4ece Binary files /dev/null and b/Aviso/Resources/ico_add.png differ diff --git a/Aviso/Resources/ico_atez_declarantAI.png b/Aviso/Resources/ico_atez_declarantAI.png new file mode 100644 index 0000000..efdf5f4 Binary files /dev/null and b/Aviso/Resources/ico_atez_declarantAI.png differ diff --git a/Aviso/Resources/ico_atez_logicust.png b/Aviso/Resources/ico_atez_logicust.png new file mode 100644 index 0000000..6f9889a Binary files /dev/null and b/Aviso/Resources/ico_atez_logicust.png differ diff --git a/Aviso/Resources/ico_atez_tariffAI.png b/Aviso/Resources/ico_atez_tariffAI.png new file mode 100644 index 0000000..90e5671 Binary files /dev/null and b/Aviso/Resources/ico_atez_tariffAI.png differ diff --git a/Aviso/Resources/ico_atez_transitAI.png b/Aviso/Resources/ico_atez_transitAI.png new file mode 100644 index 0000000..6667736 Binary files /dev/null and b/Aviso/Resources/ico_atez_transitAI.png differ diff --git a/Aviso/Resources/ico_checklist.png b/Aviso/Resources/ico_checklist.png new file mode 100644 index 0000000..0bf20c3 Binary files /dev/null and b/Aviso/Resources/ico_checklist.png differ diff --git a/Aviso/Resources/ico_dienstplan.png b/Aviso/Resources/ico_dienstplan.png new file mode 100644 index 0000000..3719ad3 Binary files /dev/null and b/Aviso/Resources/ico_dienstplan.png differ diff --git a/Aviso/Resources/ico_docFin.png b/Aviso/Resources/ico_docFin.png new file mode 100644 index 0000000..b6d7bae Binary files /dev/null and b/Aviso/Resources/ico_docFin.png differ diff --git a/Aviso/Resources/ico_docSave.png b/Aviso/Resources/ico_docSave.png new file mode 100644 index 0000000..8681628 Binary files /dev/null and b/Aviso/Resources/ico_docSave.png differ diff --git a/Aviso/Resources/ico_docSearch.png b/Aviso/Resources/ico_docSearch.png new file mode 100644 index 0000000..8901dc6 Binary files /dev/null and b/Aviso/Resources/ico_docSearch.png differ diff --git a/Aviso/Resources/ico_fakturierung.png b/Aviso/Resources/ico_fakturierung.png new file mode 100644 index 0000000..5c5e416 Binary files /dev/null and b/Aviso/Resources/ico_fakturierung.png differ diff --git a/Aviso/Resources/ico_handshake.png b/Aviso/Resources/ico_handshake.png new file mode 100644 index 0000000..70ebd93 Binary files /dev/null and b/Aviso/Resources/ico_handshake.png differ diff --git a/Aviso/Resources/ico_importaviso.png b/Aviso/Resources/ico_importaviso.png new file mode 100644 index 0000000..245ed94 Binary files /dev/null and b/Aviso/Resources/ico_importaviso.png differ diff --git a/Aviso/Resources/ico_inventor.png b/Aviso/Resources/ico_inventor.png new file mode 100644 index 0000000..03dba19 Binary files /dev/null and b/Aviso/Resources/ico_inventor.png differ diff --git a/Aviso/Resources/ico_kasse.png b/Aviso/Resources/ico_kasse.png new file mode 100644 index 0000000..a6c1750 Binary files /dev/null and b/Aviso/Resources/ico_kasse.png differ diff --git a/Aviso/Resources/ico_kassenbuch.png b/Aviso/Resources/ico_kassenbuch.png new file mode 100644 index 0000000..d2e67ae Binary files /dev/null and b/Aviso/Resources/ico_kassenbuch.png differ diff --git a/Aviso/Resources/ico_kunden.png b/Aviso/Resources/ico_kunden.png new file mode 100644 index 0000000..21871a8 Binary files /dev/null and b/Aviso/Resources/ico_kunden.png differ diff --git a/Aviso/Resources/ico_loupe.png b/Aviso/Resources/ico_loupe.png new file mode 100644 index 0000000..174a448 Binary files /dev/null and b/Aviso/Resources/ico_loupe.png differ diff --git a/Aviso/Resources/ico_mail.png b/Aviso/Resources/ico_mail.png new file mode 100644 index 0000000..8e3b45a Binary files /dev/null and b/Aviso/Resources/ico_mail.png differ diff --git a/Aviso/Resources/ico_mitarbeiter.png b/Aviso/Resources/ico_mitarbeiter.png new file mode 100644 index 0000000..ecb1693 Binary files /dev/null and b/Aviso/Resources/ico_mitarbeiter.png differ diff --git a/Aviso/Resources/ico_organigram.png b/Aviso/Resources/ico_organigram.png new file mode 100644 index 0000000..a4f7c57 Binary files /dev/null and b/Aviso/Resources/ico_organigram.png differ diff --git a/Aviso/Resources/ico_parkzeit.png b/Aviso/Resources/ico_parkzeit.png new file mode 100644 index 0000000..6361434 Binary files /dev/null and b/Aviso/Resources/ico_parkzeit.png differ diff --git a/Aviso/Resources/ico_persDocument.png b/Aviso/Resources/ico_persDocument.png new file mode 100644 index 0000000..cf37adc Binary files /dev/null and b/Aviso/Resources/ico_persDocument.png differ diff --git a/Aviso/Resources/ico_rechnungen.png b/Aviso/Resources/ico_rechnungen.png new file mode 100644 index 0000000..43a522d Binary files /dev/null and b/Aviso/Resources/ico_rechnungen.png differ diff --git a/Aviso/Resources/ico_security.png b/Aviso/Resources/ico_security.png new file mode 100644 index 0000000..bbe025d Binary files /dev/null and b/Aviso/Resources/ico_security.png differ diff --git a/Aviso/Resources/ico_settings.png b/Aviso/Resources/ico_settings.png new file mode 100644 index 0000000..2dc1fcb Binary files /dev/null and b/Aviso/Resources/ico_settings.png differ diff --git a/Aviso/Resources/ico_speditionsbuch.png b/Aviso/Resources/ico_speditionsbuch.png new file mode 100644 index 0000000..9535a6c Binary files /dev/null and b/Aviso/Resources/ico_speditionsbuch.png differ diff --git a/Aviso/Resources/ico_statistic.png b/Aviso/Resources/ico_statistic.png new file mode 100644 index 0000000..421dd82 Binary files /dev/null and b/Aviso/Resources/ico_statistic.png differ diff --git a/Aviso/Resources/ico_support.png b/Aviso/Resources/ico_support.png new file mode 100644 index 0000000..0e02646 Binary files /dev/null and b/Aviso/Resources/ico_support.png differ diff --git a/Aviso/Resources/ico_truck.png b/Aviso/Resources/ico_truck.png new file mode 100644 index 0000000..02cce28 Binary files /dev/null and b/Aviso/Resources/ico_truck.png differ diff --git a/Aviso/Resources/ico_verknuepfung.png b/Aviso/Resources/ico_verknuepfung.png new file mode 100644 index 0000000..4ec0543 Binary files /dev/null and b/Aviso/Resources/ico_verknuepfung.png differ diff --git a/Aviso/Resources/ico_verzeichnis.png b/Aviso/Resources/ico_verzeichnis.png new file mode 100644 index 0000000..c38fad9 Binary files /dev/null and b/Aviso/Resources/ico_verzeichnis.png differ diff --git a/Aviso/Resources/ico_vorkasse.png b/Aviso/Resources/ico_vorkasse.png new file mode 100644 index 0000000..54506c0 Binary files /dev/null and b/Aviso/Resources/ico_vorkasse.png differ diff --git a/Aviso/Resources/ico_webSearch.png b/Aviso/Resources/ico_webSearch.png new file mode 100644 index 0000000..5ab2c32 Binary files /dev/null and b/Aviso/Resources/ico_webSearch.png differ diff --git a/Aviso/Resources/ico_webSecurity.png b/Aviso/Resources/ico_webSecurity.png new file mode 100644 index 0000000..6cffe9c Binary files /dev/null and b/Aviso/Resources/ico_webSecurity.png differ diff --git a/Aviso/Resources/ico_webWww.png b/Aviso/Resources/ico_webWww.png new file mode 100644 index 0000000..81661c4 Binary files /dev/null and b/Aviso/Resources/ico_webWww.png differ diff --git a/Aviso/Resources/ico_weel.png b/Aviso/Resources/ico_weel.png new file mode 100644 index 0000000..150ae0b Binary files /dev/null and b/Aviso/Resources/ico_weel.png differ diff --git a/Aviso/Resources/ico_weitereForm.png b/Aviso/Resources/ico_weitereForm.png new file mode 100644 index 0000000..c9abcb9 Binary files /dev/null and b/Aviso/Resources/ico_weitereForm.png differ diff --git a/Aviso/Resources/ico_www.png b/Aviso/Resources/ico_www.png new file mode 100644 index 0000000..4bce1d1 Binary files /dev/null and b/Aviso/Resources/ico_www.png differ diff --git a/Aviso/Resources/ico_zeiterfassung.png b/Aviso/Resources/ico_zeiterfassung.png new file mode 100644 index 0000000..a1b993b Binary files /dev/null and b/Aviso/Resources/ico_zeiterfassung.png differ diff --git a/Aviso/Resources/ico_zertifikate.png b/Aviso/Resources/ico_zertifikate.png new file mode 100644 index 0000000..75562ac Binary files /dev/null and b/Aviso/Resources/ico_zertifikate.png differ diff --git a/Aviso/frmHauptfensterNew.Designer.vb b/Aviso/frmHauptfensterNew.Designer.vb index 9058ce1..682ef15 100644 --- a/Aviso/frmHauptfensterNew.Designer.vb +++ b/Aviso/frmHauptfensterNew.Designer.vb @@ -271,9 +271,18 @@ Partial Class frmHauptfensterNew Me.btnVIEW_SND = New System.Windows.Forms.Button() Me.btnVIEW_KOMBI = New System.Windows.Forms.Button() Me.btnVIEW_Compliance = New System.Windows.Forms.Button() + Me.btnVIEW_CustControling = New System.Windows.Forms.Button() + Me.btnDEFAULT_Selected = New System.Windows.Forms.Button() + Me.btnDEFAULT_UnSelected = New System.Windows.Forms.Button() Me.Panel6 = New System.Windows.Forms.Panel() Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.FlowLayoutPanel2 = New System.Windows.Forms.FlowLayoutPanel() + Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components) + Me.btnKunden = New System.Windows.Forms.Button() + Me.btnSpedBuch = New System.Windows.Forms.Button() + Me.btnKassenbuch = New System.Windows.Forms.Button() + Me.btnFakturierung = New System.Windows.Forms.Button() + Me.btnRg = New System.Windows.Forms.Button() Me.pnlOptionen = New System.Windows.Forms.Panel() Me.btnKasse_User = New System.Windows.Forms.Button() Me.btnKasse_LG = New System.Windows.Forms.Button() @@ -303,25 +312,18 @@ Partial Class frmHauptfensterNew Me.ZertifikateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.HomepageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.pnlLeft = New System.Windows.Forms.Panel() + Me.UsrCntlBenachrichtigungen2 = New AVISO.usrCntlBenachrichtigungen() Me.Panel5 = New System.Windows.Forms.Panel() + Me.cbxInfoChat = New System.Windows.Forms.CheckBox() Me.TabControl1 = New System.Windows.Forms.TabControl() Me.TabPage1 = New System.Windows.Forms.TabPage() + Me.UsrCntlMessenger_ListNewChats1 = New VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ListNewChats() Me.TabPage2 = New System.Windows.Forms.TabPage() - Me.Panel7 = New System.Windows.Forms.Panel() - Me.cbxInfoChat = New System.Windows.Forms.CheckBox() - Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() - Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components) - Me.btnKunden = New System.Windows.Forms.Button() - Me.btnFakturierung = New System.Windows.Forms.Button() - Me.btnRg = New System.Windows.Forms.Button() - Me.btnKassenbuch = New System.Windows.Forms.Button() - Me.btnSpedBuch = New System.Windows.Forms.Button() Me.btnMitarbeiterKonto = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.Panel7 = New System.Windows.Forms.Panel() + Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() Me.UidAbfrageService1 = New VERAG_PROG_ALLGEMEIN.at.gv.bmf.finanzonline.uidAbfrageService() - Me.UsrCntlBenachrichtigungen2 = New AVISO.usrCntlBenachrichtigungen() - Me.btnVIEW_CustControling = New System.Windows.Forms.Button() - Me.btnDEFAULT_Selected = New System.Windows.Forms.Button() - Me.btnDEFAULT_UnSelected = New System.Windows.Forms.Button() + Me.Button4 = New System.Windows.Forms.Button() Me.conMenuAviso.SuspendLayout() Me.MenuStrip1.SuspendLayout() Me.pnlDetailsRechts.SuspendLayout() @@ -347,6 +349,7 @@ Partial Class frmHauptfensterNew Me.Panel6.SuspendLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() Me.FlowLayoutPanel2.SuspendLayout() + Me.MyFlowLayoutPanel1.SuspendLayout() Me.pnlOptionen.SuspendLayout() Me.Panel9.SuspendLayout() Me.cntxt.SuspendLayout() @@ -356,7 +359,7 @@ Partial Class frmHauptfensterNew Me.pnlLeft.SuspendLayout() Me.Panel5.SuspendLayout() Me.TabControl1.SuspendLayout() - Me.MyFlowLayoutPanel1.SuspendLayout() + Me.TabPage1.SuspendLayout() Me.SuspendLayout() ' 'mnuInfo @@ -1694,7 +1697,7 @@ Partial Class frmHauptfensterNew Me.btnMAVerzeichnis.Cursor = System.Windows.Forms.Cursors.Default Me.btnMAVerzeichnis.Font = New System.Drawing.Font("Segoe UI", 10.0!) Me.btnMAVerzeichnis.ForeColor = System.Drawing.Color.Black - Me.btnMAVerzeichnis.Image = Global.AVISO.My.Resources.Resources.mitarbeiter_s + Me.btnMAVerzeichnis.Image = Global.AVISO.My.Resources.Resources.ico_mitarbeiter Me.btnMAVerzeichnis.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnMAVerzeichnis.Location = New System.Drawing.Point(3, 3) Me.btnMAVerzeichnis.Name = "btnMAVerzeichnis" @@ -1714,7 +1717,7 @@ Partial Class frmHauptfensterNew Me.btnKontakt.Cursor = System.Windows.Forms.Cursors.Default Me.btnKontakt.Font = New System.Drawing.Font("Segoe UI", 10.0!) Me.btnKontakt.ForeColor = System.Drawing.Color.Black - Me.btnKontakt.Image = Global.AVISO.My.Resources.Resources.Telefonliste_small + Me.btnKontakt.Image = Global.AVISO.My.Resources.Resources.ico_verzeichnis Me.btnKontakt.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnKontakt.Location = New System.Drawing.Point(3, 59) Me.btnKontakt.Name = "btnKontakt" @@ -1749,7 +1752,7 @@ Partial Class frmHauptfensterNew Me.Button5.Cursor = System.Windows.Forms.Cursors.Default Me.Button5.Font = New System.Drawing.Font("Segoe UI", 10.0!) Me.Button5.ForeColor = System.Drawing.Color.Black - Me.Button5.Image = Global.AVISO.My.Resources.Resources.parkplatz + Me.Button5.Image = Global.AVISO.My.Resources.Resources.ico_parkzeit Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.Button5.Location = New System.Drawing.Point(315, 3) Me.Button5.Name = "Button5" @@ -1794,6 +1797,7 @@ Partial Class frmHauptfensterNew Me.btnDienstplan.Cursor = System.Windows.Forms.Cursors.Default Me.btnDienstplan.Font = New System.Drawing.Font("Segoe UI", 10.0!) Me.btnDienstplan.ForeColor = System.Drawing.Color.Black + Me.btnDienstplan.Image = Global.AVISO.My.Resources.Resources.ico_dienstplan Me.btnDienstplan.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnDienstplan.Location = New System.Drawing.Point(159, 3) Me.btnDienstplan.Name = "btnDienstplan" @@ -1850,9 +1854,9 @@ Partial Class frmHauptfensterNew Me.btnDrucken.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.btnDrucken.ForeColor = System.Drawing.Color.Black - Me.btnDrucken.Location = New System.Drawing.Point(57, 88) + Me.btnDrucken.Location = New System.Drawing.Point(3, 127) Me.btnDrucken.Name = "btnDrucken" - Me.btnDrucken.Size = New System.Drawing.Size(79, 39) + Me.btnDrucken.Size = New System.Drawing.Size(35, 14) Me.btnDrucken.TabIndex = 0 Me.btnDrucken.Text = "Logbuch" Me.btnDrucken.TextAlign = System.Drawing.ContentAlignment.MiddleLeft @@ -1866,9 +1870,9 @@ Partial Class frmHauptfensterNew Me.Button6.ForeColor = System.Drawing.Color.Black Me.Button6.Image = Global.AVISO.My.Resources.Resources.fremdSped Me.Button6.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button6.Location = New System.Drawing.Point(13, 105) + Me.Button6.Location = New System.Drawing.Point(13, 127) Me.Button6.Name = "Button6" - Me.Button6.Size = New System.Drawing.Size(140, 39) + Me.Button6.Size = New System.Drawing.Size(46, 17) Me.Button6.TabIndex = 7 Me.Button6.TabStop = False Me.Button6.Text = "Kunden von" & Global.Microsoft.VisualBasic.ChrW(10) & "Fremd-Speditionen" @@ -1896,7 +1900,7 @@ Partial Class frmHauptfensterNew Me.btnZollwebseiten.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) Me.btnZollwebseiten.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnZollwebseiten.ForeColor = System.Drawing.Color.Black - Me.btnZollwebseiten.Image = CType(resources.GetObject("btnZollwebseiten.Image"), System.Drawing.Image) + Me.btnZollwebseiten.Image = Global.AVISO.My.Resources.Resources.ico_webWww Me.btnZollwebseiten.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnZollwebseiten.Location = New System.Drawing.Point(5, 44) Me.btnZollwebseiten.Name = "btnZollwebseiten" @@ -1945,7 +1949,7 @@ Partial Class frmHauptfensterNew Me.btnZertifikate.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) Me.btnZertifikate.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnZertifikate.ForeColor = System.Drawing.Color.Black - Me.btnZertifikate.Image = CType(resources.GetObject("btnZertifikate.Image"), System.Drawing.Image) + Me.btnZertifikate.Image = Global.AVISO.My.Resources.Resources.ico_webSecurity Me.btnZertifikate.ImageAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnZertifikate.Location = New System.Drawing.Point(5, 86) Me.btnZertifikate.Name = "btnZertifikate" @@ -2161,7 +2165,7 @@ Partial Class frmHauptfensterNew Me.splitMainWorkingView.Panel2.Controls.Add(Me.pnlMain_Bottom) Me.splitMainWorkingView.Size = New System.Drawing.Size(945, 501) Me.splitMainWorkingView.SplitterDistance = 350 - Me.splitMainWorkingView.SplitterWidth = 10 + Me.splitMainWorkingView.SplitterWidth = 15 Me.splitMainWorkingView.TabIndex = 9 ' 'pnlMain @@ -2177,7 +2181,7 @@ Partial Class frmHauptfensterNew Me.pnlMain_Bottom.Dock = System.Windows.Forms.DockStyle.Fill Me.pnlMain_Bottom.Location = New System.Drawing.Point(0, 0) Me.pnlMain_Bottom.Name = "pnlMain_Bottom" - Me.pnlMain_Bottom.Size = New System.Drawing.Size(945, 141) + Me.pnlMain_Bottom.Size = New System.Drawing.Size(945, 136) Me.pnlMain_Bottom.TabIndex = 9 ' 'Panel1 @@ -2289,6 +2293,60 @@ Partial Class frmHauptfensterNew "d sortiert nach Dauer") Me.btnVIEW_Compliance.UseVisualStyleBackColor = False ' + 'btnVIEW_CustControling + ' + Me.btnVIEW_CustControling.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(80, Byte), Integer), CType(CType(150, Byte), Integer)) + Me.btnVIEW_CustControling.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.btnVIEW_CustControling.FlatAppearance.BorderSize = 0 + Me.btnVIEW_CustControling.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnVIEW_CustControling.ForeColor = System.Drawing.Color.White + Me.btnVIEW_CustControling.Location = New System.Drawing.Point(3, 79) + Me.btnVIEW_CustControling.Margin = New System.Windows.Forms.Padding(3, 16, 3, 0) + Me.btnVIEW_CustControling.Name = "btnVIEW_CustControling" + Me.btnVIEW_CustControling.Size = New System.Drawing.Size(158, 47) + Me.btnVIEW_CustControling.TabIndex = 8 + Me.btnVIEW_CustControling.TabStop = False + Me.btnVIEW_CustControling.Text = "Customs Controlling" + Me.ToolTip1.SetToolTip(Me.btnVIEW_CustControling, "Es werden alle LKWs mit Status Ankunft des aktiven Standorts angezeigt, absteigen" & + "d sortiert nach Dauer") + Me.btnVIEW_CustControling.UseVisualStyleBackColor = False + ' + 'btnDEFAULT_Selected + ' + Me.btnDEFAULT_Selected.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btnDEFAULT_Selected.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnDEFAULT_Selected.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(44, Byte), Integer), CType(CType(108, Byte), Integer)) + Me.btnDEFAULT_Selected.Location = New System.Drawing.Point(167, 79) + Me.btnDEFAULT_Selected.Margin = New System.Windows.Forms.Padding(3, 16, 3, 0) + Me.btnDEFAULT_Selected.Name = "btnDEFAULT_Selected" + Me.btnDEFAULT_Selected.Size = New System.Drawing.Size(74, 47) + Me.btnDEFAULT_Selected.TabIndex = 9 + Me.btnDEFAULT_Selected.TabStop = False + Me.btnDEFAULT_Selected.Text = "DEFAULT_Selected" + Me.ToolTip1.SetToolTip(Me.btnDEFAULT_Selected, "Es werden alle LKWs mit Status Ankunft des aktiven Standorts angezeigt, absteigen" & + "d sortiert nach Dauer") + Me.btnDEFAULT_Selected.UseVisualStyleBackColor = False + Me.btnDEFAULT_Selected.Visible = False + ' + 'btnDEFAULT_UnSelected + ' + Me.btnDEFAULT_UnSelected.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(80, Byte), Integer), CType(CType(150, Byte), Integer)) + Me.btnDEFAULT_UnSelected.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.btnDEFAULT_UnSelected.FlatAppearance.BorderSize = 0 + Me.btnDEFAULT_UnSelected.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnDEFAULT_UnSelected.ForeColor = System.Drawing.Color.White + Me.btnDEFAULT_UnSelected.Location = New System.Drawing.Point(247, 79) + Me.btnDEFAULT_UnSelected.Margin = New System.Windows.Forms.Padding(3, 16, 3, 0) + Me.btnDEFAULT_UnSelected.Name = "btnDEFAULT_UnSelected" + Me.btnDEFAULT_UnSelected.Size = New System.Drawing.Size(85, 47) + Me.btnDEFAULT_UnSelected.TabIndex = 10 + Me.btnDEFAULT_UnSelected.TabStop = False + Me.btnDEFAULT_UnSelected.Text = "DEFAULT_UnSelected" + Me.ToolTip1.SetToolTip(Me.btnDEFAULT_UnSelected, "Es werden alle LKWs mit Status Ankunft des aktiven Standorts angezeigt, absteigen" & + "d sortiert nach Dauer") + Me.btnDEFAULT_UnSelected.UseVisualStyleBackColor = False + Me.btnDEFAULT_UnSelected.Visible = False + ' 'Panel6 ' Me.Panel6.Controls.Add(Me.PictureBox1) @@ -2323,6 +2381,114 @@ Partial Class frmHauptfensterNew Me.FlowLayoutPanel2.Size = New System.Drawing.Size(608, 65) Me.FlowLayoutPanel2.TabIndex = 86 ' + 'MyFlowLayoutPanel1 + ' + Me.MyFlowLayoutPanel1.AutoScroll = True + Me.MyFlowLayoutPanel1.Controls.Add(Me.btnKunden) + Me.MyFlowLayoutPanel1.Controls.Add(Me.btnSpedBuch) + Me.MyFlowLayoutPanel1.Controls.Add(Me.btnKassenbuch) + Me.MyFlowLayoutPanel1.Controls.Add(Me.btnFakturierung) + Me.MyFlowLayoutPanel1.Controls.Add(Me.btnRg) + Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Top + Me.MyFlowLayoutPanel1.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(181, 5) + Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1" + Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(608, 65) + Me.MyFlowLayoutPanel1.TabIndex = 85 + ' + 'btnKunden + ' + Me.btnKunden.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btnKunden.Cursor = System.Windows.Forms.Cursors.Default + Me.btnKunden.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnKunden.ForeColor = System.Drawing.Color.Black + Me.btnKunden.Image = Global.AVISO.My.Resources.Resources.ico_kunden + Me.btnKunden.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnKunden.Location = New System.Drawing.Point(3, 3) + Me.btnKunden.Name = "btnKunden" + Me.btnKunden.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) + Me.btnKunden.Size = New System.Drawing.Size(150, 50) + Me.btnKunden.TabIndex = 2 + Me.btnKunden.TabStop = False + Me.btnKunden.Text = "Kunden" + Me.btnKunden.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnKunden.UseVisualStyleBackColor = False + ' + 'btnSpedBuch + ' + Me.btnSpedBuch.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btnSpedBuch.Cursor = System.Windows.Forms.Cursors.Default + Me.btnSpedBuch.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnSpedBuch.ForeColor = System.Drawing.Color.Black + Me.btnSpedBuch.Image = Global.AVISO.My.Resources.Resources.ico_speditionsbuch + Me.btnSpedBuch.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnSpedBuch.Location = New System.Drawing.Point(159, 3) + Me.btnSpedBuch.Name = "btnSpedBuch" + Me.btnSpedBuch.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) + Me.btnSpedBuch.Size = New System.Drawing.Size(150, 50) + Me.btnSpedBuch.TabIndex = 3 + Me.btnSpedBuch.TabStop = False + Me.btnSpedBuch.Text = "Sped.Buch" + Me.btnSpedBuch.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnSpedBuch.UseVisualStyleBackColor = False + ' + 'btnKassenbuch + ' + Me.btnKassenbuch.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btnKassenbuch.Cursor = System.Windows.Forms.Cursors.Default + Me.btnKassenbuch.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnKassenbuch.ForeColor = System.Drawing.Color.Black + Me.btnKassenbuch.Image = Global.AVISO.My.Resources.Resources.ico_kassenbuch + Me.btnKassenbuch.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnKassenbuch.Location = New System.Drawing.Point(315, 3) + Me.btnKassenbuch.Name = "btnKassenbuch" + Me.btnKassenbuch.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) + Me.btnKassenbuch.Size = New System.Drawing.Size(150, 50) + Me.btnKassenbuch.TabIndex = 8 + Me.btnKassenbuch.TabStop = False + Me.btnKassenbuch.Text = "Kassenbuch" + Me.btnKassenbuch.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnKassenbuch.UseVisualStyleBackColor = False + Me.btnKassenbuch.Visible = False + ' + 'btnFakturierung + ' + Me.btnFakturierung.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btnFakturierung.Cursor = System.Windows.Forms.Cursors.Default + Me.btnFakturierung.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnFakturierung.ForeColor = System.Drawing.Color.Black + Me.btnFakturierung.Image = Global.AVISO.My.Resources.Resources.ico_fakturierung + Me.btnFakturierung.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnFakturierung.Location = New System.Drawing.Point(3, 59) + Me.btnFakturierung.Name = "btnFakturierung" + Me.btnFakturierung.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) + Me.btnFakturierung.Size = New System.Drawing.Size(150, 50) + Me.btnFakturierung.TabIndex = 11 + Me.btnFakturierung.TabStop = False + Me.btnFakturierung.Text = "Fakturierung" + Me.btnFakturierung.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnFakturierung.UseVisualStyleBackColor = False + Me.btnFakturierung.Visible = False + ' + 'btnRg + ' + Me.btnRg.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btnRg.Cursor = System.Windows.Forms.Cursors.Default + Me.btnRg.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.btnRg.ForeColor = System.Drawing.Color.Black + Me.btnRg.Image = Global.AVISO.My.Resources.Resources.ico_rechnungen + Me.btnRg.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnRg.Location = New System.Drawing.Point(159, 59) + Me.btnRg.Name = "btnRg" + Me.btnRg.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) + Me.btnRg.Size = New System.Drawing.Size(150, 50) + Me.btnRg.TabIndex = 9 + Me.btnRg.TabStop = False + Me.btnRg.Text = "Rechnungen" + Me.btnRg.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnRg.UseVisualStyleBackColor = False + Me.btnRg.Visible = False + ' 'pnlOptionen ' Me.pnlOptionen.BackColor = System.Drawing.Color.Black @@ -2382,6 +2548,7 @@ Partial Class frmHauptfensterNew ' 'Panel9 ' + Me.Panel9.Controls.Add(Me.Button4) Me.Panel9.Controls.Add(Me.btnRefresh) Me.Panel9.Controls.Add(Me.Button6) Me.Panel9.Controls.Add(Me.btnDrucken) @@ -2560,6 +2727,14 @@ Partial Class frmHauptfensterNew Me.pnlLeft.Size = New System.Drawing.Size(408, 741) Me.pnlLeft.TabIndex = 88 ' + 'UsrCntlBenachrichtigungen2 + ' + Me.UsrCntlBenachrichtigungen2.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlBenachrichtigungen2.Location = New System.Drawing.Point(0, 10) + Me.UsrCntlBenachrichtigungen2.Name = "UsrCntlBenachrichtigungen2" + Me.UsrCntlBenachrichtigungen2.Size = New System.Drawing.Size(408, 315) + Me.UsrCntlBenachrichtigungen2.TabIndex = 5 + ' 'Panel5 ' Me.Panel5.BackColor = System.Drawing.Color.White @@ -2580,6 +2755,18 @@ Partial Class frmHauptfensterNew Me.Panel5.Size = New System.Drawing.Size(408, 416) Me.Panel5.TabIndex = 3 ' + 'cbxInfoChat + ' + Me.cbxInfoChat.AutoSize = True + Me.cbxInfoChat.Checked = True + Me.cbxInfoChat.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxInfoChat.Location = New System.Drawing.Point(221, 6) + Me.cbxInfoChat.Name = "cbxInfoChat" + Me.cbxInfoChat.Size = New System.Drawing.Size(183, 17) + Me.cbxInfoChat.TabIndex = 87 + Me.cbxInfoChat.Text = "Chat-Benachrichtigung aktivieren" + Me.cbxInfoChat.UseVisualStyleBackColor = True + ' 'TabControl1 ' Me.TabControl1.Controls.Add(Me.TabPage1) @@ -2594,6 +2781,7 @@ Partial Class frmHauptfensterNew ' 'TabPage1 ' + Me.TabPage1.Controls.Add(Me.UsrCntlMessenger_ListNewChats1) Me.TabPage1.Location = New System.Drawing.Point(4, 25) Me.TabPage1.Name = "TabPage1" Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) @@ -2602,6 +2790,15 @@ Partial Class frmHauptfensterNew Me.TabPage1.Text = "Chat" Me.TabPage1.UseVisualStyleBackColor = True ' + 'UsrCntlMessenger_ListNewChats1 + ' + Me.UsrCntlMessenger_ListNewChats1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlMessenger_ListNewChats1.Location = New System.Drawing.Point(3, 3) + Me.UsrCntlMessenger_ListNewChats1.Margin = New System.Windows.Forms.Padding(4) + Me.UsrCntlMessenger_ListNewChats1.Name = "UsrCntlMessenger_ListNewChats1" + Me.UsrCntlMessenger_ListNewChats1.Size = New System.Drawing.Size(394, 266) + Me.UsrCntlMessenger_ListNewChats1.TabIndex = 0 + ' 'TabPage2 ' Me.TabPage2.Location = New System.Drawing.Point(4, 25) @@ -2612,146 +2809,6 @@ Partial Class frmHauptfensterNew Me.TabPage2.Text = "TabPage2" Me.TabPage2.UseVisualStyleBackColor = True ' - 'Panel7 - ' - Me.Panel7.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.Panel7.Dock = System.Windows.Forms.DockStyle.Top - Me.Panel7.Location = New System.Drawing.Point(0, 0) - Me.Panel7.Name = "Panel7" - Me.Panel7.Size = New System.Drawing.Size(408, 10) - Me.Panel7.TabIndex = 4 - ' - 'cbxInfoChat - ' - Me.cbxInfoChat.AutoSize = True - Me.cbxInfoChat.Checked = True - Me.cbxInfoChat.CheckState = System.Windows.Forms.CheckState.Checked - Me.cbxInfoChat.Location = New System.Drawing.Point(221, 6) - Me.cbxInfoChat.Name = "cbxInfoChat" - Me.cbxInfoChat.Size = New System.Drawing.Size(183, 17) - Me.cbxInfoChat.TabIndex = 87 - Me.cbxInfoChat.Text = "Chat-Benachrichtigung aktivieren" - Me.cbxInfoChat.UseVisualStyleBackColor = True - ' - 'UsrCntlTestsystem1 - ' - Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White - Me.UsrCntlTestsystem1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.UsrCntlTestsystem1.ForeColor = System.Drawing.Color.Red - Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(632, -1) - Me.UsrCntlTestsystem1.Margin = New System.Windows.Forms.Padding(5, 6, 5, 6) - Me.UsrCntlTestsystem1.Name = "UsrCntlTestsystem1" - Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28) - Me.UsrCntlTestsystem1.TabIndex = 8 - ' - 'MyFlowLayoutPanel1 - ' - Me.MyFlowLayoutPanel1.AutoScroll = True - Me.MyFlowLayoutPanel1.Controls.Add(Me.btnKunden) - Me.MyFlowLayoutPanel1.Controls.Add(Me.btnFakturierung) - Me.MyFlowLayoutPanel1.Controls.Add(Me.btnRg) - Me.MyFlowLayoutPanel1.Controls.Add(Me.btnKassenbuch) - Me.MyFlowLayoutPanel1.Controls.Add(Me.btnSpedBuch) - Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Top - Me.MyFlowLayoutPanel1.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(181, 5) - Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1" - Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(608, 65) - Me.MyFlowLayoutPanel1.TabIndex = 85 - ' - 'btnKunden - ' - Me.btnKunden.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.btnKunden.Cursor = System.Windows.Forms.Cursors.Default - Me.btnKunden.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnKunden.ForeColor = System.Drawing.Color.Black - Me.btnKunden.Image = CType(resources.GetObject("btnKunden.Image"), System.Drawing.Image) - Me.btnKunden.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnKunden.Location = New System.Drawing.Point(3, 3) - Me.btnKunden.Name = "btnKunden" - Me.btnKunden.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.btnKunden.Size = New System.Drawing.Size(150, 50) - Me.btnKunden.TabIndex = 2 - Me.btnKunden.TabStop = False - Me.btnKunden.Text = "Kunden" - Me.btnKunden.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnKunden.UseVisualStyleBackColor = False - ' - 'btnFakturierung - ' - Me.btnFakturierung.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.btnFakturierung.Cursor = System.Windows.Forms.Cursors.Default - Me.btnFakturierung.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnFakturierung.ForeColor = System.Drawing.Color.Black - Me.btnFakturierung.Image = CType(resources.GetObject("btnFakturierung.Image"), System.Drawing.Image) - Me.btnFakturierung.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnFakturierung.Location = New System.Drawing.Point(159, 3) - Me.btnFakturierung.Name = "btnFakturierung" - Me.btnFakturierung.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.btnFakturierung.Size = New System.Drawing.Size(150, 50) - Me.btnFakturierung.TabIndex = 11 - Me.btnFakturierung.TabStop = False - Me.btnFakturierung.Text = "Fakturierung" - Me.btnFakturierung.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnFakturierung.UseVisualStyleBackColor = False - Me.btnFakturierung.Visible = False - ' - 'btnRg - ' - Me.btnRg.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.btnRg.Cursor = System.Windows.Forms.Cursors.Default - Me.btnRg.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnRg.ForeColor = System.Drawing.Color.Black - Me.btnRg.Image = CType(resources.GetObject("btnRg.Image"), System.Drawing.Image) - Me.btnRg.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnRg.Location = New System.Drawing.Point(315, 3) - Me.btnRg.Name = "btnRg" - Me.btnRg.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.btnRg.Size = New System.Drawing.Size(150, 50) - Me.btnRg.TabIndex = 9 - Me.btnRg.TabStop = False - Me.btnRg.Text = "Rechnungen" - Me.btnRg.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnRg.UseVisualStyleBackColor = False - Me.btnRg.Visible = False - ' - 'btnKassenbuch - ' - Me.btnKassenbuch.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.btnKassenbuch.Cursor = System.Windows.Forms.Cursors.Default - Me.btnKassenbuch.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnKassenbuch.ForeColor = System.Drawing.Color.Black - Me.btnKassenbuch.Image = Global.AVISO.My.Resources.Resources.kasse_sw_small - Me.btnKassenbuch.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnKassenbuch.Location = New System.Drawing.Point(3, 59) - Me.btnKassenbuch.Name = "btnKassenbuch" - Me.btnKassenbuch.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.btnKassenbuch.Size = New System.Drawing.Size(150, 50) - Me.btnKassenbuch.TabIndex = 8 - Me.btnKassenbuch.TabStop = False - Me.btnKassenbuch.Text = "Kassenbuch" - Me.btnKassenbuch.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnKassenbuch.UseVisualStyleBackColor = False - Me.btnKassenbuch.Visible = False - ' - 'btnSpedBuch - ' - Me.btnSpedBuch.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.btnSpedBuch.Cursor = System.Windows.Forms.Cursors.Default - Me.btnSpedBuch.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnSpedBuch.ForeColor = System.Drawing.Color.Black - Me.btnSpedBuch.Image = Global.AVISO.My.Resources.Resources.spedbuch1 - Me.btnSpedBuch.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnSpedBuch.Location = New System.Drawing.Point(159, 59) - Me.btnSpedBuch.Name = "btnSpedBuch" - Me.btnSpedBuch.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) - Me.btnSpedBuch.Size = New System.Drawing.Size(150, 50) - Me.btnSpedBuch.TabIndex = 3 - Me.btnSpedBuch.TabStop = False - Me.btnSpedBuch.Text = "Sped.Buch" - Me.btnSpedBuch.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnSpedBuch.UseVisualStyleBackColor = False - ' 'btnMitarbeiterKonto ' Me.btnMitarbeiterKonto.allowBorder = False @@ -2770,73 +2827,50 @@ Partial Class frmHauptfensterNew Me.btnMitarbeiterKonto.TextAlign = System.Drawing.ContentAlignment.BottomCenter Me.btnMitarbeiterKonto.UseVisualStyleBackColor = False ' + 'Panel7 + ' + Me.Panel7.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Panel7.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel7.Location = New System.Drawing.Point(0, 0) + Me.Panel7.Name = "Panel7" + Me.Panel7.Size = New System.Drawing.Size(408, 10) + Me.Panel7.TabIndex = 4 + ' + 'UsrCntlTestsystem1 + ' + Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White + Me.UsrCntlTestsystem1.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.UsrCntlTestsystem1.ForeColor = System.Drawing.Color.Red + Me.UsrCntlTestsystem1.Location = New System.Drawing.Point(632, -1) + Me.UsrCntlTestsystem1.Margin = New System.Windows.Forms.Padding(5, 6, 5, 6) + Me.UsrCntlTestsystem1.Name = "UsrCntlTestsystem1" + Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28) + Me.UsrCntlTestsystem1.TabIndex = 8 + ' 'UidAbfrageService1 ' Me.UidAbfrageService1.Credentials = Nothing Me.UidAbfrageService1.Url = "https://finanzonline.bmf.gv.at/fon/ws/uidAbfrage/" Me.UidAbfrageService1.UseDefaultCredentials = False ' - 'UsrCntlBenachrichtigungen2 + 'Button4 ' - Me.UsrCntlBenachrichtigungen2.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlBenachrichtigungen2.Location = New System.Drawing.Point(0, 10) - Me.UsrCntlBenachrichtigungen2.Name = "UsrCntlBenachrichtigungen2" - Me.UsrCntlBenachrichtigungen2.Size = New System.Drawing.Size(408, 315) - Me.UsrCntlBenachrichtigungen2.TabIndex = 5 - ' - 'btnVIEW_CustControling - ' - Me.btnVIEW_CustControling.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(80, Byte), Integer), CType(CType(150, Byte), Integer)) - Me.btnVIEW_CustControling.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None - Me.btnVIEW_CustControling.FlatAppearance.BorderSize = 0 - Me.btnVIEW_CustControling.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnVIEW_CustControling.ForeColor = System.Drawing.Color.White - Me.btnVIEW_CustControling.Location = New System.Drawing.Point(3, 79) - Me.btnVIEW_CustControling.Margin = New System.Windows.Forms.Padding(3, 16, 3, 0) - Me.btnVIEW_CustControling.Name = "btnVIEW_CustControling" - Me.btnVIEW_CustControling.Size = New System.Drawing.Size(158, 47) - Me.btnVIEW_CustControling.TabIndex = 8 - Me.btnVIEW_CustControling.TabStop = False - Me.btnVIEW_CustControling.Text = "Customs Controlling" - Me.ToolTip1.SetToolTip(Me.btnVIEW_CustControling, "Es werden alle LKWs mit Status Ankunft des aktiven Standorts angezeigt, absteigen" & - "d sortiert nach Dauer") - Me.btnVIEW_CustControling.UseVisualStyleBackColor = False - ' - 'btnDEFAULT_Selected - ' - Me.btnDEFAULT_Selected.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) - Me.btnDEFAULT_Selected.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnDEFAULT_Selected.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(44, Byte), Integer), CType(CType(108, Byte), Integer)) - Me.btnDEFAULT_Selected.Location = New System.Drawing.Point(167, 79) - Me.btnDEFAULT_Selected.Margin = New System.Windows.Forms.Padding(3, 16, 3, 0) - Me.btnDEFAULT_Selected.Name = "btnDEFAULT_Selected" - Me.btnDEFAULT_Selected.Size = New System.Drawing.Size(74, 47) - Me.btnDEFAULT_Selected.TabIndex = 9 - Me.btnDEFAULT_Selected.TabStop = False - Me.btnDEFAULT_Selected.Text = "DEFAULT_Selected" - Me.ToolTip1.SetToolTip(Me.btnDEFAULT_Selected, "Es werden alle LKWs mit Status Ankunft des aktiven Standorts angezeigt, absteigen" & - "d sortiert nach Dauer") - Me.btnDEFAULT_Selected.UseVisualStyleBackColor = False - Me.btnDEFAULT_Selected.Visible = False - ' - 'btnDEFAULT_UnSelected - ' - Me.btnDEFAULT_UnSelected.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(80, Byte), Integer), CType(CType(150, Byte), Integer)) - Me.btnDEFAULT_UnSelected.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None - Me.btnDEFAULT_UnSelected.FlatAppearance.BorderSize = 0 - Me.btnDEFAULT_UnSelected.Font = New System.Drawing.Font("Segoe UI", 10.0!) - Me.btnDEFAULT_UnSelected.ForeColor = System.Drawing.Color.White - Me.btnDEFAULT_UnSelected.Location = New System.Drawing.Point(247, 79) - Me.btnDEFAULT_UnSelected.Margin = New System.Windows.Forms.Padding(3, 16, 3, 0) - Me.btnDEFAULT_UnSelected.Name = "btnDEFAULT_UnSelected" - Me.btnDEFAULT_UnSelected.Size = New System.Drawing.Size(85, 47) - Me.btnDEFAULT_UnSelected.TabIndex = 10 - Me.btnDEFAULT_UnSelected.TabStop = False - Me.btnDEFAULT_UnSelected.Text = "DEFAULT_UnSelected" - Me.ToolTip1.SetToolTip(Me.btnDEFAULT_UnSelected, "Es werden alle LKWs mit Status Ankunft des aktiven Standorts angezeigt, absteigen" & - "d sortiert nach Dauer") - Me.btnDEFAULT_UnSelected.UseVisualStyleBackColor = False - Me.btnDEFAULT_UnSelected.Visible = False + Me.Button4.BackColor = System.Drawing.Color.FromArgb(CType(CType(253, Byte), Integer), CType(CType(253, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.Button4.Cursor = System.Windows.Forms.Cursors.Default + Me.Button4.FlatAppearance.BorderSize = 3 + Me.Button4.Font = New System.Drawing.Font("Segoe UI", 10.0!) + Me.Button4.ForeColor = System.Drawing.Color.Black + Me.Button4.Image = Global.AVISO.My.Resources.Resources.ico_atez_tariffAI + Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button4.Location = New System.Drawing.Point(11, 84) + Me.Button4.Margin = New System.Windows.Forms.Padding(0) + Me.Button4.Name = "Button4" + Me.Button4.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) + Me.Button4.Size = New System.Drawing.Size(135, 52) + Me.Button4.TabIndex = 8 + Me.Button4.Text = "Tariff AI" + Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button4.UseVisualStyleBackColor = False ' 'frmHauptfensterNew ' @@ -2885,6 +2919,7 @@ Partial Class frmHauptfensterNew Me.Panel6.ResumeLayout(False) CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() Me.FlowLayoutPanel2.ResumeLayout(False) + Me.MyFlowLayoutPanel1.ResumeLayout(False) Me.pnlOptionen.ResumeLayout(False) Me.Panel9.ResumeLayout(False) Me.cntxt.ResumeLayout(False) @@ -2896,7 +2931,7 @@ Partial Class frmHauptfensterNew Me.Panel5.ResumeLayout(False) Me.Panel5.PerformLayout() Me.TabControl1.ResumeLayout(False) - Me.MyFlowLayoutPanel1.ResumeLayout(False) + Me.TabPage1.ResumeLayout(False) Me.ResumeLayout(False) Me.PerformLayout() @@ -3199,4 +3234,6 @@ Partial Class frmHauptfensterNew Friend WithEvents btnVIEW_CustControling As Button Friend WithEvents btnDEFAULT_Selected As Button Friend WithEvents btnDEFAULT_UnSelected As Button + Friend WithEvents UsrCntlMessenger_ListNewChats1 As VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ListNewChats + Friend WithEvents Button4 As Button End Class diff --git a/Aviso/frmHauptfensterNew.resx b/Aviso/frmHauptfensterNew.resx index c047f34..4fe5b44 100644 --- a/Aviso/frmHauptfensterNew.resx +++ b/Aviso/frmHauptfensterNew.resx @@ -123,41 +123,13 @@ 249, 17 - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAgBJREFUSEvt - 1suLzXEYx/HXSVggt7LzH8jWzm0t8geQXFaU3DfEwshfoFzK2kLMTimFYkURcisjNhOxcmk06DN9z/Q7 - 3845M+PMRs1TT33P8/08n/c5M79znge+YBk24A2+4TMuYC2WYiFaekfuook2PemNR7xeY2O5S81vvCjC - NTiMUfzCeKvV+oMr5Q0tx7wGKOfU1uNy0Y6X3ngcKZ7xfjbBiqgIf2AYW3AGd/EBPxvgIazDopI5DzVA - 0X7EveIRr5v4PslpH0pTGh7jBLbiJG6Vd9uGPsDBkg8bsGiiPYVtOI5H8exgNF80wGm+hr3Yjqt4iU/4 - WmVquYsm2vSkd7T27QlsgEdwuhjtwHlcxKWSOaeWu2iifVf7TBvYgO7DEmzCTuwqmfNmLC6fbKTur3NK - 4ISIc1iJs7iD+yVzzoO0Ind1X7ecKfA6xhr1MdyYA3Z41YVuOQecA3Z41YVu+X8DM/PqYp2zBSzz1f6s - FvVlJRwYiLc4EOD88kv/vBbNFrCsMJk4C9q7ScbLbjypxYMC8RR7CqMjsgxlkN7OFB8UWDaBeGVmxrtr - ZJXLBpYZ9+pfgektHvGKZ9/I33k1DrUfppkAy8ORVTMek/+zqSKL7SocLSvGtIB4j2Olt9/i3DOykWfd - y1dnKmA0WS/TM1Bkhc9XJ9ELmIgm2r7xF+xPKXpoDa+RAAAAAElFTkSuQmCC - - 364, 17 - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAgBJREFUSEvt - 1suLzXEYx/HXSVggt7LzH8jWzm0t8geQXFaU3DfEwshfoFzK2kLMTimFYkURcisjNhOxcmk06DN9z/Q7 - 3845M+PMRs1TT33P8/08n/c5M79znge+YBk24A2+4TMuYC2WYiFaekfuook2PemNR7xeY2O5S81vvCjC - NTiMUfzCeKvV+oMr5Q0tx7wGKOfU1uNy0Y6X3ngcKZ7xfjbBiqgIf2AYW3AGd/EBPxvgIazDopI5DzVA - 0X7EveIRr5v4PslpH0pTGh7jBLbiJG6Vd9uGPsDBkg8bsGiiPYVtOI5H8exgNF80wGm+hr3Yjqt4iU/4 - WmVquYsm2vSkd7T27QlsgEdwuhjtwHlcxKWSOaeWu2iifVf7TBvYgO7DEmzCTuwqmfNmLC6fbKTur3NK - 4ISIc1iJs7iD+yVzzoO0Ind1X7ecKfA6xhr1MdyYA3Z41YVuOQecA3Z41YVu+X8DM/PqYp2zBSzz1f6s - FvVlJRwYiLc4EOD88kv/vBbNFrCsMJk4C9q7ScbLbjypxYMC8RR7CqMjsgxlkN7OFB8UWDaBeGVmxrtr - ZJXLBpYZ9+pfgektHvGKZ9/I33k1DrUfppkAy8ORVTMek/+zqSKL7SocLSvGtIB4j2Olt9/i3DOykWfd - y1dnKmA0WS/TM1Bkhc9XJ9ELmIgm2r7xF+xPKXpoDa+RAAAAAElFTkSuQmCC - - 1158, 17 + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO @@ -204,32 +176,6 @@ 560, 17 - - - iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAAP1JREFUSEvt - k0sKwkAQRLsRL+BOj+XevQtdeAY9ozv1FgYEP0wYZXjpnoxJBBd5UGCqq6slEJGRkX9BVZ+WmBsMHvLE - vV6wvE3c7wyL28T9EmYsGUqhm8feLI3wjl6pRGRteCseNV+n55fI2+VdN0SvVN4u73qhLb1SiciGXvSb - h+kFVPXkzSzigTP9gNmjqg9zkLwN+iSXi7M7/RpVvRmvpv4MkucD90Rkj6NT9qjqFTvlGGX8k9/DEiqX - zc2oNJsNJ7FJ8tvjk2FPo5Nmoip2zI1Z0DGKfihexO6KsyTjw/C3Yl8R4VtkUQdd2NuKUdJJ7M3C5b5i - /8jIT3kBe5JJfQp6Jq0AAAAASUVORK5CYII= - - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt - lTEOgDAMA52PV3wM9WmgMGSIAkNpaolg6ZamzQ0eCgAQkWMF6rriB1nwhQA6gG2A7pdHREJ9PJLml0fY - 7TrCbAoKX3T4FOvXTmjCbAoKl3fIEOpv0Saz3wqz4QsZHX5cmM0vnA5FeAJTug01ZzKXygAAAABJRU5E - rkJggg== - - - - - iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt - lTEOgDAMA52PV3wM9WmgMGSIAkNpaolg6ZamzQ0eCgAQkWMF6rriB1nwhQA6gG2A7pdHREJ9PJLml0fY - 7TrCbAoKX3T4FOvXTmjCbAoKl3fIEOpv0Saz3wqz4QsZHX5cmM0vnA5FeAJTug01ZzKXygAAAABJRU5E - rkJggg== - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO @@ -246,6 +192,9 @@ AAAAAElFTkSuQmCC + + 560, 17 + 659, 17 diff --git a/Aviso/frmHauptfensterNew.vb b/Aviso/frmHauptfensterNew.vb index 34a9db2..582e80b 100644 --- a/Aviso/frmHauptfensterNew.vb +++ b/Aviso/frmHauptfensterNew.vb @@ -107,15 +107,20 @@ Public Class frmHauptfensterNew ' toggle_Buttons_Main(sender) - For Each button In FlowLayoutPanel1.Controls + For Each button As Control In FlowLayoutPanel1.Controls With button - .BackColor = btnDEFAULT_UnSelected.BackColor - .ForeColor = btnDEFAULT_UnSelected.ForeColor - .Font = btnDEFAULT_UnSelected.Font + If Not .Name.ToString.Contains("DEFAULT") Then + .BackColor = btnDEFAULT_UnSelected.BackColor + .ForeColor = btnDEFAULT_UnSelected.ForeColor + .Font = btnDEFAULT_UnSelected.Font + End If End With Next Dim SelectedBtn As Button = Nothing + + + Select Case SEARCH_AVISO_AKTIV Case "SND" splitMainWorkingView.Panel2Collapsed = True @@ -129,7 +134,7 @@ Public Class frmHauptfensterNew Application.DoEvents() Case "AVISO" splitMainWorkingView.Panel2Collapsed = True - SelectedBtn = btnVIEW_LKW + SetBtnSelectedolor(btnVIEW_LKW) If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me pnlMain.Controls.Add(SEARCH_AVISO) @@ -140,7 +145,7 @@ Public Class frmHauptfensterNew Case "AVISO_SND_KOMBI" splitMainWorkingView.Panel2Collapsed = False - SelectedBtn = btnVIEW_KOMBI + SetBtnSelectedolor(btnVIEW_KOMBI) If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me pnlMain.Controls.Add(SEARCH_AVISO) @@ -159,7 +164,7 @@ Public Class frmHauptfensterNew Case "COMPLIANCE" splitMainWorkingView.Panel2Collapsed = True - SelectedBtn = btnVIEW_Compliance + SetBtnSelectedolor(btnVIEW_Compliance) 'If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO 'SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me 'pnlMain.Controls.Add(SEARCH_AVISO) @@ -170,7 +175,7 @@ Public Class frmHauptfensterNew Case "CUSTOMS_CONTROLLING" splitMainWorkingView.Panel2Collapsed = True - SelectedBtn = btnVIEW_CustControling + SetBtnSelectedolor(btnVIEW_CustControling) 'If SEARCH_AVISO Is Nothing Then SEARCH_AVISO = New usrCntlHauptfenster_Suche_AVISO 'SEARCH_AVISO.PARENT_FRMHAUPTFENSTER = Me 'pnlMain.Controls.Add(SEARCH_AVISO) @@ -184,15 +189,16 @@ Public Class frmHauptfensterNew initsearch(SEARCH_AVISO_AKTIV, False) ': Aviso_anzeigen("") + + End Sub + + Sub SetBtnSelectedolor(SelectedBtn) With SelectedBtn .BackColor = btnDEFAULT_Selected.BackColor .ForeColor = btnDEFAULT_Selected.ForeColor .Font = btnDEFAULT_Selected.Font End With - - End Sub - Sub initsearch(hSort As String, Optional showDetails As Boolean = True) If SEARCH_AVISO IsNot Nothing Then @@ -1874,6 +1880,8 @@ ELSE_ATILLA: End If End If + 'Evtl abhängign vom User machen: + SWITCH_SEARCH("AVISO") End Sub @@ -3947,4 +3955,8 @@ ELSE_ATILLA: SEARCH_AVISO.RESET() Grid_aktiv = True End Sub + + Private Sub Button4_Click_2(sender As Object, e As EventArgs) Handles Button4.Click + + End Sub End Class diff --git a/Aviso/frmSendungsdetailsNEU.Designer.vb b/Aviso/frmSendungsdetailsNEU.Designer.vb index e88e92d..a8697f8 100644 --- a/Aviso/frmSendungsdetailsNEU.Designer.vb +++ b/Aviso/frmSendungsdetailsNEU.Designer.vb @@ -24,29 +24,20 @@ Partial Class frmSendungsdetailsNEU Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungsdetailsNEU)) + Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle15 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle16 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle17 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle21 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle22 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle23 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle24 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle25 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle26 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle27 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle28 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle29 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle30 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle31 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle32 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle33 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle34 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle35 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle36 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle38 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle39 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle37 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle40 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle41 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle42 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle43 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle45 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle46 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle44 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.pnl = New System.Windows.Forms.Panel() Me.Panel4 = New System.Windows.Forms.Panel() Me.TabControl1 = New System.Windows.Forms.TabControl() @@ -159,6 +150,7 @@ Partial Class frmSendungsdetailsNEU Me.pnlDetails = New System.Windows.Forms.Panel() Me.tbcntr = New System.Windows.Forms.TabControl() Me.TabPage4 = New System.Windows.Forms.TabPage() + Me.btnVorauszahlung = New System.Windows.Forms.Button() Me.btnWWberechnen = New System.Windows.Forms.Button() Me.Panel22 = New System.Windows.Forms.Panel() Me.lblZuKass = New System.Windows.Forms.Label() @@ -179,7 +171,6 @@ Partial Class frmSendungsdetailsNEU Me.lblAnmerkungDispoliste = New System.Windows.Forms.Label() Me.rtbAnmerkungDispoliste = New System.Windows.Forms.RichTextBox() Me.btnImportaviso = New System.Windows.Forms.Button() - Me.btnVorauszahlung = New System.Windows.Forms.Button() Me.Button12 = New System.Windows.Forms.Button() Me.txtGewicht = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.lblWarenbezeichnung = New System.Windows.Forms.Label() @@ -338,10 +329,23 @@ Partial Class frmSendungsdetailsNEU Me.txtKdAuftragsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.LinkLabel4 = New System.Windows.Forms.LinkLabel() Me.Panel5 = New System.Windows.Forms.Panel() + Me.pnlStatus = New System.Windows.Forms.Panel() + Me.lblStatus = New System.Windows.Forms.Label() + Me.lblStatusOptionen = New System.Windows.Forms.Label() + Me.flpnlStatus = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components) + Me.btnStatusAbklaerungTR = New System.Windows.Forms.Button() + Me.btnStatusVorbereitetQS = New System.Windows.Forms.Button() + Me.btnStatusVorgeschrieben = New System.Windows.Forms.Button() + Me.btnStatusAbfertigungTR = New System.Windows.Forms.Button() + Me.btnSpeditionsbuchEintragen = New System.Windows.Forms.Button() + Me.btnSendungFakturiert = New System.Windows.Forms.Button() + Me.btnStatusAbgeschlossen = New System.Windows.Forms.Button() + Me.pnlSND_Zuteilung = New System.Windows.Forms.Panel() + Me.btnSND_Zuteilg = New System.Windows.Forms.Button() + Me.picSND_Zuteilg = New System.Windows.Forms.PictureBox() + Me.lblSND_ZuteilgAvisoId = New System.Windows.Forms.Label() + Me.lblSND_Zuteilg = New System.Windows.Forms.Label() Me.lblAbfArtLand = New System.Windows.Forms.Label() - Me.pnlValidation = New System.Windows.Forms.Panel() - Me.rtbValidierung = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() - Me.Label15 = New System.Windows.Forms.Label() Me.cboAbfertigungsLand = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.lblSNDChat_MsgCnt = New System.Windows.Forms.Label() Me.picAVISOMessengerSNDChat = New System.Windows.Forms.PictureBox() @@ -350,10 +354,6 @@ Partial Class frmSendungsdetailsNEU Me.lblAbfNrExists = New System.Windows.Forms.Label() Me.cbxFremdspedition = New System.Windows.Forms.CheckBox() Me.lblAbfNr_Err = New System.Windows.Forms.Label() - Me.Panel1 = New System.Windows.Forms.Panel() - Me.Button13 = New System.Windows.Forms.Button() - Me.lblSendungen = New System.Windows.Forms.Label() - Me.Label3 = New System.Windows.Forms.Label() Me.cboAbfertigungsart = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.lblAbfertigungsart = New System.Windows.Forms.Label() Me.pnlFremd = New System.Windows.Forms.Panel() @@ -375,9 +375,16 @@ Partial Class frmSendungsdetailsNEU Me.Panel2 = New System.Windows.Forms.Panel() Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel() Me.FlatButton2 = New VERAG_PROG_ALLGEMEIN.FlatButton() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.Button13 = New System.Windows.Forms.Button() + Me.lblSendungen = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() Me.pnlheader = New System.Windows.Forms.Panel() Me.Label2 = New System.Windows.Forms.Label() Me.Panel7 = New System.Windows.Forms.Panel() + Me.pnlValidation = New System.Windows.Forms.Panel() + Me.rtbValidierung = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() + Me.Label15 = New System.Windows.Forms.Label() Me.btnLKWUmmelden = New System.Windows.Forms.Button() Me.Button24 = New System.Windows.Forms.Button() Me.cboVorpapier3 = New VERAG_PROG_ALLGEMEIN.MyComboBox() @@ -401,10 +408,9 @@ Partial Class frmSendungsdetailsNEU Me.Button2 = New System.Windows.Forms.Button() Me.btnVermerk = New System.Windows.Forms.Button() Me.lblGesColli = New System.Windows.Forms.Label() - Me.lblgesGewicht = New System.Windows.Forms.Label() Me.lblGesamt = New System.Windows.Forms.Label() - Me.btnSpedBuch = New System.Windows.Forms.Button() - Me.cbxSpedBuch = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components) + Me.lblSendungsId = New System.Windows.Forms.Label() + Me.Label16 = New System.Windows.Forms.Label() Me.cntxtAnh = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.MarkiertePDFsDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.EMailAnfügenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() @@ -412,6 +418,7 @@ Partial Class frmSendungsdetailsNEU Me.LaufzetteldruckJANEINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.GestellungslisteAnfügenJANEINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FürDruckMarkierenJANEINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.HervorhebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() @@ -498,7 +505,8 @@ Partial Class frmSendungsdetailsNEU Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.FürDruckMarkierenJANEINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.Label17 = New System.Windows.Forms.Label() + Me.Label18 = New System.Windows.Forms.Label() Me.pnl.SuspendLayout() Me.Panel4.SuspendLayout() Me.TabControl1.SuspendLayout() @@ -554,14 +562,18 @@ Partial Class frmSendungsdetailsNEU Me.cntxt.SuspendLayout() Me.pnlT1.SuspendLayout() Me.Panel5.SuspendLayout() - Me.pnlValidation.SuspendLayout() + Me.pnlStatus.SuspendLayout() + Me.flpnlStatus.SuspendLayout() + Me.pnlSND_Zuteilung.SuspendLayout() + CType(Me.picSND_Zuteilg, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.picAVISOMessengerSNDChat, System.ComponentModel.ISupportInitialize).BeginInit() - Me.Panel1.SuspendLayout() Me.pnlFremd.SuspendLayout() Me.Panel2.SuspendLayout() Me.FlowLayoutPanel.SuspendLayout() + Me.Panel1.SuspendLayout() Me.pnlheader.SuspendLayout() Me.Panel7.SuspendLayout() + Me.pnlValidation.SuspendLayout() Me.Panel3.SuspendLayout() Me.Panel9.SuspendLayout() Me.cntxtAnh.SuspendLayout() @@ -585,7 +597,7 @@ Partial Class frmSendungsdetailsNEU Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill Me.pnl.Location = New System.Drawing.Point(0, 0) Me.pnl.Name = "pnl" - Me.pnl.Size = New System.Drawing.Size(1214, 863) + Me.pnl.Size = New System.Drawing.Size(1235, 883) Me.pnl.TabIndex = 0 ' 'Panel4 @@ -595,7 +607,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel4.Location = New System.Drawing.Point(0, 452) Me.Panel4.Name = "Panel4" - Me.Panel4.Size = New System.Drawing.Size(1214, 324) + Me.Panel4.Size = New System.Drawing.Size(1235, 344) Me.Panel4.TabIndex = 2 ' 'TabControl1 @@ -603,10 +615,10 @@ Partial Class frmSendungsdetailsNEU Me.TabControl1.Controls.Add(Me.tbKundenInfo) Me.TabControl1.Controls.Add(Me.tbAnhang) Me.TabControl1.Controls.Add(Me.tbZollabfertigung) + Me.TabControl1.Controls.Add(Me.tbATEZ) Me.TabControl1.Controls.Add(Me.TabPage1) Me.TabControl1.Controls.Add(Me.TabPage2) Me.TabControl1.Controls.Add(Me.TabPage3) - Me.TabControl1.Controls.Add(Me.tbATEZ) Me.TabControl1.Controls.Add(Me.tbDigicust) Me.TabControl1.Controls.Add(Me.tbMail) Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill @@ -615,7 +627,7 @@ Partial Class frmSendungsdetailsNEU Me.TabControl1.Name = "TabControl1" Me.TabControl1.Padding = New System.Drawing.Point(12, 5) Me.TabControl1.SelectedIndex = 0 - Me.TabControl1.Size = New System.Drawing.Size(1214, 321) + Me.TabControl1.Size = New System.Drawing.Size(1235, 341) Me.TabControl1.TabIndex = 1 ' 'tbKundenInfo @@ -626,7 +638,7 @@ Partial Class frmSendungsdetailsNEU Me.tbKundenInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) Me.tbKundenInfo.Location = New System.Drawing.Point(4, 29) Me.tbKundenInfo.Name = "tbKundenInfo" - Me.tbKundenInfo.Size = New System.Drawing.Size(1206, 288) + Me.tbKundenInfo.Size = New System.Drawing.Size(1227, 308) Me.tbKundenInfo.TabIndex = 5 Me.tbKundenInfo.Text = "Kundeninfo" Me.tbKundenInfo.UseVisualStyleBackColor = True @@ -638,7 +650,7 @@ Partial Class frmSendungsdetailsNEU Me.pnlKundenInfo.Dock = System.Windows.Forms.DockStyle.Fill Me.pnlKundenInfo.Location = New System.Drawing.Point(0, 10) Me.pnlKundenInfo.Name = "pnlKundenInfo" - Me.pnlKundenInfo.Size = New System.Drawing.Size(1206, 278) + Me.pnlKundenInfo.Size = New System.Drawing.Size(1227, 298) Me.pnlKundenInfo.TabIndex = 1 ' 'Panel20 @@ -647,7 +659,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel20.Dock = System.Windows.Forms.DockStyle.Top Me.Panel20.Location = New System.Drawing.Point(0, 0) Me.Panel20.Name = "Panel20" - Me.Panel20.Size = New System.Drawing.Size(1206, 10) + Me.Panel20.Size = New System.Drawing.Size(1227, 10) Me.Panel20.TabIndex = 0 ' 'tbAnhang @@ -658,7 +670,7 @@ Partial Class frmSendungsdetailsNEU Me.tbAnhang.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) Me.tbAnhang.Location = New System.Drawing.Point(4, 29) Me.tbAnhang.Name = "tbAnhang" - Me.tbAnhang.Size = New System.Drawing.Size(1206, 288) + Me.tbAnhang.Size = New System.Drawing.Size(1227, 308) Me.tbAnhang.TabIndex = 4 Me.tbAnhang.Text = "Anhang" Me.tbAnhang.UseVisualStyleBackColor = True @@ -672,14 +684,14 @@ Partial Class frmSendungsdetailsNEU Me.dgvAnhang.AllowUserToResizeRows = False Me.dgvAnhang.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvAnhang.Dock = System.Windows.Forms.DockStyle.Fill - Me.dgvAnhang.Location = New System.Drawing.Point(0, 45) + Me.dgvAnhang.Location = New System.Drawing.Point(0, 63) Me.dgvAnhang.Name = "dgvAnhang" Me.dgvAnhang.ReadOnly = True Me.dgvAnhang.RowHeadersVisible = False Me.dgvAnhang.RowHeadersWidth = 51 Me.dgvAnhang.RowTemplate.Height = 40 Me.dgvAnhang.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvAnhang.Size = New System.Drawing.Size(1206, 243) + Me.dgvAnhang.Size = New System.Drawing.Size(1227, 245) Me.dgvAnhang.TabIndex = 1 ' 'btnDirektAnfuegen @@ -711,17 +723,17 @@ Partial Class frmSendungsdetailsNEU Me.Panel19.Dock = System.Windows.Forms.DockStyle.Top Me.Panel19.Location = New System.Drawing.Point(0, 0) Me.Panel19.Name = "Panel19" - Me.Panel19.Size = New System.Drawing.Size(1206, 45) + Me.Panel19.Size = New System.Drawing.Size(1227, 63) Me.Panel19.TabIndex = 0 ' 'Button22 ' - Me.Button22.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button22.Image = Global.AVISO.My.Resources.Resources.atr_s + Me.Button22.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Button22.Image = Global.AVISO.My.Resources.Resources.ico_ATR Me.Button22.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button22.Location = New System.Drawing.Point(606, 5) + Me.Button22.Location = New System.Drawing.Point(626, 5) Me.Button22.Name = "Button22" - Me.Button22.Size = New System.Drawing.Size(105, 34) + Me.Button22.Size = New System.Drawing.Size(112, 50) Me.Button22.TabIndex = 8 Me.Button22.Text = "ATR Archiv" Me.Button22.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -729,13 +741,12 @@ Partial Class frmSendungsdetailsNEU ' 'Button17 ' - Me.Button17.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button17.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button17.Image = Global.AVISO.My.Resources.Resources.spedbuch_small + Me.Button17.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Button17.Image = Global.AVISO.My.Resources.Resources.ico_CMR Me.Button17.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button17.Location = New System.Drawing.Point(724, 5) + Me.Button17.Location = New System.Drawing.Point(737, 5) Me.Button17.Name = "Button17" - Me.Button17.Size = New System.Drawing.Size(76, 34) + Me.Button17.Size = New System.Drawing.Size(85, 50) Me.Button17.TabIndex = 5 Me.Button17.Text = "CMR" Me.Button17.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -743,13 +754,12 @@ Partial Class frmSendungsdetailsNEU ' 'btnQuckScan ' - Me.btnQuckScan.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.btnQuckScan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnQuckScan.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnQuckScan.Image = CType(resources.GetObject("btnQuckScan.Image"), System.Drawing.Image) Me.btnQuckScan.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnQuckScan.Location = New System.Drawing.Point(495, 5) + Me.btnQuckScan.Location = New System.Drawing.Point(512, 5) Me.btnQuckScan.Name = "btnQuckScan" - Me.btnQuckScan.Size = New System.Drawing.Size(107, 34) + Me.btnQuckScan.Size = New System.Drawing.Size(107, 50) Me.btnQuckScan.TabIndex = 4 Me.btnQuckScan.Text = "Quick-Scan" Me.btnQuckScan.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -767,9 +777,9 @@ Partial Class frmSendungsdetailsNEU Me.Panel21.Controls.Add(Me.Label45) Me.Panel21.Controls.Add(Me.Label49) Me.Panel21.Dock = System.Windows.Forms.DockStyle.Right - Me.Panel21.Location = New System.Drawing.Point(938, 0) + Me.Panel21.Location = New System.Drawing.Point(959, 0) Me.Panel21.Name = "Panel21" - Me.Panel21.Size = New System.Drawing.Size(268, 45) + Me.Panel21.Size = New System.Drawing.Size(268, 63) Me.Panel21.TabIndex = 7 ' 'txteori_Pruef @@ -856,26 +866,25 @@ Partial Class frmSendungsdetailsNEU ' 'btnPDFZusammenfueren ' - Me.btnPDFZusammenfueren.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnPDFZusammenfueren.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnPDFZusammenfueren.Image = Global.AVISO.My.Resources.Resources.pdf11 Me.btnPDFZusammenfueren.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnPDFZusammenfueren.Location = New System.Drawing.Point(68, 5) Me.btnPDFZusammenfueren.Name = "btnPDFZusammenfueren" - Me.btnPDFZusammenfueren.Size = New System.Drawing.Size(153, 34) + Me.btnPDFZusammenfueren.Size = New System.Drawing.Size(153, 50) Me.btnPDFZusammenfueren.TabIndex = 1 - Me.btnPDFZusammenfueren.Text = "PDF zusammenführen" + Me.btnPDFZusammenfueren.Text = "PDF" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "zusammenführen" Me.btnPDFZusammenfueren.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnPDFZusammenfueren.UseVisualStyleBackColor = True ' 'btnMailVorlage ' - Me.btnMailVorlage.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnMailVorlage.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnMailVorlage.Image = Global.AVISO.My.Resources.Resources.email_big1 Me.btnMailVorlage.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnMailVorlage.Location = New System.Drawing.Point(225, 5) Me.btnMailVorlage.Name = "btnMailVorlage" - Me.btnMailVorlage.Padding = New System.Windows.Forms.Padding(0, 0, 20, 0) - Me.btnMailVorlage.Size = New System.Drawing.Size(134, 34) + Me.btnMailVorlage.Size = New System.Drawing.Size(134, 50) Me.btnMailVorlage.TabIndex = 2 Me.btnMailVorlage.Text = "Mail Vorlage" Me.btnMailVorlage.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -883,13 +892,12 @@ Partial Class frmSendungsdetailsNEU ' 'btnOptionen ' - Me.btnOptionen.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnOptionen.Image = CType(resources.GetObject("btnOptionen.Image"), System.Drawing.Image) + Me.btnOptionen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnOptionen.Image = Global.AVISO.My.Resources.Resources.ico_Options Me.btnOptionen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnOptionen.Location = New System.Drawing.Point(805, 5) + Me.btnOptionen.Location = New System.Drawing.Point(828, 5) Me.btnOptionen.Name = "btnOptionen" - Me.btnOptionen.Padding = New System.Windows.Forms.Padding(0, 0, 20, 0) - Me.btnOptionen.Size = New System.Drawing.Size(129, 34) + Me.btnOptionen.Size = New System.Drawing.Size(120, 50) Me.btnOptionen.TabIndex = 6 Me.btnOptionen.Text = "Optionen" Me.btnOptionen.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -897,16 +905,17 @@ Partial Class frmSendungsdetailsNEU ' 'btnImportAssi ' - Me.btnImportAssi.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnImportAssi.Image = CType(resources.GetObject("btnImportAssi.Image"), System.Drawing.Image) + Me.btnImportAssi.BackColor = System.Drawing.Color.AliceBlue + Me.btnImportAssi.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btnImportAssi.Image = Global.AVISO.My.Resources.Resources.ico_ImportAssistant Me.btnImportAssi.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnImportAssi.Location = New System.Drawing.Point(362, 5) Me.btnImportAssi.Name = "btnImportAssi" - Me.btnImportAssi.Size = New System.Drawing.Size(129, 34) + Me.btnImportAssi.Size = New System.Drawing.Size(144, 50) Me.btnImportAssi.TabIndex = 3 - Me.btnImportAssi.Text = "Import-Assistent ..." + Me.btnImportAssi.Text = "Import-Assistent" Me.btnImportAssi.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnImportAssi.UseVisualStyleBackColor = True + Me.btnImportAssi.UseVisualStyleBackColor = False ' 'lblAnhaenge ' @@ -923,7 +932,7 @@ Partial Class frmSendungsdetailsNEU Me.tbZollabfertigung.Controls.Add(Me.Panel16) Me.tbZollabfertigung.Location = New System.Drawing.Point(4, 29) Me.tbZollabfertigung.Name = "tbZollabfertigung" - Me.tbZollabfertigung.Size = New System.Drawing.Size(1206, 288) + Me.tbZollabfertigung.Size = New System.Drawing.Size(1227, 308) Me.tbZollabfertigung.TabIndex = 2 Me.tbZollabfertigung.Text = "Zollabfertigung" Me.tbZollabfertigung.UseVisualStyleBackColor = True @@ -937,7 +946,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel16.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) Me.Panel16.Location = New System.Drawing.Point(0, 0) Me.Panel16.Name = "Panel16" - Me.Panel16.Size = New System.Drawing.Size(1206, 288) + Me.Panel16.Size = New System.Drawing.Size(1227, 308) Me.Panel16.TabIndex = 0 ' 'dgvZollAnmeldungen @@ -955,7 +964,7 @@ Partial Class frmSendungsdetailsNEU Me.dgvZollAnmeldungen.RowHeadersWidth = 51 Me.dgvZollAnmeldungen.RowTemplate.Height = 30 Me.dgvZollAnmeldungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1206, 218) + Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(1227, 238) Me.dgvZollAnmeldungen.TabIndex = 1 ' 'Panel17 @@ -964,9 +973,9 @@ Partial Class frmSendungsdetailsNEU Me.Panel17.Controls.Add(Me.Button6) Me.Panel17.Controls.Add(Me.Button5) Me.Panel17.Dock = System.Windows.Forms.DockStyle.Bottom - Me.Panel17.Location = New System.Drawing.Point(0, 250) + Me.Panel17.Location = New System.Drawing.Point(0, 270) Me.Panel17.Name = "Panel17" - Me.Panel17.Size = New System.Drawing.Size(1206, 38) + Me.Panel17.Size = New System.Drawing.Size(1227, 38) Me.Panel17.TabIndex = 2 ' 'Button6 @@ -1002,7 +1011,7 @@ Partial Class frmSendungsdetailsNEU Me.MenuStrip.Location = New System.Drawing.Point(0, 0) Me.MenuStrip.Name = "MenuStrip" Me.MenuStrip.Padding = New System.Windows.Forms.Padding(5, 2, 0, 2) - Me.MenuStrip.Size = New System.Drawing.Size(1206, 32) + Me.MenuStrip.Size = New System.Drawing.Size(1227, 32) Me.MenuStrip.TabIndex = 0 ' 'toolSendDyEZA @@ -1201,7 +1210,7 @@ Partial Class frmSendungsdetailsNEU Me.TabPage1.Location = New System.Drawing.Point(4, 29) Me.TabPage1.Name = "TabPage1" Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage1.Size = New System.Drawing.Size(1206, 288) + Me.TabPage1.Size = New System.Drawing.Size(1227, 308) Me.TabPage1.TabIndex = 0 Me.TabPage1.Text = "Kunden - Zolltarif" Me.TabPage1.UseVisualStyleBackColor = True @@ -1217,7 +1226,7 @@ Partial Class frmSendungsdetailsNEU Me.pnlKundenZolltarif.Location = New System.Drawing.Point(3, 36) Me.pnlKundenZolltarif.MinimumSize = New System.Drawing.Size(2, 103) Me.pnlKundenZolltarif.Name = "pnlKundenZolltarif" - Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1200, 249) + Me.pnlKundenZolltarif.Size = New System.Drawing.Size(1221, 269) Me.pnlKundenZolltarif.TabIndex = 1 Me.pnlKundenZolltarif.TabStop = True ' @@ -1226,7 +1235,7 @@ Partial Class frmSendungsdetailsNEU Me.Label22.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label22.AutoSize = True - Me.Label22.Location = New System.Drawing.Point(4, 208) + Me.Label22.Location = New System.Drawing.Point(4, 228) Me.Label22.Name = "Label22" Me.Label22.Size = New System.Drawing.Size(209, 13) Me.Label22.TabIndex = 0 @@ -1238,7 +1247,7 @@ Partial Class frmSendungsdetailsNEU Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.AutoSize = True - Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 223) + Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Location = New System.Drawing.Point(4, 243) Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Name = "lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden" Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.Size = New System.Drawing.Size(338, 13) Me.lblBitteEinenEmpfangerAuswahlenUmDenKundenZolltarifEinzublenden.TabIndex = 1 @@ -1252,7 +1261,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel18.Dock = System.Windows.Forms.DockStyle.Top Me.Panel18.Location = New System.Drawing.Point(3, 3) Me.Panel18.Name = "Panel18" - Me.Panel18.Size = New System.Drawing.Size(1200, 33) + Me.Panel18.Size = New System.Drawing.Size(1221, 33) Me.Panel18.TabIndex = 0 ' 'Label5 @@ -1284,7 +1293,7 @@ Partial Class frmSendungsdetailsNEU Me.TabPage2.Location = New System.Drawing.Point(4, 29) Me.TabPage2.Name = "TabPage2" Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage2.Size = New System.Drawing.Size(1206, 288) + Me.TabPage2.Size = New System.Drawing.Size(1227, 308) Me.TabPage2.TabIndex = 1 Me.TabPage2.Text = "Speditionsbuch" Me.TabPage2.UseVisualStyleBackColor = True @@ -1302,7 +1311,7 @@ Partial Class frmSendungsdetailsNEU Me.DataGridView.Location = New System.Drawing.Point(3, 94) Me.DataGridView.Name = "DataGridView" Me.DataGridView.RowHeadersWidth = 51 - Me.DataGridView.Size = New System.Drawing.Size(1200, 191) + Me.DataGridView.Size = New System.Drawing.Size(1221, 211) Me.DataGridView.TabIndex = 1 ' 'pnlSpedBuchNacherfassung @@ -1332,7 +1341,7 @@ Partial Class frmSendungsdetailsNEU Me.pnlSpedBuchNacherfassung.Dock = System.Windows.Forms.DockStyle.Top Me.pnlSpedBuchNacherfassung.Location = New System.Drawing.Point(3, 3) Me.pnlSpedBuchNacherfassung.Name = "pnlSpedBuchNacherfassung" - Me.pnlSpedBuchNacherfassung.Size = New System.Drawing.Size(1200, 91) + Me.pnlSpedBuchNacherfassung.Size = New System.Drawing.Size(1221, 91) Me.pnlSpedBuchNacherfassung.TabIndex = 0 Me.pnlSpedBuchNacherfassung.Visible = False ' @@ -1617,16 +1626,17 @@ Partial Class frmSendungsdetailsNEU Me.TabPage3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) Me.TabPage3.Location = New System.Drawing.Point(4, 29) Me.TabPage3.Name = "TabPage3" - Me.TabPage3.Size = New System.Drawing.Size(1206, 288) + Me.TabPage3.Size = New System.Drawing.Size(1227, 308) Me.TabPage3.TabIndex = 3 Me.TabPage3.Text = "Vermerke" Me.TabPage3.UseVisualStyleBackColor = True ' 'RCntrlVermerke1 ' - Me.RCntrlVermerke1.Location = New System.Drawing.Point(251, 18) + Me.RCntrlVermerke1.Dock = System.Windows.Forms.DockStyle.Fill + Me.RCntrlVermerke1.Location = New System.Drawing.Point(0, 0) Me.RCntrlVermerke1.Name = "RCntrlVermerke1" - Me.RCntrlVermerke1.Size = New System.Drawing.Size(575, 208) + Me.RCntrlVermerke1.Size = New System.Drawing.Size(1227, 308) Me.RCntrlVermerke1.TabIndex = 1 ' 'gridVermerke @@ -1634,18 +1644,18 @@ Partial Class frmSendungsdetailsNEU Me.gridVermerke.AllowUserToAddRows = False Me.gridVermerke.AllowUserToDeleteRows = False Me.gridVermerke.AllowUserToResizeRows = False - DataGridViewCellStyle24.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle24 + DataGridViewCellStyle18.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle18.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle18 Me.gridVermerke.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle25.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle25.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle25.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) - DataGridViewCellStyle25.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle25.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle25.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle25 + DataGridViewCellStyle19.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle19.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle19.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) + DataGridViewCellStyle19.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle19.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle19 Me.gridVermerke.ColumnHeadersHeight = 29 Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill @@ -1656,15 +1666,15 @@ Partial Class frmSendungsdetailsNEU Me.gridVermerke.RowHeadersVisible = False Me.gridVermerke.RowHeadersWidth = 51 Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle26.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle26 + DataGridViewCellStyle20.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle20 Me.gridVermerke.RowTemplate.Height = 20 Me.gridVermerke.RowTemplate.ReadOnly = True Me.gridVermerke.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.gridVermerke.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.gridVermerke.ShowCellErrors = False Me.gridVermerke.ShowRowErrors = False - Me.gridVermerke.Size = New System.Drawing.Size(1206, 288) + Me.gridVermerke.Size = New System.Drawing.Size(1227, 308) Me.gridVermerke.TabIndex = 0 Me.gridVermerke.TabStop = False ' @@ -1675,7 +1685,7 @@ Partial Class frmSendungsdetailsNEU Me.tbATEZ.Location = New System.Drawing.Point(4, 29) Me.tbATEZ.Name = "tbATEZ" Me.tbATEZ.Padding = New System.Windows.Forms.Padding(3) - Me.tbATEZ.Size = New System.Drawing.Size(1206, 288) + Me.tbATEZ.Size = New System.Drawing.Size(1227, 308) Me.tbATEZ.TabIndex = 6 Me.tbATEZ.Text = "ATEZ" Me.tbATEZ.UseVisualStyleBackColor = True @@ -1685,59 +1695,62 @@ Partial Class frmSendungsdetailsNEU Me.dgvATEZNCTS.AllowUserToAddRows = False Me.dgvATEZNCTS.AllowUserToDeleteRows = False Me.dgvATEZNCTS.AllowUserToResizeRows = False - DataGridViewCellStyle27.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle27.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvATEZNCTS.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle27 + DataGridViewCellStyle15.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvATEZNCTS.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle15 Me.dgvATEZNCTS.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle28.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle28.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle28.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) - DataGridViewCellStyle28.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle28.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle28.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle28.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle28 + DataGridViewCellStyle16.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle16.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle16.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + DataGridViewCellStyle16.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle16.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle16.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle16.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvATEZNCTS.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle16 Me.dgvATEZNCTS.ColumnHeadersHeight = 29 Me.dgvATEZNCTS.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing Me.dgvATEZNCTS.Dock = System.Windows.Forms.DockStyle.Fill - Me.dgvATEZNCTS.Location = New System.Drawing.Point(3, 48) + Me.dgvATEZNCTS.Location = New System.Drawing.Point(3, 73) Me.dgvATEZNCTS.MultiSelect = False Me.dgvATEZNCTS.Name = "dgvATEZNCTS" Me.dgvATEZNCTS.ReadOnly = True Me.dgvATEZNCTS.RowHeadersVisible = False Me.dgvATEZNCTS.RowHeadersWidth = 51 Me.dgvATEZNCTS.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle29.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle29 + DataGridViewCellStyle17.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvATEZNCTS.RowsDefaultCellStyle = DataGridViewCellStyle17 Me.dgvATEZNCTS.RowTemplate.Height = 20 Me.dgvATEZNCTS.RowTemplate.ReadOnly = True Me.dgvATEZNCTS.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.dgvATEZNCTS.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvATEZNCTS.ShowCellErrors = False Me.dgvATEZNCTS.ShowRowErrors = False - Me.dgvATEZNCTS.Size = New System.Drawing.Size(1200, 237) + Me.dgvATEZNCTS.Size = New System.Drawing.Size(1221, 232) Me.dgvATEZNCTS.TabIndex = 105 Me.dgvATEZNCTS.TabStop = False ' 'Panel23 ' + Me.Panel23.BackColor = System.Drawing.Color.White + Me.Panel23.Controls.Add(Me.Label18) + Me.Panel23.Controls.Add(Me.Label17) Me.Panel23.Controls.Add(Me.btnATEZNewEZA) Me.Panel23.Controls.Add(Me.btnATEZNew) Me.Panel23.Dock = System.Windows.Forms.DockStyle.Top Me.Panel23.Location = New System.Drawing.Point(3, 3) Me.Panel23.Name = "Panel23" - Me.Panel23.Size = New System.Drawing.Size(1200, 45) + Me.Panel23.Size = New System.Drawing.Size(1221, 70) Me.Panel23.TabIndex = 106 ' 'btnATEZNewEZA ' Me.btnATEZNewEZA.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.btnATEZNewEZA.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnATEZNewEZA.Image = Global.AVISO.My.Resources.Resources.plus + Me.btnATEZNewEZA.Image = Global.AVISO.My.Resources.Resources.ico_atez_declarantAI Me.btnATEZNewEZA.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnATEZNewEZA.Location = New System.Drawing.Point(145, 8) + Me.btnATEZNewEZA.Location = New System.Drawing.Point(7, 11) Me.btnATEZNewEZA.Name = "btnATEZNewEZA" - Me.btnATEZNewEZA.Size = New System.Drawing.Size(136, 34) + Me.btnATEZNewEZA.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) + Me.btnATEZNewEZA.Size = New System.Drawing.Size(160, 50) Me.btnATEZNewEZA.TabIndex = 9 Me.btnATEZNewEZA.Text = "ATEZ-EZA" Me.btnATEZNewEZA.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -1746,12 +1759,12 @@ Partial Class frmSendungsdetailsNEU 'btnATEZNew ' Me.btnATEZNew.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.btnATEZNew.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnATEZNew.Image = Global.AVISO.My.Resources.Resources.plus + Me.btnATEZNew.Image = Global.AVISO.My.Resources.Resources.ico_atez_transitAI Me.btnATEZNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnATEZNew.Location = New System.Drawing.Point(3, 8) + Me.btnATEZNew.Location = New System.Drawing.Point(429, 11) Me.btnATEZNew.Name = "btnATEZNew" - Me.btnATEZNew.Size = New System.Drawing.Size(136, 34) + Me.btnATEZNew.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) + Me.btnATEZNew.Size = New System.Drawing.Size(160, 50) Me.btnATEZNew.TabIndex = 8 Me.btnATEZNew.Text = "ATEZ-NCTS" Me.btnATEZNew.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -1764,7 +1777,7 @@ Partial Class frmSendungsdetailsNEU Me.tbDigicust.Controls.Add(Me.Panel24) Me.tbDigicust.Location = New System.Drawing.Point(4, 29) Me.tbDigicust.Name = "tbDigicust" - Me.tbDigicust.Size = New System.Drawing.Size(1206, 288) + Me.tbDigicust.Size = New System.Drawing.Size(1227, 308) Me.tbDigicust.TabIndex = 7 Me.tbDigicust.Text = "Digicust" Me.tbDigicust.UseVisualStyleBackColor = True @@ -1774,18 +1787,18 @@ Partial Class frmSendungsdetailsNEU Me.dgvDigicust.AllowUserToAddRows = False Me.dgvDigicust.AllowUserToDeleteRows = False Me.dgvDigicust.AllowUserToResizeRows = False - DataGridViewCellStyle30.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle30.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle30 + DataGridViewCellStyle21.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvDigicust.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle21 Me.dgvDigicust.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle31.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle31.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle31.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) - DataGridViewCellStyle31.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle31.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle31.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle31.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle31 + DataGridViewCellStyle22.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle22.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle22.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + DataGridViewCellStyle22.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle22.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle22.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle22.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvDigicust.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle22 Me.dgvDigicust.ColumnHeadersHeight = 29 Me.dgvDigicust.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing Me.dgvDigicust.Dock = System.Windows.Forms.DockStyle.Fill @@ -1796,15 +1809,15 @@ Partial Class frmSendungsdetailsNEU Me.dgvDigicust.RowHeadersVisible = False Me.dgvDigicust.RowHeadersWidth = 51 Me.dgvDigicust.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle32.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle32 + DataGridViewCellStyle23.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvDigicust.RowsDefaultCellStyle = DataGridViewCellStyle23 Me.dgvDigicust.RowTemplate.Height = 20 Me.dgvDigicust.RowTemplate.ReadOnly = True Me.dgvDigicust.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.dgvDigicust.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvDigicust.ShowCellErrors = False Me.dgvDigicust.ShowRowErrors = False - Me.dgvDigicust.Size = New System.Drawing.Size(1206, 243) + Me.dgvDigicust.Size = New System.Drawing.Size(1227, 263) Me.dgvDigicust.TabIndex = 107 Me.dgvDigicust.TabStop = False ' @@ -1814,7 +1827,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel24.Dock = System.Windows.Forms.DockStyle.Top Me.Panel24.Location = New System.Drawing.Point(0, 0) Me.Panel24.Name = "Panel24" - Me.Panel24.Size = New System.Drawing.Size(1206, 45) + Me.Panel24.Size = New System.Drawing.Size(1227, 45) Me.Panel24.TabIndex = 108 ' 'Button19 @@ -1823,7 +1836,7 @@ Partial Class frmSendungsdetailsNEU Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button19.Image = Global.AVISO.My.Resources.Resources.plus Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button19.Location = New System.Drawing.Point(4, 8) + Me.Button19.Location = New System.Drawing.Point(25, 8) Me.Button19.Name = "Button19" Me.Button19.Size = New System.Drawing.Size(104, 34) Me.Button19.TabIndex = 9 @@ -1839,7 +1852,7 @@ Partial Class frmSendungsdetailsNEU Me.tbMail.Location = New System.Drawing.Point(4, 29) Me.tbMail.Name = "tbMail" Me.tbMail.Padding = New System.Windows.Forms.Padding(3) - Me.tbMail.Size = New System.Drawing.Size(1206, 288) + Me.tbMail.Size = New System.Drawing.Size(1227, 308) Me.tbMail.TabIndex = 8 Me.tbMail.Text = "Mail" Me.tbMail.UseVisualStyleBackColor = True @@ -1849,18 +1862,18 @@ Partial Class frmSendungsdetailsNEU Me.dgvMail.AllowUserToAddRows = False Me.dgvMail.AllowUserToDeleteRows = False Me.dgvMail.AllowUserToResizeRows = False - DataGridViewCellStyle33.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle33.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvMail.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle33 + DataGridViewCellStyle24.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvMail.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle24 Me.dgvMail.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle34.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle34.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle34.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) - DataGridViewCellStyle34.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle34.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle34.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle34.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvMail.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle34 + DataGridViewCellStyle25.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle25.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle25.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + DataGridViewCellStyle25.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle25.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle25.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvMail.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle25 Me.dgvMail.ColumnHeadersHeight = 29 Me.dgvMail.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing Me.dgvMail.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnSender, Me.clmnRec, Me.clmnSbj, Me.clmnAtt, Me.clmnUIDL}) @@ -1872,15 +1885,15 @@ Partial Class frmSendungsdetailsNEU Me.dgvMail.RowHeadersVisible = False Me.dgvMail.RowHeadersWidth = 51 Me.dgvMail.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle35.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvMail.RowsDefaultCellStyle = DataGridViewCellStyle35 + DataGridViewCellStyle26.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.dgvMail.RowsDefaultCellStyle = DataGridViewCellStyle26 Me.dgvMail.RowTemplate.Height = 20 Me.dgvMail.RowTemplate.ReadOnly = True Me.dgvMail.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.dgvMail.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvMail.ShowCellErrors = False Me.dgvMail.ShowRowErrors = False - Me.dgvMail.Size = New System.Drawing.Size(1200, 237) + Me.dgvMail.Size = New System.Drawing.Size(1221, 257) Me.dgvMail.TabIndex = 109 Me.dgvMail.TabStop = False ' @@ -1930,7 +1943,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel25.Dock = System.Windows.Forms.DockStyle.Top Me.Panel25.Location = New System.Drawing.Point(3, 3) Me.Panel25.Name = "Panel25" - Me.Panel25.Size = New System.Drawing.Size(1200, 45) + Me.Panel25.Size = New System.Drawing.Size(1221, 45) Me.Panel25.TabIndex = 110 ' 'Button23 @@ -1939,7 +1952,7 @@ Partial Class frmSendungsdetailsNEU Me.Button23.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button23.Image = Global.AVISO.My.Resources.Resources.plus Me.Button23.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button23.Location = New System.Drawing.Point(1, 8) + Me.Button23.Location = New System.Drawing.Point(22, 8) Me.Button23.Name = "Button23" Me.Button23.Size = New System.Drawing.Size(104, 34) Me.Button23.TabIndex = 9 @@ -1955,7 +1968,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel14.ForeColor = System.Drawing.SystemColors.ControlText Me.Panel14.Location = New System.Drawing.Point(0, 0) Me.Panel14.Name = "Panel14" - Me.Panel14.Size = New System.Drawing.Size(1214, 3) + Me.Panel14.Size = New System.Drawing.Size(1235, 3) Me.Panel14.TabIndex = 0 ' 'pnlDetails @@ -1969,7 +1982,7 @@ Partial Class frmSendungsdetailsNEU Me.pnlDetails.Location = New System.Drawing.Point(0, 55) Me.pnlDetails.MinimumSize = New System.Drawing.Size(0, 310) Me.pnlDetails.Name = "pnlDetails" - Me.pnlDetails.Size = New System.Drawing.Size(1214, 397) + Me.pnlDetails.Size = New System.Drawing.Size(1235, 397) Me.pnlDetails.TabIndex = 1 ' 'tbcntr @@ -1979,7 +1992,7 @@ Partial Class frmSendungsdetailsNEU Me.tbcntr.Controls.Add(Me.tbAbrechnung) Me.tbcntr.Controls.Add(Me.tbBAR) Me.tbcntr.Controls.Add(Me.tbVorkosten) - Me.tbcntr.Location = New System.Drawing.Point(773, 69) + Me.tbcntr.Location = New System.Drawing.Point(794, 69) Me.tbcntr.Name = "tbcntr" Me.tbcntr.SelectedIndex = 0 Me.tbcntr.Size = New System.Drawing.Size(441, 325) @@ -1988,6 +2001,7 @@ Partial Class frmSendungsdetailsNEU ' 'TabPage4 ' + Me.TabPage4.Controls.Add(Me.btnVorauszahlung) Me.TabPage4.Controls.Add(Me.btnWWberechnen) Me.TabPage4.Controls.Add(Me.Panel22) Me.TabPage4.Controls.Add(Me.Label12) @@ -2006,7 +2020,6 @@ Partial Class frmSendungsdetailsNEU Me.TabPage4.Controls.Add(Me.lblAnmerkungDispoliste) Me.TabPage4.Controls.Add(Me.rtbAnmerkungDispoliste) Me.TabPage4.Controls.Add(Me.btnImportaviso) - Me.TabPage4.Controls.Add(Me.btnVorauszahlung) Me.TabPage4.Controls.Add(Me.Button12) Me.TabPage4.Controls.Add(Me.txtGewicht) Me.TabPage4.Controls.Add(Me.lblWarenbezeichnung) @@ -2031,9 +2044,25 @@ Partial Class frmSendungsdetailsNEU Me.TabPage4.Text = "Aktendeckel" Me.TabPage4.UseVisualStyleBackColor = True ' + 'btnVorauszahlung + ' + Me.btnVorauszahlung.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnVorauszahlung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) + Me.btnVorauszahlung.Image = Global.AVISO.My.Resources.Resources.ico_vorkasse + Me.btnVorauszahlung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnVorauszahlung.Location = New System.Drawing.Point(296, 187) + Me.btnVorauszahlung.Name = "btnVorauszahlung" + Me.btnVorauszahlung.Padding = New System.Windows.Forms.Padding(0, 0, 2, 0) + Me.btnVorauszahlung.Size = New System.Drawing.Size(131, 36) + Me.btnVorauszahlung.TabIndex = 27 + Me.btnVorauszahlung.Text = "Vorauskasse" + Me.btnVorauszahlung.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnVorauszahlung.UseVisualStyleBackColor = True + Me.btnVorauszahlung.Visible = False + ' 'btnWWberechnen ' - Me.btnWWberechnen.Location = New System.Drawing.Point(76, 98) + Me.btnWWberechnen.Location = New System.Drawing.Point(78, 99) Me.btnWWberechnen.Name = "btnWWberechnen" Me.btnWWberechnen.Size = New System.Drawing.Size(130, 23) Me.btnWWberechnen.TabIndex = 65 @@ -2057,7 +2086,7 @@ Partial Class frmSendungsdetailsNEU Me.lblZuKass.AutoSize = True Me.lblZuKass.Location = New System.Drawing.Point(29, 2) Me.lblZuKass.Name = "lblZuKass" - Me.lblZuKass.Size = New System.Drawing.Size(100, 13) + Me.lblZuKass.Size = New System.Drawing.Size(103, 13) Me.lblZuKass.TabIndex = 0 Me.lblZuKass.Text = "zu kassieren (BAR):" ' @@ -2091,7 +2120,7 @@ Partial Class frmSendungsdetailsNEU Me.Label12.AutoSize = True Me.Label12.Location = New System.Drawing.Point(266, 7) Me.Label12.Name = "Label12" - Me.Label12.Size = New System.Drawing.Size(40, 13) + Me.Label12.Size = New System.Drawing.Size(42, 13) Me.Label12.TabIndex = 64 Me.Label12.Text = "Fracht:" ' @@ -2099,7 +2128,7 @@ Partial Class frmSendungsdetailsNEU ' Me.Label10.AutoSize = True Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) - Me.Label10.Location = New System.Drawing.Point(383, 8) + Me.Label10.Location = New System.Drawing.Point(383, 7) Me.Label10.Name = "Label10" Me.Label10.Size = New System.Drawing.Size(43, 13) Me.Label10.TabIndex = 62 @@ -2107,7 +2136,6 @@ Partial Class frmSendungsdetailsNEU ' 'btn_FrachtkostenBerechnen ' - Me.btn_FrachtkostenBerechnen.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btn_FrachtkostenBerechnen.Location = New System.Drawing.Point(269, 41) Me.btn_FrachtkostenBerechnen.Name = "btn_FrachtkostenBerechnen" Me.btn_FrachtkostenBerechnen.Size = New System.Drawing.Size(156, 21) @@ -2135,7 +2163,7 @@ Partial Class frmSendungsdetailsNEU Me.txtFrachtkostenGesamt.MaxLines_Warning = "" Me.txtFrachtkostenGesamt.MaxLines_Warning_Label = Nothing Me.txtFrachtkostenGesamt.Name = "txtFrachtkostenGesamt" - Me.txtFrachtkostenGesamt.Size = New System.Drawing.Size(50, 20) + Me.txtFrachtkostenGesamt.Size = New System.Drawing.Size(50, 22) Me.txtFrachtkostenGesamt.TabIndex = 61 Me.txtFrachtkostenGesamt.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' @@ -2143,7 +2171,7 @@ Partial Class frmSendungsdetailsNEU ' Me.Label6.AutoSize = True Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) - Me.Label6.Location = New System.Drawing.Point(302, 8) + Me.Label6.Location = New System.Drawing.Point(305, 7) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(21, 13) Me.Label6.TabIndex = 16 @@ -2177,7 +2205,7 @@ Partial Class frmSendungsdetailsNEU Me.txtFrachtkostenNichtEU.MaxLines_Warning = "" Me.txtFrachtkostenNichtEU.MaxLines_Warning_Label = Nothing Me.txtFrachtkostenNichtEU.Name = "txtFrachtkostenNichtEU" - Me.txtFrachtkostenNichtEU.Size = New System.Drawing.Size(54, 20) + Me.txtFrachtkostenNichtEU.Size = New System.Drawing.Size(54, 22) Me.txtFrachtkostenNichtEU.TabIndex = 14 Me.txtFrachtkostenNichtEU.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' @@ -2201,16 +2229,16 @@ Partial Class frmSendungsdetailsNEU Me.txtFrachtkostenEU.MaxLines_Warning = "" Me.txtFrachtkostenEU.MaxLines_Warning_Label = Nothing Me.txtFrachtkostenEU.Name = "txtFrachtkostenEU" - Me.txtFrachtkostenEU.Size = New System.Drawing.Size(54, 20) + Me.txtFrachtkostenEU.Size = New System.Drawing.Size(54, 22) Me.txtFrachtkostenEU.TabIndex = 12 Me.txtFrachtkostenEU.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' 'cbx ' Me.cbx.AutoSize = True - Me.cbx.Location = New System.Drawing.Point(373, 120) + Me.cbx.Location = New System.Drawing.Point(374, 121) Me.cbx.Name = "cbx" - Me.cbx.Size = New System.Drawing.Size(55, 17) + Me.cbx.Size = New System.Drawing.Size(56, 17) Me.cbx.TabIndex = 23 Me.cbx.Text = "Laufz." Me.cbx.UseVisualStyleBackColor = True @@ -2233,7 +2261,7 @@ Partial Class frmSendungsdetailsNEU Me.txtWarenwertWaehrung.Location = New System.Drawing.Point(207, 77) Me.txtWarenwertWaehrung.Name = "txtWarenwertWaehrung" Me.txtWarenwertWaehrung.searchActive = True - Me.txtWarenwertWaehrung.Size = New System.Drawing.Size(51, 20) + Me.txtWarenwertWaehrung.Size = New System.Drawing.Size(51, 22) Me.txtWarenwertWaehrung.SQL_ORDER_BY = Nothing Me.txtWarenwertWaehrung.SQL_SELECT = Nothing Me.txtWarenwertWaehrung.SQL_WHERE = Nothing @@ -2246,7 +2274,7 @@ Partial Class frmSendungsdetailsNEU Me.lblWW.AutoSize = True Me.lblWW.Location = New System.Drawing.Point(4, 80) Me.lblWW.Name = "lblWW" - Me.lblWW.Size = New System.Drawing.Size(62, 13) + Me.lblWW.Size = New System.Drawing.Size(67, 13) Me.lblWW.TabIndex = 9 Me.lblWW.Text = "Warenwert:" ' @@ -2270,20 +2298,20 @@ Partial Class frmSendungsdetailsNEU Me.txtWarenwert.MaxLines_Warning = "" Me.txtWarenwert.MaxLines_Warning_Label = Nothing Me.txtWarenwert.Name = "txtWarenwert" - Me.txtWarenwert.Size = New System.Drawing.Size(130, 20) + Me.txtWarenwert.Size = New System.Drawing.Size(130, 22) Me.txtWarenwert.TabIndex = 10 Me.txtWarenwert.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' 'Button21 ' Me.Button21.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) + Me.Button21.Image = Global.AVISO.My.Resources.Resources.ico_weitereForm Me.Button21.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button21.Location = New System.Drawing.Point(296, 221) Me.Button21.Name = "Button21" - Me.Button21.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) - Me.Button21.Size = New System.Drawing.Size(131, 30) + Me.Button21.Padding = New System.Windows.Forms.Padding(0, 0, 2, 0) + Me.Button21.Size = New System.Drawing.Size(131, 32) Me.Button21.TabIndex = 29 Me.Button21.Text = "weitere Formulare" Me.Button21.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -2294,7 +2322,7 @@ Partial Class frmSendungsdetailsNEU Me.lblAnmerkungDispoliste.AutoSize = True Me.lblAnmerkungDispoliste.Location = New System.Drawing.Point(3, 254) Me.lblAnmerkungDispoliste.Name = "lblAnmerkungDispoliste" - Me.lblAnmerkungDispoliste.Size = New System.Drawing.Size(112, 13) + Me.lblAnmerkungDispoliste.Size = New System.Drawing.Size(124, 13) Me.lblAnmerkungDispoliste.TabIndex = 26 Me.lblAnmerkungDispoliste.Text = "Anmerkung Dispoliste:" ' @@ -2308,38 +2336,19 @@ Partial Class frmSendungsdetailsNEU ' 'btnImportaviso ' - Me.btnImportaviso.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnImportaviso.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnImportaviso.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) - Me.btnImportaviso.Image = Global.AVISO.My.Resources.Resources.auftrag3 + Me.btnImportaviso.Image = Global.AVISO.My.Resources.Resources.ico_importaviso Me.btnImportaviso.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnImportaviso.Location = New System.Drawing.Point(296, 163) + Me.btnImportaviso.Location = New System.Drawing.Point(296, 154) Me.btnImportaviso.Name = "btnImportaviso" - Me.btnImportaviso.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) - Me.btnImportaviso.Size = New System.Drawing.Size(131, 30) + Me.btnImportaviso.Padding = New System.Windows.Forms.Padding(0, 0, 2, 0) + Me.btnImportaviso.Size = New System.Drawing.Size(131, 36) Me.btnImportaviso.TabIndex = 25 Me.btnImportaviso.Text = "Importaviso" Me.btnImportaviso.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnImportaviso.UseVisualStyleBackColor = True Me.btnImportaviso.Visible = False ' - 'btnVorauszahlung - ' - Me.btnVorauszahlung.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnVorauszahlung.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnVorauszahlung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) - Me.btnVorauszahlung.Image = Global.AVISO.My.Resources.Resources.vorauszahlung3 - Me.btnVorauszahlung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnVorauszahlung.Location = New System.Drawing.Point(296, 192) - Me.btnVorauszahlung.Name = "btnVorauszahlung" - Me.btnVorauszahlung.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) - Me.btnVorauszahlung.Size = New System.Drawing.Size(131, 30) - Me.btnVorauszahlung.TabIndex = 27 - Me.btnVorauszahlung.Text = "Vorauskasse" - Me.btnVorauszahlung.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnVorauszahlung.UseVisualStyleBackColor = True - Me.btnVorauszahlung.Visible = False - ' 'Button12 ' Me.Button12.Location = New System.Drawing.Point(49, 161) @@ -2365,12 +2374,12 @@ Partial Class frmSendungsdetailsNEU Me.txtGewicht._Waehrung = False Me.txtGewicht._WaehrungZeichen = True Me.txtGewicht.ForeColor = System.Drawing.Color.Black - Me.txtGewicht.Location = New System.Drawing.Point(81, 22) + Me.txtGewicht.Location = New System.Drawing.Point(81, 20) Me.txtGewicht.MaxLineLength = -1 Me.txtGewicht.MaxLines_Warning = "" Me.txtGewicht.MaxLines_Warning_Label = Nothing Me.txtGewicht.Name = "txtGewicht" - Me.txtGewicht.Size = New System.Drawing.Size(69, 20) + Me.txtGewicht.Size = New System.Drawing.Size(69, 22) Me.txtGewicht.TabIndex = 4 Me.txtGewicht.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' @@ -2387,7 +2396,7 @@ Partial Class frmSendungsdetailsNEU Me.Label35.AutoSize = True Me.Label35.Location = New System.Drawing.Point(295, 64) Me.Label35.Name = "Label35" - Me.Label35.Size = New System.Drawing.Size(131, 13) + Me.Label35.Size = New System.Drawing.Size(137, 13) Me.Label35.TabIndex = 18 Me.Label35.Text = "Aktenzettel drucken/PDF:" ' @@ -2396,18 +2405,17 @@ Partial Class frmSendungsdetailsNEU Me.lblCollGew.AutoSize = True Me.lblCollGew.Location = New System.Drawing.Point(3, 5) Me.lblCollGew.Name = "lblCollGew" - Me.lblCollGew.Size = New System.Drawing.Size(171, 13) + Me.lblCollGew.Size = New System.Drawing.Size(184, 13) Me.lblCollGew.TabIndex = 0 Me.lblCollGew.Text = "Colli/Gewicht/Warenbezeichnung:" ' 'Button3 ' - Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button3.Image = CType(resources.GetObject("Button3.Image"), System.Drawing.Image) Me.Button3.Location = New System.Drawing.Point(296, 79) Me.Button3.Margin = New System.Windows.Forms.Padding(0, 3, 0, 3) Me.Button3.Name = "Button3" - Me.Button3.Size = New System.Drawing.Size(78, 60) + Me.Button3.Size = New System.Drawing.Size(78, 55) Me.Button3.TabIndex = 21 Me.Button3.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.Button3.UseVisualStyleBackColor = True @@ -2416,10 +2424,9 @@ Partial Class frmSendungsdetailsNEU ' Me.Button8.BackgroundImage = CType(resources.GetObject("Button8.BackgroundImage"), System.Drawing.Image) Me.Button8.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center - Me.Button8.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button8.Location = New System.Drawing.Point(373, 79) Me.Button8.Name = "Button8" - Me.Button8.Size = New System.Drawing.Size(54, 60) + Me.Button8.Size = New System.Drawing.Size(54, 55) Me.Button8.TabIndex = 22 Me.Button8.UseVisualStyleBackColor = True ' @@ -2438,12 +2445,12 @@ Partial Class frmSendungsdetailsNEU Me.txtColli._Waehrung = False Me.txtColli._WaehrungZeichen = True Me.txtColli.ForeColor = System.Drawing.Color.Black - Me.txtColli.Location = New System.Drawing.Point(7, 22) + Me.txtColli.Location = New System.Drawing.Point(7, 20) Me.txtColli.MaxLineLength = -1 Me.txtColli.MaxLines_Warning = "" Me.txtColli.MaxLines_Warning_Label = Nothing Me.txtColli.Name = "txtColli" - Me.txtColli.Size = New System.Drawing.Size(46, 20) + Me.txtColli.Size = New System.Drawing.Size(46, 22) Me.txtColli.TabIndex = 3 Me.txtColli.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' @@ -2462,7 +2469,7 @@ Partial Class frmSendungsdetailsNEU Me.Label23.AutoSize = True Me.Label23.Location = New System.Drawing.Point(52, 25) Me.Label23.Name = "Label23" - Me.Label23.Size = New System.Drawing.Size(23, 13) + Me.Label23.Size = New System.Drawing.Size(22, 13) Me.Label23.TabIndex = 1 Me.Label23.Text = "Pk." ' @@ -2471,7 +2478,7 @@ Partial Class frmSendungsdetailsNEU Me.Label24.AutoSize = True Me.Label24.Location = New System.Drawing.Point(152, 25) Me.Label24.Name = "Label24" - Me.Label24.Size = New System.Drawing.Size(19, 13) + Me.Label24.Size = New System.Drawing.Size(20, 13) Me.Label24.TabIndex = 5 Me.Label24.Text = "kg" ' @@ -2480,7 +2487,7 @@ Partial Class frmSendungsdetailsNEU Me.lblAnmerkung.AutoSize = True Me.lblAnmerkung.Location = New System.Drawing.Point(6, 112) Me.lblAnmerkung.Name = "lblAnmerkung" - Me.lblAnmerkung.Size = New System.Drawing.Size(64, 13) + Me.lblAnmerkung.Size = New System.Drawing.Size(70, 13) Me.lblAnmerkung.TabIndex = 17 Me.lblAnmerkung.Text = "Anmerkung:" ' @@ -2492,7 +2499,7 @@ Partial Class frmSendungsdetailsNEU Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboPrinter.DropDownWidth = 300 Me.cboPrinter.FormattingEnabled = True - Me.cboPrinter.Location = New System.Drawing.Point(296, 139) + Me.cboPrinter.Location = New System.Drawing.Point(296, 133) Me.cboPrinter.Name = "cboPrinter" Me.cboPrinter.Size = New System.Drawing.Size(131, 21) Me.cboPrinter.TabIndex = 24 @@ -2509,7 +2516,7 @@ Partial Class frmSendungsdetailsNEU ' Me.Label7.AutoSize = True Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) - Me.Label7.Location = New System.Drawing.Point(329, 8) + Me.Label7.Location = New System.Drawing.Point(329, 7) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(47, 13) Me.Label7.TabIndex = 15 @@ -2700,36 +2707,12 @@ Partial Class frmSendungsdetailsNEU Me.dgvAbrechnung.AllowUserToResizeColumns = False Me.dgvAbrechnung.AllowUserToResizeRows = False Me.dgvAbrechnung.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle36.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle36.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle36.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle36.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle36.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle36.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle36.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvAbrechnung.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle36 Me.dgvAbrechnung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvAbrechnung.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnAbrId, Me.clmnAbrFirma, Me.clmnAbrLeistungsNr, Me.clmnAbrLeistung, Me.clmnAbrPreis}) - DataGridViewCellStyle38.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle38.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle38.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle38.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle38.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle38.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle38.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.dgvAbrechnung.DefaultCellStyle = DataGridViewCellStyle38 Me.dgvAbrechnung.Location = New System.Drawing.Point(6, 35) Me.dgvAbrechnung.MultiSelect = False Me.dgvAbrechnung.Name = "dgvAbrechnung" Me.dgvAbrechnung.ReadOnly = True - DataGridViewCellStyle39.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle39.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle39.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle39.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle39.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle39.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle39.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvAbrechnung.RowHeadersDefaultCellStyle = DataGridViewCellStyle39 Me.dgvAbrechnung.RowHeadersVisible = False Me.dgvAbrechnung.RowHeadersWidth = 51 Me.dgvAbrechnung.RowTemplate.Height = 18 @@ -2771,8 +2754,8 @@ Partial Class frmSendungsdetailsNEU ' 'clmnAbrPreis ' - DataGridViewCellStyle37.Format = "C2" - Me.clmnAbrPreis.DefaultCellStyle = DataGridViewCellStyle37 + DataGridViewCellStyle27.Format = "C2" + Me.clmnAbrPreis.DefaultCellStyle = DataGridViewCellStyle27 Me.clmnAbrPreis.HeaderText = "Preis" Me.clmnAbrPreis.MaxInputLength = 15 Me.clmnAbrPreis.MinimumWidth = 6 @@ -2801,35 +2784,11 @@ Partial Class frmSendungsdetailsNEU Me.dgvBelege.AllowUserToResizeColumns = False Me.dgvBelege.AllowUserToResizeRows = False Me.dgvBelege.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle40.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle40.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle40.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle40.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle40.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle40.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle40.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvBelege.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle40 Me.dgvBelege.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - DataGridViewCellStyle41.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle41.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle41.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle41.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle41.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle41.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle41.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.dgvBelege.DefaultCellStyle = DataGridViewCellStyle41 Me.dgvBelege.Location = New System.Drawing.Point(6, 40) Me.dgvBelege.MultiSelect = False Me.dgvBelege.Name = "dgvBelege" Me.dgvBelege.ReadOnly = True - DataGridViewCellStyle42.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle42.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle42.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle42.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle42.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle42.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle42.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvBelege.RowHeadersDefaultCellStyle = DataGridViewCellStyle42 Me.dgvBelege.RowHeadersVisible = False Me.dgvBelege.RowHeadersWidth = 51 Me.dgvBelege.RowTemplate.Height = 18 @@ -2945,7 +2904,7 @@ Partial Class frmSendungsdetailsNEU Me.txtVK_Preis.MaxLines_Warning = "" Me.txtVK_Preis.MaxLines_Warning_Label = Nothing Me.txtVK_Preis.Name = "txtVK_Preis" - Me.txtVK_Preis.Size = New System.Drawing.Size(75, 20) + Me.txtVK_Preis.Size = New System.Drawing.Size(75, 22) Me.txtVK_Preis.TabIndex = 4 ' 'txtVK_Leistung @@ -2969,7 +2928,7 @@ Partial Class frmSendungsdetailsNEU Me.txtVK_Leistung.MaxLines_Warning = "" Me.txtVK_Leistung.MaxLines_Warning_Label = Nothing Me.txtVK_Leistung.Name = "txtVK_Leistung" - Me.txtVK_Leistung.Size = New System.Drawing.Size(127, 20) + Me.txtVK_Leistung.Size = New System.Drawing.Size(127, 22) Me.txtVK_Leistung.TabIndex = 2 ' 'txtVK_Firma @@ -2993,7 +2952,7 @@ Partial Class frmSendungsdetailsNEU Me.txtVK_Firma.MaxLines_Warning = "" Me.txtVK_Firma.MaxLines_Warning_Label = Nothing Me.txtVK_Firma.Name = "txtVK_Firma" - Me.txtVK_Firma.Size = New System.Drawing.Size(127, 20) + Me.txtVK_Firma.Size = New System.Drawing.Size(127, 22) Me.txtVK_Firma.TabIndex = 1 ' 'dgvVorkosten @@ -3004,36 +2963,12 @@ Partial Class frmSendungsdetailsNEU Me.dgvVorkosten.AllowUserToResizeColumns = False Me.dgvVorkosten.AllowUserToResizeRows = False Me.dgvVorkosten.BackgroundColor = System.Drawing.Color.White - DataGridViewCellStyle43.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle43.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle43.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle43.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle43.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle43.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle43.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvVorkosten.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle43 Me.dgvVorkosten.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvVorkosten.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnVK_id, Me.clmnFirma, Me.clmnLeistung, Me.clmnPreis}) - DataGridViewCellStyle45.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle45.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle45.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle45.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle45.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle45.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle45.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.dgvVorkosten.DefaultCellStyle = DataGridViewCellStyle45 Me.dgvVorkosten.Location = New System.Drawing.Point(3, 4) Me.dgvVorkosten.MultiSelect = False Me.dgvVorkosten.Name = "dgvVorkosten" Me.dgvVorkosten.ReadOnly = True - DataGridViewCellStyle46.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle46.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle46.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle46.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle46.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle46.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle46.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.dgvVorkosten.RowHeadersDefaultCellStyle = DataGridViewCellStyle46 Me.dgvVorkosten.RowHeadersVisible = False Me.dgvVorkosten.RowHeadersWidth = 51 Me.dgvVorkosten.RowTemplate.Height = 18 @@ -3071,8 +3006,8 @@ Partial Class frmSendungsdetailsNEU 'clmnPreis ' Me.clmnPreis.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill - DataGridViewCellStyle44.Format = "C2" - Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle44 + DataGridViewCellStyle28.Format = "C2" + Me.clmnPreis.DefaultCellStyle = DataGridViewCellStyle28 Me.clmnPreis.HeaderText = "Preis" Me.clmnPreis.MaxInputLength = 15 Me.clmnPreis.MinimumWidth = 6 @@ -3190,7 +3125,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel6.Location = New System.Drawing.Point(0, 69) Me.Panel6.MinimumSize = New System.Drawing.Size(2, 235) Me.Panel6.Name = "Panel6" - Me.Panel6.Size = New System.Drawing.Size(775, 325) + Me.Panel6.Size = New System.Drawing.Size(796, 325) Me.Panel6.TabIndex = 1 ' 'lblErr_Auftrageber @@ -3210,7 +3145,7 @@ Partial Class frmSendungsdetailsNEU Me.Label13.AutoSize = True Me.Label13.Location = New System.Drawing.Point(552, 293) Me.Label13.Name = "Label13" - Me.Label13.Size = New System.Drawing.Size(42, 13) + Me.Label13.Size = New System.Drawing.Size(40, 13) Me.Label13.TabIndex = 96 Me.Label13.Text = "ATA-Nr" Me.Label13.Visible = False @@ -3250,7 +3185,7 @@ Partial Class frmSendungsdetailsNEU Me.txtFrachtfuehrer.Name = "txtFrachtfuehrer" Me.txtFrachtfuehrer.nurAktive = False Me.txtFrachtfuehrer.searchActive = True - Me.txtFrachtfuehrer.Size = New System.Drawing.Size(245, 20) + Me.txtFrachtfuehrer.Size = New System.Drawing.Size(245, 22) Me.txtFrachtfuehrer.TabIndex = 75 Me.txtFrachtfuehrer.TIMER_SEARCH = True Me.txtFrachtfuehrer.usrcntl = Nothing @@ -3521,7 +3456,7 @@ Partial Class frmSendungsdetailsNEU Me.txtKdAuftragsNrFrachtfuehrer.MaxLines_Warning = "" Me.txtKdAuftragsNrFrachtfuehrer.MaxLines_Warning_Label = Nothing Me.txtKdAuftragsNrFrachtfuehrer.Name = "txtKdAuftragsNrFrachtfuehrer" - Me.txtKdAuftragsNrFrachtfuehrer.Size = New System.Drawing.Size(90, 20) + Me.txtKdAuftragsNrFrachtfuehrer.Size = New System.Drawing.Size(90, 22) Me.txtKdAuftragsNrFrachtfuehrer.TabIndex = 77 ' 'txtKdAuftragsNrEmpfaenger @@ -3545,7 +3480,7 @@ Partial Class frmSendungsdetailsNEU Me.txtKdAuftragsNrEmpfaenger.MaxLines_Warning = "" Me.txtKdAuftragsNrEmpfaenger.MaxLines_Warning_Label = Nothing Me.txtKdAuftragsNrEmpfaenger.Name = "txtKdAuftragsNrEmpfaenger" - Me.txtKdAuftragsNrEmpfaenger.Size = New System.Drawing.Size(90, 20) + Me.txtKdAuftragsNrEmpfaenger.Size = New System.Drawing.Size(90, 22) Me.txtKdAuftragsNrEmpfaenger.TabIndex = 48 ' 'txtKdAuftragsNrAvisierer @@ -3571,7 +3506,7 @@ Partial Class frmSendungsdetailsNEU Me.txtKdAuftragsNrAvisierer.MaxLines_Warning = "" Me.txtKdAuftragsNrAvisierer.MaxLines_Warning_Label = Nothing Me.txtKdAuftragsNrAvisierer.Name = "txtKdAuftragsNrAvisierer" - Me.txtKdAuftragsNrAvisierer.Size = New System.Drawing.Size(90, 20) + Me.txtKdAuftragsNrAvisierer.Size = New System.Drawing.Size(90, 22) Me.txtKdAuftragsNrAvisierer.TabIndex = 16 ' 'cntxt @@ -3673,9 +3608,10 @@ Partial Class frmSendungsdetailsNEU ' 'Button4 ' - Me.Button4.BackColor = System.Drawing.Color.Transparent + Me.Button4.BackColor = System.Drawing.Color.Silver Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.Button4.FlatAppearance.BorderSize = 0 Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button4.Location = New System.Drawing.Point(696, 167) Me.Button4.Name = "Button4" @@ -3687,9 +3623,10 @@ Partial Class frmSendungsdetailsNEU ' 'Button1 ' - Me.Button1.BackColor = System.Drawing.Color.Transparent + Me.Button1.BackColor = System.Drawing.Color.Silver Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.FlatAppearance.BorderColor = System.Drawing.Color.Black + Me.Button1.FlatAppearance.BorderSize = 0 Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button1.Location = New System.Drawing.Point(658, 167) Me.Button1.Name = "Button1" @@ -4101,7 +4038,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAvisierer.Name = "txtAvisierer" Me.txtAvisierer.nurAktive = False Me.txtAvisierer.searchActive = True - Me.txtAvisierer.Size = New System.Drawing.Size(245, 20) + Me.txtAvisierer.Size = New System.Drawing.Size(245, 22) Me.txtAvisierer.TabIndex = 14 Me.txtAvisierer.TIMER_SEARCH = True Me.txtAvisierer.usrcntl = Nothing @@ -4131,7 +4068,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAuftraggeber.Name = "txtAuftraggeber" Me.txtAuftraggeber.nurAktive = False Me.txtAuftraggeber.searchActive = True - Me.txtAuftraggeber.Size = New System.Drawing.Size(245, 20) + Me.txtAuftraggeber.Size = New System.Drawing.Size(245, 22) Me.txtAuftraggeber.TabIndex = 28 Me.txtAuftraggeber.TIMER_SEARCH = True Me.txtAuftraggeber.usrcntl = Nothing @@ -4185,7 +4122,7 @@ Partial Class frmSendungsdetailsNEU Me.txtFrachtfuehrerKdNr.MaxLines_Warning_Label = Nothing Me.txtFrachtfuehrerKdNr.Name = "txtFrachtfuehrerKdNr" Me.txtFrachtfuehrerKdNr.ReadOnly = True - Me.txtFrachtfuehrerKdNr.Size = New System.Drawing.Size(101, 13) + Me.txtFrachtfuehrerKdNr.Size = New System.Drawing.Size(101, 15) Me.txtFrachtfuehrerKdNr.TabIndex = 70 Me.txtFrachtfuehrerKdNr.TabStop = False ' @@ -4232,7 +4169,7 @@ Partial Class frmSendungsdetailsNEU Me.lblEmpfAufschubEust.Name = "lblEmpfAufschubEust" Me.lblEmpfAufschubEust.ReadOnly = True Me.lblEmpfAufschubEust.RightToLeft = System.Windows.Forms.RightToLeft.No - Me.lblEmpfAufschubEust.Size = New System.Drawing.Size(69, 13) + Me.lblEmpfAufschubEust.Size = New System.Drawing.Size(69, 15) Me.lblEmpfAufschubEust.TabIndex = 55 Me.lblEmpfAufschubEust.TabStop = False Me.lblEmpfAufschubEust.TextAlign = System.Windows.Forms.HorizontalAlignment.Right @@ -4309,7 +4246,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAbsenderKdNr.MaxLines_Warning_Label = Nothing Me.txtAbsenderKdNr.Name = "txtAbsenderKdNr" Me.txtAbsenderKdNr.ReadOnly = True - Me.txtAbsenderKdNr.Size = New System.Drawing.Size(101, 13) + Me.txtAbsenderKdNr.Size = New System.Drawing.Size(101, 15) Me.txtAbsenderKdNr.TabIndex = 57 Me.txtAbsenderKdNr.TabStop = False ' @@ -4347,7 +4284,7 @@ Partial Class frmSendungsdetailsNEU Me.MyTextBox1.MaxLines_Warning_Label = Nothing Me.MyTextBox1.Name = "MyTextBox1" Me.MyTextBox1.ReadOnly = True - Me.MyTextBox1.Size = New System.Drawing.Size(100, 13) + Me.MyTextBox1.Size = New System.Drawing.Size(100, 15) Me.MyTextBox1.TabIndex = 11 Me.MyTextBox1.TabStop = False Me.MyTextBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Right @@ -4397,7 +4334,7 @@ Partial Class frmSendungsdetailsNEU Me.txtEmpfaengerKdNr.MaxLines_Warning_Label = Nothing Me.txtEmpfaengerKdNr.Name = "txtEmpfaengerKdNr" Me.txtEmpfaengerKdNr.ReadOnly = True - Me.txtEmpfaengerKdNr.Size = New System.Drawing.Size(99, 13) + Me.txtEmpfaengerKdNr.Size = New System.Drawing.Size(99, 15) Me.txtEmpfaengerKdNr.TabIndex = 41 Me.txtEmpfaengerKdNr.TabStop = False ' @@ -4426,7 +4363,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAbsender.Name = "txtAbsender" Me.txtAbsender.nurAktive = False Me.txtAbsender.searchActive = True - Me.txtAbsender.Size = New System.Drawing.Size(245, 20) + Me.txtAbsender.Size = New System.Drawing.Size(245, 22) Me.txtAbsender.TabIndex = 61 Me.txtAbsender.TIMER_SEARCH = True Me.txtAbsender.usrcntl = Nothing @@ -4455,7 +4392,7 @@ Partial Class frmSendungsdetailsNEU Me.txtEmpfaenger.Name = "txtEmpfaenger" Me.txtEmpfaenger.nurAktive = False Me.txtEmpfaenger.searchActive = True - Me.txtEmpfaenger.Size = New System.Drawing.Size(245, 20) + Me.txtEmpfaenger.Size = New System.Drawing.Size(245, 22) Me.txtEmpfaenger.TabIndex = 45 Me.txtEmpfaenger.TIMER_SEARCH = True Me.txtEmpfaenger.usrcntl = Nothing @@ -4507,7 +4444,7 @@ Partial Class frmSendungsdetailsNEU Me.lblAtrAufschubEust.Name = "lblAtrAufschubEust" Me.lblAtrAufschubEust.ReadOnly = True Me.lblAtrAufschubEust.RightToLeft = System.Windows.Forms.RightToLeft.No - Me.lblAtrAufschubEust.Size = New System.Drawing.Size(69, 13) + Me.lblAtrAufschubEust.Size = New System.Drawing.Size(69, 15) Me.lblAtrAufschubEust.TabIndex = 38 Me.lblAtrAufschubEust.TabStop = False Me.lblAtrAufschubEust.TextAlign = System.Windows.Forms.HorizontalAlignment.Right @@ -4565,7 +4502,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAuftraggeberKdNr.MaxLines_Warning_Label = Nothing Me.txtAuftraggeberKdNr.Name = "txtAuftraggeberKdNr" Me.txtAuftraggeberKdNr.ReadOnly = True - Me.txtAuftraggeberKdNr.Size = New System.Drawing.Size(100, 13) + Me.txtAuftraggeberKdNr.Size = New System.Drawing.Size(100, 15) Me.txtAuftraggeberKdNr.TabIndex = 23 Me.txtAuftraggeberKdNr.TabStop = False ' @@ -4684,7 +4621,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAvisiererKdNr.MaxLines_Warning_Label = Nothing Me.txtAvisiererKdNr.Name = "txtAvisiererKdNr" Me.txtAvisiererKdNr.ReadOnly = True - Me.txtAvisiererKdNr.Size = New System.Drawing.Size(100, 13) + Me.txtAvisiererKdNr.Size = New System.Drawing.Size(100, 15) Me.txtAvisiererKdNr.TabIndex = 9 Me.txtAvisiererKdNr.TabStop = False ' @@ -4709,7 +4646,7 @@ Partial Class frmSendungsdetailsNEU Me.txtKdAuftragsNr.MaxLines_Warning = "" Me.txtKdAuftragsNr.MaxLines_Warning_Label = Nothing Me.txtKdAuftragsNr.Name = "txtKdAuftragsNr" - Me.txtKdAuftragsNr.Size = New System.Drawing.Size(90, 20) + Me.txtKdAuftragsNr.Size = New System.Drawing.Size(90, 22) Me.txtKdAuftragsNr.TabIndex = 31 ' 'LinkLabel4 @@ -4728,8 +4665,11 @@ Partial Class frmSendungsdetailsNEU ' Me.Panel5.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Panel5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel5.Controls.Add(Me.pnlStatus) + Me.Panel5.Controls.Add(Me.lblStatusOptionen) + Me.Panel5.Controls.Add(Me.flpnlStatus) + Me.Panel5.Controls.Add(Me.pnlSND_Zuteilung) Me.Panel5.Controls.Add(Me.lblAbfArtLand) - Me.Panel5.Controls.Add(Me.pnlValidation) Me.Panel5.Controls.Add(Me.cboAbfertigungsLand) Me.Panel5.Controls.Add(Me.lblSNDChat_MsgCnt) Me.Panel5.Controls.Add(Me.picAVISOMessengerSNDChat) @@ -4738,7 +4678,6 @@ Partial Class frmSendungsdetailsNEU Me.Panel5.Controls.Add(Me.lblAbfNrExists) Me.Panel5.Controls.Add(Me.cbxFremdspedition) Me.Panel5.Controls.Add(Me.lblAbfNr_Err) - Me.Panel5.Controls.Add(Me.Panel1) Me.Panel5.Controls.Add(Me.cboAbfertigungsart) Me.Panel5.Controls.Add(Me.lblAbfertigungsart) Me.Panel5.Controls.Add(Me.pnlFremd) @@ -4755,9 +4694,206 @@ Partial Class frmSendungsdetailsNEU Me.Panel5.Dock = System.Windows.Forms.DockStyle.Top Me.Panel5.Location = New System.Drawing.Point(0, 0) Me.Panel5.Name = "Panel5" - Me.Panel5.Size = New System.Drawing.Size(1214, 69) + Me.Panel5.Size = New System.Drawing.Size(1235, 69) Me.Panel5.TabIndex = 0 ' + 'pnlStatus + ' + Me.pnlStatus.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.pnlStatus.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer)) + Me.pnlStatus.Controls.Add(Me.lblStatus) + Me.pnlStatus.Location = New System.Drawing.Point(984, 0) + Me.pnlStatus.Name = "pnlStatus" + Me.pnlStatus.Size = New System.Drawing.Size(138, 24) + Me.pnlStatus.TabIndex = 119 + ' + 'lblStatus + ' + Me.lblStatus.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblStatus.BackColor = System.Drawing.Color.Transparent + Me.lblStatus.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold) + Me.lblStatus.ForeColor = System.Drawing.Color.White + Me.lblStatus.Location = New System.Drawing.Point(0, 0) + Me.lblStatus.Margin = New System.Windows.Forms.Padding(0) + Me.lblStatus.Name = "lblStatus" + Me.lblStatus.Size = New System.Drawing.Size(135, 24) + Me.lblStatus.TabIndex = 1 + Me.lblStatus.Text = "Nicht Eingetroffen" + Me.lblStatus.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lblStatusOptionen + ' + Me.lblStatusOptionen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblStatusOptionen.AutoSize = True + Me.lblStatusOptionen.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblStatusOptionen.ForeColor = System.Drawing.Color.White + Me.lblStatusOptionen.Location = New System.Drawing.Point(870, 5) + Me.lblStatusOptionen.Name = "lblStatusOptionen" + Me.lblStatusOptionen.Size = New System.Drawing.Size(114, 17) + Me.lblStatusOptionen.TabIndex = 118 + Me.lblStatusOptionen.Text = "Status/Optionen:" + ' + 'flpnlStatus + ' + Me.flpnlStatus.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.flpnlStatus.AutoScroll = True + Me.flpnlStatus.Controls.Add(Me.btnStatusAbklaerungTR) + Me.flpnlStatus.Controls.Add(Me.btnStatusVorbereitetQS) + Me.flpnlStatus.Controls.Add(Me.btnStatusVorgeschrieben) + Me.flpnlStatus.Controls.Add(Me.btnStatusAbfertigungTR) + Me.flpnlStatus.Controls.Add(Me.btnSpeditionsbuchEintragen) + Me.flpnlStatus.Controls.Add(Me.btnSendungFakturiert) + Me.flpnlStatus.Controls.Add(Me.btnStatusAbgeschlossen) + Me.flpnlStatus.Location = New System.Drawing.Point(873, 25) + Me.flpnlStatus.Margin = New System.Windows.Forms.Padding(2) + Me.flpnlStatus.Name = "flpnlStatus" + Me.flpnlStatus.Size = New System.Drawing.Size(245, 40) + Me.flpnlStatus.TabIndex = 117 + ' + 'btnStatusAbklaerungTR + ' + Me.btnStatusAbklaerungTR.BackgroundImage = Global.AVISO.My.Resources.Resources.abfetigungTR_aktiv + Me.btnStatusAbklaerungTR.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnStatusAbklaerungTR.Location = New System.Drawing.Point(2, 2) + Me.btnStatusAbklaerungTR.Margin = New System.Windows.Forms.Padding(2) + Me.btnStatusAbklaerungTR.Name = "btnStatusAbklaerungTR" + Me.btnStatusAbklaerungTR.Size = New System.Drawing.Size(30, 30) + Me.btnStatusAbklaerungTR.TabIndex = 69 + Me.btnStatusAbklaerungTR.UseVisualStyleBackColor = True + Me.btnStatusAbklaerungTR.Visible = False + ' + 'btnStatusVorbereitetQS + ' + Me.btnStatusVorbereitetQS.BackgroundImage = Global.AVISO.My.Resources.Resources.statusBtn_vorbereitet_Aktiv + Me.btnStatusVorbereitetQS.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnStatusVorbereitetQS.Location = New System.Drawing.Point(36, 2) + Me.btnStatusVorbereitetQS.Margin = New System.Windows.Forms.Padding(2) + Me.btnStatusVorbereitetQS.Name = "btnStatusVorbereitetQS" + Me.btnStatusVorbereitetQS.Size = New System.Drawing.Size(30, 30) + Me.btnStatusVorbereitetQS.TabIndex = 66 + Me.btnStatusVorbereitetQS.UseVisualStyleBackColor = True + Me.btnStatusVorbereitetQS.Visible = False + ' + 'btnStatusVorgeschrieben + ' + Me.btnStatusVorgeschrieben.BackgroundImage = Global.AVISO.My.Resources.Resources.statusBtn_vorgeschrieben_Aktiv + Me.btnStatusVorgeschrieben.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnStatusVorgeschrieben.Location = New System.Drawing.Point(70, 2) + Me.btnStatusVorgeschrieben.Margin = New System.Windows.Forms.Padding(2) + Me.btnStatusVorgeschrieben.Name = "btnStatusVorgeschrieben" + Me.btnStatusVorgeschrieben.Size = New System.Drawing.Size(30, 30) + Me.btnStatusVorgeschrieben.TabIndex = 67 + Me.btnStatusVorgeschrieben.UseVisualStyleBackColor = True + Me.btnStatusVorgeschrieben.Visible = False + ' + 'btnStatusAbfertigungTR + ' + Me.btnStatusAbfertigungTR.BackgroundImage = Global.AVISO.My.Resources.Resources.abklaerungTR_Aktiv + Me.btnStatusAbfertigungTR.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnStatusAbfertigungTR.Location = New System.Drawing.Point(104, 2) + Me.btnStatusAbfertigungTR.Margin = New System.Windows.Forms.Padding(2) + Me.btnStatusAbfertigungTR.Name = "btnStatusAbfertigungTR" + Me.btnStatusAbfertigungTR.Size = New System.Drawing.Size(30, 30) + Me.btnStatusAbfertigungTR.TabIndex = 71 + Me.btnStatusAbfertigungTR.UseVisualStyleBackColor = True + Me.btnStatusAbfertigungTR.Visible = False + ' + 'btnSpeditionsbuchEintragen + ' + Me.btnSpeditionsbuchEintragen.BackgroundImage = Global.AVISO.My.Resources.Resources.speditionsbuchAktiv + Me.btnSpeditionsbuchEintragen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnSpeditionsbuchEintragen.Location = New System.Drawing.Point(138, 2) + Me.btnSpeditionsbuchEintragen.Margin = New System.Windows.Forms.Padding(2) + Me.btnSpeditionsbuchEintragen.Name = "btnSpeditionsbuchEintragen" + Me.btnSpeditionsbuchEintragen.Size = New System.Drawing.Size(30, 30) + Me.btnSpeditionsbuchEintragen.TabIndex = 68 + Me.btnSpeditionsbuchEintragen.UseVisualStyleBackColor = True + Me.btnSpeditionsbuchEintragen.Visible = False + ' + 'btnSendungFakturiert + ' + Me.btnSendungFakturiert.BackgroundImage = Global.AVISO.My.Resources.Resources.fakturiertAktiv + Me.btnSendungFakturiert.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnSendungFakturiert.Location = New System.Drawing.Point(172, 2) + Me.btnSendungFakturiert.Margin = New System.Windows.Forms.Padding(2) + Me.btnSendungFakturiert.Name = "btnSendungFakturiert" + Me.btnSendungFakturiert.Size = New System.Drawing.Size(30, 30) + Me.btnSendungFakturiert.TabIndex = 70 + Me.btnSendungFakturiert.UseVisualStyleBackColor = True + Me.btnSendungFakturiert.Visible = False + ' + 'btnStatusAbgeschlossen + ' + Me.btnStatusAbgeschlossen.BackgroundImage = Global.AVISO.My.Resources.Resources.ok + Me.btnStatusAbgeschlossen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.btnStatusAbgeschlossen.Location = New System.Drawing.Point(206, 2) + Me.btnStatusAbgeschlossen.Margin = New System.Windows.Forms.Padding(2) + Me.btnStatusAbgeschlossen.Name = "btnStatusAbgeschlossen" + Me.btnStatusAbgeschlossen.Size = New System.Drawing.Size(30, 30) + Me.btnStatusAbgeschlossen.TabIndex = 72 + Me.btnStatusAbgeschlossen.UseVisualStyleBackColor = True + Me.btnStatusAbgeschlossen.Visible = False + ' + 'pnlSND_Zuteilung + ' + Me.pnlSND_Zuteilung.BackColor = System.Drawing.Color.OldLace + Me.pnlSND_Zuteilung.Controls.Add(Me.btnSND_Zuteilg) + Me.pnlSND_Zuteilung.Controls.Add(Me.picSND_Zuteilg) + Me.pnlSND_Zuteilung.Controls.Add(Me.lblSND_ZuteilgAvisoId) + Me.pnlSND_Zuteilung.Controls.Add(Me.lblSND_Zuteilg) + Me.pnlSND_Zuteilung.Dock = System.Windows.Forms.DockStyle.Right + Me.pnlSND_Zuteilung.Location = New System.Drawing.Point(1122, 0) + Me.pnlSND_Zuteilung.Name = "pnlSND_Zuteilung" + Me.pnlSND_Zuteilung.Size = New System.Drawing.Size(111, 67) + Me.pnlSND_Zuteilung.TabIndex = 116 + Me.pnlSND_Zuteilung.TabStop = True + ' + 'btnSND_Zuteilg + ' + Me.btnSND_Zuteilg.BackColor = System.Drawing.Color.FloralWhite + Me.btnSND_Zuteilg.Location = New System.Drawing.Point(2, 45) + Me.btnSND_Zuteilg.Margin = New System.Windows.Forms.Padding(0) + Me.btnSND_Zuteilg.Name = "btnSND_Zuteilg" + Me.btnSND_Zuteilg.Size = New System.Drawing.Size(109, 21) + Me.btnSND_Zuteilg.TabIndex = 66 + Me.btnSND_Zuteilg.Text = "Von LKW lösen" + Me.btnSND_Zuteilg.UseVisualStyleBackColor = False + ' + 'picSND_Zuteilg + ' + Me.picSND_Zuteilg.BackColor = System.Drawing.Color.Transparent + Me.picSND_Zuteilg.BackgroundImage = Global.AVISO.My.Resources.Resources.SND_verbinden + Me.picSND_Zuteilg.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.picSND_Zuteilg.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) + Me.picSND_Zuteilg.Location = New System.Drawing.Point(78, 12) + Me.picSND_Zuteilg.Name = "picSND_Zuteilg" + Me.picSND_Zuteilg.Padding = New System.Windows.Forms.Padding(0, 25, 0, 0) + Me.picSND_Zuteilg.Size = New System.Drawing.Size(30, 30) + Me.picSND_Zuteilg.TabIndex = 3 + Me.picSND_Zuteilg.TabStop = False + ' + 'lblSND_ZuteilgAvisoId + ' + Me.lblSND_ZuteilgAvisoId.BackColor = System.Drawing.Color.Transparent + Me.lblSND_ZuteilgAvisoId.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold) + Me.lblSND_ZuteilgAvisoId.Location = New System.Drawing.Point(3, 18) + Me.lblSND_ZuteilgAvisoId.Name = "lblSND_ZuteilgAvisoId" + Me.lblSND_ZuteilgAvisoId.Size = New System.Drawing.Size(65, 27) + Me.lblSND_ZuteilgAvisoId.TabIndex = 3 + Me.lblSND_ZuteilgAvisoId.Text = "1522109" + Me.lblSND_ZuteilgAvisoId.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.lblSND_ZuteilgAvisoId.UseCompatibleTextRendering = True + ' + 'lblSND_Zuteilg + ' + Me.lblSND_Zuteilg.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblSND_Zuteilg.Location = New System.Drawing.Point(2, 3) + Me.lblSND_Zuteilg.Name = "lblSND_Zuteilg" + Me.lblSND_Zuteilg.Size = New System.Drawing.Size(76, 13) + Me.lblSND_Zuteilg.TabIndex = 2 + Me.lblSND_Zuteilg.Text = "LKW zugeteilt:" + ' 'lblAbfArtLand ' Me.lblAbfArtLand.AutoSize = True @@ -4770,47 +4906,6 @@ Partial Class frmSendungsdetailsNEU Me.lblAbfArtLand.Text = "Abfertigungsart/-land angeben!" Me.lblAbfArtLand.Visible = False ' - 'pnlValidation - ' - Me.pnlValidation.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.pnlValidation.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.pnlValidation.Controls.Add(Me.rtbValidierung) - Me.pnlValidation.Controls.Add(Me.Label15) - Me.pnlValidation.Location = New System.Drawing.Point(884, 0) - Me.pnlValidation.Name = "pnlValidation" - Me.pnlValidation.Size = New System.Drawing.Size(217, 68) - Me.pnlValidation.TabIndex = 16 - Me.pnlValidation.TabStop = True - Me.pnlValidation.Visible = False - ' - 'rtbValidierung - ' - Me.rtbValidierung.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.rtbValidierung.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.rtbValidierung.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.rtbValidierung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.rtbValidierung.Location = New System.Drawing.Point(0, 14) - Me.rtbValidierung.MaxLineLength = -1 - Me.rtbValidierung.MaxLines_Warning = "" - Me.rtbValidierung.MaxLines_Warning_Label = Nothing - Me.rtbValidierung.Name = "rtbValidierung" - Me.rtbValidierung.Size = New System.Drawing.Size(217, 51) - Me.rtbValidierung.TabIndex = 3 - Me.rtbValidierung.Text = "" - ' - 'Label15 - ' - Me.Label15.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ - Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label15.Location = New System.Drawing.Point(0, 0) - Me.Label15.Name = "Label15" - Me.Label15.Size = New System.Drawing.Size(217, 26) - Me.Label15.TabIndex = 2 - Me.Label15.Text = "Validierungsfehler:" - ' 'cboAbfertigungsLand ' Me.cboAbfertigungsLand._allowedValuesFreiText = Nothing @@ -4832,7 +4927,7 @@ Partial Class frmSendungsdetailsNEU Me.lblSNDChat_MsgCnt.BackColor = System.Drawing.Color.Red Me.lblSNDChat_MsgCnt.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Bold) Me.lblSNDChat_MsgCnt.ForeColor = System.Drawing.Color.White - Me.lblSNDChat_MsgCnt.Location = New System.Drawing.Point(856, 43) + Me.lblSNDChat_MsgCnt.Location = New System.Drawing.Point(847, 43) Me.lblSNDChat_MsgCnt.Name = "lblSNDChat_MsgCnt" Me.lblSNDChat_MsgCnt.Size = New System.Drawing.Size(22, 13) Me.lblSNDChat_MsgCnt.TabIndex = 113 @@ -4846,7 +4941,7 @@ Partial Class frmSendungsdetailsNEU Me.picAVISOMessengerSNDChat.BackgroundImage = Global.AVISO.My.Resources.Resources.aviso_messenger Me.picAVISOMessengerSNDChat.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.picAVISOMessengerSNDChat.Cursor = System.Windows.Forms.Cursors.Hand - Me.picAVISOMessengerSNDChat.Location = New System.Drawing.Point(823, 9) + Me.picAVISOMessengerSNDChat.Location = New System.Drawing.Point(814, 9) Me.picAVISOMessengerSNDChat.Name = "picAVISOMessengerSNDChat" Me.picAVISOMessengerSNDChat.Size = New System.Drawing.Size(42, 44) Me.picAVISOMessengerSNDChat.TabIndex = 112 @@ -4868,7 +4963,7 @@ Partial Class frmSendungsdetailsNEU Me.txtAnzahlPos._Waehrung = False Me.txtAnzahlPos._WaehrungZeichen = True Me.txtAnzahlPos.Font = New System.Drawing.Font("Microsoft Tai Le", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtAnzahlPos.Location = New System.Drawing.Point(756, 27) + Me.txtAnzahlPos.Location = New System.Drawing.Point(752, 27) Me.txtAnzahlPos.MaxLength = 3 Me.txtAnzahlPos.MaxLineLength = -1 Me.txtAnzahlPos.MaxLines_Warning = "" @@ -4883,7 +4978,7 @@ Partial Class frmSendungsdetailsNEU Me.Label4.AutoSize = True Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label4.ForeColor = System.Drawing.Color.White - Me.Label4.Location = New System.Drawing.Point(753, 6) + Me.Label4.Location = New System.Drawing.Point(748, 6) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(64, 17) Me.Label4.TabIndex = 5 @@ -4909,7 +5004,7 @@ Partial Class frmSendungsdetailsNEU Me.cbxFremdspedition.ForeColor = System.Drawing.Color.White Me.cbxFremdspedition.Location = New System.Drawing.Point(593, 7) Me.cbxFremdspedition.Name = "cbxFremdspedition" - Me.cbxFremdspedition.Size = New System.Drawing.Size(97, 17) + Me.cbxFremdspedition.Size = New System.Drawing.Size(107, 17) Me.cbxFremdspedition.TabIndex = 7 Me.cbxFremdspedition.Text = "Fremdspedition" Me.cbxFremdspedition.UseVisualStyleBackColor = False @@ -4926,61 +5021,6 @@ Partial Class frmSendungsdetailsNEU Me.lblAbfNr_Err.Text = "Abfertigungsnummer im falschen Format!" Me.lblAbfNr_Err.Visible = False ' - 'Panel1 - ' - Me.Panel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) - Me.Panel1.Controls.Add(Me.Button13) - Me.Panel1.Controls.Add(Me.lblSendungen) - Me.Panel1.Controls.Add(Me.Label3) - Me.Panel1.Location = New System.Drawing.Point(1102, -1) - Me.Panel1.Name = "Panel1" - Me.Panel1.Size = New System.Drawing.Size(105, 68) - Me.Panel1.TabIndex = 15 - Me.Panel1.TabStop = True - ' - 'Button13 - ' - Me.Button13.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button13.BackColor = System.Drawing.Color.Transparent - Me.Button13.BackgroundImage = Global.AVISO.My.Resources.Resources.gear2 - Me.Button13.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button13.FlatAppearance.BorderSize = 0 - Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button13.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) - Me.Button13.Location = New System.Drawing.Point(85, 0) - Me.Button13.Name = "Button13" - Me.Button13.Padding = New System.Windows.Forms.Padding(0, 25, 0, 0) - Me.Button13.Size = New System.Drawing.Size(20, 20) - Me.Button13.TabIndex = 0 - Me.Button13.TextAlign = System.Drawing.ContentAlignment.BottomCenter - Me.Button13.UseVisualStyleBackColor = False - ' - 'lblSendungen - ' - Me.lblSendungen.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ - Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblSendungen.Location = New System.Drawing.Point(0, 6) - Me.lblSendungen.Name = "lblSendungen" - Me.lblSendungen.Size = New System.Drawing.Size(105, 44) - Me.lblSendungen.TabIndex = 1 - Me.lblSendungen.Text = "1/10" - Me.lblSendungen.TextAlign = System.Drawing.ContentAlignment.MiddleCenter - ' - 'Label3 - ' - Me.Label3.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ - Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Label3.Location = New System.Drawing.Point(0, 50) - Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(105, 26) - Me.Label3.TabIndex = 2 - Me.Label3.Text = "Sendung Pos." - Me.Label3.TextAlign = System.Drawing.ContentAlignment.TopCenter - ' 'cboAbfertigungsart ' Me.cboAbfertigungsart._allowedValuesFreiText = Nothing @@ -5053,7 +5093,7 @@ Partial Class frmSendungsdetailsNEU Me.txtFremdEmpfKdNR.MaxLines_Warning_Label = Nothing Me.txtFremdEmpfKdNR.Name = "txtFremdEmpfKdNR" Me.txtFremdEmpfKdNR.ReadOnly = True - Me.txtFremdEmpfKdNR.Size = New System.Drawing.Size(100, 13) + Me.txtFremdEmpfKdNR.Size = New System.Drawing.Size(100, 15) Me.txtFremdEmpfKdNR.TabIndex = 2 Me.txtFremdEmpfKdNR.TabStop = False Me.txtFremdEmpfKdNR.TextAlign = System.Windows.Forms.HorizontalAlignment.Right @@ -5272,24 +5312,25 @@ Partial Class frmSendungsdetailsNEU Me.Panel2.AutoSize = True Me.Panel2.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.Panel2.Controls.Add(Me.FlowLayoutPanel) + Me.Panel2.Controls.Add(Me.Panel1) Me.Panel2.Controls.Add(Me.pnlheader) Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top Me.Panel2.Location = New System.Drawing.Point(0, 0) Me.Panel2.MaximumSize = New System.Drawing.Size(0, 510) Me.Panel2.Name = "Panel2" - Me.Panel2.Size = New System.Drawing.Size(1214, 55) + Me.Panel2.Size = New System.Drawing.Size(1235, 55) Me.Panel2.TabIndex = 0 ' 'FlowLayoutPanel ' Me.FlowLayoutPanel.AutoSize = True Me.FlowLayoutPanel.Controls.Add(Me.FlatButton2) - Me.FlowLayoutPanel.Dock = System.Windows.Forms.DockStyle.Top + Me.FlowLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill Me.FlowLayoutPanel.Location = New System.Drawing.Point(0, 0) Me.FlowLayoutPanel.MaximumSize = New System.Drawing.Size(0, 550) - Me.FlowLayoutPanel.MinimumSize = New System.Drawing.Size(0, 53) + Me.FlowLayoutPanel.MinimumSize = New System.Drawing.Size(0, 55) Me.FlowLayoutPanel.Name = "FlowLayoutPanel" - Me.FlowLayoutPanel.Size = New System.Drawing.Size(1214, 55) + Me.FlowLayoutPanel.Size = New System.Drawing.Size(1123, 55) Me.FlowLayoutPanel.TabIndex = 0 ' 'FlatButton2 @@ -5306,13 +5347,68 @@ Partial Class frmSendungsdetailsNEU Me.FlatButton2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.FlatButton2.UseVisualStyleBackColor = True ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Panel1.Controls.Add(Me.Button13) + Me.Panel1.Controls.Add(Me.lblSendungen) + Me.Panel1.Controls.Add(Me.Label3) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Right + Me.Panel1.Location = New System.Drawing.Point(1123, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(112, 55) + Me.Panel1.TabIndex = 15 + Me.Panel1.TabStop = True + ' + 'Button13 + ' + Me.Button13.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button13.BackColor = System.Drawing.Color.Transparent + Me.Button13.BackgroundImage = Global.AVISO.My.Resources.Resources.gear2 + Me.Button13.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.Button13.FlatAppearance.BorderSize = 0 + Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button13.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!) + Me.Button13.Location = New System.Drawing.Point(92, 0) + Me.Button13.Name = "Button13" + Me.Button13.Padding = New System.Windows.Forms.Padding(0, 25, 0, 0) + Me.Button13.Size = New System.Drawing.Size(20, 20) + Me.Button13.TabIndex = 0 + Me.Button13.TextAlign = System.Drawing.ContentAlignment.BottomCenter + Me.Button13.UseVisualStyleBackColor = False + ' + 'lblSendungen + ' + Me.lblSendungen.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblSendungen.Location = New System.Drawing.Point(0, 3) + Me.lblSendungen.Name = "lblSendungen" + Me.lblSendungen.Size = New System.Drawing.Size(112, 31) + Me.lblSendungen.TabIndex = 1 + Me.lblSendungen.Text = "1/10" + Me.lblSendungen.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'Label3 + ' + Me.Label3.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Label3.Location = New System.Drawing.Point(0, 38) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(112, 13) + Me.Label3.TabIndex = 2 + Me.Label3.Text = "Sendung Pos." + Me.Label3.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' 'pnlheader ' Me.pnlheader.Controls.Add(Me.Label2) Me.pnlheader.Dock = System.Windows.Forms.DockStyle.Top Me.pnlheader.Location = New System.Drawing.Point(0, 0) Me.pnlheader.Name = "pnlheader" - Me.pnlheader.Size = New System.Drawing.Size(1214, 0) + Me.pnlheader.Size = New System.Drawing.Size(1235, 0) Me.pnlheader.TabIndex = 1 Me.pnlheader.Visible = False ' @@ -5328,6 +5424,7 @@ Partial Class frmSendungsdetailsNEU ' 'Panel7 ' + Me.Panel7.Controls.Add(Me.pnlValidation) Me.Panel7.Controls.Add(Me.btnLKWUmmelden) Me.Panel7.Controls.Add(Me.Button24) Me.Panel7.Controls.Add(Me.cboVorpapier3) @@ -5342,24 +5439,62 @@ Partial Class frmSendungsdetailsNEU Me.Panel7.Controls.Add(Me.lblGrenzeSnd) Me.Panel7.Controls.Add(Me.Panel3) Me.Panel7.Controls.Add(Me.Panel9) - Me.Panel7.Controls.Add(Me.btnSpedBuch) - Me.Panel7.Controls.Add(Me.cbxSpedBuch) Me.Panel7.Dock = System.Windows.Forms.DockStyle.Bottom - Me.Panel7.Location = New System.Drawing.Point(0, 776) + Me.Panel7.Location = New System.Drawing.Point(0, 796) Me.Panel7.MinimumSize = New System.Drawing.Size(0, 51) Me.Panel7.Name = "Panel7" - Me.Panel7.Size = New System.Drawing.Size(1214, 87) + Me.Panel7.Size = New System.Drawing.Size(1235, 87) Me.Panel7.TabIndex = 3 ' + 'pnlValidation + ' + Me.pnlValidation.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.pnlValidation.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.pnlValidation.Controls.Add(Me.rtbValidierung) + Me.pnlValidation.Controls.Add(Me.Label15) + Me.pnlValidation.Location = New System.Drawing.Point(775, 1) + Me.pnlValidation.Name = "pnlValidation" + Me.pnlValidation.Size = New System.Drawing.Size(165, 83) + Me.pnlValidation.TabIndex = 16 + Me.pnlValidation.TabStop = True + Me.pnlValidation.Visible = False + ' + 'rtbValidierung + ' + Me.rtbValidierung.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.rtbValidierung.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.rtbValidierung.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.rtbValidierung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.rtbValidierung.Location = New System.Drawing.Point(0, 14) + Me.rtbValidierung.MaxLineLength = -1 + Me.rtbValidierung.MaxLines_Warning = "" + Me.rtbValidierung.MaxLines_Warning_Label = Nothing + Me.rtbValidierung.Name = "rtbValidierung" + Me.rtbValidierung.Size = New System.Drawing.Size(165, 69) + Me.rtbValidierung.TabIndex = 3 + Me.rtbValidierung.Text = "" + ' + 'Label15 + ' + Me.Label15.AutoSize = True + Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label15.Location = New System.Drawing.Point(0, 0) + Me.Label15.Name = "Label15" + Me.Label15.Size = New System.Drawing.Size(93, 13) + Me.Label15.TabIndex = 2 + Me.Label15.Text = "Validierungsfehler:" + ' 'btnLKWUmmelden ' - Me.btnLKWUmmelden.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnLKWUmmelden.Image = Global.AVISO.My.Resources.Resources.lorry_ummelden Me.btnLKWUmmelden.ImageAlign = System.Drawing.ContentAlignment.TopCenter - Me.btnLKWUmmelden.Location = New System.Drawing.Point(640, 1) + Me.btnLKWUmmelden.Location = New System.Drawing.Point(484, 0) Me.btnLKWUmmelden.Margin = New System.Windows.Forms.Padding(0) Me.btnLKWUmmelden.Name = "btnLKWUmmelden" - Me.btnLKWUmmelden.Size = New System.Drawing.Size(51, 85) + Me.btnLKWUmmelden.Size = New System.Drawing.Size(59, 85) Me.btnLKWUmmelden.TabIndex = 110 Me.btnLKWUmmelden.Text = "um-" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "melden" Me.btnLKWUmmelden.TextAlign = System.Drawing.ContentAlignment.BottomCenter @@ -5375,7 +5510,7 @@ Partial Class frmSendungsdetailsNEU Me.Button24.FlatAppearance.BorderSize = 0 Me.Button24.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button24.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button24.Location = New System.Drawing.Point(342, -1) + Me.Button24.Location = New System.Drawing.Point(293, -2) Me.Button24.Name = "Button24" Me.Button24.Size = New System.Drawing.Size(15, 15) Me.Button24.TabIndex = 1 @@ -5388,7 +5523,7 @@ Partial Class frmSendungsdetailsNEU Me.cboVorpapier3._value = "" Me.cboVorpapier3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.cboVorpapier3.FormattingEnabled = True - Me.cboVorpapier3.Location = New System.Drawing.Point(148, 62) + Me.cboVorpapier3.Location = New System.Drawing.Point(5, 62) Me.cboVorpapier3.Name = "cboVorpapier3" Me.cboVorpapier3.Size = New System.Drawing.Size(209, 24) Me.cboVorpapier3.TabIndex = 12 @@ -5400,7 +5535,7 @@ Partial Class frmSendungsdetailsNEU Me.cboVorpapier2._value = "" Me.cboVorpapier2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.cboVorpapier2.FormattingEnabled = True - Me.cboVorpapier2.Location = New System.Drawing.Point(148, 39) + Me.cboVorpapier2.Location = New System.Drawing.Point(5, 39) Me.cboVorpapier2.Name = "cboVorpapier2" Me.cboVorpapier2.Size = New System.Drawing.Size(209, 24) Me.cboVorpapier2.TabIndex = 9 @@ -5408,7 +5543,7 @@ Partial Class frmSendungsdetailsNEU 'txtVorpapier3Pos ' Me.txtVorpapier3Pos.Cursor = System.Windows.Forms.Cursors.IBeam - Me.txtVorpapier3Pos.Location = New System.Drawing.Point(363, 60) + Me.txtVorpapier3Pos.Location = New System.Drawing.Point(220, 60) Me.txtVorpapier3Pos.MaxLength = 500 Me.txtVorpapier3Pos.Name = "txtVorpapier3Pos" Me.txtVorpapier3Pos.Size = New System.Drawing.Size(88, 25) @@ -5418,7 +5553,7 @@ Partial Class frmSendungsdetailsNEU 'txtVorpapier2Pos ' Me.txtVorpapier2Pos.Cursor = System.Windows.Forms.Cursors.IBeam - Me.txtVorpapier2Pos.Location = New System.Drawing.Point(363, 37) + Me.txtVorpapier2Pos.Location = New System.Drawing.Point(220, 37) Me.txtVorpapier2Pos.MaxLength = 500 Me.txtVorpapier2Pos.Name = "txtVorpapier2Pos" Me.txtVorpapier2Pos.Size = New System.Drawing.Size(88, 25) @@ -5428,7 +5563,7 @@ Partial Class frmSendungsdetailsNEU 'lblPos ' Me.lblPos.AutoSize = True - Me.lblPos.Location = New System.Drawing.Point(360, 0) + Me.lblPos.Location = New System.Drawing.Point(217, 0) Me.lblPos.Name = "lblPos" Me.lblPos.Size = New System.Drawing.Size(28, 13) Me.lblPos.TabIndex = 2 @@ -5437,7 +5572,7 @@ Partial Class frmSendungsdetailsNEU 'txtVorpapierPos ' Me.txtVorpapierPos.Cursor = System.Windows.Forms.Cursors.IBeam - Me.txtVorpapierPos.Location = New System.Drawing.Point(363, 14) + Me.txtVorpapierPos.Location = New System.Drawing.Point(220, 14) Me.txtVorpapierPos.MaxLength = 500 Me.txtVorpapierPos.Name = "txtVorpapierPos" Me.txtVorpapierPos.Size = New System.Drawing.Size(88, 25) @@ -5447,9 +5582,9 @@ Partial Class frmSendungsdetailsNEU 'lblZuweisungVP ' Me.lblZuweisungVP.AutoSize = True - Me.lblZuweisungVP.Location = New System.Drawing.Point(145, 0) + Me.lblZuweisungVP.Location = New System.Drawing.Point(2, 0) Me.lblZuweisungVP.Name = "lblZuweisungVP" - Me.lblZuweisungVP.Size = New System.Drawing.Size(110, 13) + Me.lblZuweisungVP.Size = New System.Drawing.Size(120, 13) Me.lblZuweisungVP.TabIndex = 0 Me.lblZuweisungVP.Text = "Zuweisung Vorpapier:" ' @@ -5460,7 +5595,7 @@ Partial Class frmSendungsdetailsNEU Me.cboVorpapier._value = "" Me.cboVorpapier.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.cboVorpapier.FormattingEnabled = True - Me.cboVorpapier.Location = New System.Drawing.Point(148, 16) + Me.cboVorpapier.Location = New System.Drawing.Point(5, 16) Me.cboVorpapier.Name = "cboVorpapier" Me.cboVorpapier.Size = New System.Drawing.Size(209, 24) Me.cboVorpapier.TabIndex = 6 @@ -5468,18 +5603,19 @@ Partial Class frmSendungsdetailsNEU 'lblGrenze ' Me.lblGrenze.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) - Me.lblGrenze.Location = New System.Drawing.Point(468, 16) + Me.lblGrenze.Location = New System.Drawing.Point(319, 16) Me.lblGrenze.Name = "lblGrenze" - Me.lblGrenze.Size = New System.Drawing.Size(169, 62) + Me.lblGrenze.Size = New System.Drawing.Size(166, 62) Me.lblGrenze.TabIndex = 10 Me.lblGrenze.Text = "SUB" + Me.lblGrenze.UseCompatibleTextRendering = True ' 'lblGrenzeSnd ' Me.lblGrenzeSnd.AutoSize = True - Me.lblGrenzeSnd.Location = New System.Drawing.Point(469, 0) + Me.lblGrenzeSnd.Location = New System.Drawing.Point(320, 0) Me.lblGrenzeSnd.Name = "lblGrenzeSnd" - Me.lblGrenzeSnd.Size = New System.Drawing.Size(44, 13) + Me.lblGrenzeSnd.Size = New System.Drawing.Size(46, 13) Me.lblGrenzeSnd.TabIndex = 3 Me.lblGrenzeSnd.Text = "Grenze:" ' @@ -5490,8 +5626,7 @@ Partial Class frmSendungsdetailsNEU Me.Panel3.Controls.Add(Me.btnQS_MA) Me.Panel3.Controls.Add(Me.lblQsMa) Me.Panel3.Controls.Add(Me.lblAktMA) - Me.Panel3.Dock = System.Windows.Forms.DockStyle.Right - Me.Panel3.Location = New System.Drawing.Point(691, 0) + Me.Panel3.Location = New System.Drawing.Point(541, -1) Me.Panel3.Name = "Panel3" Me.Panel3.Size = New System.Drawing.Size(228, 87) Me.Panel3.TabIndex = 13 @@ -5501,7 +5636,6 @@ Partial Class frmSendungsdetailsNEU Me.Button18.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button18.BackColor = System.Drawing.Color.WhiteSmoke Me.Button18.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button18.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1 Me.Button18.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button18.Location = New System.Drawing.Point(121, 14) @@ -5534,7 +5668,6 @@ Partial Class frmSendungsdetailsNEU Me.btnQS_MA.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnQS_MA.BackColor = System.Drawing.Color.WhiteSmoke Me.btnQS_MA.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnQS_MA.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnQS_MA.Image = Global.AVISO.My.Resources.Resources.personCheck_small Me.btnQS_MA.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnQS_MA.Location = New System.Drawing.Point(4, 14) @@ -5560,7 +5693,7 @@ Partial Class frmSendungsdetailsNEU Me.lblAktMA.AutoSize = True Me.lblAktMA.Location = New System.Drawing.Point(3, 0) Me.lblAktMA.Name = "lblAktMA" - Me.lblAktMA.Size = New System.Drawing.Size(70, 13) + Me.lblAktMA.Size = New System.Drawing.Size(76, 13) Me.lblAktMA.TabIndex = 0 Me.lblAktMA.Text = "Aktueller MA:" ' @@ -5570,17 +5703,17 @@ Partial Class frmSendungsdetailsNEU Me.Panel9.Controls.Add(Me.Button2) Me.Panel9.Controls.Add(Me.btnVermerk) Me.Panel9.Controls.Add(Me.lblGesColli) - Me.Panel9.Controls.Add(Me.lblgesGewicht) Me.Panel9.Controls.Add(Me.lblGesamt) + Me.Panel9.Controls.Add(Me.lblSendungsId) + Me.Panel9.Controls.Add(Me.Label16) Me.Panel9.Dock = System.Windows.Forms.DockStyle.Right - Me.Panel9.Location = New System.Drawing.Point(919, 0) + Me.Panel9.Location = New System.Drawing.Point(940, 0) Me.Panel9.Name = "Panel9" Me.Panel9.Size = New System.Drawing.Size(295, 87) Me.Panel9.TabIndex = 14 ' 'Button10 ' - Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button10.Location = New System.Drawing.Point(6, 44) Me.Button10.Name = "Button10" Me.Button10.Size = New System.Drawing.Size(110, 40) @@ -5590,12 +5723,13 @@ Partial Class frmSendungsdetailsNEU ' 'Button2 ' - Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Font = New System.Drawing.Font("Segoe UI", 10.0!) Me.Button2.Image = CType(resources.GetObject("Button2.Image"), System.Drawing.Image) Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Button2.Location = New System.Drawing.Point(122, 44) Me.Button2.Name = "Button2" - Me.Button2.Size = New System.Drawing.Size(159, 40) + Me.Button2.Padding = New System.Windows.Forms.Padding(10, 0, 0, 0) + Me.Button2.Size = New System.Drawing.Size(169, 40) Me.Button2.TabIndex = 5 Me.Button2.Text = "OK" Me.Button2.UseVisualStyleBackColor = True @@ -5603,11 +5737,10 @@ Partial Class frmSendungsdetailsNEU 'btnVermerk ' Me.btnVermerk.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.btnVermerk.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnVermerk.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) Me.btnVermerk.Image = Global.AVISO.My.Resources.Resources.vermerk Me.btnVermerk.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnVermerk.Location = New System.Drawing.Point(183, 3) + Me.btnVermerk.Location = New System.Drawing.Point(193, 1) Me.btnVermerk.Name = "btnVermerk" Me.btnVermerk.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) Me.btnVermerk.Size = New System.Drawing.Size(98, 40) @@ -5620,64 +5753,48 @@ Partial Class frmSendungsdetailsNEU ' Me.lblGesColli.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblGesColli.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblGesColli.Location = New System.Drawing.Point(6, 15) + Me.lblGesColli.Location = New System.Drawing.Point(60, 26) Me.lblGesColli.Name = "lblGesColli" - Me.lblGesColli.Size = New System.Drawing.Size(110, 13) + Me.lblGesColli.Size = New System.Drawing.Size(127, 13) Me.lblGesColli.TabIndex = 1 - Me.lblGesColli.Text = "0 Pk." - ' - 'lblgesGewicht - ' - Me.lblgesGewicht.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblgesGewicht.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblgesGewicht.Location = New System.Drawing.Point(6, 28) - Me.lblgesGewicht.Name = "lblgesGewicht" - Me.lblgesGewicht.Size = New System.Drawing.Size(110, 13) - Me.lblgesGewicht.TabIndex = 2 - Me.lblgesGewicht.Text = "10.000 kg" + Me.lblGesColli.Text = "1000 Pk / 10.000 kg" + Me.lblGesColli.TextAlign = System.Drawing.ContentAlignment.TopRight ' 'lblGesamt ' Me.lblGesamt.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblGesamt.AutoSize = True - Me.lblGesamt.Location = New System.Drawing.Point(3, 0) + Me.lblGesamt.Location = New System.Drawing.Point(3, 26) Me.lblGesamt.Name = "lblGesamt" - Me.lblGesamt.Size = New System.Drawing.Size(46, 13) + Me.lblGesamt.Size = New System.Drawing.Size(48, 13) Me.lblGesamt.TabIndex = 0 Me.lblGesamt.Text = "Gesamt:" ' - 'btnSpedBuch + 'lblSendungsId ' - Me.btnSpedBuch.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnSpedBuch.Image = CType(resources.GetObject("btnSpedBuch.Image"), System.Drawing.Image) - Me.btnSpedBuch.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnSpedBuch.Location = New System.Drawing.Point(6, 6) - Me.btnSpedBuch.Name = "btnSpedBuch" - Me.btnSpedBuch.Size = New System.Drawing.Size(125, 40) - Me.btnSpedBuch.TabIndex = 4 - Me.btnSpedBuch.Text = "Eintrag" & Global.Microsoft.VisualBasic.ChrW(10) & "Speditionsbuch" - Me.btnSpedBuch.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnSpedBuch.UseVisualStyleBackColor = True + Me.lblSendungsId.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblSendungsId.Location = New System.Drawing.Point(83, 8) + Me.lblSendungsId.Name = "lblSendungsId" + Me.lblSendungsId.Size = New System.Drawing.Size(104, 13) + Me.lblSendungsId.TabIndex = 112 + Me.lblSendungsId.Text = "123456789" + Me.lblSendungsId.TextAlign = System.Drawing.ContentAlignment.TopRight ' - 'cbxSpedBuch + 'Label16 ' - Me.cbxSpedBuch._value = "" - Me.cbxSpedBuch.AutoSize = True - Me.cbxSpedBuch.Checked_value = False - Me.cbxSpedBuch.CheckedValue = False - Me.cbxSpedBuch.Location = New System.Drawing.Point(6, 46) - Me.cbxSpedBuch.Name = "cbxSpedBuch" - Me.cbxSpedBuch.Size = New System.Drawing.Size(113, 17) - Me.cbxSpedBuch.TabIndex = 8 - Me.cbxSpedBuch.Text = "Eintrag vorhanden" - Me.cbxSpedBuch.UseVisualStyleBackColor = True + Me.Label16.AutoSize = True + Me.Label16.Location = New System.Drawing.Point(4, 8) + Me.Label16.Name = "Label16" + Me.Label16.Size = New System.Drawing.Size(76, 13) + Me.Label16.TabIndex = 111 + Me.Label16.Text = "Sendungs-Id:" ' 'cntxtAnh ' Me.cntxtAnh.ImageScalingSize = New System.Drawing.Size(24, 24) Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem, Me.LaufzetteldruckJANEINToolStripMenuItem, Me.GestellungslisteAnfügenJANEINToolStripMenuItem, Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem, Me.FürDruckMarkierenJANEINToolStripMenuItem, Me.HervorhebenToolStripMenuItem}) Me.cntxtAnh.Name = "cntxtAnh" - Me.cntxtAnh.Size = New System.Drawing.Size(294, 266) + Me.cntxtAnh.Size = New System.Drawing.Size(294, 244) ' 'MarkiertePDFsDruckenToolStripMenuItem ' @@ -5718,6 +5835,12 @@ Partial Class frmSendungsdetailsNEU Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Size = New System.Drawing.Size(293, 30) Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Text = "Abrechung: Fremde Grenze Akt drucken" ' + 'FürDruckMarkierenJANEINToolStripMenuItem + ' + Me.FürDruckMarkierenJANEINToolStripMenuItem.Name = "FürDruckMarkierenJANEINToolStripMenuItem" + Me.FürDruckMarkierenJANEINToolStripMenuItem.Size = New System.Drawing.Size(293, 30) + Me.FürDruckMarkierenJANEINToolStripMenuItem.Text = "Für Druck markieren JA/NEIN" + ' 'HervorhebenToolStripMenuItem ' Me.HervorhebenToolStripMenuItem.Image = CType(resources.GetObject("HervorhebenToolStripMenuItem.Image"), System.Drawing.Image) @@ -6315,11 +6438,27 @@ Partial Class frmSendungsdetailsNEU Me.DataGridViewTextBoxColumn5.ReadOnly = True Me.DataGridViewTextBoxColumn5.Width = 200 ' - 'FürDruckMarkierenJANEINToolStripMenuItem + 'Label17 ' - Me.FürDruckMarkierenJANEINToolStripMenuItem.Name = "FürDruckMarkierenJANEINToolStripMenuItem" - Me.FürDruckMarkierenJANEINToolStripMenuItem.Size = New System.Drawing.Size(293, 30) - Me.FürDruckMarkierenJANEINToolStripMenuItem.Text = "Für Druck markieren JA/NEIN" + Me.Label17.AutoSize = True + Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label17.Location = New System.Drawing.Point(170, 18) + Me.Label17.Name = "Label17" + Me.Label17.Size = New System.Drawing.Size(240, 39) + Me.Label17.TabIndex = 75 + Me.Label17.Text = "Erstellt eine Zollanmeldung anhand der " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Unterlagen mit ATEZ DeclarantAI und über" & + "mittelt " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "den Entwurf an DAKOSY als EZA." + ' + '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(595, 18) + Me.Label18.Name = "Label18" + Me.Label18.Size = New System.Drawing.Size(226, 39) + Me.Label18.TabIndex = 76 + Me.Label18.Text = "Erstellt eine Zollanmeldung anhand der " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Unterlagen mit ATEZ TransitAI und übermi" & + "ttelt " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "den Entwurf an DAKOSY als NCTS." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) ' 'frmSendungsdetailsNEU ' @@ -6327,8 +6466,9 @@ Partial Class frmSendungsdetailsNEU Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi Me.AutoScroll = True Me.BackColor = System.Drawing.Color.White - Me.ClientSize = New System.Drawing.Size(1214, 863) + Me.ClientSize = New System.Drawing.Size(1235, 883) Me.Controls.Add(Me.pnl) + Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.KeyPreview = True Me.MainMenuStrip = Me.MenuStrip @@ -6368,6 +6508,7 @@ Partial Class frmSendungsdetailsNEU Me.tbATEZ.ResumeLayout(False) CType(Me.dgvATEZNCTS, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel23.ResumeLayout(False) + Me.Panel23.PerformLayout() Me.tbDigicust.ResumeLayout(False) CType(Me.dgvDigicust, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel24.ResumeLayout(False) @@ -6406,18 +6547,23 @@ Partial Class frmSendungsdetailsNEU Me.pnlT1.ResumeLayout(False) Me.Panel5.ResumeLayout(False) Me.Panel5.PerformLayout() - Me.pnlValidation.ResumeLayout(False) + Me.pnlStatus.ResumeLayout(False) + Me.flpnlStatus.ResumeLayout(False) + Me.pnlSND_Zuteilung.ResumeLayout(False) + CType(Me.picSND_Zuteilg, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.picAVISOMessengerSNDChat, System.ComponentModel.ISupportInitialize).EndInit() - Me.Panel1.ResumeLayout(False) Me.pnlFremd.ResumeLayout(False) Me.pnlFremd.PerformLayout() Me.Panel2.ResumeLayout(False) Me.Panel2.PerformLayout() Me.FlowLayoutPanel.ResumeLayout(False) + Me.Panel1.ResumeLayout(False) Me.pnlheader.ResumeLayout(False) Me.pnlheader.PerformLayout() Me.Panel7.ResumeLayout(False) Me.Panel7.PerformLayout() + Me.pnlValidation.ResumeLayout(False) + Me.pnlValidation.PerformLayout() Me.Panel3.ResumeLayout(False) Me.Panel3.PerformLayout() Me.Panel9.ResumeLayout(False) @@ -6448,10 +6594,8 @@ Partial Class frmSendungsdetailsNEU Friend WithEvents Button2 As System.Windows.Forms.Button Friend WithEvents Panel2 As System.Windows.Forms.Panel Friend WithEvents Label2 As System.Windows.Forms.Label - Friend WithEvents btnSpedBuch As System.Windows.Forms.Button Friend WithEvents pnlheader As System.Windows.Forms.Panel Friend WithEvents Panel7 As System.Windows.Forms.Panel - Friend WithEvents cbxSpedBuch As VERAG_PROG_ALLGEMEIN.MyCheckbox Friend WithEvents FlowLayoutPanel As System.Windows.Forms.FlowLayoutPanel Friend WithEvents FlatButton2 As VERAG_PROG_ALLGEMEIN.FlatButton Friend WithEvents Button10 As System.Windows.Forms.Button @@ -6613,7 +6757,6 @@ Partial Class frmSendungsdetailsNEU Friend WithEvents lblWW As Label Friend WithEvents txtWarenwert As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txtWarenwertWaehrung As VERAG_PROG_ALLGEMEIN.MySearchBox - Friend WithEvents lblgesGewicht As Label Friend WithEvents lblGesColli As Label Friend WithEvents lblGesamt As Label Friend WithEvents btnPDFZusammenfueren As Button @@ -6886,4 +7029,24 @@ Partial Class frmSendungsdetailsNEU Friend WithEvents toolModal_Export As ToolStripMenuItem Friend WithEvents toolModal_Transit As ToolStripMenuItem Friend WithEvents FürDruckMarkierenJANEINToolStripMenuItem As ToolStripMenuItem + Friend WithEvents pnlSND_Zuteilung As Panel + Friend WithEvents lblSND_Zuteilg As Label + Friend WithEvents lblSND_ZuteilgAvisoId As Label + Friend WithEvents picSND_Zuteilg As PictureBox + Friend WithEvents btnSND_Zuteilg As Button + Friend WithEvents lblSendungsId As Label + Friend WithEvents Label16 As Label + Friend WithEvents lblStatusOptionen As Label + Friend WithEvents flpnlStatus As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel + Friend WithEvents btnStatusAbklaerungTR As Button + Friend WithEvents btnStatusVorbereitetQS As Button + Friend WithEvents btnStatusVorgeschrieben As Button + Friend WithEvents btnStatusAbfertigungTR As Button + Friend WithEvents btnSpeditionsbuchEintragen As Button + Friend WithEvents btnSendungFakturiert As Button + Friend WithEvents pnlStatus As Panel + Friend WithEvents lblStatus As Label + Friend WithEvents btnStatusAbgeschlossen As Button + Friend WithEvents Label17 As Label + Friend WithEvents Label18 As Label End Class diff --git a/Aviso/frmSendungsdetailsNEU.resx b/Aviso/frmSendungsdetailsNEU.resx index 14d6ef9..c4d1731 100644 --- a/Aviso/frmSendungsdetailsNEU.resx +++ b/Aviso/frmSendungsdetailsNEU.resx @@ -1384,22 +1384,6 @@ jz+j/Pnl74VBJGCkA5INlEIwhRFGwBADCPtkJqjJYJPhJgMOQ04GHZYMiGwJvwcFHhk+GEIUiHQwkoEU QimMMEpByGAzwU0GHAU6Cng6yfAwCf8eFn5vGTwYQDKEhI8UgiiMMC6AEANclgwAAT5ZMiz8CL8Ofh8M nRA+F3D8f7cAkA4zZGm9AAAAAElFTkSuQmCC - - - - - iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAH1JREFUOE/V - 0MEJgDAMQNHflXQmxxDcQt1CvAr1rq7hHIriKa1QQxQs/EtbHm0AMufcZhGQ8xoIjECVkJfQHXhcTlml - hL4BLXoXfPDl2DrHIMEeKJR1AWiRfOEKLMrWGGg+Q38cKBsC0CL5wvba0FTHQPMZzkCjbApAi/4B7lqo - BXidk8YAAAAAAElFTkSuQmCC - - - - - iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAH1JREFUOE/V - 0MEJgDAMQNHflXQmxxDcQt1CvAr1rq7hHIriKa1QQxQs/EtbHm0AMufcZhGQ8xoIjECVkJfQHXhcTlml - hL4BLXoXfPDl2DrHIMEeKJR1AWiRfOEKLMrWGGg+Q38cKBsC0CL5wvba0FTHQPMZzkCjbApAi/4B7lqo - BXidk8YAAAAAAElFTkSuQmCC @@ -1543,6 +1527,21 @@ True + + True + + + True + + + True + + + True + + + True + iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAAG9JREFUSEvt @@ -1653,6 +1652,18 @@ True + + True + + + True + + + True + + + True + 404, 17 @@ -1683,14 +1694,6 @@ E90MFIBuGJJmH2QDYy/ETpW0lEQJDpxAVE9UM/5S/BV0Q5GxRqRGDro+gsAwz7AV3SAQtqi1mMzIwoiu nDhg32vfHn8p/ivMsLiLcWdMK0w10dWRDGLOxPyIuxj30Xm6cya6HNkgeEfwA3SxgQUqKipM1dXVytOm TTNGxhMmTFCztLTEn/6gAACeTwgqe9wYrQAAAABJRU5ErkJggg== - - - - - iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAH1JREFUOE/V - 0MEJgDAMQNHflXQmxxDcQt1CvAr1rq7hHIriKa1QQxQs/EtbHm0AMufcZhGQ8xoIjECVkJfQHXhcTlml - hL4BLXoXfPDl2DrHIMEeKJR1AWiRfOEKLMrWGGg+Q38cKBsC0CL5wvba0FTHQPMZzkCjbApAi/4B7lqo - BXidk8YAAAAAAElFTkSuQmCC diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb index 9458678..b5c6b2c 100644 --- a/Aviso/frmSendungsdetailsNEU.vb +++ b/Aviso/frmSendungsdetailsNEU.vb @@ -17,6 +17,7 @@ Public Class frmSendungsdetailsNEU Public AvisoId As Integer Public SendungID As Integer = -1 Dim FUNC As New SDL.cProgramFunctions + Dim AVISOFUNC As New AvisoStatusFunctions Dim ADMIN As New cADMIN Dim AvisoDAL As New cAvisoDAL @@ -601,6 +602,22 @@ Public Class frmSendungsdetailsNEU Button19.Visible = True End If + + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_Statusoptions") Or VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME = "ADMIN" Then + lblStatusOptionen.Visible = True + pnlStatus.Visible = True + flpnlStatus.Visible = True + Else + lblStatusOptionen.Visible = False + pnlStatus.Visible = False + flpnlStatus.Visible = False + End If + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("CHECK_SND_Zuteilung") Or VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME = "ADMIN" Then + pnlSND_Zuteilung.Visible = True + Else + pnlSND_Zuteilung.Visible = False + End If + ContextMenuStrip3.Items.Clear() Dim dt = SQL.loadDgvBySql("SELECT [grz_Grenzstelle],grz_BezeichnungCBO FROM [tblGrenzstelle] where grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "'", "AVISO") If dt IsNot Nothing Then @@ -1469,7 +1486,7 @@ Public Class frmSendungsdetailsNEU txtColli.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Colli, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen txtGewicht.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Gewicht, "").ToString.Replace(" ", "").Replace(Chr(160), "") ' 160: irgend ein Sonder-Leerzeichen rtbWarenbezeichnung.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenbezeichnung, "") - cbxSpedBuch.Checked = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen, False) + 'cbxSpedBuch.Checked = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen, False) ' cntlBar.Checked = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_bar, False) ' txtBarBelegNr.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_barBeleg, "") @@ -1554,6 +1571,7 @@ Public Class frmSendungsdetailsNEU setVorpapiere() + doVeranlagungsValidation() initFraechterAvisererFromAkt() @@ -1711,6 +1729,9 @@ Public Class frmSendungsdetailsNEU checkinitOLDAbfertigungsart(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Abfertigungsart_ID) + initSendungs_Status() + initZuteilung() + SENDUNG_LIST(CURRENT_INDEX).LOAD_VORKOSTEN() If tbcntr.SelectedTab Is tbBAR Then initDGVBelege() @@ -1812,6 +1833,125 @@ Public Class frmSendungsdetailsNEU End If End Sub + Sub initSendungs_Status() + + Dim vorhanden = ADMIN.getValueTxtBySql("SELECT COUNT(*) FROM [Speditionsbuch] WHERE [FilialenNr]='" & cboFiliale._value & "' AND AbfertigungsNr='" & txtAbfertigungsnummer.Text & "'", "FMZOLL") ' AND UnterNr='" & txtUnterNr.Text & "' + 'cbxSpedBuch.Checked = (vorhanden > 0) + SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen = (vorhanden > 0) + + + + btnStatusAbklaerungTR.BackgroundImage = My.Resources.abklaerungTR_Inaktiv + btnStatusVorbereitetQS.BackgroundImage = My.Resources.statusBtn_vorbereitet_InAktiv + btnStatusVorgeschrieben.BackgroundImage = My.Resources.statusBtn_vorgeschrieben_InAktiv + btnStatusAbfertigungTR.BackgroundImage = My.Resources.abfetigungTR_inaktiv + btnSpeditionsbuchEintragen.BackgroundImage = My.Resources.speditionsbuchInaktiv + btnSendungFakturiert.BackgroundImage = My.Resources.fakturiertInaktiv + btnStatusAbgeschlossen.BackgroundImage = My.Resources.ok '-> Logik einbauen + setTooltioBtn(btnStatusAbklaerungTR, "Status 'Abklärung TR' eintragen") + setTooltioBtn(btnStatusVorbereitetQS, "Status 'Vorbereitet-QS' eintragen") + setTooltioBtn(btnStatusVorgeschrieben, "Status 'Vorgeschrieben' eintragen") + setTooltioBtn(btnStatusAbfertigungTR, "Status 'Abfertigung TR' eintragen") + setTooltioBtn(btnSpeditionsbuchEintragen, "Status 'Speditionsbuch Eintragen' eintragen") + setTooltioBtn(btnSendungFakturiert, "Status 'Fakturiert' eintragen") + setTooltioBtn(btnStatusAbgeschlossen, "Status 'Abgeschlossen' eintragen") + + + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("SendungsStatusAbklaerungTR", "AVISO") Then + btnStatusAbklaerungTR.Visible = True + End If + btnStatusVorbereitetQS.Visible = True + btnStatusVorgeschrieben.Visible = True + + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("SendungsStatusAbfertigungTR", "AVISO") Then + btnStatusAbfertigungTR.Visible = True + End If + + btnSpeditionsbuchEintragen.Visible = True + + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("SendungsStatusFakturiert", "AVISO") Then + btnSendungFakturiert.Visible = True + End If + + btnStatusAbgeschlossen.Visible = False + + '--------- + + + + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbklaerungTR IsNot Nothing Then + btnStatusAbklaerungTR.BackgroundImage = My.Resources.abklaerungTR_Aktiv + Dim username = SQL.DLookup("mit_username", "tblMitarbeiter", "mit_id='" & If(SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbklaerungTR_MA, -1) & "'", "ADMIN", "-") + setTooltioBtn(btnStatusAbklaerungTR, "Status 'Abklärung TR' entfernen" & vbNewLine & "(" & CDate(SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbklaerungTR).ToString("dd.MM.yyyy HH:mm") & "," & username & ")") + End If + + + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorbereitet IsNot Nothing Then + btnStatusVorbereitetQS.BackgroundImage = My.Resources.statusBtn_vorbereitet_Aktiv + Dim username = SQL.DLookup("mit_username", "tblMitarbeiter", "mit_id='" & If(SENDUNG_LIST(CURRENT_INDEX).tblSnd_QS_MA, -1) & "'", "ADMIN", "-") + setTooltioBtn(btnStatusVorbereitetQS, "Status 'Vorbereitet-QS' entfernen" & vbNewLine & "(" & CDate(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorbereitet).ToString("dd.MM.yyyy HH:mm") & "," & username & ")") + End If + + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorgeschrieben IsNot Nothing Then + btnStatusVorgeschrieben.BackgroundImage = My.Resources.statusBtn_vorgeschrieben_Aktiv + Dim username = SQL.DLookup("mit_username", "tblMitarbeiter", "mit_id='" & If(SENDUNG_LIST(CURRENT_INDEX).tblSnd_VG_MA, -1) & "'", "ADMIN", "-") + setTooltioBtn(btnStatusVorgeschrieben, "Status 'Vorgeschrieben' entfernen" & vbNewLine & "(" & CDate(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorgeschrieben).ToString("dd.MM.yyyy HH:mm") & "," & username & ")") + End If + + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbfertigungTR IsNot Nothing Then + btnStatusAbfertigungTR.BackgroundImage = My.Resources.abfetigungTR_aktiv + Dim username = SQL.DLookup("mit_username", "tblMitarbeiter", "mit_id='" & If(SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbfertigungTR_MA, -1) & "'", "ADMIN", "-") + setTooltioBtn(btnStatusAbfertigungTR, "Status 'Abklärung TR' entfernen" & vbNewLine & "(" & CDate(SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbfertigungTR).ToString("dd.MM.yyyy HH:mm") & "," & username & ")") + End If + + + + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen Then + btnStatusAbklaerungTR.BackgroundImage = My.Resources.speditionsbuchAktiv + setTooltioBtn(btnStatusAbklaerungTR, "Status 'Speditionsbuch Eingetragen' entfernen") + End If + + + + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_Fakturiert Then + btnStatusAbklaerungTR.BackgroundImage = My.Resources.fakturiertAktiv + setTooltioBtn(btnStatusAbklaerungTR, "Status 'Fakturiert' entfernen") + End If + + + 'If SENDUNG_LIST(CURRENT_INDEX).abgeschlossen Then + ' btnStatusAbgeschlossen.BackgroundImage = My.Resources.ok '-> Logik einbauen + ' setTooltioBtn(btnStatusAbklaerungTR, "Status 'Abgeschlossen' aufheben") + 'End If + + + lblStatus.Text = VERAG_PROG_ALLGEMEIN.cGlobal.getSNDStatusText(SENDUNG_LIST(CURRENT_INDEX).tblSnd_Status) + + + + Select Case SENDUNG_LIST(CURRENT_INDEX).tblSnd_Status + 'Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Ankunft + ' pnlStatus.BackColor = usrcntlAktDetails.btnAnkunft.BackColor + Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Erfasst : pnlStatus.BackColor = Color.Red + Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_InBearbeitung : pnlStatus.BackColor = Color.Orange + Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Eingereicht : pnlStatus.BackColor = Color.LightSeaGreen + Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Ueberlassen : pnlStatus.BackColor = Color.Green + Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_NichtEingetroffen : pnlStatus.BackColor = Color.FromArgb(64, 64, 64) + Case VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Ankunft : pnlStatus.BackColor = Color.Blue + + Case VERAG_PROG_ALLGEMEIN.cGlobal.Status_NichtEingetroffen + lblStatus.Text = "NICHT EINGETR." : pnlStatus.BackColor = Color.Gray 'btnNichtEingetroffen.BackColor + + End Select + + + + End Sub + + Sub setTooltioBtn(btn As Button, tooltiptext As String) + Dim tt As New ToolTip() : tt.SetToolTip(btn, tooltiptext) + End Sub + Sub setVorpapiere() cboVorpapier.Text = SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorpapier @@ -1878,13 +2018,31 @@ Public Class frmSendungsdetailsNEU If s.tblSnd_Gewicht IsNot Nothing AndAlso IsNumeric(s.tblSnd_Gewicht.Replace("kg", "").Trim) Then gesGewicht += s.tblSnd_Gewicht Next - lblGesColli.Text = If(gesColli = 0, "-", gesColli.ToString("N0")) & " Pk" - lblgesGewicht.Text = If(gesGewicht = 0, "-", gesGewicht.ToString("N1")) & " kg" + 'lblGesColli.Text = If(gesColli = 0, "-", gesColli.ToString("N0")) & " Pk" + 'lblgesGewicht.Text = If(gesGewicht = 0, "-", gesGewicht.ToString("N1")) & " kg" + + lblGesColli.Text = If(gesColli = 0, "-", gesColli.ToString("N0")) & " Pk" & If(gesGewicht = 0, "-", ", " & gesGewicht.ToString("N1")) & " kg" Catch ex As Exception VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub + + Sub initZuteilung() + If SENDUNG_LIST(CURRENT_INDEX).tblSnd_AvisoID >= 0 Then + lblSND_Zuteilg.Text = "LKW zugeteilt:" + lblSND_ZuteilgAvisoId.Text = SENDUNG_LIST(CURRENT_INDEX).tblSnd_AvisoID.ToString + picSND_Zuteilg.BackgroundImage = My.Resources.SND_verbinden + btnSND_Zuteilg.Text = "Von LKW lösen" + Else + lblSND_Zuteilg.Text = "Sendung gelöst" + lblSND_ZuteilgAvisoId.Text = "-" + picSND_Zuteilg.BackgroundImage = My.Resources.SND_loesen + btnSND_Zuteilg.Text = "LKW zuordnen" + End If + + + End Sub Sub binddata(o As Object, bindingParam As String, bindingSource As BindingSource, dataName As String, Optional bindingNullValue As Object = Nothing, Optional formatString As String = "") o.DataBindings.Clear() ' If bindingNullValue = Nothing Then bindingNullValue = DBNull.Value @@ -1997,7 +2155,7 @@ Public Class frmSendungsdetailsNEU SENDUNG_LIST(CURRENT_INDEX).tblSnd_Colli = txtColli.Text SENDUNG_LIST(CURRENT_INDEX).tblSnd_Gewicht = txtGewicht.Text SENDUNG_LIST(CURRENT_INDEX).tblSnd_Warenbezeichnung = rtbWarenbezeichnung.Text - SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen = cbxSpedBuch.Checked + ' SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen = cbxSpedBuch.Checked ' SENDUNG_LIST(CURRENT_INDEX).tblSnd_aufschub = cboAufschub._value ' MsgBox(CURRENT_INDEX & " _ " & txtColli.Text) @@ -2357,7 +2515,7 @@ Public Class frmSendungsdetailsNEU Return b End Function - Private Sub btn_Click_1(sender As Object, e As EventArgs) Handles btnSpedBuch.Click + Private Sub btn_Click_1(sender As Object, e As EventArgs) 'loadDataInLIST() If Not SAVE_ME() Then @@ -2378,8 +2536,8 @@ Public Class frmSendungsdetailsNEU txtUnterNr.Text = posnr.UnterNr 'cbxSpedBuch.Checked = (posnr.Filiale > 0 And posnr.Abfertigungsnummer > 0 And posnr.UnterNr >= 0) ' Wenn Sped Eintrag gelöscht-> - 1, dann ist der Eintrag nicht mehr vorhanden Dim vorhanden = ADMIN.getValueTxtBySql("SELECT COUNT(*) FROM [Speditionsbuch] WHERE [FilialenNr]='" & cboFiliale._value & "' AND AbfertigungsNr='" & txtAbfertigungsnummer.Text & "'", "FMZOLL") ' AND UnterNr='" & txtUnterNr.Text & "' - cbxSpedBuch.Checked = (vorhanden > 0) - + 'cbxSpedBuch.Checked = (vorhanden > 0) + SENDUNG_LIST(CURRENT_INDEX).tblSnd_SpeditionsbuchEingetragen = (vorhanden > 0) End If @@ -2774,7 +2932,7 @@ Public Class frmSendungsdetailsNEU End Sub - Private Sub cbxSpedBuch_CheckedChanged(sender As Object, e As EventArgs) Handles cbxSpedBuch.CheckedChanged + Private Sub cbxSpedBuch_CheckedChanged(sender As Object, e As EventArgs) cboFiliale.Enabled = Not sender.checked txtAbfertigungsnummer.Enabled = Not sender.checked txtUnterNr.Enabled = Not sender.checked @@ -3245,7 +3403,7 @@ Public Class frmSendungsdetailsNEU Dim AbfertigungsNr = txtAbfertigungsnummer.Text If SENDUNG_LIST(CURRENT_INDEX).tblSnd_Fremdspedition Then Return False If Filiale Is Nothing Or AbfertigungsNr Is Nothing Then Return False - If cbxSpedBuch.Checked Then Return False + 'If cbxSpedBuch.Checked Then Return False If IsNumeric(Filiale) And IsNumeric(AbfertigungsNr) Then If SDL.cRKSV.SpedBuchExists(Filiale, AbfertigungsNr) Then Return True @@ -3338,7 +3496,7 @@ Public Class frmSendungsdetailsNEU ' TabControl1.Enabled = Not sperren Panel6.Enabled = Not sperren Panel16.Enabled = Not sperren - btnSpedBuch.Enabled = Not sperren + 'btnSpedBuch.Enabled = Not sperren ' Panel5.Enabled = Not sperren ' cboAbfertigungsart.Enabled = Not sperren txtAnzahl.Enabled = Not sperren @@ -7899,4 +8057,62 @@ Public Class frmSendungsdetailsNEU initAnhang() End If End Sub + + Private Sub btnSND_Zuteilg_Click(sender As Object, e As EventArgs) Handles btnSND_Zuteilg.Click + MsgBox("TODO") + End Sub + + Private Sub btnStatusAbklaerungTR_Click(sender As Object, e As EventArgs) Handles btnStatusAbklaerungTR.Click + Me.Cursor = Cursors.WaitCursor + If AVISOFUNC.setSendungAbklaerungTR(SendungsId, AvisoId) Then + initDataBinding() + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub btnStatusVorbereitetQS_Click(sender As Object, e As EventArgs) Handles btnStatusVorbereitetQS.Click + Me.Cursor = Cursors.WaitCursor + If AVISOFUNC.setSendungVorbereitetQS(SendungsId, AvisoId) Then + initDataBinding() + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub btnStatusVorgeschrieben_Click(sender As Object, e As EventArgs) Handles btnStatusVorgeschrieben.Click + Me.Cursor = Cursors.WaitCursor + If AVISOFUNC.setSendungVorgeschrieben(SendungsId, AvisoId) Then + initDataBinding() + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub btnStatusAbfertigungTR_Click(sender As Object, e As EventArgs) Handles btnStatusAbfertigungTR.Click + Me.Cursor = Cursors.WaitCursor + If AVISOFUNC.setSendungAbfertigungTR(SendungsId, AvisoId) Then + initDataBinding() + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub btnSpeditionsbuchEintragen_Click(sender As Object, e As EventArgs) Handles btnSpeditionsbuchEintragen.Click + Me.Cursor = Cursors.WaitCursor + If Not cbxFremdspedition.Checked Then + If AVISOFUNC.setSendungFakturiert(SendungsId, AvisoId) Then + initDataBinding() + End If + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub btnSendungFakturiert_Click(sender As Object, e As EventArgs) Handles btnSendungFakturiert.Click + Me.Cursor = Cursors.WaitCursor + If AVISOFUNC.setSendungFakturiert(SendungsId, AvisoId) Then + initDataBinding() + End If + Me.Cursor = Cursors.Default + End Sub + + Private Sub btnStatusAbgeschlossen_Click(sender As Object, e As EventArgs) Handles btnStatusAbgeschlossen.Click + ''' + End Sub End Class diff --git a/Aviso/usrCntlHauptfenster_Suche_AVISO.Designer.vb b/Aviso/usrCntlHauptfenster_Suche_AVISO.Designer.vb index a8690c2..090ed1c 100644 --- a/Aviso/usrCntlHauptfenster_Suche_AVISO.Designer.vb +++ b/Aviso/usrCntlHauptfenster_Suche_AVISO.Designer.vb @@ -24,12 +24,13 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlHauptfenster_Suche_AVISO)) - Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Panel1 = New System.Windows.Forms.Panel() + Me.lblHinweis = New System.Windows.Forms.Label() Me.btnDetailsuche = New System.Windows.Forms.Button() Me.pnlSearch = New System.Windows.Forms.Panel() Me.lblAbsender = New System.Windows.Forms.Label() @@ -85,7 +86,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.tabFreigegeben = New System.Windows.Forms.TabPage() Me.tabNichtEingetroffen = New System.Windows.Forms.TabPage() Me.pnlTime = New System.Windows.Forms.Panel() - Me.lblHinweis = New System.Windows.Forms.Label() Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label2 = New System.Windows.Forms.Label() Me.dtpVon = New System.Windows.Forms.DateTimePicker() @@ -150,6 +150,18 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.Panel1.Size = New System.Drawing.Size(1243, 118) Me.Panel1.TabIndex = 3 ' + 'lblHinweis + ' + Me.lblHinweis.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblHinweis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblHinweis.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lblHinweis.Location = New System.Drawing.Point(954, 93) + Me.lblHinweis.Name = "lblHinweis" + Me.lblHinweis.Size = New System.Drawing.Size(129, 16) + Me.lblHinweis.TabIndex = 38 + Me.lblHinweis.Text = "Hinweis eingetragen" + Me.lblHinweis.Visible = False + ' 'btnDetailsuche ' Me.btnDetailsuche.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer)) @@ -158,7 +170,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.btnDetailsuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!) Me.btnDetailsuche.ForeColor = System.Drawing.Color.White Me.btnDetailsuche.ImageAlign = System.Drawing.ContentAlignment.TopRight - Me.btnDetailsuche.Location = New System.Drawing.Point(129, 55) + Me.btnDetailsuche.Location = New System.Drawing.Point(129, 58) Me.btnDetailsuche.Margin = New System.Windows.Forms.Padding(0) Me.btnDetailsuche.Name = "btnDetailsuche" Me.btnDetailsuche.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) @@ -413,7 +425,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO 'txtAbfertigungsnummer ' Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(500, 10) + Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(500, 11) Me.txtAbfertigungsnummer.MaxLength = 8 Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer" Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(147, 23) @@ -452,7 +464,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO ' 'Label22 ' - Me.Label22.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Label22.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label22.BackColor = System.Drawing.Color.Red Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label22.ForeColor = System.Drawing.Color.White @@ -551,7 +563,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.cboImEx._value = "" Me.cboImEx.BackColor = System.Drawing.Color.WhiteSmoke Me.cboImEx.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboImEx.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboImEx.FormattingEnabled = True Me.cboImEx.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"}) @@ -568,7 +579,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.cboTeams.BackColor = System.Drawing.Color.WhiteSmoke Me.cboTeams.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboTeams.DropDownWidth = 200 - Me.cboTeams.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboTeams.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboTeams.FormattingEnabled = True Me.cboTeams.Location = New System.Drawing.Point(408, 4) @@ -591,7 +601,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.Label8.AutoSize = True Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label8.ForeColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(0, Byte), Integer)) - Me.Label8.Location = New System.Drawing.Point(67, 7) + Me.Label8.Location = New System.Drawing.Point(67, 10) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(15, 18) Me.Label8.TabIndex = 15 @@ -619,7 +629,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.cboGrenzstelle.BackColor = System.Drawing.Color.WhiteSmoke Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.cboGrenzstelle.DropDownWidth = 200 - Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboGrenzstelle.FormattingEnabled = True Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU", "AMB", "???"}) @@ -643,7 +652,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.Label6.AutoSize = True Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label6.ForeColor = System.Drawing.Color.White - Me.Label6.Location = New System.Drawing.Point(6, 53) + Me.Label6.Location = New System.Drawing.Point(6, 56) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(81, 13) Me.Label6.TabIndex = 11 @@ -652,7 +661,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO 'txtSuche ' Me.txtSuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtSuche.Location = New System.Drawing.Point(7, 28) + Me.txtSuche.Location = New System.Drawing.Point(7, 31) Me.txtSuche.MaxLength = 30 Me.txtSuche.Name = "txtSuche" Me.txtSuche.Size = New System.Drawing.Size(306, 26) @@ -662,7 +671,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO ' Me.btnWichtige.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnWichtige.ForeColor = System.Drawing.Color.White - Me.btnWichtige.Location = New System.Drawing.Point(235, 1) + Me.btnWichtige.Location = New System.Drawing.Point(235, 4) Me.btnWichtige.Name = "btnWichtige" Me.btnWichtige.Size = New System.Drawing.Size(78, 25) Me.btnWichtige.TabIndex = 4 @@ -674,7 +683,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO ' Me.btnWichtigeStandort.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnWichtigeStandort.ForeColor = System.Drawing.Color.White - Me.btnWichtigeStandort.Location = New System.Drawing.Point(129, 0) + Me.btnWichtigeStandort.Location = New System.Drawing.Point(129, 3) Me.btnWichtigeStandort.Name = "btnWichtigeStandort" Me.btnWichtigeStandort.Size = New System.Drawing.Size(100, 27) Me.btnWichtigeStandort.TabIndex = 3 @@ -686,7 +695,7 @@ Partial Class usrCntlHauptfenster_Suche_AVISO ' Me.lblSuche.AutoSize = True Me.lblSuche.ForeColor = System.Drawing.Color.White - Me.lblSuche.Location = New System.Drawing.Point(6, 9) + Me.lblSuche.Location = New System.Drawing.Point(6, 12) Me.lblSuche.Name = "lblSuche" Me.lblSuche.Size = New System.Drawing.Size(68, 15) Me.lblSuche.TabIndex = 1 @@ -812,8 +821,6 @@ Partial Class usrCntlHauptfenster_Suche_AVISO ' 'pnlTime ' - Me.pnlTime.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.pnlTime.Controls.Add(Me.MyComboBox1) Me.pnlTime.Controls.Add(Me.Label2) Me.pnlTime.Controls.Add(Me.dtpVon) @@ -827,25 +834,12 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.pnlTime.Size = New System.Drawing.Size(307, 57) Me.pnlTime.TabIndex = 12 ' - 'lblHinweis - ' - Me.lblHinweis.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblHinweis.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblHinweis.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.lblHinweis.Location = New System.Drawing.Point(954, 93) - Me.lblHinweis.Name = "lblHinweis" - Me.lblHinweis.Size = New System.Drawing.Size(129, 16) - Me.lblHinweis.TabIndex = 38 - Me.lblHinweis.Text = "Hinweis eingetragen" - Me.lblHinweis.Visible = False - ' 'MyComboBox1 ' Me.MyComboBox1._allowedValuesFreiText = Nothing Me.MyComboBox1._allowFreiText = False Me.MyComboBox1._value = "" Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) Me.MyComboBox1.ForeColor = System.Drawing.Color.White Me.MyComboBox1.FormattingEnabled = True @@ -979,47 +973,47 @@ Partial Class usrCntlHauptfenster_Suche_AVISO Me.gridAviso.AllowUserToAddRows = False Me.gridAviso.AllowUserToDeleteRows = False Me.gridAviso.AllowUserToResizeRows = False - DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure - DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 + DataGridViewCellStyle6.BackColor = System.Drawing.Color.Azure + DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6 Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable - DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue - DataGridViewCellStyle2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] - Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2 + DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle7.BackColor = System.Drawing.Color.LightBlue + DataGridViewCellStyle7.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] + Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7 Me.gridAviso.ColumnHeadersHeight = 25 Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing - DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window - DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText - DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle3 + DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window + DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText + DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle8 Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill Me.gridAviso.Location = New System.Drawing.Point(0, 118) Me.gridAviso.MultiSelect = False Me.gridAviso.Name = "gridAviso" Me.gridAviso.ReadOnly = True - DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft - DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control - DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText - DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight - DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText - DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle4 + DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft + DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control + DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText + DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight + DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText + DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle9 Me.gridAviso.RowHeadersVisible = False Me.gridAviso.RowHeadersWidth = 62 Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing - DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] - Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle5 + DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] + Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle10 Me.gridAviso.RowTemplate.ReadOnly = True Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect diff --git a/Aviso/usrCntlHauptfenster_Suche_SND.Designer.vb b/Aviso/usrCntlHauptfenster_Suche_SND.Designer.vb index e9de69e..71d4f2d 100644 --- a/Aviso/usrCntlHauptfenster_Suche_SND.Designer.vb +++ b/Aviso/usrCntlHauptfenster_Suche_SND.Designer.vb @@ -30,22 +30,41 @@ Partial Class usrCntlHauptfenster_Suche_SND Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Panel1 = New System.Windows.Forms.Panel() - Me.btnDetailsuche = New System.Windows.Forms.Button() - Me.lblDauer = New System.Windows.Forms.Label() - Me.lblEintraege = New System.Windows.Forms.Label() - Me.cbx_My_Brexit = New System.Windows.Forms.CheckBox() - Me.btnColor = New System.Windows.Forms.Button() - Me.lblMySND_Anzeige = New System.Windows.Forms.Label() - Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox() - Me.cboMy_QS = New System.Windows.Forms.CheckBox() - Me.cboMy_VB = New System.Windows.Forms.CheckBox() - Me.lblMySnd_Grenzstelle = New System.Windows.Forms.Label() + Me.cbxLoseSnd = New System.Windows.Forms.CheckBox() + Me.txtAvisierer = New System.Windows.Forms.TextBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.lblErwLKWID = New System.Windows.Forms.Label() + Me.lblAbsender = New System.Windows.Forms.Label() + Me.txtlkwId = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.txtAbsender = New System.Windows.Forms.TextBox() + Me.Button2 = New System.Windows.Forms.Button() + Me.Button1 = New System.Windows.Forms.Button() + Me.lblZeit_aktuell = New System.Windows.Forms.Label() Me.tbcntrAvisoSND = New System.Windows.Forms.TabControl() Me.tbSndAlle = New System.Windows.Forms.TabPage() Me.tbSndOffen = New System.Windows.Forms.TabPage() Me.tbSndFreigegeben = New System.Windows.Forms.TabPage() + Me.btnColor = New System.Windows.Forms.Button() + Me.Button4 = New System.Windows.Forms.Button() + Me.lblDauer = New System.Windows.Forms.Label() + Me.lblMySND_Anzeige = New System.Windows.Forms.Label() + Me.txtKdAuftragsnr = New System.Windows.Forms.TextBox() + Me.lblErwKdAtrNr = New System.Windows.Forms.Label() + Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.btnNeu = New System.Windows.Forms.Button() + Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox() + Me.txtEmpfänger = New System.Windows.Forms.TextBox() + Me.txtAbfertigungsnummer = New System.Windows.Forms.TextBox() + Me.lblErwFilialePos = New System.Windows.Forms.Label() + Me.lblErwEmpfänger = New System.Windows.Forms.Label() + Me.lblEintraege = New System.Windows.Forms.Label() + Me.cboMy_QS = New System.Windows.Forms.CheckBox() + Me.txtAuftraggeber = New System.Windows.Forms.TextBox() + Me.cboMy_VB = New System.Windows.Forms.CheckBox() + Me.lblMySnd_Grenzstelle = New System.Windows.Forms.Label() + Me.lblErwAuftraggeber = New System.Windows.Forms.Label() Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.TimerAkte = New System.Windows.Forms.Timer(Me.components) Me.ctxtFarben = New System.Windows.Forms.ContextMenuStrip(Me.components) @@ -53,10 +72,7 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.ToolStripMenuItem19 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem20 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem21 = New System.Windows.Forms.ToolStripMenuItem() - Me.lblZeit_aktuell = New System.Windows.Forms.Label() - Me.Button1 = New System.Windows.Forms.Button() - Me.Button2 = New System.Windows.Forms.Button() - Me.Label1 = New System.Windows.Forms.Label() + Me.tbNichtEingetroffen = New System.Windows.Forms.TabPage() Me.Panel1.SuspendLayout() Me.tbcntrAvisoSND.SuspendLayout() CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit() @@ -66,171 +82,166 @@ Partial Class usrCntlHauptfenster_Suche_SND 'Panel1 ' Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Panel1.Controls.Add(Me.cbxLoseSnd) + Me.Panel1.Controls.Add(Me.txtAvisierer) + Me.Panel1.Controls.Add(Me.Label2) + Me.Panel1.Controls.Add(Me.lblErwLKWID) + Me.Panel1.Controls.Add(Me.lblAbsender) + Me.Panel1.Controls.Add(Me.txtlkwId) Me.Panel1.Controls.Add(Me.Label1) + Me.Panel1.Controls.Add(Me.txtAbsender) Me.Panel1.Controls.Add(Me.Button2) Me.Panel1.Controls.Add(Me.Button1) Me.Panel1.Controls.Add(Me.lblZeit_aktuell) - Me.Panel1.Controls.Add(Me.cbx_My_Brexit) Me.Panel1.Controls.Add(Me.tbcntrAvisoSND) - Me.Panel1.Controls.Add(Me.btnDetailsuche) Me.Panel1.Controls.Add(Me.btnColor) + Me.Panel1.Controls.Add(Me.Button4) Me.Panel1.Controls.Add(Me.lblDauer) Me.Panel1.Controls.Add(Me.lblMySND_Anzeige) + Me.Panel1.Controls.Add(Me.txtKdAuftragsnr) + Me.Panel1.Controls.Add(Me.lblErwKdAtrNr) Me.Panel1.Controls.Add(Me.cboMyAvisoAnzeige) Me.Panel1.Controls.Add(Me.btnNeu) Me.Panel1.Controls.Add(Me.cboMy_Grenzstelle) + Me.Panel1.Controls.Add(Me.cboFiliale) + Me.Panel1.Controls.Add(Me.txtEmpfänger) + Me.Panel1.Controls.Add(Me.txtAbfertigungsnummer) + Me.Panel1.Controls.Add(Me.lblErwFilialePos) + Me.Panel1.Controls.Add(Me.lblErwEmpfänger) Me.Panel1.Controls.Add(Me.lblEintraege) Me.Panel1.Controls.Add(Me.cboMy_QS) + Me.Panel1.Controls.Add(Me.txtAuftraggeber) Me.Panel1.Controls.Add(Me.cboMy_VB) Me.Panel1.Controls.Add(Me.lblMySnd_Grenzstelle) + Me.Panel1.Controls.Add(Me.lblErwAuftraggeber) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top Me.Panel1.Font = New System.Drawing.Font("Segoe UI", 9.0!) Me.Panel1.Location = New System.Drawing.Point(0, 0) Me.Panel1.Name = "Panel1" - Me.Panel1.Size = New System.Drawing.Size(1243, 76) + Me.Panel1.Size = New System.Drawing.Size(1243, 115) Me.Panel1.TabIndex = 3 ' - 'btnDetailsuche + 'cbxLoseSnd ' - Me.btnDetailsuche.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer)) - Me.btnDetailsuche.FlatAppearance.BorderColor = System.Drawing.Color.Black - Me.btnDetailsuche.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnDetailsuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!) - Me.btnDetailsuche.ForeColor = System.Drawing.Color.White - Me.btnDetailsuche.ImageAlign = System.Drawing.ContentAlignment.TopRight - Me.btnDetailsuche.Location = New System.Drawing.Point(788, 11) - Me.btnDetailsuche.Margin = New System.Windows.Forms.Padding(0) - Me.btnDetailsuche.Name = "btnDetailsuche" - Me.btnDetailsuche.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0) - Me.btnDetailsuche.Size = New System.Drawing.Size(185, 27) - Me.btnDetailsuche.TabIndex = 39 - Me.btnDetailsuche.Text = "Detailsuche" - Me.btnDetailsuche.UseVisualStyleBackColor = False + Me.cbxLoseSnd.AutoSize = True + Me.cbxLoseSnd.ForeColor = System.Drawing.Color.White + Me.cbxLoseSnd.Location = New System.Drawing.Point(832, 53) + Me.cbxLoseSnd.Name = "cbxLoseSnd" + Me.cbxLoseSnd.Size = New System.Drawing.Size(181, 19) + Me.cbxLoseSnd.TabIndex = 46 + Me.cbxLoseSnd.Text = "nur lose Sendungen anzeigen" + Me.cbxLoseSnd.UseVisualStyleBackColor = True + Me.cbxLoseSnd.Visible = False ' - 'lblDauer + 'txtAvisierer ' - Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblDauer.BackColor = System.Drawing.Color.Transparent - Me.lblDauer.ForeColor = System.Drawing.Color.White - Me.lblDauer.Location = New System.Drawing.Point(974, 21) - Me.lblDauer.Name = "lblDauer" - Me.lblDauer.Size = New System.Drawing.Size(136, 17) - Me.lblDauer.TabIndex = 27 - Me.lblDauer.Text = "1111123 ms" - Me.lblDauer.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.txtAvisierer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAvisierer.Location = New System.Drawing.Point(622, 50) + Me.txtAvisierer.MaxLength = 100 + Me.txtAvisierer.Name = "txtAvisierer" + Me.txtAvisierer.Size = New System.Drawing.Size(199, 23) + Me.txtAvisierer.TabIndex = 44 ' - 'lblEintraege + 'Label2 ' - Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblEintraege.BackColor = System.Drawing.Color.Transparent - Me.lblEintraege.ForeColor = System.Drawing.Color.White - Me.lblEintraege.Location = New System.Drawing.Point(971, 8) - Me.lblEintraege.Name = "lblEintraege" - Me.lblEintraege.Size = New System.Drawing.Size(139, 15) - Me.lblEintraege.TabIndex = 14 - Me.lblEintraege.Text = "0 Einträge" - Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight + Me.Label2.AutoSize = True + Me.Label2.ForeColor = System.Drawing.Color.White + Me.Label2.Location = New System.Drawing.Point(619, 32) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(55, 15) + Me.Label2.TabIndex = 45 + Me.Label2.Text = "Avisierer:" ' - 'cbx_My_Brexit + 'lblErwLKWID ' - Me.cbx_My_Brexit.AutoSize = True - Me.cbx_My_Brexit.ForeColor = System.Drawing.Color.White - Me.cbx_My_Brexit.Location = New System.Drawing.Point(342, 6) - Me.cbx_My_Brexit.Name = "cbx_My_Brexit" - Me.cbx_My_Brexit.Size = New System.Drawing.Size(63, 19) - Me.cbx_My_Brexit.TabIndex = 28 - Me.cbx_My_Brexit.Text = "BREXIT" - Me.cbx_My_Brexit.UseVisualStyleBackColor = True - Me.cbx_My_Brexit.Visible = False + Me.lblErwLKWID.AutoSize = True + Me.lblErwLKWID.ForeColor = System.Drawing.Color.White + Me.lblErwLKWID.Location = New System.Drawing.Point(619, 9) + Me.lblErwLKWID.Name = "lblErwLKWID" + Me.lblErwLKWID.Size = New System.Drawing.Size(49, 15) + Me.lblErwLKWID.TabIndex = 19 + Me.lblErwLKWID.Text = "LKW-Id:" ' - 'btnColor + 'lblAbsender ' - Me.btnColor.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.btnColor.BackColor = System.Drawing.Color.White - Me.btnColor.Location = New System.Drawing.Point(937, 50) - Me.btnColor.Name = "btnColor" - Me.btnColor.Size = New System.Drawing.Size(36, 23) - Me.btnColor.TabIndex = 37 - Me.btnColor.UseVisualStyleBackColor = False + Me.lblAbsender.AutoSize = True + Me.lblAbsender.ForeColor = System.Drawing.Color.White + Me.lblAbsender.Location = New System.Drawing.Point(209, 32) + Me.lblAbsender.Name = "lblAbsender" + Me.lblAbsender.Size = New System.Drawing.Size(60, 15) + Me.lblAbsender.TabIndex = 23 + Me.lblAbsender.Text = "Absender:" ' - 'lblMySND_Anzeige + 'txtlkwId ' - Me.lblMySND_Anzeige.AutoSize = True - Me.lblMySND_Anzeige.ForeColor = System.Drawing.Color.White - Me.lblMySND_Anzeige.Location = New System.Drawing.Point(142, 7) - Me.lblMySND_Anzeige.Name = "lblMySND_Anzeige" - Me.lblMySND_Anzeige.Size = New System.Drawing.Size(52, 15) - Me.lblMySND_Anzeige.TabIndex = 20 - Me.lblMySND_Anzeige.Text = "Anzeige:" + Me.txtlkwId.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtlkwId.Location = New System.Drawing.Point(674, 5) + Me.txtlkwId.MaxLength = 100 + Me.txtlkwId.Name = "txtlkwId" + Me.txtlkwId.Size = New System.Drawing.Size(147, 23) + Me.txtlkwId.TabIndex = 10 ' - 'cboMyAvisoAnzeige + 'Label1 ' - Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing - Me.cboMyAvisoAnzeige._allowFreiText = False - Me.cboMyAvisoAnzeige._value = "" - Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke - Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) - Me.cboMyAvisoAnzeige.FormattingEnabled = True - Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(200, 5) - Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige" - Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(118, 21) - Me.cboMyAvisoAnzeige.TabIndex = 21 + Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Label1.AutoSize = True + Me.Label1.ForeColor = System.Drawing.Color.White + Me.Label1.Location = New System.Drawing.Point(892, 89) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(63, 15) + Me.Label1.TabIndex = 43 + Me.Label1.Text = "Prio/Stufe:" ' - 'cboMy_Grenzstelle + 'txtAbsender ' - Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing - Me.cboMy_Grenzstelle._allowFreiText = False - Me.cboMy_Grenzstelle._value = "" - Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke - Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList - Me.cboMy_Grenzstelle.DropDownWidth = 120 - Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) - Me.cboMy_Grenzstelle.FormattingEnabled = True - Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(72, 5) - Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle" - Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21) - Me.cboMy_Grenzstelle.TabIndex = 26 + Me.txtAbsender.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAbsender.Location = New System.Drawing.Point(212, 50) + Me.txtAbsender.MaxLength = 100 + Me.txtAbsender.Name = "txtAbsender" + Me.txtAbsender.Size = New System.Drawing.Size(199, 23) + Me.txtAbsender.TabIndex = 2 ' - 'cboMy_QS + 'Button2 ' - Me.cboMy_QS.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.cboMy_QS.AutoSize = True - Me.cboMy_QS.Checked = True - Me.cboMy_QS.CheckState = System.Windows.Forms.CheckState.Indeterminate - Me.cboMy_QS.ForeColor = System.Drawing.Color.White - Me.cboMy_QS.Location = New System.Drawing.Point(1203, 55) - Me.cboMy_QS.Name = "cboMy_QS" - Me.cboMy_QS.Size = New System.Drawing.Size(15, 14) - Me.cboMy_QS.TabIndex = 33 - Me.cboMy_QS.ThreeState = True - Me.cboMy_QS.UseVisualStyleBackColor = True + Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button2.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) + Me.Button2.Font = New System.Drawing.Font("Segoe UI", 9.0!) + Me.Button2.ForeColor = System.Drawing.Color.White + Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button2.Location = New System.Drawing.Point(1015, 86) + Me.Button2.MaximumSize = New System.Drawing.Size(121, 35) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(88, 24) + Me.Button2.TabIndex = 42 + Me.Button2.Text = "Abklärung" + Me.Button2.UseVisualStyleBackColor = False ' - 'cboMy_VB + 'Button1 ' - Me.cboMy_VB.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.cboMy_VB.AutoSize = True - Me.cboMy_VB.Checked = True - Me.cboMy_VB.CheckState = System.Windows.Forms.CheckState.Indeterminate - Me.cboMy_VB.ForeColor = System.Drawing.Color.White - Me.cboMy_VB.Location = New System.Drawing.Point(1222, 55) - Me.cboMy_VB.Name = "cboMy_VB" - Me.cboMy_VB.Size = New System.Drawing.Size(15, 14) - Me.cboMy_VB.TabIndex = 32 - Me.cboMy_VB.ThreeState = True - Me.cboMy_VB.UseVisualStyleBackColor = True + Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button1.BackColor = System.Drawing.Color.Purple + Me.Button1.Font = New System.Drawing.Font("Segoe UI", 9.0!) + Me.Button1.ForeColor = System.Drawing.Color.White + Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button1.Location = New System.Drawing.Point(1109, 86) + Me.Button1.MaximumSize = New System.Drawing.Size(121, 35) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(88, 24) + Me.Button1.TabIndex = 41 + Me.Button1.Text = "Vorschreiben" + Me.Button1.UseVisualStyleBackColor = False ' - 'lblMySnd_Grenzstelle + 'lblZeit_aktuell ' - Me.lblMySnd_Grenzstelle.AutoSize = True - Me.lblMySnd_Grenzstelle.ForeColor = System.Drawing.Color.White - Me.lblMySnd_Grenzstelle.Location = New System.Drawing.Point(4, 8) - Me.lblMySnd_Grenzstelle.Name = "lblMySnd_Grenzstelle" - Me.lblMySnd_Grenzstelle.Size = New System.Drawing.Size(67, 15) - Me.lblMySnd_Grenzstelle.TabIndex = 25 - Me.lblMySnd_Grenzstelle.Text = "Grenzstelle:" + Me.lblZeit_aktuell.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblZeit_aktuell.AutoSize = True + Me.lblZeit_aktuell.ForeColor = System.Drawing.Color.White + Me.lblZeit_aktuell.Location = New System.Drawing.Point(1012, 38) + Me.lblZeit_aktuell.Name = "lblZeit_aktuell" + Me.lblZeit_aktuell.Size = New System.Drawing.Size(101, 15) + Me.lblZeit_aktuell.TabIndex = 40 + Me.lblZeit_aktuell.Text = "Refresh: 11:22 Uhr" + Me.lblZeit_aktuell.Visible = False ' 'tbcntrAvisoSND ' @@ -238,14 +249,15 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.tbcntrAvisoSND.Controls.Add(Me.tbSndAlle) Me.tbcntrAvisoSND.Controls.Add(Me.tbSndOffen) Me.tbcntrAvisoSND.Controls.Add(Me.tbSndFreigegeben) + Me.tbcntrAvisoSND.Controls.Add(Me.tbNichtEingetroffen) Me.tbcntrAvisoSND.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.tbcntrAvisoSND.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.tbcntrAvisoSND.ItemSize = New System.Drawing.Size(60, 30) - Me.tbcntrAvisoSND.Location = New System.Drawing.Point(3, 45) + Me.tbcntrAvisoSND.Location = New System.Drawing.Point(3, 84) Me.tbcntrAvisoSND.Name = "tbcntrAvisoSND" Me.tbcntrAvisoSND.Padding = New System.Drawing.Point(12, 3) Me.tbcntrAvisoSND.SelectedIndex = 0 - Me.tbcntrAvisoSND.Size = New System.Drawing.Size(360, 31) + Me.tbcntrAvisoSND.Size = New System.Drawing.Size(486, 31) Me.tbcntrAvisoSND.TabIndex = 27 Me.tbcntrAvisoSND.Visible = False ' @@ -257,7 +269,7 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.tbSndAlle.Location = New System.Drawing.Point(4, 34) Me.tbSndAlle.Name = "tbSndAlle" Me.tbSndAlle.Padding = New System.Windows.Forms.Padding(3) - Me.tbSndAlle.Size = New System.Drawing.Size(352, 0) + Me.tbSndAlle.Size = New System.Drawing.Size(478, 0) Me.tbSndAlle.TabIndex = 0 Me.tbSndAlle.Text = "Alle Sendungen" ' @@ -268,19 +280,102 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.tbSndOffen.Location = New System.Drawing.Point(4, 34) Me.tbSndOffen.Name = "tbSndOffen" Me.tbSndOffen.Padding = New System.Windows.Forms.Padding(3) - Me.tbSndOffen.Size = New System.Drawing.Size(121, 0) + Me.tbSndOffen.Size = New System.Drawing.Size(478, 0) Me.tbSndOffen.TabIndex = 1 - Me.tbSndOffen.Text = "Offen" + Me.tbSndOffen.Text = "In Bearbeitung" ' 'tbSndFreigegeben ' Me.tbSndFreigegeben.Location = New System.Drawing.Point(4, 34) Me.tbSndFreigegeben.Name = "tbSndFreigegeben" - Me.tbSndFreigegeben.Size = New System.Drawing.Size(121, 0) + Me.tbSndFreigegeben.Size = New System.Drawing.Size(478, 0) Me.tbSndFreigegeben.TabIndex = 2 - Me.tbSndFreigegeben.Text = "Freigegeben" + Me.tbSndFreigegeben.Text = "Überlassen" Me.tbSndFreigegeben.UseVisualStyleBackColor = True ' + 'btnColor + ' + Me.btnColor.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnColor.BackColor = System.Drawing.Color.White + Me.btnColor.Location = New System.Drawing.Point(961, 87) + Me.btnColor.Name = "btnColor" + Me.btnColor.Size = New System.Drawing.Size(36, 23) + Me.btnColor.TabIndex = 37 + Me.btnColor.UseVisualStyleBackColor = False + ' + 'Button4 + ' + Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.ForeColor = System.Drawing.Color.White + Me.Button4.Image = Global.AVISO.My.Resources.Resources.search + Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button4.Location = New System.Drawing.Point(916, 5) + Me.Button4.Name = "Button4" + Me.Button4.Size = New System.Drawing.Size(92, 44) + Me.Button4.TabIndex = 17 + Me.Button4.TabStop = False + Me.Button4.Text = "Suche" + Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button4.UseVisualStyleBackColor = True + ' + 'lblDauer + ' + Me.lblDauer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblDauer.BackColor = System.Drawing.Color.Transparent + Me.lblDauer.ForeColor = System.Drawing.Color.White + Me.lblDauer.Location = New System.Drawing.Point(1005, 21) + Me.lblDauer.Name = "lblDauer" + Me.lblDauer.Size = New System.Drawing.Size(105, 17) + Me.lblDauer.TabIndex = 27 + Me.lblDauer.Text = "1111123 ms" + Me.lblDauer.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'lblMySND_Anzeige + ' + Me.lblMySND_Anzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblMySND_Anzeige.AutoSize = True + Me.lblMySND_Anzeige.ForeColor = System.Drawing.Color.White + Me.lblMySND_Anzeige.Location = New System.Drawing.Point(710, 89) + Me.lblMySND_Anzeige.Name = "lblMySND_Anzeige" + Me.lblMySND_Anzeige.Size = New System.Drawing.Size(52, 15) + Me.lblMySND_Anzeige.TabIndex = 20 + Me.lblMySND_Anzeige.Text = "Anzeige:" + ' + 'txtKdAuftragsnr + ' + Me.txtKdAuftragsnr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtKdAuftragsnr.Location = New System.Drawing.Point(495, 5) + Me.txtKdAuftragsnr.MaxLength = 100 + Me.txtKdAuftragsnr.Name = "txtKdAuftragsnr" + Me.txtKdAuftragsnr.Size = New System.Drawing.Size(121, 23) + Me.txtKdAuftragsnr.TabIndex = 9 + ' + 'lblErwKdAtrNr + ' + Me.lblErwKdAtrNr.AutoSize = True + Me.lblErwKdAtrNr.ForeColor = System.Drawing.Color.White + Me.lblErwKdAtrNr.Location = New System.Drawing.Point(414, 9) + Me.lblErwKdAtrNr.Name = "lblErwKdAtrNr" + Me.lblErwKdAtrNr.Size = New System.Drawing.Size(75, 15) + Me.lblErwKdAtrNr.TabIndex = 0 + Me.lblErwKdAtrNr.Text = "Kd-Auftr.Nr.:" + ' + 'cboMyAvisoAnzeige + ' + Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing + Me.cboMyAvisoAnzeige._allowFreiText = False + Me.cboMyAvisoAnzeige._value = "" + Me.cboMyAvisoAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke + Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) + Me.cboMyAvisoAnzeige.FormattingEnabled = True + Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(768, 87) + Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige" + Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(118, 21) + Me.cboMyAvisoAnzeige.TabIndex = 21 + ' 'btnNeu ' Me.btnNeu.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) @@ -296,7 +391,144 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.btnNeu.Text = "Sendung" Me.btnNeu.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnNeu.UseVisualStyleBackColor = True - Me.btnNeu.Visible = False + ' + 'cboMy_Grenzstelle + ' + Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing + Me.cboMy_Grenzstelle._allowFreiText = False + Me.cboMy_Grenzstelle._value = "" + Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke + Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboMy_Grenzstelle.DropDownWidth = 120 + Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.cboMy_Grenzstelle.FormattingEnabled = True + Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(72, 5) + Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle" + Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 24) + Me.cboMy_Grenzstelle.TabIndex = 26 + ' + 'cboFiliale + ' + Me.cboFiliale._allowedValuesFreiText = Nothing + Me.cboFiliale._allowFreiText = False + Me.cboFiliale._value = "" + Me.cboFiliale.DropDownWidth = 300 + Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cboFiliale.FormattingEnabled = True + Me.cboFiliale.Location = New System.Drawing.Point(212, 4) + Me.cboFiliale.MaxLength = 4 + Me.cboFiliale.Name = "cboFiliale" + Me.cboFiliale.Size = New System.Drawing.Size(70, 24) + Me.cboFiliale.TabIndex = 3 + ' + 'txtEmpfänger + ' + Me.txtEmpfänger.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtEmpfänger.Location = New System.Drawing.Point(417, 50) + Me.txtEmpfänger.MaxLength = 100 + Me.txtEmpfänger.Name = "txtEmpfänger" + Me.txtEmpfänger.Size = New System.Drawing.Size(199, 23) + Me.txtEmpfänger.TabIndex = 3 + ' + 'txtAbfertigungsnummer + ' + Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(281, 5) + Me.txtAbfertigungsnummer.MaxLength = 8 + Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer" + Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(130, 23) + Me.txtAbfertigungsnummer.TabIndex = 5 + ' + 'lblErwFilialePos + ' + Me.lblErwFilialePos.AutoSize = True + Me.lblErwFilialePos.ForeColor = System.Drawing.Color.White + Me.lblErwFilialePos.Location = New System.Drawing.Point(142, 9) + Me.lblErwFilialePos.Name = "lblErwFilialePos" + Me.lblErwFilialePos.Size = New System.Drawing.Size(64, 15) + Me.lblErwFilialePos.TabIndex = 2 + Me.lblErwFilialePos.Text = "Filiale/Pos:" + ' + 'lblErwEmpfänger + ' + Me.lblErwEmpfänger.AutoSize = True + Me.lblErwEmpfänger.ForeColor = System.Drawing.Color.White + Me.lblErwEmpfänger.Location = New System.Drawing.Point(414, 34) + Me.lblErwEmpfänger.Name = "lblErwEmpfänger" + Me.lblErwEmpfänger.Size = New System.Drawing.Size(68, 15) + Me.lblErwEmpfänger.TabIndex = 6 + Me.lblErwEmpfänger.Text = "Empfänger:" + ' + 'lblEintraege + ' + Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lblEintraege.BackColor = System.Drawing.Color.Transparent + Me.lblEintraege.ForeColor = System.Drawing.Color.White + Me.lblEintraege.Location = New System.Drawing.Point(971, 8) + Me.lblEintraege.Name = "lblEintraege" + Me.lblEintraege.Size = New System.Drawing.Size(139, 15) + Me.lblEintraege.TabIndex = 14 + Me.lblEintraege.Text = "0 Einträge" + Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight + ' + 'cboMy_QS + ' + Me.cboMy_QS.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.cboMy_QS.AutoSize = True + Me.cboMy_QS.Checked = True + Me.cboMy_QS.CheckState = System.Windows.Forms.CheckState.Indeterminate + Me.cboMy_QS.FlatAppearance.CheckedBackColor = System.Drawing.Color.Yellow + Me.cboMy_QS.ForeColor = System.Drawing.Color.White + Me.cboMy_QS.Location = New System.Drawing.Point(1203, 92) + Me.cboMy_QS.Name = "cboMy_QS" + Me.cboMy_QS.Size = New System.Drawing.Size(15, 14) + Me.cboMy_QS.TabIndex = 33 + Me.cboMy_QS.ThreeState = True + Me.cboMy_QS.UseVisualStyleBackColor = True + ' + 'txtAuftraggeber + ' + Me.txtAuftraggeber.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAuftraggeber.Location = New System.Drawing.Point(7, 50) + Me.txtAuftraggeber.MaxLength = 100 + Me.txtAuftraggeber.Name = "txtAuftraggeber" + Me.txtAuftraggeber.Size = New System.Drawing.Size(199, 23) + Me.txtAuftraggeber.TabIndex = 1 + ' + 'cboMy_VB + ' + Me.cboMy_VB.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.cboMy_VB.AutoSize = True + Me.cboMy_VB.Checked = True + Me.cboMy_VB.CheckState = System.Windows.Forms.CheckState.Indeterminate + Me.cboMy_VB.FlatAppearance.CheckedBackColor = System.Drawing.Color.Yellow + Me.cboMy_VB.ForeColor = System.Drawing.Color.White + Me.cboMy_VB.Location = New System.Drawing.Point(1222, 92) + Me.cboMy_VB.Name = "cboMy_VB" + Me.cboMy_VB.Size = New System.Drawing.Size(15, 14) + Me.cboMy_VB.TabIndex = 32 + Me.cboMy_VB.ThreeState = True + Me.cboMy_VB.UseVisualStyleBackColor = True + ' + 'lblMySnd_Grenzstelle + ' + Me.lblMySnd_Grenzstelle.AutoSize = True + Me.lblMySnd_Grenzstelle.ForeColor = System.Drawing.Color.White + Me.lblMySnd_Grenzstelle.Location = New System.Drawing.Point(4, 9) + Me.lblMySnd_Grenzstelle.Name = "lblMySnd_Grenzstelle" + Me.lblMySnd_Grenzstelle.Size = New System.Drawing.Size(67, 15) + Me.lblMySnd_Grenzstelle.TabIndex = 25 + Me.lblMySnd_Grenzstelle.Text = "Grenzstelle:" + ' + 'lblErwAuftraggeber + ' + Me.lblErwAuftraggeber.AutoSize = True + Me.lblErwAuftraggeber.ForeColor = System.Drawing.Color.White + Me.lblErwAuftraggeber.Location = New System.Drawing.Point(4, 32) + Me.lblErwAuftraggeber.Name = "lblErwAuftraggeber" + Me.lblErwAuftraggeber.Size = New System.Drawing.Size(80, 15) + Me.lblErwAuftraggeber.TabIndex = 7 + Me.lblErwAuftraggeber.Text = "Auftraggeber:" ' 'gridAviso ' @@ -308,6 +540,7 @@ Partial Class usrCntlHauptfenster_Suche_SND DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray + Me.gridAviso.CausesValidation = False Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue @@ -328,7 +561,7 @@ Partial Class usrCntlHauptfenster_Suche_SND DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle3 Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill - Me.gridAviso.Location = New System.Drawing.Point(0, 76) + Me.gridAviso.Location = New System.Drawing.Point(0, 115) Me.gridAviso.MultiSelect = False Me.gridAviso.Name = "gridAviso" Me.gridAviso.ReadOnly = True @@ -348,7 +581,7 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.gridAviso.RowTemplate.ReadOnly = True Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.gridAviso.Size = New System.Drawing.Size(1243, 556) + Me.gridAviso.Size = New System.Drawing.Size(1243, 517) Me.gridAviso.TabIndex = 4 Me.gridAviso.TabStop = False ' @@ -390,58 +623,14 @@ Partial Class usrCntlHauptfenster_Suche_SND Me.ToolStripMenuItem21.Size = New System.Drawing.Size(121, 22) Me.ToolStripMenuItem21.Text = "GELB" ' - 'lblZeit_aktuell + 'tbNichtEingetroffen ' - Me.lblZeit_aktuell.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.lblZeit_aktuell.AutoSize = True - Me.lblZeit_aktuell.ForeColor = System.Drawing.Color.White - Me.lblZeit_aktuell.Location = New System.Drawing.Point(668, 13) - Me.lblZeit_aktuell.Name = "lblZeit_aktuell" - Me.lblZeit_aktuell.Size = New System.Drawing.Size(101, 15) - Me.lblZeit_aktuell.TabIndex = 40 - Me.lblZeit_aktuell.Text = "Refresh: 11:22 Uhr" - Me.lblZeit_aktuell.Visible = False - ' - 'Button1 - ' - Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button1.BackColor = System.Drawing.Color.Purple - Me.Button1.Font = New System.Drawing.Font("Segoe UI", 9.0!) - Me.Button1.ForeColor = System.Drawing.Color.White - Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button1.Location = New System.Drawing.Point(1109, 49) - Me.Button1.MaximumSize = New System.Drawing.Size(121, 35) - Me.Button1.Name = "Button1" - Me.Button1.Size = New System.Drawing.Size(88, 24) - Me.Button1.TabIndex = 41 - Me.Button1.Text = "Vorschreiben" - Me.Button1.UseVisualStyleBackColor = False - ' - 'Button2 - ' - Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button2.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) - Me.Button2.Font = New System.Drawing.Font("Segoe UI", 9.0!) - Me.Button2.ForeColor = System.Drawing.Color.White - Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button2.Location = New System.Drawing.Point(1015, 49) - Me.Button2.MaximumSize = New System.Drawing.Size(121, 35) - Me.Button2.Name = "Button2" - Me.Button2.Size = New System.Drawing.Size(88, 24) - Me.Button2.TabIndex = 42 - Me.Button2.Text = "Abklärung" - Me.Button2.UseVisualStyleBackColor = False - ' - 'Label1 - ' - Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Label1.AutoSize = True - Me.Label1.ForeColor = System.Drawing.Color.White - Me.Label1.Location = New System.Drawing.Point(868, 54) - Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(63, 15) - Me.Label1.TabIndex = 43 - Me.Label1.Text = "Prio/Stufe:" + Me.tbNichtEingetroffen.Location = New System.Drawing.Point(4, 34) + Me.tbNichtEingetroffen.Name = "tbNichtEingetroffen" + Me.tbNichtEingetroffen.Size = New System.Drawing.Size(478, 0) + Me.tbNichtEingetroffen.TabIndex = 3 + Me.tbNichtEingetroffen.Text = "Nicht Eingetroffen" + Me.tbNichtEingetroffen.UseVisualStyleBackColor = True ' 'usrCntlHauptfenster_Suche_SND ' @@ -461,7 +650,6 @@ Partial Class usrCntlHauptfenster_Suche_SND End Sub Friend WithEvents Panel1 As Panel - Friend WithEvents cbx_My_Brexit As CheckBox Friend WithEvents btnColor As Button Friend WithEvents lblMySND_Anzeige As Label Friend WithEvents cboMyAvisoAnzeige As VERAG_PROG_ALLGEMEIN.MyComboBox @@ -483,9 +671,26 @@ Partial Class usrCntlHauptfenster_Suche_SND Friend WithEvents ToolStripMenuItem21 As ToolStripMenuItem Friend WithEvents lblDauer As Label Friend WithEvents btnNeu As Button - Friend WithEvents btnDetailsuche As Button Friend WithEvents lblZeit_aktuell As Label Friend WithEvents Button2 As Button Friend WithEvents Button1 As Button Friend WithEvents Label1 As Label + Friend WithEvents lblAbsender As Label + Friend WithEvents txtAbsender As TextBox + Friend WithEvents txtKdAuftragsnr As TextBox + Friend WithEvents lblErwKdAtrNr As Label + Friend WithEvents cboFiliale As VERAG_PROG_ALLGEMEIN.MyComboBox + Friend WithEvents txtEmpfänger As TextBox + Friend WithEvents txtAbfertigungsnummer As TextBox + Friend WithEvents lblErwFilialePos As Label + Friend WithEvents lblErwEmpfänger As Label + Friend WithEvents txtAuftraggeber As TextBox + Friend WithEvents lblErwAuftraggeber As Label + Friend WithEvents lblErwLKWID As Label + Friend WithEvents txtlkwId As TextBox + Friend WithEvents Button4 As Button + Friend WithEvents txtAvisierer As TextBox + Friend WithEvents Label2 As Label + Friend WithEvents cbxLoseSnd As CheckBox + Friend WithEvents tbNichtEingetroffen As TabPage End Class diff --git a/Aviso/usrCntlHauptfenster_Suche_SND.vb b/Aviso/usrCntlHauptfenster_Suche_SND.vb index 3ea4272..ddcd05e 100644 --- a/Aviso/usrCntlHauptfenster_Suche_SND.vb +++ b/Aviso/usrCntlHauptfenster_Suche_SND.vb @@ -16,6 +16,7 @@ Public Class usrCntlHauptfenster_Suche_SND Private FUNC As New AvisoStatusFunctions Dim OptionenDAL As New VERAG_PROG_ALLGEMEIN.cOptionenDAL + Dim sd = 0 Dim closeOK = False Dim Fullscreen = False @@ -45,6 +46,12 @@ Public Class usrCntlHauptfenster_Suche_SND 'pnlSearch.Height = 145 PARENT_FRMHAUPTFENSTER = PARENT_FRMHAUPTFENSTER + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then + btnColor.Visible = True 'Not cbx_My_LKW.Checked + Else + btnColor.Visible = False + End If + ' txtBestimmungszollstelle.initSearchBox(Me.FindForm, "[Code] ,[Code] as Nr,Description as Dienststelle,left(Code,2) as Land,[Description] +' (' +left(Code,2)+')' as display FROM [tbl_DY_ZollDE_C0141_Zollstellen]", {" [Code]", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", " left(Code,2),[Description]", "Code", "display", "FMZOLL", , 400, 200, {"display", "Code"}) @@ -131,9 +138,9 @@ Public Class usrCntlHauptfenster_Suche_SND SucheStandort = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG.Trim - If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("BREXIT", "AVISO") Then - cbx_My_Brexit.Checked = True - End If + 'If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("BREXIT", "AVISO") Then + ' cbx_My_Brexit.Checked = True + 'End If @@ -141,6 +148,21 @@ Public Class usrCntlHauptfenster_Suche_SND TimerAkte.Enabled = True + 'Wenn VERIMEX/T1 und cboMyAvisoAnzeige geändert --> Checkboxes richtig setzen + If sender Is cboMyAvisoAnzeige Then + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then + Grid_aktiv = False + If cboMyAvisoAnzeige._value = "T1" Then + cboMy_QS.CheckState = CheckState.Checked + cboMy_VB.CheckState = CheckState.Unchecked + Else + cboMy_QS.CheckState = CheckState.Indeterminate + cboMy_VB.CheckState = CheckState.Indeterminate + End If + Grid_aktiv = True + End If + End If + ' pnlSearch.Visible = False initPnlSearch() Grid_aktiv = True @@ -270,28 +292,36 @@ Public Class usrCntlHauptfenster_Suche_SND - .Columns("tblSnd_Status").Visible = False + .Columns("tblSnd_Status").Visible = False - .Columns("tblSnd_Abfertigungsart_ID").Visible = False - .Columns("tblSnd_Zollsystem_Land").Visible = False - .Columns("tblSnd_Vorgeschrieben").Visible = False - .Columns("tblSnd_Vorbereitet").Visible = False - .Columns("tblSnd_SendungID").Visible = False - .Columns("tblSnd_Fremdspedition").Visible = False - .Columns("tblSnd_FremdspeditionText").Visible = False + .Columns("tblSnd_Abfertigungsart_ID").Visible = False + .Columns("tblSnd_Zollsystem_Land").Visible = False + .Columns("tblSnd_Vorgeschrieben").Visible = False + .Columns("tblSnd_Vorbereitet").Visible = False + .Columns("tblSnd_SendungID").Visible = False + .Columns("tblSnd_Fremdspedition").Visible = False + .Columns("tblSnd_FremdspeditionText").Visible = False - .Columns("tblSnd_Empfaenger").MinimumWidth = 80 - .Columns("tblSnd_Empfaenger").HeaderText = "Empfaenger" - .Columns("tblSnd_Empfaenger").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill + .Columns("tblSnd_Absender").MinimumWidth = 80 + .Columns("tblSnd_Absender").HeaderText = "Absender" + .Columns("tblSnd_Absender").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill - .Columns("VoraussichtlichesEintreffen").Width = 55 - .Columns("VoraussichtlichesEintreffen").HeaderText = "Eintreffen" - .Columns("VoraussichtlichesEintreffen").DefaultCellStyle.Format = "dd.MM." + .Columns("tblSnd_Empfaenger").MinimumWidth = 80 + .Columns("tblSnd_Empfaenger").HeaderText = "Empfaenger" + .Columns("tblSnd_Empfaenger").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill - ' .Columns("Vermerke_Anzahl").Width = 60 - ' .Columns("Vermerke_Anzahl").HeaderText = "Vermerke" - ' .Columns("Vermerke_Anzahl").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter - .Columns("AbfertigungsNr").Width = 110 + .Columns("tblSnd_Avisierer").MinimumWidth = 80 + .Columns("tblSnd_Avisierer").HeaderText = "Avisierer" + .Columns("tblSnd_Avisierer").AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill + + .Columns("VoraussichtlichesEintreffen").Width = 55 + .Columns("VoraussichtlichesEintreffen").HeaderText = "Eintreffen" + .Columns("VoraussichtlichesEintreffen").DefaultCellStyle.Format = "dd.MM." + + ' .Columns("Vermerke_Anzahl").Width = 60 + ' .Columns("Vermerke_Anzahl").HeaderText = "Vermerke" + ' .Columns("Vermerke_Anzahl").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter + .Columns("AbfertigungsNr").Width = 110 .Columns("AbfertigungsNr").HeaderText = "Pos-Nr." .Columns("AbfertigungsNr").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft .Columns("AbfertigungsNr").Visible = False @@ -533,6 +563,9 @@ Public Class usrCntlHauptfenster_Suche_SND If AVISO_TYP = "SND" Then + Dim AMBAR_AnzeigenSQL As String = " (tblSendungen.FilialenNr IN('5701') AND tblSnd_Abfertigungsart_ID IN(1,38,39,46,66)) " + + '---------------------------------------------------------------------------------------------------------------------------------- '--- Sendung --- '---------------------------------------------------------------------------------------------------------------------------------- @@ -548,7 +581,7 @@ Public Class usrCntlHauptfenster_Suche_SND ElseIf cboMyAvisoAnzeige._value <> "Benutzer" And IsNumeric(cboMyAvisoAnzeige._value) Then If cboMyAvisoAnzeige._value = "27" Then ' TEAM SALZBURG inBearbeitungSQL = " ((Aviso.[TeamId]= " & cboMyAvisoAnzeige._value & " AND tblSendungen.[tblSnd_TeamId] is null) OR tblSendungen.[tblSnd_TeamId]= " & cboMyAvisoAnzeige._value & " OR tblSendungen.LetzterMitarbeiterId=@maId - OR Grenzstelle IN('SBG') OR (tblSendungen.FilialenNr IN('5701') AND tblSnd_Abfertigungsart_ID IN(1,38,39,46,66)) ) " + OR Grenzstelle IN('SBG') OR (" & AMBAR_AnzeigenSQL & ") ) " Else inBearbeitungSQL = " ((Aviso.[TeamId]= " & cboMyAvisoAnzeige._value & " AND tblSendungen.[tblSnd_TeamId] is null) OR tblSendungen.[tblSnd_TeamId]= " & cboMyAvisoAnzeige._value & " OR tblSendungen.LetzterMitarbeiterId=@maId) " @@ -557,13 +590,12 @@ Public Class usrCntlHauptfenster_Suche_SND End If - Dim hSQLFirma = "" hSQL = " SELECT " & top & " AvisoID, CASE WHEN [LKW_fertig] = 1 THEN 'OK' ELSE '' END AS [LKW_fertig], CASE WHEN [VerwahrungStatus] = 1 THEN 'OK' ELSE '' END AS [VerwahrungStatus],[Status],tblSendungen.LetzterMitarbeiterId,tblSendungen.LetzterMitarbeiter, LKW_Nr, VoraussichtlichesEintreffen,Dauer, Datum, AvisoEingang, Ankunft, Grenzstelle, Freigabe, Aviso.LetzterMitarbeiterId AS maId,AvisoTVHinweis " & - " ,tblSnd_Empfaenger,AbfertigungsNr,tblSnd_Abfertigungsart_ID,tblSnd_Vorgeschrieben,tblSnd_Vorbereitet,tblSnd_Status,tblSnd_SendungID,tblSnd_Fremdspedition,tblSnd_FremdspeditionText ,tblSnd_Zollsystem_Land " & + " ,tblSnd_Absender ,tblSnd_Empfaenger,tblSnd_Avisierer,AbfertigungsNr,tblSnd_Abfertigungsart_ID,tblSnd_Vorgeschrieben,tblSnd_Vorbereitet,tblSnd_Status,tblSnd_SendungID,tblSnd_Fremdspedition,tblSnd_FremdspeditionText ,tblSnd_Zollsystem_Land " & " FROM Aviso INNER JOIN tblSendungen ON AvisoID=tblSnd_AvisoID " & " WHERE ( Status IN (0, 3, 4, 5) OR ( Status = 1 AND [Abgeschlossen] = 0 )) " & - hSQLFirma & " AND ( " & inBearbeitungSQL & ") " + hSQLFirma & " AND ( (" & inBearbeitungSQL & ") OR (" & AMBAR_AnzeigenSQL & ")) " Select Case cboMy_VB.CheckState Case CheckState.Checked : hSQL &= " AND tblSnd_Vorgeschrieben is not null " @@ -579,13 +611,34 @@ Public Class usrCntlHauptfenster_Suche_SND hSQL += " AND Grenzstelle IN (SELECT [grz_Grenzstelle] FROM [tblGrenzstelle] where (grz_Warenort=1 AND (grz_Firma ='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' )) ) " Else - If cboMy_Grenzstelle._value.Replace("ALLE_BACK", "") <> "" Then hSQL &= " AND Grenzstelle = '" & cboMy_Grenzstelle._value & "'" If cboMy_Grenzstelle._value = "ALLE_BACK" Then hSQL &= " AND FilialenNr NOT IN ('7001','7002','7003') " - End If - If cbx_My_Brexit.Visible AndAlso Not cbx_My_Brexit.Checked Then hSQL &= " AND FilialenNr NOT IN ('7001','7002','7003') " + If txtEmpfänger.Text <> "" Then hSQL &= " AND tblSnd_Empfaenger LIKE '" & txtEmpfänger.Text.Replace("*", "%") & "%' " + If txtAbsender.Text <> "" Then hSQL &= " AND tblSnd_Absender LIKE '" & txtAbsender.Text.Replace("*", "%") & "%' " + If txtAuftraggeber.Text <> "" Then hSQL &= " AND tblSnd_Auftraggeber LIKE '" & txtAuftraggeber.Text.Replace("*", "%") & "%' " + If txtKdAuftragsnr.Text <> "" Then hSQL &= " AND (tblSnd_KdAuftragsNr LIKE '" & txtKdAuftragsnr.Text.Replace("*", "%") & "%' OR tblSnd_KdAuftragsNrAvisierer LIKE '" & txtKdAuftragsnr.Text.Replace("*", "%") & "%' OR tblSnd_KdAuftragsNrEmpfaenger LIKE '" & txtKdAuftragsnr.Text.Replace("*", "%") & "%' OR tblSnd_KdAuftragsNrFrachtfuehrer LIKE '" & txtKdAuftragsnr.Text.Replace("*", "%") & "%') " + If cboFiliale._value <> "" Then hSQL &= " AND FilialenNr ='" & cboFiliale._value & "'" + If txtAbfertigungsnummer.Text <> "" Then hSQL &= " AND AbfertigungsNr LIKE '" & txtAbfertigungsnummer.Text.Replace("*", "%") & "' " + If txtlkwId.Text <> "" Then hSQL &= " AND tblSnd_AvisoID LIKE '" & txtlkwId.Text & "' " + + Select Case cbxLoseSnd.CheckState + Case CheckState.Unchecked : hSQL &= " AND tblSnd_AvisoID > 0 " + Case CheckState.Checked : hSQL &= " AND tblSnd_AvisoID <=0 " + Case CheckState.Indeterminate + End Select + + Select Case tbcntrAvisoSND.SelectedTab.Name + Case "tbSndOffen" : hSQL &= " AND tblSnd_Status IN( '" & VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Erfasst & "','" & VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_InBearbeitung & "','" & VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Eingereicht & "','" & VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Ankunft & "') " + Case "tbSndFreigegeben" : hSQL &= " AND tblSnd_Status IN( '" & VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_Ueberlassen & "') " + Case "tbSndNichtEingetroffen" : hSQL &= " AND tblSnd_Status IN( '" & VERAG_PROG_ALLGEMEIN.cGlobal.SND_Status_NichtEingetroffen & "') " + Case Else 'tbSndAlle + End Select + + + + ' If cbx_My_Brexit.Visible AndAlso Not cbx_My_Brexit.Checked Then hSQL &= " And FilialenNr Not In ('7001','7002','7003') " 'Farbe If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then @@ -621,7 +674,7 @@ Public Class usrCntlHauptfenster_Suche_SND Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("maId", VERAG_PROG_ALLGEMEIN.cAllgemein.USRID)) - 'MsgBox(hSQL) + ' MsgBox(hSQL) 'If hSort = "" Then 'hSQL += " ORDER BY Ankunft DESC, AvisoEingang DESC, Datum DESC" ' Else @@ -791,18 +844,18 @@ Public Class usrCntlHauptfenster_Suche_SND If gridAviso.SelectedRows(0).Cells("tblSnd_SendungID").Value Is DBNull.Value Then Exit Sub - Dim SendungsId = gridAviso.SelectedRows(0).Cells("tblSnd_SendungID").Value - Dim AvisoID = gridAviso.SelectedRows(0).Cells("AvisoID").Value + Dim SendungsId = gridAviso.SelectedRows(0).Cells("tblSnd_SendungID").Value + Dim AvisoID = gridAviso.SelectedRows(0).Cells("AvisoID").Value - Dim f = FUNC.openSnd(SendungsId, AvisoID) - If f IsNot Nothing Then - AddHandler f.FormClosed, Sub() - PARENT_FRMHAUPTFENSTER.btnRefresh.PerformClick() - End Sub - End If + Dim f = FUNC.openSnd(SendungsId, AvisoID) + If f IsNot Nothing Then + AddHandler f.FormClosed, Sub() + PARENT_FRMHAUPTFENSTER.btnRefresh.PerformClick() + End Sub + End If - If gridAviso.SelectedRows.Count = 0 Then Exit Sub + If gridAviso.SelectedRows.Count = 0 Then Exit Sub End Sub @@ -813,70 +866,16 @@ Public Class usrCntlHauptfenster_Suche_SND ' lblAkte.Visible = False End Sub - Private Sub cboTeams_SelectedIndexChanged(sender As Object, e As EventArgs) - If Grid_aktiv Then - ' SucheStandort = cboGrenzstelle._value.Replace("ALLE", "") - Aviso_anzeigen("") - End If + + + + Private Sub cboMyAvisoAnzeige_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboMyAvisoAnzeige.SelectedIndexChanged, cboMy_Grenzstelle.SelectedIndexChanged, cboMy_QS.CheckStateChanged, cboMy_VB.CheckStateChanged + Aviso_anzeigen("") End Sub - - Private Sub cboMyAvisoAnzeige_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboMyAvisoAnzeige.SelectedIndexChanged, cbx_My_Brexit.CheckedChanged, cboMy_Grenzstelle.SelectedIndexChanged, cboMy_QS.CheckStateChanged, cboMy_VB.CheckStateChanged - If Grid_aktiv Then - 'Wenn VERIMEX/T1 und cboMyAvisoAnzeige geändert --> Checkboxes richtig setzen - If sender Is cboMyAvisoAnzeige Then - If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then - Grid_aktiv = False - If cboMyAvisoAnzeige._value = "T1" Then - cboMy_QS.CheckState = CheckState.Checked - cboMy_VB.CheckState = CheckState.Unchecked - Else - cboMy_QS.CheckState = CheckState.Indeterminate - cboMy_VB.CheckState = CheckState.Indeterminate - End If - Grid_aktiv = True - End If - End If - - 'DGV anzeigen: - Aviso_anzeigen("") - End If - 'cboMy_QS.Visible = True 'Not cbx_My_LKW.Checked - 'cboMy_VB.Visible = True 'Not cbx_My_LKW.Checked - 'cboMyAvisoAnzeige.Visible = True 'Not cbx_My_LKW.Checked - 'lblMySND_Anzeige.Visible = True 'Not cbx_My_LKW.Checked - 'cbx_My_Brexit.Visible = True - If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_MeineSND_Farbe") Then - btnColor.Visible = True 'Not cbx_My_LKW.Checked - Else - btnColor.Visible = False - End If - 'If cbx_My_LKW.Checked Then - ' ' lblMeineAviso.Text = "Meine Aviso:" - ' cbx_My_Brexit.Visible = False - 'Else - ' ' lblMeineAviso.Text = "Meine Sendungen:" - ' cbx_My_Brexit.Visible = True - 'End If - End Sub - - - Private Sub cboImEx_SelectedIndexChanged(sender As Object, e As EventArgs) - If Grid_aktiv Then - Aviso_anzeigen("") - End If - End Sub - - Private Sub txtBestimmungszollstelle_VALUE_CHANGED() - If Grid_aktiv Then - Aviso_anzeigen("") - End If - End Sub - Private Sub Button13_Click(sender As Object, e As EventArgs) Handles btnColor.Click ctxtFarben.Show(Cursor.Position) - End Sub Private Sub ToolStripMenuItem19_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem19.Click @@ -1347,7 +1346,7 @@ Public Class usrCntlHauptfenster_Suche_SND End Sub - Private Sub btnDetailsuche_Click(sender As Object, e As EventArgs) Handles btnDetailsuche.Click + Private Sub btnDetailsuche_Click(sender As Object, e As EventArgs) 'pnlSearch.Visible = Not pnlSearch.Visible initPnlSearch() End Sub @@ -1371,4 +1370,24 @@ Public Class usrCntlHauptfenster_Suche_SND Aviso_anzeigen("") Grid_aktiv = True End Sub + + + Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click + Aviso_anzeigen("") + End Sub + + + Private Sub txtAbfertigungsnummer_TextChanged(sender As Object, e As EventArgs) Handles cbxLoseSnd.CheckStateChanged, txtAbfertigungsnummer.Leave, txtKdAuftragsnr.Leave, txtlkwId.Leave, + txtAuftraggeber.Leave, txtAbsender.Leave, txtEmpfänger.Leave, txtAvisierer.Leave, cboFiliale.SelectedIndexChanged + Aviso_anzeigen("") + End Sub + + Private Sub tbcntrAvisoSND_SelectedIndexChanged(sender As Object, e As EventArgs) Handles tbcntrAvisoSND.SelectedIndexChanged + Aviso_anzeigen("") + End Sub + + + Private Sub btnNeu_Click_1(sender As Object, e As EventArgs) Handles btnNeu.Click + + End Sub End Class diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb index 2007d9e..71b9fde 100644 --- a/Aviso/usrcntlAktDetails.vb +++ b/Aviso/usrcntlAktDetails.vb @@ -281,7 +281,7 @@ Public Class usrcntlAktDetails cboFormulareRgAn.changeItem("AVISIERER") 'AVISO_TRIPS - If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_TRIPS") Then + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("AVISO_TRIPS") Or VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME = "ADMIN" Then Panel5.Visible = True End If @@ -1664,25 +1664,7 @@ Public Class usrcntlAktDetails rtb.Text = t f.ShowDialog() End Sub - Private Sub SpeditionsbuchEintrag() - If dgvSendungen.SelectedRows.Count = 0 Then Exit Sub - Dim sndIdTmp = dgvSendungen.SelectedRows(0).Cells("tblSnd_SendungID").Value - - Dim posnr As posNr = FUNC.SpeditionsbuchEintrag(AvisoID, sndIdTmp) - If posnr IsNot Nothing Then - Dim sndEntry As New VERAG_PROG_ALLGEMEIN.cSendungen(sndIdTmp) - sndEntry.FilialenNr = posnr.Filiale - sndEntry.AbfertigungsNr = posnr.Abfertigungsnummer - sndEntry.UnterNr = posnr.UnterNr - 'sndEntry.tblSnd_SpeditionsbuchEingetragen = (posnr.Filiale > 0 And posnr.Abfertigungsnummer > 0 And posnr.UnterNr >= 0) ' Wenn Sped Eintrag gelöscht-> - 1, dann ist der Eintrag nicht mehr vorhanden - Dim vorhanden = ADMIN.getValueTxtBySql("SELECT COUNT(*) FROM [Speditionsbuch] WHERE [FilialenNr]='" & sndEntry.FilialenNr & "' AND AbfertigungsNr='" & sndEntry.AbfertigungsNr & "' AND UnterNr='" & sndEntry.UnterNr & "'", "FMZOLL") - sndEntry.tblSnd_SpeditionsbuchEingetragen = (vorhanden > 0) - sndEntry.SAVE() - reload(AvisoID) - End If - 'Vermerke_anzeigen() - End Sub ' Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click Private Sub dgvSendungen_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvSendungen.CellDoubleClick @@ -1952,7 +1934,17 @@ Public Class usrcntlAktDetails sendAktiv = False Me.Cursor = Cursors.WaitCursor If Not dgvSendungen.Rows(e.RowIndex).Cells("tblSnd_Fremdspedition").Value Then - SpeditionsbuchEintrag() + + If dgvSendungen.SelectedRows.Count > 0 Then + Dim sndIdTmp = dgvSendungen.SelectedRows(0).Cells("tblSnd_SendungID").Value + FUNC.setSendungSpeditionsbuchEintrag(sndIdTmp, AvisoID) + reload(AvisoID) + End If + + + + + End If Me.Cursor = Cursors.Default diff --git a/Diverses/Icons/Import Ass.png b/Diverses/Icons/Import Ass.png new file mode 100644 index 0000000..903e7cf Binary files /dev/null and b/Diverses/Icons/Import Ass.png differ diff --git a/Diverses/Icons/SND_loesen.png b/Diverses/Icons/SND_loesen.png new file mode 100644 index 0000000..75ddc54 Binary files /dev/null and b/Diverses/Icons/SND_loesen.png differ diff --git a/Diverses/Icons/SND_verbinden.png b/Diverses/Icons/SND_verbinden.png new file mode 100644 index 0000000..ada25f7 Binary files /dev/null and b/Diverses/Icons/SND_verbinden.png differ diff --git a/Diverses/Icons/Sendungübernehmen_weiterleiten.png b/Diverses/Icons/Sendungübernehmen_weiterleiten.png new file mode 100644 index 0000000..213af52 Binary files /dev/null and b/Diverses/Icons/Sendungübernehmen_weiterleiten.png differ diff --git a/Diverses/Icons/ico_ATR.png b/Diverses/Icons/ico_ATR.png new file mode 100644 index 0000000..923c7af Binary files /dev/null and b/Diverses/Icons/ico_ATR.png differ diff --git a/Diverses/Icons/ico_CMR.png b/Diverses/Icons/ico_CMR.png new file mode 100644 index 0000000..e618e98 Binary files /dev/null and b/Diverses/Icons/ico_CMR.png differ diff --git a/Diverses/Icons/ico_DocEdit.png b/Diverses/Icons/ico_DocEdit.png new file mode 100644 index 0000000..e48ad96 Binary files /dev/null and b/Diverses/Icons/ico_DocEdit.png differ diff --git a/Diverses/Icons/ico_ImportAssistant.png b/Diverses/Icons/ico_ImportAssistant.png new file mode 100644 index 0000000..70c1035 Binary files /dev/null and b/Diverses/Icons/ico_ImportAssistant.png differ diff --git a/Diverses/Icons/ico_Options.png b/Diverses/Icons/ico_Options.png new file mode 100644 index 0000000..5289bc5 Binary files /dev/null and b/Diverses/Icons/ico_Options.png differ diff --git a/Diverses/Icons/ico_add.png b/Diverses/Icons/ico_add.png new file mode 100644 index 0000000..9eb4ece Binary files /dev/null and b/Diverses/Icons/ico_add.png differ diff --git a/Diverses/Icons/ico_atez_declarantAI.png b/Diverses/Icons/ico_atez_declarantAI.png new file mode 100644 index 0000000..efdf5f4 Binary files /dev/null and b/Diverses/Icons/ico_atez_declarantAI.png differ diff --git a/Diverses/Icons/ico_atez_logicust.png b/Diverses/Icons/ico_atez_logicust.png new file mode 100644 index 0000000..6f9889a Binary files /dev/null and b/Diverses/Icons/ico_atez_logicust.png differ diff --git a/Diverses/Icons/ico_atez_tariffAI.png b/Diverses/Icons/ico_atez_tariffAI.png new file mode 100644 index 0000000..90e5671 Binary files /dev/null and b/Diverses/Icons/ico_atez_tariffAI.png differ diff --git a/Diverses/Icons/ico_atez_transitAI.png b/Diverses/Icons/ico_atez_transitAI.png new file mode 100644 index 0000000..6667736 Binary files /dev/null and b/Diverses/Icons/ico_atez_transitAI.png differ diff --git a/Diverses/Icons/ico_checklist.png b/Diverses/Icons/ico_checklist.png new file mode 100644 index 0000000..0bf20c3 Binary files /dev/null and b/Diverses/Icons/ico_checklist.png differ diff --git a/Diverses/Icons/ico_dienstplan.png b/Diverses/Icons/ico_dienstplan.png new file mode 100644 index 0000000..3719ad3 Binary files /dev/null and b/Diverses/Icons/ico_dienstplan.png differ diff --git a/Diverses/Icons/ico_docFin.png b/Diverses/Icons/ico_docFin.png new file mode 100644 index 0000000..b6d7bae Binary files /dev/null and b/Diverses/Icons/ico_docFin.png differ diff --git a/Diverses/Icons/ico_docSave.png b/Diverses/Icons/ico_docSave.png new file mode 100644 index 0000000..8681628 Binary files /dev/null and b/Diverses/Icons/ico_docSave.png differ diff --git a/Diverses/Icons/ico_docSearch.png b/Diverses/Icons/ico_docSearch.png new file mode 100644 index 0000000..8901dc6 Binary files /dev/null and b/Diverses/Icons/ico_docSearch.png differ diff --git a/Diverses/Icons/ico_fakturierung.png b/Diverses/Icons/ico_fakturierung.png new file mode 100644 index 0000000..5c5e416 Binary files /dev/null and b/Diverses/Icons/ico_fakturierung.png differ diff --git a/Diverses/Icons/ico_handshake.png b/Diverses/Icons/ico_handshake.png new file mode 100644 index 0000000..70ebd93 Binary files /dev/null and b/Diverses/Icons/ico_handshake.png differ diff --git a/Diverses/Icons/ico_importaviso.png b/Diverses/Icons/ico_importaviso.png new file mode 100644 index 0000000..245ed94 Binary files /dev/null and b/Diverses/Icons/ico_importaviso.png differ diff --git a/Diverses/Icons/ico_inventor.png b/Diverses/Icons/ico_inventor.png new file mode 100644 index 0000000..03dba19 Binary files /dev/null and b/Diverses/Icons/ico_inventor.png differ diff --git a/Diverses/Icons/ico_kasse.png b/Diverses/Icons/ico_kasse.png new file mode 100644 index 0000000..a6c1750 Binary files /dev/null and b/Diverses/Icons/ico_kasse.png differ diff --git a/Diverses/Icons/ico_kassenbuch.png b/Diverses/Icons/ico_kassenbuch.png new file mode 100644 index 0000000..d2e67ae Binary files /dev/null and b/Diverses/Icons/ico_kassenbuch.png differ diff --git a/Diverses/Icons/ico_kunden.png b/Diverses/Icons/ico_kunden.png new file mode 100644 index 0000000..21871a8 Binary files /dev/null and b/Diverses/Icons/ico_kunden.png differ diff --git a/Diverses/Icons/ico_loupe.png b/Diverses/Icons/ico_loupe.png new file mode 100644 index 0000000..174a448 Binary files /dev/null and b/Diverses/Icons/ico_loupe.png differ diff --git a/Diverses/Icons/ico_mail.png b/Diverses/Icons/ico_mail.png new file mode 100644 index 0000000..8e3b45a Binary files /dev/null and b/Diverses/Icons/ico_mail.png differ diff --git a/Diverses/Icons/ico_mitarbeiter.png b/Diverses/Icons/ico_mitarbeiter.png new file mode 100644 index 0000000..ecb1693 Binary files /dev/null and b/Diverses/Icons/ico_mitarbeiter.png differ diff --git a/Diverses/Icons/ico_organigram.png b/Diverses/Icons/ico_organigram.png new file mode 100644 index 0000000..a4f7c57 Binary files /dev/null and b/Diverses/Icons/ico_organigram.png differ diff --git a/Diverses/Icons/ico_parkzeit.png b/Diverses/Icons/ico_parkzeit.png new file mode 100644 index 0000000..6361434 Binary files /dev/null and b/Diverses/Icons/ico_parkzeit.png differ diff --git a/Diverses/Icons/ico_persDocument.png b/Diverses/Icons/ico_persDocument.png new file mode 100644 index 0000000..cf37adc Binary files /dev/null and b/Diverses/Icons/ico_persDocument.png differ diff --git a/Diverses/Icons/ico_rechnungen.png b/Diverses/Icons/ico_rechnungen.png new file mode 100644 index 0000000..43a522d Binary files /dev/null and b/Diverses/Icons/ico_rechnungen.png differ diff --git a/Diverses/Icons/ico_security.png b/Diverses/Icons/ico_security.png new file mode 100644 index 0000000..bbe025d Binary files /dev/null and b/Diverses/Icons/ico_security.png differ diff --git a/Diverses/Icons/ico_settings.png b/Diverses/Icons/ico_settings.png new file mode 100644 index 0000000..2dc1fcb Binary files /dev/null and b/Diverses/Icons/ico_settings.png differ diff --git a/Diverses/Icons/ico_speditionsbuch.png b/Diverses/Icons/ico_speditionsbuch.png new file mode 100644 index 0000000..9535a6c Binary files /dev/null and b/Diverses/Icons/ico_speditionsbuch.png differ diff --git a/Diverses/Icons/ico_statistic.png b/Diverses/Icons/ico_statistic.png new file mode 100644 index 0000000..421dd82 Binary files /dev/null and b/Diverses/Icons/ico_statistic.png differ diff --git a/Diverses/Icons/ico_support.png b/Diverses/Icons/ico_support.png new file mode 100644 index 0000000..0e02646 Binary files /dev/null and b/Diverses/Icons/ico_support.png differ diff --git a/Diverses/Icons/ico_truck.png b/Diverses/Icons/ico_truck.png new file mode 100644 index 0000000..02cce28 Binary files /dev/null and b/Diverses/Icons/ico_truck.png differ diff --git a/Diverses/Icons/ico_verknuepfung.png b/Diverses/Icons/ico_verknuepfung.png new file mode 100644 index 0000000..4ec0543 Binary files /dev/null and b/Diverses/Icons/ico_verknuepfung.png differ diff --git a/Diverses/Icons/ico_verzeichnis.png b/Diverses/Icons/ico_verzeichnis.png new file mode 100644 index 0000000..c38fad9 Binary files /dev/null and b/Diverses/Icons/ico_verzeichnis.png differ diff --git a/Diverses/Icons/ico_vorkasse.png b/Diverses/Icons/ico_vorkasse.png new file mode 100644 index 0000000..54506c0 Binary files /dev/null and b/Diverses/Icons/ico_vorkasse.png differ diff --git a/Diverses/Icons/ico_webSearch.png b/Diverses/Icons/ico_webSearch.png new file mode 100644 index 0000000..5ab2c32 Binary files /dev/null and b/Diverses/Icons/ico_webSearch.png differ diff --git a/Diverses/Icons/ico_webSecurity.png b/Diverses/Icons/ico_webSecurity.png new file mode 100644 index 0000000..6cffe9c Binary files /dev/null and b/Diverses/Icons/ico_webSecurity.png differ diff --git a/Diverses/Icons/ico_webWww.png b/Diverses/Icons/ico_webWww.png new file mode 100644 index 0000000..81661c4 Binary files /dev/null and b/Diverses/Icons/ico_webWww.png differ diff --git a/Diverses/Icons/ico_weel.png b/Diverses/Icons/ico_weel.png new file mode 100644 index 0000000..150ae0b Binary files /dev/null and b/Diverses/Icons/ico_weel.png differ diff --git a/Diverses/Icons/ico_weitereForm.png b/Diverses/Icons/ico_weitereForm.png new file mode 100644 index 0000000..c9abcb9 Binary files /dev/null and b/Diverses/Icons/ico_weitereForm.png differ diff --git a/Diverses/Icons/ico_www.png b/Diverses/Icons/ico_www.png new file mode 100644 index 0000000..4bce1d1 Binary files /dev/null and b/Diverses/Icons/ico_www.png differ diff --git a/Diverses/Icons/ico_zeiterfassung.png b/Diverses/Icons/ico_zeiterfassung.png new file mode 100644 index 0000000..a1b993b Binary files /dev/null and b/Diverses/Icons/ico_zeiterfassung.png differ diff --git a/Diverses/Icons/ico_zertifikate.png b/Diverses/Icons/ico_zertifikate.png new file mode 100644 index 0000000..75562ac Binary files /dev/null and b/Diverses/Icons/ico_zertifikate.png differ diff --git a/Diverses/Icons/selection_div3.png b/Diverses/Icons/selection_div3.png new file mode 100644 index 0000000..a81cc7f Binary files /dev/null and b/Diverses/Icons/selection_div3.png differ diff --git a/Diverses/Icons/selection_div4.png b/Diverses/Icons/selection_div4.png new file mode 100644 index 0000000..76a20a1 Binary files /dev/null and b/Diverses/Icons/selection_div4.png differ diff --git a/Diverses/Icons/selection_div5.png b/Diverses/Icons/selection_div5.png new file mode 100644 index 0000000..4ba6bd7 Binary files /dev/null and b/Diverses/Icons/selection_div5.png differ diff --git a/Diverses/Icons/selection_vorkasse_importaviso.png b/Diverses/Icons/selection_vorkasse_importaviso.png new file mode 100644 index 0000000..71ea92c Binary files /dev/null and b/Diverses/Icons/selection_vorkasse_importaviso.png differ diff --git a/Diverses/Icons/selection_vorkasse_importaviso2.png b/Diverses/Icons/selection_vorkasse_importaviso2.png new file mode 100644 index 0000000..d4b25a1 Binary files /dev/null and b/Diverses/Icons/selection_vorkasse_importaviso2.png differ