neu

2020-03-12 14:49:31 +01:00
parent f4c1a74870
commit cc28d5a6cf
197 changed files with 37402 additions and 4503 deletions
--- a/SDL/Formulare/KDFormulare/FormulareBaukasten/rptLaufzettelZollDE.Designer.vb
+++ b/SDL/Formulare/KDFormulare/FormulareBaukasten/rptLaufzettelZollDE.Designer.vb
@@ -63,15 +63,17 @@ Partial Public Class rptLaufzettelZollDE
        Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.Shape2 = New GrapeCity.ActiveReports.SectionReportModel.Shape()
        Me.TextBox2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.txtEmail = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.txtDW = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.txtFirmeninfo_rontoffice = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.txtFirma_UNISPED = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.txtGesColli = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.TextBox6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.txtGesGewicht = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.TextBox10 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
-        Me.txtEmail = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
-        Me.txtDW = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
-        Me.txtFirmeninfo_rontoffice = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
        Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
        Me.TextBox3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.Line1 = New GrapeCity.ActiveReports.SectionReportModel.Line()
        CType(Me.txtAbfertigungsart, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtAbsender, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtVerzollungsadresse, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -104,13 +106,14 @@ Partial Public Class rptLaufzettelZollDE
        CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.txtEmail, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.txtDW, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.txtFirmeninfo_rontoffice, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.txtFirma_UNISPED, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtGesColli, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.txtGesGewicht, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.txtEmail, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.txtDW, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.txtFirmeninfo_rontoffice, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
        '
@@ -298,7 +301,7 @@ Partial Public Class rptLaufzettelZollDE
        '
        'ReportHeader1
        '
-        Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Shape1, Me.txtFirmaInfo_ATILLA, Me.txtFirmaInfo_VERAG, Me.txtFirmaInfo_IMEX, Me.picVERAG, Me.TextBox8, Me.Shape3, Me.Shape4, Me.Shape5, Me.TextBox4, Me.TextBox9, Me.txtLKW, Me.TextBox12, Me.txtLKWId, Me.TextBox14, Me.txtSB, Me.TextBox18, Me.txtDatum, Me.TextBox25, Me.txtGrenzstelle, Me.TextBox27, Me.txtFraechter, Me.TextBox32, Me.TextBox5, Me.TextBox1, Me.Shape2, Me.TextBox2, Me.txtGesColli, Me.TextBox6, Me.txtGesGewicht, Me.TextBox10, Me.txtEmail, Me.txtDW, Me.txtFirmeninfo_rontoffice})
+        Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Shape1, Me.txtFirmaInfo_ATILLA, Me.txtFirmaInfo_VERAG, Me.txtFirmaInfo_IMEX, Me.picVERAG, Me.TextBox8, Me.Shape3, Me.Shape4, Me.Shape5, Me.TextBox4, Me.TextBox9, Me.txtLKW, Me.TextBox12, Me.txtLKWId, Me.TextBox14, Me.txtSB, Me.TextBox18, Me.txtDatum, Me.TextBox25, Me.txtGrenzstelle, Me.TextBox27, Me.txtFraechter, Me.TextBox32, Me.TextBox5, Me.TextBox1, Me.Shape2, Me.TextBox2, Me.txtEmail, Me.txtDW, Me.txtFirmeninfo_rontoffice, Me.txtFirma_UNISPED})
        Me.ReportHeader1.Height = 2.227953!
        Me.ReportHeader1.Name = "ReportHeader1"
        '
@@ -587,48 +590,6 @@ Partial Public Class rptLaufzettelZollDE
        Me.TextBox2.Top = 1.886614!
        Me.TextBox2.Width = 0.5295277!
        '
