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
Case LotType EQ 'RDS'
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
ValidId = False$
NewEventId = ''
@ -985,6 +986,3 @@ Service UnholdLot(LotId)
end service