fakt.

SDL/Fakturierung/cFakturierung.vb

@@ -2154,6 +2154,7 @@ Public Class cFakturierung
 
         Select Case RECHNUNG.RechnungSprache
             Case "EN" : rpt.Label2.Text = ZZTage & " Days" : rpt.Label1.Text = "Payment target:" : rpt.lblSendungsdatenUeberschrift.Text = "Service:"
+            Case "TR" : rpt.Label2.Text = ZZTage & " gün" ': rpt.Label1.Text = "Payment target:" : rpt.lblSendungsdatenUeberschrift.Text = "Service:"
             Case "RO" : rpt.Label2.Text = ZZTage & " Zile" : rpt.Label1.Text = "Termen de plată:" : rpt.lblSendungsdatenUeberschrift.Text = "Descriere:"
             Case Else : rpt.Label2.Text = ZZTage & " Tage" : rpt.lblSendungsdatenUeberschrift.Text = "Bezeichnung:"
         End Select
@@ -2318,22 +2319,65 @@ Public Class cFakturierung
             rpt.lblSteuerpflichtig.Visible = False
 
             rpt.lblLeistungUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Left
-            rpt.lblLeistungUeberschrift.Text = "RechnungsNr"
+            Select Case RECHNUNG.RechnungSprache
+                Case "EN"
+                    rpt.lblLeistungUeberschrift.Text = "Inv. No."
                     rpt.lblAnzahlUeberschrift.Text = "Tage"
-            rpt.lblSteuerpflichtigUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center
+                    rpt.lblSteuerpflichtigUeberschrift.Text = "Payment Amount"
+                    rpt.lblSteuerfreiUeberschrift.Text = "Default Interest"
+                    'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Interest p.a."
+
+                Case "TR"
+
+                    rpt.lblLeistungUeberschrift.Text = "Belge"
+                    rpt.lblAnzahlUeberschrift.Text = "Tage"
+                    rpt.lblSteuerpflichtigUeberschrift.Text = "Ödeme tutarı"
+                    rpt.lblSteuerfreiUeberschrift.Text = "Geç ödeme faizi"
+                   ' rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Zinsen p.a."
+
+                Case "RO"
+
+                    rpt.lblLeistungUeberschrift.Text = "Nr. fact."
+                    rpt.lblAnzahlUeberschrift.Text = "Tage"
+                    rpt.lblSteuerpflichtigUeberschrift.Text = "Suma de plata"
+                    rpt.lblSteuerfreiUeberschrift.Text = "Penalitati"
+                    'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Dobândă p.a."
+
+                Case Else
+                    rpt.lblLeistungUeberschrift.Text = "RENR"
+                    rpt.lblAnzahlUeberschrift.Text = "VZ Tage"
                     rpt.lblSteuerpflichtigUeberschrift.Text = "Zahlungsbetrag"
-            rpt.lbl_onlyZR_VZUeberschrift.Text = "Zinsen p.a."
-            rpt.lbl_onlyZR_VZUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Left
                     rpt.lblSteuerfreiUeberschrift.Text = "Verzugszinsen"
+                    'rpt.lbl_onlyZR_ZinsenUeberschrift.Text = "Zinsen p.a."
+            End Select
+
+
+
+            rpt.lblSteuerpflichtigUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center
             rpt.lblSteuerfreiUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Right
 
-
+            rpt.lbl_onlyZR_ZinsenUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Left
             rpt.lbl_onlyZR_ReDatUeberschrift.Visible = True
             rpt.lbl_onlyZR_FaelligUeberschrift.Visible = True
-            rpt.lbl_onlyZR_VZUeberschrift.Visible = True
+            rpt.lbl_onlyZR_ZinsenUeberschrift.Visible = True
             rpt.lbl_onlyZR_ZahlungsDatUeberschrift.Visible = True
 
             rpt.txtLeistung.Visible = False
+
+        Else
+
+            'rpt.lblLeistungUeberschrift.Text = "Leistung"
+            'rpt.lblAnzahlUeberschrift.Text = "Anzahl"
+            'rpt.lblSteuerfreiUeberschrift.Text = "Steuerfrei"
+            'rpt.lblSteuerpflichtigUeberschrift.Text = "Steuerpflichtig"
+            rpt.lblSteuerpflichtigUeberschrift.Alignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Right
+
+            rpt.lbl_onlyZR_ReDatUeberschrift.Visible = False
+            rpt.lbl_onlyZR_FaelligUeberschrift.Visible = False
+            rpt.lbl_onlyZR_ZinsenUeberschrift.Visible = False
+            rpt.lbl_onlyZR_ZahlungsDatUeberschrift.Visible = False
+            rpt.txtLeistung.Visible = True
+
         End If
 
 

SDL/Fakturierung/rptRechnungDruck_MDM.Designer.vb

@@ -105,7 +105,7 @@ Partial Public Class rptRechnungDruck_MDM
         Me.GroupHeader4 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
         Me.lblLeistungUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
         Me.lblSteuerfreiUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
