Removed Out of Service calibrations from notifications being sent

This commit is contained in:
Infineon\StieberD
2025-10-08 12:46:07 -07:00
committed by Stieber Daniel (CSC FI SPS MESLEO)
parent ad6ed9c002
commit 261e13ceac

View File

@ -64,7 +64,7 @@ OPEN 'CALIB_LIST' TO FileIn ELSE
END
CheckDt = OCONV(Date()+15,'D4/')
SelectSent = 'SELECT CALIB_LIST WITH NEXT_CAL_DT < ':QUOTE(CheckDt):' BY NEXT_CAL_DT'
SelectSent = 'SELECT CALIB_LIST WITH NEXT_CAL_DT < ':QUOTE(CheckDt):' AND WITH EQ_LOC NE "Out of Service" BY NEXT_CAL_DT'
RList(SelectSent,TARGET_ACTIVELIST$,'','','')
NoteText = ''
@ -156,7 +156,5 @@ FOR I = 1 TO DeptCnt
NEXT I
RETURN