Remove Language

This commit is contained in:
Jonathan Jenne
2023-10-13 11:07:55 +02:00
parent 348d054e16
commit e402cdaf5c
30 changed files with 21 additions and 830 deletions

View File

@@ -1,9 +1,9 @@
Imports System.IO
Imports System.ServiceModel
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.EDMI.API.Constants
Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
Imports DigitalData.Modules.EDMI.API.Rights
Imports DigitalData.Modules.Language.Utils
Imports DigitalData.Modules.Logging
Public Class Client
@@ -550,10 +550,10 @@ Public Class Client
.Id = oRow.Item("AttributeId"),
.Title = oRow.Item("AttributeTitle"),
.Type = oRow.Item("AttributeType"),
.ValueBigInt = NotNull(oRow.Item("ValueBigInt"), Nothing),
.ValueDate = NotNull(oRow.Item("ValueDate"), Nothing),
.ValueDecimal = NotNull(oRow.Item("ValueDecimal"), Nothing),
.ValueText = NotNull(oRow.Item("ValueText"), Nothing)
.ValueBigInt = oRow.ItemEx(Of Object)("ValueBigInt", Nothing),
.ValueDate = oRow.ItemEx(Of Object)("ValueDate", Nothing),
.ValueDecimal = oRow.ItemEx(Of Object)("ValueDecimal", Nothing),
.ValueText = oRow.ItemEx(Of Object)("ValueText", Nothing)
}
oAttributes.Add(oAttribute)
@@ -932,11 +932,11 @@ Public Class Client
Private Function GetUserLanguage(pOverrideLanguage As String) As String
Return NotNull(pOverrideLanguage, Threading.Thread.CurrentThread.CurrentUICulture.Name)
Return ObjectEx.NotNull(pOverrideLanguage, Threading.Thread.CurrentThread.CurrentUICulture.Name)
End Function
Private Function GetUserName(pOverrideName) As String
Return NotNull(pOverrideName, Environment.UserName)
Return ObjectEx.NotNull(pOverrideName, Environment.UserName)
End Function
#End Region