
<cfquery  name="getallassesments" datasource="#Application.DataSrc#">
   SELECT pAssessments.*,pAdmit.M1100_PTNT_LVG_STUTN  FROM #Request.prefix_db_agency#.pAssessments
   JOIN #Request.prefix_db_agency#.pAdmit ON pAssessments.Admit_ID = pAdmit.Admit_ID AND pAdmit.status = 0
   WHERE pAssessments.Assmt_ID = <cfqueryparam value = "#getass.Assmt_ID#" CFSQLType ="cf_sql_integer">
   AND pAssessments.status = <cfqueryparam value="0" cfsqltype="cf_sql_integer">
</cfquery>
<cfset allskills = "SN,PT,OT,ST" />
<cfset allskills =  #getallassesments.F27# />
<cfquery  name="getallVBP" datasource="#Application.DataSrc#">
	SELECT  * FROM   #Request.prefix_db_lookup#.VBP_Analysis
	WHERE M1100 like <cfqueryparam cfsqltype="cf_sql_varchar" value="%#getallassesments.M1100_PTNT_LVG_STUTN#%">
</cfquery>
<cfloop list="#allskills#" index="item">
	<cfquery  name="getSkillass" dbtype="query">
		SELECT * FROM getallassesments WHERE F27 = '#item#' <!--- and F25 = 1--->
	</cfquery>
		<cfloop query="getSkillass">
			<cfif left(F26,1) EQ '4'> 
					<cfset M1700 = #F40# />
			<cfelseif left(F26,2) EQ 'OT'>
					<cfset M1700 = #F38# />
			<cfelse>
					<cfset M1700 = #F34# />
			</cfif>
			<cfif left(F26,1) EQ '1'> 
					<cfset M2102d = #F72# />
			<cfelse>
					<cfset M2102d = #F240# />
			</cfif>
			<cfquery  name="getsVBP" dbtype="query">
					SELECT  * FROM  getallVBP
					WHERE M1700 = '#M1700#'
					AND M2102d = '#M2102d#'
			</cfquery>
			<cfquery  name="update_VBP" datasource="#Application.DataSrc#">
				UPDATE #Request.prefix_db_agency#.pAssessments
				SET F322 = '#getsVBP.MorV#'
				 WHERE Assmt_ID = <cfqueryparam value = "#getallassesments.Assmt_ID#" CFSQLType ="cf_sql_integer">
  				 AND status = <cfqueryparam value="0" cfsqltype="cf_sql_integer"> 
			</cfquery>
		</cfloop>
</cfloop>