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

Merge branch 'master' of https://dev.azure.com/VeragAG/_git/Aviso

Browse Source
This commit is contained in:
m.ilhan
2025-10-06 08:32:31 +02:00
parent 69f40c036c 2b23406ebc
commit 448ad87aeb
35 changed files with 8403 additions and 3335 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
Aviso.sln
View File

@@ -31,6 +31,8 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAG_PROG_ALLGEMEIN", "..\
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TELOTEC_Worker_lib", "..\..\ADMIN\ADMIN\TELOTEK_Worker_lib\TELOTEC_Worker_lib.vbproj", "{5B947A66-009A-4BB6-B925-F84A01045095}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "MDM_Worker_lib", "..\..\ADMIN\ADMIN\MDM_Worker\MDM_Worker_lib.vbproj", "{2E4DBC09-E57B-4AC5-8554-6117D71F993B}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
@@ -253,6 +255,22 @@ Global
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x64.Build.0 = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.ActiveCfg = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Any CPU.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x64.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x64.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x86.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x86.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Any CPU.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Any CPU.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Mixed Platforms.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x64.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x64.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x86.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x86.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE

11
Aviso/ATEZ/frmATEZ_EZA.vb
View File

@@ -139,8 +139,7 @@ Public Class frmATEZ_EZA
Dim ATEZ_RH_EZA As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubJobOrderRequest With {
.referenceNo = ioReference,
.regimeType = "IM",
.customer = "AVISO",
.regimeType = "IM",' .customer = "AVISO",
.additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With {
.transaction = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubTransaction With {
.ioPartner = txtDyMandant.Text,
@@ -163,12 +162,8 @@ Public Class frmATEZ_EZA
.declarantIsConsignee = True,
.representationRelationshipCode = "",
.inputTaxDeduction = "",'"true",
.procedureCodeRequested = procedureCodeRequested.ToString,
.goodsStatus = "",'"EU",
.costs = New List(Of VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubCost) From {
New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubCost With {.costAmount = If(SENDUNG.tblSnd_Warenwert IsNot Nothing, CDbl(SENDUNG.tblSnd_Warenwert).ToString("F2", System.Globalization.CultureInfo.InvariantCulture), 0), .costCurrency = If(SENDUNG.tblSnd_WarenwertWaehrung, "")}
},
.transportMeansArrivalIdentity = txtLKWId.Text,
.procedureCodeRequested = procedureCodeRequested.ToString,' .goodsStatus = "",'"EU",
.transportMeansArrivalIdentity = txtLKWId.Text,
.transportMeansNationalityCode = If(AVISO.LKW_Nationalitaet, "")
}
}

345
Aviso/Anhänge/frmSendungAnhangImport.Designer.vb generated
View File

@@ -26,26 +26,19 @@ Partial Class frmSendungAnhangImport
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungAnhangImport))
Me.lbl = New System.Windows.Forms.Label()
Me.flpnlAviso = New System.Windows.Forms.FlowLayoutPanel()
Me.UsrCntlSendungAnhangElement1 = New AVISO.usrCntlSendungAnhangElement()
Me.UsrCntlSendungAnhangElement2 = New AVISO.usrCntlSendungAnhangElement()
Me.flpnlSendungen = New System.Windows.Forms.FlowLayoutPanel()
Me.lblSendungen = New System.Windows.Forms.Label()
Me.lblImport = New System.Windows.Forms.Label()
Me.pnlAnfuegen = New System.Windows.Forms.Panel()
Me.cbxAlternativePDFAnsicht = New System.Windows.Forms.CheckBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.txtBezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.lblBezeichnung = New System.Windows.Forms.Label()
Me.btnSeitenLoeschen = New System.Windows.Forms.Button()
Me.btnAnfuegenAll = New System.Windows.Forms.Button()
Me.txtDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.lblDatei = New System.Windows.Forms.Label()
Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.lblSendung = New System.Windows.Forms.Label()
Me.lblArt = New System.Windows.Forms.Label()
Me.cboArt = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.btnAnfuegen = New System.Windows.Forms.Button()
Me.txtSeiten = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.lblSeiten = New System.Windows.Forms.Label()
Me.cbxDelPDF = New System.Windows.Forms.CheckBox()
Me.btnAdd = New System.Windows.Forms.Button()
@@ -62,7 +55,6 @@ Partial Class frmSendungAnhangImport
Me.btnSndDel = New System.Windows.Forms.Button()
Me.PrintDocument1 = New System.Drawing.Printing.PrintDocument()
Me.btnAddSnd = New System.Windows.Forms.Button()
Me.cboSendungen = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.lblSendungsdetails = New System.Windows.Forms.Label()
Me.lblWarenbeichnung = New System.Windows.Forms.Label()
Me.btnSndEdit = New System.Windows.Forms.Button()
@@ -72,6 +64,15 @@ Partial Class frmSendungAnhangImport
Me.Button17 = New System.Windows.Forms.Button()
Me.lblRgPreis = New System.Windows.Forms.Label()
Me.pnlSendung = New System.Windows.Forms.Panel()
Me.txtBezeichnung = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtDateiname = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.cboArt = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.txtSeiten = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.cboSendungen = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.UsrCntlSendungAnhangElement1 = New AVISO.usrCntlSendungAnhangElement()
Me.UsrCntlSendungAnhangElement2 = New AVISO.usrCntlSendungAnhangElement()
Me.Button2 = New System.Windows.Forms.Button()
Me.flpnlAviso.SuspendLayout()
Me.pnlAnfuegen.SuspendLayout()
Me.cntxt.SuspendLayout()
@@ -103,38 +104,6 @@ Partial Class frmSendungAnhangImport
Me.flpnlAviso.Size = New System.Drawing.Size(253, 825)
Me.flpnlAviso.TabIndex = 7
'
'UsrCntlSendungAnhangElement1
'
Me.UsrCntlSendungAnhangElement1.ACTIVE = False
Me.UsrCntlSendungAnhangElement1.BackColor = System.Drawing.Color.White
Me.UsrCntlSendungAnhangElement1.FILE_ANHID = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_DOCID = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_NAME = "False"
Me.UsrCntlSendungAnhangElement1.FILE_PAGES = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_PATH = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_SIZE = "False"
Me.UsrCntlSendungAnhangElement1.FILE_TYPE = Nothing
Me.UsrCntlSendungAnhangElement1.Location = New System.Drawing.Point(3, 3)
Me.UsrCntlSendungAnhangElement1.Name = "UsrCntlSendungAnhangElement1"
Me.UsrCntlSendungAnhangElement1.Size = New System.Drawing.Size(130, 64)
Me.UsrCntlSendungAnhangElement1.TabIndex = 0
'
'UsrCntlSendungAnhangElement2
'
Me.UsrCntlSendungAnhangElement2.ACTIVE = False
Me.UsrCntlSendungAnhangElement2.BackColor = System.Drawing.Color.White
Me.UsrCntlSendungAnhangElement2.FILE_ANHID = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_DOCID = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_NAME = "False"
Me.UsrCntlSendungAnhangElement2.FILE_PAGES = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_PATH = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_SIZE = "False"
Me.UsrCntlSendungAnhangElement2.FILE_TYPE = Nothing
Me.UsrCntlSendungAnhangElement2.Location = New System.Drawing.Point(3, 73)
Me.UsrCntlSendungAnhangElement2.Name = "UsrCntlSendungAnhangElement2"
Me.UsrCntlSendungAnhangElement2.Size = New System.Drawing.Size(130, 64)
Me.UsrCntlSendungAnhangElement2.TabIndex = 1
'
'flpnlSendungen
'
Me.flpnlSendungen.AllowDrop = True
@@ -216,31 +185,6 @@ Partial Class frmSendungAnhangImport
Me.Button1.UseVisualStyleBackColor = False
Me.Button1.Visible = False
'
'txtBezeichnung
'
Me.txtBezeichnung._DateTimeOnly = False
Me.txtBezeichnung._numbersOnly = False
Me.txtBezeichnung._numbersOnlyKommastellen = ""
Me.txtBezeichnung._numbersOnlyTrennzeichen = True
Me.txtBezeichnung._Prozent = False
Me.txtBezeichnung._ShortDateNew = False
Me.txtBezeichnung._ShortDateOnly = False
Me.txtBezeichnung._TimeOnly = False
Me.txtBezeichnung._TimeOnly_Seconds = False
Me.txtBezeichnung._value = ""
Me.txtBezeichnung._Waehrung = False
Me.txtBezeichnung._WaehrungZeichen = True
Me.txtBezeichnung.BackColor = System.Drawing.Color.White
Me.txtBezeichnung.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtBezeichnung.ForeColor = System.Drawing.Color.Black
Me.txtBezeichnung.Location = New System.Drawing.Point(68, 105)
Me.txtBezeichnung.MaxLineLength = -1
Me.txtBezeichnung.MaxLines_Warning = ""
Me.txtBezeichnung.MaxLines_Warning_Label = Nothing
Me.txtBezeichnung.Name = "txtBezeichnung"
Me.txtBezeichnung.Size = New System.Drawing.Size(453, 26)
Me.txtBezeichnung.TabIndex = 7
'
'lblBezeichnung
'
Me.lblBezeichnung.AutoSize = True
@@ -272,30 +216,6 @@ Partial Class frmSendungAnhangImport
Me.btnAnfuegenAll.Text = ">> Ganzes Dokument anfügen >>"
Me.btnAnfuegenAll.UseVisualStyleBackColor = False
'
'txtDateiname
'
Me.txtDateiname._DateTimeOnly = False
Me.txtDateiname._numbersOnly = False
Me.txtDateiname._numbersOnlyKommastellen = ""
Me.txtDateiname._numbersOnlyTrennzeichen = True
Me.txtDateiname._Prozent = False
Me.txtDateiname._ShortDateNew = False
Me.txtDateiname._ShortDateOnly = False
Me.txtDateiname._TimeOnly = False
Me.txtDateiname._TimeOnly_Seconds = False
Me.txtDateiname._value = ""
Me.txtDateiname._Waehrung = False
Me.txtDateiname._WaehrungZeichen = True
Me.txtDateiname.ForeColor = System.Drawing.Color.Black
Me.txtDateiname.Location = New System.Drawing.Point(68, 11)
Me.txtDateiname.MaxLineLength = -1
Me.txtDateiname.MaxLines_Warning = ""
Me.txtDateiname.MaxLines_Warning_Label = Nothing
Me.txtDateiname.Name = "txtDateiname"
Me.txtDateiname.ReadOnly = True
Me.txtDateiname.Size = New System.Drawing.Size(732, 20)
Me.txtDateiname.TabIndex = 1
'
'lblDatei
'
Me.lblDatei.AutoSize = True
@@ -305,30 +225,6 @@ Partial Class frmSendungAnhangImport
Me.lblDatei.TabIndex = 0
Me.lblDatei.Text = "Datei:"
'
'MyTextBox2
'
Me.MyTextBox2._DateTimeOnly = False
Me.MyTextBox2._numbersOnly = False
Me.MyTextBox2._numbersOnlyKommastellen = ""
Me.MyTextBox2._numbersOnlyTrennzeichen = True
Me.MyTextBox2._Prozent = False
Me.MyTextBox2._ShortDateNew = False
Me.MyTextBox2._ShortDateOnly = False
Me.MyTextBox2._TimeOnly = False
Me.MyTextBox2._TimeOnly_Seconds = False
Me.MyTextBox2._value = ""
Me.MyTextBox2._Waehrung = False
Me.MyTextBox2._WaehrungZeichen = True
Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
Me.MyTextBox2.Location = New System.Drawing.Point(68, 137)
Me.MyTextBox2.MaxLineLength = -1
Me.MyTextBox2.MaxLines_Warning = ""
Me.MyTextBox2.MaxLines_Warning_Label = Nothing
Me.MyTextBox2.Name = "MyTextBox2"
Me.MyTextBox2.ReadOnly = True
Me.MyTextBox2.Size = New System.Drawing.Size(453, 20)
Me.MyTextBox2.TabIndex = 13
'
'lblSendung
'
Me.lblSendung.AutoSize = True
@@ -347,20 +243,6 @@ Partial Class frmSendungAnhangImport
Me.lblArt.TabIndex = 5
Me.lblArt.Text = "Art:"
'
'cboArt
'
Me.cboArt._allowedValuesFreiText = Nothing
Me.cboArt._allowFreiText = False
Me.cboArt._value = ""
Me.cboArt.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboArt.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboArt.FormattingEnabled = True
Me.cboArt.Location = New System.Drawing.Point(68, 75)
Me.cboArt.Name = "cboArt"
Me.cboArt.Size = New System.Drawing.Size(242, 28)
Me.cboArt.TabIndex = 6
'
'btnAnfuegen
'
Me.btnAnfuegen.BackColor = System.Drawing.Color.Wheat
@@ -372,31 +254,6 @@ Partial Class frmSendungAnhangImport
Me.btnAnfuegen.Text = ">> Anfügen >>"
Me.btnAnfuegen.UseVisualStyleBackColor = False
'
'txtSeiten
'
Me.txtSeiten._DateTimeOnly = False
Me.txtSeiten._numbersOnly = False
Me.txtSeiten._numbersOnlyKommastellen = ""
Me.txtSeiten._numbersOnlyTrennzeichen = True
Me.txtSeiten._Prozent = False
Me.txtSeiten._ShortDateNew = False
Me.txtSeiten._ShortDateOnly = False
Me.txtSeiten._TimeOnly = False
Me.txtSeiten._TimeOnly_Seconds = False
Me.txtSeiten._value = ""
Me.txtSeiten._Waehrung = False
Me.txtSeiten._WaehrungZeichen = True
Me.txtSeiten.BackColor = System.Drawing.Color.White
Me.txtSeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSeiten.ForeColor = System.Drawing.Color.Black
Me.txtSeiten.Location = New System.Drawing.Point(68, 47)
Me.txtSeiten.MaxLineLength = -1
Me.txtSeiten.MaxLines_Warning = ""
Me.txtSeiten.MaxLines_Warning_Label = Nothing
Me.txtSeiten.Name = "txtSeiten"
Me.txtSeiten.Size = New System.Drawing.Size(242, 26)
Me.txtSeiten.TabIndex = 4
'
'lblSeiten
'
Me.lblSeiten.AutoSize = True
@@ -472,6 +329,7 @@ Partial Class frmSendungAnhangImport
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnl.Controls.Add(Me.Button2)
Me.pnl.Controls.Add(Me.Button5)
Me.pnl.Controls.Add(Me.PdfViewer)
Me.pnl.Controls.Add(Me.WebBrowser)
@@ -551,20 +409,6 @@ Partial Class frmSendungAnhangImport
Me.btnAddSnd.Text = "+ NEU"
Me.btnAddSnd.UseVisualStyleBackColor = True
'
'cboSendungen
'
Me.cboSendungen._allowedValuesFreiText = Nothing
Me.cboSendungen._allowFreiText = False
Me.cboSendungen._value = ""
Me.cboSendungen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.cboSendungen.DropDownWidth = 450
Me.cboSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboSendungen.FormattingEnabled = True
Me.cboSendungen.Location = New System.Drawing.Point(8, 28)
Me.cboSendungen.Name = "cboSendungen"
Me.cboSendungen.Size = New System.Drawing.Size(306, 28)
Me.cboSendungen.TabIndex = 9
'
'lblSendungsdetails
'
Me.lblSendungsdetails.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -674,6 +518,174 @@ Partial Class frmSendungAnhangImport
Me.pnlSendung.Size = New System.Drawing.Size(321, 860)
Me.pnlSendung.TabIndex = 0
'
'txtBezeichnung
'
Me.txtBezeichnung._DateTimeOnly = False
Me.txtBezeichnung._numbersOnly = False
Me.txtBezeichnung._numbersOnlyKommastellen = ""
Me.txtBezeichnung._numbersOnlyTrennzeichen = True
Me.txtBezeichnung._Prozent = False
Me.txtBezeichnung._ShortDateNew = False
Me.txtBezeichnung._ShortDateOnly = False
Me.txtBezeichnung._TimeOnly = False
Me.txtBezeichnung._TimeOnly_Seconds = False
Me.txtBezeichnung._value = ""
Me.txtBezeichnung._Waehrung = False
Me.txtBezeichnung._WaehrungZeichen = True
Me.txtBezeichnung.BackColor = System.Drawing.Color.White
Me.txtBezeichnung.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtBezeichnung.ForeColor = System.Drawing.Color.Black
Me.txtBezeichnung.Location = New System.Drawing.Point(68, 105)
Me.txtBezeichnung.MaxLineLength = -1
Me.txtBezeichnung.MaxLines_Warning = ""
Me.txtBezeichnung.MaxLines_Warning_Label = Nothing
Me.txtBezeichnung.Name = "txtBezeichnung"
Me.txtBezeichnung.Size = New System.Drawing.Size(453, 26)
Me.txtBezeichnung.TabIndex = 7
'
'txtDateiname
'
Me.txtDateiname._DateTimeOnly = False
Me.txtDateiname._numbersOnly = False
Me.txtDateiname._numbersOnlyKommastellen = ""
Me.txtDateiname._numbersOnlyTrennzeichen = True
Me.txtDateiname._Prozent = False
Me.txtDateiname._ShortDateNew = False
Me.txtDateiname._ShortDateOnly = False
Me.txtDateiname._TimeOnly = False
Me.txtDateiname._TimeOnly_Seconds = False
Me.txtDateiname._value = ""
Me.txtDateiname._Waehrung = False
Me.txtDateiname._WaehrungZeichen = True
Me.txtDateiname.ForeColor = System.Drawing.Color.Black
Me.txtDateiname.Location = New System.Drawing.Point(68, 11)
Me.txtDateiname.MaxLineLength = -1
Me.txtDateiname.MaxLines_Warning = ""
Me.txtDateiname.MaxLines_Warning_Label = Nothing
Me.txtDateiname.Name = "txtDateiname"
Me.txtDateiname.ReadOnly = True
Me.txtDateiname.Size = New System.Drawing.Size(732, 20)
Me.txtDateiname.TabIndex = 1
'
'MyTextBox2
'
Me.MyTextBox2._DateTimeOnly = False
Me.MyTextBox2._numbersOnly = False
Me.MyTextBox2._numbersOnlyKommastellen = ""
Me.MyTextBox2._numbersOnlyTrennzeichen = True
Me.MyTextBox2._Prozent = False
Me.MyTextBox2._ShortDateNew = False
Me.MyTextBox2._ShortDateOnly = False
Me.MyTextBox2._TimeOnly = False
Me.MyTextBox2._TimeOnly_Seconds = False
Me.MyTextBox2._value = ""
Me.MyTextBox2._Waehrung = False
Me.MyTextBox2._WaehrungZeichen = True
Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
Me.MyTextBox2.Location = New System.Drawing.Point(68, 137)
Me.MyTextBox2.MaxLineLength = -1
Me.MyTextBox2.MaxLines_Warning = ""
Me.MyTextBox2.MaxLines_Warning_Label = Nothing
Me.MyTextBox2.Name = "MyTextBox2"
Me.MyTextBox2.ReadOnly = True
Me.MyTextBox2.Size = New System.Drawing.Size(453, 20)
Me.MyTextBox2.TabIndex = 13
'
'cboArt
'
Me.cboArt._allowedValuesFreiText = Nothing
Me.cboArt._allowFreiText = False
Me.cboArt._value = ""
Me.cboArt.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboArt.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboArt.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboArt.FormattingEnabled = True
Me.cboArt.Location = New System.Drawing.Point(68, 75)
Me.cboArt.Name = "cboArt"
Me.cboArt.Size = New System.Drawing.Size(242, 28)
Me.cboArt.TabIndex = 6
'
'txtSeiten
'
Me.txtSeiten._DateTimeOnly = False
Me.txtSeiten._numbersOnly = False
Me.txtSeiten._numbersOnlyKommastellen = ""
Me.txtSeiten._numbersOnlyTrennzeichen = True
Me.txtSeiten._Prozent = False
Me.txtSeiten._ShortDateNew = False
Me.txtSeiten._ShortDateOnly = False
Me.txtSeiten._TimeOnly = False
Me.txtSeiten._TimeOnly_Seconds = False
Me.txtSeiten._value = ""
Me.txtSeiten._Waehrung = False
Me.txtSeiten._WaehrungZeichen = True
Me.txtSeiten.BackColor = System.Drawing.Color.White
Me.txtSeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSeiten.ForeColor = System.Drawing.Color.Black
Me.txtSeiten.Location = New System.Drawing.Point(68, 47)
Me.txtSeiten.MaxLineLength = -1
Me.txtSeiten.MaxLines_Warning = ""
Me.txtSeiten.MaxLines_Warning_Label = Nothing
Me.txtSeiten.Name = "txtSeiten"
Me.txtSeiten.Size = New System.Drawing.Size(242, 26)
Me.txtSeiten.TabIndex = 4
'
'cboSendungen
'
Me.cboSendungen._allowedValuesFreiText = Nothing
Me.cboSendungen._allowFreiText = False
Me.cboSendungen._value = ""
Me.cboSendungen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.cboSendungen.DropDownWidth = 450
Me.cboSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboSendungen.FormattingEnabled = True
Me.cboSendungen.Location = New System.Drawing.Point(8, 28)
Me.cboSendungen.Name = "cboSendungen"
Me.cboSendungen.Size = New System.Drawing.Size(306, 28)
Me.cboSendungen.TabIndex = 9
'
'UsrCntlSendungAnhangElement1
'
Me.UsrCntlSendungAnhangElement1.ACTIVE = False
Me.UsrCntlSendungAnhangElement1.BackColor = System.Drawing.Color.White
Me.UsrCntlSendungAnhangElement1.FILE_ANHID = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_DOCID = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_NAME = "False"
Me.UsrCntlSendungAnhangElement1.FILE_PAGES = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_PATH = Nothing
Me.UsrCntlSendungAnhangElement1.FILE_SIZE = "False"
Me.UsrCntlSendungAnhangElement1.FILE_TYPE = Nothing
Me.UsrCntlSendungAnhangElement1.Location = New System.Drawing.Point(3, 3)
Me.UsrCntlSendungAnhangElement1.Name = "UsrCntlSendungAnhangElement1"
Me.UsrCntlSendungAnhangElement1.Size = New System.Drawing.Size(130, 64)
Me.UsrCntlSendungAnhangElement1.TabIndex = 0
'
'UsrCntlSendungAnhangElement2
'
Me.UsrCntlSendungAnhangElement2.ACTIVE = False
Me.UsrCntlSendungAnhangElement2.BackColor = System.Drawing.Color.White
Me.UsrCntlSendungAnhangElement2.FILE_ANHID = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_DOCID = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_NAME = "False"
Me.UsrCntlSendungAnhangElement2.FILE_PAGES = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_PATH = Nothing
Me.UsrCntlSendungAnhangElement2.FILE_SIZE = "False"
Me.UsrCntlSendungAnhangElement2.FILE_TYPE = Nothing
Me.UsrCntlSendungAnhangElement2.Location = New System.Drawing.Point(3, 73)
Me.UsrCntlSendungAnhangElement2.Name = "UsrCntlSendungAnhangElement2"
Me.UsrCntlSendungAnhangElement2.Size = New System.Drawing.Size(130, 64)
Me.UsrCntlSendungAnhangElement2.TabIndex = 1
'
'Button2
'
Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Button2.Location = New System.Drawing.Point(696, 1)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(100, 34)
Me.Button2.TabIndex = 3
Me.Button2.Text = "Zu ""Seiten"" hinzu" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(Strg + Leertaste)"
Me.Button2.UseVisualStyleBackColor = True
'
'frmSendungAnhangImport
'
Me.AllowDrop = True
@@ -754,4 +766,5 @@ Partial Class frmSendungAnhangImport
Friend WithEvents cbxAlternativePDFAnsicht As CheckBox
Friend WithEvents lblRgPreis As Label
Friend WithEvents pnlSendung As Panel
Friend WithEvents Button2 As Button
End Class

99
Aviso/Anhänge/frmSendungAnhangImport.vb
View File

@@ -69,11 +69,75 @@ Public Class frmSendungAnhangImport
End Function
Sub initElement(USRCNTL As usrCntlSendungAnhangElement)
AddHandler USRCNTL.ME_CLICK, Sub(STRG_PRESSED)
AddHandler USRCNTL.ME_CLICK, Sub(STRG_PRESSED, SHIFT_PRESSED)
' If BrowserLoaded Then
If Not STRG_PRESSED Then
If SHIFT_PRESSED Then
'prüfen, ob genau 1 Elemnt markeirt ist, dann kein neues Laden nötig
If USRCNTL.ACTIVE Then
If checkIf1isSelected() Then Exit Sub 'Bereits aktiv, aber nur wenn 1 markiert
End If
' Hier Fehlt Code, der Shift abfängt
' --- SHIFT-Bereichsauswahl (nur im gleichen Panel) ---
' Anker = das (genau) eine bereits markierte Element suchen
Dim anchor As usrCntlSendungAnhangElement = Nothing
For Each c As Control In flpnlAviso.Controls
Dim u = TryCast(c, usrCntlSendungAnhangElement)
If u IsNot Nothing AndAlso u.ACTIVE Then
anchor = u
Exit For
End If
Next
If anchor Is Nothing Then
For Each c As Control In flpnlSendungen.Controls
Dim u = TryCast(c, usrCntlSendungAnhangElement)
If u IsNot Nothing AndAlso u.ACTIVE Then
anchor = u
Exit For
End If
Next
End If
If anchor IsNot Nothing Then
Dim pAnchor = TryCast(anchor.Parent, FlowLayoutPanel)
Dim pClick = TryCast(USRCNTL.Parent, FlowLayoutPanel)
' Nur wenn beide im selben FlowLayoutPanel liegen:
If pAnchor IsNot Nothing AndAlso pAnchor Is pClick Then
Dim i1 As Integer = pAnchor.Controls.IndexOf(anchor)
Dim i2 As Integer = pAnchor.Controls.IndexOf(USRCNTL)
Dim fromIdx As Integer = Math.Min(i1, i2)
Dim toIdx As Integer = Math.Max(i1, i2)
' Vorher alles deselektieren (beide Panels)
For Each c As Control In flpnlAviso.Controls
Dim u = TryCast(c, usrCntlSendungAnhangElement)
If u IsNot Nothing Then u.ACTIVE = False
Next
For Each c As Control In flpnlSendungen.Controls
Dim u = TryCast(c, usrCntlSendungAnhangElement)
If u IsNot Nothing Then u.ACTIVE = False
Next
' Bereich [fromIdx..toIdx] markieren (inklusive)
For i As Integer = fromIdx To toIdx
Dim u = TryCast(pAnchor.Controls(i), usrCntlSendungAnhangElement)
If u IsNot Nothing Then u.ACTIVE = True
Next
' Nichts weiter tun (kein neues Laden/Navigieren)
Exit Sub
End If
End If
' --- Ende SHIFT-Bereichsauswahl ---
ElseIf STRG_PRESSED Then
If checkIfSamePanel(USRCNTL) Then
USRCNTL.ACTIVE = Not USRCNTL.ACTIVE
End If
Else
'prüfen, ob genau 1 Elemnt markeirt ist, dann kein neues Laden nötig
If USRCNTL.ACTIVE Then
@@ -99,10 +163,6 @@ Public Class frmSendungAnhangImport
txtDateiname.Text = USRCNTL.FILE_NAME
txtSeiten.Focus()
Else
If checkIfSamePanel(USRCNTL) Then
USRCNTL.ACTIVE = Not USRCNTL.ACTIVE
End If
End If
End Sub
@@ -1286,6 +1346,7 @@ Public Class frmSendungAnhangImport
If e.KeyCode = Keys.Return Then
btnAnfuegen.PerformClick()
End If
End Sub
Sub initSendungen()
cboSendungen.Items.Clear()
@@ -1742,6 +1803,12 @@ Public Class frmSendungAnhangImport
btnSndEdit.PerformClick()
e.IsInputKey = True ' Damit Event abgefangen ist, sonst steht "+" im Feld
End If
' Prüfen, ob STRG + " " gedrückt wurde
If e.Control AndAlso (e.KeyCode = Keys.Space) Then
AddCurrentPage()
e.IsInputKey = True ' Damit Event abgefangen ist, sonst steht " " im Feld
End If
ElseIf e.Modifiers = Keys.Shift Then ' PDFs durchlaufen
If e.KeyCode = Keys.PageDown Then
nextART()
@@ -2182,6 +2249,26 @@ Public Class frmSendungAnhangImport
Private Sub flpnlSnd_DragEnter(sender As Object, e As DragEventArgs) Handles flpnlSendungen.DragEnter
e.Effect = DragDropEffects.All
End Sub
Private Sub Button2_Click_1(sender As Object, e As EventArgs) Handles Button2.Click
AddCurrentPage()
End Sub
Sub AddCurrentPage()
Dim CurrentPageNumber = PdfViewer.CurrentPageNumber
If CurrentPageNumber > 0 Then
If txtSeiten.Text = "" Then
txtSeiten.Text = CurrentPageNumber.ToString.Trim
Else
txtSeiten.Text &= "," & CurrentPageNumber.ToString.Trim
End If
txtSeiten.Focus()
txtSeiten.SelectionStart = txtSeiten.TextLength
End If
End Sub
'Private Sub flpnlSendungen_Paint(sender As Object, e As PaintEventArgs) Handles flpnlSendungen.Paint
' Dim files() As String = e.Data.GetData(DataFormats.FileDrop)
' For Each path In files

14
Aviso/Anhänge/usrCntlSendungAnhangElement.vb
View File

