承志医疗管理系统技术解析住院登记（三）

最新推荐文章于 2020-04-29 11:43:11 发布

yanxi_liang

最新推荐文章于 2020-04-29 11:43:11 发布

阅读量1.7k

点赞数 1

分类专栏： C# WCF 文章标签： WCF 医疗

本文链接：https://blog.csdn.net/lyx082912/article/details/46043175

版权

C# 同时被 2 个专栏收录

11 篇文章 0 订阅

订阅专栏

WCF

9 篇文章 0 订阅

订阅专栏

从主界面进入住院登记，主界面如1.1（图1），然后对病人进行入院登记，可以按门诊导入按钮导入门诊登记的病人，点击疾病编码选择对应的入院诊断和门诊诊断，如果以往病人再来登记，在输入姓名时会弹出相关的信息供选择，填写好相应的信息后点击保存，退出！功能如1.1 （图2）

1.1（图1）

1.1 （图2）

门诊病人导入，导入对应的门诊病人资料。如下1.1（图3）

1.1图（3）

疾病编码选定如下2.1（图4）

2.1（图4）

从界面上可以看到我们这里用到的控件有

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

主界面下拉框的绑定

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

 if @Type='Frm_BingRenDenJi_cboYiLiaoFanShi'
	begin
		SELECT     DiscountTypeID,RTRIM( LTRIM (DiscountTypeName)) as DiscountTypeName
		FROM         BS_DiscountList
	end --绑定医疗方式

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

 DALPublic.DALMethod myDALMethod = new DALPublic.DALMethod();
        [OperationContract]
        public DataSet Frm_BingRenDenJi_cboYiLiaoFanShi()
        {
            SqlParameter[] mySqlParameters = {
                                               new SqlParameter ("@Type",SqlDbType .Char),
                                           };
            mySqlParameters[0].Value = "Frm_BingRenDenJi_cboYiLiaoFanShi";
            DataTable dt = myDALMethod.QueryDataTable("住院登记_Frm_BingRenDenJi", mySqlParameters);
            DataSet ds = new DataSet();
            ds.Tables.Add(dt);
            return ds;
        }

第三步界面层(UIL)代码，在窗体的Load事件中绑定下拉框的数据

 private void Frm_BingRenDengJi_Load(object sender, EventArgs e)
        {
           
            #region 下拉框绑定
            cboMedicalTreatmentWays.DataSource = myFrm_BingRenDengJiClient.
                Frm_BingRenDenJi_cboYiLiaoFanShi().Tables[0];//绑定数据源
            cboMedicalTreatmentWays.DisplayMember = "DiscountTypeName";//
            cboMedicalTreatmentWays.ValueMember = "DiscountTypeID";
}

1门诊导入的实现

第一步：数据库

1.1、表与关系

表1.门诊登记表（MZ_MenZhenRegisterList)

列名	数据类型 / 主外键	说明
MenZhenRegisterID	int - Identity（主键）	门诊登记ID
MenZhenNumber	nchar (30)	门诊号
Name	nchar (10)	姓名
SpellCode	nchar (50)	拼音码
SexID	int（外键）	Yes
BirthDate	datetime	出生日期
Age	nchar (10)	年龄
IdentityCard	nchar (30)	身份证号
MedicalTreatmentInsuranceTypeID	int（外键）	医疗保险类别ID
MedicalTreatmentCard	nchar (30)	医疗证号
RegisterDate	datetime	登记日期
ProfessionID	Int（外键）	职业ID
NationalityID	int（外键）	国籍ID
ProvinceID	int（外键）	省别ID
CountyID	int（外键）	县市ID
NationID	int（外键）	民族ID
MarriageID	int（外键）	婚姻ID
FamilyAddress	nchar (50)	家庭住址
HousePhone	nchar (20)	住宅电话
MakeBillsPersonID	int（外键）	制单人ID
HangNumberNo	bit	挂号否
ChargeNo	bit	收费否

