I'm having a small issue with a test database I'm building.

I have accounts with a subform called Pmt Data.  It's supposed to grab all the values and spit them into DBPd on the main form.  I've got some code in there to calculate compound interest, but that can be ignored.

However, I've created some test data with a positive $300, and a negative $300, and it's coming out as $600, rather than $0.  What is causing my negative amount to be counted as a positive?

Thanks!

// Give Total Collected

vRecord = 1
vCount = @FormResultSetTotal("Pmt Data")
vPdHere = 0
vPdDir = 0

if vCount >0 then
{
	While vRecord <= vCount
	{
		vPdHere = @TM(vPdHere) + @TM(@FormFieldValue("Pmt Data", "PdHere", vRecord))
		vPdHereInt = @TM(vPdHereInt) + @TM(@formfieldvalue("Pmt Data", "PdHere", vRecord)) * @Exp(1+DBIntRate,((@date-(@todate(@formFieldValue("Pmt Data","LE0",vRecord))))/365))
		vPdDir = @TM(vPdDir) + @TM(@FormFieldValue("Pmt Data", "PdDir", vRecord))
		vPdDirInt = @TM(vPdDirInt) + @TM(@formfieldvalue("Pmt Data", "PdDir", vRecord)) * @Exp(1+DBIntRate,((@date-(@todate(@formFieldValue("Pmt Data","LE0",vRecord))))/365))
		vRecord = vRecord + 1
	}
	DBPd = vPdHere + vPDDir
}
 

Here's what I got ...

vPdHere Before: 0
Sub Data: 300.000000
vPdHere After: 300
vPdHere Before: 300
Sub Data: 300.000000
vPdHere After: 600
 

So I'm back to fiddling with this ... and I'm trying to break down my code bit by bit through a Mass Update on a single record to play with this.

This single record has a subtable where I can clearly view 3 subrecords with the values of 4000, 2000, and 500.

Here is my Mass Update:

var vRecord = 1
var vCount as int
var vPdHere = 0
var vPdDir = 0
var vLoop as int

vCount = @FormResultSetTotal("Pmt Data")
vLoop = 1

if vCount >0 then
{
	While vLoop <= vCount
	{
//		WriteLn("PD HERE" & @FormFieldValue("Pmt Data","PdHere",vLoop))
		WriteLn("PD DIR" & @FormFieldValue("Pmt Data","PdDir",vLoop))
		vLoop = vLoop +1
	}
}
 

And here is the result I'm getting back:

PD DIR4000.000000
PD DIR4000.000000
PD DIR4000.000000
 

So why wouldn't my loop increment forward to get later entry values?

Thanks guys!

Hello Blair,

Is there any programming in the subform such as NotifyForm() that might be preventing Sesame from moving to the 2nd and 3rd record?

-Ray