' Example SPDL logic.  (Compare with the similar example under PPG.Inspected topic)

sub OnInit

	Dim inspectedObjectNameArray

Application.LogMessage "We are inspecting " & PPG.InspectedObjects

	inspectedObjectNameArray = split( PPG.InspectedObjects, "," )

	for each item in inspectedObjectNameArray

		'Turn the string name into an object pointer

		set oNamePSet = GetValue( item )

		Application.LogMessage "Inspected object " & oNamePSet & " has " & oNamePSet.Parameters.Count & " parameters"

	next 

end sub