Screen Script

To edit the screen script for a project screen, do one of the following:


This interface can be used to execute logics on the following events, based on preconfigured sub-routines:

The variables and procedures declared in this interface are available for the VBScript interfaces of the screen where the Screen Script is configured.

CAUTION:
Do not change the names of the preconfigured sub-routines described above. If you do, then the system will not be able to call them.
Note:
Example:
'Variables available on this screen can be declared and initialized here
Dim Counter

'Procedures available on this screen can be implemented here
Function AreaCircle(radius)
  AreaCircle = Sqr(radius) * $Pi()
End Function

Sub CheckLoLimit (myValue, myLoLimit)
  If myValue < myLoLimit Then
	MsgBox("Value out of range")
  End If
End Sub

'This procedure determines whether the screen is automatically closed
Function Screen_IsClosedByReplace()
  Screen_IsClosedByReplace = $ReplaceModeTag
End Function

'This procedure is executed just once when this screen is open
Sub Screen_OnOpen()
  MsgBox("The screen was open!")
End Sub

'This procedure is executed continuously while this screen is open
Sub Screen_WhileOpen()
  If Counter < 100 Then
	Counter = Counter + 1
  Else
	Counter = 0
  End If
  $SimulationTag = Counter
End Sub

'This procedure is executed just once when this screen is closed
Sub Screen_OnClose()
  MsgBox("The screen will be closed!")
End Sub