diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb index 2b335f25..8c81753a 100644 --- a/SDL/Fakturierung/cFakturierung.vb +++ b/SDL/Fakturierung/cFakturierung.vb @@ -2524,7 +2524,7 @@ Public Class cFakturierung If RECHNUNG.FilialenNr = 8001 AndAlso RECHNUNG.OffertenNr = 95 Then 'dann ist es eine Zinsnachberechnungs-Rechnung Dim subRpt = New rptRechnungMDM_AnlagenDruck_Zinsennachberechnung(rpt._LAN, RECHNUNG) - rpt.SubReportt.Report = subRpt + rpt.SubReport.Report = subRpt rpt.lblSteuerfrei.Font = New Font(rpt.lblSteuerfrei.Font, FontStyle.Bold) rpt.lblSteuerpflichtig.Font = New Font(rpt.lblSteuerfrei.Font, FontStyle.Bold) @@ -2532,7 +2532,7 @@ Public Class cFakturierung 'txtKdAuftragsnummer.Top += SubReport.Height 'txtSendungsdetails.Top += SubReport.Height Else - rpt.SubReportt.Report = Nothing + rpt.SubReport.Report = Nothing End If End Sub diff --git a/SDL/Fakturierung/rptRechnungDruck_MDM.Designer.vb b/SDL/Fakturierung/rptRechnungDruck_MDM.Designer.vb index 41aeb925..243d83a2 100644 --- a/SDL/Fakturierung/rptRechnungDruck_MDM.Designer.vb +++ b/SDL/Fakturierung/rptRechnungDruck_MDM.Designer.vb @@ -26,7 +26,7 @@ Partial Public Class rptRechnungDruck_MDM Me.txtLeistung = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.Line10 = New GrapeCity.ActiveReports.SectionReportModel.Line() Me.Line11 = New GrapeCity.ActiveReports.SectionReportModel.Line() - Me.SubReportt = New GrapeCity.ActiveReports.SectionReportModel.SubReport() + Me.SubReport = New GrapeCity.ActiveReports.SectionReportModel.SubReport() Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter() Me.Line2 = New GrapeCity.ActiveReports.SectionReportModel.Line() Me.ReportInfo2 = New GrapeCity.ActiveReports.SectionReportModel.ReportInfo() @@ -223,8 +223,8 @@ Partial Public Class rptRechnungDruck_MDM ' 'Detail ' - Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblLeistungNr, Me.lblAnzahl, Me.lblSteuerfrei, Me.lblSteuerpflichtig, Me.txtLeistung, Me.Line10, Me.Line11, Me.SubReportt}) - Me.Detail.Height = 0.5047026! + Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblLeistungNr, Me.lblAnzahl, Me.lblSteuerfrei, Me.lblSteuerpflichtig, Me.txtLeistung, Me.Line10, Me.Line11, Me.SubReport}) + Me.Detail.Height = 0.369286! Me.Detail.KeepTogether = True Me.Detail.Name = "Detail" ' @@ -313,16 +313,16 @@ Partial Public Class rptRechnungDruck_MDM Me.Line11.Y1 = 0! Me.Line11.Y2 = 0.1712599! ' - 'SubReportt + 'SubReport ' - Me.SubReportt.CloseBorder = False - Me.SubReportt.Height = 0.1574803! - Me.SubReportt.Left = 0.03307092! - Me.SubReportt.Name = "SubReportt" - Me.SubReportt.Report = Nothing - Me.SubReportt.ReportName = "SubReport1" - Me.SubReportt.Top = 0.1736111! - Me.SubReportt.Width = 7.442126! + Me.SubReport.CloseBorder = False + Me.SubReport.Height = 0.1259843! + Me.SubReport.Left = 0.03307087! + Me.SubReport.Name = "SubReport" + Me.SubReport.Report = Nothing + Me.SubReport.ReportName = "SubReport1" + Me.SubReport.Top = 0.1732284! + Me.SubReport.Width = 7.442126! ' 'PageFooter ' @@ -1730,5 +1730,5 @@ Partial Public Class rptRechnungDruck_MDM Public WithEvents txtBeförderungsmittelUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label Public WithEvents Line15 As GrapeCity.ActiveReports.SectionReportModel.Line Public WithEvents txtBank3 As GrapeCity.ActiveReports.SectionReportModel.TextBox - Public WithEvents SubReportt As GrapeCity.ActiveReports.SectionReportModel.SubReport + Public WithEvents SubReport As GrapeCity.ActiveReports.SectionReportModel.SubReport End Class