Ejemplo n.º 1
0
        /// <summary>
        /// 模版选择
        /// </summary>
        /// <param name="privDept">权限科室</param>
        /// <param name="openType">模版类型</param>
        /// <returns>成功返回模版信息  失败返回null</returns>

        /*
         * internal static ArrayList ChooseDrugStencil(string privDept, Neusoft.HISFC.Models.Pharmacy.EnumDrugStencil stencilType)
         * {
         *  Neusoft.HISFC.BizLogic.Pharmacy.Constant consManager = new Neusoft.HISFC.BizLogic.Pharmacy.Constant();
         *
         *  ArrayList alList = consManager.QueryDrugStencilList(privDept, stencilType);
         *  if (alList == null)
         *  {
         *      System.Windows.Forms.MessageBox.Show(Language.Msg("获取该类型模版发生错误" + consManager.Err));
         *      return null;
         *  }
         *  if (alList.Count == 0)
         *  {
         *      System.Windows.Forms.MessageBox.Show(Language.Msg("无该类型模版数据"));
         *      return null;
         *  }
         *
         *  ArrayList alSelect = new ArrayList();
         *  Neusoft.FrameWork.Models.NeuObject selectObj = new Neusoft.FrameWork.Models.NeuObject();
         *  foreach (Neusoft.HISFC.Models.Pharmacy.DrugStencil temp in alList)
         *  {
         *      selectObj = new Neusoft.FrameWork.Models.NeuObject();
         *      selectObj.ID = temp.Stencil.ID;
         *      selectObj.Name = temp.Stencil.Name;
         *      selectObj.Memo = temp.OpenType.Name;
         *
         *      alSelect.Add(selectObj);
         *  }
         *
         *  string[] label = { "模版编码", "模版名称", "模版类型" };
         *  float[] width = { 60F, 100F, 120F };
         *  bool[] visible = { true, true, true, false, false, false };
         *  if (Neusoft.FrameWork.WinForms.Classes.Function.ChooseItem(alSelect, ref selectObj) == 0)
         *  {
         *      return new ArrayList();
         *  }
         *  else
         *  {
         *      ArrayList alOpenDetail = new ArrayList();
         *
         *      alOpenDetail = consManager.QueryDrugStencil(selectObj.ID);
         *      if (alOpenDetail == null)
         *      {
         *          System.Windows.Forms.MessageBox.Show(Language.Msg(consManager.Err));
         *          return null;
         *      }
         *
         *      return alOpenDetail;
         *  }
         * }
         */
        /// <summary>
        /// 获取提示信息
        /// </summary>
        /// <param name="companyCode"></param>
        /// <returns></returns>
        public static string GetNote(string itemCode)
        {
            Neusoft.HISFC.BizLogic.Material.MetItem myItem = new Neusoft.HISFC.BizLogic.Material.MetItem();

            Neusoft.HISFC.BizLogic.Material.ComCompany myCom = new Neusoft.HISFC.BizLogic.Material.ComCompany();

            Neusoft.HISFC.Models.Material.MaterialItem item = myItem.GetMetItemByMetID(itemCode);

            Neusoft.HISFC.Models.Material.MaterialCompany company = myCom.QueryCompanyByCompanyID(item.Company.ID, "A", "A");

            DateTime dtNow = myItem.GetDateTimeFromSysDateTime();

            string note = "";

            if (company != null)
            {
                if (company.BusinessDate < dtNow)
                {
                    note += "营业执照已经到期!" + "\n";
                }
                if (company.DutyDate < dtNow)
                {
                    note += "税务登记证已经到期!" + "\n";
                }
                if (company.OrgDate < dtNow)
                {
                    note += "组织机构代码证已经到期!" + "\n";
                }
            }

            return(note);
        }
Ejemplo n.º 2
0
        /// <summary>
        /// 初始化数据
        /// </summary>
        private void InitData()
        {
            this.privOper = this.dataManager.Operator;

            bool isPriv = Neusoft.HISFC.Components.Common.Classes.Function.ChoosePiv("0530");

            if (isPriv)
            {
                this.BeginTime = this.dataManager.GetDateTimeFromSysDateTime().Date.AddYears(-1);
                this.EndTime   = this.dataManager.GetDateTimeFromSysDateTime();
            }

            #region 获取帮助类

            Neusoft.HISFC.BizLogic.Material.ComCompany company = new Neusoft.HISFC.BizLogic.Material.ComCompany();
            ArrayList alCompany = company.QueryCompany("1", "A");
            if (alCompany != null)
            {
                this.companyHelper = new Neusoft.FrameWork.Public.ObjectHelper(alCompany);
            }
            ArrayList alProduce = company.QueryCompany("0", "A");
            if (alProduce != null)
            {
                this.producHelper = new Neusoft.FrameWork.Public.ObjectHelper(alProduce);
            }

            #endregion

            this.numFpCellType.DecimalPlaces = 4;
        }
