protected void btnPrint_Click(object sender, EventArgs e)
{
try
{
decimal smsBalance = SMSCreditDataDB.GetTotal() - SMSHistoryDataDB.GetTotal();
decimal smsCost = Convert.ToDecimal(SystemVariableDB.GetByDescr("SMSPrice").Value);
int maxSMSCountCanAfford = smsCost == 0 ? 1000000 : (int)(smsBalance / smsCost);
int smsCountSending = 0;
//
// Start Validation
//
txtEmailSubject.Text = txtEmailSubject.Text.Trim();
txtEmailForPrinting.Text = txtEmailForPrinting.Text.Trim();
txtSMSText.Text = txtSMSText.Text.Trim();
bool printSelected = (ddlBothMobileAndEmail.SelectedValue == "1" || ddlEmailNoMobile.SelectedValue == "1" ||
ddlMobileNoEmail.SelectedValue == "1" || ddlNeitherMobileOrEmail.SelectedValue == "1");
bool emailSelected = (ddlBothMobileAndEmail.SelectedValue == "2" || ddlEmailNoMobile.SelectedValue == "2" ||
ddlMobileNoEmail.SelectedValue == "2" || ddlNeitherMobileOrEmail.SelectedValue == "2");
bool smsSelected = (ddlBothMobileAndEmail.SelectedValue == "3" || ddlEmailNoMobile.SelectedValue == "3" ||
ddlMobileNoEmail.SelectedValue == "3" || ddlNeitherMobileOrEmail.SelectedValue == "3");
string validationErrors = string.Empty;
if (printSelected)
{
if (txtEmailForPrinting.Text.Length == 0)
{
validationErrors += "<li>Printed Batch Letters Email Address To Send To can not be empty.</li>";
}
else if (!Utilities.IsValidEmailAddress(txtEmailForPrinting.Text))
{
validationErrors += "<li>Printed Batch Letters Email Address To Send To must look like a valid email address.</li>";
}
}
if (emailSelected)
{
if (txtEmailSubject.Text.Length == 0)
{
validationErrors += "<li>Email Subject can not be empty.</li>";
}
if (FreeTextBox1.Text.Length == 0)
{
validationErrors += "<li>Email Text can not be empty.</li>";
}
}
if (smsSelected)
{
if (smsCost > 0 && smsBalance == 0)
{
validationErrors += "<li>Can not send SMS's - your SMS balance is empty. Please topup or unselect sending by SMS.</li>";
}
else if (txtSMSText.Text.Length == 0)
{
validationErrors += "<li>SMS Text can not be empty.</li>";
}
}
if (validationErrors.Length > 0)
{
throw new CustomMessageException("<ul>" + validationErrors + "</ul>");
}
//
// End Validation
//
//
// get hashtables of those with mobiles and emails
//
ArrayList regRefIDsArr = new ArrayList();
foreach (ListItem referrerItem in lstReferrers.Items) // regrefid
{
if (referrerItem.Selected)
{
regRefIDsArr.Add(Convert.ToInt32(referrerItem.Value));
}
}
int[] regRefIDs = (int[])regRefIDsArr.ToArray(typeof(int));
int[] entityIDs = RegisterReferrerDB.GetOrgEntityIDs(regRefIDs);
Hashtable entityIDHash = RegisterReferrerDB.GetOrgEntityIDsHash(regRefIDs);
Hashtable regRefIDHash = RegisterReferrerDB.GetByIDsInHashtable(regRefIDs);
Hashtable emailHash = PatientsContactCacheDB.GetBullkEmail(entityIDs, -1);
Hashtable mobileHash = PatientsContactCacheDB.GetBullkPhoneNumbers(entityIDs, -1, "30");
string email_from_address = ((SystemVariables)System.Web.HttpContext.Current.Session["SystemVariables"])["Email_FromEmail"].Value;
string email_from_name = ((SystemVariables)System.Web.HttpContext.Current.Session["SystemVariables"])["Email_FromName"].Value;
//bool StoreLettersHistoryInDB = Convert.ToBoolean(System.Configuration.ConfigurationManager.AppSettings["StoreLettersHistoryInDB"]);
//bool StoreLettersHistoryInFlatFile = Convert.ToBoolean(System.Configuration.ConfigurationManager.AppSettings["StoreLettersHistoryInFlatFile"]);
bool StoreLettersHistoryInDB = false; // don't store bulk marketing letters
bool StoreLettersHistoryInFlatFile = false; // don't store bulk marketing letters
//
// ok start the sending process
//
int bulkLetterSendingQueueBatchID = UseBulkLetterSender ? BulkLetterSendingQueueBatchDB.Insert(txtEmailForPrinting.Text, false) : -1;
// TODO: Send Letter By Email
int letterPrintHistorySendMethodID = 1; // send by mail
// make sure at least one referrer selected
if (lstReferrers.GetSelectedIndices().Length == 0)
{
throw new CustomMessageException("Please select at least one referrer.");
}
// make sure at least one letter selected
if (lstLetters.GetSelectedIndices().Length == 0)
{
throw new CustomMessageException("Please select a letter.");
}
// get letter and make sure it exists
Letter letter = LetterDB.GetByID(Convert.ToInt32(lstLetters.SelectedValue));
string sourchTemplatePath = letter.GetFullPath(Convert.ToInt32(Session["SiteID"]));
if (!File.Exists(sourchTemplatePath))
{
throw new CustomMessageException("File doesn't exist.");
}
// get temp directory
string tmpLettersDirectory = Letter.GetTempLettersDirectory();
if (!Directory.Exists(tmpLettersDirectory))
{
throw new CustomMessageException("Temp letters directory doesn't exist");
}
// delete old tmp files
FileHelper.DeleteOldFiles(tmpLettersDirectory, new TimeSpan(1, 0, 0));
// create individual merged docs and put into list of docsToMerge - only if there is an org-patient relationship
ArrayList docsToMerge = new ArrayList();
Site site = SiteDB.GetByID(Convert.ToInt32(Session["SiteID"]));
int StaffID = Convert.ToInt32(Session["StaffID"]);
foreach (ListItem referrerItem in lstReferrers.Items)
{
if (!referrerItem.Selected)
{
continue;
}
if (UseBulkLetterSender)
{
int refEntityID = (int)entityIDHash[Convert.ToInt32(referrerItem.Value)];
string refPhoneNumber = GetPhoneNbr(mobileHash, refEntityID, true);
string refEmail = GetEmail(emailHash, refEntityID);
SendMethod sendMethod = GetSendMethod(refEmail != null, refPhoneNumber != null);
RegisterReferrer regRef = RegisterReferrerDB.GetByID(Convert.ToInt32(referrerItem.Value));
if (sendMethod != SendMethod.None)
{
string text = string.Empty;
if (sendMethod == SendMethod.SMS)
{
text = txtSMSText.Text;
}
if (sendMethod == SendMethod.Email)
{
text = FreeTextBox1.Text;
}
text = ReplaceMergeFields(text, regRefIDHash, Convert.ToInt32(referrerItem.Value));
bool generateLetter = false;
if (sendMethod == SendMethod.SMS)
{
generateLetter = false;
}
if (sendMethod == SendMethod.Email)
{
generateLetter = lstLetters.GetSelectedIndices().Length != 0;
}
if (sendMethod == SendMethod.Print)
{
generateLetter = true;
}
if (sendMethod == SendMethod.SMS) // copy to other methods!!
{
smsCountSending++;
}
BulkLetterSendingQueueDB.Insert
(
bulkLetterSendingQueueBatchID,
(int)sendMethod, // bulk_letter_sending_queue_method_id
StaffID, // added_by
-1, // patient_id
regRef.Referrer.ReferrerID, // referrer_id
-1, // booking_id
(sendMethod == SendMethod.SMS) ? refPhoneNumber : "", // phone_number
(sendMethod == SendMethod.Email) ? refEmail : "", // email_to_address
"", // email_to_name
(sendMethod == SendMethod.Email) ? email_from_address : "", // email_from_address
(sendMethod == SendMethod.Email) ? email_from_name : "", // email_from_name
text, // text
(sendMethod == SendMethod.Email) ? txtEmailSubject.Text : "", // email_subject
"", // email_attachment_location
false, // email_attachment_delete_after_sending
false, // email_attachment_folder_delete_after_sending
!generateLetter ? -1 : letter.LetterID,
!generateLetter ? false : chkKeepInHistory.Checked && StoreLettersHistoryInDB,
!generateLetter ? false : chkKeepInHistory.Checked && StoreLettersHistoryInFlatFile,
!generateLetter ? -1 : letterPrintHistorySendMethodID,
!generateLetter ? "" : Letter.GetLettersHistoryDirectory(0),
!generateLetter ? "" : letter.Docname.Replace(".dot", ".doc"),
!generateLetter ? -1 : site.SiteID,
0, // organisation_id
-1, // booking id
-1, // patient_id
!generateLetter ? -1 : Convert.ToInt32(referrerItem.Value), // register_referrer_id_to_use_instead_of_patients_reg_ref
!generateLetter ? -1 : StaffID,
-1, //healthcardactionid
!generateLetter ? "" : sourchTemplatePath,
!generateLetter ? "" : tmpLettersDirectory + letter.Docname.Replace(".dot", ".doc"),
!generateLetter ? false : true,
"", // email_letter_extra_pages
"", // email_letter_item_seperator
"", // sql_to_run_on_completion
"" // sql_to_run_on_failure
);
}
}
else
{
// create doc
string tmpSingleFileName = Letter.CreateMergedDocument(
letter.LetterID,
chkKeepInHistory.Checked && StoreLettersHistoryInDB,
chkKeepInHistory.Checked && StoreLettersHistoryInFlatFile,
letterPrintHistorySendMethodID,
Letter.GetLettersHistoryDirectory(0),
letter.Docname.Replace(".dot", ".doc"),
site,
0, // org id
-1, // booking id
-1, // patient id
Convert.ToInt32(referrerItem.Value),
StaffID,
-1, //healthcardactionid
sourchTemplatePath,
tmpLettersDirectory + letter.Docname.Replace(".dot", ".doc"),
true);
// record name of merged doc
docsToMerge.Add(tmpSingleFileName);
}
}
if (UseBulkLetterSender)
{
if ((smsCountSending * smsCost) > smsBalance)
{
BulkLetterSendingQueueDB.DeleteByBatchID(bulkLetterSendingQueueBatchID);
BulkLetterSendingQueueBatchDB.Delete(bulkLetterSendingQueueBatchID);
SetErrorMessage("Not Enough Credit To Send SMS's. Please Top Up You SMS Credit or Choose Methods Other Than SMS.");
return;
}
BulkLetterSendingQueueBatchDB.UpdateReadyToProcess(bulkLetterSendingQueueBatchID, true);
SetErrorMessage("Items Added To Sending Queue. View Details <a href='/Letters_PrintBatch_StatusV2.aspx?batch_id=" + bulkLetterSendingQueueBatchID + "'>Here</a>");
}
else
{
// merge all tmp files
string tmpFinalFileName = Letter.MergeMultipleDocuments(
((string[])docsToMerge.ToArray(typeof(string))),
tmpLettersDirectory + letter.Docname.Replace(".dot", ".doc"));
// delete all single tmp files
foreach (string file in docsToMerge)
{
File.Delete(file);
}
// download the document
byte[] fileContents = File.ReadAllBytes(tmpFinalFileName);
System.IO.File.Delete(tmpFinalFileName);
// Nothing gets past the "DownloadDocument" method because it outputs the file
// which is writing a response to the client browser and calls Response.End()
// So make sure any other code that functions goes before this
Letter.DownloadDocument(Response, fileContents, letter.Docname.Replace(".dot", ".doc"));
}
}
catch (CustomMessageException cmEx)
{
SetErrorMessage(cmEx.Message);
return;
}
}
protected Letter.FileContents[] ProcessReferrersLetters(bool viewListOnly, ArrayList bookingsForCurrentReferrer, bool autoSendFaxesAsEmailsIfNoEmailExistsToGPs, ref string debugOutput, int bulkLetterSendingQueueBatchID)
{
if (bookingsForCurrentReferrer.Count == 0)
{
return(new Letter.FileContents[0]);
}
// to return - only files to print, as emailing will have been completed
ArrayList filesToPrint = new ArrayList();
// single db lookup per referrer to get email
Tuple <Booking, PatientReferrer, bool, bool, HealthCard> firstTuple = (Tuple <Booking, PatientReferrer, bool, bool, HealthCard>)bookingsForCurrentReferrer[0];
PatientReferrer firstPR = firstTuple.Item2;
int s = firstPR.RegisterReferrer.RegisterReferrerID;
string[] refEmails = ContactDB.GetEmailsByEntityID(firstPR.RegisterReferrer.Organisation.EntityID);
string[] refFaxes = ContactDB.GetFaxesByEntityID(firstPR.RegisterReferrer.Organisation.EntityID);
bool firstRefHasEmail = refEmails.Length > 0;
string refEmail = refEmails.Length > 0 ? string.Join(",", refEmails) : null;
bool firstRefHasFax = refFaxes.Length > 0;
string refFax = refFaxes.Length > 0 ? refFaxes[0] : null;
int siteID = Convert.ToInt32(Session["SiteID"]);
Site site = SiteDB.GetByID(siteID);
int staffID = Convert.ToInt32(Session["StaffID"]);
Site[] sites = SiteDB.GetAll();
for (int i = 0; i < bookingsForCurrentReferrer.Count; i++)
{
Tuple <Booking, PatientReferrer, bool, bool, HealthCard> curTuple = (Tuple <Booking, PatientReferrer, bool, bool, HealthCard>)bookingsForCurrentReferrer[i];
Booking curBooking = curTuple.Item1;
PatientReferrer curPR = curTuple.Item2;
bool curRefHasEmail = curTuple.Item3;
bool curRefHasFax = curTuple.Item4;
HealthCard curHC = curTuple.Item5;
bool needToGenerateLetters = curBooking.NeedToGenerateFirstLetter || curBooking.NeedToGenerateLastLetter ||
(curPR.RegisterReferrer.ReportEveryVisitToReferrer && curBooking.NoteCount > 0);
if (needToGenerateLetters)
{
SendMethod sendMethod = (curRefHasEmail && this.SelectedSendMethod == SendMethod.Email ? SendMethod.Email : SendMethod.Print);
if (!viewListOnly)
{
bool sendViaEmail = autoSendFaxesAsEmailsIfNoEmailExistsToGPs ? (curRefHasEmail || curRefHasFax) : curRefHasEmail;
if (sendViaEmail && this.SelectedSendMethod == SendMethod.Email)
{
string toEmail = autoSendFaxesAsEmailsIfNoEmailExistsToGPs ?
(curRefHasEmail ? refEmail : Regex.Replace(refFax, "[^0-9]", "") + "@fax.houseofit.com.au")
:
refEmail;
if (UseBulkLetterSender)
{
BulkLetterSendingQueueAdditionalLetter[] filesList = GetFilesInfo(curBooking, Letter.FileFormat.PDF, curBooking.Patient, curHC, curBooking.Offering.Field.ID, curPR.RegisterReferrer.Referrer, false, curBooking.NeedToGenerateFirstLetter, curBooking.NeedToGenerateLastLetter, curPR.RegisterReferrer.ReportEveryVisitToReferrer, siteID, staffID, sendMethod == SendMethod.Email ? 2 : 1);
if (filesList != null && filesList.Length > 0)
{
string from_email = ((SystemVariables)System.Web.HttpContext.Current.Session["SystemVariables"])["Email_FromEmail"].Value;
string subject = "Referral/Treatment Note Letters From Mediclinic" + (curPR.Patient == null ? string.Empty : " For " + curPR.Patient.Person.FullnameWithoutMiddlename);
string text = "Dr. " + curPR.RegisterReferrer.Referrer.Person.FullnameWithoutMiddlename + "<br /><br />Please find attached referral/treatment note letters for your referrered patient" + (curPR.Patient == null ? string.Empty : " <b>" + curPR.Patient.Person.FullnameWithoutMiddlename + "</b>") + "<br /><br />Best regards,<br />" + site.Name;
int bulk_letter_sending_queue_id = BulkLetterSendingQueueDB.Insert
(
bulkLetterSendingQueueBatchID,
2, // bulk_letter_sending_queue_method_id (2 = email)
staffID, // added_by
curPR.Patient.PatientID, // patient_id
curPR.RegisterReferrer.Referrer.ReferrerID, // referrer_id
curBooking.BookingID, // booking_id
"", // phone_number
toEmail, // email_to_address
"", // email_to_name
from_email, // email_from_address
site.Name, // email_from_name
text, // text
subject, // email_subject
"", // email_attachment_location
false, // email_attachment_delete_after_sending
false, // email_attachment_folder_delete_after_sending
filesList[0].EmailLetterLetterID,
filesList[0].EmailLetterKeepHistoryInDb,
filesList[0].EmailLetterKeepHistoryInFile,
filesList[0].EmailLetterLetterPrintHistorySendMethodID,
filesList[0].EmailLetterHistoryDir,
filesList[0].EmailLetterHistoryFilename,
filesList[0].EmailLetterSiteID,
filesList[0].EmailLetterOrganisationID,
filesList[0].EmailLetterBookingID,
filesList[0].EmailLetterPatientID,
filesList[0].EmailLetterRegisterReferrerIdToUseInsteadOfPatientsRegRef,
filesList[0].EmailLetterStaffID,
filesList[0].EmailLetterHealthCardActionID,
filesList[0].EmailLetterSourceTemplatePath,
filesList[0].EmailLetterOutputDocPath,
false, // filesList[0].EmailLetterIsDoubleSidedPrinting,
filesList[0].EmailLetterExtraPages,
filesList[0].EmailLetterItemSeperator,
"", // sql_to_run_on_completion
"" // sql_to_run_on_failure
);
for (int f = 1; f < filesList.Length; f++)
{
BulkLetterSendingQueueAdditionalLetterDB.Insert(
bulk_letter_sending_queue_id,
filesList[f].EmailLetterLetterID,
filesList[f].EmailLetterKeepHistoryInDb,
filesList[f].EmailLetterKeepHistoryInFile,
filesList[f].EmailLetterLetterPrintHistorySendMethodID,
filesList[f].EmailLetterHistoryDir,
filesList[f].EmailLetterHistoryFilename,
filesList[f].EmailLetterSiteID,
filesList[f].EmailLetterOrganisationID,
filesList[f].EmailLetterBookingID,
filesList[f].EmailLetterPatientID,
filesList[f].EmailLetterRegisterReferrerIdToUseInsteadOfPatientsRegRef,
filesList[f].EmailLetterStaffID,
filesList[f].EmailLetterHealthCardActionID,
filesList[f].EmailLetterSourceTemplatePath,
filesList[f].EmailLetterOutputDocPath,
false, // filesList[f].EmailLetterIsDoubleSidedPrinting,
filesList[f].EmailLetterExtraPages,
filesList[f].EmailLetterItemSeperator);
}
}
}
else
{
Letter.FileContents[] fileContentsList = curBooking.GetSystemLettersList(Letter.FileFormat.PDF, curBooking.Patient, curHC, curBooking.Offering.Field.ID, curPR.RegisterReferrer.Referrer, false, curBooking.NeedToGenerateFirstLetter, curBooking.NeedToGenerateLastLetter, curPR.RegisterReferrer.ReportEveryVisitToReferrer, false, Convert.ToInt32(Session["SiteID"]), Convert.ToInt32(Session["StaffID"]), sendMethod == SendMethod.Email ? 2 : 1);
if (fileContentsList != null && fileContentsList.Length > 0)
{
//Logger.LogQuery("ReferrerEPCLetters_Reprint -- Email Send Item Starting!");
Site bkSite = SiteDB.GetSiteByType(curBooking.Organisation.IsAgedCare ? SiteDB.SiteType.AgedCare : SiteDB.SiteType.Clinic, sites);
Letter.EmailSystemLetter(bkSite.Name, toEmail, fileContentsList);
//Logger.LogQuery("ReferrerEPCLetters_Reprint -- Email Send Item Done!");
}
}
}
else
{
Letter.FileContents[] fileContentsList = curBooking.GetSystemLettersList(Letter.FileFormat.Word, curBooking.Patient, curHC, curBooking.Offering.Field.ID, curPR.RegisterReferrer.Referrer, false, curBooking.NeedToGenerateFirstLetter, curBooking.NeedToGenerateLastLetter, curPR.RegisterReferrer.ReportEveryVisitToReferrer, false, Convert.ToInt32(Session["SiteID"]), Convert.ToInt32(Session["StaffID"]), sendMethod == SendMethod.Email ? 2 : 1);
if (fileContentsList != null && fileContentsList.Length > 0)
{
filesToPrint.AddRange(fileContentsList);
}
}
BookingDB.UpdateSetGeneratedSystemLetters(curBooking.BookingID, curBooking.NeedToGenerateFirstLetter, curBooking.NeedToGenerateLastLetter, true);
}
ArrayList toGenerateList = new ArrayList();
if (curBooking.NeedToGenerateFirstLetter)
{
toGenerateList.Add("First");
}
if (curBooking.NeedToGenerateLastLetter)
{
toGenerateList.Add("Last");
}
if (curPR.RegisterReferrer.ReportEveryVisitToReferrer && curBooking.NoteCount > 0)
{
toGenerateList.Add("Notes");
}
string toGenerate = string.Join(",", (string[])toGenerateList.ToArray(typeof(string)));
debugOutput += @"<tr>
<td>" + sendMethod + @"</td>
<td style=""white-space:nowrap;"">" + curBooking.BookingID + " [" + curBooking.DateStart.ToString("dd-MM-yyyy") + " " + curBooking.DateStart.ToString("HH:mm") + "-" + curBooking.DateEnd.ToString("HH:mm") + "]" + @"</td>
<td>" + toGenerate + @"</td>
<td>" + curPR.RegisterReferrer.Referrer.Person.FullnameWithoutMiddlename + @"</td>
<td style=""white-space:nowrap;"">" + (curRefHasEmail ? refEmail : "") + @"</td>
<td style=""white-space:nowrap;"">" + (curRefHasFax ? refFax : "") + @"</td>
<td>" + curPR.Patient.Person.FullnameWithoutMiddlename + @"</td>
</tr>";
}
}
return((Letter.FileContents[])filesToPrint.ToArray(typeof(Letter.FileContents)));
}