This commit is contained in:
2025-10-20 17:34:03 +02:00
parent be624a11dc
commit c73362598f
2 changed files with 15 additions and 15 deletions

View File

@@ -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

View File

@@ -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<EFBFBD>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