-        Me.lbl_onlyZR_VZUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lbl_onlyZR_ZinsenUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
         Me.lbl_onlyZR_ZahlungsDatUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
         Me.lbl_onlyZR_FaelligUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
         Me.lbl_onlyZR_ReDatUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
@@ -125,6 +125,7 @@ Partial Public Class rptRechnungDruck_MDM
         Me.Line12 = New GrapeCity.ActiveReports.SectionReportModel.Line()
         Me.Line13 = New GrapeCity.ActiveReports.SectionReportModel.Line()
         Me.Line16 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.Line18 = New GrapeCity.ActiveReports.SectionReportModel.Line()
         Me.GroupFooter4 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
         CType(Me.lblLeistungNr, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.lblAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -194,7 +195,7 @@ Partial Public Class rptRechnungDruck_MDM
         CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.lblLeistungUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.lblSteuerfreiUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
-        CType(Me.lbl_onlyZR_VZUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lbl_onlyZR_ZinsenUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.lbl_onlyZR_ZahlungsDatUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.lbl_onlyZR_FaelligUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.lbl_onlyZR_ReDatUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -219,6 +220,7 @@ Partial Public Class rptRechnungDruck_MDM
         '
         'Detail
         '
+        Me.Detail.CanShrink = True
         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.3901193!
         Me.Detail.KeepTogether = True
@@ -303,8 +305,8 @@ Partial Public Class rptRechnungDruck_MDM
         Me.Line11.LineWeight = 1.0!
         Me.Line11.Name = "Line11"
         Me.Line11.Top = 0!
-        Me.Line11.Width = 0!
+        Me.Line11.Width = 0.000001430511!
-        Me.Line11.X1 = 7.476377!
+        Me.Line11.X1 = 7.476378!
         Me.Line11.X2 = 7.476377!
         Me.Line11.Y1 = 0!
         Me.Line11.Y2 = 0.1712599!
@@ -1212,8 +1214,8 @@ Partial Public Class rptRechnungDruck_MDM
         '
         'GroupHeader4
         '
-        Me.GroupHeader4.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblLeistungUeberschrift, Me.lblSteuerfreiUeberschrift, Me.lbl_onlyZR_VZUeberschrift, Me.lbl_onlyZR_ZahlungsDatUeberschrift, Me.lbl_onlyZR_FaelligUeberschrift, Me.lbl_onlyZR_ReDatUeberschrift, Me.lblSteuerpflichtigUeberschrift, Me.lblAnzahlUeberschrift, Me.Line4, Me.lblZollbelegNr, Me.txtZollbelegNr, Me.lblWarenWertUeberschrift, Me.txtWarenwert, Me.txtGrenzeUeberschrift, Me.txtGrenze, Me.txtBef<EFBFBD>rderungsmittelUeberschrift, Me.txtBef<EFBFBD>rderungsmittel, Me.lblSendungsdatenUeberschrift, Me.txtSendungsdaten, Me.Line12, Me.Line13, Me.Line16})
+        Me.GroupHeader4.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblLeistungUeberschrift, Me.lblSteuerfreiUeberschrift, Me.lbl_onlyZR_ZinsenUeberschrift, Me.lbl_onlyZR_ZahlungsDatUeberschrift, Me.lbl_onlyZR_FaelligUeberschrift, Me.lbl_onlyZR_ReDatUeberschrift, Me.lblSteuerpflichtigUeberschrift, Me.lblAnzahlUeberschrift, Me.Line4, Me.lblZollbelegNr, Me.txtZollbelegNr, Me.lblWarenWertUeberschrift, Me.txtWarenwert, Me.txtGrenzeUeberschrift, Me.txtGrenze, Me.txtBef<EFBFBD>rderungsmittelUeberschrift, Me.txtBef<EFBFBD>rderungsmittel, Me.lblSendungsdatenUeberschrift, Me.txtSendungsdaten, Me.Line12, Me.Line13, Me.Line16, Me.Line18})
-        Me.GroupHeader4.Height = 1.033525!
+        Me.GroupHeader4.Height = 0.9710256!
         Me.GroupHeader4.KeepTogether = True
         Me.GroupHeader4.Name = "GroupHeader4"
         '
@@ -1241,17 +1243,17 @@ Partial Public Class rptRechnungDruck_MDM
         Me.lblSteuerfreiUeberschrift.Top = 0.8114173!
         Me.lblSteuerfreiUeberschrift.Width = 1.554331!
         '
-        'lbl_onlyZR_VZUeberschrift
+        'lbl_onlyZR_ZinsenUeberschrift
         '
-        Me.lbl_onlyZR_VZUeberschrift.Height = 0.1511808!
+        Me.lbl_onlyZR_ZinsenUeberschrift.Height = 0.1511808!
-        Me.lbl_onlyZR_VZUeberschrift.HyperLink = Nothing
+        Me.lbl_onlyZR_ZinsenUeberschrift.HyperLink = Nothing
-        Me.lbl_onlyZR_VZUeberschrift.Left = 5.521662!
+        Me.lbl_onlyZR_ZinsenUeberschrift.Left = 5.521662!
-        Me.lbl_onlyZR_VZUeberschrift.Name = "lbl_onlyZR_VZUeberschrift"
+        Me.lbl_onlyZR_ZinsenUeberschrift.Name = "lbl_onlyZR_ZinsenUeberschrift"
-        Me.lbl_onlyZR_VZUeberschrift.Style = "font-size: 8pt; font-weight: bold; text-align: right; text-justify: auto; ddo-cha" &
+        Me.lbl_onlyZR_ZinsenUeberschrift.Style = "font-size: 8pt; font-weight: bold; text-align: right; text-justify: auto; ddo-cha" &
     "r-set: 1"
