db/prgsrc/updatedb.pl - diff

Return to updatedb.pl CVS log

Up to [Local Repository] / db / prgsrc

version 1.1, 2000/10/17 01:50:39	version 1.2, 2000/10/17 01:54:16
Line 162 MAIN:	Line 162 MAIN:
VALUES ($value, 'Ч', $ParentId, $source,	VALUES ($value, 'Ч', $ParentId, $source,
$CreatedAt)");	$CreatedAt)");
$sth->execute;	$sth->execute;
$TournamentId = $sth->{insertid};	$TournamentId = $sth->{mysql_insertid};
next;	next;
}	}
if ($key =~ /Тур/) {	if ($key =~ /Тур/) {
Line 176 MAIN:	Line 176 MAIN:
(Title, Type, ParentId, CreatedAt)	(Title, Type, ParentId, CreatedAt)
VALUES ($value, 'Т', $TournamentId, $CreatedAt)");	VALUES ($value, 'Т', $TournamentId, $CreatedAt)");
$sth->execute;	$sth->execute;
$TourId = $sth->{insertid};	$TourId = $sth->{mysql_insertid};
next;	next;
}	}
if ($key =~ /Вид/) {	if ($key =~ /Вид/) {
Line 188 MAIN:	Line 188 MAIN:
(ParentId, Number, Type)	(ParentId, Number, Type)
VALUES ($TourId, $qnum+1, $qtype)");	VALUES ($TourId, $qnum+1, $qtype)");
$sth->execute;	$sth->execute;
$QuestionId = $sth->{insertid};	$QuestionId = $sth->{mysql_insertid};
&UpdateQuestion($dbh, $QuestionId, "Question", $value);	&UpdateQuestion($dbh, $QuestionId, "Question", $value);
$qnum++;	$qnum++;
$all_qnum++;	$all_qnum++;