added case for when lot record does not exist

This commit is contained in:
Infineon\StieberD 2024-11-05 18:15:20 -07:00
parent 24a246a99b
commit 507106971b

View File

@ -715,6 +715,7 @@ Service CreateLotEvent(LotId, LotType=LOT_TYPES, EventDatetime, EventType=EVENT_
end end
Case LotType EQ 'RDS' Case LotType EQ 'RDS'
If EventType NE '' AND OperatorId NE '' then If EventType NE '' AND OperatorId NE '' then
If RowExists('LOT', LotId) EQ False$ then Lot_Services('CreateNewLot', 'RDS', '', '', '', '', '', OperatorId, '', LotId)
If RowExists('LOT', LotId) then If RowExists('LOT', LotId) then
ValidId = False$ ValidId = False$
NewEventId = '' NewEventId = ''
@ -985,6 +986,3 @@ Service UnholdLot(LotId)
end service end service