edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compare commits

base: edv:4d8e90de9e66ade4a3e61df091b402564dce8a83
Branches Tags
edv:master edv:essensbestellungen edv:change_VM_logic edv:SDL
...
compare: edv:77856cc554bd8d3396ffbeb748153cfe7c46f32b
Branches Tags
edv:master edv:essensbestellungen edv:change_VM_logic edv:SDL

2 Commits
4d8e90de9e ... 77856cc554

Author SHA1 Message Date
Andreas Luxbauer
77856cc554 merge 2025-11-26 09:02:29 +01:00
Andreas Luxbauer
ec89c98b9d Verträge Suche 2025-11-26 09:01:02 +01:00
5 changed files with 269 additions and 184 deletions
Expand all files Collapse all files

277
Aviso/ATEZ/frmATEZ_EZA.Designer.vb generated
View File

@@ -28,21 +28,26 @@ Partial Class frmATEZ_EZA
Me.pnlHead = New System.Windows.Forms.Panel() Me.pnlHead = New System.Windows.Forms.Panel()
Me.lblInfo = New System.Windows.Forms.Label() Me.lblInfo = New System.Windows.Forms.Label()
Me.Label8 = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label()
Me.cboStammreferenz = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtLKWId = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label3 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label()
Me.Label9 = New System.Windows.Forms.Label() Me.Label9 = New System.Windows.Forms.Label()
Me.sbAdressierteZollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
Me.txtDyMandant = New System.Windows.Forms.Label() Me.txtDyMandant = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.txtDyNiederlassung = New System.Windows.Forms.Label() Me.txtDyNiederlassung = New System.Windows.Forms.Label()
Me.lblBezugsnummer = New System.Windows.Forms.Label() Me.lblBezugsnummer = New System.Windows.Forms.Label()
Me.Button3 = New System.Windows.Forms.Button() Me.Button3 = New System.Windows.Forms.Button()
Me.Label6 = New System.Windows.Forms.Label() 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.lblAnh = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button()
Me.btnAgg_Tnr = New System.Windows.Forms.Button()
Me.Label2 = New System.Windows.Forms.Label()
Me.btnAgg_Origin = New System.Windows.Forms.Button()
Me.btnAgg_Unit = New System.Windows.Forms.Button()
Me.btnAgg_desc = New System.Windows.Forms.Button()
Me.cboStammreferenz = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtLKWId = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.sbAdressierteZollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
Me.dgvAnhaenge = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.columnName = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.pnlHead.SuspendLayout() Me.pnlHead.SuspendLayout()
CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.dgvAnhaenge, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
@@ -56,7 +61,7 @@ Partial Class frmATEZ_EZA
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.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.Image = Global.AVISO.My.Resources.Resources.Declarant
Me.btnSend.ImageAlign = System.Drawing.ContentAlignment.TopCenter Me.btnSend.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.btnSend.Location = New System.Drawing.Point(395, 348) Me.btnSend.Location = New System.Drawing.Point(486, 348)
Me.btnSend.Margin = New System.Windows.Forms.Padding(2) Me.btnSend.Margin = New System.Windows.Forms.Padding(2)
Me.btnSend.Name = "btnSend" Me.btnSend.Name = "btnSend"
Me.btnSend.Size = New System.Drawing.Size(192, 58) Me.btnSend.Size = New System.Drawing.Size(192, 58)
@@ -82,7 +87,7 @@ Partial Class frmATEZ_EZA
Me.pnlHead.Controls.Add(Me.lblBezugsnummer) Me.pnlHead.Controls.Add(Me.lblBezugsnummer)
Me.pnlHead.Location = New System.Drawing.Point(3, 2) Me.pnlHead.Location = New System.Drawing.Point(3, 2)
Me.pnlHead.Name = "pnlHead" Me.pnlHead.Name = "pnlHead"
Me.pnlHead.Size = New System.Drawing.Size(584, 151) Me.pnlHead.Size = New System.Drawing.Size(675, 151)
Me.pnlHead.TabIndex = 112 Me.pnlHead.TabIndex = 112
' '
'lblInfo 'lblInfo
@@ -98,13 +103,161 @@ 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.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label8.AutoSize = True Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(9, 61) Me.Label8.Location = New System.Drawing.Point(10, 61)
Me.Label8.Name = "Label8" Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(80, 13) Me.Label8.Size = New System.Drawing.Size(80, 13)
Me.Label8.TabIndex = 146 Me.Label8.TabIndex = 146
Me.Label8.Text = "Stammreferenz:" Me.Label8.Text = "Stammreferenz:"
Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight
' '
'Label3
'
Me.Label3.Location = New System.Drawing.Point(10, 91)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(103, 17)
Me.Label3.TabIndex = 113
Me.Label3.Text = "LKW-KZ:"
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(10, 117)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(103, 17)
Me.Label9.TabIndex = 110
Me.Label9.Text = "Adressierte-Zollstelle:"
'
'txtDyMandant
'
Me.txtDyMandant.BackColor = System.Drawing.Color.White
Me.txtDyMandant.Location = New System.Drawing.Point(2, 7)
Me.txtDyMandant.Name = "txtDyMandant"
Me.txtDyMandant.Size = New System.Drawing.Size(44, 13)
Me.txtDyMandant.TabIndex = 109
Me.txtDyMandant.Text = "VERG"
Me.txtDyMandant.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label1
'
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.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(82, 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.Name = "txtDyNiederlassung"
Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12)
Me.txtDyNiederlassung.TabIndex = 108
Me.txtDyNiederlassung.Text = "SUB"
'
'lblBezugsnummer
'
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.Name = "lblBezugsnummer"
Me.lblBezugsnummer.Size = New System.Drawing.Size(193, 23)
Me.lblBezugsnummer.TabIndex = 107
Me.lblBezugsnummer.Text = "4800/000000/17 AAA"
Me.lblBezugsnummer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Button3
'
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.Location = New System.Drawing.Point(473, 159)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(205, 23)
Me.Button3.TabIndex = 152
Me.Button3.Text = "alle Anhänge auswählen"
Me.Button3.UseVisualStyleBackColor = True
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(9, 168)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(135, 13)
Me.Label6.TabIndex = 147
Me.Label6.Text = "Dokumente:"
'
'lblAnh
'
Me.lblAnh.Location = New System.Drawing.Point(332, 168)
Me.lblAnh.Name = "lblAnh"
Me.lblAnh.Size = New System.Drawing.Size(135, 13)
Me.lblAnh.TabIndex = 151
Me.lblAnh.Visible = False
'
'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)
Me.Button1.TabIndex = 153
Me.Button1.Text = "Clear Token Cache"
Me.Button1.UseVisualStyleBackColor = True
'
'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.Name = "btnAgg_Tnr"
Me.btnAgg_Tnr.Size = New System.Drawing.Size(83, 23)
Me.btnAgg_Tnr.TabIndex = 154
Me.btnAgg_Tnr.Tag = "1"
Me.btnAgg_Tnr.Text = "Tarifnummer"
Me.btnAgg_Tnr.UseVisualStyleBackColor = False
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(6, 350)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(103, 17)
Me.Label2.TabIndex = 149
Me.Label2.Text = "Aggregieren:"
'
'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.Name = "btnAgg_Origin"
Me.btnAgg_Origin.Size = New System.Drawing.Size(90, 23)
Me.btnAgg_Origin.TabIndex = 155
Me.btnAgg_Origin.Tag = "1"
Me.btnAgg_Origin.Text = "Ursprungsland"
Me.btnAgg_Origin.UseVisualStyleBackColor = False
'
'btnAgg_Unit
'
Me.btnAgg_Unit.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAgg_Unit.Location = New System.Drawing.Point(255, 344)
Me.btnAgg_Unit.Name = "btnAgg_Unit"
Me.btnAgg_Unit.Size = New System.Drawing.Size(79, 23)
Me.btnAgg_Unit.TabIndex = 156
Me.btnAgg_Unit.Tag = "0"
Me.btnAgg_Unit.Text = "Maßeinheit"
Me.btnAgg_Unit.UseVisualStyleBackColor = True
'
'btnAgg_desc
'
Me.btnAgg_desc.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAgg_desc.Location = New System.Drawing.Point(340, 344)
Me.btnAgg_desc.Name = "btnAgg_desc"
Me.btnAgg_desc.Size = New System.Drawing.Size(126, 23)
Me.btnAgg_desc.TabIndex = 157
Me.btnAgg_desc.Tag = "0"
Me.btnAgg_desc.Text = "Warenbeschreibung"
Me.btnAgg_desc.UseVisualStyleBackColor = True
'
'cboStammreferenz 'cboStammreferenz
' '
Me.cboStammreferenz._allowedValuesFreiText = Nothing Me.cboStammreferenz._allowedValuesFreiText = Nothing
@@ -144,22 +297,6 @@ Partial Class frmATEZ_EZA
Me.txtLKWId.Size = New System.Drawing.Size(255, 23) Me.txtLKWId.Size = New System.Drawing.Size(255, 23)
Me.txtLKWId.TabIndex = 144 Me.txtLKWId.TabIndex = 144
' '
'Label3
'
Me.Label3.Location = New System.Drawing.Point(10, 91)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(103, 17)
Me.Label3.TabIndex = 113
Me.Label3.Text = "LKW-KZ:"
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(10, 117)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(103, 17)
Me.Label9.TabIndex = 110
Me.Label9.Text = "Adressierte-Zollstelle:"
'
'sbAdressierteZollstelle 'sbAdressierteZollstelle
' '
Me.sbAdressierteZollstelle._allowFreitext = False Me.sbAdressierteZollstelle._allowFreitext = False
@@ -186,66 +323,6 @@ Partial Class frmATEZ_EZA
Me.sbAdressierteZollstelle.TabIndex = 111 Me.sbAdressierteZollstelle.TabIndex = 111
Me.sbAdressierteZollstelle.usrcntl = Nothing Me.sbAdressierteZollstelle.usrcntl = Nothing
' '
'txtDyMandant
'
Me.txtDyMandant.BackColor = System.Drawing.Color.White
Me.txtDyMandant.Location = New System.Drawing.Point(2, 7)
Me.txtDyMandant.Name = "txtDyMandant"
Me.txtDyMandant.Size = New System.Drawing.Size(44, 13)
Me.txtDyMandant.TabIndex = 109
Me.txtDyMandant.Text = "VERG"
Me.txtDyMandant.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label1
'
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(296, 20)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(82, 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.Name = "txtDyNiederlassung"
Me.txtDyNiederlassung.Size = New System.Drawing.Size(45, 12)
Me.txtDyNiederlassung.TabIndex = 108
Me.txtDyNiederlassung.Text = "SUB"
'
'lblBezugsnummer
'
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(384, 14)
Me.lblBezugsnummer.Name = "lblBezugsnummer"
Me.lblBezugsnummer.Size = New System.Drawing.Size(193, 23)
Me.lblBezugsnummer.TabIndex = 107
Me.lblBezugsnummer.Text = "4800/000000/17 AAA"
Me.lblBezugsnummer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Button3
'
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.Location = New System.Drawing.Point(409, 159)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(178, 23)
Me.Button3.TabIndex = 152
Me.Button3.Text = "alle Anhänge auswählen"
Me.Button3.UseVisualStyleBackColor = True
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(9, 168)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(135, 13)
Me.Label6.TabIndex = 147
Me.Label6.Text = "Dokumente:"
'
'dgvAnhaenge 'dgvAnhaenge
' '
Me.dgvAnhaenge.AKTUALISIERUNGS_INTERVALL = -1 Me.dgvAnhaenge.AKTUALISIERUNGS_INTERVALL = -1
@@ -261,7 +338,7 @@ Partial Class frmATEZ_EZA
Me.dgvAnhaenge.ReadOnly = True Me.dgvAnhaenge.ReadOnly = True
Me.dgvAnhaenge.RowHeadersVisible = False Me.dgvAnhaenge.RowHeadersVisible = False
Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvAnhaenge.Size = New System.Drawing.Size(584, 158) Me.dgvAnhaenge.Size = New System.Drawing.Size(675, 158)
Me.dgvAnhaenge.TabIndex = 112 Me.dgvAnhaenge.TabIndex = 112
' '
'columnName 'columnName
@@ -271,30 +348,17 @@ Partial Class frmATEZ_EZA
Me.columnName.Name = "columnName" Me.columnName.Name = "columnName"
Me.columnName.ReadOnly = True Me.columnName.ReadOnly = True
' '
'lblAnh
'
Me.lblAnh.Location = New System.Drawing.Point(0, 345)
Me.lblAnh.Name = "lblAnh"
Me.lblAnh.Size = New System.Drawing.Size(135, 13)
Me.lblAnh.TabIndex = 151
Me.lblAnh.Visible = False
'
'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)
Me.Button1.TabIndex = 153
Me.Button1.Text = "Clear Token Cache"
Me.Button1.UseVisualStyleBackColor = True
'
'frmATEZ_EZA 'frmATEZ_EZA
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink Me.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.ClientSize = New System.Drawing.Size(589, 409) Me.ClientSize = New System.Drawing.Size(680, 413)
Me.Controls.Add(Me.btnAgg_desc)
Me.Controls.Add(Me.btnAgg_Tnr)
Me.Controls.Add(Me.btnAgg_Unit)
Me.Controls.Add(Me.btnAgg_Origin)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Button3)
Me.Controls.Add(Me.lblAnh) Me.Controls.Add(Me.lblAnh)
@@ -331,4 +395,9 @@ Partial Class frmATEZ_EZA
Friend WithEvents lblAnh As Label Friend WithEvents lblAnh As Label
Friend WithEvents Button3 As Button Friend WithEvents Button3 As Button
Friend WithEvents Button1 As Button Friend WithEvents Button1 As Button
Friend WithEvents btnAgg_Tnr As Button
Friend WithEvents Label2 As Label
Friend WithEvents btnAgg_Origin As Button
Friend WithEvents btnAgg_Unit As Button
Friend WithEvents btnAgg_desc As Button
End Class End Class

