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.
218 lines
8.8 KiB
218 lines
8.8 KiB
using System;
|
|
using System.Collections.Generic;
|
|
using System.ComponentModel;
|
|
using System.Data;
|
|
using System.Drawing;
|
|
using System.Text;
|
|
using System.Windows.Forms;
|
|
using DevExpress.XtraEditors;
|
|
using ICSSoft.Frame.WorkPoint.Entity;
|
|
using ICSSoft.Frame.WorkPoint.BLL;
|
|
using ICSSoft.Base.Config.AppConfig;
|
|
using ICSSoft.Base.Config.DBHelper;
|
|
using System.Text.RegularExpressions;
|
|
using ICSSoft.Frame.Data.BLL;
|
|
using ICSSoft.Frame.Data.Entity;
|
|
using ICSSoft.Frame.Helper;
|
|
using ICSSoft.Base.ReferForm.AppReferForm;
|
|
|
|
namespace ICSSoft.Frame.APP
|
|
{
|
|
public partial class FormTBLROUTE2OPAdd : DevExpress.XtraEditors.XtraForm
|
|
{
|
|
ICSROUTE2OP personInfo;
|
|
int flag;
|
|
string ROUTEID;
|
|
|
|
public FormTBLROUTE2OPAdd(string routeid, string routecode)
|
|
{
|
|
InitializeComponent();
|
|
flag = 0;
|
|
Init();
|
|
txtUser.Text = AppConfig.UserCode;
|
|
txtUseTime.Text = DateTime.Now.ToString();
|
|
txtRouteId.Text = routeid;
|
|
txtRouteCode.Text = routecode;
|
|
}
|
|
|
|
#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
|
|
|
|
private void btnClose_Click(object sender, EventArgs e)
|
|
{
|
|
this.Close();
|
|
}
|
|
|
|
private void btnCancle_Click(object sender, EventArgs e)
|
|
{
|
|
this.Close();
|
|
this.DialogResult = DialogResult.Cancel;
|
|
}
|
|
|
|
private void btnOK_Click(object sender, EventArgs e)
|
|
{
|
|
int m = 0;
|
|
int j = 0;
|
|
char[] c = { '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0' };
|
|
DataTable person = ICSTBLROUTE2OPBLL.SearchPersonInfoByCode(txtRouteId.Text, AppConfig.AppConnectString);
|
|
Regex rex = new Regex(@"^\d+$");
|
|
for (int i = 0; i < person.Rows.Count; i++)
|
|
{
|
|
if (person.Rows[i][0].ToString() == txtTbLSeq.Text)
|
|
{
|
|
m++;
|
|
}
|
|
if (person.Rows[i][1].ToString() == txtOpId.Text)
|
|
{
|
|
j++;
|
|
}
|
|
}
|
|
if (txtOpId.Text == "" || txtOpCode.Text == "" || txtTbLSeq.Text == "")
|
|
{
|
|
ICSBaseSimpleCode.AppshowMessageBox("不可为空!");
|
|
}
|
|
else if (!rex.Match(txtTbLSeq.Text).Success)
|
|
{
|
|
ICSBaseSimpleCode.AppshowMessageBox("工序次序只能是正整数!");
|
|
}
|
|
else if (m != 0)
|
|
{
|
|
ICSBaseSimpleCode.AppshowMessageBox("[工序次序]在该途程中已存在!");
|
|
}
|
|
else if (j != 0)
|
|
{
|
|
ICSBaseSimpleCode.AppshowMessageBox("该[工序]在该途程中已存在!");
|
|
}
|
|
else
|
|
{
|
|
try
|
|
{
|
|
for (int i = 0; i < checkedListBoxOPControl.Items.Count; i++)
|
|
{
|
|
if (checkedListBoxOPControl.GetItemChecked(i))
|
|
c[i] = '1';
|
|
else
|
|
c[i] = '0';
|
|
}
|
|
string OPControl = new string(c);
|
|
ICSROUTE2OP personInfo = new ICSROUTE2OP();
|
|
personInfo.ROUTEID = txtRouteId.Text;
|
|
personInfo.OPID = txtOpId.Text;
|
|
personInfo.ROUTECODE = txtRouteCode.Text;
|
|
personInfo.OPCODE = txtOpCode.Text;
|
|
personInfo.OPSEQ = int.Parse(txtTbLSeq.Text);
|
|
personInfo.OPCONTROL = OPControl;
|
|
personInfo.MUSER = AppConfig.UserCode;
|
|
personInfo.MUSERName = AppConfig.UserName;
|
|
personInfo.MTIME = System.DateTime.Parse(txtUseTime.Text);
|
|
personInfo.WORKPOINT = AppConfig.WorkPointCode;
|
|
ICSTBLROUTE2OPBLL.Add(personInfo, AppConfig.AppConnectString);
|
|
}
|
|
catch (Exception ex)
|
|
{
|
|
ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
|
|
}
|
|
this.Close();
|
|
this.DialogResult = DialogResult.Yes;
|
|
}
|
|
}
|
|
|
|
private void btnShift_ButtonClick(object sender, DevExpress.XtraEditors.Controls.ButtonPressedEventArgs e)
|
|
{
|
|
txtOpCode.Text = "";
|
|
ButtonEdit btn = (ButtonEdit)sender;
|
|
string sql = @"select OPCODE as [工序代码],OPDESC as [描述],OPCONTROL as [工序类型],ID as [工序ID]
|
|
from dbo.ICSOP where WorkPoint='" + AppConfig.WorkPointCode + "'";
|
|
sql = string.Format(sql);
|
|
DataTable data = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, sql).Tables[0];
|
|
FormDataRefer reForm = new FormDataRefer();
|
|
reForm.FormTitle = "工序信息";
|
|
DataTable menuData = data;
|
|
reForm.DataSource = menuData;
|
|
reForm.MSelectFlag = false;
|
|
reForm.RowIndexWidth = 35;
|
|
reForm.HideCols.Add("工序ID");
|
|
reForm.FormWidth = 800;
|
|
reForm.FormHeight = 600;
|
|
reForm.FilterKey = btn.Text;
|
|
if (reForm.ShowDialog() == DialogResult.OK)
|
|
{
|
|
DataTable retData = reForm.ReturnData;
|
|
foreach (DataRow dr in retData.Rows)
|
|
{
|
|
txtOpId.Text = dr["工序ID"].ToString();
|
|
txtOpCode.Text = dr["工序代码"].ToString();
|
|
|
|
string OPControl = dr["工序类型"].ToString();
|
|
char[] c = OPControl.ToCharArray();
|
|
try
|
|
{
|
|
for (int i = 0; i < c.Length; i++)
|
|
{
|
|
if (c[i].Equals('1'))
|
|
checkedListBoxOPControl.SetItemChecked(i, true);
|
|
else
|
|
checkedListBoxOPControl.SetItemChecked(i, false);
|
|
}
|
|
}
|
|
catch (Exception ex)
|
|
{
|
|
throw ex;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
public void Init()
|
|
{
|
|
checkedListBoxOPControl.Items.Add("OP_componentloading", "1.上料工序");
|
|
checkedListBoxOPControl.Items.Add("OP_testing", "2.测试工序");
|
|
checkedListBoxOPControl.Items.Add("OP_idtranslate", "3.序号转换工序");
|
|
checkedListBoxOPControl.Items.Add("OP_packing", "4.包装工序");
|
|
checkedListBoxOPControl.Items.Add("OP_oqc", "5.OQC工序");
|
|
checkedListBoxOPControl.Items.Add("OP_ts", "6.维修工序");
|
|
checkedListBoxOPControl.Items.Add("OP_spc", "7.SPC工序");
|
|
|
|
|
|
checkedListBoxOPControl.Items.Add("OP_deduct", "8.扣料工序");
|
|
checkedListBoxOPControl.Items.Add("OP_midistoutput", "9.中间产量工序");
|
|
checkedListBoxOPControl.Items.Add("OP_midistinput", "10.中间投入工序");
|
|
checkedListBoxOPControl.Items.Add("OP_ComponentDown", "11.下料工序");
|
|
checkedListBoxOPControl.Items.Add("OP_BurnIn", "12.Burn In工序");
|
|
checkedListBoxOPControl.Items.Add("OP_BurnOut", "13.Burn Out工序");
|
|
checkedListBoxOPControl.Items.Add("OP_Offline", "14.下线工序");
|
|
}
|
|
}
|
|
}
|