private void butRun_Click(object sender, EventArgs e)
{
List <ClaimPaySplit> splits = Claims.GetInsPayNotAttachedForFixTool();
if (splits.Count == 0)
{
MsgBox.Show(this, "There are currently no insurance payments that are not attached to an insurance check.");
return;
}
Cursor = Cursors.WaitCursor;
for (int i = 0; i < splits.Count; i++)
{
Claim claim = Claims.GetClaim(splits[i].ClaimNum);
ClaimPayment cp = new ClaimPayment();
cp.CheckDate = claim.DateService;
cp.CheckAmt = splits[i].InsPayAmt;
cp.ClinicNum = claim.ClinicNum;
cp.CarrierName = splits[i].Carrier;
ClaimPayments.Insert(cp);
List <ClaimProc> claimP = ClaimProcs.RefreshForClaim(splits[i].ClaimNum);
for (int j = 0; j < claimP.Count; j++)
{
claimP[j].DateCP = claim.DateService;
claimP[j].ClaimPaymentNum = cp.ClaimPaymentNum;
ClaimProcs.Update(claimP[j]);
}
}
Cursor = Cursors.Default;
MessageBox.Show(Lan.g(this, "Insurance checks created: ") + splits.Count);
}
private void butRun_Click(object sender, EventArgs e)
{
List <ClaimPaySplit> splits = Claims.GetInsPayNotAttachedForFixTool();
if (splits.Count == 0)
{
MsgBox.Show(this, "There are currently no insurance payments that are not attached to an insurance check.");
DialogResult = DialogResult.OK; //Close the window because there is nothing else to do
return;
}
Cursor = Cursors.WaitCursor;
string invalidClaimDate = "";
DateTime curDate = MiscData.GetNowDateTime().Date;
for (int i = 0; i < splits.Count; i++)
{
Claim claim = Claims.GetClaim(splits[i].ClaimNum);
if (claim == null)
{
continue;
}
if (claim.DateReceived.Date > curDate && !PrefC.GetBool(PrefName.AllowFutureInsPayments) && !PrefC.GetBool(PrefName.FutureTransDatesAllowed))
{
invalidClaimDate += "\r\n" + Lan.g(this, "PatNum") + " " + claim.PatNum + ", " + claim.DateService.ToShortDateString();
continue;
}
ClaimPayment cp = new ClaimPayment();
cp.CheckDate = claim.DateReceived;
cp.CheckAmt = splits[i].InsPayAmt;
cp.ClinicNum = claim.ClinicNum;
cp.CarrierName = splits[i].Carrier;
cp.PayType = Defs.GetFirstForCategory(DefCat.InsurancePaymentType, true).DefNum;
ClaimPayments.Insert(cp);
List <ClaimProc> claimP = ClaimProcs.RefreshForClaim(splits[i].ClaimNum);
for (int j = 0; j < claimP.Count; j++)
{
if (claimP[j].ClaimPaymentNum != 0 || claimP[j].InsPayAmt == 0) //If claimpayment already attached to claimproc or ins didn't pay.
{
continue; //Do not change
}
claimP[j].DateCP = claim.DateReceived;
claimP[j].ClaimPaymentNum = cp.ClaimPaymentNum;
ClaimProcs.Update(claimP[j]);
}
}
Cursor = Cursors.Default;
if (invalidClaimDate != "")
{
invalidClaimDate = "\r\n" + Lan.g(this, "Cannot make future-dated insurance payments for these claims:") + invalidClaimDate;
}
MsgBoxCopyPaste messageBox = new MsgBoxCopyPaste(Lan.g(this, "Insurance checks created:") + " " + splits.Count + invalidClaimDate);
messageBox.Show();
DialogResult = DialogResult.OK; //Close the window because there is nothing else to do
}