@@ -14,7 +14,7 @@ Public Class usrCntlSendungAnhangElement
Property FILE_ANHID
Public Event ME_CLICK(STRG_PRESSED)
Public Event ME_CLICK(STRG_PRESSED, SHIFT_PRESSED)
Public Event ME_DELETE(FILE_DOCID, FILE_ANHID)
Public Event ME_COMPRESS(FILE_DOCID, FILE_ANHID)
@@ -111,11 +111,11 @@ Public Class usrCntlSendungAnhangElement
'End Sub
Private Sub pic_Click(sender As Object, e As MouseEventArgs) Handles pic.MouseClick, lbl.MouseClick, Me.MouseClick, lblSize.MouseClick
If e.Button = MouseButtons.Left Then
RaiseEvent ME_CLICK((My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
RaiseEvent ME_CLICK(My.Computer.Keyboard.CtrlKeyDown, My.Computer.Keyboard.ShiftKeyDown)
End If
End Sub
Public Sub CLICK_Me()
RaiseEvent ME_CLICK(False) 'My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
RaiseEvent ME_CLICK(False, False) 'My.Computer.Keyboard.CtrlKeyDown Or My.Computer.Keyboard.ShiftKeyDown))
End Sub
Private Sub pic_doubleClick(sender As Object, e As EventArgs) Handles pic.DoubleClick, lbl.DoubleClick, Me.DoubleClick, lblSize.DoubleClick
@@ -147,8 +147,14 @@ Public Class usrCntlSendungAnhangElement
Dim ANH As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(FILE_ANHID)
Dim f As New frmSendungAnhangUmbenennenUmkateg(FILE_NAME, ANH.anh_Art)
If f.ShowDialog = DialogResult.OK Then
Dim ext As String = IO.Path.GetExtension(originalName)
ANH.anh_Name = f.txtBezeichnung.Text
Dim name As String = f.txtBezeichnung.Text
If String.IsNullOrWhiteSpace(IO.Path.GetExtension(name)) AndAlso ext <> "" Then ' prüfen ob Benutzer schon eine Endung eingegeben hat
name &= ext
End If
ANH.anh_Name = name
ANH.anh_Art = f.cboArt._value
ANH.SAVE()
FILE_NAME = f.txtBezeichnung.Text

1
Aviso/Aviso.vbproj
View File

@@ -1495,6 +1495,7 @@
</EmbeddedResource>
<EmbeddedResource Include="frmAuswahl_Aviso.resx">
<DependentUpon>frmAuswahl_Aviso.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="Auswertung\frmAuswertung.resx">
<DependentUpon>frmAuswertung.vb</DependentUpon>

16
Aviso/AvisoStatusFunctions.vb
View File

@@ -1,19 +1,7 @@

Imports System.IO
Imports SDL
Imports VERAG_PROG_ALLGEMEIN
Imports VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO
Imports VERAG_PROG_ALLGEMEIN.cGlobal
Imports com.esendex.sdk.messaging
Imports Newtonsoft.Json
Imports System.Reflection
Imports System.Drawing.Drawing2D
Imports SDL
Imports Microsoft.Office.Interop
Imports Spire.Pdf.Texts
Imports System.Net
Imports System.Text
Imports System.IO.Pipes
Imports System.Security.AccessControl
Imports VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO
Public Class AvisoStatusFunctions
Dim Standorte As New cStandorteDAL

13
Aviso/Benachrichtigung/frmAvisoWeiterleiten.vb
View File

@@ -222,10 +222,12 @@ Public Class frmAvisoWeiterleiten
btn.Enabled = enabled
AddHandler btn.Click, Sub()
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Case "ATILLA" : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma, "WL: " & If(bezeichnungFirma <> "ATILLA", "[" & bezeichnungFirma & "] ", "") & bezeichnung)
Case Else : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma)
End Select
btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma, "WL: " & If(bezeichnungFirma <> VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, "[" & bezeichnungFirma & "] ", "") & bezeichnung)
'Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
' Case "ATILLA" : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma, "WL: " & If(bezeichnungFirma <> "ATILLA", "[" & bezeichnungFirma & "] ", "") & bezeichnung)
' Case Else : btnWeiterleitung_Clicked(WLart, (btn.Tag), bezeichnung, bezeichnungFirma)
'End Select
initButtons(flpFirma, btn)
End Sub
@@ -271,7 +273,8 @@ Public Class frmAvisoWeiterleiten
addBtn(flpFirma, "N", "DTB", "VERAG Dettelbach")
addBtn(flpFirma, "N", "NKN", "VERAG Neunkirchen (Saar)")
addBtn(flpFirma, "A", "FISK", "VERAG Fiskal")
addBtn(flpFirma, "T", "13", "VERAG Fiskal (>Team Neukunden)")
'addBtn(flpFirma, "A", "FISK", "VERAG Fiskal")
addBtn(flpFirma, "A", "VRR", "VERRECHNUNG")
Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='VERAG' order by team_id", "ADMIN")

8
Aviso/Benachrichtigung/usrCntlBenachrichtigungen.Designer.vb generated
View File

@@ -23,7 +23,7 @@ Partial Class usrCntlBenachrichtigungen
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.MyComboBox2 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.gridAvisoBenachrichtigungen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
@@ -80,8 +80,8 @@ Partial Class usrCntlBenachrichtigungen
Me.gridAvisoBenachrichtigungen.AllowUserToDeleteRows = False
Me.gridAvisoBenachrichtigungen.AllowUserToOrderColumns = True
Me.gridAvisoBenachrichtigungen.AllowUserToResizeRows = False
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
Me.gridAvisoBenachrichtigungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
DataGridViewCellStyle2.BackColor = System.Drawing.Color.Azure
Me.gridAvisoBenachrichtigungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
Me.gridAvisoBenachrichtigungen.BackgroundColor = System.Drawing.Color.White
Me.gridAvisoBenachrichtigungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.gridAvisoBenachrichtigungen.Dock = System.Windows.Forms.DockStyle.Fill
@@ -97,9 +97,9 @@ Partial Class usrCntlBenachrichtigungen
Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Panel4.Controls.Add(Me.cbxTaskForce)
Me.Panel4.Controls.Add(Me.cbxVerwarung)
Me.Panel4.Controls.Add(Me.txtVermerk)
Me.Panel4.Controls.Add(Me.cbxNeukunden)
Me.Panel4.Controls.Add(Me.Button10)
Me.Panel4.Controls.Add(Me.txtVermerk)
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel4.Location = New System.Drawing.Point(0, 165)
Me.Panel4.Name = "Panel4"

4
Aviso/My Project/AssemblyInfo.vb
View File

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

125
Aviso/frmAddSendungsvermerkShort.Designer.vb generated
View File

@@ -27,6 +27,9 @@ Partial Class frmAddSendungsvermerkShort
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.pnlMain = New System.Windows.Forms.Panel()
Me.pnlSendungsVermker = New System.Windows.Forms.Panel()
Me.optGewPackAngefordert = New System.Windows.Forms.CheckBox()
Me.optKostenbestaetigungAngefordert = New System.Windows.Forms.CheckBox()
Me.optZolltarifnummerAngefordert = New System.Windows.Forms.CheckBox()
Me.txtSonstigesDokumentFehlt = New System.Windows.Forms.TextBox()
Me.cbxPackliste = New System.Windows.Forms.CheckBox()
Me.Label4 = New System.Windows.Forms.Label()
@@ -73,9 +76,7 @@ Partial Class frmAddSendungsvermerkShort
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.PictureBox4 = New System.Windows.Forms.PictureBox()
Me.Panel4 = New System.Windows.Forms.Panel()
Me.optGewPackAngefordert = New System.Windows.Forms.CheckBox()
Me.optKostenbestaetigungAngefordert = New System.Windows.Forms.CheckBox()
Me.optZolltarifnummerAngefordert = New System.Windows.Forms.CheckBox()
Me.optDraft = New System.Windows.Forms.CheckBox()
Me.pnlMain.SuspendLayout()
Me.pnlSendungsVermker.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -94,13 +95,14 @@ Partial Class frmAddSendungsvermerkShort
Me.pnlMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlMain.Location = New System.Drawing.Point(0, 0)
Me.pnlMain.Name = "pnlMain"
Me.pnlMain.Size = New System.Drawing.Size(454, 563)
Me.pnlMain.Size = New System.Drawing.Size(454, 605)
Me.pnlMain.TabIndex = 0
'
'pnlSendungsVermker
'
Me.pnlSendungsVermker.BackColor = System.Drawing.Color.White
Me.pnlSendungsVermker.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnlSendungsVermker.Controls.Add(Me.optDraft)
Me.pnlSendungsVermker.Controls.Add(Me.optGewPackAngefordert)
Me.pnlSendungsVermker.Controls.Add(Me.optKostenbestaetigungAngefordert)
Me.pnlSendungsVermker.Controls.Add(Me.optZolltarifnummerAngefordert)
@@ -152,9 +154,39 @@ Partial Class frmAddSendungsvermerkShort
Me.pnlSendungsVermker.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlSendungsVermker.Location = New System.Drawing.Point(0, 0)
Me.pnlSendungsVermker.Name = "pnlSendungsVermker"
Me.pnlSendungsVermker.Size = New System.Drawing.Size(454, 563)
Me.pnlSendungsVermker.Size = New System.Drawing.Size(454, 605)
Me.pnlSendungsVermker.TabIndex = 0
'
'optGewPackAngefordert
'
Me.optGewPackAngefordert.AutoSize = True
Me.optGewPackAngefordert.Location = New System.Drawing.Point(12, 236)
Me.optGewPackAngefordert.Name = "optGewPackAngefordert"
Me.optGewPackAngefordert.Size = New System.Drawing.Size(245, 17)
Me.optGewPackAngefordert.TabIndex = 101
Me.optGewPackAngefordert.Text = "Gewicht/Packstücke mangelhaft - angefordert"
Me.optGewPackAngefordert.UseVisualStyleBackColor = True
'
'optKostenbestaetigungAngefordert
'
Me.optKostenbestaetigungAngefordert.AutoSize = True
Me.optKostenbestaetigungAngefordert.Location = New System.Drawing.Point(270, 214)
Me.optKostenbestaetigungAngefordert.Name = "optKostenbestaetigungAngefordert"
Me.optKostenbestaetigungAngefordert.Size = New System.Drawing.Size(177, 17)
Me.optKostenbestaetigungAngefordert.TabIndex = 99
Me.optKostenbestaetigungAngefordert.Text = "Kostenbestätigung - angefordert"
Me.optKostenbestaetigungAngefordert.UseVisualStyleBackColor = True
'
'optZolltarifnummerAngefordert
'
Me.optZolltarifnummerAngefordert.AutoSize = True
Me.optZolltarifnummerAngefordert.Location = New System.Drawing.Point(12, 214)
Me.optZolltarifnummerAngefordert.Name = "optZolltarifnummerAngefordert"
Me.optZolltarifnummerAngefordert.Size = New System.Drawing.Size(154, 17)
Me.optZolltarifnummerAngefordert.TabIndex = 98
Me.optZolltarifnummerAngefordert.Text = "Zolltarifnummer angefordert"
Me.optZolltarifnummerAngefordert.UseVisualStyleBackColor = True
'
'txtSonstigesDokumentFehlt
'
Me.txtSonstigesDokumentFehlt.BackColor = System.Drawing.Color.White
@@ -181,7 +213,7 @@ Partial Class frmAddSendungsvermerkShort
Me.Label4.AutoSize = True
Me.Label4.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label4.Location = New System.Drawing.Point(11, 379)
Me.Label4.Location = New System.Drawing.Point(11, 411)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(125, 17)
Me.Label4.TabIndex = 96
@@ -191,7 +223,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.optFremd_ATB.AutoSize = True
Me.optFremd_ATB.BackColor = System.Drawing.Color.WhiteSmoke
Me.optFremd_ATB.Location = New System.Drawing.Point(12, 426)
Me.optFremd_ATB.Location = New System.Drawing.Point(12, 458)
Me.optFremd_ATB.Name = "optFremd_ATB"
Me.optFremd_ATB.Size = New System.Drawing.Size(130, 17)
Me.optFremd_ATB.TabIndex = 94
@@ -202,7 +234,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.optFremd_SendungAvisiert.AutoSize = True
Me.optFremd_SendungAvisiert.BackColor = System.Drawing.Color.WhiteSmoke
Me.optFremd_SendungAvisiert.Location = New System.Drawing.Point(12, 403)
Me.optFremd_SendungAvisiert.Location = New System.Drawing.Point(12, 435)
Me.optFremd_SendungAvisiert.Name = "optFremd_SendungAvisiert"
Me.optFremd_SendungAvisiert.Size = New System.Drawing.Size(193, 17)
Me.optFremd_SendungAvisiert.TabIndex = 93
@@ -276,7 +308,7 @@ Partial Class frmAddSendungsvermerkShort
Me.lblErrSpedition.AutoSize = True
Me.lblErrSpedition.BackColor = System.Drawing.Color.WhiteSmoke
Me.lblErrSpedition.ForeColor = System.Drawing.Color.Red
Me.lblErrSpedition.Location = New System.Drawing.Point(175, 284)
Me.lblErrSpedition.Location = New System.Drawing.Point(175, 316)
Me.lblErrSpedition.Name = "lblErrSpedition"
Me.lblErrSpedition.Size = New System.Drawing.Size(158, 13)
Me.lblErrSpedition.TabIndex = 17
@@ -288,7 +320,7 @@ Partial Class frmAddSendungsvermerkShort
Me.Label2.AutoSize = True
Me.Label2.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
Me.Label2.Location = New System.Drawing.Point(175, 284)
Me.Label2.Location = New System.Drawing.Point(175, 316)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(57, 13)
Me.Label2.TabIndex = 84
@@ -299,7 +331,7 @@ Partial Class frmAddSendungsvermerkShort
Me.lblErrGrund.AutoSize = True
Me.lblErrGrund.BackColor = System.Drawing.Color.WhiteSmoke
Me.lblErrGrund.ForeColor = System.Drawing.Color.Red
Me.lblErrGrund.Location = New System.Drawing.Point(147, 353)
Me.lblErrGrund.Location = New System.Drawing.Point(147, 385)
Me.lblErrGrund.Name = "lblErrGrund"
Me.lblErrGrund.Size = New System.Drawing.Size(149, 13)
Me.lblErrGrund.TabIndex = 26
@@ -350,7 +382,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.txtSpedition.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtSpedition.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSpedition.Location = New System.Drawing.Point(177, 300)
Me.txtSpedition.Location = New System.Drawing.Point(177, 332)
Me.txtSpedition.MaxLength = 50
Me.txtSpedition.Name = "txtSpedition"
Me.txtSpedition.Size = New System.Drawing.Size(125, 20)
@@ -371,7 +403,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.optSpeditionWeitergeleitet.AutoSize = True
Me.optSpeditionWeitergeleitet.BackColor = System.Drawing.Color.WhiteSmoke
Me.optSpeditionWeitergeleitet.Location = New System.Drawing.Point(12, 302)
Me.optSpeditionWeitergeleitet.Location = New System.Drawing.Point(12, 334)
Me.optSpeditionWeitergeleitet.Name = "optSpeditionWeitergeleitet"
Me.optSpeditionWeitergeleitet.Size = New System.Drawing.Size(163, 17)
Me.optSpeditionWeitergeleitet.TabIndex = 19
@@ -382,7 +414,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.optFreierText.AutoSize = True
Me.optFreierText.BackColor = System.Drawing.Color.WhiteSmoke
Me.optFreierText.Location = New System.Drawing.Point(12, 329)
Me.optFreierText.Location = New System.Drawing.Point(12, 361)
Me.optFreierText.Name = "optFreierText"
Me.optFreierText.Size = New System.Drawing.Size(105, 17)
Me.optFreierText.TabIndex = 27
@@ -393,7 +425,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.optATAangefordert.AutoSize = True
Me.optATAangefordert.BackColor = System.Drawing.Color.WhiteSmoke
Me.optATAangefordert.Location = New System.Drawing.Point(164, 426)
Me.optATAangefordert.Location = New System.Drawing.Point(164, 458)
Me.optATAangefordert.Name = "optATAangefordert"
Me.optATAangefordert.Size = New System.Drawing.Size(208, 17)
Me.optATAangefordert.TabIndex = 15
@@ -424,7 +456,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.Label3.AutoSize = True
Me.Label3.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label3.Location = New System.Drawing.Point(308, 303)
Me.Label3.Location = New System.Drawing.Point(308, 335)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(57, 13)
Me.Label3.TabIndex = 22
@@ -434,7 +466,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.lblErr240Zeichen.AutoSize = True
Me.lblErr240Zeichen.ForeColor = System.Drawing.Color.Red
Me.lblErr240Zeichen.Location = New System.Drawing.Point(219, 464)
Me.lblErr240Zeichen.Location = New System.Drawing.Point(219, 496)
Me.lblErr240Zeichen.Name = "lblErr240Zeichen"
Me.lblErr240Zeichen.Size = New System.Drawing.Size(95, 13)
Me.lblErr240Zeichen.TabIndex = 32
@@ -446,7 +478,7 @@ Partial Class frmAddSendungsvermerkShort
Me.txtDetail.AcceptsReturn = True
Me.txtDetail.BackColor = System.Drawing.Color.White
Me.txtDetail.ForeColor = System.Drawing.SystemColors.InfoText
Me.txtDetail.Location = New System.Drawing.Point(12, 480)
Me.txtDetail.Location = New System.Drawing.Point(12, 512)
Me.txtDetail.MaxLength = 240
Me.txtDetail.Multiline = True
Me.txtDetail.Name = "txtDetail"
@@ -459,7 +491,7 @@ Partial Class frmAddSendungsvermerkShort
'lblZustzlFreitext
'
Me.lblZustzlFreitext.AutoSize = True
Me.lblZustzlFreitext.Location = New System.Drawing.Point(9, 464)
Me.lblZustzlFreitext.Location = New System.Drawing.Point(9, 496)
Me.lblZustzlFreitext.Name = "lblZustzlFreitext"
Me.lblZustzlFreitext.Size = New System.Drawing.Size(142, 13)
Me.lblZustzlFreitext.TabIndex = 31
@@ -469,7 +501,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.txtSendungSpedition.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtSendungSpedition.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtSendungSpedition.Location = New System.Drawing.Point(144, 300)
Me.txtSendungSpedition.Location = New System.Drawing.Point(144, 332)
Me.txtSendungSpedition.MaxLength = 50
Me.txtSendungSpedition.Name = "txtSendungSpedition"
Me.txtSendungSpedition.Size = New System.Drawing.Size(25, 20)
@@ -490,7 +522,7 @@ Partial Class frmAddSendungsvermerkShort
'btnOK
'
Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnOK.Location = New System.Drawing.Point(320, 480)
Me.btnOK.Location = New System.Drawing.Point(320, 512)
Me.btnOK.Name = "btnOK"
Me.btnOK.Size = New System.Drawing.Size(124, 54)
Me.btnOK.TabIndex = 34
@@ -513,7 +545,7 @@ Partial Class frmAddSendungsvermerkShort
Me.Label9.AutoSize = True
Me.Label9.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
Me.Label9.Location = New System.Drawing.Point(354, 353)
Me.Label9.Location = New System.Drawing.Point(354, 385)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(90, 13)
Me.Label9.TabIndex = 30
@@ -546,7 +578,7 @@ Partial Class frmAddSendungsvermerkShort
Me.Label17.AutoSize = True
Me.Label17.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Italic)
Me.Label17.Location = New System.Drawing.Point(144, 353)
Me.Label17.Location = New System.Drawing.Point(144, 385)
Me.Label17.Name = "Label17"
Me.Label17.Size = New System.Drawing.Size(182, 13)
Me.Label17.TabIndex = 29
@@ -557,7 +589,7 @@ Partial Class frmAddSendungsvermerkShort
Me.Label13.AutoSize = True
Me.Label13.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label13.Location = New System.Drawing.Point(9, 275)
Me.Label13.Location = New System.Drawing.Point(9, 307)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(84, 17)
Me.Label13.TabIndex = 16
@@ -589,7 +621,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.txtFreierText.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtFreierText.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
Me.txtFreierText.Location = New System.Drawing.Point(122, 327)
Me.txtFreierText.Location = New System.Drawing.Point(122, 359)
Me.txtFreierText.MaxLength = 80
Me.txtFreierText.Name = "txtFreierText"
Me.txtFreierText.Size = New System.Drawing.Size(322, 23)
@@ -610,7 +642,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.Label20.AutoSize = True
Me.Label20.BackColor = System.Drawing.Color.WhiteSmoke
Me.Label20.Location = New System.Drawing.Point(267, 303)
Me.Label20.Location = New System.Drawing.Point(267, 335)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(0, 13)
Me.Label20.TabIndex = 21
@@ -640,7 +672,7 @@ Partial Class frmAddSendungsvermerkShort
'
Me.PictureBox4.BackColor = System.Drawing.Color.WhiteSmoke
Me.PictureBox4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.PictureBox4.Location = New System.Drawing.Point(-1, 265)
Me.PictureBox4.Location = New System.Drawing.Point(-1, 297)
Me.PictureBox4.Name = "PictureBox4"
Me.PictureBox4.Size = New System.Drawing.Size(453, 189)
Me.PictureBox4.TabIndex = 78
@@ -656,41 +688,21 @@ Partial Class frmAddSendungsvermerkShort
Me.Panel4.Size = New System.Drawing.Size(454, 0)
Me.Panel4.TabIndex = 1
'
'optGewPackAngefordert
'optDraft
'
Me.optGewPackAngefordert.AutoSize = True
Me.optGewPackAngefordert.Location = New System.Drawing.Point(12, 236)
Me.optGewPackAngefordert.Name = "optGewPackAngefordert"
Me.optGewPackAngefordert.Size = New System.Drawing.Size(245, 17)
Me.optGewPackAngefordert.TabIndex = 101
Me.optGewPackAngefordert.Text = "Gewicht/Packstücke mangelhaft - angefordert"
Me.optGewPackAngefordert.UseVisualStyleBackColor = True
'
'optKostenbestaetigungAngefordert
'
Me.optKostenbestaetigungAngefordert.AutoSize = True
Me.optKostenbestaetigungAngefordert.Location = New System.Drawing.Point(270, 214)
Me.optKostenbestaetigungAngefordert.Name = "optKostenbestaetigungAngefordert"
Me.optKostenbestaetigungAngefordert.Size = New System.Drawing.Size(177, 17)
Me.optKostenbestaetigungAngefordert.TabIndex = 99
Me.optKostenbestaetigungAngefordert.Text = "Kostenbestätigung - angefordert"
Me.optKostenbestaetigungAngefordert.UseVisualStyleBackColor = True
'
'optZolltarifnummerAngefordert
'
Me.optZolltarifnummerAngefordert.AutoSize = True
Me.optZolltarifnummerAngefordert.Location = New System.Drawing.Point(12, 214)
Me.optZolltarifnummerAngefordert.Name = "optZolltarifnummerAngefordert"
Me.optZolltarifnummerAngefordert.Size = New System.Drawing.Size(154, 17)
Me.optZolltarifnummerAngefordert.TabIndex = 98
Me.optZolltarifnummerAngefordert.Text = "Zolltarifnummer angefordert"
Me.optZolltarifnummerAngefordert.UseVisualStyleBackColor = True
Me.optDraft.AutoSize = True
Me.optDraft.Location = New System.Drawing.Point(12, 262)
Me.optDraft.Name = "optDraft"
Me.optDraft.Size = New System.Drawing.Size(174, 17)
Me.optDraft.TabIndex = 102
Me.optDraft.Text = "T1/T2 ""Draft"" OK - angefordert"
Me.optDraft.UseVisualStyleBackColor = True
'
'frmAddSendungsvermerkShort
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(454, 563)
Me.ClientSize = New System.Drawing.Size(454, 605)
Me.Controls.Add(Me.pnlMain)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
@@ -759,4 +771,5 @@ Partial Class frmAddSendungsvermerkShort
Friend WithEvents optGewPackAngefordert As CheckBox
Friend WithEvents optKostenbestaetigungAngefordert As CheckBox
Friend WithEvents optZolltarifnummerAngefordert As CheckBox
Friend WithEvents optDraft As CheckBox
End Class

1
Aviso/frmAddSendungsvermerkShort.vb
View File

@@ -175,6 +175,7 @@ Public Class frmAddSendungsvermerkShort
If optFremd_ATB.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "ATB von Fremdeinsteller erhalten bei Sendung '" & txtSendung.Text.Trim & "' ", 72)
If optFremd_SendungAvisiert.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Sendung '" & txtSendung.Text.Trim & "' an Fremdeinsteller avisiert", 73)
' If optSndUmmelden.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Sendung '" & txtSendung.Text.Trim & "' umgemeldet", 94)
If optDraft.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "T2 Draft OK bei Sendung '" & txtSendung.Text.Trim & "' - angefordert", 118)
If optUeberwachungsdok.Checked Then insertSendungsVermerk(SendungID, myAviso.AvisoID, "Ü-Dok bei Sendung '" & txtSendung.Text.Trim & "' - angefordert", 53)

45
Aviso/frmEintragAviso.vb
View File

@@ -97,21 +97,25 @@ Public Class frmEintragAviso
kdAvisierer.initKdBox(Me)
kdAuftraggeber.initKdBox(Me)
cboGrenzstelle.Items.Clear()
cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Firma]='" & FIRMA_TMP & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True,, "ALLE")
cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???"))
cboGrenzstelle.changeItem("")
Select Case FIRMA_TMP
Case "ATILLA"
cboGrenzstelle.Items.Clear()
cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Grenzstelle] IN ('SUB','NEU') AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", False)
cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???"))
'cboGrenzstelle.changeItem("")
'Select Case FIRMA_TMP
' Case "ATILLA"
' cboGrenzstelle.Items.Clear()
' cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Grenzstelle] IN ('SUB','NEU') AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", False)
' cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???"))
' 'cboGrenzstelle.changeItem("")
Case Else
cboGrenzstelle.Items.Clear()
cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Firma]='" & FIRMA_TMP & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True,, "ALLE")
cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???"))
cboGrenzstelle.changeItem("")
' Case Else
' cboGrenzstelle.Items.Clear()
' cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Firma]='" & FIRMA_TMP & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True,, "ALLE")
' cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???"))
' cboGrenzstelle.changeItem("")
End Select
'End Select
cboTransportmittelart.Items.Clear()
cboTransportmittelart.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
@@ -1710,18 +1714,27 @@ Public Class frmEintragAviso
'End If
If myAviso.AvisoID > 0 Then
Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm()
Dim frmSendungsdetails As New frmSendungsdetailsNEU(myAviso.AvisoID, -1)
frmSendungsdetails.ShowDialog(frmGrayOut)
If Process.GetCurrentProcess().ProcessName.ToUpper() = "AVISO" Then
Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm()
Dim frmSendungsdetails As New frmSendungsdetailsNEU(myAviso.AvisoID, -1)
frmSendungsdetails.ShowDialog(frmGrayOut)
frmGrayOut.Close()
Else
VERAG_PROG_ALLGEMEIN.cProgramFunctions.SendMessageToAviso("OpenAvisoSnd_" & myAviso.AvisoID)
End If
frmGrayOut.Close()
End If
'initDgvSendungen()
End Sub
Private Sub txtSendungen_Leave(sender As Object, e As EventArgs) Handles txtSendungen.Leave
If Not IsNumeric(txtSendungen.Text) Then
txtSendungen.Text = 1

202
Aviso/frmHauptfenster.vb
View File

