phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Removed Out of Service calibrations from notifications being sent

Browse Source
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
1 changed files with 88 additions and 90 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
LSL2/STPROC/OBJ_CALIB_LIST.txt
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