<!---
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.1 $
$Id: Patients_Return_01.cfm,v 1.1 2010/06/25 12:31:47 melissa Exp $
$Date: 2010/06/25 12:31:47 $
--->

<cfset p = 'Patients_Return_02' />
<cfset s = Now() />

<cfsetting enablecfoutputonly="yes">
		<cfupdate datasource="#Application.DataSrc#"  tablename="PatientRecordLock">

<cfquery  name="Unlock" datasource="#Application.DataSrc#">
	UPDATE PatientRecordLock SET
		UnlockDate = #CreateODBCDateTime(Now())#,
		Version_PP = 3,
		UnLockedBy_ID = #form.Patient_ID#
	WHERE PatientRecordLock_ID = #form.Lock_Set_By#
</cfquery>

 
<cfoutput>***</cfoutput>
<cfoutput>Complete</cfoutput>
<cfoutput>^^^</cfoutput>
