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

chore: 初始化北汽福田MES采集程序

Browse Source
This commit is contained in:
yexingqiang
2026-05-29 13:44:10 +08:00
commit c5e248e993
1399 changed files with 187196 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
MisDataFunction/MesServer.Function/Function1059/DataAccess/DataAccess.cs Normal file
View File

@@ -0,0 +1,16 @@
namespace MesServerFunctions
{
partial class FunctionMES
{
//针对“MIS.BizFacade.Dll”中没有的存储过程，在此类中新建
//新建原则：所有的函数用private,只允许在内部使用
//针对单个工艺特殊，需要新建存储过程，但是存储过程不能被加入到“MIS.BizFacade.Dll”中
private void aa()
{
}
}
}

BIN
MisDataFunction/MesServer.Function/Function1059/DataAccess/vssver2.scc Normal file
View File

Binary file not shown.

74
MisDataFunction/MesServer.Function/Function1059/Db.cs Normal file
View File

@@ -0,0 +1,74 @@
using System;
using System.Collections.Generic;
using System.Data.SqlClient;
using System.Data;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using DataLinkMesWork;
namespace MesServerFunctions
{
public class Db
{
/// <summary>
/// 北汽福田变速器序列号总线上线_获得机型信息
/// </summary>
/// <param name="partSn"></param>
/// <param name="EngineTypeID"></param>
/// <param name="EngineType"></param>
/// <param name="EngineID"></param>
/// <param name="IsRepeatedNumber"> 0 不重号；1 重号；2：失败</param>
/// <returns></returns>
public static bool GetEngineType(string partSn, out int EngineTypeID, out string EngineType, out string EngineID,out int IsRepeatedNumber)
{
DataTable dt = new DataTable();
EngineTypeID = 0;
EngineType = "";
EngineID = "";
IsRepeatedNumber = 2;
string produceName = "北汽福田变速器序列号总线上线_获得机型信息";
SqlParameter[] thisParms = new SqlParameter[1];
thisParms[0] = new System.Data.SqlClient.SqlParameter("@变速器序列号", partSn);
thisParms[2].Direction = ParameterDirection.Output;
if (DataAccess.ExecuteStoredProcedure(produceName, ref thisParms,out dt))
{
if(dt.Rows.Count > 0)
{
IsRepeatedNumber = Convert.ToInt32( dt.Rows[0]["IsRepeatedNumber"]);
EngineTypeID = Convert.ToInt32(dt.Rows[0]["EngineTypeID"]);
EngineType = dt.Rows[0]["EngineType"].ToString();
EngineID = partSn;
return true;
}
}
return false;
}
/// <summary>
/// 北汽福田变速器序列号总线上线_增加
/// </summary>
/// <param name="partSn"></param>
/// <param name="EngineTypeID"></param>
/// <param name="EngineType"></param>
/// <param name="OpName"></param>
/// <returns></returns>
public static bool UpLoadOpNameInsert(string partSn, int EngineTypeID, string EngineType, string OpName)
{
string produceName = "北汽福田变速器序列号总线上线_增加";
SqlParameter[] thisParms = new SqlParameter[4];
thisParms[0] = new System.Data.SqlClient.SqlParameter("@变速器序列号", partSn);
thisParms[1] = new System.Data.SqlClient.SqlParameter("@基本型号代码", EngineTypeID);
thisParms[2] = new System.Data.SqlClient.SqlParameter("@基本型号", EngineType);
thisParms[3] = new System.Data.SqlClient.SqlParameter("@工位号", OpName);
return DataAccess.ExecuteStoredProcedure(produceName, ref thisParms);
}
// ALTER PROCEDURE[dbo].[北汽福田变速器序列号总线上线_增加]
// @变速器序列号 nvarchar(50)='1333 050 062 0001*146012023*12345678',--'1333 050 062 0001'
//@基本型号代码 int=1,
//@基本型号 nvarchar(50)='1333 050 062 0001',
//@工位号 nvarchar(50) = 'J05PA010'
}
}

114
MisDataFunction/MesServer.Function/Function1059/Function1059.csproj Normal file
View File

@@ -0,0 +1,114 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProjectGuid>{3DCC04C0-32BF-4573-91F6-C4E342A0CF2A}</ProjectGuid>
<OutputType>Library</OutputType>
<AppDesignerFolder>Properties</AppDesignerFolder>
<RootNamespace>Function1059</RootNamespace>
<AssemblyName>Function1059</AssemblyName>
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
<FileAlignment>512</FileAlignment>
<Deterministic>true</Deterministic>
<TargetFrameworkProfile />
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<Optimize>false</Optimize>
<OutputPath>..\..\..\dll_fun\</OutputPath>
<DefineConstants>DEBUG;TRACE</DefineConstants>
<ErrorReport>prompt</ErrorReport>
<WarningLevel>4</WarningLevel>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<DebugType>pdbonly</DebugType>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DefineConstants>TRACE</DefineConstants>
<ErrorReport>prompt</ErrorReport>
<WarningLevel>4</WarningLevel>
</PropertyGroup>
<ItemGroup>
<Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\MisData_3.0_2022.08.23.1622.LLX\DLL\Newtonsoft.Json.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Core" />
<Reference Include="System.Drawing" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
<Reference Include="Microsoft.CSharp" />
<Reference Include="System.Data" />
<Reference Include="System.Net.Http" />
<Reference Include="System.Xml" />
</ItemGroup>
<ItemGroup>
<Compile Include="DataAccess\DataAccess.cs" />
<Compile Include="Db.cs" />
<Compile Include="MesServerFunction\Function1059.cs" />
<Compile Include="Methods\EngineGetOverBaseWork.cs" />
<Compile Include="Methods\SubmitToMisweb.cs" />
<Compile Include="Methods\UDP.Send.cs" />
<Compile Include="OpcServer\Barcode.cs" />
<Compile Include="OpcServer\ConfirmOkGo.cs" />
<Compile Include="OpcServer\EngineGetOver.cs" />
<Compile Include="OpcServer\FalseGO.cs" />
<Compile Include="OpcServer\HeartBeat.cs" />
<Compile Include="OpcServer\MesRead.cs" />
<Compile Include="OpcServer\MesReadOver.cs" />
<Compile Include="OpcServer\MesSaveNowData.cs" />
<Compile Include="OpcServer\PartLoad.cs" />
<Compile Include="OpcServer\WebSubmit.cs" />
<Compile Include="OpcServer\WorkIsOk.cs" />
<Compile Include="OpcServer\WorkStart.cs" />
<Compile Include="Properties\AssemblyInfo.cs" />
</ItemGroup>
<ItemGroup>
<None Include="app.config" />
<None Include="packages.config" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\..\Common\00MesWorkMqtt\MesWorkMqtt\00MesWorkMqtt.csproj">
<Project>{f55da1a0-a982-4479-8c47-0d9a5aaf3e18}</Project>
<Name>00MesWorkMqtt</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\Common\01DoWhatPlc\01_01DoWhatPlc.csproj">
<Project>{0d1af432-439a-4920-8692-43ae139f5530}</Project>
<Name>01_01DoWhatPlc</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\Common\02WebApiCall\02_02WebApiCallPLC.csproj">
<Project>{3e6d1dd5-01c9-435f-9941-61f906ce35bb}</Project>
<Name>02_02WebApiCallPLC</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\Common\04DataBaseAccess\DataBaseAccess\04-DataBaseAccess.csproj">
<Project>{f434e066-4c59-47c8-aa82-6f48cc84501a}</Project>
<Name>04-DataBaseAccess</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\Common\07WebBusinessFacade\BusinessFacade\07BusinessFacade.csproj">
<Project>{f0a0c525-03fd-428a-9b17-7f54aa0e4475}</Project>
<Name>07BusinessFacade</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\Common\08WebFun_base\WebFun_base\08-WebFun_base.csproj">
<Project>{d98be764-adeb-488d-9714-61e308aa8201}</Project>
<Name>08-WebFun_base</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\Common\09MesDataFunction\MesDataFunction\09-MesDataFunction.csproj">
<Project>{90e76fb4-646d-45e2-95db-0b8ab4e465d6}</Project>
<Name>09-MesDataFunction</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\MisDataFun\SendMessageToWebMqtt\12SendMessageToWeb.csproj">
<Project>{e4eb6420-906d-4672-947a-ca33ddcdadfc}</Project>
<Name>12SendMessageToWeb</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\MIS_FuntionSaveData\MIS_FuntionSaveData\13.3MIS_FuntionSaveData.csproj">
<Project>{55b510c1-59e9-4bfd-ae84-d76d46f6e365}</Project>
<Name>02-13.3MIS_FuntionSaveData</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
</Project>

