
<cfquery name="GetTable" datasource="#Application.DataSrc#">
		SELECT TABLE_SCHEMA  FROM INFORMATION_SCHEMA.COLUMNS WHERE TABLE_SCHEMA like '%agency_1150%' group by  TABLE_SCHEMA
</cfquery>
<cfset database=arraynew(1)>

<cfloop query="GetTable">
	<cfset database[CurrentRow]= TABLE_SCHEMA>
</cfloop>


<cfloop from=1 to=#ArrayLen(database)# index=ind>
	<cfset Request.prefix_db_agency = #database[ind]# />
		<cfquery name="getinvoices" datasource="#Application.DataSrc#">
		   <cfsetting requesttimeout="5000">
		    SELECT p.Pay_Name, i.Invoice_ID,
		    i.Assmt_ID,i.Patient_ID , a.F298, a.F299
		    FROM    #Request.prefix_db_agency#.Invoices i
		    JOIN #Request.prefix_db_agency#.pPayer p  ON p.Pay_ID = i.PatientPayer_ID 
		    JOIN  #Request.prefix_db_agency#.pAssessments a  ON   i.Assmt_ID = a.Assmt_ID 
		    and Left(p.M0150,1) IN ('1','2') AND i.Deleted <> 1 AND  p.status = 0 
		    AND i.Output = 'Final'
		    and Pay_frequency !='' AND a.Status = 0
		    ORDER BY Assmt_ID, Invoice_ID ASC
		</cfquery>
	<cfset Assmt_IDs  = ''>
	<cfoutput query="getinvoices"> 
		<cfif listFind(Assmt_IDs,Assmt_ID)>
			<cfset Invoice_total  = F299 />
			<cfset amount = 'F299' />
		<cfelse>
			<cfset Invoice_total  = F298 />
			<cfset amount = 'F298' />
		</cfif> 
		#Assmt_ID# - #listFind(Assmt_IDs,Assmt_ID)# - #Invoice_total# - #amount#<br>
		<cfset Assmt_IDs = listappend(Assmt_IDs,Assmt_ID) >
      <cfquery name="Update_VisitsEclaims" datasource="#Application.DataSrc#"> 
        		UPDATE #Request.prefix_db_agency#.Invoices SET 
            		ContractTotal = #NumberFormat(Invoice_total,'_____.__')#
        		WHERE Invoice_ID = #Invoice_ID#
        		AND (IFNULL(Invoice_Lock,0) <> 1)
  		</cfquery> 
    </cfoutput>


</cfloop>



