301 lines
14 KiB
C#
301 lines
14 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_MODEL.Page;
|
||
using GThinking.N_MISPRO.Data;
|
||
using GThinking.N_MISPRO.Utility;
|
||
using System.Collections.Generic;
|
||
using GThinking.N_CONTROL;
|
||
using GThinking.N_MISPROAS;
|
||
|
||
namespace GThinking.N_XLXSBJ
|
||
{
|
||
public partial class TZYZBJMDRInfo : SingleCardBase
|
||
{
|
||
TZYZBJM_DR entity = new TZYZBJM_DR();
|
||
|
||
protected void Page_Load(object sender, EventArgs e)
|
||
{
|
||
this.UMID = 100860178;
|
||
this.UMName = "按型号规格电压等级报价数量区间调报价";
|
||
base.CurMaster = Master;
|
||
base.CurEntity = entity;
|
||
this.PageHeight = 210;
|
||
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;
|
||
fupdPost.FileSaveType = gtAsyncFileUpload.DFileSaveType.SaveToPath;
|
||
fupdPost.Filter = "XLS,XLSX";
|
||
this.Page.Title = "导入Excel文件";
|
||
base.InitPage();
|
||
|
||
if (!IsPostBack)
|
||
{
|
||
GtLabel1.Text = "Excel栏目依次为：型号、规格、电压等级、报价数量下限、报价数量上限、调价因子";
|
||
txtJGBID.Value = PageParam.GetRTrimString("JGBID");
|
||
chkIns.Value = "Y";
|
||
|
||
TDatabase dberp = TContextDatabases.GetDatabase("DBERP");
|
||
TSQL SQL = new TSQL(dberp);
|
||
SQL.Clear();
|
||
SQL.Add("select XLXSTZYZ_YZID, XLXSTZYZ_YZMC, XLXSTZYZ_JJFS ");
|
||
SQL.Add(" from XLXSTZYZ");
|
||
SQL.Add(" where XLXSTZYZ_MXBH = 'BJD' and XLXSTZYZ_TJYS='M' ");
|
||
SQL.Add(" and XLXSTZYZ_JGBID = :pJGBID");
|
||
SQL.Add("order by XLXSTZYZ_YZID,XLXSTZYZ_XSXH");
|
||
SQL.ParamByName("pJGBID").Value = txtJGBID.Value;
|
||
DataSet ds = dberp.OpenDataSet(SQL);
|
||
cbxYZID.ClearItems();
|
||
for (int i = 0; i < ds.Tables[0].Rows.Count; i++)
|
||
{
|
||
string sJJFSMC = "";
|
||
if (ds.Tables[0].Rows[i]["XLXSTZYZ_JJFS"].ToString().Trim().Equals("JJ"))
|
||
{
|
||
sJJFSMC = "(元)";
|
||
}
|
||
else if (ds.Tables[0].Rows[i]["XLXSTZYZ_JJFS"].ToString().Trim().Equals("MX") || ds.Tables[0].Rows[i]["XLXSTZYZ_JJFS"].ToString().Trim().Equals("DX"))
|
||
{
|
||
sJJFSMC = "(X)";
|
||
}
|
||
else
|
||
{
|
||
sJJFSMC = "(%)";
|
||
}
|
||
cbxYZID.Items.Add(new ListItem(ds.Tables[0].Rows[i]["XLXSTZYZ_YZMC"].ToString().Trim() + sJJFSMC, ds.Tables[0].Rows[i]["XLXSTZYZ_YZID"].ToString().Trim()));
|
||
}
|
||
if (ds.Tables[0].Rows.Count == 1)
|
||
{
|
||
cbxYZID.SelectedValue = ds.Tables[0].Rows[0]["XLXSTZYZ_YZID"].ToString().Trim();
|
||
}
|
||
}
|
||
}
|
||
|
||
#region 控件事件
|
||
|
||
protected void btnQD_Click(object sender, EventArgs e)
|
||
{
|
||
if (cbxYZID.SelectedValue.Trim().Equals(""))
|
||
{
|
||
ShowMessage("请选择待设置的调价因子！");
|
||
return;
|
||
}
|
||
if (fupdPost.FilePath.Equals(""))
|
||
{
|
||
ShowMessage("请选择需要导入的文件！");
|
||
return;
|
||
}
|
||
TDatabase dberp = TContextDatabases.GetDatabase("DBERP");
|
||
TSQL sSQL = new TSQL(dberp);
|
||
try
|
||
{
|
||
lblTitle.Text = "正在导入数据，请稍后...";
|
||
dberp.BeginTrans();
|
||
DataSet aDataExcel = new DataSet();
|
||
if (AppRuntime.BitType == AppBitType.Bit32)
|
||
{
|
||
aDataExcel = XLBJDUtils.ReadFromExcelFile(fupdPost.FilePath, 0, "");
|
||
}
|
||
else // AppBitType.Bit64
|
||
{
|
||
ReadWJ(fupdPost.FilePath, ref aDataExcel);
|
||
}
|
||
ExcelColumnValid(aDataExcel);
|
||
InsertYZZM(dberp, sSQL, aDataExcel);
|
||
dberp.CommitTrans();
|
||
ShowMessage("导入成功！");
|
||
|
||
//执行完毕后刷新父页面并关闭当前页面
|
||
DialogOperationScript dos = new DialogOperationScript(this);
|
||
dos.ClickOwnerButton(PageParam.GetRTrimString("btnRefreshCID"));
|
||
dos.CloseSelf();
|
||
dos.Execute();
|
||
}
|
||
catch (Exception ex)
|
||
{
|
||
lblTitle.Text = "";
|
||
dberp.RollbackTrans();
|
||
ShowMessage(ex.Message);
|
||
}
|
||
finally
|
||
{
|
||
if (!fupdPost.FilePath.Trim().Equals("") && System.IO.File.Exists(fupdPost.FilePath.Trim()))
|
||
System.IO.File.Delete(fupdPost.FilePath.Trim());
|
||
}
|
||
}
|
||
|
||
protected void btnQX_Click(object sender, EventArgs e)
|
||
{
|
||
CloseWindow();
|
||
}
|
||
|
||
#endregion
|
||
|
||
#region 自定义函数
|
||
|
||
private void InsertYZZM(TDatabase dberp, TSQL sSQL, DataSet ds)
|
||
{
|
||
int rrrorNUM = 2;
|
||
foreach (DataRow Row in ds.Tables[0].Rows)
|
||
{
|
||
string sXLXHID = sGetCellTest(Row, 0).Trim();
|
||
string sXLGGID = sGetCellTest(Row, 1).Trim();
|
||
string sDYDJID = sGetCellTest(Row, 2).Trim();
|
||
double dBJSLXX = CMISproConvert.StrToFloat(sGetCellTest(Row, 3), 0);
|
||
double dBJSLSX = CMISproConvert.StrToFloat(sGetCellTest(Row, 4), 0);
|
||
double dYZZ = CMISproConvert.StrToFloat(sGetCellTest(Row, 5), 0);
|
||
if (sXLXHID.Trim().Equals(""))
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行型号为空！");
|
||
}
|
||
if (!CMISproDataBase.ExistsRecord("DBERP", string.Format("select 1 from XLXHB where XLXHB_XLXHID='{0}' and ISNULL(XLXHB_TYBZ,'N') <> 'Y' ", sXLXHID)))
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行型号[" + sXLXHID + "]不存在或已停用！");
|
||
}
|
||
if (sXLGGID.Trim().Equals(""))
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行规格为空！");
|
||
}
|
||
if (sXLGGID.Trim().Length > 60)
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行规格[" + sXLGGID + "]长度超过60个字符！");
|
||
}
|
||
if (!sDYDJID.Trim().Equals("") && !CMISproDataBase.ExistsRecord("DBERP", string.Format("select 1 from XLDYDJB where XLDYDJB_DYDJID='{0}' and ISNULL(XLDYDJB_TYBZ,'N') <> 'Y' ", sDYDJID)))
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行电压等级[" + sDYDJID + "]不存在或已停用！");
|
||
}
|
||
if (dBJSLXX < 0)
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行报价数量下限[" + dBJSLXX + "]不合法！");
|
||
}
|
||
if (dBJSLSX < 0 || (dBJSLSX != 0 && dBJSLXX > dBJSLSX))
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行报价数量上限[" + dBJSLSX + "]不合法，上限为0表示不限制，否则必须大于等于下限！");
|
||
}
|
||
if (ExistsBJSLQJ(dBJSLXX, dBJSLSX, sXLXHID, sXLGGID, sDYDJID))
|
||
{
|
||
throw new Exception("第" + rrrorNUM + "行报价数量区间[" + dBJSLXX + "～" + (dBJSLSX == 0 ? "--" : dBJSLSX.ToString()) + "]与已有记录有交集，不允许导入！");
|
||
}
|
||
|
||
//已存在相同区间记录时更新，否则依选择决定是否插入
|
||
if (CMISproDataBase.ExistsRecord("DBERP", GetExistsSQL(dBJSLXX, dBJSLSX, sXLXHID, sXLGGID, sDYDJID)))
|
||
{
|
||
sSQL.Clear();
|
||
sSQL.Add("update XLXSBJDYZZM set XLXSBJDYZZM_YZZ = :pYZZ,XLXSBJDYZZM_WHR = :pWHR,XLXSBJDYZZM_WHRID =:pWHRID,XLXSBJDYZZM_WHSJ =:pWHSJ ");
|
||
sSQL.Add(" where XLXSBJDYZZM_JGBID=:pJGBID");
|
||
sSQL.Add(" and XLXSBJDYZZM_XLXHID=:pXLXHID");
|
||
sSQL.Add(" and XLXSBJDYZZM_XLGGID=:pXLGGID");
|
||
sSQL.Add(" and XLXSBJDYZZM_DYDJID=:pDYDJID");
|
||
sSQL.Add(" and XLXSBJDYZZM_BJSLSX=:pBJSLSX");
|
||
sSQL.Add(" and XLXSBJDYZZM_BJSLXX=:pBJSLXX");
|
||
sSQL.Add(" and XLXSBJDYZZM_YZID=:pYZID");
|
||
FillKeyParams(sSQL, dBJSLXX, dBJSLSX, sXLXHID, sXLGGID, sDYDJID);
|
||
sSQL.ParamByName("pYZZ").Value = dYZZ;
|
||
sSQL.ParamByName("pWHR").Value = tSession.UserName;
|
||
sSQL.ParamByName("pWHRID").Value = tSession.UserId;
|
||
sSQL.ParamByName("pWHSJ").Value = DateTime.Now;
|
||
dberp.ExecSQL(sSQL);
|
||
}
|
||
else
|
||
{
|
||
if (chkIns.Checked)//不存在的记录自动插入
|
||
{
|
||
sSQL.Clear();
|
||
sSQL.Add("insert into XLXSBJDYZZM(XLXSBJDYZZM_JGBID,XLXSBJDYZZM_XLXHID,XLXSBJDYZZM_XLGGID,XLXSBJDYZZM_DYDJID,XLXSBJDYZZM_BJSLSX,XLXSBJDYZZM_BJSLXX,XLXSBJDYZZM_YZID,XLXSBJDYZZM_YZZ,XLXSBJDYZZM_WHR,XLXSBJDYZZM_WHRID,XLXSBJDYZZM_WHSJ)");
|
||
sSQL.Add(" values(:pJGBID,:pXLXHID,:pXLGGID,:pDYDJID,:pBJSLSX,:pBJSLXX,:pYZID,:pYZZ,:pWHR,:pWHRID,:pWHSJ)");
|
||
FillKeyParams(sSQL, dBJSLXX, dBJSLSX, sXLXHID, sXLGGID, sDYDJID);
|
||
sSQL.ParamByName("pYZZ").Value = dYZZ;
|
||
sSQL.ParamByName("pWHR").Value = tSession.UserName;
|
||
sSQL.ParamByName("pWHRID").Value = tSession.UserId;
|
||
sSQL.ParamByName("pWHSJ").Value = DateTime.Now;
|
||
dberp.ExecSQL(sSQL);
|
||
}
|
||
}
|
||
rrrorNUM++;
|
||
}
|
||
}
|
||
|
||
private void FillKeyParams(TSQL sSQL, double dBJSLXX, double dBJSLSX, string sXLXHID, string sXLGGID, string sDYDJID)
|
||
{
|
||
sSQL.ParamByName("pJGBID").Value = txtJGBID.Value.Trim();
|
||
sSQL.ParamByName("pXLXHID").Value = sXLXHID;
|
||
sSQL.ParamByName("pXLGGID").Value = sXLGGID.Trim().Equals("") ? " " : sXLGGID;
|
||
sSQL.ParamByName("pDYDJID").Value = sDYDJID.Trim().Equals("") ? " " : sDYDJID;
|
||
sSQL.ParamByName("pBJSLSX").Value = dBJSLSX;
|
||
sSQL.ParamByName("pBJSLXX").Value = dBJSLXX;
|
||
sSQL.ParamByName("pYZID").Value = cbxYZID.SelectedValue.Trim();
|
||
}
|
||
|
||
private string GetExistsSQL(double dBJSLXX, double dBJSLSX, string sXLXHID, string sXLGGID, string sDYDJID)
|
||
{
|
||
string sXLGGID_DB = sXLGGID.Trim().Equals("") ? " " : sXLGGID.Replace("'", "''");
|
||
string sDYDJID_DB = sDYDJID.Trim().Equals("") ? " " : sDYDJID.Replace("'", "''");
|
||
return string.Format("select 1 from XLXSBJDYZZM where XLXSBJDYZZM_JGBID='{0}' and XLXSBJDYZZM_YZID='{1}' and XLXSBJDYZZM_XLXHID='{2}'"
|
||
+ " and XLXSBJDYZZM_XLGGID='{3}' and XLXSBJDYZZM_DYDJID='{4}' and XLXSBJDYZZM_BJSLXX={5} and XLXSBJDYZZM_BJSLSX={6}",
|
||
txtJGBID.Value.Trim(), cbxYZID.SelectedValue.Trim(), sXLXHID, sXLGGID_DB, sDYDJID_DB, dBJSLXX, dBJSLSX);
|
||
}
|
||
|
||
//判断同一型号+规格+电压等级+因子的报价数量区间是否与已有记录（非完全相同区间）有交集
|
||
private bool ExistsBJSLQJ(double dBJSLXX, double dBJSLSX, string sXLXHID, string sXLGGID, string sDYDJID)
|
||
{
|
||
string sXLGGID_DB = sXLGGID.Trim().Equals("") ? " " : sXLGGID.Replace("'", "''");
|
||
string sDYDJID_DB = sDYDJID.Trim().Equals("") ? " " : sDYDJID.Replace("'", "''");
|
||
string sSQL_QJ = string.Format("select 1 from XLXSBJDYZZM where XLXSBJDYZZM_JGBID='{0}' and XLXSBJDYZZM_YZID='{1}' and XLXSBJDYZZM_XLXHID='{2}'"
|
||
+ " and XLXSBJDYZZM_XLGGID='{3}' and XLXSBJDYZZM_DYDJID='{4}'"
|
||
+ " and not (XLXSBJDYZZM_BJSLXX={5} and XLXSBJDYZZM_BJSLSX={6})"
|
||
+ " and (({7} = 0) or XLXSBJDYZZM_BJSLXX < {8})"
|
||
+ " and ((XLXSBJDYZZM_BJSLSX = 0) or {9} < XLXSBJDYZZM_BJSLSX)",
|
||
txtJGBID.Value.Trim(), cbxYZID.SelectedValue.Trim(), sXLXHID, sXLGGID_DB, sDYDJID_DB, dBJSLXX, dBJSLSX, dBJSLSX, dBJSLSX, dBJSLXX);
|
||
return CMISproDataBase.ExistsRecord("DBERP", sSQL_QJ);
|
||
}
|
||
|
||
private void ExcelColumnValid(DataSet ds)
|
||
{
|
||
Dictionary<string, string> ColumnNames = new Dictionary<string, string>();
|
||
ColumnNames.Add("0", "型号");
|
||
ColumnNames.Add("1", "规格");
|
||
ColumnNames.Add("2", "电压等级");
|
||
ColumnNames.Add("3", "报价数量下限");
|
||
ColumnNames.Add("4", "报价数量上限");
|
||
ColumnNames.Add("5", cbxYZID.SelectedItem.Text.Trim());
|
||
for (int i = 0; i < 6; i++)
|
||
{
|
||
if (!ds.Tables[0].Columns[i].ColumnName.Trim().Equals(ColumnNames[i.ToString()].Trim()))
|
||
{
|
||
throw new Exception("导入文件的内容格式不正确，Excel栏目依次为：型号、规格、电压等级、报价数量下限、报价数量上限、" + cbxYZID.SelectedItem.Text.Trim() + "！");
|
||
}
|
||
}
|
||
}
|
||
|
||
private void ReadWJ(string sPath, ref DataSet aDataExcel)
|
||
{
|
||
string sMessage = "";
|
||
aDataExcel = TExcelData.ReadExcel(sPath.Trim(), "", "", false, ref sMessage);
|
||
if (!sMessage.Trim().Equals(""))
|
||
{
|
||
throw new Exception("文件读取失败！具体原因：" + sMessage);
|
||
}
|
||
}
|
||
|
||
private string sGetCellTest(DataRow Row, int ColumnIndex)
|
||
{
|
||
return Row[ColumnIndex].ToString().Trim().Replace("\r\n", "").Replace("\n", "");
|
||
}
|
||
|
||
#endregion
|
||
}
|
||
}
|