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_MODEL.Page; using GThinking.N_MISPRO; using GThinking.N_MISPRO.Utility; using System.Collections.Generic; using GThinking.N_MISPRO.Data; using GThinking.N_PUBLIC; namespace GThinking.N_XLXSBJ { public partial class JGBML_TBZXSJGBInfo : SingleCardBase { JGBML_SelJGB entity = new JGBML_SelJGB(); protected void Page_Load(object sender, EventArgs e) { this.UMID = 100860018; 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 模板继承事件 protected override string CodeClass(string ComponentID) { string sResult = base.CodeClass(ComponentID); if (ComponentID == "txtJGBBM") { sResult += @"!!select JGBML_JGBID as CODE, JGBML_JGBMC as MESSAGE from JGBML where JGBML_QH = :QH order by JGBML_JGBID "; } if (ComponentID == "txtKHID") { sResult += @"!!select KH_KHID as CODE, KH_MC as MESSAGE from KH where isnull(KH_TYBZ,'N') <> 'Y' order by KH_KHID "; } return sResult; } protected override Dictionary CodeSQLParam() { Dictionary htResult = base.CodeSQLParam(); htResult.Add("QH", txtQHBH); return htResult; } #endregion #region 自定义函数 private void InitControl() { txtKHMC.Enabled = false; string sSQL = "select HB_HBID,HB_MC from HB order by HB_HBID "; TComboBox.SetComboBox("DBERP", cbxHB, sSQL, false); cbxHB.SelectedIndex = 0; txtQH.Value = 1; txtQHBH.Text = "1"; txtJGBBM.Text = PageParam.GetRTrimString("JGBID"); OntxtJGBBM_Changed(null,null); if (txtJGBMC.Text.Equals("")) txtJGBMC.Text = PageParam.GetRTrimString("JGBMC"); if (GetOption("BJU031").Equals("Y")) { chkXHTHGX.Visible = true; chkXHTHGX.Checked = true; } else chkXHTHGX.Visible = false; } public static void InsertXSJGBMX(TDatabase dberp, TSQL SQL, string sXSJGBID, double QH, string sJGBID, TYGXX tRYXX, bool bWBKC) { SQL.Clear(); SQL.Add(" select JGBML_KHID,JGBML_HBID,JGBML_QYRQ,JGBML_TYRQ from JGBML where JGBML_JGBID = :pXSJGBID and JGBML_QH = :pQH "); SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; DataSet ds = dberp.OpenDataSet(SQL); if (ds.Tables[0].Rows.Count > 0) { int VnewID = CMISproDataBase.GetMaxXH("DBERP", "V_JGB", "V_JGB_ID", "") + 1; string sHBID = ds.Tables[0].Rows[0]["JGBML_HBID"].ToString().Trim(); DateTime dtBGIN = CMISproConvert.StrToDateTime(ds.Tables[0].Rows[0]["JGBML_QYRQ"].ToString().Trim()); string sEND = ds.Tables[0].Rows[0]["JGBML_TYRQ"].ToString().Trim(); DateTime dtEND = CMISproConvert.StrToDateTime(ds.Tables[0].Rows[0]["JGBML_TYRQ"].ToString().Trim()); SQL.Clear(); SQL.Add(" insert into V_JGB( V_JGB_ID,V_JGB_JGBID,V_JGB_HBID,V_JGB_QH,V_JGB_WLID ) "); SQL.Add(" select :pID as VID,:pXSJGBID as XSJGBID,:pHBID as JGB_HBID,:pQH as QH,JGB_WLID"); SQL.Add(" from( "); SQL.Add(" select distinct(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS "); SQL.Add(" else CONVERT(float,1)end)as JGB_JG0 "); SQL.Add(" from XLXSJGBMX "); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX1 on XLXSBJXLGGTHB_MX1.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLXSBJXDWL on XLXSJGBMX_XLXHID=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX1.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLXSJGBMX_XLXHID=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX1.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)"); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ')"); SQL.Add(" and isnull(WL_WLID,' ') <> ' ' and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" )TempJGB where 1=1 "); SQL.Add(" group by JGB_WLID "); SQL.Add(" having count(distinct JGB_JG0)>1 "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; dberp.ExecSQL(SQL); if (bWBKC) { SQL.Clear(); SQL.Add(" insert into V_JGB( V_JGB_ID,V_JGB_JGBID,V_JGB_HBID,V_JGB_QH,V_JGB_WLID ) "); SQL.Add(" select :pID as VID,:pXSJGBID as XSJGBID,:pHBID as JGB_HBID,:pQH as QH,JGB_WLID"); SQL.Add(" from( "); SQL.Add(" select distinct(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS "); SQL.Add(" else CONVERT(float,1)end)as JGB_JG0 "); SQL.Add(" from XLXSJGBMX "); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX2 on XLXSBJXLGGTHB_MX2.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLWBBJDXHDZB on XLWBBJDXHDZB_XLXHID = XLXSJGBMX_XLXHID "); SQL.Add(" left join XLXSBJXDWL on XLWBBJDXHDZB_WBXLXHID=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX2.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLWBBJDXHDZB_WBXLXHID=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX2.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)"); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ')"); SQL.Add(" and isnull(XLWBBJDXHDZB_XLXHID,' ') <> ' ' "); SQL.Add(" and isnull(WL_WLID,' ') <> ' ' and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" )TempJGB where 1=1 "); SQL.Add(" group by JGB_WLID "); SQL.Add(" having count(distinct JGB_JG0)>1 "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; dberp.ExecSQL(SQL); } SQL.Clear(); SQL.Add(" insert into JGB (JGB_JGBID,JGB_QH,JGB_WLID,JGB_HBID,JGB_START,JGB_END,"); SQL.Add(" JGB_JLDW,JGB_HSXS,JGB_JG0,JGB_JZJG,JGB_WHRID,JGB_WHR,JGB_WHSJ)"); SQL.Add(" select distinct :pXSJGBID as XSJGBID,:pQH as QH,"); SQL.Add(" (case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" :pHBID as JGB_HBID,:pSTART as JGB_START,:pEND as JGB_END,WL_JLDW as JGB_JLDW,CONVERT(float,1)as JGB_HSXS,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JG0,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JZJG,"); SQL.Add(" :pWHRID,:pWHR,:pWHSJ "); SQL.Add(" from XLXSJGBMX"); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX3 on XLXSBJXLGGTHB_MX3.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLXSBJXDWL on XLXSJGBMX_XLXHID=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX3.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLXSJGBMX_XLXHID=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX3.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) "); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ') and isnull(WL_WLID,' ') <> ' ' "); SQL.Add(" and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" and not exists(select 1 from V_JGB where V_JGB_JGBID= :pXSJGBID and V_JGB_QH=:pQH and V_JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)and V_JGB_HBID=:pHBID and V_JGB_ID=:pID ) "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; SQL.ParamByName("pSTART").Value = dtBGIN; if (!sEND.Equals(""))//SQL语句自测:刘青棚2024/11/01 18:00:00 SQL.ParamByName("pEND").Value = dtEND; else SQL.ParamByName("pEND").Value = null; SQL.ParamByName("pWHR").Value = tRYXX.XM; SQL.ParamByName("pWHRID").Value = tRYXX.GH; SQL.ParamByName("pWHSJ").Value = DateTime.Now; dberp.ExecSQL(SQL); if (bWBKC) { SQL.Clear(); SQL.Add(" insert into JGB (JGB_JGBID,JGB_QH,JGB_WLID,JGB_HBID,JGB_START,JGB_END,"); SQL.Add(" JGB_JLDW,JGB_HSXS,JGB_JG0,JGB_JZJG,JGB_WHRID,JGB_WHR,JGB_WHSJ)"); SQL.Add(" select distinct :pXSJGBID as XSJGBID,:pQH as QH,"); SQL.Add(" (case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" :pHBID as JGB_HBID,:pSTART as JGB_START,:pEND as JGB_END,WL_JLDW as JGB_JLDW,CONVERT(float,1)as JGB_HSXS,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JG0,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JZJG,"); SQL.Add(" :pWHRID,:pWHR,:pWHSJ "); SQL.Add(" from XLXSJGBMX"); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX4 on XLXSBJXLGGTHB_MX4.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLWBBJDXHDZB on XLWBBJDXHDZB_XLXHID = XLXSJGBMX_XLXHID "); SQL.Add(" left join XLXSBJXDWL on XLWBBJDXHDZB_WBXLXHID=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX4.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLWBBJDXHDZB_WBXLXHID=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX4.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) "); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ') and isnull(WL_WLID,' ') <> ' ' "); SQL.Add(" and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" and not exists(select 1 from V_JGB where V_JGB_JGBID= :pXSJGBID and V_JGB_QH=:pQH and V_JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)and V_JGB_HBID=:pHBID and V_JGB_ID=:pID ) "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; SQL.ParamByName("pSTART").Value = dtBGIN; if (!sEND.Equals(""))//SQL语句自测:刘青棚2024/11/01 18:00:00 SQL.ParamByName("pEND").Value = dtEND; else SQL.ParamByName("pEND").Value = null; SQL.ParamByName("pWHR").Value = tRYXX.XM; SQL.ParamByName("pWHRID").Value = tRYXX.GH; SQL.ParamByName("pWHSJ").Value = DateTime.Now; dberp.ExecSQL(SQL); } SQL.Clear(); SQL.Add(" delete from V_JGB where V_JGB_ID = :pID and V_JGB_JGBID = :pXSJGBID and V_JGB_QH = :pQH "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; dberp.ExecSQL(SQL); } } public static void InsertXSJGBMXDxth(TDatabase dberp, TSQL SQL, string sXSJGBID, double QH, string sJGBID, TYGXX tRYXX, bool bWBKC) { SQL.Clear(); SQL.Add(" select JGBML_KHID,JGBML_HBID,JGBML_QYRQ,JGBML_TYRQ from JGBML where JGBML_JGBID = :pXSJGBID and JGBML_QH = :pQH "); SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; DataSet ds = dberp.OpenDataSet(SQL); if (ds.Tables[0].Rows.Count > 0) { int VnewID = CMISproDataBase.GetMaxXH("DBERP", "V_JGB", "V_JGB_ID", "") + 1; string sHBID = ds.Tables[0].Rows[0]["JGBML_HBID"].ToString().Trim(); DateTime dtBGIN = CMISproConvert.StrToDateTime(ds.Tables[0].Rows[0]["JGBML_QYRQ"].ToString().Trim()); string sEND = ds.Tables[0].Rows[0]["JGBML_TYRQ"].ToString().Trim(); DateTime dtEND = CMISproConvert.StrToDateTime(ds.Tables[0].Rows[0]["JGBML_TYRQ"].ToString().Trim()); SQL.Clear(); SQL.Add(" insert into V_JGB( V_JGB_ID,V_JGB_JGBID,V_JGB_HBID,V_JGB_QH,V_JGB_WLID ) "); SQL.Add(" select :pID as VID,:pXSJGBID as XSJGBID,:pHBID as JGB_HBID,:pQH as QH,JGB_WLID"); SQL.Add(" from( "); SQL.Add(" select distinct(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS "); SQL.Add(" else CONVERT(float,1)end)as JGB_JG0 "); SQL.Add(" from XLXSJGBMX "); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX1 on XLXSBJXLGGTHB_MX1.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLXSBJXDWL on XLXSJGBMX_XLXHID=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX1.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLXSJGBMX_XLXHID=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX1.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)"); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ')"); SQL.Add(" and isnull(WL_WLID,' ') <> ' ' and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" )TempJGB where 1=1 "); SQL.Add(" group by JGB_WLID "); SQL.Add(" having count(distinct JGB_JG0)>1 "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; dberp.ExecSQL(SQL); if (bWBKC) { SQL.Clear(); SQL.Add(" insert into V_JGB( V_JGB_ID,V_JGB_JGBID,V_JGB_HBID,V_JGB_QH,V_JGB_WLID ) "); SQL.Add(" select :pID as VID,:pXSJGBID as XSJGBID,:pHBID as JGB_HBID,:pQH as QH,JGB_WLID"); SQL.Add(" from( "); SQL.Add(" select distinct(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS "); SQL.Add(" else CONVERT(float,1)end)as JGB_JG0 "); SQL.Add(" from XLXSJGBMX "); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX2 on XLXSBJXLGGTHB_MX2.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLXSBJDXTHDZQD on XLXSBJDXTHDZQD_THHXHZF=XLXSJGBMX_XLXHID "); SQL.Add(" and XLXSBJDXTHDZQD_THLX='XHJQTH' and isnull(XLXSBJDXTHDZQD_TYBZ,'N')<>'Y' "); SQL.Add(" left join XLXSBJXDWL on XLXSBJDXTHDZQD_THQXHZF=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX2.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLXSBJDXTHDZQD_THQXHZF=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX2.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)"); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ')"); SQL.Add(" and isnull(XLXSBJDXTHDZQD_THHXHZF,' ') <> ' ' "); SQL.Add(" and isnull(WL_WLID,' ') <> ' ' and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" )TempJGB where 1=1 "); SQL.Add(" group by JGB_WLID "); SQL.Add(" having count(distinct JGB_JG0)>1 "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; dberp.ExecSQL(SQL); } SQL.Clear(); SQL.Add(" insert into JGB (JGB_JGBID,JGB_QH,JGB_WLID,JGB_HBID,JGB_START,JGB_END,"); SQL.Add(" JGB_JLDW,JGB_HSXS,JGB_JG0,JGB_JZJG,JGB_WHRID,JGB_WHR,JGB_WHSJ)"); SQL.Add(" select distinct :pXSJGBID as XSJGBID,:pQH as QH,"); SQL.Add(" (case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" :pHBID as JGB_HBID,:pSTART as JGB_START,:pEND as JGB_END,WL_JLDW as JGB_JLDW,CONVERT(float,1)as JGB_HSXS,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JG0,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JZJG,"); SQL.Add(" :pWHRID,:pWHR,:pWHSJ "); SQL.Add(" from XLXSJGBMX"); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX3 on XLXSBJXLGGTHB_MX3.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLXSBJXDWL on XLXSJGBMX_XLXHID=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX3.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLXSJGBMX_XLXHID=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX3.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) "); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ') and isnull(WL_WLID,' ') <> ' ' "); SQL.Add(" and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" and not exists(select 1 from V_JGB where V_JGB_JGBID= :pXSJGBID and V_JGB_QH=:pQH and V_JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)and V_JGB_HBID=:pHBID and V_JGB_ID=:pID ) "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; SQL.ParamByName("pSTART").Value = dtBGIN; if (!sEND.Equals("")) SQL.ParamByName("pEND").Value = dtEND; else SQL.ParamByName("pEND").Value = null; SQL.ParamByName("pWHR").Value = tRYXX.XM; SQL.ParamByName("pWHRID").Value = tRYXX.GH; SQL.ParamByName("pWHSJ").Value = DateTime.Now; dberp.ExecSQL(SQL); if (bWBKC) { SQL.Clear(); SQL.Add(" insert into JGB (JGB_JGBID,JGB_QH,JGB_WLID,JGB_HBID,JGB_START,JGB_END,"); SQL.Add(" JGB_JLDW,JGB_HSXS,JGB_JG0,JGB_JZJG,JGB_WHRID,JGB_WHR,JGB_WHSJ)"); SQL.Add(" select distinct :pXSJGBID as XSJGBID,:pQH as QH,"); SQL.Add(" (case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)as JGB_WLID,"); SQL.Add(" :pHBID as JGB_HBID,:pSTART as JGB_START,:pEND as JGB_END,WL_JLDW as JGB_JLDW,CONVERT(float,1)as JGB_HSXS,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JG0,"); SQL.Add(" XLXSJGBMX_HSBJ/(case when isnull(TDA.JLDWTD_HSXS,0) <> 0 then TDA.JLDWTD_HSXS when isnull(TDB.JLDWTD_HSXS,0) <> 0 then TDB.JLDWTD_HSXS else CONVERT(float,1)end)as JGB_JZJG,"); SQL.Add(" :pWHRID,:pWHR,:pWHSJ "); SQL.Add(" from XLXSJGBMX"); SQL.Add(" left join XLXSBJXLGGTHB XLXSBJXLGGTHB_MX4 on XLXSBJXLGGTHB_MX4.XLXSBJXLGGTHB_XLGGID=XLXSJGBMX_XLGGID "); SQL.Add(" left join XLXSBJDXTHDZQD on XLXSBJDXTHDZQD_THHXHZF=XLXSJGBMX_XLXHID "); SQL.Add(" and XLXSBJDXTHDZQD_THLX='XHJQTH' and isnull(XLXSBJDXTHDZQD_TYBZ,'N')<>'Y' "); SQL.Add(" left join XLXSBJXDWL on XLXSBJDXTHDZQD_THQXHZF=XLXSBJXDWL_XLXHID and XLXSJGBMX_DYDJID=XLXSBJXDWL_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXSBJXDWL_XLBZID and isnull(XLXSBJXLGGTHB_MX4.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXSBJXDWL_XLGGID "); SQL.Add(" left join XLXLB on XLXSBJDXTHDZQD_THQXHZF=XLXLB_XLXHID and XLXSJGBMX_DYDJID=XLXLB_DYDJID "); SQL.Add(" and XLXSJGBMX_XLBZID=XLXLB_XLBZID and isnull(XLXSBJXLGGTHB_MX4.XLXSBJXLGGTHB_XLGGIDCH,' ')=XLXLB_XLGGID "); SQL.Add(" left join WL on WL_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) "); SQL.Add(" left join JLDWTD TDA on TDA.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDA.JLDWTD_JLDW=WL_JLDW and TDA.JLDWTD_WLID=WL_WLID "); SQL.Add(" left join JLDWTD TDB on TDB.JLDWTD_TDJLDW=XLXSJGBMX_JLDW and TDB.JLDWTD_JLDW=WL_JLDW and isnull(TDB.JLDWTD_WLID,' ') = ' ' "); SQL.Add(" where 1=1 and XLXSJGBMX_JGBID= :pJGBID and(isnull(XLXLB_WLID,' ') <> ' ' or isnull(XLXSBJXDWL_WLID,' ') <> ' ') and isnull(WL_WLID,' ') <> ' ' "); SQL.Add(" and isnull(WL_TYBZ,'N')<>'Y' and NE(XLXSJGBMX_HSBJ,0) ");// SQL.Add(" and not exists(select 1 from JGB where JGB_JGBID= :pXSJGBID and JGB_QH=:pQH and JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<>' ' then XLXSBJXDWL_WLID else XLXLB_WLID end) and JGB_HBID=:pHBID )"); SQL.Add(" and not exists(select 1 from V_JGB where V_JGB_JGBID= :pXSJGBID and V_JGB_QH=:pQH and V_JGB_WLID=(case when isnull(XLXSBJXDWL_WLID,' ')<> ' ' then XLXSBJXDWL_WLID else XLXLB_WLID end)and V_JGB_HBID=:pHBID and V_JGB_ID=:pID ) "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; SQL.ParamByName("pHBID").Value = sHBID; SQL.ParamByName("pJGBID").Value = sJGBID; SQL.ParamByName("pSTART").Value = dtBGIN; if (!sEND.Equals("")) SQL.ParamByName("pEND").Value = dtEND; else SQL.ParamByName("pEND").Value = null; SQL.ParamByName("pWHR").Value = tRYXX.XM; SQL.ParamByName("pWHRID").Value = tRYXX.GH; SQL.ParamByName("pWHSJ").Value = DateTime.Now; dberp.ExecSQL(SQL); } SQL.Clear(); SQL.Add(" delete from V_JGB where V_JGB_ID = :pID and V_JGB_JGBID = :pXSJGBID and V_JGB_QH = :pQH "); SQL.ParamByName("pID").Value = VnewID; SQL.ParamByName("pXSJGBID").Value = sXSJGBID; SQL.ParamByName("pQH").Value = QH; dberp.ExecSQL(SQL); } } #endregion #region 控件事件 protected void btnQR_Click(object sender, EventArgs e) { if (txtJGBBM.Text.Trim().Equals("")) { ShowMessage("销售价格表编号不允许为空!"); return; } if (txtJGBMC.Text.Trim().Equals("")) { ShowMessage("销售价格表名称不允许为空!"); return; } string sMXBH = PageParam.GetRTrimString("MXBH"); string sJGBID = PageParam.GetRTrimString("JGBID"); DateTime dtYXQS = CMISproConvert.StrToDateTime(PageParam.GetRTrimString("YXQS")); DateTime dtYXQZ = new DateTime(); if(!string.IsNullOrEmpty(PageParam.GetRTrimString("YXQZ"))) dtYXQZ = CMISproConvert.StrToDateTime(PageParam.GetRTrimString("YXQZ")); TDatabase dberp = TContextDatabases.GetDatabase("DBERP"); TSQL SQL = new TSQL(dberp); try { dberp.BeginTrans(); TYGXX tRYXX = TRYXX.GetRYXXByGH(tSession.UserId); if (!CMISproDataBase.ExistsRecord("DBERP", string.Format("select 1 from JGBML where JGBML_JGBID = '{0}' and JGBML_QH = {1} ", txtJGBBM.Text.Trim(), txtQH.Value.ToString().Trim()))) { string sYJGBID = ""; double dYQH = 0; SQL.Clear();//SQL语句自测:刘青棚2024/11/01 18:00:00 SQL.Add(" select JGBML_JGBID,JGBML_QH,JGBML_QYRQ from JGBML where isnull(JGBML_KHID, ' ') = :pKHID and JGBML_QYRQ <= :pQYRQ and isnull(JGBML_TYRQ ,convert(datetime,'2999-01-01 00:00:00')) > :pTYRQ order by JGBML_QYRQ desc "); SQL.ParamByName("pKHID").Value = txtKHID.Text.Trim(); SQL.ParamByName("pQYRQ").Value = CMISproConvert.StrToDateTime(DateTime.Now.ToShortDateString()); SQL.ParamByName("pTYRQ").Value = CMISproConvert.StrToDateTime(DateTime.Now.ToShortDateString()).AddDays(-1); DataSet ds = dberp.OpenDataSet(SQL); if (ds.Tables[0].Rows.Count > 0) { DateTime dtQYRQ = CMISproConvert.StrToDateTime(ds.Tables[0].Rows[0]["JGBML_QYRQ"].ToString().Trim()); if (dtQYRQ > dtYXQS) { ShowMessage("价格表有效期始小于同客户销售价格表启用日期!"); return; } sYJGBID = ds.Tables[0].Rows[0]["JGBML_JGBID"].ToString().Trim(); dYQH = CMISproConvert.StrToFloat(ds.Tables[0].Rows[0]["JGBML_QH"].ToString().Trim()); } //存在相同客户的原价格表,需停用原价格表 if (!sYJGBID.Equals("")) { DateTime dTYRQ = dtYXQS.AddDays(-1); SQL.Clear(); SQL.Add(" update JGBML set JGBML_TYRQ = :pTYRQ,JGBML_TYBZ = 'Y' where JGBML_JGBID =:pJGBID and JGBML_QH =:pQH "); SQL.ParamByName("pTYRQ").Value = dTYRQ; SQL.ParamByName("pJGBID").Value = sYJGBID; SQL.ParamByName("pQH").Value = dYQH; dberp.ExecSQL(SQL); SQL.Clear(); SQL.Add(" update JGB set JGB_END = :pTYRQ where JGB_JGBID =:pJGBID and JGB_QH =:pQH "); SQL.ParamByName("pTYRQ").Value = dTYRQ; SQL.ParamByName("pJGBID").Value = sYJGBID; SQL.ParamByName("pQH").Value = dYQH; dberp.ExecSQL(SQL); } SQL.Clear(); SQL.Add(" insert into JGBML (JGBML_JGBID,JGBML_QH,JGBML_KHID,JGBML_JGBMC,JGBML_HBID,JGBML_WHRID,JGBML_WHR,JGBML_WHSJ,"); SQL.Add(" JGBML_TYBZ,JGBML_WFID,JGBML_WFINST,JGBML_WPID,JGBML_ZT,JGBML_QYRQ,JGBML_TYRQ)"); SQL.Add(" values (:JGBML_JGBID,:JGBML_QH,:JGBML_KHID,:JGBML_JGBMC,:JGBML_HBID,:JGBML_WHRID,:JGBML_WHR,:JGBML_WHSJ, "); SQL.Add(" 'N',' ',0,'ZZZZ','F',:JGBML_QYRQ,:JGBML_TYRQ) "); SQL.ParamByName("JGBML_JGBID").Value = txtJGBBM.Text.Trim(); SQL.ParamByName("JGBML_QH").Value = txtQH.Value; SQL.ParamByName("JGBML_KHID").Value = txtKHID.Text.Trim(); SQL.ParamByName("JGBML_JGBMC").Value = txtJGBMC.Text.Trim(); SQL.ParamByName("JGBML_HBID").Value = cbxHB.SelectedValue.Trim(); SQL.ParamByName("JGBML_WHRID").Value = tSession.UserId; SQL.ParamByName("JGBML_WHR").Value = tSession.UserName; int dtYEAR = DateTime.Now.Year; SQL.ParamByName("JGBML_WHSJ").Value = DateTime.Now; SQL.ParamByName("JGBML_QYRQ").Value = dtYXQS; if (!string.IsNullOrEmpty(PageParam.GetRTrimString("YXQZ"))) SQL.ParamByName("JGBML_TYRQ").Value = dtYXQZ; else SQL.ParamByName("JGBML_TYRQ").Value = null; dberp.ExecSQL(SQL); } bool bWBKC = GetOption("BJU031").Equals("Y") && chkXHTHGX.Checked; bool bUseDxth = XLBJDUtils.GetXLXSBJPZXX(100860043).XLXSBJPZ_QYBJDXTH.Trim().Equals("Y"); if (bUseDxth) InsertXSJGBMXDxth(dberp, SQL, txtJGBBM.Text.Trim(), txtQH.Value, sJGBID, tRYXX, bWBKC); else InsertXSJGBMX(dberp, SQL, txtJGBBM.Text.Trim(), txtQH.Value, sJGBID, tRYXX, bWBKC); dberp.CommitTrans(); ShowMessage("同步成功!"); //使用脚本给父页面的隐藏控件赋值,调用父页面的控件事件 DialogOperationScript dos = new DialogOperationScript(this); //dos.ClickOwnerButton(PageParam.GetRTrimString("RefreshCtrlID")); dos.CloseSelf(); dos.Execute(); } catch (Exception ex) { ShowMessage("同步失败!错误原因:" + ex); dberp.RollbackTrans(); } } protected void btnQX_Click(object sender, EventArgs e) { CloseWindow(); } protected void OntxtJGBBM_Changed(object sender, EventArgs e) { TDatabase dberp = TContextDatabases.GetDatabase("DBERP"); TSQL SQL = new TSQL(dberp); SQL.Clear(); SQL.Add(" select JGBML_KHID,JGBML_HBID,JGBML_JGBMC from JGBML where JGBML_JGBID = :pJGBID and JGBML_QH = :pQH "); SQL.ParamByName("pJGBID").Value = txtJGBBM.Text.Trim(); SQL.ParamByName("pQH").Value = txtQH.Value; DataSet ds = dberp.OpenDataSet(SQL); if (ds.Tables[0].Rows.Count > 0) { cbxHB.SelectedValue = ds.Tables[0].Rows[0]["JGBML_HBID"].ToString().Trim(); txtJGBMC.Text = ds.Tables[0].Rows[0]["JGBML_JGBMC"].ToString().Trim(); txtKHID.Text = ds.Tables[0].Rows[0]["JGBML_KHID"].ToString().Trim(); OntxtKHID_Changed(null, null); cbxHB.Enabled = false; txtJGBMC.Enabled = false; txtKHID.Enabled = false; } else { cbxHB.Enabled = true; txtJGBMC.Enabled = true; txtKHID.Enabled = true; } } protected void OntxtKHID_Changed(object sender, EventArgs e) { TDatabase dberp = TContextDatabases.GetDatabase("DBERP"); TSQL SQL = new TSQL(dberp); SQL.Clear(); SQL.Add(" select KH_MC from KH where KH_KHID = :pKHID "); SQL.ParamByName("pKHID").Value = txtKHID.Text.Trim(); DataSet ds = dberp.OpenDataSet(SQL); if (ds.Tables[0].Rows.Count > 0) { txtKHMC.Text = ds.Tables[0].Rows[0]["KH_MC"].ToString().Trim(); } else { txtKHMC.Text = ""; } } protected void OntxtQH_Changed(object sender, EventArgs e) { txtQHBH.Text = txtQH.Value.ToString().Trim(); TDatabase dberp = TContextDatabases.GetDatabase("DBERP"); TSQL SQL = new TSQL(dberp); SQL.Clear(); SQL.Add(" select JGBML_KHID,JGBML_HBID,JGBML_JGBMC from JGBML where JGBML_JGBID = :pJGBID and JGBML_QH = :pQH "); SQL.ParamByName("pJGBID").Value = txtJGBBM.Text.Trim(); SQL.ParamByName("pQH").Value = txtQH.Value; DataSet ds = dberp.OpenDataSet(SQL); if (ds.Tables[0].Rows.Count > 0) { cbxHB.SelectedValue = ds.Tables[0].Rows[0]["JGBML_HBID"].ToString().Trim(); txtJGBMC.Text = ds.Tables[0].Rows[0]["JGBML_JGBMC"].ToString().Trim(); txtKHID.Text = ds.Tables[0].Rows[0]["JGBML_KHID"].ToString().Trim(); OntxtKHID_Changed(null, null); cbxHB.Enabled = false; txtJGBMC.Enabled = false; txtKHID.Enabled = false; } else { cbxHB.Enabled = true; txtJGBMC.Enabled = true; txtKHID.Enabled = true; } } #endregion } }