第一步数据库 1.2门诊导入查询

     if @Type='Frm_BingRenDenJi_SelectMenZhenBingRen'
    begin
 SELECT     MZ_MenZhenRegisterList.MenZhenNumber, MZ_MenZhenRegisterList.Name, MZ_MenZhenRegisterList.SpellCode, MZ_MenZhenRegisterList.BirthDate, MZ_MenZhenRegisterList.Age, 
                      MZ_MenZhenRegisterList.IdentityCard, MZ_MenZhenRegisterList.MedicalTreatmentCard, MZ_MenZhenRegisterList.RegisterDate, MZ_MenZhenRegisterList.FamilyAddress, 
                      MZ_MenZhenRegisterList.HousePhone, MZ_MenZhenRegisterList.HangNumberNo, AttributeMingXiList.AttributeMingXiName AS Sex, 
                      AttributeMingXiList_1.AttributeMingXiName AS MedicalTreatmentInsuranceType, AttributeMingXiList_2.AttributeMingXiName AS Profession, AttributeMingXiList_3.AttributeMingXiName AS Nationality,
                       AttributeMingXiList_4.AttributeMingXiName AS Province, AttributeMingXiList_5.AttributeMingXiName AS County, AttributeMingXiList_6.AttributeMingXiName AS Nation, 
                      AttributeMingXiList_7.AttributeMingXiName AS Marriage, SYS_UserList.UserName AS MakeBillsPerson, MZ_MenZhenRegisterList.SexID, MZ_MenZhenRegisterList.ProfessionID, 
                      MZ_MenZhenRegisterList.NationalityID, MZ_MenZhenRegisterList.ProvinceID, MZ_MenZhenRegisterList.CountyID, MZ_MenZhenRegisterList.NationID, MZ_MenZhenRegisterList.MarriageID, 
                      MZ_MenZhenRegisterList.MedicalTreatmentInsuranceTypeID, MZ_MenZhenRegisterList.MakeBillsPersonID
FROM         MZ_MenZhenRegisterList INNER JOIN
                      AttributeMingXiList ON MZ_MenZhenRegisterList.SexID = AttributeMingXiList.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_1 ON MZ_MenZhenRegisterList.MedicalTreatmentInsuranceTypeID = AttributeMingXiList_1.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_2 ON MZ_MenZhenRegisterList.ProfessionID = AttributeMingXiList_2.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_3 ON MZ_MenZhenRegisterList.NationalityID = AttributeMingXiList_3.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_4 ON MZ_MenZhenRegisterList.ProvinceID = AttributeMingXiList_4.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_5 ON MZ_MenZhenRegisterList.CountyID = AttributeMingXiList_5.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_6 ON MZ_MenZhenRegisterList.NationID = AttributeMingXiList_6.AttributeMingXiID INNER JOIN
                      AttributeMingXiList AS AttributeMingXiList_7 ON MZ_MenZhenRegisterList.MarriageID = AttributeMingXiList_7.AttributeMingXiID INNER JOIN
                      SYS_UserList ON MZ_MenZhenRegisterList.MakeBillsPersonID = SYS_UserList.UserID

    end--查询门诊病人

第二步，逻辑层（BLL）代码

 [OperationContract]
        public DataSet Frm_BingRenDenJi_SelectMenZhenBingRen()
        {
            SqlParameter[] mySqlParameters = {
                                               new SqlParameter ("@Type",SqlDbType .Char),
                                           };
            mySqlParameters[0].Value = "Frm_BingRenDenJi_SelectMenZhenBingRen";
            DataTable dt = myDALMethod.QueryDataTable("住院登记_Frm_BingRenDenJi", mySqlParameters);
            DataSet ds = new DataSet();
            ds.Tables.Add(dt);
            return ds;
        }

第三步界面层（UIL）代码数据绑定

private void dgvMenZhenBingRenXinXi_CellDoubleClick(object sender, DataGridViewCellEventArgs e)
        {
            BangDingMenZhenBingRen();//表格双击调用绑定绑定门诊病人方法
            panel1.Visible = false;//门诊导入表格隐藏
           
        }