Ejemplo n.º 3
0
        /// <summary>
        /// 入库单据查询
        /// </summary>
        protected override void QueryIn()
        {
            Neusoft.HISFC.BizLogic.Material.Store itemManager = new Neusoft.HISFC.BizLogic.Material.Store();

            //重新写了查找单据的方法  增加了通过物资项目查询
            //ArrayList alList = itemManager.QueryInputList(this.DeptInfo.ID, "AA", this.State, this.BeginDate, this.EndDate);
            ArrayList alList = itemManager.QueryInputList(this.DeptInfo.ID, "AA", this.State, this.BeginDate, this.EndDate, this.itemID);

            if (alList == null)
            {
                MessageBox.Show("查询单据列表发生错误" + itemManager.Err);
            }

            this.neuSpread1_Sheet1.Rows.Count = 0;

            foreach (Neusoft.HISFC.Models.Material.Input info in alList)
            {
                if (this.MarkPrivType != null)
                {
                    if (this.MarkPrivType.ContainsKey(info.StoreBase.PrivType))       //对于过滤的权限不显示
                    {
                        continue;
                    }
                }

                this.neuSpread1_Sheet1.Rows.Add(0, 1);

                this.neuSpread1_Sheet1.Cells[0, 0].Text = info.InListNO;
                this.neuSpread1_Sheet1.Cells[0, 2].Text = this.inTypeHelper.GetName(info.StoreBase.PrivType);

                if (this.DeptInfo.Memo == "L")                  //仓库 获取供货公司
                {
                    #region 获取供货公司

                    Neusoft.HISFC.Models.Material.MaterialCompany company = new Neusoft.HISFC.Models.Material.MaterialCompany();

                    if (info.StoreBase.Company.ID != "None")
                    {
                        Neusoft.HISFC.BizLogic.Material.ComCompany constant = new Neusoft.HISFC.BizLogic.Material.ComCompany();
                        company = constant.QueryCompanyByCompanyID(info.StoreBase.Company.ID, "A", "1");
                        if (company == null)
                        {
                            MessageBox.Show(constant.Err);
                            return;
                        }
                    }
                    else
                    {
                        company.ID   = "None";
                        company.Name = "无供货公司";
                    }

                    this.neuSpread1_Sheet1.Cells[0, 3].Text = company.Name;
                    this.neuSpread1_Sheet1.Cells[0, 4].Text = company.ID;

                    #endregion
                }
            }
        }
Ejemplo n.º 4
0
        /// <summary>
        /// 初始化
        /// </summary>
        protected void Init()
        {
            ArrayList al = new ArrayList();

            #region 银行信息

            Neusoft.HISFC.BizLogic.Manager.Constant constantManager = new Neusoft.HISFC.BizLogic.Manager.Constant();
            al = constantManager.GetList("BANK");
            if (al == null)
            {
                MessageBox.Show(Language.Msg("获取银行列表失败" + constantManager.Err));
                return;
            }
            bankHelper.ArrayObject = al;

            #endregion

            #region 人员

            Neusoft.HISFC.BizLogic.Manager.Person personManager = new Neusoft.HISFC.BizLogic.Manager.Person();
            al = personManager.GetEmployeeAll();
            if (al == null)
            {
                MessageBox.Show(Language.Msg("获取所有人员列表" + personManager.Err));
                return;
            }
            this.personHelper.ArrayObject = al;

            #endregion

            #region 供应商

            Neusoft.HISFC.BizLogic.Material.ComCompany companyManager = new Neusoft.HISFC.BizLogic.Material.ComCompany();

            this.alCompany = companyManager.QueryCompany("1", "A");

            if (this.alCompany == null)
            {
                MessageBox.Show(constantManager.Err);
                return;
            }

            #endregion

            #region 时间

            Neusoft.FrameWork.Management.DataBaseManger databaseManager = new Neusoft.FrameWork.Management.DataBaseManger();
            DateTime sysTime = databaseManager.GetDateTimeFromSysDateTime().Date.AddDays(1);
            this.dtBegin = sysTime.AddDays(-30);
            this.dtEnd   = sysTime;

            this.privOper = databaseManager.Operator;

            this.payFlag = "'0','1'";

            #endregion
        }
