acrtive reports 18

SDL/ARConverterBackup1/Fakturierung/rptFaktRechnungAn.Designer.vb

@@ -0,0 +1,492 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Public Class rptFaktRechnungAn
+    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 PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader
+    Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptFaktRechnungAn))
+        Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader()
+        Me.Label5 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label2 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label4 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label6 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label10 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
+        Me.lblAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblRechnungsAn = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblRechnungsadresse = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblKdNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblPercent = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
+        Me.Label28 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Line2 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.ReportInfo2 = New GrapeCity.ActiveReports.SectionReportModel.ReportInfo()
+        Me.lblDat = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader()
+        Me.picVERAG = New GrapeCity.ActiveReports.SectionReportModel.Picture()
+        Me.Label3 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label1 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label9 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblSachbearbeiter = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblKassenbuchNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblGeschaeftsjahr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblMandantNiederlassung = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
+        Me.lblGesAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label8 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label7 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblLand = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        CType(Me.Label5, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label4, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label6, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label10, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblRechnungsAn, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblRechnungsadresse, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblKdNr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblPercent, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label28, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblDat, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label9, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblKassenbuchNr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblGeschaeftsjahr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblMandantNiederlassung, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblGesAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label8, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label7, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblLand, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
+        '
+        'PageHeader
+        '
+        Me.PageHeader.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label5, Me.Label2, Me.Label4, Me.Label6, Me.Label10, Me.Label7})
+        Me.PageHeader.Height = 0.2500001!
+        Me.PageHeader.Name = "PageHeader"
+        '
+        'Label5
+        '
+        Me.Label5.Height = 0.1795276!
+        Me.Label5.HyperLink = Nothing
+        Me.Label5.Left = 0.01023626!
+        Me.Label5.Name = "Label5"
+        Me.Label5.Style = "font-size: 9pt; font-weight: bold; text-align: right; ddo-char-set: 1"
+        Me.Label5.Text = "Anzahl"
+        Me.Label5.Top = 0.07047245!
+        Me.Label5.Width = 0.4944885!
+        '
+        'Label2
+        '
+        Me.Label2.Height = 0.1795276!
+        Me.Label2.HyperLink = Nothing
+        Me.Label2.Left = 1.883071!
+        Me.Label2.Name = "Label2"
+        Me.Label2.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
+        Me.Label2.Text = "Rechnung an"
+        Me.Label2.Top = 0.07047245!
+        Me.Label2.Width = 2.434252!
+        '
+        'Label4
+        '
+        Me.Label4.Height = 0.1795276!
+        Me.Label4.HyperLink = Nothing
+        Me.Label4.Left = 4.317323!
+        Me.Label4.Name = "Label4"
+        Me.Label4.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
+        Me.Label4.Text = "Adresse"
+        Me.Label4.Top = 0.07047245!
+        Me.Label4.Width = 2.686221!
+        '
+        'Label6
+        '
+        Me.Label6.Height = 0.1795276!
+        Me.Label6.HyperLink = Nothing
+        Me.Label6.Left = 0.5149606!
+        Me.Label6.Name = "Label6"
+        Me.Label6.Style = "font-size: 9pt; font-weight: bold; text-align: center; ddo-char-set: 1"
+        Me.Label6.Text = "Kunden-Nr."
+        Me.Label6.Top = 0.07047245!
+        Me.Label6.Width = 0.8318899!
+        '
+        'Label10
+        '
+        Me.Label10.Height = 0.1795276!
+        Me.Label10.HyperLink = Nothing
+        Me.Label10.Left = 7.003544!
+        Me.Label10.Name = "Label10"
+        Me.Label10.Style = "font-size: 9pt; font-weight: bold; text-align: right; ddo-char-set: 1"
+        Me.Label10.Text = "%"
+        Me.Label10.Top = 0.07047245!
+        Me.Label10.Width = 0.4716539!
+        '
+        'Detail
+        '
+        Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblAnzahl, Me.lblRechnungsAn, Me.lblRechnungsadresse, Me.lblKdNr, Me.lblPercent, Me.lblLand})
+        Me.Detail.Height = 0.1795276!
+        Me.Detail.Name = "Detail"
+        '
+        'lblAnzahl
+        '
+        Me.lblAnzahl.Height = 0.1795276!
+        Me.lblAnzahl.HyperLink = Nothing
+        Me.lblAnzahl.Left = 0.005118111!
+        Me.lblAnzahl.Name = "lblAnzahl"
+        Me.lblAnzahl.Style = "font-size: 9pt; font-weight: normal; text-align: right; ddo-char-set: 1"
+        Me.lblAnzahl.Text = "Anzahl"
+        Me.lblAnzahl.Top = 0!
+        Me.lblAnzahl.Width = 0.4944885!
+        '
+        'lblRechnungsAn
+        '
+        Me.lblRechnungsAn.Height = 0.1795276!
+        Me.lblRechnungsAn.HyperLink = Nothing
+        Me.lblRechnungsAn.Left = 1.883071!
+        Me.lblRechnungsAn.Name = "lblRechnungsAn"
+        Me.lblRechnungsAn.Style = "font-size: 9pt; font-weight: normal; text-align: left; ddo-char-set: 1"
+        Me.lblRechnungsAn.Text = "Rechnung an"
+        Me.lblRechnungsAn.Top = 0!
+        Me.lblRechnungsAn.Width = 2.429134!
+        '
+        'lblRechnungsadresse
+        '
+        Me.lblRechnungsadresse.Height = 0.1795276!
+        Me.lblRechnungsadresse.HyperLink = Nothing
+        Me.lblRechnungsadresse.Left = 4.317323!
+        Me.lblRechnungsadresse.Name = "lblRechnungsadresse"
+        Me.lblRechnungsadresse.Style = "font-size: 9pt; font-weight: normal; text-align: left; ddo-char-set: 1"
+        Me.lblRechnungsadresse.Text = "Adresse"
+        Me.lblRechnungsadresse.Top = 0!
+        Me.lblRechnungsadresse.Width = 2.686221!
+        '
+        'lblKdNr
+        '
+        Me.lblKdNr.Height = 0.1795276!
+        Me.lblKdNr.HyperLink = Nothing
+        Me.lblKdNr.Left = 0.5098422!
+        Me.lblKdNr.Name = "lblKdNr"
+        Me.lblKdNr.Style = "font-size: 9pt; font-weight: normal; text-align: center; ddo-char-set: 1"
+        Me.lblKdNr.Text = "Kunden-Nr."
+        Me.lblKdNr.Top = 0!
+        Me.lblKdNr.Width = 0.8318896!
+        '
+        'lblPercent
+        '
+        Me.lblPercent.Height = 0.1795276!
+        Me.lblPercent.HyperLink = Nothing
+        Me.lblPercent.Left = 7.003544!
+        Me.lblPercent.Name = "lblPercent"
+        Me.lblPercent.Style = "font-size: 9pt; font-weight: normal; text-align: right; ddo-char-set: 1"
+        Me.lblPercent.Text = "%"
+        Me.lblPercent.Top = 0!
+        Me.lblPercent.Width = 0.4716539!
+        '
+        'PageFooter
+        '
+        Me.PageFooter.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label28, Me.Line2, Me.ReportInfo2, Me.lblDat})
+        Me.PageFooter.Name = "PageFooter"
+        '
+        'Label28
+        '
+        Me.Label28.Height = 0.1330709!
+        Me.Label28.HyperLink = Nothing
+        Me.Label28.Left = 2.13937!
+        Me.Label28.Name = "Label28"
+        Me.Label28.Style = "font-size: 8pt; font-weight: bold; text-align: center; ddo-char-set: 1"
+        Me.Label28.Text = "VERAG Spediton AG"
+        Me.Label28.Top = 0.08622041!
+        Me.Label28.Width = 2.649606!
+        '
+        'Line2
+        '
+        Me.Line2.Height = 0!
+        Me.Line2.Left = 0!
+        Me.Line2.LineWeight = 1.0!
+        Me.Line2.Name = "Line2"
+        Me.Line2.Top = 0.03070863!
+        Me.Line2.Width = 7.480313!
+        Me.Line2.X1 = 0!
+        Me.Line2.X2 = 7.480313!
+        Me.Line2.Y1 = 0.03070863!
+        Me.Line2.Y2 = 0.03070863!
+        '
+        'ReportInfo2
+        '
+        Me.ReportInfo2.FormatString = "Seite {PageNumber} von {PageCount} Seiten "
+        Me.ReportInfo2.Height = 0.1330709!
+        Me.ReportInfo2.Left = 5.04252!
+        Me.ReportInfo2.Name = "ReportInfo2"
+        Me.ReportInfo2.Style = "font-size: 8pt; text-align: right"
+        Me.ReportInfo2.Top = 0.08622047!
+        Me.ReportInfo2.Width = 2.437842!
+        '
+        'lblDat
+        '
+        Me.lblDat.Height = 0.1330708!
+        Me.lblDat.HyperLink = Nothing
+        Me.lblDat.Left = 0.01023622!
+        Me.lblDat.Name = "lblDat"
+        Me.lblDat.Style = "font-size: 8pt; text-align: left"
+        Me.lblDat.Text = "Mittwoch, 02.11.2016"
+        Me.lblDat.Top = 0.08622041!
+        Me.lblDat.Width = 2.649606!
+        '
+        'ReportHeader1
+        '
+        Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.picVERAG, Me.Label3, Me.lblUeberschrift, Me.Label1, Me.Label9, Me.lblSachbearbeiter, Me.lblKassenbuchNr, Me.lblGeschaeftsjahr, Me.lblMandantNiederlassung})
+        Me.ReportHeader1.Height = 0.6968506!
+        Me.ReportHeader1.Name = "ReportHeader1"
+        '
+        'picVERAG
+        '
+        Me.picVERAG.Height = 0.4169292!
+        Me.picVERAG.HyperLink = Nothing
+        Me.picVERAG.ImageBase64String = resources.GetString("picVERAG.ImageBase64String")
+        Me.picVERAG.Left = 5.281889!
+        Me.picVERAG.Name = "picVERAG"
+        Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
+        Me.picVERAG.Top = 0!
+        Me.picVERAG.Width = 2.198425!
+        '
+        'Label3
+        '
+        Me.Label3.Height = 0.1377953!
+        Me.Label3.HyperLink = Nothing
+        Me.Label3.Left = 1.421085E-14!
+        Me.Label3.Name = "Label3"
+        Me.Label3.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
+        Me.Label3.Text = "Sachbearbeiter:"
+        Me.Label3.Top = 0.3830709!
+        Me.Label3.Width = 2.607087!
+        '
+        'lblUeberschrift
+        '
+        Me.lblUeberschrift.Height = 0.2311024!
+        Me.lblUeberschrift.HyperLink = Nothing
+        Me.lblUeberschrift.Left = 0.01023622!
+        Me.lblUeberschrift.Name = "lblUeberschrift"
+        Me.lblUeberschrift.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
+        Me.lblUeberschrift.Text = "Rechnungsanschrift Bericht 01.10.2016 bis 31.10.2016"
+        Me.lblUeberschrift.Top = 0.1338583!
+        Me.lblUeberschrift.Width = 5.032284!
+        '
+        'Label1
+        '
+        Me.Label1.Height = 0.1377952!
+        Me.Label1.HyperLink = Nothing
+        Me.Label1.Left = 2.607087!
+        Me.Label1.Name = "Label1"
+        Me.Label1.Style = "font-size: 8pt; font-weight: normal; text-align: center; ddo-char-set: 1"
+        Me.Label1.Text = ""
+        Me.Label1.Top = 0.3830709!
+        Me.Label1.Width = 1.212598!
+        '
+        'Label9
+        '
+        Me.Label9.Height = 0.1377952!
+        Me.Label9.HyperLink = Nothing
+        Me.Label9.Left = 3.819686!
+        Me.Label9.Name = "Label9"
+        Me.Label9.Style = "font-size: 8pt; font-weight: normal; text-align: center; ddo-char-set: 1"
+        Me.Label9.Text = ""
+        Me.Label9.Top = 0.3830709!
+        Me.Label9.Width = 1.212598!
+        '
+        'lblSachbearbeiter
+        '
+        Me.lblSachbearbeiter.Height = 0.1759843!
+        Me.lblSachbearbeiter.HyperLink = Nothing
+        Me.lblSachbearbeiter.Left = 0!
+        Me.lblSachbearbeiter.Name = "lblSachbearbeiter"
+        Me.lblSachbearbeiter.Style = "background-color: Gainsboro; font-size: 10pt; font-weight: bold; text-align: left" &
+    ""
+        Me.lblSachbearbeiter.Text = "Hanslmayr Hubert (SUB)"
+        Me.lblSachbearbeiter.Top = 0.5208663!
+        Me.lblSachbearbeiter.Width = 2.607087!
+        '
+        'lblKassenbuchNr
+        '
+        Me.lblKassenbuchNr.Height = 0.1759843!
+        Me.lblKassenbuchNr.HyperLink = Nothing
+        Me.lblKassenbuchNr.Left = 2.607087!
+        Me.lblKassenbuchNr.Name = "lblKassenbuchNr"
+        Me.lblKassenbuchNr.Style = "background-color: Gainsboro; font-size: 10pt; font-weight: bold; text-align: cent" &
+    "er"
+        Me.lblKassenbuchNr.Text = ""
+        Me.lblKassenbuchNr.Top = 0.5208663!
+        Me.lblKassenbuchNr.Width = 1.212598!
+        '
+        'lblGeschaeftsjahr
+        '
+        Me.lblGeschaeftsjahr.Height = 0.1759843!
+        Me.lblGeschaeftsjahr.HyperLink = Nothing
+        Me.lblGeschaeftsjahr.Left = 3.819686!
+        Me.lblGeschaeftsjahr.Name = "lblGeschaeftsjahr"
+        Me.lblGeschaeftsjahr.Style = "background-color: Gainsboro; font-size: 10pt; font-weight: bold; text-align: cent" &
+    "er"
+        Me.lblGeschaeftsjahr.Text = ""
+        Me.lblGeschaeftsjahr.Top = 0.5208663!
+        Me.lblGeschaeftsjahr.Width = 1.212598!
+        '
+        'lblMandantNiederlassung
+        '
+        Me.lblMandantNiederlassung.Height = 0.1759843!
+        Me.lblMandantNiederlassung.HyperLink = Nothing
+        Me.lblMandantNiederlassung.Left = 5.032284!
+        Me.lblMandantNiederlassung.Name = "lblMandantNiederlassung"
+        Me.lblMandantNiederlassung.Style = "background-color: Gainsboro; font-size: 10pt; font-weight: bold; text-align: righ" &
+    "t"
+        Me.lblMandantNiederlassung.Text = ""
+        Me.lblMandantNiederlassung.Top = 0.5208663!
+        Me.lblMandantNiederlassung.Width = 2.448032!
+        '
+        'ReportFooter1
+        '
+        Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblGesAnzahl, Me.Label8})
+        Me.ReportFooter1.Height = 0.3334646!
+        Me.ReportFooter1.Name = "ReportFooter1"
+        '
+        'lblGesAnzahl
+        '
+        Me.lblGesAnzahl.Height = 0.1795276!
+        Me.lblGesAnzahl.HyperLink = Nothing
+        Me.lblGesAnzahl.Left = 0.01535433!
+        Me.lblGesAnzahl.Name = "lblGesAnzahl"
+        Me.lblGesAnzahl.Style = "font-size: 9pt; font-weight: bold; text-align: right; ddo-char-set: 1"
+        Me.lblGesAnzahl.Text = "Anzahl"
+        Me.lblGesAnzahl.Top = 0.153937!
+        Me.lblGesAnzahl.Width = 0.4944882!
+        '
+        'Label8
+        '
+        Me.Label8.Height = 0.1795276!
+        Me.Label8.HyperLink = Nothing
+        Me.Label8.Left = 0.5149606!
+        Me.Label8.Name = "Label8"
+        Me.Label8.Style = "font-size: 9pt; font-weight: bold; text-align: center; ddo-char-set: 1"
+        Me.Label8.Text = "Gesamt"
+        Me.Label8.Top = 0.157874!
+        Me.Label8.Width = 0.6393701!
+        '
+        'Label7
+        '
+        Me.Label7.Height = 0.1795276!
+        Me.Label7.HyperLink = Nothing
+        Me.Label7.Left = 1.346851!
+        Me.Label7.Name = "Label7"
+        Me.Label7.Style = "font-size: 9pt; font-weight: bold; text-align: center; ddo-char-set: 1"
+        Me.Label7.Text = "Land"
+        Me.Label7.Top = 0.07047245!
+        Me.Label7.Width = 0.4736221!
+        '
+        'lblLand
+        '
+        Me.lblLand.DataField = ""
+        Me.lblLand.Height = 0.1795276!
+        Me.lblLand.HyperLink = Nothing
+        Me.lblLand.Left = 1.346851!
+        Me.lblLand.Name = "lblLand"
+        Me.lblLand.Style = "color: Black; font-size: 9pt; font-weight: normal; text-align: center; ddo-char-s" &
+    "et: 1"
+        Me.lblLand.Text = "Land"
+        Me.lblLand.Top = 0!
+        Me.lblLand.Width = 0.4736221!
+        '
+        'rptFaktRechnungAn
+        '
+        Me.PageSettings.Margins.Bottom = 0.3937008!
+        Me.PageSettings.Margins.Left = 0.3937008!
+        Me.PageSettings.Margins.Right = 0.3937008!
+        Me.PageSettings.Margins.Top = 0.3937008!
+        Me.PageSettings.PaperHeight = 11.0!
+        Me.PageSettings.PaperWidth = 8.5!
+        Me.PrintWidth = 7.480315!
+        Me.Sections.Add(Me.ReportHeader1)
+        Me.Sections.Add(Me.PageHeader)
+        Me.Sections.Add(Me.Detail)
+        Me.Sections.Add(Me.PageFooter)
+        Me.Sections.Add(Me.ReportFooter1)
+        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.Label5, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label4, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label6, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label10, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblRechnungsAn, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblRechnungsadresse, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblKdNr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblPercent, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label28, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblDat, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label9, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblKassenbuchNr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblGeschaeftsjahr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblMandantNiederlassung, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblGesAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label8, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label7, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblLand, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
+
+    End Sub
+    Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
+    Private WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
+    Private WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture
+    Private WithEvents Label3 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label1 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label9 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents lblKassenbuchNr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents lblGeschaeftsjahr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents lblMandantNiederlassung As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label28 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Line2 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Private WithEvents ReportInfo2 As GrapeCity.ActiveReports.SectionReportModel.ReportInfo
+    Private WithEvents Label5 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents Label2 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents Label4 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents Label6 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblRechnungsAn As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblRechnungsadresse As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblKdNr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
+    Public WithEvents lblUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblSachbearbeiter As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblDat As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label8 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label10 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblPercent As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblGesAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents Label7 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblLand As GrapeCity.ActiveReports.SectionReportModel.Label
+End Class

