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

Modified REACT_RUN and RDS to align shift nomenclature

Browse Source
This commit is contained in:
Infineon\StieberD 2024-10-09 15:30:08 -07:00 committed by Stieber Daniel (CSC FI SPS MESLEO)
parent 35027d4786
commit 9119e91998
5 changed files with 116 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
LSL2/APPROW/LISTBOX_CONFIG%003ASHIFT.json Normal file
View File

@ -0,0 +1,19 @@
{
"header": {
"version": 1,
"type": "record",
"approw-key": "SHIFT"
},
"body": {
"record1": {
"<1>": {
"<1,1>": "A",
"<1,2>": "B",
"<1,3>": "C",
"<1,4>": "D",
"<1,5>": "None"
},
"<2>": "1"
}
}
}

3
LSL2/STPROC/COMM_RDS.txt
View File

@ -2389,7 +2389,7 @@ SAPSign:
CurrDt = Date()
CurrTm = Time()
Set_Property(@WINDOW:'.SHIFT','DEFPROP',1)
Set_Property(@WINDOW:'.SHIFT','DEFPROP', 'A')
Send_Event(@WINDOW,'WRITE')
@ -2921,3 +2921,4 @@ return

3
LSL2/STPROC/COPY_REACT_RUN_RECORD_TO_SQL.txt
View File

@ -53,7 +53,7 @@ DataFields := "SPIKES" :@VM:SQL_Format(Rec(REACT_RUN_SPIKES$),
Convert '/' to '?' in Rec(REACT_RUN_SPECIAL_INST$)
DataFields := "SPECIAL_INST" :@VM:SQL_Format(Rec(REACT_RUN_SPECIAL_INST$), "STR", 1):@FM
DataFields := "REACT_IDLE_TIME" :@VM:SQL_Format(Rec(REACT_RUN_REACT_IDLE_TIME$), "DEC", "2"):@FM
DataFields := "SHIFT" :@VM:SQL_Format(Rec(REACT_RUN_SHIFT$), "INT"):@FM
DataFields := "SHIFT" :@VM:SQL_Format(Rec(REACT_RUN_SHIFT$), "STR"):@FM
DataFields := "LAST_WAFER_RHO" :@VM:SQL_Format(Rec(REACT_RUN_LAST_WAFER_RHO$), "DEC", "2"):@FM
DataFields := "LOAD_LOCK_SIDE" :@VM:SQL_Format(Rec(REACT_RUN_LOAD_LOCK_SIDE$), "STR"):@FM
DataFields := "ADE_READ" :@VM:SQL_Format(Rec(REACT_RUN_ADE_READ$), "STR"):@FM
@ -173,3 +173,4 @@ end
Return Ans

45
LSL2/STPROC/RDS_ACTIONS.txt
View File

@ -565,6 +565,20 @@ READ_RECORD:
// OrigFileError = 100 : @FM : KeyID
// Status = 0
// Record = ''
If Num({SHIFT}) then
Begin Case
Case {SHIFT} EQ 1
Record<RDS_SHIFT$> = 'A'
Case {SHIFT} EQ 2
Record<RDS_SHIFT$> = 'B'
Case {SHIFT} EQ 3
Record<RDS_SHIFT$> = 'C'
Case {SHIFT} EQ 4
Record<RDS_SHIFT$> = 'D'
Case Otherwise$
Null
End Case
end
return
@ -583,10 +597,41 @@ READONLY_RECORD:
// OrigFileError = 100 : @FM : KeyID
// Status = 0
// Record = ''
If Num({SHIFT}) then
Begin Case
Case {SHIFT} EQ 1
Record<RDS_SHIFT$> = 'A'
Case {SHIFT} EQ 2
Record<RDS_SHIFT$> = 'B'
Case {SHIFT} EQ 3
Record<RDS_SHIFT$> = 'C'
Case {SHIFT} EQ 4
Record<RDS_SHIFT$> = 'D'
Case Otherwise$
Null
End Case
end
return
WRITE_RECORD_PRE:
If Num({SHIFT}) then
Begin Case
Case {SHIFT} EQ 1
Record<RDS_SHIFT$> = 'A'
Case {SHIFT} EQ 2
Record<RDS_SHIFT$> = 'B'
Case {SHIFT} EQ 3
Record<RDS_SHIFT$> = 'C'
Case {SHIFT} EQ 4
Record<RDS_SHIFT$> = 'D'
Case Otherwise$
Null
End Case
end
SaveRecord = Record
RDSNo = Name
RDSKeyID = Name

57
LSL2/STPROC/REACT_RUN_ACTIONS.txt
View File

@ -297,6 +297,21 @@ READ_RECORD:
// OrigFileError = 100 : @FM : KeyID
// Status = 0
// Record = ''
If Num({SHIFT}) then
Begin Case
Case {SHIFT} EQ 1
Record<REACT_RUN_SHIFT$> = 'A'
Case {SHIFT} EQ 2
Record<REACT_RUN_SHIFT$> = 'B'
Case {SHIFT} EQ 3
Record<REACT_RUN_SHIFT$> = 'C'
Case {SHIFT} EQ 4
Record<REACT_RUN_SHIFT$> = 'D'
Case Otherwise$
Null
End Case
end
return
READONLY_RECORD_PRE:
@ -314,12 +329,43 @@ READONLY_RECORD:
// OrigFileError = 100 : @FM : KeyID
// Status = 0
// Record = ''
If Num({SHIFT}) then
Begin Case
Case {SHIFT} EQ 1
Record<REACT_RUN_SHIFT$> = 'A'
Case {SHIFT} EQ 2
Record<REACT_RUN_SHIFT$> = 'B'
Case {SHIFT} EQ 3
Record<REACT_RUN_SHIFT$> = 'C'
Case {SHIFT} EQ 4
Record<REACT_RUN_SHIFT$> = 'D'
Case Otherwise$
Null
End Case
end
return
WRITE_RECORD_PRE:
If Num({SHIFT}) then
Begin Case
Case {SHIFT} EQ 1
Record<REACT_RUN_SHIFT$> = 'A'
Case {SHIFT} EQ 2
Record<REACT_RUN_SHIFT$> = 'B'
Case {SHIFT} EQ 3
Record<REACT_RUN_SHIFT$> = 'C'
Case {SHIFT} EQ 4
Record<REACT_RUN_SHIFT$> = 'D'
Case Otherwise$
Null
End Case
end
SaveRecord = Record
If OrigRecord NE Record then
RDSNo = Name
ProdTWs = ''
GaNRunID = Record<REACT_RUN_GAN_RUN_ID$>
@ -420,14 +466,6 @@ WRITE_RECORD:
null
end
//JRO 10/22/2020
* If OrigRecord NE Record then
* Material_Services('PostRDSUpdateRequest', Name)
* end
* If OrigRecord NE Record then
* Material_Services('UpdateRDSStatus', Name)
* end
return
@ -497,3 +535,4 @@ Restore_System_Variables:
@FILE.ERROR = OrigFileError
return