MS Init LanguageCodeShort

This commit is contained in:
SchreiberM 2022-05-19 13:19:10 +02:00
parent 0753967b9b
commit 9f6e89fcea

View File

@ -269,6 +269,7 @@ Public Class ClassInit
oBaseSQL = oBaseSQL.Replace("@USRNAME", My.Application.User.UserName)
oBaseSQL = oBaseSQL.Replace("@UserName", My.Application.User.UserName)
oBaseSQL = oBaseSQL.Replace("@LANG_CODE", My.Application.User.Language)
oBaseSQL = oBaseSQL.Replace("@LANG_CODE_SHORT", Right(My.Application.User.Language, 2)
oBaseSQL = oBaseSQL.Replace("{#INT#USERNAME}", My.Application.User.UserName)
If oTITLE = SQLCMD_FLOW_SEARCH_BASE Then