init: 导入项目到 meswork Gitea

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

View File

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

View File

@@ -0,0 +1,178 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProductVersion>8.0.30703</ProductVersion>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{B8D5D60E-193D-43FF-8EB6-EA310E5A81E3}</ProjectGuid>
<OutputType>Library</OutputType>
<AppDesignerFolder>Properties</AppDesignerFolder>
<RootNamespace>Function09</RootNamespace>
<AssemblyName>Function09</AssemblyName>
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
<FileAlignment>512</FileAlignment>
<SccProjectName>
</SccProjectName>
<SccLocalPath>
</SccLocalPath>
<SccAuxPath>
</SccAuxPath>
<SccProvider>
</SccProvider>
<TargetFrameworkProfile />
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<Optimize>false</Optimize>
<OutputPath>bin\Debug\</OutputPath>
<DefineConstants>DEBUG;TRACE</DefineConstants>
<ErrorReport>prompt</ErrorReport>
<WarningLevel>4</WarningLevel>
<PlatformTarget>AnyCPU</PlatformTarget>
<UseVSHostingProcess>false</UseVSHostingProcess>
<Prefer32Bit>false</Prefer32Bit>
</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>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
<ItemGroup>
<Reference Include="AsyncIO">
<HintPath>..\..\DLL\AsyncIO.dll</HintPath>
</Reference>
<Reference Include="BasicData">
<HintPath>..\..\DLL\BasicData.dll</HintPath>
</Reference>
<Reference Include="BouncyCastle.Crypto, Version=1.8.5.0, Culture=neutral, PublicKeyToken=0e99375e54769942">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\DLL\BouncyCastle.Crypto.dll</HintPath>
</Reference>
<Reference Include="ConLink">
<HintPath>..\..\DLL\ConLink.dll</HintPath>
</Reference>
<Reference Include="ICSharpCode.SharpZipLib">
<HintPath>..\..\DLL\ICSharpCode.SharpZipLib.dll</HintPath>
</Reference>
<Reference Include="MesControl">
<HintPath>..\..\DLL\MesControl.dll</HintPath>
</Reference>
<Reference Include="MesWork.DeviceDriver">
<HintPath>..\..\DLL\MesWork.DeviceDriver.dll</HintPath>
</Reference>
<Reference Include="MesWork.PLC">
<HintPath>..\..\DLL\MesWork.PLC.dll</HintPath>
</Reference>
<Reference Include="Monitor.MesWork">
<HintPath>..\..\DLL\Monitor.MesWork.dll</HintPath>
</Reference>
<Reference Include="MQTTnet">
<HintPath>..\..\DLL\MQTTnet.dll</HintPath>
</Reference>
<Reference Include="MQTTnet.Extensions.ManagedClient">
<HintPath>..\..\DLL\MQTTnet.Extensions.ManagedClient.dll</HintPath>
</Reference>
<Reference Include="NetMQ">
<HintPath>..\..\DLL\NetMQ.dll</HintPath>
</Reference>
<Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
<HintPath>..\..\packages\Newtonsoft.Json.13.0.1\lib\net45\Newtonsoft.Json.dll</HintPath>
</Reference>
<Reference Include="NPOI">
<HintPath>..\..\DLL\NPOI.dll</HintPath>
</Reference>
<Reference Include="NPOI.OOXML">
<HintPath>..\..\DLL\NPOI.OOXML.dll</HintPath>
</Reference>
<Reference Include="NPOI.OpenXml4Net">
<HintPath>..\..\DLL\NPOI.OpenXml4Net.dll</HintPath>
</Reference>
<Reference Include="NPOI.OpenXmlFormats">
<HintPath>..\..\DLL\NPOI.OpenXmlFormats.dll</HintPath>
</Reference>
<Reference Include="Opc.Ua.Client">
<HintPath>..\..\DLL\Opc.Ua.Client.dll</HintPath>
</Reference>
<Reference Include="Opc.Ua.Configuration">
<HintPath>..\..\DLL\Opc.Ua.Configuration.dll</HintPath>
</Reference>
<Reference Include="Opc.Ua.Core">
<HintPath>..\..\DLL\Opc.Ua.Core.dll</HintPath>
</Reference>
<Reference Include="OpcUaHelper">
<HintPath>..\..\DLL\OpcUaHelper.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Core" />
<Reference Include="System.Drawing" />
<Reference Include="System.Net.Http">
<HintPath>..\..\DLL\System.Net.Http.dll</HintPath>
</Reference>
<Reference Include="System.Net.Http.Formatting, Version=4.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\DLL\System.Net.Http.Formatting.dll</HintPath>
</Reference>
<Reference Include="System.Web.Cors">
<HintPath>..\..\DLL\System.Web.Cors.dll</HintPath>
</Reference>
<Reference Include="System.Web.Http, Version=4.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\DLL\System.Web.Http.dll</HintPath>
</Reference>
<Reference Include="System.Web.Http.Cors">
<HintPath>..\..\DLL\System.Web.Http.Cors.dll</HintPath>
</Reference>
<Reference Include="System.Web.Http.SelfHost, Version=4.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\DLL\System.Web.Http.SelfHost.dll</HintPath>
</Reference>
<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.Xml" />
</ItemGroup>
<ItemGroup>
<Compile Include="DataAccess\DataAccess.cs" />
<Compile Include="MesServerFunction\Fun_09.cs" />
<Compile Include="Methods\EngineGetOverBaseWork.cs" />
<Compile Include="Methods\SubmitToMisweb.cs" />
<Compile Include="Methods\UDP.Send.cs" />
<Compile Include="OpcServer\EngineGetOver.cs" />
<Compile Include="OpcServer\WorkStart.cs" />
<Compile Include="Properties\AssemblyInfo.cs" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\02DataLinkMesWork\00_DataLinkMesWork.csproj">
<Project>{97127b87-d43d-457c-9894-5f2244e4d2e7}</Project>
<Name>00_DataLinkMesWork</Name>
</ProjectReference>
<ProjectReference Include="..\..\MES.BizFacade\02_P1.MIS.BizFacade.csproj">
<Project>{f191342c-2dbe-4865-84c3-6b6a286c7686}</Project>
<Name>02_P1.MIS.BizFacade</Name>
</ProjectReference>
<ProjectReference Include="..\..\MesDataFunction\01_MesDataFunction.csproj">
<Project>{594929d5-60d6-4049-9d3b-a6642b5ccb77}</Project>
<Name>01_MesDataFunction</Name>
</ProjectReference>
</ItemGroup>
<ItemGroup>
<None Include="app.config" />
<None Include="packages.config" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
</Project>

