VORCCoffeeCatalogORC

BlueGreycalmElegant

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → / @ 117

  → / @ 118

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

Ignore whitespace Rev 117 → Rev 118

/trunk/site/schedule/bulk_upload_mvp_passes.pl
145,7 → 145,7
print "DONE!", $h->br, $h->br;
print "Updating RCid -> MVP Ticket links... ";
$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");
$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");
print "DONE!", $h->br, $h->br;
$dbh->disconnect (); # Image was stored into database successfully. Present confirmation

/trunk/site/schedule/update_mvp_ticket.pl
101,13 → 101,13
$sth = $dbh->prepare ("delete from RCid_ticket_link where RCid = ? and MVPid = ?");
} else {
my ($taken) = $dbh->selectrow_array ("select RCid from RCid_ticket_link where MVPid = ? or RCid = ?", undef, $mvpid, $rcid);
my ($taken) = $dbh->selectrow_array ("select RCid from RCid_ticket_link where RCid_ticket_link.year = year(now()) and (MVPid = ? or RCid = ?)", undef, $mvpid, $rcid);
return "ERROR ($taken): Either that user or that ticket is already matched." if $taken;
my ($exists) = $dbh->selectrow_array ("select id from ticket where id = ?", undef, $mvpid);
return "ERROR: That MVP Ticket doesn't seem to exist ($mvpid)." unless $exists;
$sth = $dbh->prepare ("insert into RCid_ticket_link (RCid, MVPid) values (?, ?)");
$sth = $dbh->prepare ("insert into RCid_ticket_link (RCid, MVPid, year) values (?, ?, year(now()))");
}

/trunk/site/schedule/users.pl
137,7 → 137,7
} else {
my @options = ("", "pass", "no pass");
my $dbh = getRCDBH;
push @options, map { @{$_} } @{$dbh->selectall_arrayref ("select MVPid from RCid_ticket_link order by MVPid")};
push @options, map { @{$_} } @{$dbh->selectall_arrayref ("select MVPid from RCid_ticket_link where year = year(now()) order by MVPid")};
@options = map { $FORM{"filter-MVPid"} eq $_ ?
( $h->option ({ selected=>[] }, $_) ) :

/trunk/site/schedule/view_user.pl
124,7 → 124,7
($F->{RCid}, $F->{activation}) = $dbh->selectrow_array ("select RCid, activation from official where email = ?", undef, $F->{email});
$dbh->do ("replace into RCid_ticket_link select official.RCid, v_ticket.id from official join v_ticket on official.email = v_ticket.email and official.real_name = v_ticket.full_name where official.RCid = ?", undef, $F->{RCid});
$dbh->do ("replace into RCid_ticket_link select official.RCid, v_ticket.id, year(now()) from official join v_ticket on official.email = v_ticket.email and official.real_name = v_ticket.full_name where official.RCid = ?", undef, $F->{RCid});
logit ($F->{RCid}, "New User Registration");
sendNewUserEMail ("New User", $F);
$cookie_string = authenticate (RollerCon::USER);
193,7 → 193,7
$F->{password} = "*******";
$F->{buttons} = $h->input ({ type=>"hidden", name=>"RCid", value=>$F->{RCid} }).$h->input ({ type=>"submit", name=>"submit", value=>"Edit" });
$F->{department} = convertDepartments ($F->{department});
$dbh->do ("replace into RCid_ticket_link select official.RCid, v_ticket.id from official join v_ticket on official.email = v_ticket.email and official.real_name = v_ticket.full_name where official.RCid = ?", undef, $F->{RCid});
$dbh->do ("replace into RCid_ticket_link select official.RCid, v_ticket.id, year(now()) from official join v_ticket on official.email = v_ticket.email and official.real_name = v_ticket.full_name where official.RCid = ?", undef, $F->{RCid});
if (scalar @ERRORS) {
$ERRMSG = join $h->br, @ERRORS;