<?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: To find Parent of Occurrences in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607580#M94635</link>
    <description>&lt;P&gt;Hi Jane Fan;&lt;/P&gt;
&lt;P&gt;Thanks for responding to my request. It did not retrieve the parent children. See Figure - 1.&lt;/P&gt;
&lt;P&gt;I modified as follows,&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Level&lt;/SPAN&gt; &amp;gt; 1 &lt;SPAN&gt;Then&lt;/SPAN&gt; 
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ParentOccurrence&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)	
&lt;SPAN&gt;Else&lt;/SPAN&gt; 
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;/PRE&gt;
&lt;P&gt;and it is working. Pl. see Figure - 2&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-19 22_4210.png" style="width: 893px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/605084i060B9590C94E4FB2/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-19 22_4210.png" alt="2019-02-19 22_4210.png" /&gt;&lt;/span&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-19 22_4519.png" style="width: 921px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/605083i04C3271C41F580F3/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-19 22_4519.png" alt="2019-02-19 22_4519.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
    <pubDate>Wed, 20 Feb 2019 06:49:41 GMT</pubDate>
    <dc:creator>RoyWickrama_RWEI</dc:creator>
    <dc:date>2019-02-20T06:49:41Z</dc:date>
    <item>
      <title>To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8602020#M94535</link>
      <description>&lt;P&gt;I am trying to retrieve the parent(s) of each occurrence in the master assembly. The rule I have is not giving the correct parent data. I request someone help. Thanks.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-17 2155.png" style="width: 672px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/604034iBBBC310618158380/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-17 2155.png" alt="2019-02-17 2155.png" /&gt;&lt;/span&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt; &lt;SPAN&gt;RWEI_0001A&lt;/SPAN&gt;
	&lt;SPAN&gt;Shared&lt;/SPAN&gt; &lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"C:\Users\Public\Documents\iLogicBuffer.txt"&lt;/SPAN&gt;
	
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;() 
	&lt;SPAN&gt;'Accessing Assembly Components @ https://modthemachine.typepad.com/my_weblog/2009/03/accessing-assembly-components.html&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;""&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"0001A-BOM"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_Name&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"All Occurrences with BOM Structure"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_FullName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"Rule "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;": "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;iL_Name&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;
			
	&lt;SPAN&gt;oDelete_ex_Notepad&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt;)
	&lt;SPAN&gt;oHL1&lt;/SPAN&gt; = &lt;SPAN&gt;"FILE REFERENCE TREE RAN FROM: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oDoc&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oHL1&lt;/SPAN&gt;)
	&lt;SPAN&gt;oHL2&lt;/SPAN&gt; = &lt;SPAN&gt;iL_FullName&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oHL2&lt;/SPAN&gt;)
	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt; = 1 &lt;SPAN&gt;To&lt;/SPAN&gt; &lt;SPAN&gt;Len&lt;/SPAN&gt;(&lt;SPAN&gt;iL_FullName&lt;/SPAN&gt;)
		&lt;SPAN&gt;oDashes&lt;/SPAN&gt; = &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"-"&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_DashLine&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oDashes&lt;/SPAN&gt;)
	
    &lt;SPAN&gt;' Get the active assembly. &lt;/SPAN&gt;
    &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; 
    &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt; 

    &lt;SPAN&gt;' Call the function that does the recursion. &lt;/SPAN&gt;
    &lt;SPAN&gt;Call&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Occurrences&lt;/SPAN&gt;, 1) 
	&lt;SPAN&gt;Process&lt;/SPAN&gt;.&lt;SPAN&gt;Start&lt;/SPAN&gt;(&lt;SPAN&gt;"Notepad.exe"&lt;/SPAN&gt;, &lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; 

&lt;SPAN&gt;Private&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;Occurrences&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrences&lt;/SPAN&gt;, &lt;SPAN&gt;Level&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt;) 
    &lt;SPAN&gt;' Iterate through all of the occurrence in this collection.  This &lt;/SPAN&gt;
    &lt;SPAN&gt;' represents the occurrences at the top level of an assembly. &lt;/SPAN&gt;
    &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt; 
    &lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;Occurrences&lt;/SPAN&gt; 
        &lt;SPAN&gt;' Print the name of the current occurrence. &lt;/SPAN&gt;
        &lt;SPAN&gt;' Check to see if this occurrence represents a subassembly &lt;/SPAN&gt;
        &lt;SPAN&gt;' and recursively call this function to traverse through it. &lt;/SPAN&gt;
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;DefinitionDocumentType&lt;/SPAN&gt; = &lt;SPAN&gt;kAssemblyDocumentObject&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; 
            &lt;SPAN&gt;Call&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;SubOccurrences&lt;/SPAN&gt;, &lt;SPAN&gt;Level&lt;/SPAN&gt; + 1) 
        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; 
		
	
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
	
	&lt;SPAN&gt;oData_X&lt;/SPAN&gt; = &lt;SPAN&gt;oParent&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"Level - "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;Level&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_Data&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oData_X&lt;/SPAN&gt;)
