Is there a symbol that includes the effective date of the primary insurance? I am trying to make the effective date of the pts primary insurance populate in a data display on an encounter form. (ie: our providers want to know if the patient has been on Medicare for a year or less for documentation purposes).
I may be missing something simple, but I haven't seen a data symbol that covers anything other than the insurance name, id, group, address, phone.
Try playing around with this - it's from a 9.2 database, so you may need a different object, but it might work more or less as is:
{!fn get_ins_dates(){
local d, result=""
local j = getRowcount("Insurance")
local i=0
while i<j do
d=getRow("Insurance",i,"InsCoName", "PSIState","effectiveDate", "expiredDate")
local status=
cond
case d[2] == "P" "Primary"
case d[2] == "S" "Secondary"
case d[2] == "O" "Other"
else ""
endcond
if d <> "" then
if result <> "" then result = result + hret+ hret +"Name: " + d[1] + hret + "Type: " + status + hret + "Effective date: " + d[3] + hret+ "Expired date: " + d[4] else
result = "Name: " + d[1] + hret + "Type: " + status + hret + "Effective date: " + d[3] + hret+ "Expired date: " + d[4] endif
endif
i=i+1
endwhile
return result}}
This is perfect! Thanks Paul