307
MisDataFunction/MesServer.Function/Function1059/MesServerFunction/Function1059.cs Normal file
View File

@@ -0,0 +1,307 @@
using bizFacade;
using MesServerWork;
using System;
using System.Collections.Generic;
using System.Threading;
namespace MesServerFunctions
{
public partial class FunctionMES
{
object lockFunWork;
//public void FunWork(DoWhatPlc.CustomeEvetnArgs e)
public void FunWork(string recData)
{
lockFunWork = new object();
lock (lockFunWork)
{
List<string> dataArray = DoWhatPlc.MessageText.GetCmdStringList(recData);
//string[] dataArray = recData.Split('|');
//if (dataArray.Count != 4)
//return;
//消息来源
string m_Source = dataArray[0].ToString();
//消息类型 Barcode
string m_Command = dataArray[1].ToString();
//工位号
string m_OpName = dataArray[2].ToString();
//消息参数
string m_Value = dataArray[3].ToString();
DoWhatPlc.CustomeEvetnArgs e =new DoWhatPlc.CustomeEvetnArgs();// = Newtonsoft.Json.JsonConvert.DeserializeObject<DoWhatPlc.CustomeEvetnArgs>(m_Value);
string tagValue;
switch (m_Source)
{
case "BarCode":
e.OpName = m_OpName;
e.TagValue = m_Value;
fun_Barcode(e);
break;
case "WEB":
e.OpName = m_OpName;
e.TagValue = m_Command + "|" + m_Value;
fun_WebSubmit(e);
break;
case "PLC":
e = Newtonsoft.Json.JsonConvert.DeserializeObject<DoWhatPlc.CustomeEvetnArgs>(m_Value);
switch (e.TagValue.ToString().ToLower())
{
case "false":
tagValue = "0";
break;
case "true":
tagValue = "1";
break;
default:
tagValue = e.TagValue.ToString();
break;
}
e.TagValue = tagValue;
switch (e.TagTypeCodeID.ToString())
{
//PLC 工件到位
case "2":
fun_WorkStart(e);
break;
//PLC 允许保存质量数据
case "19":
fun_MesRead(e);
break;
//MES 保存数据完成
case "20":
fun_MesReadOver(e);
break;
//PLC 工位合格标志
case "22":
fun_IsOk(e);
break;
//PLC 螺栓补拧结束
case "30":
int value = Convert.ToInt32(MIS_BASE.ReadPLC(30, m_OpName));
if (value == 0)
{
MIS_BASE.WritePLC(77, m_OpName, 0);
MIS_BASE.WritePLC(88, m_OpName, 0);
//先修改按钮显示
BaseDataSystemMES.SetButtomShouOrHide(m_OpName, "MES_BoltAddWorkStart", 1, 1, "MES_BoltAddWorkEnd", 0);
//通知前端刷新按钮
SendMessageFun.SendInfomation("SetButtomShouOrHide", "1", m_OpName);
}
break;
//PLC 申请上线
case "43":
PartLoad(e);
break;
//PLC 传递机型
case "44":
fun_EngineTypeGetOverPLC(e);
break;
//MES 合格放行
case "51":
fun_ConfirmOkGo(e);
break;
//MES 不合格放行
case "8":
fun_FalseGo(e);
break;
//MES保存实时质量数据
case "65":
fun_MesSaveNowData(e);
break;
////MES 系统健康心跳
//case "14":
// fun_HeartBeatMIS(e);
// break;
case "63":
string S_plcStatus;//DBX501.5 PLC直通，1 强制放行 0 正常循环
MIS_BASE.Read_TagTypeID(63, m_OpName, out S_plcStatus);
if (Convert.ToInt32(S_plcStatus) == 0)
{
SendMessageFun.SendInfomation("PlcStatus", "0", m_OpName);
}
else
{
SendMessageFun.SendInfomation("PlcStatus", "1", m_OpName);
}
break;
// PLC 程序号
case "125":
// 将程序号转发给前端页面
SendMessageFun.SendInfomation("CodeNumber", e.TagValue.ToString(), m_OpName);
break;
// PLC 程序号的第几颗螺丝
case "126":
SendMessageFun.SendInfomation("CodeNumberWorkNumber", e.TagValue.ToString(), m_OpName);
break;
}
break;
}
}
}
//public void FunWork(DoWhatPlc.CustomeEvetnArgs e)
//{
// //lock1 = new object();
// //lock (lock1)
// {
// switch (e.TagTypeCodeID.ToString())
// {
// //PLC 工件到位
// case "2":
// fun_WorkStart(e);
// break;
// //PLC 允许保存质量数据
// case "19":
// fun_MesRead(e);
// break;
// //MES 保存数据完成
// case "20":
// fun_MesReadOver(e);
// break;
// //PLC 传递机型
// case "44":
// fun_EngineTypeGetOverPLC(e);
// break;
// //MES 合格放行
// case "51":
// fun_ConfirmOkGo(e);
// break;
// //MES 不合格放行
// case "8":
// fun_FalseGo(e);
// break;
// //MES 扫描条码
// case "Barcode":
// fun_Barcode(e);
// break;
// //WEB 处理页面传递过来的数据
// case "WebSubmit":
// fun_WebSubmit(e);
// break;
// }
// }
//}
//1.工件到位后，PLC给MES传递机型(DBX0.4)(44)，
//2.MES判断是否扫描完成
//3.若扫描完成，则MES给出合格放行(DBX2.5)(51)
/// <summary>
/// 扫描条码
/// </summary>
/// <param name="OpName"></param>
/// <param name="barcode"></param>
public void fun_Barcode(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(Barcode, e);
}
/// <summary>
/// 系统健康心跳监测
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_HeartBeatMIS(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(HeartBeat, e);
}
/// <summary>
/// 传递机型
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_EngineTypeGetOverPLC(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(EngineTypeGetOver_PLC, e);
}
/// <summary>
/// 合格放行
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_ConfirmOkGo(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(ConfirmOkGo, e);
}
/// <summary>
/// 不合格放行
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_FalseGo(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(FalseGO, e);
}
/// <summary>
/// 保存完成 20
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_MesReadOver(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(MesReadOver, e);
}
/// <summary>
/// 保存完成 19
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_MesRead(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(MesRead, e);
}
/// <summary>
/// 工件到位离开(清空所有的MES信号)
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_WorkStart(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(WorkStart, e);
}
/// <summary>
/// 处理WEB页面发送过来的请求（m_Command + "|" + m_Value;）
/// </summary>
/// <param name="OpName"></param>
/// <param name="Content"></param>
public void fun_WebSubmit(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(WebSubmit, e);
}
public int fun_SubLineLoadPartCountMatch()
{
return SubLineLoadPartCountMatch;
}
/// <summary>
/// MES实时保存质量数据
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_MesSaveNowData(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(MesSaveNowData, e);
}
/// <summary>
/// 工位是否合格
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_IsOk(DoWhatPlc.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(IsOk, e);
}
}
}

BIN
MisDataFunction/MesServer.Function/Function1059/MesServerFunction/vssver2.scc Normal file
View File

Binary file not shown.

306
MisDataFunction/MesServer.Function/Function1059/Methods/EngineGetOverBaseWork.cs Normal file
View File

