<!---
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.5 $
$Id: user_action.cfm,v 1.5 2010/06/25 21:52:18 melissa Exp $
$Date: 2010/06/25 21:52:18 $
--->
 
<!--- Lets find out if the user is enabled for editing Schedules --->
<cfif isDefined("form.scheduleEdit")>
    <cfset scheduleEdit="1" />
<cfelse>
    <cfset scheduleEdit="0" />
</cfif>  

<cfparam name = "form.eaRole" default=0 /> 
<cfparam name="auth_writecareplan" default=0 />
<cfparam name="auth_lock" default=0 />
<!---<cfparam name="auth_schedule" default=0 />--->
<cfparam name = "form.Auth_set_cpi" default=0 /> 
<cfparam name="form.Auth_set_coms" default=0  /> 
<cfparam name="form.Auth_set_emp" default=0  />
<cfparam name="form.Auth_set_inc" default=0 /> 
<cfparam name="form.Auth_set_pyr" default=0 /> 
<cfparam name="form.Auth_set_pyl" default=0 /> 
<cfparam name="form.Auth_set_phy" default=0  />
<cfparam name="form.Auth_set_rfs" default=0  />
<cfparam name="form.Auth_set_rvc" default=0 />  
<cfparam name="form.Auth_set_sps" default=0  /> 
<cfparam name="form.Auth_set_agi" default=0  />
<cfparam name="form.Auth_set_sch" default=0 />
<cfparam name="form.Auth_ClientEdit" default=0 />
<cfparam name="form.Auth_NoteEdit" default=0 />



<!--- If the user is a System Administrator, authority level can be defined only by MHCB --->
<cfif isDefined("form.Authority_Level")>
    
    <cfquery name="Emp" datasource="#Application.DataSrc#">
	    UPDATE #Request.prefix_db_lookup#.Employee SET
		    Password = '#trim(form.Password)#',
		    Authority_Level = #form.Authority_Level#,
		    Record_Mod_Date = #CreateODBCDateTime(Now())#,
		    Record_Mod_By = #Session.EmployeeID#,
		    ScheduleEdit = #scheduleEdit#		
	    WHERE Employee_ID = #form.EmpID#
    </cfquery>
	<cfset Session.Survey = form.PatientSurvey />

    <cfelse>
    <cfquery name="Emp" datasource="#Application.DataSrc#">
	    UPDATE #Request.prefix_db_lookup#.Employee SET
		    Password = '#trim(form.Password)#',
		    Record_Mod_Date = #CreateODBCDateTime(Now())#,
		    Record_Mod_By = #Session.EmployeeID#,
		    ScheduleEdit = #scheduleEdit#
	    WHERE Employee_ID = #form.EmpID#
    </cfquery>
</cfif>


<cfquery name="Empdel" datasource="#Application.DataSrc#">
Delete from #Request.prefix_db_agency#.employee_auth where eaID = #form.empID#;  
</cfquery>

