phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

updated WO_MAT and WM_IN actions to mark cassettes as processed when cassettes have a quantity of zero

Browse Source
This commit is contained in:
Infineon\StieberD
2024-11-11 13:24:05 -07:00
parent 8282b5a7d4
commit 19fb71d733
13 changed files with 3414 additions and 3484 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
LSL2/STPROC/WO_MAT_ACTIONS.txt
View File

@ -56,9 +56,9 @@ $insert RLIST_EQUATES
Equ Comma$ to ','
Declare function Error_Services, Database_Services, Environment_Services, Logging_Services, obj_WO_Mat, Max
Declare function GaN_Services, Signature_Services, obj_WO_LOG, SRP_Array, MemberOf
Declare function GaN_Services, Signature_Services, obj_WO_LOG, SRP_Array, MemberOf, Datetime
Declare subroutine Error_Services, Database_Services, Environment_Services, Logging_Services, Obj_SAP, obj_Notes
Declare subroutine SAP_Services, Work_Order_Services, Material_Services, RList
Declare subroutine SAP_Services, Work_Order_Services, Material_Services, RList, Schedule_Services
LogPath = Environment_Services('GetApplicationRootPath') : '\LogFiles\WO_Mat'
LogDate = Oconv(Date(), 'D4/')
@ -690,7 +690,7 @@ WRITE_RECORD:
end
end
//Original MU wafer transaction
// Original MU wafer transaction
IF OrigSAPBatchNo EQ '' AND NewSAPBatchNo NE '' then
MULotFlag = False$
If {REACTOR_TYPE} NE 'EPP' then
@ -825,6 +825,12 @@ WRITE_RECORD:
Work_Order_Services('UpdateReleasedQty', WONo)
end
CurrWaferCount = obj_WO_Mat('CurrWaferCnt', WOMatKeyID)
If CurrWaferCount EQ 0 then
// This should catch cases where the entire cassette is "peeled off", NCR'ed, or used for destructive testing.
Schedule_Services('MarkCassProcessed', WONo, CassNo, Datetime())
end
return
DELETE_RECORD_PRE: