Creditsafe_API

2023-03-28 16:48:20 +02:00
parent 5d088a3d87
commit ad459e0765
22 changed files with 1479 additions and 494 deletions
--- a/SDL/Formulare/CARNET-TIR/rptTIR.Designer.vb
+++ b/SDL/Formulare/CARNET-TIR/rptTIR.Designer.vb
@@ -45,8 +45,9 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.txtGesamtpaket6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.txtGesamtpaketName6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
-        Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
        Me.txtSumme = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
+        Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        CType(Me.txtAbfahrsland, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtGesamtpaket1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtMain1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -76,6 +77,7 @@ Partial Public Class rptTIR
        CType(Me.txtGesamtpaket6, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtGesamtpaketName6, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtSumme, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
        '
        'Detail
@@ -85,7 +87,7 @@ Partial Public Class rptTIR
        '
        'ReportHeader1
        '
-        Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtAbfahrsland, Me.txtGesamtpaket1, Me.txtMain1, Me.txtAbgangszollstelle1, Me.txtAbgangszollstelle2, Me.txtAbgangszollstelle3, Me.txtAbgangszollstelle4, Me.txtAbgangszollstelle5, Me.txtAbgangszollstelle6, Me.txtAbgangszollstelle7, Me.txtBestimmungsland, Me.txtFahrzeug, Me.txtZusDok, Me.txtMain2, Me.txtMain3, Me.txtGesamtpaketName1, Me.txtGesamtpaket2, Me.txtGesamtpaketName2, Me.txtGesamtpaket3, Me.txtGesamtpaketName3, Me.txtGesamtpaket7, Me.txtGesamtpaketName7, Me.txtGesamtpaket4, Me.txtGesamtpaketName4, Me.txtGesamtpaket5, Me.txtGesamtpaketName5, Me.txtGesamtpaket6, Me.txtGesamtpaketName6, Me.txtSumme})
+        Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtAbfahrsland, Me.txtGesamtpaket1, Me.txtMain1, Me.txtAbgangszollstelle1, Me.txtAbgangszollstelle2, Me.txtAbgangszollstelle3, Me.txtAbgangszollstelle4, Me.txtAbgangszollstelle5, Me.txtAbgangszollstelle6, Me.txtAbgangszollstelle7, Me.txtBestimmungsland, Me.txtFahrzeug, Me.txtZusDok, Me.txtMain2, Me.txtMain3, Me.txtGesamtpaketName1, Me.txtGesamtpaket2, Me.txtGesamtpaketName2, Me.txtGesamtpaket3, Me.txtGesamtpaketName3, Me.txtGesamtpaket7, Me.txtGesamtpaketName7, Me.txtGesamtpaket4, Me.txtGesamtpaketName4, Me.txtGesamtpaket5, Me.txtGesamtpaketName5, Me.txtGesamtpaket6, Me.txtGesamtpaketName6, Me.txtSumme, Me.TextBox1})
        Me.ReportHeader1.Height = 11.42519!
        Me.ReportHeader1.Name = "ReportHeader1"
        '
@@ -97,7 +99,6 @@ Partial Public Class rptTIR
        Me.txtAbfahrsland.Height = 0.431!
        Me.txtAbfahrsland.Left = 1.987!
        Me.txtAbfahrsland.Name = "txtAbfahrsland"
-        Me.txtAbfahrsland.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbfahrsland.Style = "color: Black"
        Me.txtAbfahrsland.SummaryGroup = ""
        Me.txtAbfahrsland.Text = "Abfahrsland"
@@ -112,7 +113,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket1.Height = 0.1968504!
        Me.txtGesamtpaket1.Left = 0.479!
        Me.txtGesamtpaket1.Name = "txtGesamtpaket1"
-        Me.txtGesamtpaket1.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket1.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket1.SummaryGroup = ""
        Me.txtGesamtpaket1.Text = "Gesamtpaket1"
@@ -124,10 +124,9 @@ Partial Public Class rptTIR
        Me.txtMain1.CanGrow = False
        Me.txtMain1.DataField = ""
        Me.txtMain1.DistinctField = ""
-        Me.txtMain1.Height = 3.889!
+        Me.txtMain1.Height = 3.743!
        Me.txtMain1.Left = 0.479!
        Me.txtMain1.Name = "txtMain1"
-        Me.txtMain1.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtMain1.Style = "color: Black"
        Me.txtMain1.SummaryGroup = ""
        Me.txtMain1.Text = "Main1"
@@ -142,7 +141,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle1.Height = 0.1574803!
        Me.txtAbgangszollstelle1.Left = 0.479!
        Me.txtAbgangszollstelle1.Name = "txtAbgangszollstelle1"
