init: 导入项目到 meswork Gitea
This commit is contained in:
@@ -0,0 +1,74 @@
|
||||
using System;
|
||||
using MesServerWork;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
///1、物料验证
|
||||
///2、MES生成总成编号
|
||||
///3、MES传递机型
|
||||
/// 处理页面扫描条码
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="barcode"></param>
|
||||
public void Barcode(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
//20161228 条码连续扫描拼接错误
|
||||
//if (!BaseDataSystemMES.BarConfirm(barcode))
|
||||
//{
|
||||
// AsyncSendMessage_Notice(OpName, "条码号存在重复数据,请重新扫描!");
|
||||
// return;
|
||||
|
||||
//}
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
string barcode = Convert.ToString(msgEvent.TagValue);
|
||||
|
||||
bool ispartload = false;
|
||||
bool IsSuccess = false;
|
||||
int IsAllowWork;
|
||||
|
||||
BaseDataSystemMES.PartMaterial_DM_Update(OpName, barcode, out IsSuccess);
|
||||
//MIS_BASE.Read_PartLoad(OpName, out ispartload);
|
||||
|
||||
|
||||
|
||||
|
||||
if (!IsSuccess)
|
||||
{
|
||||
AsyncSendMessage_Notice(OpName,"条码无效,请确认");
|
||||
return;
|
||||
}
|
||||
|
||||
Sendmessage("2", "1", OpName);//通知WEB前端更新零件信息
|
||||
|
||||
BaseDataSystemMES.MesServer_Judge_IsCanWork(OpName, out IsAllowWork);
|
||||
if(IsAllowWork==1)
|
||||
{
|
||||
//物料数据
|
||||
BaseDataSystemMES.Material_Insert(OpName, 1);
|
||||
|
||||
Sendmessage("49", "11", OpName);//向web发送消息
|
||||
|
||||
//工作完成
|
||||
//MIS_BASE.Write_MaterialVerifyOver(OpName, true);
|
||||
|
||||
//MIS_BASE.Write_FixAllow(OpName, true);
|
||||
}
|
||||
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:Barcode");
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,84 @@
|
||||
using System;
|
||||
using MesServerWork;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
/// 合格放行
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="tagValue"></param>
|
||||
//private void ConfirmOkGo(object e)
|
||||
//{
|
||||
// try
|
||||
// {
|
||||
// return;
|
||||
// DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
// string OpName = Convert.ToString(msgEvent.OpName);
|
||||
// int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
// if (tagValue == 1)
|
||||
// {
|
||||
// int EngineTypeID;//机型代码
|
||||
// int PartPallet_Code;//托盘编号
|
||||
// string EngineType;//机型
|
||||
// string EngineID;//工件编号
|
||||
// MIS_BASE.GetEngineTypeFromDB(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code);
|
||||
|
||||
// //线首流水号
|
||||
// BaseDataSystemMES.FirstOpName_Code_Update(OpName, EngineID, PartPallet_Code.ToString());
|
||||
|
||||
// //物料数据
|
||||
// BaseDataSystemMES.Material_Insert(OpName, 1);
|
||||
|
||||
// MIS_BASE.Write_MaterialVerifyOver(OpName, true);
|
||||
|
||||
|
||||
// Sendmessage("49", "11", OpName);//向web发送消息
|
||||
// }
|
||||
// }
|
||||
// catch (Exception err)
|
||||
// {
|
||||
// ////ApplicationLog.WriteLog(err, "Function03:ConfirmOkGo");
|
||||
// }
|
||||
//}
|
||||
|
||||
//private void ConfirmOkGo(string OpName)
|
||||
//{
|
||||
// try
|
||||
// {
|
||||
// //DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
// //string OpName = Convert.ToString(msgEvent.OpName);
|
||||
// //int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
// //if (tagValue == 1)
|
||||
// {
|
||||
// int EngineTypeID;//机型代码
|
||||
// int PartPallet_Code;//托盘编号
|
||||
// string EngineType;//机型
|
||||
// string EngineID;//工件编号
|
||||
// MIS_BASE.GetEngineTypeFromDB(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code);
|
||||
|
||||
// //线首流水号
|
||||
// BaseDataSystemMES.FirstOpName_Code_Update(OpName, EngineID, PartPallet_Code.ToString());
|
||||
|
||||
// //物料数据
|
||||
// BaseDataSystemMES.Material_Insert(OpName, 1);
|
||||
|
||||
// MIS_BASE.Write_MaterialVerifyOver(OpName, true);
|
||||
|
||||
|
||||
// Sendmessage("49", "11", OpName);//向web发送消息
|
||||
// }
|
||||
// }
|
||||
// catch (Exception err)
|
||||
// {
|
||||
// ////ApplicationLog.WriteLog(err, "Function03:ConfirmOkGo");
|
||||
// }
|
||||
//}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,90 @@
|
||||
using System;
|
||||
using System.Data;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
using MesServerWork;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
/// PLC传递机型处理
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="tagValue"></param>
|
||||
private void EngineTypeGetOver_PLC(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
object locker = new object();
|
||||
lock (locker)
|
||||
{
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
EngineTypeGetOverPLC(OpName, tagValue.ToString());
|
||||
//if (tagValue == 1)
|
||||
//{
|
||||
// int EngineTypeID;//机型代码
|
||||
// int PartPallet_Code;//托盘编号
|
||||
// string EngineType;//机型
|
||||
// string EngineID;//工件编号
|
||||
|
||||
// MIS_BASE.GetEngineTypeFromPLC(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code);
|
||||
// EngineTypeGetOver_PLC_Work(OpName, EngineTypeID, EngineType, EngineID, PartPallet_Code);
|
||||
//}
|
||||
}
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:EngineTypeGetOver_PLC");
|
||||
}
|
||||
}
|
||||
|
||||
public static void EngineTypeGetOverPLC(string opName, string tagValue)
|
||||
{
|
||||
switch (tagValue)
|
||||
{
|
||||
case "0":
|
||||
MIS_BASE.Write_EngineTypeGetOver_MES(opName, false);
|
||||
MIS_BASE.Write_MaterialVerifyOver(opName, false);
|
||||
break;
|
||||
case "1":
|
||||
//string opName;
|
||||
string orderForm = "";
|
||||
int PartPalletCode;
|
||||
string engineType;
|
||||
int engineTypeID;
|
||||
string engineID;
|
||||
string barCodeType = "1";
|
||||
|
||||
// BaseDataSystemMES.MesServer_Process_EngineTypeOver(OpName);
|
||||
|
||||
////将产品信息从PLC读取
|
||||
MIS_BASE.Read_EngineTypeID(opName, out engineTypeID);
|
||||
MIS_BASE.Read_EngineType(opName, out engineType);
|
||||
MIS_BASE.Read_EngineID(opName, out engineID);
|
||||
MIS_BASE.Read_PalletCode(opName, out PartPalletCode);
|
||||
string kuweiNum = DtWebApi.ReadWritePLC.ReadPLC("112", opName).ToString();
|
||||
BaseDataSystemMES.GetUpLoadEngineIDOrderForm(opName, kuweiNum, out DataTable dt);
|
||||
if (dt.Rows.Count > 0)
|
||||
{
|
||||
orderForm = dt.Rows[0]["订单号"].ToString();
|
||||
}
|
||||
|
||||
|
||||
BaseDataSystemMES.OpName_MIS_MOBY_Insert(opName, orderForm, engineTypeID, engineType, engineID, PartPalletCode, 0, 0, "");
|
||||
|
||||
BaseDataSystemMES.GetEngineID_Save_Outline(opName, orderForm, PartPalletCode.ToString(), engineType, engineTypeID, engineID, barCodeType);
|
||||
// MES保存数据 减掉盆子库存 // 写占用盆子 更新数据库是否占用 = 0
|
||||
BaseDataSystemMES.GetUpLoadBarCode_0utUpdate(opName, kuweiNum);
|
||||
|
||||
// MES允许工作
|
||||
MIS_BASE.Write_FixAllow(opName, true);
|
||||
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,40 @@
|
||||
using System;
|
||||
using MesServerWork;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
|
||||
/// <summary>
|
||||
/// 不合格放行
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="tagValue"></param>
|
||||
private void FalseGO(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
if (tagValue == 1)
|
||||
{
|
||||
|
||||
//不合格保存物料数据
|
||||
BaseDataSystemMES.Material_Insert_NG(OpName, 2);
|
||||
|
||||
Sendmessage("4", "1", OpName);//向web发送消息
|
||||
|
||||
}
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:FalseGO");
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,89 @@
|
||||
using System;
|
||||
using System.Data;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
using MesServerWork;
|
||||
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
/// 保存完成(针对半自动和手动压装工位)
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="tagValue"></param>
|
||||
private void MesReadOver(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
if (tagValue == 1)
|
||||
{
|
||||
int qualityMask;
|
||||
MIS_BASE.Read_QualityMask(OpName, out qualityMask);
|
||||
|
||||
//全部OK,给出合格放行
|
||||
if (qualityMask == 1)
|
||||
{
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, true);
|
||||
MIS_BASE.Write_FalseGO(OpName, false);
|
||||
}
|
||||
else
|
||||
{
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, false);
|
||||
MIS_BASE.Write_FalseGO(OpName, true);
|
||||
}
|
||||
|
||||
//发给Web页面显示质量数据
|
||||
SendInfomation("ShowTimelyQuality", "1&" + qualityMask.ToString(), OpName);
|
||||
|
||||
}
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:MesReadOver");
|
||||
}
|
||||
}
|
||||
|
||||
private void MesReadOver(string OpName)
|
||||
{
|
||||
try
|
||||
{
|
||||
//DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
//string OpName = Convert.ToString(msgEvent.OpName);
|
||||
//int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
//if (tagValue == 1)
|
||||
{
|
||||
int qualityMask;
|
||||
MIS_BASE.Read_QualityMask(OpName, out qualityMask);
|
||||
|
||||
//全部OK,给出合格放行
|
||||
if (qualityMask == 1)
|
||||
{
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, true);
|
||||
MIS_BASE.Write_FalseGO(OpName, false);
|
||||
}
|
||||
else
|
||||
{
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, false);
|
||||
MIS_BASE.Write_FalseGO(OpName, true);
|
||||
}
|
||||
|
||||
//发给Web页面显示质量数据
|
||||
SendInfomation("ShowTimelyQuality", "1&" + qualityMask.ToString(), OpName);
|
||||
|
||||
}
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:MesReadOver");
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,173 @@
|
||||
using System;
|
||||
using System.Configuration;
|
||||
using System.Data;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
using MesServerWork;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
/// 申请上线
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="tagValue"></param>
|
||||
private void PartLoad(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
//object locker = new object();
|
||||
//lock (locker)
|
||||
{
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
PartLoad(OpName, tagValue.ToString());
|
||||
}
|
||||
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:PartLoad");
|
||||
}
|
||||
}
|
||||
|
||||
/// <summary>
|
||||
/// MES将盆子码(DB24-63)[74]、小车号(DBB20)[112]、机型代码(DBB22)[73]、机型(DBB64-103)[75]信息写到交互DB块中
|
||||
/// (DBX0.1=1)[5] MES传递机型
|
||||
/// </summary>
|
||||
public void PartLoad(string OpName, string tagValue)
|
||||
{
|
||||
//获得 盆子码(发动机号)、小车号、机型代码、机型 取最小的一个
|
||||
try
|
||||
{
|
||||
int desType = 1;
|
||||
int engineTypeID;
|
||||
string engineID;
|
||||
string engineType;
|
||||
byte kuweiNum;
|
||||
string kuweiNumStr;
|
||||
//小车是否需要报警
|
||||
Boolean carIsWarning = false;
|
||||
|
||||
if (tagValue == "1")
|
||||
{
|
||||
//订单完成 1 没完成 0
|
||||
//DtWebApi.ReadWritePLC.WritePLC("52", OpName, true);
|
||||
//DtWebApi.ReadWritePLC.WritePLC("52", OpName, false);
|
||||
|
||||
//
|
||||
// BaseDataSystemMES.MesServer_Process_EngineTypeOver(OpName);
|
||||
DataTable dt;
|
||||
BaseDataSystemMES.GetUpLoadBarCodeEngineID(OpName, out dt);
|
||||
if (dt.Rows.Count == 0)
|
||||
{
|
||||
// 库里无件时去判断需不需要给清料信号
|
||||
// 1.根据工位号获取上个订单盆子过站数量 判断是否全部订单都绑定了盆子 绑定了就给清料
|
||||
DataTable dt4;
|
||||
BaseDataSystemMES.GetMaxPartCount(OpName, out dt4);
|
||||
// 3.判断是否全部订单都绑定了盆子 绑定了就给清料
|
||||
if (Convert.ToInt32(dt4.Rows[0]["未绑定数"]) == 0)
|
||||
{
|
||||
// 4.返回清料信号
|
||||
DtWebApi.ReadWritePLC.WritePLC("52", OpName, true);
|
||||
|
||||
//5.删除工位小车所有信息,上料位置,抓取位置等
|
||||
//BaseDataSystemMES.ClearOpCarData(OpName);
|
||||
}
|
||||
// 告诉PLC MES 程序处理完成了
|
||||
DtWebApi.ReadWritePLC.WritePLC("26", OpName, true);
|
||||
return;
|
||||
}
|
||||
// 有件时去把清料信号给去掉
|
||||
DtWebApi.ReadWritePLC.WritePLC("52", OpName, false);
|
||||
engineTypeID = Convert.ToInt32(dt.Rows[0]["机型代码"]);
|
||||
desType = Convert.ToInt32(dt.Rows[0]["加工方式"]);
|
||||
engineID = dt.Rows[0]["发动机号"].ToString();
|
||||
engineType = dt.Rows[0]["发动机型号"].ToString();
|
||||
kuweiNum = Convert.ToByte(dt.Rows[0]["库位号"]);
|
||||
kuweiNumStr = dt.Rows[0]["库位号"].ToString();
|
||||
string OrderForm = dt.Rows[0]["订单号"].ToString();
|
||||
MIS_BASE.Read_PalletCode(OpName, out int PartPallet_Code);
|
||||
|
||||
//BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, OrderForm, engineTypeID, engineType, engineID, PartPallet_Code, 0, 0, "");
|
||||
|
||||
//判断对应小车的低车位是否有料
|
||||
String[] carSensorStr = { "76", "61", "62", "63", "64", "65" };
|
||||
String carCheckStr = carSensorStr[Convert.ToInt32(kuweiNumStr) -1];
|
||||
|
||||
|
||||
Boolean checkGo = Convert.ToBoolean(DtWebApi.ReadWritePLC.ReadPLC(carCheckStr, OpName));
|
||||
|
||||
//如果当前车位无工件信号就报警
|
||||
carIsWarning = !checkGo;
|
||||
|
||||
// 在高车位时判断低车位是否有件
|
||||
if (Convert.ToInt32(kuweiNumStr) % 2 == 0 && !carIsWarning)
|
||||
{
|
||||
String checkLowCar = carSensorStr[Convert.ToInt32(kuweiNumStr) - 2];
|
||||
carIsWarning = Convert.ToBoolean(DtWebApi.ReadWritePLC.ReadPLC(checkLowCar, OpName));
|
||||
}
|
||||
|
||||
//判断三个小车位是否存在信号
|
||||
String[] carSensorStr2 = { "33", "34", "35" };
|
||||
String carCheckStr2 = carSensorStr2[((Convert.ToInt32(kuweiNumStr) + 1) / 2) - 1];
|
||||
//如果车位无信号就报警
|
||||
if (!Convert.ToBoolean(DtWebApi.ReadWritePLC.ReadPLC(carCheckStr2, OpName)))
|
||||
{
|
||||
carIsWarning = true;
|
||||
}
|
||||
|
||||
//判断是否需要给报警信号
|
||||
if (carIsWarning)
|
||||
{
|
||||
DtWebApi.ReadWritePLC.WritePLC("25", OpName, true);
|
||||
return;
|
||||
}
|
||||
DtWebApi.ReadWritePLC.WritePLC("25", OpName, false);
|
||||
|
||||
////将产品信息写入PLC
|
||||
MIS_BASE.Write_EngineTypeID_MES(OpName, engineTypeID);
|
||||
MIS_BASE.Write_EngineType_MES(OpName, engineType);
|
||||
MIS_BASE.Write_EngineID_MES(OpName, engineID);
|
||||
MIS_BASE.Write_TagTypeID(116, OpName, OrderForm);
|
||||
// 库位号
|
||||
DtWebApi.ReadWritePLC.WritePLC("112", OpName, kuweiNum);
|
||||
// DES1 DES2
|
||||
DtWebApi.ReadWritePLC.WritePLC("88", OpName, desType);
|
||||
|
||||
//获取订单号,发动机型号,发动机型号代码(在线首工位将选择的订单,机型等信息保存到监控表中)
|
||||
// bizFacade.BaseDataSystemMES.OpName_MIS_CreateMoby_Select(OpName, out string orderForm, out engineTypeID, out engineType, out engineID, out string palletCode, out int isRepair, out string repairCode);
|
||||
// 判断空死盆子 发送到地址变量 70
|
||||
DataTable dt2 = BaseDataSystemMES.WorkPlatePartSelect(OpName, engineType);
|
||||
if (dt2.Rows.Count > 0)
|
||||
{
|
||||
if (dt2.Rows[0]["零件名称"].ToString() == "通盆子")
|
||||
{
|
||||
MIS_BASE.WritePLC(70, OpName, 1);
|
||||
}
|
||||
else
|
||||
{
|
||||
MIS_BASE.WritePLC(70, OpName, 0);
|
||||
}
|
||||
}
|
||||
// 写入MES传递机型
|
||||
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, true);
|
||||
// 写占用盆子 更新数据库是否占用 = 1
|
||||
//BaseDataSystemMES.UpdateKuWeiStatus(OpName, kuweiNumStr);
|
||||
|
||||
// 告诉PLC MES 程序处理完成了
|
||||
DtWebApi.ReadWritePLC.WritePLC("26", OpName, true);
|
||||
}
|
||||
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:PartLoad");
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,255 @@
|
||||
using System;
|
||||
using MesServerWork;
|
||||
using bizFacade;
|
||||
//using SystemFramework;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
/// 处理WEB页面发送过来的请求(m_Command + "|" + m_Value;)
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="Content"></param>
|
||||
private void WebSubmit(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
string Content = Convert.ToString(msgEvent.TagValue);
|
||||
|
||||
string[] dataArray = Content.Split('|');
|
||||
if (dataArray.Length != 2)
|
||||
return;
|
||||
//消息类型
|
||||
string m_Command = dataArray[0].ToString();
|
||||
//消息参数
|
||||
string m_Value = dataArray[1].ToString();
|
||||
//消息参数数量
|
||||
string[] m_Value_array = m_Value.Split('&');
|
||||
//消息参数长度
|
||||
int m_Value_length = m_Value_array.Length;
|
||||
|
||||
//工件信息
|
||||
string engineID = "";
|
||||
if (MIS_BASE.hashtable_EngineGetOver_EngineID == null)
|
||||
{
|
||||
MIS_BASE.InitHashtable_MesServerCode();
|
||||
}
|
||||
if (MIS_BASE.hashtable_EngineGetOver_EngineID.ContainsKey(OpName))
|
||||
{
|
||||
engineID = MIS_BASE.hashtable_EngineGetOver_EngineID[OpName].ToString();
|
||||
}
|
||||
|
||||
DoWhatPlc.CustomeEvetnArgs _e = new DoWhatPlc.CustomeEvetnArgs();
|
||||
_e.OpName = OpName;
|
||||
_e.TagValue = m_Value;
|
||||
|
||||
//根据请求的命令处理逻辑
|
||||
switch (m_Command)
|
||||
{
|
||||
case "Barcode":
|
||||
if (m_Value_length > 1) return;
|
||||
fun_Barcode(_e);
|
||||
break;
|
||||
case "ConfirmOkGo"://合格放行
|
||||
//删除不合格放行记录
|
||||
//修改托盘状态
|
||||
//Update_PalletStatus(OpName, 1, false);
|
||||
BaseDataSystemMES.BaseData_tagTable_Engine_IsNG_Delete(OpName, engineID);
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, true);
|
||||
MIS_BASE.Write_FalseGO(OpName, false);
|
||||
break;
|
||||
case "FalseGO"://返修放行
|
||||
//修改托盘状态
|
||||
//Update_PalletStatus(OpName, 3, false);
|
||||
BaseDataSystemMES.BaseData_tagTable_Engine_IsNG_Delete(OpName, engineID);
|
||||
MIS_BASE.Write_FalseGO(OpName, true);
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, false);
|
||||
break;
|
||||
case "NgGO"://不合格放行
|
||||
//保存不合格信息(必须保存不合格放行信息,由于B5A的Moby没有不合格标志位)
|
||||
BaseDataSystemMES.BaseData_tagTable_Engine_IsNG_Insert(OpName, engineID, "", "");
|
||||
MIS_BASE.Write_FalseGO(OpName, true);
|
||||
MIS_BASE.Write_ConfirmOkGo(OpName, false);
|
||||
break;
|
||||
case "OnLineState"://在线0、离线1、屏蔽2
|
||||
try
|
||||
{
|
||||
if (m_Value_length > 1) return;
|
||||
int a = Convert.ToInt32(m_Value);
|
||||
if (a <= 2)
|
||||
{
|
||||
BaseDataSystemMES.IsOnLine_Update(OpName, m_Value.ToString());
|
||||
MIS_BASE.Write_OnLineState(OpName, Convert.ToInt32(m_Value));
|
||||
}
|
||||
}
|
||||
catch
|
||||
{
|
||||
|
||||
}
|
||||
break;
|
||||
case "Reset"://复位,将MES所有的信息都复位了
|
||||
SetMoby(OpName);//将MES所有信号清空
|
||||
break;
|
||||
|
||||
case "FixAllow"://重新拧紧
|
||||
MIS_BASE.Write_FixAllow(OpName, false);
|
||||
MIS_BASE.Write_FixAllow(OpName, true);
|
||||
break;
|
||||
case "IsAutoGetEngineID"://自动手动申请编号(线首)
|
||||
if (m_Value_length > 1) return;
|
||||
MIS_BASE.Write_IsAutoGetEngineID(OpName, Convert.ToInt32(m_Value));
|
||||
BaseDataSystemMES.OpName_MIS_AutoOrMaunal_Insert(OpName, Convert.ToInt32(m_Value));
|
||||
break;
|
||||
case "PartPalletGoOver"://空托盘放行
|
||||
int Is_PartPalletGoOver;
|
||||
MIS_BASE.Read_PartPalletGoOver(OpName, out Is_PartPalletGoOver);
|
||||
if (Is_PartPalletGoOver == 1)
|
||||
{
|
||||
MIS_BASE.Write_PartPalletGoOver(OpName, 1);
|
||||
}
|
||||
else
|
||||
{
|
||||
MIS_BASE.Write_PartPalletGoOver(OpName, 0);
|
||||
}
|
||||
break;
|
||||
case "SetMoby"://清空托盘(线首)
|
||||
SetMoby(OpName);
|
||||
//MIS_BASE.Write_PartPalletCode_PLC(OpName, 1);
|
||||
break;
|
||||
case "RepairUplineMES"://返修上线
|
||||
MIS_BASE.Write_RepairUpline_MES(OpName, true);
|
||||
break;
|
||||
case "CancelRepair"://将返修件置为正常件
|
||||
|
||||
break;
|
||||
case "PartPalletCode"://申请写入托盘号
|
||||
//MIS_BASE.Write_PartPalletCode_PLC(OpName, 1);
|
||||
break;
|
||||
case "WritePartPalletCode"://写入托盘号
|
||||
if (m_Value_length > 1) return;
|
||||
MIS_BASE.Write_PalletCode(OpName, Convert.ToInt32(m_Value));
|
||||
break;
|
||||
case "Normal"://启用正常拧紧工位
|
||||
MIS_BASE.Write_Normal(OpName, 1);
|
||||
MIS_BASE.Write_UnNormal(OpName, 0);
|
||||
break;
|
||||
case "UnNormal"://启用备用拧紧工位
|
||||
MIS_BASE.Write_Normal(OpName, 0);
|
||||
MIS_BASE.Write_UnNormal(OpName, 1);
|
||||
break;
|
||||
case "ResetDevice"://复位设备
|
||||
MIS_BASE.Write_ResetDevice(OpName, true);
|
||||
System.Threading.Thread.Sleep(1000);
|
||||
MIS_BASE.Write_ResetDevice(OpName, false);
|
||||
break;
|
||||
case "IsNeedRepaire"://返修上线(返修上线点)
|
||||
if (Convert.ToInt32(m_Value) == 1)
|
||||
{
|
||||
//修改托盘状态
|
||||
MIS_BASE.Write_PalletInfo(OpName, 3);
|
||||
//通知修改成功
|
||||
MIS_BASE.Write_UpdatePalletOK(OpName, true);
|
||||
IsNeedRepaire_OK(OpName);
|
||||
|
||||
}
|
||||
else if (Convert.ToInt32(m_Value) == 0)
|
||||
{
|
||||
//通知修改成功
|
||||
MIS_BASE.Write_UpdatePalletOK(OpName, true);
|
||||
//直接给出工作完成
|
||||
MIS_BASE.Write_MaterialVerifyOver(OpName, true);
|
||||
}
|
||||
else
|
||||
{ }
|
||||
|
||||
break;
|
||||
//初始化网页信号
|
||||
case "IniSingalToWeb":
|
||||
InitializeSingalToWeb(OpName);
|
||||
break;
|
||||
default: break;
|
||||
}
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function03:WebSubmit");
|
||||
}
|
||||
}
|
||||
private void SetMoby(string OpName)
|
||||
{
|
||||
try
|
||||
{
|
||||
//清空Moby时,需要将MES信号清空
|
||||
MIS_BASE.Write_ClearMesMoby(OpName);
|
||||
|
||||
BaseDataSystemMES.MesServer_Process_EngineTypeOver(OpName);
|
||||
Sendmessage("5123", "1111", OpName);
|
||||
|
||||
MIS_BASE.Write_ResetDevice(OpName, true);
|
||||
System.Threading.Thread.Sleep(1000);
|
||||
MIS_BASE.Write_ResetDevice(OpName, false);
|
||||
}
|
||||
catch
|
||||
{
|
||||
|
||||
}
|
||||
}
|
||||
/// 网页重现登录,恢复关闭前的页面状态
|
||||
/// </summary>
|
||||
/// <param name="Opname">工位号</param>
|
||||
private void InitializeSingalToWeb(string OpName)
|
||||
{
|
||||
|
||||
Sendmessage("5123", "1111", OpName);//向web发送消息
|
||||
|
||||
//工件到位 DBX0.1
|
||||
bool S_WorkStart;
|
||||
MIS_BASE.Read_WorkStart(OpName, out S_WorkStart);
|
||||
if (S_WorkStart == true)
|
||||
{
|
||||
SendInfomation("WorkStart", Convert.ToString(Convert.ToInt32(S_WorkStart)), OpName);
|
||||
}
|
||||
bool ispartload = false;
|
||||
MIS_BASE.Read_PartLoad(OpName, out ispartload);
|
||||
if (ispartload)
|
||||
{
|
||||
SendInfomation("PartLoad", Convert.ToString(Convert.ToInt32(ispartload)), OpName);
|
||||
}
|
||||
bool isEngineTypeGetOver_MES = false;
|
||||
MIS_BASE.Read_EngineTypeGetOver_MES(OpName, out isEngineTypeGetOver_MES);
|
||||
if (isEngineTypeGetOver_MES)
|
||||
{
|
||||
SendInfomation("EngineTypeGetOverMES", Convert.ToString(Convert.ToInt32(isEngineTypeGetOver_MES)), OpName);
|
||||
}
|
||||
//传递机型 DBX0.4
|
||||
bool S_EngineGetOver;
|
||||
MIS_BASE.Read_EngineGetOver_PLC(OpName, out S_EngineGetOver);
|
||||
if (S_EngineGetOver == true)
|
||||
{
|
||||
SendInfomation("EngineTypeGetOverPLC", Convert.ToString(Convert.ToInt32(S_EngineGetOver)), OpName);
|
||||
|
||||
}
|
||||
|
||||
//允许工作 DBX3.1
|
||||
bool S_FixAllow;
|
||||
MIS_BASE.Read_FixAllow(OpName, out S_FixAllow);
|
||||
if (S_FixAllow == true)
|
||||
{
|
||||
SendInfomation("FixAllow", Convert.ToString(Convert.ToInt32(S_FixAllow)), OpName);
|
||||
//有允许工作信号,才初始化指导拧紧
|
||||
}
|
||||
|
||||
//工作完成 DBX2.3
|
||||
bool S_MaterialVerifyOver;
|
||||
MIS_BASE.Read_MaterialVerifyOver(OpName, out S_MaterialVerifyOver);
|
||||
if (S_MaterialVerifyOver == true)
|
||||
{
|
||||
SendInfomation("MaterialVerifyOver", Convert.ToString(Convert.ToInt32(S_MaterialVerifyOver)), OpName);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,58 @@
|
||||
using System;
|
||||
using bizFacade;
|
||||
using MesServerWork;
|
||||
//using SystemFramework;
|
||||
|
||||
namespace MesServerFunctions
|
||||
{
|
||||
partial class Functions_BASE_26
|
||||
{
|
||||
/// <summary>
|
||||
/// 工件到位与离开时,清空MES自身信号
|
||||
/// </summary>
|
||||
/// <param name="OpName"></param>
|
||||
/// <param name="tagValue"></param>
|
||||
private void WorkStart(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
//DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
//string OpName = Convert.ToString(msgEvent.OpName);
|
||||
//int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
//PartLoad_Show(e);
|
||||
|
||||
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
//ApplicationLog.WriteLog(err, "Function23:WorkStart");
|
||||
}
|
||||
}
|
||||
private void PartLoad_Show(object e)
|
||||
{
|
||||
try
|
||||
{
|
||||
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
|
||||
string OpName = Convert.ToString(msgEvent.OpName);
|
||||
int tagValue = Convert.ToInt32(msgEvent.TagValue);
|
||||
|
||||
if (tagValue == 1)
|
||||
{
|
||||
BaseDataSystemMES.MesServer_Process_EngineTypeOver(OpName);
|
||||
|
||||
Sendmessage("123", "111", OpName);//向前台发送显示操作指南、物料、图片的命令
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
}
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
////ApplicationLog.WriteLog(err, "Function01:PartLoad");
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
}
|
||||
Binary file not shown.
Reference in New Issue
Block a user