ready for unit testing
This commit is contained in:
committed by
Stieber Daniel (CSC FI SPS MESLEO)
parent
401c03d752
commit
03e85359d1
@ -650,12 +650,8 @@ end service
|
||||
//----------------------------------------------------------------------------------------------------------------------
|
||||
Service IsEpiPro(RDSNo)
|
||||
|
||||
IsEpiPro = False$
|
||||
ReactorKey = Xlate('RDS', RDSNo, 'REACTOR', 'X')
|
||||
ReactorType = Xlate('REACTOR', ReactorKey, 'REACT_TYPE', 'X')
|
||||
If ReactorType _EQC 'EPP' or ReactorType _EQC 'P' or ReactorType _EQC 'EpiPro' then
|
||||
IsEpiPro = True$
|
||||
end
|
||||
ReactorType = Xlate('RDS', RDSNo, 'PS_REACTOR_TYPE', 'X')
|
||||
IsEpiPro = ( (ReactorType _EQC 'EPP') or (ReactorType _EQC 'P') or (ReactorType _EQC 'EpiPro') )
|
||||
Response = IsEpiPro
|
||||
|
||||
End Service
|
||||
@ -1988,6 +1984,7 @@ Service PushSigProfileToWoMat(RDSNo)
|
||||
|
||||
end service
|
||||
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
// Internal GoSubs
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
Reference in New Issue
Block a user