2026821
This commit is contained in:
@@ -0,0 +1,193 @@
|
||||
using System;
|
||||
using System.Collections.Generic;
|
||||
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_WORKFLOW;
|
||||
using GThinking.N_MODEL.Dialog;
|
||||
using GThinking.N_PUBLIC;
|
||||
using GThinking.N_MISPRO.Utility;
|
||||
using GThinking.N_CONTROL;
|
||||
using System.IO;
|
||||
using System.Data.OleDb;
|
||||
using System.Data.Common;
|
||||
using GThinking.N_MISPROAS;
|
||||
|
||||
namespace GThinking.N_XLXSBJ
|
||||
{
|
||||
public partial class XLBJD_HTBDJGDRInfo : SingleCardBase
|
||||
{
|
||||
XLBJD_HTBDJGDR entity = new XLBJD_HTBDJGDR();
|
||||
|
||||
protected void Page_Load(object sender, EventArgs e)
|
||||
{
|
||||
this.UMID = 100860000;
|
||||
this.UMName = "线缆销售报价单";
|
||||
base.CurMaster = Master;
|
||||
base.CurEntity = entity;
|
||||
this.PageHeight = 180;
|
||||
this.PageWidth = 420;
|
||||
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)
|
||||
{
|
||||
txtBJDID.Value = PageParam.GetRTrimString("BJDID");
|
||||
}
|
||||
}
|
||||
|
||||
#region 控件事件
|
||||
|
||||
protected void btnQD_Click(object sender, EventArgs e)
|
||||
{
|
||||
TDatabase dberp = TContextDatabases.GetDatabase("DBERP");
|
||||
TSQL sSQL = new TSQL(dberp);
|
||||
sSQL.Clear();
|
||||
sSQL.Add(@"select HTMX_WLID,HTMX_XQSL,HTMX_JLDW,HTMX_HSJG,HTMX_DZSC,
|
||||
case when isnull(XSBJXHTH_BJXLXHID,' ') = ' ' then XLXLB_XLXHID else XSBJXHTH_BJXLXHID end as XLXLB_XLXHID,
|
||||
XLXLB_XLGGID,XLXLB_XLBZID,XLXLB_DYDJID,XLXLB_XLYSID
|
||||
from HTMX
|
||||
left join XLXLB on XLXLB_WLID=HTMX_WLID
|
||||
left join XSBJXHTH on XSBJXHTH_XLXHID=XLXLB_XLXHID
|
||||
where HTMX_JJDID=:pJJDID order by HTMX_XH ");
|
||||
sSQL.ParamByName("pJJDID").Value = txtHTDJH.Text.Trim();
|
||||
DataSet ds = dberp.OpenDataSet(sSQL);
|
||||
if (ds.Tables[0].Rows.Count <= 0)
|
||||
{
|
||||
ShowMessage("当前合同登记号不存在明细记录,请检查!");
|
||||
return;
|
||||
}
|
||||
int iStartXH=CMISproDataBase.GetMaxXH("DBERP", "XLXSBJDMX", "XLXSBJDMX_XH", "XLXSBJDMX_BJDID='" + txtBJDID.Value.Trim() + "'") + 1;
|
||||
int iXH = iStartXH;
|
||||
int iXSSX = CMISproDataBase.GetMaxXH("DBERP", "XLXSBJDMX", "XLXSBJDMX_XSSX", "XLXSBJDMX_BJDID = '" + txtBJDID.Value.Trim() + "'") + 1;
|
||||
string sXLJGU007 = tSession.GetOption(102579000, "XLJGU007");
|
||||
try
|
||||
{
|
||||
dberp.BeginTrans();
|
||||
sSQL.Clear();
|
||||
sSQL.Add(" insert into XLXSBJDMX( ");
|
||||
sSQL.Add(" XLXSBJDMX_BJDID, XLXSBJDMX_XH, XLXSBJDMX_XSSX, XLXSBJDMX_XLXHID, XLXSBJDMX_XLGGID, ");
|
||||
sSQL.Add(" XLXSBJDMX_XLBZID,XLXSBJDMX_DYDJID,XLXSBJDMX_XLYSID,XLXSBJDMX_BJCP,XLXSBJDMX_BJCPSD,XLXSBJDMX_WGCPBZ, ");
|
||||
sSQL.Add(" XLXSBJDMX_JLDW,XLXSBJDMX_BJSL,XLXSBJDMX_BJSDBZ,XLXSBJDMX_CPBJ, ");
|
||||
sSQL.Add(" XLXSBJDMX_DZSC,XLXSBJDMX_WHR,XLXSBJDMX_WHRID,XLXSBJDMX_WHSJ,");
|
||||
sSQL.Add(" XLXSBJDMX_WLID) ");
|
||||
sSQL.Add(" values(");
|
||||
sSQL.Add(" :XLXSBJDMX_BJDID, :XLXSBJDMX_XH, :XLXSBJDMX_XSSX, :XLXSBJDMX_XLXHID, :XLXSBJDMX_XLGGID, ");
|
||||
sSQL.Add(" :XLXSBJDMX_XLBZID, isnull(:XLXSBJDMX_DYDJID,' '), :XLXSBJDMX_XLYSID, :XLXSBJDMX_BJCP, :XLXSBJDMX_BJCPSD,:XLXSBJDMX_WGCPBZ, ");
|
||||
sSQL.Add(" :XLXSBJDMX_JLDW, :XLXSBJDMX_BJSL,:XLXSBJDMX_BJSDBZ,:XLXSBJDMX_CPBJ, ");
|
||||
sSQL.Add(" :XLXSBJDMX_DZSC,:XLXSBJDMX_WHR, :XLXSBJDMX_WHRID, :XLXSBJDMX_WHSJ,");
|
||||
sSQL.Add(" :XLXSBJDMX_WLID) ");
|
||||
|
||||
for (int i = 0; i < ds.Tables[0].Rows.Count; i++)
|
||||
{
|
||||
string sXLXHID = ds.Tables[0].Rows[i]["XLXLB_XLXHID"].ToString().Trim();
|
||||
string sXLGGID = XLBJDUtils.GetStaXLGGID(ds.Tables[0].Rows[i]["XLXLB_XLGGID"].ToString().Trim(),sXLJGU007);
|
||||
string sXLBZID = ds.Tables[0].Rows[i]["XLXLB_XLBZID"].ToString().Trim();
|
||||
string sDYDJID = ds.Tables[0].Rows[i]["XLXLB_DYDJID"].ToString().Trim();
|
||||
string sXLYSID = ds.Tables[0].Rows[i]["XLXLB_XLYSID"].ToString().Trim();
|
||||
string sJLDW = ds.Tables[0].Rows[i]["HTMX_JLDW"].ToString().Trim();
|
||||
double fBJSL = CMISproConvert.StrToFloat(ds.Tables[0].Rows[i]["HTMX_XQSL"].ToString().Trim(), 0);
|
||||
double fCPBJ = CMISproConvert.StrToFloat(ds.Tables[0].Rows[i]["HTMX_HSJG"].ToString().Trim(), 0);
|
||||
string sWLID = ds.Tables[0].Rows[i]["HTMX_WLID"].ToString().Trim();
|
||||
|
||||
if (sXLXHID.Equals(""))
|
||||
sXLXHID = "/";
|
||||
|
||||
if (sXLGGID.Equals(""))
|
||||
sXLGGID = "/";
|
||||
|
||||
string sBJCP = XLBJDUtils.GroupBJCPXX(sXLXHID, sXLGGID, sDYDJID);
|
||||
|
||||
sSQL.ParamByName("XLXSBJDMX_BJDID").Value = txtBJDID.Value.Trim();
|
||||
sSQL.ParamByName("XLXSBJDMX_XH").Value = iXH++;
|
||||
sSQL.ParamByName("XLXSBJDMX_XSSX").Value = iXSSX++;
|
||||
sSQL.ParamByName("XLXSBJDMX_XLXHID").Value = sXLXHID;
|
||||
sSQL.ParamByName("XLXSBJDMX_XLGGID").Value = sXLGGID;
|
||||
sSQL.ParamByName("XLXSBJDMX_XLBZID").Value = sXLBZID;
|
||||
sSQL.ParamByName("XLXSBJDMX_DYDJID").Value = sDYDJID;
|
||||
sSQL.ParamByName("XLXSBJDMX_XLYSID").Value = sXLYSID;
|
||||
sSQL.ParamByName("XLXSBJDMX_BJCP").Value = sBJCP;
|
||||
sSQL.ParamByName("XLXSBJDMX_BJCPSD").Value = "N";
|
||||
sSQL.ParamByName("XLXSBJDMX_WGCPBZ").Value = "N";
|
||||
sSQL.ParamByName("XLXSBJDMX_JLDW").Value = sJLDW;
|
||||
sSQL.ParamByName("XLXSBJDMX_BJSL").Value = fBJSL;
|
||||
sSQL.ParamByName("XLXSBJDMX_BJSDBZ").Value = "Y";
|
||||
sSQL.ParamByName("XLXSBJDMX_CPBJ").Value = fCPBJ;
|
||||
|
||||
if (XLBJDUtils.ISDZBZ(sXLBZID))
|
||||
{
|
||||
sSQL.ParamByName("XLXSBJDMX_DZSC").Value = "Y";
|
||||
}
|
||||
else
|
||||
{
|
||||
sSQL.ParamByName("XLXSBJDMX_DZSC").Value = "N";
|
||||
}
|
||||
|
||||
sSQL.ParamByName("XLXSBJDMX_WHR").Value = tSession.UserName;
|
||||
sSQL.ParamByName("XLXSBJDMX_WHRID").Value = tSession.UserId;
|
||||
sSQL.ParamByName("XLXSBJDMX_WHSJ").Value = DateTime.Now;
|
||||
sSQL.ParamByName("XLXSBJDMX_WLID").Value = sWLID;
|
||||
|
||||
dberp.ExecSQL(sSQL);
|
||||
|
||||
}
|
||||
XLBJDUtils.SyncXLXSBJXLGGTHB_ByXLXSBJDMX_Batch(dberp, tSession, txtBJDID.Value.Trim(), "", iStartXH);
|
||||
string sErrorNum = string.Empty;
|
||||
XLBJDCalcUtils.CalcBJDMXAfterIns(dberp, sSQL, txtBJDID.Value.Trim(), iStartXH, tSession.GetOption(100860000, "BJU002"),
|
||||
tSession.GetOption(100860000, "BJU003"), tSession.GetOption(100860000, "BJU018"), tSession.UserId, tSession.UserName, ref sErrorNum);
|
||||
if (!sErrorNum.Equals(""))
|
||||
{
|
||||
throw new Exception("计算异常!异常信息:" + sErrorNum);
|
||||
|
||||
}
|
||||
dberp.CommitTrans();
|
||||
ShowMessage("导入明细成功!");
|
||||
CloseWindow();
|
||||
}
|
||||
catch (Exception ex)
|
||||
{
|
||||
dberp.RollbackTrans();
|
||||
throw new Exception(ex.Message.ToString().Trim());
|
||||
}
|
||||
}
|
||||
|
||||
protected void btnQX_Click(object sender, EventArgs e)
|
||||
{
|
||||
CloseWindow();
|
||||
}
|
||||
|
||||
#endregion
|
||||
|
||||
protected void txtHTDJH_OnTextChanged(object sender, EventArgs e)
|
||||
{
|
||||
TDatabase dberp = TContextDatabases.GetDatabase("DBERP");
|
||||
TSQL sSQL = new TSQL(dberp);
|
||||
sSQL.Clear();
|
||||
sSQL.Add(" select HT_MC from HT where HT_JJDID=:pJJDID ");
|
||||
sSQL.ParamByName("pJJDID").Value = txtHTDJH.Text.Trim();
|
||||
DataSet ds = dberp.OpenDataSet(sSQL);
|
||||
if (ds.Tables[0].Rows.Count > 0)
|
||||
txtHTMC.Text = ds.Tables[0].Rows[0][0].ToString().Trim();
|
||||
else
|
||||
txtHTMC.Text = "";
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user