Resolved Allergy Report

Identify resolved allergies, by patient, by (resolving) end user for a given date range, based on the NextGen Patient Allergy table.

[DB Fields]

"patient_allergy"."date_resolved"

"person"."last_name"

"person"."first_name"

"user_mstr"."last_name"

"user_mstr"."first_name"

"patient_allergy"."allergy_type"

"patient_allergy"."rxn_desc"

"allergy_mstr"."description"

"patient_allergy"."modified_by"

"patient_allergy"."modify_timestamp"

"patient_allergy"."allergy_comment"

"active_stations_au"."user_id"

"active_stations_au"."au_timestamp"

"active_stations_au"."station_id"

"active_stations_au"."au_operation"

[Report Fields]

@ResolveDate

User = @UserName

Patient = @PatientName

Station = "active_stations_au"."station_id"

Allergy Type = "patient_allergy"."allergy_type"

Allergy = @AllergyDescription

Comments = "patient_allergy"."allergy_comment"

Change Time = @ChangeTime

[Formula Fields]

@AllergyDescription =

if (Not IsNull({patient_allergy.rxn_desc})) and ({patient_allergy.rxn_desc} <> "") then

{allergy_mstr.description} + ", " + {patient_allergy.rxn_desc}

else

{allergy_mstr.description}

@Change Time= ToText(DateAdd("h", 5, {patient_allergy.modify_timestamp}), "yyyy-MM-ddTHH:mm:ss") + " (" + ToText({patient_allergy.modify_timestamp}) + ")"

@PatientName = Trim({person.last_name}) + ", " + Trim({person.first_name})

@ResolvedDate = Mid({patient_allergy.date_resolved},5,2) + "/" + Right({patient_allergy.date_resolved}, 2) + "/" + Left({patient_allergy.date_resolved}, 4)

@UserName = {user_mstr.last_name} + ", " + {user_mstr.first_name}

[Report Parameters]

Resolved Date - Date

[Record Selection]

(Not IsNull({patient_allergy.date_resolved})) and

{patient_allergy.date_resolved} <> "00000000" and

{patient_allergy.date_resolved} <> ""