Solid Edge Revision Manager Object Library > Document Object : IsDocumentFOP Method |
Member | Value |
---|---|
FOPMasterAndChild | 6 |
FOPMasterDocument | 2 |
FOPMemberDocument | 4 |
FopStatusUnknown | 0 |
NotInvolvedInFOP | 1 |
Visual Basic |
---|
Public Function IsDocumentFOP( _ ByRef FOPStatus As Long _ ) As Long |
Member | Value |
---|---|
FOPMasterAndChild | 6 |
FOPMasterDocument | 2 |
FOPMemberDocument | 4 |
FopStatusUnknown | 0 |
NotInvolvedInFOP | 1 |
Imports RevisionManager Imports System.Runtime.InteropServices Module Example Sub Main() Dim objApplication As RevisionManager.Application = Nothing Dim objDocument As RevisionManager.Document = Nothing Dim iFOPStatus As Integer Dim iRetVal As Integer Try ' Start Revision Manager. objApplication = New RevisionManager.Application objDocument = objApplication.Open("C:\Part1.par") iRetVal = objDocument.IsDocumentFOP(iFOPStatus) Catch ex As Exception ' Write any errors to console. Console.WriteLine(ex.Message) Finally ' Release COM Objects. If Not (objDocument Is Nothing) Then Marshal.ReleaseComObject(objDocument) objDocument = Nothing End If If Not (objApplication Is Nothing) Then objApplication.Quit() Marshal.ReleaseComObject(objApplication) objApplication = Nothing End If End Try End Sub End Module