I'm having trouble deleting a record with the following code:
***********************************
*cmdDelete.click
use tblBranch in 0 again alias countbranch
count to thisform.records
use in countbranch
select tblbranchadmin
if thisform.records = 1
=messagebox("There must be at least one branch - Branch record will not be deleted !";
,64,"SWITCH Reconciliation")
else
if messagebox("Are you sure you want to delete this Branch",;
256+4+32,"SWITCH Reconciliation") = 6
delete && RECORD IS NOT BEING MARKED FOR DELETION !!
go top
thisform.brname = alltrim(tblbranchadmin.branchname)
thisform.brnumb = alltrim(tblbranchadmin.branchnumb)
thisform.refresh()
endif
endif
***************************
Are there any system settings that would prohibit the deletion of a record? I'm probably overlooking something very simple but I can't see it.
Al Williams
Anola MB, CANADA