///<summary>Used when viewing various audit trails of specific types. This overload will return security logs for multiple objects (or fKeys).
///Typically you will only need a specific type audit log for one type.
///However, for things like ortho charts, each row (FK) in the database represents just one part of a larger ortho chart "object".
///Thus, to get the full experience of a specific type audit trail window, we need to get security logs for multiple objects (FKs) that
///comprise the larger object (what the user sees). Only implemented with ortho chart so far. FKeys can be null.
///Throws exceptions.</summary>
public static SecurityLog[] Refresh(long patNum, List <Permissions> permTypes, List <long> fKeys)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <SecurityLog[]>(MethodBase.GetCurrentMethod(), patNum, permTypes, fKeys));
}
string types = "";
for (int i = 0; i < permTypes.Count; i++)
{
if (i > 0)
{
types += " OR";
}
types += " PermType=" + POut.Long((int)permTypes[i]);
}
string command = "SELECT * FROM securitylog "
+ "WHERE (" + types + ") ";
if (fKeys != null && fKeys.Count > 0)
{
command += "AND FKey IN (" + String.Join(",", fKeys) + ") ";
}
if (patNum != 0) //appointments
{
command += " AND PatNum IN (" + string.Join(",",
PatientLinks.GetPatNumsLinkedToRecursive(patNum, PatientLinkType.Merge).Select(x => POut.Long(x))) + ")";
}
command += "ORDER BY LogDateTime";
List <SecurityLog> listLogs = Crud.SecurityLogCrud.SelectMany(command);
return(listLogs.OrderBy(x => x.LogDateTime).ToArray());
}
///<summary>Returns a list of clinics that are associated to any clones of the master patient passed in (patNumFrom).
///This method will include the clinic for the master patient passed in.</summary>
public static List <Clinic> GetClinicsForClones(long patNumFrom)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <List <Clinic> >(MethodBase.GetCurrentMethod(), patNumFrom));
}
if (DataConnection.DBtype == DatabaseType.Oracle)
{
throw new ApplicationException("GetClinicsForClones is not currently Oracle compatible. Please call support.");
}
//Always include the master patient's clinic.
List <long> listPatNumClones = new List <long>()
{
patNumFrom
};
//Get all clones (PatNumTos) that are associated to the master patient passed in (patNumFrom).
listPatNumClones.AddRange(PatientLinks.GetPatNumsLinkedFrom(patNumFrom, PatientLinkType.Clone));
//Get the clinics associated to all of the clones for this patient.
string command = "SELECT * FROM clinic "
+ "INNER JOIN patient ON clinic.ClinicNum=patient.ClinicNum "
+ "WHERE patient.PatNum IN (" + string.Join(",", listPatNumClones) + ") "
+ "GROUP BY clinic.ClinicNum"; //We only care about unique clinics, it doesn't matter if several clones have the same clinic.
return(Crud.ClinicCrud.SelectMany(command));
}
///<summary>Used when viewing securityLog from the security admin window. PermTypes can be length 0 to get all types.
///Throws exceptions.</summary>
public static SecurityLog[] Refresh(DateTime dateFrom, DateTime dateTo, Permissions permType, long patNum, long userNum,
DateTime datePreviousFrom, DateTime datePreviousTo, int limit = 0)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <SecurityLog[]>(MethodBase.GetCurrentMethod(), dateFrom, dateTo, permType, patNum, userNum, datePreviousFrom, datePreviousTo, limit));
}
string command = "SELECT securitylog.*,LName,FName,Preferred,MiddleI,LogHash FROM securitylog "
+ "LEFT JOIN patient ON patient.PatNum=securitylog.PatNum "
+ "LEFT JOIN securityloghash ON securityloghash.SecurityLogNum=securitylog.SecurityLogNum "
+ "WHERE LogDateTime >= " + POut.Date(dateFrom) + " "
+ "AND LogDateTime <= " + POut.Date(dateTo.AddDays(1)) + " "
+ "AND DateTPrevious >= " + POut.Date(datePreviousFrom) + " "
+ "AND DateTPrevious <= " + POut.Date(datePreviousTo.AddDays(1));
if (patNum != 0)
{
command += " AND securitylog.PatNum IN (" + string.Join(",",
PatientLinks.GetPatNumsLinkedToRecursive(patNum, PatientLinkType.Merge).Select(x => POut.Long(x))) + ")";
}
if (permType != Permissions.None)
{
command += " AND PermType=" + POut.Long((int)permType);
}
if (userNum != 0)
{
command += " AND UserNum=" + POut.Long(userNum);
}
command += " ORDER BY LogDateTime DESC"; //Using DESC so that the most recent ones appear in the list
if (limit > 0)
{
command = DbHelper.LimitOrderBy(command, limit);
}
DataTable table = Db.GetTable(command);
List <SecurityLog> listLogs = Crud.SecurityLogCrud.TableToList(table);
for (int i = 0; i < listLogs.Count; i++)
{
if (table.Rows[i]["PatNum"].ToString() == "0")
{
listLogs[i].PatientName = "";
}
else
{
listLogs[i].PatientName = table.Rows[i]["PatNum"].ToString() + "-"
+ Patients.GetNameLF(table.Rows[i]["LName"].ToString()
, table.Rows[i]["FName"].ToString()
, table.Rows[i]["Preferred"].ToString()
, table.Rows[i]["MiddleI"].ToString());
}
listLogs[i].LogHash = table.Rows[i]["LogHash"].ToString();
}
return(listLogs.OrderBy(x => x.LogDateTime).ToArray());
}
///<summary>Returns the CustomerId that PaySimple gave us for the given patNum.
///If addToPaySimpleIfMissing, the PaySimple API will add the given patNum if a link isn't in our database and return the new CustomerId.
///Otherwise, it will return 0.</summary>
public static long GetCustomerIdForPat(long patNum, string fname, string lname, long clinicNum = -1)
{
long psCustomerId = PatientLinks.GetPatNumsLinkedFrom(patNum, PatientLinkType.PaySimple).FirstOrDefault();
if (psCustomerId == 0) //Patient doesn't have a PaySimpleCustomerId
{
psCustomerId = AddCustomer(fname, lname, (patNum > 0 ? "PatNum: " + patNum.ToString() : ""), clinicNum);
PatientLinks.Insert(new PatientLink()
{
PatNumFrom = patNum,
PatNumTo = psCustomerId,
LinkType = PatientLinkType.PaySimple,
});
}
return(psCustomerId);
}
///<summary>Used when viewing various audit trails of specific types. This overload will return security logs for multiple objects (or fKeys). Typically you will only need a specific type audit log for one type. However, for things like ortho charts, each row (FK) in the database represents just one part of a larger ortho chart "object". Thus, to get the full experience of a specific type audit trail window, we need to get security logs for multiple objects (FKs) that comprise the larger object (what the user sees). Only implemented with ortho chart so far. FKeys can be null.</summary>
public static SecurityLog[] Refresh(long patNum, List <Permissions> permTypes, List <long> fKeys, bool includeArchived)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <SecurityLog[]>(MethodBase.GetCurrentMethod(), patNum, permTypes, fKeys, includeArchived));
}
string types = "";
for (int i = 0; i < permTypes.Count; i++)
{
if (i > 0)
{
types += " OR";
}
types += " PermType=" + POut.Long((int)permTypes[i]);
}
string command = "SELECT * FROM securitylog "
+ "WHERE (" + types + ") ";
if (fKeys != null && fKeys.Count > 0)
{
command += "AND FKey IN (" + String.Join(",", fKeys) + ") ";
}
if (patNum != 0) //appointments
{
command += " AND PatNum IN (" + string.Join(",",
PatientLinks.GetPatNumsLinkedToRecursive(patNum, PatientLinkType.Merge).Select(x => POut.Long(x))) + ")";
}
command += "ORDER BY LogDateTime";
List <SecurityLog> listLogs = Crud.SecurityLogCrud.SelectMany(command);
if (includeArchived)
{
string decryptedPass;
CDT.Class1.Decrypt(PrefC.GetString(PrefName.ArchivePassHash), out decryptedPass);
string connectionStrOrig = DataConnection.GetCurrentConnectionString();
DatabaseType dbTypeOrig = DataConnection.DBtype;
DataConnection dcon = new DataConnection();
//Connect to archive database
dcon.SetDb(PrefC.GetString(PrefName.ArchiveServerName) == ""?PrefC.GetString(PrefName.ArchiveServerURI):PrefC.GetString(PrefName.ArchiveServerName),
"opendentalarchive", PrefC.GetString(PrefName.ArchiveUserName), decryptedPass, "", "", dbTypeOrig);
listLogs.AddRange(Crud.SecurityLogCrud.SelectMany(command)); //Append results
dcon.SetDb(connectionStrOrig, "", dbTypeOrig); //Reconnect to initial db
}
return(listLogs.OrderBy(x => x.LogDateTime).ToArray());
}
///<summary>Used when viewing securityLog from the security admin window. PermTypes can be length 0 to get all types.
///Throws exceptions.</summary>
public static SecurityLog[] Refresh(DateTime dateFrom, DateTime dateTo, Permissions permType, long patNum, long userNum,
DateTime datePreviousFrom, DateTime datePreviousTo, bool includeArchived, int limit = 0)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <SecurityLog[]>(MethodBase.GetCurrentMethod(), dateFrom, dateTo, permType, patNum, userNum, datePreviousFrom, datePreviousTo, includeArchived, limit));
}
string command = "SELECT securitylog.*,LName,FName,Preferred,MiddleI,LogHash FROM securitylog "
+ "LEFT JOIN patient ON patient.PatNum=securitylog.PatNum "
+ "LEFT JOIN securityloghash ON securityloghash.SecurityLogNum=securitylog.SecurityLogNum "
+ "WHERE LogDateTime >= " + POut.Date(dateFrom) + " "
+ "AND LogDateTime <= " + POut.Date(dateTo.AddDays(1)) + " "
+ "AND DateTPrevious >= " + POut.Date(datePreviousFrom) + " "
+ "AND DateTPrevious <= " + POut.Date(datePreviousTo.AddDays(1));
if (patNum != 0)
{
command += " AND securitylog.PatNum IN (" + string.Join(",",
PatientLinks.GetPatNumsLinkedToRecursive(patNum, PatientLinkType.Merge).Select(x => POut.Long(x))) + ")";
}
if (permType != Permissions.None)
{
command += " AND PermType=" + POut.Long((int)permType);
}
if (userNum != 0)
{
command += " AND UserNum=" + POut.Long(userNum);
}
command += " ORDER BY LogDateTime DESC"; //Using DESC so that the most recent ones appear in the list
if (limit > 0)
{
command = DbHelper.LimitOrderBy(command, limit);
}
DataTable table = Db.GetTable(command);
List <SecurityLog> listLogs = Crud.SecurityLogCrud.TableToList(table);
for (int i = 0; i < listLogs.Count; i++)
{
if (table.Rows[i]["PatNum"].ToString() == "0")
{
listLogs[i].PatientName = "";
}
else
{
listLogs[i].PatientName = table.Rows[i]["PatNum"].ToString() + "-"
+ Patients.GetNameLF(table.Rows[i]["LName"].ToString()
, table.Rows[i]["FName"].ToString()
, table.Rows[i]["Preferred"].ToString()
, table.Rows[i]["MiddleI"].ToString());
}
listLogs[i].LogHash = table.Rows[i]["LogHash"].ToString();
}
if (includeArchived)
{
//This will purposefully throw exceptions.
DataTable tableArchive = MiscData.RunFuncOnArchiveDatabase <DataTable>(() => {
return(Db.GetTable(command));
});
List <SecurityLog> listLogsArchive = Crud.SecurityLogCrud.TableToList(tableArchive);
Dictionary <long, Patient> dictPats = Patients.GetMultPats(listLogsArchive.Select(x => x.PatNum).Distinct().ToList())
.ToDictionary(x => x.PatNum);
for (int i = 0; i < listLogsArchive.Count; i++)
{
Patient pat;
if (listLogsArchive[i].PatNum == 0 || !dictPats.TryGetValue(listLogsArchive[i].PatNum, out pat))
{
listLogsArchive[i].PatientName = "";
}
else
{
listLogsArchive[i].PatientName = listLogsArchive[i].PatNum + "-" + pat.GetNameLF();
}
listLogsArchive[i].LogHash = tableArchive.Rows[i]["LogHash"].ToString();
}
listLogs.AddRange(listLogsArchive); //Add archived entries to returned list.
}
return(listLogs.OrderBy(x => x.LogDateTime).ToArray());
}
///<summary>Used when viewing securityLog from the security admin window. PermTypes can be length 0 to get all types.</summary>
public static SecurityLog[] Refresh(DateTime dateFrom, DateTime dateTo, Permissions permType, long patNum, long userNum,
DateTime datePreviousFrom, DateTime datePreviousTo, bool includeArchived, int limit = 0)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <SecurityLog[]>(MethodBase.GetCurrentMethod(), dateFrom, dateTo, permType, patNum, userNum, datePreviousFrom, datePreviousTo, includeArchived, limit));
}
string command = "SELECT securitylog.*,LName,FName,Preferred,MiddleI,LogHash FROM securitylog "
+ "LEFT JOIN patient ON patient.PatNum=securitylog.PatNum "
+ "LEFT JOIN securityloghash ON securityloghash.SecurityLogNum=securitylog.SecurityLogNum "
+ "WHERE LogDateTime >= " + POut.Date(dateFrom) + " "
+ "AND LogDateTime <= " + POut.Date(dateTo.AddDays(1)) + " "
+ "AND DateTPrevious >= " + POut.Date(datePreviousFrom) + " "
+ "AND DateTPrevious <= " + POut.Date(datePreviousTo.AddDays(1));
if (patNum != 0)
{
command += " AND securitylog.PatNum IN (" + string.Join(",",
PatientLinks.GetPatNumsLinkedToRecursive(patNum, PatientLinkType.Merge).Select(x => POut.Long(x))) + ")";
}
if (permType != Permissions.None)
{
command += " AND PermType=" + POut.Long((int)permType);
}
if (userNum != 0)
{
command += " AND UserNum=" + POut.Long(userNum);
}
command += " ORDER BY LogDateTime DESC"; //Using DESC so that the most recent ones appear in the list
if (limit > 0)
{
command = DbHelper.LimitOrderBy(command, limit);
}
DataTable table = Db.GetTable(command);
List <SecurityLog> listLogs = Crud.SecurityLogCrud.TableToList(table);
for (int i = 0; i < listLogs.Count; i++)
{
if (table.Rows[i]["PatNum"].ToString() == "0")
{
listLogs[i].PatientName = "";
}
else
{
listLogs[i].PatientName = table.Rows[i]["PatNum"].ToString() + "-"
+ Patients.GetNameLF(table.Rows[i]["LName"].ToString()
, table.Rows[i]["FName"].ToString()
, table.Rows[i]["Preferred"].ToString()
, table.Rows[i]["MiddleI"].ToString());
}
listLogs[i].LogHash = table.Rows[i]["LogHash"].ToString();
}
if (includeArchived && dateFrom <= PrefC.GetDate(PrefName.ArchiveDate)) //They are attempting to find security logs that are prior to archived date.
{
string decryptedPass;
CDT.Class1.Decrypt(PrefC.GetString(PrefName.ArchivePassHash), out decryptedPass);
string connectionStrOrig = DataConnection.GetCurrentConnectionString();
DatabaseType dbTypeOrig = DataConnection.DBtype;
DataConnection dcon = new DataConnection();
//Connect to archive database
dcon.SetDb(PrefC.GetString(PrefName.ArchiveServerName) == ""?PrefC.GetString(PrefName.ArchiveServerURI):PrefC.GetString(PrefName.ArchiveServerName),
"opendentalarchive", PrefC.GetString(PrefName.ArchiveUserName), decryptedPass, "", "", dbTypeOrig);
DataTable tableArchive = Db.GetTable(command); //Query the archive
List <SecurityLog> listLogsArchive = Crud.SecurityLogCrud.TableToList(tableArchive);
dcon.SetDb(connectionStrOrig, "", dbTypeOrig); //Reconnect to initial db
Dictionary <long, Patient> dictPats = Patients.GetMultPats(listLogsArchive.Select(x => x.PatNum).Distinct().ToList())
.ToDictionary(x => x.PatNum);
for (int i = 0; i < listLogsArchive.Count; i++)
{
Patient pat;
if (listLogsArchive[i].PatNum == 0 || !dictPats.TryGetValue(listLogsArchive[i].PatNum, out pat))
{
listLogsArchive[i].PatientName = "";
}
else
{
listLogsArchive[i].PatientName = listLogsArchive[i].PatNum + "-" + pat.GetNameLF();
}
listLogsArchive[i].LogHash = tableArchive.Rows[i]["LogHash"].ToString();
}
listLogs.AddRange(listLogsArchive); //Add archived entries to returned list.
}
return(listLogs.OrderBy(x => x.LogDateTime).ToArray());
}
///<summary>Gets the data necessary to load the Family Module.</summary>
public static LoadData GetLoadData(long patNum, bool doCreateSecLog)
{
if (RemotingClient.RemotingRole == RemotingRole.ClientWeb)
{
return(Meth.GetObject <LoadData>(MethodBase.GetCurrentMethod(), patNum, doCreateSecLog));
}
LoadData data = new LoadData();
data.Fam = Patients.GetFamily(patNum);
data.Pat = data.Fam.GetPatient(patNum);
data.ListPatPlans = PatPlans.Refresh(patNum);
if (!PatPlans.IsPatPlanListValid(data.ListPatPlans)) //PatPlans had invalid references and need to be refreshed.
{
data.ListPatPlans = PatPlans.Refresh(patNum);
}
data.PatNote = PatientNotes.Refresh(patNum, data.Pat.Guarantor);
data.ListInsSubs = InsSubs.RefreshForFam(data.Fam);
data.ListInsPlans = InsPlans.RefreshForSubList(data.ListInsSubs);
data.ListBenefits = Benefits.Refresh(data.ListPatPlans, data.ListInsSubs);
data.ListRecalls = Recalls.GetList(data.Fam.ListPats.Select(x => x.PatNum).ToList());
data.ArrPatFields = PatFields.Refresh(patNum);
data.SuperFamilyMembers = Patients.GetBySuperFamily(data.Pat.SuperFamily);
data.SuperFamilyGuarantors = Patients.GetSuperFamilyGuarantors(data.Pat.SuperFamily);
data.DictCloneSpecialities = Patients.GetClonesAndSpecialties(patNum);
data.PatPict = Documents.GetPatPictFromDb(patNum);
data.HasPatPict = (data.PatPict == null ? YN.No : YN.Yes);
List <DisplayField> listDisplayFields = DisplayFields.GetForCategory(DisplayFieldCategory.PatientInformation);
foreach (DisplayField field in listDisplayFields)
{
switch (field.InternalName)
{
case "Guardians":
data.ListGuardians = Guardians.Refresh(patNum);
break;
case "Pat Restrictions":
data.ListPatRestricts = PatRestrictions.GetAllForPat(patNum);
break;
case "Payor Types":
data.PayorTypeDesc = PayorTypes.GetCurrentDescription(patNum);
break;
case "PatFields":
data.ListPatFieldDefLinks = FieldDefLinks.GetForLocation(FieldLocations.Family);
break;
case "References":
data.ListCustRefEntries = CustRefEntries.GetEntryListForCustomer(patNum);
break;
case "Referrals":
data.ListRefAttaches = RefAttaches.Refresh(patNum);
break;
case "ResponsParty":
if (data.Pat.ResponsParty != 0)
{
data.ResponsibleParty = Patients.GetLim(data.Pat.ResponsParty);
}
break;
}
}
if (data.Pat.DiscountPlanNum != 0)
{
data.DiscountPlan = DiscountPlans.GetPlan(data.Pat.DiscountPlanNum);
}
data.ListMergeLinks = PatientLinks.GetLinks(data.Fam.ListPats.Select(x => x.PatNum).ToList(), PatientLinkType.Merge);
if (doCreateSecLog)
{
SecurityLogs.MakeLogEntry(Permissions.FamilyModule, patNum, "");
}
return(data);
}