@@ -0,0 +1,306 @@
using System;
using System.Data;
using bizFacade;
using MesServerWork;
//using SystemFramework;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <summary>
/// 分线上总线的数量
/// </summary>
public static int SubLineLoadPartCount = 2;
/// <summary>
/// 分线上总线已经匹配的数量
/// </summary>
public static int SubLineLoadPartCountMatch = 0;
/// <summary>
/// 正常逻辑工作
/// </summary>
/// <param name="OpName"></param>
/// <param name="EngineTypeID"></param>
/// <param name="EngineType"></param>
/// <param name="EngineID"></param>
/// <param name="PartPallet_Code"></param>
private void EngineTypeGetOver_PLC_Work(string OpName, int EngineTypeID, string EngineType, string EngineID, int PartPallet_Code,string OrderForm)
{
int IsAllowWork;
int RepairPartStatusPLC = 0;
int MES_QualityMask = 1;
//string OrderForm = "";//订单号
//DataTable dt;
if (EngineTypeID <= 0 || EngineID.Length == 0 || EngineType.Length == 0 || OrderForm.Length == 0)
{
SendMessageFun.AsyncSendMessage_Notice(OpName, "PLC传递机型为空");
return;
}
//电子看板_装配零件_临时表_增加_北汽
//第二步，将零件信息转移到零件_临时表中
// BaseDataSystemMES.MesServer_Process_EngineTypeOverBQ(OpName);
//通知web显示
//SendMessageFun.SendMessage("123", "111", OpName);
DataTable dt = BaseDataSystemMES.EngineTypeChange(OpName, EngineType);
//提示机型发生变化
if (dt.Rows.Count > 0)
{
//string mesValue = Newtonsoft.Json.JsonConvert.SerializeObject(dt);//<DoWhatPlc.CustomeEvetnArgs>(recData);
//string message = "MES|MaterialList_Dif_Resources|" + OpName + "|" + mesValue;
//SendMessage.AsyncSendMessage(message);
DataTable dt2 = BaseDataSystemMES.EngineTypeChange_MA020(OpName, EngineType);
MIS_BASE.WritePLC(70, OpName, true);
string message2 = "MES|ShowTipBox|" + OpName + "|该工件为换型首台工件，一轴零件编号为：" + dt2.Rows[0]["一轴零件号"] + ",请确认设备参数是否正确！";
SendMessage.AsyncSendMessage(message2);
}
if (OpName == "J07PA080")
{
// 判断是否存在细一轴 若存在则去反给PLC（11.2）35
DataTable OneAxleDt = BaseDataSystemMES.Get_EngineOneAxle(EngineType);
if (Convert.ToInt32(OneAxleDt.Rows[0]["result"]) == 1)
{
MIS_BASE.WritePLC(35, OpName, true);
}
}
//第四步，获取是否允许工作
BaseDataSystemMES.MesServer_Judge_IsCanWork(OpName, out IsAllowWork);
// 暂时先定义为扫描完成才能进行压装工作，因为考虑到工作完成后，操作工未必会去扫描物料的情况
if (IsAllowWork == 1)
{
//通知PLC允许工作,允许工作在保存完成时清空
MIS_BASE.Write_FixAllow(OpName, true);
//SendMessageFun.AsyncSendMessage_Notice(OpName, "请开始工作！");
}
else
{
SendMessageFun.AsyncSendMessage_Notice(OpName, "请扫描物料！");
}
}
/// <summary>
/// 保存MOBY信息
/// </summary>
/// <param name="OpName"></param>
/// <param name="engineTypeID"></param>
/// <param name="engineType"></param>
/// <param name="engineID"></param>
private void SaveMobyMessage(string OpName, int engineTypeID, string engineType, string engineID, string orderForm)
{
if (MIS_BASE.hashtable_EngineGetOver_EngineTypeID == null)
{
MIS_BASE.InitHashtable_MesServerCode();
}
if (MIS_BASE.hashtable_EngineGetOver_EngineTypeID.ContainsKey(OpName))
{
MIS_BASE.hashtable_EngineGetOver_EngineTypeID[OpName] = engineTypeID;
}
if (MIS_BASE.hashtable_EngineGetOver_EngineType.ContainsKey(OpName))
{
MIS_BASE.hashtable_EngineGetOver_EngineType[OpName] = engineType;
}
if (MIS_BASE.hashtable_EngineGetOver_EngineID.ContainsKey(OpName))
{
MIS_BASE.hashtable_EngineGetOver_EngineID[OpName] = engineID;
}
if (MIS_BASE.hashtable_EngineGetOver_OrderForm.ContainsKey(OpName))
{
MIS_BASE.hashtable_EngineGetOver_OrderForm[OpName] = orderForm;
}
}
/// <summary>
/// 返修件需要工作
/// </summary>
/// <param name="OpName">工位号</param>
private void IsNeedRepaire_OK(string OpName)
{
int isRepair;
int engineTypeID;
string engineType = "";
string engineID = "";
string palletCode = "";
string orderForm = "";
string repairCode = "";
//从监控系统中查询出本工位信息
BaseDataSystemMES.OpName_MIS_Moby_Select(OpName,
out orderForm, out engineTypeID, out engineType,
out engineID, out palletCode, out isRepair, out repairCode);
EngineTypeGetOver_PLC_Work(OpName, engineTypeID, engineType, engineID, Convert.ToInt32(palletCode),orderForm);
}
/// <summary>
/// 正常匹配分线和总线
/// </summary>
/// <param name="opName"></param>
/// <param name="engineID">总线工件号</param>
/// <param name="engineTypeID">总线工件机型代码</param>
/// <param name="engineType">总线工件机型</param>
private void Match(string opName, string engineID, int engineTypeID, string engineType, int PartPallet_Code)
{
try
{
bool m_EngineGetOver_PLC_SubLine;
int engineTypeID_SubLine;
int partPallet_Code_SubLine;
int PalletInfo = 1;//总线托盘状态
string opName_SubLine = "";//分线工件信息
string engineID_SubLine;
string engineType_SubLine;
string AlarmStr;
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;
}
//第二步：获取分线传递机型信号
MIS_BASE.Read_EngineGetOver_PLC(opName_SubLine, out m_EngineGetOver_PLC_SubLine);
if (!m_EngineGetOver_PLC_SubLine) return;//必须工件同时到位才能进行匹配
//第三步：判断合格标志
MIS_BASE.Read_PalletInfo(opName_SubLine, out PalletInfo);
if (PalletInfo == 2) return; //若不合格则返回不进行匹配
string OrderForm;
//第四步：获取分线的信息，匹配验证
MIS_BASE.GetEngineTypeFromPLC(opName_SubLine, out engineTypeID_SubLine, out engineType_SubLine, out engineID_SubLine, out partPallet_Code_SubLine,out OrderForm);
//判断分线数据是否合格
//if (!BaseDataSystemMES.QulityDataVerify(opName, engineID_SubLine, out AlarmStr) && !BaseDataSystemMES.QualityVerifyStatus_Hash_Read(opName))
//{
// SendInfomation("LineoutAlert", AlarmStr, opName);
// return;
//}
if (engineTypeID_SubLine == engineTypeID)
{
BaseDataSystemMES.SubLineLoadPartCountMatch_Select(opName, out SubLineLoadPartCountMatch);
SubLineLoadPartCountMatch = SubLineLoadPartCountMatch + 1;
BaseDataSystemMES.SubLineLoadPartCountMatch_Update(opName, SubLineLoadPartCountMatch);
BaseDataSystemMES.MailLineAndSubLineData_Insert(engineID, engineTypeID, engineType, engineID_SubLine);//分线上总线数据转移
MIS_BASE.Write_Match(opName, true);//匹配结果
MIS_BASE.Write_MatchingCompleted(opName, true);//匹配完成
if(SubLineLoadPartCountMatch== SubLineLoadPartCount)
{
MIS_BASE.Write_FixAllow(opName, true);
SubLineLoadPartCountMatch = 0;
BaseDataSystemMES.SubLineLoadPartCountMatch_Update(opName, SubLineLoadPartCountMatch);
}
SendMessageFun.SendInfomation("MatchSuccess", "1", opName);
sendmessage(opName, 1, "Match");//匹配结果
}
else
{
MIS_BASE.Write_Match(opName, false);//匹配结果
MIS_BASE.Write_MatchingCompleted(opName, true);//匹配完成//68:1、取消返修；2、匹配成功 自己监控发送 MES|MatchingCompleted
//发送匹配完成和匹配结果信息
SendMessageFun.AsyncSendMessage_Notice(opName,"匹配失败，工件型号不匹配！");
SendMessageFun.SendInfomation("MatchSuccess", "0", opName);
sendmessage(opName, 0, "Match");//匹配结果
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog("Match:" + err.ToString());
}
}
/// <summary>
/// 强制匹配分线和总线
/// </summary>
/// <param name="opName"></param>
private void ForceMatch(string opName)
{
try
{
bool m_EngineGetOver_PLC_SubLine;
bool m_EngineGetOver_PLC;
int engineTypeID_SubLine;
int engineTypeID;
int partPallet_Code_SubLine;
int partPallet_Code;
string opName_SubLine = "";//分线工件信息
string engineID_SubLine;
string engineType_SubLine;
string engineID;
string engineType;
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;
}
MIS_BASE.Read_EngineGetOver_PLC(opName_SubLine, out m_EngineGetOver_PLC_SubLine);//1:读取分线工件到位的传递机型信号。
if (!m_EngineGetOver_PLC_SubLine) return;//必须工件同时到位才能进行匹配
MIS_BASE.Read_EngineGetOver_PLC(opName, out m_EngineGetOver_PLC);//2:读取总线工件到位的传递机型信号。
if (!m_EngineGetOver_PLC) return;//必须工件同时到位才能进行匹配
string OrderForm;
MIS_BASE.GetEngineTypeFromPLC(opName_SubLine, out engineTypeID_SubLine, out engineType_SubLine, out engineID_SubLine, out partPallet_Code_SubLine,out OrderForm);//获取分线的信息
MIS_BASE.GetEngineTypeFromPLC(opName, out engineTypeID, out engineType, out engineID, out partPallet_Code, out OrderForm);
BaseDataSystemMES.MailLineAndSubLineData_Insert(engineID, engineTypeID, engineType, engineID_SubLine);//分线上总线数据转移
MIS_BASE.Write_Match(opName, true);//匹配结果
MIS_BASE.Write_MatchingCompleted(opName, true);//匹配完成
SendMessageFun.SendInfomation("MatchSuccess", "1", opName);//界面显示匹配成功
MIS_BASE.Write_FixAllow(opName, true);//允许PLC工作
//发送匹配完成和匹配结果信息
sendmessage(opName, 1, "MatchingComplete");//匹配完成
sendmessage(opName, 1, "Match");//匹配结果
}
catch
{
}
}
}
}

