\n" . "\n" . "\t\n" . "\t\t\n" . "\t\n" . "\t\n" ."
\n"; } elseif ($ok == "Y") { $integritycheck .= "
\n" . "\n" . "\t\n" . "\t\t\n" . "\t\n" . "\t
\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
"; $cdelete=returnglobal('cdelete'); $adelete=returnglobal('adelete'); $qdelete=returnglobal('qdelete'); $gdelete=returnglobal('gdelete'); $assdelete=returnglobal('assdelete'); $asgdelete=returnglobal('asgdelete'); $qadelete=returnglobal('qadelete'); $sdelete=returnglobal('sdelete'); if (isset($sdelete)) { $integritycheck .= $clang->gT("Deleting Surveys").":
\n"; foreach ($sdelete as $ass) { $integritycheck .= $clang->gT("Deleting Survey ID").":".$ass."
\n"; $sql = "DELETE FROM {$dbprefix}surveys WHERE sid=$ass"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql)
".$connect->ErrorMsg()); } } if (isset($assdelete)) { $integritycheck .= $clang->gT( "Deleting Assessments").":
\n"; foreach ($assdelete as $ass) { $integritycheck .= $clang->gT("Deleting ID").":".$ass."
\n"; $sql = "DELETE FROM {$dbprefix}assessments WHERE id=$ass"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql)
".$connect->ErrorMsg()); } } if (isset($asgdelete)) { $integritycheck .= $clang->gT("Deleting Assessments").":
\n"; foreach ($asgdelete as $asg) { $integritycheck .= $clang->gT("Deleting ID").":".$asg."
\n"; $sql = "DELETE FROM {$dbprefix}assessments WHERE id=$asg"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql)
".$connect->ErrorMsg()); } } if (isset($qadelete)) { $integritycheck .= $clang->gT("Deleting Question_Attributes").":
\n"; foreach ($qadelete as $qad) { $integritycheck .= "Deleting QAID:".$qad."
\n"; $sql = "DELETE FROM {$dbprefix}question_attributes WHERE qaid=$qad"; $result = $connect->Execute($sql) or safe_die ("Couldn't delete ($sql)
".$connect->ErrorMsg()); } } 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" ."

\n"; } $surveyid=false; } else { $action = "dbchecker"; include("access_denied.php"); include("admin.php"); } ?>