承志医院管理系统项目解析 门诊医生工作站—书写病历（四）

1.3门诊医生工作站

由门诊医生进行看病，开药与诊疗方案。

1.31书写病历

书写病历这个模块，主要是给病人写病历，如图（1）



图（1）

控件名称	说明
日期控件（DateTimePicker）	控件可以在工具箱直接拖动至窗体，拖至窗体后右击属性可以修改控件的样式和各种属性，还可以编辑事件。
树形控件（TreeView）
文本（TextBox）
按钮（Button）
表格（DataGridView）
选项卡（TabControl）

下拉树功能实现：

第一步：数据库

1、表与关系



表1：简单元素表（MZ_SimplenessElementList）

列名	数据类型	主键/外键	说明
SimplenessElementID	int	主键	简单因素ID
SimplenessElementName	nchar(30)		简单元素名称
SimplenessElementID_f	int		简单元素ID_F

2:过程

第一步：数据库的存储过程

if(@Type='Frm_MenZhenYiShengGongZuoZhan_ChaXunYuanSu')
begin
SELECT     SimplenessElementID, RTRIM(LTRIM(SimplenessElementName)) as SimplenessElementName, SimplenessElementID_f
FROM         MZ_SimplenessElementList
where  SimplenessElementID_f=@SimplenessElementID_f
end

第二步：逻辑层(BLL)代码

DALPublic.DALMethod myDALMethod = new DALPublic.DALMethod();
[OperationContract]
public DataSet Frm_MenZhenYiShengGongZuoZhan_ChaXunYuanSu(int intJianDanYuanSuFuID)
{
SqlParameter[] mySqlParameters = {
new SqlParameter ("@Type",SqlDbType .Char),
new SqlParameter ("@SimplenessElementID_f",SqlDbType.Int),

};
mySqlParameters[0].Value = "Frm_MenZhenYiShengGongZuoZhan_ChaXunYuanSu";
mySqlParameters[1].Value = intJianDanYuanSuFuID;
DataTable dt = myDALMethod.QueryDataTable("门?诊?登Ì?记?_Frm_MenZhenYiShengGongZuoZhan", mySqlParameters);
DataSet ds = new DataSet();
ds.Tables.Add(dt);
return ds;
}

第三步：界面层(UIL)代码

#region 绑定DGV和树节点
private void Frm_MenZhenYiShengGongZuoZhan_Load(object sender, EventArgs e)
{
if (chkMedicine.Checked == true)
{
txtTieShu.ReadOnly = false;
}
else
{
txtTieShu.ReadOnly = true;

txtTieShu.BackColor = Color.Silver;
}
dgvPayMoneyHelpCheck.DataSource = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunHelpCheckListNotShouFei().Tables[0];
dgvWeiShouFeiChuZhiXinXi.DataSource = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunPrescriptionBillsList().Tables[0];
dgvWeiShouFeiLieBiao.DataSource = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunPrescriptionBillsList().Tables[0];
dgvHangNumberPatient.DataSource = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunBingRen().Tables[0];
dgvHangNumberPatient2.DataSource = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunBingRen().Tables[0];
bingdingRootNode();
}
private void bingdingRootNode()
{
DataTable dtYuanSu = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunYuanSu(0).Tables[0];//查询数据绑定数据表，获取父节点
for (int i = 0; i < dtYuanSu.Rows.Count; i++)//循环遍历数据
{
TreeNode tn = new TreeNode();//实例化一个树节点
tn.Text = dtYuanSu.Rows[i]["SimplenessElementName"].ToString();//在树节点绑定文本
tn.Tag = dtYuanSu.Rows[i]["SimplenessElementID"];//获取ID
tvwSimplenessElement.Nodes.Add(tn);//然后放在tvwSimplenessElement
bingdingChildNode(tn);//在Load事件绑定
}

}
private void bingdingChildNode(TreeNode tnF)
{
DataTable DT = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunYuanSu(int.Parse(tnF.Tag.ToString())).Tables[0];//根据父节点绑定数据
for (int i = 0; i < DT.Rows.Count; i++)
{
TreeNode tn = new TreeNode();
tn.Text = DT.Rows[i]["SimplenessElementName"].ToString();
tn.Tag = DT.Rows[i]["SimplenessElementID"];
tnF.Nodes.Add(tn);
bingdingChildNode(tn);

}
}
#endregion

