Index: FLOWORD3.mac.rou =================================================================== diff -u -r2782 -r4022 --- FLOWORD3.mac.rou (.../FLOWORD3.mac.rou) (revision 2782) +++ FLOWORD3.mac.rou (.../FLOWORD3.mac.rou) (revision 4022) @@ -312,7 +312,8 @@ ; Versturen van een mail naar JDB bij het wijzigen van een haluxorder ModOrderMailToHalux(Actie,Param1,Param2,Param3,Param4,Param5,Param6) New TUserId,TUser,FUserId,FUser,MailId,Text - Set TUserId=58,FUserId=$G(CUserId,$G(QU(1),$P($$DEVUSER^vhUSER(),";"))),FUser=$$USERNAME^vhUSER(FUserId) + Set TUserId=$$USERID^vhUSER(##Class(TECH.Config.ConfigMgr).Instance().GetString("FLOWORD3_ModOrderMailToHalux_TUser")) + Set FUserId=$G(CUserId,$G(QU(1),$P($$DEVUSER^vhUSER(),";"))),FUser=$$USERNAME^vhUSER(FUserId) Set Text(1)="Order "_$$EXTNUM^vhDTyp(Param2,0,".",0)_" (toelevering "_Param3_")" Set Text(1)=Text(1)_" van "_$P(^KKL(^KK1(Param1),0),D,2)_"~gewijzigd door "_FUser_".~" If Actie="DL" Do ; Orderlijn verwijderen