diff --git a/include/form.cpp b/include/form.cpp
index 0f5f08cc1..2529d1f7d 100755
--- a/include/form.cpp
+++ b/include/form.cpp
@@ -2213,6 +2213,15 @@ HIDDEN bool font_handler(TMask_field& f, KEY key)
 TMask* TPrint_section::_msk = NULL;
 
 
+word TPrint_section::height() const
+{ 
+  if (_height<0)
+    return printer().formlen()+_height;
+  else
+    return _height;
+}
+
+
 TExpression & TPrint_section::eval_expr(TExpression & expr,int defaultfile_id)
 { 
     for (int j=0; j<expr.numvar(); j++) { // scansione delle variabili dell'espressione di rvalue
diff --git a/include/form.h b/include/form.h
index 71233d638..d4aba2cef 100755
--- a/include/form.h
+++ b/include/form.h
@@ -577,8 +577,7 @@ public:
   word columns()      
   { tab(0); return _nfld; }
   // @cmember Ritorna l'altezza della sezione
-  word height() const 
-  { return _height;}
+  word height() const ;
   // @cmember Ritorna l'altezza minima delle sottosezioni
   word subs_height() const ;
   // @cmember Ritorna l'offset della prima colonna