@@ -208,6 +208,15 @@ Public Class frmHauptfenster
Dim split = message.ToString.Split("_")
FUNC.showKd(split(1), True)
End Sub)
ElseIf message.StartsWith("OpenAvisoSnd_") Then
Invoke(Sub()
Dim split = message.ToString.Split("_")
If split.Count > 1 AndAlso IsNumeric(split(1)) AndAlso split(1) > 0 Then
Dim frmSendungsdetails As New frmSendungsdetailsNEU(split(1), -1)
frmSendungsdetails.ShowDialog(Me)
End If
End Sub)
End If
End Sub
@@ -688,23 +697,42 @@ Public Class frmHauptfenster
Dim isEndpointRunning As Boolean = True
timas.getTimeEntries(cAllgemein.MITARBEITER.mit_timasId, infoMessage, timeEntryExisting,, isEndpointRunning)
If Not timeEntryExisting AndAlso isEndpointRunning Then
Dim a As MsgBoxResult = MsgBox("Für " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME & " wurde heute noch keine Zeit erfasst" & vbNewLine & Now.ToString() & " als Startzeit erfassen?", vbYesNo)
If a = vbYes Then
Dim frm As New frmTimasabfrage(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER)
frm.TopMost = True
frm.ShowDialog()
If frm.DialogResult = DialogResult.OK Then
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasMehrereFirmen Then
Dim f As New frmZEButtons("in", VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasFirmen)
f.ShowDialog()
f.BringToFront()
f.TopMost = True
Else
Dim info
timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", IIf(cAllgemein.MITARBEITER.mit_homeoffice, 3, 0))
timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", frm.typ)
MsgBox(info)
End If
Else
End If
'Dim a As MsgBoxResult = MsgBox("Für " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME & " wurde heute noch keine Zeit erfasst" & vbNewLine & Now.ToString() & " als Startzeit erfassen?", vbYesNo)
'If a = vbYes Then
' If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasMehrereFirmen Then
' Dim f As New frmZEButtons("in", VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasFirmen)
' f.ShowDialog()
' f.BringToFront()
' Else
' Dim info
' timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", IIf(cAllgemein.MITARBEITER.mit_homeoffice, 3, 0))
' MsgBox(info)
' End If
'Else
'End If
End If
End If
@@ -4615,6 +4643,7 @@ ELSE_ATILLA:
Private Sub Button11_Click_1(sender As Object, e As EventArgs) Handles Button11.Click
Exit Sub
setProfileImage()
@@ -4626,147 +4655,24 @@ ELSE_ATILLA:
' Dim dt As DataTable = SQL.loadDgvBySql("", "EZOLL")
Dim slist As New List(Of String)
slist.Add("510322010193")
slist.Add("510322011571")
slist.Add("480322050190")
slist.Add("480322050410")
slist.Add("510322013047")
slist.Add("480322052547")
slist.Add("510322014009")
slist.Add("480322056856")
slist.Add("510322014450")
slist.Add("510322015430")
slist.Add("480322064453")
slist.Add("510322010825")
slist.Add("510322010960")
slist.Add("510322011010")
slist.Add("510322011054")
slist.Add("510322011220")
slist.Add("510322011416")
slist.Add("510322011334")
slist.Add("510322015642")
slist.Add("510322015821")
slist.Add("510322015984")
slist.Add("510322015883")
slist.Add("510322016423")
slist.Add("510322016609")
slist.Add("510322017257")
slist.Add("510322017397")
slist.Add("510322011605")
slist.Add("510322011813")
slist.Add("510322012097")
slist.Add("510322012102")
slist.Add("510322012106")
slist.Add("510322011759")
slist.Add("510322012131")
slist.Add("510322012220")
slist.Add("510322012248")
slist.Add("510322011680")
slist.Add("510322012454")
slist.Add("510322012499")
slist.Add("510322012495")
slist.Add("510322012477")
slist.Add("510322012565")
slist.Add("510322012924")
slist.Add("510322013000")
slist.Add("510322009806")
slist.Add("510322009814")
slist.Add("510322009820")
slist.Add("510322010007")
slist.Add("510322010221")
slist.Add("510322010223")
slist.Add("510322010237")
slist.Add("510322010321")
slist.Add("510322010115")
slist.Add("510322010427")
slist.Add("510322010497")
slist.Add("510322010362")
slist.Add("510322010651")
slist.Add("510322010698")
slist.Add("510322013133")
slist.Add("510322013407")
slist.Add("510322013581")
slist.Add("510322013558")
slist.Add("510322013713")
slist.Add("510322013714")
slist.Add("510322013736")
slist.Add("510322016954")
slist.Add("510322017014")
slist.Add("510322016978")
slist.Add("510322017065")
slist.Add("510322017044")
slist.Add("510322017078")
slist.Add("510322017062")
slist.Add("510322017308")
slist.Add("510322017406")
slist.Add("510322017408")
slist.Add("510322017398")
slist.Add("510322015326")
slist.Add("510322015332")
slist.Add("510322015340")
slist.Add("510322015350")
slist.Add("510322015631")
slist.Add("510322015635")
slist.Add("510322015634")
slist.Add("510322015639")
slist.Add("510322015626")
slist.Add("510322015907")
slist.Add("510322016034")
slist.Add("510322017410")
slist.Add("510322017402")
slist.Add("510322017323")
slist.Add("510322017407")
slist.Add("510322017401")
slist.Add("510322017619")
slist.Add("510322017599")
slist.Add("510322013950")
slist.Add("510322013929")
slist.Add("510322013960")
slist.Add("510322014077")
slist.Add("510322014084")
slist.Add("510322014268")
slist.Add("510322014301")
slist.Add("510322014451")
slist.Add("510322016288")
slist.Add("510322016371")
slist.Add("510322016384")
slist.Add("510322016380")
slist.Add("510322016459")
slist.Add("510322016709")
slist.Add("510322016736")
slist.Add("510322016644")
slist.Add("510322016787")
slist.Add("510322016793")
slist.Add("510322014437")
slist.Add("510322014373")
slist.Add("510322014675")
slist.Add("510322014682")
slist.Add("510322014679")
slist.Add("510322014751")
slist.Add("510322014750")
slist.Add("510322014849")
slist.Add("510322014853")
slist.Add("510322014894")
slist.Add("510322014915")
slist.Add("510322014914")
slist.Add("510322014912")
slist.Add("510322014947")
slist.Add("510322015084")
slist.Add("510322015101")
slist.Add("510322015059")
slist.Add("510322014880")
slist.Add("510322015143")
slist.Add("510322015234")
slist.Add("510322015260")
slist.Add("510322015295")
slist.Add("510322015235")
slist.Add("500324000877")
slist.Add("480324003317")
slist.Add("480324005617")
slist.Add("480324037692")
slist.Add("480324037668")
slist.Add("500324009723")
slist.Add("480324060847")
For Each s In slist
VERAG_PROG_ALLGEMEIN.cTherefore.getFileFromFolderCat("C:\Users\DEVELOPER1\Desktop\LUKOWA\2022\", s, "", "Import ab Jänner 2022", "Import ab Jänner 2022")
VERAG_PROG_ALLGEMEIN.cTherefore.getFileFromFolderCat("D:\Andreas\Dokumente\KUNDEN\Schletter\2024\", s, "", "Import ab Jänner 2024", "Import ab Jänner 2024")
Next
@@ -5193,6 +5099,20 @@ ELSE_ATILLA:
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
' VERAG_PROG_ALLGEMEIN.cProgramFunctions.SendMessageToAviso("OpenAvisoSnd_1445868")
'VERAG_PROG_ALLGEMEIN.DHF_ArtikelBeispiel.Beispiel_TestSave()
Exit Sub
saveLukowaPDFsFromTherefore()
Exit Sub
VERAG_PROG_ALLGEMEIN.cBZST_UID_REST.CheckVat("DE", "147838463", "", "") 'geht ned - zugang
Exit Sub
saveLukowaPDFsFromTherefore()

28
Aviso/frmHauptfensterNew.vb
View File

@@ -693,23 +693,41 @@ Public Class frmHauptfensterNew
Dim isEndpointRunning As Boolean = True
timas.getTimeEntries(cAllgemein.MITARBEITER.mit_timasId, infoMessage, timeEntryExisting,, isEndpointRunning)
If Not timeEntryExisting AndAlso isEndpointRunning Then
Dim a As MsgBoxResult = MsgBox("Für " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME & " wurde heute noch keine Zeit erfasst" & vbNewLine & Now.ToString() & " als Startzeit erfassen?", vbYesNo)
If a = vbYes Then
'to
Dim frm As New frmTimasabfrage(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER)
frm.BringToFront()
If frm.ShowDialog = DialogResult.OK Then
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasMehrereFirmen Then
Dim f As New frmZEButtons("in", VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasFirmen)
f.ShowDialog()
f.BringToFront()
Else
Dim info
timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", IIf(cAllgemein.MITARBEITER.mit_homeoffice, 3, 0))
timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", frm.typ)
MsgBox(info)
End If
Else
End If
'Dim a As MsgBoxResult = MsgBox("Für " & VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME & " wurde heute noch keine Zeit erfasst" & vbNewLine & Now.ToString() & " als Startzeit erfassen?", vbYesNo)
'If a = vbYes Then
' If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasMehrereFirmen Then
' Dim f As New frmZEButtons("in", VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasFirmen)
' f.ShowDialog()
' f.BringToFront()
' Else
' Dim info
' timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", IIf(cAllgemein.MITARBEITER.mit_homeoffice, 3, 0))
' MsgBox(info)
' End If
'Else
'End If
End If
End If

1069
Aviso/frmSendungsdetailsNEU.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

4083
Aviso/frmSendungsdetailsNEU.resx
View File

File diff suppressed because it is too large Load Diff

81
Aviso/frmSendungsdetailsNEU.vb
View File

@@ -77,6 +77,11 @@ Public Class frmSendungsdetailsNEU
End Sub
'' In deinem Form (z.B. im Konstruktor nach InitializeComponent)
'Protected Overrides Sub OnHandleCreated(e As EventArgs)
' MyBase.OnHandleCreated(e)
' VERAG_PROG_ALLGEMEIN.cUI_Performance .EnableDoubleBuffer(Me) ' rekursiv auf Panels, etc.
'End Sub
Sub SAVE_ABRECHUNG(Optional isDublicated = False)
SENDUNG_LIST(CURRENT_INDEX).CLEAR_ABRECHNUNG_NotLeistungen()
@@ -95,11 +100,11 @@ Public Class frmSendungsdetailsNEU
Sub LOAD_ABRECHUNG()
SENDUNG_LIST(CURRENT_INDEX).LOAD_ABRECHNUNG()
cntlAvisierer_Sonst.special(False)
cntlAbsender_Sonst.special(False)
cntlEmpfaenger_Sonst.special(False)
cntlAuftraggeber_Sonst.special(False)
cntlFrachtfuehrer_Sonst.special(False)
If cntlAvisierer_Sonst IsNot Nothing Then cntlAvisierer_Sonst.special(False)
If cntlAbsender_Sonst IsNot Nothing Then cntlAbsender_Sonst.special(False)
If cntlEmpfaenger_Sonst IsNot Nothing Then cntlEmpfaenger_Sonst.special(False)
If cntlAuftraggeber_Sonst IsNot Nothing Then cntlAuftraggeber_Sonst.special(False)
If cntlFrachtfuehrer_Sonst IsNot Nothing Then cntlFrachtfuehrer_Sonst.special(False)
Try
For Each c In Panel6.Controls
@@ -1661,6 +1666,41 @@ Public Class frmSendungsdetailsNEU
End If
'-------------------------
'Fressnapf Spezial:)
'-------------------------
If SENDUNG_LIST(CURRENT_INDEX).tblSnd_AvisiererKdNr = 757421 Then
If txtAuftraggeber.Text = "" Then txtAuftraggeber.KdNr = 757421
If txtEmpfaenger.Text = "" Then txtEmpfaenger.KdNr = 757421
If txtAuftraggeber.Text = "" Then txtAuftraggeber.KdNr = 757421
If SENDUNG_LIST(CURRENT_INDEX).ABRECHNUNG.Count = 0 Then
If cboAbfertigungsart._value = "" Then
For i As Integer = 0 To cboAbfertigungsart.Items.Count - 1
If cboAbfertigungsart.Items(i).ToString().Contains("38") Then
cboAbfertigungsart.SelectedIndex = i
Exit For
End If
Next
End If
If cboAbfertigungsLand._value = "" Then
For i As Integer = 0 To cboAbfertigungsLand.Items.Count - 1
If cboAbfertigungsLand.Items(i).ToString().Contains("AT") Then
cboAbfertigungsLand.SelectedIndex = i
Exit For
End If
Next
End If
If cntlAuftr_Abf IsNot Nothing Then cntlAuftr_Abf.lbl.Text = "X"
End If
End If
'-------------------------
Panel2.MinimumSize = New Size(0, FlowLayoutPanel.Height) '+ pnlheader.Height) ' damit das S***** Flowlayoutpanel nicht abgeschnitten wird...
@@ -2456,11 +2496,11 @@ Public Class frmSendungsdetailsNEU
End If
Button4.Enabled = btnLeihgeld.Enabled
cntlAvisierer_Eust.Visible = True
cntlAuftr_Eust.Visible = True
cntlEmpf_Eust.Visible = True
cntlAbsender_Eust.Visible = True
cntlFrachtf_Eust.Visible = True
If cntlAvisierer_Eust IsNot Nothing Then cntlAvisierer_Eust.Visible = True
If cntlAuftr_Eust IsNot Nothing Then cntlAuftr_Eust.Visible = True
If cntlEmpf_Eust IsNot Nothing Then cntlEmpf_Eust.Visible = True
If cntlAbsender_Eust IsNot Nothing Then cntlAbsender_Eust.Visible = True
If cntlFrachtf_Eust IsNot Nothing Then cntlFrachtf_Eust.Visible = True
pnlT1.Controls.Clear()
@@ -3445,7 +3485,8 @@ Public Class frmSendungsdetailsNEU
End Sub
Sub initAnhang()
Dim hSQL As String = " SELECT [anh_id],[anh_Name],anh_Datum,[anh_docId],CASE WHEN (anh_SendungsId is null OR anh_SendungsId <=0) AND isnull(aa_name,'')='' THEN '***' ELSE [aa_name] END as [anh_Art],[anh_Typ],anh_LaufzettelDruck,anh_GestellungslisteAnfuegen, anh_markiert , anh_cmrId
Dim hSQL As String = " SELECT [anh_id],[anh_Name],anh_Datum,[anh_docId],CASE WHEN (anh_SendungsId is null OR anh_SendungsId <=0) AND isnull(aa_name,'')='' THEN '***' ELSE [aa_name] END as [anh_Art],
[anh_Typ],anh_LaufzettelDruck,anh_GestellungslisteAnfuegen, anh_markiert , anh_cmrId,anh_MarkierungDruck
FROM [tblAvisoAnhaenge]
left join tblAvisoAnhangsArten on aa_bezeichnung = anh_Art
WHERE anh_AvisoId=" & AvisoId & " AND (anh_SendungsId is null OR anh_SendungsId <=0 OR anh_SendungsId=" & SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID & ")
@@ -3484,6 +3525,9 @@ Public Class frmSendungsdetailsNEU
.Columns("anh_LaufzettelDruck").Width = 150
.Columns("anh_LaufzettelDruck").HeaderText = "Laufzettel-Druck"
.Columns("anh_MarkierungDruck").Width = 120
.Columns("anh_MarkierungDruck").HeaderText = "Marsk.Druck"
.Columns("anh_GestellungslisteAnfuegen").Width = 150
.Columns("anh_GestellungslisteAnfuegen").HeaderText = "GestListe anfügen"
@@ -7746,4 +7790,19 @@ Public Class frmSendungsdetailsNEU
Me.Cursor = Cursors.Default
End Sub
Private Sub FürDruckMarkierenJANEINToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FürDruckMarkierenJANEINToolStripMenuItem.Click
If dgvAnhang.SelectedRows.Count >= 1 Then
Dim errShown = False
For Each r As DataGridViewRow In dgvAnhang.SelectedRows
' If r.Cells("anh_typ").Value = "PDF" Then
VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.toggleMarkiereDruck(r.Cells("anh_Id").Value)
'ElseIf Not errShown Then
' MsgBox("Nur bei PDF möglich!")
' errShown = True
'End If
Next
initAnhang()
End If
End Sub
End Class

224
Aviso/usrcntlAktDetails.Designer.vb generated
View File

@@ -23,16 +23,16 @@ Partial Class usrcntlAktDetails
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim 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 resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAktDetails))
Me.pnlDetailsRechts = New System.Windows.Forms.Panel()
Me.Panel3 = New System.Windows.Forms.Panel()
@@ -64,6 +64,7 @@ Partial Class usrcntlAktDetails
Me.Panel7 = New System.Windows.Forms.Panel()
Me.picArrowDown = New System.Windows.Forms.PictureBox()
Me.Panel4 = New System.Windows.Forms.Panel()
Me.Button11 = New System.Windows.Forms.Button()
Me.Button9 = New System.Windows.Forms.Button()
Me.cbxLZDeFisk = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components)
Me.cbxLZT1 = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components)
@@ -186,6 +187,7 @@ Partial Class usrcntlAktDetails
Me.btnÄndern = New System.Windows.Forms.Button()
Me.btnTV = New System.Windows.Forms.Button()
Me.Button10 = New System.Windows.Forms.Button()
Me.Button12 = New System.Windows.Forms.Button()
Me.pnlDetailsRechts.SuspendLayout()
Me.Panel3.SuspendLayout()
CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -241,7 +243,7 @@ Partial Class usrcntlAktDetails
Me.pnlDetailsRechts.Location = New System.Drawing.Point(0, 0)
Me.pnlDetailsRechts.MinimumSize = New System.Drawing.Size(200, 0)
Me.pnlDetailsRechts.Name = "pnlDetailsRechts"
Me.pnlDetailsRechts.Size = New System.Drawing.Size(575, 734)
Me.pnlDetailsRechts.Size = New System.Drawing.Size(575, 755)
Me.pnlDetailsRechts.TabIndex = 81
'
'Panel3
@@ -252,7 +254,7 @@ Partial Class usrcntlAktDetails
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel3.Location = New System.Drawing.Point(0, 164)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(575, 570)
Me.Panel3.Size = New System.Drawing.Size(575, 591)
Me.Panel3.TabIndex = 91
'
'SplitContainer
@@ -278,8 +280,8 @@ Partial Class usrcntlAktDetails
Me.SplitContainer.Panel2.Controls.Add(Me.pnlVermerkeTop)
Me.SplitContainer.Panel2.Controls.Add(Me.addVermerk)
Me.SplitContainer.Panel2.Controls.Add(Me.pnlMAInfo)
Me.SplitContainer.Size = New System.Drawing.Size(575, 450)
Me.SplitContainer.SplitterDistance = 197
Me.SplitContainer.Size = New System.Drawing.Size(575, 471)
Me.SplitContainer.SplitterDistance = 206
Me.SplitContainer.TabIndex = 91
'
'pnlAlt
@@ -292,7 +294,7 @@ Partial Class usrcntlAktDetails
Me.pnlAlt.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlAlt.Location = New System.Drawing.Point(0, 0)
Me.pnlAlt.Name = "pnlAlt"
Me.pnlAlt.Size = New System.Drawing.Size(575, 197)
Me.pnlAlt.Size = New System.Drawing.Size(575, 206)
Me.pnlAlt.TabIndex = 72
Me.pnlAlt.Visible = False
'
@@ -617,53 +619,53 @@ Partial Class usrcntlAktDetails
Me.dgvSendungen.AllowUserToAddRows = False
Me.dgvSendungen.AllowUserToDeleteRows = False
Me.dgvSendungen.AllowUserToResizeRows = False
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
DataGridViewCellStyle21.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle21.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle21
Me.dgvSendungen.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
DataGridViewCellStyle22.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle22.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle22.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
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.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle22
Me.dgvSendungen.ColumnHeadersHeight = 34
Me.dgvSendungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle3
DataGridViewCellStyle23.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle23.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle23.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle23.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle23.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle23.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSendungen.DefaultCellStyle = DataGridViewCellStyle23
Me.dgvSendungen.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvSendungen.Location = New System.Drawing.Point(0, 0)
Me.dgvSendungen.MultiSelect = False
Me.dgvSendungen.Name = "dgvSendungen"
Me.dgvSendungen.ReadOnly = True
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
DataGridViewCellStyle24.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle24.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle24.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle24.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle24.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle24.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle24
Me.dgvSendungen.RowHeadersVisible = False
Me.dgvSendungen.RowHeadersWidth = 62
Me.dgvSendungen.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle5
DataGridViewCellStyle25.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle25
Me.dgvSendungen.RowTemplate.Height = 20
Me.dgvSendungen.RowTemplate.ReadOnly = True
Me.dgvSendungen.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvSendungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvSendungen.ShowCellErrors = False
Me.dgvSendungen.ShowRowErrors = False
Me.dgvSendungen.Size = New System.Drawing.Size(575, 197)
Me.dgvSendungen.Size = New System.Drawing.Size(575, 206)
Me.dgvSendungen.TabIndex = 71
Me.dgvSendungen.TabStop = False
'
@@ -675,7 +677,7 @@ Partial Class usrcntlAktDetails
Me.Panel7.Location = New System.Drawing.Point(4, 19)
Me.Panel7.MaximumSize = New System.Drawing.Size(2, 250)
Me.Panel7.Name = "Panel7"
Me.Panel7.Size = New System.Drawing.Size(1, 65)
Me.Panel7.Size = New System.Drawing.Size(1, 74)
Me.Panel7.TabIndex = 15
'
'picArrowDown
@@ -684,7 +686,7 @@ Partial Class usrcntlAktDetails
Me.picArrowDown.BackgroundImage = Global.AVISO.My.Resources.Resources.arrow_down_orange
Me.picArrowDown.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Me.picArrowDown.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.picArrowDown.Location = New System.Drawing.Point(1, 185)
Me.picArrowDown.Location = New System.Drawing.Point(1, 197)
Me.picArrowDown.Name = "picArrowDown"
Me.picArrowDown.Size = New System.Drawing.Size(36, 50)
Me.picArrowDown.TabIndex = 104
@@ -696,6 +698,8 @@ Partial Class usrcntlAktDetails
Me.Panel4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel4.BackColor = System.Drawing.Color.PapayaWhip
Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Panel4.Controls.Add(Me.Button12)
Me.Panel4.Controls.Add(Me.Button11)
Me.Panel4.Controls.Add(Me.Button9)
Me.Panel4.Controls.Add(Me.cbxLZDeFisk)
Me.Panel4.Controls.Add(Me.cbxLZT1)
@@ -716,10 +720,25 @@ Partial Class usrcntlAktDetails
Me.Panel4.Controls.Add(Me.cbxLZRg)
Me.Panel4.Location = New System.Drawing.Point(203, 27)
Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(265, 227)
Me.Panel4.Size = New System.Drawing.Size(265, 245)
Me.Panel4.TabIndex = 102
Me.Panel4.Visible = False
'
'Button11
'
Me.Button11.BackColor = System.Drawing.Color.White
Me.Button11.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button11.Image = Global.AVISO.My.Resources.Resources.beleg1
Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button11.Location = New System.Drawing.Point(38, 131)
Me.Button11.Name = "Button11"
Me.Button11.Size = New System.Drawing.Size(92, 36)
Me.Button11.TabIndex = 120
Me.Button11.Text = "Mark.Anh drucken"
Me.Button11.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button11.UseVisualStyleBackColor = False
'
'Button9
'
Me.Button9.BackColor = System.Drawing.Color.White
@@ -727,9 +746,9 @@ Partial Class usrcntlAktDetails
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button9.Image = Global.AVISO.My.Resources.Resources.beleg1
Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button9.Location = New System.Drawing.Point(5, 147)
Me.Button9.Location = New System.Drawing.Point(3, 164)
Me.Button9.Name = "Button9"
Me.Button9.Size = New System.Drawing.Size(123, 36)
Me.Button9.Size = New System.Drawing.Size(127, 36)
Me.Button9.TabIndex = 119
Me.Button9.Text = "ATILLA" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Aktendeckel"
Me.Button9.TextAlign = System.Drawing.ContentAlignment.MiddleRight
@@ -819,11 +838,11 @@ Partial Class usrcntlAktDetails
Me.btnSendungslisteUNISPED.ForeColor = System.Drawing.Color.Black
Me.btnSendungslisteUNISPED.Image = Global.AVISO.My.Resources.Resources.spedbuch_small
Me.btnSendungslisteUNISPED.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnSendungslisteUNISPED.Location = New System.Drawing.Point(5, 112)
Me.btnSendungslisteUNISPED.Location = New System.Drawing.Point(3, 94)
Me.btnSendungslisteUNISPED.Margin = New System.Windows.Forms.Padding(0)
Me.btnSendungslisteUNISPED.Name = "btnSendungslisteUNISPED"
Me.btnSendungslisteUNISPED.Size = New System.Drawing.Size(123, 36)
Me.btnSendungslisteUNISPED.TabIndex = 112
Me.btnSendungslisteUNISPED.Size = New System.Drawing.Size(127, 36)
Me.btnSendungslisteUNISPED.TabIndex = 110
Me.btnSendungslisteUNISPED.Text = "Alle Sendungen" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "UNISPED"
Me.btnSendungslisteUNISPED.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnSendungslisteUNISPED.UseVisualStyleBackColor = False
@@ -849,7 +868,7 @@ Partial Class usrcntlAktDetails
Me.btnAlleSteuerbescheide.ForeColor = System.Drawing.Color.Black
Me.btnAlleSteuerbescheide.Image = Global.AVISO.My.Resources.Resources.spedbuch_small
Me.btnAlleSteuerbescheide.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAlleSteuerbescheide.Location = New System.Drawing.Point(134, 147)
Me.btnAlleSteuerbescheide.Location = New System.Drawing.Point(134, 164)
Me.btnAlleSteuerbescheide.Margin = New System.Windows.Forms.Padding(0)
Me.btnAlleSteuerbescheide.Name = "btnAlleSteuerbescheide"
Me.btnAlleSteuerbescheide.Size = New System.Drawing.Size(128, 36)
@@ -865,7 +884,7 @@ Partial Class usrcntlAktDetails
Me.btnAlleAkendeckel.ForeColor = System.Drawing.Color.Black
Me.btnAlleAkendeckel.Image = Global.AVISO.My.Resources.Resources.spedbuch_small
Me.btnAlleAkendeckel.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnAlleAkendeckel.Location = New System.Drawing.Point(134, 112)
Me.btnAlleAkendeckel.Location = New System.Drawing.Point(134, 131)
Me.btnAlleAkendeckel.Margin = New System.Windows.Forms.Padding(0)
Me.btnAlleAkendeckel.Name = "btnAlleAkendeckel"
Me.btnAlleAkendeckel.Size = New System.Drawing.Size(128, 36)
@@ -881,10 +900,10 @@ Partial Class usrcntlAktDetails
Me.btnDipoListe.ForeColor = System.Drawing.Color.Black
Me.btnDipoListe.Image = Global.AVISO.My.Resources.Resources.pdf11
Me.btnDipoListe.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnDipoListe.Location = New System.Drawing.Point(5, 22)
Me.btnDipoListe.Location = New System.Drawing.Point(3, 22)
Me.btnDipoListe.Margin = New System.Windows.Forms.Padding(0)
Me.btnDipoListe.Name = "btnDipoListe"
Me.btnDipoListe.Size = New System.Drawing.Size(123, 36)
Me.btnDipoListe.Size = New System.Drawing.Size(127, 36)
Me.btnDipoListe.TabIndex = 4
Me.btnDipoListe.Text = "Dispoliste" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "alle Sendg."
Me.btnDipoListe.TextAlign = System.Drawing.ContentAlignment.MiddleRight
@@ -920,7 +939,7 @@ Partial Class usrcntlAktDetails
Me.btnSA_Gestellung.ForeColor = System.Drawing.Color.Black
Me.btnSA_Gestellung.Image = Global.AVISO.My.Resources.Resources.spedbuch_small
Me.btnSA_Gestellung.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnSA_Gestellung.Location = New System.Drawing.Point(134, 186)
Me.btnSA_Gestellung.Location = New System.Drawing.Point(134, 201)
Me.btnSA_Gestellung.Name = "btnSA_Gestellung"
Me.btnSA_Gestellung.Size = New System.Drawing.Size(128, 36)
Me.btnSA_Gestellung.TabIndex = 106
@@ -951,10 +970,10 @@ Partial Class usrcntlAktDetails
Me.btnDipoListeEmail.ForeColor = System.Drawing.Color.Black
Me.btnDipoListeEmail.Image = Global.AVISO.My.Resources.Resources.email_big1
Me.btnDipoListeEmail.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnDipoListeEmail.Location = New System.Drawing.Point(5, 57)
Me.btnDipoListeEmail.Location = New System.Drawing.Point(3, 57)
Me.btnDipoListeEmail.Margin = New System.Windows.Forms.Padding(0)
Me.btnDipoListeEmail.Name = "btnDipoListeEmail"
Me.btnDipoListeEmail.Size = New System.Drawing.Size(123, 36)
Me.btnDipoListeEmail.Size = New System.Drawing.Size(127, 36)
Me.btnDipoListeEmail.TabIndex = 5
Me.btnDipoListeEmail.Text = "Dispoliste" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "alle Sendg."
Me.btnDipoListeEmail.TextAlign = System.Drawing.ContentAlignment.MiddleRight
@@ -967,10 +986,10 @@ Partial Class usrcntlAktDetails
Me.btnDispohaft.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.btnDispohaft.ForeColor = System.Drawing.Color.Black
Me.btnDispohaft.ImageAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnDispohaft.Location = New System.Drawing.Point(5, 186)
Me.btnDispohaft.Location = New System.Drawing.Point(3, 201)
Me.btnDispohaft.Margin = New System.Windows.Forms.Padding(0)
Me.btnDispohaft.Name = "btnDispohaft"
Me.btnDispohaft.Size = New System.Drawing.Size(123, 36)
Me.btnDispohaft.Size = New System.Drawing.Size(127, 36)
Me.btnDispohaft.TabIndex = 3
Me.btnDispohaft.Text = "Dispo.Haft" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(nur T1/T2)"
Me.btnDispohaft.UseVisualStyleBackColor = False
@@ -996,53 +1015,53 @@ Partial Class usrcntlAktDetails
Me.gridVermerke.AllowUserToAddRows = False
Me.gridVermerke.AllowUserToDeleteRows = False
Me.gridVermerke.AllowUserToResizeRows = False
DataGridViewCellStyle6.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle6
DataGridViewCellStyle26.BackColor = System.Drawing.Color.Azure
DataGridViewCellStyle26.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle26
Me.gridVermerke.BackgroundColor = System.Drawing.Color.White
DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle7.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle7.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7
DataGridViewCellStyle27.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle27.BackColor = System.Drawing.Color.LightBlue
DataGridViewCellStyle27.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle27.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle27.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle27.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle27.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle27
Me.gridVermerke.ColumnHeadersHeight = 34
Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle8
DataGridViewCellStyle28.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle28.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle28.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle28.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle28.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle28.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.gridVermerke.DefaultCellStyle = DataGridViewCellStyle28
Me.gridVermerke.Dock = System.Windows.Forms.DockStyle.Fill
Me.gridVermerke.Location = New System.Drawing.Point(0, 30)
Me.gridVermerke.MultiSelect = False
Me.gridVermerke.Name = "gridVermerke"
Me.gridVermerke.ReadOnly = True
DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle9
DataGridViewCellStyle29.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle29.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle29.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle29.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle29.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle29.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle29.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle29
Me.gridVermerke.RowHeadersVisible = False
Me.gridVermerke.RowHeadersWidth = 62
Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle10
DataGridViewCellStyle30.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle30
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(575, 163)
Me.gridVermerke.Size = New System.Drawing.Size(575, 175)
Me.gridVermerke.TabIndex = 70
Me.gridVermerke.TabStop = False
'
@@ -1190,7 +1209,7 @@ Partial Class usrcntlAktDetails
Me.pnlMAInfo.Controls.Add(Me.Button18)
Me.pnlMAInfo.Controls.Add(Me.picAVISOMessengerSNDChat)
Me.pnlMAInfo.Dock = System.Windows.Forms.DockStyle.Bottom
Me.pnlMAInfo.Location = New System.Drawing.Point(0, 193)
Me.pnlMAInfo.Location = New System.Drawing.Point(0, 205)
Me.pnlMAInfo.Name = "pnlMAInfo"
Me.pnlMAInfo.Size = New System.Drawing.Size(575, 56)
Me.pnlMAInfo.TabIndex = 106
@@ -2436,13 +2455,28 @@ Partial Class usrcntlAktDetails
Me.Button10.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button10.UseVisualStyleBackColor = False
'
'Button12
'
Me.Button12.BackColor = System.Drawing.Color.White
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button12.ForeColor = System.Drawing.Color.Black
Me.Button12.Image = Global.AVISO.My.Resources.Resources.pdf11
Me.Button12.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button12.Location = New System.Drawing.Point(3, 131)
Me.Button12.Margin = New System.Windows.Forms.Padding(0)
Me.Button12.Name = "Button12"
Me.Button12.Size = New System.Drawing.Size(37, 36)
Me.Button12.TabIndex = 121
Me.Button12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button12.UseVisualStyleBackColor = False
'
'usrcntlAktDetails
'
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
Me.Controls.Add(Me.pnlOptionen)
Me.Controls.Add(Me.pnlDetailsRechts)
Me.Name = "usrcntlAktDetails"
Me.Size = New System.Drawing.Size(575, 734)
Me.Size = New System.Drawing.Size(575, 755)
Me.pnlDetailsRechts.ResumeLayout(False)
Me.pnlDetailsRechts.PerformLayout()
Me.Panel3.ResumeLayout(False)
@@ -2656,4 +2690,6 @@ Partial Class usrcntlAktDetails
Friend WithEvents Label1 As Label
Friend WithEvents Button9 As Button
Friend WithEvents pnlMaDetails As Panel
Friend WithEvents Button11 As Button
Friend WithEvents Button12 As Button
End Class

