private void butUnearnedAcctOk_Click(object sender, EventArgs e)
{
if (PrefC.HasClinicsEnabled)
{
if (!checkUnearnedAcctAllClins.Checked && listUnearnedAcctClins.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one clinic must be selected.");
return;
}
}
List <long> listClinicNums = new List <long>(); //stores clinicNums of the selected indices
listClinicNums.AddRange(listUnearnedAcctClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.ClinicNum)); //empty if "All" is checked.
ReportComplex report = new ReportComplex(true, false);
DataTable table = RpUnearnedIncome.GetUnearnedAccountData(listClinicNums);
report.ReportName = "Unearned Accounts Report";
report.AddTitle("Title", "Unearned Accounts");
report.AddSubTitle("Practice Title", PrefC.GetString(PrefName.PracticeTitle));
if (PrefC.HasClinicsEnabled) //show sub titles if clinics are enabled.
{
if (checkUnearnedAcctAllClins.Checked)
{
report.AddSubTitle("Clinics", Lan.g(this, "All Clinics"));
}
else
{
string clinNames = string.Join(",", listUnearnedAcctClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.Abbr));
report.AddSubTitle("Clinics", clinNames);
}
}
QueryObject query;
if (PrefC.HasClinicsEnabled)
{
query = report.AddQuery(table, "", "", SplitByKind.None, 1, true);
query.AddColumn("Guarantor", 280, FieldValueType.String);
query.AddColumn("Type", 120, FieldValueType.String);
query.AddColumn("Clinic", 80, FieldValueType.String);
query.AddColumn("Amount", 100, FieldValueType.Number);
}
else
{
query = report.AddQuery(table, "", "", SplitByKind.None, 1, true);
query.AddColumn("Guarantor", 360, FieldValueType.String);
query.AddColumn("Type", 120, FieldValueType.String);
query.AddColumn("Amount", 100, FieldValueType.Number);
}
report.AddPageNum();
report.AddGridLines();
if (!report.SubmitQueries())
{
return;
}
//Display report
FormReportComplex FormRC = new FormReportComplex(report);
FormRC.ShowDialog();
DialogResult = DialogResult.OK;
}
private void butNetUnearnedOK_Click(object sender, EventArgs e)
{
if (PrefC.HasClinicsEnabled)
{
if (!checkNetUnearnedAllClins.Checked && listNetUnearnedClins.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one clinic must be selected.");
return;
}
}
if (!checkNetUnearnedAllProvs.Checked && listNetUnearnedProvs.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one provider must be selected.");
return;
}
if (!checkNetUnearnedAllTypes.Checked && listNetUnearnedTypes.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one unearned type must be selected.");
return;
}
List <long> listClinicNums = listNetUnearnedClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.ClinicNum).ToList();
List <long> listProvNums = listNetUnearnedProvs.SelectedItems.OfType <ODBoxItem <Provider> >().Select(x => x.Tag.ProvNum).ToList();
List <long> listUnearnedTypeNums = listNetUnearnedTypes.SelectedItems.OfType <ODBoxItem <Def> >().Select(x => x.Tag.DefNum).ToList();
ReportComplex report = new ReportComplex(true, false);
DataTable table = RpUnearnedIncome.GetNetUnearnedData(listClinicNums, listProvNums, listUnearnedTypeNums, checkNetUnearnedExcludeZero.Checked);
report.ReportName = "Net Unearned Income Report";
QueryObject query = report.AddQuery(table, "", "", SplitByKind.None, 1, true);
query.AddColumn("Patient", 170, FieldValueType.String);
query.AddColumn("Guarantor", 170, FieldValueType.String);
query.AddColumn("Unearned Amt", 100, FieldValueType.Number);
query.AddColumn("Fam Bal", 100, FieldValueType.String);
report.AddTitle("Title", "Net Unearned Income");
report.AddSubTitle("Practice Title", PrefC.GetString(PrefName.PracticeTitle));
if (checkNetUnearnedAllTypes.Checked)
{
report.AddSubTitle("UnearnedTypes", "All Unearned Types");
}
else
{
string unearnedTypes = string.Join(", ", listNetUnearnedTypes.SelectedItems.OfType <ODBoxItem <Def> >().Select(x => x.Tag.ItemName));
report.AddSubTitle("UnearnedTypes", unearnedTypes);
}
if (checkNetUnearnedAllProvs.Checked)
{
report.AddSubTitle("Provs", Lan.g(this, "All Providers"));
}
else
{
string provNames = string.Join(", ", listNetUnearnedProvs.SelectedItems.OfType <ODBoxItem <Provider> >().Select(x => x.Tag.Abbr));
report.AddSubTitle("ProvNames", provNames);
}
if (PrefC.HasClinicsEnabled) //show sub titles if clinics are enabled.
{
if (checkNetUnearnedAllClins.Checked)
{
report.AddSubTitle("Clinics", Lan.g(this, "All Clinics"));
}
else
{
string clinNames = string.Join(", ", listNetUnearnedClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.Abbr));
report.AddSubTitle("Clinics", clinNames);
}
}
report.AddPageNum();
report.AddGridLines();
if (!report.SubmitQueries())
{
return;
}
//Display report
FormReportComplex FormRC = new FormReportComplex(report);
FormRC.ShowDialog();
DialogResult = DialogResult.OK;
}
private void butLineItemOK_Click(object sender, EventArgs e)
{
if (dateLineItemTo.SelectionStart < dateLineItemFrom.SelectionStart)
{
MsgBox.Show(this, "End date cannot be before start date.");
return;
}
if (PrefC.HasClinicsEnabled)
{
if (!checkLineItemAllClins.Checked && listLineItemClins.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one clinic must be selected.");
return;
}
}
List <long> listClinicNums = new List <long>(); //stores clinicNums of the selected indices
listClinicNums.AddRange(listLineItemClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.ClinicNum)); //empty if "All" is checked.
ReportComplex report = new ReportComplex(true, false);
DataTable table = RpUnearnedIncome.GetLineItemUnearnedData(listClinicNums, dateLineItemFrom.SelectionStart, dateLineItemTo.SelectionStart);
report.ReportName = "Line Item Unearned Income Report";
report.AddTitle("Title", "Line Item Unearned Income Activity");
report.AddSubTitle("Practice Title", PrefC.GetString(PrefName.PracticeTitle));
string dateRange = dateLineItemFrom.SelectionStart.ToShortDateString() + " - " + dateLineItemTo.SelectionStart.ToShortDateString();
report.AddSubTitle("Date", dateRange);
if (PrefC.HasClinicsEnabled) //show sub titles if clinics are enabled.
{
if (checkLineItemAllClins.Checked)
{
report.AddSubTitle("Clinics", Lan.g(this, "All Clinics"));
}
else
{
string clinNames = string.Join(",", listLineItemClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.Abbr));
report.AddSubTitle("Clinics", clinNames);
}
}
QueryObject query;
if (PrefC.HasClinicsEnabled)
{
query = report.AddQuery(table, "", "", SplitByKind.None, 1, true);
query.AddColumn("Date", 100, FieldValueType.Date);
query.AddColumn("Patient", 180, FieldValueType.String);
query.AddColumn("Type", 120, FieldValueType.String);
query.AddColumn("Clinic", 80, FieldValueType.String);
query.AddColumn("Amount", 100, FieldValueType.Number);
}
else
{
query = report.AddQuery(table, "", "", SplitByKind.None, 1, true);
query.AddColumn("Date", 100, FieldValueType.String);
query.AddColumn("Patient", 260, FieldValueType.String);
query.AddColumn("Type", 120, FieldValueType.String);
query.AddColumn("Amount", 100, FieldValueType.Number);
}
report.AddPageNum();
report.AddGridLines();
if (!report.SubmitQueries())
{
return;
}
//Display report
FormReportComplex FormRC = new FormReportComplex(report);
FormRC.ShowDialog();
DialogResult = DialogResult.OK;
}
private void butUnearnedAllocationOK_Click(object sender, EventArgs e)
{
if (PrefC.HasClinicsEnabled)
{
if (!checkUnearnedAllocationAllClins.Checked && listUnearnedAllocationClins.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one clinic must be selected.");
return;
}
}
if (!checkUnearnedAllocationAllProvs.Checked && listUnearnedAllocationProvs.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one provider must be selected.");
return;
}
if (!checkUnearnedAllocationAllTypes.Checked && listUnearnedAllocationTypes.SelectedIndices.Count == 0)
{
MsgBox.Show(this, "At least one unearned type must be selected.");
return;
}
List <long> listClinicNums = listUnearnedAllocationClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.ClinicNum).ToList();
List <long> listProvNums = listUnearnedAllocationProvs.SelectedItems.OfType <ODBoxItem <Provider> >().Select(x => x.Tag.ProvNum).ToList();
List <long> listUnearnedTypeNums = listUnearnedAllocationTypes.SelectedItems.OfType <ODBoxItem <Def> >().Select(x => x.Tag.DefNum).ToList();
ReportComplex report = new ReportComplex(true, true);
DataTable table = RpUnearnedIncome.GetUnearnedAllocationData(listClinicNums, listProvNums, listUnearnedTypeNums,
checkUnearnedAllocationExcludeZero.Checked, checkUnearnedAllocationShowProv.Checked);
report.ReportName = "Unearned Allocation Report";
QueryObject query = report.AddQuery(table, "Unearned Allocation Report");
query.AddColumn("Guar", 150, FieldValueType.String);
query.GetColumnDetail("Guar").Font = new Font(query.GetColumnDetail("Guar").Font, FontStyle.Bold);
query.AddColumn("FamBal", 100, FieldValueType.String);
query.GetColumnDetail("FamBal").Font = new Font(query.GetColumnDetail("FamBal").Font, FontStyle.Bold);
query.AddColumn("FamUnearned", 100, FieldValueType.String);
query.GetColumnDetail("FamUnearned").Font = new Font(query.GetColumnDetail("FamUnearned").Font, FontStyle.Bold);
query.AddColumn("FamRemAmt", 100, FieldValueType.String);
query.GetColumnDetail("FamRemAmt").Font = new Font(query.GetColumnDetail("FamRemAmt").Font, FontStyle.Bold);
if (checkUnearnedAllocationShowProv.Checked)
{
query.AddColumn("Prov", 50, FieldValueType.String);
query.GetColumnDetail("Prov").Font = new Font(query.GetColumnDetail("Prov").Font, FontStyle.Bold);
}
query.AddColumn("Pat", 150, FieldValueType.String);
query.AddColumn("Code", 50, FieldValueType.String);
query.AddColumn("Date", 80, FieldValueType.String);
query.AddColumn("Fee", 100, FieldValueType.String);
query.AddColumn("RemAmt", 100, FieldValueType.String);
report.AddTitle("Title", "Unearned Allocation Report");
report.AddSubTitle("Practice Title", PrefC.GetString(PrefName.PracticeTitle));
if (checkUnearnedAllocationAllTypes.Checked)
{
report.AddSubTitle("UnearnedTypes", "All Unearned Types");
}
else
{
string unearnedTypes = string.Join(", ", listUnearnedAllocationTypes.SelectedItems.OfType <ODBoxItem <Def> >().Select(x => x.Tag.ItemName));
report.AddSubTitle("UnearnedTypes", unearnedTypes);
}
if (checkUnearnedAllocationAllProvs.Checked)
{
report.AddSubTitle("Provs", Lan.g(this, "All Providers"));
}
else
{
string provNames = string.Join(", ", listUnearnedAllocationProvs.SelectedItems.OfType <ODBoxItem <Provider> >().Select(x => x.Tag.Abbr));
report.AddSubTitle("ProvNames", provNames);
}
if (PrefC.HasClinicsEnabled) //show sub titles if clinics are enabled.
{
if (checkUnearnedAllocationAllClins.Checked)
{
report.AddSubTitle("Clinics", Lan.g(this, "All Clinics"));
}
else
{
string clinNames = string.Join(", ", listUnearnedAllocationClins.SelectedItems.OfType <ODBoxItem <Clinic> >().Select(x => x.Tag.Abbr));
report.AddSubTitle("Clinics", clinNames);
}
}
report.AddPageNum();
report.AddGridLines();
if (!report.SubmitQueries())
{
return;
}
//Display report
FormReportComplex FormRC = new FormReportComplex(report);
FormRC.ShowDialog();
DialogResult = DialogResult.OK;
}
