' ******************************************************************************
' swxJRNL.swj - journal recorded on 04/15/02 by craig
' ******************************************************************************

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:\soliddata\mooring\M2\options\NMC test\IBC\IBC Conversion Rails.SLDASM", 2, 0, "", longstatus)
Set Part = swApp.ActivateDoc ("IBC Conversion Rails.SLDASM")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ShowNamedView2 "*Isometric", 7
Part.ActiveView().RotateAboutCenter -0.00479807, 0
Part.ActiveView().RotateAboutCenter -0.182327, -0.159202
Part.ActiveView().RotateAboutCenter -0.115154, -0.216515
Part.ActiveView().RotateAboutCenter -0.0623749, -0.706858
Part.ActiveView().RotateAboutCenter -0.00959614, -0.0955214
Part.ActiveView().RotateAboutCenter 0, -0.146466
Part.ActiveView().RotateAboutCenter 0.0143942, -0.241988
Part.ActiveView().RotateAboutCenter 0.177529, 0.0955214
Part.ActiveView().RotateAboutCenter 0.0191923, 0.56676
Part.ActiveView().RotateAboutCenter -0.0431826, 0.16557
Part.ActiveView().RotateAboutCenter 0, 0.0509447
Part.ActiveView().RotateAboutCenter 0.0527788, 0.222883
Part.ActiveView().RotateAboutCenter 0.00959614, 0.0127362
Part.ActiveView().RotateAboutCenter -0.00479807, -0.0955214
Part.ActiveView().RotateAboutCenter 0.0335865, -0.127362
Part.ActiveView().RotateAboutCenter 0.105558, -0.0827852
Part.ActiveView().RotateAboutCenter 0.0815672, 0.00636809
Part.ActiveView().RotateAboutCenter 0.0479807, 0.0573128
Part.ActiveView().RotateAboutCenter 0.0815672, 0.140098
Part.ActiveView().RotateAboutCenter 0.163134, 0.114626
Part.ActiveView().RotateAboutCenter 0.12475, 0.0955214
Part.ActiveView().RotateAboutCenter 0.0575768, 0.0382086
Part.ActiveView().RotateAboutCenter 0.071971, 0.0254724
Part.ActiveView().RotateAboutCenter 0.067173, 0.0254724
Part.ActiveView().RotateAboutCenter 0.0191923, 0.00636809
Part.ActiveView().RotateAboutCenter 0.00479807, 0
Part.ActiveView().RotateAboutCenter 0.0575768, -0.0191043
Part.ActiveView().RotateAboutCenter 0.0527788, -0.0127362
Part.ActiveView().RotateAboutCenter 0.0143942, -0.00636809
Part.ActiveView().RotateAboutCenter 0.0191923, -0.0127362
Part.ActiveView().RotateAboutCenter 0.0191923, -0.00636809
Part.ActiveView().RotateAboutCenter 0.0431826, 0
Part.ActiveView().RotateAboutCenter 0.0239903, 0
Part.ActiveView().RotateAboutCenter 0.0143942, 0
Part.ActiveView().RotateAboutCenter -0.00479807, 0
Part.ActiveView().RotateAboutCenter -0.201519, -0.00636809
Part.ActiveView().RotateAboutCenter -0.196721, -0.0191043
Part.ActiveView().RotateAboutCenter -0.158336, -0.00636809
Part.ActiveView().RotateAboutCenter -0.254298, -0.00636809
Part.ActiveView().RotateAboutCenter -0.12475, -0.0127362
Part.ActiveView().RotateAboutCenter -0.0143942, 0
Part.ActiveView().RotateAboutCenter -0.0479807, 0
Part.ActiveView().RotateAboutCenter -0.0815672, 0
Part.ActiveView().RotateAboutCenter -0.00959614, -0.00636809
Part.ActiveView().RotateAboutCenter -0.0287884, 0
Part.ActiveView().RotateAboutCenter -0.0143942, 0
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter -0.0143942, -0.0764171
Part.ActiveView().RotateAboutCenter -0.00479807, -0.0254724
Part.ActiveView().RotateAboutCenter -0.0287884, -0.140098
Part.ActiveView().RotateAboutCenter -0.0383846, -0.216515
Part.ActiveView().RotateAboutCenter -0.00959614, -0.0573128
Part.ActiveView().RotateAboutCenter 0, -0.0636809
Part.ActiveView().RotateAboutCenter 0, -0.0445767
Part.ActiveView().RotateAboutCenter 0, -0.0254724
Part.ActiveView().RotateAboutCenter 0, -0.0127362
Part.ActiveView().RotateAboutCenter 0, -0.0127362
Part.ActiveView().RotateAboutCenter -0.00479807, -0.203779
Part.ActiveView().RotateAboutCenter 0.00959614, -0.0955214
Part.ActiveView().RotateAboutCenter 0.00959614, -0.070049
Part.ActiveView().RotateAboutCenter -0.0143942, 0
Part.ActiveView().RotateAboutCenter -0.00479807, 0
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter -0.00479807, -0.0445767
Part.ActiveView().RotateAboutCenter 0.0191923, 0.0254724
Part.ActiveView().RotateAboutCenter 0, 0.00636809
Part.ActiveView().RotateAboutCenter -0.00479807, 0.0191043
Part.ActiveView().RotateAboutCenter -0.0239903, 0.101889
Part.ActiveView().RotateAboutCenter 0, 0.0382086
Part.ActiveView().RotateAboutCenter 0, 0.0509447
Part.ActiveView().RotateAboutCenter 0.0383846, 0.152834
Part.ActiveView().RotateAboutCenter 0.0335865, 0.0827852
Part.ActiveView().RotateAboutCenter 0.0383846, 0.0891533
Part.ActiveView().RotateAboutCenter 0, 0.0191043
Part.ActiveView().RotateAboutCenter -0.0191923, 0.0827852
Part.ActiveView().RotateAboutCenter -0.0287884, 0.0764171
Part.ActiveView().RotateAboutCenter -0.00959614, 0.152834
Part.ActiveView().RotateAboutCenter -0.00479807, 0.235619
Part.ActiveView().RotateAboutCenter -0.00959614, 0.0891533
Part.ActiveView().RotateAboutCenter -0.100759, 0.184675
Part.ActiveView().RotateAboutCenter -0.0335865, 0.0573128
Part.ActiveView().RotateAboutCenter 0.00479807, 0
Part.ActiveView().RotateAboutCenter 0.00959614, 0.00636809
Part.ActiveView().RotateAboutCenter 0.00479807, 0
Part.ActiveView().RotateAboutCenter 0, 0.0191043
Part.ActiveView().RotateAboutCenter -0.0479807, 0.197411
Part.ActiveView().RotateAboutCenter 0.00959614, 0.00636809
Part.ActiveView().RotateAboutCenter 0.211115, 0.0127362
Part.ActiveView().RotateAboutCenter 0.0191923, 0.00636809
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter 0.211115, -0.0573128
Part.ActiveView().RotateAboutCenter 0.177529, 0.00636809
Part.ActiveView().RotateAboutCenter 0, 0.00636809
Part.ActiveView().RotateAboutCenter -0.00479807, 0
Part.ActiveView().RotateAboutCenter 0.00479807, 0
Part.ActiveView().RotateAboutCenter 0.110356, -0.00636809
Part.ActiveView().RotateAboutCenter 0.110356, 0
Part.ActiveView().RotateAboutCenter 0.0479807, 0
Part.ActiveView().RotateAboutCenter -0.0863652, -0.0127362
Part.ActiveView().RotateAboutCenter -1.03638, -0.159202
Part.ActiveView().RotateAboutCenter -0.383846, -0.0573128
Part.ActiveView().RotateAboutCenter -0.00959614, -0.00636809
Part.ActiveView().RotateAboutCenter 0.0239903, -0.0318405
Part.ActiveView().RotateAboutCenter 0.220711, -0.0891533
Part.ActiveView().RotateAboutCenter 0.0767691, 0.0509447
Part.ActiveView().RotateAboutCenter 0.067173, 0.120994
Part.ActiveView().RotateAboutCenter 0.00959614, 0.0127362
Part.ActiveView().RotateAboutCenter -0.0383846, -0.00636809
Part.ActiveView().RotateAboutCenter -0.14874, -0.114626
Part.ActiveView().RotateAboutCenter -0.00479807, -0.0191043
Part.ActiveView().RotateAboutCenter -0.0239903, -0.0764171
Part.ActiveView().RotateAboutCenter -0.00479807, -0.0127362
Part.ActiveView().RotateAboutCenter 0.0143942, -0.00636809
Part.ActiveView().RotateAboutCenter 0.071971, 0
Part.ActiveView().RotateAboutCenter 0.0287884, 0.0191043
Part.ActiveView().RotateAboutCenter 0.129548, 0.0636809
Part.ActiveView().RotateAboutCenter 0.071971, 0.0764171
Part.ActiveView().RotateAboutCenter 0.00479807, 0.0254724
Part.ActiveView().RotateAboutCenter 0.00959614, 0.00636809
Part.ActiveView().RotateAboutCenter 0.0863652, 0.114626
Part.ActiveView().RotateAboutCenter 0.0239903, 0.0445767
Part.ActiveView().RotateAboutCenter 0.00479807, 0.00636809
Part.ActiveView().RotateAboutCenter 0, 0.0127362
Part.ActiveView().RotateAboutCenter -0.00479807, 0
Part.ActiveView().RotateAboutCenter -0.0239903, 0.00636809
Part.ActiveView().RotateAboutCenter -0.0335865, 0.00636809
Part.ActiveView().RotateAboutCenter 0.00479807, 0
Part.ActiveView().RotateAboutCenter 0.00959614, 0.00636809
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter 0, -0.719595
Part.ActiveView().RotateAboutCenter 0, -0.738699
Part.ActiveView().RotateAboutCenter 0.0239903, -0.146466
Part.ActiveView().RotateAboutCenter 0.0191923, -0.152834
Part.ActiveView().RotateAboutCenter 0.0239903, -0.13373
Part.ActiveView().RotateAboutCenter 0, -0.0764171
Part.ActiveView().RotateAboutCenter 0.00479807, -0.16557
Part.ActiveView().RotateAboutCenter 0.00959614, -0.197411
Part.ActiveView().RotateAboutCenter 0.0143942, -0.40119
Part.ActiveView().RotateAboutCenter 0.00479807, -0.362981
Part.ActiveView().RotateAboutCenter 0.00479807, -0.191043
Part.ActiveView().RotateAboutCenter 0, -0.13373
Part.ActiveView().RotateAboutCenter 0.00959614, -0.171939
Part.ActiveView().RotateAboutCenter 0, -0.0191043
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter 0.00479807, -0.0127362
Part.ActiveView().RotateAboutCenter 0.0431826, -0.0573128
Part.ActiveView().RotateAboutCenter 0.0527788, -0.0445767
Part.ActiveView().RotateAboutCenter 0.0479807, 0.0445767
Part.ActiveView().RotateAboutCenter 0.00959614, 0.00636809
Part.ActiveView().RotateAboutCenter -0.00479807, 0
Part.ActiveView().RotateAboutCenter -0.0143942, -0.159202
Part.ActiveView().RotateAboutCenter 0, -0.0764171
Part.ActiveView().RotateAboutCenter -0.00479807, -0.0636809
Part.ActiveView().RotateAboutCenter -0.0431826, -0.16557
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter 0, -0.0127362
Part.ActiveView().RotateAboutCenter 0, -0.0382086
Part.ActiveView().RotateAboutCenter 0, -0.0318405
Part.ActiveView().RotateAboutCenter 0, -0.0318405
Part.ActiveView().RotateAboutCenter 0.00479807, -0.0191043
Part.ActiveView().RotateAboutCenter 0.00479807, -0.00636809
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter 0, -0.00636809
Part.ActiveView().RotateAboutCenter 0.00479807, -0.114626
Set Part = Nothing
swApp.CloseDoc "IBC Conversion Rails.SLDASM"
swApp.ExitApp
End Sub
