wangwei/N_XLXSBJ----MX
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2026821

Browse Source
This commit is contained in:
wangwei
2026-08-21 17:03:02 +08:00
commit f065129b20
2292 changed files with 666241 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
JGBML_TBZXSJGBInfo.aspx.cs
+628
View File
@@ -0,0 +1,628 @@
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<string, Control> CodeSQLParam()
{
Dictionary<string, Control> 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
}
}