2026821

2026-08-21 17:03:02 +08:00
commit f065129b20
2292 changed files with 666241 additions and 0 deletions
@@ -0,0 +1,129 @@
+using System;
+using System.Data;
+using System.Configuration;
+using System.Collections;
+using System.Web;
+using System.Web.Security;
+using System.Web.UI;
+using System.Web.UI.WebControls;
+using System.Web.UI.WebControls.WebParts;
+using System.Web.UI.HtmlControls;
+using GThinking.N_MISPRO;
+using GThinking.N_MISPRO.Data;
+using GThinking.N_MODEL.Page;
+using GThinking.N_MISPRO.Utility;
+using GThinking.N_PUBLIC;
+
+namespace GThinking.N_XLXSBJ
+{
+    public partial class CLWL_DRInfo : SingleCardBase
+    {
+        CLWL_DR entity = new CLWL_DR();
+        protected void Page_Load(object sender, EventArgs e)
+        {
+            this.UMID = 100860013;
+            this.UMName = "线缆销售报价材料物料";
+            this.CurMaster = Master;
+            this.CurEntity = entity;
+            this.PageHeight = 400;
+            this.PageWidth = 500;
+
+            Master.EnableAttachBtn = false;
+            Master.EnableCancelBtn = false;
+            Master.EnableCopyBtn = false;
+            Master.EnableDeleteBtn = false;
+            Master.EnableEditBtn = false;
+            Master.EnableInsertBtn = false;
+            Master.EnablePrintBtn = false;
+            Master.EnableRefreshBtn = false;
+            Master.EnableSaveBtn = false;
+
+            base.InitPage();
+            if (!IsPostBack)
+            {
+                InitControl();
+            }
+        }
+
+        #region 自定义函数
+
+        private void InitControl()
+        {
+            //加载材料名称
+            TComboBox.SetComboBox("DBERP", cbxGCID, "select GC_GCID,GC_GCMC from GC where 1=1 and ISNULL(GC_TYBZ,' ')<>'Y' order by GC_GCID ", false); 
+            cbxCPPIID.ClearItems();
+            cbxCLPIID.ClearItems();
+            TDatabase dberp = TContextDatabases.GetDatabase("DBERP");
+            TSQL SQL = new TSQL(dberp);
+            SQL.Clear();
+            SQL.Add("select PL_PIID,PL_MC from PL where 1=1 and ISNULL(PL_TYBZ,' ')<>'Y' ");
+            SQL.Add(" order by PL_PIID ");
+            DataSet ds = dberp.OpenDataSet(SQL);
+            for (int i = 0; i < ds.Tables[0].Rows.Count; i++)
+            {
+                cbxCPPIID.Items.Add(new ListItem(ds.Tables[0].Rows[i]["PL_MC"].ToString().Trim(), ds.Tables[0].Rows[i]["PL_PIID"].ToString().Trim()));
+                cbxCLPIID.Items.Add(new ListItem(ds.Tables[0].Rows[i]["PL_MC"].ToString().Trim(), ds.Tables[0].Rows[i]["PL_PIID"].ToString().Trim()));
+            }
+        }
+        #endregion
+
+        #region 控件事件
+        protected void btnQD_Click(object sender, EventArgs e)
+        {
+            //校验数据项
+            if (cbxGCID.SelectedValue.Trim().Equals(""))
+            {
+                ShowMessage("工厂不允许为空！");
+                return;
+            }
+            if (cbxCPPIID.SelectedValue.Trim().Equals(""))
+            {
+                ShowMessage("产品物料类别不允许为空！");
+                return;
+            }
+            if (cbxCLPIID.SelectedValue.Trim().Equals(""))
+            {
+                ShowMessage("材料物料类别不允许为空！");
+                return;
+            }
+            TDatabase dberp = TContextDatabases.GetDatabase("DBERP");
+            TSQL SQL = new TSQL(dberp);
+            SQL.Clear();
+            SQL.Add(" insert into XLXSBJCLWL(XLXSBJCLWL_WLID, XLXSBJCLWL_BJCLID, XLXSBJCLWL_BZ, ");
+            SQL.Add(" XLXSBJCLWL_WHRID, XLXSBJCLWL_WHR, XLXSBJCLWL_WHSJ) ");
+            SQL.Add(" select  WLID,'','',:pWHRID,:pWHR,:pWHSJ ");
+            SQL.Add(" from ");
+            SQL.Add(" ( ");
+            SQL.Add(" select distinct  CLYLJSJG_WLID as WLID ");
+            SQL.Add(" from CLYLJSJG,WL a,WL b ");
+            SQL.Add(" where CLYLJSJG_GCID=:pGCID ");
+            SQL.Add(" and a.WL_WLID=CLYLJSJG_CPWLID ");
+            SQL.Add(string.Format(" and " + CMISproDataBase.GetWhereLead("a.WL_PIID", cbxCPPIID.SelectedValue.Trim())));
+            SQL.Add(" and b.WL_WLID=CLYLJSJG_WLID ");
+            SQL.Add(string.Format(" and " + CMISproDataBase.GetWhereLead("b.WL_PIID", cbxCLPIID.SelectedValue.Trim())));
+            SQL.Add(" ) c ");
+            SQL.Add(" where not exists ");
+            SQL.Add(" ( ");
+            SQL.Add(" select 1 ");
+            SQL.Add(" from XLXSBJCLWL ");
+            SQL.Add(" where XLXSBJCLWL_WLID=WLID ");
+            SQL.Add(" ) ");
+            SQL.ParamByName("pWHRID").Value = tSession.UserId;
+            SQL.ParamByName("pWHR").Value = tSession.UserName;
+            SQL.ParamByName("pWHSJ").Value = DateTime.Now;
+            SQL.ParamByName("pGCID").Value = cbxGCID.SelectedValue.Trim();
+
+            dberp.ExecSQL(SQL);
+
+            ShowMessage("导入完成！");
+            CloseWindow();
+        }
+
+        protected void btnQX_Click(object sender, EventArgs e)
+        {
+            CloseWindow();
+        }
+
+        #endregion
+    }
+}