meswork/01-Siyuan-MesProject
6
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

init: 导入项目到 meswork Gitea

Browse Source
This commit is contained in:
XingCheng3
2026-05-29 10:07:05 +08:00
commit ad9a4106fb
3582 changed files with 460312 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

86
MisDataFun/WebSubmit/OpcServer/Barcode.cs Normal file
View File

@@ -0,0 +1,86 @@
using System;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
///第一步，判断条码类型，根据条码类型，执行对应的存储过程
///第二步，条码类型(将扫描的条码保存到对应的表中)
///第三步，扫描完成之后给出允许工作信号
/// 处理页面扫描条码
/// </summary>
/// <param name="OpName"></param>
/// <param name="barcode"></param>
public static void Barcode(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
string barcode = Convert.ToString(msgEvent.TagValue);
int EngineTypeID;//机型代码
string EngineType;//机型
string EngineID;//工件编号
int IsRepeatedNumber = 2;
//1:获得申请上线信息后，扫描条码才处理业务
bool ispartload;
MIS_BASE.Read_PartLoad(OpName, out ispartload);
if(!ispartload)
{
AsyncSendMessage_Notice(OpName, "设备请发出申请上线信号（DBX500.3=1）");
return;
}
//2: 判断是否重号， 从数据库获得机型、机型代码等信息
string partSn = barcode;
Db.GetEngineType( partSn, out EngineTypeID, out EngineType, out EngineID, out IsRepeatedNumber);
//IsRepeatedNumber 0 不重号；1 重号；2：失败
switch (IsRepeatedNumber)
{
case 0:
////将产品信息写入PLC
MIS_BASE.Write_EngineTypeID_MES(OpName, EngineTypeID);
MIS_BASE.Write_EngineType_MES(OpName, EngineType);
MIS_BASE.Write_EngineID_MES(OpName, EngineID);
// 工位号],[订单号],[产品型号代码],[变速器序列号],[发动机型号],[机型基本代码],[变速器总成号] ,[托盘号]
// [产品型号代码_MES],[变速器序列号_MES],[发动机型号_MES]
// [机床上电],[循环开始],[机床故障],[上料无件],[下料堵塞],[工件到位]
// [传递机型],[申请上件],[允许保存],[保存完成],[合格标志],[前序合格]
// [工号],[班次],[是否返修件],[合格放行],[不合格放行],[扫描条码]
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, "产品型号代码_MES", EngineTypeID.ToString());
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, "发动机型号_MES", EngineType);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, "变速器序列号_MES", EngineID);
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, true);
//等待PLC将数据写入RFID；写入PLC的DB块，通知MES验证RFID机型数据是否正确传递
break;
case 1:
AsyncSendMessage_Notice(OpName, "变速器序列号 重号,请确认！");
break;
case 2:
AsyncSendMessage_Notice(OpName, "变速器序列号获取机型代码失败 ,请确认！");
break;
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:Barcode");
}
}
}
}

35
MisDataFun/WebSubmit/OpcServer/ConfirmOkGo.cs Normal file
View File

@@ -0,0 +1,35 @@
using System;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <summary>
/// 合格放行
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void ConfirmOkGo(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
if (tagValue == 1)
{
MIS_BASE.Write_MaterialVerifyOver(OpName, true);//工作完成
SendInfomation("OrderFormList","1", OpName);
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:ConfirmOkGo");
}
}
}
}

87
MisDataFun/WebSubmit/OpcServer/EngineGetOver.cs Normal file
View File

@@ -0,0 +1,87 @@
using System;
using bizFacade;
using MesServerWork;
//using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <summary>
/// PLC传递机型处理
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private static void EngineTypeGetOver_PLC(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
//判断PLC机型与MES机型是否一致
if (tagValue == 1)
{
bool MesRead = false;
int EngineTypeID;//机型代码
int PartPallet_Code;//托盘编号
string EngineType;//机型
string EngineID;//工件编号
int EngineTypeID_MES;//机型代码
string EngineType_MES;//机型
string EngineID_MES;//工件编号
MIS_BASE.Read_QualityData_Read_CF(OpName, out MesRead);
//第一步，判断允许保存和保存完成信号是否全部被清空，若未清空，则通知复位MES&PLC
if (MesRead)
{
//未能清空信号，请求复位
SendInfomation("AskReset", "1", OpName);
return;
}
string OrderForm;
MIS_BASE.GetEngineTypeFromPLC(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code,out OrderForm);
MIS_BASE.GetEngineTypeFromPLC_MES(OpName, out EngineTypeID_MES, out EngineType_MES, out EngineID_MES);
// 工位号],[订单号],[产品型号代码],[变速器序列号],[发动机型号],[机型基本代码],[变速器总成号] ,[托盘号]
// [产品型号代码_MES],[变速器序列号_MES],[发动机型号_MES]
// [机床上电],[循环开始],[机床故障],[上料无件],[下料堵塞],[工件到位]
// [传递机型],[申请上件],[允许保存],[保存完成],[合格标志],[前序合格]
// [工号],[班次],[是否返修件],[合格放行],[不合格放行],[扫描条码]
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineTypeID, EngineTypeID.ToString());
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineType, EngineType);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineID, EngineID);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.PartPallet_Code, PartPallet_Code.ToString());
//显示当前订单信息
SendMessage.ShowMoby(OpName);
if (EngineTypeID_MES == EngineTypeID & EngineID_MES == EngineID & EngineType_MES== EngineType)
{
MIS_BASE.Write_FixAllow(OpName, true);
//显示 显示绿脸
return;
}
else
{
SendMessage.AsyncSendMessage_Notice(OpName, "码块RFID机型与MES机型不匹配！");
}
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:EngineTypeGetOver_PLC");
}
}
}
}

