Skip to content
切换导航条
切换导航条
当前项目
正在载入...
登录
孙克
/
RC1250-AssemblyLine
转到一个项目
切换导航栏
切换导航栏固定状态
项目
群组
代码片段
帮助
项目
活动
版本库
流水线
图表
问题
0
合并请求
0
维基
网络
创建新的问题
作业
提交
问题看板
文件
提交
网络
比较
分支
标签
Commit 0a095af6
由
LN
编写于
2020-11-12 13:30:50 +0800
浏览文件
选项
浏览文件
标签
下载
电子邮件补丁
差异文件
入库,清理托盘信息时再清理入库任务。
1 个父辈
197f0d7f
显示空白字符变更
内嵌
并排
正在显示
1 个修改的文件
包含
33 行增加
和
3 行删除
source/DeviceLibrary/assemblyLine/MoveEquip_Partial.cs
source/DeviceLibrary/assemblyLine/MoveEquip_Partial.cs
查看文件 @
0a095af
...
...
@@ -312,9 +312,10 @@ namespace OnlineStore.DeviceLibrary
{
int
num
=
MoveInfo
.
MoveParam
.
TrayNumber
;
MoveInfo
.
NextMoveStep
(
LineMoveStep
.
MI_10_WaitBox
);
LogInfo
(
"入库【"
+
posId
+
"】 "
+
MoveInfo
.
SLog
+
": 等待box可入库,更新托盘【"
+
num
+
"】为空盘"
);
LogInfo
(
"入库【"
+
posId
+
"】 "
+
MoveInfo
.
SLog
+
": 等待box可入库,更新托盘【"
+
num
+
"】为空盘
,清理入库任务
"
);
MoveInfo
.
WaitList
.
Add
(
WaitResultInfo
.
WaitBoxCanReviceTray
());
TrayManager
.
UpdateTrayInfo
(
num
);
RemoveInStore
(
MoveInfo
.
MoveParam
);
InLog
(
"放托盘(放开阻挡): "
+
MoveInfo
.
SLog
+
" 物品已移走,顶升气缸1下降"
);
SecondMoveInfo
.
NextMoveStep
(
LineMoveStep
.
MO_14_TopDown
);
...
...
@@ -546,8 +547,8 @@ namespace OnlineStore.DeviceLibrary
//判断是否验证成功,如果验证失败,不入库
if
(
LineServer
.
RightInPosId
(
DeviceID
,
currCode
.
PosId
))
{
waitInStoreList
.
RemoveAt
(
reIndex
);
LogInfo
(
"*******托盘"
+
currTrayNum
+
"需要入库【"
+
currCode
.
ToStr
()
+
"】 ,开始入库移栽"
);
//
waitInStoreList.RemoveAt(reIndex);
LogInfo
(
"*******托盘"
+
currTrayNum
+
"需要入库【"
+
currCode
.
ToStr
()
+
"】 ,开始入库移栽
,清理托盘时再删除入库任务
"
);
return
true
;
}
else
...
...
@@ -566,6 +567,35 @@ namespace OnlineStore.DeviceLibrary
return
false
;
}
private
bool
RemoveInStore
(
InOutParam
param
)
{
if
(
waitInStoreList
.
Count
>
0
)
{
lock
(
waitInListLock
)
{
//判断是否是自己排队列表中的入库信息
int
reIndex
=
-
1
;
for
(
int
i
=
0
;
i
<
waitInStoreList
.
Count
;
i
++)
{
InOutParam
cc
=
waitInStoreList
[
i
];
//托盘号一致,二维码一致,库位号一致
if
(
cc
.
TrayNumber
.
Equals
(
param
.
TrayNumber
)
&&
cc
.
PosId
.
Equals
(
param
.
PosId
)
&&
cc
.
WareCode
.
Equals
(
param
.
WareCode
))
{
reIndex
=
i
;
break
;
}
}
if
(
reIndex
>=
0
)
{
waitInStoreList
.
RemoveAt
(
reIndex
);
LogInfo
(
"*******料盘已移走,清理入库任务:【"
+
param
.
ToStr
()
+
"】"
);
return
true
;
}
}
}
return
false
;
}
#
endregion
#
region
托盘检测
...
...
编写
预览
支持
Markdown
格式
附加文件
你添加了
0
人
到此讨论。请谨慎行事。
Finish editing this message first!
Cancel
请
注册
或
登录
后发表评论