<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: ILOGIC BOM UPDATING ISSUE in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206878#M73304</link>
    <description>&lt;P&gt;If you are using this with iTriggers it is HIGHLY, HIGHLY recommended you go back through the code and replace&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;ThisApplication.ActiveDocument&lt;/PRE&gt;
&lt;P&gt;with&lt;/P&gt;
&lt;PRE&gt;ThisDoc.Document&lt;/PRE&gt;
&lt;P&gt;Using the latter ensures that the rule grabs the document that the rule was triggered in, not the document that is at the forefront of the screen.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Also, add this at the very start:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;If ThisDoc.Document.DocumentType &amp;lt;&amp;gt; kAssemblyDocumentObject Then
    MsgBox("Rule only for assemblies; was triggered to run for: " &amp;amp; vblf &amp;amp; vblf &amp;amp; _
                    ThisDoc.Document.FullFileName &amp;amp; vblf &amp;amp; vblf &amp;amp; _
                   "... Aborting Rule!")
    Exit Sub
End if&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
    <pubDate>Wed, 05 Jul 2017 20:43:09 GMT</pubDate>
    <dc:creator>MechMachineMan</dc:creator>
    <dc:date>2017-07-05T20:43:09Z</dc:date>
    <item>
      <title>ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7196160#M73201</link>
      <description>&lt;P&gt;Hello,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I attached my entire assembly, this way you can actually look at the code for yourself. The issue is with the code in the "EVENTTRIGGERRULE". There are two separate actions happening, the first code is triggered when either "sewn" or "formed" is selected in the form. Then It will determine which parts are active and set them either to Phantom or Normal based on whether sewn or formed was chosen.&amp;nbsp;The issue is that it does not always update correctly and I have checked the code but it looked all right.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;The second part of the code is triggered by the inputs of "Collar1" and "Collar2" in the form, this is a numerical input.&amp;nbsp;Based of the inputs&amp;nbsp;it will choose the correct clamp to use based on the input size and if it is over 12" then It will determine the quantity of clamps based on the Variable parameters. Anything under 12" uses 1 clamp.&amp;nbsp; So the issue is that the BOM will not update the quantities when the clamp is over 12". I tried using event triggers but It is still having issues.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I would really appreciate some help because I have tried everything&amp;nbsp;I could think of.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Thank you,&lt;/P&gt;&lt;P&gt;Cameron&lt;/P&gt;</description>
      <pubDate>Fri, 30 Jun 2017 19:32:10 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7196160#M73201</guid>
      <dc:creator>cameron.frederiksen</dc:creator>
      <dc:date>2017-06-30T19:32:10Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7199995#M73213</link>
      <description>&lt;P&gt;You seem to be missing a bit of logic from the two lines:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;O_CLAMP&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;&amp;nbsp;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;which is causing an error&lt;/P&gt;</description>
      <pubDate>Mon, 03 Jul 2017 09:19:16 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7199995#M73213</guid>
      <dc:creator>Anonymous</dc:creator>
      <dc:date>2017-07-03T09:19:16Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7200041#M73216</link>
      <description>&lt;P&gt;Sorry, ignore that last comment.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;I'm getting an error on this line of code:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;ThisBOM&lt;/SPAN&gt;&lt;SPAN&gt;.&lt;/SPAN&gt;&lt;SPAN&gt;OverrideQuantity&lt;/SPAN&gt;&lt;SPAN&gt;(&lt;/SPAN&gt;&lt;SPAN&gt;"&lt;/SPAN&gt;&lt;SPAN&gt;Model Data&lt;/SPAN&gt;&lt;SPAN&gt;"&lt;/SPAN&gt;&lt;SPAN&gt;,&lt;/SPAN&gt;&lt;SPAN&gt;"&lt;/SPAN&gt;&lt;SPAN&gt;11000138&lt;/SPAN&gt;&lt;SPAN&gt;"&lt;/SPAN&gt;&lt;SPAN&gt;, &lt;/SPAN&gt;&lt;SPAN&gt;2&lt;/SPAN&gt;&lt;SPAN&gt;)&lt;/SPAN&gt;&amp;nbsp;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;Not sure why yet, the error message isn't very helpful&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;The parameter is incorrect. (Exception from HRESULT: 0x80070057 (E_INVALIDARG))&lt;/P&gt;</description>
      <pubDate>Mon, 03 Jul 2017 09:49:17 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7200041#M73216</guid>
      <dc:creator>Anonymous</dc:creator>
      <dc:date>2017-07-03T09:49:17Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206543#M73297</link>
      <description>&lt;P&gt;I found that if I separate the component.active code from the this.bom code into separate IF Statements it does a better job at updating the BOM quantities.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;'Clamp 48&amp;gt;ID&amp;lt;=60&lt;BR /&gt;&amp;nbsp;&amp;nbsp;ElseIf (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48)&amp;nbsp; Then&lt;BR /&gt;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;If&amp;nbsp; (10&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;8.25) Then&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;Component.IsActive("11000138") = True&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;'ThisBOM.OverrideQuantity("Model Data","11000138", 5)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;ElseIf (12&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;10)&amp;nbsp; Then&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;Component.IsActive("11000071") = True&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;'ThisBOM.OverrideQuantity("Model Data","11000071", 5)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;End If&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;End If&lt;BR /&gt;End If&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;'Clamp 48&amp;gt;ID&amp;lt;=60&lt;BR /&gt;&amp;nbsp;&amp;nbsp;ElseIf (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48)&amp;nbsp; Then&lt;BR /&gt;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;If&amp;nbsp; (10&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;8.25) Then&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;ThisBOM.OverrideQuantity("Model Data","11000138", 5)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;ElseIf (12&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;10)&amp;nbsp; Then&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;ThisBOM.OverrideQuantity("Model Data","11000071", 5)&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;End If&lt;BR /&gt;&amp;nbsp;&amp;nbsp;&lt;BR /&gt;&amp;nbsp;End If&lt;BR /&gt;End If&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 18:15:14 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206543#M73297</guid>
      <dc:creator>cameron.frederiksen</dc:creator>
      <dc:date>2017-07-05T18:15:14Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206598#M73298</link>
      <description>&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Capture.PNG" style="width: 531px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/374753iCFD9415CC340988C/image-size/large?v=v2&amp;amp;px=999" role="button" title="Capture.PNG" alt="Capture.PNG" /&gt;&lt;/span&gt;&lt;/P&gt;&lt;P&gt;That code is working good so far, but now I'm getting this error when I save my drawing.&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 18:38:57 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206598#M73298</guid>
      <dc:creator>cameron.frederiksen</dc:creator>
      <dc:date>2017-07-05T18:38:57Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206791#M73302</link>
      <description>&lt;P&gt;Post your currently code up here using the proper&lt;/P&gt;