247
Aviso/usrcntlAktDetails.resx
View File

@@ -120,74 +120,74 @@
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="addVermerk.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAZ1JREFUOE+l
kTlLA0EYhvMTtLIyjbHzwsKI2rgeSSF4gUVEPIIgqIiCQSxsRJSYgC6mCBaKF4IW7tqYJsEjaFBEC0nU
WGoniKlMxNfMhFmS7BjdtXiGnW+/9+Fd1gBAN/GuCRDeO0Zv2Uy19FeIKDG/irf2EUSt/Tit60yOdQpD
oWtF9mDpw3FtB3bLGyGazF/cQC6ILBKJIhAI4r65F4GaNuyUCVg2mTFnrOCHfoLKwimZfOjD1vY+tksF
LBVVUZkmYUxuQDj8CL//DJJ8hI2tPTjdHjimZxUZ2eOGsyGy91MHntercSClZAuuFSpjsF1VOBsqO5mk
sidPJe6cJZh3ilwZISOcTXozJruaKcbJhJErI2Rc0onJgqrZJZGNG+EbLIBky0+uqXOqAYH3mbQZk3Xz
ZQTVQGm2pq0ZI+Pya7NfZATl4b/NGPTQ+wN40OPzwhtXNyvULCOkHoJevGwMJ/7TjGHA4dTX684Yzhd7
sDlu/WDNDmx5yff8UC4MTZYW3IgD2HW0wm0X4LLXJ/Q0Y1AhQRyySLwFbcDwDUJWbE0CgQrjAAAAAElF
TkSuQmCC
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAYpJREFUOE+l
0b1LAmEcB/D+hJqacsm23mjIqJauFx2CyqDBiF4kCCpCIYmGlgjDFOrIQRoKUxFq8M4lFyVNSoqoIbSy
sbYgdErDb9zJXeldXncO32d47vf78H24GgA1SpObMINJRr98z90Jhv4bBspbD/AxtoS0bhax3nEoBhOJ
Wx570s7gvEcPf9sASLWmIBiWCoOlUmlEInE8Dk0j0j0KXyuBPbUGW6p24UKlsFiyiNHBEDzeU3hbCOw2
drKYLDBL9yOZfEY4fAGKPoPbcwKbwwnL+iaPMXOCRbEwWCZmwetRFwJUEdu277MYF25WsFweFouustiL
swMPtmZYbaQoJgn+bsZhNxtNiJpVolhFMEsTgmbXDGZSITRfD8pQJ8D+BMWeyTbjsElxTBTkmx3KayYK
SjaTwErAapuVgEp/gFjY4+vKlRM2a5CN8SDiLry5F/PVNPsBg2uFd98KLnemcGzSfXLNAoZa2RgLDmqH
cUfOwW8ZgcNIwG7syytpVgIyIRe0VPlHJfkGQlZsTW1xtfkAAAAASUVORK5CYII=
</value>
</data>
<data name="btnQuckScan.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAApmSURBVEhLrZd3WFRHF8YvXWUJgtQtCihRqkGC6Ec0
xk4MJioaoiYSwEIEgoKIUSCJESWQxKBCsKCAofe+9F1pC+wuvTcpokiRFpSob2ZXA/nqP1/med6duTPn
nN89M3PvnaUAUGFht6mSslJxe3Jyclt+Qf6XqWmp59Mz0q+TOjwpOSkjKSkpLzEpMS8hMaEqPiG+iaiZ
tCuIRH25iYmJ2cQuLiU1JZT4hGRkZFzIyMzwzszMPPbw4cNdotgPWoWUo89lMUf8kx4fRhUW5Kv09vXH
NTU3oaWlBW1tbejo6EBnZye6u7tw/3437vfcR29PD3p7e2fV0zt33UPGuoldd3c3Ors6xf7t7e1obW3F
8MhoUVd18QoP35/nwNu+iqdu/hLS3MCvwOCDXtL1Ang5Q+rfX7X/z/L86RSejg8hJy3xmblrqAzpegVW
dUhYG3Q9FJwSHrKLysDhN4MjaJ1VkUj8FnCFbWKxi8qRmpWHtOw85HDKUVLTgbL6LpTWdoLX0I2Kph5U
NfdC2NaPmrY+COtbMDAwgMK8fBi5JX48C978ddqHafd4sA9mw8T2EpZutMWK9x2x3PK1th+F7tbDpD6G
ZZvtoKy/EfLaZpDXMoOS3gax/XLLY2KbN4mNyEfkv0JUk/5N7jdwNCSXJNCAIyGlJ2fBi5zYEvt/ZufZ
hhTAyDECEjQGGaH+iyRBySiAmr8I1DxlUNLy/8FmTpJKOjA5mYC9gTlwDOW2stwK5s+CVV2LqIVfpCmu
d7s9usbhCjRMPyIjBCBylpAmoAWQmK8ESQV1SC9kQEZ5MWQWaUFWeQlklBZDSpEOiQUqoGRpxEfqld9r
qRlugalDEHZ+HQNtj1wjBedcMVP8wziRQal5llOLHeMPLbOwxiK9d0DTsYCC7lYoG3wAFWMrqL61E2pE
6iYiWZH2DqgabYOKwSYoL18HRZ3VoLGMIaemCykFDRJZEhLScnhDxwzL138MQ/c0T+VTJRTTNVtyDuyS
S7FOFS5keAtlVd8/fU1SRu6lLMlKfokZaCKRtVTQXv0XkWstUzJmIoYtoOtDRlUXFI1OslaBjIoWmRUW
mQ0mZOQXQsvKLZHlU0OjnypcRHfOnMuY6VJIMd1yacyva2QZR6M+VNYxfaGktRLK2sZEK6GkZYyFS4yh
uNgYCqyVWMB4C3KMVZDUXAUJuhlklqyFov5maL97ALrbDmO+znqoGbwLDcMN0NB9G6zPbzhq+tRKEIaK
pkvaHFjTOVUElqJ7CajFey9E6JjugPbO89Dadw3MXYFQsboK1Y/I2u8OBHNfIJbaXIbR/gCsc7iMD8mO
PXIxEudusBGUWYsMYS+2u4eDWu2DJbv8obV6D1g73DiMs+ULmG55spouf8lY83g6RT9ZQDFPFSiu2HWm
33CXJ1ifJoD2bhSW7InEP1zisME9ETt9UnDw+wwcv5qDszfz4R9TjJC0SoTn1CC6oA4JRXXgVrej5tEU
9A6mgDILg/FnAdB/32WGeSJTj+7OoRjOeXNgulMmpe7GoXS+TFq7xsYbq1wjQP8kDjSzEKhv/BmH3P3g
5ncLJy6FwfNyDHyCU3DxDhs/RhUhOKkUYVl8xBFoRnkr8oSdePRkDLz6PtC2/4qF1tex/tNvoO2csEXd
rZhiOP3TrmZTSidLKOMvo+x3OPnjbe8MaOxNgOr2MMhaxWG17Q18ExSN01dT4HMjE34ReQiMu4eb6TxE
5lUjpbgJufx2lDT2orpzEM29IyQsUNE1DrUj8TC394PZybseyu48inmiaA6s6V5EKbhwKKvTIcEOl0Kx
yicfi6xioLYnCqr2mZDfF4cvLkQhOKEAAZFF+CWZZJnNR3xRPTJ55HVa043K1gdo6h1Gz9AkRqd/x/OX
YjZSGwax0vEKdntcKVQ7UUJYFXNgaTV98hToUhcu+fd5xXFg7FWENyx/hfpniWA4ZmL+sQIYOCUjPLkI
EWw+okiWqSVNyBN0oLSxDzVdg+h4OIbB8aeY/pP4l5Ih6AT5Kr3QWGaqKKVmMAcWlWXq841L8rMRmC+A
4Tku5C0joHk4DQxnNliexZA4UoBTIYWorG1BenkLOLX3UdU2l+XY9PP/+R1raOuGkY66tYhFLufA9nZ2
Xs9GHyG6ohm0z9LI43AdlE0SJOyyIOVYCMqJB+poLhK4jWjvf4yGnmEMPHmKp/+a4MuXeDg8iYrGB4hm
1+NiBA+JnGo8GR3G2bPnwv8NnJKcXCn69nLqurD1TCbeOZWFbb5cWAaUwfJyFaxu1MPIvxruJNDg8Bju
D46jc2AYnf2DqO/oI349iCnpwPeJ1Th67R62e2fB0IHsE+vbCEwuw8zUCAT8qkE5OTnpWbAaKePj46QJ
PH78GMOPB0hrBs+mJzA9OYaJ0SGMDw/iGWlX1jYj914lKgT1KKuqRTmpSwWNKKvrQDn5Ftd2DqD70ROM
Tk3jOYkyOTWBkeFhcWxRMTAwMCTVKzCLybJ4Qp69Fy9e4B6Xi9xsNspKilFOxCstRTW/CnU1QtQK+Wis
r0G1UIDGhga0t7WihRyVGurrUFctQENdDbERQFBVKfbjlZahmMsBp6gQ4xMTYrCpqan1LPjNN5cfmpiY
xLOZZ/juuwvw8PgK58/7wtfXD35+Abh6NQgxsTG4ezccsXExKCY31NLajGYC5XAKERMTjajoSNwJC8cP
P1wW+/j6XiKxfMWxfHy+FZ+/XpL137Jl67ezYAsLC7+Zmd8xPT2NwCtXcYWAIiOjER0di7j4eMTGxiM5
ORUpKSkEHIuEhHhkZ2cjJycH5FQJcgIlY6nENhHRMbEIC49AaWkJSoj8A34iN/MTOTR2ERRgY/NJzCyY
3EWUuJeU0Nt3SLA0lJWVi1VRUQk+XyBWdXUtauvqwSN9XG4xybwUVVUC1NbWQSAQkjZfbF9cXIKmpmbU
EdvUtHTcuhWKR48GxfEdHA5zSfUKrK2tc7eOOHeS6bhzJwx9ff0YH58gG20Iw8MjGBl9AtEeGBsbF0u0
LFOTv2GS1KJr0dgosRkZGcHjoSHxBu3pER13e0nfqHjGiu8Vo40cc9esWVs4CybFVV9PD7a2tti/f//s
tPwdZWhoGPZ29ti3dy/MzMxEsB9J9yz4baLB9zZuwob3NoK1mIVVpquwafMm7NmzB3b2dnA94QpvH2/4
+/sjKCiITN8t3L5zm9Q3ce3aNbKh/MgL4iyOOx3HgYMHYLnDEu+ssxDHIk8raa8XgUQ6MAum0WhKUlJS
XvLytB5NTc2XklKvD3p/g+bNkwOdQQeDyZwisWNZLNbcc0zeJpSMjAxdWlr6A2VlZTcTE5OAnVY7Iw4d
OpTt7Oxc6e7u3nrmzJn+c+fODZF6/PTp05Oenp5TRL+JRPqmyNi4l5fXCKkHSObtHh4eVU5OTmybj23C
1q9bd3Hp0qWfE6i+kpLS3D+JP4ukpCQlLy9P0el0WbIeimS9GSSIXnBwsHlsbOyWrKys3Vwu9yCPx7MX
CARHhELhMT6ff7SiosJe1M9ms3fHxcVtJVNvTsDLra2tNczNzeWZTKbEvHnzXlNETFB/AFyHwBGvedXw
AAAAAElFTkSuQmCC
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAqYSURBVEhLrZd5WBNXF8aHJaASikQIEBIF1LqguNC4
fC617tRiq6K1aKsVXKhgVRChgLRVUYq2igJFRQWsLCGBBFnCmsQECJAEEpB9EVCUfS1qK+/3JK1gv+2f
r+d53pm5d+65vznn3jtzhwBAREffISSFBYT6emhoaFNuXu7XvFTe2QdpD27wUnkxySnJacnJyTmcZE4O
m8MuTWInVSWxk6rZHHYxm8NW12VzOJzM5JRkFpfHvc1L5UWmpaWdT0tPO5Oenn7k2bNn29R9P61VEG6B
VzQczeFBUjSRn5dr0tr2hFVVXYWamhrU1dWhoaEBjY2NaG5uwuPHzXjc8hitLS1obW0dU0vreLmlpQXN
j5vR3NyMxqZGjX99fT1qa2vR3dMraCoTz/YOujoO3vRNEnHr58jqSlkxOp62AngNjL4C8Nsf1/+n/f5i
GC8GupCVynm59Pht0hjY1JW9PPzGbQglUmQKCiGUVUMorx2TQC1ZDUSKOo34giLwMnKQmpmDLGERJOUN
KKxoQoGyEdLKZhRXtaC0uhWKuicor2uDoqIG7e3tyM/JxXxPzqdj4PXfpn6c+lAKlwg+Fu2/iOlr92P2
h26Y5fCnNh/GzI0HMWvzEcxYfwCUuWthYM2EgRUTxnPWaNrPcjiiafPu5iMaH7X/bPXZ4QjWed3E4chs
COSVOBRZcHIMPMWdr+V8lZ+zPzIP891ioUW2BEEQ/0XaIEiGICZOATGBAkLX4D+0GZe2sQ0WnWRjZ2gW
3G6LahmeeRPHU31cQEz+KtVoteed3mWu12Bu/8kfALWzli4I0iRoTTSGtqEZdCdbgkSZCtIUK+hRpoFk
PBU6RjRoTTIBoUcGQej8BUydtwH2ruHY+m0CrL2z5xt6ZI9PLssTaQTVp4iY6pa0b8YKJ0yZsxJkmxUw
nLkRFNuPYGLnCNOFW0FduBVmi9RyBHXhFpjO3wQT23WgzFoFI5slIDPsoE+dCR1Dc82Da+nq4x0bJmat
/hTzvFJ9KKckBP14pvY4+Fg2wTiVP9nyjELP9MPTYdok/VE9ylQYTGOCrJYVE4bWS94SE4ZW9iBPW6SB
TaLNBcl0JggyDYSeCUgmViBRGCAZ00EymAwrR08OI7CcTDuVP4XmkT4eMf1YPkH3zCbTvy3Xszwc9zHF
xv61sdUCUKztQLFeAGMrO0yeZgejqXYwZCzAJMuF0LdcDG2LxdCiMUGathxGc9fD+v09mLnpICbarAbV
9n2Yz1sD85nvgfHlTTeLQKUW3TPbxOJY6jjYwoOnBuvQAuTE1J3nY23st8B661lY7QoDfVsoTByvw/ST
azDfHgr6rlBM330F850vYZXrFXzsdROHLtyH/00+wtOVSFO0YrNXDIglgZi2LQRWS3aAscVTaOlXNInu
maNnceytiC2OPiBoJ/MI+qk8o9nbfJ/M2+YDxudskN+Pw7Qd9/GPYyys8eJgayAXe39Iw9HrWfC7lYuQ
BDEiU0sQk1WO+DwV2AIVRGX1KH8+jDl7uSCY0bD74hLmfnjsFf1E+hyal5Cw9MgZB9Pc0wkzTyFh83Xy
8mW7z2Dx8VjQPmOBzIyE2dqr2OcVDM/gKJy4GA2fKwkIjODiwl0+fowTICK5ANEZMrAEKqQV1SJH0Yjn
ff2QVrSBvPkXTHa6gdWffwdrD/YGM08xYen+l1nNJ4xPSgi7r+NctriH4L0zaTDfyYbp5mjoObKwZP9N
fBcej9PXuQi8mY7g2ByEsh7i1gMp7ueUgSuuQrasHpJHrShr7EB1a4/mVVncNADqoSQsdQkG8+Q9b4qX
lKCfELyVai8BYXhMSDiejoxwvXgbiwNzMcUxAdQdcTB1SYfBLha+Oh+HCHYeLt0X4OeUAkRnypAkqEC6
tBaC8maU1D5FVWs3WrqG0DvyG34f/eM9zavswAK3a9jufS2fekJCWHgVj4N1qXMJPZOZxPmLIW0BLCHs
AgR4x+EXmH3BgaVbOiYeyYOtewpiUgSI5csQl1MGnqQKOfIGFDxqQ3lTBxqe9aNj4AVG3hDfsjR5I7yD
rr42n2FvpEO1HQerbYbZRDtJbiZCc+WY5y+CgUMsLA6mwtKDD4aPGFqH8nAqMh8lyho8KKqBUPkYpXXj
UfaP/P4/v2OVdc2Yb2PmpGb9Bexy4EDAy97niC+uBvmLVBBLboDYnQytAxnQccsH4S4FcTgbbNEj1D/p
RGVLN9r7XuDFvwY4Oopn3UMofvQU8fwKXIiVgiMsQ19vN/z8/GP+DcxNSSlRf3uFqiZs9E3HylMZ2BQk
gsOlQjhcKYXjzQrMDymDV6wUHd39eNwxgMb2bjQ+6UBFQxuEqhYkSBrwA6cMh8MeYvOZDMxzTQDV6Q5C
UwrxargHcllph76+vu4YmEqlUgcGBjQP3NnZie7OdgCv8HJkECND/Rjs7cJAdwdeDvWjRFmN7IclKJZX
oLBUiSJ5BQrkj1CoakBRZTOUje1oft6H3uER/A5gaHgQPd3dYwmxtbWdNwZm0Bkr+vr68fr1azwUiZCd
yUehRIwiiRjSggKUyUqhKldAqZDhUUU5yhRyPKqsRH1dLWqqq1BZoYKqTI5KVTmUCjnkpSUaP2lBIcQi
IYSCfAwMDmrA9vb2TmPgd9+dtW9wcAgvX73EuXPn4e39Dc6eDUJQUDCCgy/h+vVwJCQm4N69GCSyEiCW
iFFTW43q6ioIhflISIhHXPx93I2OweXLVzQ+QUEXce5ckKavwMDvNfuv0dFRbNiw8fsx8IoVK4JfvfoN
IyMjCL12Hdeuh+P+/XjExyeClZSExMQkpKTwwOVykchKBJudhMzMTGRlZYHL4yI5ORlcLg+sJA7iExIR
HROLggIJJAUShFz6CZcv/4TGxiZNxLt3f5YwBt6wYWPcmzG4fecuuLxUFBYWaVRcXAKZTK5RWZkSSlUF
pMUlEInEEEsKUFoqh1KpglyuQGmpTNNeLJagqqoaKlUFeKkPEBV1G8+fd2j6d3U9KBoDW1vb3FMpVWhs
aMDdu9Foa3uCgYFBdHZ2obu7Bz29fVDPgf7+AY3UwzI89CuGBoc0ZfW93t4+9PT0oLOrSzNBW1rU291W
9PT0ajImfihGXW0tli1bnv/2cjo+d84c7N+/H87OzmNp+Tusq6sbLgdcsGvnTjCZTDXsx7fB7xEE0fHB
2nVY88FaMKYysNh+MdatX4cdO3bggMsBHD9xHGcCzyAkJATh4eGIiorCnbt3EBV1C2FhYQgODoafnx+O
uh/Fnr174LDFAStXrdD0RaVSsXLV6jf7sD1jYDKZbKyjoxNgYEBusbCwGNXW+XOj9zdowgR90CxpsKTT
hy0sLBIZDMb4OtbX1ydIJBJNV1f3IwqF4rlo0aJLWx23xu7bty/Tw8OjxMvLq9bX1/eJv79/l6+v78Dp
06eHfHx8hn18fH5Vy9fXd9jf338gICCgx9/fv93Pz6/e29u71N3dnb/7093Rq1etujB9+vQvGQzGXGNj
4/E/iTemra1NGBgYEDQaTY/JZBo5Oztb+vn5zYmIiFiamJi4ISMjY7tIJNorlUpd5HL5IYVCcUQmkx0u
Li52Udfz+fztLBZrY1hY2FJvb+9ZTk5O5kuXLjWg0+laEyZMGOOomf8EXIfAEQr7GRYAAAAASUVORK5C
YII=
</value>
</data>
<data name="Button18.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V
kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw
fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx
mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg==
iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAH1JREFUOE/V
0MEJgDAMQNHflXQmxxDcQt1CvAr1rq7hHIriKa1QQxQs/EtbHm0AMufcZhGQ8xoIjECVkJfQHXhcTlml
hL4BLXoXfPDl2DrHIMEeKJR1AWiRfOEKLMrWGGg+Q38cKBsC0CL5wvba0FTHQPMZzkCjbApAi/4B7lqo
BXidk8YAAAAAAElFTkSuQmCC
</value>
</data>
<metadata name="conMenuVermerke.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@@ -241,32 +241,31 @@
<data name="MitarbeiterAnzeigenToolStripMenuItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAACMAAAAjCAYAAAAe2bNZAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAXLSURBVFhHzVhncFVFFI69jr33rjOOOjpjL2P54Ywj
AQkKhCIqCIoIKk3AQURaEMShSBsERFCaiKaQ8FJfCkle3oOENBNIQl4qqaS3437nupe99+0LGJzRH1+S
8+3es3tP+XZvAojofwMt6Q/dPT10rLqVfo4vo1HLDtKjExPo2uFRdM2wKP79yMcJNGKph36K9VJxVQt1
dfeIx/S+dNCS/lBZ307rI0to6GI3XTk0kgL6hfrg8sH76K1FGbQ2ooTKatvEY3pfOmhJOxpbOmnmj3n8
9ljwsUlO+vD7LJqzLZ82R5fSbwcq+DfsCWsO0xOfJfK8K4ZE0ozNuVTT2CHc6H2r0JIqwl1VdP+4WHY+
aV02xWbWCFo/V0V8Vg1N+SGHn7trTAztSakQtH6uhJaUmL01n85/I5z6zU0jz5EGQenn9YaDRxtpcEgG
ndM/jKaKzdnHVWhJYPKGHHbwpdhQR5dvIXYKrvZEBxfz9E25nMaw9CoCb5+Lwg/ZVcj+kF77uISWRETw
4EbHMWH6jq+JKKbhSzx0n0jfuQPCOBUAoohuSsmrE9N8n9sS4+01Qj4EagKOERH7GOAubODClBvQ4caR
+6lESID9WWDx7kKeE5pWJUzrmMWobmin29+LpldmpQjT4OqaOjj80I4q0dqJObV0mWhf+wZUXDwogiJE
4VfUtdEmRyk5s2tNf0D/r9N5w+W21jf/ANCacIZFYe9MLKfnpiWZi/ySUEZtHd103d8t7g+InLfGEEfY
FwwMp9HLD1Frezf7Pd7YzjxqDbYE/0CBQqCgI2NXZvIEPHh1sHVRCBnGbnnHYeHtuOltB89Dzan8uFWZ
hGLGGPQIyl1U2ULtncYmeTMIl3wwNb+eB060drE+qM5Whhbx2D3vW3k77hwdw/Og1iqP4s33NvEYpALc
6vBis754M9udZSzhUE55niBaz0w5maKrgiMps6iRfk+tpIuCIkxeh/NEhyGlf5Y1c21I/uzAMPo1+aT4
PTs1iV7/Ks3sWibRpihKhA42gLw+9FG86ejlmUZRvzo71eR6wwvTk3k+BFNy2CReHDwwce1hrqegBS7m
mJSLQl9gA3hIOgEe+CCO8z1tY66F94cxKw6xL5zkksNmdjjLzTUW7ixgXqaVyetHGKGEKMEGkNNL37Sm
A22KMTV9OmADSDO6UeXPCgyl7/YeNdfYlWSMo/tgMymvA9AT2BIboqzdcNu70ZQhRA8FBy1Rx1RgvL65
k+4daxywKlCXaHv4j3RXMwepgM2L6iIj8dKMFIuzF4WNdA1b4rbwEoMWuqi5rcs86XWQ6+zWRebhCb41
I2GvHRyIOAwhASovkVfaxPcXtYuApyYn8hGDqwWUGb4XicMTY3cI1YfNCwZ/4+b6QHXDVoG3UJ1CpcE3
iDSgINUxHJrgMb5M1IY6tjXON+q4H8HHgHnpPMbktngvDZzv4nzChiLizXG6yiJGKtHWOCgxZ7/nOBek
uiBs6BDGC8ub6bU5qWaEkAr4S86t4yMFc9D+8Llun6HsvBkcBegUPLR0zxG+bMsF0HbjV2eZDrCZ+TsK
6AZbGiRwhCB6rgJDySGiiPjdipqj3lb8UcR/44ixKDAKEiKHu618AG+J+yvGARTbkBB90foDoq2KHGpG
Te2D4+O4fqTq8yQJRAWTcI2Qd1ZctE+lK6cC0g+ZgD/Ih4wSRA+chGUz6AJoSeBco6D8tW9fgbaH35Hf
eriW8OkDW8KyGQA3sFvFFQGHmM7hmeJpEWW8sHosSFgMidM9f/oK9UBW4UNIzNqSp3V0psBXh7xg2eFD
qJi3vYAusR2WfcWFQeH0hXhB+xoqtKQKiJj8XO0r8A8CSIPdtx1a0g58ay8QQofi0y3mD49/6iRE91/7
1lYBp7iDfLI+m29yN49y8L0WAolzCRfx5wWPAoXYya+M04WW7A24vO89UMnqDN1AtJ4UaYQwQnE/F58f
SIm8s/wTaMn/BhTwFyTS58zDvQ4BAAAAAElFTkSuQmCC
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAWnSURBVFhHzVhncFRVFMZex9571xlHHZ2xl7H8cMaR
EAkaCEUQkCgiKARiwEFEWhDEEZQ2QDAGJQQxms6mN5JsEkhIMyGF1A2ppG3acb6z3pf73n3ZDZnM6I9v
Nu/ce88975TvnJdxRDTu/wJF4AwDg4N0urGbfk2spZlbjtOTC5PoxmkxdMPUGP594tMkmr45l36Jr6FK
Wxf1DwySUYczKAJnaGi10+7oKpqyMYeunRJN48aHKbjaM4re25BNOyOrqLa5Z+yNae/qo+U/F/Pb48Kn
FiXTxz/l06oDJbQ/tpr+OFbPv3hesOMkPbM4hfddMzma/PYXUVN774iMUgRGRFht9LB3PCtftKuA4vOa
RqQ4Mb+JfPYW8rn75sbRkfR6l+cUgYyVQSV08TsRNH51JuWeanOpzAzHy9vJ0z+bLpgQTkv3FjrVoQgE
luwpZAVfBZVQb7+aiH39g9R8tpeT2TegiMMYnmUjyI17kfj+IWWsD+E1rgsoAgAewcF9ltOmB3dEVtK0
Tbn0kHc8XegeriUvvIhqSi9uMT0XGFfj1EOKADkBxfCIcQ3IKWvjxDRWkYxbZxylqsZu0/MbD5fxnrBM
m7Kue2hss9Pds2PpjRXp2saWjl52P7jD1mqnlMJmusozSjFAxuWTIinSaqP6lh4KsFRTckGz7uIJ32Sx
wXWG0tcZg9KEMlyK50MpdfTSslTtkt+Saqmnd4Bu+rfEhwM8V9PkIEc8XzIxgub8cIK67QOs90y7neXI
NcUYJCgICjwyb1seb8DB6730l4LIsHbHLItigIzb3rfwPuScLPf+MY+QzFgDH4G5Kxq6yN7nMJKNgbvE
wYySVl44293P/CAr2xZWwWsPfKiXG3HvnDjeB7aW5UjekpoOXgNVQLY9olLLLzbmYHItUziYU/QTeOsF
n6EQXecVTXkV7fRnRgNd5hGpGCDjIvdwDunftZ2cG0J+vls4/Z42RH4vLk2lt7/O1KqWhShTJCVcJzYi
ro99kqgpen25I6nfXJmhXG6GV3zTeD8IUzYSLy7uWLjzJOeTxzrrkDHiUvCL2IhDsvJHPkrgeC/bV6Rc
bIa5W0+wLnRy2Zjg5DrtjvWHSlkuwsrCm6c7XAlSEhsR0yvf1YcDZYo1OXxmgAEIM6pRlp/nFkbfh5Zr
d4SkOtZRfZoxYhwAn4iNwJ4YfTXc9UEsZZe1ccKBS4xGCGC9tbOPHpznaLAykJcoe+iPzmlkGajCqWcE
XvNL1yl71S+dwzV1U45yETBpvZU6e/q1Tm8Gcc9hM888vkDNGQFj7qAhohmCAoyXAMXVHTy/yFUEPLck
hVsMRgswM3RvCHG0hntmxw4Z4/VtDucHsttoDN5CVgqWhryts48TUl5D04Qc61tCy3VrQQmq1zEfQYf7
mqwhYw4k1tDEtVaOJ57BiHhzdFeRxAglyhqNEnuO5p7hhJQvxDN4COtldZ301qoMzUMIBfSlFbVwS8Ee
lD907opyMDsbg1aASsGhzUdO8bAtLkDZzd+erymAMWuDS+kWQxgE0ELgPWupg8lBovD4/RKbI9+2/lXB
f6PF6BgYCQmSw2wrvyXmV+FSJNtkf/OkHQ7wtkxyyBk5tI/OT+D8EayviyG8gk0YI8TMikHbFa+4AsIP
moA+0IfwEkhPvl9nDKoAXOK22pFQw5XvaIGyh94Z3+VyLuHTZ1hjAExgd86yEJqYUdlY4HmfVH5huS0M
awww0v4zWsgN2aUxwIrAYkXJWABfHWLAMkIRyFhzsJSuMDTL0eJSjwj6MrDY1IgRGQOAxMTn6miBfxCA
Goy6jVAEZsC39rrgUk4+40XO8PTnyQTvjtm3tgwoxQzy2e4CnuRun2nhuRYEib6EQfxl3zROUJCd+MoY
KRSBK2B4Dz3WwOwM3oC3nl2cwsQIxv0ioIhDImaWc4Ei+C/xDyTS58xsrLJ/AAAAAElFTkSuQmCC
</value>
</data>
<metadata name="cntxtFormulare.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@@ -275,54 +274,54 @@
<data name="btnLöschen.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHaSURBVEhLvdW7SlhBFIVh701EGyGKpEjAywv4Aham
iIXaio1dELXwFVRs7ARBQbHSwi5lijTBWhAvfSKExJBKEEWP/8iM7JmzziWKFh/k7Fl7FhgZG7Ise1Vy
6JwPvG9S8+eSQ4fCTrxVZ88hhxQNYgvHdUvJNfq9bXUe5AYs9OEbMq9WKZkmbPidHZVxog+Cb7COa79Y
q5SzHizjD8KOLI0+CJ2ZhZQsZdaLXZ9J5UqjDwLhR1IkV8r3Ii79ufLF5h//ERBYSRZSD6VwvyB7uIXK
OXe4sPdHZQGhOqVryUz5iwl7d1RkEawqdZepefADs+iw90YlKcJVpUVO8VHdmRukWHxK6Qwa1X25gcLy
vrmszFd8QuE7LIcpLljwF1aZV/uWHAZc0I9N/PMXVvmJ0mdQDh0W2+DK1MVlSp9BOWShC0uwb+P/KCzN
DQi+g3tB1EXWoZhZsjT6cAit4sovlZlGnRep294flTnJgnKEKbT7fFXpub0/KnMITCYL1m+MiZ2iUvd3
9cBmo8WA0LhZCn5hDtHbaHZU6QmGbC5asgjaUvd/MaJyFplQegP36gyjxWaihRThUPpZnStkXel3fFDn
uUGKxTG0qrMi5EfRrM5yg5cmhy8na7gHtvbLF9T64qAAAAAASUVORK5CYII=
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnÄndern.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABkAAAAZCAYAAADE6YVjAAAABGdBTUEAALGPC/xhBQAABBRJREFUSEul
lm1MW2UYhrsx/TPD/DFishkgGtBkJlTNTLYZZ4CBCjgGxhmBIStuBZYYw4BlMOmcTLsxRcxguswhi+Fj
0FFKy2db2NpVGUwJMJKybEWio0XTckqB9pye23MOH4HyTmj8cSU97+n9XHnep09SEYD/DcuyIpamAxh9
b7r7YC7oJm0uM+0KZBnvRv49MeQv3pm5J2iVPt19VAZXlgwTCUcxHJnC2rSGJJZhNhJD/sAwjIj55ffD
njOVmM46jUfxRzAcnYaePUlofDmGdk9RW4jB9eJ2u5+y2Salf19TwimV4c/4jzEUlYLuXYloEO/D9y/u
gelSVS4xvB4oigoeH/9LPjIyyvQaejF48jwGIj+EjhPUR0Tj0gu7cS70FZQEi8kF1sJqnYzgil+7d888
YzL1o71dD2WNAsoj+aiLiEJlOC94VRD8VnMjg1jkv6D/GX764ZCxcnBwhBPcEQSKG2r8VF2HMnk5ziek
QL7QwUBDc6qXZgKIhR4HQ1medPWVnLLrP53p62lBW7sOjQo1qjjBhbJKFMnkKMgvxmdv7sfAdeUhxkNv
4nPEYr7we8DMTm6eGao44ejIgLXhXYz9sBOquqtCB6Xf8IKvkH/yDAoKv2CMpjtSPrOYX1GMBP9l2vpr
KKV6q8KhPgibIgljl3ditFyMIfkOVJSeRWHxl4KAEzm1ekPBcgHPigcSngnTs46fQ9rsLcmcIFkQmMsj
BEG/LAy380NRkpeFU6fljs6uniJfAc+qg+V4xjvCpxp3VTtUifMC7ooWO+iXhcPICXTHtkOTHebq1N4s
JAl4iIc8tK0/hFLF1Do0H6y6Ir4DXqA9tg2tkiDcV3+XS6qxCPHQ80AhdnZ9VO1oS5sThuxzRca8EEGg
kWzFmL4qk1RjOasOPBaVmNLsVzjaUmes9XGwEK5oXhCEP27VpHq9zAbfGr6seHBzgilllGaK76D+HVgu
v7aygyXBVowbarlF82x63ByWs/SBfnR7B9W0t9vRmuK1NiSsmMFdrgP+V6TL2S7MwKKrymRZ75odLMLt
gXcDY7v7EqWK1dnV78PWeGDVkAUB10G7NNi11pBJiFiPc/N0c7zZrprfA34G5gVBX3EYDNyQdTnb0Jnz
nMPcVFpIKrIWInhmA70tBbA3S7gZLBeEw3CcmwEn6MgOdZqbzhWRCqwHQcJ2nAVVl4XRi2/MXxHXgTFv
XtCa+QwzqiorIIXXC/cHwB04130R4z9mwyRPxq0i8ZJAkxGEh11XskhBfxB9LpOpJ2rz0ft1Oq6fSMSV
nL1QSp+H5jC3BzdrDpFC/iLaFxvHfpJ2gG0uSkZlTiwuSCJRLnkd941Nwh6QQv4iio6JY9+Lf/uB5tvj
u+dczi2zC3gZJoAU8B+I/gUOvurcp1KwhwAAAABJRU5ErkJggg==
iVBORw0KGgoAAAANSUhEUgAAABkAAAAZCAYAAADE6YVjAAAABGdBTUEAALGPC/xhBQAABA1JREFUSEul
k21MW2UYhuuY/plh/hgxYQYaDdVkJlTNTNiMM8BABRwD44zAkIFboSTGMNpldNI5mevGFDGDuWUOWQwf
g45SWj7bwlZWZTAlwEjKspURHS0ayikttOf03OYcGMo5dXz44/rRnvd+rjzP874CAIL/C03TApokgyhT
X6Z3XwHIJkMBNesOpin/BuY7L7Ae/J75J0mtKdN7SAl3rhKTSYcwEp1GOwzmFJqiNvACa4WiKAH1828H
fCcqMZt7HA8TD2IkNgM9O1PQ+Eoc6Z0hNvNCa8Hr9T7tcExJ/ryigUuixO+Jn2A4Jg3dUcloEO/G9y/t
hOV8VQEvuFoIggibmPhDNTo6RvWZ+zB09AwGoz+CMSoZ9ZGxOP/iDpwWvoqSMDE/vBrs9qnI0dGxK3fu
WD0WywDa203Q1KihOShDXWQMKkWM4DVW8GvNtSxegZUg/xp55v5wb+XQ0KjHYrnFCtTXdPixug5lqnKc
SUqDarGDwYbmdD9JBfGKPA6KsD3l7i85Nm36zNPf04K2diMa1TpUVdfhbFklFEoV5LJifP7WHgxe1eyn
fORGJscrFAjmHVBzU5s8wxVHnB1ZsDe8h/EL26Gtu8x2UPoNIzgF2dETkBd9SfVabkmYzKM8ryAX5jBp
/0VIaN+ucOr2waFOwfjF7RgrF2NYtQ0VpSdRVPwVK1AoT7kMJrP834JVSXyTluecP4W3TbekwqFOZQXW
8khWMKCMwE2ZECWFuTh2XOXs7OpRcAUrSnwTHaKZxqhqpzZ5QXDhnw4GlCL0yoQw5m+FPi/C3Wm4XhRI
8FgJ6RgIJ7RxtU79h7wRMR0wAkN+KFqzQ3BX910BN7+ixHdPLXZ1fVztbMuYZ5fMGVFvYTgr0Gdvwbip
Koeb58L7w2fTign9HrWzLd1jr0+ALcCIFgQheHCjJt3vp57g1uCy7IfXphXPaGL0M0wH9e/CdvH15R0s
CbZgwlyb7id9G/9rDwEl5MOb24imXd3O1jS/vSFp2Q5uK0XsLTJKt7I7sBmrcmjav2IHSxLmMOW4/TKh
jTdO6z6Ao3Evb8msID8U7ZIw90pLDoSA9rk2zTYnWqe1C++A2YF1UdBfHAFzYTiM0lB0Sp93WptKi7gF
VoMAvrlgf4sc083ZsLG36JFABPNhIQzSUHTkCV3WptMKbni1sBK64ySIulyMnXtzYUTFzDVdELTmPEuN
acvk3OBaENCkN3i++xwmfsiDRZWKGwrxkkCfFYL7XZdyuaG1IvhCqdRN1srQ93Umrh5JxiXpLmgkL0B/
IAQPrtfs5wbWg2B3fAL9acZeulmRikppPM5mR6M8+w3c7W1i3wE3sB4EsXEJ9PuJ79zTf3t4x7zbtXlu
ET9FBXEPr5e/AQ6+6tzhmqTFAAAAAElFTkSuQmCC
</value>
</data>
<data name="btnTV.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAAkRJREFUOE9joClQ3/CaV37+fQ4olzSgvfqhm+bqh6+A+IbKymeiIDGNlY8CNVc9
OqK9/IksWBEuoLv+kW76oZf/9NY++q+5GohXPTptvO5xhemGR380Vj96h9UAkFOBkhM0Vz3cr7Hq4bbo
/S/+L7vz6b8W0AB9oEGbHnz5H7//5U/t1Y+DtFa95IFqgwCLzY+kTTc8vqS95tF/baAGkCaQzVlHXv1v
v/Du/0aQ5gMvIa6B4O+aq+8bQrUzMBivf5z+5Mvv/9///Pv/5vuf/3c//vp/+tWP/7uefP2/8u7n/9Ov
fQQbVHbyzX+3bU/BFmitfhgK1c7AYL7hcerzr7//9116D5a03Pjkv9f2Z/9j97/8n3/s9f/6M2//T77y
4f+nX3//rwIaCHKF2uqH/lDtDAzOm5/Eg1wwCagIyZkYGOSyFXcgBqjOv+QN1Y4wYMpVwgYsBxqgAwwr
scjSAKBWFrABNmvvRzz49IugAY8+//6/8NYnsAE8ejaZQK0SYAPU65ZGg0yfRsAAkCthBnBpWpQCtWqC
DRDySg46+uL7/w8///4/8/rH/+2Pv/5ffPvT//7L7/9XnX77P/XQq/+Bu57/fwWModk3Pv7XXHz9C7Ow
lB9QqzjYAAYVFXax0OIM6aTGHpPqGUt9J2/al7HuzNWGk8/fTrv6/t+ae5//H3z27f+19z//N559+4/X
wqsQqAuUGiFhgAQYoZiJgSGUmcHenkXYyoqX1yVSVSKp3k48piaC1y7YEyjPC8QYmskADAwACfSzwjHl
AmsAAAAASUVORK5CYII=
vAAADrwBlbxySQAAAkJJREFUOE+1kl1IU2EYx59SKMJzk6SSRDczd7Y0wqQloheF0KIPjYFiIRiidRMR
RlRkXnUTFRkWdCEhZjtn06mg4EUrsUC2IJYzqa153rM2tzn33dyHe+Kc1fALFkF/eG6e5/3/nj8PL8D/
VKnOQ+3vs+3c2P8ryVmujmY5N81y8xK1Y4/Qk6pJPc2Qafmgfd/G9+tUNkzK2qdcqXItQZolSDPEUDHE
36zUkaSUJctbAoSoUpY8phlOL2W48Wb9Ir6yBFHGEjykJTi6EMYWvSsmZ/kGGePKW2dWjJHiSh1vkmsI
ylkimoTNV6bdeP/TMo4I5reudJp0RWnWdjgDqBjm2+3hBEaTKVyKJtEaiKPBvYKT9giqrSF8NhcQQTdm
lrBu/Ie4QMZyqgzgqI5vc0YS+NDkE4fHRuyonHDgRb0Lr37wYJfRiz2zfgzGV5GxhsQUB1jubAZwfMze
IiR4MutfG3NTCcleW9KAkj7TqU2Ap+bsgEFLCA9qCBY0dZ4DgFwRUK21NS4E41kBJJTAl1+DIiCvvPoy
ABSJgNK7A80CvTcLQEj5B7CLVnQCAC0CdisvNbxfjKI/topGzwpO8BHs/xbER599eMvgxbYpN9ZPOtEd
TeKL+QDS/V/COfl7zwBAYfoIEsmOAtX1juLW7gdHbj8fON0z+qZjyGi+N+P09pp9Kc33EL5z/MQ5Xwy7
P3pTlEJ5DQCE35i+wRpt+13bAVQ5UFubm19VRVEnmkqKWrtqCi/caaRqzp8EAGor8z/pFwn0s8KqVrGp
AAAAAElFTkSuQmCC
</value>
</data>
</root>

