Mocom LogoMocom Systems

Mocom

Mist

Worksite Developer Interface

The Mocom Worksite Developer Interface (WDI) is an ActiveX or .Net library that helps developers quickly and productively write code to integrate their application\macros with Interwoven (iManage) Worksite, without having to learn and understand the complex and expensive Worksite SDK.

 

The Worksite Developer Interface is available as an ActiveX dll or a Microsoft .Net .dll for managed code.


Please contact us if you would like more details, or to download a trial version - info@mocomsystems.com

 

SAMPLE COMMANDS FROM MOCOM Worksite WORKSITE 7.5 INTERFACE
This code shows just how simple it is to integrate an application with worksite using the quick and easy Mocom DLL.

Login to Worksite using Windows Login:

Dim MyLogin As Mocom_DMS.WorksiteLogin
With MyLogin
.servername = "DMSServer" 'Put your Worksite server name here
End With


Browse a database to select a folder:

Dim SelectedFolder As String
SelectedFolder = Mocom.Browser("MyDatabase")  'Put the name of the target database here.


Get User properties from Worksite for valid Author names etc.:

Dim aAuthors() As Mocom_DMS.User  'Mocom_DMS.User contains all the Worksite user properties
Call Mocom.GetUserNames("MyDatabase", "", aAuthors)  'such as .Name, .FullName, .Email, .Groups, .SecurityRight etc.


Get Client properties from Worksite for valid Client names etc.:

Dim aClients() As Mocom_DMS.ItemNames  'Mocom_dms.ItemNames contain .Description, Extension and Name properties.
Call Mocom.GetClients("MyDatabase", "", aClients)


Get Matter properties from Worksite for valid Matter names etc.:

Dim aMatters() As ItemNames, strClientName As String  'Mocom_dms.ItemNames contain .Description, Extension and Name properties.
strClientName = "IBM"
Call Mocom.GetMatters("MyDatabase", "", strClientName, aMatters)


Create a new Word Document in Worksite:

Dim blnCheckedOUT As Boolean, strTemplateName As String, blnUseIManProfileDlg As Boolean
blnCheckedOUT = True 'Open the document
strTemplateName = "Professional Fax.Dot"  'Word template to base this new document on.
blnUseIManProfileDlg = False
Call Mocom.NewWordDoc(MyProfile, strTemplateName, blnCheckedOUT, blnUseIManProfileDlg)


Import an existing document into Worksite:

Dim strFileName As String, blnCopDoc As Boolean
strFileName = "C:\Spreadsheets\Test.xls" 'File to import
blnCopy = True 'Copy the file to import so that the original remains in place.
Call Mocom.ImportDoc(strFileName, MyProfile, blnCheckedOUT, blnUseIManProfileDlg, blnCopyDoc)


Check-In a document to Worksite:

MyProfile.Number = 1234567 'Specify the document number
MyProfile.Version = 1 'Specify the document version
Mocom.CheckInDoc (MyProfile) 'Check it in


Check-Out a Worksite document and get its profile:

Dim blnLatestVersion As Boolean, blnOverWrite As Boolean
MyProfile.Number = 1234567 'Specify the document number
MyProfile.Version = 1 'Specify the document version
blnLatestVersion = True 'Specify if this should be the latest version (ignore version in MyProfile)
blnOverWrite = True 'Overwrite the document if it exists in the check-out path
blnReadOnly = False 'Open it read only or not
Call Mocom.CheckOutDoc(MyProfile, blnLatestVersion, blnOverWrite, blnReadOnly)