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

vers

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-05-16 10:49:00 +02:00
parent 3a7af7940e
commit dbb7a78111
6 changed files with 513 additions and 100 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
VERAGMonitoring/cSqlDb.vb
View File

@@ -1151,6 +1151,16 @@ Public Class cBrgDb
cMonitoringBrg.brgusrset_gvvAt_ATILLA_woche_warn1 = dr.Item("brgusrset_gvvAt_ATILLA_woche_warn1")
cMonitoringBrg.brgusrset_gvvAt_ATILLA_woche_warn2 = dr.Item("brgusrset_gvvAt_ATILLA_woche_warn2")
cMonitoringBrg.brgusrset_gvvAt_CS_at_summe = dr.Item("brgusrset_gvvAt_CS_at_summe")
cMonitoringBrg.brgusrset_gvvAt_CS_tag_warn1 = dr.Item("brgusrset_gvvAt_CS_tag_warn1")
cMonitoringBrg.brgusrset_gvvAt_CS_tag_warn2 = dr.Item("brgusrset_gvvAt_CS_tag_warn2")
cMonitoringBrg.brgusrset_gvvAt_CS_woche_warn1 = dr.Item("brgusrset_gvvAt_CS_woche_warn1")
cMonitoringBrg.brgusrset_gvvAt_CS_woche_warn2 = dr.Item("brgusrset_gvvAt_CS_woche_warn2")
End If
Return cMonitoringBrg
Catch ex As Exception
@@ -1177,8 +1187,11 @@ Public Class cBrgDb
" brgusrset_aufschub_AG_de_summe=@brgusrset_aufschub_AG_de_summe, brgusrset_aufschub_AG_de_warn1=@brgusrset_aufschub_AG_de_warn1, brgusrset_aufschub_AG_de_warn2=@brgusrset_aufschub_AG_de_warn2, brgusrset_aufschub_AG_at_summe=@brgusrset_aufschub_AG_at_summe, brgusrset_aufschub_AG_at_warn1=@brgusrset_aufschub_AG_at_warn1, brgusrset_aufschub_AG_at_warn2=@brgusrset_aufschub_AG_at_warn2, brgusrset_aufschub_CS_at_summe=@brgusrset_aufschub_CS_at_summe, brgusrset_aufschub_CS_at_warn1=@brgusrset_aufschub_CS_at_warn1, brgusrset_aufschub_CS_at_warn2=@brgusrset_aufschub_CS_at_warn2, brgusrset_aufschub_ZS_at_summe=@brgusrset_aufschub_ZS_at_summe, brgusrset_aufschub_ZS_at_warn1=@brgusrset_aufschub_ZS_at_warn1, brgusrset_aufschub_ZS_at_warn2=@brgusrset_aufschub_ZS_at_warn2, " &
" brgusrset_aufschub_imex_de_summe=@brgusrset_aufschub_imex_de_summe,brgusrset_aufschub_imex_de_warn1=@brgusrset_aufschub_imex_de_warn1,brgusrset_aufschub_imex_de_warn2=@brgusrset_aufschub_imex_de_warn2,brgusrset_gvvAt_imex_de_summe =@brgusrset_gvvAt_imex_de_summe,brgusrset_gvvAt_imex_tag_warn1=@brgusrset_gvvAt_imex_tag_warn1,brgusrset_gvvAt_imex_tag_warn2=@brgusrset_gvvAt_imex_tag_warn2,brgusrset_gvvAt_imex_woche_warn1=@brgusrset_gvvAt_imex_woche_warn1,brgusrset_gvvAt_imex_woche_warn2=@brgusrset_gvvAt_imex_woche_warn2, " &
" brgusrset_gvvAt_ATILLA_de_summe =@brgusrset_gvvAt_ATILLA_de_summe,brgusrset_gvvAt_ATILLA_tag_warn1=@brgusrset_gvvAt_ATILLA_tag_warn1,brgusrset_gvvAt_ATILLA_tag_warn2=@brgusrset_gvvAt_ATILLA_tag_warn2,brgusrset_gvvAt_ATILLA_woche_warn1=@brgusrset_gvvAt_ATILLA_woche_warn1,brgusrset_gvvAt_ATILLA_woche_warn2=@brgusrset_gvvAt_ATILLA_woche_warn2 " &
" brgusrset_gvvAt_CS_at_summe =@brgusrset_gvvAt_CS_at_summe,brgusrset_gvvAt_CS_tag_warn1=@brgusrset_gvvAt_CS_tag_warn1,brgusrset_gvvAt_CS_tag_warn2=@brgusrset_gvvAt_CS_tag_warn2,brgusrset_gvvAt_CS_woche_warn1=@brgusrset_gvvAt_CS_woche_warn1,brgusrset_gvvAt_CS_woche_warn2=@brgusrset_gvvAt_CS_woche_warn2 " &
" WHERE brgusrset_id=@brgusrset_id "
Using conn As SqlConnection = VERAG_PROG_ALLGEMEIN.SQL.GetNewOpenConnectionADMIN()
Using cmd As New SqlCommand(sql, conn)
'msgbo
@@ -1228,6 +1241,13 @@ Public Class cBrgDb
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_ATILLA_tag_warn2", d.brgusrset_gvvAt_ATILLA_tag_warn2)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_ATILLA_woche_warn1", d.brgusrset_gvvAt_ATILLA_woche_warn1)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_ATILLA_woche_warn2", d.brgusrset_gvvAt_ATILLA_woche_warn2)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_CS_at_summe", d.brgusrset_gvvAt_CS_at_summe)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_CS_tag_warn1", d.brgusrset_gvvAt_CS_tag_warn1)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_CS_tag_warn2", d.brgusrset_gvvAt_CS_tag_warn2)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_CS_woche_warn1", d.brgusrset_gvvAt_CS_woche_warn1)
cmd.Parameters.AddWithValue("@brgusrset_gvvAt_CS_woche_warn2", d.brgusrset_gvvAt_CS_woche_warn2)
Try
cmd.ExecuteNonQuery()
Return True