SDL/ARConverterBackup1/Fakturierung/rptFaktRechnungAn.vb

@@ -0,0 +1,8 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptFaktRechnungAn
+    Private Sub rptFaktRechnungAn_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
+
+    End Sub
+End Class 

SDL/ARConverterBackup1/Fakturierung/rptRechnungDruck.vb

@@ -0,0 +1,24 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptRechnungDruck
+    Dim _LAN = ""
+    Sub New()
+        InitializeComponent()
+    End Sub
+    Sub New(_LAN)
+        ' Dieser Aufruf ist f<>r den Designer erforderlich.
+        InitializeComponent()
+        Me._LAN = _LAN
+        ' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+    End Sub
+    Private Sub rptRechnungDruck_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
+        If _LAN.replace("DE", "") <> "" Then
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportHeader1.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportFooter1.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.GroupHeader4.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.PageFooter.Controls, _LAN, "rptRechnungDruck")
+        End If
+    End Sub
+
+End Class

SDL/ARConverterBackup1/Fakturierung/rptSammelRechnungAnlagenDruck.vb

@@ -0,0 +1,27 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptSammelRechnungAnlagenDruck
+    Public _LAN = ""
+    Sub New()
+        InitializeComponent()
+    End Sub
+    Sub New(_LAN)
+        ' Dieser Aufruf ist f<>r den Designer erforderlich.
+        InitializeComponent()
+        Me._LAN = _LAN
+        ' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+    End Sub
+    Private Sub rptRechnungDruck_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
+        If _LAN.replace("DE", "") <> "" Then
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportHeader1.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportFooter1.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.GroupHeader4.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.PageFooter.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+        End If
+    End Sub
+
+    Private Sub GroupFooter4_Format(sender As Object, e As EventArgs) Handles GroupFooter4.Format
+
+    End Sub
+End Class

