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

Added missing events to TW Tracking form

Browse Source
This commit is contained in:
Infineon\Ouellette
2024-12-05 11:54:40 -07:00
parent 0483d54928
commit 432db10957
2 changed files with 64 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
LSL2/STPROC/NDW_LOG_TEST_WAFER_USAGE_EVENTS.txt
View File

@ -94,6 +94,33 @@ Event EDL_LOT_ID.LOSTFOCUS(Flag, FocusID)
end
end event
Event EDL_RDS.LOSTFOCUS(Flag, FocusID)
RDSNo = Get_Property(@Window : '.EDL_RDS', 'TEXT')
If Len(RDSNo) GE 6 then
If RowExists('RDS', RDSNo) then
RDSRec = Database_Services('ReadDataRow', 'RDS', RDSNo)
PSN = RDSRec<RDS_PROD_SPEC_ID$>
ReactorNo = RDSRec<RDS_REACTOR$>
If PSN NE '' then
Set_Property(@Window : '.EDL_PSN', 'TEXT', PSN)
Set_Property(@Window : '.EDL_PSN', 'ENABLED', -1)
end
If ReactorNo NE '' then
Set_Property(@Window : '.CMB_EQUIP_TYPE', 'VALUE', 'Reactor')
Set_Property(@Window : '.CMB_EQUIP_TYPE', 'ENABLED', -1)
Set_Property(@Window : '.CMB_EQUIPMENT_ID', 'TEXT', ReactorNo)
Set_Property(@Window : '.CMB_EQUIPMENT_ID', 'ENABLED', -1)
end
end
end else
Set_Property(@Window : '.EDL_PSN', 'TEXT', '')
Set_Property(@Window : '.EDL_PSN', 'ENABLED', True$)
Set_Property(@Window : '.CMB_EQUIPMENT_ID', 'TEXT', '')
Set_Property(@Window : '.CMB_EQUIPMENT_ID', 'ENABLED', True$)
Set_Property(@Window : '.CMB_EQUIP_TYPE', 'ENABLED', True$)
end
end event
Event PUB_ADD_LOT.CLICK()
TWLotUseArray = Get_Property(@Window: '.EDT_TW_USAGE', 'LIST')
LotId = Get_Property(@Window : '.EDL_LOT_ID', 'TEXT')
@ -277,8 +304,13 @@ Return
ClearFormData:
Set_Property(@Window : '.EDL_LOT_ID', 'TEXT', '')
Set_Property(@Window : '.EDL_RDS', 'TEXT', '')
Set_Property(@Window : '.EDL_PSN', 'TEXT', '')
Set_Property(@Window : '.EDL_PSN', 'ENABLED', True$)
Set_Property(@Window : '.CMB_EQUIP_TYPE', 'TEXT', '')
Set_Property(@Window : '.CMB_EQUIP_TYPE', 'ENABLED', True$)
Set_Property(@Window : '.CMB_EQUIPMENT_ID', 'TEXT', '')
Set_Property(@Window : '.CMB_EQUIPMENT_ID', 'ENABLED', True$)
Set_Property(@Window : 'CMB_TEST_TYPE', 'TEXT', '')
Set_Property(@Window : '.EDT_TW_USAGE', 'LIST', '')
return
@ -286,3 +318,4 @@ return