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

Initialized RunData variable to prevent VNAV on failure to parse/read json.

Browse Source
This commit is contained in:
Infineon\StieberD
2025-11-11 12:26:50 -07:00
committed by Stieber Daniel (CSC FI SSM MAI MESLEO)
parent 60e70b9958
commit 169fabdac6
1 changed files with 87 additions and 74 deletions
Download Patch File Download Diff File Expand all files Collapse all files

161
LSL2/STPROC/METROLOGY_SERVICES.txt
View File

@ -205,24 +205,25 @@ end service
Service GetJsonFromProcessDataStandardFormat(Text) Service GetJsonFromProcessDataStandardFormat(Text)
json = '';
HeaderId = -1; json = ''
SubgroupId = -1; HeaderId = -1
FoundEndOfFile = False$; SubgroupId = -1
SWAP '|' WITH @VM IN Text; FoundEndOfFile = False$
SWAP CRLF$ WITH @FM IN Text; SWAP '|' WITH @VM IN Text
LineCount = DCOUNT(Text, @FM); SWAP CRLF$ WITH @FM IN Text
LineCount = DCOUNT(Text, @FM)
FOR LineLoopIndex = 1 TO LineCount FOR LineLoopIndex = 1 TO LineCount
Line = Text<LineLoopIndex>; Line = Text<LineLoopIndex>
IF FoundEndOfFile EQ True$ THEN IF FoundEndOfFile EQ True$ THEN
json = json:Line; json = json:Line
END END
IF Line EQ 'EOF' THEN IF Line EQ 'EOF' THEN
FoundEndOfFile = True$; FoundEndOfFile = True$
Line = Text<LineLoopIndex - 1>; Line = Text<LineLoopIndex - 1>
Convert Tab$ to @FM IN Line Convert Tab$ to @FM IN Line
SWAP '=' WITH @VM IN Line; SWAP '=' WITH @VM IN Line
SWAP ';' WITH @FM IN Line; SWAP ';' WITH @FM IN Line
IF Line<2, 1> EQ 'B_HeaderId' THEN IF Line<2, 1> EQ 'B_HeaderId' THEN
HeaderId = Line<2, 2> HeaderId = Line<2, 2>
END END
@ -231,19 +232,21 @@ Service GetJsonFromProcessDataStandardFormat(Text)
END END
END END
NEXT LineLoopIndex NEXT LineLoopIndex
Response = json; Response = json
end service end service
Service GetStratus(Handle) Service GetStratus(Handle)
Result = ''; // Service ImportStratusData( Result = ''; // Service ImportStratusData(
Offset = 1 Offset = 1
FieldPosition = 13 FieldPosition = 13
FieldPositionIncrement = 2 FieldPositionIncrement = 2
Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count'); Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count')
Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence'); Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence')
Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId'); Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId')
Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId'); Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId')
FOR RecordIndex = 1 TO Result<1, 1> FOR RecordIndex = 1 TO Result<1, 1>
IF RecordIndex EQ 1 THEN IF RecordIndex EQ 1 THEN
Result<2> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].DateTime'); // Timestamp Result<2> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].DateTime'); // Timestamp
@ -258,23 +261,25 @@ Service GetStratus(Handle)
Result<11> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Cassette'); // Cassette Result<11> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Cassette'); // Cassette
Result<12> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].GradeMean'); // ThickAvg Result<12> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].GradeMean'); // ThickAvg
END END
ForOffset = (RecordIndex - 1) * FieldPositionIncrement; ForOffset = (RecordIndex - 1) * FieldPositionIncrement
Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Slot'); // Position Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Slot'); // Position
Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Mean'); // DataPoint Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Mean'); // DataPoint
NEXT RecordIndex NEXT RecordIndex
Response = Result; Response = Result
end service end service
Service GetBioRad(Handle) Service GetBioRad(Handle)
Result = ''; // Service ImportBioRadData( Result = ''; // Service ImportBioRadData(
Offset = 1 Offset = 1
FieldPosition = 13 FieldPosition = 13
FieldPositionIncrement = 2 FieldPositionIncrement = 2
Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count'); Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count')
Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence'); Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence')
Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId'); Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId')
Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId'); Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId')
FOR RecordIndex = 1 TO Result<1, 1> FOR RecordIndex = 1 TO Result<1, 1>
IF RecordIndex EQ 1 THEN IF RecordIndex EQ 1 THEN
Result<2> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].DateTime'); // TimeStamp Result<2> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].DateTime'); // TimeStamp
@ -291,19 +296,21 @@ Service GetBioRad(Handle)
Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Position'); // Position Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Position'); // Position
Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Thickness'); // DataPoint Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Thickness'); // DataPoint
NEXT RecordIndex NEXT RecordIndex
Response = Result; Response = Result
end service end service
Service GetCDE(Handle) Service GetCDE(Handle)
Result = ''; // Service ImportCDEData( Result = ''; // Service ImportCDEData(
Offset = 3 Offset = 3
FieldPosition = 23 FieldPosition = 23
FieldPositionIncrement = 5 FieldPositionIncrement = 5
Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count'); Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count')
Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence'); Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence')
Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId'); Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId')
Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId'); Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId')
FOR RecordIndex = 1 TO Result<1, 1> FOR RecordIndex = 1 TO Result<1, 1>
IF RecordIndex EQ 1 THEN IF RecordIndex EQ 1 THEN
Result<3> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp Result<3> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp
@ -314,25 +321,27 @@ Service GetCDE(Handle)
Result<9> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Layer'); // RunDataLayer Result<9> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Layer'); // RunDataLayer
Result<10> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Zone'); // RunDataZo Result<10> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Zone'); // RunDataZo
END END
ForOffset = (RecordIndex - 1) * FieldPositionIncrement; ForOffset = (RecordIndex - 1) * FieldPositionIncrement
Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].InferredPoint'); // Position Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].InferredPoint'); // Position
Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Data'); // DataPoint Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Data'); // DataPoint
Result<FieldPosition + ForOffset + FieldPositionIncrement - 1> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].MeritGOF'); // N/A Result<FieldPosition + ForOffset + FieldPositionIncrement - 1> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].MeritGOF'); // N/A
NEXT RecordIndex NEXT RecordIndex
Response = Result; Response = Result
end service end service
Service GetHgCV(Handle) Service GetHgCV(Handle)
Result = ''; // Service ImportHgCVData( Result = ''; // Service ImportHgCVData(
Offset = 5 Offset = 5
PhaseOffset = 7 PhaseOffset = 7
FieldPosition = 53 FieldPosition = 53
FieldPositionIncrement = 9 FieldPositionIncrement = 9
Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count'); Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count')
Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence'); Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence')
Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId'); Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId')
Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId'); Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId')
FOR RecordIndex = 1 TO Result<1, 1> FOR RecordIndex = 1 TO Result<1, 1>
IF RecordIndex EQ 1 THEN IF RecordIndex EQ 1 THEN
Result<2> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].MesEntity'); // ToolID Result<2> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].MesEntity'); // ToolID
@ -343,22 +352,24 @@ Service GetHgCV(Handle)
Result<11> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp Result<11> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp
Result<IMPORT_VALIDATION_IDX$> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].IndexOf'); // Validation Result<IMPORT_VALIDATION_IDX$> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].IndexOf'); // Validation
END END
ForOffset = (RecordIndex - 1) * FieldPositionIncrement; ForOffset = (RecordIndex - 1) * FieldPositionIncrement
Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Site'); // Position Result<FieldPosition + ForOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Site'); // Position
Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].RhoAvg'); // HgCVDataPoint Result<FieldPosition + ForOffset + Offset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].RhoAvg'); // HgCVDataPoint
Result<FieldPosition + ForOffset + PhaseOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Phase'); // PhaseDataPoint Result<FieldPosition + ForOffset + PhaseOffset> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Phase'); // PhaseDataPoint
Result<FieldPosition + ForOffset + FieldPositionIncrement - 1> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Grade'); // N/A Result<FieldPosition + ForOffset + FieldPositionIncrement - 1> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Grade'); // N/A
NEXT RecordIndex NEXT RecordIndex
Response = Result; Response = Result
end service end service
Service GetTencor(Handle) Service GetTencor(Handle)
Result = ''; // Service ImportTencorData( Result = ''; // Service ImportTencorData(
Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count'); Result<1, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count')
Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence'); Result<1, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence')
Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId'); Result<1, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId')
Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId'); Result<1, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId')
FOR RecordIndex = 1 TO Result<1, 1> FOR RecordIndex = 1 TO Result<1, 1>
IF RecordIndex EQ 1 THEN IF RecordIndex EQ 1 THEN
Result<9> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp Result<9> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp
@ -371,16 +382,18 @@ Service GetTencor(Handle)
Result<43> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].MesEntity'); // ScanTool Result<43> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].MesEntity'); // ScanTool
END END
NEXT RecordIndex NEXT RecordIndex
Response = Result; Response = Result
end service end service
Service GetSP1(Handle) Service GetSP1(Handle)
Result = ''; // Service ImportSP1Data( Result = ''; // Service ImportSP1Data(
Result<5, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count'); Result<5, 1> = SRP_JSON(Handle, 'GETVALUE', 'Count')
Result<5, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence'); Result<5, 2> = SRP_JSON(Handle, 'GETVALUE', 'Sequence')
Result<5, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId'); Result<5, 3> = SRP_JSON(Handle, 'GETVALUE', 'HeaderId')
Result<5, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId'); Result<5, 4> = SRP_JSON(Handle, 'GETVALUE', 'SubgroupId')
FOR RecordIndex = 1 TO Result<5, 1> FOR RecordIndex = 1 TO Result<5, 1>
IF RecordIndex EQ 1 THEN IF RecordIndex EQ 1 THEN
Result<9> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp Result<9> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].Date'); // Timestamp
@ -397,7 +410,8 @@ Service GetSP1(Handle)
Result<44> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].DcnAreaMean'); // DCNMM2 Result<44> = SRP_JSON(Handle, 'GETVALUE', 'Records[':RecordIndex:'].DcnAreaMean'); // DCNMM2
END END
NEXT RecordIndex NEXT RecordIndex
Response = Result; Response = Result
end service end service
@ -407,7 +421,7 @@ end service
// Looks for available Metrology files that are ready to be imported into the MES system. // Looks for available Metrology files that are ready to be imported into the MES system.
//---------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------
Service ImportMetrologyFiles(Machine=MACHINE_TYPES) Service ImportMetrologyFiles(Machine=MACHINE_TYPES)
ErrMsg = '' ErrMsg = ''
If Machine NE '' then If Machine NE '' then
hSysLists = Database_Services('GetTableHandle', 'SYSLISTS') hSysLists = Database_Services('GetTableHandle', 'SYSLISTS')
@ -439,7 +453,7 @@ Service ImportMetrologyFiles(Machine=MACHINE_TYPES)
End Case End Case
If Error_Services('NoError') and ErrMsg EQ '' then If Error_Services('NoError') and ErrMsg EQ '' then
SearchPattern = '*.pdsf'; SearchPattern = '*.pdsf'
InitDir DataPath:SearchPattern InitDir DataPath:SearchPattern
FileList = DirList() FileList = DirList()
FileNames = '' FileNames = ''
@ -516,16 +530,16 @@ Service ImportMetrologyFiles(Machine=MACHINE_TYPES)
RepoPath = Environment_Services('GetApplicationRootPath') : '\Metrology\Run Data Repository\MET08ANLYSDIFAAST230\Source\MET08ANLYSDIFAAST230\' RepoPath = Environment_Services('GetApplicationRootPath') : '\Metrology\Run Data Repository\MET08ANLYSDIFAAST230\Source\MET08ANLYSDIFAAST230\'
End Case End Case
OSREAD Text FROM DataPath:FileName THEN json = ''
json = Metrology_Services('GetJsonFromProcessDataStandardFormat', Text); RunData = ''
END ELSE
json = ''; OSRead Text from DataPath:FileName then json = Metrology_Services('GetJsonFromProcessDataStandardFormat', Text)
END
IF LEN(json) GT 0 THEN If Len(json) GT 0 then
RunData = Metrology_Services('GetRunData', Machine, json); RunData = Metrology_Services('GetRunData', Machine, json)
END ELSE end else
Metrology_Services('LogResults', PSN, Machine, 'UID002', Service : ' : ' : 'Failed to get PDSF json'); Metrology_Services('LogResults', PSN, Machine, 'UID002', Service : ' : ' : 'Failed to get PDSF json')
END end
************************* *************************
* Import metrology data * * Import metrology data *
@ -536,7 +550,7 @@ Service ImportMetrologyFiles(Machine=MACHINE_TYPES)
Metrology_Services('ImportMetrologyRunData', Machine, DataPath, FileName, RunData) Metrology_Services('ImportMetrologyRunData', Machine, DataPath, FileName, RunData)
end else end else
ErrMsg = 'Import validation failed' ErrMsg = 'Import validation failed'
Metrology_Services('LogResults', PSN, Machine, 'UID002', Service : ' : ' : ErrMsg); Metrology_Services('LogResults', PSN, Machine, 'UID002', Service : ' : ' : ErrMsg)
end end
END ELSE END ELSE
ErrMsg = 'RunData argument was missing' ErrMsg = 'RunData argument was missing'
@ -602,38 +616,38 @@ end service
Service GetRunData(Machine, json) Service GetRunData(Machine, json)
Result = ''; Result = ''
Handle = ''; Handle = ''
If Assigned(Handle) else Handle = 0 If Assigned(Handle) else Handle = 0
If Handle LE 0 then If Handle LE 0 then
ParseError = SRP_JSON(Handle, 'PARSE', json); ParseError = SRP_JSON(Handle, 'PARSE', json)
IF ParseError EQ '' THEN IF ParseError EQ '' THEN
Begin Case Begin Case
Case Machine _EQC 'Stratus' Case Machine _EQC 'Stratus'
Result = Metrology_Services('GetStratus', Handle); Result = Metrology_Services('GetStratus', Handle)
Case Machine _EQC 'Biorad' Case Machine _EQC 'Biorad'
Result = Metrology_Services('GetBiorad', Handle); Result = Metrology_Services('GetBiorad', Handle)
Case Machine _EQC 'CDE' Case Machine _EQC 'CDE'
Result = Metrology_Services('GetCDE', Handle); Result = Metrology_Services('GetCDE', Handle)
Case Machine _EQC 'HgCV' Case Machine _EQC 'HgCV'
Result = Metrology_Services('GetHgCV', Handle); Result = Metrology_Services('GetHgCV', Handle)
Case Machine _EQC 'SP1' Case Machine _EQC 'SP1'
Result = Metrology_Services('GetSP1', Handle); Result = Metrology_Services('GetSP1', Handle)
Case Machine _EQC 'Tencor' Case Machine _EQC 'Tencor'
Result = Metrology_Services('GetTencor', Handle); Result = Metrology_Services('GetTencor', Handle)
End Case End Case
SRP_JSON(Handle, 'RELEASE'); SRP_JSON(Handle, 'RELEASE')
END ELSE END ELSE
Metrology_Services('LogResults', PSN, Machine, 'UID002', Service : ' : ' : 'Failed to parse PDSF json'); Metrology_Services('LogResults', PSN, Machine, 'UID002', Service : ' : ' : 'Failed to parse PDSF json')
END END
END END
Response = Result; Response = Result
end service end service
@ -2330,7 +2344,7 @@ Service ImportTencorData(RunData)
Next Wafer Next Wafer
end end
If exists EQ False$ then If exists EQ False$ then
oCIParms := CleanInspRec ; oCIParms := CleanInspRec
CINo = obj_Clean_Insp('Create',oCIParms) CINo = obj_Clean_Insp('Create',oCIParms)
If Error_Services('NoError') then If Error_Services('NoError') then
ReactRunRec = INSERT(ReactRunRec,REACT_RUN_CI_NO$,-1,0,CINo) ReactRunRec = INSERT(ReactRunRec,REACT_RUN_CI_NO$,-1,0,CINo)
@ -3666,4 +3680,3 @@ LoadRunDataToDatabase:
return return