refactored calibration reminders into a service

This commit is contained in:
Infineon\StieberD
2024-12-03 14:07:00 -07:00
committed by Stieber Daniel (CSC FI SPS MESLEO)
parent 7782918afd
commit 7cc861619f
3 changed files with 155 additions and 35 deletions

View File

@ -291,12 +291,6 @@ Event WINDOW.CREATE(CreateParam)
Set_Property(@Window : '.MENU.ADMIN.MASS_TOOL_MODE_CHANGE', 'VISIBLE', 0)
Set_Property(@Window : '.MENU.ADMIN.MASS_REACTOR_MODE_CHANGE', 'VISIBLE', 0)
end
CalDueRecipients = XLATE('NOTIFICATION','CALIB_DUE_NOTIFY',NOTIFICATION_USER_ID$,'X')
LOCATE @USER4 IN CalDueRecipients USING @VM SETTING POS THEN
obj_Calib_List('SendReminders') ;* New system added 3/18/2010 JCH
END
UseFQAMatScan = Database_Services('ReadDataRow', 'APP_INFO', 'USE_FQA_MAT_SCAN')
If UseFQAMatScan EQ 1 OR MemberOf(@User4, 'OI_TEST') then
@ -854,3 +848,4 @@ return