Harcoded column headers and value positions

This commit is contained in:
Infineon\Ouellette 2024-12-12 11:46:51 -07:00
parent 8701ded568
commit cd364ebfc2

View File

@ -191,21 +191,59 @@ END ELSE
RecalcDefMax = GetNewScanData(CINo, DefMax, NCRNo)
RecalcDefAvg = Getnewscandataavg(CINo, DefMax, NCRNo, DefAvg)
Line = CustPartNo: @VM : TimeStamp : @VM : WONo : @VM : CassRDSNo : @VM : SAPBatchNo : @VM : SubPartMfg : @VM : SubPartNum : @VM : SubLotNo : @VM : CassRDSWfrCnt : @VM
Line = ''
Line<1, 1> = CustPartNo
Line<1, 2> = TimeStamp
Line<1, 3> = WONo
Line<1, 4> = CassRDSNo
Line<1, 5> = SAPBatchNo
Line<1, 6> = SubPartMfg
Line<1, 7> = SubPartNum
Line<1, 8> = SubLotNo
Line<1, 9> = CassRDSWfrCnt
If MetResultsL1Z1 NE '' then
Line = Line : MetResultsL1Z1 : @VM
Line<1,10> = MetResultsL1Z1<1,1>
Line<1,11> = MetResultsL1Z1<1,2>
Line<1,12> = MetResultsL1Z1<1,3>
Line<1,13> = MetResultsL1Z1<1,4>
Line<1,14> = MetResultsL1Z1<1,5>
Line<1,15> = MetResultsL1Z1<1,6>
Line<1,16> = MetResultsL1Z1<1,7>
Line<1,17> = MetResultsL1Z1<1,8>
end
If MetResultsL1Z2 NE '' then
Line = Line : MetResultsL1Z2 : @VM
Line<1,18> = MetResultsL1Z2<1,1>
Line<1,19> = MetResultsL1Z2<1,2>
Line<1,20> = MetResultsL1Z2<1,3>
Line<1,21> = MetResultsL1Z2<1,4>
Line<1,22> = MetResultsL1Z2<1,5>
Line<1,23> = MetResultsL1Z2<1,6>
Line<1,24> = MetResultsL1Z2<1,7>
Line<1,25> = MetResultsL1Z2<1,8>
end
If MetResultsL2Z1 NE '' then
Line = Line : MetResultsL2Z1 : @VM
Line<1,26> = MetResultsL2Z1<1,1>
Line<1,27> = MetResultsL2Z1<1,2>
Line<1,28> = MetResultsL2Z1<1,3>
Line<1,29> = MetResultsL2Z1<1,4>
Line<1,30> = MetResultsL2Z1<1,5>
Line<1,31> = MetResultsL2Z1<1,6>
Line<1,32> = MetResultsL2Z1<1,7>
Line<1,33> = MetResultsL2Z1<1,8>
end
If MetResultsL2Z2 NE '' then
Line = Line : MetResultsL2Z2 : @VM
Line<1,34> = MetResultsL2Z2<1,1>
Line<1,35> = MetResultsL2Z2<1,2>
Line<1,36> = MetResultsL2Z2<1,3>
Line<1,37> = MetResultsL2Z2<1,4>
Line<1,38> = MetResultsL2Z2<1,5>
Line<1,39> = MetResultsL2Z2<1,6>
Line<1,40> = MetResultsL2Z2<1,7>
Line<1,41> = MetResultsL2Z2<1,8>
end
Line = Line : RecalcDefAvg : @VM : DefMin : @VM : RecalcDefMax
Line<1,42> = RecalcDefAvg
Line<1,43> = DefMin
Line<1,44> = RecalcDefMax
Result<-1> = Line
NEXT N
NEXT I
@ -237,62 +275,62 @@ END ELSE
RETURN ''
END
END
HeaderOut = ''
HeaderOut<1, 1> = '"Epi Part No"':@VM
HeaderOut<1, 2> = '"Date Out"':@VM
HeaderOut<1, 3> = '"WO"':@VM
HeaderOut<1, 4> = '"RDS"':@VM
HeaderOut<1, 5> = '"SAP Batch No"':@VM
HeaderOut<1, 6> = '"Sub Part Mfg"':@VM
HeaderOut<1, 7> = '"Sub Part Num"':@VM
HeaderOut<1, 8> ='"Lot Number"':@VM
HeaderOut<1, 9> ='"Qty"':@VM
HeaderOut = '"Epi Part No"':@VM
HeaderOut := '"Date Out"':@VM
HeaderOut := '"WO"':@VM
HeaderOut := '"RDS"':@VM
HeaderOut := '"SAP Batch No"':@VM
HeaderOut := '"Sub Part Mfg"':@VM
HeaderOut := '"Sub Part Num"':@VM
HeaderOut := '"Lot Number"':@VM
HeaderOut := '"Qty"':@VM
if L1MetNoZone1 NE '' THEN
HeaderOut := '"Thickness Avg Layer 1 Zone 1"':@VM
HeaderOut := '"Thickness Stdev Layer 1 Zone 1"':@VM
HeaderOut := '"Thickness Min Layer 1 Zone 1"':@VM
HeaderOut := '"Thickness Max Layer 1 Zone 1"':@VM
HeaderOut := '"Res/RHO Avg Layer 1 Zone 1"':@VM
HeaderOut := '"Res/RHO Stdev Layer 1 Zone 1"':@VM
HeaderOut := '"Res/RHO Min Layer 1 Zone 1"':@VM
HeaderOut := '"Res/RHO Max Layer 1 Zone 1"':@VM
END
if L1MetNoZone2 NE '' THEN
HeaderOut := '"Thickness Avg Layer 1 Zone 2"':@VM
HeaderOut := '"Thickness Stdev Layer 1 Zone 2"':@VM
HeaderOut := '"Thickness Min Layer 1 Zone 2"':@VM
HeaderOut := '"Thickness Max Layer 1 Zone 2"':@VM
HeaderOut := '"Res/RHO Avg Layer 1 Zone 2"':@VM
HeaderOut := '"Res/RHO Stdev Layer 1 Zone 2"':@VM
HeaderOut := '"Res/RHO Min Layer 1 Zone 2"':@VM
HeaderOut := '"Res/RHO Max Layer 1 Zone 2"':@VM
END
if L2MetNoZone1 NE '' THEN
HeaderOut := '"Thickness Avg Layer 2 Zone 1"':@VM
HeaderOut := '"Thickness Stdev Layer 2 Zone 1"':@VM
HeaderOut := '"Thickness Min Layer 2 Zone 1"':@VM
HeaderOut := '"Thickness Max Layer 2 Zone 1"':@VM
HeaderOut := '"Res/RHO Avg Layer 2 Zone 1"':@VM
HeaderOut := '"Res/RHO Stdev Layer 2 Zone 1"':@VM
HeaderOut := '"Res/RHO Min Layer 2 Zone 1"':@VM
HeaderOut := '"Res/RHO Max Layer 2 Zone 1"':@VM
END
if L2MetNoZone2 NE '' THEN
HeaderOut := '"Thickness Avg Layer 2 Zone 2"':@VM
HeaderOut := '"Thickness Stdev Layer 2 Zone 2"':@VM
HeaderOut := '"Thickness Min Layer 2 Zone 2"':@VM
HeaderOut := '"Thickness Max Layer 2 Zone 2"':@VM
HeaderOut := '"Res/RHO Avg Layer 2 Zone 2"':@VM
HeaderOut := '"Res/RHO Stdev Layer 2 Zone 2"':@VM
HeaderOut := '"Res/RHO Min Layer 2 Zone 2"':@VM
HeaderOut := '"Res/RHO Max Layer 2 Zone 2"':@VM
END
HeaderOut<1, 10> = '"Thickness Avg Layer 1 Zone 1"':@VM
HeaderOut<1, 11> = '"Thickness Stdev Layer 1 Zone 1"':@VM
HeaderOut<1, 12> = '"Thickness Min Layer 1 Zone 1"':@VM
HeaderOut<1, 13> = '"Thickness Max Layer 1 Zone 1"':@VM
HeaderOut<1, 14> = '"Res/RHO Avg Layer 1 Zone 1"':@VM
HeaderOut<1, 15> = '"Res/RHO Stdev Layer 1 Zone 1"':@VM
HeaderOut<1, 16> ='"Res/RHO Min Layer 1 Zone 1"':@VM
HeaderOut<1, 17> = '"Res/RHO Max Layer 1 Zone 1"':@VM
HeaderOut := '"Defectivity Avg"':@VM
HeaderOut := '"Defectivity Min"':@VM
HeaderOut := '"Defectivity Max"':@VM
HeaderOut := CRLF$
HeaderOut<1, 18> = '"Thickness Avg Layer 1 Zone 2"':@VM
HeaderOut<1, 19> = '"Thickness Stdev Layer 1 Zone 2"':@VM
HeaderOut<1, 20> = '"Thickness Min Layer 1 Zone 2"':@VM
HeaderOut<1, 21> = '"Thickness Max Layer 1 Zone 2"':@VM
HeaderOut<1, 22> = '"Res/RHO Avg Layer 1 Zone 2"':@VM
HeaderOut<1, 23> = '"Res/RHO Stdev Layer 1 Zone 2"':@VM
HeaderOut<1, 24> = '"Res/RHO Min Layer 1 Zone 2"':@VM
HeaderOut<1, 25> = '"Res/RHO Max Layer 1 Zone 2"':@VM
HeaderOut<1, 26> = '"Thickness Avg Layer 2 Zone 1"':@VM
HeaderOut<1, 27> ='"Thickness Stdev Layer 2 Zone 1"':@VM
HeaderOut<1, 28> = '"Thickness Min Layer 2 Zone 1"':@VM
HeaderOut<1, 29> ='"Thickness Max Layer 2 Zone 1"':@VM
HeaderOut<1, 30> = '"Res/RHO Avg Layer 2 Zone 1"':@VM
HeaderOut<1, 31> ='"Res/RHO Stdev Layer 2 Zone 1"':@VM
HeaderOut<1, 32> ='"Res/RHO Min Layer 2 Zone 1"':@VM
HeaderOut<1, 33> ='"Res/RHO Max Layer 2 Zone 1"':@VM
HeaderOut<1, 34> ='"Thickness Avg Layer 2 Zone 2"':@VM
HeaderOut<1, 35> ='"Thickness Stdev Layer 2 Zone 2"':@VM
HeaderOut<1, 36> ='"Thickness Min Layer 2 Zone 2"':@VM
HeaderOut<1, 37> ='"Thickness Max Layer 2 Zone 2"':@VM
HeaderOut<1, 38> ='"Res/RHO Avg Layer 2 Zone 2"':@VM
HeaderOut<1, 39> ='"Res/RHO Stdev Layer 2 Zone 2"':@VM
HeaderOut<1, 40> ='"Res/RHO Min Layer 2 Zone 2"':@VM
HeaderOut<1, 41> ='"Res/RHO Max Layer 2 Zone 2"':@VM
HeaderOut<1, 42> ='"Defectivity Avg"':@VM
HeaderOut<1, 43> ='"Defectivity Min"':@VM
HeaderOut<1, 44> ='"Defectivity Max"':@VM
HeaderOut := CRLF$
SWAP @VM WITH ',' IN HeaderOut
@ -318,3 +356,4 @@ OSClose DOSFile
RETURN DOSTable