Option Explicit Dim g As SWXRuntimeLib.Global ------------------------------------------------------------- Public Sub NewScript(td As TriggerData) On Error GoTo ErrHandler ' TODO: Add your code here g.ConsoleMsg MSG_INFO_VERBOSE, "Script", "Script Triggered" Dim TimeStamp1 As Date TimeStamp1 = Now() 'use raw date-time format for inserting into SQL Table DateTime column ' Motor Data variable declarations Dim WindingNo As String, WindingNoTrim As String, MachineSrNo As String, MachineSrNoTrim As String Dim ModelNo As String, FGCode As String, OperatorName As String, DateTimeInfo As String Dim RatedSpd As Integer, EncoderPPR As Integer, InvSwFreq As Integer Dim RatedI As Double, RatedT As Double, RatedF As Double, StallI As Double ' No Load Test variable declarations Dim RY_L...