//log table change
logTableChange("vl_districts","regionID",$id,getDetailedTableInfo2("vl_districts","id='$id'","regionID"),$formRegionID);
logTableChange("vl_districts","district",$id,getDetailedTableInfo2("vl_districts","id='$id'","district"),$district);
//update vl_districts
mysqlquery("update vl_districts set district='$district',regionID='$formRegionID' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_districts where id='$id'")) {
//remove dependencies
logDataRemoval("delete from vl_facilities where districtID='$id'");
mysqlquery("delete from vl_facilities where districtID='$id'");
//remove
logDataRemoval("delete from vl_districts where id='$id'");
mysqlquery("delete from vl_districts where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
mysqlquery("update vl_users set active='0' where id='$id'");
//flag
$id=0;
$deactivated=1;
break;
case remove:
if(isQuery("select * from vl_users where id='$id'")) {
//remove
if(is_file(getDetailedTableInfo2("vl_users","id='$id'","signaturePATH"))) {
unlink(getDetailedTableInfo2("vl_users","id='$id'","signaturePATH"));
}
logDataRemoval("delete from vl_users where id='$id'");
mysqlquery("delete from vl_users where id='$id'");
logDataRemoval("delete from vl_users_history where userID='$id'");
mysqlquery("delete from vl_users_history where userID='$id'");
logDataRemoval("delete from vl_users_permissions where userID='$id'");
mysqlquery("delete from vl_users_permissions where userID='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
mysqlquery("insert into vl_logs_samplerepeats
(sampleID,oldWorksheetID,created,createdby)
values
('$numericSampleID','$worksheetID','$datetime','$_SESSION[VLADMIN]')");
//flags
$added+=1;
} else {
$error.="<br />SampleID <strong>$sToAdd</strong> has already been scheduled for repeat.";
}
}
}
}
break;
case remove:
if(getDetailedTableInfo2("vl_logs_samplerepeats","id='$id'","id")) {
logDataRemoval("delete from vl_logs_samplerepeats where id='$id'");
mysqlquery("delete from vl_logs_samplerepeats where id='$id'");
//flag
$removed=1;
}
//redirect
if($removed) {
go("?act=repeatSamples&nav=datamanagement&removed=1");
}
break;
default:
if($modify) {
$task="modify";
}
break;
'$lrCategory','$lrEnvelopeNumber','$lrNumericID',
'$datetime','$trailSessionUser')");
if(mysqlerror())
die("3: ".mysqlerror());
//get latest sample ID, log $otherRegimen if any
if($otherRegimen) {
$latestSampleID=0;
$latestSampleID=getDetailedTableInfo2("vl_samples","createdby='$trailSessionUser' order by created desc limit 1","id");
//log other regimen
logSampleOtherRegimen($latestSampleID,$currentRegimenID,$otherRegimen);
} else {
logDataRemoval("delete from vl_samples_otherregimen where sampleID='$latestSampleID'");
mysqlquery("delete from vl_samples_otherregimen where sampleID='$latestSampleID'");
}
//review logs and fix any duplicates
fixDuplicateSampleIDs();
//redirect accordingly
go("/samples/success/".vlEncrypt(getDetailedTableInfo2("vl_samples","createdby='$trailSessionUser' order by created desc limit 1","vlSampleID"))."/");
} else {
$error.="<br /><strong>Duplicate Data Entry</strong><br /> Patient with ART Number <strong>$artNumber</strong> from <strong>".getDetailedTableInfo2("vl_facilities","id='$facilityID' limit 1","facility")."</strong> has already been entered with Form Number <strong>$formNumber</strong>.<br /> Kindly input this record with an alternative Form or ART Number.<br />";
}
}
}
?>
<script Language="JavaScript" Type="text/javascript">
}
}
break;
case modify:
//log table change
logTableChange("vl_appendix_viralloadtesting","appendix",$id,getDetailedTableInfo2("vl_appendix_viralloadtesting","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_viralloadtesting","position",$id,getDetailedTableInfo2("vl_appendix_viralloadtesting","id='$id'","position"),$position);
//update vl_appendix_viralloadtesting
mysqlquery("update vl_appendix_viralloadtesting set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_viralloadtesting where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_viralloadtesting where id='$id'");
mysqlquery("delete from vl_appendix_viralloadtesting where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
phone='$phone',
email='$email',
contactPerson='$contactPerson',
physicalAddress='$physicalAddress',
returnAddress='$returnAddress',
districtID='$districtID',
active='$active'
where
id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_facilities where id='$id'")) {
//remove
logDataRemoval("delete from vl_facilities where id='$id'");
mysqlquery("delete from vl_facilities where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
}
}
break;
case modify:
//log table change
logTableChange("vl_appendix_tbtreatmentphase","appendix",$id,getDetailedTableInfo2("vl_appendix_tbtreatmentphase","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_tbtreatmentphase","position",$id,getDetailedTableInfo2("vl_appendix_tbtreatmentphase","id='$id'","position"),$position);
//update vl_appendix_tbtreatmentphase
mysqlquery("update vl_appendix_tbtreatmentphase set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_tbtreatmentphase where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_tbtreatmentphase where id='$id'");
mysqlquery("delete from vl_appendix_tbtreatmentphase where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
}
break;
case modify:
//log table change
logTableChange("vl_appendix_regimen","appendix",$id,getDetailedTableInfo2("vl_appendix_regimen","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_regimen","position",$id,getDetailedTableInfo2("vl_appendix_regimen","id='$id'","position"),$position);
logTableChange("vl_appendix_regimen","treatmentStatusID",$id,getDetailedTableInfo2("vl_appendix_regimen","id='$id'","treatmentStatusID"),$treatmentLineStatusID);
//update vl_appendix_regimen
mysqlquery("update vl_appendix_regimen set appendix='$appendix',position='$position',treatmentStatusID='$treatmentLineStatusID' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_regimen where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_regimen where id='$id'");
mysqlquery("delete from vl_appendix_regimen where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
/**
* remove user images
*/
function removeUserImages($email) {
$query=0;
$query=mysqlquery("select * from vl_filenames where createdby='$email'");
if(mysqlnumrows($query)) {
$q=array();
while($q=mysqlfetcharray($query)) {
if(file_exists($q["filepath"])) {
unlink($q["filepath"]);
}
}
}
logDataRemoval("delete from vl_filenames where createdby='$email'");
mysqlquery("delete from vl_filenames where createdby='$email'");
}
<?
//security check
if(!$GLOBALS['vlDC'] || !$_SESSION["VLEMAIL"]) {
die("<font face=arial size=2>You must be logged in to view this page.</font>");
}
if($remove) {
//validate
$remove=validate($remove);
//remove envelope
logDataRemoval("delete from vl_envelopes where id='$remove'");
mysqlquery("delete from vl_envelopes where id='$remove'");
}
?>
<table width="100%" border="0" class="vl">
<? if(!getDetailedTableInfo2("vl_envelopes","id!='' limit 1","id")) { ?>
<tr>
<td class="vl_error">
There are No Envelopes on the System!<br />
<a href="/envelopes/capture/">Click Here to input the First Envelope.</a></td>
</tr>
<tr>
<td> </td>
</tr>
<? } ?>
<tr>
<td class="toplinks" style="padding:0px 0px 10px 0px"><a class="toplinks" href="/dashboard/">HOME</a> <a class="toplinks" href="/envelopes/">ENVELOPES</a> <a class="toplinks" href="/envelopes/manage/">Manage Envelopes</a></td>
</tr>
<tr>
<td style="padding: 5px 0px 15px 0px; border-bottom: 1px dashed #dfe6e6"><strong>Manage Envelopes</strong></td>
</tr>
}
}
break;
case modify:
//log table change
logTableChange("vl_appendix_treatmentinitiation","appendix",$id,getDetailedTableInfo2("vl_appendix_treatmentinitiation","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_treatmentinitiation","position",$id,getDetailedTableInfo2("vl_appendix_treatmentinitiation","id='$id'","position"),$position);
//update vl_appendix_treatmentinitiation
mysqlquery("update vl_appendix_treatmentinitiation set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_treatmentinitiation where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_treatmentinitiation where id='$id'");
mysqlquery("delete from vl_appendix_treatmentinitiation where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
$error.="<br>The supplied IP <strong>$ip</strong> is already within the system";
}
}
break;
case modify:
//log table change
logTableChange("vl_ips","ip",$id,getDetailedTableInfo2("vl_ips","id='$id'","ip"),$ip);
//update vl_ips
mysqlquery("update vl_ips set ip='$ip' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_ips where id='$id'")) {
//remove
logDataRemoval("delete from vl_ips where id='$id'");
mysqlquery("delete from vl_ips where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
}
}
break;
case modify:
//log table change
logTableChange("vl_appendix_arvadherence","appendix",$id,getDetailedTableInfo2("vl_appendix_arvadherence","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_arvadherence","position",$id,getDetailedTableInfo2("vl_appendix_arvadherence","id='$id'","position"),$position);
//update vl_appendix_arvadherence
mysqlquery("update vl_appendix_arvadherence set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_arvadherence where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_arvadherence where id='$id'");
mysqlquery("delete from vl_appendix_arvadherence where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
mysqlquery("delete from vl_results_roche where SampleID='$vlSampleID'");
logDataRemoval("delete from vl_results_abbott where sampleID='$vlSampleID'");
mysqlquery("delete from vl_results_abbott where sampleID='$vlSampleID'");
logDataRemoval("delete from vl_results_override where sampleID='$vlSampleID'");
mysqlquery("delete from vl_results_override where sampleID='$vlSampleID'");
logDataRemoval("delete from vl_logs_worksheetsamplesviewed where sampleID='$sv'");
mysqlquery("delete from vl_logs_worksheetsamplesviewed where sampleID='$sv'");
logDataRemoval("delete from vl_logs_worksheetsamplesprinted where sampleID='$sv'");
mysqlquery("delete from vl_logs_worksheetsamplesprinted where sampleID='$sv'");
logDataRemoval("delete from vl_logs_samplerepeats where sampleID='$sv'");
mysqlquery("delete from vl_logs_samplerepeats where sampleID='$sv'");
logDataRemoval("delete from vl_logs_printedresults where sampleID='$sv'");
mysqlquery("delete from vl_logs_printedresults where sampleID='$sv'");
logDataRemoval("delete from vl_logs_printedrejectedresults where sampleID='$sv'");
mysqlquery("delete from vl_logs_printedrejectedresults where sampleID='$sv'");
logDataRemoval("delete from vl_logs_dispatchedresults where sampleID='$sv'");
mysqlquery("delete from vl_logs_dispatchedresults where sampleID='$sv'");
//log this reversal
mysqlquery("insert into vl_logs_reversals_sampleapprovalsrejections
(sampleID,created,createdby)
values
('$sv','$datetime','$trailSessionUser')");
}
//reversed flag
$reversed=count($sampleVerifyCheckbox);
} else {
$notreversed=1;
}
}
case remove:
if(isQuery("select * from vl_regions where id='$id'")) {
$query=0;
$query=mysqlquery("select * from vl_districts where regionID='$id'");
if(mysqlnumrows($query)) {
while($q=mysqlfetcharray($query)) {
//remove dependencies
logDataRemoval("delete from vl_facilities where districtID='$q[id]'");
mysqlquery("delete from vl_facilities where districtID='$q[id]'");
}
}
//remove dependencies
logDataRemoval("delete from vl_districts where regionID='$id'");
mysqlquery("delete from vl_districts where regionID='$id'");
//remove
logDataRemoval("delete from vl_regions where id='$id'");
mysqlquery("delete from vl_regions where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
}
}
break;
case modify:
//log table change
logTableChange("vl_appendix_treatmentstatus","appendix",$id,getDetailedTableInfo2("vl_appendix_treatmentstatus","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_treatmentstatus","position",$id,getDetailedTableInfo2("vl_appendix_treatmentstatus","id='$id'","position"),$position);
//update vl_appendix_treatmentstatus
mysqlquery("update vl_appendix_treatmentstatus set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_treatmentstatus where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_treatmentstatus where id='$id'");
mysqlquery("delete from vl_appendix_treatmentstatus where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
logTableChange("vl_admins","phone",$id,getDetailedTableInfo2("vl_admins","id='$id'","phone"),$phone);
logTableChange("vl_admins","password",$id,"old password","new password");
//update vl_admins
mysqlquery("update vl_admins set
username='******',
email='$email',
".($password?"password='******',":"")."
phone='$phone'
where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_admins where id='$id'")) {
//remove
logDataRemoval("delete from vl_admins where id='$id'");
mysqlquery("delete from vl_admins where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
//log the alternative facility captured
if($proceedWithWarningAlternativeFacilities) {
//log the change of gender warning
mysqlquery("insert into vl_logs_warnings
(logCategory,logDetails,logTableID,created,createdby)
values
('capturedAlternativeFacilityForFormNumber','Form Number $formNumber dispatched to Facility ".getDetailedTableInfo2("vl_facilities","id='$facilityID' limit 1","facility")." but received from Facility ".getDetailedTableInfo2("vl_facilities","id='$facilityIDByFormNumber' limit 1","facility").".','','$datetime','$trailSessionUser')");
}
//get latest sample ID, log $otherRegimen if any
if($otherRegimen) {
//log other regimen
logSampleOtherRegimen($modify,$currentRegimenID,$otherRegimen);
} else {
logDataRemoval("delete from vl_samples_otherregimen where sampleID='$modify'");
mysqlquery("delete from vl_samples_otherregimen where sampleID='$modify'");
}
//redirect to home with updates on the tracking number
go("/verify/$pg/modified/");
}
} else {
//prepopulate
$lrCategory=0;
$lrCategory=getDetailedTableInfo2("vl_samples","id='$modify' limit 1","lrCategory");
$lrEnvelopeNumber=0;
$lrEnvelopeNumber=getDetailedTableInfo2("vl_samples","id='$modify' limit 1","lrEnvelopeNumber");
$lrNumericID=0;
<? if($option=="remove") { ?>
<table width="100%" border="0" class="vl">
<tr>
<td class="vl_success">Samples Removed from Available List!</td>
</tr>
<tr>
<td><img src="/admin/images/spacer.gif" width="3" height="3" /></td>
</tr>
</table>
<? } ?>
<?
switch($option) {
case removeoverride:
//delete from vl_samples_verify
if($id) {
logDataRemoval("delete from vl_results_override where id='$id'");
mysqlquery("delete from vl_results_override where id='$id'");
$removed=1;
}
break;
case override:
//delete from vl_samples_verify
if(count($samplesID)) {
$added=0;
$modified=0;
foreach($samplesID as $sID) {
//split $sID based on ::
$dataArray=array();
$dataArray=explode("::",$sID);
$sampleID=0;
$sampleID=$dataArray[0];
}
}
break;
case modify:
//log table change
logTableChange("vl_appendix_failurereason","appendix",$id,getDetailedTableInfo2("vl_appendix_failurereason","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_failurereason","position",$id,getDetailedTableInfo2("vl_appendix_failurereason","id='$id'","position"),$position);
//update vl_appendix_failurereason
mysqlquery("update vl_appendix_failurereason set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_failurereason where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_failurereason where id='$id'");
mysqlquery("delete from vl_appendix_failurereason where id='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
case modify:
//log table change
logTableChange("vl_appendix_sampletype","appendix",$id,getDetailedTableInfo2("vl_appendix_sampletype","id='$id'","appendix"),$appendix);
logTableChange("vl_appendix_sampletype","position",$id,getDetailedTableInfo2("vl_appendix_sampletype","id='$id'","position"),$position);
//update vl_appendix_sampletype
mysqlquery("update vl_appendix_sampletype set appendix='$appendix',position='$position' where id='$id'");
//flag
$modified=1;
break;
case remove:
if(isQuery("select * from vl_appendix_sampletype where id='$id'")) {
//remove
logDataRemoval("delete from vl_appendix_sampletype where id='$id'");
mysqlquery("delete from vl_appendix_sampletype where id='$id'");
//remove
logDataRemoval("delete from vl_appendix_samplerejectionreason where sampleTypeID='$id'");
mysqlquery("delete from vl_appendix_samplerejectionreason where sampleTypeID='$id'");
//flag
$removed=1;
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
<table width="100%" border="0" class="vl">
<tr>
<td class="vl_success">Samples Removed from Available List!</td>
</tr>
<tr>
<td><img src="/admin/images/spacer.gif" width="3" height="3" /></td>
</tr>
</table>
<? } ?>
<?
switch($option) {
case remove:
//delete from vl_samples_verify
if(count($samplesID)) {
foreach($samplesID as $sID) {
logDataRemoval("delete from vl_samples_verify where sampleID='$sID'");
mysqlquery("delete from vl_samples_verify where sampleID='$sID'");
}
}
break;
default:
if($modify) {
$task="modify";
}
break;
}
//set task
if(!$task) {
$task="add";
}
