<!---
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: fixvisit.cfm,v 1.1 2010/03/11 17:55:47 arlen Exp $
$Date: 2010/03/11 17:55:47 $
--->
<cfinclude template="../__Security-Block.cfm">

<cfparam name="attributes.v" default="">

<cfset tmp=#attributes.v#>

<cfif session.agencyid eq 179>
 <cfset tmp=#replacenocase(tmp,"1 - Start of Care - further visits planned","SOC","ALL")#>
 <cfset tmp=#replacenocase(tmp,"3 - Resumption of care (after inpatient stay)","ROC","ALL")#>
 <cfset tmp=#replacenocase(tmp,"4 - Recertification (follow-up) reassessment","RECERT","ALL")#>
 <cfset tmp=#replacenocase(tmp,"5 - Other follow-up","OTHER","ALL")#>
 <cfset tmp=#replacenocase(tmp,"6 - Transferred to an inpatient facility - patient not discharged from agency","XFR","ALL")#>
 <cfset tmp=#replacenocase(tmp,"7 - Transferred to an inpatient facility - patient discharged from agency","XFRDSCHG","ALL")#>
 <cfset tmp=#replacenocase(tmp,"8 - Death","DEATH","ALL")#>
 <cfset tmp=#replacenocase(tmp,"9 - Discharge from agency","DSCHG","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Hospice Comprehensive","HOSPICE","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Skilled Nursing","SN","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Assessment","ASMT","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Home Health Aide","HHA","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Case Conf","CC","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Physical Therapy","PT","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Speech Therapy","ST","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Private Duty Nursing","PVD","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Occupational Therapy","OT","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Phone Call","CALL","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Medical Social Worker","MSW","ALL")#>
 <cfset tmp=#replacenocase(tmp,"Evaluation","EVAL","ALL")#>
 <cfset tmp=#replacenocase(tmp," with ",": ","ALL")#>
 <cfset tmp=#replacenocase(tmp," for ",": ","ALL")#>
</cfif>
<cfoutput>#tmp#</cfoutput>
