Plz its very urgent

I need code for the following ;\

Hi Friends …

In my form there are four field which contain date for plan . another four field is for actual completion date for that plan .

what i have to do i have to compare all plan date with the current date and if current date is greater than the plan date and actual completion date field is empty in that case mail notification should go to some abc123@lotus.com mail address .

for this can anyone give me code for agent or…

condition for mail notification is

Current Date > Plan Date & Actual date =“Blank”

and there is four seperate-seperate fields for Plan date and actual date .

there are 4 editable and 4 computed field for each plan date and actual date .

it works in two phase in first phase all editable plan date is visible and actual date is hidden . after filling all plan date when submits this form comes again and at time all plan date is in computed form and actual date is in editable form . and when all plan date is filled and submitted at that time copy to mail goes to 10 users whose name i have entered .

i’ll try to make it clear by my agent ;

doc.saveoptions=“1”

If doc.dlgHOD3(0) = “” Or doc.dlgHOD3(0) = “Select” Then

approve “0”,doc.dlgHOD1(0),“1”

Else

approve “0”,doc.dlgHOD2(0),“2”

End If

Elseif(doc.txtflag(0)=“1”) Then

If doc.rdHOD1approval(0)=“Accepted” Then

approve “1”,doc.dlghod2(0),“2”

Elseif doc.rdHOD1approval(0)=“Request For Additional Information” Then

modify “1”,“1a”

Else

reject(“1”)

End If

Elseif(doc.txtflag(0)=“2”) Then

If doc.rdhod2approval(0)=“Accepted” Then

If doc.ACDate1(0)<>“” And doc.ACDate2(0)<>“” And doc.ACDate3(0)<>“” Then

approve “2”,doc.dlgHOD3(0),“3”

Else

Maildoc.CopyTo=array

approve"2",doc.dlgHOD2(0),“2”

End If

Elseif doc.rdhod2approval(0)=“Modifications Required” Then

modify “2”,“2a”

Else

reject(“2”)

End If

all the computed plan date name is pdate1 , pdate2,pdate3,pdate 4 and for actual computed date it is ACdate1,ACdate2,ACdate3,ACdate4 .

Plz its very urgent…

Subject: plz its very urgent

What i could make out is that u want to compare time using LN script.

See example below …use Notesdatetimedifference method

use this analogy to calculate the timediffernce between present date & plan date.

Set dtTo = New NotesDateTime(uidoc.fieldGetText(“to_dt”))

Set prsntdt = New NotesDateTime(Cdat(td_date(0)))

diffPr = dtTo.TimeDifference(prsntdt) / 86400



If diffPr>0 Then

	ans%= Messagebox("Cut Off Date cannot be a future date.Please Enter a valid Cut Off Date !!",48,"Invalid Cut Off Date")

	Call uidoc.GotoField("to_dt")    

	Exit Sub

End If