Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@993 0c75b7a4-871f-7646-8a2f-f78d34cc349f

Browse Source
This commit is contained in:
roberto 2010-02-12 09:53:54 +00:00
parent cb78814b0b
commit 07a620c4f2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Source/Modulos/Referencias/Controller/uReferenciasController.pas
View File

@ -72,7 +72,7 @@ begin
Condicion1 := NewBinaryExpression(NewField('', fld_ReferenciasID_EMPRESA),
NewConstant(AppFactuGES.EmpresaActiva.ID, datInteger), dboEqual);
// (ID_EMPRESA = NULL)
Condicion2 := NewBinaryExpression(NewField('', 'ID_EMPRESA'), NewConstant(ID_NULO, datInteger), dboEqual);
Condicion2 := NewBinaryExpression(NewField('', fld_ReferenciasID_EMPRESA), NewConstant(ID_NULO, datInteger), dboEqual);
Condicion := NewBinaryExpression(Condicion1, Condicion2, dboOr);