View File

@@ -0,0 +1,10 @@
""
{
"FILE_VERSION" = "9237"
"ENLISTMENT_CHOICE" = "NEVER"
"PROJECT_FILE_RELATIVE_PATH" = "relative:MesServer.Function\\Function09"
"NUMBER_OF_EXCLUDED_FILES" = "0"
"ORIGINAL_PROJECT_FILE_PATH" = ""
"NUMBER_OF_NESTED_PROJECTS" = "0"
"SOURCE_CONTROL_SETTINGS_PROVIDER" = "PROVIDER"
}

View File

@@ -0,0 +1,34 @@
using System.Threading;
namespace MesServerFunctions
{
public partial class Functions_BASE_09
{
/// <summary>
/// 工件到位离开(清空所有的MES信号)
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_WorkStart(OpcData.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(WorkStart, e);
}
/// <summary>
/// 传递机型
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
public void fun_EngineTypeGetOverPLC(OpcData.CustomeEvetnArgs e)
{
ThreadPool.QueueUserWorkItem(EngineTypeGetOver_PLC, e);
}
}
}

View File

@@ -0,0 +1,239 @@
using System;
using System.Data;
using bizFacade;
using MesServerWork;
namespace MesServerFunctions
{
partial class Functions_BASE_09
{
/// <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 SubOpName, int SubEngineTypeID, string SubEngineType, string SubEngineID, int SubPartPallet_Code)
{
int MES_QualityMask = 1;
int IsrepairBarcode = 0;//拆解返修标志
string OpName = "";
string OrderForm = "";//订单号
string repairBarcode = "";//拆解返修条码
DataTable dt;//读取订单信息
BaseDataSystemMES.GetEngineID_Select(SubOpName, SubEngineID, out dt);
if (dt != null)
{
if (dt.Rows.Count > 0)
{
OrderForm = Convert.ToString(dt.Rows[0]["订单号"]);
IsrepairBarcode = Convert.ToInt32(dt.Rows[0]["拆解标志"]);
repairBarcode = Convert.ToString(dt.Rows[0]["拆解返修条码"]);
}
}
//第一步,系统记录到位工件信息,发送总线WEB显示
BaseDataSystemMES.OpName_MIS_MOBY_Insert(SubOpName, OrderForm,SubEngineTypeID, SubEngineType, SubEngineID, SubPartPallet_Code, 0, IsrepairBarcode, repairBarcode);
SaveMobyMessage(OpName, SubEngineTypeID, SubEngineType, SubEngineID, OrderForm);
if (MIS_BASE.hashtable_OpNameRepair.ContainsKey(SubOpName))//获取总工位号
{
OpName = MIS_BASE.hashtable_OpNameRepair[SubOpName].ToString();
}
if (OpName == "")
{
return;
}
SendInfomation("ShowMobySubLine", SubOpName, OpName);
//第二步,判断分线合格标志
MIS_BASE.Read_PalletInfo(SubOpName, out MES_QualityMask);
SendInfomation("SubQualityMask", Convert.ToString(MES_QualityMask), OpName);//将分线合格标志发送到Web页面进行显示
if (MES_QualityMask != 1)
if (MES_QualityMask != 1)
{
//工作完成
MIS_BASE.Write_MaterialVerifyOver(OpName, true);
SendInfomation("NgGO", "1", SubOpName);//显示不合格标志
return;
}
//第三步,匹配
Match(SubOpName, SubEngineID, SubEngineTypeID, SubEngineType);//匹配
}
/// <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.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>
/// <param name="engineID">分线工件号</param>
/// <param name="engineTypeID">分线工件机型代码</param>
/// <param name="engineType">分线工件机型</param>
private void Match(string opName_SubLine, string engineID_SubLine, int engineTypeID_SubLine, string engineType_SubLine)
{
try
{
bool m_EngineGetOver_PLC;
int engineTypeID;
int partPallet_Code;
int PalletInfo = 1;//分线合格标志
string opName = "";//总线工件信息
string engineID;
string engineType;
string AlarmStr;
//读取总线信息(工位号 传递机型 合格标志)
if (MIS_BASE.hashtable_OpNameRepair.ContainsKey(opName_SubLine))//获取总工位号
{
opName = MIS_BASE.hashtable_OpNameRepair[opName_SubLine].ToString();
}
if (opName == "")
{
return;
}
MIS_BASE.Read_EngineGetOver_PLC(opName, out m_EngineGetOver_PLC);//1:读取总线工件到位的传递机型信号。
if (!m_EngineGetOver_PLC) return;//必须工件同时到位才能进行匹配
//判断分线数据是否合格
//if (!BaseDataSystemMES.QulityDataVerify(opName, engineID_SubLine, out AlarmStr) && !BaseDataSystemMES.QualityVerifyStatus_Hash_Read(opName))
//{
// SendInfomation("LineoutAlert", AlarmStr, opName);
// return;
//}
//MIS_BASE.Read_PalletInfo(opName, out PalletInfo);//总线合格标识
//if (PalletInfo != 1) return;//总线不合格时,由人工确认强制匹配
MIS_BASE.GetEngineTypeFromPLC(opName, out engineTypeID, out engineType, out engineID, out partPallet_Code);//获取总线的信息
if (engineType == engineType_SubLine)
{
//分线上总线数据转移
BaseDataSystemMES.MailLineAndSubLineData_Insert(engineID, engineTypeID, engineType, engineID_SubLine);
MIS_BASE.Write_Match(opName, true);//匹配结果
MIS_BASE.Write_MatchingCompleted(opName, true); //匹配完成
//发送匹配结果信息
sendmessage(opName, 1, "Match");//匹配结果
SendInfomation("MatchSuccess", "1", opName);//界面显示匹配成功
MIS_BASE.Write_FixAllow(opName, true);//允许PLC工作
}
else
{
MIS_BASE.Write_Match(opName, false);//匹配结果
MIS_BASE.Write_MatchingCompleted(opName, true);//匹配完成
AsyncSendMessage_Notice(opName, "机型匹配失败");
SendInfomation("MatchSuccess", "0", opName);//界面显示匹配失败
sendmessage(opName, 0, "Match");//匹配结果
}
}
catch
{
}
}
/// <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.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;//必须工件同时到位才能进行匹配
MIS_BASE.GetEngineTypeFromPLC(opName_SubLine, out engineTypeID_SubLine, out engineType_SubLine, out engineID_SubLine, out partPallet_Code_SubLine);//获取分线的信息
MIS_BASE.GetEngineTypeFromPLC(opName, out engineTypeID, out engineType, out engineID, out partPallet_Code);
BaseDataSystemMES.MailLineAndSubLineData_Insert(engineID, engineTypeID, engineType, engineID_SubLine);//分线上总线数据转移
MIS_BASE.Write_Match(opName, true);//匹配结果
MIS_BASE.Write_MatchingCompleted(opName, true);//匹配完成
SendInfomation("MatchSuccess", "1", opName);//界面显示匹配成功
MIS_BASE.Write_FixAllow(opName, true);//允许PLC工作
//发送匹配完成和匹配结果信息
sendmessage(opName, 1, "MatchingComplete");//匹配完成
sendmessage(opName, 1, "Match");//匹配结果
}
catch
{
}
}
}
}

