///<summary>Returns true if the user switched to a different patient.</summary>
public static bool PromptForMerge(Patient patCur, out Patient newPatCur)
{
newPatCur = patCur;
if (patCur == null)
{
return(false);
}
List <PatientLink> listMergedPats = PatientLinks.GetLinks(patCur.PatNum, PatientLinkType.Merge);
if (!PatientLinks.WasPatientMerged(patCur.PatNum, listMergedPats))
{
return(false);
}
//This patient has been merged before. Get a list of all patients that this patient has been merged into.
List <Patient> listPats = Patients.GetMultPats(listMergedPats.Where(x => x.PatNumTo != patCur.PatNum)
.Select(x => x.PatNumTo).ToList()).ToList();
//Notify the user that the currently selected patient has been merged before and then ask them if they want to switch to the correct patient.
foreach (Patient pat in listPats)
{
if (pat.PatStatus.In(PatientStatus.Patient, PatientStatus.Inactive) &&
(MessageBox.Show(Lan.g("ContrAppt", "The currently selected patient has been merged into another patient.\r\n"
+ "Switch to patient") + " " + pat.GetNameLF() + " #" + pat.PatNum.ToString() + "?", "", MessageBoxButtons.YesNo) == DialogResult.Yes))
{
newPatCur = pat;
return(true);
}
}
//The user has declined every possible patient that the current patient was merged to. Let them keep the merge from patient selected.
return(false);
}
private void FillList()
{
listPats.Items.Clear();
for (int i = 0; i < FamCur.ListPats.Length; i++)
{
if (PatientLinks.WasPatientMerged(FamCur.ListPats[i].PatNum, _listMergeLinks))
{
continue; //Don't show merged patients
}
listPats.Items.Add(new ODBoxItem <Patient>(FamCur.ListPats[i].GetNameFL(), FamCur.ListPats[i]));
}
}
private void FillList()
{
listPats.Items.Clear();
for (int i = 0; i < FamCur.ListPats.Length; i++)
{
if (PatientLinks.WasPatientMerged(FamCur.ListPats[i].PatNum, _listMergeLinks))
{
continue; //Don't show merged patients
}
listPats.Items.Add(new ODBoxItem <Patient>(FamCur.ListPats[i].GetNameFL() + " (" + Lan.g("enumPatientStatus",
FamCur.ListPats[i].PatStatus.GetDescription()) + ")", FamCur.ListPats[i]));
}
}
private void FillFamily()
{
PatNumSelected = _patCur.PatNum; //just in case user has selected a different family member
_listRecalls = Recalls.GetList(_famCur.ListPats.ToList());
//Appointment[] aptsOnePat;
List <PatientLink> listLinks = PatientLinks.GetLinks(_famCur.ListPats.Select(x => x.PatNum).ToList(), PatientLinkType.Merge);
listViewFamily.Items.Clear();
ListViewItem item;
DateTime dateDue;
DateTime dateSched;
for (int i = 0; i < _famCur.ListPats.Length; i++)
{
if (PatientLinks.WasPatientMerged(_famCur.ListPats[i].PatNum, listLinks))
{
continue; //Do not include Merged patients in the displayed list.
}
item = new ListViewItem(_famCur.GetNameInFamFLI(i));
item.Tag = _famCur.ListPats[i];
if (_famCur.ListPats[i].PatNum == _patCur.PatNum)
{
item.BackColor = Color.Silver;
}
item.SubItems.Add(_famCur.ListPats[i].Age.ToString());
item.SubItems.Add(_famCur.ListPats[i].Gender.ToString());
dateDue = DateTime.MinValue;
dateSched = DateTime.MinValue;
bool isdisabled = false;
for (int j = 0; j < _listRecalls.Count; j++)
{
if (_listRecalls[j].PatNum == _famCur.ListPats[i].PatNum &&
(_listRecalls[j].RecallTypeNum == RecallTypes.PerioType ||
_listRecalls[j].RecallTypeNum == RecallTypes.ProphyType))
{
dateDue = _listRecalls[j].DateDue;
dateSched = _listRecalls[j].DateScheduled;
isdisabled = _listRecalls[j].IsDisabled;
}
}
if (isdisabled)
{
item.SubItems.Add(Lan.g(this, "disabled"));
}
else if (dateDue.Year < 1880)
{
item.SubItems.Add("");
}
else
{
item.SubItems.Add(dateDue.ToShortDateString());
}
if (dateDue <= DateTime.Today)
{
item.ForeColor = Color.Red;
}
if (dateSched.Year < 1880)
{
item.SubItems.Add("");
}
else
{
item.SubItems.Add(dateSched.ToShortDateString());
}
listViewFamily.Items.Add(item);
}
checkDone.Checked = _patCur.PlannedIsDone;
textFinUrg.Text = _famCur.ListPats[0].FamFinUrgNote;
}
public static bool Trigger <T>(AutomationTrigger trigger, List <string> procCodes, long patNum, long aptNum = 0, T triggerObj = default(T))
{
if (patNum == 0) //Could happen for OpenPatient trigger
{
return(false);
}
List <Automation> listAutomations = Automations.GetDeepCopy();
bool automationHappened = false;
for (int i = 0; i < listAutomations.Count; i++)
{
if (listAutomations[i].Autotrigger != trigger)
{
continue;
}
if (trigger == AutomationTrigger.CompleteProcedure || trigger == AutomationTrigger.ScheduleProcedure)
{
if (procCodes == null || procCodes.Count == 0)
{
continue; //fail silently
}
string[] arrayCodes = listAutomations[i].ProcCodes.Split(',');
if (procCodes.All(x => !arrayCodes.Contains(x)))
{
continue;
}
}
//matching automation item has been found
//Get possible list of conditions that exist for this automation item
List <AutomationCondition> autoConditionsList = AutomationConditions.GetListByAutomationNum(listAutomations[i].AutomationNum);
if (autoConditionsList.Count > 0 && !CheckAutomationConditions(autoConditionsList, patNum, triggerObj))
{
continue;
}
SheetDef sheetDef;
Sheet sheet;
FormSheetFillEdit FormSF;
Appointment aptNew;
Appointment aptOld;
switch (listAutomations[i].AutoAction)
{
case AutomationAction.CreateCommlog:
if (Plugins.HookMethod(null, "AutomationL.Trigger_CreateCommlog_start", patNum, aptNum, listAutomations[i].CommType,
listAutomations[i].MessageContent, trigger))
{
automationHappened = true;
continue;
}
Commlog commlogCur = new Commlog();
commlogCur.PatNum = patNum;
commlogCur.CommDateTime = DateTime.Now;
commlogCur.CommType = listAutomations[i].CommType;
commlogCur.Note = listAutomations[i].MessageContent;
commlogCur.Mode_ = CommItemMode.None;
commlogCur.UserNum = Security.CurUser.UserNum;
commlogCur.IsNew = true;
FormCommItem commItemView = new FormCommItem(commlogCur);
commItemView.ShowDialog();
automationHappened = true;
continue;
case AutomationAction.PopUp:
MessageBox.Show(listAutomations[i].MessageContent);
automationHappened = true;
continue;
case AutomationAction.PopUpThenDisable10Min:
Plugins.HookAddCode(null, "AutomationL.Trigger_PopUpThenDisable10Min_begin", listAutomations[i], procCodes, patNum);
long automationNum = listAutomations[i].AutomationNum;
bool hasAutomationBlock = FormOpenDental.DicBlockedAutomations.ContainsKey(automationNum);
if (hasAutomationBlock && FormOpenDental.DicBlockedAutomations[automationNum].ContainsKey(patNum)) //Automation block exist for current patient.
{
continue;
}
if (hasAutomationBlock)
{
FormOpenDental.DicBlockedAutomations[automationNum].Add(patNum, DateTime.Now.AddMinutes(10)); //Disable for 10 minutes.
}
else //Add automationNum to higher level dictionary .
{
FormOpenDental.DicBlockedAutomations.Add(automationNum,
new Dictionary <long, DateTime>()
{
{ patNum, DateTime.Now.AddMinutes(10) } //Disable for 10 minutes.
});
}
MessageBox.Show(listAutomations[i].MessageContent);
automationHappened = true;
continue;
case AutomationAction.PrintPatientLetter:
case AutomationAction.ShowExamSheet:
case AutomationAction.ShowConsentForm:
sheetDef = SheetDefs.GetSheetDef(listAutomations[i].SheetDefNum);
sheet = SheetUtil.CreateSheet(sheetDef, patNum);
SheetParameter.SetParameter(sheet, "PatNum", patNum);
SheetFiller.FillFields(sheet);
SheetUtil.CalculateHeights(sheet);
FormSF = new FormSheetFillEdit(sheet);
FormSF.ShowDialog();
automationHappened = true;
continue;
case AutomationAction.PrintReferralLetter:
long referralNum = RefAttaches.GetReferralNum(patNum);
if (referralNum == 0)
{
MsgBox.Show("Automations", "This patient has no referral source entered.");
automationHappened = true;
continue;
}
sheetDef = SheetDefs.GetSheetDef(listAutomations[i].SheetDefNum);
sheet = SheetUtil.CreateSheet(sheetDef, patNum);
SheetParameter.SetParameter(sheet, "PatNum", patNum);
SheetParameter.SetParameter(sheet, "ReferralNum", referralNum);
//Don't fill these params if the sheet doesn't use them.
if (sheetDef.SheetFieldDefs.Any(x =>
(x.FieldType == SheetFieldType.Grid && x.FieldName == "ReferralLetterProceduresCompleted") ||
(x.FieldType == SheetFieldType.Special && x.FieldName == "toothChart")))
{
List <Procedure> listProcs = Procedures.GetCompletedForDateRange(DateTime.Today, DateTime.Today
, listPatNums: new List <long>()
{
patNum
}
, includeNote: true
, includeGroupNote: true
);
if (sheetDef.SheetFieldDefs.Any(x => x.FieldType == SheetFieldType.Grid && x.FieldName == "ReferralLetterProceduresCompleted"))
{
SheetParameter.SetParameter(sheet, "CompletedProcs", listProcs);
}
if (sheetDef.SheetFieldDefs.Any(x => x.FieldType == SheetFieldType.Special && x.FieldName == "toothChart"))
{
SheetParameter.SetParameter(sheet, "toothChartImg", SheetPrinting.GetToothChartHelper(patNum, false, listProceduresFilteredOverride: listProcs));
}
}
SheetFiller.FillFields(sheet);
SheetUtil.CalculateHeights(sheet);
FormSF = new FormSheetFillEdit(sheet);
FormSF.ShowDialog();
automationHappened = true;
continue;
case AutomationAction.SetApptASAP:
aptNew = Appointments.GetOneApt(aptNum);
if (aptNew == null)
{
MsgBox.Show("Automations", "Invalid appointment for automation.");
automationHappened = true;
continue;
}
aptOld = aptNew.Copy();
aptNew.Priority = ApptPriority.ASAP;
Appointments.Update(aptNew, aptOld); //Appointments S-Class handles Signalods
continue;
case AutomationAction.SetApptType:
aptNew = Appointments.GetOneApt(aptNum);
if (aptNew == null)
{
MsgBox.Show("Automations", "Invalid appointment for automation.");
automationHappened = true;
continue;
}
aptOld = aptNew.Copy();
aptNew.AppointmentTypeNum = listAutomations[i].AppointmentTypeNum;
AppointmentType aptTypeCur = AppointmentTypes.GetFirstOrDefault(x => x.AppointmentTypeNum == aptNew.AppointmentTypeNum);
if (aptTypeCur != null)
{
aptNew.ColorOverride = aptTypeCur.AppointmentTypeColor;
aptNew.Pattern = AppointmentTypes.GetTimePatternForAppointmentType(aptTypeCur);
List <Procedure> listProcs = Appointments.ApptTypeMissingProcHelper(aptNew, aptTypeCur, new List <Procedure>());
Procedures.UpdateAptNums(listProcs.Select(x => x.ProcNum).ToList(), aptNew.AptNum, aptNew.AptStatus == ApptStatus.Planned);
}
Appointments.Update(aptNew, aptOld); //Appointments S-Class handles Signalods
continue;
case AutomationAction.PatRestrictApptSchedTrue:
if (!Security.IsAuthorized(Permissions.PatientApptRestrict, true))
{
SecurityLogs.MakeLogEntry(Permissions.PatientApptRestrict, patNum, "Attempt to restrict patient scheduling was blocked due to lack of user permission.");
continue;
}
PatRestrictions.Upsert(patNum, PatRestrict.ApptSchedule);
automationHappened = true;
continue;
case AutomationAction.PatRestrictApptSchedFalse:
if (!Security.IsAuthorized(Permissions.PatientApptRestrict, true))
{
SecurityLogs.MakeLogEntry(Permissions.PatientApptRestrict, patNum, "Attempt to allow patient scheduling was blocked due to lack of user permission.");
continue;
}
PatRestrictions.RemovePatRestriction(patNum, PatRestrict.ApptSchedule);
automationHappened = true;
continue;
case AutomationAction.PrintRxInstruction:
List <RxPat> listRx = (List <RxPat>)(object) triggerObj;
if (listRx == null)
{
//Got here via a pre-existing trigger that doesn't pass in triggerObj. We now block creation of automation triggers that could get
//here via code that does not pass in triggerObj.
continue;
}
//We go through each new Rx where the patient note isn't blank.
//There should only usually be one new rx, but we'll loop just in case.
foreach (RxPat rx in listRx.Where(x => !string.IsNullOrWhiteSpace(x.PatientInstruction)))
{
//This logic is an exact copy of FormRxManage.butPrintSelect_Click()'s logic when 1 Rx is selected.
//If this is updated, that method needs to be updated as well.
sheetDef = SheetDefs.GetSheetDef(listAutomations[i].SheetDefNum);
sheet = SheetUtil.CreateSheet(sheetDef, patNum);
SheetParameter.SetParameter(sheet, "RxNum", rx.RxNum);
SheetFiller.FillFields(sheet);
SheetUtil.CalculateHeights(sheet);
FormSF = new FormSheetFillEdit(sheet);
FormSF.ShowDialog();
automationHappened = true;
}
continue;
case AutomationAction.ChangePatStatus:
Patient pat = Patients.GetPat(patNum);
Patient patOld = pat.Copy();
pat.PatStatus = listAutomations[i].PatStatus;
//Don't allow changing status from Archived if this is a merged patient.
if (patOld.PatStatus != pat.PatStatus &&
patOld.PatStatus == PatientStatus.Archived &&
PatientLinks.WasPatientMerged(patOld.PatNum))
{
MsgBox.Show("FormPatientEdit", "Not allowed to change the status of a merged patient.");
continue;
}
switch (pat.PatStatus)
{
case PatientStatus.Deceased:
if (patOld.PatStatus != PatientStatus.Deceased)
{
List <Appointment> listFutureAppts = Appointments.GetFutureSchedApts(pat.PatNum);
if (listFutureAppts.Count > 0)
{
string apptDates = string.Join("\r\n", listFutureAppts.Take(10).Select(x => x.AptDateTime.ToString()));
if (listFutureAppts.Count > 10)
{
apptDates += "(...)";
}
if (MessageBox.Show(
Lan.g("FormPatientEdit", "This patient has scheduled appointments in the future") + ":\r\n" + apptDates + "\r\n"
+ Lan.g("FormPatientEdit", "Would you like to delete them and set the patient to Deceased?"),
Lan.g("FormPatientEdit", "Delete future appointments?"),
MessageBoxButtons.YesNo) == DialogResult.Yes)
{
foreach (Appointment appt in listFutureAppts)
{
Appointments.Delete(appt.AptNum, true);
}
}
else
{
continue;
}
}
}
break;
}
//Re-activate or disable recalls depending on the the status that the patient is changing to.
Patients.UpdateRecalls(pat, patOld, "ChangePatStatus automation");
if (Patients.Update(pat, patOld))
{
SecurityLogs.MakeLogEntry(Permissions.PatientEdit, patNum, "Patient status changed from " + patOld.PatStatus.GetDescription() +
" to " + listAutomations[i].PatStatus.GetDescription() + " through ChangePatStatus automation.");
}
automationHappened = true;
continue;
}
}
return(automationHappened);
}