127
MisDataFunction/MesServer.Function/Function1059/Methods/SubmitToMisweb.cs Normal file
View File

@@ -0,0 +1,127 @@
using System;
using bizFacade;
//using SystemFramework;
namespace MesServerFunctions
{
/// <summary>
/// 此类用于向WEB发送各种类型消息
/// </summary>
partial class FunctionMES
{
/// <summary>
/// 批量发送WEB消息（Value为BOOL值）
/// </summary>
/// <param name="MessageNumm">消息编号组合</param>
/// <param name="Value">消息值组合</param>
/// <param name="OpName">工位号</param>
void Sendmessage(string MessageNumm, string Value, string OpName)
{
for (int i = 0; i < MessageNumm.Length; i++)
{
Sendmessage(MessageNumm[i], Value[i].ToString(), OpName);
}
}
/// <summary>
/// 选择发送给WEB的消息
/// </summary>
/// <param name="Num">消息类型</param>
/// <param name="OpName">消息工位</param>
string Sendmessage(char Num, string Value, string OpName)
{
string SendMessage;
string result = "";
switch (Num)
{
case '1':
//1（直接在界面通过选择机型确认工序内容）
SendMessage = "MES|ProcessList|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case '2':
//2显示物料
SendMessage = "MES|MaterialList|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case '3':
//3显示操作指导图片
SendMessage = "MES|PicShow|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case '4':
//4订单完工模块刷新完成数量
SendMessage = "MES|OrderFormList|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '5':
SendMessage = "MES|ShowMoby|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case '6':
SendMessage = "MES|MaterialCheckPosition|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case '7':
SendMessage = "MES|WorkStart|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case '8'://清除MES生成编号
break;
case '9':
SendMessage = "MES|ConfirmOkGo|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
case 'a':
SendMessage = "MES|FixAllow|" + OpName + "|" + Value;
result = AsyncSendMessage(SendMessage);
break;
}
return result;
}
/// <summary>
/// 向WEB发送信息（value为字符串）
/// </summary>
/// <param name="Command">消息种类</param>
/// <param name="Value">消息内容</param>
/// <param name="OpName">工位号</param>
string SendInfomation(string Command, string Value, string OpName)
{
string SendMessage = "MES|" + Command + "|" + OpName + "|" + Value;
return AsyncSendMessage(SendMessage);
}
/// <summary>
/// 发送在线产量、在线节拍
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void SendActuallyCount(string OpName, int tagValue)
{
//当工件离开时，更新在线产量、在线节拍
if (tagValue == 0)
{
try
{
int opNameCount = 0;//在线产量
int opNameCountTime = 0;//在线节拍
//基本数据_工作日历_班次产量查询_New
BaseDataSystemMES.OpNameCount_New(OpName, out opNameCount, out opNameCountTime);
string SendMessage;
SendMessage = "MES|ActuallyCount|" + OpName + "|" + opNameCount.ToString() + "&" + opNameCountTime.ToString();
AsyncSendMessage(SendMessage);
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function02:SendActuallyCount");
}
}
}
}
}

53
MisDataFunction/MesServer.Function/Function1059/Methods/UDP.Send.cs Normal file
View File

@@ -0,0 +1,53 @@
using bizFacade;
//using SystemFramework;
using MesServerWork;
using DataLinkMesWork;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <summary>
/// 发送信息到MES通讯服务器或者其他的
/// </summary>
/// <param name="Message"></param>
private string AsyncSendMessage(string Message)
{
return MIS_BASE.asyncSendMessage(Message);
}
/// <summary>
/// 发送提示消息
/// </summary>
/// <param name="Message"></param>
private void AsyncSendMessage_Notice(string opname, string notice)
{
//通知Web界面
BaseDataSystemMES.Web_Notice_Insert(opname, notice);
string SendMessage = "MES|Notice|" + opname + "|" + "1";
MIS_BASE.asyncSendMessage(SendMessage);
}
/// <summary>
/// 发送信息到打印机
/// </summary>
/// <param name="Message"></param>
private void asyncSendMessageToMark(string Message)
{
string messageSend = (string)Message;
//UDPClientSend.Send_ALL(ApplicationConfig.MES_MarkPortNum, messageSend);
}
/// <summary>
/// 发送信息到LED
/// </summary>
/// <param name="Message"></param>
private void asyncSendMessageLED(string OpName)
{
//发送到大屏幕显示 41104
string strMessage = "MIS|" + OpName + "|" + "0" + "|" + "1";
//UDPClientSend.Send_ALL(ApplicationConfig.Port_ShowLED_ProductCount, strMessage);
}
}
}

BIN
MisDataFunction/MesServer.Function/Function1059/Methods/vssver2.scc Normal file
View File

Binary file not shown.

205
MisDataFunction/MesServer.Function/Function1059/OpcServer/Barcode.cs Normal file
View File