-        Me.txtAbgangszollstelle1.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle1.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle1.SummaryGroup = ""
        Me.txtAbgangszollstelle1.Text = "Abgangszollstelle1"
@@ -157,7 +155,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle2.Height = 0.1574803!
        Me.txtAbgangszollstelle2.Left = 0.479!
        Me.txtAbgangszollstelle2.Name = "txtAbgangszollstelle2"
-        Me.txtAbgangszollstelle2.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle2.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle2.SummaryGroup = ""
        Me.txtAbgangszollstelle2.Text = "Abgangszollstelle2"
@@ -172,7 +169,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle3.Height = 0.1574803!
        Me.txtAbgangszollstelle3.Left = 0.479!
        Me.txtAbgangszollstelle3.Name = "txtAbgangszollstelle3"
-        Me.txtAbgangszollstelle3.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle3.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle3.SummaryGroup = ""
        Me.txtAbgangszollstelle3.Text = "Abgangszollstelle3"
@@ -187,7 +183,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle4.Height = 0.1574803!
        Me.txtAbgangszollstelle4.Left = 0.479!
        Me.txtAbgangszollstelle4.Name = "txtAbgangszollstelle4"
-        Me.txtAbgangszollstelle4.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle4.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle4.SummaryGroup = ""
        Me.txtAbgangszollstelle4.Text = "Abgangszollstelle4"
@@ -202,7 +197,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle5.Height = 0.1574803!
        Me.txtAbgangszollstelle5.Left = 0.479!
        Me.txtAbgangszollstelle5.Name = "txtAbgangszollstelle5"
-        Me.txtAbgangszollstelle5.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle5.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle5.SummaryGroup = ""
        Me.txtAbgangszollstelle5.Text = "Abgangszollstelle5"
@@ -217,7 +211,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle6.Height = 0.1574803!
        Me.txtAbgangszollstelle6.Left = 0.479!
        Me.txtAbgangszollstelle6.Name = "txtAbgangszollstelle6"
-        Me.txtAbgangszollstelle6.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle6.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle6.SummaryGroup = ""
        Me.txtAbgangszollstelle6.Text = "Abgangszollstelle6"
@@ -232,7 +225,6 @@ Partial Public Class rptTIR
        Me.txtAbgangszollstelle7.Height = 0.1574803!
        Me.txtAbgangszollstelle7.Left = 0.479!
        Me.txtAbgangszollstelle7.Name = "txtAbgangszollstelle7"
-        Me.txtAbgangszollstelle7.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtAbgangszollstelle7.Style = "color: Black; text-align: left; text-justify: auto; vertical-align: middle"
        Me.txtAbgangszollstelle7.SummaryGroup = ""
        Me.txtAbgangszollstelle7.Text = "Abgangszollstelle7"
@@ -247,7 +239,6 @@ Partial Public Class rptTIR
        Me.txtBestimmungsland.Height = 0.4309999!
        Me.txtBestimmungsland.Left = 3.079!
        Me.txtBestimmungsland.Name = "txtBestimmungsland"
-        Me.txtBestimmungsland.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtBestimmungsland.Style = "color: Black"
        Me.txtBestimmungsland.SummaryGroup = ""
        Me.txtBestimmungsland.Text = "Bestimmungsland"
@@ -262,7 +253,6 @@ Partial Public Class rptTIR
        Me.txtFahrzeug.Height = 0.4849999!
        Me.txtFahrzeug.Left = 1.987!
        Me.txtFahrzeug.Name = "txtFahrzeug"
-        Me.txtFahrzeug.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtFahrzeug.Style = "color: Black"
        Me.txtFahrzeug.SummaryGroup = ""
        Me.txtFahrzeug.Text = "Fahrzeug"
@@ -277,7 +267,6 @@ Partial Public Class rptTIR
        Me.txtZusDok.Height = 0.6260002!
        Me.txtZusDok.Left = 4.588!
        Me.txtZusDok.Name = "txtZusDok"
-        Me.txtZusDok.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtZusDok.Style = "color: Black"
        Me.txtZusDok.SummaryGroup = ""
        Me.txtZusDok.Text = "ZusDok"
@@ -289,10 +278,9 @@ Partial Public Class rptTIR
        Me.txtMain2.CanGrow = False
        Me.txtMain2.DataField = ""
        Me.txtMain2.DistinctField = ""
-        Me.txtMain2.Height = 3.889!
+        Me.txtMain2.Height = 3.743!
        Me.txtMain2.Left = 1.894!
        Me.txtMain2.Name = "txtMain2"
-        Me.txtMain2.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtMain2.Style = "color: Black"
        Me.txtMain2.SummaryGroup = ""
        Me.txtMain2.Text = "Main2"
