Index: csp/vhisie/TBX/MailResult/tmpDev.mac.rou
===================================================================
diff -u -r1155 -r1300
--- csp/vhisie/TBX/MailResult/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 1155)
+++ csp/vhisie/TBX/MailResult/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 1300)
@@ -105,7 +105,7 @@
 	Else  Do
 	. Set errmsg=""
 	. Set ok=1
-	. Do tsmUpdateWSOrd
+	. Do:('blnViaNewImplementation) tsmUpdateWSOrd
 	Set WSOrd=""
 	Do tsmAddToLog
 	Quit