Copied remotely

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

Build/Build.fbv

@@ -0,0 +1 @@
+<variables><project_path><![CDATA[C:\Codigo Tecsitel]]></project_path></variables>

Build/BuildDavid.fbv

@@ -1 +0,0 @@
-<variables><project_path><![CDATA[T:\Codigo (Tecsitel)]]></project_path></variables>

Build/BuildRoberto.fbv

@@ -1 +0,0 @@
-<variables><DELPHI><![CDATA[C:\Archivos de programa\Borland\Delphi10\bin\dcc32.exe]]></DELPHI></variables>

Database/RodaxSoftware.FactuGES.Database.proj

@@ -0,0 +1,57 @@
+<Project DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+
+	<!-- ASCII Constants -->
+	<PropertyGroup>
+		<DOUBLE_QUOTES>%22</DOUBLE_QUOTES>
+	</PropertyGroup>
+
+   <PropertyGroup>
+      <DBServer Condition=" '$(SqlCmdRunner)' == '' ">localhost</DBServer>
+      <DeploymentBuild Condition=" '$(DeploymentBuild)' == '' ">false</DeploymentBuild>
+	  <SqlScriptsFolder Condition=" '$(SqlScriptsFolder)' == '' ">$(MSBuildProjectDirectory)\Scripts</SqlScriptsFolder>
+	  <ToolsFolder Condition=" '$(ToolsFolder)' == '' ">$(MSBuildProjectDirectory)\..\Tools</ToolsFolder>
+	  <CodeOutputFolder Condition=" '$(CodeOutputFolder)' == '' ">$(MSBuildProjectDirectory)\..\Output</CodeOutputFolder>
+      <SqlCmdRunner Condition=" '$(SqlCmdRunner)' == '' ">$(ToolsFolder)\ISQL\isql.exe</SqlCmdRunner>	  
+	  <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+   </PropertyGroup>
+
+   <PropertyGroup Condition=" '|$(Configuration)|' == '|Debug|' ">
+      <OutputPath>$(CodeOutputFolder)\Debug\Database</OutputPath>
+   </PropertyGroup>
+   <PropertyGroup Condition=" '|$(Configuration)|' == '|Release|' ">
+      <OutputPath>$(CodeOutputFolder)\Release\Database</OutputPath>
+   </PropertyGroup>
+
+   <ItemGroup>
+      <Sql Include="$(SqlScriptsFolder)\factuges.sql" />
+      <Sql Include="$(SqlScriptsFolder)\factuges_sysdata.sql" />	  
+      <SqlOutput Include="$(OutputPath)\factuges.fdb" />
+   </ItemGroup>
+  
+   <Target Name="Build" 
+           Inputs="@(Sql)" 
+           Outputs="@(SqlOutput)">
+
+		<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\factuges.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q" 
+			WorkingDirectory="$(OutputPath)" />
+			
+		<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\factuges_sysdata.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q $(DOUBLE_QUOTES)$(OutputPath)\factuges.fdb$(DOUBLE_QUOTES)" 
+			WorkingDirectory="$(OutputPath)" />			
+   </Target>
+
+   <Target Name="Extract" 
+           Inputs="$(OutputPath)\factuges.fdb" 
+           Outputs="$(OutputPath)\factuges_$(Configuration).sql">
+
+		<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -a -d factuges.fdb -u $(DBUser) -p $(DBPassword) -o $(DOUBLE_QUOTES)$(OutputPath)\factuges_$(Configuration).sql$(DOUBLE_QUOTES) $(DOUBLE_QUOTES)$(OutputPath)\factuges.fdb$(DOUBLE_QUOTES) -b" 
+			WorkingDirectory="$(OutputPath)" />
+   </Target>
+
+   <Target Name="Rebuild" 
+           DependsOnTargets="Clean;Build"/>
+
+   <Target Name="Clean">
+      <Delete Files="@(SqlOutput)"/>
+   </Target>
+
+</Project>

Database/_db_enviroment.bat