37
MisDataFun/WebSubmit/OpcServer/FalseGO.cs Normal file
View File

@@ -0,0 +1,37 @@
using System;
using MesServerWork;
//using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <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)
{
MIS_BASE.Write_MaterialVerifyOver(OpName, true);//工作完成
SendInfomation("OrderFormList", "1", OpName);
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:FalseGO");
}
}
}
}

49
MisDataFun/WebSubmit/OpcServer/MesRead.cs Normal file
View File

@@ -0,0 +1,49 @@
using System;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <summary>
/// 保存完成(针对半自动和手动压装工位)
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void MesRead(object e)
{
try
{
int EngineTypeID;
string EngineType;
string EngineID;
int PartPallet_Code;
string OrderForm;
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
if (tagValue == 1)
{
MIS_BASE.GetEngineTypeFromPLC(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code, out OrderForm);
//保存数据到线首表
if (Db.UpLoadOpNameInsert(EngineID, EngineTypeID, EngineType, OpName))
{
MIS_BASE.Write_MesReadOver(OpName, true);
SendMessage.SendActuallyCount(OpName, tagValue);//统计在线产量，在线节拍
}
else
{
SendMessage.AsyncSendMessage_Notice(OpName, "保存上线数据失败！");
}
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:MesReadOver");
}
}
}
}

37
MisDataFun/WebSubmit/OpcServer/MesReadOver.cs Normal file
View File

@@ -0,0 +1,37 @@
using System;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <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)
{
BaseDataSystemMES.Material_Insert(OpName, tagValue);
MIS_BASE.Write_ConfirmOkGo(OpName, true);
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:MesReadOver");
}
}
}
}

309
MisDataFun/WebSubmit/OpcServer/WebSubmit.cs Normal file
View File