&lt;SPAN&gt;'	MessageBox.Show(oOcc.Parent.Document.DisplayName)&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt; 
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;


&lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;GetOccurrenceParent&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;, &lt;SPAN&gt;oOccName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)

	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;


&lt;SPAN&gt;'Process.Start("Notepad.exe", oTextSave)	&lt;/SPAN&gt;
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_Data&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oData&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oData&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oHeaderLine&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oHeaderLine&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
	
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_DashLine&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oDashes&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oDelete_ex_Notepad&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)		&lt;SPAN&gt;'To delete oTextSave if existing.&lt;/SPAN&gt;
&lt;SPAN&gt;'	Dim FileDelete As String&lt;/SPAN&gt;
&lt;SPAN&gt;'	FileDelete = "C:\testDelete.txt"&lt;/SPAN&gt;
 	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;) = &lt;SPAN&gt;True&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
   	&lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Delete&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;MessageBox&lt;/SPAN&gt;.&lt;SPAN&gt;Show&lt;/SPAN&gt;(&lt;SPAN&gt;"Existing (if any) File Deleted"&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt;)
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt;

&lt;SPAN&gt;'Function GetOccurrenceParent(oOcc As ComponentOccurrence, oOccName As String)&lt;/SPAN&gt;
&lt;SPAN&gt;'    For Each occ In oSubOcc.SubOccurrences&lt;/SPAN&gt;
&lt;SPAN&gt;'        If occ.SubOccurrences.Count &amp;lt;&amp;gt; 0  Then&lt;/SPAN&gt;
&lt;SPAN&gt;'                If occ.Name = PartNameToLookFor Then&lt;/SPAN&gt;
&lt;SPAN&gt;'                    MessageBox.Show(occ.Name &amp;amp; " is inside " &amp;amp; occ.ParentOccurrence.Name, "Title")&lt;/SPAN&gt;
&lt;SPAN&gt;'                Else&lt;/SPAN&gt;
&lt;SPAN&gt;'                    GetOccurrenceParent(occ, PartNameToLookFor)&lt;/SPAN&gt;
&lt;SPAN&gt;'                End If&lt;/SPAN&gt;
&lt;SPAN&gt;'        Else&lt;/SPAN&gt;
&lt;SPAN&gt;'            If occ.Name = PartNameToLookFor Then&lt;/SPAN&gt;
&lt;SPAN&gt;'                MessageBox.Show(occ.Name &amp;amp; " is inside " &amp;amp; occ.ParentOccurrence.Name, "Title")&lt;/SPAN&gt;
&lt;SPAN&gt;'            End If&lt;/SPAN&gt;
&lt;SPAN&gt;'        End If&lt;/SPAN&gt;
&lt;SPAN&gt;'    Next&lt;/SPAN&gt;
&lt;SPAN&gt;'	Return oParent&lt;/SPAN&gt;
&lt;SPAN&gt;'End Function&lt;/SPAN&gt;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 18 Feb 2019 05:59:20 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8602020#M94535</guid>
      <dc:creator>RoyWickrama_RWEI</dc:creator>
      <dc:date>2019-02-18T05:59:20Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8602970#M94559</link>
      <description>&lt;P&gt;Hi, I tweak your code a bit, I think it's now what you're looking for. Please check it out and see if we can improve it. regards&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt; &lt;SPAN&gt;RWEI_0001A&lt;/SPAN&gt;
	&lt;SPAN&gt;Shared&lt;/SPAN&gt; &lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"C:\Users\Public\Documents\iLogicBuffer.txt"&lt;/SPAN&gt;
	
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;() 
	&lt;SPAN&gt;'Accessing Assembly Components @ https://modthemachine.typepad.com/my_weblog/2009/03/accessing-assembly-components.html&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;""&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"0001A-BOM"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_Name&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"All Occurrences with BOM Structure"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_FullName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"Rule "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;": "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;iL_Name&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;
			
	&lt;SPAN&gt;oDelete_ex_Notepad&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt;)
	&lt;SPAN&gt;oHL1&lt;/SPAN&gt; = &lt;SPAN&gt;"FILE REFERENCE TREE RAN FROM: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oDoc&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oHL1&lt;/SPAN&gt;)
	&lt;SPAN&gt;oHL2&lt;/SPAN&gt; = &lt;SPAN&gt;iL_FullName&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oHL2&lt;/SPAN&gt;)
	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt; = 1 &lt;SPAN&gt;To&lt;/SPAN&gt; &lt;SPAN&gt;Len&lt;/SPAN&gt;(&lt;SPAN&gt;iL_FullName&lt;/SPAN&gt;)
		&lt;SPAN&gt;oDashes&lt;/SPAN&gt; = &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"-"&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_DashLine&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oDashes&lt;/SPAN&gt;)
	
    &lt;SPAN&gt;' Get the active assembly. &lt;/SPAN&gt;
    &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; 
    &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt; 

    &lt;SPAN&gt;' Call the function that does the recursion. &lt;/SPAN&gt;
    &lt;SPAN&gt;Call&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Occurrences&lt;/SPAN&gt;, 1) 
	&lt;SPAN&gt;Process&lt;/SPAN&gt;.&lt;SPAN&gt;Start&lt;/SPAN&gt;(&lt;SPAN&gt;"Notepad.exe"&lt;/SPAN&gt;, &lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; 

&lt;SPAN&gt;Private&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;Occurrences&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrences&lt;/SPAN&gt;, &lt;SPAN&gt;Level&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt;) 
    &lt;SPAN&gt;' Iterate through all of the occurrence in this collection.  This &lt;/SPAN&gt;
    &lt;SPAN&gt;' represents the occurrences at the top level of an assembly. &lt;/SPAN&gt;
    &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt; 
    &lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;Occurrences&lt;/SPAN&gt; 
        &lt;SPAN&gt;' Print the name of the current occurrence. &lt;/SPAN&gt;
        &lt;SPAN&gt;' Check to see if this occurrence represents a subassembly &lt;/SPAN&gt;
        &lt;SPAN&gt;' and recursively call this function to traverse through it. &lt;/SPAN&gt;
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;DefinitionDocumentType&lt;/SPAN&gt; = &lt;SPAN&gt;kAssemblyDocumentObject&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; 
            &lt;SPAN&gt;Call&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;SubOccurrences&lt;/SPAN&gt;, &lt;SPAN&gt;Level&lt;/SPAN&gt; + 1) 
        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; 
		
		&lt;SPAN&gt;Try&lt;/SPAN&gt;
			&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oParentocc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;
			&lt;SPAN&gt;oParentocc&lt;/SPAN&gt; = &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ParentOccurrence&lt;/SPAN&gt;
			&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;oParentocc&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt;
		&lt;SPAN&gt;Catch&lt;/SPAN&gt;
			&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
		&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;

		&lt;SPAN&gt;oData_X&lt;/SPAN&gt; = &lt;SPAN&gt;oParent&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"Level - "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;Level&lt;/SPAN&gt;
		&lt;SPAN&gt;oWrite_Data&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oData_X&lt;/SPAN&gt;)
	&lt;SPAN&gt;Next&lt;/SPAN&gt; 
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;


&lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;GetOccurrenceParent&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;, &lt;SPAN&gt;oOccName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)

	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;


&lt;SPAN&gt;'Process.Start("Notepad.exe", oTextSave)	&lt;/SPAN&gt;
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_Data&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oData&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oData&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oHeaderLine&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oHeaderLine&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
	
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_DashLine&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oDashes&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oDelete_ex_Notepad&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)		&lt;SPAN&gt;'To delete oTextSave if existing.&lt;/SPAN&gt;
&lt;SPAN&gt;'	Dim FileDelete As String&lt;/SPAN&gt;
&lt;SPAN&gt;'	FileDelete = "C:\testDelete.txt"&lt;/SPAN&gt;
 	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;) = &lt;SPAN&gt;True&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
   	&lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Delete&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;MessageBox&lt;/SPAN&gt;.&lt;SPAN&gt;Show&lt;/SPAN&gt;(&lt;SPAN&gt;"Existing (if any) File Deleted"&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt;)
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 18 Feb 2019 14:26:53 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8602970#M94559</guid>
      <dc:creator>Sergio.D.Suárez</dc:creator>
      <dc:date>2019-02-18T14:26:53Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8603476#M94566</link>
      <description>&lt;P&gt;Oh. Very nice. It is working.&lt;/P&gt;
