예제 #1
0
        /// <summary>
        /// 显示申请列表
        /// </summary>
        /// <returns>成功返回1 失败返回-1</returns>
        public int ShowApplyList()
        {
            Neusoft.HISFC.BizLogic.Pharmacy.Item itemManager = new Neusoft.HISFC.BizLogic.Pharmacy.Item();

            string offerID = "";

            if (this.phaInManager.TargetDept == null || this.phaInManager.TargetDept.ID == "")
            {
                offerID = "AAAA";
            }
            else
            {
                offerID = this.phaInManager.TargetDept.ID;
            }

            //外部入库申请
            ArrayList al = itemManager.QueryApplyInList(this.phaInManager.DeptInfo.ID, offerID, "0");

            if (al == null)
            {
                this.ShowMsg("获取申请列表失败" + itemManager.Err);
                return(-1);
            }

            #region 根据供货单位进行过滤

            ArrayList alList = new ArrayList();
            if (this.phaInManager.TargetDept.ID != "")
            {
                foreach (Neusoft.FrameWork.Models.NeuObject info in al)
                {
                    if (info.Memo != this.phaInManager.TargetDept.ID)
                    {
                        continue;
                    }
                    alList.Add(info);
                }
            }
            else
            {
                alList = al;
            }

            #endregion

            #region 弹出选择窗口 进行单据选择

            Neusoft.FrameWork.Models.NeuObject selectObj = new Neusoft.FrameWork.Models.NeuObject();
            string[] fpLabel   = { "申请单号", "供货单位" };
            float[]  fpWidth   = { 120F, 120F };
            bool[]   fpVisible = { true, true, false, false, false, false };

            if (Neusoft.FrameWork.WinForms.Classes.Function.ChooseItem(alList, ref selectObj) == 1)
            {
                Neusoft.FrameWork.Models.NeuObject targeDept = new Neusoft.FrameWork.Models.NeuObject();

                targeDept.ID   = selectObj.Memo;            //供货公司编码
                targeDept.Name = selectObj.Name;            //供货公司姓名
                targeDept.Memo = "1";                       //目标单位性质 外部供货公司

                this.AddApplyData(selectObj.ID, "");
            }

            #endregion

            return(1);
        }