Example #1
0
        public void SetValues(bool Chuyenvien, DmucDoituongkcb objDoituongKCB, KcbLuotkham objLuotkham)
        {
            this.Chuyenvien     = Chuyenvien;
            this.objDoituongKCB = objDoituongKCB;
            this.objLuotkham    = objLuotkham;
            //Gan gia tri
            chkCapCuu.Checked    = Utility.Int32Dbnull(objLuotkham.TrangthaiCapcuu, 0) == 1;
            chkTraiTuyen.Checked = Utility.Int32Dbnull(objLuotkham.DungTuyen, 0) == 0;
            lblTuyenBHYT.Text    = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
            txtDiachi_bhyt._Text = Utility.sDbnull(objLuotkham.DiachiBhyt);
            if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgaybatdauBhyt)))
            {
                dtInsFromDate.Value = Convert.ToDateTime(objLuotkham.NgaybatdauBhyt);
            }
            if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgayketthucBhyt)))
            {
                dtInsToDate.Value = Convert.ToDateTime(objLuotkham.NgayketthucBhyt);
            }
            txtPtramBHYT.Text     = Utility.sDbnull(objLuotkham.PtramBhyt, "0");
            txtptramDauthe.Text   = Utility.sDbnull(objLuotkham.PtramBhytGoc, "0");
            txtMaDtuong_BHYT.Text = Utility.sDbnull(objLuotkham.MaDoituongBhyt);

            txtMaQuyenloi_BHYT.Text   = Utility.sDbnull(objLuotkham.MaQuyenloi);
            txtNoiDongtrusoKCBBD.Text = Utility.sDbnull(objLuotkham.NoiDongtrusoKcbbd);
            txtOthu4.Text             = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(5, 2);
            txtOthu5.Text             = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(7, 3);
            txtOthu6.Text             = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(10, 5);

            txtMaDTsinhsong.SetCode(objLuotkham.MadtuongSinhsong);
            chkGiayBHYT.Checked = Utility.Byte2Bool(objLuotkham.GiayBhyt);

            txtNoiphattheBHYT.Text = Utility.sDbnull(objLuotkham.MaNoicapBhyt);
            txtNoiDKKCBBD.Text     = Utility.sDbnull(objLuotkham.MaKcbbd);
            pnlBHYT.Enabled        = true;
        }
Example #2
0
        //Các phương thức khởi tạo của Class
        #region "Constructors"
        public frm_dmuc_doituongkcb()
        {
            InitializeComponent();
            m_Query = DmucDoituongkcb.CreateQuery();

            InitEvents();
        }
 /// <summary>
 /// hàm thưucj hiện việc cập nhập lại thông tin thành công
 /// </summary>
 private void UpdateData()
 {
     objBed = createBed();
     objBed.MarkOld();
     objBed.IsNew = false;
     objBed.Save();
     if (MyGetData != null)
     {
         MyGetData();
         Utility.GonewRowJanus(grdList, NoitruDmucGiuongbenh.Columns.IdGiuong, Utility.sDbnull(txtID.Text));
     }
     if (chkApDungGia.Checked)
     {
         new Delete().From(NoitruQheDoituongBuonggiuong.Schema)
         .Where(NoitruQheDoituongBuonggiuong.Columns.IdGiuong).IsEqualTo(Utility.Int32Dbnull(txtID.Text)).Execute();
         foreach (Janus.Windows.GridEX.GridEXRow gridExRow in grdQuanheGiuong.GetCheckedRows())
         {
             NoitruQheDoituongBuonggiuong objectType = new NoitruQheDoituongBuonggiuong();
             objectType.DonGia = (objectType.MaDoituongKcb == "DV" ?
                                  Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.DonGia].Value, objBed.GiaDichvu)
                              : (objectType.MaDoituongKcb == "BHYT" ?
                                 Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.DonGia].Value, objBed.GiaBhyt) :
                                 Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.DonGia].Value, objBed.GiaKhac))
                                  )
             ;
             objectType.PhuthuDungtuyen = Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.PhuthuDungtuyen].Value, 0);
             objectType.PhuthuTraituyen = Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.PhuthuTraituyen].Value, 0);
             objectType.MaDoituongKcb   = Utility.sDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.MaDoituongKcb].Value);
             SqlQuery sqlQuery =
                 new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.Columns.MaDoituongKcb).IsEqualTo(
                     objectType.MaDoituongKcb);
             DmucDoituongkcb objectType1 = sqlQuery.ExecuteSingle <DmucDoituongkcb>();
             if (objectType1 != null)
             {
                 objectType.IdLoaidoituongKcb = Utility.Int32Dbnull(objectType1.IdLoaidoituongKcb);
             }
             objectType.KieuThue = "GIUONG";
             // DmucDoituongkcb objectType1=DmucDoituongkcb.FetchByID()
             objectType.IdBuong  = Utility.Int16Dbnull(txtBuong.MyID);
             objectType.IdGiuong = Utility.Int16Dbnull(objBed.IdGiuong, -1);
             objectType.IsNew    = true;
             objectType.Save();
         }
     }
     Utility.SetMsg(lblMsg, "Bạn thực hiện sửa thông tin  thành công", true);
     if (chkthemmoilientuc.Checked)
     {
         ClearControl();
     }
     else
     {
         this.Close();
     }
 }
Example #4
0
        /// <summary>
        /// hàm thực hiện viec tính toán giá đặc biệt cho bệnh nhân
        /// </summary>
        /// <param name="objChidinhChitiet"></param>
        /// <param name="objLuotkham"></param>
        /// <param name="paymentTypeId"></param>
        public static void PtramBHYTDacBiet(KcbChidinhclsChitiet objChidinhChitiet, KcbLuotkham objLuotkham, int paymentTypeId, ref bool bExist)
        {
            bExist = false;
            string          isDungTuyen = "DT";
            DmucDoituongkcb objectType  = DmucDoituongkcb.FetchByID(objLuotkham.IdDoituongKcb);

            if (objectType != null)
            {
                switch (objectType.MaDoituongKcb)
                {
                case "BHYT":
                    if (Utility.Int32Dbnull(objLuotkham.DungTuyen, "0") == 1)
                    {
                        isDungTuyen = "DT";
                    }
                    else
                    {
                        isDungTuyen = "TT";
                    }
                    break;

                default:
                    isDungTuyen = "KHAC";
                    break;
                }
            }
            SqlQuery sqlQuery = new Select().From(DmucBhytChitraDacbiet.Schema)
                                .Where(DmucBhytChitraDacbiet.Columns.IdDichvuChitiet).IsEqualTo(objChidinhChitiet.IdChitietchidinh)
                                .And(DmucBhytChitraDacbiet.Columns.MaLoaithanhtoan).IsEqualTo(paymentTypeId)
                                .And(DmucBhytChitraDacbiet.Columns.DungtuyenTraituyen).IsEqualTo(isDungTuyen)
                                .And(DmucBhytChitraDacbiet.Columns.MaDoituongKcb).IsEqualTo(objLuotkham.MaDoituongKcb);
            DmucBhytChitraDacbiet objDetailPtramBhyt = sqlQuery.ExecuteSingle <DmucBhytChitraDacbiet>();

            if (objDetailPtramBhyt != null)
            {
                objChidinhChitiet.IdLoaichidinh = 1;
                objChidinhChitiet.BhytChitra    = Gia_BHYT(objDetailPtramBhyt.TileGiam, Utility.DecimaltoDbnull(objChidinhChitiet.DonGia, 0));
                objChidinhChitiet.BnhanChitra   = Utility.DecimaltoDbnull(objChidinhChitiet.DonGia, 0) -
                                                  objChidinhChitiet.BhytChitra;
                objChidinhChitiet.PtramBhyt     = Utility.DecimaltoDbnull(objDetailPtramBhyt.TileGiam, 0);
                objChidinhChitiet.LoaiChietkhau = 1;
                bExist = true;
                // objChidinhChitiet.DonGia =
            }
        }
Example #5
0
 public void ChangeObjectRegion(DmucDoituongkcb objDoituongKCB)
 {
     this.objDoituongKCB = objDoituongKCB;
     txtPtramBHYT.Text   = objDoituongKCB.PhantramTraituyen.ToString();
     txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
     if (objDoituongKCB.IdLoaidoituongKcb == 0)//ĐỐi tượng BHYT
     {
         pnlBHYT.Enabled = true;
         lblPtram.Text   = "% BHYT ngoại trú";
         TinhPtramBHYT();
         lblTuyenBHYT.Visible = true;
         txtMaDtuong_BHYT.SelectAll();
         txtMaDtuong_BHYT.Focus();
     }
     else//Đối tượng khác BHYT
     {
         lblTuyenBHYT.Visible = false;
         pnlBHYT.Enabled      = false;
         lblPtram.Text        = "% giảm giá";
     }
 }
Example #6
0
 public void ChangeObjectRegion(DmucDoituongkcb objDoituongKCB)
 {
     this.objDoituongKCB = objDoituongKCB;
     txtPtramBHYT.Text = objDoituongKCB.PhantramTraituyen.ToString();
     txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
     if (objDoituongKCB.IdLoaidoituongKcb == 0)//ĐỐi tượng BHYT
     {
         pnlBHYT.Enabled = true;
         lblPtram.Text = "% BHYT ngoại trú";
         TinhPtramBHYT();
         lblTuyenBHYT.Visible = true;
         txtMaDtuong_BHYT.SelectAll();
         txtMaDtuong_BHYT.Focus();
     }
     else//Đối tượng khác BHYT
     {
         lblTuyenBHYT.Visible = false;
         pnlBHYT.Enabled = false;
         lblPtram.Text = "% giảm giá";
     }
 }
Example #7
0
 public void ResetMe(DmucDoituongkcb objDoituongKCB)
 {
     this.objDoituongKCB = objDoituongKCB;
     txtPtramBHYT.Text   = objDoituongKCB.PhantramTraituyen.ToString();
     txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
     if (objDoituongKCB.IdLoaidoituongKcb == 0)//ĐỐi tượng BHYT
     {
         pnlBHYT.Enabled = true;
         lblPtram.Text   = "% BHYT ngoại trú";
         TinhPtramBHYT();
         txtMaDtuong_BHYT.SelectAll();
         txtMaDtuong_BHYT.Focus();
     }
     else//Đối tượng khác BHYT
     {
         pnlBHYT.Enabled = false;
         lblPtram.Text   = "% giảm giá";
     }
     chkTraiTuyen.Checked   = false;
     lblTuyenBHYT.Text      = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
     lblPtramdauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
     txtptramDauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
     chkCapCuu.Checked      = false;
     txtPtramBHYT.Text      = "0";
     txtptramDauthe.Text    = "0";
     lnkThem.Visible        = false;
     if (IsBHYT)
     {
         lblPtram.Text = "% BHYT ngoại trú";
         txtMaDtuong_BHYT.Focus();
     }
     else
     {
         lblPtram.Text       = "% giảm giá";
         txtPtramBHYT.Text   = objDoituongKCB.PhantramTraituyen.ToString();
         txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
     }
     dtInsFromDate.Value = new DateTime(globalVariables.SysDate.Year, 1, 1);
     dtInsToDate.Value   = new DateTime(globalVariables.SysDate.Year, 12, 31);
 }
Example #8
0
        /// <summary>
        /// Thực hiện nghiệp vụ Update dữ liệu
        /// </summary>
        private void PerformUpdateAction()
        {
            //Create Again to ignore Where Clause
            m_Query = DmucDoituongkcb.CreateQuery();
            //Gọi Business cập nhật dữ liệu
            int v_intObjectTypeID = Convert.ToInt32(txtID.Text);


            //Kiểm tra trùng tên đối tượng và cảnh báo
            DmucDoituongkcbCollection v_arrSameNameObject = new DmucDoituongkcbController()
                                                            .FetchByQuery(m_Query.AddWhere(DmucDoituongkcb.Columns.TenDoituongKcb, Comparison.Equals, txtName.Text.Trim().ToUpper())
                                                                          .AND(DmucDoituongkcb.Columns.IdDoituongKcb, Comparison.NotEquals, v_intObjectTypeID));

            if (v_arrSameNameObject.Count > 0)
            {
                if (!Utility.AcceptQuestion("Đã có đối tượng có tên:" + txtName.Text.Trim() + ". Bạn có muốn tiếp tục ghi hay không?", "Cảnh báo", true))
                {
                    return;
                }
            }
            int actionResult = CreateObjectType();

            if (actionResult > -1)
            {
                m_DataSource.Sort(DmucDoituongkcb.Columns.SttHthi, true);
                ProcessData1();
                //Return to the InitialStatus
                m_enAction = action.FirstOrFinished;
                //Nhảy đến bản ghi vừa cập nhật trên lưới. Do txtID chưa bị reset nên dùng luôn
                Utility.GotoNewRowJanus(grdList, DmucDoituongkcb.Columns.IdLoaidoituongKcb, txtID.Text.Trim());
                SetControlStatus();
                Utility.ShowMsg("Cập nhật dữ liệu thành công.");
            }
            else
            {
                Utility.ShowMsg("Bạn gặp lỗi trong quá trình cập  nhập", "Thông báo");
                return;
            }
        }
Example #9
0
        /// <summary>
        /// Thực hiện nghiệp vụ Insert dữ liệu
        /// </summary>
        private void PerformInsertAction()
        {
            //Kiểm tra trùng tên đối tượng và cảnh báo
            DmucDoituongkcbCollection v_arrSameNameObject = new DmucDoituongkcbController().FetchByQuery(m_Query.AddWhere(DmucDoituongkcb.Columns.TenDoituongKcb, txtName.Text.Trim().ToUpper()));

            if (v_arrSameNameObject.Count > 0)
            {
                if (!Utility.AcceptQuestion("Đã có đối tượng có tên:" + txtName.Text.Trim() + ". Bạn có muốn tiếp tục ghi hay không?", "Cảnh báo", true))
                {
                    //Create Again to ignore Where Clause
                    txtName.Focus();
                    m_Query = DmucDoituongkcb.CreateQuery();
                    return;
                }
            }
            //Create Again to ignore Where Clause
            m_Query = DmucDoituongkcb.CreateQuery();

            // Lấy về MaxID vừa được thêm vào CSDL
            int actionResult = CreateObjectType();

            if (actionResult > 0)
            {
                ProcessData(actionResult);
                //Return to the InitialStatus
                m_enAction = action.FirstOrFinished;
                //Nhảy đến bản ghi vừa thêm mới trên lưới. Do txtID chưa bị reset nên dùng luôn
                Utility.GotoNewRowJanus(grdList, DmucDoituongkcb.Columns.IdLoaidoituongKcb, actionResult.ToString());
                Utility.ShowMsg("Thêm mới dữ liệu thành công!");
                SetControlStatus();
                this.Activate();
            }
            else//Có lỗi xảy ra
            {
                Utility.ShowMsg("Thêm mới không thành công. Mời bạn xem lại");
            }
        }