&lt;P&gt;Thanks a lot.&lt;/P&gt;
&lt;P&gt;Let me try with bigger assemblies. I hope, you would not mind if you revert back to you for further help.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Once again, thanks a lot.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 18 Feb 2019 17:47:58 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8603476#M94566</guid>
      <dc:creator>RoyWickrama_RWEI</dc:creator>
      <dc:date>2019-02-18T17:47:58Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8603708#M94571</link>
      <description>&lt;P&gt;Based on your idea, I further explored: I found the following works well except it does not carry the file extension although it is the full file name.&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;'		Try&lt;/SPAN&gt;
&lt;SPAN&gt;'			Dim oParentocc As ComponentOccurrence&lt;/SPAN&gt;
&lt;SPAN&gt;'			oParentocc = oOcc.ParentOccurrence&lt;/SPAN&gt;
&lt;SPAN&gt;'			oParent = oParentocc.Name&lt;/SPAN&gt;
&lt;SPAN&gt;'		Catch&lt;/SPAN&gt;
&lt;SPAN&gt;'			MessageBox.Show("@ Catch", "Title")&lt;/SPAN&gt;
&lt;SPAN&gt;'			oParent = System.IO.Path.GetFileNameWithoutExtension(oOcc.Parent.Document.DisplayName)&lt;/SPAN&gt;
&lt;SPAN&gt;'		End Try&lt;/SPAN&gt;
			&lt;SPAN&gt;docFile&lt;/SPAN&gt; = &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;
    		&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;docFile&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Do you think can I have the file extension as well: Thanks.&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Mon, 18 Feb 2019 19:18:56 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8603708#M94571</guid>
      <dc:creator>RoyWickrama_RWEI</dc:creator>
      <dc:date>2019-02-18T19:18:56Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8604561#M94593</link>
      <description>&lt;P&gt;How about changing the lines to get parent like this:&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Level&lt;/SPAN&gt; &amp;gt;1 &lt;SPAN&gt;Then&lt;/SPAN&gt; 
		&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ParentOccurrence&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt; )
	&lt;SPAN&gt;Else&lt;/SPAN&gt; 
		&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;/PRE&gt;</description>
      <pubDate>Tue, 19 Feb 2019 06:33:05 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8604561#M94593</guid>
      <dc:creator>JaneFan</dc:creator>
      <dc:date>2019-02-19T06:33:05Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8605076#M94599</link>
      <description>&lt;P&gt;waaa !! that simple and summarized method, I can hardly prove it&lt;/P&gt;</description>
      <pubDate>Tue, 19 Feb 2019 11:02:56 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8605076#M94599</guid>
      <dc:creator>Sergio.D.Suárez</dc:creator>
      <dc:date>2019-02-19T11:02:56Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607580#M94635</link>
      <description>&lt;P&gt;Hi Jane Fan;&lt;/P&gt;
