fixed a bug preventing UNLOAD LW_RHO QA Met from being signed and dispositioned
This commit is contained in:
@ -219,7 +219,7 @@ WRITE_RECORD_PRE:
|
||||
Record = ''
|
||||
ActionFlow = ACTION_STOP$
|
||||
|
||||
Case FinalQA EQ True$
|
||||
Case FinalQA EQ True$
|
||||
|
||||
// User is attempting to modify this row. Set the FS104 error and log the event.
|
||||
OrigFileError = 104 : @FM : 'FQA has already been signed. WO_MAT_QA record cannot be updated!'
|
||||
@ -500,8 +500,35 @@ WRITE_RECORD_PRE:
|
||||
Post_Metrology_Manual_Data_Entry_Log(@USER4, 'HgCRes', RDSNo : ' / ' : WorkOrderNo : '*' : CassNo)
|
||||
end
|
||||
|
||||
Case ( (Profile EQ '1LW_RHO') and (Stage EQ 'UNLOAD') )
|
||||
|
||||
ThisOutOfSpec = False$
|
||||
FailReason = ''
|
||||
|
||||
ThisSig = Sigs<1, ProfileIndex>
|
||||
ThisSigDTM = SigDTMS<1, ProfileIndex>
|
||||
ThisSpecMin = SpecMin<1, ProfileIndex>
|
||||
ThisSpecMax = SpecMax<1, ProfileIndex>
|
||||
ThisResult = Result<1, ProfileIndex>
|
||||
ThisSpecTest = SpecProfiles<1, ProfileIndex>
|
||||
|
||||
If ( (ThisResult LT ThisSpecMin) or (ThisResult GT ThisSpecMax) ) then
|
||||
ThisOutOfSpec = True$
|
||||
FailReason = 'RHO is out of bounds.'
|
||||
end
|
||||
|
||||
If ThisOutOfSpec EQ False$ then
|
||||
If (ThisSig EQ '') or (ThisSigDTM EQ '') then
|
||||
ThisOutOfSpec = True$
|
||||
FailReason = Stage:' ':ThisSpecTest:' product measurement test has not been signed.'
|
||||
end
|
||||
end
|
||||
|
||||
OutOfSpec<1, ProfileIndex> = ThisOutOfSpec
|
||||
FailReasons<1, ProfileIndex> = FailReason
|
||||
|
||||
Case Otherwise$
|
||||
// This profile & stage do not currently have any validation code associated with them.
|
||||
// This profile & stage do not currently have any specific validation code associated with them.
|
||||
// Ensure 'out of spec' flag and 'fail reason' field for this profile are clear.
|
||||
OutOfSpec<1, ProfileIndex> = False$
|
||||
FailReasons<1, ProfileIndex> = ''
|
||||
@ -578,4 +605,3 @@ Restore_System_Variables:
|
||||
@FILE.ERROR = OrigFileError
|
||||
return
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user