View File

@@ -0,0 +1,141 @@
using System;
using bizFacade;
using SystemFramework;
namespace MesServerFunctions
{
/// <summary>
/// 此类用于向WEB发送各种类型消息
/// </summary>
partial class Functions_BASE_09
{
/// <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>
void Sendmessage(char Num,string Value, string OpName)
{
string SendMessage;
switch (Num)
{
case '1':
//1直接在界面通过选择机型确认工序内容
SendMessage = "MES|ProcessList|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '2':
//2显示物料
SendMessage = "MES|MaterialList|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '3':
//3显示操作指导图片
SendMessage = "MES|PicShow|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '4':
//3显示操作指导图片
SendMessage = "MES|OrderFormList|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '5':
SendMessage = "MES|ShowMoby|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '6':
SendMessage = "MES|MaterialCheckPosition|" + OpName + "|" +Value;
AsyncSendMessage(SendMessage);
break;
case '7':
SendMessage = "MES|WorkStart|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '8':
SendMessage = "MES|OrderFormList|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case '9':
SendMessage = "MES|ConfirmOkGo|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case 'a':
SendMessage = "MES|FixAllow|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case 'b':
SendMessage = "MES|ShaftPosition|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
case 'c':
SendMessage = "MES|ShowQuality|" + OpName + "|" + Value;
AsyncSendMessage(SendMessage);
break;
}
}
/// <summary>
/// 向WEB发送信息value为字符串
/// </summary>
/// <param name="Command">消息种类</param>
/// <param name="Value">消息内容</param>
/// <param name="OpName">工位号</param>
void SendInfomation(string Command, string Value, string OpName)
{
string SendMessage = "MES|" + Command + "|" + OpName + "|" + Value;
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;//在线节拍
BaseDataSystemMES.OpNameCount_New(OpName, out opNameCount, out opNameCountTime); //基本数据_工作日历_班次产量查询_New
SendInfomation("ActuallyCount", opNameCount.ToString() + "&" + opNameCountTime.ToString(), OpName);
}
catch (Exception err)
{
ApplicationLog.WriteLog(err, "Function01:SendActuallyCount");
}
}
}
}
}