&lt;P&gt;Thanks for responding to my request. It did not retrieve the parent children. See Figure - 1.&lt;/P&gt;
&lt;P&gt;I modified as follows,&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Level&lt;/SPAN&gt; &amp;gt; 1 &lt;SPAN&gt;Then&lt;/SPAN&gt; 
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ParentOccurrence&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)	
&lt;SPAN&gt;Else&lt;/SPAN&gt; 
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;/PRE&gt;
&lt;P&gt;and it is working. Pl. see Figure - 2&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-19 22_4210.png" style="width: 893px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/605084i060B9590C94E4FB2/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-19 22_4210.png" alt="2019-02-19 22_4210.png" /&gt;&lt;/span&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-19 22_4519.png" style="width: 921px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/605083i04C3271C41F580F3/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-19 22_4519.png" alt="2019-02-19 22_4519.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
      <pubDate>Wed, 20 Feb 2019 06:49:41 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607580#M94635</guid>
      <dc:creator>RoyWickrama_RWEI</dc:creator>
      <dc:date>2019-02-20T06:49:41Z</dc:date>
    </item>
    <item>
      <title>Re: To find Parent of Occurrences</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607611#M94637</link>
      <description>&lt;P&gt;It is a smart tweek but not quite right (see the figure below) . It led me to tweek as follows and it is fine.&lt;/P&gt;
&lt;P&gt;Thanks again for your help.&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;Try&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oParentocc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;
	&lt;SPAN&gt;oParentocc&lt;/SPAN&gt; = &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ParentOccurrence&lt;/SPAN&gt;
	&lt;SPAN&gt;docFile&lt;/SPAN&gt; = &lt;SPAN&gt;oParentocc&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;
    &lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;docFile&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)
    &lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileName&lt;/SPAN&gt;(&lt;SPAN&gt;docFile&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)
&lt;SPAN&gt;Catch&lt;/SPAN&gt;
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
	&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileName&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;&lt;/PRE&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-19 22_5304.png" style="width: 945px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/605089iFB8F76D830E2A61D/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-19 22_5304.png" alt="2019-02-19 22_5304.png" /&gt;&lt;/span&gt;&lt;/P&gt;
&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="2019-02-19 23_0459.png" style="width: 956px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/605093i12D0B8787F992D27/image-size/large?v=v2&amp;amp;px=999" role="button" title="2019-02-19 23_0459.png" alt="2019-02-19 23_0459.png" /&gt;&lt;/span&gt;&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;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Wed, 20 Feb 2019 07:07:53 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607611#M94637</guid>
      <dc:creator>RoyWickrama_RWEI</dc:creator>
      <dc:date>2019-02-20T07:07:53Z</dc:date>
    </item>
    <item>
      <title>Re: Occurrence Parents, Occurrence and BOM Struture of Occurrence</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607617#M94638</link>
      <description>&lt;P&gt;Final solution is:&lt;/P&gt;
