| | |
| | | //翻斗机 - 瓶坯 |
| | | else if (plc.deviceType == 5) |
| | | { |
| | | AnalysisBottleCapTipper(data, plc); |
| | | |
| | | PpFdjData(data, plc); |
| | | // AnalysisBottleCapTipper(data, plc); |
| | | } |
| | | //翻斗机 - 瓶盖 4 水盖。6 无菌 |
| | | else if (plc.deviceType <= 6) |
| | |
| | | 状态2 送空完成之后为状态2 |
| | | 状态3 满托取走,送空之前为状态3,开机默认状态也为状态3 |
| | | */ |
| | | //3F 00 12 22 0D 0A--无任务信号 |
| | | //3F 00 11 22 0D 0A--A口工作信号 |
| | | //3F 00 12 21 0D 0A--B口信号 |
| | | //3F 00 11 21 0D 0A--A、B口工作信号 |
| | | |
| | | //A口复位信号 - 3F 00 10 0D 0A |
| | | //B口复位信号 - 3F 00 20 0D 0A |
| | | |
| | | if (data.Length == 4) |
| | | { |
| | | if (data.Substring(1, 1) == "1") |
| | | if (data == "1122")//A口工作信号 |
| | | { |
| | | if (BottlePEMInfoFull(plc, plc.location[0])) |
| | | if (BottlePEMInfoFullTwo(plc, plc.location[0])) |
| | | { |
| | | //设备没有托盘,或者已经有任务,不处理满托信号,返回已经取货完成 |
| | | //3F 00 11 0d 0a |
| | | //PlcHelper.SendHex(plc.address, "3F00110d0a"); |
| | | |
| | | } |
| | | } |
| | | else if (data == "1221")//B口工作信号 |
| | | { |
| | | if (BottlePEMInfoFullTwo(plc, plc.location[1])) |
| | | { |
| | | |
| | | } |
| | | } |
| | | else if (data == "1121")//AB口工作信号 |
| | | { |
| | | if (BottlePEMInfoFullTwo(plc, plc.location[0])) |
| | | { |
| | | |
| | | } |
| | | if (BottlePEMInfoFullTwo(plc, plc.location[1])) |
| | | { |
| | | |
| | | } |
| | | } |
| | | |
| | | //if (data.Substring(1, 1) == "1") |
| | | //{ |
| | | // if (BottlePEMInfoFull(plc, plc.location[0])) |
| | | // { |
| | | // //设备没有托盘,或者已经有任务,不处理满托信号,返回已经取货完成 |
| | | // //3F 00 11 0d 0a |
| | | // //PlcHelper.SendHex(plc.address, "3F00110d0a"); |
| | | // } |
| | | //} |
| | | //else if (data.Substring(1, 1) == "3") |
| | | //{ |
| | | // if (BottleCapInfoEmpty(plc, plc.location[0])) |
| | |
| | | // } |
| | | //} |
| | | |
| | | if (data.Substring(3, 1) == "1") |
| | | { |
| | | if (BottlePEMInfoFull(plc, plc.location[1])) |
| | | { |
| | | //PlcHelper.SendHex(plc.address, "3F00210d0a"); |
| | | } |
| | | } |
| | | //if (data.Substring(3, 1) == "1") |
| | | //{ |
| | | // if (BottlePEMInfoFull(plc, plc.location[1])) |
| | | // { |
| | | // //PlcHelper.SendHex(plc.address, "3F00210d0a"); |
| | | // } |
| | | //} |
| | | //else if (data.Substring(3, 1) == "3") |
| | | //{ |
| | | // if (BottleCapInfoEmpty(plc, plc.location[1])) |
| | |
| | | } |
| | | } |
| | | } |
| | | } |
| | | } |
| | | private static object locko = new object(); |
| | | private static object lockoIn = new object(); |
| | | private static object lockoOut = new object(); |
| | | |
| | | /// <summary> |
| | | /// 瓶坯机 |
| | | /// </summary> |
| | | /// <param name="plc"></param> |
| | | /// <param name="location"></param> |
| | | /// <returns></returns> |
| | | static bool BottlePEMInfoFullTwo(Settings.deviceInfo plc, string location) |
| | | { |
| | | try |
| | | { |
| | | lock (locko) |
| | | { |
| | | var chi = new SqlHelper<object>().GetInstance(); |
| | | var newDb = chi.CopyNew(); |
| | | Location endBit = null; |
| | | Location staBit = null; |
| | | bool SentTask = false; |
| | | if (location == "") |
| | | { |
| | | throw new Exception("货位为空"); |
| | | } |
| | | var workOrder = WCSHelper.GetWorkOrder(plc.deviceName); |
| | | if (workOrder == null) |
| | | { |
| | | throw new Exception("没有【执行中】的工单"); |
| | | } |
| | | //先查询货位有没有货 满的下满 空的则上空 |
| | | // = newDb.Queryable<Location>().FindAll(x => x.S_LOCK_STATE == "无" && x.N_CURRENT_NUM == 0); |
| | | var hojs = newDb.Queryable<Location>().Where(e => e.S_LOC_CODE == location).First(); |
| | | if (hojs != null && hojs.S_LOCK_STATE != "无") |
| | | { |
| | | return false; |
| | | } |
| | | var bcpList = WCSHelper.BcpQyOrderList(plc.deviceName); |
| | | if (bcpList.Count() == 0) |
| | | { |
| | | throw new Exception("未划分对应的区域 查看这个产线是否在半成品区域表进行配置 并启用"); |
| | | } |
| | | if (hojs.N_CURRENT_NUM == 0)//上托盘 否则下托盘 |
| | | { |
| | | //上托盘 空框 |
| | | var jcjykk = bcpList.FindAll(e => e.S_CNTR_TYPE == "空托").OrderByDescending(g => g.N_PRI).ToList(); |
| | | var AreaList = jcjykk.Select(e => e.S_AREA_CODE).Distinct().ToList(); |
| | | foreach (var Area in AreaList) |
| | | { |
| | | var Row = jcjykk.FindAll(f => f.S_AREA_CODE == Area).Select(e => e.N_ROW).Distinct().ToList(); |
| | | //过算法 计算起点 |
| | | var staList = GetOutWork(Area, Row); |
| | | if (staList.Any()) |
| | | { |
| | | foreach (var item in jcjykk) |
| | | { |
| | | Location sta = null; |
| | | var staLisL = staList.FindAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW).ToList(); |
| | | if (staLisL.Any()) |
| | | { |
| | | sta = staLisL.OrderByDescending(e => e.N_COL).First(); |
| | | } |
| | | if (sta != null) |
| | | { |
| | | staBit = sta; |
| | | break; |
| | | } |
| | | } |
| | | } |
| | | if (staBit != null) |
| | | { |
| | | break; |
| | | } |
| | | } |
| | | if (staBit != null) |
| | | { |
| | | var _ctrl = LocationHelper.GetLocCntrRel(staBit.S_LOC_CODE); |
| | | int StaLayer = staBit.N_CURRENT_NUM; |
| | | var carryCntrs = new List<string> { _ctrl.FirstOrDefault().S_CNTR_CODE };//DateTime.Now.ToString("yyMMddHHmmss") }; |
| | | var bb = TaskProcess.CreateTransport(workOrder.SQL_WorkNo, staBit.S_LOC_CODE, location, "注塑空拖-出库", carryCntrs, StaLayer, 1, carryCntrs.Count, plc.taskPri); |
| | | if (bb) |
| | | { |
| | | SentTask = true; |
| | | } |
| | | } |
| | | if (SentTask) |
| | | { |
| | | return SentTask; |
| | | } |
| | | } |
| | | else |
| | | { |
| | | var time = LocationHelper.GetT_FULL_TIME(location); |
| | | LogHelper.Info(location + ":托盘放置时间:(" + time + ") 货位托盘数量(" + hojs.N_CURRENT_NUM + ")"); |
| | | if (DateTime.Now.Subtract(time ?? DateTime.Now).TotalMinutes < 1) |
| | | { |
| | | for (var i = 0; i < plc.location.Length; i++) |
| | | { |
| | | if (location == plc.location[i]) |
| | | { |
| | | PlcHelper.SendHex(plc.address, "3F00" + (i + 1) + "0" + "0d0a"); |
| | | break; |
| | | } |
| | | } |
| | | return false; |
| | | } |
| | | |
| | | LocCntrRel _clrel = LocationHelper.GetLocCntrRel(hojs.S_LOC_CODE).FirstOrDefault(); |
| | | //上托盘 满框 |
| | | var jcjykk = bcpList.FindAll(e => e.S_CNTR_TYPE == "满托").OrderByDescending(g => g.N_PRI).ToList(); |
| | | var AreaList = jcjykk.Select(e => e.S_AREA_CODE).Distinct().ToList(); |
| | | |
| | | //过算法 计算起点 |
| | | foreach (var Area in AreaList) |
| | | { |
| | | var Row = jcjykk.Select(e => e.N_ROW).Distinct().ToList(); |
| | | var EndList = GetInWork(Area, Row, true, workOrder.SQL_ItemCode); |
| | | if (EndList.Any()) |
| | | { |
| | | foreach (var item in jcjykk) |
| | | { |
| | | Location End = null; |
| | | var EndListT = EndList.FindAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW).ToList(); |
| | | if (EndListT.Count() > 0) |
| | | { |
| | | End = EndListT.OrderBy(e => e.N_COL).First(); |
| | | } |
| | | if (End != null) |
| | | { |
| | | endBit = End; |
| | | break; |
| | | } |
| | | } |
| | | } |
| | | if (endBit != null) |
| | | { |
| | | break; |
| | | } |
| | | } |
| | | if (endBit != null) |
| | | { |
| | | var _ctrl = LocationHelper.GetLocCntrRel(location); |
| | | List<CntrItemRel> RItem = new List<CntrItemRel>(); |
| | | foreach (var item in _ctrl) |
| | | { |
| | | |
| | | var r = new CntrItemRel |
| | | { |
| | | S_CNTR_CODE = item.S_CNTR_CODE, |
| | | S_ITEM_CODE = workOrder.SQL_ItemCode, |
| | | S_ITEM_NAME = workOrder.SQL_ItemName, |
| | | F_QTY = workOrder.SQL_UsingNowTotal, |
| | | S_ORDER_NO = workOrder.SQL_WorkNo, |
| | | S_BATCH_NO = workOrder.SQL_BatchNo |
| | | }; |
| | | RItem.Add(r); |
| | | var cntrrel = ContainerHelper.GetCntrItemRel(item.S_CNTR_CODE).FirstOrDefault(); |
| | | if (cntrrel != null) |
| | | { |
| | | newDb.Deleteable<CntrItemRel>().Where(it => it.S_ID.Trim() == cntrrel.S_ID.Trim()).ExecuteCommand(); |
| | | } |
| | | } |
| | | var ggf = newDb.Insertable(RItem).ExecuteCommand(); |
| | | if (ggf > 0) |
| | | { |
| | | int endLayer = endBit.N_CURRENT_NUM + 1; |
| | | var carryCntrs = new List<string> { _ctrl.FirstOrDefault().S_CNTR_CODE };//DateTime.Now.ToString("yyMMddHHmmss") }; |
| | | var bb = TaskProcess.CreateTransport(workOrder.SQL_WorkNo, location, endBit.S_LOC_CODE, "注塑满托-入库", carryCntrs, 1, endLayer, carryCntrs.Count, plc.taskPri); |
| | | if (bb) |
| | | { |
| | | SentTask = true; |
| | | //触发自动解绑 |
| | | //var zdjb = jcjykk.FindAll(e => e.SQL_UsingNow == "Y").OrderByDescending(g => g.N_PRI).ToList(); |
| | | //foreach (var item in zdjb) |
| | | //{ |
| | | |
| | | //} |
| | | //var Jb = newDb.Queryable<Location>().Where(e => e.S_AREA_CODE == Area && Row.Contains(e.N_ROW)).ToList(); |
| | | ////查询第一排是否满 并且第二排入满三个后解绑第一排 |
| | | ////1.查询第一排是否有空货位 有 则跳过 |
| | | } |
| | | } |
| | | } |
| | | if (SentTask) |
| | | { |
| | | return SentTask; |
| | | } |
| | | |
| | | } |
| | | return true; |
| | | } |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Info(plc.deviceName + $" 报错: {ex.Message}"); |
| | | return false; |
| | | } |
| | | } |
| | | |
| | | /// <summary> |
| | | /// 瓶坯算法--出库 |
| | | /// </summary> |
| | | /// <param name="AreaCode"></param> |
| | | /// <param name="Row"></param> |
| | | /// <param name="ItemCode"></param> |
| | | /// <returns></returns> |
| | | public static List<Location> GetOutWork(string AreaCode, List<int> Row, bool InOutLock = true, string ItemCode = "") |
| | | { |
| | | var lstCanOutL = new List<Location>(); |
| | | try |
| | | { |
| | | var chi = new SqlHelper<object>().GetInstance(); |
| | | var newDb = chi.CopyNew(); |
| | | var ca = Expressionable.Create<Location, LocCntrRel, CntrItemRel>(); |
| | | if (string.IsNullOrEmpty(ItemCode))//算空托 |
| | | { |
| | | ca.And((o, p, t) => o.N_CURRENT_NUM > 0 && o.S_LOCK_STATE == "无" && string.IsNullOrEmpty(t.S_ITEM_CODE) && o.S_AREA_CODE == AreaCode); |
| | | ca.AndIF(Row.Count() > 0, (o, p, t) => Row.Contains(o.N_ROW)); |
| | | lstCanOutL = newDb.Queryable<Location>().InnerJoin<LocCntrRel>((o, p) => o.S_LOC_CODE == p.S_LOC_CODE).LeftJoin<CntrItemRel>((o, p, t) => p.S_CNTR_CODE == t.S_CNTR_CODE).Where(ca.ToExpression()).ToList(); |
| | | } |
| | | else//算满托 |
| | | { |
| | | ca.And((o, p, t) => o.N_CURRENT_NUM > 0 && o.S_LOCK_STATE == "无" && t.S_ITEM_CODE == ItemCode && o.S_AREA_CODE == AreaCode); |
| | | ca.AndIF(Row.Count() > 0, (o, p, t) => Row.Contains(o.N_ROW)); |
| | | lstCanOutL = newDb.Queryable<Location>().InnerJoin<LocCntrRel>((o, p) => o.S_LOC_CODE == p.S_LOC_CODE).InnerJoin<CntrItemRel>((o, p, t) => p.S_CNTR_CODE == t.S_CNTR_CODE).Where(ca.ToExpression()).ToList(); |
| | | } |
| | | //地堆专门算法过滤 |
| | | if (lstCanOutL.Count() > 0) |
| | | { |
| | | var Inloca = Expressionable.Create<Location>(); |
| | | Inloca.And(it => it.S_AREA_CODE == AreaCode); |
| | | Inloca.AndIF(Row.Count() > 0, o => Row.Contains(o.N_ROW)); |
| | | var locationInLock = newDb.Queryable<Location>().Where(Inloca.ToExpression()).ToList(); |
| | | //空间锁 排除一整排 |
| | | var KjLick = locationInLock.FindAll(e => e.S_LOCK_STATE == "空间锁").ToList(); |
| | | if (KjLick.Count() > 0) |
| | | { |
| | | foreach (var item in KjLick) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW); |
| | | } |
| | | } |
| | | if (InOutLock) |
| | | { |
| | | var CkLick = locationInLock.FindAll(e => e.S_LOCK_STATE == "出库锁").ToList(); |
| | | if (CkLick.Count() > 0) |
| | | { |
| | | foreach (var item in CkLick) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW); |
| | | } |
| | | } |
| | | var OutLick = locationInLock.FindAll(e => e.S_LOCK_STATE == "入库锁").ToList(); |
| | | if (OutLick.Count() > 0) |
| | | { |
| | | foreach (var item in OutLick) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW); |
| | | } |
| | | } |
| | | } |
| | | |
| | | |
| | | } |
| | | return lstCanOutL; |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Info("瓶坯算法" + $" 报错: {ex.Message}"); |
| | | return lstCanOutL; |
| | | } |
| | | } |
| | | |
| | | /// <summary> |
| | | /// 瓶坯算法--入库 |
| | | /// </summary> |
| | | /// <param name="AreaCode"></param> |
| | | /// <param name="Row"></param> |
| | | /// <param name="ItemCode"></param> |
| | | /// <returns></returns> |
| | | public static List<Location> GetInWork(string AreaCode, List<int> Row, bool InOutLock = true, string ItemCode = "", string Jt = "") |
| | | { |
| | | var lstCanOutL = new List<Location>(); |
| | | try |
| | | { |
| | | lock (lockoIn) |
| | | { |
| | | var chi = new SqlHelper<object>().GetInstance(); |
| | | var newDb = chi.CopyNew(); |
| | | var ca = Expressionable.Create<Location, LocCntrRel, CntrItemRel>(); |
| | | ca.And((o, p, t) => o.N_CURRENT_NUM == 0 && o.S_LOCK_STATE == "无" && string.IsNullOrEmpty(p.S_CNTR_CODE) && string.IsNullOrEmpty(t.S_ITEM_CODE) && o.S_AREA_CODE == AreaCode); |
| | | ca.AndIF(Row.Count() > 0, (o, p, t) => Row.Contains(o.N_ROW)); |
| | | lstCanOutL = newDb.Queryable<Location>().LeftJoin<LocCntrRel>((o, p) => o.S_LOC_CODE == p.S_LOC_CODE).LeftJoin<CntrItemRel>((o, p, t) => p.S_CNTR_CODE == t.S_CNTR_CODE).Where(ca.ToExpression()).ToList(); |
| | | |
| | | var Inloca = Expressionable.Create<Location>(); |
| | | Inloca.And(it => it.S_AREA_CODE == AreaCode); |
| | | Inloca.AndIF(Row.Count() > 0, o => Row.Contains(o.N_ROW)); |
| | | var locationInLock = newDb.Queryable<Location>().Where(Inloca.ToExpression()).ToList(); |
| | | |
| | | //地堆专门算法过滤 |
| | | if (lstCanOutL.Count() > 0) |
| | | { |
| | | //空间锁 排除一整排 |
| | | var KjLick = locationInLock.FindAll(e => e.S_LOCK_STATE == "空间锁").ToList(); |
| | | if (KjLick.Count() > 0) |
| | | { |
| | | foreach (var item in KjLick) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW); |
| | | } |
| | | } |
| | | |
| | | //获取指定库区 指定排 满的货位 然后排除 比最大列还小的空货位 |
| | | var Mhw = locationInLock.FindAll(e => e.N_CURRENT_NUM > 0).ToList(); |
| | | if (Mhw.Count() > 0) |
| | | { |
| | | var RowLis = Mhw.GroupBy(e => e.N_ROW).Select(f => f.First()).ToList(); |
| | | foreach (var item in RowLis) |
| | | { |
| | | var MaxCol = Mhw.FindAll(e => e.N_ROW == item.N_ROW).OrderByDescending(c => c.N_COL).FirstOrDefault(); |
| | | if (MaxCol != null) |
| | | { |
| | | if (!string.IsNullOrEmpty(ItemCode) && AreaCode == "QXPPXXQ") |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW && e.N_COL < MaxCol.N_COL); |
| | | } |
| | | else if (AreaCode == "QXPPXXQ" && Jt == "翻斗机") |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW && e.N_COL > MaxCol.N_COL); |
| | | } |
| | | //if (!string.IsNullOrEmpty(ItemCode) && AreaCode == "QXPPXXQ") |
| | | //{ |
| | | // lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW && e.N_COL < MaxCol.N_COL); |
| | | //} |
| | | //else |
| | | //{ |
| | | // lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW && e.N_COL > MaxCol.N_COL); |
| | | //} |
| | | } |
| | | } |
| | | |
| | | //排除别的物料所在的排 |
| | | if (!string.IsNullOrEmpty(ItemCode)) |
| | | { |
| | | var fzRow = Mhw.Select(e => e.N_ROW).Distinct().ToList(); |
| | | foreach (var item in fzRow) |
| | | { |
| | | var mtlo = Mhw.FindAll(e => e.N_ROW == item).FirstOrDefault(); |
| | | if (mtlo != null) |
| | | { |
| | | var _clrel = LocationHelper.GetLocCntrRel(mtlo.S_LOC_CODE).FirstOrDefault(); |
| | | if (_clrel != null) |
| | | { |
| | | var cntritems = ContainerHelper.GetCntrItemRel(_clrel.S_CNTR_CODE).FirstOrDefault(); |
| | | if (cntritems != null) |
| | | { |
| | | if (cntritems.S_ITEM_CODE != ItemCode) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == mtlo.S_AREA_CODE && e.N_ROW == mtlo.N_ROW); |
| | | } |
| | | } |
| | | } |
| | | |
| | | } |
| | | } |
| | | } |
| | | } |
| | | if (InOutLock) |
| | | { |
| | | var CkLick = locationInLock.FindAll(e => e.S_LOCK_STATE == "出库锁").ToList(); |
| | | if (KjLick.Count() > 0) |
| | | { |
| | | foreach (var item in KjLick) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW); |
| | | } |
| | | } |
| | | var OutLick = locationInLock.FindAll(e => e.S_LOCK_STATE == "入库锁").ToList(); |
| | | if (KjLick.Count() > 0) |
| | | { |
| | | foreach (var item in KjLick) |
| | | { |
| | | lstCanOutL.RemoveAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW); |
| | | } |
| | | } |
| | | } |
| | | } |
| | | return lstCanOutL; |
| | | } |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Info("瓶坯算法" + $" 报错: {ex.Message}"); |
| | | return lstCanOutL; |
| | | } |
| | | } |
| | | |
| | |
| | | if (endBit == null && _tempList.Any()) |
| | | { |
| | | LogHelper.Info(" ar_RplaceRow over!" + JsonConvert.SerializeObject(_tempList.Select(x => x.N_ROW).Distinct())); |
| | | var ar_RplaceRows = LocationHelper.GetLocList(x => x.S_AREA_CODE != area1 && x.S_AREA_CODE.Contains(are) && x.S_LOCK_STATE != "报废");//.Select(x => x.N_ROW).Distinct(); |
| | | //var ar_RplaceRow1 = ar_RplaceRows.FindAll(x => x.S_LOCK_STATE != "无").Select(x => x.N_ROW).Distinct(); |
| | | IEnumerable<int> ar_RplaceRow1 = ar_RplaceRows.FindAll(x => "入库锁;出库锁".Contains(x.S_LOCK_STATE?.Trim())).Select(x => x.N_ROW).Distinct(); |
| | | LogHelper.Info(" 有锁排 - " + JsonConvert.SerializeObject(ar_RplaceRow1)); //LogHelper.Info(" 有锁排 - " + JsonConvert.SerializeObject(ar_RplaceRow1)); |
| | | var ar_RplaceRow2 = ar_RplaceRows.FindAll(x => x.N_CURRENT_NUM > 0).Select(x => x.N_ROW).Distinct(); |
| | | LogHelper.Info(" 有货排: - " + JsonConvert.SerializeObject(ar_RplaceRow2)); |
| | | var ar_RplaceRow_rowlock = LocationHelper.GetRowLock(x => x.S_AREA_CODE.Contains(are))?.Select(x => x.N_ROW); |
| | | //var ar_RplaceRows = LocationHelper.GetLocList(x => x.S_AREA_CODE != area1 && x.S_AREA_CODE.Contains(are) && x.S_LOCK_STATE != "报废");//.Select(x => x.N_ROW).Distinct(); |
| | | // //var ar_RplaceRow1 = ar_RplaceRows.FindAll(x => x.S_LOCK_STATE != "无").Select(x => x.N_ROW).Distinct(); |
| | | //IEnumerable<int> ar_RplaceRow1 = ar_RplaceRows.FindAll(x => "入库锁;出库锁".Contains(x.S_LOCK_STATE?.Trim())).Select(x => x.N_ROW).Distinct(); |
| | | //LogHelper.Info(" 有锁排 - " + JsonConvert.SerializeObject(ar_RplaceRow1)); //LogHelper.Info(" 有锁排 - " + JsonConvert.SerializeObject(ar_RplaceRow1)); |
| | | //var ar_RplaceRow2 = ar_RplaceRows.FindAll(x => x.N_CURRENT_NUM > 0).Select(x => x.N_ROW).Distinct(); |
| | | //LogHelper.Info(" 有货排: - " + JsonConvert.SerializeObject(ar_RplaceRow2)); |
| | | //var ar_RplaceRow_rowlock = LocationHelper.GetRowLock(x => x.S_AREA_CODE.Contains(are))?.Select(x => x.N_ROW); |
| | | |
| | | var ar_RplaceRow = ar_RplaceRow1.Concat(ar_RplaceRow2).Concat(ar_RplaceRow_rowlock).Distinct(); |
| | | //var ar_RplaceRow = ar_RplaceRow1.Concat(ar_RplaceRow2).Concat(ar_RplaceRow_rowlock).Distinct(); |
| | | |
| | | if (ar_RplaceRow.Any()) |
| | | { |
| | | LogHelper.Info("排除非空排 - " + JsonConvert.SerializeObject(ar_RplaceRow)); |
| | | _tempList.RemoveAll(x => ar_RplaceRow.Contains(x.N_ROW)); |
| | | } |
| | | if (_tempList.Any())//三个库区的交集空排 |
| | | { |
| | | endBit = _tempList.OrderBy(x => x.N_ROW).ThenBy(x => x.N_COL).FirstOrDefault(); |
| | | } |
| | | //if (ar_RplaceRow.Any()) |
| | | //{ |
| | | // LogHelper.Info("排除非空排 - " + JsonConvert.SerializeObject(ar_RplaceRow)); |
| | | // _tempList.RemoveAll(x => ar_RplaceRow.Contains(x.N_ROW)); |
| | | //} |
| | | //if (_tempList.Any())//三个库区的交集空排 |
| | | //{ |
| | | // endBit = _tempList.OrderBy(x => x.N_ROW).ThenBy(x => x.N_COL).FirstOrDefault(); |
| | | //} |
| | | endBit = _tempList.OrderBy(x => x.N_ROW).ThenBy(x => x.N_COL).FirstOrDefault(); |
| | | } |
| | | |
| | | #endregion |
| | |
| | | return result; |
| | | } |
| | | |
| | | public static void PpFdjData(string Data, Settings.deviceInfo plc) |
| | | { |
| | | try |
| | | { |
| | | if (Data.Length == 2) |
| | | { |
| | | if (Data == "11") |
| | | { |
| | | BottlePpFdjFullTwo(plc, plc.location[0]); |
| | | } |
| | | } |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | |
| | | throw; |
| | | } |
| | | } |
| | | private static object lockoPp = new object(); |
| | | /// <summary> |
| | | /// 瓶坯翻斗机 |
| | | /// </summary> |
| | | /// <param name="plc"></param> |
| | | /// <param name="location"></param> |
| | | /// <returns></returns> |
| | | static bool BottlePpFdjFullTwo(Settings.deviceInfo plc, string location) |
| | | { |
| | | try |
| | | { |
| | | lock (lockoPp) |
| | | { |
| | | var chi = new SqlHelper<object>().GetInstance(); |
| | | var newDb = chi.CopyNew(); |
| | | Location endBit = null; |
| | | Location staBit = null; |
| | | bool SentTask = false; |
| | | if (location == "") |
| | | { |
| | | throw new Exception("货位为空"); |
| | | } |
| | | var workOrder = WCSHelper.GetWorkOrder(plc.deviceName); |
| | | if (workOrder == null) |
| | | { |
| | | throw new Exception("没有【执行中】的工单"); |
| | | } |
| | | //先查询货位有没有货 满的下满 空的则上空 |
| | | // = newDb.Queryable<Location>().FindAll(x => x.S_LOCK_STATE == "无" && x.N_CURRENT_NUM == 0); |
| | | var hojs = newDb.Queryable<Location>().Where(e => e.S_LOC_CODE == location).First(); |
| | | if (hojs != null && hojs.S_LOCK_STATE != "无") |
| | | { |
| | | return false; |
| | | } |
| | | var bcpList = WCSHelper.BcpQyOrderList(plc.deviceName); |
| | | if (bcpList.Count() == 0) |
| | | { |
| | | throw new Exception("未划分对应的区域 查看这个产线是否在半成品区域表进行配置 并启用"); |
| | | } |
| | | if (hojs.N_CURRENT_NUM == 0)//上托盘 否则下托盘 |
| | | { |
| | | //上托盘 满托 |
| | | var jcjykk = bcpList.FindAll(e => e.S_CNTR_TYPE == "满托").OrderByDescending(g => g.N_PRI).ToList(); |
| | | var AreaList = jcjykk.Select(e => e.S_AREA_CODE).Distinct().ToList(); |
| | | foreach (var Area in AreaList) |
| | | { |
| | | var Row = jcjykk.FindAll(f => f.S_AREA_CODE == Area).Select(e => e.N_ROW).Distinct().ToList(); |
| | | //过算法 计算起点 |
| | | var staList = GetOutWork(Area, Row, true, workOrder.SQL_ItemCode); |
| | | if (staList.Any()) |
| | | { |
| | | foreach (var item in jcjykk) |
| | | { |
| | | Location sta = null; |
| | | var staLisL = staList.FindAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW).ToList(); |
| | | if (staLisL.Any()) |
| | | { |
| | | if (item.S_AREA_CODE != "QXPPXXQ") |
| | | { |
| | | sta = staLisL.OrderByDescending(e => e.N_COL).First(); |
| | | } |
| | | else |
| | | { |
| | | sta = staLisL.OrderBy(e => e.N_COL).First(); |
| | | } |
| | | |
| | | } |
| | | if (sta != null) |
| | | { |
| | | staBit = sta; |
| | | break; |
| | | } |
| | | } |
| | | } |
| | | if (staBit != null) |
| | | { |
| | | break; |
| | | } |
| | | } |
| | | if (staBit != null) |
| | | { |
| | | var _ctrl = LocationHelper.GetLocCntrRel(staBit.S_LOC_CODE); |
| | | int StaLayer = staBit.N_CURRENT_NUM; |
| | | var carryCntrs = new List<string> { _ctrl.FirstOrDefault().S_CNTR_CODE };//DateTime.Now.ToString("yyMMddHHmmss") }; |
| | | var bb = TaskProcess.CreateTransport(workOrder.SQL_WorkNo, staBit.S_LOC_CODE, location, "瓶坯翻斗机满托-出库", carryCntrs, StaLayer, 1, carryCntrs.Count, plc.taskPri); |
| | | if (bb) |
| | | { |
| | | SentTask = true; |
| | | } |
| | | } |
| | | if (SentTask) |
| | | { |
| | | return SentTask; |
| | | } |
| | | } |
| | | else |
| | | { |
| | | var time = LocationHelper.GetT_FULL_TIME(location); |
| | | LogHelper.Info(location + ":托盘放置时间:(" + time + ") 货位托盘数量(" + hojs.N_CURRENT_NUM + ")"); |
| | | if (DateTime.Now.Subtract(time ?? DateTime.Now).TotalMinutes < 1) |
| | | { |
| | | PlcHelper.SendHex(plc.address, "3F00110D0A"); |
| | | return false; |
| | | } |
| | | LocCntrRel _clrel = LocationHelper.GetLocCntrRel(hojs.S_LOC_CODE).FirstOrDefault(); |
| | | //下托盘 空框 |
| | | var jcjykk = bcpList.FindAll(e => e.S_CNTR_TYPE == "空托").OrderByDescending(g => g.N_PRI).ToList(); |
| | | var AreaList = jcjykk.Select(e => e.S_AREA_CODE).Distinct().ToList(); |
| | | |
| | | //过算法 计算起点 |
| | | foreach (var Area in AreaList) |
| | | { |
| | | var Row = jcjykk.Select(e => e.N_ROW).Distinct().ToList(); |
| | | var EndList = GetInWork(Area, Row, true, "", "翻斗机"); |
| | | if (EndList.Any()) |
| | | { |
| | | foreach (var item in jcjykk) |
| | | { |
| | | Location End = null; |
| | | var EndListT = EndList.FindAll(e => e.S_AREA_CODE == item.S_AREA_CODE && e.N_ROW == item.N_ROW).ToList(); |
| | | if (EndListT.Count() > 0) |
| | | { |
| | | if (item.S_AREA_CODE != "QXPPXXQ") |
| | | { |
| | | End = EndListT.OrderBy(e => e.N_COL).First(); |
| | | } |
| | | else |
| | | { |
| | | End = EndListT.OrderByDescending(e => e.N_COL).First(); |
| | | } |
| | | } |
| | | if (End != null) |
| | | { |
| | | endBit = End; |
| | | break; |
| | | } |
| | | } |
| | | } |
| | | if (endBit != null) |
| | | { |
| | | break; |
| | | } |
| | | } |
| | | if (endBit != null) |
| | | { |
| | | var _ctrl = LocationHelper.GetLocCntrRel(location); |
| | | var ggf = 0; |
| | | foreach (var item in _ctrl) |
| | | { |
| | | var cntrrel = ContainerHelper.GetCntrItemRel(item.S_CNTR_CODE).FirstOrDefault(); |
| | | if (cntrrel != null) |
| | | { |
| | | ggf = newDb.Deleteable<CntrItemRel>().Where(it => it.S_ID.Trim() == cntrrel.S_ID.Trim()).ExecuteCommand(); |
| | | } |
| | | } |
| | | //if (ggf > 0) |
| | | //{ |
| | | int endLayer = endBit.N_CURRENT_NUM + 1; |
| | | var carryCntrs = new List<string> { _ctrl.FirstOrDefault().S_CNTR_CODE }; |
| | | var bb = TaskProcess.CreateTransport(workOrder.SQL_WorkNo, location, endBit.S_LOC_CODE, "瓶坯翻斗机空托-入库", carryCntrs, 1, endLayer, carryCntrs.Count, plc.taskPri); |
| | | if (bb) |
| | | { |
| | | SentTask = true; |
| | | //触发自动解绑 |
| | | //var zdjb = jcjykk.FindAll(e => e.SQL_UsingNow == "Y").OrderByDescending(g => g.N_PRI).ToList(); |
| | | //foreach (var item in zdjb) |
| | | //{ |
| | | |
| | | //} |
| | | //var Jb = newDb.Queryable<Location>().Where(e => e.S_AREA_CODE == Area && Row.Contains(e.N_ROW)).ToList(); |
| | | ////查询第一排是否满 并且第二排入满三个后解绑第一排 |
| | | ////1.查询第一排是否有空货位 有 则跳过 |
| | | } |
| | | // } |
| | | } |
| | | if (SentTask) |
| | | { |
| | | return SentTask; |
| | | } |
| | | |
| | | } |
| | | return true; |
| | | } |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Info(plc.deviceName + $" 报错: {ex.Message}"); |
| | | return false; |
| | | } |
| | | } |
| | | |
| | | |
| | | |
| | |
| | | |
| | | internal static void AnalysisBottleCapTipper(string data, Settings.deviceInfo plc) |
| | | { |
| | | //LogHelper.Info($"{plc.deviceName}-{plc.address}-{plc.deviceType}-data:{data}。 "); |
| | | bool containsKey = true; |
| | | int llll = 0; |
| | | if (!FJD_wwwwFD.TryGetValue(plc.deviceName.Trim(), out llll)) |
| | |
| | | bool flag = data.Length == 2; |
| | | if (flag) |
| | | { |
| | | //LogHelper.Info(string.Concat(new string[] |
| | | //{ |
| | | // "翻斗机门 ", |
| | | // plc.deviceNo[1], |
| | | // " - 信号: ", |
| | | // data, |
| | | // " 门状态:(1开2关) ", |
| | | // data.Substring(3, 1) |
| | | // }), "自动门"); |
| | | string s = "2";// data.Substring(3, 1); |
| | | string s = "2"; |
| | | |
| | | //bool flag4 = DeviceProcess.doorStatus.Keys.Contains(plc.deviceNo[1]); |
| | | //if (flag4) |
| | | //{ |
| | | // DeviceProcess.doorStatus[plc.deviceNo[1]].info = s; |
| | | // DeviceProcess.doorStatus[plc.deviceNo[1]].modify = DateTime.Now; |
| | | //} |
| | | //else |
| | | //{ |
| | | // DeviceProcess.doorStatus.Add(plc.deviceNo[1], new DeviceProcess.signalInfo |
| | | // { |
| | | // info = data.Substring(3, 1), |
| | | // modify = DateTime.Now |
| | | // }); |
| | | //} |
| | | //if (data.Substring(1, 1) == "1") |
| | | //{ |
| | | // LogHelper.Info(plc.location[0] + "读到11信号。(12信号持续数量):" + llll); |
| | | // if (llll < 10) |
| | | // { |
| | | // llll = 0; |
| | | // LogHelper.Info(plc.deviceName + "读到11信号,或连续12信号不足10次"); |
| | | // if (containsKey) |
| | | // FJD_wwwwFD[plc.deviceName.Trim()] = llll; |
| | | // else FJD_wwwwFD.Add(plc.deviceName.Trim(), llll); |
| | | |
| | | // return; |
| | | // } |
| | | //} |
| | | //else |
| | | if (data.Substring(1, 1) == "0" || data.Substring(1, 1) == "2") |
| | | { |
| | | LogHelper.Info(plc.location[0] + $"读到1 0/2信号。(1 0/2信号持续数量):" + llll); |
| | |
| | | else FJD_wwwwFD.Add(plc.deviceName.Trim(), llll); |
| | | } |
| | | |
| | | //if (llll < 10) |
| | | //{ |
| | | // LogHelper.Info(plc.deviceName + "读到11信号 ,或连续12信号不足10次(" + llll + "次)"); |
| | | // return; |
| | | //} |
| | | |
| | | |
| | | LogHelper.Info(plc.deviceName + "查看翻斗鸡空筐位" + (data.Substring(1, 1) == "1").ToString() + LocationHelper.CheckLocFree(plc.location[0]).ToString(), "翻斗机"); |
| | | bool flag5 = data.Substring(1, 1) == "1" && LocationHelper.CheckLocFree(plc.location[0]) && s == "2"; |
| | |
| | | } |
| | | else |
| | | { |
| | | //if (llll > 10) |
| | | //{ |
| | | // LogHelper.Info(plc.deviceName + "交管给翻斗信号后还没有翻斗", "翻斗机"); |
| | | // return; |
| | | //} |
| | | //else |
| | | //{ |
| | | // LogHelper.Info(plc.deviceName + "交管给翻斗信号后 已翻斗:" + llll, "翻斗机"); |
| | | //} |
| | | |
| | | |
| | | WorkOrder workOrder = WCSHelper.GetWorkOrder(plc.deviceName); |
| | | bool flag7 = workOrder == null; |
| | |
| | | if (flag11 > 30) |
| | | { |
| | | |
| | | //if (data.Substring(1, 1) == "1") |
| | | //{ |
| | | |
| | | LogHelper.Info(plc.location[0] + "读到11信号。(1 0/2信号持续数量):" + llll); |
| | | //if (flag11 < 3.0) |
| | | |
| | | if (llll < 0) |
| | | { |
| | | //llll = 0; |
| | | |
| | | LogHelper.Info(plc.deviceName + "读到11信号,但是没出现过1 0/2"); |
| | | //if (containsKey) |
| | | // FJD_wwwwFD[plc.deviceName.Trim()] = llll; |
| | | //else FJD_wwwwFD.Add(plc.deviceName.Trim(), llll); |
| | | |
| | | |
| | | return; |
| | | } |
| | | //} |
| | | |
| | | var b = TaskProcess.FDJTakeEmpyt2(plc, workOrder); |
| | | |
| | |
| | | } |
| | | else |
| | | { |
| | | ///- |
| | | LogHelper.Info($"{plc.deviceName} 货位 {plc.location} 满框卸货不足30S缓冲时间。 "); |
| | | |
| | | //if (time != null && DateTime.Now.Subtract(time ?? DateTime.Now).TotalSeconds < 30) |
| | | //{ |
| | | LogHelper.Info($"翻斗机满框放下时间{time}不足30秒, 回写翻斗信号", "翻斗机"); |
| | | PlcHelper.SendHex(plc.address, $"3f 00 11 0d 0a"); |
| | | |
| | | if (containsKey) |
| | | FJD_wwwwFD[plc.deviceName.Trim()] = 0; |
| | | else FJD_wwwwFD.Add(plc.deviceName.Trim(), 0); |
| | | |
| | | return; |
| | | //} |
| | | } |
| | | } |
| | | } |