锐腾搅拌上料功能
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

661 lines
26 KiB

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Data.Linq;
using System.Linq;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using DevExpress.XtraEditors;
using DevExpress.XtraGrid.Views.BandedGrid;
using DevExpress.XtraGrid.Columns;
using DevExpress.XtraGrid;
using System.IO;
using System.Threading;
using ICSSoft.Base.Language.Tool;
using ICSSoft.Base.Config.AppConfig;
using ICSSoft.Base.UserControl.MessageControl;
using ICSSoft.Base.Config.DBHelper;
using ICSSoft.Base.Report.Filter;
using ICSSoft.Base.UserControl.FormControl;
using ICSSoft.Base.Report.GridReport;
using ICSSoft.Base.ReferForm.AppReferForm;
using ICSSoft.Frame.Data.BLL;
using ICSSoft.Frame.Data.Entity;
using ICSSoft.Frame.Data.DAL;
namespace ICSSoft.Frame.APP
{
public partial class FormPhysicalInventoryERP : DevExpress.XtraEditors.XtraForm
{
private string sqltxt = "";
private string sqlconn = "";
string path = "";
List<string> barList = new List<string>();
string errorBar = "";
String guid = AppConfig.GetGuid();
private DataTable dataSource = null;
private DataTable BodySource = null;
DataSet ds = new DataSet();
DataTable HandDt;
DataTable BodyDt;
#region 构造函数
public FormPhysicalInventoryERP()
{
InitializeComponent();
this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
this.WindowState = FormWindowState.Maximized;
}
#endregion
#region SystemOptition
/// <summary>
/// 操作权限
/// </summary>
/// <returns></returns>
public DataTable RightOfExute()
{
DataTable rData = new DataTable();
rData.Columns.Add("BtnName");
rData.Columns.Add("ActionName");
//查看权限(必须有)
DataRow seeRow = rData.NewRow();
seeRow["BtnName"] = "see";
seeRow["ActionName"] = "查看";
rData.Rows.Add(seeRow);
List<Control> ControlList = new List<Control>();
//ControlList.Add(btnCreate);
ControlList.Add(simpleButton1);
ControlList.Add(btnERPQty);
ControlList.Add(btnDel);
ControlList.Add(btnOutPut);
ControlList.Add(btnCheckIn);
foreach (Control ctr in ControlList)
{
if (ctr.GetType() == typeof(SimpleButton))
{
DataRow dr = rData.NewRow();
dr["BtnName"] = ctr.Name;
dr["ActionName"] = ctr.Text;
rData.Rows.Add(dr);
}
}
rData.AcceptChanges();
return rData;
}
/// <summary>
/// 数据权限
/// </summary>
/// <returns></returns>
public DataTable RightOfData()
{
DataTable rData = new DataTable();
rData.Columns.Add("BodyName");
rData.Columns.Add("ControlName");
rData.Columns.Add("ControlCaption");
rData.AcceptChanges();
return rData;
}
#endregion
#region 退出
private void btnClose_Click(object sender, EventArgs e)
{
AppConfig.CloseFormShow(this.Text);
this.Close();
}
private void btnExit_Click(object sender, EventArgs e)
{
AppConfig.CloseFormShow(this.Text);
this.Close();
}
#endregion
#region 移动窗体
private const int WM_NCHITTEST = 0x84;
private const int HTCLIENT = 0x1;
private const int HTCAPTION = 0x2;
//首先必须了解Windows的消息传递机制,当有鼠标活动消息时,
//系统发送WM_NCHITTEST 消息给窗体作为判断消息发生地的根据。 nchittest
//假如你点击的是标题栏,窗体收到的消息值就是 HTCAPTION ,
//同样地,若接受到的消息是 HTCLIENT,说明用户点击的是客户区,也就是鼠标消息发生在客户区。
//重写窗体,使窗体可以不通过自带标题栏实现移动
protected override void WndProc(ref Message m)
{
//当重载窗体的 WndProc 方法时,可以截获 WM_NCHITTEST 消息并改些该消息,
//当判断鼠标事件发生在客户区时,改写改消息,发送 HTCAPTION 给窗体,
//这样,窗体收到的消息就时 HTCAPTION ,在客户区通过鼠标来拖动窗体就如同通过标题栏来拖动一样。
//注意:当你重载 WndProc 并改写鼠标事件后,整个窗体的鼠标事件也就随之改变了。
switch (m.Msg)
{
case WM_NCHITTEST:
base.WndProc(ref m);
if ((int)m.Result == HTCLIENT)
m.Result = (IntPtr)HTCAPTION;
return;
}
//拦截双击标题栏、移动窗体的系统消息
if (m.Msg != 0xA3)
{
base.WndProc(ref m);
}
}
#endregion
#region 过滤
private string tempTableName = "";
private void btnFilter_Click(object sender, EventArgs e)
{
FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name));
filter.OldTempTableName = tempTableName;
if (filter.ShowDialog() == DialogResult.OK)
{
DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
try
{
_wait.Show();
BodyDt = null;
BodySource = null;
ds.Reset();
tempTableName = filter.NewTempTableName;
sqltxt = filter.SqlText;
sqlconn = filter.FilterConnectString;
dataSource = filter.FilterData.Tables[0];
DataSet Hset = new DataSet();
dataSource.TableName = "Hsource";
DataTable Hsource = dataSource.Copy();
Hset.Tables.Add(Hsource);
DataTable Hdt = dataSource.Copy();
Hdt.Clear();
BodySource = FormPhysicalInventoryBLL.FindAll(AppConfig.AppConnectString);
DataSet Bset = new DataSet();
dataSource.TableName = "Bsource";
DataTable Bsource = BodySource.Copy();
Bset.Tables.Add(Bsource);
DataTable Bdt = BodySource.Copy();
Bdt.Clear();
DataSet dset = dataSetTool(Hdt, Bdt);
dataSource = filter.FilterData.Tables[0];
foreach (DataRow row in Hset.Tables[0].Rows)
{
dset.Tables["Hand"].Rows.Add(row.ItemArray);
}
foreach (DataRow row in Bset.Tables[0].Rows)
{
dset.Tables["Body"].Rows.Add(row.ItemArray);
}
grdDetail.DataSource = dset.Tables["Hand"];
grvDetail.BestFitColumns();
gridView1.BestFitColumns();
rptPage.RecordNum = dataSource.Rows.Count;
rptPage.PageSize = 499;
rptPage.PageIndex = 1;
rptPage.ReLoad();
rptPage.PageSize = 500;
rptPage.PageIndex = 1;
//rptPage.ReLoad();
_wait.Close();
}
catch (Exception ex)
{
MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
_wait.Close();
}
}
}
#endregion
#region dataSet绑定
private DataSet dataSetTool(DataTable hand,DataTable body)
{
DataColumn[] relations_dt, relations_ds;
hand.TableName = "Hand";
body.TableName = "Body";
HandDt = hand.Copy();
BodyDt = body.Copy();
ds.Tables.Add(HandDt);
ds.Tables.Add(BodyDt);
relations_dt = new DataColumn[] { ds.Tables["Hand"].Columns["ItemCode"], ds.Tables["Hand"].Columns["ToCheckNO"],ds.Tables["Hand"].Columns["StorageCode"] };
relations_ds = new DataColumn[] { ds.Tables["Body"].Columns["ItemCode"], ds.Tables["Body"].Columns["ToCheckNO"], ds.Tables["Body"].Columns["StorageCode"] };
ds.Relations.Add("详情", relations_dt, relations_ds);
return ds;
}
#endregion
#region 绑定数据源
private void btnConfig_Click(object sender, EventArgs e)
{
if (AppConfig.UserCode.ToLower() != "demo")
{
ICSBaseSimpleCode.AppshowMessageBox("您没有权限设置数据源,请联系软件提供商!");
return;
}
FormDataSource fdata = new FormDataSource(AppConfig.GetMenuId(this.Tag.ToString()), btnConfig.Name);
fdata.ShowDialog();
}
#endregion
#region 分页
private void rptPage_PageIndexChanged(object Sender, EventArgs e)
{
DataTable data = AppConfig.GetPageData(dataSource, rptPage.PageIndex, rptPage.PageSize).Copy();
//DataTable data = AppConfig.GetPageDataByDb(tempTableName, "pagerowindex", rptPage.PageSize, rptPage.PageIndex, dataSource.Rows.Count);
grdDetail.DataSource = data;
}
#endregion
#region 过滤方法
private void FormContainerManager_FormClosing(object sender, FormClosingEventArgs e)
{
AppConfig.DropTemTable(tempTableName);
}
#endregion
#region 全选
private void btnSelectAll_Click(object sender, EventArgs e)
{
grvDetail.PostEditor();
this.Validate();
for (int i = 0; i < grvDetail.RowCount; i++)
{
grvDetail.SetRowCellValue(i, colSelect, "Y");
}
}
#endregion
#region 全消
private void btnCancelAll_Click(object sender, EventArgs e)
{
grvDetail.PostEditor();
this.Validate();
for (int i = 0; i < grvDetail.RowCount; i++)
{
grvDetail.SetRowCellValue(i, colSelect, "");
}
}
#endregion
#region 双击
private void grvDetail_DoubleClick(object sender, EventArgs e)
{
if (grvDetail.FocusedRowHandle < 0)
{
return;
}
if (grvDetail.FocusedColumn == colSelect)
{
if (grvDetail.GetRowCellValue(grvDetail.FocusedRowHandle, colSelect).ToString() == "")
{
grvDetail.SetRowCellValue(grvDetail.FocusedRowHandle, colSelect, "Y");
}
else
{
grvDetail.SetRowCellValue(grvDetail.FocusedRowHandle, colSelect, "");
}
}
}
#endregion
#region 删除
private void btnDel_Click(object sender, EventArgs e)
{
grvDetail.PostEditor();
this.Validate();
if (grvDetail.RowCount == 0)
return;
SimpleButton btntemp = (SimpleButton)sender;
if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
{
ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
}
string ItemNO = "";
for (int i = 0; i < grvDetail.RowCount; i++)
{
if (grvDetail.GetRowCellValue(i, colSelect).ToString() == "Y")
{
ItemNO = grvDetail.GetRowCellValue(i, ToCheckNO).ToString();
break;
}
}
if (ItemNO == "")
{
ICSBaseSimpleCode.AppshowMessageBox("请选择数据!");
return;
}
if (ICSBaseSimpleCode.AppshowMessageBoxRepose("确定删除该单据吗?单据删除后无法恢复,确定吗?") != DialogResult.OK)
return;
try
{
FormPhysicalInventoryBLL.delete(ItemNO, AppConfig.AppConnectString);
ICSBaseSimpleCode.AppshowMessageBox(0, "删除成功");
btnRefresh_Click(null, null);
}
catch (Exception ex)
{
ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
}
}
#endregion
#region 导出
private void btnOutPut_Click(object sender, EventArgs e)
{
SimpleButton btntemp = (SimpleButton)sender;
if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
{
ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
}
FormOutExcel foe = new FormOutExcel(this.Tag.ToString(), grdDetail);
foe.ShowDialog();
}
#endregion
#region 刷新
private void btnRefresh_Click(object sender, EventArgs e)
{
DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
try
{
_wait.Show();
BodyDt = null;
BodySource = null;
ds.Reset();
FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name), false);
filter.OldTempTableName = tempTableName;
//tempTableName = filter.NewTempTableName;
//DataTable data = DBHelper.ExecuteDataset(AppConfig.FrameConnectString, CommandType.Text, "select * from " + tempTableName).Tables[0];
dataSource = DBHelper.ExecuteDataset(sqlconn, CommandType.Text, sqltxt).Tables[0];
DataSet Hset = new DataSet();
dataSource.TableName = "Hsource";
DataTable Hsource = dataSource.Copy();
Hset.Tables.Add(Hsource);
DataTable Hdt = dataSource.Copy();
Hdt.Clear();
BodySource = FormPhysicalInventoryBLL.FindAll(AppConfig.AppConnectString);
DataSet Bset = new DataSet();
dataSource.TableName = "Bsource";
DataTable Bsource = BodySource.Copy();
Bset.Tables.Add(Bsource);
DataTable Bdt = BodySource.Copy();
Bdt.Clear();
DataSet dset = dataSetTool(Hdt, Bdt);
dataSource = filter.FilterData.Tables[0];
foreach (DataRow row in Hset.Tables[0].Rows)
{
dset.Tables["Hand"].Rows.Add(row.ItemArray);
}
foreach (DataRow row in Bset.Tables[0].Rows)
{
dset.Tables["Body"].Rows.Add(row.ItemArray);
}
grdDetail.DataSource = dset.Tables["Hand"];
grvDetail.BestFitColumns();
gridView1.BestFitColumns();
rptPage.RecordNum = dataSource.Rows.Count;
rptPage.PageIndex = 1;
//rptPage.ReLoad();
_wait.Close();
}
catch (Exception ex)
{
MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
_wait.Close();
}
}
#endregion
#region 更新U8实盘数
private void btnCreate_Click(object sender, EventArgs e)
{
SimpleButton btntemp = (SimpleButton)sender;
if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
{
ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
return;
}
try
{
CheckContext context = new CheckContext();
context.UserName = AppConfig.UserName;
context.ERPDataName = ICSBaseSimpleCode.GetWorkPointErpData();
int count = 0;
for (int i = 0; i < grvDetail.RowCount; i++)
{
if (grvDetail.GetRowCellValue(i, colSelect).ToString() == "Y")
{
count++;
context.ckNO = grvDetail.GetRowCellValue(i, ToCheckNO).ToString();
context.whCode = grvDetail.GetRowCellValue(i, colStorageCode).ToString();
context.itemCode = grvDetail.GetRowCellValue(i, ItemCode).ToString();
}
}
if (count != 1)
{
ICSBaseSimpleCode.AppshowMessageBox("请选择数据,且只能选择一条进行更新!!!");
return;
}
FormPhysicalInventoryBLL.ERPCheckVouch(context, AppConfig.AppConnectString);
}
catch (Exception ex)
{
ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
}
}
#endregion
#region 修改
private void btnModify_Click(object sender, EventArgs e)
{
String id = "";
SimpleButton btntemp = (SimpleButton)sender;
if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
{
ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
}
List<string> editList = new List<string>();
List<string> guidList1 = new List<string>();
for (int i = 0; i < grvDetail.RowCount; i++)
{
if (grvDetail.GetRowCellValue(i, colSelect).ToString() == "Y")
{
id = grvDetail.GetRowCellValue(i, colSerial).ToString();
editList.Add(id);
}
}
if (editList.Count != 1)
{
ICSBaseSimpleCode.AppshowMessageBox("请选择数据,且只能选择一条进行编辑!!!");
return;
}
try
{
FormPhysicalInventoryAdd add = new FormPhysicalInventoryAdd(id);
add.ShowDialog();
btnRefresh_Click(null, null);
}
catch (Exception ex)
{
ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
}
}
#endregion
private void FormICSItemLot_FormClosing(object sender, FormClosingEventArgs e)
{
AppConfig.DropTemTable(tempTableName);
}
private void FormICSItemLot_Load(object sender, EventArgs e)
{
btnFilter_Click(sender, e);
}
private void grvDetail_MasterRowExpanded(object sender, DevExpress.XtraGrid.Views.Grid.CustomMasterRowEventArgs e)
{
DevExpress.XtraGrid.Views.Grid.GridView aView = grvDetail.GetDetailView(e.RowHandle, e.RelationIndex) as DevExpress.XtraGrid.Views.Grid.GridView;
}
private void gridView1_MasterRowExpanded(object sender, DevExpress.XtraGrid.Views.Grid.CustomMasterRowEventArgs e)
{
DevExpress.XtraGrid.Views.Grid.GridView aView = grvDetail.GetDetailView(e.RowHandle, e.RelationIndex) as DevExpress.XtraGrid.Views.Grid.GridView;
}
private void btnCheckIn_Click(object sender, EventArgs e)
{
SimpleButton btntemp = (SimpleButton)sender;
if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
{
ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
return;
}
FormPhysicalInventoryCheck add = new FormPhysicalInventoryCheck();
add.ShowDialog();
btnRefresh_Click(null, null);
}
private void btnIN_Click(object sender, EventArgs e)
{
DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
try {
_wait.Show();
barList.Clear();
path = Application.StartupPath + @"\盘点条码.txt";
if (!File.Exists(path))
{
ICSBaseSimpleCode.AppshowMessageBox(path + "文件不存在!!");
return;
}
StreamReader sr = new StreamReader(path, Encoding.Default);
string line;
while ((line = sr.ReadLine()) != null)
{
if (line != "" && line != "\r\n")
{
string barCode = line.Substring(line.IndexOf(": ") + 2);
if (barCode.Substring(0, 1) != "M" && barCode.Substring(0, 1) != "B")
{
continue;
}
string CSql = @"SELECT BarCode FROM [dbo].ICSMOBarCode WHERE BarCode = '" + barCode + "'";
DataTable MDt = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, CSql).Tables[0];
CSql = @"SELECT BarCode FROM [dbo].ICSStockBarCode WHERE BarCode = '" + barCode + "'";
DataTable BDt = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, CSql).Tables[0];
if ((MDt == null || MDt.Rows.Count == 0) && (BDt == null || BDt.Rows.Count == 0))
{
errorBar += barCode + "\r\n";
}
else
{
if (!barList.Contains(barCode))
{
barList.Add(barCode);
}
}
}
}
ICSStorageInfoBLL.import(barList);
_wait.Close();
ICSBaseSimpleCode.AppshowMessageBox("导入成功");
sr.Close();
ICSBaseSimpleCode.AppshowMessageBox(barList.Count.ToString());
FileStream fs = new FileStream(path, FileMode.Create);
//获得字节数组
byte[] data = System.Text.Encoding.Default.GetBytes(errorBar);
//开始写入
fs.Write(data, 0, data.Length);
//清空缓冲区、关闭流
fs.Flush();
fs.Close();
}catch(Exception ex){
_wait.Close();
ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
}
}
private void simpleButton1_Click(object sender, EventArgs e)
{
SimpleButton btntemp = (SimpleButton)sender;
if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
{
ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
return;
}
try
{
string sql = @"UPDATE [dbo].[ICSToCheck]
SET ItemCode = b.cInvCode,ItemName = d.cInvName,CurrentQty = c.qty,
StorageCode = a.cWhCode
FROM {0}.dbo.CheckVouch a
INNER JOIN {0}.dbo.CheckVouchs b ON a.ID = b.ID
INNER JOIN (SELECT cWhCode,cInvCode,SUM(iQuantity) AS qty FROM {0}.dbo.CurrentStock GROUP BY cInvCode,cWhCode) c
ON b.cInvCode = c.cInvCode AND a.cWhCode = c.cWhCode
INNER JOIN {0}.dbo.Inventory d ON b.cInvCode = d.cInvCode
LEFT JOIN [dbo].[ICSToCheck] e
ON a.cCVCode = e.ToCheckNO AND a.cWhCode = e.StorageCode AND b.cInvCode = e.ItemCode
WHERE e.ToCheckNO IS NOT NULL AND e.cFree1 <> a.dnmodifytime
INSERT INTO [dbo].[ICSToCheck]
([Serial],[ToCheckNO],[ToCheckDate],[ItemCode],[ItemName]
,[CurrentQty],[ActualQty],[Muser],[MuserName],[Mtime]
,[WorkPoint],[cFree1],[ItemType],[CheckSource],[StorageCode])
SELECT NEWID(),a.cCVCode ,dCVDate,b.cInvCode,d.cInvName,c.qty,'0',
a.cMaker,a.cMaker,GETDATE(),'{1}',a.dnmodifytime,'','ERP',a.cWhCode FROM {0}.dbo.CheckVouch a
INNER JOIN {0}.dbo.CheckVouchs b ON a.ID = b.ID
INNER JOIN (SELECT cWhCode,cInvCode,SUM(iQuantity) AS qty FROM {0}.dbo.CurrentStock GROUP BY cInvCode,cWhCode) c
ON b.cInvCode = c.cInvCode AND a.cWhCode = c.cWhCode
INNER JOIN {0}.dbo.Inventory d ON b.cInvCode = d.cInvCode
LEFT JOIN [dbo].[ICSToCheck] e
ON a.cCVCode = e.ToCheckNO AND a.cWhCode = e.StorageCode AND b.cInvCode = e.ItemCode
WHERE e.ToCheckNO IS NULL
";
sql = string.Format(sql, ICSBaseSimpleCode.GetWorkPointErpData(), AppConfig.WorkPointCode);
DBHelper.ExecuteNonQuery(AppConfig.AppConnectString, CommandType.Text, sql);
ICSBaseSimpleCode.AppshowMessageBox("同步成功");
}
catch (Exception ex)
{
ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
}
}
}
}