phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

updated 100% stratus to auto calculate std dev

Browse Source
This commit is contained in:
Infineon\StieberD
2024-09-19 11:43:27 -07:00
committed by Stieber Daniel (IT FI MES)
parent b0b127cd87
commit 2dc8a264c2
8 changed files with 24560 additions and 3666 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
LSL2/STPROC/LOGON_EVENTS.txt
View File

@ -230,21 +230,21 @@ Event PUB_OK.CLICK()
Valid = WritePrivateProfileString(lpszSection, lpszEntry, lpszValue, lpszFileName)
End_Dialog(@Window, AccessLevel)
end else
Set_Property(@Window : '.EDL_USERNAME', 'FOCUS', True$)
Set_Property(@Window : '.EDL_USERNAME', 'SELECTION', 1 : @FM : 999)
Set_Property(@Window : '.EDL_PASSWORD', 'FOCUS', True$)
Set_Property(@Window : '.EDL_PASSWORD', 'SELECTION', 1 : @FM : 999)
Message = 'Unable to validate username. Please re-enter.'
Form_Services('DisplayControlMessage', Message, 'MES Logon', @Window : '.EDL_USERNAME', 'VALIDATION', 'RGB(229,20,0)')
end
end else
Set_Property(@Window : '.EDL_USERNAME', 'FOCUS', True$)
Set_Property(@Window : '.EDL_USERNAME', 'SELECTION', 1 : @FM : 999)
Set_Property(@Window : '.EDL_PASSWORD', 'FOCUS', True$)
Set_Property(@Window : '.EDL_PASSWORD', 'SELECTION', 1 : @FM : 999)
Message = Error_Services('GetMessage')
If Message EQ '' then Message = 'Unable to validate username. Please re-enter.'
Form_Services('DisplayControlMessage', Message, 'MES Logon', @Window : '.EDL_USERNAME', 'VALIDATION', 'RGB(229,20,0)')
end
end else
Set_Property(@Window : '.EDL_USERNAME', 'FOCUS', True$)
Set_Property(@Window : '.EDL_USERNAME', 'SELECTION', 1 : @FM : 999)
Set_Property(@Window : '.EDL_PASSWORD', 'FOCUS', True$)
Set_Property(@Window : '.EDL_PASSWORD', 'SELECTION', 1 : @FM : 999)
Message = Error_Services('GetMessage')
If Message EQ '' then Message = 'System unavailable.'
Form_Services('DisplayControlMessage', Message, 'MES Logon', @Window : '.EDL_USERNAME', 'VALIDATION', 'RGB(229,20,0)')
@ -265,6 +265,3 @@ Setup_OLE_Controls:
return