Clearing BCWS and BCWP data

[JJ]

I need to send a Project file to a customer but I don't want to send
any of the Baseline, Cost or Earned Value data in the file.

I've been able to figure out out remove all Baseline data (left
Baseline Dates intact) and all Cost data, but I am having trouble
removing BCWS and BCWP.

I've tried to zero them out from the task and assignment objects but I
get the error "Object Required".

How do I remove BCWS and BCWP data from the Project file?

Thanks!
JJ

 

[John]

I need to send a Project file to a customer but I don't want to send
any of the Baseline, Cost or Earned Value data in the file.

I've been able to figure out out remove all Baseline data (left
Baseline Dates intact) and all Cost data, but I am having trouble
removing BCWS and BCWP.

I've tried to zero them out from the task and assignment objects but I
get the error "Object Required".

How do I remove BCWS and BCWP data from the Project file?

Thanks!
JJ

JJ,
Since you posted in the developer newsgroup I assume you are using VBA
to desensitize various fields in the file.

The error message you quote normally occurs when the code does not
provide the compiler with an object reference for the "expression" part
of the syntax. Sometimes the expression is optional, sometimes it's not.
In order to assist you further it would be helpful to see a snippet of
your code, particularly the line where the failure occurs.

John
Project MVP

 

[JJ]

Yes... I am using VBA.

The following is what I've done:

First Attempt: Clear TASK BCWS and BCWP:
==================================
For each t in ActiveProject.Tasks
If Not t is Nothing Then
If t.ExternalTask = False then
...
t.BCWS = 0
t.BCWP = 0
...
End If
End If
Next t

Second Attempt: Clear ASSIGNMENT BCWS and BCWP:
===========================================
For each t in ActiveProject.Tasks
If Not t is Nothing Then
If t.ExternalTask = False then
...
For each a in t.Assignments
...
a.BCWP = 0
a.BCWS = 0
...
Next A
...
End If
End If
Next t

I thought it was that simple. Apparently, BCWS and BCWP are read-only,
calculated fields. This leads me to believe that I have to zero out
some other property or field in order to zero out BCWS and BCWP.

Thanks in advance!
JJ

 

[John]

Yes... I am using VBA.

The following is what I've done:

First Attempt: Clear TASK BCWS and BCWP:
==================================
For each t in ActiveProject.Tasks
If Not t is Nothing Then
If t.ExternalTask = False then
...
t.BCWS = 0
t.BCWP = 0
...
End If
End If
Next t

Second Attempt: Clear ASSIGNMENT BCWS and BCWP:
===========================================
For each t in ActiveProject.Tasks
If Not t is Nothing Then
If t.ExternalTask = False then
...
For each a in t.Assignments
...
a.BCWP = 0
a.BCWS = 0
...
Next A
...
End If
End If
Next t

I thought it was that simple. Apparently, BCWS and BCWP are read-only,
calculated fields. This leads me to believe that I have to zero out
some other property or field in order to zero out BCWS and BCWP.

Thanks in advance!
JJ

JJ,
You are right in that the BCWS and BCWP properties of task, resource and
assignment objects are read only. The best way to clear these fields is
to clear the baseline. If Project is set for automatic calculation, the
earned value fields will be cleared.

Since you indicate you don't want your customer to see baseline data,
just use the BaselineClear Method.

Hope this helps.

John
Project MVP