faktEmail Bugfix
This commit is contained in:
@@ -1057,7 +1057,13 @@ Public Class frmFaktEmail
|
|||||||
|
|
||||||
|
|
||||||
Dim extension = ".pdf"
|
Dim extension = ".pdf"
|
||||||
Dim zielPfadZusammenfassung = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(IIf(SammelrechungArt <> 6, RECHNUNG.BelegartenBez & "sanhänge_", RECHNUNG.BelegartenBez & "_") & RgNr & extension, extension,, False, "Zusammenfassung")
|
|
||||||
|
Dim Belegsbezeichnung As String = "Beleg"
|
||||||
|
If RECHNUNG IsNot Nothing AndAlso RECHNUNG.BelegartenBez <> "" Then
|
||||||
|
Belegsbezeichnung = RECHNUNG.BelegartenBez
|
||||||
|
End If
|
||||||
|
|
||||||
|
Dim zielPfadZusammenfassung = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(IIf(SammelrechungArt <> 6, Belegsbezeichnung & "sanhänge_", Belegsbezeichnung & "_") & RgNr & extension, extension,, False, "Zusammenfassung")
|
||||||
|
|
||||||
If RECHNUNG IsNot Nothing AndAlso RECHNUNG.Firma_ID = 19 Then
|
If RECHNUNG IsNot Nothing AndAlso RECHNUNG.Firma_ID = 19 Then
|
||||||
|
|
||||||
|
|||||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
|||||||
' übernehmen, indem Sie "*" eingeben:
|
' übernehmen, indem Sie "*" eingeben:
|
||||||
' <Assembly: AssemblyVersion("1.0.*")>
|
' <Assembly: AssemblyVersion("1.0.*")>
|
||||||
|
|
||||||
<Assembly: AssemblyVersion("1.4.2.5")>
|
<Assembly: AssemblyVersion("1.4.2.6")>
|
||||||
<Assembly: AssemblyFileVersion("1.4.2.5")>
|
<Assembly: AssemblyFileVersion("1.4.2.6")>
|
||||||
|
|||||||
Reference in New Issue
Block a user