74
Aviso/usrcntlAktDetails.vb
View File

@@ -6,6 +6,7 @@ Imports System.IO
Imports System.Drawing
Imports Microsoft.Office.Interop
Imports System.Security.Cryptography
Imports GrapeCity.DataVisualization.TypeScript
Public Class usrcntlAktDetails
@@ -1359,6 +1360,15 @@ Public Class usrcntlAktDetails
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
init = True 'Vermerke_anzeigen(RowIndex)': initDgvSendungen()
Case "118"
myVermerk.Hinweis_Vermerk = CStr(gridVermerke.Rows(RowIndex).Cells("Hinweis_Vermerk").Value).Replace("angefordert", "erhalten")
myVermerk.VermerkCodeId = 119
Dim IdTmp = VermerkeDAL.SpeichernVermerk(myVermerk)
VermerkeDAL.SpeichernVermerkIDAufgehoben(VermekId, IdTmp)
init = True 'Vermerke_anzeigen(RowIndex)': initDgvSendungen()
End Select
End If
@@ -1570,6 +1580,11 @@ Public Class usrcntlAktDetails
optionCell.Value = "Kostenbestätigung erhalten"
optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'Kostenbestätigung erhalten' einzutragen."
End If
Case 118
If Not existCodeInGridVermerke(r, gridvermerke, 119, CStr(r.Cells("Hinweis_Vermerk").Value)) Then
optionCell.Value = "T1/T2 Draft OK erhalten"
optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'T1/T2 Draft OK ' einzutragen."
End If
End Select
End If
@@ -3952,5 +3967,64 @@ Public Class usrcntlAktDetails
Panel4.Visible = False
End If
End Sub
Private Sub Button11_Click_1(sender As Object, e As EventArgs) Handles Button11.Click
tread_printAlleMarkierte(AvisoID)
End Sub
Shared Sub tread_printAlleMarkierte(AvisoID)
Dim t As New Threading.Thread(Sub(params)
Dim ANH_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge)
VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_ByAviso(ANH_LIST, AvisoID) 'LÄDT alle Aviso-Anhänge
For Each ll In ANH_LIST
If ll.anh_MarkierungDruck Then
Select Case ll.anh_Typ
Case "PDF" : VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)})
Case Else : Process.Start(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId))
End Select
End If
Next
End Sub)
t.Start({AvisoID, Printername})
t.IsBackground = True
End Sub
Shared Sub openAlleMarkierte(AvisoID)
Try
Dim files As New List(Of String) '
Dim ANH_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge)
VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_ByAviso(ANH_LIST, AvisoID) 'LÄDT alle Aviso-Anhänge
For Each ll In ANH_LIST
If ll.anh_MarkierungDruck Then
Select Case ll.anh_Typ
Case "PDF" : files.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId))
' Case Else : Process.Start(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId))
End Select
End If
Next
If files.Count = 0 Then
MsgBox("Keine Anhänge gefunden!")
Exit Sub
End If
Dim outputFile As String = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("Merge.pdf", ".pdf", True,, "Merge") ' "result.pdf"
VERAG_PROG_ALLGEMEIN.cFormularManager.mergePDFs(files, outputFile)
Process.Start(outputFile)
Catch ex As Exception
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
End Try
End Sub
Private Sub Button12_Click_1(sender As Object, e As EventArgs) Handles Button12.Click
openAlleMarkierte(AvisoID)
End Sub
End Class

457
Gemeinsames/ARConverterBackup3/Gemeinsames.vbproj Normal file
View File

@@ -0,0 +1,457 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">x86</Platform>
<ProductVersion>
</ProductVersion>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}</ProjectGuid>
<OutputType>Library</OutputType>
<StartupObject>
</StartupObject>
<RootNamespace>Gemeinsames</RootNamespace>
<AssemblyName>Gemeinsames</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>Windows</MyType>
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
<TargetFrameworkProfile>
</TargetFrameworkProfile>
<IsWebBootstrapper>false</IsWebBootstrapper>
<PublishUrl>publish\</PublishUrl>
<Install>true</Install>
<InstallFrom>Disk</InstallFrom>
<UpdateEnabled>false</UpdateEnabled>
<UpdateMode>Foreground</UpdateMode>
<UpdateInterval>7</UpdateInterval>
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
<UpdatePeriodically>false</UpdatePeriodically>
<UpdateRequired>false</UpdateRequired>
<MapFileExtensions>true</MapFileExtensions>
<ApplicationRevision>1</ApplicationRevision>
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
<UseApplicationTrust>false</UseApplicationTrust>
<PublishWizardCompleted>true</PublishWizardCompleted>
<BootstrapperEnabled>true</BootstrapperEnabled>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>Gemeinsames.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
<PlatformTarget>x86</PlatformTarget>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>Gemeinsames.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
<PropertyGroup>
<OptionExplicit>On</OptionExplicit>
</PropertyGroup>
<PropertyGroup>
<OptionCompare>Binary</OptionCompare>
</PropertyGroup>
<PropertyGroup>
<OptionStrict>On</OptionStrict>
</PropertyGroup>
<PropertyGroup>
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<PropertyGroup>
<ManifestCertificateThumbprint>E1277E3EC64E394A66EC726E5057325CDF3A52E3</ManifestCertificateThumbprint>
</PropertyGroup>
<PropertyGroup>
<ManifestKeyFile>Gemeinsames_TemporaryKey.pfx</ManifestKeyFile>
</PropertyGroup>
<PropertyGroup>
<GenerateManifests>true</GenerateManifests>
</PropertyGroup>
<PropertyGroup>
<SignManifests>true</SignManifests>
</PropertyGroup>
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x64'">
<PlatformTarget>AnyCPU</PlatformTarget>
<OutputPath>bin\Debug\</OutputPath>
</PropertyGroup>
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x64'">
<PlatformTarget>x64</PlatformTarget>
<OutputPath>bin\Release\</OutputPath>
</PropertyGroup>
<PropertyGroup>
<SignAssembly>false</SignAssembly>
</PropertyGroup>
<PropertyGroup>
<AssemblyOriginatorKeyFile>Gemeinsames_TemporaryKey.pfx</AssemblyOriginatorKeyFile>
</PropertyGroup>
<ItemGroup>
<Reference Include="Accessibility" />
<Reference Include="BouncyCastle.Cryptography, Version=2.0.0.0, Culture=neutral, PublicKeyToken=072edcf4a5328938, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>F:\PROGRAMMIERUNG\dll\ActiveReports18\BouncyCastle.Cryptography.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.DX.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.DX.Windows.7.2.2\lib\net461\DS.Documents.DX.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.7.2.2\lib\net461\DS.Documents.Imaging.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.Windows.7.2.2\lib\net461\DS.Documents.Imaging.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Pdf, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Pdf.7.2.2\lib\net461\DS.Documents.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart.Win, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.Win.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders, Version=3.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.3.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders.Excel, Version=1.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.Excel.1.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gc, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gdi, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gc, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gc.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gdi, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gdi.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Excel.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Excel.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Html.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Html.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Html.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Image.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Image.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Image.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Svg.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Svg.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Svg.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Text.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Text.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Text.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Tiff.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Tiff.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Tiff.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Word.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Word.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Word.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rdl, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rdl.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rdl.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rendering, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rendering.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rendering.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Scripting, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Scripting.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Scripting.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Design.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Design.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Design.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Excel, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Excel.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Html, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Html.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Html.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Word, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Word.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Word.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Xml, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Xml.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Xml.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.QueryDesigner, Version=1.0.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.QueryDesigner.1.0.2\lib\net462\MESCIUS.ActiveReports.QueryDesigner.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Serializer, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Serializer.VS2022.18.2.2\lib\net472\MESCIUS.ActiveReports.Serializer.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.SpreadBuilder, Version=2.2.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.SpreadBuilder.2.2.0\lib\net462\MESCIUS.ActiveReports.SpreadBuilder.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Common, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Common.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Common.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.DataEngine, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.DataEngine.4.0.3\lib\net462\MESCIUS.Data.DataEngine.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.ExpressionInfo, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.ExpressionInfo.4.0.3\lib\net462\MESCIUS.Data.ExpressionInfo.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.VBFunctionLib, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.VBFunctionLib.4.0.3\lib\net462\MESCIUS.Data.VBFunctionLib.dll</HintPath>
</Reference>
<Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.8.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Configuration" />
<Reference Include="System.Data" />
<Reference Include="System.Deployment" />
<Reference Include="System.Design" />
<Reference Include="System.Drawing" />
<Reference Include="System.Drawing.Design" />
<Reference Include="System.Management" />
<Reference Include="System.Runtime.CompilerServices.Unsafe, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
<HintPath>..\packages\System.Runtime.CompilerServices.Unsafe.6.0.0\lib\net461\System.Runtime.CompilerServices.Unsafe.dll</HintPath>
</Reference>
<Reference Include="System.Runtime.Serialization.Formatters.Soap" />
<Reference Include="System.Security" />
<Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
</Reference>
<Reference Include="System.Web" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Drawing" />
<Import Include="System.Diagnostics" />
<Import Include="System.Windows.Forms" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
</ItemGroup>
<ItemGroup>
<Compile Include="cReportExportierer.vb" />
<Compile Include="Form1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Form1.Designer.vb">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="frmGrayOut.Designer.vb">
<DependentUpon>frmGrayOut.vb</DependentUpon>
</Compile>
<Compile Include="frmGrayOut.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
<DesignTime>True</DesignTime>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="MyListItem.vb" />
<Compile Include="rptSendungenATILLA.Designer.vb">
<DependentUpon>rptSendungenATILLA.vb</DependentUpon>
</Compile>
<Compile Include="rptSendungenATILLA.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="rptSendungen.Designer.vb">
<DependentUpon>rptSendungen.vb</DependentUpon>
</Compile>
<Compile Include="rptSendungen.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenATA.Designer.vb">
<DependentUpon>subRptSendungenATA.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenATA.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenVorkosten.Designer.vb">
<DependentUpon>subRptSendungenVorkosten.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenVorkosten.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenZollpruefung.Designer.vb">
<DependentUpon>subRptSendungenZollpruefung.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenZollpruefung.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenOfferte.Designer.vb">
<DependentUpon>subRptSendungenOfferte.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenOfferte.vb">
<SubType>Component</SubType>
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="frmGrayOut.resx">
<DependentUpon>frmGrayOut.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\licenses.licx" />
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="rptSendungenATILLA.resx">
<DependentUpon>rptSendungenATILLA.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="rptSendungen.resx">
<DependentUpon>rptSendungen.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenATA.resx">
<DependentUpon>subRptSendungenATA.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenVorkosten.resx">
<DependentUpon>subRptSendungenVorkosten.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenZollpruefung.resx">
<DependentUpon>subRptSendungenZollpruefung.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenOfferte.resx">
<DependentUpon>subRptSendungenOfferte.vb</DependentUpon>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="App.config" />
<None Include="Gemeinsames_TemporaryKey.pfx" />
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
</ItemGroup>
<ItemGroup>
<None Include="packages.config" />
<None Include="PrivateCodeSignaturDaniel20240131.pfx" />
<None Include="Resources\Versionsinfo.txt" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Aviso.ico" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\road.jpg" />
</ItemGroup>
<ItemGroup>
<BootstrapperPackage Include=".NETFramework,Version=v4.5">
<Visible>False</Visible>
<ProductName>Microsoft .NET Framework 4.5 %28x86 and x64%29</ProductName>
<Install>true</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Client.3.5">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName>
<Install>false</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1</ProductName>
<Install>false</Install>
</BootstrapperPackage>
</ItemGroup>
<ItemGroup>
<None Include="Resources\WAI.png" />
<None Include="Resources\QS.png" />
<None Include="Resources\NKD.png" />
<None Include="Resources\LEX.png" />
<None Include="Resources\SBG.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\SUB.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\UNISPED.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\IMEX.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\AMB.png">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
</ItemGroup>
<ItemGroup>
<Content Include="Resources\FO.png" />
<Content Include="Resources\VERIMEX.png">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</Content>
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\..\ADMIN\ADMIN\DAKOSY_Worker\DAKOSY_Worker_lib.vbproj">
<Project>{50e8e49b-4fd9-4dd4-b159-bdc2b7d0e94f}</Project>
<Name>DAKOSY_Worker_lib</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
<Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
<Name>VERAG_PROG_ALLGEMEIN</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
</Project>

1985
Gemeinsames/ARConverterBackup3/rptSendungen.Designer.vb generated Normal file
View File

File diff suppressed because it is too large Load Diff

356
Gemeinsames/ARConverterBackup3/rptSendungen.vb Normal file
View File

