DTS Rule to look at status of a service

I am creating a Calculate data rule that will create a new field called Encrypted.  It looks to see if the Bitlocker or PGP service exists and if the status is running.  However I am not sure if this is possible.

Below is my code.  The problem I think is in checking service status.  How does it know which service to check?

Any ideas?

RetValue="No"

if ucase("!Computer.OS.Drivers and Services.Service.Name!") = ucase("BitLocker Drive Encryption Service") AND ucase("!Computer.OS.Drivers and Services.Service.Status!") = "RUNNING" then
RetValue = "Yes"
End if

if ucase("!Computer.OS.Drivers and Services.Service.Name!") = "PGPSERV" AND ucase("!Computer.OS.Drivers and Services.Service.Status!") = "RUNNING" then
RetValue = "Yes"
End If

- Kurt