&lt;PRE&gt;this&lt;/PRE&gt;
&lt;P&gt;and I can see If I can help.&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 20:02:44 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206791#M73302</guid>
      <dc:creator>MechMachineMan</dc:creator>
      <dc:date>2017-07-05T20:02:44Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206809#M73303</link>
      <description>&lt;PRE&gt;'TURNING COLLAR PARTS PHANTOM WHEN BELLOWS TYPE = FORMED
If O_COLLAR_SEWING_TYPE= "FORMED" Then
ThisApplication.ActiveDocument.ComponentDefinition.RepresentationsManager.LevelofDetailRepresentations("Ilogic").Activate
iLogicVb.UpdateWhenDone=True
' set a reference to the assembly component definintion
Dim oAsmCompDef As AssemblyComponentDefinition
oAsmCompDef = ThisApplication.ActiveDocument.ComponentDefinition

	If Component.IsActive("ROUND_FLANGE1")=True Then
	Dim oOccurrence As ComponentOccurrence
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE1") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If 
		Next 
	End If 
	 
	
	If Component.IsActive("ROUND_FLANGE2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE2") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
	
	
	If Component.IsActive("ROUND_FLANGE3")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE3") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
	
	
	If Component.IsActive("ROUND_FLANGE4")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE4") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If

	
	If Component.IsActive("ROUND_COLLAR1")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_COLLAR1") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
	 
	
	If Component.IsActive("ROUND_COLLAR2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_COLLAR2") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
 
	
	If Component.IsActive("EXPANDED_COLLAR1")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("EXPANDED_COLLAR1") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If

	
	If Component.IsActive("EXPANDED_COLLAR2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("EXPANDED_COLLAR2") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
	 
	
	If Component.IsActive("CONE_END1")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("CONE_END1") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
	 
	
	If Component.IsActive("CONE_END2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("CONE_END2") = True Then
		oOccurrence.Definition.BOMStructure = 51971 'Phantom
		End If
		Next 
	End If
	
End If


If O_COLLAR_SEWING_TYPE= "SEWN" Then
ThisApplication.ActiveDocument.ComponentDefinition.RepresentationsManager.LevelofDetailRepresentations("Ilogic").Activate
iLogicVb.UpdateWhenDone=True
' set a reference to the assembly component definintion
Dim oAsmCompDef As AssemblyComponentDefinition
oAsmCompDef = ThisApplication.ActiveDocument.ComponentDefinition
	
	If Component.IsActive("ROUND_FLANGE1")=True Then
	Dim oOccurrence As ComponentOccurrence
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE1") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("ROUND_FLANGE2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE2") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("ROUND_FLANGE3")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE3") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("ROUND_FLANGE4")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_FLANGE4") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("ROUND_COLLAR1")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_COLLAR1") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("ROUND_COLLAR2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("ROUND_COLLAR2") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("EXPANDED_COLLAR1")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("EXPANDED_COLLAR1") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("EXPANDED_COLLAR2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("EXPANDED_COLLAR2") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("CONE_END1")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("CONE_END1") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
	If Component.IsActive("CONE_END2")=True Then
	For Each oOccurrence In oAsmCompDef.Occurrences
		If oOccurrence.Name.Contains("CONE_END2") = True Then
		oOccurrence.Definition.BOMStructure = 51970 'NORMAL
		End If
	Next 
	End If 
End If 
'------------------------------------------------------------------------------------------------------------------------------------------------------------------
'VARIABLE SWITCH COLLAR1
If (24&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;12) Then
	VARIABLE_1 = O_COLLAR1/2
	Else
	VARIABLE_1=0
End If 

If (36&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;24) Then
	VARIABLE_3 = O_COLLAR1/3
	Else
	VARIABLE_3 = 0
End If

If (48&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;36) Then
	VARIABLE_5 = O_COLLAR1/4
	Else
	VARIABLE_5 = 0
End If

If (60&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;48) Then
	VARIABLE_7 = O_COLLAR1/5
	Else
	VARIABLE_7= 0
End If 

'VARIABLE SWITCH COLLAR2
If (24&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;12) Then
	VARIABLE_2 = O_COLLAR2/2
	Else
	VARIABLE_2=0
End If 

If (36&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;24) Then
	VARIABLE_4 = O_COLLAR2/3
	Else
	VARIABLE_4 = 0
End If

If (48&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;36) Then
	VARIABLE_6 = O_COLLAR2/4
	Else
	VARIABLE_6 = 0
End If

If (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48) Then
	VARIABLE_8 = O_COLLAR2/5
	Else
	VARIABLE_8 = 0
End If 

'CLAMP SELECTION SEWN O_COLLAR1 CODE

		Component.IsActive("11000063") = False
		Component.IsActive("11000064") = False
		Component.IsActive("11000065") = False
		Component.IsActive("11000066") = False
		Component.IsActive("11000067") = False
		Component.IsActive("11000068") = False
		Component.IsActive("11000069") = False
		Component.IsActive("11000070") = False
		Component.IsActive("11000071") = False
		Component.IsActive("11000138") = False 
		
If O_CLAMP Then
	If (O_COLLAR1&amp;lt;= 1.25) And O_COLLAR1&amp;gt; 0 Then'Or (O_COLLAR2&amp;lt;=1.25) Then
			Component.IsActive("11000063") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000063")
			
		ElseIf (1.75&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;1.25) Then'Or (1.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.25) Then
			Component.IsActive("11000064") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000064")
	
		ElseIf (2.25&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;1.75)Then' Or (2.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.75) Then
			Component.IsActive("11000065") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000065")
	
		ElseIf (2.75&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;2.25)Then' Or (2.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.25) Then
			Component.IsActive("11000066") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000066")
	
		ElseIf (4&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;2.75)Then' Or (4&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.75) Then
			Component.IsActive("11000067") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000067")
	
		ElseIf (6&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;4) Then'Or (6&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;4) Then
			Component.IsActive("11000068") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000068")
	
		ElseIf (7&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;6) Then'Or (7&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;6) Then
			Component.IsActive("11000069") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000069")
	
		ElseIf (8.25&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;7) Then'Or (8.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;7) Then
			Component.IsActive("11000070") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
	
		ElseIf (10&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;8.25)Then' Or (10&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;8.25) Then
			Component.IsActive("11000138") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
		
		ElseIf (12&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;10)Then' Or (12&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;10) Then
			Component.IsActive("11000071") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
		 	
	'O_CLAMP &amp;gt;12ID&amp;lt;=24
		ElseIf (24&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;12) Then'Or (24&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;12) Then
				If (7&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;6)Then' Or (7&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;6) Then
					Component.IsActive("11000069") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000069") 
					
					'ThisBOM.OverrideQuantity("Model Data","11000069", 2)
					
				ElseIf (8.25&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;7) Then'Or (8.25&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;7) Then
					Component.IsActive("11000070") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
				'ThisBOM.OverrideQuantity("Model Data","11000070",2)
			
				ElseIf (10&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;8.25)Then' Or (10&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;8.25) Then
					Component.IsActive("11000138") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
					 
					'ThisBOM.OverrideQuantity("Model Data","11000138", 2)
			
				ElseIf (12&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;10) Then'Or (12&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;10) Then
					Component.IsActive("11000071") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
				'ThisBOM.OverrideQuantity("Model Data","11000071", 2)
				End If 
			
	'Clamp 24&amp;gt;ID&amp;lt;=36
		ElseIf (36&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;24) Then'Or (36&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;24) Then
		
				If (8.25&amp;gt;=VARIABLE_3 And VARIABLE_3&amp;gt;7) Then'Or (8.25&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;7) Then
					Component.IsActive("11000070") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
				'ThisBOM.OverrideQuantity("Model Data","11000070", 3)
		
				ElseIf (10&amp;gt;=VARIABLE_3 And VARIABLE_3&amp;gt;8.25)Then' Or (10&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;8.25) Then
					Component.IsActive("11000138") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
				'ThisBOM.OverrideQuantity("Model Data","11000138", 3)
			
				ElseIf (12&amp;gt;=VARIABLE_3 And VARIABLE_3&amp;gt;10)Then' Or (12&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;10) Then
					Component.IsActive("11000071") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
				'ThisBOM.OverrideQuantity("Model Data","11000071", 3)
				End If
		
	'Clamp 36&amp;gt;ID&amp;lt;=48
		ElseIf (48&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;36) Then'Or (48&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;36) Then
		
				If (10&amp;gt;=VARIABLE_5 And VARIABLE_5&amp;gt;8.25) Then'Or (10&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;8.25) Then
					Component.IsActive("11000138") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
				'ThisBOM.OverrideQuantity("Model Data","11000138", 4)
			
				ElseIf (12&amp;gt;=VARIABLE_5 And VARIABLE_5&amp;gt;10) Then'Or (12&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;10) Then
					Component.IsActive("11000071") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
				'ThisBOM.OverrideQuantity("Model Data","11000071", 4)
				End If 
		
	'Clamp 48&amp;gt;ID&amp;lt;=60
		ElseIf (60&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;48) Then'Or (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48) Then
	
			If (10&amp;gt;=VARIABLE_7 And VARIABLE_7&amp;gt;8.25) Then'Or (10&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;8.25) Then
				Component.IsActive("11000138") = True
				'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
			'ThisBOM.OverrideQuantity("Model Data","11000138", 5)
			
			ElseIf (12&amp;gt;=VARIABLE_7 And VARIABLE_7&amp;gt;10) Then'Or (12&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;10) Then
				Component.IsActive("11000071") = True
				'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
			'ThisBOM.OverrideQuantity("Model Data","11000071", 5) 
			End If
		
	End If 
End If 

'COLLAR 2
If O_CLAMP Then
	If  (O_COLLAR2&amp;lt;=1.25) And O_COLLAR2&amp;gt; 0 Then
			Component.IsActive("11000063") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000063")
			
		ElseIf  (1.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.25) Then
			Component.IsActive("11000064") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000064")
	
		ElseIf (2.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.75) Then
			Component.IsActive("11000065") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000065")
	
		ElseIf  (2.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.25) Then
			Component.IsActive("11000066") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000066")
	
		ElseIf  (4&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.75) Then
			Component.IsActive("11000067") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000067")
	
		ElseIf  (6&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;4) Then
			Component.IsActive("11000068") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000068")
	
		ElseIf  (7&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;6) Then
			Component.IsActive("11000069") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000069")
	
		ElseIf  (8.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;7) Then
			Component.IsActive("11000070") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
	
		ElseIf  (10&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;8.25) Then
			Component.IsActive("11000138") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
		
		ElseIf  (12&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;10) Then
			Component.IsActive("11000071") = True
			'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
		 
'O_CLAMP &amp;gt;12ID&amp;lt;=24
		ElseIf  (24&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;12) Then
				If  (7&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;6) Then
					Component.IsActive("11000069") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000069") 
				
					'ThisBOM.OverrideQuantity("Model Data",11000069, 2)
				

				ElseIf  (8.25&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;7) Then
					Component.IsActive("11000070") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
					'ThisBOM.OverrideQuantity("Model Data",11000070,2)
			
				ElseIf (10&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;8.25) Then
					Component.IsActive("11000138") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
						'ThisBOM.OverrideQuantity("Model Data","11000138", 2)
				

				ElseIf  (12&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;10) Then
					Component.IsActive("11000071") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
					'ThisBOM.OverrideQuantity("Model Data","11000071",2)
				End If 
			
		'Clamp 24&amp;gt;ID&amp;lt;=36
		ElseIf  (36&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;24) Then
		
				If  (8.25&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;7) Then
					Component.IsActive("11000070") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
					'ThisBOM.OverrideQuantity("Model Data","11000070", 3)
		
				ElseIf  (10&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;8.25) Then
					Component.IsActive("11000138") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
					'ThisBOM.OverrideQuantity("Model Data","11000138", 3)
			
				ElseIf  (12&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;10) Then
					Component.IsActive("11000071") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
					'ThisBOM.OverrideQuantity("Model Data","11000071", 3)
				End If
		
		'Clamp 36&amp;gt;ID&amp;lt;=48
		ElseIf  (48&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;36) Then
		
				If  (10&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;8.25) Then
					Component.IsActive("11000138") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
					'ThisBOM.OverrideQuantity("Model Data","11000138", 4)
			
				ElseIf  (12&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;10) Then
					Component.IsActive("11000071") = True
					'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
					'ThisBOM.OverrideQuantity("Model Data","11000071", 4)
				
				End If 
		
	'Clamp 48&amp;gt;ID&amp;lt;=60
		ElseIf (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48)  Then
	
			If  (10&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;8.25) Then
				Component.IsActive("11000138") = True
				'quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
				'ThisBOM.OverrideQuantity("Model Data","11000138", 5)
			
			ElseIf (12&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;10)  Then
				Component.IsActive("11000071") = True
				'quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
				'ThisBOM.OverrideQuantity("Model Data","11000071", 5) 
			End If
		
	End If 
End If 


'----------------------------------------------------------------------------------------------------------------------------------------------

'O_CLAMP &amp;gt;12ID&amp;lt;=24
If O_CLAMP Then
 	If (O_COLLAR1&amp;lt;= 1.25) And O_COLLAR1&amp;gt; 0 Then'Or (O_COLLAR2&amp;lt;=1.25) Then
			'Component.IsActive("11000063") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000063")
			
		ElseIf (1.75&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;1.25) Then'Or (1.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.25) Then
			'Component.IsActive("11000064") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000064")
	
		ElseIf (2.25&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;1.75)Then' Or (2.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.75) Then
			'Component.IsActive("11000065") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000065")
	
		ElseIf (2.75&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;2.25)Then' Or (2.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.25) Then
			'Component.IsActive("11000066") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000066")
	
		ElseIf (4&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;2.75)Then' Or (4&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.75) Then
			'Component.IsActive("11000067") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000067")
	
		ElseIf (6&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;4) Then'Or (6&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;4) Then
			'Component.IsActive("11000068") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000068")
	
		ElseIf (7&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;6) Then'Or (7&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;6) Then
			'Component.IsActive("11000069") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000069")
	
		ElseIf (8.25&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;7) Then'Or (8.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;7) Then
			'Component.IsActive("11000070") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
	
		ElseIf (10&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;8.25)Then' Or (10&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;8.25) Then
			'Component.IsActive("11000138") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
		
		ElseIf (12&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;10)Then' Or (12&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;10) Then
			'Component.IsActive("11000071") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")
	
	
		ElseIf (24&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;12) Then'Or (24&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;12) Then
				If (7&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;6)Then' Or (7&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;6) Then
						ThisBOM.OverrideQuantity("Model Data","11000069", 2)
				
				ElseIf (8.25&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;7) Then'Or (8.25&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;7) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000070",2)
			
				ElseIf (10&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;8.25)Then' Or (10&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;8.25) Then
					
						ThisBOM.OverrideQuantity("Model Data","11000138", 2)
	
			
				ElseIf (12&amp;gt;=VARIABLE_1 And VARIABLE_1&amp;gt;10) Then'Or (12&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;10) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000071", 2)
				End If 
			
		'Clamp 24&amp;gt;ID&amp;lt;=36
		ElseIf (36&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;24) Then'Or (36&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;24) Then
		
				If (8.25&amp;gt;=VARIABLE_3 And VARIABLE_3&amp;gt;7) Then'Or (8.25&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;7) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000070", 3)
		
				ElseIf (10&amp;gt;=VARIABLE_3 And VARIABLE_3&amp;gt;8.25)Then' Or (10&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;8.25) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000138", 3)
			
				ElseIf (12&amp;gt;=VARIABLE_3 And VARIABLE_3&amp;gt;10)Then' Or (12&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;10) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000071", 3)
				End If
		
		'Clamp 36&amp;gt;ID&amp;lt;=48
		ElseIf (48&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;36) Then'Or (48&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;36) Then
		
				If (10&amp;gt;=VARIABLE_5 And VARIABLE_5&amp;gt;8.25) Then'Or (10&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;8.25) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000138", 4)
			
				ElseIf (12&amp;gt;=VARIABLE_5 And VARIABLE_5&amp;gt;10) Then'Or (12&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;10) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000071", 4)
				
				End If 
		
	'Clamp 48&amp;gt;ID&amp;lt;=60
		ElseIf (60&amp;gt;=O_COLLAR1 And O_COLLAR1&amp;gt;48) Then'Or (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48) Then
	
			If (10&amp;gt;=VARIABLE_7 And VARIABLE_7&amp;gt;8.25) Then'Or (10&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;8.25) Then
				
				ThisBOM.OverrideQuantity("Model Data","11000138", 5)
			
			ElseIf (12&amp;gt;=VARIABLE_7 And VARIABLE_7&amp;gt;10) Then'Or (12&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;10) Then
				
				ThisBOM.OverrideQuantity("Model Data","11000071", 5) 
			End If
		
	End If 
End If 

'COLLAR 2
If O_CLAMP Then		
'O_CLAMP &amp;gt;12ID&amp;lt;=24
	If  (O_COLLAR2&amp;lt;=1.25)And O_COLLAR2&amp;gt; 0 Then
			'Component.IsActive("11000063") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000063")
			
		ElseIf  (1.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.25) Then
			'Component.IsActive("11000064") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000064")
	
		ElseIf (2.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;1.75) Then
			'Component.IsActive("11000065") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000065")
	
		ElseIf  (2.75&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.25) Then
			'Component.IsActive("11000066") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000066")
	
		ElseIf  (4&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;2.75) Then
			'Component.IsActive("11000067") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000067")
	
		ElseIf  (6&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;4) Then
			'Component.IsActive("11000068") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000068")
	
		ElseIf  (7&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;6) Then
			'Component.IsActive("11000069") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000069")
	
		ElseIf  (8.25&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;7) Then
			'Component.IsActive("11000070") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000070")
	
		ElseIf  (10&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;8.25) Then
			'Component.IsActive("11000138") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000138")
		
		ElseIf  (12&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;10) Then
			'Component.IsActive("11000071") = True
			quantity = ThisBOM.CalculateQuantity("Model Data", "11000071")

		ElseIf  (24&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;12) Then
				If  (7&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;6) Then
					
						ThisBOM.OverrideQuantity("Model Data","11000069", 2)
				

				ElseIf  (8.25&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;7) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000070",2)
			
				ElseIf (10&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;8.25) Then
					
						ThisBOM.OverrideQuantity("Model Data","11000138", 2)
				

				ElseIf  (12&amp;gt;=VARIABLE_2 And VARIABLE_2&amp;gt;10) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000071",2)
				End If 
			
		'Clamp 24&amp;gt;ID&amp;lt;=36
		ElseIf  (36&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;24) Then
		
				If  (8.25&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;7) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000070", 3)
		
				ElseIf  (10&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;8.25) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000138", 3)
			
				ElseIf  (12&amp;gt;=VARIABLE_4 And VARIABLE_4&amp;gt;10) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000071", 3)
				End If
		
		'Clamp 36&amp;gt;ID&amp;lt;=48
		ElseIf  (48&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;36) Then
		
				If  (10&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;8.25) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000138", 4)
			
				ElseIf  (12&amp;gt;=VARIABLE_6 And VARIABLE_6&amp;gt;10) Then
					
					ThisBOM.OverrideQuantity("Model Data","11000071", 4)
				
				End If 
		
	'Clamp 48&amp;gt;ID&amp;lt;=60
		ElseIf (60&amp;gt;=O_COLLAR2 And O_COLLAR2&amp;gt;48)  Then
	
			If  (10&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;8.25) Then
				
				ThisBOM.OverrideQuantity("Model Data","11000138", 5)
			
			ElseIf (12&amp;gt;=VARIABLE_8 And VARIABLE_8&amp;gt;10)  Then
				
				ThisBOM.OverrideQuantity("Model Data","11000071", 5) 
			End If
		
	End If 
End If &lt;/PRE&gt;</description>
      <pubDate>Wed, 05 Jul 2017 20:10:26 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206809#M73303</guid>
      <dc:creator>cameron.frederiksen</dc:creator>
      <dc:date>2017-07-05T20:10:26Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206878#M73304</link>
      <description>&lt;P&gt;If you are using this with iTriggers it is HIGHLY, HIGHLY recommended you go back through the code and replace&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;ThisApplication.ActiveDocument&lt;/PRE&gt;
&lt;P&gt;with&lt;/P&gt;
&lt;PRE&gt;ThisDoc.Document&lt;/PRE&gt;
&lt;P&gt;Using the latter ensures that the rule grabs the document that the rule was triggered in, not the document that is at the forefront of the screen.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Also, add this at the very start:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;If ThisDoc.Document.DocumentType &amp;lt;&amp;gt; kAssemblyDocumentObject Then
    MsgBox("Rule only for assemblies; was triggered to run for: " &amp;amp; vblf &amp;amp; vblf &amp;amp; _
                    ThisDoc.Document.FullFileName &amp;amp; vblf &amp;amp; vblf &amp;amp; _
                   "... Aborting Rule!")
    Exit Sub
End if&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 20:43:09 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206878#M73304</guid>
      <dc:creator>MechMachineMan</dc:creator>
      <dc:date>2017-07-05T20:43:09Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206904#M73306</link>
      <description>&lt;P&gt;I'm using event triggers, not itrigger. Should I still make the switch?&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 20:50:57 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206904#M73306</guid>
      <dc:creator>cameron.frederiksen</dc:creator>
      <dc:date>2017-07-05T20:50:57Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206926#M73307</link>
      <description>&lt;P&gt;Nah, AFAIK event triggers are fine. Same deal required with switching to ThisDoc vs ActiveDoc though.&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 21:03:53 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206926#M73307</guid>
      <dc:creator>MechMachineMan</dc:creator>
      <dc:date>2017-07-05T21:03:53Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206928#M73308</link>
      <description>&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Capture.PNG" style="width: 540px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/374807i3F06900EC9FC4DFA/image-size/large?v=v2&amp;amp;px=999" role="button" title="Capture.PNG" alt="Capture.PNG" /&gt;&lt;/span&gt;&lt;/P&gt;&lt;P&gt;I'm getting this error when I save my drawing now. I get it around 20 times, I have to keep clicking ok till it stops.&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 21:06:54 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7206928#M73308</guid>
      <dc:creator>cameron.frederiksen</dc:creator>
      <dc:date>2017-07-05T21:06:54Z</dc:date>
    </item>
    <item>
      <title>Re: ILOGIC BOM UPDATING ISSUE</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7207038#M73309</link>
      <description>&lt;P&gt;Debug and find out what is making it error.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;In iLogic, you can do this by placing&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;MsgBox("Made it to here 1")&lt;/PRE&gt;
&lt;P&gt;or something similar within the code to see the last line that runs before it fails.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Also, if it is run on am assembly file that hasn't been saved yet, it will give an error.&lt;/P&gt;</description>
      <pubDate>Wed, 05 Jul 2017 22:44:51 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/ilogic-bom-updating-issue/m-p/7207038#M73309</guid>
      <dc:creator>MechMachineMan</dc:creator>
      <dc:date>2017-07-05T22:44:51Z</dc:date>
    </item>
  </channel>
</rss>

