remind operator to run test wafer on last cassete in WO

This commit is contained in:
Chase Tucker
2024-12-12 08:38:41 -07:00
committed by Tucker Chase (CSC FI SPS MESLEO)
parent a41136e30e
commit f8c83dd7f4
6 changed files with 341 additions and 8 deletions

View File

@ -0,0 +1,42 @@
Compile function Test_WO_MAT_SERVICES(@Test)
#pragma precomp SRP_PreCompiler
$Insert LOGICAL
Declare function WO_MAT_Services, Error_Services
Declare subroutine WO_MAT_Services, Error_Services
GotoTest
Error_Services('Clear')
Return TestResult or 1
//-----------------------------------------------------------------------------
// TESTS
//-----------------------------------------------------------------------------
Test CassetteIsLastInWoWithEmptyWoMatKeyShouldThrowError
WO_MAT_Services('CassetteIsLastInWo', '')
ErrorWasThrown = Error_Services('HasError')
Assert ErrorWasThrown equals True$
End Test
Test CassetteIsLastInWoWithFirstCassetteShouldReturnFalse
IsLastCassette = WO_MAT_Services('CassetteIsLastInWo', '173137*1')
Assert Error_Services('NoError')
Assert IsLastCassette EQ False$
end test
Test CassetteIsLastInWoWithLastCassetteShouldReturnTrue
IsLastCassette = WO_MAT_Services('CassetteIsLastInWo', '173137*66')
Assert Error_Services('NoError')
Assert IsLastCassette EQ True$
end test