public void FeeSchedTools_GlobalUpdateWriteoffEstimates_SubscriberInDifferentFamily()
{
string suffix = MethodBase.GetCurrentMethod().Name;
string procStr = "D0145";
double procFee = 100;
ProcedureCode procCode = ProcedureCodes.GetProcCode(procStr);
//Set up clinic, prov, pat
Clinic clinic = ClinicT.CreateClinic(suffix);
long feeSchedNum = FeeSchedT.CreateFeeSched(FeeScheduleType.Normal, suffix);
long provNum = ProviderT.CreateProvider(suffix, feeSchedNum: feeSchedNum);
Fee fee = FeeT.GetNewFee(feeSchedNum, procCode.CodeNum, procFee, clinic.ClinicNum, provNum);
Patient pat = PatientT.CreatePatient(suffix, provNum, clinic.ClinicNum);
Patient patSubscriber = PatientT.CreatePatient(suffix + "_Subscriber", provNum, clinic.ClinicNum);
//Set up insurance
InsuranceInfo info = InsuranceT.AddInsurance(pat, suffix, "p", feeSchedNum);
info.PriInsSub.Subscriber = patSubscriber.PatNum;
InsSubs.Update(info.PriInsSub);
info.ListBenefits.Add(BenefitT.CreatePercentForProc(info.PriInsPlan.PlanNum, procCode.CodeNum, 100));
//Create the procedure and claimproc
Procedure proc = ProcedureT.CreateProcedure(pat, procStr, ProcStat.TP, "", procFee);
ClaimProc priClaimProc = ClaimProcT.CreateClaimProc(pat.PatNum, proc.ProcNum, info.PriInsPlan.PlanNum, info.PriInsSub.InsSubNum, DateTime.Today,
-1, -1, -1, ClaimProcStatus.CapEstimate);
Procedures.ComputeEstimates(proc, pat.PatNum, new List <ClaimProc>(), true, info.ListInsPlans, info.ListPatPlans, info.ListBenefits, pat.Age,
info.ListInsSubs);
priClaimProc = ClaimProcs.Refresh(pat.PatNum).FirstOrDefault(x => x.ProcNum == proc.ProcNum);
Assert.AreEqual(procFee, priClaimProc.InsPayEst);
GlobalUpdateWriteoffs(clinic.ClinicNum);
priClaimProc = ClaimProcs.Refresh(pat.PatNum).FirstOrDefault(x => x.ClaimProcNum == priClaimProc.ClaimProcNum);
Assert.AreEqual(procFee, priClaimProc.InsPayEst);
}
public void FeeSchedTools_GlobalUpdateWriteoffEstimates()
{
string suffix = MethodBase.GetCurrentMethod().Name;
string procStr = "D0145";
double procFee = 100;
ProcedureCode procCode = ProcedureCodes.GetProcCode(procStr);
//Set up clinic, prov, pat
Clinic clinic = ClinicT.CreateClinic(suffix);
long feeSchedNum = FeeSchedT.CreateFeeSched(FeeScheduleType.FixedBenefit, suffix);
long provNum = ProviderT.CreateProvider(suffix, feeSchedNum: feeSchedNum);
Fee fee = FeeT.GetNewFee(feeSchedNum, procCode.CodeNum, procFee, clinic.ClinicNum, provNum);
Patient pat = PatientT.CreatePatient(suffix, provNum, clinic.ClinicNum);
//Set up insurance
InsuranceInfo info = InsuranceT.AddInsurance(pat, suffix, "c", feeSchedNum);
List <InsSub> listSubs = info.ListInsSubs;
List <InsPlan> listPlans = info.ListInsPlans;
List <PatPlan> listPatPlans = info.ListPatPlans;
InsPlan priPlan = info.PriInsPlan;
InsSub priSub = info.PriInsSub;
info.ListBenefits.Add(BenefitT.CreatePercentForProc(priPlan.PlanNum, procCode.CodeNum, 90));
//Create the procedure and claimproc
Procedure proc = ProcedureT.CreateProcedure(pat, procStr, ProcStat.TP, "", procFee);
ClaimProc priClaimProc = ClaimProcT.CreateClaimProc(pat.PatNum, proc.ProcNum, priPlan.PlanNum, priSub.InsSubNum, DateTime.Today, -1, -1, -1,
ClaimProcStatus.CapEstimate);
Procedures.ComputeEstimates(proc, pat.PatNum, new List <ClaimProc>(), true, listPlans, listPatPlans, info.ListBenefits, pat.Age, info.ListInsSubs);
priClaimProc = ClaimProcs.Refresh(pat.PatNum).FirstOrDefault(x => x.ProcNum == proc.ProcNum);
Assert.AreEqual(procFee, priClaimProc.WriteOff);
procFee = 50;
Procedure procNew = proc.Copy();
procNew.ProcFee = procFee;
Procedures.Update(procNew, proc);
//GlobalUpdate
long updated = GlobalUpdateWriteoffs(clinic.ClinicNum);
Assert.AreEqual(1, updated);
ClaimProc priClaimProcDb = ClaimProcs.Refresh(pat.PatNum).FirstOrDefault(x => x.ClaimProcNum == priClaimProc.ClaimProcNum);
Assert.AreEqual(procFee, priClaimProcDb.WriteOff);
}
public void ClaimProcs_ComputeEstimatesByOrthoCase_SetClaimProcForEachProcType()
{
Prefs.UpdateString(PrefName.OrthoBandingCodes, "D8080");
Prefs.UpdateString(PrefName.OrthoDebondCodes, "D8070");
Prefs.UpdateString(PrefName.OrthoVisitCodes, "D8060");
Patient pat = PatientT.CreatePatient(MethodBase.GetCurrentMethod().Name);
Procedure bandingProc = ProcedureT.CreateProcedure(pat, "D8080", ProcStat.C, "", 0);
PatPlan patPlan = PatPlanT.CreatePatPlan(1, pat.PatNum, 0);
ClaimProc bandingClaimProc = ClaimProcT.CreateClaimProc(pat.PatNum, bandingProc.ProcNum, 0, 0, bandingProc.ProcDate, 1, 1, 1);
Procedure visitProc = ProcedureT.CreateProcedure(pat, "D8060", ProcStat.C, "", 0);
ClaimProc visitClaimProc = ClaimProcT.CreateClaimProc(pat.PatNum, visitProc.ProcNum, 0, 0, visitProc.ProcDate, 1, 1, 1);
Procedure debondProc = ProcedureT.CreateProcedure(pat, "D8070", ProcStat.C, "", 0);
ClaimProc debondClaimProc = ClaimProcT.CreateClaimProc(pat.PatNum, debondProc.ProcNum, 0, 0, debondProc.ProcDate, 1, 1, 1);
long orthoCaseNum = OrthoCaseT.InsertForFormOrthoCase(pat.PatNum, 2000, 1200, 0, 800, DateTime.Today, false, DateTime.Today.AddMonths(12), 1000, 400, 60, bandingProc);
OrthoCase orthoCase = OrthoCases.GetOne(orthoCaseNum);
OrthoPlanLink schedulePlanLink = OrthoPlanLinks.GetOneForOrthoCaseByType(orthoCaseNum, OrthoPlanLinkType.OrthoSchedule);
OrthoSchedule orthoSchedule = OrthoSchedules.GetOne(schedulePlanLink.FKey);
OrthoProcLinks.LinkProcForActiveOrthoCase(bandingProc);
OrthoProcLinks.LinkProcForActiveOrthoCase(visitProc);
OrthoProcLinks.LinkProcForActiveOrthoCase(debondProc);
List <OrthoProcLink> allProcLinks = OrthoProcLinks.GetManyByOrthoCase(orthoCaseNum);
OrthoProcLink bandingLink = allProcLinks.FirstOrDefault(x => x.ProcLinkType == OrthoProcType.Banding);
OrthoProcLink debondLink = allProcLinks.FirstOrDefault(x => x.ProcLinkType == OrthoProcType.Debond);
OrthoProcLink visitLink = allProcLinks.FirstOrDefault(x => x.ProcLinkType == OrthoProcType.Visit);
List <ClaimProc> listAllClaimProcs = new List <ClaimProc>()
{
bandingClaimProc, visitClaimProc, debondClaimProc
};
List <OrthoProcLink> listAllOrthoProcLinks = new List <OrthoProcLink>()
{
bandingLink, visitLink, debondLink
};
List <PatPlan> listPatPlans = new List <PatPlan>()
{
patPlan
};
ClaimProcs.ComputeEstimatesByOrthoCase(bandingProc, bandingLink, orthoCase, orthoSchedule, true, listAllClaimProcs,
new List <ClaimProc>()
{
bandingClaimProc
}, listPatPlans, listAllOrthoProcLinks);
ClaimProcs.ComputeEstimatesByOrthoCase(debondProc, debondLink, orthoCase, orthoSchedule, true, listAllClaimProcs,
new List <ClaimProc>()
{
debondClaimProc
}, listPatPlans, listAllOrthoProcLinks);
ClaimProcs.ComputeEstimatesByOrthoCase(visitProc, visitLink, orthoCase, orthoSchedule, true, listAllClaimProcs,
new List <ClaimProc>()
{
visitClaimProc
}, listPatPlans, listAllOrthoProcLinks);
Assert.AreEqual(bandingClaimProc.AllowedOverride, 0);
Assert.AreEqual(bandingClaimProc.CopayOverride, 0);
Assert.AreEqual(bandingClaimProc.PercentOverride, 0);
Assert.AreEqual(bandingClaimProc.PaidOtherInsOverride, 0);
Assert.AreEqual(bandingClaimProc.WriteOffEstOverride, 0);
Assert.AreEqual(bandingClaimProc.InsEstTotalOverride, 600);
Assert.AreEqual(debondClaimProc.AllowedOverride, 0);
Assert.AreEqual(debondClaimProc.CopayOverride, 0);
Assert.AreEqual(debondClaimProc.PercentOverride, 0);
Assert.AreEqual(debondClaimProc.PaidOtherInsOverride, 0);
Assert.AreEqual(debondClaimProc.WriteOffEstOverride, 0);
Assert.AreEqual(debondClaimProc.InsEstTotalOverride, 240);
Assert.AreEqual(visitClaimProc.AllowedOverride, 0);
Assert.AreEqual(visitClaimProc.CopayOverride, 0);
Assert.AreEqual(visitClaimProc.PercentOverride, 0);
Assert.AreEqual(visitClaimProc.PaidOtherInsOverride, 0);
Assert.AreEqual(visitClaimProc.WriteOffEstOverride, 0);
Assert.AreEqual(visitClaimProc.InsEstTotalOverride, 36);
}
