diff options
| author | Mark Wells <mark@freeside.biz> | 2013-04-29 11:36:01 -0700 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2013-04-29 11:36:01 -0700 |
| commit | 00755aee33cc3ecdf3634bcc0f50f54814bfc400 (patch) | |
| tree | 6c206afdaecbd3e4d520bf007625e082724a4cc9 /httemplate/misc/delete-note.html | |
| parent | f4ee951f84a23a683cff75ed8cfd88cf693e462c (diff) | |
delete customer notes, #22296
Diffstat (limited to 'httemplate/misc/delete-note.html')
| -rw-r--r-- | httemplate/misc/delete-note.html | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/httemplate/misc/delete-note.html b/httemplate/misc/delete-note.html new file mode 100644 index 000000000..436326ff1 --- /dev/null +++ b/httemplate/misc/delete-note.html @@ -0,0 +1,11 @@ +<%init> +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Edit customer note'); + +my ($notenum) = $cgi->keywords; +$notenum =~ /^\d+$/ or die "bad notenum '$notenum'"; +my $note = FS::cust_main_note->by_key($notenum) + or die "notenum '$notenum' not found"; +$note->delete; +</%init> +<% $cgi->redirect($p.'view/cust_main.cgi?'.$note->custnum) %> |