ACTIVE REQUEST LIST
Please refresh if Preliminary Match Reports do not appear in the "Preliminary Matches" column. */?> Date Submitted Patient Name Diagnosis Req. Doc Status Request Preliminary Matches Delete "; while($line = mysql_fetch_array($result, MYSQL_ASSOC)) { if($bgcolor=="#ffffff"){ $bgcolor="#dddddd"; } else{$bgcolor="#ffffff"; } $id = $line["request_id"]; $date = $line["creationdate"]; $name = $line["patientlast"] . ", " . $line["patientfirst"]; $diagnosis = $line["diag_desc"] ? $line["diag_desc"] : "None"; $diagnosis = $line["diagnosis_id"] == 99999 ? $line["diag_other"] : $diagnosis; $doc = $line["dr2_id"] ? $line["dr2_last"] . ", " . $line["dr2_first"] : "None"; $resultid = $line["status"] == 'C' ? $line["request_id"] : ""; //$status = $line["status"] == 'C' ? "Complete" : "Processing"; $status = 'Processing'; $filename = $line["filename"] ? $line["filename"] : "none.pdf"; if($diagnosis==""){ $diagnosis=" "; } $date=convertDate($date); print " $date $name $diagnosis $doc"; if ($status=='Processing') { print "$status"; } else { print "$status"; } print "View"; // See if we have any result PDF's $pdfdir="/home/sites/nationalcordbloodprogram.com/ftp/result/"; $urlprefix="/patient_reg/result/"; if (file_exists($pdfdir.$filename.'.err') && filesize($pdfdir.$filename.'.err') > 0) { print "There was an error during submission of your request. Please resubmit your search online or fax it to (212) 570-9061."; } else { print ""; $match_types = array( array('_6','View 6/6'), array('_5','View 5/6'), array('_4','View 4/6'), array('_3','View 3/6'), array('_0','View'), ); foreach ($match_types as $match_type) { $mt_suffix = $match_type[0]; $mt_link = $match_type[1]; foreach (array('.pdf','.PDF') as $pdf_ext) { $file = $pdfdir . $filename . $mt_suffix . $pdf_ext; if (file_exists($file) && is_readable($file)){ print "$mt_link "; } } } print ""; } # $file = $pdfdir . $filename . "_4.pdf"; # if(file_exists($file) && is_readable($file)){ # print "View 4/6 "; # } # $file = $pdfdir . $filename . "_4.PDF"; # if(file_exists($file) && is_readable($file)){ # print "View 4/6 "; # } # $file = $pdfdir . $filename . "_5.pdf"; # if(file_exists($file) && is_readable($file)){ # print "View 5/6 & 6/6 "; # } # $file = $pdfdir . $filename . "_5.PDF"; # if(file_exists($file) && is_readable($file)){ # print "View 5/6 & 6/6 "; # } print "Delete"; print ""; } print "This list displays requests in progress, or completed within the last 30 days. For older requests, please use the find request form.
To view the Preliminary Match Reports requires Acrobat Reader. You can get Acrobat Reader here.
"; mysql_free_result($result); /* Closing connection - $db set in includes/db.php */ mysql_close($db); //print footer readfile("footer.htm"); ?> "Jan","02"=>"Feb","03"=>"Mar","04"=>"Apr","05"=>"May","06"=>"Jun","07"=>"Jul","08"=>"Aug","09"=>"Sept","10"=>"Oct","11"=>"Nov","12"=>"Dec"); $thedate=split("-",$date); $date = $months[$thedate[1]] . " " . $thedate[0] . " " . $thedate[2]; //$date=$thedate[0] . "-" . $months[$thedate[1]] . "-" . $thedate[2]; return $date; } ?>