PfsSchedule

Remarks:

In a schedule object you can create absolute and relativ times and link them with switching points, so that a funktion is excecuted or a the value of a variable can be changed.

Properties:

Methods:

Samples:

''''''''''''''''''''''''''''''''''''''''''''''
'''''''''''''Creation, Reading out''''''''''''
'''''''''''and Deletion of schedules''''''''''
''''''''''''''''''''''''''''''''''''''''''''''
Private Sub shifttest()

	Dim mypfs As PfsEngine
	Set mypfs = MyWorkspace.ActiveDocument.PFS
	Dim mystring As String

''''''Creation''''''''
Dim i As Double
Debug.Print "---Creation:"

	For i = 0 To 5
		mystring = "schedule" & i
		mypfs.Groups.Item(0).Schedules.CreateSchedule (mystring)
		Debug.Print mystring & " was created!"
	Next i

''''''Reading out'''''
Dim f As Double
Debug.Print "---Reading Out:"

	For f = 0 To mypfs.Groups.Item(0).Schedules.Count - 1
		Debug.Print mypfs.Groups.Item(0).Schedules.Item(f).Name
		Debug.Print mypfs.Groups.Item(0).Schedules.Item(f).GUID
		Debug.Print mystring & " was created!"
	Next f

''''''Deletion'''''
Dim t As Double
Debug.Print "---Deletion:"

	For t = mypfs.Groups.Item(0).Schedules.Count - 1 To 1 Step -1
		mystring = mypfs.Groups.Item(0).Schedules.Item(t).Name
		mypfs.Groups.Item(0).Schedules.DeleteSchedule (t)
		Debug.Print mystring & " was deleted!"
	Next t

End Sub