AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS diverses

Browse Source
This commit is contained in:
SchreiberM
2022-05-17 08:14:06 +02:00
parent 8f1ab41d64
commit c329f42cdd
23 changed files with 1467 additions and 148 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
GUIs.ZooFlow/Queries/ClassCommonQueries.vb
View File

@@ -13,4 +13,13 @@
Public Function IDB_CATALOG() As String
Return String.Format("SELECT * FROM TBIDB_CATALOG")
End Function
Public Function DOCRESULT_TODAY() As String
Return $"SELECT * FROM VWIDB_DOCRESULT_{IIf(My.Application.User.Language = "de-DE", "DE", "EN")} WHERE CONVERT(DATE,[Added when]) = CONVERT(DATE,GetDate())"
End Function
Public Function DOCRESULT_DocID(DocID As Long) As String
Return $"SELECT * FROM VWIDB_DOCRESULT_{IIf(My.Application.User.Language = "de-DE", "DE", "EN")} WHERE DocID = {DocID}"
End Function
Public Function DOCRESULT_TODAY_ME() As String
Return $"SELECT * FROM VWIDB_DOCRESULT_{IIf(My.Application.User.Language = "de-DE", "DE", "EN")} WHERE CONVERT(DATE,[Added when]) = CONVERT(DATE,GetDate()) AND [Added who] = '{My.Application.User.UserName}'"
End Function
End Class