Function InsertSurfaceFinishSymbol( _
   ByVal SymType As Integer, _
   ByVal LeaderType As Integer, _
   ByVal LocX As Double, _
   ByVal LocY As Double, _
   ByVal LocZ As Double, _
   ByVal LaySymbol As Integer, _
   ByVal ArrowType As Integer, _
   ByVal MachAllowance As String, _
   ByVal OtherVals As String, _
   ByVal ProdMethod As String, _
   ByVal SampleLen As String, _
   ByVal MaxRoughness As String, _
   ByVal MinRoughness As String, _
   ByVal RoughnessSpacing As String _
) As Boolean

Dim instance As IDrawingDoc
Dim SymType As Integer
Dim LeaderType As Integer
Dim LocX As Double
Dim LocY As Double
Dim LocZ As Double
Dim LaySymbol As Integer
Dim ArrowType As Integer
Dim MachAllowance As String
Dim OtherVals As String
Dim ProdMethod As String
Dim SampleLen As String
Dim MaxRoughness As String
Dim MinRoughness As String
Dim RoughnessSpacing As String
Dim value As Boolean
 
value = instance.InsertSurfaceFinishSymbol(SymType, LeaderType, LocX, LocY, LocZ, LaySymbol, ArrowType, MachAllowance, OtherVals, ProdMethod, SampleLen, MaxRoughness, MinRoughness, RoughnessSpacing)

bool InsertSurfaceFinishSymbol( 
   int SymType,
   int LeaderType,
   double LocX,
   double LocY,
   double LocZ,
   int LaySymbol,
   int ArrowType,
   string MachAllowance,
   string OtherVals,
   string ProdMethod,
   string SampleLen,
   string MaxRoughness,
   string MinRoughness,
   string RoughnessSpacing
)

bool InsertSurfaceFinishSymbol( 
&   int SymType,
&   int LeaderType,
&   double LocX,
&   double LocY,
&   double LocZ,
&   int LaySymbol,
&   int ArrowType,
&   String^ MachAllowance,
&   String^ OtherVals,
&   String^ ProdMethod,
&   String^ SampleLen,
&   String^ MaxRoughness,
&   String^ MinRoughness,
&   String^ RoughnessSpacing
)