Movicon Help on Line - Rel. 11.7.1301
Syntax |
TextualRptSQLQuery = _String |
||
Description |
This property is used for setting or returning the query to be used for extracting data from the DataLogger or Recipe selected from a "Textual Report" or "Embedded Report". Query must be in the right context according database used and variable names cannot be inserted to make query dynamic.
|
Parameter |
Description |
None |
None |
Result
|
String |
Example1:
Public Sub Click()
Dim objButtonRelease As ButtonCmdTarget
Dim objCommandList As CommandsListCmdTarget
Dim objCommandReport As CommandReportCmdTarget
Set objButtonRelease = GetSynopticObject.GetSubObject("objButtonRelease").GetObjectInterface
Set objCommandList = objButtonRelease.GetCommandsInterfaceOnRelease
Set objCommandReport = objCommandList.GetCommandInterfaceAtPos(0)
objCommandReport.TextualRptSQLQuery = "Select * From DataLogger1"
objCommandList.SaveChanges
Set objCommandReport = Nothing
Set objCommandList = Nothing
Set objButtonRelease = Nothing
End Sub
Example2:
Public Sub Click()
Dim objRect As DrawCmdTarget
Dim objCommandList As CommandsListCmdTarget
Dim objCommandReport As CommandReportCmdTarget
Set objRect = GetSynopticObject.GetSubObject("objRect")
Set objCommandList = objRect.GetCommandsInterfaceOnRelease
Set objCommandReport = objCommandList.GetCommandInterfaceAtPos(0)
objCommandReport.TextualRptSQLQuery = "Select * From DataLogger1"
objCommandList.SaveChanges
Set objCommandReport = Nothing
Set objCommandList = Nothing
Set objRect = Nothing
End Sub