Made changes to Load Signature to exlude epipro

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

View File

@ -350,7 +350,10 @@ Event PUB_SIGN.CLICK()
Valid = Response<1>
If (Valid 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)
If UsingTestWafers then
TWLogResult = Dialog_Box('NDW_LOG_TEST_WAFER_USAGE', @Window, RDSNo : @VM : 'STANDARD' : @VM : 'REACTOR' : @VM : Reactor)
@ -716,3 +719,4 @@ return

View File

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