&lt;PRE&gt;&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt; &lt;SPAN&gt;RWEI_0001A&lt;/SPAN&gt;
	&lt;SPAN&gt;Shared&lt;/SPAN&gt; &lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"C:\Users\Public\Documents\iLogicBuffer.txt"&lt;/SPAN&gt;
	
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;() 
	&lt;SPAN&gt;'Accessing Assembly Components @ https://modthemachine.typepad.com/my_weblog/2009/03/accessing-assembly-components.html&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;""&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"0009-BOM"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_Name&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"All Occurrences with BOM Structure"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;iL_FullName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;"Rule "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;": "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;iL_Name&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;
			
	&lt;SPAN&gt;oDelete_ex_Notepad&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt;)
	&lt;SPAN&gt;oHL1&lt;/SPAN&gt; = &lt;SPAN&gt;"FILE REFERENCE TREE RAN FROM: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oDoc&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oHL1&lt;/SPAN&gt;)
	&lt;SPAN&gt;oHL2&lt;/SPAN&gt; = &lt;SPAN&gt;iL_FullName&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oHL2&lt;/SPAN&gt;)
	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt; = 1 &lt;SPAN&gt;To&lt;/SPAN&gt; &lt;SPAN&gt;Len&lt;/SPAN&gt;(&lt;SPAN&gt;iL_FullName&lt;/SPAN&gt;)
		&lt;SPAN&gt;oDashes&lt;/SPAN&gt; = &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"-"&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt; &lt;SPAN&gt;i&lt;/SPAN&gt;
	&lt;SPAN&gt;oWrite_DashLine&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oDashes&lt;/SPAN&gt;)
	
    &lt;SPAN&gt;' Get the active assembly. &lt;/SPAN&gt;
    &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; 
    &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt; 

    &lt;SPAN&gt;' Call the function that does the recursion. &lt;/SPAN&gt;
    &lt;SPAN&gt;Call&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Occurrences&lt;/SPAN&gt;, 1) 
	&lt;SPAN&gt;Process&lt;/SPAN&gt;.&lt;SPAN&gt;Start&lt;/SPAN&gt;(&lt;SPAN&gt;"Notepad.exe"&lt;/SPAN&gt;, &lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; 

&lt;SPAN&gt;Private&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;Occurrences&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrences&lt;/SPAN&gt;, &lt;SPAN&gt;Level&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt;) 
    &lt;SPAN&gt;' Iterate through all of the occurrence in this collection.  This &lt;/SPAN&gt;
    &lt;SPAN&gt;' represents the occurrences at the top level of an assembly. &lt;/SPAN&gt;
    &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt; 
    &lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;Occurrences&lt;/SPAN&gt; 
        &lt;SPAN&gt;' Print the name of the current occurrence. &lt;/SPAN&gt;
        &lt;SPAN&gt;' Check to see if this occurrence represents a subassembly &lt;/SPAN&gt;
        &lt;SPAN&gt;' and recursively call this function to traverse through it. &lt;/SPAN&gt;
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;DefinitionDocumentType&lt;/SPAN&gt; = &lt;SPAN&gt;kAssemblyDocumentObject&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; 
            &lt;SPAN&gt;Call&lt;/SPAN&gt; &lt;SPAN&gt;TraverseAssembly&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;SubOccurrences&lt;/SPAN&gt;, &lt;SPAN&gt;Level&lt;/SPAN&gt; + 1) 
        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; 
	
		&lt;SPAN&gt;oFFN_cw_EXT&lt;/SPAN&gt; = &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocumentDescriptor&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocument&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;	&lt;SPAN&gt;'cw file extension	&lt;/SPAN&gt;
		&lt;SPAN&gt;oStr&lt;/SPAN&gt; = &lt;SPAN&gt;oDoc_LocalName_WExt&lt;/SPAN&gt;(&lt;SPAN&gt;iL_NO&lt;/SPAN&gt;, &lt;SPAN&gt;oFFN_cw_EXT&lt;/SPAN&gt;)
		&lt;SPAN&gt;BOM_Structure_Return&lt;/SPAN&gt; = &lt;SPAN&gt;Func_BOM_Structure&lt;/SPAN&gt;(&lt;SPAN&gt;iL_NO&lt;/SPAN&gt;, &lt;SPAN&gt;oOcc&lt;/SPAN&gt;)
			&lt;SPAN&gt;'specify word splitting characters "space" and "dash"&lt;/SPAN&gt;
			&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;Separators&lt;/SPAN&gt;() &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Char&lt;/SPAN&gt; = {&lt;SPAN&gt;"*"c&lt;/SPAN&gt;} 
			&lt;SPAN&gt;Sentence&lt;/SPAN&gt; = &lt;SPAN&gt;BOM_Structure_Return&lt;/SPAN&gt;
			&lt;SPAN&gt;Words&lt;/SPAN&gt; = &lt;SPAN&gt;Sentence&lt;/SPAN&gt;.&lt;SPAN&gt;Split&lt;/SPAN&gt;(&lt;SPAN&gt;Separators&lt;/SPAN&gt;)
			&lt;SPAN&gt;i&lt;/SPAN&gt; = 0
			&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;wrd&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;Words&lt;/SPAN&gt;
			&lt;SPAN&gt;'MessageBox.Show("Word Index #" &amp;amp; i &amp;amp; " = " &amp;amp; Words(i))&lt;/SPAN&gt;
			&lt;SPAN&gt;i&lt;/SPAN&gt; += 1
			&lt;SPAN&gt;Next&lt;/SPAN&gt;
		&lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;Words&lt;/SPAN&gt;(0)
		&lt;SPAN&gt;oOccurrence_FFN&lt;/SPAN&gt; = &lt;SPAN&gt;Words&lt;/SPAN&gt;(1)
		
