Hi Adam.Zarate,
Here is an iLogic rule that will look at each each view, on each sheet, of your drawing, and then it will add all of this information for you in the drawing view label, just as you show it in your PDF.
And here's a link to show you how to create a basic iLogic rule in your drawing:
http://inventortrenches.blogspot.com/2012/01/creating-basic-ilogic-rule-with-event.html
I hope this helps.
Best of luck to you in all of your Inventor pursuits,
Curtis
http://inventortrenches.blogspot.com
(see the attached file for the rule in a text file, just in case this code box messes with the formatting when copying and pasting.)
Dim oDoc As DrawingDocument: oDoc = ThisDoc.Document
oModel = ThisDoc.ModelDocument
Dim oSheets As Sheets
Dim oSheet As Sheet
Dim oViews As DrawingViews
Dim oView As DrawingView
oSheets = oDoc.Sheets
'look at each sheet
For Each oSheet In oSheets
oViews = oSheet.DrawingViews
'look at each view on the sheet
For Each oView In oViews
'Turn on the view Label
oView.ShowLabel = true
'get the model reference
oModelName = _
oView.ReferencedDocumentDescriptor.ReferencedDocument.DisplayName
'get some standard iProperties from the model
oPartNumber = iProperties.Value(oModelName, "Project", "Part Number")
oDescription = iProperties.Value(oModelName, "Project", "Description")
oMaterial = iProperties.Material(oModelName)
'get custom iProps
Try
'get the property ID for these custom iProperties from the model referenced by the view
o_iPropID_1 = oModel.PropertySets.Item("User Defined Properties").Item("Length").PropId
o_iPropID_2 = oModel.PropertySets.Item("User Defined Properties").Item("Width").PropId
o_iPropID_3 = oModel.PropertySets.Item("User Defined Properties").Item("Thickness").PropId
Catch
'here you could add a message that one or more of the custom iProperties were not found
End Try
'set iProp format to be able to use it in the View Label
Try
'_____ format the custom iProperty string and add the property ID
oString1 = "<Property Document='model' PropertySet='User Defined Properties' " _
& "Property='Length' FormatID='{D5CDD505-2E9C-101B-9397-08002B2CF9AE}' PropertyID='" _
& o_iPropID_1 & "'>Length</Property>"
'_____ format the custom iproperty string and add the property ID
oString2 = "<Property Document='model' PropertySet='User Defined Properties' " _
& "Property='Width' FormatID='{D5CDD505-2E9C-101B-9397-08002B2CF9AE}' PropertyID='" _
& o_iPropID_2 & "'>Width</Property>"
'_____ format the custom iproperty string and add the property ID
oString3 = "<Property Document='model' PropertySet='User Defined Properties' " _
& "Property='Thickness' FormatID='{D5CDD505-2E9C-101B-9397-08002B2CF9AE}' PropertyID='" _
& o_iPropID_3 & "'>Thickness</Property>"
'add the custom iproperties to the view label
oView.Label.FormattedText = "P/N : " & oPartNumber & "<Br/>" & _
oDescription & "<Br/>" & _
"Material : Sheet, " & oString3 & " Thk x " & oString2 & " W x " & oString1 &" L, " & oMaterial
Catch
'do nothing if error
End Try
Next
Next