再对应的门诊导入表格双击方法中调用

 #region 绑定门诊病人
     public void BangDingMenZhenBingRen()
 {
            cboProfession.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["ProfessionID"].Value.ToString().Trim();//下拉框值的绑定
            cboSex.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["SexID"].Value.ToString().Trim();//下拉框值的绑定
            cboMedicalTreatmentWays.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["MedicalTreatmentInsuranceTypeID"].Value.ToString().Trim();//下拉框值的绑定
            cboNationality.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["NationalityID"].Value.ToString().Trim();//下拉框值的绑定
            cboProvince.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["ProvinceID"].Value.ToString().Trim();//下拉框值的绑定
            cboCity.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["CountyID"].Value.ToString().Trim();//下拉框值的绑定
            cboNation.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["NationID"].Value.ToString().Trim();//下拉框值的绑定
            cboMarriageCase.SelectedValue = dgMenZhenInformation.CurrentRow.Cells["MarriageID"].Value.ToString().Trim();//下拉框值的绑定
            cboProfession.Text = dgMenZhenInformation.CurrentRow.Cells["Profession"].Value.ToString().Trim();//文本框值的绑定
            cboSex.Text = dgMenZhenInformation.CurrentRow.Cells["Sex"].Value.ToString().Trim();//文本框值的绑定
            cboMedicalTreatmentWays.Text = dgMenZhenInformation.CurrentRow.Cells["MedicalTreatmentInsuranceType"].Value.ToString().Trim();//文本框值的绑定
            cboNationality.Text = dgMenZhenInformation.CurrentRow.Cells["Nationality"].Value.ToString().Trim();//文本框值的绑定
            cboProvince.Text = dgMenZhenInformation.CurrentRow.Cells["Province"].Value.ToString().Trim();//文本框值的绑定
            cboCity.Text = dgMenZhenInformation.CurrentRow.Cells["County"].Value.ToString().Trim();//文本框值的绑定
            cboNation.Text = dgMenZhenInformation.CurrentRow.Cells["Nation"].Value.ToString().Trim();//文本框值的绑定
            cboMarriageCase.Text = dgMenZhenInformation.CurrentRow.Cells["Marriage"].Value.ToString().Trim();//文本框值的绑定
            txtMenZhenNumber.Text = dgMenZhenInformation.CurrentRow.Cells["MenZhenNumber"].Value.ToString().Trim();//文本框值的绑定
            txtMenZhenNumber1.Text = dgMenZhenInformation.CurrentRow.Cells["MenZhenNumber"].Value.ToString().Trim();//文本框值的绑定
            txtName.Text = dgMenZhenInformation.CurrentRow.Cells["BingRenName"].Value.ToString().Trim();//文本框值的绑定
            dtmDirthDate.Text = dgMenZhenInformation.CurrentRow.Cells["BirthDate"].Value.ToString().Trim();//文本框值的绑定
            txtAge.Text = dgMenZhenInformation.CurrentRow.Cells["Age"].Value.ToString().Trim();//文本框值的绑定
            txtIdentityCardNumber.Text = dgMenZhenInformation.CurrentRow.Cells["IdentityCard"].Value.ToString().Trim();//文本框值的绑定
            txtMedicalTreatmentNumber.Text = dgMenZhenInformation.CurrentRow.Cells["MedicalTreatmentCard"].Value.ToString().Trim();//文本框值的绑定
            txtFamilyAddress.Text = dgMenZhenInformation.CurrentRow.Cells["FamilyAddress"].Value.ToString().Trim();//文本框值的绑定
            txtPhone.Text = dgMenZhenInformation.CurrentRow.Cells["HousePhone"].Value.ToString().Trim();//文本框值的绑定

        }#endregion

4当所有的数据已经录入完以后进行住院登记保存

功能实现

表和关系

注：其他的外键连的也是属性明细表：AttributeMingXiList

表2.住院登记表（dbo.ZY_InHospitalRegisterList）

列名	数据类型 / 主外键	说明
RegisterInhospitalID	int - Identity	住院登记ID
InHospitalNumber	nchar (20)	住院号
MedicalTreatmentWaysID	int	医疗方式ID
Name	nchar (10)	姓名
NationalityID	int	国籍ID
ProvinceID	int	省份ID
CityID	int	市ID
CountyID	int	县ID
VillageID	Int（主键）	村ID
HuKouAddress	nchar (50)	户口地址
FamilyAddress	nchar (50)	家庭住址
ProfessionID	Int（外键）	职业ID
LinkMan	nchar (20)	联系人
PhoneNumber	nchar (20)	手机号
MenZhenNumber	nchar (50)	门诊号
EnterHospitalDate	datetime	入院日期
EnterDiagnosis	nchar (50)	入院诊断
NurseGradeID	int（外键）	护理级别ID
CommunityFilesNumber	nchar (20)	社区档案号
MedicalTreatmentCard	nchar (20)	医疗证号
SexID	int（外键）	性别ID
NationID	int（外键）	民族ID
WorkUnit	nchar (50)	工作单位
Relation	nchar (10)	关系
ElectronMail	nchar (20)	电子邮件
MenZhengDiagnosi	nchar (50)	门诊诊断
EnterHospitalCaseID	int（外键）	入院情况ID
MedicalRecordNumber	nchar (20)	病案号
IdentityCardNumber	nchar (20)	身份证号
BirthDate	datetime	出生日期
MarriageCaseID	int（外键）	婚姻状况ID
EnterNumber	decimal (18)	住院次数
PostalNumber_s	nchar (10)	邮政编码_s
Age	nchar (10)	年龄
PostalNumber_d	nchar (10)	邮政编码_d
UnitPhone	nchar (20)	单位电话
Phone	nchar (20)	电话
LinkManAddress	nchar (50)	联系人住址
QQNumber	nchar (20)	QQ号
DoctorID	int（外键）	医生ID
OfficeID	int（外键）	科室ID
ConfirmDiagnoseDate	datetime	确诊日期
DietCaseID	int（外键）	饮食情况ID
BloodTypeID	int（外键）	血型ID
LeaveHospitalNo	bit	出院否
MenZhenRegisterID	int	门诊登记ID
BedLocationAllocationNo	bit	床位分配否

