| | |
|---|
| | | pa.PageSize = 1000; |
|---|
| | | pa.PageIndex = 1; |
|---|
| | | var models = _OA_ProcurementBLL.getModelList(pa, CurrentUser.MemberId,orderIdStr).ToList(); |
|---|
| | | |
|---|
| | | |
|---|
| | | foreach (var oA_Procurement in models) |
|---|
| | | { |
|---|
| | | if(oA_Procurement.ClearingStatusId == 204) |
|---|
| | | { |
|---|
| | | JavaScript.MessageBox("有采购单已经付款！", this,true,false); |
|---|
| | | return; |
|---|
| | | } |
|---|
| | | _oA_FukuanshenqingBLL.GetModelListByshifoushenqing(oA_Procurement.Keyid.Value); |
|---|
| | | } |
|---|
| | | |
|---|
| | | if (models.Count > 0) |
|---|
| | | { |
|---|
| | | var sss = _OA_SuppliersBLL.getSingleSupplier(models[0].SuppliersId.Value.ToString()); |
|---|
| | |
|---|
| | | oA_Fukuanshenqing.SupplierId = this.selSuppliersss.Value; |
|---|
| | | oA_Fukuanshenqing.Fukuanshenqingstatus = 0; |
|---|
| | | oA_Fukuanshenqing.ApprovalStatus = 0; |
|---|
| | | oA_Fukuanshenqing.Fukuanmoney = this.txtZengjianmoney.Value.ToDecimal2(); |
|---|
| | | |
|---|
| | | oA_Fukuanshenqing.Molingmoney = this.txtmolingmoney.Value.ToDecimal2(); |
|---|
| | | if (!oA_Fukuanshenqing.Molingmoney.HasValue) |
|---|
| | | { |
|---|
| | | oA_Fukuanshenqing.Molingmoney = 0; |
|---|
| | | } |
|---|
| | | oA_Fukuanshenqing.Fukuanmoney = this.txtZengjianmoney.Value.ToDecimal2() - oA_Fukuanshenqing.Molingmoney; |
|---|
| | | oA_Fukuanshenqing.Bank = this.txtBank.Value; |
|---|
| | | oA_Fukuanshenqing.Huming = this.txtHuming.Value; |
|---|
| | | oA_Fukuanshenqing.AccountID = this.txtAccountID.Value; |
|---|
| | |
|---|
| | | |
|---|
| | | m_OA_WorkPlan.Operator = CurrentUser.ShortName; |
|---|
| | | m_OA_WorkPlan.PlanComplany = id.ToString(); |
|---|
| | | m_OA_WorkPlan.PlanContent = orderNoStr + " 采购付款申请。订单金额："+ this.ordernjine.InnerText + ", 收款单位："+ _SupplierName + ", 户名：" + oA_Fukuanshenqing.Huming; |
|---|
| | | m_OA_WorkPlan.PlanDataType = 16; |
|---|
| | | m_OA_WorkPlan.PlanContent = " 采购付款申请。订单金额："+ this.ordernjine.InnerText + ",抹零金额：" + this.txtmolingmoney.Value + ", 收款单位：" + _SupplierName + ", 户名：" + oA_Fukuanshenqing.Huming;//+ orderNoStr |
|---|
| | | m_OA_WorkPlan.PlanDataType = 16; |
|---|
| | | m_OA_WorkPlan.PlanMoney = oA_Fukuanshenqing.Fukuanmoney; |
|---|
| | | m_OA_WorkPlan.RewardMoney = oA_Fukuanshenqing.Molingmoney; |
|---|
| | | m_OA_WorkPlan.PlanRemark = oA_Fukuanshenqing.remark; |
|---|
| | | m_OA_WorkPlan.PlanRunTime = DateTime.Now; |
|---|
| | | m_OA_WorkPlan.PlanTitle = this.txtPlanTitle.Value.Trim(); |
|---|