View File

@@ -0,0 +1,54 @@
using MesServerWork;
using bizFacade;
using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_09
{
/// <summary>
/// 发送信息到MES通讯服务器或者其他的
/// </summary>
/// <param name="Message"></param>
private void AsyncSendMessage(string Message)
{
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)
{
//System.Threading.Thread.Sleep(10);
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);
}
}
}

View File

@@ -0,0 +1,56 @@
using System;
using MesServerWork;
using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_09
{
/// <summary>
/// PLC传递机型处理
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void EngineTypeGetOver_PLC(object e)
{
try
{
OpcData.CustomeEvetnArgs msgEvent = (OpcData.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
string opName_PrimaryLine="";
//获取总线工位号
if (MIS_BASE.hashtable_OpNameRepair.ContainsKey(OpName))
{
opName_PrimaryLine = MIS_BASE.hashtable_OpNameRepair[OpName].ToString();
}
sendmessage(opName_PrimaryLine, tagValue, "EngineTypeGetOverMES_Subline");
if (tagValue == 1)
{
int EngineTypeID;//机型代码
int PartPallet_Code;//托盘编号
string EngineType;//机型
string EngineID;//工件编号
MIS_BASE.GetEngineTypeFromPLC(OpName, out EngineTypeID, out EngineType, out EngineID, out PartPallet_Code);
if (EngineType == "" || EngineID == "")
{
AsyncSendMessage_Notice(OpName, "传递信号为空值!");
return;
}
EngineTypeGetOver_PLC_Work(OpName, EngineTypeID, EngineType, EngineID, PartPallet_Code);
}
}
catch (Exception err)
{
ApplicationLog.WriteLog(err, "Function09:EngineTypeGetOver_PLC");
}
}
}
}

