<!---
This file is Copyright © 1998-2009 by Home Care Business Services. This work may not be reproduced, in whole or in part, 
using any medium, including, but not limited to, electronic transmission, CD-ROM or published in print, without the express 
permission of Home Care Business Services.

$Revision: 1.7 $
$Id: med_list.cfm,v 1.7 2010/05/27 22:04:14 melissa Exp $
$Date: 2010/05/27 22:04:14 $
--->

<!--- Page specific code, such as queries and variable settings should go here --->
<cfparam name="URL.ID" default="" />

<cfquery name="GetP" datasource="#Application.DataSrc#">
 SELECT Patient_ID, Last_Name_M0040 AS Last_Name, First_Name_M0040 AS First_Name, Middle_Initial_M0040 AS Middle
 FROM #Request.prefix_db_agency#.patient WHERE Patient_ID = #session.cs.patientid#
</cfquery>
<cfquery name="GetM" datasource="#Application.DataSrc#">
 SELECT PatientMeds_ID, Medication_ID, Drug_Name, Med_Status, Dose, Dose_Units, Route, Freq, Notes, DateOrdered, DateDCed,
        mn.grouping,mn.trade_name,mn.classification,mn.generic_name,mn.RX_ID
 FROM #Request.prefix_db_agency#.PatientMeds
 Left outer join #Request.prefix_db_lookup#.Meds_New mn on PatientMeds.Medication_ID = mn.Trade_id
 WHERE Patient_ID = #session.cs.patientid#
 AND Med_status <> 'delete'
 Order By Drug_Name,Med_status
</cfquery>

<cfinclude template="PatientMenu.cfc">
    <table cellpadding="0" cellspacing="0" border="0" width="100%">
        <tr>
            <td valign="bottom" align="left">
				<cfscript>
                pm = CreateObject("Component", "PatientMenu");
                pm.getPatientMenu(#getP.Patient_Id#);
                </cfscript>
            </td>
        </tr> 
    </table> 
 
    <div class="portlet box blue">
        <div class="portlet-title">
            <div class="caption">
                <i class="fa fa-gear"></i><cfoutput>#getP.Last_Name#, #getP.First_Name# #getP.Middle# - Medication List</cfoutput>
            </div>
            <div class="tools">
                <a href="javascript:;" class="collapse"></a>
            </div>
            <div class="actions">
                <div class="btn-group">
                    <a class="btn btn-default btn-sm" href="javascript:;" data-toggle="dropdown">
                    	<i class="fa fa-gear"></i> Action <i class="fa fa-angle-down"></i>
                    </a>
                    <cfoutput>
                        <ul class="dropdown-menu pull-right">
                            <cfif session.eaClientEdit eq 1 or session.IsAgencyLogin eq 1>
                                <li>
                                    <a href="javascript:void(0);" onclick="javascript:secureHREF('index.cfm?page=patient&cat=med_form&Action=Add&MID=0&MPID=0')"><i class="fa fa-plus-circle"></i> Add New Medication</a>
                                </li>
                                <li class="divider"></li>
                            </cfif> 
                            <li>
                                <a href="/patientadmin_new/index.cfm?page=patient&ID=<cfoutput>#URL.ID#</cfoutput>&cat=med_form_print" target=_blank><i class="fa fa-print"></i> Print Medication List</a>
                            </li>
                            <li>
                                <a href="/patientadmin_new/index.cfm?page=patient&ID=<cfoutput>#URL.ID#</cfoutput>&cat=med_list_detail" target=_blank><i class="fa fa-print"></i> Print Comprehensive Profile</a>
                            </li>
                            <li>
                                <a href="/patientadmin_new/index.cfm?page=patient&ID=<cfoutput>#URL.ID#</cfoutput>&cat=med_history_print" target=_blank><i class="fa fa-print"></i> Print Medication History</a>
                            </li>    
                        </ul>
                    </cfoutput>
                </div>                
            </div>        
        </div>
        <div class="portlet-body flip-scroll">        
            <table class="table table-bordered table-striped table-condensed flip-content margin-top-15">
            	<cfset i = 0 />
                <cftry>
					<cfoutput query="GetM" Group="Med_Status">
                    	<thead class="flip-content">
                            <tr>
                                <th width="15%">Medication</th>
                                <th width="5%">Dose</th>
                                <th width="10%">Units</th>
                                <th width="10%">Route</th>
                                <th width="10%">Frequency</th>
                                <th width="10%">Ordered</th>
                                <th width="10%">Discontinued</th>
                                <th width="10%">Notes</th>
                                <th width="12%" title='Classification'>Class</th>
								<th width="8%">Interaction</th>
                            </tr>
                        </thead>
                        <tbody>
                            <tr>
                                <td class="list-hdr" style='background:##f0f0f0;font-weight:bold' colspan="12">#UCASE(Med_Status)# MEDICATIONS</td>
                            </tr>
							<cfif i eq 0>
                            </cfif>
                            <cfoutput>
                            <cfset i = i + 1 />
                            <cfset RowBG = IIF(GetM.CurrentRow MOD 2 EQ 0, "'d1'", "'d2'") />
                                <tr>
                                    <td>			
										<cfif session.eaClientEdit eq 1 or session.IsAgencyLogin eq 1>
                                        	<a href="javascript:void(0);" onclick="javascript:secureHREF('index.cfm?page=patient&cat=med_form&Action=Update&MID=#GetM.Medication_ID#&MPID=#GetM.PatientMeds_ID#')">
                                        	<cfif getM.Drug_Name eq ''>- Unknown -<cfelse>#getM.Drug_Name#</cfif>
                                        	</a>
                                            <cfelse>
                                            <cfif getM.Drug_Name eq ''>- Unknown -<cfelse>#getM.Drug_Name#</cfif>
                                        </cfif>
                                    </td>
                                    <td><cfif Dose eq "" or Dose eq 0>-<cfelse>#Trim(Dose)#</cfif></td>
                                    <td><cfif Dose_Units eq ''>-<cfelse>#Dose_Units#</cfif></td>
                                    <td><cfif Route IS "">-<cfelse>#Trim(Route)#</cfif></td>
                                    <td><cfif Freq IS "">-<cfelse>#Trim(Freq)#</cfif></td>
                                    <td><cfif DateOrdered IS "">-<cfelse><cftry>#DateFormat(DateOrdered,'mm/dd/yyyy')#<cfcatch> </cfcatch></cftry></cfif></td>
                                    <td><cfif DateDCed eq ''>-<cfelse><cftry>#DateFormat(DateDCed,'mm/dd/yyyy')#<cfcatch> </cfcatch></cftry></cfif></td>
                                    <td><cfif getm.notes eq "">-<cfelse>#Trim(Notes)#</cfif></td>
                                    <td><cftry><cfif getm.medication_id neq -1 and getm.medication_id neq 24000 and trim(getm.classification) neq ''>#replacenocase(getM.Classification," & ","<br>","ALL")# (#trim(replacenocase(getM.grouping," & ","<br>","ALL"))#)<cfelse> </cfif><cfcatch> </cfcatch></cftry></td>
									<td><cfif getM.RX_ID neq ''>Interacts with &nbsp;#getM.trade_name#</cfif></td>
                                </tr>
                            </cfoutput>
                        </tbody>
                    </cfoutput>
                    <cfcatch>
                        <cfoutput>#cfcatch.Message#<br/>#cfcatch.Detail#</cfoutput>
                	</cfcatch>
             	</cftry>
            </table>
        </div>
    </div>