All wobject collateral now moves using the moveCollateral method in the wobject superclass.

This commit is contained in:
JT Smith 2002-09-30 02:15:23 +00:00
parent 67d6329c22
commit 539f3bba59
4 changed files with 8 additions and 96 deletions

View file

@ -186,34 +186,12 @@ sub www_editQuestionSave {
#-------------------------------------------------------------------
sub www_moveQuestionDown {
my (@data, $thisSeq);
if (WebGUI::Privilege::canEditPage()) {
($thisSeq) = WebGUI::SQL->quickArray("select sequenceNumber from FAQ_question where questionId=$session{form}{qid}");
@data = WebGUI::SQL->quickArray("select questionId from FAQ_question where wobjectId=".$_[0]->get("wobjectId")." and sequenceNumber=$thisSeq+1 group by wobjectId");
if ($data[0] ne "") {
WebGUI::SQL->write("update FAQ_question set sequenceNumber=sequenceNumber+1 where questionId=$session{form}{qid}");
WebGUI::SQL->write("update FAQ_question set sequenceNumber=sequenceNumber-1 where questionId=$data[0]");
}
return "";
} else {
return WebGUI::Privilege::insufficient();
}
$_[0]->moveCollateralDown("FAQ_question","questionId",$session{form}{qid});
}
#-------------------------------------------------------------------
sub www_moveQuestionUp {
my (@data, $thisSeq);
if (WebGUI::Privilege::canEditPage()) {
($thisSeq) = WebGUI::SQL->quickArray("select sequenceNumber from FAQ_question where questionId=$session{form}{qid}");
@data = WebGUI::SQL->quickArray("select questionId from FAQ_question where wobjectId=".$_[0]->get("wobjectId")." and sequenceNumber=$thisSeq-1 group by wobjectId");
if ($data[0] ne "") {
WebGUI::SQL->write("update FAQ_question set sequenceNumber=sequenceNumber-1 where questionId=$session{form}{qid}");
WebGUI::SQL->write("update FAQ_question set sequenceNumber=sequenceNumber+1 where questionId=$data[0]");
}
return "";
} else {
return WebGUI::Privilege::insufficient();
}
$_[0]->moveCollateralUp("FAQ_question","questionId",$session{form}{qid});
}
#-------------------------------------------------------------------