meswork/16-Xikai-MesProjectNew
6
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat: 增加LG/TCS-AGV接口并完善物料校验与Function逻辑

Browse Source
This commit is contained in:
XingCheng3
2026-07-16 16:47:45 +08:00
parent 7303ddde9a
commit 8e44e11248
74 changed files with 4324 additions and 1091 deletions
Download Patch File Download Diff File Expand all files Collapse all files

224
MisDataFunction/Function1053/OpcServer/WebSubmit.cs
View File

@@ -3,8 +3,10 @@ using MesServerWork;
using System.Threading;
using MisDataSaveDate;
using System.Collections;
using MisDataFunDll;
//using SystemFramework;
namespace MesServerFunctions
{
partial class FunctionMES
@@ -17,41 +19,41 @@ namespace MesServerFunctions
private void WebSubmit(object e)
{
try
{
DeviceDriver_BasicData.CustomeEvetnArgs msgEvent = (DeviceDriver_BasicData.CustomeEvetnArgs)e;
string OpName=Convert.ToString(msgEvent.OpName);
{
var msgEvent = (DeviceDriver_BasicData.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
string Content = Convert.ToString(msgEvent.TagValue);
string opName_SubLine = "";
string engineID = "";//工件信息
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 = "";
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; //消息参数长度
if (MIS_BASE.hashtable_EngineGetOver_EngineTypeID == null)
{
MIS_BASE.InitHashtable_MesServerCode();
}
if (MIS_BASE.hashtable_EngineGetOver_EngineTypeID == null)
{
return;
}
if (MIS_BASE.hashtable_EngineGetOver_EngineID.ContainsKey(OpName))
{
engineID = MIS_BASE.hashtable_EngineGetOver_EngineID[OpName].ToString();
}
if (MIS_BASE.hashtable_OpNameRepair == null)
{
MIS_BASE.InitHashtable_MesServerCode();
}
DeviceDriver_BasicData.CustomeEvetnArgs _e = new DeviceDriver_BasicData.CustomeEvetnArgs();
_e.OpName = OpName;
_e.TagValue = m_Value;
string msg;
bool bolVal;
//根据请求的命令处理逻辑
switch (m_Command)
@@ -60,6 +62,32 @@ namespace MesServerFunctions
if (m_Value_length > 1) return;
fun_Barcode(_e);
break;
case "ConfirmOkGo"://合格放行
//修改托盘状态
//MisDataFun.BaseData_tagTable_Engine_IsNG_Delete(OpName, engineID);
MIS_BASE.Write_ConfirmOkGo(OpName, true);
MIS_BASE.Write_FalseGO(OpName, false);
Thread.Sleep(1000);
MIS_BASE.Write_ConfirmOkGo(OpName, false);
break;
case "FalseGO"://返修放行
//修改托盘状态
//BaseDataSystemMES.BaseData_tagTable_Engine_IsNG_Delete(OpName, engineID);
MIS_BASE.Write_FalseGO(OpName, true);
MIS_BASE.Write_ConfirmOkGo(OpName, false);
Thread.Sleep(1000);
MIS_BASE.Write_FalseGO(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);
Thread.Sleep(1000);
MIS_BASE.Write_FalseGO(OpName, false);
break;
case "OnLineState"://在线0、离线1、屏蔽2
try
{
@@ -69,6 +97,7 @@ namespace MesServerFunctions
{
//BaseDataSystemMES.IsOnLine_Update(OpName, m_Value.ToString());
MIS_BASE.Write_OnLineState(OpName, Convert.ToInt32(m_Value));
if (a == 2) SendMessage.AsyncSendMessage_Notice(OpName, "屏蔽MES！");
if (a == 0) SendMessage.AsyncSendMessage_Notice(OpName, "启用MES！");
}
@@ -76,34 +105,47 @@ namespace MesServerFunctions
catch
{
}
break;
case "NullWorkGo"://空托盘放行 0不放行 1放行
try
{
int a = Convert.ToInt32(m_Value);
//修改地址值
MIS_BASE.Write_PartPalletGoOver(OpName, a);
if (a == 1)
{
SendMessage.AsyncSendMessage_Notice(OpName, "开启空托盘放行！");
}
else
{
SendMessage.AsyncSendMessage_Notice(OpName, "关闭空托盘放行！");
}
}
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));
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);
}
MIS_BASE.Write_RepairUpline_MES(opName_SubLine, true);
//MIS_BASE.Write_PalletInfo(opName_SubLine, 4);
//MIS_BASE.Write_UpdatePalletOK(opName_SubLine, true);
MIS_BASE.Write_MaterialVerifyOver(opName_SubLine, true);
break;
case "SetMoby"://清空托盘（线首）
SetMoby(OpName);//将MES所有信号清空
//MIS_BASE.Write_PartPalletCode_PLC(OpName, 1);
break;
case "RepairUplineMES"://返修上线
MIS_BASE.Write_RepairUpline_MES(OpName, true);
@@ -116,7 +158,9 @@ namespace MesServerFunctions
break;
case "WritePartPalletCode"://写入托盘号
if (m_Value_length > 1) return;
MIS_BASE.Write_PalletCode(OpName, Convert.ToInt32(m_Value));
MIS_BASE.WritePLC(113, OpName, Convert.ToInt32(m_Value));
Thread.Sleep(500);
MIS_BASE.WritePLC(70, OpName, true);
break;
case "Normal"://启用正常拧紧工位
MIS_BASE.Write_Normal(OpName, 1);
@@ -139,57 +183,87 @@ namespace MesServerFunctions
//通知修改成功
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 "ForceMatch":
if (Convert.ToInt32(m_Value) == 1)
{
ForceMatch(OpName);
}
break;
case "PalletGO":
if (Convert.ToInt32(m_Value) == 1)
{
//直接给出工作完成
MIS_BASE.Write_MaterialVerifyOver(opName_SubLine, true);
}
break;
case "ContinueMatch":
//BaseDataSystemMES.QualityVerifyStatus_Hash_Write(OpName, true);
fun_EngineTypeGetOverPLC(_e);
break;
//初始化网页信号
case "IniSingalToWeb":
case "IniSingalToWeb":
InitializeSingalToWeb(OpName);
break;
case "Reset_Engine"://返修上线(返修上线点)
SetMoby(OpName);//将MES所有信号清空
//fun_EngineTypeGetOverPLC(OpName, 0);
//fun_EngineTypeGetOverPLC(OpName, 1);
// 检查项 检查完成
case "checkWorkOver":
MIS_BASE.WritePLC(30, OpName,1);
msg = "MES|checkWorkOverIsShow|" + OpName + "|" + 0;
SendMessage.AsyncSendMessage(msg);
break;
case "twoWorkSkip"://重新工作工件跳过工作(重新工作工件)
//工作完成
EngineTypeGetOver_PLC_Work_Skip(OpName);
// 重新申请上线
case "againPartLoad":
// 判断是否有工件到位
MIS_BASE.Read_WorkStart(OpName, out bolVal);
if (bolVal)
{
MIS_BASE.WritePLC(35, OpName, 1);
msg = "【" + OpName + "】" + "重新申请上线完成！";
SendMessage.AsyncSendMessage_Notice(OpName, msg);
}
else
{
msg = "【" + OpName + "】" + "当前无工件到位信号，请确认是否存在工件！";
SendMessage.AsyncSendMessage_Notice(OpName, msg);
}
break;
case "twoWork"://重新工作工件重新工作(重新工作工件)
//允许工作
EngineTypeGetOver_PLC_Work_two(OpName);
break;
case "SelectOrderForm"://分线接受前端模拟传递机型
_e.TagValueUp = "6";
EngineTypeGetOver_PLC(_e);
break;
case "outLineOpNameWorkOver"://分线接受前端模拟工作完成
_e.TagValueUp = "6";
_e.TagValue = 1;
MesRead(_e);
// 跳过交互
case "skipWork":
// 判断是否有工件到位
MIS_BASE.Read_WorkStart(OpName, out bolVal);
if (bolVal)
{
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, true); // 传递机型
MIS_BASE.Write_FixAllow(OpName,true); // 允许工作
MIS_BASE.WritePLC(30, OpName, 1); // 检查完成
MIS_BASE.Write_MesReadOver(OpName, true); // 保存完成
MIS_BASE.Write_MaterialVerifyOver(OpName, true); // 工作完成
msg = "【" + OpName + "】" + "跳过交互完成！";
SendMessage.AsyncSendMessage_Notice(OpName, msg);
}
else
{
msg = "【" + OpName + "】" + "当前无工件到位信号，请确认是否存在工件！";
SendMessage.AsyncSendMessage_Notice(OpName, msg);
}
break;
default: break;
}
}
catch(Exception err)
{
////ApplicationLog.WriteLog(err, "Function02:WebSubmit");
////ApplicationLog.WriteLog(err, "Function08:WebSubmit");
}
}
private void SetMoby(string OpName)
{
try
@@ -201,38 +275,38 @@ namespace MesServerFunctions
SendMessageFun.SendMessage("5123", "1111", OpName);
MIS_BASE.Write_ResetDevice(OpName, true);
System.Threading.Thread.Sleep(1000);
MIS_BASE.Write_ResetDevice(OpName, false);
MIS_BASE.Write_ResetDevice(OpName, false);
}
catch
{
}
}
/// <summary>
/// 网页重现登录，恢复关闭前的页面状态
/// </summary>
/// <param name="Opname">工位号</param>
private void InitializeSingalToWeb(string OpName)
private void InitializeSingalToWeb(string Opname)
{
InitOpPosion(OpName);
InitOpPosion(Opname);
////3显示操作指导图片 PicShow_String_FirstOpName
//SendMessage.PicShow_FirstOpName(OpOpNamename);
////1（直接在界面通过选择机型确认工序内容）
//SendMessage.ProcessList_FirstOpName(OpName);
//// MOBY数据
//SendMessageFun.SendMessage("5", "1", OpName);
//// 物料信息 物料信息
//SendMessage.MaterialList(OpName);
SendMessageFun.SendMessage("315", "111", OpName);
//3显示操作指导图片 PicShow_String_FirstOpName
SendMessage.PicShow_FirstOpName(Opname);
//1（直接在界面通过选择机型确认工序内容）
SendMessage.ProcessList_FirstOpName(Opname);
// MOBY数据
SendMessageFun.SendMessage("5", "1", Opname);
//SendMessageFun.SendMessage("5123", "1111", Opname);
// 物料信息 物料信息
SendMessage.MaterialList(Opname);
// 新增查询PLC直通状态 网页显示
//MIS_BASE.Read_TagTypeID(63, Opname, out S_plcStatus);
InitAlarm(OpName);
InitAlarm(Opname);
}
//分线发送工件到位信号函数
@@ -308,7 +382,7 @@ namespace MesServerFunctions
SendMessageFun.SendInfomation("MesReadOver", Convert.ToString(Convert.ToInt32(S_ReadOver)), Opname);
}
//----------------------------------------------------
bool S_MaterialVerifyOver;//工作完成 DBX2.3
bool S_MaterialVerifyOver;//工作完成 DBX0.3
MIS_BASE.Read_MaterialVerifyOver(Opname, out S_MaterialVerifyOver);
if (S_MaterialVerifyOver == true)
{