jj fix date format

This commit is contained in:
Jonathan Jenne
2017-08-17 11:21:50 +02:00
parent 2a396414b9
commit 96c08ada63
2 changed files with 52 additions and 7 deletions

View File

@@ -1374,6 +1374,10 @@ Public Class frmConstructor_Main
' Exit Sub
'End If
'Try
'CURRENT_DATE_FORMAT = USER_DATE_FORMAT
If NODE_NAVIGATION = True Then
If NODE_NAVIGATION_LOADED = True Then
Exit Sub
@@ -1397,10 +1401,10 @@ Public Class frmConstructor_Main
' CONSTRUCT_EXPAND = result.Item("EXPAND")
Dim FORM_DATE_FORMAT = result.Item("DATE_FORMAT")
If FORM_DATE_FORMAT <> USER_DATE_FORMAT Then
CURRENT_DATE_FORMAT = FORM_DATE_FORMAT
Else
CURRENT_DATE_FORMAT = USER_DATE_FORMAT
End If
CURRENT_DATE_FORMAT = USER_DATE_FORMAT
Else
CURRENT_DATE_FORMAT = FORM_DATE_FORMAT
End If
LOCK_CONTROLS_BG_LOAD = result.Item("LOCK_CONTROLS_BG_LOAD")
If NODE_NAVIGATION = True Then
If SelectedNode.Tag.ToString.Contains("RECORD_ID") Then