@@ -0,0 +1,356 @@
Public Class rptSendungen
Public VALUES As New rptSendungenValues
Public imgPath As String
Public ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung = Nothing
Public HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling) = Nothing
Public VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten) = Nothing
Sub New()
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.Document.Printer.PrinterName = ""
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Sub New(VALUES As rptSendungenValues, imgPath As String, ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung, HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling), VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten))
InitializeComponent()
Me.Document.Printer.PrinterName = ""
Me.VALUES = VALUES
Me.imgPath = imgPath
Me.ZOLLANMELDUNG = ZOLLANMELDUNG
Me.HANDLING = HANDLING
Me.VORKOSTEN = VORKOSTEN
init()
End Sub
Public Sub init()
txtAbfertigungsart.Text = VALUES.Abfertigungsart
txtTarifposanzahl.Text = VALUES.Tarifposanzahl
txtFilialeNr.Text = VALUES.FilialeNr
txtAbfertigungsnummer.Text = VALUES.Abfertigungsnummer
txtAvisierer_Firma.Text = VALUES.Avisierer_Firma
txtAvisierer_KdNr.Text = VALUES.Avisierer_KdNr
txtAuftraggeber_Firma.Text = VALUES.Auftraggeber_Firma
txtAuftraggeber_KdNr.Text = VALUES.Auftraggeber_KdNr
txtEmpfaenger_Firma.Text = VALUES.Empfaenger_Firma
txtEmpfaenger_KdNr.Text = VALUES.Empfaenger_KdNr
txtAbsender_Firma.Text = VALUES.Absender_Firma
txtAbsender_KdNr.Text = VALUES.Absender_KdNr
txtFrachtfuehrer_Firma.Text = VALUES.Frachtfuehrer_Firma
txtFrachtfuehrer_KdNr.Text = VALUES.Frachtfuehrer_KdNr
txtAvisierer_Zoll.Text = VALUES.Avisierer_Zoll
txtAvisierer_Eust.Text = VALUES.Avisierer_Eust
txtAvisierer_Abf.Text = VALUES.Avisierer_Abf
txtAvisierer_Clear.Text = VALUES.Avisierer_Clear
txtAuftraggeber_Zoll.Text = VALUES.Auftraggeber_Zoll
txtAuftraggeber_Eust.Text = VALUES.Auftraggeber_Eust
txtAuftraggeber_Abf.Text = VALUES.Auftraggeber_Abf
txtAuftraggeber_Clear.Text = VALUES.Auftraggeber_Clear
txtEmpfaenger_Zoll.Text = VALUES.Empfaenger_Zoll
txtEmpfaenger_Eust.Text = VALUES.Empfaenger_Eust
txtEmpfaenger_Abf.Text = VALUES.Empfaenger_Abf
txtEmpfaenger_Clear.Text = VALUES.Empfaenger_Clear
txtAbsender_Zoll.Text = VALUES.Absender_Zoll
txtAbsender_Eust.Text = VALUES.Absender_Eust
txtAbsender_Abf.Text = VALUES.Absender_Abf
txtAbsender_Clear.Text = VALUES.Absender_Clear
txtFrachtfuehrer_Zoll.Text = VALUES.Frachtfuehrer_Zoll
txtFrachtfuehrer_Eust.Text = VALUES.Frachtfuehrer_Eust
txtFrachtfuehrer_Abf.Text = VALUES.Frachtfuehrer_Abf
txtFrachtfuehrer_Clear.Text = VALUES.Frachtfuehrer_Clear
txtAvisierer_Leistung1.Text = VALUES.Avisierer_Leistung1
txtAvisierer_Betrag1.Text = VALUES.Avisierer_Betrag1
txtAvisierer_Leistung2.Text = VALUES.Avisierer_Leistung2
txtAvisierer_Betrag2.Text = VALUES.Avisierer_Betrag2
txtAvisierer_Leistung3.Text = VALUES.Avisierer_Leistung3
txtAvisierer_Betrag3.Text = VALUES.Avisierer_Betrag3
txtAuftraggeber_Leistung1.Text = VALUES.Auftraggeber_Leistung1
txtAuftraggeber_Betrag.Text = VALUES.Auftraggeber_Betrag
txtAuftraggeber_Leistung2.Text = VALUES.Auftraggeber_Leistung2
txtAuftraggeber_Betrag2.Text = VALUES.Auftraggeber_Betrag2
txtAuftraggeber_Leistung3.Text = VALUES.Auftraggeber_Leistung3
txtAuftraggeber_Betrag3.Text = VALUES.Auftraggeber_Betrag3
txtKdAuftrNr.Text = VALUES.KdAuftrNr
txtEmpfaenger_Leistung1.Text = VALUES.Empfaenger_Leistung1
txtEmpfaenger_Betrag1.Text = VALUES.Empfaenger_Betrag1
txtEmpfaenger_Leistung2.Text = VALUES.Empfaenger_Leistung2
txtEmpfaenger_Betrag2.Text = VALUES.Empfaenger_Betrag2
txtEmpfaenger_Leistung3.Text = VALUES.Empfaenger_Leistung3
txtEmpfaenger_Betrag3.Text = VALUES.Empfaenger_Betrag3
txtAbsender_Leistung1.Text = VALUES.Absender_Leistung1
txtAbsender_Betrag1.Text = VALUES.Absender_Betrag1
txtAbsender_Leistung2.Text = VALUES.Absender_Leistung2
txtAbsender_Betrag2.Text = VALUES.Absender_Betrag2
txtAbsender_Leistung3.Text = VALUES.Absender_Leistung3
txtAbsender_Betrag3.Text = VALUES.Absender_Betrag3
txtFrachtfuehrer_Leistung1.Text = VALUES.Frachtfuehrer_Leistung1
txtFrachtfuehrer_Betrag1.Text = VALUES.Frachtfuehrer_Betrag1
txtFrachtfuehrer_Leistung2.Text = VALUES.Frachtfuehrer_Leistung2
txtFrachtfuehrer_Betrag2.Text = VALUES.Frachtfuehrer_Betrag2
txtFrachtfuehrer_Leistung3.Text = VALUES.Frachtfuehrer_Leistung3
txtFrachtfuehrer_Betrag3.Text = VALUES.Frachtfuehrer_Betrag3
txtFrachtfuehrer_Bar_BelegNr.Text = VALUES.Frachtfuehrer_Bar_BelegNr
txtFrachtfuehrer_Bar_Betrag.Text = VALUES.Frachtfuehrer_Bar_Betrag
txtFrachtfuehrer_Bar_BelegNr2.Text = VALUES.Frachtfuehrer_Bar_BelegNr2
txtFrachtfuehrer_Bar_Betrag2.Text = VALUES.Frachtfuehrer_Bar_Betrag2
txtFrachtfuehrer_Bar_BelegNr3.Text = VALUES.Frachtfuehrer_Bar_BelegNr3
txtFrachtfuehrer_Bar_Betrag3.Text = VALUES.Frachtfuehrer_Bar_Betrag3
txtAvisierer_eigBin.Text = VALUES.Avisierer_eigBin
txtAuftraggeber_eigBin.Text = VALUES.Auftraggeber_eigBin
txtEmpfaenger_eigBIN.Text = VALUES.Empfaenger_eigBIN
txtAbsender_eigBIN.Text = VALUES.Absender_eigBIN
txtFrachtfuehrer_eigBIN.Text = VALUES.Frachtfuehrer_eigBIN
txtAvisierer_VK.Text = VALUES.Avisierer_VK
txtAuftraggeber_VK.Text = VALUES.Auftraggeber_VK
txtEmpfaenger_VK.Text = VALUES.Empfaenger_VK
txtAbsender_VK.Text = VALUES.Absender_VK
txtFrachtfuehrer_VK.Text = VALUES.Frachtfuehrer_VK
txtLKWKennzeichen.Text = VALUES.LKWKennzeichen
txtAnkunft.Text = VALUES.Ankunft
txtAbfahrt.Text = VALUES.Abfahrt
txtWarenbezeichnung.Text = VALUES.Warenbezeichnung
txtColli.Text = VALUES.Colli
txtGewicht.Text = VALUES.Gewicht
txtAufschub_VERAG.Text = VALUES.Aufschub_VERAG
' rtbAbfKost.Text = VALUES.AbfKost--> Mit Sub Report gel<65>st
txtDokZuSend_Ueberschrift.Text = VALUES.DokZuSend_Ueberschrift
txtDokZuSend_Text.Text = VALUES.DokZuSend_Text
txtAnmerkungen.Text = VALUES.Anmerkungen
txtBARzuKassieren.Text = VALUES.BARzuKassieren
txtEmpfaenger_EUSTKto.Text = VALUES.Empfaenger_EUSTKto
txtAuftraggeber_EUSTKto.Text = VALUES.Auftraggeber_EUSTKto
txtAuftraggeber_ZOLLKto.Text = VALUES.Auftraggeber_ZOLLKto
txtEmpfaenger_ZOLLKto.Text = VALUES.Empfaenger_ZOLLKto
cbxDyUebermittelt.Checked = VALUES.DyUebermittelt
TextBox3.Text = "Abkl.: " & VALUES.QS_MA & vbNewLine & "Dekl.: " & VALUES.VG_MA
If VALUES.Grenze.Trim <> "" Then
lblGrenze.Visible = True
shGrenze.Visible = True
txtGrenze.Visible = True
txtGrenze.Text = VALUES.Grenze.Replace("???", "")
Else
lblGrenze.Visible = False
shGrenze.Visible = False
txtGrenze.Visible = False
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("ATK_DY_UEBERMITTELT") Then
cbxDyUebermittelt.Visible = True
End If
If VALUES.SchnellAbfertigung Then
txtSchnellAbfertigung.Visible = True
End If
Select Case VALUES.ABF_ART
Case 5, 6, 18, 32, 24, 33, 34, 37, 40, 42
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.NCTS_VZAdr
lblNCTSVZAdr.Text = "NCTS" & vbNewLine & "Gest.-Adr.:"
Case 7
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.NCTS_VZAdr
lblNCTSVZAdr.Text = "Amtsplatz/" & vbNewLine & "Zollstopp:"
Case 26, 28
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.FISKAL_ENDEMPF
lblNCTSVZAdr.Text = "Fiskal" & vbNewLine & "EndEmpf.:"
End Select
If barcodeLKW IsNot Nothing Then
If VALUES.barcodeLKW IsNot Nothing Then
barcodeLKW.Image = If(VALUES.barcodeLKW, Nothing)
End If
End If
barcodeSendung.Image = If(VALUES.barcodeSendung, Nothing)
' picQR.Image = If(VALUES.imgQR, Nothing)
If picQR IsNot Nothing Then
If VALUES.imgQR IsNot Nothing Then
picQR.Image = If(VALUES.imgQR, Nothing)
End If
End If
'OFFERTE!
If False Then
If VALUES.AbfKostKdnr > 0 Then
Dim s = New subRptSendungenOfferte(VALUES.ABF_ART, VALUES.AbfKostKdnr)
SubReport.Report = s
End If
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
Dim s = New subRptSendungenVorkosten(VORKOSTEN)
SubReport.Report = s
Else
If ZOLLANMELDUNG IsNot Nothing Then
Dim s = New subRptSendungenZollpruefung(ZOLLANMELDUNG)
SubReport.Report = s
ElseIf HANDLING IsNot Nothing Then
Dim s = New subRptSendungenATA(HANDLING)
SubReport.Report = s
End If
End If
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
' Dim fs As New System.IO.FileStream(imgPath, System.IO.FileMode.Open, System.IO.FileAccess.Read)
' Dim bm As New Bitmap(GrapeCity.ActiveReports.Document.Drawing.Image.FromStream(fs))
Dim bm As New Bitmap(imgPath)
Me.Picture.Image = bm
' fs.Close()
End Sub
Private Sub rptSendungen_PageStart(sender As Object, e As EventArgs) Handles Me.PageStart
' Me.Document.CacheToDisk = True
End Sub
Private Sub rptSendungen_ReportEnd(sender As Object, e As EventArgs) Handles Me.ReportEnd
GC.Collect()
End Sub
Private Sub rptSendungen_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
Me.Document.Printer.PrinterName = ""
End Sub
End Class
Public Class rptSendungenValues
Property Abfertigungsart As String = ""
Property Tarifposanzahl As String = ""
Property FilialeNr As String = ""
Property Abfertigungsnummer As String = ""
Property Avisierer_Firma As String = ""
Property Avisierer_KdNr As String = ""
Property Auftraggeber_Firma As String = ""
Property Auftraggeber_KdNr As String = ""
Property Empfaenger_Firma As String = ""
Property Empfaenger_KdNr As String = ""
Property Absender_Firma As String = ""
Property Absender_KdNr As String = ""
Property Frachtfuehrer_Firma As String = ""
Property Frachtfuehrer_KdNr As String = ""
Property Avisierer_Zoll As String = ""
Property Avisierer_Eust As String = ""
Property Avisierer_Abf As String = ""
Property Avisierer_Clear As String = ""
Property Auftraggeber_Zoll As String = ""
Property Auftraggeber_Eust As String = ""
Property Auftraggeber_Abf As String = ""
Property Auftraggeber_Clear As String = ""
Property Empfaenger_Zoll As String = ""
Property Empfaenger_Eust As String = ""
Property Empfaenger_Abf As String = ""
Property Empfaenger_Clear As String = ""
Property Absender_Zoll As String = ""
Property Absender_Eust As String = ""
Property Absender_Abf As String = ""
Property Absender_Clear As String = ""
Property Frachtfuehrer_Zoll As String = ""
Property Frachtfuehrer_Eust As String = ""
Property Frachtfuehrer_Abf As String = ""
Property Frachtfuehrer_Clear As String = ""
Property Avisierer_Leistung1 As String = ""
Property Avisierer_Betrag1 As String = ""
Property Avisierer_Leistung2 As String = ""
Property Avisierer_Betrag2 As String = ""
Property Avisierer_Leistung3 As String = ""
Property Avisierer_Betrag3 As String = ""
Property Auftraggeber_Leistung1 As String = ""
Property Auftraggeber_Betrag As String = ""
Property Auftraggeber_Leistung2 As String = ""
Property Auftraggeber_Betrag2 As String = ""
Property Auftraggeber_Leistung3 As String = ""
Property Auftraggeber_Betrag3 As String = ""
Property KdAuftrNr As String = ""
Property Empfaenger_Leistung1 As String = ""
Property Empfaenger_Betrag1 As String = ""
Property Empfaenger_Leistung2 As String = ""
Property Empfaenger_Betrag2 As String = ""
Property Empfaenger_Leistung3 As String = ""
Property Empfaenger_Betrag3 As String = ""
Property Absender_Leistung1 As String = ""
Property Absender_Betrag1 As String = ""
Property Absender_Leistung2 As String = ""
Property Absender_Betrag2 As String = ""
Property Absender_Leistung3 As String = ""
Property Absender_Betrag3 As String = ""
Property Frachtfuehrer_Leistung1 As String = ""
Property Frachtfuehrer_Betrag1 As String = ""
Property Frachtfuehrer_Leistung2 As String = ""
Property Frachtfuehrer_Betrag2 As String = ""
Property Frachtfuehrer_Leistung3 As String = ""
Property Frachtfuehrer_Betrag3 As String = ""
Property Frachtfuehrer_Bar_BelegNr As String = ""
Property Frachtfuehrer_Bar_Betrag As String = ""
Property Frachtfuehrer_Bar_BelegNr2 As String = ""
Property Frachtfuehrer_Bar_Betrag2 As String = ""
Property Frachtfuehrer_Bar_BelegNr3 As String = ""
Property Frachtfuehrer_Bar_Betrag3 As String = ""
Property Avisierer_eigBin As String = ""
Property Auftraggeber_eigBin As String = ""
Property Empfaenger_eigBIN As String = ""
Property Absender_eigBIN As String = ""
Property Frachtfuehrer_eigBIN As String = ""
Property Avisierer_VK As String = ""
Property Auftraggeber_VK As String = ""
Property Empfaenger_VK As String = ""
Property Absender_VK As String = ""
Property Frachtfuehrer_VK As String = ""
Property LKWKennzeichen As String = ""
Property Ankunft As String = ""
Property Abfahrt As String = ""
Property Warenbezeichnung As String = ""
Property Colli As String = ""
Property Gewicht As String = ""
Property Aufschub_VERAG As String = ""
Property DokZuSend_Ueberschrift As String = ""
Property DokZuSend_Text As String = ""
Property Anmerkungen As String = ""
' Property BAR As String = ""
Property BARzuKassieren As String = ""
Property ABTEILUNG As String = ""
Property NCTS_VZAdr As String = ""
Property FISKAL_ENDEMPF As String = ""
Property ABF_ART As Integer = -1
Property barcodeLKW As Image = Nothing
Property barcodeSendung As Image = Nothing
Property imgQR As Image = Nothing
Property AbfKost As String = ""
Property AbfKostKdnr As Integer = -1
Property Empfaenger_EUSTKto As String = ""
Property Auftraggeber_EUSTKto As String = ""
Property Empfaenger_ZOLLKto As String = ""
Property Auftraggeber_ZOLLKto As String = ""
Property Grenze As String = ""
Property DyUebermittelt As Boolean = False
Property SchnellAbfertigung As Boolean = False
Property VG_MA As String = ""
Property QS_MA As String = ""
End Class

885
Gemeinsames/ARConverterBackup3/rptSendungenATILLA.Designer.vb generated Normal file
View File

@@ -0,0 +1,885 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class rptSendungenATILLA
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptSendungenATILLA))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.Picture = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.txtAnmerkungen = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFilialeNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbfertigungsnummer = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Firma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_KdNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAvisierer_Firma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAvisierer_KdNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAuftraggeber_Firma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAuftraggeber_KdNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_BelegNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_Betrag = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLKWKennzeichen = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAnkunft = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbfahrt = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtWarenbezeichnung = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtColli = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtGewicht = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeLKW = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeSendung = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.TextBox2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtIRAN_CMR_Agent = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.SubReport = New GrapeCity.ActiveReports.SectionReportModel.SubReport()
Me.txtFrachtfuehrer_Bar_BelegNr2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_Betrag2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_BelegNr3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_Betrag3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLkwId = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_9 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_7 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtTransportTemp = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.cbxZugMaschine = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.cbxTransportTemp = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAndereAusgangsstelle = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZugMaschine = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
CType(Me.Picture, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAnmerkungen, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFilialeNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbfertigungsnummer, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Firma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_KdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAvisierer_Firma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAvisierer_KdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAuftraggeber_Firma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAuftraggeber_KdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLKWKennzeichen, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAnkunft, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbfahrt, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtWarenbezeichnung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeLKW, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeSendung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtIRAN_CMR_Agent, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLkwId, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtTransportTemp, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.cbxZugMaschine, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.cbxTransportTemp, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAndereAusgangsstelle, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZugMaschine, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.CanGrow = False
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Picture, Me.txtAnmerkungen, Me.txtFilialeNr, Me.txtAbfertigungsnummer, Me.txtFrachtfuehrer_Firma, Me.txtFrachtfuehrer_KdNr, Me.txtAvisierer_Firma, Me.txtAvisierer_KdNr, Me.txtAuftraggeber_Firma, Me.txtAuftraggeber_KdNr, Me.txtFrachtfuehrer_Bar_BelegNr, Me.txtFrachtfuehrer_Bar_Betrag, Me.txtLKWKennzeichen, Me.txtAnkunft, Me.txtAbfahrt, Me.txtWarenbezeichnung, Me.txtColli, Me.txtGewicht, Me.barcodeLKW, Me.TextBox1, Me.barcodeSendung, Me.TextBox2, Me.txtIRAN_CMR_Agent, Me.SubReport, Me.txtFrachtfuehrer_Bar_BelegNr2, Me.txtFrachtfuehrer_Bar_Betrag2, Me.txtFrachtfuehrer_Bar_BelegNr3, Me.txtFrachtfuehrer_Bar_Betrag3, Me.txtLkwId, Me.txtAusgangsZst_1, Me.txtAusgangsZst_5, Me.txtZA_1, Me.txtZA_2, Me.txtZA_3, Me.txtZA_4, Me.txtZA_5, Me.txtAusgangsZst_2, Me.txtAusgangsZst_3, Me.txtAusgangsZst_4, Me.txtAusgangsZst_6, Me.txtAusgangsZst_9, Me.txtAusgangsZst_7, Me.txtAusgangsZst_8, Me.txtTransportTemp, Me.cbxZugMaschine, Me.cbxTransportTemp, Me.txtAndereAusgangsstelle, Me.txtZugMaschine})
Me.Detail.Height = 11.69291!
Me.Detail.Name = "Detail"
'
'Picture
'
Me.Picture.Height = 11.69291!
Me.Picture.HyperLink = Nothing
Me.Picture.ImageBase64String = resources.GetString("Picture.ImageBase64String")
Me.Picture.Left = 0.0000004768372!
Me.Picture.Name = "Picture"
Me.Picture.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.Picture.Top = 0.0!
Me.Picture.Width = 8.267716!
'
'txtAnmerkungen
'
Me.txtAnmerkungen.CanGrow = False
Me.txtAnmerkungen.DistinctField = ""
Me.txtAnmerkungen.Height = 3.740552!
Me.txtAnmerkungen.Left = 5.187402!
Me.txtAnmerkungen.Name = "txtAnmerkungen"
Me.txtAnmerkungen.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAnmerkungen.Style = "color: Black; font-size: 16pt; font-weight: normal; text-decoration: none; text-j" & _
"ustify: auto; vertical-align: top; ddo-char-set: 1; ddo-font-vertical: none; ddo" & _
"-shrink-to-fit: none"
Me.txtAnmerkungen.SummaryGroup = ""
Me.txtAnmerkungen.Text = "Zu sendende Dokumente:"
Me.txtAnmerkungen.Top = 2.337795!
Me.txtAnmerkungen.Width = 2.69567!
'
'txtFilialeNr
'
Me.txtFilialeNr.CanGrow = False
Me.txtFilialeNr.Height = 0.2937008!
Me.txtFilialeNr.Left = 5.11811!
Me.txtFilialeNr.Name = "txtFilialeNr"
Me.txtFilialeNr.Style = "font-size: 16pt; font-weight: bold; text-align: center; text-justify: auto; verti" & _
"cal-align: middle; ddo-char-set: 1"
Me.txtFilialeNr.Text = "4801"
Me.txtFilialeNr.Top = 0.3811024!
Me.txtFilialeNr.Width = 0.7708666!
'
'txtAbfertigungsnummer
'
Me.txtAbfertigungsnummer.CanGrow = False
Me.txtAbfertigungsnummer.Height = 0.2937008!
Me.txtAbfertigungsnummer.Left = 5.659843!
Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer"
Me.txtAbfertigungsnummer.Style = "font-size: 16pt; font-weight: bold; text-align: center; text-justify: auto; verti" & _
"cal-align: middle; ddo-char-set: 1"
Me.txtAbfertigungsnummer.Text = "17000000"
Me.txtAbfertigungsnummer.Top = 0.3811024!
Me.txtAbfertigungsnummer.Width = 2.364567!
'
'txtFrachtfuehrer_Firma
'
Me.txtFrachtfuehrer_Firma.CanGrow = False
Me.txtFrachtfuehrer_Firma.Height = 0.5641732!
Me.txtFrachtfuehrer_Firma.Left = 1.162597!
Me.txtFrachtfuehrer_Firma.Name = "txtFrachtfuehrer_Firma"
Me.txtFrachtfuehrer_Firma.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtFrachtfuehrer_Firma.Text = "TESTFIRMA"
Me.txtFrachtfuehrer_Firma.Top = 1.444488!
Me.txtFrachtfuehrer_Firma.Width = 3.854725!
'
'txtFrachtfuehrer_KdNr
'
Me.txtFrachtfuehrer_KdNr.CanGrow = False
Me.txtFrachtfuehrer_KdNr.Height = 0.1795275!
Me.txtFrachtfuehrer_KdNr.Left = 3.780314!
Me.txtFrachtfuehrer_KdNr.Name = "txtFrachtfuehrer_KdNr"
Me.txtFrachtfuehrer_KdNr.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtFrachtfuehrer_KdNr.Text = "123456"
Me.txtFrachtfuehrer_KdNr.Top = 1.264961!
Me.txtFrachtfuehrer_KdNr.Width = 1.237008!
'
'txtAvisierer_Firma
'
Me.txtAvisierer_Firma.CanGrow = False
Me.txtAvisierer_Firma.Height = 0.5641732!
Me.txtAvisierer_Firma.Left = 1.162598!
Me.txtAvisierer_Firma.Name = "txtAvisierer_Firma"
Me.txtAvisierer_Firma.Style = "font-size: 12pt; ddo-char-set: 1"
Me.txtAvisierer_Firma.Text = "TESTFIRMA"
Me.txtAvisierer_Firma.Top = 2.235039!
Me.txtAvisierer_Firma.Width = 3.854725!
'
'txtAvisierer_KdNr
'
Me.txtAvisierer_KdNr.CanGrow = False
Me.txtAvisierer_KdNr.Height = 0.1795275!
Me.txtAvisierer_KdNr.Left = 3.780315!
Me.txtAvisierer_KdNr.Name = "txtAvisierer_KdNr"
Me.txtAvisierer_KdNr.Style = "font-size: 12pt; ddo-char-set: 1"
Me.txtAvisierer_KdNr.Text = "123456"
Me.txtAvisierer_KdNr.Top = 2.047638!
Me.txtAvisierer_KdNr.Width = 1.237008!
'
'txtAuftraggeber_Firma
'
Me.txtAuftraggeber_Firma.CanGrow = False
Me.txtAuftraggeber_Firma.Height = 0.5641732!
Me.txtAuftraggeber_Firma.Left = 1.162598!
Me.txtAuftraggeber_Firma.Name = "txtAuftraggeber_Firma"
Me.txtAuftraggeber_Firma.Style = "font-size: 12pt; font-weight: normal; ddo-char-set: 1"
Me.txtAuftraggeber_Firma.Text = "TESTFIRMA"
Me.txtAuftraggeber_Firma.Top = 3.026772!
Me.txtAuftraggeber_Firma.Width = 3.854725!
'
'txtAuftraggeber_KdNr
'
Me.txtAuftraggeber_KdNr.CanGrow = False
Me.txtAuftraggeber_KdNr.Height = 0.1795275!
Me.txtAuftraggeber_KdNr.Left = 3.780315!
Me.txtAuftraggeber_KdNr.Name = "txtAuftraggeber_KdNr"
Me.txtAuftraggeber_KdNr.Style = "font-size: 12pt; font-weight: normal; ddo-char-set: 1"
Me.txtAuftraggeber_KdNr.Text = "123456"
Me.txtAuftraggeber_KdNr.Top = 2.843308!
Me.txtAuftraggeber_KdNr.Width = 1.237008!
'
'txtFrachtfuehrer_Bar_BelegNr
'
Me.txtFrachtfuehrer_Bar_BelegNr.CanGrow = False
Me.txtFrachtfuehrer_Bar_BelegNr.DistinctField = ""
Me.txtFrachtfuehrer_Bar_BelegNr.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_BelegNr.Left = 5.118111!
Me.txtFrachtfuehrer_Bar_BelegNr.Name = "txtFrachtfuehrer_Bar_BelegNr"
Me.txtFrachtfuehrer_Bar_BelegNr.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtFrachtfuehrer_Bar_BelegNr.Style = resources.GetString("txtFrachtfuehrer_Bar_BelegNr.Style")
Me.txtFrachtfuehrer_Bar_BelegNr.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_BelegNr.Text = "TEST"
Me.txtFrachtfuehrer_Bar_BelegNr.Top = 1.475984!
Me.txtFrachtfuehrer_Bar_BelegNr.Width = 1.574803!
'
'txtFrachtfuehrer_Bar_Betrag
'
Me.txtFrachtfuehrer_Bar_Betrag.CanGrow = False
Me.txtFrachtfuehrer_Bar_Betrag.DistinctField = ""
Me.txtFrachtfuehrer_Bar_Betrag.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_Betrag.Left = 6.692914!
Me.txtFrachtfuehrer_Bar_Betrag.Name = "txtFrachtfuehrer_Bar_Betrag"
Me.txtFrachtfuehrer_Bar_Betrag.Style = resources.GetString("txtFrachtfuehrer_Bar_Betrag.Style")
Me.txtFrachtfuehrer_Bar_Betrag.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_Betrag.Text = "0"
Me.txtFrachtfuehrer_Bar_Betrag.Top = 1.475984!
Me.txtFrachtfuehrer_Bar_Betrag.Width = 1.259842!
'
'txtLKWKennzeichen
'
Me.txtLKWKennzeichen.CanGrow = False
Me.txtLKWKennzeichen.DistinctField = ""
Me.txtLKWKennzeichen.Height = 0.5877953!
Me.txtLKWKennzeichen.Left = 0.8543308!
Me.txtLKWKennzeichen.Name = "txtLKWKennzeichen"
Me.txtLKWKennzeichen.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtLKWKennzeichen.Style = "color: Black; font-size: 16pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtLKWKennzeichen.SummaryGroup = ""
Me.txtLKWKennzeichen.Text = "34 TR 45454"
Me.txtLKWKennzeichen.Top = 0.2334646!
Me.txtLKWKennzeichen.Width = 2.359054!
'
'txtAnkunft
'
Me.txtAnkunft.CanGrow = False
Me.txtAnkunft.DistinctField = ""
Me.txtAnkunft.Height = 0.1574803!
Me.txtAnkunft.Left = 3.780315!
Me.txtAnkunft.Name = "txtAnkunft"
Me.txtAnkunft.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAnkunft.Style = resources.GetString("txtAnkunft.Style")
Me.txtAnkunft.SummaryGroup = ""
Me.txtAnkunft.Text = "01.01.17 00:00"
Me.txtAnkunft.Top = 0.6244095!
Me.txtAnkunft.Width = 1.237008!
'
'txtAbfahrt
'
Me.txtAbfahrt.CanGrow = False
Me.txtAbfahrt.DistinctField = ""
Me.txtAbfahrt.Height = 0.1574803!
Me.txtAbfahrt.Left = 3.780315!
Me.txtAbfahrt.Name = "txtAbfahrt"
Me.txtAbfahrt.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAbfahrt.Style = resources.GetString("txtAbfahrt.Style")
Me.txtAbfahrt.SummaryGroup = ""
Me.txtAbfahrt.Text = "01.01.17 00:00"
Me.txtAbfahrt.Top = 0.7937009!
Me.txtAbfahrt.Width = 1.237008!
'
'txtWarenbezeichnung
'
Me.txtWarenbezeichnung.CanGrow = False
Me.txtWarenbezeichnung.DistinctField = ""
Me.txtWarenbezeichnung.Height = 0.395276!
Me.txtWarenbezeichnung.Left = 0.642126!
Me.txtWarenbezeichnung.Name = "txtWarenbezeichnung"
Me.txtWarenbezeichnung.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtWarenbezeichnung.Style = resources.GetString("txtWarenbezeichnung.Style")
Me.txtWarenbezeichnung.SummaryGroup = ""
Me.txtWarenbezeichnung.Text = "M<EFBFBD>BEL TEST"
Me.txtWarenbezeichnung.Top = 7.808268!
Me.txtWarenbezeichnung.Width = 4.375197!
'
'txtColli
'
Me.txtColli.CanGrow = False
Me.txtColli.DistinctField = ""
Me.txtColli.Height = 0.3779528!
Me.txtColli.Left = 0.6456693!
Me.txtColli.Name = "txtColli"
Me.txtColli.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtColli.Style = resources.GetString("txtColli.Style")
Me.txtColli.SummaryGroup = ""
Me.txtColli.Text = "0"
Me.txtColli.Top = 8.328741!
Me.txtColli.Width = 2.164567!
'
'txtGewicht
'
Me.txtGewicht.CanGrow = False
Me.txtGewicht.DistinctField = ""
Me.txtGewicht.Height = 0.3779528!
Me.txtGewicht.Left = 2.810236!
Me.txtGewicht.Name = "txtGewicht"
Me.txtGewicht.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtGewicht.Style = resources.GetString("txtGewicht.Style")
Me.txtGewicht.SummaryGroup = ""
Me.txtGewicht.Text = "0kg"
Me.txtGewicht.Top = 8.328741!
Me.txtGewicht.Width = 2.093307!
'
'barcodeLKW
'
Me.barcodeLKW.Height = 0.2889763!
Me.barcodeLKW.HyperLink = Nothing
Me.barcodeLKW.ImageData = Nothing
Me.barcodeLKW.Left = 0.6421265!
Me.barcodeLKW.Name = "barcodeLKW"
Me.barcodeLKW.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.TopLeft
Me.barcodeLKW.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeLKW.Top = 0.8212597!
Me.barcodeLKW.Width = 2.864567!
'
'TextBox1
'
Me.TextBox1.CanGrow = False
Me.TextBox1.Height = 0.1334647!
Me.TextBox1.Left = 0.8059056!
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Style = "font-size: 7pt; font-weight: normal; text-justify: auto; vertical-align: middle; " & _
"ddo-char-set: 1"
Me.TextBox1.Text = "Barcode-Scan: Akt <20>bernehmen"
Me.TextBox1.Top = 1.110236!
Me.TextBox1.Width = 2.864567!
'
'barcodeSendung
'
Me.barcodeSendung.Height = 4.96378!
Me.barcodeSendung.HyperLink = Nothing
Me.barcodeSendung.ImageData = Nothing
Me.barcodeSendung.Left = 0.2082682!
Me.barcodeSendung.Name = "barcodeSendung"
Me.barcodeSendung.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.BottomLeft
Me.barcodeSendung.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeSendung.Top = 2.785827!
Me.barcodeSendung.Width = 0.3543307!
'
'TextBox2
'
Me.TextBox2.CanGrow = False
Me.TextBox2.Height = 0.1720467!
Me.TextBox2.Left = 0.6704725!
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Style = "font-size: 7pt; font-weight: normal; text-justify: auto; vertical-align: middle; " & _
"ddo-char-set: 1"
Me.TextBox2.Text = "Barcode-Scan links: Akt <20>bernehmen & Sendung <20>ffnen"
Me.TextBox2.Top = 10.23622!
Me.TextBox2.Visible = False
Me.TextBox2.Width = 0.1838584!
'
'txtIRAN_CMR_Agent
'
Me.txtIRAN_CMR_Agent.Height = 0.5885825!
Me.txtIRAN_CMR_Agent.Left = 0.7480316!
Me.txtIRAN_CMR_Agent.Name = "txtIRAN_CMR_Agent"
Me.txtIRAN_CMR_Agent.Style = "font-size: 10pt; ddo-char-set: 1"
Me.txtIRAN_CMR_Agent.Text = "TESTFIRMA"
Me.txtIRAN_CMR_Agent.Top = 3.788977!
Me.txtIRAN_CMR_Agent.Width = 3.385827!
'
'SubReport
'
Me.SubReport.CanGrow = False
Me.SubReport.CloseBorder = False
Me.SubReport.Height = 0.4830716!
Me.SubReport.Left = 0.6704725!
Me.SubReport.Name = "SubReport"
Me.SubReport.Report = Nothing
Me.SubReport.ReportName = "SubReport1"
Me.SubReport.Top = 8.98937!
Me.SubReport.Visible = False
Me.SubReport.Width = 3.346457!
'
'txtFrachtfuehrer_Bar_BelegNr2
'
Me.txtFrachtfuehrer_Bar_BelegNr2.CanGrow = False
Me.txtFrachtfuehrer_Bar_BelegNr2.DistinctField = ""
Me.txtFrachtfuehrer_Bar_BelegNr2.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_BelegNr2.Left = 5.11811!
Me.txtFrachtfuehrer_Bar_BelegNr2.Name = "txtFrachtfuehrer_Bar_BelegNr2"
Me.txtFrachtfuehrer_Bar_BelegNr2.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtFrachtfuehrer_Bar_BelegNr2.Style = resources.GetString("txtFrachtfuehrer_Bar_BelegNr2.Style")
Me.txtFrachtfuehrer_Bar_BelegNr2.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_BelegNr2.Text = "TEST"
Me.txtFrachtfuehrer_Bar_BelegNr2.Top = 1.732283!
Me.txtFrachtfuehrer_Bar_BelegNr2.Width = 1.574803!
'
'txtFrachtfuehrer_Bar_Betrag2
'
Me.txtFrachtfuehrer_Bar_Betrag2.CanGrow = False
Me.txtFrachtfuehrer_Bar_Betrag2.DistinctField = ""
Me.txtFrachtfuehrer_Bar_Betrag2.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_Betrag2.Left = 6.692914!
Me.txtFrachtfuehrer_Bar_Betrag2.Name = "txtFrachtfuehrer_Bar_Betrag2"
Me.txtFrachtfuehrer_Bar_Betrag2.Style = resources.GetString("txtFrachtfuehrer_Bar_Betrag2.Style")
Me.txtFrachtfuehrer_Bar_Betrag2.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_Betrag2.Text = "0"
Me.txtFrachtfuehrer_Bar_Betrag2.Top = 1.732284!
Me.txtFrachtfuehrer_Bar_Betrag2.Width = 1.259843!
'
'txtFrachtfuehrer_Bar_BelegNr3
'
Me.txtFrachtfuehrer_Bar_BelegNr3.CanGrow = False
Me.txtFrachtfuehrer_Bar_BelegNr3.DistinctField = ""
Me.txtFrachtfuehrer_Bar_BelegNr3.Height = 0.242126!
Me.txtFrachtfuehrer_Bar_BelegNr3.Left = 5.118111!
Me.txtFrachtfuehrer_Bar_BelegNr3.Name = "txtFrachtfuehrer_Bar_BelegNr3"
Me.txtFrachtfuehrer_Bar_BelegNr3.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtFrachtfuehrer_Bar_BelegNr3.Style = resources.GetString("txtFrachtfuehrer_Bar_BelegNr3.Style")
Me.txtFrachtfuehrer_Bar_BelegNr3.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_BelegNr3.Text = "TEST"
Me.txtFrachtfuehrer_Bar_BelegNr3.Top = 1.952756!
Me.txtFrachtfuehrer_Bar_BelegNr3.Width = 1.574803!
'
'txtFrachtfuehrer_Bar_Betrag3
'
Me.txtFrachtfuehrer_Bar_Betrag3.CanGrow = False
Me.txtFrachtfuehrer_Bar_Betrag3.DistinctField = ""
Me.txtFrachtfuehrer_Bar_Betrag3.Height = 0.242126!
Me.txtFrachtfuehrer_Bar_Betrag3.Left = 6.692914!
Me.txtFrachtfuehrer_Bar_Betrag3.Name = "txtFrachtfuehrer_Bar_Betrag3"
Me.txtFrachtfuehrer_Bar_Betrag3.Style = resources.GetString("txtFrachtfuehrer_Bar_Betrag3.Style")
Me.txtFrachtfuehrer_Bar_Betrag3.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_Betrag3.Text = "0"
Me.txtFrachtfuehrer_Bar_Betrag3.Top = 1.952756!
Me.txtFrachtfuehrer_Bar_Betrag3.Width = 1.259832!
'
'txtLkwId
'
Me.txtLkwId.CanGrow = False
Me.txtLkwId.DistinctField = ""
Me.txtLkwId.Height = 0.1574803!
Me.txtLkwId.Left = 1.308268!
Me.txtLkwId.Name = "txtLkwId"
Me.txtLkwId.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtLkwId.Style = resources.GetString("txtLkwId.Style")
Me.txtLkwId.SummaryGroup = ""
Me.txtLkwId.Text = "1234567"
Me.txtLkwId.Top = 0.6244095!
Me.txtLkwId.Visible = False
Me.txtLkwId.Width = 1.193306!
'
'txtAusgangsZst_1
'
Me.txtAusgangsZst_1.CanGrow = False
Me.txtAusgangsZst_1.DistinctField = ""
Me.txtAusgangsZst_1.Height = 0.1574803!
Me.txtAusgangsZst_1.Left = 0.8543308!
Me.txtAusgangsZst_1.Name = "txtAusgangsZst_1"
Me.txtAusgangsZst_1.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_1.Style = resources.GetString("txtAusgangsZst_1.Style")
Me.txtAusgangsZst_1.SummaryGroup = ""
Me.txtAusgangsZst_1.Text = "X"
Me.txtAusgangsZst_1.Top = 4.589764!
Me.txtAusgangsZst_1.Width = 0.1574803!
'
'txtAusgangsZst_5
'
Me.txtAusgangsZst_5.CanGrow = False
Me.txtAusgangsZst_5.DistinctField = ""
Me.txtAusgangsZst_5.Height = 0.1574803!
Me.txtAusgangsZst_5.Left = 0.8543308!
Me.txtAusgangsZst_5.Name = "txtAusgangsZst_5"
Me.txtAusgangsZst_5.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_5.Style = resources.GetString("txtAusgangsZst_5.Style")
Me.txtAusgangsZst_5.SummaryGroup = ""
Me.txtAusgangsZst_5.Text = "X"
Me.txtAusgangsZst_5.Top = 5.262993!
Me.txtAusgangsZst_5.Width = 0.1574803!
'
'txtZA_1
'
Me.txtZA_1.CanGrow = False
Me.txtZA_1.DistinctField = ""
Me.txtZA_1.Height = 0.2854335!
Me.txtZA_1.Left = 0.9358268!
Me.txtZA_1.Name = "txtZA_1"
Me.txtZA_1.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_1.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_1.SummaryGroup = ""
Me.txtZA_1.Text = "DZST"
Me.txtZA_1.Top = 5.918898!
Me.txtZA_1.Width = 3.967717!
'
'txtZA_2
'
Me.txtZA_2.CanGrow = False
Me.txtZA_2.DistinctField = ""
Me.txtZA_2.Height = 0.2854335!
Me.txtZA_2.Left = 0.9358268!
Me.txtZA_2.Name = "txtZA_2"
Me.txtZA_2.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_2.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_2.SummaryGroup = ""
Me.txtZA_2.Text = "DZST"
Me.txtZA_2.Top = 6.246063!
Me.txtZA_2.Width = 3.967717!
'
'txtZA_3
'
Me.txtZA_3.CanGrow = False
Me.txtZA_3.DistinctField = ""
Me.txtZA_3.Height = 0.2854335!
Me.txtZA_3.Left = 0.9358268!
Me.txtZA_3.Name = "txtZA_3"
Me.txtZA_3.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_3.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_3.SummaryGroup = ""
Me.txtZA_3.Text = "DZST"
Me.txtZA_3.Top = 6.555119!
Me.txtZA_3.Width = 3.967717!
'
'txtZA_4
'
Me.txtZA_4.CanGrow = False
Me.txtZA_4.DistinctField = ""
Me.txtZA_4.Height = 0.2854335!
Me.txtZA_4.Left = 0.9358268!
Me.txtZA_4.Name = "txtZA_4"
Me.txtZA_4.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_4.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_4.SummaryGroup = ""
Me.txtZA_4.Text = "DZST"
Me.txtZA_4.Top = 6.897244!
Me.txtZA_4.Width = 3.967717!
'
'txtZA_5
'
Me.txtZA_5.CanGrow = False
Me.txtZA_5.DistinctField = ""
Me.txtZA_5.Height = 0.2854335!
Me.txtZA_5.Left = 0.9358268!
Me.txtZA_5.Name = "txtZA_5"
Me.txtZA_5.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_5.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_5.SummaryGroup = ""
Me.txtZA_5.Text = "DZST"
Me.txtZA_5.Top = 7.232284!
Me.txtZA_5.Width = 3.967717!
'
'txtAusgangsZst_2
'
Me.txtAusgangsZst_2.CanGrow = False
Me.txtAusgangsZst_2.DistinctField = ""
Me.txtAusgangsZst_2.Height = 0.1574803!
Me.txtAusgangsZst_2.Left = 0.8543307!
Me.txtAusgangsZst_2.Name = "txtAusgangsZst_2"
Me.txtAusgangsZst_2.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_2.Style = resources.GetString("txtAusgangsZst_2.Style")
Me.txtAusgangsZst_2.SummaryGroup = ""
Me.txtAusgangsZst_2.Text = "X"
Me.txtAusgangsZst_2.Top = 4.759054!
Me.txtAusgangsZst_2.Width = 0.1574803!
'
'txtAusgangsZst_3
'
Me.txtAusgangsZst_3.CanGrow = False
Me.txtAusgangsZst_3.DistinctField = ""
Me.txtAusgangsZst_3.Height = 0.1574803!
Me.txtAusgangsZst_3.Left = 0.8543308!
Me.txtAusgangsZst_3.Name = "txtAusgangsZst_3"
Me.txtAusgangsZst_3.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_3.Style = resources.GetString("txtAusgangsZst_3.Style")
Me.txtAusgangsZst_3.SummaryGroup = ""
Me.txtAusgangsZst_3.Text = "X"
Me.txtAusgangsZst_3.Top = 4.932284!
Me.txtAusgangsZst_3.Width = 0.1574803!
'
'txtAusgangsZst_4
'
Me.txtAusgangsZst_4.CanGrow = False
Me.txtAusgangsZst_4.DistinctField = ""
Me.txtAusgangsZst_4.Height = 0.1574803!
Me.txtAusgangsZst_4.Left = 0.8543308!
Me.txtAusgangsZst_4.Name = "txtAusgangsZst_4"
Me.txtAusgangsZst_4.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_4.Style = resources.GetString("txtAusgangsZst_4.Style")
Me.txtAusgangsZst_4.SummaryGroup = ""
Me.txtAusgangsZst_4.Text = "X"
Me.txtAusgangsZst_4.Top = 5.097634!
Me.txtAusgangsZst_4.Width = 0.1574803!
'
'txtAusgangsZst_6
'
Me.txtAusgangsZst_6.CanGrow = False
Me.txtAusgangsZst_6.DistinctField = ""
Me.txtAusgangsZst_6.Height = 0.1574803!
Me.txtAusgangsZst_6.Left = 2.964567!
Me.txtAusgangsZst_6.Name = "txtAusgangsZst_6"
Me.txtAusgangsZst_6.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_6.Style = resources.GetString("txtAusgangsZst_6.Style")
Me.txtAusgangsZst_6.SummaryGroup = ""
Me.txtAusgangsZst_6.Text = "X"
Me.txtAusgangsZst_6.Top = 4.589764!
Me.txtAusgangsZst_6.Width = 0.1574803!
'
'txtAusgangsZst_9
'
Me.txtAusgangsZst_9.CanGrow = False
Me.txtAusgangsZst_9.DistinctField = ""
Me.txtAusgangsZst_9.Height = 0.1574803!
Me.txtAusgangsZst_9.Left = 2.964567!
Me.txtAusgangsZst_9.Name = "txtAusgangsZst_9"
Me.txtAusgangsZst_9.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_9.Style = resources.GetString("txtAusgangsZst_9.Style")
Me.txtAusgangsZst_9.SummaryGroup = ""
Me.txtAusgangsZst_9.Text = "X"
Me.txtAusgangsZst_9.Top = 5.211813!
Me.txtAusgangsZst_9.Width = 0.1574803!
'
'txtAusgangsZst_7
'
Me.txtAusgangsZst_7.CanGrow = False
Me.txtAusgangsZst_7.DistinctField = ""
Me.txtAusgangsZst_7.Height = 0.1574803!
Me.txtAusgangsZst_7.Left = 2.964567!
Me.txtAusgangsZst_7.Name = "txtAusgangsZst_7"
Me.txtAusgangsZst_7.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_7.Style = resources.GetString("txtAusgangsZst_7.Style")
Me.txtAusgangsZst_7.SummaryGroup = ""
Me.txtAusgangsZst_7.Text = "X"
Me.txtAusgangsZst_7.Top = 4.759054!
Me.txtAusgangsZst_7.Width = 0.1574803!
'
'txtAusgangsZst_8
'
Me.txtAusgangsZst_8.CanGrow = False
Me.txtAusgangsZst_8.DistinctField = ""
Me.txtAusgangsZst_8.Height = 0.1574803!
Me.txtAusgangsZst_8.Left = 2.964567!
Me.txtAusgangsZst_8.Name = "txtAusgangsZst_8"
Me.txtAusgangsZst_8.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_8.Style = resources.GetString("txtAusgangsZst_8.Style")
Me.txtAusgangsZst_8.SummaryGroup = ""
Me.txtAusgangsZst_8.Text = "X"
Me.txtAusgangsZst_8.Top = 4.932284!
Me.txtAusgangsZst_8.Width = 0.1574803!
'
'txtTransportTemp
'
Me.txtTransportTemp.CanGrow = False
Me.txtTransportTemp.Height = 0.2204724!
Me.txtTransportTemp.Left = 3.691339!
Me.txtTransportTemp.Name = "txtTransportTemp"
Me.txtTransportTemp.Style = "font-size: 13pt; font-weight: bold; text-align: center; ddo-char-set: 1"
Me.txtTransportTemp.Text = "-4 bis +8"
Me.txtTransportTemp.Top = 1.751575!
Me.txtTransportTemp.Width = 1.23189!
'
'cbxZugMaschine
'
Me.cbxZugMaschine.CanGrow = False
Me.cbxZugMaschine.DistinctField = ""
Me.cbxZugMaschine.Height = 0.1574803!
Me.cbxZugMaschine.Left = 3.46378!
Me.cbxZugMaschine.Name = "cbxZugMaschine"
Me.cbxZugMaschine.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.cbxZugMaschine.Style = resources.GetString("cbxZugMaschine.Style")
Me.cbxZugMaschine.SummaryGroup = ""
Me.cbxZugMaschine.Text = "X"
Me.cbxZugMaschine.Top = 1.039764!
Me.cbxZugMaschine.Visible = False
Me.cbxZugMaschine.Width = 0.1574802!
'
'cbxTransportTemp
'
Me.cbxTransportTemp.CanGrow = False
Me.cbxTransportTemp.DistinctField = ""
Me.cbxTransportTemp.Height = 0.1574803!
Me.cbxTransportTemp.Left = 3.71378!
Me.cbxTransportTemp.Name = "cbxTransportTemp"
Me.cbxTransportTemp.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.cbxTransportTemp.Style = resources.GetString("cbxTransportTemp.Style")
Me.cbxTransportTemp.SummaryGroup = ""
Me.cbxTransportTemp.Text = "X"
Me.cbxTransportTemp.Top = 1.822835!
Me.cbxTransportTemp.Width = 0.1574803!
'
'txtAndereAusgangsstelle
'
Me.txtAndereAusgangsstelle.CanGrow = False
Me.txtAndereAusgangsstelle.Height = 0.3881895!
Me.txtAndereAusgangsstelle.Left = 3.225197!
Me.txtAndereAusgangsstelle.Name = "txtAndereAusgangsstelle"
Me.txtAndereAusgangsstelle.Style = "font-size: 10pt; font-weight: bold; text-align: left; vertical-align: middle; ddo" & _
"-char-set: 1"
Me.txtAndereAusgangsstelle.Text = "XXX"
Me.txtAndereAusgangsstelle.Top = 5.044094!
Me.txtAndereAusgangsstelle.Width = 1.803937!
'
'txtZugMaschine
'
Me.txtZugMaschine.CanGrow = False
Me.txtZugMaschine.DistinctField = ""
Me.txtZugMaschine.Height = 0.4952756!
Me.txtZugMaschine.Left = 3.213386!
Me.txtZugMaschine.Name = "txtZugMaschine"
Me.txtZugMaschine.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZugMaschine.Style = "color: Black; font-size: 12pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZugMaschine.SummaryGroup = ""
Me.txtZugMaschine.Text = "34 TR 45454"
Me.txtZugMaschine.Top = 0.2334646!
Me.txtZugMaschine.Width = 1.803937!
'
'rptSendungenATILLA
'
Me.MasterReport = False
Me.MaxPages = CType(1, Long)
Me.PageSettings.Margins.Bottom = 0.0!
Me.PageSettings.Margins.Left = 0.0!
Me.PageSettings.Margins.Right = 0.0!
Me.PageSettings.Margins.Top = 0.0!
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 8.267716!
Me.Sections.Add(Me.Detail)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & _
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & _
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.Picture, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAnmerkungen, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFilialeNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbfertigungsnummer, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Firma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_KdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAvisierer_Firma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAvisierer_KdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAuftraggeber_Firma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAuftraggeber_KdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLKWKennzeichen, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAnkunft, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbfahrt, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtWarenbezeichnung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeLKW, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeSendung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtIRAN_CMR_Agent, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLkwId, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtTransportTemp, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.cbxZugMaschine, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.cbxTransportTemp, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAndereAusgangsstelle, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZugMaschine, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents txtFilialeNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbfertigungsnummer As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Firma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_KdNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAvisierer_Firma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAvisierer_KdNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAuftraggeber_Firma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAuftraggeber_KdNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_BelegNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_Betrag As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtLKWKennzeichen As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAnkunft As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbfahrt As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtWarenbezeichnung As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtColli As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtGewicht As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAnmerkungen As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeLKW As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeSendung As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents TextBox2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtIRAN_CMR_Agent As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents SubReport As GrapeCity.ActiveReports.SectionReportModel.SubReport
Private WithEvents txtFrachtfuehrer_Bar_BelegNr2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_Betrag2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_BelegNr3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_Betrag3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtLkwId As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents Picture As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents txtAusgangsZst_1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_5 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_4 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_5 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_4 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_6 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_9 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_7 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtTransportTemp As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents cbxZugMaschine As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents cbxTransportTemp As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAndereAusgangsstelle As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZugMaschine As GrapeCity.ActiveReports.SectionReportModel.TextBox
End Class

