Beispiel #1
0
 public virtual System.Collections.ArrayList QueryPatientByDept(string deptCode)
 {
     Neusoft.HISFC.Management.RADT.InPatient manager = new Neusoft.HISFC.Management.RADT.InPatient();
     this.SetDB(manager);
     Neusoft.HISFC.Object.RADT.InStateEnumService instate = new Neusoft.HISFC.Object.RADT.InStateEnumService();
     instate.ID = "I";
     return(manager.PatientQuery(deptCode, instate));
 }
        /// <summary>
        /// 查询患者一日清单

        /// </summary>
        /// <param name="sender"></param>
        /// <param name="neuObject"></param>
        /// <returns></returns>
        protected override int OnQuery(object sender, object neuObject)
        {
            dtSys = Neusoft.NFC.Function.NConvert.ToDateTime(deptStatManager.GetSysDate());
            if (dtSet > dtSys)
            {
                MessageBox.Show("不能查询当天的一日清单,请修改查询时间或者请稍候再查!");
                return(1);
            }
            Neusoft.NFC.Interface.Classes.Function.ShowWaitForm("正在生成报表,请稍候...");
            Application.DoEvents();
            ArrayList alPa = new ArrayList();

            sta.ID = Neusoft.HISFC.Object.Base.EnumInState.I;
            for (int i = 0; i < tvChoose.GetNodeCount(false); i++)
            {
                for (int j = 0; j < tvChoose.Nodes[i].GetNodeCount(false); j++)
                {
                    if (tvChoose.Nodes[i].Nodes[j].Checked)
                    {
                        dept = tvChoose.Nodes[i].Nodes[j].Tag as Neusoft.HISFC.Object.Base.DepartmentStat;
                        try
                        {
                            alPa.AddRange(inpatient.PatientQuery(dept.ID, sta));
                        }
                        catch (Exception ex)
                        {
                            MessageBox.Show("获取科室患者列表信息出错" + ex.Message, "提示");
                        }
                    }
                }
            }
            alPatientInfo = alPa;
            Neusoft.NFC.Interface.Classes.Function.HideWaitForm();
            return(1);
            //return base.OnQuery(sender, neuObject);
        }
Beispiel #3
0
 public virtual System.Collections.ArrayList QueryPatientByDept(string deptCode, int days)
 {
     Neusoft.HISFC.Management.RADT.InPatient manager = new Neusoft.HISFC.Management.RADT.InPatient();
     this.SetDB(manager);
     return(manager.PatientQuery(deptCode, days));
 }