Copy part number.iam to custom column in BOM with iLogic

[BRLMCHKD]

Hi there.

Could someone give me an idea, how to copy part number

to the custom column in BOM by use of iLogic - is it possible?

Thank you 

BRLMCHKD

[bradeneuropeArthur]

take a look at the top right.

the checkbox "update partnumber…….." is checked...

[BRLMCHKD]

Hi Brad.

Have tried different approaches, but copying not possible.

[bradeneuropeArthur]

think this has nothing to do with the rule.

possiblities: ?

Is the file migrated to the latest version vault is needing.

Are the vault rules correctly used?

Is this file a special file like library of standard?

What lifecycle the file is in?

etc...

Regards,

Autodesk Software: Inventor Professional 2018 | Vault Professional 2018 | Autocad Mechanical 2018
Programming Skills: Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Dimension Component! | Partlist Export! | Derive I-properties! | Vault Prompts Via API! | Vault Handbook/Manual!
Drawing Toggle Sheets! | Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !

[BRLMCHKD · Accepted solution]

Hi Brad.

Yes that is correct.  I tried to delete the 1'st one, and took a new copy + implemented your rule, 

and have taken two more copy designs of that without problems.

Your rule works, the column get auto filled with correct numbers 🙂

Really nice - Thank you a lot.

[Curtis_Waguespack · Accepted solution]

Hi @BRLMCHKD,

I didn't read all the other replies, but based on your information stating that Detail Dwg number needs to come from the part number of the occurrences I would use something like this:

' Get the active document. This assumes it Is a part document.
Dim oAsmCompDef As AssemblyComponentDefinition
oAsmCompDef = ThisApplication.ActiveDocument.ComponentDefinition

'Iterate through all of the occurrences
Dim oOccurrence As ComponentOccurrence
For Each oOccurrence In oAsmCompDef.Occurrences.AllReferencedOccurrences(oAsmCompDef)  


	oPartNumber = iProperties.Value(oOccurrence.Name, "Project", "Part Number")
	
	'find the postion Of the last ) In the name
	oPos = InStrRev(oPartNumber, ")",-1) 	

	'Get middle 10 chars of the part number starting at
	'position Of ), +1 
	oPN = Mid(oPartNumber,oPos+1,10 )

    iProperties.Value(oOccurrence.Name, "Custom", "Detail Dwg") = oPN

Next

 I hope this helps.
Best of luck to you in all of your Inventor pursuits,
Curtis
http://inventortrenches.blogspot.com

[bradeneuropeArthur · Accepted solution]

Hope the solution given will fulfill your needs.

Regards,

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !