Fixed HgCV frequency bug
This commit is contained in:
@ -1169,13 +1169,10 @@ MetPropFlag:
|
||||
IF RDSRec = '' THEN RETURN
|
||||
|
||||
WONo = RDSRec<RDS_WO$>
|
||||
WOStepKey = RDSRec<RDS_WO_STEP_KEY$>
|
||||
ReactNo = RDSRec<RDS_REACTOR$>
|
||||
PSNo = RDSRec<RDS_PROD_SPEC_ID$>
|
||||
|
||||
WOStepNo = FIELD(WOStepKey,'*',2)
|
||||
|
||||
ReactRDSNos = XLATE('WO_REACT',WONo:'*':WOStepNo:'*':ReactNo,WO_REACT_RDS_NO$,'X')
|
||||
ReactRDSNos = Rds_Services('GetRDSRunHistoryByReactorAndWO', ReactNo, WONo)
|
||||
|
||||
LOCATE RDSNo IN ReactRDSNos USING @VM SETTING Pos THEN
|
||||
Result = obj_PRS_Prop('GetIntervalFlag',PSNo:@RM:PropCd:@RM:Pos)
|
||||
@ -1242,3 +1239,4 @@ CalcThickTarget:
|
||||
|
||||
RETURN
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user