diff --git a/harbour/source/rtl/afields.prg b/harbour/source/rtl/afields.prg
index 5a4dcd21ec..80f1fd2e6f 100644
--- a/harbour/source/rtl/afields.prg
+++ b/harbour/source/rtl/afields.prg
@@ -33,6 +33,7 @@
  *
  */
 
+#include "common.ch"
 #include "dbstruct.ch"
 
 FUNCTION AFields( aFieldNames, aTypes, aWidths, aDecimals )