///<summary></summary>
public static void Reformat()
{
string oldTel;
string newTel;
string idNum;
Queries.CurReport.Query = "select * from patient";
Queries.SubmitCur();
for (int i = 0; i < Queries.TableQ.Rows.Count; i++)
{
idNum = PIn.PString(Queries.TableQ.Rows[i][0].ToString());
//home
oldTel = PIn.PString(Queries.TableQ.Rows[i][15].ToString());
newTel = TelephoneNumbers.ReFormat(oldTel);
if (oldTel != newTel)
{
Queries.CurReport.Query = "UPDATE patient SET hmphone = '"
+ POut.PString(newTel) + "' WHERE patNum = '" + idNum + "'";
Queries.SubmitNonQ();
}
//wk:
oldTel = PIn.PString(Queries.TableQ.Rows[i][16].ToString());
newTel = TelephoneNumbers.ReFormat(oldTel);
if (oldTel != newTel)
{
Queries.CurReport.Query = "UPDATE patient SET wkphone = '"
+ POut.PString(newTel) + "' WHERE patNum = '" + idNum + "'";
Queries.SubmitNonQ();
}
//wireless
oldTel = PIn.PString(Queries.TableQ.Rows[i][17].ToString());
newTel = TelephoneNumbers.ReFormat(oldTel);
if (oldTel != newTel) // Keyush Shah 04/21/04 Bug, was overwriting wireless with work phone here
{
Queries.CurReport.Query = "UPDATE patient SET wirelessphone = '"
+ POut.PString(newTel) + "' WHERE patNum = '" + idNum + "'";
Queries.SubmitNonQ();
}
}
Queries.CurReport.Query = "select * from carrier";
Queries.SubmitCur();
for (int i = 0; i < Queries.TableQ.Rows.Count; i++)
{
idNum = PIn.PString(Queries.TableQ.Rows[i][0].ToString());
//ph
oldTel = PIn.PString(Queries.TableQ.Rows[i][7].ToString());
newTel = TelephoneNumbers.ReFormat(oldTel);
if (oldTel != newTel)
{
Queries.CurReport.Query = "UPDATE carrier SET Phone = '"
+ POut.PString(newTel) + "' WHERE CarrierNum = '" + idNum + "'";
Queries.SubmitNonQ();
}
}
//this last part will only be run once during conversion to 2.8. It can be dropped from a future version.
/*Queries.CurReport.Query="select * from insplan";
* Queries.SubmitCur();
* for(int i=0;i<Queries.TableQ.Rows.Count;i++){
* idNum=PIn.PString(Queries.TableQ.Rows[i][0].ToString());
* //ph
* oldTel=PIn.PString(Queries.TableQ.Rows[i][5].ToString());
* newTel=TelephoneNumbers.ReFormat(oldTel);
* if(oldTel!=newTel){
* Queries.CurReport.Query="UPDATE insplan SET Phone = '"
+newTel+"' WHERE PlanNum = '"+idNum+"'";
* Queries.SubmitNonQ();
* }
* }*/
} //reformat
private void butOK_Click(object sender, System.EventArgs e)
{
Queries.CurReport = new ReportOld();
// replaced insplan.carrier by carrier.carrierName, SPK 7/15/04
Queries.CurReport.Query = "SELECT claim.dateservice,claim.claimnum,claim.claimtype,claim.claimstatus,"
+ "CONCAT(CONCAT(CONCAT(CONCAT(patient.LName,', '),patient.FName),' '),patient.MiddleI),carrier.CarrierName,claim.claimfee "
+ "FROM patient,claim,insplan,carrier "
+ "WHERE patient.patnum=claim.patnum AND insplan.plannum=claim.plannum "
+ "AND insplan.CarrierNum=carrier.CarrierNum " // added SPK
+ "AND (claim.claimstatus = 'U' OR claim.claimstatus = 'H' OR claim.claimstatus = 'W')";
if (radioRange.Checked == true) // added 'W', SPK 7/15/04
{
Queries.CurReport.Query
+= " AND claim.dateservice >= '" + date1.SelectionStart.ToString("yyyy-MM-dd") + "' "
+ "AND claim.dateservice <= '" + date2.SelectionStart.ToString("yyyy-MM-dd") + "'";
}
else
{
Queries.CurReport.Query
+= " AND claim.dateservice = '" + date1.SelectionStart.ToString("yyyy-MM-dd") + "'";
}
FormQuery2 = new FormQuery();
FormQuery2.IsReport = true;
Queries.SubmitTemp(); //create TableTemp
Queries.TableQ = new DataTable(null); //new table no name
for (int i = 0; i < 6; i++) //add columns
{
Queries.TableQ.Columns.Add(new System.Data.DataColumn()); //blank columns
}
Queries.CurReport.ColTotal = new double[Queries.TableQ.Columns.Count];
for (int i = 0; i < Queries.TableTemp.Rows.Count; i++) //loop through data rows
{
DataRow row = Queries.TableQ.NewRow(); //create new row called 'row' based on structure of TableQ
row[0] = (PIn.PDate(Queries.TableTemp.Rows[i][0].ToString())).ToShortDateString(); //claim dateservice
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "P")
{
row[1] = "Primary";
}
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "S")
{
row[1] = "Secondary";
}
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "PreAuth")
{
row[1] = "PreAuth";
}
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "Other")
{
row[1] = "Other";
}
if (Queries.TableTemp.Rows[i][3].ToString().Equals("H"))
{
row[2] = "Holding"; //Claim Status
}
else if (Queries.TableTemp.Rows[i][3].ToString().Equals("W"))
{
row[2] = "WaitQ"; //Claim Status, added SPK 7/15/04
}
else
{
row[2] = "Unsent"; //Claim Status
}
row[3] = Queries.TableTemp.Rows[i][4]; //Patient name
row[4] = Queries.TableTemp.Rows[i][5]; //Ins Carrier
row[5] = PIn.PDouble(Queries.TableTemp.Rows[i][6].ToString()).ToString("F"); //claim fee
Queries.CurReport.ColTotal[5] += PIn.PDouble(Queries.TableTemp.Rows[i][6].ToString());
Queries.TableQ.Rows.Add(row);
}
Queries.CurReport.ColWidth = new int[Queries.TableQ.Columns.Count];
Queries.CurReport.ColPos = new int[Queries.TableQ.Columns.Count + 1];
Queries.CurReport.ColPos[0] = 0;
Queries.CurReport.ColCaption = new string[Queries.TableQ.Columns.Count];
Queries.CurReport.ColAlign = new HorizontalAlignment[Queries.TableQ.Columns.Count];
FormQuery2.ResetGrid(); //this is a method in FormQuery2;
Queries.CurReport.Title = "Claims Not Sent";
Queries.CurReport.SubTitle = new string[3];
Queries.CurReport.SubTitle[0] = ((Pref)PrefB.HList["PracticeTitle"]).ValueString;
if (radioRange.Checked == true)
{
Queries.CurReport.SubTitle[1] = date1.SelectionStart.ToString("d") + " - " + date2.SelectionStart.ToString("d");
}
else
{
Queries.CurReport.SubTitle[1] = date1.SelectionStart.ToString("d");
}
Queries.CurReport.ColPos[0] = 20;
Queries.CurReport.ColPos[1] = 145;
Queries.CurReport.ColPos[2] = 270;
Queries.CurReport.ColPos[3] = 395;
Queries.CurReport.ColPos[4] = 520;
Queries.CurReport.ColPos[5] = 645;
Queries.CurReport.ColPos[6] = 770;
Queries.CurReport.ColCaption[0] = "Date";
Queries.CurReport.ColCaption[1] = "Type";
Queries.CurReport.ColCaption[2] = "Claim Status";
Queries.CurReport.ColCaption[3] = "Patient Name";
Queries.CurReport.ColCaption[4] = "Insurance Carrier";
Queries.CurReport.ColCaption[5] = "Amount";
Queries.CurReport.ColAlign[5] = HorizontalAlignment.Right;
Queries.CurReport.Summary = new string[3];
FormQuery2.ShowDialog();
DialogResult = DialogResult.OK;
}
private void butOK_Click(object sender, System.EventArgs e)
{
if (textDaysOld.errorProvider1.GetError(textDaysOld) != "")
{
MessageBox.Show(Lan.g("All", "Please correct data entry errors first."));
return;
}
int daysOld = PIn.PInt(textDaysOld.Text);
//FormQuery2.ResetGrid();//this is a method in FormQuery2;
Queries.CurReport = new ReportOld();
DateTime startQDate = DateTime.Today.AddDays(-daysOld);
Queries.CurReport.Query = "SELECT carrier.CarrierName,claim.ClaimNum"
+ ",claim.ClaimType,claim.DateService,"
+ "CONCAT(CONCAT(CONCAT(CONCAT(patient.LName,', '),patient.FName),' '),patient.MiddleI), claim.DateSent"
+ ",claim.ClaimFee,carrier.Phone "
+ "FROM claim,insplan,patient,carrier "
+ "WHERE claim.PlanNum = insplan.PlanNum "
+ "AND claim.PatNum = patient.PatNum "
+ "AND carrier.CarrierNum = insplan.CarrierNum "
+ "AND claim.ClaimStatus='S' && claim.DateSent < " + POut.PDate(startQDate) + " "
+ "ORDER BY carrier.Phone,insplan.PlanNum";
FormQuery2 = new FormQuery();
FormQuery2.IsReport = true;
Queries.SubmitTemp(); //create TableTemp
Queries.TableQ = new DataTable(null); //new table no name
for (int i = 0; i < 6; i++) //add columns
{
Queries.TableQ.Columns.Add(new System.Data.DataColumn()); //blank columns
}
Queries.CurReport.ColTotal = new double[Queries.TableQ.Columns.Count];
for (int i = 0; i < Queries.TableTemp.Rows.Count; i++) //loop through data rows
{
DataRow row = Queries.TableQ.NewRow(); //create new row called 'row' based on structure of TableQ
//start filling 'row'. First column is carrier:
row[0] = Queries.TableTemp.Rows[i][0];
row[1] = Queries.TableTemp.Rows[i][7];
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "P")
{
row[2] = "Primary";
}
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "S")
{
row[2] = "Secondary";
}
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "PreAuth")
{
row[2] = "PreAuth";
}
if (PIn.PString(Queries.TableTemp.Rows[i][2].ToString()) == "Other")
{
row[2] = "Other";
}
row[3] = Queries.TableTemp.Rows[i][4];
row[4] = (PIn.PDate(Queries.TableTemp.Rows[i][3].ToString())).ToString("d");
row[5] = PIn.PDouble(Queries.TableTemp.Rows[i][6].ToString()).ToString("F");
//TimeSpan d = DateTime.Today.Subtract((PIn.PDate(Queries.TableTemp.Rows[i][5].ToString())));
//if(d.Days>5000)
// row[4]="";
//else
// row[4]=d.Days.ToString();
Queries.CurReport.ColTotal[5] += PIn.PDouble(Queries.TableTemp.Rows[i][6].ToString());
Queries.TableQ.Rows.Add(row);
}
Queries.CurReport.ColWidth = new int[Queries.TableQ.Columns.Count];
Queries.CurReport.ColPos = new int[Queries.TableQ.Columns.Count + 1];
Queries.CurReport.ColPos[0] = 0;
Queries.CurReport.ColCaption = new string[Queries.TableQ.Columns.Count];
Queries.CurReport.ColAlign = new HorizontalAlignment[Queries.TableQ.Columns.Count];
FormQuery2.ResetGrid(); //this is a method in FormQuery2;
Queries.CurReport.Title = "OUTSTANDING INSURANCE CLAIMS";
Queries.CurReport.SubTitle = new string[3];
Queries.CurReport.SubTitle[0] = ((Pref)PrefB.HList["PracticeTitle"]).ValueString;
Queries.CurReport.SubTitle[1] = "Days Outstanding: " + daysOld;
Queries.CurReport.ColPos[0] = 20;
Queries.CurReport.ColPos[1] = 210;
Queries.CurReport.ColPos[2] = 330;
Queries.CurReport.ColPos[3] = 430;
Queries.CurReport.ColPos[4] = 600;
Queries.CurReport.ColPos[5] = 690;
Queries.CurReport.ColPos[6] = 770;
Queries.CurReport.ColCaption[0] = Lan.g(this, "Carrier");
Queries.CurReport.ColCaption[1] = Lan.g(this, "Phone");
Queries.CurReport.ColCaption[2] = Lan.g(this, "Type");
Queries.CurReport.ColCaption[3] = Lan.g(this, "Patient Name");
Queries.CurReport.ColCaption[4] = Lan.g(this, "Date of Service");
Queries.CurReport.ColCaption[5] = Lan.g(this, "Amount");
Queries.CurReport.ColAlign[5] = HorizontalAlignment.Right;
Queries.CurReport.Summary = new string[3];
FormQuery2.ShowDialog();
DialogResult = DialogResult.OK;
}
private void butOK_Click(object sender, System.EventArgs e)
{
int feeSched = DefB.Short[(int)DefCat.FeeSchedNames][listFeeSched.SelectedIndex].DefNum;
string catName = ""; //string to hold current category name
Fees fee = new Fees();
Queries.CurReport = new ReportOld();
Queries.CurReport.Query = "SELECT procedurecode.adacode,fee.amount,' ',procedurecode.descript,"
+ "procedurecode.abbrdesc FROM procedurecode,fee "
+ "WHERE procedurecode.adacode=fee.adacode AND fee.feesched='" + feeSched.ToString()
+ "' ORDER BY procedurecode.adacode";
FormQuery2 = new FormQuery();
FormQuery2.IsReport = true;
if (radioADA.Checked == true)
{
FormQuery2.SubmitReportQuery();
Queries.CurReport.Title = "Procedure Codes";
Queries.CurReport.SubTitle = new string[2];
Queries.CurReport.SubTitle[0] = ((Pref)PrefB.HList["PracticeTitle"]).ValueString;
Queries.CurReport.SubTitle[1] = DefB.GetName(DefCat.FeeSchedNames, feeSched);
Queries.CurReport.ColPos = new int[6];
Queries.CurReport.ColCaption = new string[5];
Queries.CurReport.ColAlign = new HorizontalAlignment[5];
Queries.CurReport.ColPos[0] = 60;
Queries.CurReport.ColPos[1] = 130;
Queries.CurReport.ColPos[2] = 200;
Queries.CurReport.ColPos[3] = 220;
Queries.CurReport.ColPos[4] = 420;
Queries.CurReport.ColPos[5] = 620;
Queries.CurReport.ColCaption[0] = "ADA Code";
Queries.CurReport.ColCaption[1] = "Fee Amount";
Queries.CurReport.ColCaption[2] = " "; //otherwise, the amount gets bunched up next to the description.
Queries.CurReport.ColCaption[3] = "Description";
Queries.CurReport.ColCaption[4] = "Abbr Description";
//Queries.CurReport.ColCaption[3]="Fee Amount";
Queries.CurReport.ColAlign[1] = HorizontalAlignment.Right;
Queries.CurReport.Summary = new string[0];
FormQuery2.ShowDialog();
DialogResult = DialogResult.OK;
}
else
{
Queries.SubmitTemp(); //create TableTemp which is not actually used
ProcedureCode[] ProcList = ProcedureCodes.GetProcList();
Queries.TableQ = new DataTable(null);
for (int i = 0; i < 5; i++) //add columns
{
Queries.TableQ.Columns.Add(new System.Data.DataColumn()); //blank columns
}
Queries.CurReport.ColTotal = new double[Queries.TableQ.Columns.Count];
DataRow row = Queries.TableQ.NewRow();//add first row by hand to get value for temp
row[0] = DefB.GetName(DefCat.ProcCodeCats, ProcList[0].ProcCat);
catName = row[0].ToString();
row[1] = ProcList[0].ADACode;
row[2] = ProcList[0].Descript;
row[3] = ProcList[0].AbbrDesc;
row[4] = ((double)Fees.GetAmount0(ProcList[0].ADACode, feeSched)).ToString("F");
Queries.CurReport.ColTotal[4] += PIn.PDouble(row[4].ToString());
Queries.TableQ.Rows.Add(row);
for (int i = 1; i < ProcList.Length; i++) //loop through data rows
{
row = Queries.TableQ.NewRow(); //create new row called 'row' based on structure of TableQ
row[0] = DefB.GetName(DefCat.ProcCodeCats, ProcList[i].ProcCat);
if (catName == row[0].ToString())
{
row[0] = "";
}
else
{
catName = row[0].ToString();
}
row[1] = ProcList[i].ADACode.ToString();
row[2] = ProcList[i].Descript;
row[3] = ProcList[i].AbbrDesc.ToString();
row[4] = ((double)Fees.GetAmount0(ProcList[i].ADACode, feeSched)).ToString("F");
//Queries.CurReport.ColTotal[4]+=PIn.PDouble(row[4].ToString());
Queries.TableQ.Rows.Add(row);
}
Queries.CurReport.ColWidth = new int[Queries.TableQ.Columns.Count];
Queries.CurReport.ColPos = new int[Queries.TableQ.Columns.Count + 1];
Queries.CurReport.ColPos[0] = 0;
Queries.CurReport.ColCaption = new string[Queries.TableQ.Columns.Count];
Queries.CurReport.ColAlign = new HorizontalAlignment[Queries.TableQ.Columns.Count];
FormQuery2.ResetGrid(); //this is a method in FormQuery2;
Queries.CurReport.Title = "Procedure Codes";
Queries.CurReport.SubTitle = new string[5];
Queries.CurReport.SubTitle[0] = ((Pref)PrefB.HList["PracticeTitle"]).ValueString;
Queries.CurReport.SubTitle[1] = DefB.GetName(DefCat.FeeSchedNames, feeSched);
Queries.CurReport.ColPos[0] = 20;
Queries.CurReport.ColPos[1] = 120;
Queries.CurReport.ColPos[2] = 270;
Queries.CurReport.ColPos[3] = 470;
Queries.CurReport.ColPos[4] = 620;
Queries.CurReport.ColPos[5] = 770;
Queries.CurReport.ColCaption[0] = "Category";
Queries.CurReport.ColCaption[1] = "ADA Code";
Queries.CurReport.ColCaption[2] = "Description";
Queries.CurReport.ColCaption[3] = "Abbr Description";
Queries.CurReport.ColCaption[4] = "Fee Amount";
Queries.CurReport.ColAlign[4] = HorizontalAlignment.Right;
Queries.CurReport.Summary = new string[5];
FormQuery2.ShowDialog();
DialogResult = DialogResult.OK;
}
}