@@ -0,0 +1,205 @@
using System;
using System.Data;
using System.Threading;
using System.Xml.Linq;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class FunctionMES
{
object lockBarcode = new object();
///第一步，判断条码类型，根据条码类型，执行对应的存储过程
///第二步，条码类型(将扫描的条码保存到对应的表中)
///第三步，扫描完成之后给出允许工作信号
/// 处理页面扫描条码
/// </summary>
/// <param name="OpName"></param>
/// <param name="barcode"></param>
public void Barcode(object e)
{
lock(lockBarcode)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
//+*************DbName*****************
string DbName = Convert.ToString(msgEvent.OpName);
string barcode = Convert.ToString(msgEvent.TagValue);
SendMessageFun.SendInfomation("BarCodeData", barcode, OpName); // 将扫码值发送给前端
int EngineTypeID;//机型代码
string EngineType;//机型
string EngineID;//工件编号
bool isShowBarNGTipBox;
string OrderForm;
bool IsNotRepeatedNumber = false;
//1:获得申请上线信息后，扫描条码才处理业务
bool ispartload;
// 判断是否存在异常导致不允许工作 输出msg到前端
DataTable OpNameIsWorkDt = BaseDataSystemMES.OpNameIsAllowWork(OpName);
if (Convert.ToInt32(OpNameIsWorkDt.Rows[0]["提示类型"]) == 3)
{
SendMessageFun.SendInfomation("ShowTipBox", OpNameIsWorkDt.Rows[0]["提示文本"].ToString(), OpName);
return;
}
//判断工件是否到位
MIS_BASE.Read_WorkStart(OpName, out ispartload);
if (!ispartload)
{
SendMessageFun.AsyncSendMessage_Notice(OpName, "请检查设备是否到位（DBX500.1=1）");
isShowBarNGTipBox = BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 1);
if (isShowBarNGTipBox) SendMessageFun.SendInfomation("ShowTipBox", "多次扫描条码失败，请检查扫码位置是否正确！", OpName);
return;
}
//判断设备是否申请上线
//MIS_BASE.Read_UpdatePalletOK(OpName, out ispartload);
//if (!ispartload)
//{
// SendMessageFun.AsyncSendMessage_Notice(OpName, "请检查设备是否申请上线（DBX500.3=1）");
// return;
//}
// 判读条码是变速器序列号条码号还是物料号 小机型*日月年* 流水号(给起始号 + 数量)
// 选小机型 从北汽福田BOM中选 得先维护BOM
// 变速器序列号 '1333 050 062*16012023*30000001'
//如果工件流水号、机型等信息没有写入PLC，扫描的条码按工件流水号进行验证
//否则按装配物料进行验证
MIS_BASE.Read_EngineTypeID(OpName, out EngineTypeID);
if (EngineTypeID == 2 || EngineTypeID == 4) {
if ( !(barcode.Split(';').Length > 2 || barcode.Split('；').Length > 2 || barcode.Split('*').Length > 2))
{
SendMessageFun.AsyncSendMessage_Notice(OpName, "此条码非前壳码，请确认！");
isShowBarNGTipBox = BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 1);
if (isShowBarNGTipBox) SendMessageFun.SendInfomation("ShowTipBox", "多次扫描条码失败，请检查扫码位置是否正确！", OpName);
return;
}
}
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartIn, DateTime.Now.ToString());
if (OpName == "J07PA080")
{
// PA070 与 PA080 扫码模式不同 使用两种数据来源
DataTable LineOutWorkEngineDt = BaseDataSystemMES.newSelectWorkOrder("J07MA020", barcode);
if (LineOutWorkEngineDt.Rows.Count > 0)
{
EngineTypeID = Convert.ToInt32(LineOutWorkEngineDt.Rows[0]["机型代码"]);
EngineType = LineOutWorkEngineDt.Rows[0]["机型号"].ToString();
EngineID = LineOutWorkEngineDt.Rows[0]["主线总成号"].ToString();
OrderForm = LineOutWorkEngineDt.Rows[0]["订单号"].ToString();
// 校验是否存在于生产订单中
// 先判断是否为返修件 若是的话就不校验生产订单
//判断是否返修件 若不是返修件则要校验是否在当前计划中
DataTable backWorkDt = BaseDataSystemMES.Get_IsBarCodeBackWork(OpName, EngineID);
if (Convert.ToInt32(backWorkDt.Rows[0]["Count"]) == 0)
{
DataTable BarCodeDt;
BarCodeDt = BaseDataSystemMES.GetMainLineNowWorkOrderData(OpName, EngineID);
if (BarCodeDt.Rows.Count == 0)
{
SendMessageFun.AsyncSendMessage_Notice(OpName, "当前工位订单可上线条码中不存在此条码，请在当前计划模块中查看！");
isShowBarNGTipBox = BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 1);
if (isShowBarNGTipBox) SendMessageFun.SendInfomation("ShowTipBox", "多次扫描条码失败，请检查扫码位置是否正确！", OpName);
return;
}
}
MIS_BASE.WritePLC(32, OpName, false);
}
else
{
MIS_BASE.WritePLC(32, OpName, true);
SendMessage.AsyncSendMessage_Notice(OpName, "当前前壳未与装配线订单绑定！请绑定后再进行工作");
isShowBarNGTipBox = BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 1);
if (isShowBarNGTipBox) SendMessageFun.SendInfomation("ShowTipBox", "多次扫描条码失败，请检查扫码位置是否正确！", OpName);
return;
}
}
else
{
// 先判断是否有扫的前壳码是重复的，如果有则去用重复前壳码对应的数据，反之继续使用从订单队列取出的订单
//PA070 的5S
DataTable dt;
dt = BaseDataSystemMES.GetNowWorkOrderData(OpName, 0);
if (dt.Rows.Count > 0)
{
if (Convert.ToInt32(dt.Rows[0]["线首是否完成工作"]) == 4)
{
MIS_BASE.WritePLC(32, OpName, true);
SendMessage.AsyncSendMessage_Notice(OpName, "该订单所有总成号已在MA040工作完毕，不允许继续工作，请联系班长进行修改完工状态！");
isShowBarNGTipBox = BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 1);
if (isShowBarNGTipBox) SendMessageFun.SendInfomation("ShowTipBox", "多次扫描条码失败，请检查扫码位置是否正确！", OpName);
return;
}
else
{
EngineTypeID = Convert.ToInt32(dt.Rows[0]["机型代码"]);
EngineType = dt.Rows[0]["零件号"].ToString();
EngineID = dt.Rows[0]["变速箱总成号"].ToString();
OrderForm = dt.Rows[0]["订单号"].ToString();
MIS_BASE.WritePLC(32, OpName, false);
}
}
else
{
MIS_BASE.WritePLC(32, OpName, true);
SendMessage.AsyncSendMessage_Notice(OpName, "该订单已生产完毕或无选中的生产订单，请选择其他订单进行生产！");
isShowBarNGTipBox = BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 1);
if (isShowBarNGTipBox) SendMessageFun.SendInfomation("ShowTipBox", "多次扫描条码失败，请检查扫码位置是否正确！", OpName);
return;
}
}
// 将扫码结果计入总分线记录表中
BaseDataSystemMES.BusPartLine_Add(EngineID, barcode, OpName, OrderForm, EngineType);
SendMessageFun.SendInfomation("BindRecordRefresh", "1", OpName);
// 将产品信息写入PLC
MIS_BASE.Write_EngineTypeID_MES(OpName, EngineTypeID);
MIS_BASE.Write_EngineType_MES(OpName, EngineType);
if (OpName == "J07PA080")
{
MIS_BASE.Write_EngineID_MES(OpName, EngineID); // 将壳体码作为总成号来工作，到时候保存也存这个
}
else
{
MIS_BASE.Write_EngineID_MES(OpName, barcode); // 将壳体码作为总成号来工作，到时候保存也存这个
}
MIS_BASE.Write_OrderForm_MES(OpName, OrderForm);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineID_MES, EngineID);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineType_MES, EngineType);
//SendMessageFun.SendMessage("1235", "1111", OpName);
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, true);
//MIS_BASE.Write_FixAllow(OpName, true);
SendMessageFun.AsyncSendMessage_Notice(OpName, "扫码完成！");
BaseDataSystemMES.Check_BarCodeNGTemp(OpName, 2);
}
catch (Exception err)
{
// 保存出错日志 1.申请上线 2.传递机型 3.允许保存 4.扫码
MisDataSaveDate.FuntionMesRead.Alarm_SaveFileLog4Error(4, e, "Fun1059", err);
////ApplicationLog.WriteLog(err, "Function08:Barcode");
}
}
}
}
}

35
MisDataFunction/MesServer.Function/Function1059/OpcServer/ConfirmOkGo.cs Normal file
View File

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