View File

@@ -0,0 +1,48 @@
using System;
using MesServerWork;
using SystemFramework;
namespace MesServerFunctions
{
partial class Functions_BASE_09
{
/// <summary>
/// 工件到位与离开时清空MES自身信号
/// </summary>
/// <param name="OpName"></param>
/// <param name="tagValue"></param>
private void WorkStart(object e)
{
try
{
OpcData.CustomeEvetnArgs msgEvent = (OpcData.CustomeEvetnArgs)e;
string OpName = Convert.ToString(msgEvent.OpName);
int tagValue = Convert.ToInt32(msgEvent.TagValue);
string opName_PrimaryLine = "";
//获取总线工位号
if (MIS_BASE.hashtable_OpNameRepair.ContainsKey(OpName))
{
opName_PrimaryLine = MIS_BASE.hashtable_OpNameRepair[OpName].ToString();
}
SendInfomation("ClearSubData", "0", opName_PrimaryLine);
sendmessage(opName_PrimaryLine, tagValue, "WorkStart_Subline");//显示分线工件到位、离开信号
}
catch(Exception err)
{
ApplicationLog.WriteLog(err, "Function09:WorkStart");
}
}
//分线发送工件到位信号函数
private void sendmessage(string OpName, int tagValue, string Command)
{
string SendMessage = "MES|" + Command + "|" + OpName + "|" + tagValue;
AsyncSendMessage(SendMessage);
}
}
}

View File

@@ -0,0 +1,36 @@
using System.Reflection;
using System.Runtime.CompilerServices;
using System.Runtime.InteropServices;
// 有关程序集的常规信息通过以下
// 特性集控制。更改这些特性值可修改
// 与程序集关联的信息。
[assembly: AssemblyTitle("Function09")]
[assembly: AssemblyDescription("")]
[assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("苏州宏软信息技术有限公司")]
[assembly: AssemblyProduct("Function09")]
[assembly: AssemblyCopyright("Copyright © 苏州宏软信息技术有限公司 2017")]
[assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")]
// 将 ComVisible 设置为 false 使此程序集中的类型
// 对 COM 组件不可见。如果需要从 COM 访问此程序集中的类型,
// 则将该类型上的 ComVisible 特性设置为 true。
[assembly: ComVisible(false)]
// 如果此项目向 COM 公开,则下列 GUID 用于类型库的 ID
[assembly: Guid("47710f2c-e141-4252-8d13-701bf4c1c027")]
// 程序集的版本信息由下面四个值组成:
//
// 主版本
// 次版本
// 内部版本号
// 修订号
//
// 可以指定所有这些值,也可以使用“内部版本号”和“修订号”的默认值,
// 方法是按如下所示使用“*”:
// [assembly: AssemblyVersion("1.0.*")]
[assembly: AssemblyVersion("1.0.0.0")]
[assembly: AssemblyFileVersion("1.0.0.0")]

View File

@@ -0,0 +1,15 @@
<?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>
</assemblyBinding>
</runtime>
</configuration>

View File

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

View File

@@ -0,0 +1,4 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="Newtonsoft.Json" version="13.0.1" targetFramework="net461" />
</packages>