Example #10
0
 private Int16 CreateObjectType()
 {
     try
     {
         DmucDoituongkcb objectType = new DmucDoituongkcb();
         if (m_enAction == action.Update)
         {
             objectType = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.Columns.IdDoituongKcb).IsEqualTo(Utility.Int16Dbnull(txtID.Text, -1)).ExecuteSingle <DmucDoituongkcb>();
         }
         objectType.MaDoituongKcb         = txtObjectCode.Text;
         objectType.TenDoituongKcb        = Utility.GetValue(txtName.Text, false);
         objectType.IdLoaidoituongKcb     = Utility.ByteDbnull(cboLoaidoituong.SelectedIndex, 0);// Utility.ByteDbnull(objectType.MaDoituongKcb == "DV" ? 1 : 0);
         objectType.PhantramDungtuyen     = Utility.DecimaltoDbnull(txtDiscountCorrectLine.Value, 0);
         objectType.PhantramTraituyen     = Utility.DecimaltoDbnull(txtDiscountDiscorrectLine.Value, 0);
         objectType.SttHthi               = Convert.ToInt16(txtPos.Text);
         objectType.GiathuocQuanhe        = (byte)(chkLaygiathuocquanhe.Checked ? 1 : 0);
         objectType.ThanhtoanTruockhikham = Utility.Bool2byte(chkThanhtoantruockhikham.Checked);
         objectType.TudongThanhtoan       = Utility.Bool2byte(chkAutoPayment.Checked);
         objectType.MotaThem              = Utility.sDbnull(txtDesc.Text, "");
         if (m_enAction == action.Update)
         {
             objectType.MarkOld();
             objectType.IsNew = false;
         }
         else
         {
             objectType.IsNew = true;
         }
         objectType.Save();
         return(objectType.IdDoituongKcb);
     }
     catch
     {
         return(-1);
     }
 }
 private Int16 CreateObjectType()
 {
     try
     {
         DmucDoituongkcb objectType = new DmucDoituongkcb();
         if (m_enAction == action.Update) objectType = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.Columns.IdDoituongKcb).IsEqualTo(Utility.Int16Dbnull(txtID.Text, -1)).ExecuteSingle<DmucDoituongkcb>();
         objectType.MaDoituongKcb = txtObjectCode.Text;
         objectType.TenDoituongKcb = Utility.GetValue(txtName.Text, false);
         objectType.IdLoaidoituongKcb = Utility.ByteDbnull(cboLoaidoituong.SelectedIndex,0);// Utility.ByteDbnull(objectType.MaDoituongKcb == "DV" ? 1 : 0);
         objectType.PhantramDungtuyen = Utility.DecimaltoDbnull(txtDiscountCorrectLine.Value, 0);
         objectType.PhantramTraituyen = Utility.DecimaltoDbnull(txtDiscountDiscorrectLine.Value, 0);
         objectType.SttHthi = Convert.ToInt16(txtPos.Text);
         objectType.GiathuocQuanhe = (byte)(chkLaygiathuocquanhe.Checked ? 1 : 0);
         objectType.ThanhtoanTruockhikham =Utility.Bool2byte(chkThanhtoantruockhikham.Checked );
         objectType.TudongThanhtoan = Utility.Bool2byte(chkAutoPayment.Checked);
         objectType.MotaThem = Utility.sDbnull(txtDesc.Text, "");
         if (m_enAction == action.Update)
         {
             objectType.MarkOld();
             objectType.IsNew = false;
         }
         else
             objectType.IsNew = true;
         objectType.Save();
         return objectType.IdDoituongKcb;
     }
     catch
     {
         return -1;
     }
 }
        // private  b_QMSStop=false;
        /// <summary>
        /// hàm thực hiện việc lấy thông tin của phần dữ liệu
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void frm_Taobenhnhancapcuu_Load(object sender, EventArgs e)
        {
            try
            {
                AllowTextChanged = false;
                b_HasLoaded = false;
                dtInsFromDate.Value = new DateTime(globalVariables.SysDate.Year, 1, 1);
                dtInsToDate.Value = new DateTime(globalVariables.SysDate.Year, 12, 31);
                Utility.SetColor(lblDiachiBHYT, THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_BATNHAP_DIACHI_BHYT", "1", false) == "1" ? lblHoten.ForeColor : lblMatheBHYT.ForeColor);
                Utility.SetColor(lblDiachiBN, THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_BATNHAP_DIACHI_BENHNHAN", "1", false) == "1" ? lblHoten.ForeColor : lblMatheBHYT.ForeColor);
                chkTraiTuyen.Visible = THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_CHOPHEPTIEPDON_TRAITUYEN", "1", false) == "1";
                chkLaysokham.Enabled = THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_BATBUOCLAY_SOKHAMCHUABENH", "0", false) == "0";
                txtSoKcb.Enabled = chkLaysokham.Enabled && chkLaysokham.Checked;

                XoathongtinBHYT(true);
                AddAutoCompleteDiaChi();
                Get_DanhmucChung();
                AutocompleteBenhvien();
                txtKhoanoitru.Init(THU_VIEN_CHUNG.Laydanhmuckhoa("NOI", 0), new List<string>() { DmucKhoaphong.Columns.IdKhoaphong, DmucKhoaphong.Columns.MaKhoaphong, DmucKhoaphong.Columns.TenKhoaphong });

                DataTable dtGia = new dmucgiagiuong_busrule().dsGetList("-1").Tables[0];
                dtGia.DefaultView.Sort = NoitruGiabuonggiuong.Columns.SttHthi + "," + NoitruGiabuonggiuong.Columns.TenGia;
                txtGia.Init(dtGia, new System.Collections.Generic.List<string>() { NoitruGiabuonggiuong.Columns.IdGia, NoitruGiabuonggiuong.Columns.MaGia, NoitruGiabuonggiuong.Columns.TenGia });
                cboGia.DataSource = dtGia;
                cboGia.DataMember = NoitruGiabuonggiuong.Columns.IdGia;
                cboGia.ValueMember = NoitruGiabuonggiuong.Columns.IdGia;
                cboGia.DisplayMember = NoitruGiabuonggiuong.Columns.TenGia;

                DataBinding.BindDataCombobox(cboDoituongKCB, THU_VIEN_CHUNG.LaydanhsachDoituongKcb(), DmucDoituongkcb.Columns.MaDoituongKcb, DmucDoituongkcb.Columns.TenDoituongKcb, "", false);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
                cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                ChangeObjectRegion();
                if (m_enAction == action.Insert)//Thêm mới BN
                {
                    objLuotkham = null;
                    if (PropertyLib._KCBProperties.SexInput)
                        cboPatientSex.SelectedIndex = -1;
                    SinhMaLanKham();
                    txtSoBenhAn.Text = THU_VIEN_CHUNG.LaySoBenhAn();
                    txtTEN_BN.Select();
                }
                else if (m_enAction == action.Update)//Cập nhật thông tin Bệnh nhân
                {
                    LoadThongtinBenhnhan();
                    txtTEN_BN.Select();
                }
                else if (m_enAction == action.Add) //Thêm mới lần khám
                {
                    objLuotkham = null;
                    string ngay_kham = globalVariables.SysDate.ToString("dd/MM/yyyy");
                    if (!NotPayment(txtMaBN.Text.Trim(), ref ngay_kham))//Nếu đã thanh toán xong hết thì thêm lần khám mới
                    {
                        SinhMaLanKham();
                        LoadThongtinBenhnhan();

                    }
                    else//Còn lần khám chưa thanh toán-->Kiểm tra
                    {
                        //nếu là ngày hiện tại thì đặt về trạng thái sửa
                        if (ngay_kham == "NOREG" || ngay_kham==globalVariables.SysDate.ToString("dd/MM/yyyy"))
                        {
                            LoadThongtinBenhnhan();
                            if (ngay_kham == "NOREG")//Bn chưa đăng ký phòng khám nào cả.
                            {
                                //Nếu ngày hệ thống=Ngày đăng ký gần nhất-->Sửa
                                if (globalVariables.SysDate.ToString("dd/MM/yyyy") == dtpInputDate.Value.ToString("dd/MM/yyyy"))
                                {
                                    m_enAction = action.Update;

                                    Utility.ShowMsg(
                                       "Bệnh nhân vừa được đăng ký ngày hôm nay nên hệ thống sẽ chuyển về chế độ Sửa thông tin. Nhấn OK để bắt đầu sửa");
                                    txtTEN_BN.Select();
                                }
                                else//Thêm lần khám cho ngày mới
                                {
                                    m_enAction = action.Add;
                                    SinhMaLanKham();

                                }
                            }
                            else//Quay về trạng thái sửa
                            {
                                m_enAction = action.Update;

                                Utility.ShowMsg(
                                   "Bệnh nhân vừa được đăng ký ngày hôm nay nên hệ thống sẽ chuyển về chế độ Sửa thông tin. Nhấn OK để bắt đầu sửa");
                                txtTEN_BN.Select();
                            }
                        }
                        else //Không cho phép thêm lần khám khác nếu chưa thanh toán lần khám của ngày hôm trước
                        {
                            Utility.ShowMsg(
                                "Bệnh nhân đang có lần khám chưa được thanh toán. Cần thanh toán hết các lần đến khám bệnh của Bệnh nhân trước khi thêm lần khám mới. Nhấn OK để hệ thống chuyển về trạng thái thêm mới Bệnh nhân");
                            cmdThemMoiBN_Click(cmdThemMoiBN, new EventArgs());
                        }
                    }
                }
                StatusControl();
                ModifyCommand();
                AllowTextChanged = true;
            }
            catch
            {
            }
            finally
            {
                if (PropertyLib._ConfigProperties.HIS_AppMode != VNS.Libs.AppType.AppEnum.AppMode.License)
                    this.Text = "Đăng ký KCB -->Demo 1500";
                SetActionStatus();

                ModifyCommand();

                b_HasLoaded = true;
                CanhbaoInphoi();

            }
        }
        /// <summary>
        /// hàm thực hiện việc làm sách thông tin của bệnh nhân
        /// </summary>
        private void ClearControl()
        {
            Utility.SetMsg(lblMsg, "", false);
            objBuonggiuong = null;
            objLuotkham = null;
            LstNoitruPhanbuonggiuong = new NoitruPhanbuonggiuongCollection();
            m_blnHasJustInsert = false;
            txtSolankham.Text = "1";
            txtTEN_BN.Clear();
            txtNamSinh.Clear();
            dtpBOD.Value = globalVariables.SysDate;
            txtTuoi.Clear();
            txtCMT.Clear();
            txtNgheNghiep.Clear();
            txtDiachi.Clear();
            txtDantoc.Clear();
            txtTrieuChungBD.Clear();
            txtSoDT.Clear();
            chkChuyenVien.Checked = false;
            txtNoichuyenden.SetCode("-1");
            txtKhoanoitru.SetCode("-1");
            txtGia.SetCode("-1");
            txtRoom_code.SetCode("-1");
            txtBedCode.SetCode("-1");
            if (m_dtDataRoom != null) m_dtDataRoom.Clear();
            if (m_dtDatabed != null) m_dtDatabed.Clear();
            if (THU_VIEN_CHUNG.IsNgoaiGio())
            {
               this.Text= "Bệnh nhân đang khám dịch vụ ngoài giờ";
            }
            ModifyCommand();
            AllowTextChanged = false;
            XoathongtinBHYT(true);

            _MaDoituongKcb = Utility.sDbnull(cboDoituongKCB.SelectedValue);
            objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
            if (objDoituongKCB == null) return;
            _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
            _IdLoaidoituongKcb = objDoituongKCB.IdLoaidoituongKcb;
            _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
            PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
            PtramBhytGocCu = PtramBhytCu;
            txtPtramBHYT.Text = objDoituongKCB.PhantramTraituyen.ToString();
            txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
            if (objDoituongKCB.IdLoaidoituongKcb == 0)//ĐỐi tượng BHYT
            {
                pnlBHYT.Enabled = true;
                lblPtram.Text = "Phần trăm BHYT";
                TinhPtramBHYT();
                txtMaDtuong_BHYT.SelectAll();
                txtMaDtuong_BHYT.Focus();
            }
            else//Đối tượng khác BHYT
            {
                pnlBHYT.Enabled = false;
                lblPtram.Text = "P.trăm giảm giá";
                txtTEN_BN.Focus();
            }

            chkTraiTuyen.Checked = false;
            lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
            lblPtramdauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
            txtptramDauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
            chkChuyenVien.Checked = false;
            chkCapCuu.Checked = false;
            txtPtramBHYT.Text = "0";
            txtptramDauthe.Text = "0";
            AllowTextChanged = true;
            //Chuyển về trạng thái thêm mới
            m_enAction = action.Insert;
            if (PropertyLib._KCBProperties.SexInput) cboPatientSex.SelectedIndex = -1;
            lnkThem.Visible = false;
            SinhMaLanKham();
            txtSoBenhAn.Text = THU_VIEN_CHUNG.LaySoBenhAn();
            m_dataDataRegExam.Clear();
            if (pnlBHYT.Enabled)
            {
                lblPtram.Text = "Phần trăm BHYT";
                txtMaDtuong_BHYT.Focus();
            }
            else
            {
                lblPtram.Text = "P.trăm giảm giá";
                PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
                PtramBhytGocCu = PtramBhytCu;
                txtPtramBHYT.Text = objDoituongKCB.PhantramTraituyen.ToString();
                txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
                txtTEN_BN.Focus();
            }
            if (m_enAction == action.Insert)
            {
                dtpInputDate.Value = globalVariables.SysDate;
                dtCreateDate.Value = globalVariables.SysDate;
                dtInsFromDate.Value = new DateTime(globalVariables.SysDate.Year, 1, 1);
                dtInsToDate.Value = new DateTime(globalVariables.SysDate.Year, 12, 31);
            }
            SetActionStatus();
        }
        /// <summary>
        /// hàm thực hiện việc làm sách thông tin của bệnh nhân
        /// </summary>
        private void ClearControl()
        {
            Utility.SetMsg(lblMsg, "", false);
            //tabControl1.SelectedTab = tabControl1.TabPages[0];
            objBuonggiuong = null;
            objLuotkham = null;
            LstNoitruPhanbuonggiuong = new NoitruPhanbuonggiuongCollection();
            m_blnHasJustInsert = false;
            txtSolankham.Text = "1";
            txtTEN_BN.Clear();
            txtNamSinh.Clear();
            dtpBOD.Value = globalVariables.SysDate;
            txtTuoi.Clear();
            txtCMT.Clear();
            txtDiachi.Clear();
            chkChuyenVien.Checked = false;
            txtNoichuyenden.SetCode("-1");
            if (m_dtDataRoom != null) m_dtDataRoom.Clear();
            if (m_dtDatabed != null) m_dtDatabed.Clear();
            if (THU_VIEN_CHUNG.IsNgoaiGio())
            {
               this.Text= "Bệnh nhân đang khám dịch vụ ngoài giờ";
            }
            ModifyCommand();
            AllowTextChanged = false;
            XoathongtinBHYT(true);

            _MaDoituongKcb = Utility.sDbnull(cboDoituongKCB.SelectedValue);
            objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
            if (objDoituongKCB == null) return;
            _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
            _IdLoaidoituongKcb = objDoituongKCB.IdLoaidoituongKcb;
            _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
            PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
            PtramBhytGocCu = PtramBhytCu;

            chkChuyenVien.Checked = false;

            AllowTextChanged = true;
            //Chuyển về trạng thái thêm mới
            m_enAction = action.Insert;
            if (PropertyLib._KCBProperties.SexInput) cboPatientSex.SelectedIndex = -1;
            m_dataDataRegExam.Clear();
            ucBHYT1.ResetMe(objDoituongKCB);
            if (ucBHYT1.IsBHYT)
            {

            }
            else
            {
                PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
                PtramBhytGocCu = PtramBhytCu;
                txtTEN_BN.Focus();
            }
            if (m_enAction == action.Insert)
            {
                dtpInputDate.Value = globalVariables.SysDate;
                dtCreateDate.Value = globalVariables.SysDate;

            }
        }
        /// <summary>
        /// /hàm thực heien thông tin update thông tin lại
        /// </summary>
        private void PerformActionUpdate()
        {
            string          MaDoituongKcb = "ALL";
            string          NhomBaocao    = "-1";
            DmucDoituongkcb objectType    = DmucDoituongkcb.FetchByID(Utility.Int16Dbnull(cboDoituong.SelectedValue, -1));

            if (objectType != null)
            {
                MaDoituongKcb = objectType.MaDoituongKcb;
            }
            else
            {
                MaDoituongKcb = "ALL";
            }
            DmucKieukham objKieukham = DmucKieukham.FetchByID(Utility.Int16Dbnull(cboLoaiKham.SelectedValue, -1));

            if (objKieukham != null)
            {
                NhomBaocao = Utility.sDbnull(objKieukham.NhomBaocao, "");
            }
            else
            {
                NhomBaocao = "-1";
            }
            int record = new Update(DmucDichvukcb.Schema)
                         .Set(DmucDichvukcb.Columns.IdKhoaphong).EqualTo(Utility.Int16Dbnull(cboDepartment1.SelectedValue, 1))
                         .Set(DmucDichvukcb.Columns.MaDichvukcb).EqualTo(txtCode.Text.Trim())
                         .Set(DmucDichvukcb.Columns.HoatDong).EqualTo(chkhoatdong.Checked)
                         .Set(DmucDichvukcb.Columns.MaGia).EqualTo(txtmagiabhyt.Text.Trim())
                         .Set(DmucDichvukcb.Columns.TenDichvukcb).EqualTo(txtName.Text.Trim())
                         .Set(DmucDichvukcb.Columns.MotaThem).EqualTo(txtDesc.Text.Trim())
                         .Set(DmucDichvukcb.Columns.SttHthi).EqualTo(Utility.Int16Dbnull(nmrSTT.Value))
                         .Set(DmucDichvukcb.Columns.NhomBaocao).EqualTo(NhomBaocao)
                         .Set(DmucDichvukcb.Columns.MaDoituongKcb).EqualTo(MaDoituongKcb)
                         .Set(DmucDichvukcb.Columns.IdPhongkham).EqualTo(Utility.Int16Dbnull(cboRoomDept.SelectedValue, 1))
                         .Set(DmucDichvukcb.Columns.IdBacsy).EqualTo(
                Convert.ToInt16(cboBacSy.Items.Count > 0 ? Utility.Int16Dbnull(cboBacSy.SelectedValue, 1) : -1))
                         .Set(DmucDichvukcb.Columns.IdKieukham).EqualTo(Utility.Int16Dbnull(cboLoaiKham.SelectedValue, 1))
                         .Set(DmucDichvukcb.Columns.IdDoituongKcb).EqualTo(Utility.Int16Dbnull(cboDoituong.SelectedValue, -1))
                         .Set(DmucDichvukcb.Columns.DonGia).EqualTo(Utility.DecimaltoDbnull(txtDongia.Text, 0))
                         .Set(DmucDichvukcb.Columns.DongiaNgoaigio).EqualTo(Utility.DecimaltoDbnull(txtGiangoaigio.Text, 0))
                         .Set(DmucDichvukcb.Columns.PhuthuNgoaigio).EqualTo(Utility.DecimaltoDbnull(txtPhuthungoaigio.Text, 0))
                         .Set(DmucDichvukcb.Columns.TuTuc).EqualTo(Utility.Bool2byte(chkTutuc.Checked))
                         .Set(DmucDichvukcb.Columns.PhuthuDungtuyen).EqualTo(Utility.DecimaltoDbnull(txtPTDT.Text, 0))
                         .Set(DmucDichvukcb.Columns.PhuthuTraituyen).EqualTo(Utility.DecimaltoDbnull(txtPTTT.Text, 0))
                         .Where(DmucDichvukcb.Columns.IdDichvukcb).IsEqualTo(Utility.DecimaltoDbnull(txtInsObject_ID.Text, -1)).
                         Execute();

            if (record > 0)
            {
                DataRow[] dr =
                    m_dtDataRelation.Select(DmucDichvukcb.Columns.IdDichvukcb + "=" +
                                            Utility.Int32Dbnull(txtInsObject_ID.Text, -1));
                if (dr.GetLength(0) > 0)
                {
                    dr[0][DmucDichvukcb.Columns.IdDoituongKcb] = Utility.DecimaltoDbnull(cboDoituong.SelectedValue);
                    dr[0][DmucDichvukcb.Columns.IdKhoaphong]   = Utility.Int16Dbnull(cboDepartment1.SelectedValue, -1);
                    dr[0][DmucDichvukcb.Columns.IdPhongkham]   = Utility.Int16Dbnull(cboRoomDept.SelectedValue, -1);
                    dr[0][DmucDichvukcb.Columns.IdBacsy]       = cboBacSy.Items.Count > 0
                                                               ? Utility.Int16Dbnull(cboBacSy.SelectedValue, -1)
                                                               : -1;
                    dr[0][DmucDichvukcb.Columns.IdKieukham] = Utility.Int16Dbnull(cboLoaiKham.SelectedValue, -1);
                    dr[0][DmucKieukham.Columns.TenKieukham] = cboLoaiKham.Text;
                    dr[0]["ten_khoa"]  = cboDepartment1.SelectedIndex <= -1 ? "Tất cả các khoa KCB" : cboDepartment1.Text;
                    dr[0]["ten_phong"] = cboRoomDept.Text;
                    dr[0][DmucDichvukcb.Columns.MaDichvukcb]  = txtCode.Text.Trim();
                    dr[0][DmucDichvukcb.Columns.MaBhyt]       = txtMaBhyt.Text.Trim();
                    dr[0][DmucDichvukcb.Columns.MaGia]        = txtmagiabhyt.Text.Trim();
                    dr[0][DmucDichvukcb.Columns.TenDichvukcb] = txtName.Text.Trim();
                    dr[0]["ten_bacsi"] = cboBacSy.SelectedIndex > 0 ? cboBacSy.Text : "";
                    dr[0][DmucDichvukcb.Columns.MaDoituongKcb]    = objectType != null ? objectType.MaDoituongKcb : "ALL";
                    dr[0][DmucDoituongkcb.Columns.TenDoituongKcb] = objectType != null
                                                                        ? cboDoituong.Text
                                                                        : "Tất cả các đối tượng";
                    dr[0][DmucDichvukcb.Columns.MotaThem] = Utility.DoTrim(txtDesc.Text);
                    dr[0][DmucDichvukcb.Columns.SttHthi]  = Utility.Int16Dbnull(nmrSTT.Value, 1);

                    dr[0][DmucDichvukcb.Columns.DonGia]          = Utility.DecimaltoDbnull(txtDongia.Text, 0);
                    dr[0][DmucDichvukcb.Columns.DongiaNgoaigio]  = Utility.DecimaltoDbnull(txtGiangoaigio.Text, 0);
                    dr[0][DmucDichvukcb.Columns.PhuthuNgoaigio]  = Utility.DecimaltoDbnull(txtPhuthungoaigio.Text, 0);
                    dr[0][DmucDichvukcb.Columns.TuTuc]           = Utility.Bool2byte(chkTutuc.Checked);
                    dr[0][DmucDichvukcb.Columns.HoatDong]        = Utility.Bool2byte(chkhoatdong.Checked);
                    dr[0][DmucDichvukcb.Columns.PhuthuDungtuyen] = Utility.DecimaltoDbnull(txtPTDT.Text, 0);
                    dr[0][DmucDichvukcb.Columns.PhuthuTraituyen] = Utility.DecimaltoDbnull(txtPTTT.Text, 0);
                }
                m_dtDataRelation.AcceptChanges();
                Close();
            }
            else
            {
                Utility.ShowMsg("Lỗi trong quá trình cập nhập dữ liệu");
                return;
            }
        }
Example #16
0
 public void ResetMe(DmucDoituongkcb objDoituongKCB)
 {
     this.objDoituongKCB = objDoituongKCB;
     txtPtramBHYT.Text = objDoituongKCB.PhantramTraituyen.ToString();
     txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
     if (objDoituongKCB.IdLoaidoituongKcb == 0)//Đối tượng BHYT
     {
         pnlBHYT.Enabled = true && !PreventEnabled;
         lblPtram.Text = "% BHYT ngoại trú";
         TinhPtramBHYT();
         lblTuyenBHYT.Visible = true;
         txtMaDtuong_BHYT.SelectAll();
         txtMaDtuong_BHYT.Focus();
     }
     else//Đối tượng khác BHYT
     {
         lblTuyenBHYT.Visible = false;
         pnlBHYT.Enabled = false;
         lblPtram.Text = "% giảm giá";
     }
     chkTraiTuyen.Checked = false;
     lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
     lblPtramdauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
     txtptramDauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
     chkCapCuu.Checked = false;
     txtPtramBHYT.Text = "0";
     txtptramDauthe.Text = "0";
     lnkThem.Visible = false;
     dtInsFromDate.Value = new DateTime(globalVariables.SysDate.Year, 1, 1);
     dtInsToDate.Value = new DateTime(globalVariables.SysDate.Year, 12, 31);
 }
        // private  b_QMSStop=false;
        /// <summary>
        /// hàm thực hiện việc lấy thông tin của phần dữ liệu
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void frm_Dangky_Kiemnghiem_Load(object sender, EventArgs e)
        {
            try
            {
                AllowTextChanged = false;
                b_HasLoaded = false;
                Utility.SetColor(lblDiachiBN, THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_BATNHAP_DIACHI_BENHNHAN", "1", false) == "1" ? lblHoten.ForeColor : lblMaKH.ForeColor);
                AddAutoCompleteDiaChi();
                Get_DanhmucChung();
                DataBinding.BindDataCombobox(cboDoituongKCB, THU_VIEN_CHUNG.LaydanhsachDoituongKcb(), DmucDoituongkcb.Columns.MaDoituongKcb, DmucDoituongkcb.Columns.TenDoituongKcb, "", false);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
                cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                ChangeObjectRegion();
                if (m_enAction == action.Insert)//Thêm mới BN
                {
                    objLuotkham = null;
                    SinhMaLanKham();
                    txtTEN_BN.Select();
                }
                else if (m_enAction == action.Update)//Cập nhật thông tin Khách hàng
                {
                    LoadThongtinBenhnhan();
                    txtTEN_BN.Select();
                }
                else if (m_enAction == action.Add) //Thêm mới lần đăng ký
                {
                    objLuotkham = null;
                    string ngay_kham = globalVariables.SysDate.ToString("dd/MM/yyyy");
                    if (!NotPayment(txtMaBN.Text.Trim(), ref ngay_kham))//Nếu đã thanh toán xong hết thì thêm lần đăng ký mới
                    {
                        SinhMaLanKham();
                        LoadThongtinBenhnhan();
                        chkPhongchuyenmon.Focus();
                    }
                    else//Còn lần đăng ký chưa thanh toán-->Kiểm tra
                    {
                        //nếu là ngày hiện tại thì đặt về trạng thái sửa
                        if (ngay_kham == "NOREG" || ngay_kham==globalVariables.SysDate.ToString("dd/MM/yyyy"))
                        {
                            LoadThongtinBenhnhan();
                            if (ngay_kham == "NOREG")//Bn chưa đăng ký phòng khám nào cả.
                            {
                                //Nếu ngày hệ thống=Ngày đăng ký gần nhất-->Sửa
                                if (globalVariables.SysDate.ToString("dd/MM/yyyy") == dtpInputDate.Value.ToString("dd/MM/yyyy"))
                                {
                                    m_enAction = action.Update;

                                    Utility.ShowMsg(
                                       "Khách hàng vừa được đăng ký ngày hôm nay nên hệ thống sẽ chuyển về chế độ Sửa thông tin. Nhấn OK để bắt đầu sửa");
                                    txtTEN_BN.Select();
                                }
                                else//Thêm lần đăng ký cho ngày mới
                                {
                                    m_enAction = action.Add;
                                    SinhMaLanKham();
                                    chkPhongchuyenmon.Focus();
                                }
                            }
                            else//Quay về trạng thái sửa
                            {
                                m_enAction = action.Update;

                                Utility.ShowMsg(
                                   "Khách hàng vừa được đăng ký ngày hôm nay nên hệ thống sẽ chuyển về chế độ Sửa thông tin. Nhấn OK để bắt đầu sửa");
                                txtTEN_BN.Select();
                            }
                        }
                        else //Không cho phép thêm lần đăng ký khác nếu chưa thanh toán lần đăng ký của ngày hôm trước
                        {
                            Utility.ShowMsg(
                                "Khách hàng đang có lần đăng ký chưa được thanh toán. Cần thanh toán hết các lần đến khám bệnh của Khách hàng trước khi thêm lần đăng ký mới. Nhấn OK để hệ thống chuyển về trạng thái thêm mới Khách hàng");
                            cmdThemMoiBN_Click(cmdThemMoiBN, new EventArgs());
                        }
                    }
                }
                ModifyCommand();
                AllowTextChanged = true;
            }
            catch
            {
            }
            finally
            {
                if (PropertyLib._ConfigProperties.HIS_AppMode != VNS.Libs.AppType.AppEnum.AppMode.License)
                    this.Text = "Đăng ký KCB -->Demo 1500";
                SetActionStatus();
                ModifyCommand();
                b_HasLoaded = true;

            }
        }
        private void LoadThongtinBenhnhan()
        {
            PtramBhytCu = 0m;
            PtramBhytGocCu = 0m;
            AllowTextChanged = false;
            LstNoitruPhanbuonggiuong = new NoitruPhanbuonggiuongCollection();
            objBuonggiuong = null;
            objBenhnhan = KcbDanhsachBenhnhan.FetchByID(txtMaBN.Text);
            if (objBenhnhan != null)
            {
                txtTEN_BN.Text = Utility.sDbnull(objBenhnhan.TenBenhnhan);
                txtNamSinh.Text = Utility.sDbnull(objBenhnhan.NamSinh);

                txtDiachi.Text = Utility.sDbnull(objBenhnhan.DiaChi);
                if (objBenhnhan.NgaySinh != null) dtpBOD.Value = objBenhnhan.NgaySinh.Value;
                else dtpBOD.Value = new DateTime((int)objBenhnhan.NamSinh, 1, 1);
                txtNamSinh.Text = Utility.sDbnull(objBenhnhan.NamSinh);
                txtTuoi.Text = Utility.sDbnull(globalVariables.SysDate.Year - Utility.Int32Dbnull(objBenhnhan.NamSinh));
                cboPatientSex.SelectedIndex = Utility.GetSelectedIndex(cboPatientSex, Utility.sDbnull(objBenhnhan.IdGioitinh));
                txtCMT.Text = Utility.sDbnull(objBenhnhan.Cmt);

                objLuotkham = new Select().From(KcbLuotkham.Schema)
                   .Where(KcbLuotkham.Columns.MaLuotkham).IsEqualTo(txtMaLankham.Text)
                   .And(KcbLuotkham.Columns.IdBenhnhan).IsEqualTo(Utility.Int32Dbnull(txtMaBN.Text, -1)).ExecuteSingle
                   <KcbLuotkham>();
                if (objLuotkham != null)
                {
                    lstIDDelete = new List<long>();
                    m_strMaluotkham = objLuotkham.MaLuotkham;

                    txtSolankham.Text = Utility.sDbnull(objLuotkham.SolanKham);
                    _IdDoituongKcb = objLuotkham.IdDoituongKcb;
                    dtpInputDate.Value = objLuotkham.NgayTiepdon;
                    dtCreateDate.Value = objLuotkham.NgayTiepdon;

                    _MaDoituongKcb = Utility.sDbnull(objLuotkham.MaDoituongKcb);
                    objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();

                    ChangeObjectRegion();
                    PtramBhytCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhyt, 0);
                    PtramBhytGocCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhytGoc, 0);
                    _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
                    _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
                    cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                    chkChuyenVien.Checked = Utility.Int32Dbnull(objLuotkham.TthaiChuyenden, 0) == 1;
                    txtNoichuyenden.SetId(Utility.Int32Dbnull(objLuotkham.IdBenhvienDen, -1));
                    if (!string.IsNullOrEmpty(objLuotkham.MatheBhyt))//Thông tin BHYT
                    {
                        ucBHYT1.SetValues(chkChuyenVien.Checked, objDoituongKCB, objLuotkham);
                    }
                    else
                    {
                        XoathongtinBHYT(true);
                    }
                    m_dtData = SPs.KcbLaythongtinLichsuDoituongKcb(objLuotkham.IdBenhnhan, objLuotkham.MaLuotkham).GetDataSet().Tables[0];
                    ProcessData();
                    Utility.SetDataSourceForDataGridEx(grdList, m_dtData, true, true, "1=1", " fromdate desc,enddate desc");
                    AllowGridSelecttionChanged = true;
                    Utility.GotoNewRowJanus(grdList, KcbLichsuDoituongKcb.Columns.IdLichsuDoituongKcb, objLuotkham.IdLichsuDoituongKcb.ToString());
                }
                else
                {
                }
            }
            chkChuyenVien_CheckedChanged(chkChuyenVien, new EventArgs());
        }
Example #19
0
        /// <summary>
        /// Thiết lập trạng thái các Control trên Form theo thao tác nghiệp vụ cần thực hiện
        /// Insert, Update hoặc Delete...
        /// </summary>
        private void SetControlStatus()
        {
            switch (m_enAction)
            {
            case action.Insert:
                //Cho phép nhập liệu mã loại đối tượng,vị trí, tên loại đối tượng và mô tả thêm
                Utility.DisabledTextBox(txtID);
                // Utility.EnabledTextBox(txtfee);
                Utility.EnabledTextBox(txtName);
                Utility.EnabledTextBox(txtPos);
                Utility.EnabledTextBox(txtDesc);
                txtObjectCode.Enabled             = true;
                txtDiscountCorrectLine.Enabled    = true;
                txtDiscountDiscorrectLine.Enabled = true;
                txtDiscountCorrectLine.Clear();
                txtDiscountDiscorrectLine.Clear();
                chkThanhtoantruockhikham.Enabled = true;
                chkAutoPayment.Enabled           = true;
                chkLaygiathuocquanhe.Enabled     = true;
                txtPos.Clear();
                txtName.Clear();
                txtDesc.Clear();
                chkLaygiathuocquanhe.Checked     = false;
                chkThanhtoantruockhikham.Checked = false;
                chkAutoPayment.Checked           = false;
                Int16 MaxPos = Utility.Int16Dbnull(DmucDoituongkcb.CreateQuery().GetMax(DmucDoituongkcb.Columns.SttHthi), 0);
                MaxPos     += 1;
                txtPos.Text = MaxPos.ToString();
                m_shtOldPos = Convert.ToInt16(txtPos.Text);
                //--------------------------------------------------------------
                //Thiết lập trạng thái các nút Insert, Update, Delete...
                //Không cho phép nhấn Insert, Update,Delete
                cmdInsert.Enabled = false;
                cmdUpdate.Enabled = false;
                cmdDelete.Enabled = false;
                //Cho phép nhấn nút Ghi
                cmdSave.Enabled = true;
                //Nút thoát biến thành nút hủy
                cmdClose.Text = "Hủy";
                //--------------------------------------------------------------
                //Không cho phép chọn trên lưới dữ liệu được fill vào các Control
                m_blnAllowCurrentCellChangedOnGridView = false;
                //Tự động Focus đến mục ID để người dùng nhập liệu
                txtID.Text = "Tự sinh";
                txtPos.Focus();
                break;

            case action.Update:
                //Không cho phép cập nhật lại mã loại đối tượng
                Utility.DisabledTextBox(txtID);
                //Cho phép cập nhật lại vị trí, tên loại đối tượng và mô tả thêm
                Utility.EnabledTextBox(txtName);
                Utility.EnabledTextBox(txtPos);
                Utility.EnabledTextBox(txtDesc);
                txtObjectCode.Enabled             = true;
                txtDiscountCorrectLine.Enabled    = true;
                txtDiscountDiscorrectLine.Enabled = true;
                chkLaygiathuocquanhe.Enabled      = true;
                chkThanhtoantruockhikham.Enabled  = true;
                chkAutoPayment.Enabled            = true;
                //Utility.EnabledTextBox(txtfee);
                m_shtOldPos = Utility.Int16Dbnull(grdList.GetValue(DmucDoituongkcb.Columns.SttHthi), 0);
                //--------------------------------------------------------------
                //Thiết lập trạng thái các nút Insert, Update, Delete...
                //Không cho phép nhấn Insert, Update,Delete
                cmdInsert.Enabled = false;
                cmdUpdate.Enabled = false;
                cmdDelete.Enabled = false;
                //Cho phép nhấn nút Ghi
                cmdSave.Enabled = true;
                //Nút thoát biến thành nút hủy
                cmdClose.Text = "Hủy";
                //--------------------------------------------------------------
                //Không cho phép chọn trên lưới dữ liệu được fill vào các Control
                m_blnAllowCurrentCellChangedOnGridView = false;
                //Tự động Focus đến mục Position để người dùng nhập liệu
                txtPos.Focus();
                break;

            case action.FirstOrFinished:    //Hủy hoặc trạng thái ban đầu khi mới hiển thị Form
                //Không cho phép nhập liệu mã loại đối tượng, tên loại đối tượng và mô tả thêm
                Utility.DisabledTextBox(txtID);
                Utility.DisabledTextBox(txtName);
                Utility.DisabledTextBox(txtDesc);
                //Utility.DisabledTextBox(txtfee);
                Utility.DisabledTextBox(txtPos);
                txtObjectCode.Enabled             = false;
                txtDiscountCorrectLine.Enabled    = false;
                txtDiscountDiscorrectLine.Enabled = false;
                chkThanhtoantruockhikham.Enabled  = false;
                chkLaygiathuocquanhe.Enabled      = false;
                chkAutoPayment.Enabled            = false;
                //--------------------------------------------------------------
                //Thiết lập trạng thái các nút Insert, Update, Delete...
                //Sau khi nhấn Ghi thành công hoặc Hủy thao tác thì quay về trạng thái ban đầu
                //Cho phép thêm mới
                cmdInsert.Enabled = true;
                //Tùy biến nút Update và Delete tùy theo việc có hay không dữ liệu trên lưới
                cmdUpdate.Enabled                = grdList.RowCount <= 0 ? false : true;
                cmdDelete.Enabled                = grdList.RowCount <= 0 ? false : true;
                cmdSave.Enabled                  = false;
                chkLaygiathuocquanhe.Checked     = false;
                chkThanhtoantruockhikham.Checked = false;
                chkAutoPayment.Checked           = false;
                //Nút Hủy biến thành nút thoát
                cmdClose.Text = "Thoát";
                //--------------------------------------------------------------
                //Cho phép chọn trên lưới dữ liệu được fill vào các Control
                m_blnAllowCurrentCellChangedOnGridView = true;
                //Tự động chọn dòng hiện tại trên lưới để hiển thị lại trên Control
                grdList_CurrentCellChanged(grdList, new EventArgs());
                //Tự động Focus đến nút thêm mới?
                cmdInsert.Focus();
                break;

            default:
                break;
            }
        }
        /// <summary>
        /// hàm thực hiện việc lấy thông tin của phần dữ liệu
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void frm_QlyLsuthaydoiDoituongKCB_Load(object sender, EventArgs e)
        {
            try
            {
                AllowTextChanged = false;
                b_HasLoaded = false;
                XoathongtinBHYT(true);
                AddAutoCompleteDiaChi();
                AutocompleteBenhvien();

                DataBinding.BindDataCombobox(cboDoituongKCB, THU_VIEN_CHUNG.LaydanhsachDoituongKcb(), DmucDoituongkcb.Columns.MaDoituongKcb, DmucDoituongkcb.Columns.TenDoituongKcb, "", false);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
                cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                ChangeObjectRegion();
                SetControlStatus();

            }
            catch
            {
            }
            finally
            {
                AllowTextChanged = true;
                b_HasLoaded = true;
                ModifyCommand();
            }
        }
        /// <summary>
        /// hàm thực hiện việc làm sách thông tin của bệnh nhân
        /// </summary>
        private void ClearControl()
        {
            Utility.SetMsg(lblMsg, "", false);
            m_blnHasJustInsert = false;
            ModifyCommand();
            AllowTextChanged = false;
            XoathongtinBHYT(true);

            _MaDoituongKcb = Utility.sDbnull(cboDoituongKCB.SelectedValue);
            objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
            if (objDoituongKCB == null) return;
            _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
            _IdLoaidoituongKcb = objDoituongKCB.IdLoaidoituongKcb;
            _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
            PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
            PtramBhytGocCu = PtramBhytCu;
            chkChuyenVien.Checked = false;
            AllowTextChanged = true;
            //Chuyển về trạng thái thêm mới
            m_enAct = action.Insert;
            if (PropertyLib._KCBProperties.SexInput) cboPatientSex.SelectedIndex = -1;
            ucBHYT1.ResetMe(objDoituongKCB);
            if (ucBHYT1.IsBHYT)
            {
            }
            else
            {
                PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
                PtramBhytGocCu = PtramBhytCu;
                cboDoituongKCB.Focus();
            }
            if (m_enAct == action.Insert)
            {
                dtFromDate.Text = m_dtData.AsEnumerable().Max(x => x.Field<string>("sngay_hethieuluc"));
                dtFromDate.Value = dtFromDate.Value.AddDays(1);
                dtToDate.Text = "";
            }
        }
        /// <summary>
        /// hàm thực hiện việc lấy thông tin của phần dữ liệu
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void frm_LichsudoituongKCB_Load(object sender, EventArgs e)
        {
            try
            {
                AllowTextChanged = false;
                b_HasLoaded = false;
                XoathongtinBHYT(true);
                AddAutoCompleteDiaChi();
                AutocompleteBenhvien();

                DataBinding.BindDataCombobox(cboDoituongKCB, THU_VIEN_CHUNG.LaydanhsachDoituongKcb(), DmucDoituongkcb.Columns.MaDoituongKcb, DmucDoituongkcb.Columns.TenDoituongKcb, "", false);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
                cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                ChangeObjectRegion();
                ModifyCommand();
                AllowTextChanged = true;
            }
            catch
            {
            }
            finally
            {
                if (PropertyLib._ConfigProperties.HIS_AppMode != VNS.Libs.AppType.AppEnum.AppMode.License)
                    this.Text = "Đăng ký KCB -->Demo 1500";
                ModifyCommand();
                b_HasLoaded = true;

            }
        }
        public void Insert(string TenDoituongKcb,short SttHthi,decimal PhantramDungtuyen,decimal? PhantramTraituyen,byte IdLoaidoituongKcb,string MaDoituongKcb,byte? GiathuocQuanhe,byte? ThanhtoanTruockhikham,string MotaThem,byte? TudongThanhtoan)
        {
            DmucDoituongkcb item = new DmucDoituongkcb();

            item.TenDoituongKcb = TenDoituongKcb;

            item.SttHthi = SttHthi;

            item.PhantramDungtuyen = PhantramDungtuyen;

            item.PhantramTraituyen = PhantramTraituyen;

            item.IdLoaidoituongKcb = IdLoaidoituongKcb;

            item.MaDoituongKcb = MaDoituongKcb;

            item.GiathuocQuanhe = GiathuocQuanhe;

            item.ThanhtoanTruockhikham = ThanhtoanTruockhikham;

            item.MotaThem = MotaThem;

            item.TudongThanhtoan = TudongThanhtoan;

            item.Save(UserName);
        }
Example #24
0
        public void SetValues(DataRow drData)
        {
            if (drData == null)
            {
                ClearMe();
                lblTuyenBHYT.Visible = false;
                pnlBHYT.Enabled = false;
                lblPtram.Text = "% giảm giá";
            }
            else
            {
                string _MaDoituongKcb = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MaDoituongKcb]);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();

                ChangeObjectRegion(objDoituongKCB);
                if (objDoituongKCB.IdLoaidoituongKcb == 0)//ĐỐi tượng BHYT
                {
                    chkCapCuu.Checked = Utility.Int32Dbnull(drData[KcbLichsuDoituongKcb.Columns.TrangthaiCapcuu], 0) == 1;
                    chkTraiTuyen.Checked = Utility.Int32Dbnull(drData[KcbLichsuDoituongKcb.Columns.DungTuyen], 0) == 0;
                    lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
                    txtDiachi_bhyt._Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.DiachiBhyt]);
                    if (!string.IsNullOrEmpty(Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.NgaybatdauBhyt])))
                        dtInsFromDate.Value = Convert.ToDateTime(drData[KcbLichsuDoituongKcb.Columns.NgaybatdauBhyt]);
                    if (!string.IsNullOrEmpty(Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.NgayketthucBhyt])))
                        dtInsToDate.Value = Convert.ToDateTime(drData[KcbLichsuDoituongKcb.Columns.NgayketthucBhyt]);
                    txtPtramBHYT.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.PtramBhyt], "0");
                    txtptramDauthe.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.PtramBhytGoc], "0");
                    txtMaDtuong_BHYT.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MaDoituongBhyt]);

                    txtMaQuyenloi_BHYT.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MaQuyenloi]);
                    txtNoiDongtrusoKCBBD.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.NoiDongtrusoKcbbd]);
                    txtOthu4.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MatheBhyt]).Substring(5, 2);
                    txtOthu5.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MatheBhyt]).Substring(7, 3);
                    txtOthu6.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MatheBhyt]).Substring(10, 5);

                    txtMaDTsinhsong.SetCode(Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MadtuongSinhsong]));
                    chkGiayBHYT.Checked = Utility.Byte2Bool(drData[KcbLichsuDoituongKcb.Columns.GiayBhyt]);

                    txtNoiphattheBHYT.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MaNoicapBhyt]);
                    txtNoiDKKCBBD.Text = Utility.sDbnull(drData[KcbLichsuDoituongKcb.Columns.MaKcbbd]);

                }
                else//Đối tượng khác BHYT
                {
                    ClearMe();
                }

            }
        }
        /// <summary>
        /// hàm thực hiện việc làm sách thông tin của Khách hàng
        /// </summary>
        private void ClearControl()
        {
            setMsg(uiStatusBar1.Panels["MSG"], "", false);
            m_blnHasJustInsert = false;
            txtSolankham.Text = "1";
            txtTEN_BN.Clear();

            txtDiachi.Clear();

            txtSoDT.Clear();
            txtNguoiLienhe.Clear();

            txtEmail.Clear();

            ModifyCommand();

            AllowTextChanged = false;

            _MaDoituongKcb = Utility.sDbnull(cboDoituongKCB.SelectedValue);
            objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
            if (objDoituongKCB == null) return;
            _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
            _IdLoaidoituongKcb = objDoituongKCB.IdLoaidoituongKcb;
            _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
            PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
            PtramBhytGocCu = PtramBhytCu;

            AllowTextChanged = true;
            //Chuyển về trạng thái thêm mới
            m_enAction = action.Insert;

            SinhMaLanKham();

            PtramBhytCu = 0;
            PtramBhytGocCu = 0;
            if (m_enAction == action.Insert)
            {
                dtpInputDate.Value = globalVariables.SysDate;
                dtCreateDate.Value = globalVariables.SysDate;

            }
            SetActionStatus();
        }
        private void MultiInsertData()
        {
            try
            {
                Int16 STTHthi = Utility.Int16Dbnull(txt_STT_HTHI.Text);
                for (int i = Utility.Int32Dbnull(Utility.DecimaltoDbnull(txtCodefrom.Text), 0); i <= Utility.Int32Dbnull(Utility.DecimaltoDbnull(txtCode2.Text), 0); i++)
                {
                    NoitruDmucGiuongbenh objBed = new NoitruDmucGiuongbenh();
                    objBed.IdKhoanoitru    = Utility.Int16Dbnull(cboKhoaNoiTru.SelectedValue);
                    objBed.IdBuong         = Utility.Int16Dbnull(txtBuong.MyID);
                    objBed.MotaThem        = Utility.sDbnull(txt_Mo_Ta.Text);
                    objBed.SonguoiToida    = Utility.Int16Dbnull(txtSuChua.Value);
                    objBed.SttHthi         = Utility.Int16Dbnull(txt_STT_HTHI.Value);
                    objBed.MaGiuong        = Utility.sDbnull(txtMa.Text) + i.ToString();
                    objBed.MaBhyt          = Utility.sDbnull(txtMaBHYT.Text) + i.ToString();
                    objBed.TenGiuong       = Utility.sDbnull(txtTEN.Text) + " " + i.ToString();
                    objBed.TenBhyt         = Utility.sDbnull(txtTEN.Text) + " " + i.ToString();
                    objBed.MaDonvitinh     = txtDonvitinh.myCode;
                    objBed.TthaiTunguyen   = Utility.Bool2byte(chktutuc.Checked);
                    objBed.GiaDichvu       = Utility.DecimaltoDbnull(txtDongia.Text, 0);
                    objBed.GiaBhyt         = Utility.DecimaltoDbnull(txtGiaBHYT.Text, 0);
                    objBed.GiaKhac         = Utility.DecimaltoDbnull(txtGiakhac.Text, 0);
                    objBed.PhuthuDungtuyen = Utility.DecimaltoDbnull(txtPTDT.Text, 0);
                    objBed.PhuthuTraituyen = Utility.DecimaltoDbnull(txtPTTT.Text, 0);
                    objBed.TrangThai       = (byte?)(chkTrangThai.Checked ? 1 : 0);
                    NoitruDmucGiuongbenh objcheck = new Select().From(NoitruDmucGiuongbenh.Schema)
                                                    .Where(NoitruDmucGiuongbenh.Columns.MaGiuong).IsEqualTo(objBed.MaGiuong)
                                                    .And(NoitruDmucGiuongbenh.Columns.IdKhoanoitru).IsEqualTo(objBed.IdKhoanoitru)
                                                    .And(NoitruDmucGiuongbenh.Columns.IdBuong).IsEqualTo(objBed.IdBuong)
                                                    .ExecuteSingle <NoitruDmucGiuongbenh>();
                    if (objcheck != null)
                    {
                        if (chkAutoupdate.Checked)
                        {
                            objBed.IdGiuong = objcheck.IdGiuong;
                            objBed.MarkOld();
                            objBed.IsNew = false;
                        }
                        else
                        {
                            continue;
                        }
                    }
                    else
                    {
                        STTHthi     += 1;
                        objBed.IsNew = true;
                    }
                    objBed.SttHthi = STTHthi;
                    objBed.Save();

                    if (objBed != null)
                    {
                        if (chkApDungGia.Checked)
                        {
                            new Delete().From(NoitruQheDoituongBuonggiuong.Schema)
                            .Where(NoitruQheDoituongBuonggiuong.Columns.IdGiuong).IsEqualTo(Utility.Int32Dbnull(txtID.Text)).Execute();
                            foreach (Janus.Windows.GridEX.GridEXRow gridExRow in grdQuanheGiuong.GetCheckedRows())
                            {
                                NoitruQheDoituongBuonggiuong objectType = new NoitruQheDoituongBuonggiuong();
                                objectType.DonGia = (objectType.MaDoituongKcb == "DV"?
                                                     Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.DonGia].Value, objBed.GiaDichvu)
                                     :(objectType.MaDoituongKcb == "BHYT"?
                                       Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.DonGia].Value, objBed.GiaBhyt):
                                       Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.DonGia].Value, objBed.GiaKhac))
                                                     )
                                ;
                                objectType.PhuthuDungtuyen = Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.PhuthuDungtuyen].Value, 0);
                                objectType.PhuthuTraituyen = Utility.DecimaltoDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.PhuthuTraituyen].Value, 0);
                                objectType.MaDoituongKcb   = Utility.sDbnull(gridExRow.Cells[NoitruQheDoituongBuonggiuong.Columns.MaDoituongKcb].Value);
                                // DmucDoituongkcb objectType1=DmucDoituongkcb.FetchByID()
                                SqlQuery sqlQuery =
                                    new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.Columns.MaDoituongKcb).IsEqualTo(
                                        objectType.MaDoituongKcb);
                                DmucDoituongkcb objectType1 = sqlQuery.ExecuteSingle <DmucDoituongkcb>();
                                if (objectType1 != null)
                                {
                                    objectType.IdLoaidoituongKcb = Utility.Int32Dbnull(objectType1.IdLoaidoituongKcb);
                                }
                                objectType.KieuThue = "GIUONG";
                                objectType.IdBuong  = Utility.Int16Dbnull(txtBuong.MyID);
                                objectType.IdGiuong = Utility.Int16Dbnull(objBed.IdGiuong, -1);

                                objectType.IsNew = true;
                                objectType.Save();
                            }
                        }
                    }
                }
                if (MyGetData != null)
                {
                    MyGetData();
                    Utility.GonewRowJanus(grdList, NoitruDmucGiuongbenh.Columns.IdGiuong, Utility.sDbnull(txtID.Text));
                }
                Utility.SetMsg(lblMsg, "Bạn thực hiện thêm mới thành công", true);
                if (chkthemmoilientuc.Checked)
                {
                    ClearControl();
                }
                else
                {
                    Close();
                }
            }
            catch (Exception)
            {
            }
        }
        private void LoadThongtinBenhnhan()
        {
            PtramBhytCu = 0m;
            PtramBhytGocCu = 0m;
            AllowTextChanged = false;
            KcbDanhsachBenhnhan objBenhnhan = KcbDanhsachBenhnhan.FetchByID(txtMaBN.Text);
            if (objBenhnhan != null)
            {
                txtTEN_BN.Text = Utility.sDbnull(objBenhnhan.TenBenhnhan);
                txtSoDT.Text = Utility.sDbnull(objBenhnhan.DienThoai);
                txtDiachi._Text = Utility.sDbnull(objBenhnhan.DiaChi);

                txtEmail.Text = Utility.sDbnull(objBenhnhan.Email);
                txtFax.Text = objBenhnhan.Fax;
                txtNguoiLienhe.Text = objBenhnhan.NguoiLienhe;
                txtSoDT.Text = objBenhnhan.DienThoai;

                objLuotkham = new Select().From(KcbLuotkham.Schema)
                   .Where(KcbLuotkham.Columns.MaLuotkham).IsEqualTo(txtMaLankham.Text)
                   .And(KcbLuotkham.Columns.IdBenhnhan).IsEqualTo(Utility.Int32Dbnull(txtMaBN.Text, -1)).ExecuteSingle
                   <KcbLuotkham>();
                if (objLuotkham != null)
                {
                    m_strMaluotkham = objLuotkham.MaLuotkham;
                    txtLoaikham.SetCode(objLuotkham.KieuKham);
                    txtSolankham.Text = Utility.sDbnull(objLuotkham.SolanKham);
                    _IdDoituongKcb = objLuotkham.IdDoituongKcb;
                    dtpInputDate.Value = objLuotkham.NgayTiepdon;
                    dtCreateDate.Value = objLuotkham.NgayTiepdon;
                    chkPhongchuyenmon.Checked = Utility.Byte2Bool(objLuotkham.TraKQPhongchuyenmon);
                    chkFax.Checked = Utility.Byte2Bool(objLuotkham.TraKQFax);
                    chkMail.Checked = Utility.Byte2Bool(objLuotkham.TraKQMail);
                    chkEmail.Checked = Utility.Byte2Bool(objLuotkham.TraKQEmail);
                    chkSosanh.Checked = Utility.Byte2Bool(objLuotkham.SosanhQcvn);
                    txtMotathem.Text = objLuotkham.MotaThem;
                    txtEmail.Text = objLuotkham.Email;
                    _MaDoituongKcb = Utility.sDbnull(objLuotkham.MaDoituongKcb);
                    objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();

                    ChangeObjectRegion();
                    PtramBhytCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhyt, 0);
                    PtramBhytGocCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhytGoc, 0);
                    _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
                    _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
                    cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);

                }
                else
                {
                }
            }
        }
