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
9.1 KiB
218 lines
9.1 KiB
using System;
|
|
|
|
using System.Data;
|
|
using System.Drawing;
|
|
using System.Windows.Forms;
|
|
using ICSSoft.Base.Config.AppConfig;
|
|
using ICSSoft.Base.Config.DBHelper;
|
|
|
|
namespace ICSSoft.Frame.APP
|
|
{
|
|
public partial class FormICSMO2SendSearchNew : DevExpress.XtraEditors.XtraForm
|
|
{
|
|
private string sqltxt = "";
|
|
private string sqlconn = "";
|
|
String guid = AppConfig.GetGuid();
|
|
private DataTable dataSource = null;
|
|
|
|
public FormICSMO2SendSearchNew()
|
|
{
|
|
InitializeComponent();
|
|
this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
|
|
this.WindowState = FormWindowState.Maximized;
|
|
textBoxCode.Text = AppConfig.UserCode;
|
|
textBoxName.Text = AppConfig.UserName;
|
|
}
|
|
|
|
|
|
#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 操作权限
|
|
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);
|
|
|
|
rData.AcceptChanges();
|
|
return rData;
|
|
}
|
|
public DataTable RightOfData()// 数据权限
|
|
{
|
|
DataTable rData = new DataTable();
|
|
rData.Columns.Add("BodyName");
|
|
rData.Columns.Add("ControlName");
|
|
rData.Columns.Add("ControlCaption");
|
|
|
|
rData.AcceptChanges();
|
|
return rData;
|
|
}
|
|
#endregion
|
|
|
|
private void btnFilter_Click(object sender, EventArgs e)
|
|
{
|
|
Search();
|
|
}
|
|
|
|
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();
|
|
}
|
|
|
|
private void Search()
|
|
{
|
|
string code = textBoxCode.Text;
|
|
#region sql语句原型
|
|
//string sql = string.Format(@"
|
|
//select eqpname as 设备型号,
|
|
//C.ProjectCode AS 项目号,
|
|
//C.MOCODE AS 生产订单号,
|
|
//G.ROUTECODE as 途程编码,
|
|
//A.OPCODE,
|
|
//B.LOTSEQ AS 行号,
|
|
// A.LOTNO AS 产品跟踪单号,
|
|
//C.ITEMCODE AS 料品编码,
|
|
//d.ItemName as 料品名称,
|
|
//D.ItemStd AS 规格型号,
|
|
// G.OPSEQ AS 工序次序,
|
|
//h.opseq as 上一工序次序,
|
|
//I.OPCODE AS 上一工序编码,
|
|
//i.OPNAME as 上一工序,
|
|
//e.OPNAME as 工序名称,
|
|
//q.OPNAME as 当前工序,
|
|
//ww.begindate,
|
|
//ww.enddate,
|
|
//b.lotqty as 数量,
|
|
//P.STIME AS 单件工时,
|
|
// CONVERT(DECIMAL(10,2),P.STIME*B.LOTQTY/60 ) AS 预估加工工时,
|
|
//A.SendPlanDate AS 派工时间,
|
|
//MOPLANSTARTDATE AS 预计开工时间,
|
|
//MOPLANENDDATE AS 预计完工时间,
|
|
|
|
//dbo.GetOpStatus(A.LOTNO,A.OPCODE,G.ROUTECODE,I.OPCODE ) as 状态
|
|
|
|
//FROM ICSMO2User A
|
|
//LEFT JOIN ICSMO2LOT B ON B.LOTNO=A.LOTNO
|
|
//LEFT JOIN ICSMO C ON C.MOCODE=B.MOCODE
|
|
//left join Base_Inventory d on d.ItemCode=C.ITEMCODE
|
|
//LEFT JOIN ICSMO2ROUTE F on F.MOCODE = a.MOCODE AND F.ROUTECODE=A.RouteCode
|
|
//left join icsroute2op G on G.ROUTECODE = F.ROUTECODE AND G.OPCODE=A.OPCODE
|
|
//left join ICSOP E on A.OPCODE=E.OPCODE
|
|
//left JOIN ICSLOTONWIP WW ON WW.LOTNO=A.LOTNO AND WW.OPCODE=A.OPCODE and ww.ACTION='good'
|
|
//left join (select * from icsroute2op )H on h.ROUTECODE=f.ROUTECODE and h.OPSEQ=(select max(opseq) from icsroute2op where icsroute2op.ROUTECODE=h.ROUTECODE and icsroute2op.opseq<g.OPSEQ)
|
|
//left join (select * from ICSOP) i on i.OPCODE=h.OPCODE
|
|
//left join ICSEQPSTPEMODEL p ON P.ITEMCODE=C.ITEMCODE AND P.OPCODE=A.OPCODE AND P.EQPCODE=G.MainResources
|
|
//left join (select ICSLOTSIMULATION.opcode,opname,lotno,BeginDate,EndDate from ICSLOTSIMULATION left join icsop on icsop.OPCODE=ICSLOTSIMULATION.OPCODE) q on q.lotno=a.lotno
|
|
//where usercode='{0}'
|
|
//AND NOT EXISTS(SELECT 1 FROM ICSLOTONWIP ww where ww.lotno=A.LOTNO AND isnull(ww.EndTime,'')!=''and ww.opcode=A.OPCODE)
|
|
//ORDER BY A.LOTNO"
|
|
//,
|
|
//code);
|
|
#endregion
|
|
|
|
#region 新的sql
|
|
string sql = string.Format(@"
|
|
|
|
select
|
|
A.eqpname as 设备型号,
|
|
C.MOCODE AS 生产订单号,
|
|
A.MOSEQ AS 行号,
|
|
B.LOTNO AS 产品跟踪单号,
|
|
C.ITEMCODE AS 料品编码,
|
|
d.INVNAME as 料品名称,
|
|
d.invstd AS 规格型号,
|
|
'' as 图号, --图号
|
|
G.OPSEQ AS 工序次序,
|
|
e.OPDESC as 工序名称,
|
|
--P.STIME AS 单间工时,
|
|
0 AS 单间工时,
|
|
B.LOTQTY as 数量,
|
|
--CONVERT(DECIMAL(10,2),P.STIME*B.LOTQTY/60 ) AS 预估加工耗时,
|
|
A.mtime AS 派工时间,
|
|
A.STARTPLANDATE AS 预计开工时间,
|
|
A.ENDPLANDATE AS 预计完工时间,
|
|
case
|
|
when ww.ACTIONRESULT is null and G.OPSEQ=(select min(OPSEQ) from ICSITEMROUTE2OPLot where lotno=a.LOTNO) then '未开工'
|
|
when ww.actionresult='COLLECT_BEGIN' then '生产中'
|
|
when ww1.actionresult='COLLECT_BEGIN' or (check1.result<>'合格' or check1.Result is null) then '未到达'
|
|
when ((ww1.actionresult='COLLECT_END' and check1.result='合格') OR (WW1.ACTIONRESULT IS NULL)) and ww.actionresult is null then '未开工'
|
|
END AS 状态,
|
|
G.OPTIONALOP as 单间工时,
|
|
case
|
|
when G.OPTIONALOP='' or G.OPTIONALOP is null then null
|
|
else CONVERT(DECIMAL(10,2),CONVERT(DECIMAL,h.OPTIONALOP)*B.LOTQTY/60 )
|
|
end AS 预估加工耗时
|
|
FROM ICSMO2User A
|
|
LEFT JOIN ICSITEMLot B ON B.LOTNO=A.LOTNO
|
|
left JOIN ICSMO C ON C.MOCODE=A.MOCODE AND c.MOSEQ=a.MOSEQ
|
|
left join ICSINVENTORY d on d.INVCODE=C.ITEMCODE
|
|
left join ICSOP E on A.OPCODE=E.OPCODE
|
|
left JOIN ICSMO2ROUTE F on F.MOCODE = a.MOCODE AND F.ROUTECODE=A.RouteCode
|
|
left join ICSITEMROUTE2OPlot G on G.lotno = a.lotno AND G.routecode=A.routecode and g.opcode=a.opcode
|
|
left JOIN ICSLOTONWIP WW ON WW.LOTNO=A.LOTNO and WW.OPCODE=A.OPCODE
|
|
left join (select * from ICSITEMROUTE2OPlot )H on h.lotno=a.lotno and h.OPSEQ=(select max(opseq) from ICSITEMROUTE2OPlot where ICSITEMROUTE2OPlot.lotno=h.lotno and ICSITEMROUTE2OPlot.opseq<g.OPSEQ)
|
|
left join ICSLOTONWIP WW1 on ww1.lotno=a.lotno and ww1.opcode=H.opcode
|
|
left join ICSLOTONWIPCheck check1 on check1.onwipid=ww1.id
|
|
left join ICSOP i on i.OPCODE=h.OPCODE
|
|
left join (select ICSLOTSIMULATION.opcode,opname,lotno,BeginTime,EndTime from ICSLOTSIMULATION left join icsop on icsop.OPCODE=ICSLOTSIMULATION.OPCODE) q on q.lotno=a.lotno
|
|
where usercode='{0}' and (ww.ACTIONRESULT<>'COLLECT_END' or ww.ACTIONRESULT is null)
|
|
ORDER BY A.LOTNO ", code);
|
|
#endregion
|
|
DataTable datasource = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, sql).Tables[0];
|
|
grdDetail.DataSource = datasource;
|
|
|
|
}
|
|
|
|
private void grvDetail_CustomDrawRowIndicator(object sender, DevExpress.XtraGrid.Views.Grid.RowIndicatorCustomDrawEventArgs e)
|
|
{
|
|
if (e.Info.IsRowIndicator && e.RowHandle >= 0)
|
|
e.Info.DisplayText = (e.RowHandle + 1).ToString();
|
|
}
|
|
|
|
}
|
|
}
|