model stock number to drawing stock number

[hEINSTEIN]

Hi Gents

My Components have a stock number that shows up in title block.

Part iproperties:

Drawing Title block:

Drawing iproperties:

Can someone help me with an illogic rule which will take the primary model’s Stock number and fill it in to the drawings Stock number.

[JelteDeJong]

you can try something like this:

Dim doc As DrawingDocument = ThisDoc.Document
Dim sheet As Sheet = doc.ActiveSheet
Dim view As DrawingView = sheet.DrawingViews.Item(1)
Dim refDoc As Document = view.ReferencedDocumentDescriptor.ReferencedDocument
Dim propSet As PropertySet = refDoc.PropertySets.Item("Design Tracking Properties")
Dim iProperty As [Property] = propSet.Item("Stock Number")

iProperties.Value("Project", "Stock Number") = iProperty.Value