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
}
private void butSave_Click(object sender, EventArgs e)
{
long defNum = Defs.GetFirstForCategory(DefCat.ImageCats, true).DefNum;
Bitmap bitmap = new Bitmap(this.Width, this.Height);
this.DrawToBitmap(bitmap, new Rectangle(0, 0, this.Width, this.Height));
Patient guar = Patients.GetPat(Guarantor);
try {
ImageStore.Import(bitmap, defNum, ImageType.Photo, guar);
}
catch (Exception ex) {
MessageBox.Show("Unable to save file: " + ex.Message);
return;
}
MsgBox.Show(this, "Saved.");
}
///<summary>Uses sheet framework to generate a PDF file, save it to patient's image folder, and attempt to launch file with defualt reader.
///If using ImagesStoredInDB it will not launch PDF. If no valid patient is selected you cannot perform this action.</summary>
private void butPDF_Click(object sender, EventArgs e)
{
if (PatCur == null) //not attached to a patient when form loaded and they haven't selected a patient to attach to yet
{
MsgBox.Show(this, "The Medical Lab must be attached to a patient before the PDF can be saved.");
return;
}
if (PatCur.PatNum > 0 && _medLabCur.PatNum != PatCur.PatNum) //save the current patient attached to the MedLab if it has been changed
{
MoveLabsAndImagesHelper();
}
Cursor = Cursors.WaitCursor;
SheetDef sheetDef = SheetUtil.GetMedLabResultsSheetDef();
Sheet sheet = SheetUtil.CreateSheet(sheetDef, _medLabCur.PatNum);
SheetFiller.FillFields(sheet, null, null, _medLabCur);
//create the file in the temp folder location, then import so it works when storing images in the db
string tempPath = ODFileUtils.CombinePaths(PrefC.GetTempFolderPath(), _medLabCur.PatNum.ToString() + ".pdf");
SheetPrinting.CreatePdf(sheet, tempPath, null, _medLabCur);
HL7Def defCur = HL7Defs.GetOneDeepEnabled(true);
long category = defCur.LabResultImageCat;
if (category == 0)
{
category = Defs.GetFirstForCategory(DefCat.ImageCats, true).DefNum; //put it in the first category.
}
//create doc--------------------------------------------------------------------------------------
OpenDentBusiness.Document docc = null;
try {
docc = ImageStore.Import(tempPath, category, Patients.GetPat(_medLabCur.PatNum));
}
catch (Exception ex) {
ex.DoNothing();
Cursor = Cursors.Default;
MsgBox.Show(this, "Error saving document.");
return;
}
finally {
//Delete the temp file since we don't need it anymore.
try {
File.Delete(tempPath);
}
catch {
//Do nothing. This file will likely get cleaned up later.
}
}
docc.Description = Lan.g(this, "MedLab Result");
docc.DateCreated = DateTime.Now;
Documents.Update(docc);
string filePathAndName = "";
if (PrefC.AtoZfolderUsed == DataStorageType.LocalAtoZ)
{
string patFolder = ImageStore.GetPatientFolder(Patients.GetPat(_medLabCur.PatNum), ImageStore.GetPreferredAtoZpath());
filePathAndName = ODFileUtils.CombinePaths(patFolder, docc.FileName);
}
else if (CloudStorage.IsCloudStorage)
{
FormProgress FormP = new FormProgress();
FormP.DisplayText = "Downloading...";
FormP.NumberFormat = "F";
FormP.NumberMultiplication = 1;
FormP.MaxVal = 100; //Doesn't matter what this value is as long as it is greater than 0
FormP.TickMS = 1000;
OpenDentalCloud.Core.TaskStateDownload state = CloudStorage.DownloadAsync(
ImageStore.GetPatientFolder(Patients.GetPat(_medLabCur.PatNum), ImageStore.GetPreferredAtoZpath())
, docc.FileName
, new OpenDentalCloud.ProgressHandler(FormP.OnProgress));
if (FormP.ShowDialog() == DialogResult.Cancel)
{
state.DoCancel = true;
return;
}
filePathAndName = PrefC.GetRandomTempFile(Path.GetExtension(docc.FileName));
File.WriteAllBytes(filePathAndName, state.FileContent);
}
Cursor = Cursors.Default;
if (filePathAndName != "")
{
Process.Start(filePathAndName);
}
SecurityLogs.MakeLogEntry(Permissions.SheetEdit, sheet.PatNum, sheet.Description + " from " + sheet.DateTimeSheet.ToShortDateString() + " pdf was created");
DialogResult = DialogResult.OK;
}