146
MisDataFunction/MesServer.Function/Function1059/OpcServer/EngineGetOver.cs Normal file
View File

@@ -0,0 +1,146 @@
using System;
using System.Data;
using bizFacade;
using MesServerWork;
//using SystemFramework;
namespace MesServerFunctions
{
partial class FunctionMES
{
object lockBarcodeEngineTypeGetOver = new object();
/// <summary>
/// PLC传递机型处理
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void EngineTypeGetOver_PLC(object e)
{
lock(lockBarcodeEngineTypeGetOver)
{
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;//工件编号
//上线工位清MES传递机型信号
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, false);
// 判断是否存在异常导致不允许工作 输出msg到前端
DataTable OpNameIsWorkDt = BaseDataSystemMES.OpNameIsAllowWork(OpName);
if (Convert.ToInt32(OpNameIsWorkDt.Rows[0]["提示类型"]) == 3)
{
SendMessageFun.SendInfomation("ShowTipBox", OpNameIsWorkDt.Rows[0]["提示文本"].ToString(), OpName);
return;
}
MIS_BASE.Read_QualityData_Read_CF(OpName, out MesRead);
//第一步，判断允许保存和保存完成信号是否全部被清空，若未清空，则通知复位MES&PLC
if (MesRead)
{
//未能清空信号，请求复位
SendMessageFun.SendInfomation("AskReset", "1", OpName);
return;
}
string OrderForm;
string OrderForm_MES;
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, out OrderForm_MES);
// 测试的时候用的 plc读取订单号有问题
// OrderForm = BaseDataSystemMES.GetOrderDataBySn(EngineID);
if (EngineTypeID_MES == EngineTypeID & EngineID_MES == EngineID & EngineType_MES == EngineType & OrderForm_MES == OrderForm)
{
//
DataTable dt = BaseDataSystemMES.EngineTypeChange(OpName, EngineType);
// 提示机型发生变化
if (dt.Rows.Count > 0)
{
string mesValue = Newtonsoft.Json.JsonConvert.SerializeObject(dt);//<DoWhatPlc.CustomeEvetnArgs>(recData);
string message = "MES|MaterialList_Dif_Resources|" + OpName + "|" + mesValue;
SendMessage.AsyncSendMessage(message);
}
//写入到数据库的[北汽福田工位状态监控MOBY]表中
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.OrderForm, OrderForm);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.PartPallet_Code, PartPallet_Code.ToString());
//电子看板_装配零件_临时表_增加_北汽
//第二步，将零件信息转移到零件_临时表中
BaseDataSystemMES.MesServer_Process_EngineTypeOverBQ(OpName);
//显示当前订单信息
//SendMessage.ShowMoby(OpName);
SendMessageFun.SendMessage("1235", "1111", OpName);
EngineTypeGetOver_PLC_Work(OpName, EngineTypeID, EngineType, EngineID, PartPallet_Code, OrderForm);
return;
}
else
{
SendMessage.AsyncSendMessage_Notice(OpName, "码块RFID机型与MES机型不匹配！");
}
}
}
catch (Exception err)
{
// 保存出错日志 1.申请上线 2.传递机型 3.允许保存 4.扫码
MisDataSaveDate.FuntionMesRead.Alarm_SaveFileLog4Error(2, e, "Fun1059", err);
////ApplicationLog.WriteLog(err, "Function08:EngineTypeGetOver_PLC");
}
}
}
/// <summary>
/// 二次工作
/// </summary>
/// <param name="OpName"></param>
private void EngineTypeGetOver_PLC_Work_two(string OpName)
{
int EngineTypeID;//机型代码
int PartPallet_Code;//托盘编号
string EngineType;//机型
string EngineID;//工件编号
string OrderForm;
MIS_BASE.GetEngineTypeFromPLC(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code, out OrderForm);
EngineTypeGetOver_PLC_Work(OpName, EngineTypeID, EngineType, EngineID, Convert.ToInt32(PartPallet_Code), OrderForm);
}
/// <summary>
/// 跳过二次工作
/// </summary>
/// <param name="OpName"></param>
private void EngineTypeGetOver_PLC_Work_Skip(string OpName)
{
MIS_BASE.Write_MesReadOver(OpName, true);
MIS_BASE.Write_MaterialVerifyOver(OpName, true);
}
}
}

37
MisDataFunction/MesServer.Function/Function1059/OpcServer/FalseGO.cs Normal file
View File

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

44
MisDataFunction/MesServer.Function/Function1059/OpcServer/HeartBeat.cs Normal file
View File

@@ -0,0 +1,44 @@
using bizFacade;
using MesServerWork;
using System;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <summary>
/// MES与PLC心跳监听
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void HeartBeat(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
//返写在MES心跳中
//MIS_BASE.WritePLC(15, OpName, tagValue);
// 获取登录状态
if (tagValue == 1)
{
//DataTable tempDt;
//BaseDataSystemMES.Get_TempData(OpName, "登陆状态", out tempDt);
//if (tempDt.Rows.Count > 0) MIS_BASE.WritePLC(54, OpName, tempDt.Rows[0]["数值"]);
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function02:FalseGO");
}
}
}
}

98
MisDataFunction/MesServer.Function/Function1059/OpcServer/MesRead.cs Normal file
View File

@@ -0,0 +1,98 @@
using System;
using System.Data;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class FunctionMES
{
object lockMesRead = new object ();
/// <summary>
/// 保存完成(针对半自动和手动压装工位)
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void MesRead(object e)
{
lock(lockMesRead)
{
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)
{
int CountNumber = Convert.ToInt32(MIS_BASE.ReadPLC(38, OpName));
MIS_BASE.GetEngineTypeFromPLC(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code, out OrderForm);
//保存数据到线首表 先保存到 北汽福田变速器序列号总线上线 用于之前判断是否重号
if (Db.UpLoadOpNameInsert(EngineID, EngineTypeID, EngineType, OpName))
{
// 保存质量数据
int qualityMask = MisDataSaveDateMesRead.Funtion.MesRead(OpName, tagValue.ToString(), msgEvent.TagID.ToString());
// 推送质量数据到MES的页面
MIS_BASE.SendInfomation("ShowTimelyQuality", "1&" + qualityMask.ToString(), OpName);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartOut, DateTime.Now.ToString());
// 保存物料数据
BaseDataSystemMES.Material_Insert(OpName, tagValue);
// 测量数据发动机在线状态
BaseDataSystemMES.WorkStartInsert(OpName, qualityMask);
SendMessage.SendActuallyCount(OpName, tagValue);//统计在线产量，在线节拍
//通知设备，MES的质量数据（和物料数据）保存完成
MIS_BASE.Write_MesReadOver(OpName, true);
// MES工作完成
MIS_BASE.Write_MaterialVerifyOver(OpName, true);
// 根据二次压装来判断计数编号是哪个
// 6.该订单计数加一
// 计数 从总分线对应表中读取出条码来进行计数
if(OpName == "J07PA080" && (EngineTypeID == 2 || EngineTypeID == 4))
{
DataTable dt = BaseDataSystemMES.newSelectWorkOrder(OpName, EngineID);
BaseDataSystemMES.newAddOrderCount(OpName, dt.Rows[0]["主线总成号"].ToString(), OrderForm, CountNumber);
}
else
{
BaseDataSystemMES.newAddOrderCount(OpName, EngineID, OrderForm, CountNumber);
}
SendMessageFun.SendInfomation("FlushOverWorkList", "1", OpName);
}
else
{
SendMessage.AsyncSendMessage_Notice(OpName, "保存上线数据失败！");
}
}
else
{
MIS_BASE.Write_MesReadOver(OpName, false);
}
}
}
catch (Exception err)
{
// 保存出错日志 1.申请上线 2.传递机型 3.允许保存 4.扫码
MisDataSaveDate.FuntionMesRead.Alarm_SaveFileLog4Error(3, e, "Fun1059", err);
////ApplicationLog.WriteLog(err, "Function08:MesReadOver");
}
}
}
}
}