248
Gemeinsames/ARConverterBackup3/rptSendungenATILLA.vb Normal file
View File

@@ -0,0 +1,248 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class rptSendungenATILLA
Public VALUES As New rptSendungenValuesATILLA
Public imgPath As String
Sub New()
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Sub New(VALUES As rptSendungenValuesATILLA, imgPath As String)
InitializeComponent()
Me.VALUES = VALUES
Me.imgPath = imgPath
init()
End Sub
Public Sub init()
' txtAbfertigungsart.Text = VALUES.Abfertigungsart
' txtTarifposanzahl.Text = VALUES.Tarifposanzahl
txtLkwId.Text = VALUES.AvisoId
txtFilialeNr.Text = VALUES.FilialeNr
txtAbfertigungsnummer.Text = VALUES.Abfertigungsnummer
txtFrachtfuehrer_Firma.Text = VALUES.Frachtfuehrer_Firma
txtFrachtfuehrer_KdNr.Text = VALUES.Frachtfuehrer_KdNr
txtAvisierer_Firma.Text = VALUES.Avisierer_Firma
txtAvisierer_KdNr.Text = VALUES.Avisierer_KdNr
txtAuftraggeber_Firma.Text = VALUES.Auftraggeber_Firma
txtAuftraggeber_KdNr.Text = VALUES.Auftraggeber_KdNr
' txtAbsender_Firma.Text = VALUES.Absender_Firma
'txtAbsender_KdNr.Text = VALUES.Absender_KdNr
'txtEmpfaenger_Firma.Text = VALUES.Empfaenger_Firma
'txtEmpfaenger_KdNr.Text = VALUES.Empfaenger_KdNr
txtIRAN_CMR_Agent.Text = VALUES.IRAN_CMR_Agent
txtFrachtfuehrer_Bar_BelegNr.Text = VALUES.Frachtfuehrer_Bar_BelegNr
txtFrachtfuehrer_Bar_Betrag.Text = VALUES.Frachtfuehrer_Bar_Betrag
txtFrachtfuehrer_Bar_BelegNr2.Text = VALUES.Frachtfuehrer_Bar_BelegNr2
txtFrachtfuehrer_Bar_Betrag2.Text = VALUES.Frachtfuehrer_Bar_Betrag2
txtFrachtfuehrer_Bar_BelegNr3.Text = VALUES.Frachtfuehrer_Bar_BelegNr3
txtFrachtfuehrer_Bar_Betrag3.Text = VALUES.Frachtfuehrer_Bar_Betrag3
txtLKWKennzeichen.Text = VALUES.LKWKennzeichen
txtAnkunft.Text = VALUES.Ankunft
txtAbfahrt.Text = VALUES.Abfahrt
txtWarenbezeichnung.Text = VALUES.Warenbezeichnung
txtColli.Text = VALUES.Colli
txtGewicht.Text = VALUES.Gewicht
' txtAufschub_VERAG.Text = VALUES.Aufschub_VERAG
' rtbAbfKost.Text = VALUES.AbfKost--> Mit Sub Report gel<65>st
' txtDokZuSend_Ueberschrift.Text = VALUES.DokZuSend_Ueberschrift
' txtDokZuSend_Text.Text = VALUES.DokZuSend_Text
txtAnmerkungen.Text = VALUES.Anmerkungen
' txtBARzuKassieren.Text = VALUES.BARzuKassieren
txtLKWKennzeichen.Text = VALUES.LKWKennzeichen
txtZA_1.Text = VALUES.ZA_1
txtZA_2.Text = VALUES.ZA_2
txtZA_3.Text = VALUES.ZA_3
txtZA_4.Text = VALUES.ZA_4
txtZA_5.Text = VALUES.ZA_5
txtAusgangsZst_1.Text = VALUES.AusgangsZst_1
txtAusgangsZst_2.Text = VALUES.AusgangsZst_2
txtAusgangsZst_3.Text = VALUES.AusgangsZst_3
txtAusgangsZst_4.Text = VALUES.AusgangsZst_4
txtAusgangsZst_5.Text = VALUES.AusgangsZst_5
txtAusgangsZst_6.Text = VALUES.AusgangsZst_6
txtAusgangsZst_7.Text = VALUES.AusgangsZst_7
txtAusgangsZst_8.Text = VALUES.AusgangsZst_8
txtAusgangsZst_9.Text = VALUES.AusgangsZst_9
txtAndereAusgangsstelle.Text = VALUES.AndereAusgangsstelle
txtZugMaschine.Text = VALUES.Zugmaschine
cbxZugMaschine.Text = VALUES.ZugmaschineCBX
txtTransportTemp.Text = VALUES.Transporttemperatur
cbxTransportTemp.Text = VALUES.TransporttemperaturCBX
barcodeLKW.Image = If(VALUES.barcodeLKW, Nothing)
barcodeSendung.Image = If(VALUES.barcodeSendung, Nothing)
'OFFERTE!
If False Then
If VALUES.AbfKostKdnr > 0 Then
Dim s = New subRptSendungenOfferte(VALUES.ABF_ART, VALUES.AbfKostKdnr)
SubReport.Report = s
End If
End If
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
' Dim bm As New Bitmap(imgPath)
' Me.Picture.Image = bm
End Sub
Private Sub rptSendungen_PageStart(sender As Object, e As EventArgs) Handles Me.PageStart
' Me.Document.CacheToDisk = True
End Sub
Private Sub rptSendungen_ReportEnd(sender As Object, e As EventArgs) Handles Me.ReportEnd
GC.Collect()
End Sub
Private Sub rptSendungenATILLA_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
End Sub
End Class
Public Class rptSendungenValuesATILLA
Property AvisoId As String = ""
Property Abfertigungsart As String = ""
Property Tarifposanzahl As String = ""
Property FilialeNr As String = ""
Property Abfertigungsnummer As String = ""
Property Avisierer_Firma As String = ""
Property Avisierer_KdNr As String = ""
Property Auftraggeber_Firma As String = ""
Property Auftraggeber_KdNr As String = ""
Property Empfaenger_Firma As String = ""
Property Empfaenger_KdNr As String = ""
Property Absender_Firma As String = ""
Property Absender_KdNr As String = ""
Property Frachtfuehrer_Firma As String = ""
Property Frachtfuehrer_KdNr As String = ""
Property Avisierer_Zoll As String = ""
Property Avisierer_Eust As String = ""
Property Avisierer_Abf As String = ""
Property Avisierer_Clear As String = ""
Property Auftraggeber_Zoll As String = ""
Property Auftraggeber_Eust As String = ""
Property Auftraggeber_Abf As String = ""
Property Auftraggeber_Clear As String = ""
Property Empfaenger_Zoll As String = ""
Property Empfaenger_Eust As String = ""
Property Empfaenger_Abf As String = ""
Property Empfaenger_Clear As String = ""
Property Absender_Zoll As String = ""
Property Absender_Eust As String = ""
Property Absender_Abf As String = ""
Property Absender_Clear As String = ""
Property Frachtfuehrer_Zoll As String = ""
Property Frachtfuehrer_Eust As String = ""
Property Frachtfuehrer_Abf As String = ""
Property Frachtfuehrer_Clear As String = ""
Property Avisierer_Leistung1 As String = ""
Property Avisierer_Betrag1 As String = ""
Property Avisierer_Leistung2 As String = ""
Property Avisierer_Betrag2 As String = ""
Property Avisierer_Leistung3 As String = ""
Property Avisierer_Betrag3 As String = ""
Property Auftraggeber_Leistung1 As String = ""
Property Auftraggeber_Betrag As String = ""
Property Auftraggeber_Leistung2 As String = ""
Property Auftraggeber_Betrag2 As String = ""
Property Auftraggeber_Leistung3 As String = ""
Property Auftraggeber_Betrag3 As String = ""
Property Empfaenger_Leistung1 As String = ""
Property Empfaenger_Betrag1 As String = ""
Property Empfaenger_Leistung2 As String = ""
Property Empfaenger_Betrag2 As String = ""
Property Empfaenger_Leistung3 As String = ""
Property Empfaenger_Betrag3 As String = ""
Property Absender_Leistung1 As String = ""
Property Absender_Betrag1 As String = ""
Property Absender_Leistung2 As String = ""
Property Absender_Betrag2 As String = ""
Property Absender_Leistung3 As String = ""
Property Absender_Betrag3 As String = ""
Property Frachtfuehrer_Leistung1 As String = ""
Property Frachtfuehrer_Betrag1 As String = ""
Property Frachtfuehrer_Leistung2 As String = ""
Property Frachtfuehrer_Betrag2 As String = ""
Property Frachtfuehrer_Leistung3 As String = ""
Property Frachtfuehrer_Betrag3 As String = ""
Property Frachtfuehrer_Bar_BelegNr As String = ""
Property Frachtfuehrer_Bar_Betrag As String = ""
Property Frachtfuehrer_Bar_BelegNr2 As String = ""
Property Frachtfuehrer_Bar_Betrag2 As String = ""
Property Frachtfuehrer_Bar_BelegNr3 As String = ""
Property Frachtfuehrer_Bar_Betrag3 As String = ""
Property IRAN_CMR_Agent As String = ""
Property Avisierer_eigBin As String = ""
Property Auftraggeber_eigBin As String = ""
Property Empfaenger_eigBIN As String = ""
Property Absender_eigBIN As String = ""
Property Frachtfuehrer_eigBIN As String = ""
Property LKWKennzeichen As String = ""
Property Ankunft As String = ""
Property Abfahrt As String = ""
Property Warenbezeichnung As String = ""
Property Colli As String = ""
Property Gewicht As String = ""
Property Aufschub_VERAG As String = ""
Property DokZuSend_Ueberschrift As String = ""
Property DokZuSend_Text As String = ""
Property Anmerkungen As String = ""
' Property BAR As String = ""
Property BARzuKassieren As String = ""
Property ABTEILUNG As String = ""
Property NCTS_VZAdr As String = ""
Property FISKAL_ENDEMPF As String = ""
Property ABF_ART As Integer = -1
Property barcodeLKW As Image = Nothing
Property barcodeSendung As Image = Nothing
Property AbfKost As String = ""
Property AbfKostKdnr As Integer = -1
Property ZA_1 As String = ""
Property ZA_2 As String = ""
Property ZA_3 As String = ""
Property ZA_4 As String = ""
Property ZA_5 As String = ""
Property AusgangsZst_1 As String = ""
Property AusgangsZst_2 As String = ""
Property AusgangsZst_3 As String = ""
Property AusgangsZst_4 As String = ""
Property AusgangsZst_5 As String = ""
Property AusgangsZst_6 As String = ""
Property AusgangsZst_7 As String = ""
Property AusgangsZst_8 As String = ""
Property AusgangsZst_9 As String = ""
Property AndereAusgangsstelle As String = ""
Property Zugmaschine As String = ""
Property ZugmaschineCBX As String = ""
Property Transporttemperatur As String = ""
Property TransporttemperaturCBX As String = ""
End Class

136
Gemeinsames/ARConverterBackup3/subRptSendungenATA.Designer.vb generated Normal file
View File

@@ -0,0 +1,136 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class subRptSendungenATA
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenATA))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.TextBox8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtATCMRN = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeATCMRN = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.txtColli = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtGewicht = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox8, Me.txtATCMRN, Me.barcodeATCMRN, Me.txtColli, Me.txtGewicht})
Me.Detail.Height = 0.2665355!
Me.Detail.Name = "Detail"
'
'TextBox8
'
Me.TextBox8.CanGrow = False
Me.TextBox8.Height = 0.1456693!
Me.TextBox8.Left = 0.00000005960464!
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.Style = "font-size: 8pt; ddo-char-set: 1"
Me.TextBox8.Text = "ATA/MRN:"
Me.TextBox8.Top = 0!
Me.TextBox8.Width = 0.8811023!
'
'txtATCMRN
'
Me.txtATCMRN.CanGrow = False
Me.txtATCMRN.Height = 0.1913386!
Me.txtATCMRN.Left = 0.7059056!
Me.txtATCMRN.Name = "txtATCMRN"
Me.txtATCMRN.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtATCMRN.Text = Nothing
Me.txtATCMRN.Top = 0.07519685!
Me.txtATCMRN.Width = 1.582284!
'
'barcodeATCMRN
'
Me.barcodeATCMRN.Height = 0.1027552!
Me.barcodeATCMRN.HyperLink = Nothing
Me.barcodeATCMRN.ImageData = Nothing
Me.barcodeATCMRN.Left = 0.622441!
Me.barcodeATCMRN.Name = "barcodeATCMRN"
Me.barcodeATCMRN.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.BottomLeft
Me.barcodeATCMRN.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeATCMRN.Top = 0!
Me.barcodeATCMRN.Width = 3.409448!
'
'txtColli
'
Me.txtColli.CanGrow = False
Me.txtColli.Height = 0.1456693!
Me.txtColli.Left = 2.744882!
Me.txtColli.Name = "txtColli"
Me.txtColli.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.txtColli.Text = Nothing
Me.txtColli.Top = 0!
Me.txtColli.Width = 0.4822836!
'
'txtGewicht
'
Me.txtGewicht.CanGrow = False
Me.txtGewicht.Height = 0.1456693!
Me.txtGewicht.Left = 3.227166!
Me.txtGewicht.Name = "txtGewicht"
Me.txtGewicht.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.txtGewicht.Text = Nothing
Me.txtGewicht.Top = 0!
Me.txtGewicht.Width = 0.7421253!
'
'GroupHeader1
'
Me.GroupHeader1.Height = 0!
Me.GroupHeader1.Name = "GroupHeader1"
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'subRptSendungenATA
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 4.03189!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
Private WithEvents TextBox8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtATCMRN As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeATCMRN As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents txtColli As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtGewicht As GrapeCity.ActiveReports.SectionReportModel.TextBox
End Class