@@ -0,0 +1,14 @@
+rem   Full path to the firebird isql utility.
+SET ISQL="..\Tools\ISQL\isql.exe"
+
+SET DB_LOGIN=-USER SYSDBA -PASSWORD masterkey
+
+rem DB ALIAS
+SET DB_ALIAS=FACTUGES.FDB
+SET DB_ALIAS_TEST=FACTUGES_TEST.FDB
+
+set DB_SQL_SCRIPT=scripts\factuges.sql
+set DB_SQL_SYSDATA=scripts\factuges.sql
+
+set DB_DEBUG_PATH=..\output\debug\database
+set DB_RELEASE_PATH=..\output\release\database

Database/db_execute.bat

@@ -0,0 +1,67 @@
+rem @echo off
+call _db_enviroment.bat
+
+if "%1" == "drop" goto drop
+if "%1" == "create" goto create
+if "%1" == "extract" goto extract
+if "%1" == "insert_data" goto insert_data
+if "%1" == "recreate" goto recreate
+goto ayuda
+
+:recreate
+call %0 drop
+IF %ERRORLEVEL% == 1 GOTO ERROR
+call %0 create
+IF %ERRORLEVEL% == 1 GOTO ERROR
+call %0 insert_data
+IF %ERRORLEVEL% == 1 GOTO ERROR
+goto end
+
+:drop
+echo Borrando la base de datos %DB_ALIAS%...
+IF EXIST "%DB_DEBUG_PATH%\%DB_ALIAS%" DEL %DB_DEBUG_PATH%\%DB_ALIAS%
+IF %ERRORLEVEL% == 1 GOTO ERROR
+goto done
+
+:create
+echo Creando la base de datos %DB_ALIAS% en %DB_DEBUG_PATH%\%DB_ALIAS%
+%ISQL% -i %DB_SQL_SCRIPT% %DB_LOGIN% -q
+IF %ERRORLEVEL% == 1 GOTO ERROR
+move %DB_ALIAS% "%DB_DEBUG_PATH%"
+goto done
+
+:extract
+echo Extrayendo %DB_ALIAS% al script SQL %DB_SQL_SCRIPT%...
+IF EXIST %DB_SQL_SCRIPT% DEL %DB_SQL_SCRIPT%
+%ISQL% -a -d %DB_ALIAS% %DB_LOGIN% -o %DB_SQL_SCRIPT% %DB_DEBUG_PATH%\%DB_ALIAS% -b
+IF %ERRORLEVEL% == 1 GOTO ERROR
+goto done
+
+:insert_data
+echo Insertando datos del sistema en %DB_ALIAS%...
+%ISQL% -i %DB_SQL_SYSDATA% %DB_LOGIN% %DB_DEBUG_PATH%\%DB_ALIAS% 
+IF %ERRORLEVEL% == 1 GOTO ERROR
+goto done
+
+:error
+ECHO Se ha producido un error!!!!
+goto end
+
+:ayuda
+echo Modo de uso: %0 [create / drop / extract]
+echo ------------
+echo       create: crear la base de datos %DB_ALIAS% (la borra antes si ya existe)
+echo         drop: borrar la base de datos %DB_ALIAS%
+echo      extract: extrae los metadatos de la BD a un fichero SQL (%DB_SQL_SCRIPT%)
+echo  insert_data: extrae los metadatos de la BD a un fichero SQL (%DB_SQL_SCRIPT%)
+echo.
+echo     recreate: rehacer la BD: borrarla si existe, crearla e insertar los datos del sistema
+echo.
+goto end
+
+:done
+echo Hecho!
+echo.
+goto end
+
+:end

Database/scripts/factuges_sysdata.sql

