chore: 初始化合力驱动桥MES采集程序

This commit is contained in:
yexingqiang
2026-05-29 13:50:18 +08:00
commit 866412ccf3
1371 changed files with 182049 additions and 0 deletions

View File

@@ -0,0 +1,59 @@
using System;
using bizFacade;
using MesServerWork;
//using SystemFramework;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <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)
{
// 工件到位 清除工作完成
MIS_BASE.Write_MaterialVerifyOver(OpName, false);
MIS_BASE.Write_TagTypeID(115, OpName, 0);
MIS_BASE.Write_TagTypeID(95, OpName, 0);
MIS_BASE.Write_TagTypeID(96, OpName, 0);
MIS_BASE.Write_TagTypeID(97, OpName, 0);
MIS_BASE.Write_TagTypeID(98, OpName, "");
MIS_BASE.Write_MesReadOver(OpName, false);
//清空MOBY的产品流水号
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStart, tagValue.ToString());
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartIn, DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss.fff"));
}
else
{
// 从上个工件离开到下个工件离开为节拍数据
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartOut, DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss.fff"));
MIS_BASE.Write_MesReadOver(OpName, false);
MIS_BASE.Write_ConfirmOkGo(OpName, false);
MIS_BASE.Write_FixAllow(OpName, false);
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, false);
//工作完成
MIS_BASE.Write_MaterialVerifyOver(OpName, false);
}
}
catch(Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:WorkStart");
}
}
}
}