iLogic External Rule Cycle Through Open Documents

[ben.coxL97MN]

I'm trying to write an external rule that will cycle through all open drawings and fill in the "Eng. Approved By:" and "Eng. Approved Date:" item in the iproperties. The code I have will update the first drawing, then will cycle through all the open drawings, but will only update the drawings that was initially active. Can anyone see what I'm missing?

Dim oDoc As Document = ThisApplication.ActiveDocument

Dim ApprovedBy As String = InputBox("Enter Approving Engineer's Intials", "Engineer Approval", "Initials")

For Each oDoc In ThisApplication.Documents.VisibleDocuments
	
	If oDoc.DocumentType = kDrawingDocumentObject Then

		oDoc.Activate

		iProperties.Value("Status", "Engr Approved By") = ApprovedBy
		iProperties.Value("Status", "Engr Date Approved") = Now
	
	End If
Next
	
MessageBox.Show("All Open Drawings Approved.", "ApproveDwgs")


Thank you all so much!

[A.Acheson]

The issue here is the iproperty snippet is only acting in the document the rule is run from. You can target  each document by getting the document name with extension. Here is the Syntax on targeting the document.

The system IO Documentation here or shorten to IO in the ilogic editor. You may have seen this in other forum posts. 

Dim oDoc As Document = ThisApplication.ActiveDocument

Dim ApprovedBy As String = InputBox("Enter Approving Engineer's Intials", "Engineer Approval", "Initials")

For Each oDoc In ThisApplication.Documents.VisibleDocuments
	
	If oDoc.DocumentType = kDrawingDocumentObject Then

		oDoc.Activate
                Dim oDocName As String = IO.Path.GetFileName(oDoc.FullFileName) 

		iProperties.Value(oDocName,"Status", "Engr Approved By") = ApprovedBy
		iProperties.Value(oDocName,"Status", "Engr Date Approved") = Now
	
	End If
Next
	
MessageBox.Show("All Open Drawings Approved.", "ApproveDwgs")


Thank you all so much!

[A.Acheson · Accepted solution]

I am not sure why but the iproperty snippet for targeting other drawings does not work.  What does work is accessing via the property sets method. 

Dim ApprovedBy As String = InputBox("Enter Approving Engineer's Intials", "Engineer Approval", "Initials")
If ApprovedBy = Nothing Then Return
For Each oDoc In ThisApplication.Documents.VisibleDocuments
	
	Dim oDrawDoc As DrawingDocument
	If oDoc.DocumentType = DocumentTypeEnum.kDrawingDocumentObject Then
		oDrawDoc = oDoc
		oDrawDoc.PropertySets("Design Tracking Properties")("Engr Approved By").Value = ApprovedBy
		oDrawDoc.PropertySets("Design Tracking Properties")("Engr Date Approved").Value = Now
	End If
Next
MessageBox.Show("All Open Drawings Approved.", "ApproveDwgs")

Here is a rule to give you a list of the property sets of the document in the ilogic logger. You can use this to construct the iproperty access as above.

  Dim doc As Document
 doc = ThisApplication.ActiveDocument
  
  Dim ps As PropertySet
  For Each ps In doc.PropertySets
   Logger.Info( ps.Name + " / " + ps.InternalName)

    Dim p As [Property]
    For Each p In ps
      Logger.Info( "  " + p.Name + " /" + Str(p.PropId))
    Next
  Next
  

[WCrihfield]

Hi @A.Acheson.  Just a quick note on why the iProperties iLogic snippet wouldn't work...  When attempting to work with the iProperties in another document, it is limited to the documents available within the AllReferencedDocuments of the 'local' (document the rule is saved within) or 'active' document.  I picked up that little nugget from Mike Deck this past year (as well as a bit more testing of my own), after I went on a mini-rant about the confusion with this snippet over the years, with how undocumented its input requirements are, its seemingly unreliable/unpredictable behavior, and the undocumented system of determining which document it will act upon by default in different situations.  At the time, I too was trying to use it to act upon a 'parallel' document (another visibly open document, other than the one I'm currently working with), rather than a document being referenced by the 'local' or 'active' document.

[ben.coxL97MN]

That worked perfect. Thank you so much. I tried to use the property sets method, but it looks like I overcomplicated what I was trying to do, and couldn't get it to work right.

[manuel.cervantesKANB9]

hi 

for other properties like Author, please see the following information 

Inventor Summary Information
Property Name	Type
Author	String
Comments	String
Keywords	String
Last Saved By	String
Thumbnail	IPictureDisp
Revision Number	String
Subject	String
Title	String
Inventor Document Summary Information
Property Name	Type
Category	String
Company	String
Manager	String
Design Tracking Properties
Property Name	Type
Authority	String
Catalog Web Link	String
Categories	String
Checked By	String
Cost	Currency
Cost Center	String
Creation Time	Date
Date Checked	Date
Defer Updates	Boolean
Description	String
Design Status	Long
Designer	String
Document SubType	String
Document SubType Name	String
Engineer	String
Engr Approved By	String
Engr Date Approved	Date
External Property Revision Id	String
Language	String
Manufacturer	String
Material	String
Mfg Approved By	String
Mfg Date Approved	Date
Parameterized Template	Boolean
Part Icon	IPictureDisp
Part Number	String
Part Property Revision Id	String
Project	String
Proxy Refresh Date	Date
Size Designation	String
Standard	String
Standard Revision	String
Standards Organization	String
Stock Number	String
Template Row	String
User Status	String
Vendor	String
Weld Material	String

thanks