Index: DS/Derde/TAPI/LookUpDevice.cls.xml =================================================================== diff -u -r29059 -r37433 --- DS/Derde/TAPI/LookUpDevice.cls.xml (.../LookUpDevice.cls.xml) (revision 29059) +++ DS/Derde/TAPI/LookUpDevice.cls.xml (.../LookUpDevice.cls.xml) (revision 37433) @@ -49,7 +49,7 @@ ;Do ..AddDevice("CDV",208,"OV") Do ..AddDevice("JRO",208,"OV") Do ..AddDevice("RDN",209,"PM") - Do ..AddDevice("JDR",210,"PM") + Do ..AddDevice("JDR",210,"OV") Do ..AddDevice("PVH",211) Do ..AddDevice("STM",212) Do ..AddDevice("JME",213,"OV") Index: BLVWIMP.mac.rou =================================================================== diff -u -r37042 -r37433 --- BLVWIMP.mac.rou (.../BLVWIMP.mac.rou) (revision 37042) +++ BLVWIMP.mac.rou (.../BLVWIMP.mac.rou) (revision 37433) @@ -207,7 +207,7 @@ . . If '$D(^KPR2(PRIDNO_" ")) Set Body=Body_" onbekend bij VH" Do:$L(Body) . Set From=##class(TECH.Context.RuntimeContext).Instance().GeefServerNaam()_"@VANHOECKE.BE" - . Set To=$$USERNAME^vhUSER("JDR;PVH","@",1) + . Set To=$$USERNAME^vhUSER("JB;PVH","@",1) . Set Subject=$S($D(NewProd):"nieuwe",1:"") . If $D(NewProd),$D(ModProd) Set Subject=Subject_"- en " . Set Subject=Subject_$S($D(ModProd):"gewijzigde",1:"") @@ -222,3 +222,4 @@ + Index: APPS/Stat/TAXAttentie/impl/MailVerzender.cls.xml =================================================================== diff -u -r29059 -r37433 --- APPS/Stat/TAXAttentie/impl/MailVerzender.cls.xml (.../MailVerzender.cls.xml) (revision 29059) +++ APPS/Stat/TAXAttentie/impl/MailVerzender.cls.xml (.../MailVerzender.cls.xml) (revision 37433) @@ -74,7 +74,7 @@ 1 %ListOfDataTypes -