&lt;SPAN&gt;'		oParent = oOcc.ReferencedDocumentDescriptor.ReferencedDocument.FullFileName&lt;/SPAN&gt;
		&lt;SPAN&gt;Try&lt;/SPAN&gt;
			&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oParentocc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;
			&lt;SPAN&gt;oParentocc&lt;/SPAN&gt; = &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ParentOccurrence&lt;/SPAN&gt;
			&lt;SPAN&gt;docFile&lt;/SPAN&gt; = &lt;SPAN&gt;oParentocc&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;
		    &lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;docFile&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)
		    &lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileName&lt;/SPAN&gt;(&lt;SPAN&gt;docFile&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)
		&lt;SPAN&gt;Catch&lt;/SPAN&gt;
			&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
			&lt;SPAN&gt;oParent&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileName&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;)
		&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;
	
&lt;SPAN&gt;'		If Level &amp;gt; 1 Then &lt;/SPAN&gt;
&lt;SPAN&gt;'			oParent = System.IO.Path.GetFileNameWithoutExtension(oOcc.ParentOccurrence.Definition.Document.FullFileName)	&lt;/SPAN&gt;
&lt;SPAN&gt;'		Else &lt;/SPAN&gt;
&lt;SPAN&gt;'			oParent = System.IO.Path.GetFileNameWithoutExtension(oOcc.Parent.Document.DisplayName)&lt;/SPAN&gt;
&lt;SPAN&gt;'		End If &lt;/SPAN&gt;
	
		&lt;SPAN&gt;oData_X&lt;/SPAN&gt; = &lt;SPAN&gt;oParent&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oStr&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"Level-"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;Level&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"@"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt;	
