Subversion Repositories VORC

Rev

Rev 58 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 58 Rev 118
Line 143... Line 143...
143 
    $sth->execute (map { defined $_ ? $_ : undef } @R) or print $sth->errstr;
 143 
    $sth->execute (map { defined $_ ? $_ : undef } @R) or print $sth->errstr;
144 
  }
 144 
  }
145 
  print "DONE!", $h->br, $h->br;
 145 
  print "DONE!", $h->br, $h->br;
Line 146... Line 146...
146
146
147 
  print "Updating RCid -> MVP Ticket links... ";
 147 
  print "Updating RCid -> MVP Ticket links... ";
148 
  $dbh->do ("replace into RCid_ticket_link select official.RCid, id from official join v_ticket on official.email = v_ticket.email and official.real_name = v_ticket.full_name");
 148 
  $dbh->do ("replace into RCid_ticket_link select official.RCid, id, year(now()) from official join v_ticket on official.email = v_ticket.email and official.real_name = v_ticket.full_name");
Line 149... Line 149...
149 
  print "DONE!", $h->br, $h->br;
 149 
  print "DONE!", $h->br, $h->br;
Line 150... Line 150...
150
150