Index: EWRECA.mac.rou =================================================================== diff -u -r734 -r1831 --- EWRECA.mac.rou (.../EWRECA.mac.rou) (revision 734) +++ EWRECA.mac.rou (.../EWRECA.mac.rou) (revision 1831) @@ -10,13 +10,13 @@ Quit:$P($H,",",2)<3600 ; Eerste uur na middernacht niet controleren, want dan wordt de nachtelijke stockscan overgebracht. Quit:$$JOBRUN(ChkRtn) Do ERROR^EWLOG($T(NOSTART)) - Set From=$ZUTIL(110)_"@VANHOECKE.BE",To=$LB("PV@VANHOECKE.BE","CW@VANHOECKE.BE"),Subject=ChkRtn_" gestopt" - Set Body="De link met het EWMS is verbroken!!!"_$C(13)_"Routine ^EWRECR draait niet meer"_$C(13)_"Gelieve dit dringend op te lossen!!!" + Set From=$ZUTIL(110)_"@VANHOECKE.BE",To=$LB("ICT_SysOp@vanhoecke.be"),Subject=ChkRtn_" gestopt" + Set Body="De link met het EWMS is verbroken!!!"_$C(13,10)_"Routine ^EWRECR draait niet meer"_$C(13,10)_"Gelieve dit dringend op te lossen!!!" Set Status=$$SendMiniMail^vhLib(From,To,Subject,Body) - S X="NET SEND CW_XP ""EWRECR draait niet meer""" - S X=$ZF(-1,X) - S X="NET SEND PV_XP ""EWRECR draait niet meer""" - S X=$ZF(-1,X) + ;S X="NET SEND CW_XP ""EWRECR draait niet meer""" + ;S X=$ZF(-1,X) + ;S X="NET SEND PV_XP ""EWRECR draait niet meer""" + ;S X=$ZF(-1,X) Quit TEST Set ChkRtn="EWRECR"