表3 性明细表：AttributeMingXiList

字段	类型/ 主外键	说明
AttributeMingXiID	int （主键）	属性明细ID
AttributeMusterID	Int（外键）	属性集合ID
AttributeMingXiName	nchar (20)	属性明细名称
AttributeID_Fu	int	属性父ID

第一步；数据库存储过程

	if @Type='Frm_BingRenDenJi_InsertZhuYuanDengJi'
	begin
	begin tran

	insert      ZY_InHospitalRegisterList (InHospitalNumber, MedicalTreatmentWaysID, Name, NationalityID, 
		    ProvinceID, CityID, CountyID, VillageID, HuKouAddress, FamilyAddress, ProfessionID, LinkMan, PhoneNumber, 
		    MenZhenNumber, EnterHospitalDate, EnterDiagnosis, NurseGradeID, CommunityFilesNumber,
		    MedicalTreatmentCard, SexID, NationID, WorkUnit, Relation, ElectronMail, MenZhengDiagnosi, 
	            EnterHospitalCaseID, MedicalRecordNumber, IdentityCardNumber, BirthDate, MarriageCaseID, EnterNumber, 
		    PostalNumber_s, Age, PostalNumber_d, UnitPhone, Phone, LinkManAddress,QQNumber, DoctorID, OfficeID,
		    ConfirmDiagnoseDate, DietCaseID, BloodTypeID,LeaveHospitalNo,BedLocationAllocationNo)
	values     (@InHospitalNumber,@MedicalTreatmentWaysID, @Name, @NationalityID, @ProvinceID, @CityID, @CountyID,
	           @VillageID, @HuKouAddress, @FamilyAddress, @ProfessionID, @LinkMan, @PhoneNumber, 
	           @MenZhenNumber, @EnterHospitalDate, @EnterDiagnosis, @NurseGradeID, @CommunityFilesNumber,
	           @MedicalTreatmentCard, @SexID, @NationID, @WorkUnit, @Relation, @ElectronMail, @MenZhengDiagnosi, 
	           @EnterHospitalCaseID, @MedicalRecordNumber, @IdentityCardNumber, @BirthDate, @MarriageCaseID,
	           @EnterNumber, @PostalNumber_s, @Age, @PostalNumber_d, @UnitPhone, @Phone, @LinkManAddress, 
	           @QQNumber, @DoctorID, @OfficeID, @ConfirmDiagnoseDate, @DietCaseID, @BloodTypeID,0,0)   


	select @@IDENTITY
	commit tran
	end--新增住院登记数据