Ejemplo n.º 5
0
        /// <summary>
        /// 设置目标科室
        /// </summary>
        /// <param name="isCompany">目标单位是否为供货公司 True 供货公司 False 院内科室 设为True时剩余参数无意义</param>
        /// <param name="isPrivInOut">是否维护的入出库科室列表 设为True时 科室类型参数无意义</param>
        /// <param name="companyType">供货公司类型 物资/药品/设备</param>
        /// <param name="deptType">院内科室类型</param>
        /// <returns>成功返回1 失败返回-1</returns>
        public int SetTargetDept(bool isCompany, bool isPrivInOut, Neusoft.HISFC.Models.IMA.EnumModuelType companyType, string deptType)
        {
            this.alTargetDept.Clear();

            this.lnbTarget.Visible     = true;
            this.cmbTargetDept.Visible = true;

            if (isCompany)
            {
                #region 加载供货公司  物资暂时使用药品的供货单位进行测试

                switch (companyType)
                {
                case Neusoft.HISFC.Models.IMA.EnumModuelType.Equipment:             //设备
                    break;

                case Neusoft.HISFC.Models.IMA.EnumModuelType.Material:              //物资
                    Neusoft.HISFC.BizLogic.Material.ComCompany matCompany = new Neusoft.HISFC.BizLogic.Material.ComCompany();
                    this.alTargetDept = matCompany.QueryCompany("1", "A");
                    if (this.alTargetDept == null)
                    {
                        MessageBox.Show("加载物资供货公司列表失败" + matCompany.Err);
                        return(-1);
                    }
                    break;
                    //case Neusoft.HISFC.Models.IMA.EnumModuelType.Phamacy:			 //药品
                    //    Neusoft.HISFC.BizLogic.Pharmacy.Constant phaConstantManager = new Neusoft.HISFC.BizLogic.Pharmacy.Constant();
                    //    this.alTargetDept = phaConstantManager.GetCompany("1");
                    //    if (this.alTargetDept == null)
                    //    {
                    //        MessageBox.Show("加载药品供货公司列表失败" + phaConstantManager.Err);
                    //        return -1;
                    //    }
                    //    break;
                }

                foreach (Neusoft.FrameWork.Models.NeuObject info in this.alTargetDept)
                {
                    info.Memo = "1";
                }

                #endregion
            }
            else
            {
                if (isPrivInOut)        //权限科室
                {
                    #region 取入出权限科室

                    ArrayList tempAl;
                    Neusoft.HISFC.BizLogic.Material.Plan privInOutManager = new Neusoft.HISFC.BizLogic.Material.Plan();
                    tempAl = privInOutManager.GetPrivInOutDeptList(this.deptInfo.ID, this.class2Priv.ID);
                    if (tempAl == null)
                    {
                        MessageBox.Show(privInOutManager.Err);
                        return(-1);
                    }
                    //由privInOutDept转换为neuobject存储
                    //Neusoft.FrameWork.Models.NeuObject offerInfo;
                    Neusoft.HISFC.Models.Base.DepartmentStat offerInfo;
                    Neusoft.HISFC.Models.Base.PrivInOutDept  privInOutDept;
                    for (int i = 0; i < tempAl.Count; i++)
                    {
                        privInOutDept       = tempAl[i] as Neusoft.HISFC.Models.Base.PrivInOutDept;
                        offerInfo           = new Neusoft.HISFC.Models.Base.DepartmentStat();
                        offerInfo.ID        = privInOutDept.Dept.ID;        //供货单位编码
                        offerInfo.Name      = privInOutDept.Dept.Name;      //供货单位名称
                        offerInfo.Memo      = privInOutDept.Memo;           //备注
                        offerInfo.SpellCode = privInOutDept.User01;
                        offerInfo.WBCode    = privInOutDept.User02;
                        offerInfo.UserCode  = privInOutDept.User03;
                        this.alTargetDept.Add(offerInfo);
                    }

                    #endregion
                }
                else
                {
                    #region 根据科室类别获取院内科室

                    Neusoft.HISFC.BizLogic.Manager.Department managerIntegrate = new Neusoft.HISFC.BizLogic.Manager.Department();
                    this.alTargetDept = managerIntegrate.GetDeptment(deptType);
                    if (this.alTargetDept == null)
                    {
                        MessageBox.Show("根据科室类别获取科室列表发生错误" + managerIntegrate.Err);
                        return(-1);
                    }
                    foreach (Neusoft.FrameWork.Models.NeuObject info in this.alTargetDept)
                    {
                        info.Memo = "0";
                        //info.User01 = mySpell.Get(info.Name).SpellCode;
                    }

                    #endregion
                }
            }

            if (this.isSetDefaultTargetDept)
            {
                if (this.targetDept.ID == "")
                {
                    if (this.alTargetDept.Count > 0)
                    {
                        if (this.localTargetDept != null && this.localTargetDept.ID != "")
                        {
                            this.TargetDept      = this.localTargetDept;
                            this.localTargetDept = null;
                        }
                        else
                        {
                            this.TargetDept = this.alTargetDept[0] as Neusoft.FrameWork.Models.NeuObject;
                        }
                    }
                }
            }

            return(1);
        }