<cfquery name="empauth_insert" datasource="#Application.DataSrc#">
insert into #Request.prefix_db_agency#.employee_auth (
eaID,
eaRole,
eaSetSchedule,
eaPayroll,eaBilling,
eaOrders,eaAuthorizations,
eaDataTransmit,eaType,eaCareplan,
eaLock,eaSchedule,
eaSetCareplanItems,eaSetCommSubjects,
eaSetEmployees,eaSetIncidentSubjects,
eaSetPayers,eaSetPayrollCodes,
eaSetPhysicians,eaSetReferralSrcs,
eaSetRevenueCodes,eaSetSupplies,
eaSetAgyInfoUpdate,eaClientEdit,
eaNoteEdit,eaUndo,
eaReports,eaStatistics,
eaPatientSurvey) 
values(
<cfqueryparam cfsqltype="cf_sql_integer" value="#form.empID#">,
<cfif isdefined("form.eaRole")><cfqueryparam cfsqltype="varchar" value="#form.eaRole#"><cfelse>''</cfif>,
<cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_set_sch#">,
<cfif isdefined("form.auth_Payroll")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_Payroll#"><cfelse>0</cfif>,
<cfif isdefined("form.auth_Billing")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_Billing#"><cfelse>0</cfif>,
<cfif isdefined("form.auth_Orders")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_Orders#"><cfelse>0</cfif>, 
<cfif isdefined("form.auth_auth")><cfqueryparam cfsqltype = "cf_sql_integer" value="#form.auth_auth#"><cfelse>0</cfif>, 
<cfif isdefined("form.auth_datatrans")><cfqueryparam cfsqltype = "cf_sql_integer" value="#form.auth_datatrans#"><cfelse>0</cfif>, 
<cfif isdefined("form.auth_type")><cfqueryparam cfsqltype = "cf_sql_integer" value="#form.auth_type#"><cfelse>0</cfif>,
<cfif isdefined("form.auth_writecareplan")><cfqueryparam cfsqltype = "cf_sql_integer" value="#auth_writecareplan#"><cfelse>0</cfif>,
<cfif isdefined("form.auth_lock")><cfqueryparam cfsqltype = "cf_sql_integer" value="#auth_lock#"><cfelse>0</cfif>,
<cfqueryparam cfsqltype = "cf_sql_integer" value="0">, 
<cfif isdefined("form.Auth_set_cpi")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_cpi#"><cfelse>0</cfif>, 
<cfif isdefined("form.Auth_set_coms")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_coms#" ><cfelse>0</cfif>, 
<cfif isdefined("form.Auth_set_emp")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_emp#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_set_inc")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_inc#"><cfelse>0</cfif>, 
<cfif isdefined("form.Auth_set_pyr")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_pyr#"><cfelse>0</cfif>, 
<cfif isdefined("form.Auth_set_pyl")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_pyl#" ><cfelse>0</cfif>, 
<cfif isdefined("form.Auth_set_phy")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_phy#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_set_rfs")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_rfs#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_set_rvc")><cfqueryparam cfsqltype = "cf_sql_integer" value="#form.Auth_set_rvc#"><cfelse>0</cfif>,  
<cfif isdefined("form.Auth_set_sps")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_sps#" ><cfelse>0</cfif>, 
<cfif isdefined("form.Auth_set_agi")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_agi#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_ClientEdit")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_ClientEdit#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_NoteEdit")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_NoteEdit#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_Undo")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_Undo#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_Report")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_Report#" ><cfelse>0</cfif>,
<cfif isdefined("form.Auth_Statistics")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_Statistics#" ><cfelse>0</cfif>,
<cfif isdefined("form.PatientSurvey")><cfqueryparam cfsqltype="cf_sql_integer" value="#form.PatientSurvey#" ><cfelse>0</cfif>);

</cfquery>
<cfset session.eaPatientSurvey = '#form.PatientSurvey#'  />

<!---<cfquery name="empauth" datasource="#application.Datasrc#" result="empauthr">
Update employee_auth
set 
eaSetSchedule = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_set_sch#">, 
eaPayroll = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_Payroll#">, 
eaBilling = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_Billing#">, 
eaOrders = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.auth_Orders#">, 
eaAuthorizations = <cfqueryparam cfsqltype = "cf_sql_integer" value="#form.auth_auth#">, 
eaDataTransmit = <cfqueryparam cfsqltype = "cf_sql_integer" value="#form.auth_datatrans#">, 
eaType = <cfqueryparam cfsqltype = "cf_sql_integer" value="#form.auth_type#" >, 
eaCareplan = <cfqueryparam cfsqltype = "cf_sql_integer" value="#auth_writecareplan#">,
eaLock = <cfqueryparam cfsqltype = "cf_sql_integer" value="#auth_lock#">, 
eaSchedule = <cfqueryparam cfsqltype = "cf_sql_integer" value="#auth_schedule#">, 
eaSetCareplanItems = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_cpi#">, 
eaSetCommSubjects = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_coms#" >, 
eaSetEmployees = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_emp#" >,
eaSetIncidentSubjects = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_inc#">, 
eaSetPayers = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_pyr#">, 
eaSetPayrollCodes = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_pyl#" >, 
eaSetPhysicians = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_phy#" >,
eaSetReferralSrcs = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_rfs#" >,
eaSetRevenueCodes = <cfqueryparam cfsqltype = "cf_sql_integer" value="#form.Auth_set_rvc#">,  
eaSetSupplies = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_sps#" >, 
eaSetAgyInfoUpdate = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_set_agi#" >,
eaClientEdit = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_ClientEdit#" >,
eaNoteEdit = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_NoteEdit#" >,
eaUndo = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_Undo#" >,
eaReports = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_Report#" >,
eaStatistics = <cfqueryparam cfsqltype="cf_sql_integer" value="#form.Auth_Statistics#" >
where eaID = #form.empID#; 
</cfquery>
--->