-        'txtGesColli
-        '
-        Me.txtGesColli.Height = 0.1574803!
-        Me.txtGesColli.Left = 5.889763!
-        Me.txtGesColli.Name = "txtGesColli"
-        Me.txtGesColli.Style = "font-size: 9pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
-    "-char-set: 1"
-        Me.txtGesColli.Text = "0 Pk"
-        Me.txtGesColli.Top = 1.403937!
-        Me.txtGesColli.Width = 1.628347!
-        '
-        'TextBox6
-        '
-        Me.TextBox6.Height = 0.1574803!
-        Me.TextBox6.Left = 5.057481!
-        Me.TextBox6.Name = "TextBox6"
-        Me.TextBox6.Style = "font-size: 9pt; font-weight: normal; vertical-align: middle; ddo-char-set: 1"
-        Me.TextBox6.Text = "Colli:"
-        Me.TextBox6.Top = 1.403937!
-        Me.TextBox6.Width = 1.12441!
-        '
-        'txtGesGewicht
-        '
-        Me.txtGesGewicht.Height = 0.1574803!
-        Me.txtGesGewicht.Left = 5.889369!
-        Me.txtGesGewicht.Name = "txtGesGewicht"
-        Me.txtGesGewicht.Style = "font-size: 9pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
-    "-char-set: 1"
-        Me.txtGesGewicht.Text = "0.000 kg"
-        Me.txtGesGewicht.Top = 1.561417!
-        Me.txtGesGewicht.Width = 1.628347!
-        '
-        'TextBox10
-        '
-        Me.TextBox10.Height = 0.1574803!
-        Me.TextBox10.Left = 5.057481!
-        Me.TextBox10.Name = "TextBox10"
-        Me.TextBox10.Style = "font-size: 9pt; font-weight: normal; vertical-align: middle; ddo-char-set: 1"
-        Me.TextBox10.Text = "Gewicht:"
-        Me.TextBox10.Top = 1.561417!
-        Me.TextBox10.Width = 1.12441!
-        '
        'txtEmail
        '
        Me.txtEmail.Height = 0.1574803!
@@ -663,10 +624,68 @@ Partial Public Class rptLaufzettelZollDE
        Me.txtFirmeninfo_rontoffice.Visible = False
        Me.txtFirmeninfo_rontoffice.Width = 6.67165!
        '
+        'txtFirma_UNISPED
+        '
+        Me.txtFirma_UNISPED.Height = 0.5000001!
+        Me.txtFirma_UNISPED.Left = 0.4775591!
+        Me.txtFirma_UNISPED.Name = "txtFirma_UNISPED"
+        Me.txtFirma_UNISPED.Style = "font-size: 8.25pt; vertical-align: middle; ddo-char-set: 204"
+        Me.txtFirma_UNISPED.Text = "A-4975 Suben" & Global.Microsoft.VisualBasic.ChrW(9) & "Tel.  +43 77 11 / 2677-0" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "  www.unisped.at" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Suben 15" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "office@uni" &
+    "sped.at"
+        Me.txtFirma_UNISPED.Top = 0!
+        Me.txtFirma_UNISPED.Visible = False
+        Me.txtFirma_UNISPED.Width = 6.67165!
+        '
+        'txtGesColli
+        '
+        Me.txtGesColli.Height = 0.1574803!
+        Me.txtGesColli.Left = 5.874016!
+        Me.txtGesColli.Name = "txtGesColli"
+        Me.txtGesColli.Style = "font-size: 9pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
+    "-char-set: 1"
+        Me.txtGesColli.Text = "0 Pk"
+        Me.txtGesColli.Top = 0.08700788!
+        Me.txtGesColli.Visible = False
+        Me.txtGesColli.Width = 1.628347!
+        '
+        'TextBox6
+        '
+        Me.TextBox6.Height = 0.1574803!
+        Me.TextBox6.Left = 5.789766!
+        Me.TextBox6.Name = "TextBox6"
+        Me.TextBox6.Style = "font-size: 9pt; font-weight: normal; vertical-align: middle; ddo-char-set: 1"
+        Me.TextBox6.Text = "Colli:"
+        Me.TextBox6.Top = 0.08700788!
+        Me.TextBox6.Visible = False
+        Me.TextBox6.Width = 1.12441!
+        '
+        'txtGesGewicht
+        '
+        Me.txtGesGewicht.Height = 0.1574803!
+        Me.txtGesGewicht.Left = 5.873622!
+        Me.txtGesGewicht.Name = "txtGesGewicht"
+        Me.txtGesGewicht.Style = "font-size: 9pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
+    "-char-set: 1"
+        Me.txtGesGewicht.Text = "0.000 kg"
+        Me.txtGesGewicht.Top = 0.2444879!
+        Me.txtGesGewicht.Visible = False
+        Me.txtGesGewicht.Width = 1.628347!
+        '
+        'TextBox10
+        '
+        Me.TextBox10.Height = 0.1574803!
+        Me.TextBox10.Left = 5.789766!
+        Me.TextBox10.Name = "TextBox10"
+        Me.TextBox10.Style = "font-size: 9pt; font-weight: normal; vertical-align: middle; ddo-char-set: 1"
+        Me.TextBox10.Text = "Gewicht:"
+        Me.TextBox10.Top = 0.2444879!
+        Me.TextBox10.Visible = False
+        Me.TextBox10.Width = 1.12441!
+        '
        'ReportFooter1
        '
