edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

TimasAPI, Uberstunden, Mailvorlagen, etc,

Browse Source
This commit is contained in:
d.breimaier
2024-04-24 11:09:58 +02:00
parent a7371e22ae
commit 41a236ad45
12 changed files with 323 additions and 91 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
VERAG_PROG_ALLGEMEIN/Classes/cTextkonserve.vb
View File

@@ -44,7 +44,7 @@ Public Class cTextkonserve_LIST
Try
SPRACHENLIST.Clear()
For Each r In SQL.loadDgvBySql("Select distinct(txt_sprache) FROM [tblTextkonserve] WHERE txt_FIRMA = '" & txt_FIRMA & "' order by txt_sprache", "FMZOLL").Rows
For Each r In SQL.loadDgvBySql("Select distinct(txt_sprache) FROM [tblTextkonserve] WHERE txt_FIRMA = '" & txt_FIRMA & "' and txt_dynMailvorlage = 1 order by txt_sprache", "FMZOLL").Rows
SPRACHENLIST.Add(r("txt_sprache"))
Next
@@ -71,6 +71,11 @@ Public Class cTextkonserve
Property txt_letzteAenderungUser As String
Property txt_letzteAenderung As DateTime
Property txt_sendungsvermerk As Boolean
Property txt_sendungsvermerkId As Integer
Property txt_sendungsvermerkText As String
Public hasEntry As Boolean = False
@@ -110,6 +115,9 @@ Public Class cTextkonserve
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("txt_dynMailvorlage", txt_dynMailvorlage))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("txt_letzteAenderungUser", txt_letzteAenderungUser))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("txt_letzteAenderung", txt_letzteAenderung))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("txt_sendungsvermerk", txt_sendungsvermerk))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("txt_sendungsvermerkId", txt_sendungsvermerkId))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("txt_sendungsvermerkText", txt_sendungsvermerkText))
Return list
End Function