-        Me.lbl_onlyZR_VZUeberschrift.Text = "Verzugszinsen"
+        Me.lbl_onlyZR_ZinsenUeberschrift.Text = "Zinsen p.a."
-        Me.lbl_onlyZR_VZUeberschrift.Top = 0.8112674!
+        Me.lbl_onlyZR_ZinsenUeberschrift.Top = 0.8112674!
-        Me.lbl_onlyZR_VZUeberschrift.Width = 0.8169294!
+        Me.lbl_onlyZR_ZinsenUeberschrift.Width = 0.8169294!
         '
         'lbl_onlyZR_ZahlungsDatUeberschrift
         '
@@ -1288,9 +1290,9 @@ Partial Public Class rptRechnungDruck_MDM
         Me.lbl_onlyZR_ReDatUeberschrift.Left = 0.9362284!
         Me.lbl_onlyZR_ReDatUeberschrift.Name = "lbl_onlyZR_ReDatUeberschrift"
         Me.lbl_onlyZR_ReDatUeberschrift.Padding = New GrapeCity.ActiveReports.PaddingEx(6, 0, 0, 0)
-        Me.lbl_onlyZR_ReDatUeberschrift.Style = "font-size: 8pt; font-weight: bold; text-align: left; text-justify: auto; ddo-char" &
+        Me.lbl_onlyZR_ReDatUeberschrift.Style = "font-size: 8pt; font-weight: bold; text-align: center; text-justify: auto; ddo-ch" &
-    "-set: 1"
+    "ar-set: 1"
-        Me.lbl_onlyZR_ReDatUeberschrift.Text = "Rechnungsdatum"
+        Me.lbl_onlyZR_ReDatUeberschrift.Text = "Datum"
         Me.lbl_onlyZR_ReDatUeberschrift.Top = 0.8120553!
         Me.lbl_onlyZR_ReDatUeberschrift.Visible = False
         Me.lbl_onlyZR_ReDatUeberschrift.Width = 1.065354!
@@ -1462,14 +1464,14 @@ Partial Public Class rptRechnungDruck_MDM
         '
         'Line13
         '
-        Me.Line13.Height = 0.204331!
+        Me.Line13.Height = 0.2043307!
-        Me.Line13.Left = 7.477614!
+        Me.Line13.Left = 7.476378!
         Me.Line13.LineWeight = 1.0!
         Me.Line13.Name = "Line13"
         Me.Line13.Top = 0.8119134!
         Me.Line13.Width = 0!
-        Me.Line13.X1 = 7.477614!
+        Me.Line13.X1 = 7.476378!
-        Me.Line13.X2 = 7.477614!
+        Me.Line13.X2 = 7.476378!
         Me.Line13.Y1 = 0.8119134!
         Me.Line13.Y2 = 1.016244!
         '
@@ -1486,6 +1488,19 @@ Partial Public Class rptRechnungDruck_MDM
         Me.Line16.Y1 = 0.8114173!
         Me.Line16.Y2 = 0.8114173!
         '
+        'Line18
+        '
+        Me.Line18.Height = 0.2043306!
+        Me.Line18.Left = 0.00511811!
+        Me.Line18.LineWeight = 1.0!
+        Me.Line18.Name = "Line18"
+        Me.Line18.Top = 0.8114174!
+        Me.Line18.Width = 0!
+        Me.Line18.X1 = 0.00511811!
+        Me.Line18.X2 = 0.00511811!
+        Me.Line18.Y1 = 0.8114174!
+        Me.Line18.Y2 = 1.015748!
+        '
         'GroupFooter4
         '
         Me.GroupFooter4.Height = 0!
@@ -1582,7 +1597,7 @@ Partial Public Class rptRechnungDruck_MDM
         CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.lblLeistungUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.lblSteuerfreiUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
-        CType(Me.lbl_onlyZR_VZUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lbl_onlyZR_ZinsenUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.lbl_onlyZR_ZahlungsDatUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.lbl_onlyZR_FaelligUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.lbl_onlyZR_ReDatUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
@@ -1707,5 +1722,6 @@ Partial Public Class rptRechnungDruck_MDM
     Public WithEvents lbl_onlyZR_FaelligUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
     Public WithEvents lbl_onlyZR_ReDatUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
     Public WithEvents lbl_onlyZR_ZahlungsDatUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
-    Public WithEvents lbl_onlyZR_VZUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lbl_onlyZR_ZinsenUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Line18 As GrapeCity.ActiveReports.SectionReportModel.Line
 End Class