SDL/ARConverterBackup1/Fakturierung/rptSammelRechnungAnlagenDruck_Leistungen.Designer.vb

@@ -0,0 +1,165 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Public Class rptSammelRechnungAnlagenDruck_Leistungen
+    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 PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader
+    Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(rptSammelRechnungAnlagenDruck_Leistungen))
+        Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader()
+        Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
+        Me.lblSteuerfrei = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblSteuerpflichtig = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.txtAbfertigungsart = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
+        Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
+        Me.GroupHeader4 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
+        Me.Line4 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.GroupFooter4 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
+        Me.Line18 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        CType(Me.lblSteuerfrei, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblSteuerpflichtig, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.txtAbfertigungsart, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
+        '
+        'PageHeader
+        '
+        Me.PageHeader.Height = 0!
+        Me.PageHeader.Name = "PageHeader"
+        '
+        'Detail
+        '
+        Me.Detail.CanGrow = False
+        Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblSteuerfrei, Me.lblSteuerpflichtig, Me.txtAbfertigungsart})
+        Me.Detail.Height = 0.1338583!
+        Me.Detail.KeepTogether = True
+        Me.Detail.Name = "Detail"
+        '
+        'lblSteuerfrei
+        '
+        Me.lblSteuerfrei.Height = 0.1338583!
+        Me.lblSteuerfrei.HyperLink = Nothing
+        Me.lblSteuerfrei.Left = 3.655119!
+        Me.lblSteuerfrei.Name = "lblSteuerfrei"
+        Me.lblSteuerfrei.Style = "color: #202020; font-size: 8pt; font-style: italic; font-weight: normal; text-ali" &
+    "gn: right; ddo-char-set: 1"
+        Me.lblSteuerfrei.Text = "999.999,99"
+        Me.lblSteuerfrei.Top = 0!
+        Me.lblSteuerfrei.Width = 1.207481!
+        '
+        'lblSteuerpflichtig
+        '
+        Me.lblSteuerpflichtig.Height = 0.1338583!
+        Me.lblSteuerpflichtig.HyperLink = Nothing
+        Me.lblSteuerpflichtig.Left = 2.447638!
+        Me.lblSteuerpflichtig.Name = "lblSteuerpflichtig"
+        Me.lblSteuerpflichtig.Style = "color: #202020; font-size: 8pt; font-style: italic; font-weight: normal; text-ali" &
+    "gn: right; ddo-char-set: 1"
+        Me.lblSteuerpflichtig.Text = "999.999,99"
+        Me.lblSteuerpflichtig.Top = 0!
+        Me.lblSteuerpflichtig.Width = 1.20748!
+        '
+        'txtAbfertigungsart
+        '
+        Me.txtAbfertigungsart.Height = 0.1338583!
+        Me.txtAbfertigungsart.Left = 0.005119062!
+        Me.txtAbfertigungsart.Name = "txtAbfertigungsart"
+        Me.txtAbfertigungsart.Padding = New GrapeCity.ActiveReports.PaddingEx(6, 0, 0, 0)
+        Me.txtAbfertigungsart.Style = "color: #202020; font-size: 8pt; font-style: italic; ddo-char-set: 1"
+        Me.txtAbfertigungsart.Text = "-"
+        Me.txtAbfertigungsart.Top = 0!
+        Me.txtAbfertigungsart.Width = 2.44252!
+        '
+        'PageFooter
+        '
+        Me.PageFooter.Height = 0!
+        Me.PageFooter.Name = "PageFooter"
+        '
+        'GroupHeader4
+        '
+        Me.GroupHeader4.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Line4})
+        Me.GroupHeader4.Height = 0!
+        Me.GroupHeader4.KeepTogether = True
+        Me.GroupHeader4.Name = "GroupHeader4"
+        '
+        'Line4
+        '
+        Me.Line4.Height = 0!
+        Me.Line4.Left = 0.005118111!
+        Me.Line4.LineColor = System.Drawing.Color.DarkGray
+        Me.Line4.LineWeight = 1.0!
+        Me.Line4.Name = "Line4"
+        Me.Line4.Top = 0!
+        Me.Line4.Visible = False
+        Me.Line4.Width = 4.852363!
+        Me.Line4.X1 = 0.005118111!
+        Me.Line4.X2 = 4.857481!
+        Me.Line4.Y1 = 0!
+        Me.Line4.Y2 = 0!
+        '
+        'GroupFooter4
+        '
+        Me.GroupFooter4.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Line18})
+        Me.GroupFooter4.Height = 0.1875001!
+        Me.GroupFooter4.Name = "GroupFooter4"
+        '
+        'Line18
+        '
+        Me.Line18.Height = 0!
+        Me.Line18.Left = 0.03444719!
+        Me.Line18.LineColor = System.Drawing.Color.FromArgb(CType(CType(169, Byte), Integer), CType(CType(169, Byte), Integer), CType(CType(169, Byte), Integer))
+        Me.Line18.LineWeight = 1.0!
+        Me.Line18.Name = "Line18"
+        Me.Line18.Top = 0.09375003!
+        Me.Line18.Width = 4.852365!
+        Me.Line18.X1 = 0.03444719!
+        Me.Line18.X2 = 4.886813!
+        Me.Line18.Y1 = 0.09375003!
+        Me.Line18.Y2 = 0.09375003!
+        '
+        'rptSammelRechnungAnlagenDruck_Leistungen
+        '
+        Me.MasterReport = False
+        Me.PageSettings.Margins.Bottom = 0.3937008!
+        Me.PageSettings.Margins.Left = 0.3937008!
+        Me.PageSettings.Margins.Right = 0.3937008!
+        Me.PageSettings.Margins.Top = 0.3937008!
+        Me.PageSettings.PaperHeight = 11.0!
+        Me.PageSettings.PaperWidth = 8.5!
+        Me.PrintWidth = 4.92126!
+        Me.Sections.Add(Me.PageHeader)
+        Me.Sections.Add(Me.GroupHeader4)
+        Me.Sections.Add(Me.Detail)
+        Me.Sections.Add(Me.GroupFooter4)
+        Me.Sections.Add(Me.PageFooter)
+        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.lblSteuerfrei, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblSteuerpflichtig, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.txtAbfertigungsart, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
+
+    End Sub
+    Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
+    Private WithEvents GroupHeader4 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
+    Private WithEvents Line4 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Private WithEvents GroupFooter4 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
+    Public WithEvents lblSteuerfrei As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblSteuerpflichtig As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents txtAbfertigungsart As GrapeCity.ActiveReports.SectionReportModel.TextBox
+    Private WithEvents Line18 As GrapeCity.ActiveReports.SectionReportModel.Line
+End Class

