' ******************************************************************************
' swxJRNL.swj - journal recorded on 11/16/02 by hamilton
' ******************************************************************************

Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long
Dim Annotation As Object
Dim Gtol As Object
Dim DatumTag As Object
Dim FeatureData As Object
Dim Feature As Object
Dim Component As Object
Sub main()
Set swApp = CreateObject ("SldWorks.Application")
Set Part = swApp.OpenDoc4 ("C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Clamp Rim Assembly\CLAMP-RIM ASSEMBLY.SLDASM", 2, 0, "", longstatus)
Set Part = swApp.ActivateDoc ("CLAMP-RIM ASSEMBLY")
swApp.ActiveDoc.ActiveView.FrameWidth = 810
swApp.ActiveDoc.ActiveView.FrameHeight = 707
Part.SelectByID "Default", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Default"
Part.ViewZoomTo2 -0.403065, 0.0402559, -0.10498, -0.2256, -0.133861, -0.10498
Part.ViewZoomTo2 -0.383074, 0.00517614, -0.10498, -0.273888, -0.0993959, -0.10498
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter -0.0114339, 0
Part.ActiveView().RotateAboutCenter -0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter -0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0228677, 0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0343016, 0
Part.ActiveView().RotateAboutCenter 0.0457355, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0457355, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0, -0.0399839
Part.ActiveView().RotateAboutCenter 0, -0.0699718
Part.ActiveView().RotateAboutCenter 0, -0.0699718
Part.ActiveView().RotateAboutCenter 0, -0.0399839
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0999598
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0899638
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0699718
Part.ActiveView().RotateAboutCenter 0, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0499799
Part.ActiveView().RotateAboutCenter 0, -0.0499799
Part.ActiveView().RotateAboutCenter -0.0114339, 0
Part.ActiveView().RotateAboutCenter -0.102905, -0.019992
Part.ActiveView().RotateAboutCenter -0.0800371, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0343016, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0343016, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0228677, -0.019992
Part.ActiveView().RotateAboutCenter -0.091471, -0.129948
Part.ActiveView().RotateAboutCenter -0.0343016, -0.0399839
Part.ActiveView().RotateAboutCenter -0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter -0.0457355, -0.0499799
Part.ActiveView().RotateAboutCenter -0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0, -0.0499799
Part.ActiveView().RotateAboutCenter 0, -0.0499799
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0499799
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0343016, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0686032, 0.0899638
Part.ActiveView().RotateAboutCenter 0.0457355, 0.19992
Part.ActiveView().RotateAboutCenter 0.0114339, 0.169932
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.0499799
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter -0.0114339, 0.0399839
Part.ActiveView().RotateAboutCenter -0.0228677, 0.0399839
Part.ActiveView().RotateAboutCenter -0.0228677, 0.0599759
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0599759
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter -0.0571694, 0.00999598
Part.ActiveView().RotateAboutCenter -0.102905, 0.00999598
Part.ActiveView().RotateAboutCenter -0.091471, 0
Part.ActiveView().RotateAboutCenter -0.0457355, 0
Part.ActiveView().RotateAboutCenter -0.0686032, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0571694, 0
Part.ActiveView().RotateAboutCenter -0.0457355, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0686032, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0686032, 0
Part.ActiveView().RotateAboutCenter -0.0571694, 0
Part.ActiveView().RotateAboutCenter -0.0686032, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0686032, -0.00999598
Part.ActiveView().RotateAboutCenter -0.0686032, 0
Part.ActiveView().RotateAboutCenter -0.0571694, 0
Part.ActiveView().RotateAboutCenter -0.0457355, 0
Part.ActiveView().RotateAboutCenter -0.0228677, 0
Part.ActiveView().RotateAboutCenter -0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter -0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.0299879
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter 0, 0.0399839
Part.ActiveView().RotateAboutCenter -0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter -0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0.0299879
Part.ActiveView().RotateAboutCenter 0.0228677, 0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0.019992
Part.ActiveView().RotateAboutCenter 0.0228677, 0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0.019992
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0228677, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0228677, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0343016, -0.019992
Part.ActiveView().RotateAboutCenter 0.0228677, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0343016, -0.019992
Part.ActiveView().RotateAboutCenter 0.0571694, -0.019992
Part.ActiveView().RotateAboutCenter 0.0686032, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0343016, -0.019992
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0699718
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter -0.0228677, 0.0699718
Part.ActiveView().RotateAboutCenter -0.0114339, 0.019992
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter -0.0114339, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter -0.0114339, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0228677, 0.0499799
Part.ActiveView().RotateAboutCenter -0.0457355, 0.0999598
Part.ActiveView().RotateAboutCenter -0.0571694, 0.0899638
Part.ActiveView().RotateAboutCenter -0.0457355, 0.0799678
Part.ActiveView().RotateAboutCenter -0.0571694, 0.0799678
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0499799
Part.ActiveView().RotateAboutCenter -0.0228677, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0399839
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0228677, 0.019992
Part.ActiveView().RotateAboutCenter -0.0343016, 0.019992
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0399839
Part.ActiveView().RotateAboutCenter -0.0228677, 0.019992
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0399839
Part.ActiveView().RotateAboutCenter -0.0457355, 0.0599759
Part.ActiveView().RotateAboutCenter -0.0343016, 0.0499799
Part.ActiveView().RotateAboutCenter -0.0343016, 0.019992
Part.ActiveView().RotateAboutCenter -0.0114339, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0228677, 0.0299879
Part.ActiveView().RotateAboutCenter -0.0114339, 0.00999598
Part.ActiveView().RotateAboutCenter 0, 0.00999598
Part.ActiveView().RotateAboutCenter -0.0114339, 0.019992
Part.ActiveView().RotateAboutCenter 0, 0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.102905, 0
Part.ActiveView().RotateAboutCenter 0.0343016, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ShowNamedView2 "*Isometric", 7
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0899638
Part.ActiveView().RotateAboutCenter 0.0228677, -0.119952
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0799678
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0299879
Part.ActiveView().RotateAboutCenter 0.091471, -0.0899638
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0228677, -0.019992
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0699718
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0699718
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0599759
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0699718
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0899638
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0699718
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0599759
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0343016, -0.0599759
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0399839
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0114339, -0.019992
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0, -0.019992
Part.ActiveView().RotateAboutCenter 0.0228677, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0571694, -0.0499799
Part.ActiveView().RotateAboutCenter 0.0800371, -0.0699718
Part.ActiveView().RotateAboutCenter 0.0343016, -0.019992
Part.ActiveView().RotateAboutCenter 0.0228677, -0.0299879
Part.ActiveView().RotateAboutCenter 0.0686032, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0457355, -0.0399839
Part.ActiveView().RotateAboutCenter 0.0228677, -0.019992
Part.ActiveView().RotateAboutCenter 0.0114339, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0228677, -0.00999598
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0114339, 0
Part.ActiveView().RotateAboutCenter 0.0228677, 0
Part.ActiveView().RotateAboutCenter 0.0343016, 0
Part.ActiveView().RotateAboutCenter 0.0457355, 0.00999598
Part.ActiveView().RotateAboutCenter 0.0571694, 0.019992
Part.ActiveView().RotateAboutCenter 0.0457355, 0.0599759
Part.ActiveView().RotateAboutCenter 0.0571694, 0.0899638
Part.ActiveView().RotateAboutCenter 0.0114339, 0.0699718
Part.ActiveView().RotateAboutCenter 0, 0.0999598
Part.ActiveView().RotateAboutCenter -0.0457355, 0.0899638
Part.ActiveView().RotateAboutCenter -0.0228677, 0.019992
Part.ActiveView().RotateAboutCenter -0.0228677, 0
swApp.ExitApp
End Sub