pre cutover push
This commit is contained in:
@ -128,12 +128,15 @@ FOR I = 1 TO MetCnt
|
||||
IF MetWOStep = WOStep AND WOMatQARec<WO_MAT_QA_STAGE$,I> = Stage THEN
|
||||
FOR N = 1 TO FieldCnt
|
||||
MetField = MetFields<1,N>
|
||||
MetTest = MetTests<1, i>
|
||||
Begin Case
|
||||
Case MetField EQ WO_MAT_QA_PROFILE$
|
||||
Ans<N,LineCnt> = WOMatQARec<MetField,I>[2,99] ;* Profile (test) field has stage embedded in the 1st character
|
||||
Case MetField EQ WO_MAT_QA_MIN$
|
||||
MinVal = WOMatQARec<MetField,I>
|
||||
Ans<N,LineCnt> = SRP_Math('ROUND', MinVal, 3)
|
||||
Case MetField EQ WO_MAT_QA_RESULT$ AND Stage EQ 'UNLOAD' AND (MetTest EQ '1CRES' OR MetTest EQ 'CRES')
|
||||
Ans<N,LineCnt> = WOMatQARec<MetField,I, 1>
|
||||
Case Otherwise$
|
||||
Ans<N,LineCnt> = WOMatQARec<MetField,I>
|
||||
End Case
|
||||
|
Reference in New Issue
Block a user