SDL/ARConverterBackup1/Fakturierung/rptSammelRechnungAnlagenDruck_Leistungen.vb

@@ -0,0 +1,60 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptSammelRechnungAnlagenDruck_Leistungen
+    dim _LAN = ""
+    Dim RECHNUNG As VERAG_PROG_ALLGEMEIN.cRechnungsausgang = Nothing
+    Sub New(_LAN As String, RECHNUNG As VERAG_PROG_ALLGEMEIN.cRechnungsausgang)
+        ' Dieser Aufruf ist f<>r den Designer erforderlich.
+        InitializeComponent()
+        Me._LAN = _LAN
+        Me.RECHNUNG = RECHNUNG
+        ' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+    End Sub
+    Private Sub rptRechnungDruck_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
+        If _LAN.replace("DE", "") <> "" Then
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.GroupHeader4.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.PageFooter.Controls, _LAN, "rptRechnungDruck")
+        End If
+    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
+            txtAbfertigungsart.Text = ""
+            lblSteuerfrei.Text = ""
+            lblSteuerpflichtig.Text = ""
+            Dim vorzeichen = If(If(RECHNUNG.Vorzeichen, "") = "-", -1, 1)
+
+            If Me.Fields.Item("clmnAnzahl") IsNot Nothing AndAlso Me.Fields.Item("clmnAnzahl").Value IsNot Nothing Then txtAbfertigungsart.Text &= Me.Fields.Item("clmnAnzahl").Value.ToString & "x "
+            If Me.Fields.Item("clmnLeistung") IsNot Nothing AndAlso Me.Fields.Item("clmnLeistung").Value IsNot Nothing Then txtAbfertigungsart.Text &= Me.Fields.Item("clmnLeistung").Value.ToString
+            If Me.Fields.Item("clmnLeistungsNr") IsNot Nothing AndAlso Me.Fields.Item("clmnLeistungsNr").Value IsNot Nothing Then txtAbfertigungsart.Text &= " (" & Me.Fields.Item("clmnLeistungsNr").Value.ToString & ") "
+            If Me.Fields.Item("clmnSteuerfreierBetrag") IsNot Nothing AndAlso Me.Fields.Item("clmnSteuerfreierBetrag").Value IsNot Nothing AndAlso CDbl(Me.Fields.Item("clmnSteuerfreierBetrag").Value) <> 0 Then
+                lblSteuerfrei.Text = CDbl(Me.Fields.Item("clmnSteuerfreierBetrag").Value.ToString * vorzeichen).ToString("N2")
+            End If
+            If Me.Fields.Item("clmnSteuerpflichtigerBetrag") IsNot Nothing AndAlso Me.Fields.Item("clmnSteuerpflichtigerBetrag").Value IsNot Nothing AndAlso CDbl(Me.Fields.Item("clmnSteuerpflichtigerBetrag").Value) <> 0 Then
+                lblSteuerpflichtig.Text = CDbl(Me.Fields.Item("clmnSteuerpflichtigerBetrag").Value.ToString * vorzeichen).ToString("N2")
+            End If
+        End If
+    End Sub
+
+    Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
+        If RECHNUNG Is Nothing Then Exit Sub
+
+        Dim dt As New DataTable
+        dt.Columns.Add("clmnLeistung")
+        dt.Columns.Add("clmnSteuerfreierBetrag")
+        dt.Columns.Add("clmnSteuerpflichtigerBetrag")
+        dt.Columns.Add("clmnAnzahl")
+        dt.Columns.Add("clmnLeistungsNr")
+
+        RECHNUNG.ORDER_POSITIONEN()
+
+        For Each POS In RECHNUNG.POSITIONEN
+            dt.Rows.Add(POS.LeistungsBez, POS.SteuerfreierBetrag, POS.SteuerpflichtigerBetrag, POS.Anzahl, POS.LeistungsNr)
+        Next
+
+        Me.DataSource = dt
+
+    End Sub
+End Class

