From 24c164b829dce551badd130dba51b011342676f2 Mon Sep 17 00:00:00 2001 From: Jonathan Prykop Date: Wed, 7 Sep 2016 21:36:07 -0500 Subject: RT#72157: Monthly recurring field is missing --- .../misc/xmlhttp-cust_main-display_recurring.html | 29 ++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 httemplate/misc/xmlhttp-cust_main-display_recurring.html (limited to 'httemplate/misc/xmlhttp-cust_main-display_recurring.html') diff --git a/httemplate/misc/xmlhttp-cust_main-display_recurring.html b/httemplate/misc/xmlhttp-cust_main-display_recurring.html new file mode 100644 index 000000000..dd9ed3bb5 --- /dev/null +++ b/httemplate/misc/xmlhttp-cust_main-display_recurring.html @@ -0,0 +1,29 @@ +<% encode_json($return) %>\ +<%init> + +my %arg = $cgi->param('arg'); +my $custnum = delete($arg{'custnum'}); + +my $error; +my $return; + +$error = "No customer specified" unless $custnum =~ /^\d+$/; + +my $curuser = $FS::CurrentUser::CurrentUser; + +$error = "access denied" + unless $error or $curuser->access_right('View customer'); + +my $cust_main; +$cust_main = qsearchs( { + 'table' => 'cust_main', + 'hashref' => { 'custnum' => $custnum }, + 'extra_sql' => ' AND '. $curuser->agentnums_sql, +}) unless $error; +$error = "Customer not found!" unless $error or $cust_main; + +$return = $error + ? { 'error' => $error } + : { 'display_recurring' => [ $cust_main->display_recurring ] }; + + -- cgit v1.2.1