diff --git a/Source/Modulos/Referencias/Controller/uReferenciasController.pas b/Source/Modulos/Referencias/Controller/uReferenciasController.pas
index 5cc9ef62..4bfdde99 100644
--- a/Source/Modulos/Referencias/Controller/uReferenciasController.pas
+++ b/Source/Modulos/Referencias/Controller/uReferenciasController.pas
@@ -72,7 +72,7 @@ begin
     Condicion1 := NewBinaryExpression(NewField('', fld_ReferenciasID_EMPRESA),
       NewConstant(AppFactuGES.EmpresaActiva.ID, datInteger), dboEqual);
     // (ID_EMPRESA = NULL)
-    Condicion2 := NewBinaryExpression(NewField('', fld_ReferenciasID_EMPRESA), NewConstant(ID_NULO, datInteger), dboEqual);
+    Condicion2 := NewBinaryExpression(NewField('', fld_ReferenciasID_EMPRESA), NewNull(), dboEqual);
 
     Condicion := NewBinaryExpression(Condicion1, Condicion2, dboOr);