3：点击哪个文本框值就传到哪里

#region 双击树节点传值
private void tvwSimplenessElement_DoubleClick(object sender, EventArgs e)
{
try
{
int nodeTag = Convert.ToInt32(tvwSimplenessElement.SelectedNode.Tag.ToString());//获取当前节点数据
DataTable DT = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_ChaXunYuanSuMingXi(nodeTag).Tables[0];
for (int i = 0; i < DT.Rows.Count; i++)
{
if (kaiguan == 0)
{
txtZhuSu.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + ", ";
return;
}
if (kaiguan == 1)
{
txtNowIllnessHistory.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + " , ";
return;
}

if (kaiguan == 2)
{
txtBeforeHistory.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + " , ";
return;
}
if (kaiguan == 3)
{
txtAllergyHistory.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + " , ";
return;
}
if (kaiguan == 4)
{
txtCheckBuild.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + " , ";
return;
}
if (kaiguan == 5)
{
txtPreliminaryDiagnosis.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + " , ";
return;
}
if (kaiguan == 6)
{
txtDealwithIdea.Text += DT.Rows[i]["SimplenessElementName"].ToString().Trim() + " , ";
return;
}

}
}
catch { }

}

private void txtNowIllnessHistory_Click(object sender, EventArgs e)
{
kaiguan = 1;//定义开关
}

private void txtZhuSu_Click(object sender, EventArgs e)
{
kaiguan = 0;
}

private void txtBeforeHistory_Click(object sender, EventArgs e)
{
kaiguan = 2;
}

private void txtAllergyHistory_Click(object sender, EventArgs e)
{
kaiguan = 3;
}

private void txtCheckBuild_Click(object sender, EventArgs e)
{
kaiguan = 4;
}

private void  txtPreliminaryDiagnosis_Click(object sender, EventArgs e)
{
kaiguan = 5;
}

private void txtDealwithIdea_Click(object sender, EventArgs e)
{
kaiguan = 6 ;
}
#endregion

4：保存当前病历

第一步：数据库

1、表与关系



表1:病历表

Primary Key(s): BingLiID

列名	数据类型	说明
BingLiID	int - Identity	病历ID
ZhuSu	nchar (50)	主诉
NowIllnessHistory	nchar (50)	现病史
BeforeHistory	nchar (50)	既往史
AllergyHistory	nchar (50)	过敏史
CheckBuild	nchar (50)	体格检查
PreliminaryDiagnosis	nchar (50)	初步诊断
DealwithIdea	nchar (100)	处理意见
BeforeNo	bit	以往否
MenZhenRegisterID	int	门诊登记ID
RegisterTime	datetime	登记时间
InHospitalNo	bit	住院否

第一步：数据库的存储过程

if(@Type='Frm_MenZhenYiShengGongZuoZhan_BingLiInsert')
begin

insert      MZ_BingLiList(ZhuSu, NowIllnessHistory, BeforeHistory, AllergyHistory,
CheckBuild, PreliminaryDiagnosis, DealwithIdea,
BeforeNo, MenZhenRegisterID, RegisterTime)
values     (@ZhuSu, @NowIllnessHistory, @BeforeHistory, @AllergyHistory,
@CheckBuild, @PreliminaryDiagnosis, @DealwithIdea,
@BeforeNo, @MenZhenRegisterID, @RegisterTime)
end

第二步：逻辑层(BLL)代码

