This method sets the current report as the default report for the measurement routine.
Visual Basic |
---|
Public Function SetCurrentAsDefaultReport() As Long |
Long value. This returns -1 (or True) if the function succeeds and 0 (or False) if it does not.
Sub Main
Dim App As Object
Dim PartProg As Object
Dim RepWin As Object
Set App = CreateObject("Pcdlrn.Application")
Set PartProg = App.ActivePartProgram
Set RepWin = PartProg.ReportWindow
' Sets the current custom report or template as the default
RepWin.SetCurrentAsDefaultReport
End Sub