Example #28
0
 void cboDoituongKCB_SelectedIndexChanged(object sender, EventArgs e)
 {
     try
     {
         if (!AllowTextChanged) return;
         _MaDoituongKcb = Utility.sDbnull(cboDoituongKCB.SelectedValue);
         objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
         ChangeObjectRegion();
     }
     catch(Exception ex)
     {
         Utility.CatchException(ex);
     }
 }
Example #29
0
        public void SetValues(bool Chuyenvien, DmucDoituongkcb objDoituongKCB,KcbLuotkham objLuotkham)
        {
            this.Chuyenvien = Chuyenvien;
            this.objDoituongKCB = objDoituongKCB;
            this.objLuotkham = objLuotkham;
            //Gan gia tri
            chkCapCuu.Checked = Utility.Int32Dbnull(objLuotkham.TrangthaiCapcuu, 0) == 1;
            chkTraiTuyen.Checked = Utility.Int32Dbnull(objLuotkham.DungTuyen, 0) == 0;
            lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
            txtDiachi_bhyt._Text = Utility.sDbnull(objLuotkham.DiachiBhyt);
            if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgaybatdauBhyt)))
                dtInsFromDate.Value = Convert.ToDateTime(objLuotkham.NgaybatdauBhyt);
            if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgayketthucBhyt)))
                dtInsToDate.Value = Convert.ToDateTime(objLuotkham.NgayketthucBhyt);
            txtPtramBHYT.Text = Utility.sDbnull(objLuotkham.PtramBhyt, "0");
            txtptramDauthe.Text = Utility.sDbnull(objLuotkham.PtramBhytGoc, "0");
            txtMaDtuong_BHYT.Text = Utility.sDbnull(objLuotkham.MaDoituongBhyt);

            txtMaQuyenloi_BHYT.Text = Utility.sDbnull(objLuotkham.MaQuyenloi);
            txtNoiDongtrusoKCBBD.Text = Utility.sDbnull(objLuotkham.NoiDongtrusoKcbbd);
            txtOthu4.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(5, 2);
            txtOthu5.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(7, 3);
            txtOthu6.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(10, 5);

            txtMaDTsinhsong.SetCode(objLuotkham.MadtuongSinhsong);
            chkGiayBHYT.Checked = Utility.Byte2Bool(objLuotkham.GiayBhyt);

            txtNoiphattheBHYT.Text = Utility.sDbnull(objLuotkham.MaNoicapBhyt);
            txtNoiDKKCBBD.Text = Utility.sDbnull(objLuotkham.MaKcbbd);
            pnlBHYT.Enabled = true && !PreventEnabled;
        }
        private void PerformActionInsert()
        {
            var objDmucDichvukcb = new DmucDichvukcb();

            objDmucDichvukcb.MaDichvukcb  = Utility.sDbnull(txtCode.Text.Trim(), "");
            objDmucDichvukcb.MaGia        = Utility.sDbnull(txtmagiabhyt.Text.Trim(), "");
            objDmucDichvukcb.HoatDong     = chkhoatdong.Checked;
            objDmucDichvukcb.TenDichvukcb = Utility.sDbnull(txtName.Text, "");
            objDmucDichvukcb.IdKieukham   = Utility.Int16Dbnull(cboLoaiKham.SelectedValue, -1);
            objDmucDichvukcb.IdKhoaphong  = Utility.Int16Dbnull(cboDepartment1.SelectedValue, -1);
            objDmucDichvukcb.IdBacsy      = Convert.ToInt16(cboBacSy.Items.Count > 0
                                                           ? Utility.Int16Dbnull(cboBacSy.SelectedValue, -1)
                                                           : -1);
            objDmucDichvukcb.MotaThem      = Utility.DoTrim(txtDesc.Text);
            objDmucDichvukcb.SttHthi       = Utility.Int16Dbnull(nmrSTT.Value);
            objDmucDichvukcb.IdDoituongKcb = Utility.Int16Dbnull(cboDoituong.SelectedValue, -1);
            DmucDoituongkcb objectType = DmucDoituongkcb.FetchByID(objDmucDichvukcb.IdDoituongKcb);

            if (objectType != null)
            {
                objDmucDichvukcb.MaDoituongKcb = Utility.sDbnull(objectType.MaDoituongKcb, "");
            }
            else
            {
                objDmucDichvukcb.MaDoituongKcb = "ALL";
            }

            DmucKieukham objKieukham = DmucKieukham.FetchByID(Utility.Int16Dbnull(cboLoaiKham.SelectedValue, -1));

            if (objKieukham != null)
            {
                objDmucDichvukcb.NhomBaocao = Utility.sDbnull(objKieukham.NhomBaocao, "");
            }
            else
            {
                objDmucDichvukcb.NhomBaocao = "-1";
            }

            objDmucDichvukcb.IdPhongkham     = Utility.Int16Dbnull(cboRoomDept.SelectedValue);
            objDmucDichvukcb.PhuthuDungtuyen = Utility.DecimaltoDbnull(txtPTDT.Text, 0);
            objDmucDichvukcb.PhuthuTraituyen = Utility.DecimaltoDbnull(txtPTTT.Text, 0);
            objDmucDichvukcb.DonGia          = Utility.DecimaltoDbnull(txtDongia.Text, 0);
            objDmucDichvukcb.DongiaNgoaigio  = Utility.DecimaltoDbnull(txtGiangoaigio.Text, 0);
            objDmucDichvukcb.PhuthuNgoaigio  = Utility.DecimaltoDbnull(txtPhuthungoaigio.Text, 0);
            objDmucDichvukcb.TuTuc           = Utility.Bool2byte(chkTutuc.Checked);
            objDmucDichvukcb.MaBhyt          = Utility.sDbnull(txtMaBhyt.Text.Trim(), "");
            objDmucDichvukcb.IsNew           = true;
            objDmucDichvukcb.Save();
            DataRow dr = m_dtDataRelation.NewRow();

            dr[DmucDichvukcb.Columns.IdDichvukcb] = Utility.Int32Dbnull(
                _Query.GetMax(DmucDichvukcb.Columns.IdDichvukcb), -1);
            dr[DmucDichvukcb.Columns.IdDoituongKcb] = Utility.DecimaltoDbnull(cboDoituong.SelectedValue);
            dr[DmucDichvukcb.Columns.IdKhoaphong]   = Utility.Int16Dbnull(cboDepartment1.SelectedValue, -1);
            dr[DmucDichvukcb.Columns.IdPhongkham]   = Utility.Int16Dbnull(cboRoomDept.SelectedValue, -1);
            dr[DmucDichvukcb.Columns.IdBacsy]       = cboBacSy.Items.Count > 0
                                                    ? Utility.Int16Dbnull(cboBacSy.SelectedValue, -1)
                                                    : -1;
            dr[DmucDichvukcb.Columns.DonGia]          = Utility.DecimaltoDbnull(txtDongia.Text, 0);
            dr[DmucDichvukcb.Columns.PhuthuDungtuyen] = Utility.DecimaltoDbnull(txtPTDT.Text, 0);
            dr[DmucDichvukcb.Columns.PhuthuTraituyen] = Utility.DecimaltoDbnull(txtPTTT.Text, 0);
            dr[DmucDichvukcb.Columns.DongiaNgoaigio]  = Utility.DecimaltoDbnull(txtGiangoaigio.Text, 0);
            dr[DmucDichvukcb.Columns.PhuthuNgoaigio]  = Utility.DecimaltoDbnull(txtPhuthungoaigio.Text, 0);

            dr[DmucDichvukcb.Columns.MotaThem] = Utility.DoTrim(txtDesc.Text);
            dr[DmucDichvukcb.Columns.SttHthi]  = Utility.Int16Dbnull(nmrSTT.Value, 1);


            dr[DmucDichvukcb.Columns.TuTuc]    = Utility.Bool2byte(chkTutuc.Checked);
            dr[DmucDichvukcb.Columns.HoatDong] = Utility.Bool2byte(chkhoatdong.Checked);
            dr["ten_phong"] = cboRoomDept.Text;
            dr[DmucDichvukcb.Columns.IdKieukham]   = Utility.Int16Dbnull(cboLoaiKham.SelectedValue, -1);
            dr[DmucKieukham.Columns.TenKieukham]   = cboLoaiKham.Text;
            dr[DmucDichvukcb.Columns.MaDichvukcb]  = txtCode.Text.Trim();
            dr[DmucDichvukcb.Columns.MaBhyt]       = txtMaBhyt.Text.Trim();
            dr[DmucDichvukcb.Columns.MaGia]        = txtmagiabhyt.Text.Trim();
            dr[DmucDichvukcb.Columns.TenDichvukcb] = txtName.Text.Trim();
            dr["ten_khoa"]  = cboDepartment1.SelectedIndex <= -1 ? "Tất cả các khoa KCB" : cboDepartment1.Text;
            dr["ten_bacsi"] = cboBacSy.SelectedIndex > 0 ? cboBacSy.Text : "";
            dr[DmucDoituongkcb.Columns.TenDoituongKcb] = objectType != null ? cboDoituong.Text : "Tất cả các đối tượng";

            m_dtDataRelation.Rows.Add(dr);
            //this.Close();
        }
