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

RO übersetzungen MDM Abholinfos, NCTS_TR ATEZ Anpassungen

Browse Source
This commit is contained in:
Andreas Luxbauer
2023-02-02 13:05:54 +01:00
parent cf6e1fd0cb
commit c984590127
12 changed files with 36 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
VERAG_PROG_ALLGEMEIN/Classes/cAvisoBenachrichtigungen.vb
View File

@@ -84,12 +84,12 @@ Public Class cAvisoBenachrichtigungen
End Function
Public Shared Function BESTAETIGEN_BENACHRICHTIGUNG_ALL(ab_AvisoID, onlytype) As Boolean
Dim sqlstr = " Update [tblAvisoBenachrichtigungen] SET ab_Status = 1,ab_Bestaetigt_MaId=-1,ab_Bestaetigt_Datum=getDate() WHERE ab_AvisoID=" & ab_AvisoID & If(onlytype, " and ab_art='A' ", "")
Dim sqlstr = " Update [tblAvisoBenachrichtigungen] SET ab_Status = 1,ab_Bestaetigt_MaId='" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRID & "',ab_Bestaetigt_Datum=getDate() WHERE ab_AvisoID=" & ab_AvisoID & If(onlytype, " and ab_art='A' ", "")
Return SQL.doSQL(sqlstr, "AVISO")
End Function
Public Shared Function BESTAETIGEN_BENACHRICHTIGUNG_SND([ab_SendungID], onlytype) As Boolean
Dim sqlstr = " Update [tblAvisoBenachrichtigungen] SET ab_Status = 1,ab_Bestaetigt_MaId=-1,ab_Bestaetigt_Datum=getDate() WHERE [ab_SendungID]=" & [ab_SendungID]
Dim sqlstr = " Update [tblAvisoBenachrichtigungen] SET ab_Status = 1,ab_Bestaetigt_MaId='" & VERAG_PROG_ALLGEMEIN.cAllgemein.USRID & "',ab_Bestaetigt_Datum=getDate() WHERE [ab_SendungID]=" & [ab_SendungID]
Return SQL.doSQL(sqlstr, "AVISO")
End Function
@@ -235,3 +235,15 @@ Public Class cAvisoBenachrichtigungen
End Class
Public Class cAvisoBenachrichtigungenCodes
Public Shared Neukunde_bitte_Abklärung As Integer = 1
Public Shared Neukunde_abgeklärt As Integer = 2
Public Shared An_Abklärung As Integer = 3
Public Shared Abklärung_OK As Integer = 4
Public Shared Vermerke_Reminder As Integer = 5
Public Shared Vorauskasse_OK As Integer = 6
Public Shared ZOLL_Dokumentenbeschau As Integer = 7
End Class