private void LoadMessageTitle()
{
string sql = "";
if (rdSystem.Checked)
{
sql = "select msgid,title,releasedate,dbo.fun_getempname(releaseor) as releaseor from pub_message where msgid in (select msgid from pub_message_recivelist where reciver_type = 0 and reciver_id =" + currentSystemId + ") order by sort desc,releasedate desc ";
}
if (rdDept.Checked)
{
sql = "select msgid,title,releasedate,dbo.fun_getempname(releaseor) as releaseor from pub_message where msgid in (select msgid from pub_message_recivelist where reciver_type = 1 and reciver_id =" + currentDeptId + ") order by sort desc,releasedate desc ";
}
if (rdEmployee.Checked)
{
sql = "select msgid,title,releasedate,dbo.fun_getempname(releaseor) as releaseor from pub_message where msgid in (select msgid from pub_message_recivelist where reciver_type = 2 and reciver_id =" + currentUserId + ") order by sort desc,releasedate desc ";
}
DataTable tbMsg = dataBase.GetDataTable(sql);
lvwTitleList.Items.Clear( );
for (int i = 0; i < tbMsg.Rows.Count; i++)
{
ListViewItem item = new ListViewItem( );
item.Text = tbMsg.Rows[i]["title"].ToString( ).Trim( );
item.Tag = Convert.ToInt32(tbMsg.Rows[i]["msgid"]);
item.SubItems.Add(Convert.ToDateTime(tbMsg.Rows[i]["releasedate"]).ToString("yyyy-MM-dd"));
item.SubItems.Add(tbMsg.Rows[i]["releaseor"].ToString( ));
lvwTitleList.Items.Add(item);
}
}
//end add
public static System.Data.DataTable GetList(string filter, TrasenClasses.DatabaseAccess.RelationalDatabase database)
{
string sql = "select * from pub_system where 1=1";
if (!string.IsNullOrEmpty(filter))
{
sql += filter;
}
return(database.GetDataTable(sql));
}
//获得调价文号
public static DataTable GetTjwh(string str, TrasenClasses.DatabaseAccess.RelationalDatabase db)
{
string ssql = string.Format(@" select a.djh 单据号,a.wh 文号,
a.whrq 文号日期,a.whdw 文号单位,dbo.fun_getEmpName(a.djy) 登记人,
a.djsj 登记日期,a.id,a.djy from yf_tjwh a where 1=1 ");
ssql += str;
DataTable tb_tjwh = db.GetDataTable(ssql);
return(tb_tjwh);
}
//获得调价文号明细
public static DataTable GetTjwhmx(string str, TrasenClasses.DatabaseAccess.RelationalDatabase db)
{
string ssql = string.Format(@" select
b.djh 单据号,b.wh 文号,c.S_YPPM 品名,c.S_YPGG 规格,
c.SCCJ 厂家,c.S_YPDW 单位,a.LSH 流水号,a.ZBJ 中标价,
a.ZGLSJ 最高零售价,a.PXXH 排序序号,a.CJID,a.ID,
b.WHRQ 文号日期,b.WHDW 文号单位,dbo.fun_getEmpName(b.djy) 登记人,
b.DJSJ 登记时间,b.DJY,a.DJID
from yf_tjwhmx a
inner join yf_tjwh b on a.djid=b.id
inner join yp_ypcjd c on a.cjid=c.cjid where 1=1 "
);
ssql += str;
DataTable tb_whmx = db.GetDataTable(ssql);
return(tb_whmx);
}
private bool ALLOW_RELEASE_ALLSERVER = false;// add by wangzhi 2010-10-19
private void LoadMessageTitle()
{
string sql = "select msgid,title,releasedate,dbo.fun_getempname(releaseor) as releaseor from pub_message where DeleteBit = 0 order by sort desc,releasedate desc ";//Modify By Tany 2012-04-17 增加置顶排序
if (dtpReleaseDate.Checked)
{
sql = "select msgid,title,releasedate,dbo.fun_getempname(releaseor) as releaseor from pub_message where DeleteBit = 0 and releasedate >='" + dtpReleaseDate.Value.ToString("yyyy-MM-dd") + " 00:00:00' and releasedate<='" + dtpReleaseDate.Value.ToString("yyyy-MM-dd") + " 23:59:59' order by sort desc,releasedate desc ";//Modify By Tany 2012-04-17 增加置顶排序
}
DataTable tbMsg = dataBase.GetDataTable(sql);
lvwTitleList.Items.Clear();
for (int i = 0; i < tbMsg.Rows.Count; i++)
{
ListViewItem item = new ListViewItem();
item.Text = tbMsg.Rows[i]["title"].ToString().Trim();
item.Tag = Convert.ToInt32(tbMsg.Rows[i]["msgid"]);
item.SubItems.Add(Convert.ToDateTime(tbMsg.Rows[i]["releasedate"]).ToString("yyyy-MM-dd"));
item.SubItems.Add(tbMsg.Rows[i]["releaseor"].ToString());
lvwTitleList.Items.Add(item);
}
}
/// <summary>
/// 保存前调用
/// </summary>
/// <param name="strMzh">门诊号</param>
/// <param name="strYblx">医保类型</param>
/// <param name="iZf">1：自费 0：公费</param>
/// <param name="strMsg">输出</param>
/// <returns>false则MessageBox.Show true则判断iZf为1：自费 0：公费</returns>
public bool CanPubFeeByInp(string strMzh, string strYblx, out int iZf, out string strMsg)
{
strMsg = "";
iZf = 1;//1：自费 0：公费
int ldNumM = 0;
int ldNumD = 0;
decimal ldNumJe = 0M;
decimal ldNumJeM = 0M;
#region "校验该病人是否公费类型"
//校验该病人是否公费类型
string strValideSql = string.Format("select ybjklx from jc_yblx where id='{0}'", strYblx);
string strYbjklx = _Database.GetDataResult(strValideSql).ToString().Trim();
if (!strYbjklx.Equals(_ybjklx))
{
strMsg = "非公费病人";
return(true);//非公费病人，不走以下判断，自费
//throw new Exception("该病人不是公费病人，请到门诊重新挂号");
}
#endregion
#region "校验该病人是否存在唯一的有效联单"
DateTime dtNow = DateManager.ServerDateTimeByDBType(_Database);
string year = dtNow.Year + "";
string month = dtNow.Month < 10 ? "0" + dtNow.Month : dtNow.Month + "";
string day = dtNow.Day < 10 ? "0" + dtNow.Day : dtNow.Day + "";
//校验该病人是否存在唯一的有效联单
strValideSql = string.Format("select COUNT(1) as Num from gf_ghdj c where c.zymzh='{0}' and c.sf_year='{1}' and c.sf_Month='{2}' and c.sf_day='{3}' and c.del_bit=0 and c.jsbz=0 ", strMzh, year, month, day);
int Num = Convert.ToInt32(_Database.GetDataResult(strValideSql).ToString().Trim());
if (Num == 0)
{
strMsg = "该公费病人不存在可用的未结算联单，如果继续需要自费，或者到挂号处注册联单信息后再操作";
return(false);
}
else if (Num > 1)
{
throw new Exception("该公费病人存在多张可用的未结算联单，请联系收费处关闭已结算的联单后再进行操作");
//return false;
}
#endregion
//取病人医疗证号
strValideSql = string.Format("select yblx,ylzh from gf_ghdj c where c.zymzh='{0}' and c.sf_year='{1}' and c.sf_Month='{2}' and c.sf_day='{3}' and c.del_bit=0 and c.jsbz=0 ", strMzh, year, month, day);
DataTable dtYlzh = _Database.GetDataTable(strValideSql);
if (dtYlzh == null || dtYlzh.Rows.Count <= 0)
{
throw new Exception("查询医疗证号出错，请重新操作");
//return false;
}
string ylzh = dtYlzh.Rows[0]["ylzh"].ToString().Trim();//医疗证号
strValideSql = string.Format("select MZ_DEL,cfsl_xz,cfslM_xz,je_xz,yje_xz from jc_gf_patrec where ylzh='{0}' and gflx='{1}' and del_bit=0 ", ylzh, strYblx);
#region "校验该病人医疗证号是否存在，并且还校验是否关闭了门诊收费功能"
//校验该病人医疗证号是否存在，并且还校验是否关闭了门诊收费功能
DataTable dt = _Database.GetDataTable(strValideSql);
if (dt == null)
{
throw new Exception("查找病人信息出现错误，请重新操作");
}
if (dt.Rows.Count <= 0)
{
strMsg = "该公费病人的 医疗证号 不存在，或者已经关闭收费，请联系医保办处理，否则继续则按照自费处理";
return(false);
}
else if (dt.Rows.Count > 1)
{
throw new Exception("该公费病人的 医疗证号 重复存在，请联系医保办处理后操作");
}
string MZ_DEL = dt.Rows[0]["MZ_DEL"].ToString().Trim();//门诊收费功能是否关闭
if (MZ_DEL.Equals("1"))
{
strMsg = "该公费病人不存在可用的未结算联单，如果继续需要自费，或者到挂号处注册联单信息后再操作";
return(false);
}
#endregion
ldNumM = int.Parse(dt.Rows[0]["cfslM_xz"].ToString().Trim());
ldNumD = int.Parse(dt.Rows[0]["cfsl_xz"].ToString().Trim());
ldNumJe = decimal.Parse(dt.Rows[0]["je_xz"].ToString().Trim());
ldNumJeM = decimal.Parse(dt.Rows[0]["yje_xz"].ToString().Trim());
#region "校验日联单数量"
strValideSql = string.Format("select COUNT(1) as Num from gf_ghdj c where c.ylzh='{0}' and c.sf_year='{1}' and c.sf_Month='{2}' and c.sf_day='{3}' and c.yblx='{4}' and c.del_bit=0 ", ylzh, year, month, day, strYblx);
Num = Convert.ToInt32(_Database.GetDataResult(strValideSql).ToString().Trim());
if (Num > ldNumD)
{
strMsg = "该公费病人日联单数超过" + ldNumD + "，如果继续需要自费";
return(false);
}
#endregion
#region "校验月联单数量"
strValideSql = string.Format("select COUNT(1) as Num from gf_ghdj c where c.ylzh='{0}' and c.sf_year='{1}' and c.sf_Month='{2}' and c.yblx='{3}' and c.del_bit=0 ", ylzh, year, month, strYblx);
Num = Convert.ToInt32(_Database.GetDataResult(strValideSql).ToString().Trim());
if (Num > ldNumM)
{
strMsg = "该公费病人日联单数超过" + ldNumM + "，如果继续需要自费";
return(false);
}
#endregion
#region "校验月联单总金额"
strValideSql = string.Format(@" select ISNULL(b.zje,0) ZJE from gf_ghdj a
inner join gf_ld_info b on a.id=b.ghdjid and b.del_bit=0
where a.yblx='{0}' and a.ylzh='{1}' and a.sf_year='{2}' and a.sf_Month='{3}' and a.del_bit=0 "
, strYblx, ylzh, year, month);
decimal dAllMFee = Convert.ToDecimal(_Database.GetDataResult(strValideSql).ToString().Trim());
if (dAllMFee > ldNumJeM)
{
strMsg = "该公费病人本月该联单累计金额：" + dAllMFee + "大于限额设置" + ldNumJeM + "，如果继续则自费处方";
return(false);
}
#endregion
#region "校验联单金额"
string strSql = string.Format("select sfdlb,name,xe from jc_gf_dsflb where del_bit=0 ");
DataTable dtSfdlb = _Database.GetDataTable(strSql);
//公费病人有且仅有一个再用的有效的联单号
strSql = string.Format(@"select b.JE,b.TJDXMDM,b.XMID,a.XMLY,e.sfdlb
from MZ_HJB a
inner join MZ_HJB_MX b on a.HJID=b.HJID
inner join gf_ghdj c on a.BLH=c.zymzh and a.ldh=c.ldh and c.del_bit=0 and c.jsbz=0 and c.sf_year='{1}' and c.sf_Month='{2}' and c.sf_day='{3}'
inner join gf_ld_info d on c.id=d.ghdjid and d.del_bit=0
inner join
(
select a.xmid,a.xmly,c.sfdlb from jc_gf_sflbmx a
inner join jc_gf_sflb b on a.sflb=b.sflb and b.del_bit=0
inner join jc_gf_ppdsflb c on a.sflb=c.sflb and c.del_bit=0
where a.del_bit=0
)e on a.XMLY=e.xmly and b.XMID=e.xmid
where a.BLH='{0}' and a.BSCBZ=0", strMzh, year, month, day);
DataTable dtCfFee = _Database.GetDataTable(strSql);
//单项金额校验
if (!DoCheckSingleFee(dtSfdlb, dtCfFee, out strMsg))
{
return(false);
}
//联单总金额校验
if (!DoCheckAllFee(dtCfFee, ldNumJe, out strMsg))
{
return(false);
}
#endregion
//校验完毕，可以公费
iZf = 0;//公费
return(true);
}
private void button1_Click(object sender, System.EventArgs e)
{
DataTable tb = (DataTable)this.myDataGrid1.DataSource;
int nrow = Convert.ToInt32(this.myDataGrid1.CurrentCell.RowNumber);
if (nrow > tb.Rows.Count - 1)
{
return;
}
if (MessageBox.Show("您确定要删除第" + Convert.ToString((nrow + 1)) + "行这个单据吗 ？", "询问窗", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) == DialogResult.No)
{
return;
}
this.button1.Enabled = false;
string err_text = "";
int wldw = 0;
string ssql = "select * from yf_rksq where id='" + tb.Rows[nrow]["id"].ToString() + "'";
DataTable tbdj = InstanceForm.BDatabase.GetDataTable(ssql);
if (tbdj.Rows.Count > 0)
{
wldw = Convert.ToInt32(tbdj.Rows[0]["wldw"]);
}
//删除目标服务器的申领单
DataTable tbyjks = Yp.SelectYjks(wldw, InstanceForm.BDatabase);
TrasenClasses.DatabaseAccess.RelationalDatabase mbdb = null;
if (Convert.ToInt32(tbyjks.Rows[0]["szjgbm"]) != InstanceForm._menuTag.Jgbm)
{
mbdb = TrasenFrame.Classes.WorkStaticFun.GetJgbmDb(Convert.ToInt32(tbyjks.Rows[0]["szjgbm"]));
ssql = "select * from yf_rksq where id='" + tb.Rows[nrow]["id"].ToString() + "' and shbz=1";
DataTable mbtb = mbdb.GetDataTable(ssql);
if (mbtb.Rows.Count > 0)
{
MessageBox.Show("", "该单据已审核,不能删除", MessageBoxButtons.OK, MessageBoxIcon.Error);
this.button1.Enabled = true;
return;
}
}
try
{
InstanceForm.BDatabase.BeginTransaction();
YF_RKSQ_RKSQMX.DeleteDj(new Guid(tb.Rows[nrow]["id"].ToString()), InstanceForm.BDatabase);
if (tbyjks.Rows.Count > 0)
{
if (Convert.ToInt32(tbyjks.Rows[0]["QYBZ"]) == 1 && Convert.ToInt32(tbyjks.Rows[0]["deptid"]) != Convert.ToInt32(InstanceForm.BCurrentDept.DeptId))
{
if (Convert.ToInt32(tbyjks.Rows[0]["szjgbm"]) != InstanceForm._menuTag.Jgbm && mbdb != null)
{
//Guid log_djid = Guid.Empty;
//ts_HospData_Share.ts_update_log ts = new ts_HospData_Share.ts_update_log();
//bool shbz = ts_HospData_Share.yp_lysq.GetShzt(new Guid(tb.Rows[nrow]["id"].ToString()), Convert.ToInt32(tbyjks.Rows[0]["szjgbm"]), out err_text);
//if (shbz == true) throw new Exception(err_text);
//string bz = InstanceForm.BCurrentDept.DeptName.Trim() + " 删除申领单 ";
//ts.Save_log(ts_HospData_Share.czlx.yp_药房申请领药单, bz, "YF_RKSQ", "ID", tb.Rows[nrow]["id"].ToString(), InstanceForm._menuTag.Jgbm, Convert.ToInt32(tbyjks.Rows[0]["szjgbm"]), 0, "", out log_djid, InstanceForm.BDatabase);
YF_RKSQ_RKSQMX.DeleteDj(new Guid(tb.Rows[nrow]["id"].ToString()), mbdb);
}
}
}
string str_old = InstanceForm.BCurrentUser.Name + "删除" + InstanceForm.BCurrentDept.DeptName + "药品申请单.单据主键:" + tb.Rows[nrow]["id"].ToString();
SystemLog systemLog = new SystemLog(-1, InstanceForm.BCurrentDept.DeptId, InstanceForm.BCurrentUser.EmployeeId, "删除单据", str_old, DateManager.ServerDateTimeByDBType(InstanceForm.BDatabase), 0, "主机名：" + System.Environment.MachineName, 8);
systemLog.Save();
systemLog = null;
//提交事务
InstanceForm.BDatabase.CommitTransaction();
this.button1.Enabled = true;
MessageBox.Show("删除成功");
this.butref_Click(sender, e);
}
catch (System.Exception err)
{
InstanceForm.BDatabase.RollbackTransaction();
this.button1.Enabled = true;
MessageBox.Show(err.Message);
}
}