httemplate/misc/merge_cust.html

   1 <% include('/elements/header-popup.html', 'Merge customer' ) %>
   2
   3 <% include('/elements/error.html') %>
   4
   5 <FORM NAME="cust_merge_popup" ID="cust_merge_popup" ACTION="<% popurl(1) %>cust_main-merge.html" METHOD=POST onSubmit="submit_merge(); return false;">
   6
   7 <SCRIPT TYPE="text/javascript">
   8
   9 var submit_interval_id;
  10 function submit_merge() {
  11   document.getElementById('confirm_merge_cust_button').disabled = 'true';
  12   smart_new_custnum_search(document.getElementById('new_custnum_search'));
  13   submit_interval_id = setInterval( do_submit_merge, 100);
  14 }
  15
  16 function do_submit_merge() {
  17
  18   if ( new_custnum_search_active )
  19     return;
  20
  21   document.getElementById('confirm_merge_cust_button').disabled = '';
  22
  23   clearInterval(submit_interval_id);
  24
  25   if ( document.cust_merge_popup.new_custnum.value != '' ) {
  26     document.cust_merge_popup.submit();
  27   }
  28
  29 }
  30
  31 </SCRIPT>
  32
  33 </SCRIPT>
  34
  35 <INPUT TYPE="hidden" NAME="custnum" VALUE="<% $custnum %>">
  36
  37 <TABLE BORDER="0" CELLSPACING="2" STYLE="margin-left:auto; margin-right:auto">
  38   <% include('/elements/tr-search-cust_main.html',
  39                'label'       => 'Merge into: ',
  40                'field'       => 'new_custnum',
  41                'find_button' => 1,
  42                'curr_value'  => scalar($cgi->param('new_custnum')),
  43             )
  44   %>
  45 </TABLE>
  46
  47 <P ALIGN="CENTER">
  48 %#have merge button start out disabled and enable after you select a target cust
  49 <INPUT TYPE="submit" NAME="confirm_merge_cust_button" ID="confirm_merge_cust_button" VALUE="Merge customer">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<INPUT TYPE="BUTTON" VALUE="Don't merge" onClick="parent.cClick();">
  50
  51 </FORM>
  52 </BODY>
  53 </HTML>
  54
  55 <%init>
  56
  57 $cgi->param('custnum') =~ /^(\d+)$/ or die 'illegal custnum';
  58 my $custnum = $1;
  59
  60 my $curuser = $FS::CurrentUser::CurrentUser;
  61
  62 die "access denied" unless $curuser->access_right('Merge customer');
  63
  64 my $cust_main = qsearchs( {
  65   'table'     => 'cust_main',
  66   'hashref'   => { 'custnum' => $custnum },
  67   'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql,
  68 } );
  69 die "No customer # $custnum" unless $cust_main;
  70
  71 </%init>
  72