67 lines
2.5 KiB
C#
67 lines
2.5 KiB
C#
using System;
|
||
//using SystemFramework;
|
||
using MesServerWork;
|
||
using bizFacade;
|
||
|
||
namespace MesServerFunctions
|
||
{
|
||
partial class Functions_BASE_15
|
||
{
|
||
/// <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);
|
||
|
||
#region
|
||
int EngineTypeID;//机型代码
|
||
string EngineType;//机型
|
||
string EngineID;//工件编号
|
||
int PartPallet_Code;//托盘编号
|
||
MIS_BASE.GetEngineTypeFromDB(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code);///从PLC中获取MOBY信息
|
||
#endregion
|
||
|
||
if (tagValue == 1)
|
||
{
|
||
int qualityMask;
|
||
MIS_BASE.Read_QualityMask(OpName, out qualityMask);
|
||
|
||
SendInfomation("ShowTimelyQuality", "1&" + qualityMask.ToString(), OpName);//发给Web页面显示质量数据
|
||
|
||
//如果存在线外扫描工位，根据扫描条码绑定线外数据 需要时解除禁用
|
||
//BaseDataSystemMES.TransLaunchDataByMainMaterial(OpName, EngineType, EngineID, EngineTypeID);
|
||
|
||
//如果存在线外排队工位，根据排队编号绑定线外数据 需要时解除禁用
|
||
//BaseDataSystemMES.MailLineAndSubLineData_InsertByEngineID_Subline(OpName, EngineID, EngineTypeID, EngineType);
|
||
|
||
if (qualityMask == 1)//全部OK，给出合格放行
|
||
{
|
||
//合格放行
|
||
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);
|
||
}
|
||
|
||
}
|
||
}
|
||
catch (Exception err)
|
||
{
|
||
////ApplicationLog.WriteLog(err, "Function15:MesReadOver");
|
||
}
|
||
}
|
||
}
|
||
}
|