49
Aviso/ATEZ/frmATEZ_EZA.vb
View File

@@ -3,6 +3,7 @@ Imports com.esendex.sdk.optouts.models
Imports DAKOSY_Worker.eZollTypes Imports DAKOSY_Worker.eZollTypes
Imports SDL Imports SDL
Imports VERAG_PROG_ALLGEMEIN Imports VERAG_PROG_ALLGEMEIN
Imports VERAG_PROG_ALLGEMEIN.cRelayHub
Public Class frmATEZ_EZA Public Class frmATEZ_EZA
@@ -137,11 +138,18 @@ Public Class frmATEZ_EZA
' New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDocument With {.type = "base64", .base64String = "SGVsbG8sIHRoaXMgaXMgYSBzYW1wbGUgYmFzZTY0IHN0cmluZy4=", .filename = "test3.txt", .fileType = "cmr"} ' New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDocument With {.type = "base64", .base64String = "SGVsbG8sIHRoaXMgaXMgYSBzYW1wbGUgYmFzZTY0IHN0cmluZy4=", .filename = "test3.txt", .fileType = "cmr"}
'}, '},
Dim AdditionalSettings As New List(Of String)
If btnAgg_desc.Tag = 1 Then AdditionalSettings.Add("description")
If btnAgg_Tnr.Tag = 1 Then AdditionalSettings.Add("commodity_code")
If btnAgg_Origin.Tag = 1 Then AdditionalSettings.Add("country_of_origin")
If btnAgg_Unit.Tag = 1 Then AdditionalSettings.Add("unit_type")
Dim ATEZ_RH_EZA As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubJobOrderRequest With { Dim ATEZ_RH_EZA As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubJobOrderRequest With {
.referenceNo = ioReference, .referenceNo = ioReference,
.outputApplication = "dakosy/sftp/verg",'.outputApplication = "dakosy/sftp/vera", .outputApplication = "dakosy/sftp/verg",'.outputApplication = "dakosy/sftp/vera",
.regimeType = "IMPORT",' .customer = "AVISO", .regimeType = "IMPORT",' .customer = "AVISO",
.dispatchCountry = "TR", .dispatchCountry = "TR",'"TR",
.destinationCountry = "DE", 'Default, wird später überschrieben!! (Pflichtfeld) .destinationCountry = "DE", 'Default, wird später überschrieben!! (Pflichtfeld)
.additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With { .additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With {
.transaction = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubTransaction With { .transaction = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubTransaction With {
@@ -171,8 +179,13 @@ Public Class frmATEZ_EZA
} }
} }
} }
},
.additionalSettings = New cRelayHubAdditionalSettings With {
.combineOptions = AdditionalSettings
} }
} }
If If(AVISO.Zollstelle, "").length >= 4 Then If If(AVISO.Zollstelle, "").length >= 4 Then
ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice = AVISO.Zollstelle.ToString.Substring(AVISO.Zollstelle.ToString.Length - 4) ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice = AVISO.Zollstelle.ToString.Substring(AVISO.Zollstelle.ToString.Length - 4)
'MsgBox(ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice) 'MsgBox(ATEZ_RH_EZA.additionalData.declaration(0).headerData.addressedCustomsOffice)
@@ -214,27 +227,7 @@ Public Class frmATEZ_EZA
Dim bd As New Chilkat.BinData Dim bd As New Chilkat.BinData
Dim DOC As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDocument Dim DOC As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDocument
If r.Cells("anh_Art").Value IsNot DBNull.Value Then DOC.fileType = VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHub_sendToRelayHub_JobOrderRequest.getRelayHub_AnhDesc(r.Cells("anh_Art").Value)
Select Case r.Cells("anh_Art").Value
Case "Rechnung", "Konsi-Rechnung", "eFatura", "INVOICE" : DOC.fileType = "invoice"
Case "CMR" : DOC.fileType = "cmr"
Case "Ausfuhr", "EXPORT" : DOC.fileType = "tr_export_declaration"
Case "ATR", "A.TR", "ATR-EUR1" : DOC.fileType = "atr"
Case "Vorpapier", "T1" : DOC.fileType = "transit_declaration"
Case Else : DOC.fileType = "other"
''invoice',
'atr',
'cmr',
'transit_declaration',
'tr_export_declaration',
' Case Else : DOC.fileType = "additional_data" --> DARF NCIHT -_> additional_data ist das verwednete Datenformat
End Select
End If
'invoice' | 'atr' | 'cmr' | 'transit_declaration' | 'tr_export_declaration' | 'additional_data', received 'PDF'
DOC.type = "base64" DOC.type = "base64"
DOC.filename = r.Cells("anh_Name").Value DOC.filename = r.Cells("anh_Name").Value
@@ -771,4 +764,14 @@ Public Class frmATEZ_EZA
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
cRelayHubToken.DeleteStore() cRelayHubToken.DeleteStore()
End Sub End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles btnAgg_Tnr.Click, btnAgg_desc.Click, btnAgg_Origin.Click, btnAgg_Unit.Click
If sender.Tag = 0 Then
sender.Tag = 1
sender.BackColor = Color.DeepSkyBlue
Else
sender.Tag = 0
sender.BackColor = SystemColors.Control
End If
End Sub
End Class End Class

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("4.1.8.2")> <Assembly: AssemblyVersion("4.1.8.3")>
<Assembly: AssemblyFileVersion("4.1.8.2")> <Assembly: AssemblyFileVersion("4.1.8.3")>