Example #31
0
 public void ChangeObjectRegion(DmucDoituongkcb objDoituongKCB)
 {
     this.objDoituongKCB = objDoituongKCB;
     ResetMe(objDoituongKCB);
 }
Example #32
0
        /// <summary>
        /// hàm thực hiện việc làm sách thông tin của bệnh nhân
        /// </summary>
        private void ClearControl()
        {
            setMsg(uiStatusBar1.Panels["MSG"], "", false);
            m_blnHasJustInsert = false;
            txtSolankham.Text = "1";
            txtTEN_BN.Clear();
            txtNamSinh.Clear();
            dtpBOD.Value = globalVariables.SysDate;
            txtTuoi.Clear();
            txtCMT.Clear();
            txtNgheNghiep.Clear();
            txtDiachi.Clear();
            txtDantoc.Clear();
            txtTrieuChungBD.Clear();
            txtSoDT.Clear();
            chkChuyenVien.Checked = false;
            txtNoichuyenden.SetCode("-1");
            txtKieuKham.ClearMe();
            txtPhongkham.ClearMe();

            txtLoaiBN.SetCode("-1");
            txtNoigioithieu.Clear();
            txtEmail.Clear();
            if (THU_VIEN_CHUNG.IsNgoaiGio())
            {
               this.Text= "Bệnh nhân đang khám dịch vụ ngoài giờ";
            }

            ModifyCommand();
            EnumerableRowCollection<DataRow> query = from kham in m_dtExamTypeRelationList.AsEnumerable()
                                                     select kham;
            if (query.Count() > 0)
            {
                cboKieuKham.SelectedIndex = -1;
                cboKieuKham.Text = "CHỌN PHÒNG KHÁM";
            }
            AllowTextChanged = false;
            XoathongtinBHYT(true);

            _MaDoituongKcb = Utility.sDbnull(cboDoituongKCB.SelectedValue);
            objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
            if (objDoituongKCB == null) return;
            _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
            _IdLoaidoituongKcb = objDoituongKCB.IdLoaidoituongKcb;
            _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
            PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
            PtramBhytGocCu = PtramBhytCu;
            txtPtramBHYT.Text = objDoituongKCB.PhantramTraituyen.ToString();
            txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
            if (objDoituongKCB.IdLoaidoituongKcb == 0)//ĐỐi tượng BHYT
            {
                pnlBHYT.Enabled = true;
                lblPtram.Text = "Phần trăm BHYT";
                TinhPtramBHYT();
                NapThongtinDichvuKCB();
                txtMaDtuong_BHYT.SelectAll();
                txtMaDtuong_BHYT.Focus();
            }
            else//Đối tượng khác BHYT
            {
                pnlBHYT.Enabled = false;
                lblPtram.Text = "P.trăm giảm giá";
                //XoathongtinBHYT(PropertyLib._KCBProperties.XoaBHYT);
                NapThongtinDichvuKCB();
                txtTEN_BN.Focus();
            }

            chkTraiTuyen.Checked = false;
            lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
            lblPtramdauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
            txtptramDauthe.Visible = objDoituongKCB.IdLoaidoituongKcb == 0;
            chkChuyenVien.Checked = false;
            chkCapCuu.Checked = false;
            txtPtramBHYT.Text = "0";
            txtptramDauthe.Text = "0";
            AllowTextChanged = true;
            //Chuyển về trạng thái thêm mới
            m_enAction = action.Insert;
            if (PropertyLib._KCBProperties.SexInput) cboPatientSex.SelectedIndex = -1;
            lnkThem.Visible = false;
            SinhMaLanKham();
            m_dataDataRegExam.Clear();
            if (pnlBHYT.Enabled)
            {
                lblPtram.Text = "Phần trăm BHYT";
                txtMaDtuong_BHYT.Focus();
            }
            else
            {
                lblPtram.Text = "P.trăm giảm giá";
                PtramBhytCu = objDoituongKCB.PhantramTraituyen.Value;
                PtramBhytGocCu = PtramBhytCu;
                txtPtramBHYT.Text = objDoituongKCB.PhantramTraituyen.ToString();
                txtptramDauthe.Text = objDoituongKCB.PhantramTraituyen.ToString();
                txtTEN_BN.Focus();
            }
            if (m_enAction == action.Insert)
            {
                dtpInputDate.Value = globalVariables.SysDate;
                dtCreateDate.Value = globalVariables.SysDate;
                dtInsFromDate.Value = new DateTime(globalVariables.SysDate.Year, 1, 1);
                dtInsToDate.Value = new DateTime(globalVariables.SysDate.Year, 12, 31);
            }
            SetActionStatus();
            DmucDichvukcb objDmucDichvukcb = DmucDichvukcb.FetchByID(QMS_IdDichvuKcb);
            if (objDmucDichvukcb != null)
            {

                txtKieuKham.SetId(objDmucDichvukcb.IdKieukham);
                txtPhongkham.SetId(objDmucDichvukcb.IdPhongkham);
                txtExamtypeCode.SetCode(objDmucDichvukcb.MaDichvukcb);
                cboKieuKham.Text = objDmucDichvukcb.TenDichvukcb;

            }
            txtExamtypeCode.TabStop = objDmucDichvukcb == null;
            cboKieuKham.TabStop = objDmucDichvukcb == null;
        }
