diff --git a/harbour/contrib/hbfbird/firebird.c b/harbour/contrib/hbfbird/firebird.c
index cfce4f8ed8..9502b9f9ca 100644
--- a/harbour/contrib/hbfbird/firebird.c
+++ b/harbour/contrib/hbfbird/firebird.c
@@ -486,6 +486,10 @@ HB_FUNC( FBFETCH )
       {
          hb_retnl( isc_sqlcode( status ) );
          return;
+         }
+         else {
+         hb_retnl( -1 );
+         return ;
       }
    }