About Accessing Activities in the PERT Chart

Interface Description Language (IDL) can be used to locate activities in the PERT chart. This document describes the enhancements to the CATIA OLE Automation Server to enable the automation clients to locate activities in the PERT chart.

The following example script illustrates how products and resources can be assigned to an activity.

Language="VBSCRIPT"
Sub CATMain()
'Create a New PPRDocument and Set it as an ActiveDocument
Dim processDoc As PPRDocument
Set processDoc = CATIA.Documents.Add("Process")
Set processDoc = CATIA.ActiveDocument

'Adding a Process Library to Use
processDoc.addProcessLibraryToUse "d:/myProcess.act"

'Get the Handle to the Root Process
Dim Process as Activity
Set Process = ProcessDoc.Processes.Item( 1 )

'Create an Activitiy of Type Load1
Dim LoadActivity as Activity
set LoadActivity = Process.CreateChild("Load1")
LoadActivity.Name = "LoadActivity"

'Create a PERT Node and Locate it at ( 20, 10 ) in the PERT Chart 
Dim LoadActNode as PertNode
Set LoadActNode = LoadActivity.GetTechnologicalObject("PERT")
LoadActNode.SetLocation( 10.0, 20.0 )


'Create an Activitiy of Type Load33
Dim WeldActivity as Activity
set WeldActivity = Process.CreateChild("Load33")
WeldActivity.Name = "WeldActivity"

'Create a PERT Node and Locate it at ( 20, 20 ) in the PERT Chart 
Dim WeldActNode as PertNode
Set WeldActNode = WeldActivity.GetTechnologicalObject("PERT")
WeldActNode.SetLocation( 20.0, 20.0 )

'Create the Link between Load and Weld Activities and Save the Document. 
LoadActivity.CreateLink(WeldActivity)
processDoc.SaveAs "d:\CreatedFromVBScript.CATProcess"
End Sub