" . "
\n" . "| \n"
. "\t\t\t".$clang->gT("Data Consistency Check")." ".$clang->gT("If errors are showing up you might have to execute this script repeatedly.")."\n" . "\t\t | \n"
. "\t|
| ";
$cdelete=returnglobal('cdelete');
$adelete=returnglobal('adelete');
$qdelete=returnglobal('qdelete');
$gdelete=returnglobal('gdelete');
$assdelete=returnglobal('assdelete');
$asgdelete=returnglobal('asgdelete');
$qadelete=returnglobal('qadelete');
$sdelete=returnglobal('sdelete');
$sldelete=returnglobal('sldelete');
$oldsdelete=returnglobal('oldsdelete');
$oldtdelete=returnglobal('oldtdelete');
$bDefaultValueDelete=returnglobal('defaultvalue_delete');
$bQuotaDelete=returnglobal('quota_delete');
$bQuotaLanguageSettingsDelete=returnglobal('quotalanguagesettings_delete');
$bQuotaMembersDelete=returnglobal('quotamembers_delete');
if (isset($bDefaultValueDelete) && $bDefaultValueDelete==1)
{
$integritycheck .= $clang->gT("Deleting orphaned default values.")." \n"; $sSQL = "delete FROM {$dbprefix}defaultvalues where qid not in (select qid from {$dbprefix}questions)"; $result = $connect->Execute($sSQL) or safe_die ("Couldn't delete default values ($sSQL) ".$connect->ErrorMsg()); } if (isset($bQuotaMembersDelete) && $bQuotaMembersDelete==1) { $integritycheck .= $clang->gT("Deleting orphaned quotas.")." \n"; $sSQL = "delete FROM {$dbprefix}quota_members where quota_id not in (select id from {$dbprefix}quota) or qid not in (select qid from {$dbprefix}questions) or sid not in (select sid from {$dbprefix}surveys)"; $result = $connect->Execute($sSQL) or safe_die ("Couldn't delete quota members ($sSQL) ".$connect->ErrorMsg()); } if (isset($bQuotaDelete) && $bQuotaDelete==1) { $integritycheck .= $clang->gT("Deleting orphaned quotas.")." \n"; $sSQL = "delete FROM {$dbprefix}quota where sid not in (select sid from {$dbprefix}surveys)"; $result = $connect->Execute($sSQL) or safe_die ("Couldn't delete quotas ($sSQL) ".$connect->ErrorMsg()); } if (isset($bQuotaLanguageSettingsDelete) && $bQuotaLanguageSettingsDelete==1) { $integritycheck .= $clang->gT("Deleting orphaned language settings.")." \n"; $sSQL = "delete FROM {$dbprefix}quota_languagesettings where quotals_quota_id not in (select id from {$dbprefix}quota)"; $result = $connect->Execute($sSQL) or safe_die ("Couldn't delete quotas ($sSQL) ".$connect->ErrorMsg()); } if (isset($oldsdelete)) { $integritycheck .= $clang->gT("Deleting old survey result tables").": \n"; foreach ($oldsdelete as $olds) { $integritycheck .= $clang->gT("Deleting")." $olds \n"; $sql = "DROP TABLE $olds"; $result = $connect->Execute($sql) or safe_die ("Couldn't drop table $olds ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($oldtdelete)) { $integritycheck .= $clang->gT("Deleting old survey result tables").": \n"; foreach ($oldtdelete as $oldt) { $integritycheck .= $clang->gT("Deleting")." $oldt \n"; $sql = "DROP TABLE $oldt"; $result = $connect->Execute($sql) or safe_die ("Couldn't drop table $olds ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($sdelete)) { $integritycheck .= $clang->gT("Deleting Surveys").": \n"; $sql = "DELETE FROM {$dbprefix}surveys WHERE sid=$ass"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($sldelete)) { $integritycheck .= $clang->gT("Deleting survey language settings").": \n"; $sql = "DELETE FROM {$dbprefix}surveys_languagesettings WHERE surveyls_survey_id=$sld"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($assdelete)) { $integritycheck .= $clang->gT( "Deleting Assessments").": \n"; $sql = "DELETE FROM {$dbprefix}assessments WHERE id=$ass"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($asgdelete)) { $integritycheck .= $clang->gT("Deleting Assessments").": \n"; $sql = "DELETE FROM {$dbprefix}assessments WHERE id=$asg"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($qadelete)) { $integritycheck .= $clang->gT("Deleting Question_Attributes").": \n"; $sql = "DELETE FROM {$dbprefix}question_attributes WHERE qaid=$qad"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($cdelete)) { $integritycheck .= $clang->gT("Deleting Conditions").": \n"; foreach ($cdelete as $cd) { $integritycheck .= $clang->gT("Deleting cid").":".$cd." \n"; $sql = "DELETE FROM {$dbprefix}conditions WHERE cid=$cd"; $result=$connect->Execute($sql) or safe_die ("Couldn't Delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($adelete)) { $integritycheck .= $clang->gT("Deleting Answers").": \n"; foreach ($adelete as $ad) { list($ad1, $ad2)=explode("|", $ad); $integritycheck .= $clang->gT("Deleting answer with qid").":".$ad1." and code: ".$ad2." \n"; $sql = "DELETE FROM {$dbprefix}answers WHERE qid=$ad1 AND code='$ad2'"; $result=$connect->Execute($sql) or safe_die ("Couldn't Delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($qdelete)) { $integritycheck .= $clang->gT("Deleting questions").": \n"; foreach ($qdelete as $qd) { $integritycheck .= $clang->gT("Deleting qid").":".$qd." \n"; $sql = "DELETE FROM {$dbprefix}questions WHERE qid=$qd"; $result=$connect->Execute($sql) or safe_die ("Couldn't Delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } if (isset($gdelete)) { $integritycheck .= $clang->gT("Deleting Groups").": \n"; foreach ($gdelete as $gd) { $integritycheck .= $clang->gT("Deleting group id").":".$gd." \n"; $sql = "DELETE FROM {$dbprefix}groups WHERE gid=$gd"; $result=$connect->Execute($sql) or safe_die ("Couldn't Delete ($sql) ".$connect->ErrorMsg()); } $integritycheck .= " \n"; } $integritycheck .= $clang->gT("Check database again?")." \n" ."".$clang->gT("Check Again")." \n" ." | |