第二步；逻辑层（BLL）代码；

 [OperationContract]
        public DataSet Frm_BingRenDenJi_InsertZhuYuanDengJi
            (string strZhuYuanHao, int YiLiaoFangShiID, string strXingMing, int GuoJiaID,
            int ShenID, int ShiID, int XianID,int CunID,string strHuKouDiZhi,string strJiaTingZhuZi,
            int ZhiYeID,string strLianXiRen,string strShouJIHao,string strMenZhenHao,DateTime dtmRuYuanRiQi,
            string strRuYuanZhenDuan,int HuLiJiBieID,string strSheQuDanAnHao,string strYiLiaoZhenHao,
            int XingBieID,int MinZuID,string strGongZuoDanWei,string strGuanXi,string strDianZiYouJian,
            string strMenZhenZhenDuan,int RuYuanQingKuanID, string strBingAnHao,string strShengFenZhengHao,
            DateTime dtmChuShengRiQi,int HuYunZhuanKuanID,decimal decZhuYuanCiShu,string strYouZhenBianMa_s,
            int intNianLi,string strYouZhenBianMa_d,string strDanWeiDianHua,string strDianHua,string strLianXiRenZhuZhi,
            string strQQhao,int YiShengID,int KeShiID,DateTime dtmQieZhenRiQi,int YinShiQingKuanID,int XueXingID)
        {

            SqlParameter[] mySqlParameters = {

                                                new SqlParameter ("@Type",SqlDbType .Char),
                                                new SqlParameter ("@InHospitalNumber",SqlDbType .Char),
                                                new SqlParameter ("@MedicalTreatmentWaysID",SqlDbType.Int),
                                                new SqlParameter ("@Name",SqlDbType .Char),
                                                new SqlParameter ("@NationalityID",SqlDbType .Int),
                                                new SqlParameter ("@ProvinceID",SqlDbType .Int),
                                                new SqlParameter ("@CityID",SqlDbType .Int),
                                                new SqlParameter ("@CountyID",SqlDbType .Int),
                                                new SqlParameter ("@VillageID",SqlDbType .Int),
                                                new SqlParameter ("@HuKouAddress",SqlDbType .Char),
                                                new SqlParameter ("@FamilyAddress",SqlDbType .Char),
                                                new SqlParameter ("@ProfessionID",SqlDbType .Int),
                                                new SqlParameter ("@LinkMan",SqlDbType .Char),
                                                new SqlParameter ("@PhoneNumber",SqlDbType .Char),
                                                new SqlParameter ("@MenZhenNumber",SqlDbType .Char),
                                                new SqlParameter ("@EnterHospitalDate",SqlDbType .DateTime),
                                                new SqlParameter ("@EnterDiagnosis",SqlDbType .Char),
                                                new SqlParameter ("@NurseGradeID",SqlDbType .Int),
                                                new SqlParameter ("@CommunityFilesNumber",SqlDbType .Char),
                                                new SqlParameter ("@MedicalTreatmentCard",SqlDbType .Char),
                                                new SqlParameter ("@SexID",SqlDbType .Int),
                                                new SqlParameter ("@NationID",SqlDbType .Int),
                                                new SqlParameter ("@WorkUnit",SqlDbType .Char),
                                                new SqlParameter ("@Relation",SqlDbType .Char),
                                                new SqlParameter ("@ElectronMail",SqlDbType .Char),
                                                new SqlParameter ("@MenZhengDiagnosi",SqlDbType .Char),
                                                new SqlParameter ("@EnterHospitalCaseID",SqlDbType .Int),
                                                new SqlParameter ("@MedicalRecordNumber",SqlDbType .Char),
                                                new SqlParameter ("@IdentityCardNumber",SqlDbType .Char),
                                                new SqlParameter ("@BirthDate",SqlDbType .DateTime),
                                                new SqlParameter ("@MarriageCaseID",SqlDbType .Int),
                                                new SqlParameter ("@EnterNumber",SqlDbType .Decimal),
                                                new SqlParameter ("@PostalNumber_s",SqlDbType .Char),
                                                new SqlParameter ("@Age",SqlDbType .Int),
                                                new SqlParameter ("@PostalNumber_d",SqlDbType .Char),
                                                new SqlParameter ("@UnitPhone",SqlDbType .Char),
                                                new SqlParameter ("@Phone",SqlDbType .Char),
                                                new SqlParameter ("@LinkManAddress",SqlDbType .Char),
                                                new SqlParameter ("@QQNumber",SqlDbType .Char),
                                                new SqlParameter ("@DoctorID",SqlDbType .Int),
                                                new SqlParameter ("@OfficeID",SqlDbType .Int),
                                                new SqlParameter ("@ConfirmDiagnoseDate",SqlDbType .DateTime),
                                                new SqlParameter ("@DietCaseID",SqlDbType .Int),
                                                new SqlParameter ("@BloodTypeID",SqlDbType .Int),
                                               
                                           };

                                mySqlParameters[0].Value = "Frm_BingRenDenJi_InsertZhuYuanDengJi";
                                mySqlParameters[1].Value =strZhuYuanHao;
                                mySqlParameters[2].Value =YiLiaoFangShiID;
                                mySqlParameters[3].Value =strXingMing;
                                mySqlParameters[4].Value =GuoJiaID;
                                mySqlParameters[5].Value =ShenID;
                                mySqlParameters[6].Value =ShiID;
                                mySqlParameters[7].Value =XianID;
                                mySqlParameters[8].Value =CunID;
                                mySqlParameters[9].Value =strHuKouDiZhi;
                                mySqlParameters[10].Value =strJiaTingZhuZi;
                                mySqlParameters[11].Value =ZhiYeID;
                                mySqlParameters[12].Value =strLianXiRen;
                                mySqlParameters[13].Value =strShouJIHao;
                                mySqlParameters[14].Value =strMenZhenHao;
                                mySqlParameters[15].Value =dtmRuYuanRiQi;
                                mySqlParameters[16].Value =strRuYuanZhenDuan;
                                mySqlParameters[17].Value =HuLiJiBieID;
                                mySqlParameters[18].Value =strSheQuDanAnHao;  
                                mySqlParameters[19].Value =strYiLiaoZhenHao;
                                mySqlParameters[20].Value =XingBieID;
                                mySqlParameters[21].Value =MinZuID;
                                mySqlParameters[22].Value =strGongZuoDanWei;
                                mySqlParameters[23].Value =strGuanXi;
                                mySqlParameters[24].Value =strDianZiYouJian;
                                mySqlParameters[25].Value =strMenZhenZhenDuan;
                                mySqlParameters[26].Value =RuYuanQingKuanID;
                                mySqlParameters[27].Value =strBingAnHao;
                                mySqlParameters[28].Value =strShengFenZhengHao;
                                mySqlParameters[29].Value =dtmChuShengRiQi;
                                mySqlParameters[30].Value =HuYunZhuanKuanID;
                                mySqlParameters[31].Value =decZhuYuanCiShu;
                                mySqlParameters[32].Value =strYouZhenBianMa_s;
                                mySqlParameters[33].Value =intNianLi;
                                mySqlParameters[34].Value =strYouZhenBianMa_d;
                                mySqlParameters[35].Value =strDanWeiDianHua;
                                mySqlParameters[36].Value =strDianHua;
                                mySqlParameters[37].Value =strLianXiRenZhuZhi;
                                mySqlParameters[38].Value =strQQhao;
                                mySqlParameters[39].Value =YiShengID;
                                mySqlParameters[40].Value =KeShiID;
                                mySqlParameters[41].Value =dtmQieZhenRiQi;
                                mySqlParameters[42].Value =YinShiQingKuanID;
                                mySqlParameters[43].Value = XueXingID;
            DataTable dt = myDALMethod.QueryDataTable("住院登记_Frm_BingRenDenJi", mySqlParameters);
            DataSet ds = new DataSet();
            ds.Tables.Add(dt);
            return ds;
        }