69
Gemeinsames/ARConverterBackup3/subRptSendungenATA.vb Normal file
View File

@@ -0,0 +1,69 @@
Imports System.Data
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports VERAG_PROG_ALLGEMEIN
Imports SDL
Public Class subRptSendungenATA
Dim HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling) = Nothing
Sub New(HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling))
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.HANDLING = HANDLING
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
'If HANDLING IsNot Nothing Then
' 'Dim A As New DAKOSY_Worker.cZollsysteme_Aktenbeschriftung
' 'If A.getDataByBezugsnummer(SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr, SENDUNG.tblSnd_Abfertigungsart_ID.ToString) Then
' txtColli.Text = HANDLING.sndhdg_colli.ToString("N0") & " Pk"
' txtGewicht.Text = HANDLING.sndhdg_gewicht.ToString("N1") & " Pk"
' txtATCMRN.Text = HANDLING.sndhdg_nr
' If HANDLING.sndhdg_nr <> "" Then
' barcodeATCMRN.Image = Code128Rendering.MakeBarcodeImage(HANDLING.sndhdg_nr, 1, True, 15)
' End If
'End If
barcodeATCMRN.Visible = False
txtATCMRN.Text = ""
If Me.DataSource IsNot Nothing AndAlso Me.Fields IsNot Nothing AndAlso Me.Fields.Item("ATA").Value IsNot Nothing Then
Dim ATAMRN As String = Me.Fields.Item("ATA").Value.ToString
ATAMRN = ATAMRN.Replace(" ", "")
ATAMRN = ATAMRN.Replace("/", "")
ATAMRN = ATAMRN.Replace("-", "")
txtATCMRN.Text = ATAMRN
If ATAMRN <> "" Then
Dim barcodeATA As Image = Code128Rendering.MakeBarcodeImage(ATAMRN, 1, True, 15)
'barcodeATA.RotateFlip(RotateFlipType.Rotate270FlipNone)
barcodeATCMRN.Image = barcodeATA
barcodeATCMRN.Visible = True
End If
txtColli.Text = ""
txtGewicht.Text = ""
If Me.Fields.Item("Colli").Value IsNot Nothing Then txtColli.Text = CDbl(Me.Fields.Item("Colli").Value).ToString("N0") & " Pk"
If Me.Fields.Item("Gewicht").Value IsNot Nothing Then txtGewicht.Text = CDbl(Me.Fields.Item("Gewicht").Value).ToString("N1") & " kg"
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
Dim dt As New DataTable
dt.Columns.Add("ATA", System.Type.GetType("System.String"))
dt.Columns.Add("Colli", System.Type.GetType("System.String"))
dt.Columns.Add("Gewicht", System.Type.GetType("System.String"))
For Each s In HANDLING
dt.Rows.Add({s.sndhdg_nr, s.sndhdg_colli, s.sndhdg_gewicht})
Next
Me.DataSource = dt
End Sub
End Class

116
Gemeinsames/ARConverterBackup3/subRptSendungenOfferte.Designer.vb generated Normal file
View File

@@ -0,0 +1,116 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class subRptSendungenOfferte
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenOfferte))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.txtLeistungsNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLeistungsBez = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtPreis = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.txtOfferte = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
CType(Me.txtLeistungsNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLeistungsBez, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtOfferte, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtLeistungsNr, Me.txtLeistungsBez, Me.txtPreis})
Me.Detail.Height = 0.168504!
Me.Detail.Name = "Detail"
'
'txtLeistungsNr
'
Me.txtLeistungsNr.CanGrow = False
Me.txtLeistungsNr.Height = 0.168504!
Me.txtLeistungsNr.Left = 0.00000009685755!
Me.txtLeistungsNr.Name = "txtLeistungsNr"
Me.txtLeistungsNr.Top = 0.0!
Me.txtLeistungsNr.Width = 0.281496!
'
'txtLeistungsBez
'
Me.txtLeistungsBez.CanGrow = False
Me.txtLeistungsBez.Height = 0.168504!
Me.txtLeistungsBez.Left = 0.2814961!
Me.txtLeistungsBez.Name = "txtLeistungsBez"
Me.txtLeistungsBez.Text = Nothing
Me.txtLeistungsBez.Top = 0.0!
Me.txtLeistungsBez.Width = 2.262599!
'
'txtPreis
'
Me.txtPreis.CanGrow = False
Me.txtPreis.Height = 0.168504!
Me.txtPreis.Left = 2.544095!
Me.txtPreis.Name = "txtPreis"
Me.txtPreis.Style = "text-align: right"
Me.txtPreis.Top = 0.0!
Me.txtPreis.Width = 0.8023622!
'
'GroupHeader1
'
Me.GroupHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtOfferte})
Me.GroupHeader1.Height = 0.1688976!
Me.GroupHeader1.Name = "GroupHeader1"
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0.0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'txtOfferte
'
Me.txtOfferte.Height = 0.1688976!
Me.txtOfferte.Left = 0.0!
Me.txtOfferte.Name = "txtOfferte"
Me.txtOfferte.Style = "font-weight: bold; text-decoration: underline"
Me.txtOfferte.Text = "Offerte:"
Me.txtOfferte.Top = 0.0!
Me.txtOfferte.Width = 2.645669!
'
'subRptSendungenOfferte
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 3.346457!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & _
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & _
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.txtLeistungsNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLeistungsBez, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtOfferte, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents txtLeistungsNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtLeistungsBez As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtPreis As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents txtOfferte As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
End Class

34
Gemeinsames/ARConverterBackup3/subRptSendungenOfferte.vb Normal file
View File

@@ -0,0 +1,34 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class subRptSendungenOfferte
Dim AbfKostKdnr As Integer
Dim ABF_ART As Integer
Sub New(ABF_ART As Integer, AbfKostKdnr As Integer)
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.ABF_ART = ABF_ART
Me.AbfKostKdnr = AbfKostKdnr
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
If Me.DataSource IsNot Nothing AndAlso Me.Fields IsNot Nothing Then
If Me.Fields.Item("LeistungsNr") IsNot Nothing AndAlso Me.Fields.Item("LeistungsNr").Value IsNot Nothing Then txtLeistungsNr.Text = Me.Fields.Item("LeistungsNr").Value.ToString
If Me.Fields.Item("LeistungsBez") IsNot Nothing AndAlso Me.Fields.Item("LeistungsBez").Value IsNot Nothing Then txtLeistungsBez.Text = Me.Fields.Item("LeistungsBez").Value.ToString
If Me.Fields.Item("Preis") IsNot Nothing AndAlso Me.Fields.Item("Preis").Value IsNot Nothing Then
txtPreis.Text = If(IsNumeric(Me.Fields.Item("Preis").Value.ToString), CDbl(Me.Fields.Item("Preis").Value.ToString).ToString("C2"), Me.Fields.Item("Preis").Value.ToString)
End If
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
If ABF_ART <= 0 Then Exit Sub
If AbfKostKdnr <= 0 Then Exit Sub
Me.DataSource = (New VERAG_PROG_ALLGEMEIN.SQL).loadDgvBySql("select isnull(LeistungsNr,'') as LeistungsNr,isnull(LeistungsBez,'' ) as LeistungsBez,isnull(Preis,'') as Preis FROM [Offertenpositionen] where KundenNr=" & AbfKostKdnr & " AND OffertenNr=(SELECT ISNULL(AO.ao_OffertenNr,-1) FROM tblAbfertigungsartOffertenstamm as AO WHERE AO.ao_Abfertigungsart='" & ABF_ART & "') and preis is not null order by LeistungsNr, Preis desc", "FMZOLL")
End Sub
End Class

167
Gemeinsames/ARConverterBackup3/subRptSendungenVorkosten.Designer.vb generated Normal file
View File

@@ -0,0 +1,167 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class subRptSendungenVorkosten
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenVorkosten))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.txtFirma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLeistung = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtPreis = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.TextBox10 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox11 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox12 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
CType(Me.txtFirma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLeistung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtFirma, Me.txtLeistung, Me.txtPreis})
Me.Detail.Height = 0.1665355!
Me.Detail.Name = "Detail"
'
'txtFirma
'
Me.txtFirma.CanGrow = False
Me.txtFirma.Height = 0.1665355!
Me.txtFirma.Left = 0!
Me.txtFirma.Name = "txtFirma"
Me.txtFirma.Style = "font-size: 9pt; ddo-char-set: 1"
Me.txtFirma.Text = "Firma"
Me.txtFirma.Top = 0!
Me.txtFirma.Width = 1.46063!
'
'txtLeistung
'
Me.txtLeistung.CanGrow = False
Me.txtLeistung.Height = 0.1665355!
Me.txtLeistung.Left = 1.46063!
Me.txtLeistung.Name = "txtLeistung"
Me.txtLeistung.Style = "font-size: 9pt; ddo-char-set: 1"
Me.txtLeistung.Text = "Leistung"
Me.txtLeistung.Top = 0!
Me.txtLeistung.Width = 1.527559!
'
'txtPreis
'
Me.txtPreis.CanGrow = False
Me.txtPreis.Height = 0.1665355!
Me.txtPreis.Left = 2.98819!
Me.txtPreis.Name = "txtPreis"
Me.txtPreis.Style = "font-size: 9pt; text-align: right; ddo-char-set: 1"
Me.txtPreis.Text = "Preis"
Me.txtPreis.Top = 0!
Me.txtPreis.Width = 0.9228347!
'
'GroupHeader1
'
Me.GroupHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox10, Me.TextBox11, Me.TextBox12, Me.TextBox1})
Me.GroupHeader1.Height = 0.4791666!
Me.GroupHeader1.Name = "GroupHeader1"
'
'TextBox10
'
Me.TextBox10.CanGrow = False
Me.TextBox10.Height = 0.1456693!
Me.TextBox10.Left = 0!
Me.TextBox10.Name = "TextBox10"
Me.TextBox10.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.TextBox10.Text = "Firma"
Me.TextBox10.Top = 0.2862205!
Me.TextBox10.Width = 1.46063!
'
'TextBox11
'
Me.TextBox11.CanGrow = False
Me.TextBox11.Height = 0.1456693!
Me.TextBox11.Left = 1.46063!
Me.TextBox11.Name = "TextBox11"
Me.TextBox11.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.TextBox11.Text = "Leistung"
Me.TextBox11.Top = 0.2862205!
Me.TextBox11.Width = 1.527559!
'
'TextBox12
'
Me.TextBox12.CanGrow = False
Me.TextBox12.Height = 0.1456693!
Me.TextBox12.Left = 2.988189!
Me.TextBox12.Name = "TextBox12"
Me.TextBox12.Style = "font-size: 9pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.TextBox12.Text = "Preis"
Me.TextBox12.Top = 0.2862205!
Me.TextBox12.Width = 0.9228347!
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'TextBox1
'
Me.TextBox1.CanGrow = False
Me.TextBox1.Height = 0.2393701!
Me.TextBox1.Left = 0!
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Style = "font-size: 10pt; font-weight: bold; text-align: left; text-decoration: underline;" &
" ddo-char-set: 1"
Me.TextBox1.Text = "Vorkosten"
Me.TextBox1.Top = 0!
Me.TextBox1.Width = 1.46063!
'
'subRptSendungenVorkosten
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 4.03189!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.txtFirma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLeistung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox11, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
Private WithEvents TextBox10 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox11 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox12 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtFirma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtLeistung As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtPreis As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
End Class

37
Gemeinsames/ARConverterBackup3/subRptSendungenVorkosten.vb Normal file
View File

@@ -0,0 +1,37 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports System.Data
Imports VERAG_PROG_ALLGEMEIN
Public Class subRptSendungenVorkosten
Dim VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten) = Nothing
Sub New(VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten))
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.VORKOSTEN = VORKOSTEN
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
txtFirma.Text = CStr(Me.Fields.Item("FIRMA").Value)
txtLeistung.Text = CStr(Me.Fields.Item("LEISTUNG").Value)
txtPreis.Text = CDbl(Me.Fields.Item("PREIS").Value).ToString("C2")
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
Dim dt As New DataTable
dt.Columns.Add("FIRMA", System.Type.GetType("System.String"))
dt.Columns.Add("LEISTUNG", System.Type.GetType("System.String"))
dt.Columns.Add("PREIS", System.Type.GetType("System.String"))
For Each s In VORKOSTEN
dt.Rows.Add({s.sndvk_Firma, s.sndvk_LeistungsBez, s.sndvk_Preis})
Next
Me.DataSource = dt
End Sub
End Class

404
Gemeinsames/ARConverterBackup3/subRptSendungenZollpruefung.Designer.vb generated Normal file
View File

@@ -0,0 +1,404 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class subRptSendungenZollpruefung
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenZollpruefung))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.TextBox3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox9 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtWarenbezeichung = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtColliGewichtPreis = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtATREUR1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtRg = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbgabenKto = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbsender = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtEmpfaenger = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAnmelder = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox7 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtVertreter = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtVerBestLandZst = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtPraefAufRef = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtSB = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.TextBox8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtATCMRN = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeATCMRN = New GrapeCity.ActiveReports.SectionReportModel.Picture()
CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtWarenbezeichung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtColliGewichtPreis, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtATREUR1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtRg, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbgabenKto, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbsender, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtEmpfaenger, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAnmelder, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtVertreter, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtVerBestLandZst, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtPraefAufRef, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtSB, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox3, Me.TextBox9, Me.TextBox1, Me.txtWarenbezeichung, Me.txtColliGewichtPreis, Me.txtATREUR1, Me.txtRg, Me.txtAbgabenKto, Me.TextBox2, Me.TextBox4, Me.TextBox5, Me.TextBox6, Me.txtAbsender, Me.txtEmpfaenger, Me.txtAnmelder, Me.TextBox7, Me.txtVertreter, Me.txtVerBestLandZst, Me.txtPraefAufRef, Me.txtSB, Me.TextBox8, Me.txtATCMRN, Me.barcodeATCMRN})
Me.Detail.Height = 2.218504!
Me.Detail.Name = "Detail"
'
'TextBox3
'
Me.TextBox3.CanGrow = False
Me.TextBox3.Height = 0.1456693!
Me.TextBox3.Left = 0!
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox3.Text = "Abgabenkto:"
Me.TextBox3.Top = 1.056299!
Me.TextBox3.Width = 0.9228347!
'
'TextBox9
'
Me.TextBox9.CanGrow = False
Me.TextBox9.Height = 0.1456693!
Me.TextBox9.Left = 0!
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox9.Text = "Pr<EFBFBD>f. auf Rg.:"
Me.TextBox9.Top = 0.91063!
Me.TextBox9.Width = 0.9228347!
'
'TextBox1
'
Me.TextBox1.CanGrow = False
Me.TextBox1.Height = 0.1456693!
Me.TextBox1.Left = 0!
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox1.Text = "ATR/EUR1:"
Me.TextBox1.Top = 0.6192915!
Me.TextBox1.Width = 0.9228347!
'
'txtWarenbezeichung
'
Me.txtWarenbezeichung.CanGrow = False
Me.txtWarenbezeichung.Height = 0.2535433!
Me.txtWarenbezeichung.Left = 0!
Me.txtWarenbezeichung.Name = "txtWarenbezeichung"
Me.txtWarenbezeichung.Style = "font-size: 8pt; ddo-char-set: 1"
Me.txtWarenbezeichung.Text = Nothing
Me.txtWarenbezeichung.Top = 0.168504!
Me.txtWarenbezeichung.Width = 4.03189!
'
'txtColliGewichtPreis
'
Me.txtColliGewichtPreis.Height = 0.1685039!
Me.txtColliGewichtPreis.Left = 0!
Me.txtColliGewichtPreis.Name = "txtColliGewichtPreis"
Me.txtColliGewichtPreis.Style = "font-weight: bold; text-align: left"
Me.txtColliGewichtPreis.Text = Nothing
Me.txtColliGewichtPreis.Top = 0!
Me.txtColliGewichtPreis.Width = 2.988189!
'
'txtATREUR1
'
Me.txtATREUR1.Height = 0.1456693!
Me.txtATREUR1.Left = 0.8811024!
Me.txtATREUR1.Name = "txtATREUR1"
Me.txtATREUR1.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtATREUR1.Text = Nothing
Me.txtATREUR1.Top = 0.6192912!
Me.txtATREUR1.Width = 3.150787!
'
'txtRg
'
Me.txtRg.Height = 0.1456693!
Me.txtRg.Left = 0.8811024!
Me.txtRg.Name = "txtRg"
Me.txtRg.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtRg.Text = Nothing
Me.txtRg.Top = 0.7649607!
Me.txtRg.Width = 3.150787!
'
'txtAbgabenKto
'
Me.txtAbgabenKto.Height = 0.1456693!
Me.txtAbgabenKto.Left = 0.8811024!
Me.txtAbgabenKto.Name = "txtAbgabenKto"
Me.txtAbgabenKto.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtAbgabenKto.Text = Nothing
Me.txtAbgabenKto.Top = 1.056299!
Me.txtAbgabenKto.Width = 3.150787!
'
'TextBox2
'
Me.TextBox2.CanGrow = False
Me.TextBox2.Height = 0.1456693!
Me.TextBox2.Left = 0!
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox2.Text = "Handels-Rg.:"
Me.TextBox2.Top = 0.7649607!
Me.TextBox2.Width = 0.9228347!
'
'TextBox4
'
Me.TextBox4.CanGrow = False
Me.TextBox4.Height = 0.1456693!
Me.TextBox4.Left = 0!
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox4.Text = "Absender:"
Me.TextBox4.Top = 1.266142!
Me.TextBox4.Width = 0.8811023!
Me.TextBox4.Visible = False
'
'TextBox5
'
Me.TextBox5.CanGrow = False
Me.TextBox5.Height = 0.1456693!
Me.TextBox5.Left = 0!
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox5.Text = "Empf<EFBFBD>nger:"
Me.TextBox5.Top = 1.411811!
Me.TextBox5.Width = 0.8811023!
'
'TextBox6
'
Me.TextBox6.CanGrow = False
Me.TextBox6.Height = 0.1456693!
Me.TextBox6.Left = 0!
Me.TextBox6.Name = "TextBox6"
Me.TextBox6.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox6.Text = "Anmelder:"
Me.TextBox6.Top = 1.55748!
Me.TextBox6.Width = 0.8811023!
'
'txtAbsender
'
Me.txtAbsender.CanGrow = False
Me.txtAbsender.Height = 0.1456693!
Me.txtAbsender.Left = 0.8811024!
Me.txtAbsender.Name = "txtAbsender"
Me.txtAbsender.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtAbsender.Text = Nothing
Me.txtAbsender.Top = 1.266143!
Me.txtAbsender.Width = 3.150787!
Me.txtAbsender.Visible = False
'
'txtEmpfaenger
'
Me.txtEmpfaenger.CanGrow = False
Me.txtEmpfaenger.Height = 0.1456693!
Me.txtEmpfaenger.Left = 0.8811024!
Me.txtEmpfaenger.Name = "txtEmpfaenger"
Me.txtEmpfaenger.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtEmpfaenger.Text = Nothing
Me.txtEmpfaenger.Top = 1.411811!
Me.txtEmpfaenger.Width = 3.150787!
'
'txtAnmelder
'
Me.txtAnmelder.CanGrow = False
Me.txtAnmelder.Height = 0.1456693!
Me.txtAnmelder.Left = 0.8811024!
Me.txtAnmelder.Name = "txtAnmelder"
Me.txtAnmelder.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtAnmelder.Text = Nothing
Me.txtAnmelder.Top = 1.55748!
Me.txtAnmelder.Width = 3.150787!
'
'TextBox7
'
Me.TextBox7.CanGrow = False
Me.TextBox7.Height = 0.1456693!
Me.TextBox7.Left = 0!
Me.TextBox7.Name = "TextBox7"
Me.TextBox7.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox7.Text = "Vertreter:"
Me.TextBox7.Top = 1.70315!
Me.TextBox7.Width = 0.8811023!
Me.TextBox7.Visible = False
'
'txtVertreter
'
Me.txtVertreter.CanGrow = False
Me.txtVertreter.Height = 0.1456693!
Me.txtVertreter.Left = 0.8811024!
Me.txtVertreter.Name = "txtVertreter"
Me.txtVertreter.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtVertreter.Text = Nothing
Me.txtVertreter.Top = 1.70315!
Me.txtVertreter.Width = 3.150787!
Me.txtVertreter.Visible = False
'
'txtVerBestLandZst
'
Me.txtVerBestLandZst.Height = 0.1456693!
Me.txtVerBestLandZst.Left = 0!
Me.txtVerBestLandZst.Name = "txtVerBestLandZst"
Me.txtVerBestLandZst.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtVerBestLandZst.Text = Nothing
Me.txtVerBestLandZst.Top = 0.4220473!
Me.txtVerBestLandZst.Width = 4.031889!
'
'txtPraefAufRef
'
Me.txtPraefAufRef.Height = 0.1456693!
Me.txtPraefAufRef.Left = 0.8811024!
Me.txtPraefAufRef.Name = "txtPraefAufRef"
Me.txtPraefAufRef.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtPraefAufRef.Text = Nothing
Me.txtPraefAufRef.Top = 0.91063!
Me.txtPraefAufRef.Width = 3.150787!
'
'txtSB
'
Me.txtSB.CanGrow = False
Me.txtSB.Height = 0.1685039!
Me.txtSB.Left = 2.791339!
Me.txtSB.Name = "txtSB"
Me.txtSB.Style = "font-weight: bold; text-align: right"
Me.txtSB.Text = Nothing
Me.txtSB.Top = 0!
Me.txtSB.Width = 1.169291!
'
'GroupHeader1
'
Me.GroupHeader1.Height = 0!
Me.GroupHeader1.Name = "GroupHeader1"
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'TextBox8
'
Me.TextBox8.CanGrow = False
Me.TextBox8.Height = 0.1456693!
Me.TextBox8.Left = 0!
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox8.Text = "ATC/MRN:"
Me.TextBox8.Top = 1.848819!
Me.TextBox8.Width = 0.8811023!
'
'txtATCMRN
'
Me.txtATCMRN.CanGrow = False
Me.txtATCMRN.Height = 0.1456693!
Me.txtATCMRN.Left = 0.8811024!
Me.txtATCMRN.Name = "txtATCMRN"
Me.txtATCMRN.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtATCMRN.Text = Nothing
Me.txtATCMRN.Top = 1.848819!
Me.txtATCMRN.Width = 3.150787!
'
'barcodeATCMRN
'
Me.barcodeATCMRN.Height = 0.1964569!
Me.barcodeATCMRN.HyperLink = Nothing
Me.barcodeATCMRN.ImageData = Nothing
Me.barcodeATCMRN.Left = 0.7889764!
Me.barcodeATCMRN.Name = "barcodeATCMRN"
Me.barcodeATCMRN.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.BottomLeft
Me.barcodeATCMRN.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeATCMRN.Top = 2.022048!
Me.barcodeATCMRN.Width = 3.242913!
'
'subRptSendungenZollpruefung
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 4.03189!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtWarenbezeichung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtColliGewichtPreis, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtATREUR1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtRg, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbgabenKto, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbsender, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtEmpfaenger, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAnmelder, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtVertreter, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtVerBestLandZst, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtPraefAufRef, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtSB, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents txtWarenbezeichung As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
Private WithEvents txtColliGewichtPreis As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtATREUR1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtRg As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbgabenKto As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox4 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox5 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox6 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbsender As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtEmpfaenger As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAnmelder As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox7 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtVertreter As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtVerBestLandZst As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtPraefAufRef As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox9 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtSB As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtATCMRN As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeATCMRN As GrapeCity.ActiveReports.SectionReportModel.Picture
End Class

48
Gemeinsames/ARConverterBackup3/subRptSendungenZollpruefung.vb Normal file
View File

@@ -0,0 +1,48 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports VERAG_PROG_ALLGEMEIN
Imports SDL
Public Class subRptSendungenZollpruefung
Dim ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung = Nothing
Sub New(ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung)
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.ZOLLANMELDUNG = ZOLLANMELDUNG
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
If ZOLLANMELDUNG IsNot Nothing Then
'Dim A As New DAKOSY_Worker.cZollsysteme_Aktenbeschriftung
'If A.getDataByBezugsnummer(SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr, SENDUNG.tblSnd_Abfertigungsart_ID.ToString) Then
txtColliGewichtPreis.Text = ZOLLANMELDUNG.Colli & " " & ZOLLANMELDUNG.Gewicht & " " & ZOLLANMELDUNG.Rechnungspreis
txtAbgabenKto.Text &= ZOLLANMELDUNG.AbgabenKonto
txtRg.Text &= ZOLLANMELDUNG.Handelsrechnung
txtPraefAufRef.Text = ZOLLANMELDUNG.Pr<EFBFBD>ferenzAufRechnung
txtATREUR1.Text &= ZOLLANMELDUNG.Praeferenznachweis
txtWarenbezeichung.Text = ZOLLANMELDUNG.Warenbezeichung
txtVerBestLandZst.Text = ZOLLANMELDUNG.VerBestLandZst
txtAbsender.Text = ZOLLANMELDUNG.Absender
txtEmpfaenger.Text = ZOLLANMELDUNG.Empfaenger
txtAnmelder.Text = ZOLLANMELDUNG.Anmelder
txtVertreter.Text = ZOLLANMELDUNG.Vertreter
txtATCMRN.Text = ZOLLANMELDUNG.ATCMRN
If ZOLLANMELDUNG.ATCMRN <> "" Then
barcodeATCMRN.Image = Code128Rendering.MakeBarcodeImage(ZOLLANMELDUNG.ATCMRN, 1, True, 20)
End If
txtSB.Text = ZOLLANMELDUNG.Sachbearbeiter
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
'If ABF_ART <= 0 Then Exit Sub
'If AbfKostKdnr <= 0 Then Exit Sub
'Me.DataSource = (New VERAG_PROG_ALLGEMEIN.SQL).loadDgvBySql("select isnull(LeistungsNr,'') as LeistungsNr,isnull(LeistungsBez,'' ) as LeistungsBez,isnull(Preis,'') as Preis FROM [Offertenpositionen] where KundenNr=" & AbfKostKdnr & " AND OffertenNr=(SELECT ISNULL(AO.ao_OffertenNr,-1) FROM tblAbfertigungsartOffertenstamm as AO WHERE AO.ao_Abfertigungsart='" & ABF_ART & "') and preis is not null order by LeistungsNr, Preis desc", "FMZOLL")
End Sub
End Class

88
Gemeinsames/Gemeinsames.vbproj
View File

@@ -102,136 +102,136 @@
<HintPath>F:\PROGRAMMIERUNG\dll\ActiveReports18\BouncyCastle.Cryptography.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.DX.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.DX.Windows.7.2.2\lib\net461\DS.Documents.DX.Windows.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.DX.Windows.7.2.2\lib\net461\DS.Documents.DX.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.7.2.2\lib\net461\DS.Documents.Imaging.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.Imaging.7.2.2\lib\net461\DS.Documents.Imaging.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.Windows.7.2.2\lib\net461\DS.Documents.Imaging.Windows.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.Imaging.Windows.7.2.2\lib\net461\DS.Documents.Imaging.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Pdf, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Pdf.7.2.2\lib\net461\DS.Documents.Pdf.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.Pdf.7.2.2\lib\net461\DS.Documents.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Chart.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart.Win, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.Win.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Chart.Win.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders, Version=3.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.3.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.DataProviders.3.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders.Excel, Version=1.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.Excel.1.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.DataProviders.Excel.1.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Document.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gc, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gdi, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gc, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gc.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gc.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Drawing.Gc.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gdi, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gdi.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Drawing.Gdi.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Excel.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Excel.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Excel.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Html.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Html.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Html.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Html.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Html.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Image.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Image.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Image.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Image.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Image.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Svg.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Svg.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Svg.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Svg.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Svg.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Text.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Text.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Text.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Text.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Text.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Tiff.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Tiff.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Tiff.Section.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Tiff.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Tiff.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Word.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Word.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Word.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Word.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Word.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rdl, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rdl.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rdl.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Rdl.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rdl.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rendering, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rendering.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rendering.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Rendering.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rendering.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Scripting, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Scripting.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Scripting.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Scripting.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Scripting.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Design.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Design.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Design.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Design.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Design.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Excel, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Excel.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Excel.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Excel.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Html, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Html.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Html.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Html.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Html.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Word, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Word.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Word.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Word.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Word.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Xml, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Xml.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Xml.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Xml.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Xml.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.QueryDesigner, Version=1.0.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.QueryDesigner.1.0.2\lib\net462\MESCIUS.ActiveReports.QueryDesigner.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.QueryDesigner.1.0.2\lib\net462\MESCIUS.ActiveReports.QueryDesigner.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Serializer, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Serializer.VS2022.18.2.2\lib\net472\MESCIUS.ActiveReports.Serializer.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Serializer.VS2022.18.2.2\lib\net472\MESCIUS.ActiveReports.Serializer.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.SpreadBuilder, Version=2.2.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.SpreadBuilder.2.2.0\lib\net462\MESCIUS.ActiveReports.SpreadBuilder.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.SpreadBuilder.2.2.0\lib\net462\MESCIUS.ActiveReports.SpreadBuilder.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Common, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Common.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Common.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Viewer.Common.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Common.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Viewer.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.DataEngine, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.DataEngine.4.0.3\lib\net462\MESCIUS.Data.DataEngine.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.Data.DataEngine.4.0.3\lib\net462\MESCIUS.Data.DataEngine.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.ExpressionInfo, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.ExpressionInfo.4.0.3\lib\net462\MESCIUS.Data.ExpressionInfo.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.Data.ExpressionInfo.4.0.3\lib\net462\MESCIUS.Data.ExpressionInfo.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.VBFunctionLib, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.VBFunctionLib.4.0.3\lib\net462\MESCIUS.Data.VBFunctionLib.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.Data.VBFunctionLib.4.0.3\lib\net462\MESCIUS.Data.VBFunctionLib.dll</HintPath>
</Reference>
<Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.8.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>