<pre class="csharp" name="code"> [OperationContract]
public int Frm_MenZhenYiShengGongZuoZhan_BingLiInsert(string strZhuShu, string strXianBingShi, string strJiWangShi
, string strGuoMingShi,
string strTiGeJianCha, string strChuBuZhenDuan, string strChuLiYiJian,
bool YiWangFou, int intMenZhenDengJiID, DateTime DengJiShiJian)
{

SqlParameter[] mySqlParameters = {
new SqlParameter ("@Type",SqlDbType .Char),
new SqlParameter ("@ZhuSu",SqlDbType.Char),
new SqlParameter ("@NowIllnessHistory",SqlDbType .Char),
new SqlParameter ("@BeforeHistory",SqlDbType .Char),
new SqlParameter ("@AllergyHistory",SqlDbType .Char),
new SqlParameter ("@CheckBuild",SqlDbType.Char),
new SqlParameter ("@PreliminaryDiagnosis",SqlDbType.Char),
new SqlParameter ("@DealwithIdea",SqlDbType.Char),
new SqlParameter ("@BeforeNo",SqlDbType.Bit),
new SqlParameter ("@MenZhenRegisterID",SqlDbType.Int),
new SqlParameter ("@RegisterTime",SqlDbType.DateTime),
};

mySqlParameters[0].Value = "Frm_MenZhenYiShengGongZuoZhan_BingLiInsert";
mySqlParameters[1].Value = strZhuShu;
mySqlParameters[2].Value = strXianBingShi;
mySqlParameters[3].Value = strJiWangShi;
mySqlParameters[4].Value = strGuoMingShi;
mySqlParameters[5].Value = strTiGeJianCha;
mySqlParameters[6].Value = strChuBuZhenDuan;
mySqlParameters[7].Value = strChuLiYiJian;
mySqlParameters[8].Value = YiWangFou;
mySqlParameters[9].Value = intMenZhenDengJiID;
mySqlParameters[10].Value = DengJiShiJian;

int i = myDALMethod.UpdateData("门诊登记_Frm_MenZhenYiShengGongZuoZhan", mySqlParameters);
return i;

}

第三步：界面层(UIL)代码

private void BaoCun_Click(object sender, EventArgs e)
{
if (txtName.Text == "")
{
MessageBox.Show("还没有选择病人呢？");
return;
}
if (txtZhuSu.Text == "" || txtNowIllnessHistory.Text == "" || txtBeforeHistory.Text == "" || txtAllergyHistory.Text == "" || txtCheckBuild.Text == "" ||
txtPreliminaryDiagnosis.Text == "" || txtDealwithIdea.Text == "")
{
if (MessageBox.Show("当前这位病人的病历还没有写完呢，你确认要保存？", "温馨提示！", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
string strZhuShu = txtZhuSu.Text.Trim();
string strXianBingShi = txtNowIllnessHistory.Text;
string strJiWangShi = txtBeforeHistory.Text;
string strGuoMingShi = txtAllergyHistory.Text;
string strTiGeJianCha = txtCheckBuild.Text;
string strChuBuZhenDuan = txtPreliminaryDiagnosis.Text;
string strChuLiYiJian = txtDealwithIdea.Text;
bool YiWangFou = true;
int intMenZhenDengJiID = PublicStatic.intMenZhenGuaHaoID;
DateTime DengJiShiJian = Convert.ToDateTime(dtpRegisterTime.Text);

int i = myFrm_MenZhenYiShengGongZuoZhanClient.Frm_MenZhenYiShengGongZuoZhan_BingLiInsert(strZhuShu, strXianBingShi, strJiWangShi,
strGuoMingShi, strTiGeJianCha, strChuBuZhenDuan, strChuLiYiJian, YiWangFou, intMenZhenDengJiID, DengJiShiJian);

if (i > 0)
{

MessageBox.Show("保存成功！！！");
txtZhuSu.Text = "";
txtNowIllnessHistory.Text = "";
txtBeforeHistory.Text = "";
txtAllergyHistory.Text = "";
txtCheckBuild.Text = "";
txtPreliminaryDiagnosis.Text = "";
txtDealwithIdea.Text = "";
return;

}
else
{
MessageBox.Show("保存失败！！！");
}

}
}

仅供学习，禁止用于商业用途