7.5 Jeff Buchbinder

center

FreeMED CONCAT(pat.ptlname,', ', pat.ptfname, ' ', pat.ptmname) AS patient_name, pat.ptid AS internal_id, pat.id AS patient_id, ROUND(SUM(proc.procbalcurrent),2) AS total_balance, phy.phypracname AS practice_name, phy.phyaddr1a AS address_1, phy.phyaddr2a AS address_2, CONCAT(phy.phycitya,', ',phy.phystatea,' ',phy.phyzipa) AS csz, CONCAT(phy.phylname, ', ', phy.phyfname, ' ', phy.phymname) AS physician_name, ROUND(SUM(proc.procamtpaid),2) AS total_paid, ROUND(SUM(proc.proccharges),2) AS total_charges, CONCAT('(',SUBSTRING(phy.phyphonea FROM 1 FOR 3),') ',SUBSTRING(phy.phyphonea FROM 4 FOR 3),'-',SUBSTRING(phy.phyphonea FROM 7 FOR 4)) AS office_phone, CONCAT(pat.ptfname,' ',pat.ptmname, IF(LENGTH(pat.ptmname)>0,'. ', ''), pat.ptlname) AS patient_label_name, pat.ptaddr1 AS patient_address, CONCAT(pat.ptcity,', ',pat.ptstate,' ',pat.ptzip) AS patient_csz patient AS pat, procrec AS proc, physician AS phy proc.procpatient = pat.id and proc.procbalcurrent > 0 and proc.proccurcovtp = '0' and pat.ptdoc = phy.id pat.id patient_name 0 0 1 1 1 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 30 60 left 480 268 1 1 columns #setfan14 #tab400 Patient Statement $fan10 #lineH600 #tab20 Pay To #tab400 Patient #tab460 $var1 #setfan08 #tab40 $var5 #tab400 ID #tab460 $var2 #setfan08 #tab40 $var6 #tab400 Amount Due #tab460 $var4 #setfan08 #tab40 $var8 #tab400 Amount Paid #tab460 _________ #setfan08 #tab400 Bill Generated on $weekday, $monthname $day, $year #setfan10 #tab20 Provider : #setfab10 $var9 #setfan10 #setfan10 #tab080 $var13 #setfan08 #tab400 Account No #tab460 _____________________ #setfan10 #tab080 $var14 #setfan08 #tab400 Expiration Date #tab460 _____________________ #setfan10 #tab080 $var15 #setfan08 #tab400 Signature #tab460 _____________________

#lineH600 #setfab08 #tab20 Date #tab100 Type #tab250 Comment #tab500 Amount #setfan08 #lineH600 #tab20 $subfield1 #tab100 $subfield2 #tab250 $subfield3 #tab500 $subfield4 DATE_FORMAT(p.payrecdt, '%b %e, %Y') AS payment_date, CASE p.payreccat WHEN 0 THEN 'Payment' WHEN 1 THEN 'Adjustment' WHEN 5 THEN 'Procedure' WHEN 11 THEN 'Copay' ELSE '--' END AS category, CASE p.payreccat WHEN 5 THEN CONCAT(c.cptcode, ' / ', c.cptnameext) ELSE p.payrecdescrip END AS comment, IF((p.payrecamt<0),CONCAT('(',ROUND(p.payrecamt,2),')'),ROUND(p.payrecamt,2)) AS amount, proc.procbalcurrent AS procedure_balance, CASE p.payreccat WHEN 0 THEN p.payrecamt ELSE 0 END AS charge_accumulator, CASE p.payreccat WHEN 5 THEN p.payrecamt WHEN 11 THEN p.payrecamt ELSE 0 END AS payment_accumulator payrec p LEFT OUTER JOIN procrec proc ON p.payrecproc = proc.id LEFT OUTER JOIN cpt c ON proc.proccpt=c.id proc.procbalcurrent > 0 AND p.payrecpatient = '$var3' AND FIND_IN_SET(p.payreccat, '0,1,5,7,8,11') proc.id, p.payrecdt 0 0 30 60 left 30 60 left 50 200 left 30 60 right 30 60 left 30 60 right # $-9,999.99s 30 60 right # $-9,999.99s 0 #lineH600 #tab250 #setfab08 Total Payments #tab500 $subfield6_sum #tab250 #setfab08 Total Charges #tab500 $subfield7_sum

#pagebreak Letter portrait 5 7 6 8 10 15 0 288 72 11 36 2 10 A3 14 1 1 1 1 1