Active Reports 18 (from 18..)

Gemeinsames/subRptSendungenOfferte.vb

@@ -1,7 +1,7 @@
 Imports GrapeCity.ActiveReports 
-Imports GrapeCity.ActiveReports.Document 
+Imports GrapeCity.ActiveReports.Document
 
-Public Class subRptSendungenOfferte 
+Public Class subRptSendungenOfferte
 
     Dim AbfKostKdnr As Integer
     Dim ABF_ART As Integer
@@ -12,7 +12,7 @@ Public Class subRptSendungenOfferte
         Me.ABF_ART = ABF_ART
         Me.AbfKostKdnr = AbfKostKdnr
         ' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
-       End Sub
+    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
@@ -28,7 +28,7 @@ Public Class subRptSendungenOfferte
         If AbfKostKdnr <= 0 Then Exit Sub
 
         Me.DataSource = (New VERAG_PROG_ALLGEMEIN.SQL).loadDgvBySql("select isnull(LeistungsNr,'') as LeistungsNr,isnull(LeistungsBez,'' ) as LeistungsBez,isnull(Preis,'') as Preis FROM [Offertenpositionen] where KundenNr=" & AbfKostKdnr & " AND OffertenNr=(SELECT ISNULL(AO.ao_OffertenNr,-1) FROM tblAbfertigungsartOffertenstamm as AO WHERE AO.ao_Abfertigungsart='" & ABF_ART & "') and preis is not null order by LeistungsNr, Preis desc", "FMZOLL")
-     
+
     End Sub
 
 End Class