I don't know why but copy buttons on two of my browses are not working.
I have checked everything I can think of to no avail.
The record gets created but the values for the fields are not copied across.
Here's the code from the PreCopy routine in one of my forms:
PreCopy Routine
p_web.SetValue('UpdateCOMPLAINTS_form:ready_',1)
! Start of "On Copy : Form begins"
! [Priority 5000]
! End of "On Copy : Form begins"
p_web.SetSessionValue('UpdateCOMPLAINTS_CurrentAction',Net:CopyRecord)
p_web.setsessionvalue('showtab_UpdateCOMPLAINTS',0)
p_web._PrimeFile(COMPLAINTS,false,0)
Ans = Net:ChangeRecord
p_web.SetSessionValue('UpdateCOMPLAINTS:Primed',1)
p_web._PreCopyRecord(COMPLAINTS,CM2:KeyComplaintId,Net:Web:Autonumbered)
! here we need to copy the non-unique fields across
If not CM2:DateOfComplaint
p_web.SetSessionValue('CM2:DateOfComplaint',TODAY())
CM2:DateOfComplaint = TODAY()
end
! Start of "Pre Copy After Primes"
! [Priority 5000]
! End of "Pre Copy After Primes"
do SetFormSettings
Is there anything there that may suggest what is wrong?
Thanks!!
Don