diff --git a/src/LIB/NEWLFI/src/NEWLFI_ALL.f b/src/LIB/NEWLFI/src/NEWLFI_ALL.f
index 2daebeafbd1f6778c06c3e65cb6263a0c634ccfd..5354d04935a77b551d6af5aadad1df366377e6d9 100644
--- a/src/LIB/NEWLFI/src/NEWLFI_ALL.f
+++ b/src/LIB/NEWLFI/src/NEWLFI_ALL.f
@@ -3037,6 +3037,8 @@ C
       LOGICAL LLSTTU, LLVERF, LLVERG, LLECRD, LLIMST
 C
 #include "lficom2.h"
+C
+      CLACTI=''
 C**
 C     1.  -  CONTROLES DES PARAMETRES D'APPEL, PUIS INITIALISATIONS.
 C-----------------------------------------------------------------------