/// <summary>
/// 预算
/// </summary>
/// <param name="prescriptions">要预算的处方</param>
/// <returns>预算信息,供正式结算用</returns>
public override ChargeInfo[] Budget(Prescription[] prescriptions)
{
//单张处方明细转化为大项目明细合并后累加在取舍。
//保存每张处方的大项目明细
List <List <Item> > lstStatItems = new List <List <Item> >( );
//本次结算总金额(等于每张处方舍入后的金额的合计)
decimal chargeTotalCost = 0;
#region 合并大类并计算舍入金额
try
{
for (int i = 0; i < prescriptions.Length; i++)
{
List <Item> lstTemp = new List <Item>( );
lstTemp = MergePrescriptionByStatItemCode(ref prescriptions[i]);
chargeTotalCost = chargeTotalCost + prescriptions[i].Total_Fee;
lstStatItems.Add(lstTemp);
}
}
catch (Exception err)
{
throw new Exception("合并项目发生错误！");
}
#endregion
//保存合并后的所有大项目明细，类型MZ_CostOrder
Hashtable htCostOrder = new Hashtable();
#region 合并所有结算明细(不需要再舍入)
try
{
foreach (List <Item> lstTemp in lstStatItems)
{
foreach (object obj in lstTemp)
{
if (htCostOrder.ContainsKey(((Item)obj).Text.Trim( )))
{
Item item = (Item)obj;
MZ_CostOrder mz_costorder = (MZ_CostOrder)htCostOrder[item.Text.Trim( )];
mz_costorder.Total_Fee = mz_costorder.Total_Fee + Convert.ToDecimal(item.Value);
}
else
{
MZ_CostOrder mz_costorder = new HIS.Model.MZ_CostOrder( );
mz_costorder.ItemType = ((Item)obj).Text.Trim( );
mz_costorder.Total_Fee = Convert.ToDecimal(((Item)obj).Value);
htCostOrder.Add(mz_costorder.ItemType, mz_costorder);
}
}
}
}
catch (Exception err)
{
throw new Exception("合并明细大类发生错误！");
}
#endregion
int costmasterid = MSAccessDb.GetMaxID("MZ_COSTMASTER", Tables.mz_costmaster.COSTMASTERID);
#region 数据库操作,得到结算号
try
{
MSAccessDb.BeginTrans();
#region 赋值结算头表并保存
HIS.Model.MZ_CostMaster mz_costmaster = new HIS.Model.MZ_CostMaster( );
mz_costmaster.PatID = Patient.PatID;
mz_costmaster.PatListID = Patient.PatListID;
mz_costmaster.PresMasterID = 0;
mz_costmaster.TicketNum = "";
mz_costmaster.TicketCode = "";
mz_costmaster.ChargeCode = OperatorId.ToString( );
mz_costmaster.ChargeName = DataReader.GetEmployeeNameById(OperatorId);
mz_costmaster.Total_Fee = chargeTotalCost;//结算表的总金额
mz_costmaster.Self_Fee = 0;
mz_costmaster.Village_Fee = 0;
mz_costmaster.Favor_Fee = 0;
mz_costmaster.Pos_Fee = 0;
mz_costmaster.Money_Fee = 0;
mz_costmaster.Ticket_Flag = 0;
mz_costmaster.Record_Flag = 9;//预结算记录状态置为9
mz_costmaster.OldID = 0;
mz_costmaster.AccountID = 0;
mz_costmaster.Hang_Flag = (int)OPDOperationType.门诊收费;
mz_costmaster.Hurried_Flag = Patient.IsEmergency ? 1 : 0;
mz_costmaster.CostMasterID = costmasterid;
MSAccessDb.InsertRecord(mz_costmaster, Tables.mz_costorder.COSTORDERID);
#endregion
#region 更新处方表的结算号和总金额，舍入金额
for (int prescCount = 0; prescCount < prescriptions.Length; prescCount++)
{
string strWhere = Tables.mz_presmaster.PRESMASTERID + " = " + prescriptions[prescCount].PrescriptionID;
MZ_PresMaster mz_presmaster = (MZ_PresMaster)MSAccessDb.GetModel("MZ_PRESMASTER", strWhere, typeof(MZ_PresMaster));
if (mz_presmaster.Charge_Flag == 1)
{
throw new Exception("处方已被别的收费员收费，请确认！");
}
//更新处方表的结算号和总金额，舍入金额
//BindEntity<MZ_PresMaster>.CreateInstanceDAL( oleDb ).Update( strWhere ,
// Tables.mz_presmaster.COSTMASTERID + " = " + mz_costmaster.CostMasterID ,
// Tables.mz_presmaster.TOTAL_FEE + " = " + prescriptions[prescCount].Total_Fee ,
// Tables.mz_presmaster.ROUNGINGMONEY + " = " + prescriptions[prescCount].RoundingMoney );
MSAccessDb.UpdateRecord(new string[] { Tables.mz_presmaster.COSTMASTERID + " = " + mz_costmaster.CostMasterID,
Tables.mz_presmaster.TOTAL_FEE + " = " + prescriptions[prescCount].Total_Fee,
Tables.mz_presmaster.ROUNGINGMONEY + " = " + prescriptions[prescCount].RoundingMoney },
strWhere, typeof(MZ_PresMaster));
}
#endregion
#region 保存结算明细到数据库(按大项目保存)
int costorderid = MSAccessDb.GetMaxID("MZ_COSTORDER", Tables.mz_costorder.COSTORDERID);
foreach (object obj in htCostOrder)
{
HIS.Model.MZ_CostOrder mz_costorder = (HIS.Model.MZ_CostOrder)((System.Collections.DictionaryEntry)obj).Value;
mz_costorder.CostID = mz_costmaster.CostMasterID;
mz_costorder.CostOrderID = costorderid;
//保存到数据库
//mz_costorder.CostOrderID = BindEntity<MZ_CostOrder>.CreateInstanceDAL( oleDb ).Add( mz_costorder );
MSAccessDb.InsertRecord(mz_costorder, Tables.mz_costorder.COSTORDERID);
costorderid++;
}
#endregion
MSAccessDb.CommitTrans( );
}
catch (Exception err)
{
MSAccessDb.RollbackTrans( );
throw new Exception("保存预算结果到数据库发生错误！");
}
#endregion
//回填处方的结算号
for (int prescCount = 0; prescCount < prescriptions.Length; prescCount++)
{
prescriptions[prescCount].ChargeID = costmasterid;
}
#region 返回预算结果
try
{
Hashtable htInvoiceItem = new Hashtable( );
foreach (object obj in htCostOrder)
{
HIS.Model.MZ_CostOrder mz_costorder = (HIS.Model.MZ_CostOrder)((System.Collections.DictionaryEntry)obj).Value;
InvoiceItem invoice = GetInvoiceByStatCode(mz_costorder.ItemType.Trim( ));
invoice.Cost = mz_costorder.Total_Fee;
if (htInvoiceItem.ContainsKey(invoice.ItemCode.Trim( )))
{
InvoiceItem _invoice = (InvoiceItem)htInvoiceItem[invoice.ItemCode];
_invoice.Cost = _invoice.Cost + invoice.Cost;
htInvoiceItem.Remove(invoice.ItemCode);
htInvoiceItem.Add(_invoice.ItemCode, _invoice);
}
else
{
htInvoiceItem.Add(invoice.ItemCode, invoice);
}
}
List <InvoiceItem> chargeItems = new List <InvoiceItem>( );
foreach (object item in htInvoiceItem)
{
chargeItems.Add((InvoiceItem)((DictionaryEntry)item).Value);
}
ChargeInfo chargeInfos = new ChargeInfo( );
chargeInfos.Items = chargeItems.ToArray( );
chargeInfos.ChargeID = costmasterid;
chargeInfos.TotalFee = chargeTotalCost;
ChargeInfo[] chargeInfo = new ChargeInfo[1];
chargeInfo[0].TotalFee = chargeTotalCost;
chargeInfo[0] = chargeInfos;
//计算本次的优惠金额
chargeInfo[0].FavorFee = GetFavorCost(Patient.MediType, chargeInfo[0], prescriptions);
return(chargeInfo);
}
catch (Exception err)
{
throw new Exception("返回预算结果发生错误！");
}
#endregion
}
private ChargeInfo[] _budget(Prescription[] prescriptions)
{
int temp_costmasterid = MSAccessDb.GetMaxID("MZ_COSTMASTER", Tables.mz_costmaster.COSTMASTERID);
int temp_costorderid = MSAccessDb.GetMaxID("MZ_COSTORDER", Tables.mz_costorder.COSTORDERID);
ChargeInfo[] chargeInfos = new ChargeInfo[prescriptions.Length];
try
{
for (int prescCount = 0; prescCount < prescriptions.Length; prescCount++)
{
List <Item> lstStatItems = MergePrescriptionByStatItemCode(ref prescriptions[prescCount]);
Prescription prescription = prescriptions[prescCount];
chargeInfos[prescCount] = new ChargeInfo( );
//保存结算头
HIS.Model.MZ_CostMaster chargeBill = new HIS.Model.MZ_CostMaster( );
#region ....
chargeBill.PatID = Patient.PatID;
chargeBill.PatListID = Patient.PatListID;
chargeBill.PresMasterID = prescription.PrescriptionID;
chargeBill.TicketNum = "";
chargeBill.TicketCode = "";
chargeBill.ChargeCode = OperatorId.ToString( );
chargeBill.ChargeName = DataReader.GetEmployeeNameById(OperatorId); //BindEntity<HIS.Model.BASE_EMPLOYEE_PROPERTY>.CreateInstanceDAL(oleDb).GetModel(OperatorId).NAME ;
chargeBill.Total_Fee = prescription.Total_Fee;
chargeBill.Self_Fee = 0;
chargeBill.Village_Fee = 0;
chargeBill.Favor_Fee = 0;
chargeBill.Pos_Fee = 0;
chargeBill.Money_Fee = 0;
chargeBill.Ticket_Flag = 0;
//chargeBill.CostDate;//预结算不写结算时间
chargeBill.Record_Flag = 9;//预结算记录状态置为9
chargeBill.OldID = 0;
chargeBill.AccountID = 0;
chargeBill.Hang_Flag = (int)OPDOperationType.门诊收费;
chargeBill.Hurried_Flag = Patient.IsEmergency ? 1 : 0;
#endregion
//int ret1 = BindEntity<HIS.Model.MZ_CostMaster>.CreateInstanceDAL( oleDb ).Add( chargeBill );
chargeBill.CostMasterID = temp_costmasterid;
int ret1 = MSAccessDb.InsertRecord(chargeBill, Tables.mz_costmaster.COSTMASTERID);
temp_costmasterid++;
chargeBill.CostMasterID = temp_costmasterid;
prescriptions[prescCount].ChargeID = temp_costmasterid;
//累加每张处方结算信息
chargeInfos[prescCount].ChargeID = chargeBill.CostMasterID;
chargeInfos[prescCount].PrescriptionID = chargeBill.PresMasterID;
chargeInfos[prescCount].TotalFee = chargeBill.Total_Fee;
chargeInfos[prescCount].SelfFee = chargeBill.Self_Fee;
chargeInfos[prescCount].VillageFee = chargeBill.Village_Fee;
chargeInfos[prescCount].FavorFee = chargeBill.Favor_Fee;
if (ret1 > 0)
{
List <InvoiceItem> chargeItems = new List <InvoiceItem>( );
#region 大项目保存结算明细
foreach (object obj in lstStatItems)
{
Item item = (Item)obj;
HIS.Model.MZ_CostOrder chargeDetail = new HIS.Model.MZ_CostOrder( );
chargeDetail.CostID = chargeBill.CostMasterID;
chargeDetail.ItemType = item.Text;
chargeDetail.Total_Fee = Convert.ToDecimal(item.Value);
chargeDetail.CostOrderID = temp_costorderid;
int ret2 = MSAccessDb.InsertRecord(chargeDetail, Tables.mz_costorder.COSTORDERID);
temp_costorderid++;
if (ret2 > 0)
{
InvoiceItem invoice = GetInvoiceByStatCode(chargeDetail.ItemType);
invoice.Cost = chargeDetail.Total_Fee;
chargeItems.Add(invoice);
}
}
#endregion
chargeInfos[prescCount].Items = chargeItems.ToArray( );
}
}
}
catch (Exception err)
{
throw err;
}
//计算每张处方的打折金额
for (int i = 0; i < chargeInfos.Length; i++)
{
chargeInfos[i].FavorFee = GetFavorCost(Patient.MediType, chargeInfos[i], prescriptions[i]);
}
return(chargeInfos);
}