<!--Level identify-->

<cfquery name="AgencyTypeAndSkill" datasource="#Application.DataSrc#">
	SELECT e.Employee_ID,a.AgencyType, e.skill
from #Request.prefix_db_lookup#.Employee as e Left outer join #Request.prefix_db_lookup#.Agency as a ON e.Agency_ID=a.Agency_ID WHERE e.Employee_ID=#form.EmpID#;
	</cfquery>

<cfset eaClientEdit = form.Auth_ClientEdit />
<cfset eaNoteEdit = form.Auth_NoteEdit />



<cfset Level="" />

<cfif AgencyTypeAndSkill.AgencyType eq "4"  and form.auth_type eq "2" >
	<cfset Level="9" />

<cfelseif AgencyTypeAndSkill.AgencyType eq "4" and  form.auth_type eq "1"  and (AgencyTypeAndSkill.skill eq "LPN" or AgencyTypeAndSkill.skill eq "RN" or AgencyTypeAndSkill.skill eq "PT" or AgencyTypeAndSkill.skill eq "PTA"  or AgencyTypeAndSkill.skill eq "BRV" or AgencyTypeAndSkill.skill eq "ST" or AgencyTypeAndSkill.skill eq "OT" or AgencyTypeAndSkill.skill eq "MSW" or AgencyTypeAndSkill.skill eq "SN" or AgencyTypeAndSkill.skill eq "Other" ) >
	<cfset Level="8" />


<cfelseif AgencyTypeAndSkill.AgencyType eq "3" and form.auth_type eq "2"  >
	<cfset Level="7" />

<cfelseif (AgencyTypeAndSkill.AgencyType eq "3" or AgencyTypeAndSkill.AgencyType eq "4") and form.auth_type eq "1"  and (AgencyTypeAndSkill.skill eq "LPN" or AgencyTypeAndSkill.skill eq "RN" or AgencyTypeAndSkill.skill eq "PT"  or AgencyTypeAndSkill.skill eq "PTA"  or AgencyTypeAndSkill.skill eq "BRV" or AgencyTypeAndSkill.skill eq "ST" or AgencyTypeAndSkill.skill eq "OT" or AgencyTypeAndSkill.skill eq "MSW" or AgencyTypeAndSkill.skill eq "SN" or AgencyTypeAndSkill.skill eq "Other" ) >
	<cfset Level="6" />

<cfelseif (AgencyTypeAndSkill.AgencyType eq "3" or AgencyTypeAndSkill.AgencyType eq "4") and form.auth_type eq "1"  and (AgencyTypeAndSkill.skill eq "PCA" or AgencyTypeAndSkill.skill eq "HHA" or AgencyTypeAndSkill.skill eq "HMKR")>
	<cfset Level="5" />

<cfelseif AgencyTypeAndSkill.AgencyType eq "2" and form.auth_type eq "2" >
<cfset Level="4" />

<cfelseif AgencyTypeAndSkill.AgencyType eq "2" and form.auth_type eq "1" >
<cfset Level="3" />

<cfelseif AgencyTypeAndSkill.AgencyType eq "1" and form.auth_type eq "2" >
	<cfset Level="2" /> 

<cfelseif AgencyTypeAndSkill.AgencyType eq "1" and form.auth_type eq "1" >
<cfset Level="1" />

<cfelse>
<cfset Level="0" />
</cfif>

	<cfoutput>Level #Level#</cfoutput>
	<cfoutput>form.EmpID #form.EmpID#</cfoutput>



<cfquery name="UpdateLevel" datasource="#Application.DataSrc#" >

UPDATE #Request.prefix_db_lookup#.Employee SET Employee.Level='#Level#' where Employee_ID =#form.EmpID#;

</cfquery>

<!---<cfoutput>
LEvel=#Level#
</cfoutput>
<cfabort>--->

<!---
<cfdump var="#empauthr#">
<cfdump var="#form#">
<cfabort> --->




<cflocation url="index.cfm?page=agency&cat=AgencyManagement&rpt=employee_list" addtoken="no">