Example #33
0
 private void FillDataDoituong()
 {
     DataBinding.BindDataCombobox(cboDoituongKCB, THU_VIEN_CHUNG.LaydanhsachDoituongKcb(),
         DmucDoituongkcb.Columns.MaDoituongKcb, DmucDoituongkcb.Columns.TenDoituongKcb, "", false);
     objDoituongKCB =
         new Select().From(DmucDoituongkcb.Schema)
             .Where(DmucDoituongkcb.MaDoituongKcbColumn)
             .IsEqualTo(_MaDoituongKcb)
             .ExecuteSingle<DmucDoituongkcb>();
     cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
 }
Example #34
0
        // private  b_QMSStop=false;
        /// <summary>
        /// hàm thực hiện việc lấy thông tin của phần dữ liệu
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void frm_KCB_DANGKY_Load(object sender, EventArgs e)
        {
            try
            {
                AllowTextChanged = false;
                b_HasLoaded = false;
                dtInsFromDate.Value = new DateTime(globalVariables.SysDate.Year, 1, 1);
                dtInsToDate.Value = new DateTime(globalVariables.SysDate.Year, 12, 31);
                Utility.SetColor(lblDiachiBHYT, THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_BATNHAP_DIACHI_BHYT", "1", false) == "1" ? lblHoten.ForeColor : lblMatheBHYT.ForeColor);
                Utility.SetColor(lblDiachiBN, THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_BATNHAP_DIACHI_BENHNHAN", "1", false) == "1" ? lblHoten.ForeColor : lblMatheBHYT.ForeColor);
                chkTraiTuyen.Visible = THU_VIEN_CHUNG.Laygiatrithamsohethong("KCB_CHOPHEPTIEPDON_TRAITUYEN", "1", false) == "1";

                XoathongtinBHYT(true);
                AddAutoCompleteDiaChi();
                Get_DanhmucChung();
                AutocompleteBenhvien();
                LoadThongTinChoKham();
                NapThongtinDichvuKCB();
                DataBinding.BindDataCombobox(cboDoituongKCB, THU_VIEN_CHUNG.LaydanhsachDoituongKcb(), DmucDoituongkcb.Columns.MaDoituongKcb, DmucDoituongkcb.Columns.TenDoituongKcb, "", false);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
                cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                ChangeObjectRegion();
                if (m_enAction == action.Insert)//Thêm mới BN
                {
                    objLuotkham = null;
                    if (PropertyLib._KCBProperties.SexInput)
                        cboPatientSex.SelectedIndex = -1;
                    SinhMaLanKham();
                    txtTEN_BN.Select();
                }
                else if (m_enAction == action.Update)//Cập nhật thông tin Bệnh nhân
                {
                    LoadThongtinBenhnhan();
                    LaydanhsachdangkyKCB();
                    txtTEN_BN.Select();
                }
                else if (m_enAction == action.Add) //Thêm mới lần khám
                {
                    objLuotkham = null;
                    string ngay_kham = globalVariables.SysDate.ToString("dd/MM/yyyy");
                    if (!NotPayment(txtMaBN.Text.Trim(), ref ngay_kham))//Nếu đã thanh toán xong hết thì thêm lần khám mới
                    {
                        SinhMaLanKham();
                        LoadThongtinBenhnhan();
                        LaydanhsachdangkyKCB();
                        txtKieuKham.Select();
                    }
                    else//Còn lần khám chưa thanh toán-->Kiểm tra
                    {
                        //nếu là ngày hiện tại thì đặt về trạng thái sửa
                        if (ngay_kham == "NOREG" || ngay_kham==globalVariables.SysDate.ToString("dd/MM/yyyy"))
                        {
                            LoadThongtinBenhnhan();
                            if (ngay_kham == "NOREG")//Bn chưa đăng ký phòng khám nào cả.
                            {
                                //Nếu ngày hệ thống=Ngày đăng ký gần nhất-->Sửa
                                if (globalVariables.SysDate.ToString("dd/MM/yyyy") == dtpInputDate.Value.ToString("dd/MM/yyyy"))
                                {
                                    m_enAction = action.Update;

                                    Utility.ShowMsg(
                                       "Bệnh nhân vừa được đăng ký ngày hôm nay nên hệ thống sẽ chuyển về chế độ Sửa thông tin. Nhấn OK để bắt đầu sửa");
                                    LaydanhsachdangkyKCB();
                                    txtTEN_BN.Select();
                                }
                                else//Thêm lần khám cho ngày mới
                                {
                                    m_enAction = action.Add;
                                    SinhMaLanKham();
                                    LaydanhsachdangkyKCB();
                                    txtKieuKham.Select();
                                }
                            }
                            else//Quay về trạng thái sửa
                            {
                                m_enAction = action.Update;

                                Utility.ShowMsg(
                                   "Bệnh nhân vừa được đăng ký ngày hôm nay nên hệ thống sẽ chuyển về chế độ Sửa thông tin. Nhấn OK để bắt đầu sửa");
                                LaydanhsachdangkyKCB();
                                txtTEN_BN.Select();
                            }
                        }
                        else //Không cho phép thêm lần khám khác nếu chưa thanh toán lần khám của ngày hôm trước
                        {
                            Utility.ShowMsg(
                                "Bệnh nhân đang có lần khám chưa được thanh toán. Cần thanh toán hết các lần đến khám bệnh của Bệnh nhân trước khi thêm lần khám mới. Nhấn OK để hệ thống chuyển về trạng thái thêm mới Bệnh nhân");
                            cmdThemMoiBN_Click(cmdThemMoiBN, new EventArgs());
                        }
                    }
                }
                StatusControl();
                ModifyCommand();
                AllowTextChanged = true;
            }
            catch
            {
            }
            finally
            {
                this.Text = "Đăng ký KCB -->Demo 5000";
                SetActionStatus();
                if (Nhieuhon2Manhinh())
                {
                    pThongTinQMS.Enabled = true;
                    b_HasSecondScreen = true;
                    ShowScreen();
                }
                else
                {
                    b_HasSecondScreen = false;
                    pThongTinQMS.Enabled = false;
                }

                ModifyCommand();
                ModifyButtonCommandRegExam();

                b_HasLoaded = true;
                CanhbaoInphoi();

            }
        }
Example #35
0
 void cboKieuKham_ValueChanged(object sender, EventArgs e)
 {
     try
     {
         if (AutoLoad || cboKieuKham.SelectedIndex == -1) return;
         int iddichvukcb = Utility.Int32Dbnull(cboKieuKham.Value);
         DmucDichvukcb objDichvuKCB =
         DmucDichvukcb.FetchByID(Utility.Int32Dbnull(cboKieuKham.Value));
         objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
         DmucKhoaphong objdepartment = new Select().From(DmucKhoaphong.Schema).Where(DmucKhoaphong.MaKhoaphongColumn).IsEqualTo(globalVariables.MA_KHOA_THIEN).ExecuteSingle<DmucKhoaphong>();
         if (objDichvuKCB != null)
         {
             txtKieuKham.SetId(objDichvuKCB.IdKieukham);
             txtIDPkham.Text = Utility.sDbnull(objDichvuKCB.IdPhongkham);
             //txtPhongkham._Text=
         }
         else
             txtKieuKham.SetId(-1);
     }
     catch
     {
     }
 }
Example #36
0
        void ImportFromExcel(bool taoquanhe)
        {
            bool hasError = false;

            try
            {
                using (var Scope = new TransactionScope())
                {
                    using (var dbScope = new SharedDbConnectionScope())
                    {
                        //new Delete().From(DmucThuoc.Schema).Execute();
                        //if (taoquanhe)
                        //{
                        //    List<int> lstIdDoituongKCB = (from p in grdObjectTypeList.GetCheckedRows()
                        //                                  select Utility.Int32Dbnull(p.Cells[DmucDoituongkcb.Columns.IdDoituongKcb].Value, 0)
                        //                                     ).ToList<int>();
                        //    new Delete().From(QheDoituongThuoc.Schema).Where(QheDoituongThuoc.Columns.IdDoituongKcb).In(lstIdDoituongKCB).Execute();
                        //}
                        SPs.ResetDuocAll().Execute();
                        int           idx = 0;
                        List <string> lstNoitruNgoaitru = new List <string>()
                        {
                            "ALL", "NOI", "NGOAI"
                        };
                        List <string> lstThuoc_VT = new List <string>()
                        {
                            "THUOC", "VT"
                        };
                        progressBar1.Visible = true;
                        lblCount.Visible     = true;
                        progressBar1.Minimum = 0;
                        progressBar1.Maximum = grdList.GetCheckedRows().Length;
                        progressBar1.Value   = 0;
                        foreach (GridEXRow row in grdList.GetCheckedRows())
                        {
                            idx++;
                            if (progressBar1.Value + 1 <= progressBar1.Maximum)
                            {
                                progressBar1.Value += 1;
                            }
                            lblCount.Text = progressBar1.Value.ToString() + " / " + progressBar1.Maximum.ToString();

                            try
                            {
                                DmucThuoc _newDmucThuoc = new DmucThuoc();
                                _newDmucThuoc.DangBaoche  = Utility.sDbnull(row.Cells[DmucThuoc.Columns.DangBaoche].Value, "");
                                _newDmucThuoc.DonGia      = Utility.DecimaltoDbnull(row.Cells[DmucThuoc.Columns.DonGia].Value, 0);
                                _newDmucThuoc.GiaBhyt     = Utility.DecimaltoDbnull(row.Cells[DmucThuoc.Columns.GiaBhyt].Value, 0);
                                _newDmucThuoc.HamLuong    = Utility.sDbnull(row.Cells[DmucThuoc.Columns.HamLuong].Value, "");
                                _newDmucThuoc.HangSanxuat = Utility.sDbnull(row.Cells[DmucThuoc.Columns.HangSanxuat].Value, "");
                                _newDmucThuoc.HoatChat    = Utility.sDbnull(row.Cells[DmucThuoc.Columns.HoatChat].Value, "");
                                _newDmucThuoc.IdLoaithuoc = Utility.Int16Dbnull(row.Cells[DmucThuoc.Columns.IdLoaithuoc].Value, -1);
                                _newDmucThuoc.IdThuoc     = -1;
                                string KieuThuocvattu = Utility.DoTrim(Utility.sDbnull(row.Cells[DmucThuoc.Columns.KieuThuocvattu].Value, "THUOC"));
                                _newDmucThuoc.KieuThuocvattu = KieuThuocvattu == "" || !lstThuoc_VT.Contains(KieuThuocvattu) ? "THUOC" : KieuThuocvattu;
                                _newDmucThuoc.MaDonvitinh    = Utility.sDbnull(row.Cells[DmucThuoc.Columns.MaDonvitinh].Value, "");
                                string ma_thuoc = Utility.DoTrim(Utility.sDbnull(row.Cells[DmucThuoc.Columns.MaThuoc].Value, ""));
                                _newDmucThuoc.MaThuoc  = ma_thuoc == "" ? "T" + idx.ToString() : ma_thuoc;
                                _newDmucThuoc.MotaThem = Utility.sDbnull(row.Cells[DmucThuoc.Columns.MotaThem].Value, "");
                                string NoitruNgoaitru = Utility.DoTrim(Utility.sDbnull(row.Cells[DmucThuoc.Columns.NoitruNgoaitru].Value, ""));
                                _newDmucThuoc.NoitruNgoaitru  = NoitruNgoaitru == "" || !lstNoitruNgoaitru.Contains(NoitruNgoaitru) ? "ALL" : NoitruNgoaitru;
                                _newDmucThuoc.NuocSanxuat     = Utility.sDbnull(row.Cells[DmucThuoc.Columns.NuocSanxuat].Value, "");
                                _newDmucThuoc.PhuthuDungtuyen = Utility.DecimaltoDbnull(row.Cells[DmucThuoc.Columns.PhuthuDungtuyen].Value, 0);
                                _newDmucThuoc.PhuthuTraituyen = Utility.DecimaltoDbnull(row.Cells[DmucThuoc.Columns.PhuthuTraituyen].Value, 0);
                                _newDmucThuoc.QD31            = Utility.sDbnull(row.Cells[DmucThuoc.Columns.QD31].Value, "");
                                _newDmucThuoc.SoDangky        = Utility.sDbnull(row.Cells[DmucThuoc.Columns.SoDangky].Value, "");
                                _newDmucThuoc.TenBhyt         = Utility.sDbnull(row.Cells[DmucThuoc.Columns.TenBhyt].Value, "");
                                _newDmucThuoc.TenThuoc        = Utility.sDbnull(row.Cells[DmucThuoc.Columns.TenThuoc].Value, "");
                                _newDmucThuoc.TinhChat        = Utility.ByteDbnull(row.Cells[DmucThuoc.Columns.TinhChat].Value, 0);
                                _newDmucThuoc.TrangThai       = 1;
                                _newDmucThuoc.TuTuc           = Utility.ByteDbnull(row.Cells[DmucThuoc.Columns.TuTuc].Value, 0);

                                _newDmucThuoc.IsNew = true;
                                _newDmucThuoc.Save();
                                if (taoquanhe)
                                {
                                    foreach (GridEXRow rowdoituong in grdObjectTypeList.GetCheckedRows())
                                    {
                                        DmucDoituongkcb  _DmucDoituongkcb  = DmucDoituongkcb.FetchByID(Utility.Int32Dbnull(rowdoituong.Cells[DmucDoituongkcb.Columns.IdDoituongKcb].Value, -1));
                                        QheDoituongThuoc _QheDoituongThuoc = new QheDoituongThuoc();

                                        _QheDoituongThuoc.IdDoituongKcb     = _DmucDoituongkcb.IdDoituongKcb;
                                        _QheDoituongThuoc.IdLoaithuoc       = _newDmucThuoc.IdLoaithuoc;
                                        _QheDoituongThuoc.IdThuoc           = _newDmucThuoc.IdThuoc;
                                        _QheDoituongThuoc.TyleGiamgia       = 0;
                                        _QheDoituongThuoc.KieuGiamgia       = "%";
                                        _QheDoituongThuoc.DonGia            = (THU_VIEN_CHUNG.IsBaoHiem(_DmucDoituongkcb.IdLoaidoituongKcb) ? Utility.DecimaltoDbnull(_newDmucThuoc.GiaBhyt, 0) : Utility.DecimaltoDbnull(_newDmucThuoc.DonGia, 0));
                                        _QheDoituongThuoc.PhuthuDungtuyen   = (THU_VIEN_CHUNG.IsBaoHiem(_DmucDoituongkcb.IdLoaidoituongKcb) ? Utility.DecimaltoDbnull(_newDmucThuoc.PhuthuDungtuyen, 0) : 0m);
                                        _QheDoituongThuoc.PhuthuTraituyen   = (THU_VIEN_CHUNG.IsBaoHiem(_DmucDoituongkcb.IdLoaidoituongKcb) ? Utility.DecimaltoDbnull(_newDmucThuoc.PhuthuTraituyen, 0) : 0m);
                                        _QheDoituongThuoc.IdLoaidoituongKcb = _DmucDoituongkcb.IdLoaidoituongKcb;

                                        _QheDoituongThuoc.MaDoituongKcb  = _DmucDoituongkcb.MaDoituongKcb;
                                        _QheDoituongThuoc.MaKhoaThuchien = globalVariables.MA_KHOA_THIEN;
                                        _QheDoituongThuoc.NgayTao        = globalVariables.SysDate;
                                        _QheDoituongThuoc.NguoiTao       = globalVariables.UserName;
                                        _QheDoituongThuoc.IsNew          = true;
                                        _QheDoituongThuoc.Save();
                                    }
                                }
                            }
                            catch
                            {
                                hasError = true;
                                row.BeginEdit();
                                row.Cells["Error"].Value   = 1;
                                row.Cells["Success"].Value = 0;
                                row.EndEdit();
                            }
                            finally
                            {
                                Application.DoEvents();
                            }
                        }
                    }
                    if (hasError)
                    {
                        if (Utility.AcceptQuestion("Có lỗi trong quá trình đẩy dữ liệu thuốc từ file excel vào hệ thống. Bạn có muốn chấp nhận các dữ liệu đã đẩy thành công hay không?\nChú ý: Với các dữ liệu lỗi bạn có thể liên hệ để được trợ giúp để khắc phục"))
                        {
                            Scope.Complete();
                            m_blnCancel = false;
                        }
                    }
                    else
                    {
                        Scope.Complete();
                        Utility.ShowMsg("Đã nhập liệu thành công. Nhấn OK để kết thúc");
                        m_blnCancel = false;
                    }
                }
            }
            catch (Exception ex)
            {
                Utility.CatchException("Lỗi khi xuất thuốc ra file Excel", ex);
            }
            finally
            {
                progressBar1.Visible = false;
                lblCount.Visible     = false;
            }
        }
Example #37
0
        private KcbDangkyKcb CreateNewRegExam()
        {
            bool b_HasKham = false;
            EnumerableRowCollection<DataRow> query = from phong in m_dataDataRegExam.AsEnumerable().Cast<DataRow>()
                                                     where
                                                         Utility.Int32Dbnull(phong[KcbDangkyKcb.Columns.IdDichvuKcb],
                                                                             -100) ==
                                                         Utility.Int32Dbnull(cboKieuKham.Value, -1)
                                                     select phong;
            if (query.Count() > 0)
            {
                Utility.ShowMsg("Bệnh nhân đã đăng ký dịch vụ khám này. Đề nghị bạn xem lại");
                b_HasKham = true;
            }
            else
            {
                b_HasKham = false;
            }

            if (!b_HasKham)
            {
                var objRegExam = new KcbDangkyKcb();
                DmucDichvukcb objDichvuKCB =
                    DmucDichvukcb.FetchByID(Utility.Int32Dbnull(cboKieuKham.Value));
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();
                DmucKhoaphong objdepartment = new Select().From(DmucKhoaphong.Schema).Where(DmucKhoaphong.IdKhoaphongColumn).IsEqualTo(Utility.Int16Dbnull(txtIDPkham.Text, -1)).ExecuteSingle<DmucKhoaphong>();
                if (objDichvuKCB != null)
                {
                    objRegExam.IdDichvuKcb = Utility.Int16Dbnull(objDichvuKCB.IdDichvukcb, -1);
                    objRegExam.IdKieukham = objDichvuKCB.IdKieukham;
                    objRegExam.NhomBaocao = objDichvuKCB.NhomBaocao;
                    objRegExam.DonGia = Utility.DecimaltoDbnull(objDichvuKCB.DonGia, 0);
                    objRegExam.NguoiTao = globalVariables.UserName;
                    objRegExam.LaPhidichvukemtheo = 0;
                    objRegExam.IdCha = -1;
                    if (objdepartment != null)
                    {
                        objRegExam.IdKhoakcb = objdepartment.IdKhoaphong;
                        objRegExam.MaPhongStt = objdepartment.MaPhongStt;

                    }
                    if (objDoituongKCB != null)
                    {
                        objRegExam.IdLoaidoituongkcb = objDoituongKCB.IdLoaidoituongKcb;
                        objRegExam.MaDoituongkcb = objDoituongKCB.MaDoituongKcb;
                        objRegExam.IdDoituongkcb = objDoituongKCB.IdDoituongKcb;
                    }
                    if (Utility.Int16Dbnull(objDichvuKCB.IdPhongkham, -1) > -1)
                        objRegExam.IdPhongkham = Utility.Int16Dbnull(objDichvuKCB.IdPhongkham, -1);
                    else
                        objRegExam.IdPhongkham = Utility.Int16Dbnull(txtIDPkham.Text, -1);
                    if (Utility.Int32Dbnull(objDichvuKCB.IdBacsy) > 0)
                        objRegExam.IdBacsikham = Utility.Int16Dbnull(objDichvuKCB.IdBacsy);
                    else
                    {
                        objRegExam.IdBacsikham = globalVariables.gv_intIDNhanvien;
                    }
                    objRegExam.PhuThu = !chkTraiTuyen.Checked
                                                    ? Utility.DecimaltoDbnull(objDichvuKCB.PhuthuDungtuyen)
                                                    : Utility.DecimaltoDbnull(objDichvuKCB.PhuthuTraituyen);
                    objRegExam.NgayDangky = globalVariables.SysDate;
                    objRegExam.IdBenhnhan = Utility.Int32Dbnull(txtMaBN.Text, -1);
                    objRegExam.TrangthaiThanhtoan = 0;
                    objRegExam.TrangthaiHuy = 0;
                    objRegExam.Noitru = 0;
                    objRegExam.TrangthaiIn = 0;
                    objRegExam.IpMaytao = globalVariables.gv_strIPAddress;
                    objRegExam.TenMaytao = globalVariables.gv_strComputerName;

                    objRegExam.TuTuc =Utility.ByteDbnull( objDichvuKCB.TuTuc,0);
                    if (pnlBHYT.Enabled && chkTraiTuyen.Checked && THU_VIEN_CHUNG.Laygiatrithamsohethong("BHYT_TRAITUYENNGOAITRU_GIADICHVU", false) == "1")
                        objRegExam.TuTuc = 1;
                    objRegExam.MaKhoaThuchien = globalVariables.MA_KHOA_THIEN;
                    objRegExam.TenDichvuKcb = cboKieuKham.Text;
                    objRegExam.NgayTiepdon = globalVariables.SysDate;
                    objRegExam.MaLuotkham = Utility.sDbnull(txtMaLankham.Text, "");
                    //Bỏ đi do sinh lại ở mục business
                    if (THU_VIEN_CHUNG.IsNgoaiGio())
                    {
                        objRegExam.KhamNgoaigio = 1;
                        objRegExam.DonGia = Utility.DecimaltoDbnull(objDichvuKCB.DongiaNgoaigio, 0);
                        objRegExam.PhuThu = chkTraiTuyen.Checked ? Utility.DecimaltoDbnull(objDichvuKCB.PhuthuNgoaigio, 0) : Utility.DecimaltoDbnull(objDichvuKCB.PhuthuDungtuyen);
                    }
                    else
                    {
                        objRegExam.KhamNgoaigio = 0;
                    }
                }
                else
                {
                    objRegExam = null;
                }
                return objRegExam;
            }

            return null;
        }
        /// <summary>
        /// Thực hiện nghiệp vụ Update dữ liệu
        /// </summary>
        private void PerformUpdateAction()
        {
            Utility.SetMsg(lblMsg, "", true);

            //Gọi Business cập nhật dữ liệu
            int v_shtIdLoaithuoc = Convert.ToInt32(txtID.Text);
            //Kiểm tra trùng tên đối tượng và cảnh báo
            DmucLoaithuocCollection v_arrSameObject = new DmucLoaithuocController().FetchByQuery(m_Query.AddWhere("ma_loaithuoc", txtDrug_Code.Text.Trim().ToUpper()).AND("Id_Loaithuoc", Comparison.NotEquals, v_shtIdLoaithuoc));

            if (v_arrSameObject.Count > 0)
            {
                if (!Utility.AcceptQuestion("Đã có nhóm có mã:" + txtDrug_Code.Text.Trim() + ". Bạn có muốn tiếp tục ghi hay không?", "Cảnh báo", true))
                {
                    //Create Again to ignore Where Clause
                    m_Query = DmucDoituongkcb.CreateQuery();
                    return;
                }
            }
            v_arrSameObject = new DmucLoaithuocController().FetchByQuery(m_Query.AddWhere("ten_loaithuoc", txtName.Text.Trim().ToUpper()).AND("Id_Loaithuoc", Comparison.NotEquals, v_shtIdLoaithuoc));
            if (v_arrSameObject.Count > 0)
            {
                if (!Utility.AcceptQuestion("Đã có nhóm có tên:" + txtName.Text.Trim() + ". Bạn có muốn tiếp tục ghi hay không?", "Cảnh báo", true))
                {
                    //Create Again to ignore Where Clause
                    m_Query = DmucDoituongkcb.CreateQuery();
                    return;
                }
            }
            //Create Again to ignore Where Clause
            m_Query = DmucLoaithuoc.CreateQuery();
            DmucLoaithuoc v_NewObjectChangePos = null;

            DmucLoaithuoc objDrugType = DmucLoaithuoc.FetchByID(Convert.ToInt16(txtID.Text));

            if (objDrugType != null)
            {
                objDrugType.MaLoaithuoc    = Utility.sDbnull(txtDrug_Code.Text);
                objDrugType.TenLoaithuoc   = Utility.sDbnull(txtName.Text);
                objDrugType.MotaThem       = Utility.sDbnull(txtDesc.Text);
                objDrugType.MaNhomthuoc    = Utility.sDbnull(txtNhom.myCode, "");
                objDrugType.SttHthi        = Convert.ToInt16(txtPos.Text);
                objDrugType.InRieng        = Convert.ToInt16(chkInrieng.Checked ? 1 : 0);
                objDrugType.KieuThuocvattu = txtKieuthuocVT.myCode;
                objDrugType.IsNew          = false;
                objDrugType.MarkOld();
                objDrugType.Save();
            }
            DataRow[] arrDr = m_dtLoaithuoc.Select(DmucLoaithuoc.Columns.IdLoaithuoc + "=" + txtID.Text);
            if (arrDr.Length > 0)
            {
                arrDr[0][DmucLoaithuoc.Columns.MaLoaithuoc]    = Utility.sDbnull(txtDrug_Code.Text);
                arrDr[0][DmucLoaithuoc.Columns.TenLoaithuoc]   = Utility.sDbnull(txtName.Text);
                arrDr[0][DmucLoaithuoc.Columns.MotaThem]       = Utility.sDbnull(txtDesc.Text);
                arrDr[0][DmucLoaithuoc.Columns.MaNhomthuoc]    = Utility.sDbnull(txtNhom.myCode, "");
                arrDr[0][DmucLoaithuoc.Columns.SttHthi]        = Convert.ToInt16(txtPos.Text);
                arrDr[0][DmucLoaithuoc.Columns.InRieng]        = Convert.ToInt16(chkInrieng.Checked ? 1 : 0);
                arrDr[0][DmucLoaithuoc.Columns.KieuThuocvattu] = txtKieuthuocVT.myCode;
                arrDr[0]["ten_nhomthuoc"] = txtNhom.Text;
            }
            //Return to the InitialStatus
            m_enAction = action.FirstOrFinished;
            //Nhảy đến bản ghi vừa cập nhật trên lưới. Do txtID chưa bị reset nên dùng luôn
            Utility.GotoNewRowJanus(grdList, "Id_Loaithuoc", txtID.Text.Trim());
            SetControlStatus();
            Utility.SetMsg(lblMsg, "Cập nhật dữ liệu thành công.", false);
        }
Example #39
0
        private void LoadThongtinBenhnhan()
        {
            PtramBhytCu = 0m;
            PtramBhytGocCu = 0m;
            AllowTextChanged = false;
            KcbDanhsachBenhnhan objBenhnhan = KcbDanhsachBenhnhan.FetchByID(txtMaBN.Text);
            if (objBenhnhan != null)
            {
                txtTEN_BN.Text = Utility.sDbnull(objBenhnhan.TenBenhnhan);
                txtNamSinh.Text = Utility.sDbnull(objBenhnhan.NamSinh);
                txtSoDT.Text = Utility.sDbnull(objBenhnhan.DienThoai);
                txtDiachi_bhyt._Text = Utility.sDbnull(objBenhnhan.DiachiBhyt);
                txtDiachi._Text = Utility.sDbnull(objBenhnhan.DiaChi);
                if (objBenhnhan.NgaySinh != null) dtpBOD.Value = objBenhnhan.NgaySinh.Value;
                else dtpBOD.Value = new DateTime((int)objBenhnhan.NamSinh, 1, 1);
                txtNamSinh.Text = Utility.sDbnull(objBenhnhan.NamSinh);
                txtTuoi.Text = Utility.sDbnull(globalVariables.SysDate.Year - Utility.Int32Dbnull(objBenhnhan.NamSinh));
                txtNgheNghiep._Text = Utility.sDbnull(objBenhnhan.NgheNghiep);
                cboPatientSex.SelectedIndex =Utility.GetSelectedIndex(cboPatientSex, Utility.sDbnull(objBenhnhan.IdGioitinh));
                if(Utility.Int32Dbnull(objBenhnhan.DanToc)>0)
                txtDantoc._Text = objBenhnhan.DanToc;
                txtEmail.Text = Utility.sDbnull(objBenhnhan.Email);
                txtCMT.Text = Utility.sDbnull(objBenhnhan.Cmt);

            }
             objLuotkham = new Select().From(KcbLuotkham.Schema)
                .Where(KcbLuotkham.Columns.MaLuotkham).IsEqualTo(txtMaLankham.Text)
                .And(KcbLuotkham.Columns.IdBenhnhan).IsEqualTo(Utility.Int32Dbnull(txtMaBN.Text, -1)).ExecuteSingle
                <KcbLuotkham>();
            if (objLuotkham != null)
            {
                m_strMaluotkham = objLuotkham.MaLuotkham;

                txtSolankham.Text = Utility.sDbnull(objLuotkham.SolanKham);
                _IdDoituongKcb = objLuotkham.IdDoituongKcb;
                dtpInputDate.Value = objLuotkham.NgayTiepdon;
                dtCreateDate.Value = objLuotkham.NgayTiepdon;
                chkCapCuu.Checked = Utility.Int32Dbnull(objLuotkham.TrangthaiCapcuu, 0) == 1;
                chkTraiTuyen.Checked = Utility.Int32Dbnull(objLuotkham.DungTuyen, 0) == 0;
                lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
                txtEmail.Text = objLuotkham.Email;
                txtNoigioithieu.Text = objLuotkham.NoiGioithieu;
                txtLoaiBN.SetCode(objLuotkham.NhomBenhnhan);
                _MaDoituongKcb = Utility.sDbnull( objLuotkham.MaDoituongKcb);
                objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();

                ChangeObjectRegion();
                PtramBhytCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhyt, 0);
                PtramBhytGocCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhytGoc, 0);
                _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
                _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
                cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                chkChuyenVien.Checked = Utility.Int32Dbnull(objLuotkham.TthaiChuyenden, 0) == 1;
                txtNoichuyenden.SetId(Utility.Int32Dbnull(objLuotkham.IdBenhvienDen, -1));
                if (!string.IsNullOrEmpty(objLuotkham.MatheBhyt))//Thông tin BHYT
                {
                    txtTrieuChungBD._Text = Utility.sDbnull(objLuotkham.TrieuChung);
                    if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgaybatdauBhyt)))
                        dtInsFromDate.Value = Convert.ToDateTime(objLuotkham.NgaybatdauBhyt);
                    if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgayketthucBhyt)))
                        dtInsToDate.Value = Convert.ToDateTime(objLuotkham.NgayketthucBhyt);
                    txtPtramBHYT.Text = Utility.sDbnull(objLuotkham.PtramBhyt,"0");
                    txtptramDauthe.Text = Utility.sDbnull(objLuotkham.PtramBhytGoc, "0");
                    //HS7010340000005
                    txtMaDtuong_BHYT.Text = Utility.sDbnull(objLuotkham.MaDoituongBhyt);

                    txtMaQuyenloi_BHYT.Text = Utility.sDbnull(objLuotkham.MaQuyenloi);
                    txtNoiDongtrusoKCBBD.Text = Utility.sDbnull(objLuotkham.NoiDongtrusoKcbbd);
                    txtOthu4.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(5, 2);
                    txtOthu5.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(7, 3);
                    txtOthu6.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(10, 5);

                    txtMaDTsinhsong.SetCode(objLuotkham.MadtuongSinhsong);
                    chkGiayBHYT.Checked = Utility.Byte2Bool(objLuotkham.GiayBhyt);

                    txtNoiphattheBHYT.Text = Utility.sDbnull(objLuotkham.MaNoicapBhyt);
                    txtNoiDKKCBBD.Text = Utility.sDbnull(objLuotkham.MaKcbbd);
                    pnlBHYT.Enabled = true;
                }
                else
                {
                    XoathongtinBHYT(true);
                }
            }
            else
            {
            }
            chkChuyenVien_CheckedChanged(chkChuyenVien, new EventArgs());
        }
        private void LoadThongtinBenhnhan()
        {
            PtramBhytCu = 0m;
            PtramBhytGocCu = 0m;
            AllowTextChanged = false;
            LstNoitruPhanbuonggiuong = new NoitruPhanbuonggiuongCollection();
            objBuonggiuong = null;
            objBenhnhan = KcbDanhsachBenhnhan.FetchByID(txtMaBN.Text);
            if (objBenhnhan != null)
            {
                txtTEN_BN.Text = Utility.sDbnull(objBenhnhan.TenBenhnhan);
                txtNamSinh.Text = Utility.sDbnull(objBenhnhan.NamSinh);
                txtSoDT.Text = Utility.sDbnull(objBenhnhan.DienThoai);
                txtDiachi_bhyt._Text = Utility.sDbnull(objBenhnhan.DiachiBhyt);
                txtDiachi._Text = Utility.sDbnull(objBenhnhan.DiaChi);
                if (objBenhnhan.NgaySinh != null) dtpBOD.Value = objBenhnhan.NgaySinh.Value;
                else dtpBOD.Value = new DateTime((int)objBenhnhan.NamSinh, 1, 1);
                txtNamSinh.Text = Utility.sDbnull(objBenhnhan.NamSinh);
                txtTuoi.Text = Utility.sDbnull(globalVariables.SysDate.Year - Utility.Int32Dbnull(objBenhnhan.NamSinh));
                txtNgheNghiep._Text = Utility.sDbnull(objBenhnhan.NgheNghiep);
                cboPatientSex.SelectedIndex = Utility.GetSelectedIndex(cboPatientSex, Utility.sDbnull(objBenhnhan.IdGioitinh));
                if (Utility.Int32Dbnull(objBenhnhan.DanToc) > 0)
                    txtDantoc._Text = objBenhnhan.DanToc;
                txtCMT.Text = Utility.sDbnull(objBenhnhan.Cmt);

                objLuotkham = new Select().From(KcbLuotkham.Schema)
                   .Where(KcbLuotkham.Columns.MaLuotkham).IsEqualTo(txtMaLankham.Text)
                   .And(KcbLuotkham.Columns.IdBenhnhan).IsEqualTo(Utility.Int32Dbnull(txtMaBN.Text, -1)).ExecuteSingle
                   <KcbLuotkham>();
                if (objLuotkham != null)
                {
                     LstNoitruPhanbuonggiuong = new Select().From(NoitruPhanbuonggiuong.Schema)
              .Where(NoitruPhanbuonggiuong.Columns.NoiTru).IsEqualTo(1)
              .And(NoitruPhanbuonggiuong.Columns.IdBenhnhan).IsEqualTo(objLuotkham.IdBenhnhan)
              .And(NoitruPhanbuonggiuong.Columns.MaLuotkham).IsEqualTo(objLuotkham.MaLuotkham).ExecuteAsCollection<NoitruPhanbuonggiuongCollection>();
                     if (LstNoitruPhanbuonggiuong.Count > 0)
                         objBuonggiuong = LstNoitruPhanbuonggiuong[0];

                     ucTamung1.ChangePatients(objLuotkham,"LYDOTAMUNGCAPCUU");
                    KcbDangkySokham objSoKCB=new Select().From(KcbDangkySokham.Schema)
                        .Where(KcbDangkySokham.Columns.IdBenhnhan).IsEqualTo(objLuotkham.IdBenhnhan)
                        .And(KcbDangkySokham.Columns.MaLuotkham).IsEqualTo(objLuotkham.MaLuotkham)
                        .ExecuteSingle<KcbDangkySokham>();
                    if (objSoKCB != null)
                    {
                        chkLaysokham.Checked = true;
                        txtSoKcb.SetCode(objSoKCB.MaSokcb);
                    }
                    else
                    {
                        chkLaysokham.Checked = false;
                        txtSoKcb.SetDefaultItem();
                    }
                    if (string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.SoBenhAn, "")))
                    {
                        txtSoBenhAn.Text = THU_VIEN_CHUNG.LaySoBenhAn();
                    }
                    else
                    {
                        txtSoBenhAn.Text = Utility.sDbnull(objLuotkham.SoBenhAn, "");
                    }

                    m_strMaluotkham = objLuotkham.MaLuotkham;
                    if (objBuonggiuong != null)
                    {
                        AllowGridSelecttionChanged = false;
                        txtKhoanoitru.SetId(objBuonggiuong.IdKhoanoitru);
                        txtKhoanoitru__OnEnterMe();
                        txtGia.SetId(objBuonggiuong.IdGia);
                        txtRoom_code.SetId(objBuonggiuong.IdBuong);
                        txtRoom_code__OnEnterMe();
                        ChonBuong();
                        txtBedCode.SetId(objBuonggiuong.IdGiuong);
                        txtBedCode__OnEnterMe();
                        AllowGridSelecttionChanged = true;
                        dtNgayChuyen.Value = Convert.ToDateTime(objBuonggiuong.NgayVaokhoa);
                        txtGio.Text = Utility.sDbnull(dtNgayChuyen.Value.Hour);
                        txtPhut.Text = Utility.sDbnull(dtNgayChuyen.Value.Minute);
                    }
                    txtSolankham.Text = Utility.sDbnull(objLuotkham.SolanKham);
                    _IdDoituongKcb = objLuotkham.IdDoituongKcb;
                    dtpInputDate.Value = objLuotkham.NgayTiepdon;
                    dtCreateDate.Value = objLuotkham.NgayTiepdon;
                    chkCapCuu.Checked = Utility.Int32Dbnull(objLuotkham.TrangthaiCapcuu, 0) == 1;
                    chkTraiTuyen.Checked = Utility.Int32Dbnull(objLuotkham.DungTuyen, 0) == 0;
                    lblTuyenBHYT.Text = chkTraiTuyen.Checked ? "TRÁI TUYẾN" : "ĐÚNG TUYẾN";
                    _MaDoituongKcb = Utility.sDbnull(objLuotkham.MaDoituongKcb);
                    objDoituongKCB = new Select().From(DmucDoituongkcb.Schema).Where(DmucDoituongkcb.MaDoituongKcbColumn).IsEqualTo(_MaDoituongKcb).ExecuteSingle<DmucDoituongkcb>();

                    ChangeObjectRegion();
                    PtramBhytCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhyt, 0);
                    PtramBhytGocCu = Utility.DecimaltoDbnull(objLuotkham.PtramBhytGoc, 0);
                    _IdDoituongKcb = objDoituongKCB.IdDoituongKcb;
                    _TenDoituongKcb = objDoituongKCB.TenDoituongKcb;
                    cboDoituongKCB.SelectedIndex = Utility.GetSelectedIndex(cboDoituongKCB, _MaDoituongKcb);
                    chkChuyenVien.Checked = Utility.Int32Dbnull(objLuotkham.TthaiChuyenden, 0) == 1;
                    txtNoichuyenden.SetId(Utility.Int32Dbnull(objLuotkham.IdBenhvienDen, -1));
                    if (!string.IsNullOrEmpty(objLuotkham.MatheBhyt))//Thông tin BHYT
                    {
                        txtTrieuChungBD._Text = Utility.sDbnull(objLuotkham.TrieuChung);
                        if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgaybatdauBhyt)))
                            dtInsFromDate.Value = Convert.ToDateTime(objLuotkham.NgaybatdauBhyt);
                        if (!string.IsNullOrEmpty(Utility.sDbnull(objLuotkham.NgayketthucBhyt)))
                            dtInsToDate.Value = Convert.ToDateTime(objLuotkham.NgayketthucBhyt);
                        txtPtramBHYT.Text = Utility.sDbnull(objLuotkham.PtramBhyt, "0");
                        txtptramDauthe.Text = Utility.sDbnull(objLuotkham.PtramBhytGoc, "0");
                        //HS7010340000005
                        txtMaDtuong_BHYT.Text = Utility.sDbnull(objLuotkham.MaDoituongBhyt);

                        txtMaQuyenloi_BHYT.Text = Utility.sDbnull(objLuotkham.MaQuyenloi);
                        txtNoiDongtrusoKCBBD.Text = Utility.sDbnull(objLuotkham.NoiDongtrusoKcbbd);
                        txtOthu4.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(5, 2);
                        txtOthu5.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(7, 3);
                        txtOthu6.Text = Utility.sDbnull(objLuotkham.MatheBhyt).Substring(10, 5);

                        txtMaDTsinhsong.SetCode(objLuotkham.MadtuongSinhsong);
                        chkGiayBHYT.Checked = Utility.Byte2Bool(objLuotkham.GiayBhyt);

                        txtNoiphattheBHYT.Text = Utility.sDbnull(objLuotkham.MaNoicapBhyt);
                        txtNoiDKKCBBD.Text = Utility.sDbnull(objLuotkham.MaKcbbd);
                        pnlBHYT.Enabled = true;
                    }
                    else
                    {
                        XoathongtinBHYT(true);
                    }
                }
                else
                {
                }
            }
            chkChuyenVien_CheckedChanged(chkChuyenVien, new EventArgs());
        }