@@ -304,10 +292,9 @@ Partial Public Class rptTIR
        Me.txtMain3.CanGrow = False
        Me.txtMain3.DataField = ""
        Me.txtMain3.DistinctField = ""
-        Me.txtMain3.Height = 3.889!
+        Me.txtMain3.Height = 3.743!
        Me.txtMain3.Left = 5.455!
        Me.txtMain3.Name = "txtMain3"
-        Me.txtMain3.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtMain3.Style = "color: Black"
        Me.txtMain3.SummaryGroup = ""
        Me.txtMain3.Text = "Main3"
@@ -322,7 +309,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName1.Height = 0.1968504!
        Me.txtGesamtpaketName1.Left = 1.894!
        Me.txtGesamtpaketName1.Name = "txtGesamtpaketName1"
-        Me.txtGesamtpaketName1.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName1.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName1.SummaryGroup = ""
        Me.txtGesamtpaketName1.Text = "GesamtpaketName1"
@@ -337,7 +323,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket2.Height = 0.1968504!
        Me.txtGesamtpaket2.Left = 0.4790001!
        Me.txtGesamtpaket2.Name = "txtGesamtpaket2"
-        Me.txtGesamtpaket2.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket2.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket2.SummaryGroup = ""
        Me.txtGesamtpaket2.Text = "Gesamtpaket2"
@@ -352,7 +337,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName2.Height = 0.1968504!
        Me.txtGesamtpaketName2.Left = 1.894!
        Me.txtGesamtpaketName2.Name = "txtGesamtpaketName2"
-        Me.txtGesamtpaketName2.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName2.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName2.SummaryGroup = ""
        Me.txtGesamtpaketName2.Text = "GesamtpaketName2"
@@ -367,7 +351,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket3.Height = 0.1968504!
        Me.txtGesamtpaket3.Left = 0.4790001!
        Me.txtGesamtpaket3.Name = "txtGesamtpaket3"
-        Me.txtGesamtpaket3.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket3.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket3.SummaryGroup = ""
        Me.txtGesamtpaket3.Text = "Gesamtpaket3"
@@ -382,7 +365,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName3.Height = 0.1968504!
        Me.txtGesamtpaketName3.Left = 1.894!
        Me.txtGesamtpaketName3.Name = "txtGesamtpaketName3"
-        Me.txtGesamtpaketName3.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName3.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName3.SummaryGroup = ""
        Me.txtGesamtpaketName3.Text = "GesamtpaketName3"
@@ -397,7 +379,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket7.Height = 0.1968504!
        Me.txtGesamtpaket7.Left = 2.572!
        Me.txtGesamtpaket7.Name = "txtGesamtpaket7"
-        Me.txtGesamtpaket7.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket7.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket7.SummaryGroup = ""
        Me.txtGesamtpaket7.Text = "Gesamtpaket7"
@@ -412,7 +393,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName7.Height = 0.1968508!
        Me.txtGesamtpaketName7.Left = 3.944!
        Me.txtGesamtpaketName7.Name = "txtGesamtpaketName7"
-        Me.txtGesamtpaketName7.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName7.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName7.SummaryGroup = ""
        Me.txtGesamtpaketName7.Text = "GesamtpaketName7"
@@ -427,7 +407,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket4.Height = 0.1968504!
        Me.txtGesamtpaket4.Left = 2.572!
        Me.txtGesamtpaket4.Name = "txtGesamtpaket4"
-        Me.txtGesamtpaket4.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket4.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket4.SummaryGroup = ""
        Me.txtGesamtpaket4.Text = "Gesamtpaket4"
@@ -442,7 +421,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName4.Height = 0.1968504!
        Me.txtGesamtpaketName4.Left = 3.944!
        Me.txtGesamtpaketName4.Name = "txtGesamtpaketName4"
-        Me.txtGesamtpaketName4.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName4.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName4.SummaryGroup = ""
        Me.txtGesamtpaketName4.Text = "GesamtpaketName4"
@@ -457,7 +435,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket5.Height = 0.1968504!
        Me.txtGesamtpaket5.Left = 2.572!
        Me.txtGesamtpaket5.Name = "txtGesamtpaket5"
-        Me.txtGesamtpaket5.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket5.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket5.SummaryGroup = ""
        Me.txtGesamtpaket5.Text = "Gesamtpaket5"
@@ -472,7 +449,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName5.Height = 0.1968504!
        Me.txtGesamtpaketName5.Left = 3.944!
        Me.txtGesamtpaketName5.Name = "txtGesamtpaketName5"
-        Me.txtGesamtpaketName5.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName5.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName5.SummaryGroup = ""
        Me.txtGesamtpaketName5.Text = "GesamtpaketName5"
