Added WO_MAT_SAP_TX_DTM to unlocking logic

criteria.
This commit is contained in:
Infineon\Mitchem 2025-02-10 10:04:02 -07:00 committed by Stieber Daniel (CSC FI SPS MESLEO)
parent b01e7e8750
commit 870032702f

View File

@ -155,7 +155,7 @@ Post:
UpdateRec = obj_Tables('ReadRec',UFParms) UpdateRec = obj_Tables('ReadRec',UFParms)
IF Get_Status(errCode) THEN IF Get_Status(errCode) THEN
If (Field(PostLogKey, '*', 1) EQ 'WO_MAT') AND (PostLogRec<POST_LOG_FIELD_NO$, 1> EQ WO_MAT_SAP_BATCH_NO$) then If (Field(PostLogKey, '*', 1) EQ 'WO_MAT') AND ((PostLogRec<POST_LOG_FIELD_NO$, 1> EQ WO_MAT_SAP_BATCH_NO$) OR (PostLogRec<POST_LOG_FIELD_NO$, 1> EQ WO_MAT_SAP_TX_DTM$)) then
AllowedTime = SRP_DateTime("AddMinutes", DateTime(), -5) AllowedTime = SRP_DateTime("AddMinutes", DateTime(), -5)
If (Field(PostLogKey, '*', 2)) LT AllowedTime then If (Field(PostLogKey, '*', 2)) LT AllowedTime then
Resp = Database_Services('UnlockKeyID', 'WO_MAT', PostLogRec<POST_LOG_REC_KEY1$>) Resp = Database_Services('UnlockKeyID', 'WO_MAT', PostLogRec<POST_LOG_REC_KEY1$>)