YOKOGAWA TA720 User Manual page 114

6.6 Querying the Measured Statistical Values of Period A & Period B Measurement (for GP-IB)
Next i
msg = ":COMMUNICATE:HEADER ON" + term
sts = ilwrt(Dev, msg, Len(msg))
If (sts < 0) Then
End If
Call ibonl(Dev, 0)
GetStatistics2 = 0
End Function
————————————————————————————————————————————————————————————————————————————————————————
IM 704510-17E
Exit Function
End If
sts = ilrd(Dev, qry, Len(qry))
If (sts < 0) Then
Call DisplayGPIBError(sts, msg)
GetStatistics2 = 1
Exit Function
End If
temp = Left$(qry, ibcntl - 1)
Query(i) = Query(i) + Space$(13 - Len(temp)) + temp
Call DisplayGPIBError(sts, msg)
GetStatistics2 = 1
Exit Function
'Receive Query
'Header = ON
'Send Command
6
6-13