-        Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox3})
-        Me.ReportFooter1.Height = 0.5570866!
+        Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox3, Me.txtGesColli, Me.TextBox6, Me.txtGesGewicht, Me.TextBox10, Me.Line1})
+        Me.ReportFooter1.Height = 0.5570867!
        Me.ReportFooter1.KeepTogether = True
        Me.ReportFooter1.Name = "ReportFooter1"
        Me.ReportFooter1.PrintAtBottom = True
@@ -674,13 +693,26 @@ Partial Public Class rptLaufzettelZollDE
        'TextBox3
        '
        Me.TextBox3.Height = 0.4700788!
-        Me.TextBox3.Left = 0.4314961!
+        Me.TextBox3.Left = 0.3937008!
        Me.TextBox3.Name = "TextBox3"
        Me.TextBox3.Style = "font-size: 10pt; font-weight: bold; vertical-align: middle; ddo-char-set: 1"
        Me.TextBox3.Text = "Wir ersuchen um T-1 auf Befreiung und um eine angemessene Frist von mehr als 8 Ta" &
    "gen - EU Auslieferung." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vielen Dank!"
        Me.TextBox3.Top = 0.08700788!
-        Me.TextBox3.Width = 7.18504!
+        Me.TextBox3.Width = 4.43504!
+        '
+        'Line1
+        '
+        Me.Line1.Height = 0.00008203834!
+        Me.Line1.Left = 0.3937008!
+        Me.Line1.LineWeight = 1.0!
+        Me.Line1.Name = "Line1"
+        Me.Line1.Top = 0.02362205!
+        Me.Line1.Width = 7.086612!
+        Me.Line1.X1 = 0.3937008!
+        Me.Line1.X2 = 7.480313!
+        Me.Line1.Y1 = 0.02362205!
+        Me.Line1.Y2 = 0.02370409!
        '
        'rptLaufzettelZollDE
        '
@@ -735,13 +767,14 @@ Partial Public Class rptLaufzettelZollDE
        CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.txtEmail, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.txtDW, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.txtFirmeninfo_rontoffice, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.txtFirma_UNISPED, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.txtGesColli, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.txtGesGewicht, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.txtEmail, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.txtDW, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.txtFirmeninfo_rontoffice, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()

@@ -750,8 +783,6 @@ Partial Public Class rptLaufzettelZollDE
    Private WithEvents lblDetails As GrapeCity.ActiveReports.SectionReportModel.Label
    Private WithEvents Label8 As GrapeCity.ActiveReports.SectionReportModel.Label
    Private WithEvents Line2 As GrapeCity.ActiveReports.SectionReportModel.Line
-    Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
-    Private WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
    Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
    Private WithEvents TextBox8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
    Public WithEvents txtFirmaInfo_VERAG As GrapeCity.ActiveReports.SectionReportModel.TextBox
@@ -799,4 +830,8 @@ Partial Public Class rptLaufzettelZollDE
    Public WithEvents SubReport As GrapeCity.ActiveReports.SectionReportModel.SubReport
    Private WithEvents TextBox3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
    Public WithEvents txtFirmeninfo_rontoffice As GrapeCity.ActiveReports.SectionReportModel.TextBox
+    Public WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
+    Public WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
+    Private WithEvents Line1 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Public WithEvents txtFirma_UNISPED As GrapeCity.ActiveReports.SectionReportModel.TextBox
 End Class