&lt;SPAN&gt;'		oData_X = oParent &amp;amp; "@" &amp;amp; oOcc.Name &amp;amp; "@" &amp;amp; "Level-" &amp;amp; Level &amp;amp; "@" &amp;amp; BOM_Structure&lt;/SPAN&gt;
&lt;SPAN&gt;'		oData_X = oStr &amp;amp; "@" &amp;amp; oFFN_cw_EXT &amp;amp; "@" &amp;amp; BOM_Structure &amp;amp; " " &amp;amp; oParent &amp;amp; "@" &amp;amp; oOcc.Name &amp;amp; "@" &amp;amp; "Level-" &amp;amp; Level&lt;/SPAN&gt;
		&lt;SPAN&gt;oWrite_Data&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;, &lt;SPAN&gt;oData_X&lt;/SPAN&gt;)
	&lt;SPAN&gt;Next&lt;/SPAN&gt; 
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

	&lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;oDoc_LocalName_WExt&lt;/SPAN&gt;(&lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oFFN_cw_EXT&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oName_Sub&lt;/SPAN&gt; = &lt;SPAN&gt;"oDoc_LocalName_WExt"&lt;/SPAN&gt;
	&lt;SPAN&gt;oTitle&lt;/SPAN&gt; = &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" @ SUB: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oName_Sub&lt;/SPAN&gt;
	&lt;SPAN&gt;oPos&lt;/SPAN&gt; = &lt;SPAN&gt;Len&lt;/SPAN&gt;(&lt;SPAN&gt;oFFN_cw_EXT&lt;/SPAN&gt;) - &lt;SPAN&gt;InStrRev&lt;/SPAN&gt;(&lt;SPAN&gt;oFFN_cw_EXT&lt;/SPAN&gt;, &lt;SPAN&gt;"\"&lt;/SPAN&gt;, -1)
	&lt;SPAN&gt;oName_Local_cw_Ext&lt;/SPAN&gt; = &lt;SPAN&gt;Right&lt;/SPAN&gt;(&lt;SPAN&gt;oFFN_cw_EXT&lt;/SPAN&gt;, &lt;SPAN&gt;oPos&lt;/SPAN&gt;)
	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;oName_Local_cw_Ext&lt;/SPAN&gt; &lt;SPAN&gt;'Local file name complete with extension&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;

	&lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;Func_BOM_Structure&lt;/SPAN&gt;(&lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oCompOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;)
	&lt;SPAN&gt;oName_Sub&lt;/SPAN&gt; = &lt;SPAN&gt;"BOM_Structure"&lt;/SPAN&gt;
	&lt;SPAN&gt;oTitle&lt;/SPAN&gt; = &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" @ SUB: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oName_Sub&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oOccurrence&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;
	&lt;SPAN&gt;oFFN_X&lt;/SPAN&gt; = &lt;SPAN&gt;oCompOcc&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocumentDescriptor&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocument&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;
	&lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;oCompOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;BOMStructure&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kDefaultBOMStructure&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Default"&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kNormalBOMStructure&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Normal"&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kReferenceBOMStructure&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Reference"&lt;/SPAN&gt; 
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kPhantomBOMStructure&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Phantom"&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kPurchasedBOMStructure&lt;/SPAN&gt;  &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Purchased"&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kInseparableBOMStructure&lt;/SPAN&gt;  &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Inseparable"&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;BOM_X&lt;/SPAN&gt; = &lt;SPAN&gt;BOMStructureEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kVariesBOMStructure&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; = &lt;SPAN&gt;"Varies"&lt;/SPAN&gt; 

	&lt;SPAN&gt;oDoc_LocalName_WExt&lt;/SPAN&gt;(&lt;SPAN&gt;iL_NO&lt;/SPAN&gt;, &lt;SPAN&gt;oFFN_X&lt;/SPAN&gt;)
	&lt;SPAN&gt;'BOM_Structure = oDoc_LocalName_WExt(iL_NO, oFFN_X) &amp;amp; " &amp;lt;- " &amp;amp; BOM_Structure &amp;amp; "(BOM STATUS: Default)"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure_Return&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;BOM_Structure&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"*"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oFFN_X&lt;/SPAN&gt;
	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;BOM_Structure_Return&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;
	
&lt;SPAN&gt;Function&lt;/SPAN&gt; &lt;SPAN&gt;GetOccurrenceParent&lt;/SPAN&gt;(&lt;SPAN&gt;oOcc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt;, &lt;SPAN&gt;oOccName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)

	&lt;SPAN&gt;Return&lt;/SPAN&gt; &lt;SPAN&gt;oOcc&lt;/SPAN&gt;.&lt;SPAN&gt;Parent&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;.&lt;SPAN&gt;DisplayName&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Function&lt;/SPAN&gt;

&lt;SPAN&gt;'Process.Start("Notepad.exe", oTextSave)	&lt;/SPAN&gt;
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_Data&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oData&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oData&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_HeaderLines&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oHeaderLine&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oHeaderLine&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
	
&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oWrite_DashLine&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;oDashes&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;AppendText&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;WriteLine&lt;/SPAN&gt;(&lt;SPAN&gt;oDashes&lt;/SPAN&gt;)	
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Flush&lt;/SPAN&gt;()
	&lt;SPAN&gt;oWrite&lt;/SPAN&gt;.&lt;SPAN&gt;Close&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;oDelete_ex_Notepad&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;iL_NO&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)		&lt;SPAN&gt;'To delete oTextSave if existing.&lt;/SPAN&gt;
&lt;SPAN&gt;'	Dim FileDelete As String&lt;/SPAN&gt;
&lt;SPAN&gt;'	FileDelete = "C:\testDelete.txt"&lt;/SPAN&gt;
 	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;) = &lt;SPAN&gt;True&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
   	&lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Delete&lt;/SPAN&gt;(&lt;SPAN&gt;oTextSave&lt;/SPAN&gt;)
&lt;SPAN&gt;'	MessageBox.Show("Existing (if any) File Deleted", iL_NO)&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt;
&lt;/PRE&gt;</description>
      <pubDate>Wed, 20 Feb 2019 07:12:39 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/to-find-parent-of-occurrences/m-p/8607617#M94638</guid>
      <dc:creator>RoyWickrama_RWEI</dc:creator>
      <dc:date>2019-02-20T07:12:39Z</dc:date>
    </item>
  </channel>
</rss>

