Index: RPLKOM.mac.rou =================================================================== diff -u -r71161 -r71172 --- RPLKOM.mac.rou (.../RPLKOM.mac.rou) (revision 71161) +++ RPLKOM.mac.rou (.../RPLKOM.mac.rou) (revision 71172) @@ -418,7 +418,7 @@ . . . Set Body=Body_Klant_$J("",NoClose(IntVw)-$L(Klant))_$S($L(Klant):": ",1:" ")_ORDNr_" "_NoClose(IntVw,KLNr,ORDNr)_$$nclGeefCreatorInfo(ORDNr,$P($G(^KOD(KLNr,"F",ORDNr,1)),"\",8))_$S(IntVw=99991007:$$nclGeefOrderDataInfo(KLNr,ORDNr),1:"")_$C(13) . . . Set Klant="",Lijnen=Lijnen+1 . Set Subject="Niet afgesloten order"_$S(Lijnen>1:"s",1:""),Body="Volgend"_$S(Lijnen>1:"e orders zijn",1:" order is")_" nog niet gesloten:"_$C(13)_$C(13)_Body - . Set Status=$$SendMiniMail^vhLib(From,To,Subject,Body) + . Set:Lijnen>0 Status=$$SendMiniMail^vhLib(From,To,Subject,Body) Quit nclGeefCreatorInfo(OrderID,CreatorInfo) New CreatorInfo,UserID,GebruikerInitialen