@@ -0,0 +1,309 @@
using System;
using MesServerWork;
using bizFacade;
//using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <summary>
/// 处理WEB页面发送过来的请求（m_Command + "|" + m_Value;）
/// </summary>
/// <param name="OpName"></param>
/// <param name="Content"></param>
public static void WebSubmit(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.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; //消息参数长度
if (MIS_BASE.hashtable_EngineGetOver_EngineTypeID == null)
{
MIS_BASE.InitHashtable_MesServerCode();
}
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();
}
//获取分线中间交互工位号
if (MIS_BASE.hashtable_OpNameRepair.ContainsKey(OpName))
{
opName_SubLine = MIS_BASE.hashtable_OpNameRepair[OpName].ToString();
}
//if (opName_SubLine == "")
//{
// return;
//}
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"://合格放行
//修改托盘状态
BaseDataSystemMES.BaseData_tagTable_Engine_IsNG_Delete(OpName, engineID);
MIS_BASE.Write_ConfirmOkGo(OpName, true);
MIS_BASE.Write_FalseGO(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);
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"://重新拧紧
break;
case "IsAutoGetEngineID"://自动手动申请编号（线首）
if (m_Value_length > 1) return;
MIS_BASE.Write_IsAutoGetEngineID(OpName, Convert.ToInt32(m_Value));
break;
case "PartPalletGoOver"://空托盘放行
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所有信号清空
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_MaterialVerifyOver(OpName, true);
}
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":
InitializeSingalToWeb(OpName);
break;
default: break;
}
}
catch(Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:WebSubmit");
}
}
private static 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>
/// 网页重现登录，恢复关闭前的页面状态
/// </summary>
/// <param name="Opname">工位号</param>
private static void InitializeSingalToWeb(string Opname)
{
bool S_WorkStart;//工件到位 DBX0.1
bool S_EngineGetOver;//传递机型 DBX0.4
bool S_FixAllow;//允许工作 DBX3.1
bool S_MaterialVerifyOver;//工作完成 DBX2.3
int IsCompleted = 0;
int S_Match = 0;
int PalletInfo_SubLine = 0;//显示分线托盘状态
MIS_BASE.Read_WorkStart(Opname, out S_WorkStart);
if (S_WorkStart == true)
{
SendInfomation("WorkStart", Convert.ToString(Convert.ToInt32(S_WorkStart)), Opname);
sendmessage(Opname, Convert.ToInt32(S_WorkStart), "WorkStart_Subline");
}
sendmessage(Opname, Convert.ToInt32(S_WorkStart), "EngineTypeGetOverMES_Subline");
MIS_BASE.Read_EngineGetOver_PLC(Opname, out S_EngineGetOver);
if (S_EngineGetOver == true)
{
SendInfomation("EngineTypeGetOverPLC", Convert.ToString(Convert.ToInt32(S_EngineGetOver)), Opname);
sendmessage(Opname, Convert.ToInt32(S_EngineGetOver), "EngineTypeGetOverMES_Subline");
}
MIS_BASE.Read_FixAllow(Opname, out S_FixAllow);
if (S_FixAllow == true)
{
SendInfomation("FixAllow", Convert.ToString(Convert.ToInt32(S_FixAllow)), Opname);
}
MIS_BASE.Read_MaterialVerifyOver(Opname, out S_MaterialVerifyOver);
if (S_MaterialVerifyOver == true)
{
SendInfomation("MaterialVerifyOver", Convert.ToString(Convert.ToInt32(S_MaterialVerifyOver)), Opname);
}
MIS_BASE.Read_MatchingCompleted(Opname, out IsCompleted); //DBX1.3 是否匹配
MIS_BASE.Read_Match(Opname, out S_Match); //DBX1.4 匹配结果
if (IsCompleted == 1 && S_Match == 1)//发送匹配完成和匹配结果信息
{
SendInfomation("MatchingCompleted", "1", Opname);
SendInfomation("Match", "1", Opname);
SendInfomation("MatchSuccess", "1", Opname);//界面显示匹配成功
}
else if (IsCompleted == 1 && S_Match == 0)
{
SendInfomation("MatchSuccess", "0", Opname);//界面显示匹配失败
}
if (MIS_BASE.hashtable_OpNameRepair == null)
{
MIS_BASE.InitHashtable_MesServerCode();
}
string Opname_SubLine = "";
if (MIS_BASE.hashtable_OpNameRepair.ContainsKey(Opname))
{
Opname_SubLine = MIS_BASE.hashtable_OpNameRepair[Opname].ToString();
}
if (Opname_SubLine == "")
{
return;
}
MIS_BASE.Read_PalletInfo(Opname, out PalletInfo_SubLine);
sendmessage(Opname, PalletInfo_SubLine, "SubQualityMask");
SendInfomation("ShowMobySubLine", Opname_SubLine, Opname);//显示分线机型及流水号
}
//分线发送工件到位信号函数
private static void sendmessage(string OpName, int tagValue, string Command)
{
string SendMessage;
SendMessage = "MES|" + Command + "|" + OpName + "|" + tagValue;
AsyncSendMessage(SendMessage);
}
}
}

59
MisDataFun/WebSubmit/OpcServer/WorkStart.cs Normal file
View File

@@ -0,0 +1,59 @@
using System;
using bizFacade;
using MesServerWork;
//using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_WebSubmit
{
/// <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);
//线首显示订单信息
if (tagValue == 1)
{
//清空MOBY的产品流水号
// 北汽福田工位状态监控MOBY_增加
// 工位号],[订单号],[产品型号代码],[变速器序列号],[发动机型号],[机型基本代码],[变速器总成号] ,[托盘号]
// [产品型号代码_MES],[变速器序列号_MES],[发动机型号_MES]
// [机床上电],[循环开始],[机床故障],[上料无件],[下料堵塞],[工件到位]
// [传递机型],[申请上件],[允许保存],[保存完成],[合格标志],[前序合格]
// [工号],[班次],[是否返修件],[合格放行],[不合格放行],[扫描条码]
//[到达时间],[离开时间],[持续时间]
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartIn, DateTime.Now.ToString());
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineID, tagValue.ToString());
//5 显示订单、机型信息
SendMessage.ShowMoby(OpName);
//3显示操作指导图片
SendMessage.PicShow(OpName);
//1（直接在界面通过选择机型确认工序内容）
SendMessage.ProcessList(OpName);
}
else if (tagValue == 0)
{
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartOut, DateTime.Now.ToString());
}
}
catch(Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:WorkStart");
}
}
}
}

BIN
MisDataFun/WebSubmit/OpcServer/vssver2.scc Normal file
View File

Binary file not shown.