117
Aviso/frmHauptfenster.Designer.vb generated
View File

@@ -415,6 +415,7 @@ Partial Class frmHauptfenster
Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem()
Me.WikiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.WikiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.MitarbeiterverzeichnisToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.MitarbeiterverzeichnisToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.VerträgeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.conMenuAviso.SuspendLayout() Me.conMenuAviso.SuspendLayout()
Me.MenuStrip1.SuspendLayout() Me.MenuStrip1.SuspendLayout()
Me.pnlDetailsRechts.SuspendLayout() Me.pnlDetailsRechts.SuspendLayout()
@@ -914,7 +915,7 @@ Partial Class frmHauptfenster
' '
'FunktionenToolStripMenuItem 'FunktionenToolStripMenuItem
' '
Me.FunktionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GenerelleGestellungenDurchsuchenToolStripMenuItem, Me.KundenVonFremdenSpeditionenToolStripMenuItem, Me.KundenverwaltungToolStripMenuItem, Me.MDMParkplatzkartenToolStripMenuItem, Me.SMSSendenToolStripMenuItem, Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem, Me.MRNBarcodedruckToolStripMenuItem, Me.ToolStripSeparator12, Me.tool_BRGXLS, Me.ToolStripMenuItem4, Me.ToolStripMenuItem5, Me.BürgschaftenExcelToolStripMenuItem, Me.ToolStripMenuItem6, Me.GesamtsicherheitenToolStripMenuItem, Me.ToolStripMenuItem10, Me.TICKETWaidhausToolStripMenuItem, Me.ToolStripSeparator10, Me.DAKOSYToolStripMenuItem, Me.ToolStripSeparator23, Me.toolOriginalATR, Me.SDLAbholaufträgeToolStripMenuItem, Me.ToolStripMenuItem13, Me.VorauskassenToolStripMenuItem, Me.ToolStripSeparator11, Me.EssensbestellungenToolStripMenuItem, Me.AdministrationEssensbestellungenToolStripMenuItem, Me.ToolStripSeparator24, Me.WarenorteToolStripMenuItem, Me.DatevBuchungsexportToolStripMenuItem, Me.APIToolStripMenuItem, Me.FIBUSachkontenToolStripMenuItem}) Me.FunktionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GenerelleGestellungenDurchsuchenToolStripMenuItem, Me.KundenVonFremdenSpeditionenToolStripMenuItem, Me.KundenverwaltungToolStripMenuItem, Me.MDMParkplatzkartenToolStripMenuItem, Me.SMSSendenToolStripMenuItem, Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem, Me.MRNBarcodedruckToolStripMenuItem, Me.ToolStripSeparator12, Me.tool_BRGXLS, Me.ToolStripMenuItem4, Me.ToolStripMenuItem5, Me.BürgschaftenExcelToolStripMenuItem, Me.ToolStripMenuItem6, Me.GesamtsicherheitenToolStripMenuItem, Me.ToolStripMenuItem10, Me.TICKETWaidhausToolStripMenuItem, Me.ToolStripSeparator10, Me.DAKOSYToolStripMenuItem, Me.ToolStripSeparator23, Me.toolOriginalATR, Me.SDLAbholaufträgeToolStripMenuItem, Me.ToolStripMenuItem13, Me.VerträgeToolStripMenuItem, Me.VorauskassenToolStripMenuItem, Me.ToolStripSeparator11, Me.EssensbestellungenToolStripMenuItem, Me.AdministrationEssensbestellungenToolStripMenuItem, Me.ToolStripSeparator24, Me.WarenorteToolStripMenuItem, Me.DatevBuchungsexportToolStripMenuItem, Me.APIToolStripMenuItem, Me.FIBUSachkontenToolStripMenuItem})
Me.FunktionenToolStripMenuItem.Name = "FunktionenToolStripMenuItem" Me.FunktionenToolStripMenuItem.Name = "FunktionenToolStripMenuItem"
Me.FunktionenToolStripMenuItem.Size = New System.Drawing.Size(79, 16) Me.FunktionenToolStripMenuItem.Size = New System.Drawing.Size(79, 16)
Me.FunktionenToolStripMenuItem.Text = "Funktionen" Me.FunktionenToolStripMenuItem.Text = "Funktionen"
@@ -922,26 +923,26 @@ Partial Class frmHauptfenster
'GenerelleGestellungenDurchsuchenToolStripMenuItem 'GenerelleGestellungenDurchsuchenToolStripMenuItem
' '
Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Name = "GenerelleGestellungenDurchsuchenToolStripMenuItem" Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Name = "GenerelleGestellungenDurchsuchenToolStripMenuItem"
Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Text = "Generelle Gestellungen durchsuchen" Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Text = "Generelle Gestellungen durchsuchen"
Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Visible = False Me.GenerelleGestellungenDurchsuchenToolStripMenuItem.Visible = False
' '
'KundenVonFremdenSpeditionenToolStripMenuItem 'KundenVonFremdenSpeditionenToolStripMenuItem
' '
Me.KundenVonFremdenSpeditionenToolStripMenuItem.Name = "KundenVonFremdenSpeditionenToolStripMenuItem" Me.KundenVonFremdenSpeditionenToolStripMenuItem.Name = "KundenVonFremdenSpeditionenToolStripMenuItem"
Me.KundenVonFremdenSpeditionenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.KundenVonFremdenSpeditionenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.KundenVonFremdenSpeditionenToolStripMenuItem.Text = "Kunden von fremden Speditionen" Me.KundenVonFremdenSpeditionenToolStripMenuItem.Text = "Kunden von fremden Speditionen"
' '
'KundenverwaltungToolStripMenuItem 'KundenverwaltungToolStripMenuItem
' '
Me.KundenverwaltungToolStripMenuItem.Name = "KundenverwaltungToolStripMenuItem" Me.KundenverwaltungToolStripMenuItem.Name = "KundenverwaltungToolStripMenuItem"
Me.KundenverwaltungToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.KundenverwaltungToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.KundenverwaltungToolStripMenuItem.Text = "Kundenverwaltung" Me.KundenverwaltungToolStripMenuItem.Text = "Kundenverwaltung"
' '
'MDMParkplatzkartenToolStripMenuItem 'MDMParkplatzkartenToolStripMenuItem
' '
Me.MDMParkplatzkartenToolStripMenuItem.Name = "MDMParkplatzkartenToolStripMenuItem" Me.MDMParkplatzkartenToolStripMenuItem.Name = "MDMParkplatzkartenToolStripMenuItem"
Me.MDMParkplatzkartenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.MDMParkplatzkartenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.MDMParkplatzkartenToolStripMenuItem.Text = "MDM - Parkplatzkarten" Me.MDMParkplatzkartenToolStripMenuItem.Text = "MDM - Parkplatzkarten"
' '
'SMSSendenToolStripMenuItem 'SMSSendenToolStripMenuItem
@@ -949,7 +950,7 @@ Partial Class frmHauptfenster
Me.SMSSendenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueSMSSendenToolStripMenuItem, Me.GesendeteSMSToolStripMenuItem}) Me.SMSSendenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueSMSSendenToolStripMenuItem, Me.GesendeteSMSToolStripMenuItem})
Me.SMSSendenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.handy2 Me.SMSSendenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.handy2
Me.SMSSendenToolStripMenuItem.Name = "SMSSendenToolStripMenuItem" Me.SMSSendenToolStripMenuItem.Name = "SMSSendenToolStripMenuItem"
Me.SMSSendenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.SMSSendenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.SMSSendenToolStripMenuItem.Text = "SMS" Me.SMSSendenToolStripMenuItem.Text = "SMS"
' '
'NeueSMSSendenToolStripMenuItem 'NeueSMSSendenToolStripMenuItem
@@ -967,51 +968,51 @@ Partial Class frmHauptfenster
'ZollprogrammeNachEORIDurchsuchenToolStripMenuItem 'ZollprogrammeNachEORIDurchsuchenToolStripMenuItem
' '
Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Name = "ZollprogrammeNachEORIDurchsuchenToolStripMenuItem" Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Name = "ZollprogrammeNachEORIDurchsuchenToolStripMenuItem"
Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Text = "Zollprogramme nach EORI durchsuchen" Me.ZollprogrammeNachEORIDurchsuchenToolStripMenuItem.Text = "Zollprogramme nach EORI durchsuchen"
' '
'MRNBarcodedruckToolStripMenuItem 'MRNBarcodedruckToolStripMenuItem
' '
Me.MRNBarcodedruckToolStripMenuItem.Name = "MRNBarcodedruckToolStripMenuItem" Me.MRNBarcodedruckToolStripMenuItem.Name = "MRNBarcodedruckToolStripMenuItem"
Me.MRNBarcodedruckToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.MRNBarcodedruckToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.MRNBarcodedruckToolStripMenuItem.Text = "MRN Barcodedruck" Me.MRNBarcodedruckToolStripMenuItem.Text = "MRN Barcodedruck"
' '
'ToolStripSeparator12 'ToolStripSeparator12
' '
Me.ToolStripSeparator12.Name = "ToolStripSeparator12" Me.ToolStripSeparator12.Name = "ToolStripSeparator12"
Me.ToolStripSeparator12.Size = New System.Drawing.Size(380, 6) Me.ToolStripSeparator12.Size = New System.Drawing.Size(388, 6)
' '
'tool_BRGXLS 'tool_BRGXLS
' '
Me.tool_BRGXLS.Name = "tool_BRGXLS" Me.tool_BRGXLS.Name = "tool_BRGXLS"
Me.tool_BRGXLS.Size = New System.Drawing.Size(383, 22) Me.tool_BRGXLS.Size = New System.Drawing.Size(391, 30)
Me.tool_BRGXLS.Text = "Bürgschaften Excel" Me.tool_BRGXLS.Text = "Bürgschaften Excel"
' '
'ToolStripMenuItem4 'ToolStripMenuItem4
' '
Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
Me.ToolStripMenuItem4.Size = New System.Drawing.Size(383, 22) Me.ToolStripMenuItem4.Size = New System.Drawing.Size(391, 30)
Me.ToolStripMenuItem4.Text = "DE | Gesamtsicherheit VERAG GmbH - Excel" Me.ToolStripMenuItem4.Text = "DE | Gesamtsicherheit VERAG GmbH - Excel"
Me.ToolStripMenuItem4.Visible = False Me.ToolStripMenuItem4.Visible = False
' '
'ToolStripMenuItem5 'ToolStripMenuItem5
' '
Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5" Me.ToolStripMenuItem5.Name = "ToolStripMenuItem5"
Me.ToolStripMenuItem5.Size = New System.Drawing.Size(383, 22) Me.ToolStripMenuItem5.Size = New System.Drawing.Size(391, 30)
Me.ToolStripMenuItem5.Text = "AT | Gesamtsicherheit VERAG AG - Excel" Me.ToolStripMenuItem5.Text = "AT | Gesamtsicherheit VERAG AG - Excel"
Me.ToolStripMenuItem5.Visible = False Me.ToolStripMenuItem5.Visible = False
' '
'BürgschaftenExcelToolStripMenuItem 'BürgschaftenExcelToolStripMenuItem
' '
Me.BürgschaftenExcelToolStripMenuItem.Name = "BürgschaftenExcelToolStripMenuItem" Me.BürgschaftenExcelToolStripMenuItem.Name = "BürgschaftenExcelToolStripMenuItem"
Me.BürgschaftenExcelToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.BürgschaftenExcelToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.BürgschaftenExcelToolStripMenuItem.Text = "AT | Gesamtsicherheit VERAG Customs Service - Excel" Me.BürgschaftenExcelToolStripMenuItem.Text = "AT | Gesamtsicherheit VERAG Customs Service - Excel"
Me.BürgschaftenExcelToolStripMenuItem.Visible = False Me.BürgschaftenExcelToolStripMenuItem.Visible = False
' '
'ToolStripMenuItem6 'ToolStripMenuItem6
' '
Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6" Me.ToolStripMenuItem6.Name = "ToolStripMenuItem6"
Me.ToolStripMenuItem6.Size = New System.Drawing.Size(383, 22) Me.ToolStripMenuItem6.Size = New System.Drawing.Size(391, 30)
Me.ToolStripMenuItem6.Text = "AT | Gesamtsicherheit IMEX Customs Service GmbH - Excel" Me.ToolStripMenuItem6.Text = "AT | Gesamtsicherheit IMEX Customs Service GmbH - Excel"
Me.ToolStripMenuItem6.Visible = False Me.ToolStripMenuItem6.Visible = False
' '
@@ -1019,7 +1020,7 @@ Partial Class frmHauptfenster
' '
Me.GesamtsicherheitenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ATVeragAGToolStripMenuItem, Me.ATImexCSToolStripMenuItem, Me.ATVeragCSToolStripMenuItem, Me.DEVeragGmbHToolStripMenuItem, Me.ATUnispedGmbHToolStripMenuItem, Me.DEAmbarToolStripMenuItem, Me.ATAtillaToolStripMenuItem}) Me.GesamtsicherheitenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ATVeragAGToolStripMenuItem, Me.ATImexCSToolStripMenuItem, Me.ATVeragCSToolStripMenuItem, Me.DEVeragGmbHToolStripMenuItem, Me.ATUnispedGmbHToolStripMenuItem, Me.DEAmbarToolStripMenuItem, Me.ATAtillaToolStripMenuItem})
Me.GesamtsicherheitenToolStripMenuItem.Name = "GesamtsicherheitenToolStripMenuItem" Me.GesamtsicherheitenToolStripMenuItem.Name = "GesamtsicherheitenToolStripMenuItem"
Me.GesamtsicherheitenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.GesamtsicherheitenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.GesamtsicherheitenToolStripMenuItem.Text = "Gesamtsicherheiten" Me.GesamtsicherheitenToolStripMenuItem.Text = "Gesamtsicherheiten"
Me.GesamtsicherheitenToolStripMenuItem.Visible = False Me.GesamtsicherheitenToolStripMenuItem.Visible = False
' '
@@ -1069,25 +1070,25 @@ Partial Class frmHauptfenster
'ToolStripMenuItem10 'ToolStripMenuItem10
' '
Me.ToolStripMenuItem10.Name = "ToolStripMenuItem10" Me.ToolStripMenuItem10.Name = "ToolStripMenuItem10"
Me.ToolStripMenuItem10.Size = New System.Drawing.Size(383, 22) Me.ToolStripMenuItem10.Size = New System.Drawing.Size(391, 30)
Me.ToolStripMenuItem10.Text = "TICKET Parkplatz" Me.ToolStripMenuItem10.Text = "TICKET Parkplatz"
' '
'TICKETWaidhausToolStripMenuItem 'TICKETWaidhausToolStripMenuItem
' '
Me.TICKETWaidhausToolStripMenuItem.Name = "TICKETWaidhausToolStripMenuItem" Me.TICKETWaidhausToolStripMenuItem.Name = "TICKETWaidhausToolStripMenuItem"
Me.TICKETWaidhausToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.TICKETWaidhausToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.TICKETWaidhausToolStripMenuItem.Text = "Infoschreiben Parkplatz" Me.TICKETWaidhausToolStripMenuItem.Text = "Infoschreiben Parkplatz"
' '
'ToolStripSeparator10 'ToolStripSeparator10
' '
Me.ToolStripSeparator10.Name = "ToolStripSeparator10" Me.ToolStripSeparator10.Name = "ToolStripSeparator10"
Me.ToolStripSeparator10.Size = New System.Drawing.Size(380, 6) Me.ToolStripSeparator10.Size = New System.Drawing.Size(388, 6)
' '
'DAKOSYToolStripMenuItem 'DAKOSYToolStripMenuItem
' '
Me.DAKOSYToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.StammreferenzenVerwaltenToolStripMenuItem}) Me.DAKOSYToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.StammreferenzenVerwaltenToolStripMenuItem})
Me.DAKOSYToolStripMenuItem.Name = "DAKOSYToolStripMenuItem" Me.DAKOSYToolStripMenuItem.Name = "DAKOSYToolStripMenuItem"
Me.DAKOSYToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.DAKOSYToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.DAKOSYToolStripMenuItem.Text = "DAKOSY" Me.DAKOSYToolStripMenuItem.Text = "DAKOSY"
' '
'StammreferenzenVerwaltenToolStripMenuItem 'StammreferenzenVerwaltenToolStripMenuItem
@@ -1099,69 +1100,69 @@ Partial Class frmHauptfenster
'ToolStripSeparator23 'ToolStripSeparator23
' '
Me.ToolStripSeparator23.Name = "ToolStripSeparator23" Me.ToolStripSeparator23.Name = "ToolStripSeparator23"
Me.ToolStripSeparator23.Size = New System.Drawing.Size(380, 6) Me.ToolStripSeparator23.Size = New System.Drawing.Size(388, 6)
' '
'toolOriginalATR 'toolOriginalATR
' '
Me.toolOriginalATR.Image = Global.AVISO.My.Resources.Resources.atr Me.toolOriginalATR.Image = Global.AVISO.My.Resources.Resources.atr
Me.toolOriginalATR.Name = "toolOriginalATR" Me.toolOriginalATR.Name = "toolOriginalATR"
Me.toolOriginalATR.Size = New System.Drawing.Size(383, 22) Me.toolOriginalATR.Size = New System.Drawing.Size(391, 30)
Me.toolOriginalATR.Text = "Original-ATR" Me.toolOriginalATR.Text = "Original-ATR"
' '
'SDLAbholaufträgeToolStripMenuItem 'SDLAbholaufträgeToolStripMenuItem
' '
Me.SDLAbholaufträgeToolStripMenuItem.Name = "SDLAbholaufträgeToolStripMenuItem" Me.SDLAbholaufträgeToolStripMenuItem.Name = "SDLAbholaufträgeToolStripMenuItem"
Me.SDLAbholaufträgeToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.SDLAbholaufträgeToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.SDLAbholaufträgeToolStripMenuItem.Text = "SDL Abholaufträge" Me.SDLAbholaufträgeToolStripMenuItem.Text = "SDL Abholaufträge"
' '
'ToolStripMenuItem13 'ToolStripMenuItem13
' '
Me.ToolStripMenuItem13.Name = "ToolStripMenuItem13" Me.ToolStripMenuItem13.Name = "ToolStripMenuItem13"
Me.ToolStripMenuItem13.Size = New System.Drawing.Size(383, 22) Me.ToolStripMenuItem13.Size = New System.Drawing.Size(391, 30)
Me.ToolStripMenuItem13.Text = "Postversand (Einschreiben)" Me.ToolStripMenuItem13.Text = "Postversand (Einschreiben)"
' '
'VorauskassenToolStripMenuItem 'VorauskassenToolStripMenuItem
' '
Me.VorauskassenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.vorauszahlung Me.VorauskassenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.vorauszahlung
Me.VorauskassenToolStripMenuItem.Name = "VorauskassenToolStripMenuItem" Me.VorauskassenToolStripMenuItem.Name = "VorauskassenToolStripMenuItem"
Me.VorauskassenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.VorauskassenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.VorauskassenToolStripMenuItem.Text = "Vorauskassen" Me.VorauskassenToolStripMenuItem.Text = "Vorauskassen"
' '
'ToolStripSeparator11 'ToolStripSeparator11
' '
Me.ToolStripSeparator11.Name = "ToolStripSeparator11" Me.ToolStripSeparator11.Name = "ToolStripSeparator11"
Me.ToolStripSeparator11.Size = New System.Drawing.Size(380, 6) Me.ToolStripSeparator11.Size = New System.Drawing.Size(388, 6)
' '
'EssensbestellungenToolStripMenuItem 'EssensbestellungenToolStripMenuItem
' '
Me.EssensbestellungenToolStripMenuItem.Name = "EssensbestellungenToolStripMenuItem" Me.EssensbestellungenToolStripMenuItem.Name = "EssensbestellungenToolStripMenuItem"
Me.EssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.EssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.EssensbestellungenToolStripMenuItem.Text = "Essensbestellungen" Me.EssensbestellungenToolStripMenuItem.Text = "Essensbestellungen"
Me.EssensbestellungenToolStripMenuItem.Visible = False Me.EssensbestellungenToolStripMenuItem.Visible = False
' '
'AdministrationEssensbestellungenToolStripMenuItem 'AdministrationEssensbestellungenToolStripMenuItem
' '
Me.AdministrationEssensbestellungenToolStripMenuItem.Name = "AdministrationEssensbestellungenToolStripMenuItem" Me.AdministrationEssensbestellungenToolStripMenuItem.Name = "AdministrationEssensbestellungenToolStripMenuItem"
Me.AdministrationEssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.AdministrationEssensbestellungenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.AdministrationEssensbestellungenToolStripMenuItem.Text = "Administration Essensbestellungen" Me.AdministrationEssensbestellungenToolStripMenuItem.Text = "Administration Essensbestellungen"
Me.AdministrationEssensbestellungenToolStripMenuItem.Visible = False Me.AdministrationEssensbestellungenToolStripMenuItem.Visible = False
' '
'ToolStripSeparator24 'ToolStripSeparator24
' '
Me.ToolStripSeparator24.Name = "ToolStripSeparator24" Me.ToolStripSeparator24.Name = "ToolStripSeparator24"
Me.ToolStripSeparator24.Size = New System.Drawing.Size(380, 6) Me.ToolStripSeparator24.Size = New System.Drawing.Size(388, 6)
' '
'WarenorteToolStripMenuItem 'WarenorteToolStripMenuItem
' '
Me.WarenorteToolStripMenuItem.Name = "WarenorteToolStripMenuItem" Me.WarenorteToolStripMenuItem.Name = "WarenorteToolStripMenuItem"
Me.WarenorteToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.WarenorteToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.WarenorteToolStripMenuItem.Text = "Warenorte" Me.WarenorteToolStripMenuItem.Text = "Warenorte"
' '
'DatevBuchungsexportToolStripMenuItem 'DatevBuchungsexportToolStripMenuItem
' '
Me.DatevBuchungsexportToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EMAILToolStripMenuItem, Me.FTPToolStripMenuItem}) Me.DatevBuchungsexportToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EMAILToolStripMenuItem, Me.FTPToolStripMenuItem})
Me.DatevBuchungsexportToolStripMenuItem.Name = "DatevBuchungsexportToolStripMenuItem" Me.DatevBuchungsexportToolStripMenuItem.Name = "DatevBuchungsexportToolStripMenuItem"
Me.DatevBuchungsexportToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.DatevBuchungsexportToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.DatevBuchungsexportToolStripMenuItem.Text = "Datev Buchungsexport" Me.DatevBuchungsexportToolStripMenuItem.Text = "Datev Buchungsexport"
Me.DatevBuchungsexportToolStripMenuItem.Visible = False Me.DatevBuchungsexportToolStripMenuItem.Visible = False
' '
@@ -1180,13 +1181,13 @@ Partial Class frmHauptfenster
'APIToolStripMenuItem 'APIToolStripMenuItem
' '
Me.APIToolStripMenuItem.Name = "APIToolStripMenuItem" Me.APIToolStripMenuItem.Name = "APIToolStripMenuItem"
Me.APIToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.APIToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.APIToolStripMenuItem.Text = "API" Me.APIToolStripMenuItem.Text = "API"
' '
'FIBUSachkontenToolStripMenuItem 'FIBUSachkontenToolStripMenuItem
' '
Me.FIBUSachkontenToolStripMenuItem.Name = "FIBUSachkontenToolStripMenuItem" Me.FIBUSachkontenToolStripMenuItem.Name = "FIBUSachkontenToolStripMenuItem"
Me.FIBUSachkontenToolStripMenuItem.Size = New System.Drawing.Size(383, 22) Me.FIBUSachkontenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.FIBUSachkontenToolStripMenuItem.Text = "FIBU Sachkonten" Me.FIBUSachkontenToolStripMenuItem.Text = "FIBU Sachkonten"
Me.FIBUSachkontenToolStripMenuItem.Visible = False Me.FIBUSachkontenToolStripMenuItem.Visible = False
' '
@@ -1261,20 +1262,20 @@ Partial Class frmHauptfenster
Me.MANAGERToolStripMenuItem.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Bold) Me.MANAGERToolStripMenuItem.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Bold)
Me.MANAGERToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.android_note Me.MANAGERToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.android_note
Me.MANAGERToolStripMenuItem.Name = "MANAGERToolStripMenuItem" Me.MANAGERToolStripMenuItem.Name = "MANAGERToolStripMenuItem"
Me.MANAGERToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.MANAGERToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.MANAGERToolStripMenuItem.Text = "Formular - Manager" Me.MANAGERToolStripMenuItem.Text = "Formular - Manager"
' '
'ToolStripSeparator3 'ToolStripSeparator3
' '
Me.ToolStripSeparator3.Name = "ToolStripSeparator3" Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(274, 6) Me.ToolStripSeparator3.Size = New System.Drawing.Size(282, 6)
' '
'MailvorlagenToolStripMenuItem 'MailvorlagenToolStripMenuItem
' '
Me.MailvorlagenToolStripMenuItem.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Bold) Me.MailvorlagenToolStripMenuItem.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Bold)
Me.MailvorlagenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.stift Me.MailvorlagenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.stift
Me.MailvorlagenToolStripMenuItem.Name = "MailvorlagenToolStripMenuItem" Me.MailvorlagenToolStripMenuItem.Name = "MailvorlagenToolStripMenuItem"
Me.MailvorlagenToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.MailvorlagenToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.MailvorlagenToolStripMenuItem.Text = "Mailvorlagen" Me.MailvorlagenToolStripMenuItem.Text = "Mailvorlagen"
Me.MailvorlagenToolStripMenuItem.Visible = False Me.MailvorlagenToolStripMenuItem.Visible = False
' '
@@ -1282,7 +1283,7 @@ Partial Class frmHauptfenster
' '
Me.ToolStripMenuItem2.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolStrVM_de, Me.ZollvollmachtDEFiskalToolStripMenuItem, Me.toolStrVM_at, Me.toolStrVM_at4200, Me.ZollvollmachtATEVToolStripMenuItem}) Me.ToolStripMenuItem2.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.toolStrVM_de, Me.ZollvollmachtDEFiskalToolStripMenuItem, Me.toolStrVM_at, Me.toolStrVM_at4200, Me.ZollvollmachtATEVToolStripMenuItem})
Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2"
Me.ToolStripMenuItem2.Size = New System.Drawing.Size(277, 22) Me.ToolStripMenuItem2.Size = New System.Drawing.Size(285, 30)
Me.ToolStripMenuItem2.Text = "Vollmachten" Me.ToolStripMenuItem2.Text = "Vollmachten"
' '
'toolStrVM_de 'toolStrVM_de
@@ -1318,38 +1319,38 @@ Partial Class frmHauptfenster
'ToolStripMenuItem7 'ToolStripMenuItem7
' '
Me.ToolStripMenuItem7.Name = "ToolStripMenuItem7" Me.ToolStripMenuItem7.Name = "ToolStripMenuItem7"
Me.ToolStripMenuItem7.Size = New System.Drawing.Size(277, 22) Me.ToolStripMenuItem7.Size = New System.Drawing.Size(285, 30)
Me.ToolStripMenuItem7.Text = "Gestellungsgarantien" Me.ToolStripMenuItem7.Text = "Gestellungsgarantien"
' '
'ToolStripMenuItem12 'ToolStripMenuItem12
' '
Me.ToolStripMenuItem12.Name = "ToolStripMenuItem12" Me.ToolStripMenuItem12.Name = "ToolStripMenuItem12"
Me.ToolStripMenuItem12.Size = New System.Drawing.Size(277, 22) Me.ToolStripMenuItem12.Size = New System.Drawing.Size(285, 30)
Me.ToolStripMenuItem12.Text = "Importaviso" Me.ToolStripMenuItem12.Text = "Importaviso"
' '
'ToolStripMenuItem15 'ToolStripMenuItem15
' '
Me.ToolStripMenuItem15.Name = "ToolStripMenuItem15" Me.ToolStripMenuItem15.Name = "ToolStripMenuItem15"
Me.ToolStripMenuItem15.Size = New System.Drawing.Size(277, 22) Me.ToolStripMenuItem15.Size = New System.Drawing.Size(285, 30)
Me.ToolStripMenuItem15.Text = "Dispoliste" Me.ToolStripMenuItem15.Text = "Dispoliste"
' '
'ToolStripMenuItem18 'ToolStripMenuItem18
' '
Me.ToolStripMenuItem18.Name = "ToolStripMenuItem18" Me.ToolStripMenuItem18.Name = "ToolStripMenuItem18"
Me.ToolStripMenuItem18.Size = New System.Drawing.Size(277, 22) Me.ToolStripMenuItem18.Size = New System.Drawing.Size(285, 30)
Me.ToolStripMenuItem18.Text = "Verzollungspreise" Me.ToolStripMenuItem18.Text = "Verzollungspreise"
' '
'AuftragÜberwachungsdokumentToolStripMenuItem 'AuftragÜberwachungsdokumentToolStripMenuItem
' '
Me.AuftragÜberwachungsdokumentToolStripMenuItem.Name = "AuftragÜberwachungsdokumentToolStripMenuItem" Me.AuftragÜberwachungsdokumentToolStripMenuItem.Name = "AuftragÜberwachungsdokumentToolStripMenuItem"
Me.AuftragÜberwachungsdokumentToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.AuftragÜberwachungsdokumentToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.AuftragÜberwachungsdokumentToolStripMenuItem.Text = "Auftrag Überwachungsdokument" Me.AuftragÜberwachungsdokumentToolStripMenuItem.Text = "Auftrag Überwachungsdokument"
' '
'toolVUB 'toolVUB
' '
Me.toolVUB.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VUBVERAGSpeditionAGToolStripMenuItem, Me.VeragCustomsServiceToolStripMenuItem}) Me.toolVUB.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.VUBVERAGSpeditionAGToolStripMenuItem, Me.VeragCustomsServiceToolStripMenuItem})
Me.toolVUB.Name = "toolVUB" Me.toolVUB.Name = "toolVUB"
Me.toolVUB.Size = New System.Drawing.Size(277, 22) Me.toolVUB.Size = New System.Drawing.Size(285, 30)
Me.toolVUB.Text = "VUB" Me.toolVUB.Text = "VUB"
' '
'VUBVERAGSpeditionAGToolStripMenuItem 'VUBVERAGSpeditionAGToolStripMenuItem
@@ -1367,37 +1368,37 @@ Partial Class frmHauptfenster
'toolVPCreditreform 'toolVPCreditreform
' '
Me.toolVPCreditreform.Name = "toolVPCreditreform" Me.toolVPCreditreform.Name = "toolVPCreditreform"
Me.toolVPCreditreform.Size = New System.Drawing.Size(277, 22) Me.toolVPCreditreform.Size = New System.Drawing.Size(285, 30)
Me.toolVPCreditreform.Text = "Bonitätsauskunft (Creditreform)" Me.toolVPCreditreform.Text = "Bonitätsauskunft (Creditreform)"
Me.toolVPCreditreform.Visible = False Me.toolVPCreditreform.Visible = False
' '
'ToolStripSeparator9 'ToolStripSeparator9
' '
Me.ToolStripSeparator9.Name = "ToolStripSeparator9" Me.ToolStripSeparator9.Name = "ToolStripSeparator9"
Me.ToolStripSeparator9.Size = New System.Drawing.Size(274, 6) Me.ToolStripSeparator9.Size = New System.Drawing.Size(282, 6)
' '
'VerzollungsunterlagenToolStripMenuItem 'VerzollungsunterlagenToolStripMenuItem
' '
Me.VerzollungsunterlagenToolStripMenuItem.Name = "VerzollungsunterlagenToolStripMenuItem" Me.VerzollungsunterlagenToolStripMenuItem.Name = "VerzollungsunterlagenToolStripMenuItem"
Me.VerzollungsunterlagenToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.VerzollungsunterlagenToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.VerzollungsunterlagenToolStripMenuItem.Text = "Verzollungsunterlagen" Me.VerzollungsunterlagenToolStripMenuItem.Text = "Verzollungsunterlagen"
' '
'ToolStripMenuItem11 'ToolStripMenuItem11
' '
Me.ToolStripMenuItem11.Name = "ToolStripMenuItem11" Me.ToolStripMenuItem11.Name = "ToolStripMenuItem11"
Me.ToolStripMenuItem11.Size = New System.Drawing.Size(277, 22) Me.ToolStripMenuItem11.Size = New System.Drawing.Size(285, 30)
Me.ToolStripMenuItem11.Text = "Verzollungsunterlagen BAR" Me.ToolStripMenuItem11.Text = "Verzollungsunterlagen BAR"
' '
'ToolStripSeparator6 'ToolStripSeparator6
' '
Me.ToolStripSeparator6.Name = "ToolStripSeparator6" Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
Me.ToolStripSeparator6.Size = New System.Drawing.Size(274, 6) Me.ToolStripSeparator6.Size = New System.Drawing.Size(282, 6)
' '
'WAIDHAUSToolStripMenuItem 'WAIDHAUSToolStripMenuItem
' '
Me.WAIDHAUSToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem8, Me.ToolStripMenuItem9, Me.AnnahmeblattIMPORTToolStripMenuItem, Me.AnnahmeblattEXPORTToolStripMenuItem, Me.ChecklisteVerwahrlagerToolStripMenuItem}) Me.WAIDHAUSToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem8, Me.ToolStripMenuItem9, Me.AnnahmeblattIMPORTToolStripMenuItem, Me.AnnahmeblattEXPORTToolStripMenuItem, Me.ChecklisteVerwahrlagerToolStripMenuItem})
Me.WAIDHAUSToolStripMenuItem.Name = "WAIDHAUSToolStripMenuItem" Me.WAIDHAUSToolStripMenuItem.Name = "WAIDHAUSToolStripMenuItem"
Me.WAIDHAUSToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.WAIDHAUSToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.WAIDHAUSToolStripMenuItem.Text = "WAIDHAUS" Me.WAIDHAUSToolStripMenuItem.Text = "WAIDHAUS"
' '
'ToolStripMenuItem8 'ToolStripMenuItem8
@@ -1433,36 +1434,36 @@ Partial Class frmHauptfenster
'ToolStripSeparator13 'ToolStripSeparator13
' '
Me.ToolStripSeparator13.Name = "ToolStripSeparator13" Me.ToolStripSeparator13.Name = "ToolStripSeparator13"
Me.ToolStripSeparator13.Size = New System.Drawing.Size(274, 6) Me.ToolStripSeparator13.Size = New System.Drawing.Size(282, 6)
' '
'EinheitspapierToolStripMenuItem 'EinheitspapierToolStripMenuItem
' '
Me.EinheitspapierToolStripMenuItem.Name = "EinheitspapierToolStripMenuItem" Me.EinheitspapierToolStripMenuItem.Name = "EinheitspapierToolStripMenuItem"
Me.EinheitspapierToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.EinheitspapierToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.EinheitspapierToolStripMenuItem.Text = "Einheitspapier 0777 (Vereinfachte ZA)" Me.EinheitspapierToolStripMenuItem.Text = "Einheitspapier 0777 (Vereinfachte ZA)"
' '
'CMRToolStripMenuItem 'CMRToolStripMenuItem
' '
Me.CMRToolStripMenuItem.Name = "CMRToolStripMenuItem" Me.CMRToolStripMenuItem.Name = "CMRToolStripMenuItem"
Me.CMRToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.CMRToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.CMRToolStripMenuItem.Text = "CMR" Me.CMRToolStripMenuItem.Text = "CMR"
' '
'Einheitspapier0735VersandverfahrenToolStripMenuItem 'Einheitspapier0735VersandverfahrenToolStripMenuItem
' '
Me.Einheitspapier0735VersandverfahrenToolStripMenuItem.Name = "Einheitspapier0735VersandverfahrenToolStripMenuItem" Me.Einheitspapier0735VersandverfahrenToolStripMenuItem.Name = "Einheitspapier0735VersandverfahrenToolStripMenuItem"
Me.Einheitspapier0735VersandverfahrenToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.Einheitspapier0735VersandverfahrenToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.Einheitspapier0735VersandverfahrenToolStripMenuItem.Text = "Einheitspapier 0735 (Versandverfahren)" Me.Einheitspapier0735VersandverfahrenToolStripMenuItem.Text = "Einheitspapier 0735 (Versandverfahren)"
' '
'CarnetTIRToolStripMenuItem 'CarnetTIRToolStripMenuItem
' '
Me.CarnetTIRToolStripMenuItem.Name = "CarnetTIRToolStripMenuItem" Me.CarnetTIRToolStripMenuItem.Name = "CarnetTIRToolStripMenuItem"
Me.CarnetTIRToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.CarnetTIRToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.CarnetTIRToolStripMenuItem.Text = "Carnet TIR" Me.CarnetTIRToolStripMenuItem.Text = "Carnet TIR"
' '
'CarnetTIRALTToolStripMenuItem 'CarnetTIRALTToolStripMenuItem
' '
Me.CarnetTIRALTToolStripMenuItem.Name = "CarnetTIRALTToolStripMenuItem" Me.CarnetTIRALTToolStripMenuItem.Name = "CarnetTIRALTToolStripMenuItem"
Me.CarnetTIRALTToolStripMenuItem.Size = New System.Drawing.Size(277, 22) Me.CarnetTIRALTToolStripMenuItem.Size = New System.Drawing.Size(285, 30)
Me.CarnetTIRALTToolStripMenuItem.Text = "Carnet TIR (ALT)" Me.CarnetTIRALTToolStripMenuItem.Text = "Carnet TIR (ALT)"
' '
'mnuFragezeichen 'mnuFragezeichen
@@ -3976,6 +3977,13 @@ Partial Class frmHauptfenster
Me.MitarbeiterverzeichnisToolStripMenuItem.Size = New System.Drawing.Size(190, 22) Me.MitarbeiterverzeichnisToolStripMenuItem.Size = New System.Drawing.Size(190, 22)
Me.MitarbeiterverzeichnisToolStripMenuItem.Text = "Mitarbeiterverzeichnis" Me.MitarbeiterverzeichnisToolStripMenuItem.Text = "Mitarbeiterverzeichnis"
' '
'VerträgeToolStripMenuItem
'
Me.VerträgeToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.spedbuch_small
Me.VerträgeToolStripMenuItem.Name = "VerträgeToolStripMenuItem"
Me.VerträgeToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
Me.VerträgeToolStripMenuItem.Text = "Verträge"
'
'frmHauptfenster 'frmHauptfenster
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -4434,4 +4442,5 @@ Partial Class frmHauptfenster
Friend WithEvents ATAtillaToolStripMenuItem As ToolStripMenuItem Friend WithEvents ATAtillaToolStripMenuItem As ToolStripMenuItem
Friend WithEvents WikiToolStripMenuItem As ToolStripMenuItem Friend WithEvents WikiToolStripMenuItem As ToolStripMenuItem
Friend WithEvents MitarbeiterverzeichnisToolStripMenuItem As ToolStripMenuItem Friend WithEvents MitarbeiterverzeichnisToolStripMenuItem As ToolStripMenuItem
Friend WithEvents VerträgeToolStripMenuItem As ToolStripMenuItem
End Class End Class

6
Aviso/frmHauptfenster.vb
View File

@@ -3474,7 +3474,7 @@ ELSE_ATILLA:
Dim path = SDL.cFinanzOnlineWebService.genUID_Formular("ATU74813856") Dim path = SDL.cFinanzOnlineWebService.genUID_Formular("ATU74813856")
If path <> "" Then If path <> "" Then
Process.Start(path) process.Start(path)
End If End If
'If SDL.cFinanzOnlineWebService.Call_Web_Service_MethodUID_Abfrage_NEU2020(firma, "ATU74813856") = 0 Then 'If SDL.cFinanzOnlineWebService.Call_Web_Service_MethodUID_Abfrage_NEU2020(firma, "ATU74813856") = 0 Then
' MsgBox("HURRA2" & vbNewLine & firma) ' MsgBox("HURRA2" & vbNewLine & firma)
@@ -5252,4 +5252,8 @@ ELSE_ATILLA:
Private Sub VerträgeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VerträgeToolStripMenuItem.Click
Dim f As New SDL.cKundenSearchVertrag
f.Show(Me)
End Sub
End Class End Class