37
MisDataFunction/MesServer.Function/Function1059/OpcServer/MesReadOver.cs Normal file
View File

@@ -0,0 +1,37 @@
using System;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <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");
}
}
}
}

41
MisDataFunction/MesServer.Function/Function1059/OpcServer/MesSaveNowData.cs Normal file
View File

@@ -0,0 +1,41 @@
using bizFacade;
using MesServerWork;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <summary>
/// MES保存实时质量数据
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void MesSaveNowData(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
if (tagValue == 1)
{
// 直接发送实时的 质量数据
string message = MisDataSaveDateMesRead.Funtion.GetRealTimeQualityData(OpName);
//推送质量数据到MES的页面
SendMessage.AsyncSendMessage("MES|ShowTimelyQuality_Resources|" + OpName + "|" + message);
//SendMessageFun.SendMessageMESToWEB("ShowTimelyQuality", "1&" + qualityMask.ToString(), OpName);
}
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function02:FalseGO");
}
}
}
}

103
MisDataFunction/MesServer.Function/Function1059/OpcServer/PartLoad.cs Normal file
View File

@@ -0,0 +1,103 @@
using System;
using System.Data;
using bizFacade;
//using SystemFramework;
using MesServerWork;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <summary>
/// 申请上线(针对上线工位)
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void PartLoad(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
int EngineTypeID;//机型代码
string EngineType;//机型
string EngineID;//工件编号
string OrderForm;
//线首显示订单信息
if (tagValue == 1)
{
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, "");
//清空MOBY的产品流水号
int CountNumber = Convert.ToInt32(MIS_BASE.ReadPLC(38, OpName));
DataTable dt;
dt = BaseDataSystemMES.GetNowWorkOrderData(OpName, CountNumber);
if (dt.Rows.Count > 0)
{
if (Convert.ToInt32(dt.Rows[0]["线首是否完成工作"]) == 4)
{
MIS_BASE.WritePLC(32, OpName, true);
SendMessage.AsyncSendMessage_Notice(OpName, "该订单所有总成号已在MA040工作完毕，不允许继续工作，请联系班长进行修改完工状态！");
return;
}
else
{
EngineTypeID = Convert.ToInt32(dt.Rows[0]["机型代码"]);
EngineType = dt.Rows[0]["零件号"].ToString();
EngineID = dt.Rows[0]["变速箱总成号"].ToString();
OrderForm = dt.Rows[0]["订单号"].ToString();
MIS_BASE.WritePLC(32, OpName, false);
// PA070 的6s 件需要压五个杆 70 只有70 6s 会走这个方法
if (OpName == "J07PA070" && (EngineTypeID == 4 || EngineTypeID == 8))
{
// 不需要扫码直接给传递机型
// 将产品信息写入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_OrderForm_MES(OpName, OrderForm);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineID_MES, EngineID);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineType_MES, EngineType);
//SendMessageFun.SendMessage("1235", "1111", OpName);
MIS_BASE.Write_EngineTypeGetOver_MES(OpName, true);
}
}
}
else
{
MIS_BASE.WritePLC(32, OpName, true);
SendMessage.AsyncSendMessage_Notice(OpName, "该订单已生产完毕或无选中的生产订单，请选择其他订单进行生产！");
return;
}
}
else
{
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartOut, DateTime.Now.ToString());
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)
{
// 保存出错日志 1.申请上线 2.传递机型 3.允许保存 4.扫码
MisDataSaveDate.FuntionMesRead.Alarm_SaveFileLog4Error(1, e, "Fun1059", err);
////ApplicationLog.WriteLog(err, "Function08:WorkStart");
}
}
}
}

423
MisDataFunction/MesServer.Function/Function1059/OpcServer/WebSubmit.cs Normal file
View File

@@ -0,0 +1,423 @@
using System;
using MesServerWork;
using bizFacade;
using System.Threading;
using MisDataSaveDate;
using System.Collections;
using System.Data;
//using SystemFramework;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <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 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();
}
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);
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
{
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));
if (a == 2) SendMessage.AsyncSendMessage_Notice(OpName, "屏蔽MES！");
if (a == 0) SendMessage.AsyncSendMessage_Notice(OpName, "启用MES！");
}
}
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;
case "twoWorkSkip"://重新工作工件跳过工作(重新工作工件)
//工作完成
EngineTypeGetOver_PLC_Work_Skip(OpName);
break;
case "twoWork"://重新工作工件重新工作(重新工作工件)
//允许工作
EngineTypeGetOver_PLC_Work_two(OpName);
break;
case "FaultBackWork"://返修工件
// 写入地址
MIS_BASE.WritePLC(33, OpName, true);
Thread.Sleep(1000);
MIS_BASE.WritePLC(33, OpName, false);
break;
case "remedyWork"://补拧工件
// 接受传来的补拧程序号 补拧数量 拆分
string[] arr = m_Value.ToString().Split('&');
string codeNumber = arr[0];
string workCount = arr[1];
// 写入地址 在工件离开后清空
MIS_BASE.WritePLC(77, OpName, codeNumber);
MIS_BASE.WritePLC(88, OpName, workCount);
// 若这个点被置0了说明PLC那补拧结束了
MIS_BASE.WritePLC(30, OpName, true);
break;
case "remedyWorkEnd"://补拧工件
MIS_BASE.WritePLC(77, OpName, 0);
MIS_BASE.WritePLC(88, OpName, 0);
MIS_BASE.WritePLC(30, OpName, false);
break;
case "closeWebWindow":// 前端窗口关闭
// 将持久化存储表中工位的登陆状态设置为接受值
BaseDataSystemMES.Set_TempData(OpName, "登陆状态", m_Value);
MIS_BASE.WritePLC(54, OpName, false);
break;
case "SkipDiskBearing":// 跳过盘轴
MIS_BASE.WritePLC(32, OpName, true);
Thread.Sleep(1000);
MIS_BASE.WritePLC(32, OpName, false);
break;
case "QuitEngineTypeCheck":// 发送给服务器换型请求，等待服务器换型判断发送到页面端
DataTable dt;
dt = BaseDataSystemMES.EngineTypeChange(OpName, m_Value);
//提示机型发生变化
if (dt.Rows.Count > 0)
{
string mesValue = Newtonsoft.Json.JsonConvert.SerializeObject(dt);//<DoWhatPlc.CustomeEvetnArgs>(recData);
string message = "MES|MaterialList_Dif_Resources|" + OpName + "|" + mesValue;
SendMessage.AsyncSendMessage(message);
// 写入MOBY 写入机型信息与清空总成号
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineType, mesValue);
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.EngineID, "");
//通知web显示
SendMessageFun.SendMessage("5", "1", OpName);
}
break;
default: break;
}
}
catch(Exception err)
{
////ApplicationLog.WriteLog(err, "Function08:WebSubmit");
}
}
private void SetMoby(string OpName)
{
try
{
//清空Moby时，需要将MES信号清空
MIS_BASE.Write_ClearMesMoby(OpName);
BaseDataSystemMES.MesServer_Process_EngineTypeOver(OpName);
SendMessageFun.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 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;//显示分线托盘状态
DataTable tempDt;
BaseDataSystemMES.Get_TempData(Opname, "登陆状态", out tempDt);
if (tempDt.Rows.Count > 0) MIS_BASE.WritePLC(54, Opname, tempDt.Rows[0]["数值"]);
Sendmessage("135", "1111", Opname);
MIS_BASE.Read_WorkStart(Opname, out S_WorkStart);
// 查询螺丝号是否存在 存在则发送给前端
string CodeNumber;
MIS_BASE.Read_TagTypeID(125, Opname, out CodeNumber);
if (CodeNumber != "0")
{
SendMessageFun.SendInfomation("CodeNumber", CodeNumber,Opname);
}
// 查询螺丝号下拧紧排序是否存在 存在则发送给前端
string CodeNumberWorkNumber;
MIS_BASE.Read_TagTypeID(126, Opname, out CodeNumberWorkNumber);
if (CodeNumberWorkNumber != "0")
{
SendMessageFun.SendInfomation("CodeNumberWorkNumber", CodeNumberWorkNumber,Opname);
}
//5 显示订单、机型信息 线首工位用
SendMessage.ShowMoby_FirstOpName(Opname);
//3显示操作指导图片 PicShow_String_FirstOpName
SendMessage.PicShow_FirstOpName(Opname);
//1（直接在界面通过选择机型确认工序内容）
SendMessage.ProcessList_FirstOpName(Opname);
//界面显示物料信息
SendMessage.MaterialList_FirstOpName(Opname);
// 新增查询PLC直通状态 网页显示
InitAlarm(Opname);
string S_plcStatus;//DBX501.5 PLC直通，1 强制放行 0 正常循环
// 新增查询PLC直通状态 网页显示
MIS_BASE.Read_TagTypeID(63, Opname, out S_plcStatus);
if (Convert.ToInt32(S_plcStatus) == 0)
{
SendMessageFun.SendInfomation("PlcStatus", "0", Opname);
}
else
{
SendMessageFun.SendInfomation("PlcStatus", "1", Opname);
}
if (S_WorkStart == true)
{
SendMessageFun.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)
{
SendMessageFun.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)
{
SendMessageFun.SendInfomation("FixAllow", Convert.ToString(Convert.ToInt32(S_FixAllow)), Opname);
}
MIS_BASE.Read_MaterialVerifyOver(Opname, out S_MaterialVerifyOver);
if (S_MaterialVerifyOver == true)
{
SendMessageFun.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)//发送匹配完成和匹配结果信息
//{
// SendMessageFun.SendInfomation("MatchingCompleted", "1", Opname);
// SendMessageFun.SendInfomation("Match", "1", Opname);
// SendMessageFun.SendInfomation("MatchSuccess", "1", Opname);//界面显示匹配成功
//}
//else if (IsCompleted == 1 && S_Match == 0)
//{
// SendMessageFun.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");
//SendMessageFun.SendInfomation("ShowMobySubLine", Opname_SubLine, Opname);//显示分线机型及流水号
}
//分线发送工件到位信号函数
private void sendmessage(string OpName, int tagValue, string Command)
{
string SendMessage;
SendMessage = "MES|" + Command + "|" + OpName + "|" + tagValue;
SendMessageFun.AsyncSendMessage(SendMessage);
}
private void InitAlarm(string Opname)
{
FuntionMesRead.Alarm_InitAlarm_Send(Opname, out Hashtable ht);
foreach (DictionaryEntry kv in ht)
{
var TagID = kv.Key.ToString();
var TagValue = kv.Value.ToString();
FuntionMesRead.Send_AlarmMsg(TagID, TagValue);
}
}
}
}

