I hope you can find this useful, even if it is not exactly what you are looking for, because the rule finds the view rep used on the assembly in the first view on the first sheet of the drawing, and it doesn’t work with the View Label anyway.
The rule creates an iProperty called "ActiveViewrep" in the IDW (not in the assembly).
You need to add that iProperty to any drawing text, or, for instance to the titleblock.
You will see the correct result ONLY when you run the rule MANUALLY or when you save the drawing after you have added this rule to the Event trigger called "Before Save document".
Here is the rule that needs to be placed in the drawing template file.
Dim odrawdoc As DrawingDocument
odrawdoc = ThisApplication.ActiveDocument
customPropertySet = odrawdoc.PropertySets.Item("Inventor User Defined Properties")
Try
prop = customPropertySet.Item("ActiveViewrep")
Catch
customPropertySet.Add("", "ActiveViewrep")
End Try
Try
iProperties.Value("Custom", "ActiveViewrep") = odrawdoc.Sheets.Item(1).DrawingViews.Item(1).ActiveDesignViewRepresentation
Catch
End Try
InventorVb.DocumentUpdate()
Kind regards,
Alessandro
Alessandro Gasso
Fusion 360 – Simulation/Generative Design Adoption Specialist
Autodesk, Inc.
Hi Mike,
The reason for using iLogic is that you can easily set an event trigger in order to avoid running the macro manually every time you need to create or update the custom property.
Even if you are using Inventor 2010, iLogic for this version, can be downloaded and installed from the Subscription Center, for the customers under Subscription, of course.
By the way, if you want to use the VBA macro, you can copy the text below in the Application project (default.ivb).
Sub add_viewrep_as_customprop()
On Error GoTo errorhandler
Dim odrawdoc As DrawingDocument
Set odrawdoc = ThisApplication.ActiveDocument
Call Create_prop("ActiveViewrep", odrawdoc.Sheets.Item(1).DrawingViews.Item(1).ActiveDesignViewRepresentation)
MsgBox ("Custom property called 'ActiveViewrep' has been created or updated")
Exit Sub
errorhandler:
MsgBox ("Make sure you have a drawing open and use a viewrep in the first view of the first sheet")
End Sub
Private Sub Create_prop(prop As String, prop_value As String)
Dim opropsets As PropertySets
Dim opropset As PropertySet
Dim oUserPropertySet As PropertySet
Set opropsets = ThisApplication.ActiveDocument.PropertySets
For Each opropset In opropsets
If opropset.Name = "Inventor User Defined Properties" Then Set oUserPropertySet = opropset
Next opropset
' If Property does not exist then add the new Property
On Error Resume Next
Call oUserPropertySet.Add(prop_value, prop)
' Try to set the Property value if it already exists
For i = 1 To oUserPropertySet.Count
If oUserPropertySet.Item(i).Name = prop Then oUserPropertySet.Item(i).Value = prop_value
Next i
End Sub
I hope you can find it useful.
Kind regards,
Alessandro
Alessandro Gasso
Fusion 360 – Simulation/Generative Design Adoption Specialist
Autodesk, Inc.
Here's a rule (in the attached text file) that should set the label for all views on all sheets. But it only works on views that show a design view representation and are associative. If your drawing views are not associative, the rule can't get the design view representation name.
Mike Deck
Software Developer
Autodesk, Inc.
Here's a new version (with a bugfix) of my rule (in the attached text file) that should set the label for all views on all sheets. As before, it only works on views that show a design view representation and are associative. If your drawing views are not associative, the rule can't get the design view representation name.
I tested it on a drawing of an iAssembly in 2011, and it worked.
The VBA macro changes the view name. This rule just changes the label. It could be modified to change the view name.
Mike Deck
Software Developer
Autodesk, Inc.
For completeness sake : the fact that you only can use associative vewreps to obtain the name of the active viewrep is a know API defect and has been logged with defect number 1412877.
Thanks
bob
Bob Van der Donck
Principal UX designer DMG group
Where would I put this code within Inventor 2024 for the BeforeSave event trigger?
Hi @WP_Australind. I am not sure I understand the question...what do you mean by "when"? Do you mean how? If you meant how, then go to the Manage tab, then to the iLogic panel, and there should be a button named "Event Triggers". When you click that a dialog will pop-up with 5 tabs across the top, two areas on the left, and one large area on the right. You usually want to be on the tab named "This Document", because stuff on that tab will only effect that one document, and no others. The top area on the left has internal rules listed (rules that are saved within that document, if any), and the lower left area will contain your external iLogic rules, if any. You can drag one of those rules from the left to the right, and put it under the event named "Before Save Document". Then click the OK button. Then whenever you save that one document, it will automatically run that rule just before it saves each time.
Wesley Crihfield
(Not an Autodesk Employee)