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

Made changes to Load Signature to exlude epipro

Browse Source
This commit is contained in:
Infineon\Ouellette 2025-01-23 11:00:20 -07:00
parent a275005358
commit bdd3c84a78
2 changed files with 20 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
LSL2/STPROC/RDS_EVENTS.txt
View File

@ -350,7 +350,10 @@ Event PUB_SIGN.CLICK()
Valid = Response<1> Valid = Response<1>
If (Valid EQ True$) then If (Valid EQ True$) then
if XLATE('APP_INFO', 'NEW_TW_SYSTEM_ACTIVE_SWITCH', 1, 'X') EQ True$ then if XLATE('APP_INFO', 'NEW_TW_SYSTEM_ACTIVE_SWITCH', 1, 'X') EQ True$ then
UsingTestWafers = Msg(@Window, '', 'YESNO', '', 'Log Test Wafer Usage':@FM:'Are any test wafers loaded?') UsingTestWafers = False$
if ReactorType NE 'EPP' then
UsingTestWafers = Msg(@Window, '', 'YESNO', '', 'Log Test Wafer Usage':@FM:'Are any test wafers loaded?')
end
IsTWReqd = RDS_Services('IsTWLoggingReqd', RDSNo) IsTWReqd = RDS_Services('IsTWLoggingReqd', RDSNo)
If UsingTestWafers then If UsingTestWafers then
TWLogResult = Dialog_Box('NDW_LOG_TEST_WAFER_USAGE', @Window, RDSNo : @VM : 'STANDARD' : @VM : 'REACTOR' : @VM : Reactor) TWLogResult = Dialog_Box('NDW_LOG_TEST_WAFER_USAGE', @Window, RDSNo : @VM : 'STANDARD' : @VM : 'REACTOR' : @VM : Reactor)
@ -716,3 +719,4 @@ return

23
LSL2/STPROC/RDS_SERVICES.txt
View File

@ -744,17 +744,23 @@ Service IsValidSubLot(RDSNo, RDSType, SupplierLot)
end service end service
Service IsTWLoggingReqd(RDSNo) Service IsTWLoggingReqd(RDSNo)
Response = False$ Response = False$
RDSRec = Database_Services('ReadDataRow', 'RDS', RDSNo, True$, 0, False$) RDSRec = Database_Services('ReadDataRow', 'RDS', RDSNo, True$, 0, False$)
IsHGCVReqd = obj_RDS('MetPropFlag', RDSNo:@RM:RDSRec:@RM:'CRES') ReactorNo = RDSRec<RDS_REACTOR$>
If IsHGCVReqd EQ True$ then ReactorType = Database_Services('ReadDataColumn', 'REACTOR', ReactorNo, REACTOR_REACT_TYPE$)
ExistingTWKeys = Test_Run_Services('GetTestRunKeysByRDS', RDSNo) If ReactorType NE 'EPP' then
If ExistingTWKeys EQ '' then IsHGCVReqd = obj_RDS('MetPropFlag', RDSNo:@RM:RDSRec:@RM:'CRES')
Response = True$ If IsHGCVReqd EQ True$ then
ExistingTWKeys = Test_Run_Services('GetTestRunKeysByRDS', RDSNo)
If ExistingTWKeys EQ '' then
Response = True$
end else
Response = False$
end
end else end else
Response = False$ Response = False$
end end
end else end else
Response = False$ Response = False$
end end
@ -1696,3 +1702,4 @@ return