Esempio n. 1
0
 function OrdersNotify($patientId, $templateId, $dateApplied, $dateStarted, $dateEnded, $goal, $clinicalTrial, $performanceStatus)
 {
     $ReasonNo = 3;
     $wid = GetLastWFID();
     //Get Number of Steps for Workflow
     $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
     $nosteps = $this->query($wfinfo);
     foreach ($nosteps as $row) {
         $NoSteps = $row['NoSteps'];
         $Reason = $row['Reason'];
         $Body = $row['Body'];
     }
     //Get Patient's Name from Patient Table
     $pname = "SELECT First_Name,Last_Name FROM Patient WHERE Patient_ID = '{$Patient_ID}'";
     $piname = $this->query($pname);
     foreach ($piname as $row) {
         $FirstName = $row['First_Name'];
         $LastName = $row['Last_Name'];
     }
     //Get Pharmacist's Email Addresses from Roles Table
     $tsql = "SELECT * FROM Roles WHERE role = 'Pharmacist'";
     $getemail = $this->query($tsql);
     foreach ($getemail as $row) {
         $PharmEmail = $row['Email'];
         //Write Message
         $To = $PharmEmail;
         $CC = $_SESSION['Email'];
         $senderEmail = $_SESSION['Email'];
         $MFrom = $senderEmail;
         //$Subject = "Order Notification to Pharmacist for patient " . $FirstName . " " . $LastName . ", Workflow ID: " . $wid . "";
         $Subject = "Info: Order Notification to Pharmacist for patient " . $FirstName . " " . $LastName . "";
         $headers = "From: <*****@*****.**>\r\n";
         $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
         $headers .= "MIME-Version: 1.0\r\n";
         $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
         $Link = "https://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "?ReasonNo=" . $ReasonNo . "";
         //send message
         //$message = "<html><body>Order Notification to Pharmacist (Workflow ID: " . $wid . ")<br><br>Link: <a href=" . $Link . ">Link</a> <br>Patient ID: " . $patientId . "<br>Template ID: " . $templateId . "<br>dateApplied: " . $dateApplied . "<br> dateStarted : " . $dateStarted . "<br>dateEnded Id: " . $dateEnded . "<br>Goal: " . $goal . "<br>clinicalTrial: " . $clinicalTrial . "<br>performanceStatus: " . $performanceStatus . "</body></html>";
         //$message = "<html><body>Update Workflow Status: <a href=".$Link.">Respond</a><br><br>".$Body."</body></html>";
         $message = "<html><body><br>" . $Body . "<br>Patient ID: " . $patientId . "<br>Template ID: " . $templateId . "<br>dateApplied: " . $dateApplied . "<br> dateStarted : " . $dateStarted . "<br>dateEnded Id: " . $dateEnded . "<br>Goal: " . $goal . "<br>clinicalTrial: " . $clinicalTrial . "<br>performanceStatus: " . $performanceStatus . "</body></html>";
         mail($To, $Subject, $message, $headers);
         //Store Message
         StoreMessage($To, $CC, $Subject, $message, $MFrom, $wid);
     }
     $WFStatus = "Start";
     $Response = "Sent";
     //Write Workflow History
     WFHistory($wid, $ReasonNo, $WFStatus, $Response);
 }
Esempio n. 2
0
function OEMeditWorkflow($templateid, $oemrecordid, $therapyid, $therapytype, $instructions, $admintime, $medid, $med, $dose, $bsadose, $units, $infusionmethod, $fluidtype, $fluidvol, $flowrate, $infusiontime, $dose2, $bsadose2, $units2, $infusionmethod2, $fluidtype2, $fluidvol2, $flowrate2, $infusiontime2)
{
    $Template_ID = $templateid;
    include "dbitcon.php";
    //Get Patient ID
    $psql = "SELECT Patient_ID from Master_Template where Template_ID = '{$oemrecordid}'";
    $pid = sqlsrv_query($conn, $psql);
    while ($row = sqlsrv_fetch_array($pid, SQLSRV_FETCH_ASSOC)) {
        $Patient_ID = $row['Patient_ID'];
    }
    //Get Patient's Name from Patient Table
    $pname = "SELECT First_Name,Last_Name FROM Patient WHERE Patient_ID = '{$Patient_ID}'";
    $piname = sqlsrv_query($conn, $pname);
    while ($row = sqlsrv_fetch_array($piname, SQLSRV_FETCH_ASSOC)) {
        $FirstName = $row['First_Name'];
        $LastName = $row['Last_Name'];
    }
    //Get Owner of Template's ID
    $gsql = "SELECT * FROM Patient_Assigned_Templates WHERE Patient_ID = '{$Patient_ID}' AND Template_ID = '{$Template_ID}'";
    $getassignor = sqlsrv_query($conn, $gsql);
    while ($row = sqlsrv_fetch_array($getassignor, SQLSRV_FETCH_ASSOC)) {
        $AssignedByRoleID = $row['AssignedByRoleID'];
    }
    //echo "Role ID: ".$AssignedByRoleID."";
    $srid = $_SESSION['rid'];
    $senderEmail = $_SESSION['Email'];
    //Get Owner's Email Address from Roles Table
    $tsql = "SELECT * FROM Roles WHERE rid = '{$AssignedByRoleID}'";
    $getemail = sqlsrv_query($conn, $tsql);
    while ($row = sqlsrv_fetch_array($getemail, SQLSRV_FETCH_ASSOC)) {
        $PhysicianEmail = $row['Email'];
    }
    //For Testing, we set the Reason No, later, this will be set when the user makes a change and selects a Reason, will then pass the ReasonNo which decides the message
    $ReasonNo = 8;
    //echo $ReasonNo;
    $WFStatus = "Nothing";
    //if (empty($WFStatus)) {
    if ($WFStatus == "Update") {
        //update workflow
    } else {
        $wid = GetLastWFID();
        if ($ReasonNo == 4) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            $Subject = "" . $SubjectPreHeader . "Order Edit Notification to Provider for Patient " . $FirstName . " " . $LastName . "";
            //$message = "<html><body>Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body><a href=" . $Link . ">Respond to this request.</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 5) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://sictest.dbitpro.com/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Drug Shortage - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Drug Shortage - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Drug Shortage";
            //$message = "<html><body>Drug Shortage - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body>Link: <a href=" . $Link . ">Link</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 6) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Policy/Protocol - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Policy/Protocol - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Policy/Protocol";
            //$message = "<html><body>Policy/Protocol - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body><a href=" . $Link . ">Respond to this request.</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 7) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Change in Patient-specific Parameters - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Change in Patient-specific Parameters, Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Change in Patient-specific Parameters";
            //$message = "<html><body>Change in Patient-specific Parameters - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body>Link: <a href=" . $Link . ">Link</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 8) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Non-formulary - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Non-formulary - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Non-formulary";
            //$message = "<html><body>Non-formulary - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body><a href=" . $Link . ">Respond to this request.</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 9) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Change Route of Administration - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Change Route of Administration, Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Change Route of Administration";
            //$message = "<html><body>Change Route of Administration - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body><a href=" . $Link . ">Respond to this request.</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 10) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Change Administration Time - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Change Administration Time - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Change Administration Time";
            //$message = "<html><body>Change Administration Time - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body><a href=" . $Link . ">Respond to this request.</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 11) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            $Link = "http://" . $_SESSION['domain'] . "/WorkflowUpdate.php?wid=" . $wid . "&ReasonNo=" . $ReasonNo . "&oemrecordid=" . $oemrecordid . "&Response=Received&srid=" . $srid . "";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Change Sequencing - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Change Sequencing - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Change Sequencing ";
            //$message = "<html><body>Change Sequencing - Order Edit Notification (Workflow ID: ".$wid.")<br><br>Link: <a href=".$Link.">Link</a><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body><a href=" . $Link . ">Respond to this request.</a><br><br>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 12) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            //$Link = "http://".$_SESSION['domain']."/WorkflowUpdate.php?wid=".$wid."&ReasonNo=".$ReasonNo."&oemrecordid=".$oemrecordid."&Response=Received&srid=".$srid."";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Dose rounding - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Dose rounding - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Dose rounding";
            //$message = "<html><body>Dose rounding - Order Edit Notification (Workflow ID: ".$wid.")<br><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } elseif ($ReasonNo == 13) {
            //Get body for Message and workflow NoSteps
            $wfinfo = "SELECT * FROM Workflows WHERE ReasonNo = '{$ReasonNo}'";
            $wfi = sqlsrv_query($conn, $wfinfo);
            while ($row = sqlsrv_fetch_array($wfi, SQLSRV_FETCH_ASSOC)) {
                $Body = $row['Body'];
                $NoSteps = $row['NoSteps'];
            }
            //Set Subject Pre Header
            if ($NoSteps === 1) {
                $SubjectPreHeader = "Info: ";
            } else {
                $SubjectPreHeader = "Resign Required: ";
            }
            //Set Link
            //$Link = "http://sictest.dbitpro.com?patient=".$Patient_ID."&Section=OEM";
            //$Link = "http://".$_SESSION['domain']."/WorkflowUpdate.php?wid=".$wid."&ReasonNo=".$ReasonNo."&oemrecordid=".$oemrecordid."&Response=Received&srid=".$srid."";
            //Write Message
            $To = $PhysicianEmail;
            $CC = $_SESSION['Email'];
            $MFrom = $senderEmail;
            //$Subject = "Fluid/Volume Change - Order Edit Notification to Provider for Patient ".$FirstName." ".$LastName.", Workflow ID: ".$wid."";
            //$Subject = "".$SubjectPreHeader."Fluid/Volume Change - Workflow ID: ".$wid."";
            $Subject = "" . $SubjectPreHeader . "Fluid/Volume Change";
            //$message = "<html><body>Fluid/Volume Change - Order Edit Notification (Workflow ID: ".$wid.")<br><br> The OEM Record ID: ".$oemrecordid."<br>Patient ID: ".$Patient_ID."<br>Template ID: ".$Template_ID."<br>Instructions: ".$instructions."<br> Admin Time: ".$admintime."<br>Med Id: ".$medid."<br>Med: ".$med."<br>Does: ".$dose."<br>BSA Dose: ".$bsadose."<br>Units: ".$units."<br>Infusion Method: ".$infusionmethod."<br>Fluid Type: ".$fluidtype."<br>Fluid Volume: ".$fluidvol."<br>Flow Rate: ".$flowrate."<br>Infusion Time: ".$infusiontime."<br><br>Or<br><br>Dose: ".$dose2."<br>BSA Does:".$bsadose2."<br>Units: ".$units2."<br>Infusion Method: ".$infusionmethod2."<br>Fluid Type: ".$fluidtype2."<br>Fluid Volume: ".$fluidvol2."<br>Flow Rate: ".$flowrate2."<br>Infusion Time: ".$infusiontime2."</body></html>";
            $message = "<html><body>" . $Body . "</body></html>";
            $headers = "From: <*****@*****.**>\r\n";
            $headers .= "Reply-To: " . strip_tags($MFrom) . "\r\n";
            $headers .= "MIME-Version: 1.0\r\n";
            $headers .= "Content-Type: text/html; charset=ISO-8859-1\r\n";
            try {
                // mail($To, $Subject, $message, $headers);
            } catch (Exception $e) {
                error_log("Can't send mail");
            }
        } else {
            echo "No Reason";
        }
        //Set Workflow Status and Response
        $WFStatus = "Start";
        $Response = "Sent";
    }
    //Store Message
    StoreMessage($To, $CC, $Subject, $message, $MFrom, $wid);
    //Write Workflow History
    WFHistory($wid, $ReasonNo, $WFStatus, $Response);
    // Close the connection.
    //sqlsrv_close($conn);
}