Files
N_XLXSBJ----MX/CLWL_DRInfo.aspx.cs
T
2026-08-21 17:03:02 +08:00

130 lines
4.7 KiB
C#

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
}
}