Days360

[jtm311]

Re: Days360

David that works :) Now I've moved on to placing into the repeating rows. (great right-up ) I'm using the following. Still works, however, I 'm getting the same valve in each row.
I'm missing something else. Just to be clear the Billdate and Paid dates are populated via a DBF table's field. Do I all need to change the e_set to 1,2,3?


function days360 as c (e as p)

sDate = e.dataSubmitted.Billdate[1]
sDate = e.dataSubmitted.Billdate[2]
sDate = e.dataSubmitted.Billdate[3]
eDate = e.dataSubmitted.Paid[1]
eDate = e.dataSubmitted.Paid[2]
eDate = e.dataSubmitted.Paid[3]

mths = month(ctod(eDate)) - month_number(sDate)

e._set.Vnomonths.value = mths


end function

[Davidk]

Re: Days360

Glad it's working. Have a look at all the comments in the Xbasic function days360. There are a couple of areas about Repeating Sections, as well as some sample code that talks about setting multiple values in Repeating Sections efficiently by generating your own javascript. You can specifically set the each row - it's outlined in the comments. Let me know if it makes sense.

[jtm311]

Re: Days360

I'm back :)

As stated this works now that I have correct the date format. However, I am struggling with the repeating sections getting the same data on each row.
I think the only part missing is the e.dataSubmitted."".size()
However, I'm getting an error when writing it this way sdate = e.dataSubmitted.billdate.size() Is this not the correct way to state the above?

function days360 as n (e as p)
Dim sdate as d

sDate = e.dataSubmitted.billdate[1]
sDate = e.dataSubmitted.billdate[2]
sDate = e.dataSubmitted.billdate[3]


eDate = e.dataSubmitted.Paid[1]
eDate = e.dataSubmitted.Paid[2]
eDate = e.dataSubmitted.Paid[3]


sdate = date()
dtoc(sdate,"2/")

mths = ctod(eDate) - sdate


e._set.Vnomonths.value = mths

end function

[Davidk]

Re: Days360

John,

Not sure if your calling the Ajax callback from a button on each row, but that's how I set this up.

function days360_detail as c (e as p)

dim rsId as n = e.repeatingSectionInfo.find("CONTAINER_1","ut(name)")
dim currRow as n = val(e.repeatingSectionInfo[rsId].activeRow)
dim sDate as c = e.dataSubmitted.BDate[currRow]
dim eDate as c = e.dataSubmitted.PDate[currRow]	

dim eMth as n = month(ctod(eDate))
dim sMth as n = month(ctod(sDate))
mths = eMth - sMth

e._set.NbrMths.value = mths

end function

I have no idea why the original code I posted used month_number... which converts a month name to a number... so... that's out.

This looks at the row you're on, grabs the data in that row, does the calc, and puts the result into the dialog.

[jtm311]

Re: Days360

David this works! I changed it a little to meet my needs. I know get months however, it is displayed as 1.4 as an example.
I do call this function with a button on each line. Is there another way to call the function once the dialog it retrieved?

function days360 as c (e as p)

dim rsId as n = e.repeatingSectionInfo.find("CONTAINER_3","ut(name)")
dim currRow as n = val(e.repeatingSectionInfo[rsId].activeRow)
dim sDate as c = e.dataSubmitted.BillDate[currRow]
dim eDate as c = e.dataSubmitted.paid[currRow]

dim eMth as d = ctod(eDate)
dim sMth as d = ctod(sDate)
mths = EMth - SMth

e._set.vnomonths.value = mths

end function


Thanks for the help.

[Davidk]

Re: Days360

Hey John,

You're getting the decimal because the statements that set eMth and sMth are assigned the actual dates, and not just the Month number of that date. The statements should be...

dim eMth as n = month(ctod(eDate))
dim sMth as n = month(ctod(sDate))

For doing the calcs when you retrieve data, you can handle this a couple of ways.

1. Add a field to your database and actually save the months as you calc them. Then, when you retrieve the data, they are in place.
2. Use the Dialog Client-Side event afterAjaxCallbackComplete. I think this is the best one to use... since you're going to get data, and then calc, this event will fire once the data is in place - because the data retrieval is an Ajax Callback. And, since this event is Client-Side, we get to do the calcs in Javascript...

var cntRows = {dialog.Object}._getRepeatingSectionRowCount('CONTAINER_3');
var i = 0;
var begDate;
var endDate;
var numBDate;
var numEDate;
var mths;
while (i <= cntRows)
	{
	begDate = new Date({dialog.Object}.getValue('BILLDATE:'+i));
	endDate = new Date({dialog.Object}.getValue('PAID:'+i));
	numBDate = eval(begDate.getMonth())+1; //uses an offset of 0, so add 1
	numEDate = eval(endDate.getMonth())+1;
	mths = numEDate - numBDate;
	if (isNaN(mths))
		//in case there are empty rows in the repeating section
		{}
	else
		{
		{dialog.Object}.setValue('vnomonths:'+i,mths)
		}
	i++;
	}