Index: tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/dynhlm/_db_api.estim.tol
===================================================================
--- tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/dynhlm/_db_api.estim.tol	(revision ff605f5f4c06fbe95feccf12674cda200840b500)
+++ tol/stdlib/math/stat/models/bayesian/bysMcmc/bsr/dynhlm/_db_api.estim.tol	(revision 6d34a42e8d8af2e345e0b4344cc9639b235ab237)
@@ -85,6 +85,5 @@
   {
     Real outIsATimeSerie = ObjectExist("Serie",  "nsh::_.output::_.serie");
-    Real outIsAVector    = ObjectExist("Matrix", "nsr::_.output::_.vector");
-    Text grammar = If(outIsATimeSerie,"Serie","Matrix");
+    Real outIsAVector    = ObjectExist("Matrix", "nsh::_.output::_.vector");
     WriteLn("[GetLinearBlkEffects] Building node "+nsh::_.id_node);
     Set effect = EvalSet(nsh::_.input, Anything(NameBlock inp)
@@ -171,4 +170,13 @@
       {
         WriteLn("[GetLinearBlkEffects] Building vector input "+inpName);
+         Ratio tf = If(!ObjectExist("Ratio","inp::_.transferFunction"),1/1,
+          inp::_.transferFunction);
+        Polyn omega = Numerator  (tf);
+        Polyn delta = Denominator(tf);
+        Real p = Degree(omega);
+        Real q = Degree(delta);
+        Real h = Max(p,q);
+        Real noTransFunFlag = h==0;
+
         Matrix eff = Case(
         Not(inp::_.enabled),