第三步：界面层（UIL）代码

  #region 保存
        private void btnSave_Click(object sender, EventArgs e)
        {
           if (txtName.Text=="")//判断姓名为空时
           {
               MessageBox.Show("姓名必填！");//提示
               return;//跳出次方发

           }
            if (txtAge.Text=="")
            {
                MessageBox.Show("年龄必填！");
                return;
            }
                string strZhuYuanHao = txtInHospitalNumber.Text;//参数赋值
                int YiLiaoFangShiID = (int)cboMedicalTreatmentWays.SelectedValue;//参数赋值
                string strXingMing = txtName.Text;//参数赋值
                int GuoJiaID = (int)cboNationality.SelectedValue;
                int ShenID = (int)cboProvince.SelectedValue;
                int ShiID = (int)cboCity.SelectedValue;
                int XianID = (int)cboCounty.SelectedValue;
                int CunID = (int)cboVillage.SelectedValue;
                string strHuKouDiZhi = txtHuKouAddress.Text;
                string strJiaTingZhuZi = txtFamilyAddress.Text;
                int ZhiYeID = (int)cboProfession.SelectedValue;
                string strLianXiRen = txtLinkMan.Text;
                string strShouJIHao = txtPhoneNumber.Text;
                string strMenZhenHao = txtMenZhenNumber1.Text;
                DateTime dtmRuYuanRiQi = Convert.ToDateTime(dtmEnterHospitalDate.Text);
                string strRuYuanZhenDuan = txtEnterDiagnosis.Text;
                int HuLiJiBieID = (int)cboNurseGrade.SelectedValue;
                string strSheQuDanAnHao = txtCommunityFilesNumber.Text;
                string strYiLiaoZhenHao = txtMedicalTreatmentNumber.Text;
                int XingBieID = (int)cboSex.SelectedValue;
                int MinZuID = (int)cboNation.SelectedValue;
                string strGongZuoDanWei = txtWorkUnit.Text;
                string strGuanXi = txtRelation.Text;
                string strDianZiYouJian = txtElectronMail.Text;
                string strMenZhenZhenDuan = txtMenZhengDiagnosi.Text;
                int RuYuanQingKuanID = (int)cboEnterHospitalCase.SelectedValue;
                string strBingAnHao = txtMedicalRecordNumber.Text;
                string strShengFenZhengHao = txtIdentityCardNumber.Text;
                DateTime dtmChuShengRiQi = Convert.ToDateTime(dtmDirthDate.Text);
                int HuYunZhuanKuanID = (int)cboMarriageCase.SelectedValue;
                decimal decZhuYuanCiShu = Convert.ToDecimal(txtZhuYuanCiShu.Text);
                string strYouZhenBianMa_s = txtPostalNumber_s.Text;
                int intNianLi = Convert.ToInt32(txtAge.Text);
                string strYouZhenBianMa_d = txtPostalNumber_d.Text;
                string strDanWeiDianHua = txtUnitPhone.Text;
                string strDianHua = txtPhone.Text;
                string strLianXiRenZhuZhi = txtLiankManAddress.Text;
                string strQQhao = txtQQ.Text;
                int YiShengID = Convert.ToInt32( cboDoctor.SelectedValue);
                int KeShiID = 1;
                DateTime dtmQieZhenRiQi = Convert.ToDateTime(dtmConfirmDiagnoseDate.Text);
                int YinShiQingKuanID = Convert.ToInt32( cboDietCase.SelectedValue);
                int XueXingID = Convert.ToInt32( CboBloodType.SelectedValue);
              //以上为对应的参数赋值
                DataTable dt = myFrm_BingRenDengJiClient.Frm_BingRenDenJi_InsertZhuYuanDengJi
                        (strZhuYuanHao, YiLiaoFangShiID, strXingMing, GuoJiaID, ShenID, ShiID,
                        XianID, CunID, strHuKouDiZhi, strJiaTingZhuZi, ZhiYeID, strLianXiRen, strShouJIHao, strMenZhenHao,
                        dtmRuYuanRiQi, strRuYuanZhenDuan, HuLiJiBieID, strSheQuDanAnHao, strYiLiaoZhenHao,
                        XingBieID, MinZuID, strGongZuoDanWei, strGuanXi, strDianZiYouJian, strMenZhenZhenDuan, RuYuanQingKuanID,
                        strBingAnHao, strShengFenZhengHao, dtmChuShengRiQi, HuYunZhuanKuanID, decZhuYuanCiShu, strYouZhenBianMa_s,
                        intNianLi, strYouZhenBianMa_d, strDanWeiDianHua, strDianHua, strLianXiRenZhuZhi, strQQhao, YiShengID,
                        KeShiID, dtmQieZhenRiQi, YinShiQingKuanID, XueXingID).Tables[0];//调用逻辑层新增方法赋参数进行新增
                        PulicStatic.ZhuYuanDengjiID = Convert.ToInt32(dt.Rows[0][0]);//获取刚新增的住院ID赋值到公共静态变量
          
            if (PulicStatic.ZhuYuanDengjiID > 0)//如果静态变量值>0
            {
                MessageBox.Show("登记成功！！");//提示新增成功
                Frm_ZhuYuanYaJin_Zi myFrm_ZhuYuanYaJin_Zi = new Frm_ZhuYuanYaJin_Zi();
                myFrm_ZhuYuanYaJin_Zi.ShowDialog();//弹出交押金界面


            }
        }

到此就完成了一个住院登记的功能

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

yanxi_liang

关注

1
点赞
踩
1

收藏

觉得还不错? 一键收藏
0
评论
承志医疗管理系统技术解析住院登记（三）

从主界面进入住院登记，主界面如1.1（图1），然后对病人进行入院登记，可以按门诊导入按钮导入门诊登记的病人，点击疾病编码选择对应的入院诊断和门诊诊断，如果以往病人再来登记，在输入姓名时会弹出相关的信息供选择，填写好相应的信息后点击保存，退出！功能如1.1 （图2）1.1（图1）
复制链接

扫一扫