Index: EWTOE.mac.rou =================================================================== diff -u -r7529 -r7937 --- EWTOE.mac.rou (.../EWTOE.mac.rou) (revision 7529) +++ EWTOE.mac.rou (.../EWTOE.mac.rou) (revision 7937) @@ -516,6 +516,8 @@ .....Do MARKTBXFINISHED(TOENr,TLUNr,Aantal,BOAantal,PRNr) .....Do CHKDEL^FLOWTOE(TOENr) .....If $G(KLNr),ORDNr,LEVNr=$$$LevHalux,'$D(^KTO1(TOENr)) Do + ......Set Logger = ##class(vhLib.Logger).%New("ReceptieMailLog") + ......Do Logger.Info("Detail","Order: "_ORDNr_", $H: "_$H_", Pickdatum: "_$$GetPickDatum^EWORDS6(ORDNr)_", IsVoorVandaagOfMorgen: "_$$IsVoorVandaagOfMorgen^EWORDS6(ORDNr)_", CheckAutoSend: "_$$CheckAutoSend^EWORDS6(ORDNr)_", VolledigBijVanHoecke: "_##class(BL.Legacy.EWTOE).OrderStaatVolledigBijVanHoecke(ORDNr)) ......If $$GetPickDatum^EWORDS6(ORDNr)'<$H Quit:$$IsVoorVandaagOfMorgen^EWORDS6(ORDNr)'=1 ......Quit:$$CheckAutoSend^EWORDS6(ORDNr) ......Quit:'##class(BL.Legacy.EWTOE).OrderStaatVolledigBijVanHoecke(ORDNr)