@@ -487,7 +463,6 @@ Partial Public Class rptTIR
        Me.txtGesamtpaket6.Height = 0.1968504!
        Me.txtGesamtpaket6.Left = 2.572!
        Me.txtGesamtpaket6.Name = "txtGesamtpaket6"
-        Me.txtGesamtpaket6.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaket6.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaket6.SummaryGroup = ""
        Me.txtGesamtpaket6.Text = "Gesamtpaket6"
@@ -502,18 +477,12 @@ Partial Public Class rptTIR
        Me.txtGesamtpaketName6.Height = 0.1968504!
        Me.txtGesamtpaketName6.Left = 3.944!
        Me.txtGesamtpaketName6.Name = "txtGesamtpaketName6"
-        Me.txtGesamtpaketName6.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtGesamtpaketName6.Style = "color: Black; text-align: left; vertical-align: middle"
        Me.txtGesamtpaketName6.SummaryGroup = ""
        Me.txtGesamtpaketName6.Text = "GesamtpaketName6"
        Me.txtGesamtpaketName6.Top = 8.399!
        Me.txtGesamtpaketName6.Width = 0.4770003!
        '
-        'ReportFooter1
-        '
-        Me.ReportFooter1.Height = 0!
-        Me.ReportFooter1.Name = "ReportFooter1"
-        '
        'txtSumme
        '
        Me.txtSumme.CanGrow = False
@@ -521,13 +490,30 @@ Partial Public Class rptTIR
        Me.txtSumme.Height = 0.2330003!
        Me.txtSumme.Left = 5.455!
        Me.txtSumme.Name = "txtSumme"
-        Me.txtSumme.Padding = CType(New GrapeCity.ActiveReports.PaddingEx(0, 0, 0, 0), GrapeCity.ActiveReports.PaddingEx)
        Me.txtSumme.Style = "color: Black; font-weight: bold; text-decoration: underline"
        Me.txtSumme.SummaryGroup = ""
-        Me.txtSumme.Text = "Summe"
-        Me.txtSumme.Top = 7.399!
+        Me.txtSumme.Text = "Summe Gewicht"
+        Me.txtSumme.Top = 7.253!
        Me.txtSumme.Width = 1.28!
        '
+        'ReportFooter1
+        '
+        Me.ReportFooter1.Height = 0!
+        Me.ReportFooter1.Name = "ReportFooter1"
+        '
+        'TextBox1
+        '
+        Me.TextBox1.CanGrow = False
+        Me.TextBox1.DistinctField = ""
+        Me.TextBox1.Height = 0.2330003!
+        Me.TextBox1.Left = 1.894!
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Style = "color: Black; font-weight: bold; text-decoration: underline"
+        Me.TextBox1.SummaryGroup = ""
+        Me.TextBox1.Text = "Summe Anzahl"
+        Me.TextBox1.Top = 7.253!
+        Me.TextBox1.Width = 1.28!
+        '
        'rptTIR
        '
        Me.PageSettings.Margins.Bottom = 0!
@@ -537,15 +523,16 @@ Partial Public Class rptTIR
        Me.PageSettings.PaperHeight = 11.0!
        Me.PageSettings.PaperWidth = 8.5!
        Me.PrintWidth = 7.480315!
+        Me.Script = "public void ActiveReport_ReportStart()" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "{" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "}" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
        Me.Sections.Add(Me.ReportHeader1)
        Me.Sections.Add(Me.Detail)
        Me.Sections.Add(Me.ReportFooter1)
-        Me.StyleSheet.Add(CType(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"), DDCssLib.StyleSheetRule))
-        Me.StyleSheet.Add(CType(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"), DDCssLib.StyleSheetRule))
-        Me.StyleSheet.Add(CType(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
-            "lic", "Heading2", "Normal"), DDCssLib.StyleSheetRule))
-        Me.StyleSheet.Add(CType(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"), DDCssLib.StyleSheetRule))
+        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.txtAbfahrsland, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.txtGesamtpaket1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.txtMain1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -575,6 +562,7 @@ Partial Public Class rptTIR
        CType(Me.txtGesamtpaket6, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.txtGesamtpaketName6, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.txtSumme, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()

    End Sub
@@ -609,4 +597,5 @@ Partial Public Class rptTIR
    Public WithEvents txtGesamtpaket6 As GrapeCity.ActiveReports.SectionReportModel.TextBox
    Public WithEvents txtGesamtpaketName6 As GrapeCity.ActiveReports.SectionReportModel.TextBox
    Public WithEvents txtSumme As GrapeCity.ActiveReports.SectionReportModel.TextBox
+    Public WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
 End Class