SDL/ARConverterBackup1/Fakturierung/rptSammelRechnungAnlagenDruck_MDM.vb

@@ -0,0 +1,24 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptSammelRechnungAnlagenDruck_MDM
+    Public _LAN = ""
+    Sub New()
+        InitializeComponent()
+    End Sub
+    Sub New(_LAN)
+        ' Dieser Aufruf ist f<>r den Designer erforderlich.
+        InitializeComponent()
+        Me._LAN = _LAN
+        ' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+    End Sub
+    Private Sub rptRechnungDruck_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
+        If _LAN.replace("DE", "") <> "" Then
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportHeader1.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportFooter1.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.GroupHeader4.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.PageFooter.Controls, _LAN, "rptSammelRechnungAnlagenDruck")
+        End If
+    End Sub
+
+End Class

SDL/ARConverterBackup1/Fakturierung/rptSammelRechnungDruck.vb

@@ -0,0 +1,24 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptSammelRechnungDruck
+    Dim _LAN = ""
+    Sub New()
+        InitializeComponent()
+    End Sub
+    Sub New(_LAN)
+        ' Dieser Aufruf ist f<>r den Designer erforderlich.
+        InitializeComponent()
+        Me._LAN = _LAN
+        ' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+    End Sub
+    Private Sub rptRechnungDruck_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
+        If _LAN.replace("DE", "") <> "" Then
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportHeader1.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.ReportFooter1.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.GroupHeader4.Controls, _LAN, "rptRechnungDruck")
+            SDL.cProgramFunctions._TRANSLATE_RPT(Me, Me.PageFooter.Controls, _LAN, "rptRechnungDruck")
+        End If
+    End Sub
+
+End Class