FullertonTitan99
Technical User
- Actuate e.Report Designer Version 8
- Report for Deltek Vision 5.1
I have a report that I'm trying to update the percentage paid calculation for. In the case below, "Actual" means "Billed". Thanks in advance to taking the time to look at this and for your help.
Here's the line that I'm currently trying to update:
The report will currently generate something like this:
Budget Actual Paid % paid
1000 500 200 50
And I would like to get this:
Budget Actual Paid % paid
1000 500 200 20
I found these lines in the report.bas the code below. I've tried changing the "CnsActual" references to "CnsPaid" and have verified that that variable is valid, but when I build the report, the code goes back to it's original state. What am I missing?
Dim CnsBudget as intCnsBudget
Dim CnsActual as intCnsActual
Dim CnsPercent as curCnsPercent
Set CnsBudget = FindContentByClass("intCnsBudget")
Set CnsActual = FindContentByClass("intCnsActual")
Set CnsPercent = FindContentByClass("curCnsPercent")
If CnsBudget.Datavalue <> 0 Then
CnsPercent.Datavalue=CnsActual.Datavalue/CnsBudget.Datavalue
Else
CnsPercent.Datavalue = 0
End If
- Report for Deltek Vision 5.1
I have a report that I'm trying to update the percentage paid calculation for. In the case below, "Actual" means "Billed". Thanks in advance to taking the time to look at this and for your help.
Here's the line that I'm currently trying to update:
The report will currently generate something like this:
Budget Actual Paid % paid
1000 500 200 50
And I would like to get this:
Budget Actual Paid % paid
1000 500 200 20
I found these lines in the report.bas the code below. I've tried changing the "CnsActual" references to "CnsPaid" and have verified that that variable is valid, but when I build the report, the code goes back to it's original state. What am I missing?
Dim CnsBudget as intCnsBudget
Dim CnsActual as intCnsActual
Dim CnsPercent as curCnsPercent
Set CnsBudget = FindContentByClass("intCnsBudget")
Set CnsActual = FindContentByClass("intCnsActual")
Set CnsPercent = FindContentByClass("curCnsPercent")
If CnsBudget.Datavalue <> 0 Then
CnsPercent.Datavalue=CnsActual.Datavalue/CnsBudget.Datavalue
Else
CnsPercent.Datavalue = 0
End If