Teledyne LeCroy SAS_SATA Automation API manual - Manual (Page 68)

Teledyne LeCroy SASTrace Object
62 Automation API for Teledyne LeCroy SAS/SATA Protocol Suite
End If
MySTATS.ReportText ("Number of packets in trace file :
" & CSTR(SASTracer.GetPacketsCount()))
'Get specific row of spread sheet view.
start_row = SASTracer.GetPacketRow (0, 5)
If Err.Number <> 0 Then
MySTATS.ReportError Err.number, Err.Description
result = 2 ' fail
End If
end_row = SASTracer.GetPacketRow (100, 5)
If Err.Number <> 0 Then
MySTATS.ReportError Err.number, Err.Description
result = 2 ' fail
End If
MySTATS.ReportText
("Star export row: " & CSTR(start_row))
MySTATS.ReportText ("End export row: " & CSTR(end_row))
SASTracer.ExportToText
ProjectPath & "SpreadSheet.txt", 5, start_row, end_row
SASTracer.ExportToText
ProjectPath & "FrameView.txt", 1 ' entire sample
If Err.Number <> 0 Then
MySTATS.ReportError Err.number, Err.Description
result = 2 ' fail
Else
MySTATS.ReportText ("Export to text has been done.")
End If
SASTracer.ExportToExcel
ProjectPath & "SpreadSheet.csv", 5 ' entire sample
SASTracer.ExportToExcel
ProjectPath & "FrameView.csv", 1, 1, 100 ' from row 1 to 100
If Err.Number <> 0 Then
MySTATS.ReportError Err.number, Err.Description
result = 2 ' fail
Else
MySTATS.ReportText ("Export to Excel has been done.")
End If
SASTracer.Close()
If Err.Number <> 0 Then
MySTATS.ReportError Err.number, Err.Description
result = 2 ' fail
Else
MySTATS.ReportText ("Trace file is closed")
End If
'#########################################
'Report the result.
MySTATS.ReportResult(result)