45
MisDataFunction/MesServer.Function/Function1059/OpcServer/WorkIsOk.cs Normal file
View File

@@ -0,0 +1,45 @@
using bizFacade;
using MesServerWork;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace MesServerFunctions
{
partial class FunctionMES
{
/// <summary>
/// 工位合格标志
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void IsOk(object e)
{
try
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
int qualityMask;
MIS_BASE.Read_QualityMask(OpName, out qualityMask);
//判断是否合格
if (qualityMask == 1)
{
qualityMask = 1;
} else {
qualityMask = 0;
}
//通知WEB修改状态
string message = "MES|QualityMask|" + OpName + "|" + qualityMask.ToString();
SendMessage.AsyncSendMessage(message);
}
catch (Exception err)
{
////ApplicationLog.WriteLog(err, "Function02:FalseGO");
}
}
}
}

44
MisDataFunction/MesServer.Function/Function1059/OpcServer/WorkStart.cs Normal file
View File

@@ -0,0 +1,44 @@
using System;
using System.Data;
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)
{
DoWhatPlc.CustomeEvetnArgs msgEvent = (DoWhatPlc.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
int EngineTypeID;//机型代码
string EngineType;//机型
string EngineID;//工件编号
string OrderForm;
//线首显示订单信息
if (tagValue == 1)
{
}
else
{
BaseDataSystemMES.OpName_MIS_MOBY_Insert(OpName, MobyTagType.WorkStartOut, DateTime.Now.ToString());
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);
}
}
}
}

BIN
MisDataFunction/MesServer.Function/Function1059/OpcServer/vssver2.scc Normal file
View File

Binary file not shown.

36
MisDataFunction/MesServer.Function/Function1059/Properties/AssemblyInfo.cs Normal file
View File

@@ -0,0 +1,36 @@
using System.Reflection;
using System.Runtime.CompilerServices;
using System.Runtime.InteropServices;
// 有关程序集的一般信息由以下
// 控制。更改这些特性值可修改
// 与程序集关联的信息。
[assembly: AssemblyTitle("Function1059")]
[assembly: AssemblyDescription("")]
[assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("Function1059")]
[assembly: AssemblyCopyright("Copyright © 2023")]
[assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")]
// 将 ComVisible 设置为 false 会使此程序集中的类型
//对 COM 组件不可见。如果需要从 COM 访问此程序集中的类型
//请将此类型的 ComVisible 特性设置为 true。
[assembly: ComVisible(false)]
// 如果此项目向 COM 公开，则下列 GUID 用于类型库的 ID
[assembly: Guid("3dcc04c0-32bf-4573-91f6-c4e342a0cf2a")]
// 程序集的版本信息由下列四个值组成:
//
// 主版本
// 次版本
// 生成号
// 修订号
//
//可以指定所有这些值，也可以使用“生成号”和“修订号”的默认值
//通过使用 "*"，如下所示:
// [assembly: AssemblyVersion("1.0.*")]
[assembly: AssemblyVersion("1.0.0.0")]
[assembly: AssemblyFileVersion("1.0.0.0")]

19
MisDataFunction/MesServer.Function/Function1059/app.config Normal file
View File

@@ -0,0 +1,19 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly>
<assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral"/>
<bindingRedirect oldVersion="0.0.0.0-13.0.0.0" newVersion="13.0.0.0"/>
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Net.Http" publicKeyToken="b03f5f7f11d50a3a" culture="neutral"/>
<bindingRedirect oldVersion="0.0.0.0-4.2.0.0" newVersion="4.2.0.0"/>
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="MQTTnet" publicKeyToken="b69712f52770c0a7" culture="neutral"/>
<bindingRedirect oldVersion="0.0.0.0-3.0.13.0" newVersion="3.0.13.0"/>
</dependentAssembly>
</assemblyBinding>
</runtime>
<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/></startup></configuration>

5
MisDataFunction/MesServer.Function/Function1059/mssccprj.scc Normal file
View File

@@ -0,0 +1,5 @@
SCC = This is a Source Code Control file
[Function08.csproj]
SCC_Aux_Path = "\\192.168.0.100\vss\MES4.0"
SCC_Project_Name = "$/MisData/MisData/MisData/MesServer.Function/Function08", KRHAAAAA

15
MisDataFunction/MesServer.Function/Function1059/packages.config Normal file
View File

@@ -0,0 +1,15 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="Microsoft.NETCore.Platforms" version="1.1.0" targetFramework="net461" />
<package id="MQTTnet" version="3.0.13" targetFramework="net461" />
<package id="MQTTnet.Extensions.ManagedClient" version="3.0.13" targetFramework="net461" />
<package id="NETStandard.Library" version="2.0.0" targetFramework="net461" />
<package id="Newtonsoft.Json" version="13.0.1" targetFramework="net461" />
<package id="System.Net.Security" version="4.3.2" targetFramework="net461" />
<package id="System.Net.WebSockets" version="4.3.0" targetFramework="net461" />
<package id="System.Net.WebSockets.Client" version="4.3.2" targetFramework="net461" />
<package id="System.Security.Cryptography.Algorithms" version="4.3.0" targetFramework="net461" requireReinstallation="true" />
<package id="System.Security.Cryptography.Encoding" version="4.3.0" targetFramework="net461" />
<package id="System.Security.Cryptography.Primitives" version="4.3.0" targetFramework="net461" />
<package id="System.Security.Cryptography.X509Certificates" version="4.3.0" targetFramework="net461" />
</packages>