@@ -0,0 +1,49 @@
+SET SQL DIALECT 3;
+
+SET NAMES ISO8859_1;
+
+INSERT INTO CATEGORIAS (ID, CATEGORIA) VALUES (1, 'CLIENTE');
+INSERT INTO CATEGORIAS (ID, CATEGORIA) VALUES (2, 'PROVEEDOR');
+INSERT INTO CATEGORIAS (ID, CATEGORIA) VALUES (3, 'EMPLEADO');
+SET GENERATOR GEN_CATEGORIAS_ID TO 4;
+COMMIT WORK;
+
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (1, 1, 'VENTAS ARTICULOS', 'InfVentasArticuloController', 4, 'Ventas por artículo', 'Informe de ventas por artículo', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (2, 1, 'VENTAS ARTICULOS', 'InfVentasArticuloController', 4, 'Ventas por cliente', 'Informe de ventas por cliente y artículo', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (3, 1, 'VENTAS ARTICULOS', 'InfVentasArticuloController', 4, 'Ventas por agente y cliente', 'Informe de ventas por agente y cliente', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (4, 1, 'MARGEN ARTICULOS', 'InfMargenArticuloController', 0, 'Margen (promedio) por artículo', 'Informe de margen por artículo teniendo en cuenta el precio neto de venta promedio', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (5, 1, 'VENTAS ARTICULOS', 'InfVentasArticuloController', 4, 'Ventas por proveedor', 'Informe de ventas por proveedor y artículo', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (6, 1, 'MARGEN ARTICULOS', 'InfMargenArticuloController', 0, 'Margen (promedio) por cliente', 'Informe de margen por artículo agrupado por cliente teniendo en cuenta el precio neto de venta promedio', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (7, 1, 'MARGEN ARTICULOS', 'InfMargenArticuloController', 0, 'Margen (promedio) por agente y cliente', 'Informe de margen por artículo agrupado por agente y cliente teniendo en cuenta el precio neto de venta promedio', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (8, 1, 'MARGEN ARTICULOS', 'InfMargenArticuloController', 2, 'Margen (ult. venta) por artículo', 'Informe de margen por artículo teniendo en cuenta el precio neto de última venta', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (9, 1, 'MARGEN ARTICULOS', 'InfMargenArticuloController', 2, 'Margen (ult.venta) por clientes', 'Informe de margen por artículo agrupado por cliente teniendo en cuenta el precio neto de última venta', NULL, 'S');
+INSERT INTO INFORMES (ID, ID_EMPRESA, CATEGORIA, CONTROLLER, ICONO, NOMBRE, DESCRIPCION, ORDEN, MODIFICABLE) VALUES (10, 1, 'MARGEN ARTICULOS', 'InfMargenArticuloController', 2, 'Margen (ult. venta) por agente y cliente', 'Informe de margen por artículo agrupado por agente y cliente teniendo en cuenta el precio neto de última venta', NULL, 'S');
+SET GENERATOR GEN_INFORMES_ID TO 11;
+COMMIT WORK;
+
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_FACTURAS_CLIENTE', '00001', 1, 'Ref. facturas de cliente');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_PEDIDOS_CLIENTE', '00001', 1, 'Ref. pedidos de cliente');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_PEDIDOS_PROVEEDOR', '00001', 1, 'Ref. pedidos de proveedor');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_ALBARANES_CLIENTE', '00001', 1, 'Ref. albaranes de cliente');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_ALBARANES_PROVEEDOR', '00001', 1, 'Ref. albaranes de proveedor');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_REMESAS_CLIENTE', '00001', 1, 'Ref. remesas de cliente');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_COMISIONES', '00001', 1, 'Ref. liquidaciones de comision');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_FACTURAS_PROVEEDOR', '00001', 1, 'Ref. facturas de proveedor');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_ALBARANES_DEV_CLIENTE', '00001', 1, 'Ref. ordenes de devolucion de cliente');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_ALBARANES_DEV_PROVEEDOR', '00001', 1, 'Ref. ordenes de devolucion de proveedor');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_REMESAS_PROVEEDOR', '00001', 1, 'Ref. remesas de proveedor');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_ABONOS_CLIENTE', '00001', 1, 'Ref. abonos de cliente');
+INSERT INTO REFERENCIAS (CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES ('REF_ABONOS_PROVEEDOR', '00001', 1, 'Ref. abonos de proveedor');
+COMMIT WORK;
+
+INSERT INTO TIPOS_IVA (ID, REFERENCIA, DESCRIPCION, IVA, RE) VALUES (1, 'IVA16', 'IVA16', 16, 4);
+INSERT INTO TIPOS_IVA (ID, REFERENCIA, DESCRIPCION, IVA, RE) VALUES (2, 'IVA4', 'IVA4', 4, 0.5);
+INSERT INTO TIPOS_IVA (ID, REFERENCIA, DESCRIPCION, IVA, RE) VALUES (3, 'IVA7', 'IVA7', 7, 1);
+INSERT INTO TIPOS_IVA (ID, REFERENCIA, DESCRIPCION, IVA, RE) VALUES (4, 'EXENTO', 'EXTRANJERO', 0, 0);
+SET GENERATOR GEN_TIPOS_IVA_ID TO 5;
+COMMIT WORK;
+
+/* Usuario 'Administrador' (Contraseña en blanco) */
+INSERT INTO USUARIOS (ID, USERNAME, LOGIN, PASS, PASSEXPIRED, BLOQUEADO, EMAIL, USERDAYSSUN, PRIVILEGED, TIPO, ID_PERFIL, CHECKSUM) VALUES (1, 'Administrador', 'admin', 'd41d8cd98f00b204e9800998ecf8427e', '2007-07-11', 0, 'admin@correo.net', 30, -1, 'U', 0, '6d1089be77aaaffa4ae01a4dd2fee551');
+SET GENERATOR GEN_USUARIOS_ID TO 2;
+COMMIT WORK;

Enviroment.config

@@ -0,0 +1,27 @@
+<?xml version="1.0"?>
+<configuration>
+ <appSettings>
+
+   <!-- ENVIRONMENT
+        Use the "Environment" key below to select the environment (DEV | TEST | PROD).
+       
+        For settings common to all environments, add a normal appSetting key (e.g. "Name").
+        To change a setting for a specific environment, add an appSetting key with
+        the environment name (e.g. "DEV.Name"). An environment-specific setting
+        will override a common setting.
+
+        In the example below, the DEV environment will have a connection timeout of
+        2 minutes while the TEST and PROD environments will use 90 minutes.
+   -->
+
+   <add key="Environment" value="DEV"/>
+
+   <add key="DEV.Name"  value="Development"/>
+   <add key="TEST.Name" value="Test"/>
+   <add key="PROD.Name" value="Production"/>
+
+   <add key="ConnectionTimeout"     value="90"/>
+   <add key="DEV.ConnectionTimeout" value="2"/>
+
+ </appSettings>
+</configuration>

Output/Debug/Cliente/FactuGES.ini

@@ -1,2 +0,0 @@
-[Server]
-URL=http://localhost:8090/bin

Output/Debug/Cliente/dunit.ini

@@ -1,25 +0,0 @@
-[Tests.TiendaWeb_Tests.exe]
-TestTOscCustomersController=0
-
-[Tests.TiendaWeb_Tests.exe.TestTTiendaWebController]
-TestActualizarTienda=0
-
-[GUITestRunner Config]
-AutoSave=1
-Left=686
-Top=422
-Width=446
-Height=470
-Maximized=0
-UseRegistry=0
-ResultsPanel.Height=174
-ErrorMessage.Height=75
-ErrorMessage.Visible=1
-FailureList.ColumnWidth[0]=120
-FailureList.ColumnWidth[1]=100
-FailureList.ColumnWidth[2]=200
-FailureList.ColumnWidth[3]=50
-HideTestNodesOnOpen=0
-BreakOnFailures=0
-SelectTestedNode=1
-

Output/Debug/Cliente/midas.bat

@@ -1,2 +0,0 @@
-copy midas.dll %windir%\system32
-regsvr32 %windir%\system32\midas.dll 

Output/Debug/Cliente/update/versionlocal.ini

@@ -1,19 +0,0 @@
-[Version]
-Count=1
-CurrentProductionProgramVersion=2.2.4.0
-CurrentBetaProgramVersion=
-CurrentAlphaProgramVersion=
-
-[Program Version 0]
-DownloadPasswordRequired=FALSE
-LocalInstallerParams=
-ProgramLocationPath=files
-ProgramLocationFileName=instalar.exe
-ProgramVersion=2.2.4.0
-ProgramReleaseType=prtProduction
-ProgramSize=1000000
-ProgramReleaseDate=30/08/2007
-
-[Program Version 0\VersionDescription]
-Count=0
-

Output/Debug/Servidor/ServerLog.txt

@@ -1,855 +0,0 @@
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Connect]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID
-  FROM
-    USUARIOS
-  WHERE USUARIO = :USUARIO AND
-        PASS = :PASS AND
-        ACTIVO = 1
-
-  Plan: PLAN (USUARIOS NATURAL)
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  Plan: PLAN JOIN (R INDEX (RDB$INDEX_4), F INDEX (RDB$INDEX_2))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = USUARIOS
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  Plan: PLAN SORT (JOIN (RR INDEX (RDB$INDEX_42), RI INDEX (RDB$INDEX_6)))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = USUARIOS
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID
-  FROM
-    USUARIOS
-  WHERE USUARIO = :USUARIO AND
-        PASS = :PASS AND
-        ACTIVO = 1
-
-  USUARIO = Luis
-  PASS = 1
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    PERFILES.PERFIL
-  FROM
-    PERFILES, PERFILES_USUARIOS
-  WHERE PERFILES_USUARIOS.ID_USUARIO = :ID_USUARIO
-  AND PERFILES.ID = PERFILES_USUARIOS.ID_PERFIL
-
-  Plan: PLAN JOIN (PERFILES_USUARIOS NATURAL, PERFILES INDEX (PK_PERFILES))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = PERFILES
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = PERFILES
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    PERFILES.PERFIL
-  FROM
-    PERFILES, PERFILES_USUARIOS
-  WHERE PERFILES_USUARIOS.ID_USUARIO = :ID_USUARIO
-  AND PERFILES.ID = PERFILES_USUARIOS.ID_PERFIL
-
-  ID_USUARIO = 2
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID_EMPRESA
-  FROM
-    EMPRESAS_USUARIOS
-  WHERE ID_USUARIO = :ID_USUARIO
-
-  Plan: PLAN (EMPRESAS_USUARIOS NATURAL)
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = EMPRESAS_USUARIOS
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = EMPRESAS_USUARIOS
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID_EMPRESA
-  FROM
-    EMPRESAS_USUARIOS
-  WHERE ID_USUARIO = :ID_USUARIO
-
-  ID_USUARIO = 2
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, 
-    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, 
-    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, 
-    FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,
-    REGISTRO_MERCANTIL, IVA
-  FROM
-    EMPRESAS WHERE (ID IN (1,2)) 
-
-  Plan: PLAN (EMPRESAS INDEX (PK_EMPRESAS, PK_EMPRESAS))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = EMPRESAS
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = EMPRESAS
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, 
-    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, 
-    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, 
-    FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,
-    REGISTRO_MERCANTIL, IVA
-  FROM
-    EMPRESAS WHERE (ID IN (1,2)) 
-
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  Plan: PLAN (EMPRESAS_DATOS_BANCO INDEX (FK_EMPRESAS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = EMPRESAS_DATOS_BANCO
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = EMPRESAS_DATOS_BANCO
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  ID_EMPRESA = 1
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  Plan: PLAN (EMPRESAS_DATOS_BANCO INDEX (FK_EMPRESAS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  ID_EMPRESA = 2
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, 
-    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, 
-    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, 
-    FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,
-    REGISTRO_MERCANTIL, IVA
-  FROM
-    EMPRESAS WHERE (ID IN (1,2)) 
-
-  Plan: PLAN (EMPRESAS INDEX (PK_EMPRESAS, PK_EMPRESAS))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, 
-    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, 
-    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, 
-    FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,
-    REGISTRO_MERCANTIL, IVA
-  FROM
-    EMPRESAS WHERE (ID IN (1,2)) 
-
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  Plan: PLAN (EMPRESAS_DATOS_BANCO INDEX (FK_EMPRESAS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  ID_EMPRESA = 1
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  Plan: PLAN (EMPRESAS_DATOS_BANCO INDEX (FK_EMPRESAS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:09]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  ID_EMPRESA = 2
-
-
>
-[06/09/2007 12:28:11]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, 
-    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, 
-    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, 
-    FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,
-    REGISTRO_MERCANTIL, IVA
-  FROM
-    EMPRESAS WHERE (EMPRESAS.ID = 1) AND (ID IN (1,2)) 
-
-  Plan: PLAN (EMPRESAS INDEX (PK_EMPRESAS))
-
-
>
-[06/09/2007 12:28:11]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, 
-    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, 
-    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, 
-    FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,
-    REGISTRO_MERCANTIL, IVA
-  FROM
-    EMPRESAS WHERE (EMPRESAS.ID = 1) AND (ID IN (1,2)) 
-
-
-
>
-[06/09/2007 12:28:12]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  Plan: PLAN (EMPRESAS_DATOS_BANCO INDEX (FK_EMPRESAS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:12]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENTA, 
-    SUFIJO_N19, SUFIJO_N58
-  FROM
-    EMPRESAS_DATOS_BANCO
-WHERE ID_EMPRESA = :ID_EMPRESA
-
-  ID_EMPRESA = 1
-
-
>
-[06/09/2007 12:28:13]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSONA_CONTACTO, CALLE,
-    POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, 
-    MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, 
-    NOTAS, USUARIO, ID_EMPRESA,
-
-    GRUPO_CLIENTE, NOMBRE_COMERCIAL, VENCIMIENTO_FACTURAS, BLOQUEADO,
-    MOTIVO_BLOQUEO, RECARGO_EQUIVALENCIA, REGIMEN_IVA, ID_TIPO_IVA,
-    ID_FORMA_PAGO, TIENDA_WEB
-  FROM
-    V_CLIENTES WHERE (ID_EMPRESA = 1) AND (ID_EMPRESA IN (1,2)) 
-
-  Plan: PLAN JOIN (JOIN (V_CLIENTES V_CONTACTOS EMPRESAS_CONTACTOS INDEX (PK_EMPRESAS_CONTACTOS), V_CLIENTES V_CONTACTOS CONTACTOS_CATEGORIAS INDEX (PK_CONTACTOS_CATEGORIAS), V_CLIENTES V_CONTACTOS CONTACTOS INDEX (PK_CONTACTOS)), V_CLIENTES CLIENTES_DATOS INDEX (PK_CLIENTES_DATOS))
-
-
>
-[06/09/2007 12:28:13]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:13]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = V_CLIENTES
-
-
>
-[06/09/2007 12:28:13]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = V_CLIENTES
-
-
>
-[06/09/2007 12:28:13]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:13]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSONA_CONTACTO, CALLE,
-    POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, 
-    MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, 
-    NOTAS, USUARIO, ID_EMPRESA,
-
-    GRUPO_CLIENTE, NOMBRE_COMERCIAL, VENCIMIENTO_FACTURAS, BLOQUEADO,
-    MOTIVO_BLOQUEO, RECARGO_EQUIVALENCIA, REGIMEN_IVA, ID_TIPO_IVA,
-    ID_FORMA_PAGO, TIENDA_WEB
-  FROM
-    V_CLIENTES WHERE (ID_EMPRESA = 1) AND (ID_EMPRESA IN (1,2)) 
-
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    CLIENTES_DTOS_PROVEEDORES.ID,
-    CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE,
-    CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR,
-    CONTACTOS.NOMBRE,
-    CLIENTES_DTOS_PROVEEDORES.DESCUENTO
-  FROM
-    CLIENTES_DTOS_PROVEEDORES
-  LEFT JOIN CONTACTOS ON (CONTACTOS.ID = CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR)
-WHERE CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE = :ID_CLIENTE
-
-  Plan: PLAN JOIN (CLIENTES_DTOS_PROVEEDORES INDEX (IDX_CLIENTES_DTOS_PROV_ID_CLI), CONTACTOS INDEX (PK_CONTACTOS))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = CLIENTES_DTOS_PROVEEDORES
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = CLIENTES_DTOS_PROVEEDORES
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = CONTACTOS
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = CONTACTOS
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    CLIENTES_DTOS_PROVEEDORES.ID,
-    CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE,
-    CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR,
-    CONTACTOS.NOMBRE,
-    CLIENTES_DTOS_PROVEEDORES.DESCUENTO
-  FROM
-    CLIENTES_DTOS_PROVEEDORES
-  LEFT JOIN CONTACTOS ON (CONTACTOS.ID = CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR)
-WHERE CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE = :ID_CLIENTE
-
-  ID_CLIENTE = 1018
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, ID_CONTACTO, NOMBRE, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, PERSONA_CONTACTO,
-    TELEFONO, MOVIL, FAX, EMAIL, NOTAS, PORTE
-  FROM
-    CONTACTOS_DIRECCIONES
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  Plan: PLAN (CONTACTOS_DIRECCIONES INDEX (IDX_CONTACTOS_DIR_ID_CONTACTO))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = CONTACTOS_DIRECCIONES
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = CONTACTOS_DIRECCIONES
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, ID_CONTACTO, NOMBRE, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, PERSONA_CONTACTO,
-    TELEFONO, MOVIL, FAX, EMAIL, NOTAS, PORTE
-  FROM
-    CONTACTOS_DIRECCIONES
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  ID_CONTACTO = 1018
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA
-  FROM
-    CONTACTOS_DATOS_BANCO
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  Plan: PLAN (CONTACTOS_DATOS_BANCO INDEX (IDX_CONTACTOS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = CONTACTOS_DATOS_BANCO
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = CONTACTOS_DATOS_BANCO
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA
-  FROM
-    CONTACTOS_DATOS_BANCO
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  ID_CONTACTO = 1018
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID_CONTACTO, ID_CATEGORIA
-  FROM
-    CONTACTOS_CATEGORIAS
-  WHERE
-    ID_CONTACTO = :ID_CONTACTO
-
-  Plan: PLAN (CONTACTOS_CATEGORIAS INDEX (IDX_CONTACTOS_CATEGORIAS))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = CONTACTOS_CATEGORIAS
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = CONTACTOS_CATEGORIAS
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID_CONTACTO, ID_CATEGORIA
-  FROM
-    CONTACTOS_CATEGORIAS
-  WHERE
-    ID_CONTACTO = :ID_CONTACTO
-
-  ID_CONTACTO = 1018
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID_CONTACTO, ID_CATEGORIA
-  FROM
-    CONTACTOS_CATEGORIAS
-  WHERE
-    ID_CONTACTO = :ID_CONTACTO
-
-  Plan: PLAN (CONTACTOS_CATEGORIAS INDEX (IDX_CONTACTOS_CATEGORIAS))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID_CONTACTO, ID_CATEGORIA
-  FROM
-    CONTACTOS_CATEGORIAS
-  WHERE
-    ID_CONTACTO = :ID_CONTACTO
-
-  ID_CONTACTO = 850
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA
-  FROM
-    CONTACTOS_DATOS_BANCO
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  Plan: PLAN (CONTACTOS_DATOS_BANCO INDEX (IDX_CONTACTOS_DATOS_BANCO))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA
-  FROM
-    CONTACTOS_DATOS_BANCO
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  ID_CONTACTO = 850
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT
-    ID, ID_CONTACTO, NOMBRE, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, PERSONA_CONTACTO,
-    TELEFONO, MOVIL, FAX, EMAIL, NOTAS, PORTE
-  FROM
-    CONTACTOS_DIRECCIONES
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  Plan: PLAN (CONTACTOS_DIRECCIONES INDEX (IDX_CONTACTOS_DIR_ID_CONTACTO))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT
-    ID, ID_CONTACTO, NOMBRE, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, PERSONA_CONTACTO,
-    TELEFONO, MOVIL, FAX, EMAIL, NOTAS, PORTE
-  FROM
-    CONTACTOS_DIRECCIONES
-  WHERE ID_CONTACTO = :ID_CONTACTO
-
-  ID_CONTACTO = 850
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    CLIENTES_DTOS_PROVEEDORES.ID,
-    CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE,
-    CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR,
-    CONTACTOS.NOMBRE,
-    CLIENTES_DTOS_PROVEEDORES.DESCUENTO
-  FROM
-    CLIENTES_DTOS_PROVEEDORES
-  LEFT JOIN CONTACTOS ON (CONTACTOS.ID = CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR)
-WHERE CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE = :ID_CLIENTE
-
-  Plan: PLAN JOIN (CLIENTES_DTOS_PROVEEDORES INDEX (IDX_CLIENTES_DTOS_PROV_ID_CLI), CONTACTOS INDEX (PK_CONTACTOS))
-
-
>
-[06/09/2007 12:28:15]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    CLIENTES_DTOS_PROVEEDORES.ID,
-    CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE,
-    CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR,
-    CONTACTOS.NOMBRE,
-    CLIENTES_DTOS_PROVEEDORES.DESCUENTO
-  FROM
-    CLIENTES_DTOS_PROVEEDORES
-  LEFT JOIN CONTACTOS ON (CONTACTOS.ID = CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR)
-WHERE CLIENTES_DTOS_PROVEEDORES.ID_CLIENTE = :ID_CLIENTE
-
-  ID_CLIENTE = 850
-
-
>
-[06/09/2007 12:28:18]
-[Application: FactuGES (Servidor)]
-: [Prepare] SELECT 
-    ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSONA_CONTACTO, CALLE,
-    POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, 
-    MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB,
-    NOTAS, USUARIO, ID_EMPRESA,
-
-
-    REGIMEN_IVA, DESCUENTO, DESCRIPCION_PROVEEDOR,
-    CODIGO_ASIGNADO, ID_TIPO_IVA, ID_FORMA_PAGO, TIENDA_WEB, HOMOLOGADO, CERTIFICACION,
-    GRUPO_PROVEEDOR
-
-  FROM
-    V_PROVEEDORES WHERE (ID_EMPRESA = 1) AND (ID_EMPRESA IN (1,2)) 
-
-  Plan: PLAN JOIN (V_PROVEEDORES PROVEEDORES_DATOS NATURAL, V_PROVEEDORES V_CONTACTOS EMPRESAS_CONTACTOS INDEX (PK_EMPRESAS_CONTACTOS), V_PROVEEDORES V_CONTACTOS CONTACTOS_CATEGORIAS INDEX (PK_CONTACTOS_CATEGORIAS), V_PROVEEDORES V_CONTACTOS CONTACTOS INDEX (PK_CONTACTOS))
-
-
>
-[06/09/2007 12:28:18]
-[Application: FactuGES (Servidor)]
-: [Start transaction]
-
-
>
-[06/09/2007 12:28:18]
-[Application: FactuGES (Servidor)]
-: [Execute] Select F.RDB$COMPUTED_BLR, F.RDB$DEFAULT_VALUE, R.RDB$DEFAULT_VALUE, R.RDB$FIELD_NAME from RDB$RELATION_FIELDS R, RDB$FIELDS F where R.RDB$RELATION_NAME = :RELATION and R.RDB$FIELD_SOURCE = F.RDB$FIELD_NAME and ((not F.RDB$COMPUTED_BLR is NULL) or      (not (F.RDB$DEFAULT_VALUE is NULL and R.RDB$DEFAULT_VALUE is NULL))) 
-
-  RELATION = V_PROVEEDORES
-
-
>
-[06/09/2007 12:28:18]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT RDB$FIELD_NAME, RDB$FIELD_POSITION FROM RDB$RELATION_CONSTRAINTS RR JOIN RDB$INDEX_SEGMENTS RI ON      RR.RDB$INDEX_NAME = RI.RDB$INDEX_NAME WHERE RDB$RELATION_NAME = :relation_name AND       RDB$CONSTRAINT_TYPE = 'PRIMARY KEY ' ORDER BY RDB$FIELD_POSITION 
-
-  RELATION_NAME = V_PROVEEDORES
-
-
>
-[06/09/2007 12:28:18]
-[Application: FactuGES (Servidor)]
-: [Commit (Hard commit)]
-
-
>
-[06/09/2007 12:28:18]
-[Application: FactuGES (Servidor)]
-: [Execute] SELECT 
-    ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSONA_CONTACTO, CALLE,
-    POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, 
-    MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB,
-    NOTAS, USUARIO, ID_EMPRESA,
-
-
-    REGIMEN_IVA, DESCUENTO, DESCRIPCION_PROVEEDOR,
-    CODIGO_ASIGNADO, ID_TIPO_IVA, ID_FORMA_PAGO, TIENDA_WEB, HOMOLOGADO, CERTIFICACION,
-    GRUPO_PROVEEDOR
-
-  FROM
-    V_PROVEEDORES WHERE (ID_EMPRESA = 1) AND (ID_EMPRESA IN (1,2)) 
-
-
-
>

Output/Debug/Servidor/config.ini

@@ -1,3 +0,0 @@
-[CONFIG]
-APPPATH=E:\Codigo (Tecsitel)\Output\Debug\Servidor\FactuGES_Server.exe
-LIBPATH=E:\Codigo (Tecsitel)\Output\Debug\Servidor\GDS32.DLL