oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

some upgrade script fixes

Browse source
This commit is contained in:
JT Smith 2006-11-16 00:14:14 +00:00
parent 8e4d52166d
commit e1b583a935
3 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
docs/upgrades/upgrade_7.1.3-7.2.0.pl
View file

@ -249,6 +249,7 @@ sub reorderSurveyCollateral {
$sth1->execute();
while (my ($assetId) = $sth1->array) { ##Iterate over all surveys
my $survey = WebGUI::Asset->new($session, $assetId, 'WebGUI::Asset::Wobject::Survey');
next unless defined $survey; # skip pending surveys
my $Survey_Id = $survey->get('Survey_id');
$sth2->execute([$Survey_Id]);
while (my ($questionId) = $sth2->array) { ##iterate over all questions in the survey