- Reestructura de código

- Cambio de nombre FactuGES -> Etiquetas

git-svn-id: https://192.168.0.254/svn/Proyectos.FarmaciaPH_Etiquetas/trunk@4 7b0b1a58-4aa1-b946-8089-8453ede31e50
This commit is contained in:
roberto 2011-11-14 20:00:04 +00:00
parent 805805314a
commit cfec45d973
193 changed files with 2691 additions and 94155 deletions

Binary file not shown.

View File

@ -14,8 +14,8 @@
<Notes>
<![CDATA[]]>
</Notes>
<LastBuildRun>00:00:52</LastBuildRun>
<LastBuildStart>14/11/2011 11:31:46</LastBuildStart>
<LastBuildState>True</LastBuildState>
<LastBuildRun>00:00:04</LastBuildRun>
<LastBuildStart>14/11/2011 20:46:39</LastBuildStart>
<LastBuildState>False</LastBuildState>
</properties>
</project>

Binary file not shown.

View File

@ -1,299 +0,0 @@
delete from contactos_categorias;
delete from contactos_direcciones;
delete from contactos_datos_banco;
delete from clientes_dtos_proveedores;
delete from agentes_comisiones;
delete from clientes_datos;
delete from proveedores_datos;
delete from personal_datos;
delete from pedidos_cliente_detalles;
delete from albaranes_cliente_detalles;
delete from facturas_cliente_detalles;
delete from pagos_cliente;
delete from facturas_cliente;
delete from albaranes_cliente;
delete from pedidos_cliente;
delete from pedidos_proveedor_detalles;
delete from albaranes_proveedor_detalles;
delete from facturas_proveedor_detalles;
delete from pagos_proveedor;
delete from facturas_proveedor;
delete from albaranes_proveedor;
delete from pedidos_proveedor;
delete from comisiones_liquidadas;
delete from contactos;
Extract MetaData con cmapos blob, lanzar script en nueva base de datos
CREATE TABLE PROVEEDORES (
CODIGO VARCHAR(10) NOT NULL,
NIFCIF VARCHAR(10) CHARACTER SET ISO8859_1,
NOMBRE VARCHAR(100) CHARACTER SET ISO8859_1,
CALLE VARCHAR(150) CHARACTER SET ISO8859_1,
NUMERO VARCHAR(20) CHARACTER SET ISO8859_1,
PISO VARCHAR(20) CHARACTER SET ISO8859_1,
CODIGOPOSTAL VARCHAR(5) CHARACTER SET ISO8859_1,
POBLACION VARCHAR(40) CHARACTER SET ISO8859_1,
PROVINCIA VARCHAR(30) CHARACTER SET ISO8859_1,
TELEFONO1 VARCHAR(30) CHARACTER SET ISO8859_1,
TELEFONO2 VARCHAR(30) CHARACTER SET ISO8859_1,
FAX VARCHAR(30) CHARACTER SET ISO8859_1,
CORREO VARCHAR(60) CHARACTER SET ISO8859_1,
PERSONACONTACTO VARCHAR(100) CHARACTER SET ISO8859_1,
OBSERVACIONES BLOB SUB_TYPE 1 SEGMENT SIZE 100 CHARACTER SET ISO8859_1,
CODIGOCLIENTE VARCHAR(10),
ETIQUETADO SMALLINT,
ULTIMOCAMBIO TIMESTAMP
);
ALTER TABLE PROVEEDORES ADD CONSTRAINT PK_PROVEEDORES PRIMARY KEY (CODIGO);
CREATE TABLE SUCURSALESPROVEEDOR (
CODIGOPROVEEDOR VARCHAR(10) NOT NULL,
CODIGO SMALLINT NOT NULL,
CALLE VARCHAR(150),
NUMERO VARCHAR(20),
PISO VARCHAR(20),
CODIGOPOSTAL VARCHAR(5),
POBLACION VARCHAR(40),
PROVINCIA VARCHAR(30),
TELEFONO1 VARCHAR(30),
TELEFONO2 VARCHAR(30),
FAX VARCHAR(30),
CORREO VARCHAR(60),
PERSONACONTACTO VARCHAR(100)
);
ALTER TABLE SUCURSALESPROVEEDOR ADD CONSTRAINT PK_SUCURSALESPROVEEDOR PRIMARY KEY (CODIGOPROVEEDOR, CODIGO);
ALTER TABLE SUCURSALESPROVEEDOR ADD FOREIGN KEY (CODIGOPROVEEDOR) REFERENCES PROVEEDORES (CODIGO) ON DELETE CASCADE ON UPDATE NO ACTION;
COMMIT WORK;
/*DATOS*/
Poner generador de ID_CONTACTOS a 1
DECLARE EXTERNAL FUNCTION substr
CSTRING(255), SMALLINT, SMALLINT
RETURNS CSTRING(255) FREE_IT
ENTRY_POINT 'IB_UDF_substr' MODULE_NAME 'ib_udf';
insert into CONTACTOS
(ID, REFERENCIA, NIF_CIF, NOMBRE, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2,
FAX, EMAIL_1, PERSONA_CONTACTO, NOTAS)
select
GEN_ID(GEN_CONTACTOS_ID, 1),
proveedores.CODIGO AS REFERENCIA,
proveedores.NIFCIF AS NIF_CIF,
proveedores.NOMBRE AS NOMBRE,
(COALESCE(proveedores.CALLE,'') || ', ' || COALESCE(proveedores.NUMERO,'') || ' ' || COALESCE(proveedores.PISO,'')) AS CALLE,
proveedores.POBLACION AS POBLACION,
proveedores.PROVINCIA AS PROVINCIA,
proveedores.CODIGOPOSTAL AS CODIGO_POSTAL,
substr(proveedores.TELEFONO1,1,25) AS TELEFONO_1,
substr(proveedores.TELEFONO2,1,25) AS TELEFONO_2,
substr(proveedores.FAX,1,25) AS FAX,
proveedores.CORREO AS EMAIL_1,
proveedores.PERSONACONTACTO AS PERSONA_CONTACTO,
proveedores.OBSERVACIONES AS NOTAS
from proveedores;
insert into contactos_categorias
(ID_CONTACTO, ID_CATEGORIA)
select ID, 2
from contactos;
insert into proveedores_datos
(ID_PROVEEDOR, ID_TIPO_IVA)
select CONTACTOS.ID, 1
from CONTACTOS
left join contactos_categorias on contactos_categorias.id_contacto = contactos.id
where contactos_categorias.id_categoria = 2;
delete from proveedores_datos
where proveedores_datos.id_proveedor in (
select CONTACTOS.ID
from CONTACTOS
left join proveedores on proveedores.codigo = contactos.referencia
WHERE proveedores.CODIGOCLIENTE is not null);
insert into proveedores_datos
(ID_PROVEEDOR, ID_TIPO_IVA, CODIGO_ASIGNADO)
select CONTACTOS.ID, 2, proveedores.CODIGOCLIENTE
from CONTACTOS
left join proveedores on proveedores.codigo = contactos.referencia
WHERE proveedores.CODIGOCLIENTE is not null;
INSERT INTO CONTACTOS_DIRECCIONES
(ID, ID_CONTACTO, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, PERSONA_CONTACTO,
TELEFONO, MOVIL, FAX, EMAIL)
/* Insertamos la sucursales de los proveedores */
select
GEN_ID(GEN_CONTACTOS_DIR_ID, 1),
contactos.id AS ID_CONTACTO,
(COALESCE(sucursalesproveedor.CALLE,'') || ', ' || COALESCE(sucursalesproveedor.NUMERO,'') || ' ' || COALESCE(sucursalesproveedor.PISO,'')) AS CALLE,
sucursalesproveedor.POBLACION AS POBLACION,
sucursalesproveedor.PROVINCIA AS PROVINCIA,
sucursalesproveedor.CODIGOPOSTAL AS CODIGO_POSTAL,
sucursalesproveedor.PERSONACONTACTO AS PERSONA_CONTACTO,
substr(sucursalesproveedor.TELEFONO1,1,25) AS TELEFONO,
substr(sucursalesproveedor.TELEFONO2,1,25) AS MOVIL,
substr(sucursalesproveedor.FAX,1,25) AS FAX,
sucursalesproveedor.CORREO AS EMAIL
from sucursalesproveedor
left join contactos on contactos.referencia = sucursalesproveedor.codigoproveedor
left join contactos_categorias on contactos_categorias.id_contacto = contactos.id
where contactos_categorias.id_categoria = 2
and (COALESCE(sucursalesproveedor.CALLE,'') || ', ' || COALESCE(sucursalesproveedor.NUMERO,'') || ' ' || COALESCE(sucursalesproveedor.PISO,'')) <> ',';
Extract MetaData con cmapos blob, lanzar script en nueva base de datos
CREATE TABLE CLIENTES (
CODIGO VARCHAR(10) NOT NULL,
NIFCIF VARCHAR(10) CHARACTER SET ISO8859_1,
NOMBRE VARCHAR(100) CHARACTER SET ISO8859_1,
CALLE VARCHAR(150) CHARACTER SET ISO8859_1,
NUMERO VARCHAR(20) CHARACTER SET ISO8859_1,
PISO VARCHAR(20) CHARACTER SET ISO8859_1,
CODIGOPOSTAL VARCHAR(5) CHARACTER SET ISO8859_1,
POBLACION VARCHAR(40) CHARACTER SET ISO8859_1,
PROVINCIA VARCHAR(30) CHARACTER SET ISO8859_1,
TELEFONO1 VARCHAR(30) CHARACTER SET ISO8859_1,
TELEFONO2 VARCHAR(30) CHARACTER SET ISO8859_1,
FAX VARCHAR(30) CHARACTER SET ISO8859_1,
CORREO VARCHAR(60) CHARACTER SET ISO8859_1,
PERSONACONTACTO VARCHAR(100) CHARACTER SET ISO8859_1,
OBSERVACIONES BLOB SUB_TYPE 1 SEGMENT SIZE 100 CHARACTER SET ISO8859_1,
BANCO VARCHAR(100) CHARACTER SET ISO8859_1,
IVA FLOAT DEFAULT 0,
DESCUENTO FLOAT DEFAULT 0,
TIPOCLIENTE VARCHAR(50) CHARACTER SET ISO8859_1,
ETIQUETADO SMALLINT,
ULTIMOCAMBIO TIMESTAMP
);
ALTER TABLE CLIENTES ADD CONSTRAINT PK_CLIENTES PRIMARY KEY (CODIGO);
CREATE TABLE SUCURSALESCLIENTE (
CODIGOCLIENTE VARCHAR(10) NOT NULL,
CODIGO SMALLINT NOT NULL,
CALLE VARCHAR(150),
NUMERO VARCHAR(20),
PISO VARCHAR(20),
CODIGOPOSTAL VARCHAR(5),
POBLACION VARCHAR(40),
PROVINCIA VARCHAR(30),
TELEFONO1 VARCHAR(30),
TELEFONO2 VARCHAR(30),
FAX VARCHAR(30),
CORREO VARCHAR(60),
PERSONACONTACTO VARCHAR(100)
);
ALTER TABLE SUCURSALESCLIENTE ADD CONSTRAINT PK_SUCURSALESCLIENTE PRIMARY KEY (CODIGOCLIENTE, CODIGO);
ALTER TABLE SUCURSALESCLIENTE ADD FOREIGN KEY (CODIGOCLIENTE) REFERENCES CLIENTES (CODIGO) ON DELETE CASCADE ON UPDATE NO ACTION;
insert into CONTACTOS
(ID, REFERENCIA, NIF_CIF, NOMBRE, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2,
FAX, EMAIL_1, PERSONA_CONTACTO, NOTAS)
select
GEN_ID(GEN_CONTACTOS_ID, 1),
clientes.CODIGO AS REFERENCIA,
clientes.NIFCIF AS NIF_CIF,
clientes.NOMBRE AS NOMBRE,
(COALESCE(clientes.CALLE,'') || ', ' || COALESCE(clientes.NUMERO,'') || ' ' || COALESCE(clientes.PISO,'')) AS CALLE,
clientes.POBLACION AS POBLACION,
clientes.PROVINCIA AS PROVINCIA,
clientes.CODIGOPOSTAL AS CODIGO_POSTAL,
substr(clientes.TELEFONO1,1,25) AS TELEFONO_1,
substr(clientes.TELEFONO2,1,25) AS TELEFONO_2,
substr(clientes.FAX,1,25) AS FAX,
clientes.CORREO AS EMAIL_1,
clientes.PERSONACONTACTO AS PERSONA_CONTACTO,
clientes.OBSERVACIONES AS NOTAS
from clientes;
insert into contactos_categorias
(ID_CONTACTO, ID_CATEGORIA)
select ID, 1
from contactos
where ID not in (select ID_CONTACTO from contactos_categorias);
MIRAR SI TODOS LOS CLIENTES TIENEN DESCUENTO NULL
select *
from clientes
where descuento is not null;
MIRAR SI TODOS LOS CLIENTES TIENEN IVA 16%
select DISTINCT IVA
from clientes;
//Establecemos el tipo de iva al 16 para todos los clientes
insert into clientes_datos
(ID_CLIENTE, ID_TIPO_IVA, REGIMEN_IVA)
select CONTACTOS.ID, 1, 'General'
from CONTACTOS
left join contactos_categorias on contactos_categorias.id_contacto = contactos.id
where contactos_categorias.id_categoria = 1;
SET GENERATOR GEN_CONTACTOS_DATOS_BANCO_ID TO 1;
insert into contactos_datos_banco
(ID, ID_contacto, titular)
select GEN_ID(GEN_CONTACTOS_DATOS_BANCO_ID, 1), CONTACTOS.ID, clientes.banco
from CONTACTOS
left join clientes on clientes.codigo = contactos.referencia
WHERE clientes.banco is not null;
//Insertamos la distintas sucursales de cliente
INSERT INTO CONTACTOS_DIRECCIONES
(ID, ID_CONTACTO, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, PERSONA_CONTACTO,
TELEFONO, MOVIL, FAX, EMAIL)
select
GEN_ID(GEN_CONTACTOS_DIR_ID, 1),
contactos.id AS ID_CONTACTO,
(COALESCE(sucursalescliente.CALLE,'') || ', ' || COALESCE(sucursalescliente.NUMERO,'') || ' ' || COALESCE(sucursalescliente.PISO,'')) AS CALLE,
sucursalescliente.POBLACION AS POBLACION,
sucursalescliente.PROVINCIA AS PROVINCIA,
sucursalescliente.CODIGOPOSTAL AS CODIGO_POSTAL,
sucursalescliente.PERSONACONTACTO AS PERSONA_CONTACTO,
substr(sucursalescliente.TELEFONO1,1,25) AS TELEFONO,
substr(sucursalescliente.TELEFONO2,1,25) AS MOVIL,
substr(sucursalescliente.FAX,1,25) AS FAX,
sucursalescliente.CORREO AS EMAIL
from sucursalescliente
left join contactos on contactos.referencia = sucursalescliente.codigocliente
left join contactos_categorias on contactos_categorias.id_contacto = contactos.id
where contactos_categorias.id_categoria = 1
and (COALESCE(sucursalescliente.CALLE,'') || ', ' || COALESCE(sucursalescliente.NUMERO,'') || ' ' || COALESCE(sucursalescliente.PISO,'')) <> ',';
drop table sucursalesproveedor;
DROP TABLE PROVEEDORES;
drop table sucursalescliente;
DROP TABLE CLIENTES;
insert into empresas_contactos
(ID, ID_empresa, ID_contacto)
select GEN_ID(GEN_EMPRESAS_CONTACTOS_ID, 1), 1, id
from contactos;

View File

@ -25,9 +25,9 @@
</PropertyGroup>
<ItemGroup>
<Sql Include="$(SqlScriptsFolder)\factuges.sql" />
<Sql Include="$(SqlScriptsFolder)\factuges_sysdata.sql" />
<SqlOutput Include="$(OutputPath)\factuges.fdb" />
<Sql Include="$(SqlScriptsFolder)\etiquetas.sql" />
<Sql Include="$(SqlScriptsFolder)\etiquetas_sysdata.sql" />
<SqlOutput Include="$(OutputPath)\etiquetas.fdb" />
</ItemGroup>
<Target Name="CreateOutputPath">
@ -42,26 +42,26 @@
Inputs="@(Sql)"
Outputs="@(SqlOutput)">
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\factuges.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q"
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\etiquetas.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q"
WorkingDirectory="$(OutputPath)" />
</Target>
<Target Name="InsertSysData">
<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)"
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\etiquetas_sysdata.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q $(DOUBLE_QUOTES)$(OutputPath)\etiquetas.fdb$(DOUBLE_QUOTES)"
WorkingDirectory="$(OutputPath)" />
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\factuges_listaprovincias.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q $(DOUBLE_QUOTES)$(OutputPath)\factuges.fdb$(DOUBLE_QUOTES)"
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\etiquetas_listaprovincias.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q $(DOUBLE_QUOTES)$(OutputPath)\etiquetas.fdb$(DOUBLE_QUOTES)"
WorkingDirectory="$(OutputPath)" />
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\factuges_listapoblaciones.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q $(DOUBLE_QUOTES)$(OutputPath)\factuges.fdb$(DOUBLE_QUOTES)"
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -i $(DOUBLE_QUOTES)$(SqlScriptsFolder)\etiquetas_listapoblaciones.sql$(DOUBLE_QUOTES) -u $(DBUser) -p $(DBPassword) -q $(DOUBLE_QUOTES)$(OutputPath)\etiquetas.fdb$(DOUBLE_QUOTES)"
WorkingDirectory="$(OutputPath)" />
</Target>
<Target Name="Extract"
Inputs="$(OutputPath)\factuges.fdb"
Outputs="$(OutputPath)\factuges_$(Configuration).sql">
Inputs="$(OutputPath)\etiquetas.fdb"
Outputs="$(OutputPath)\etiquetas_$(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"
<Exec Command="$(DOUBLE_QUOTES)$(SqlCmdRunner)$(DOUBLE_QUOTES) -a -d etiquetas.fdb -u $(DBUser) -p $(DBPassword) -o $(DOUBLE_QUOTES)$(OutputPath)\etiquetas_$(Configuration).sql$(DOUBLE_QUOTES) $(DOUBLE_QUOTES)$(OutputPath)\etiquetas.fdb$(DOUBLE_QUOTES) -b"
WorkingDirectory="$(OutputPath)" />
</Target>

View File

@ -0,0 +1,624 @@
/******************************************************************************/
/**** Generated by IBExpert 2007.05.03 14/11/2011 19:35:05 ****/
/******************************************************************************/
SET SQL DIALECT 3;
SET NAMES ISO8859_1;
/******************************************************************************/
/**** User Defined Functions ****/
/******************************************************************************/
DECLARE EXTERNAL FUNCTION DIV
INTEGER,
INTEGER
RETURNS DOUBLE PRECISION BY VALUE
ENTRY_POINT 'IB_UDF_div' MODULE_NAME 'ib_udf';
DECLARE EXTERNAL FUNCTION F_RTFTOTEXT
CSTRING(32767)
RETURNS CSTRING(32767)
ENTRY_POINT 'RtfToText' MODULE_NAME 'udf_RtfToText.dll';
DECLARE EXTERNAL FUNCTION "MOD"
INTEGER,
INTEGER
RETURNS DOUBLE PRECISION BY VALUE
ENTRY_POINT 'IB_UDF_mod' MODULE_NAME 'ib_udf';
DECLARE EXTERNAL FUNCTION "ROUND"
INTEGER BY DESCRIPTOR,
INTEGER BY DESCRIPTOR
RETURNS PARAMETER 2
ENTRY_POINT 'fbround' MODULE_NAME 'fbudf';
DECLARE EXTERNAL FUNCTION STRLEN
CSTRING(254)
RETURNS INTEGER BY VALUE
ENTRY_POINT 'IB_UDF_strlen' MODULE_NAME 'ib_udf';
DECLARE EXTERNAL FUNCTION SUBSTR
CSTRING(254),
SMALLINT,
SMALLINT
RETURNS CSTRING(254) FREE_IT
ENTRY_POINT 'IB_UDF_substr' MODULE_NAME 'ib_udf';
/******************************************************************************/
/**** Domains ****/
/******************************************************************************/
CREATE DOMAIN TIPO_BINARIO AS
BLOB SUB_TYPE 0 SEGMENT SIZE 80;
CREATE DOMAIN TIPO_BOOLEANO AS
SMALLINT;
CREATE DOMAIN TIPO_CANTIDAD AS
NUMERIC(11,2);
CREATE DOMAIN TIPO_CONCEPTO AS
VARCHAR(2000);
CREATE DOMAIN TIPO_ID AS
INTEGER;
CREATE DOMAIN TIPO_IMPORTE AS
NUMERIC(11,2);
CREATE DOMAIN TIPO_NOTAS AS
BLOB SUB_TYPE 1 SEGMENT SIZE 80;
CREATE DOMAIN TIPO_PERFIL AS
VARCHAR(15);
CREATE DOMAIN TIPO_PORCENTAJE AS
NUMERIC(2,2);
CREATE DOMAIN TIPO_USUARIO AS
VARCHAR(30);
/******************************************************************************/
/**** Generators ****/
/******************************************************************************/
CREATE GENERATOR GEN_ALBARANES_CLI_DETALLES_ID;
SET GENERATOR GEN_ALBARANES_CLI_DETALLES_ID TO 933;
CREATE GENERATOR GEN_ALBARANES_CLI_ID;
SET GENERATOR GEN_ALBARANES_CLI_ID TO 511;
CREATE GENERATOR GEN_ARTICULOS_ID;
SET GENERATOR GEN_ARTICULOS_ID TO 3547;
CREATE GENERATOR GEN_CATEGORIAS_ID;
SET GENERATOR GEN_CATEGORIAS_ID TO 4;
CREATE GENERATOR GEN_CONFIGURACION_ID;
SET GENERATOR GEN_CONFIGURACION_ID TO 2;
CREATE GENERATOR GEN_CONTACTOS_DATOS_BANCO_ID;
SET GENERATOR GEN_CONTACTOS_DATOS_BANCO_ID TO 221;
CREATE GENERATOR GEN_CONTACTOS_DIR_ID;
SET GENERATOR GEN_CONTACTOS_DIR_ID TO 470;
CREATE GENERATOR GEN_CONTACTOS_ID;
SET GENERATOR GEN_CONTACTOS_ID TO 1202;
CREATE GENERATOR GEN_CONTACTOS_PERSONAL_ID;
SET GENERATOR GEN_CONTACTOS_PERSONAL_ID TO 9;
CREATE GENERATOR GEN_EMPRESAS_CONTACTOS_ID;
SET GENERATOR GEN_EMPRESAS_CONTACTOS_ID TO 2243;
CREATE GENERATOR GEN_EMPRESAS_DATOS_BANCO_ID;
SET GENERATOR GEN_EMPRESAS_DATOS_BANCO_ID TO 10;
CREATE GENERATOR GEN_EMPRESAS_ID;
SET GENERATOR GEN_EMPRESAS_ID TO 13;
CREATE GENERATOR GEN_EMPRESAS_USUARIOS_ID;
SET GENERATOR GEN_EMPRESAS_USUARIOS_ID TO 1;
CREATE GENERATOR GEN_PERMISOSEX_ID;
SET GENERATOR GEN_PERMISOSEX_ID TO 1;
CREATE GENERATOR GEN_PERMISOS_ID;
SET GENERATOR GEN_PERMISOS_ID TO 1;
CREATE GENERATOR GEN_REFERENCIAS_ID;
SET GENERATOR GEN_REFERENCIAS_ID TO 25;
CREATE GENERATOR GEN_UNIDADES_MEDIDA_ID;
SET GENERATOR GEN_UNIDADES_MEDIDA_ID TO 23;
CREATE GENERATOR GEN_USUARIOS_ID;
SET GENERATOR GEN_USUARIOS_ID TO 10;
/******************************************************************************/
/**** Tables ****/
/******************************************************************************/
CREATE TABLE ARTICULOS (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID,
REFERENCIA VARCHAR(255),
DESCRIPCION VARCHAR(255),
FAMILIA VARCHAR(255),
UNIDAD_MEDIDA VARCHAR(255),
IMAGEN TIPO_BINARIO,
COMISIONABLE TIPO_BOOLEANO,
FABRICANTE VARCHAR(255),
REFERENCIA_FABR VARCHAR(255),
FECHA_ALTA TIMESTAMP,
FECHA_MODIFICACION TIMESTAMP,
USUARIO TIPO_USUARIO,
INVENTARIABLE TIPO_BOOLEANO,
ELIMINADO TIPO_BOOLEANO,
PARAM_MARGEN FLOAT,
TIEMPO INTEGER,
PARAM_TIEMPO FLOAT,
MANO_OBRA TIPO_IMPORTE
);
CREATE TABLE CATEGORIAS (
ID TIPO_ID NOT NULL,
CATEGORIA VARCHAR(255) NOT NULL
);
CREATE TABLE CONFIGURACION (
ID TIPO_ID NOT NULL,
CODIGO VARCHAR(50) NOT NULL,
VALOR VARCHAR(255) NOT NULL,
ID_EMPRESA TIPO_ID
);
CREATE TABLE CONTACTOS (
ID TIPO_ID NOT NULL,
NIF_CIF VARCHAR(15),
NOMBRE VARCHAR(255) NOT NULL,
CALLE VARCHAR(255),
POBLACION VARCHAR(255),
PROVINCIA VARCHAR(255),
CODIGO_POSTAL VARCHAR(10),
TELEFONO_1 VARCHAR(25),
TELEFONO_2 VARCHAR(25),
MOVIL_1 VARCHAR(25),
MOVIL_2 VARCHAR(25),
FAX VARCHAR(25),
EMAIL_1 VARCHAR(255),
EMAIL_2 VARCHAR(255),
PAGINA_WEB VARCHAR(255),
NOTAS TIPO_NOTAS,
FECHA_ALTA TIMESTAMP,
FECHA_MODIFICACION TIMESTAMP,
USUARIO TIPO_USUARIO,
REFERENCIA VARCHAR(255),
PERSONA_CONTACTO VARCHAR(255)
);
CREATE TABLE CONTACTOS_CATEGORIAS (
ID_CONTACTO TIPO_ID NOT NULL,
ID_CATEGORIA TIPO_ID NOT NULL
);
CREATE TABLE CONTACTOS_DATOS_BANCO (
ID TIPO_ID NOT NULL,
ID_CONTACTO TIPO_ID NOT NULL,
TITULAR VARCHAR(255),
ENTIDAD VARCHAR(15),
SUCURSAL VARCHAR(15),
DC VARCHAR(15),
CUENTA VARCHAR(15),
FECHA_ALTA TIMESTAMP,
FECHA_MODIFICACION TIMESTAMP
);
CREATE TABLE CONTACTOS_DATOS_PERSONAL (
ID TIPO_ID NOT NULL,
ID_CONTACTO TIPO_ID NOT NULL,
NOMBRE VARCHAR(255),
PUESTO VARCHAR(255),
TELEFONO VARCHAR(25),
MOVIL VARCHAR(25),
FAX VARCHAR(25),
EMAIL VARCHAR(255),
FECHA_ALTA TIMESTAMP,
FECHA_MODIFICACION TIMESTAMP
);
CREATE TABLE CONTACTOS_DIRECCIONES (
ID TIPO_ID NOT NULL,
ID_CONTACTO TIPO_ID NOT NULL,
CALLE VARCHAR(255),
POBLACION VARCHAR(255),
PROVINCIA VARCHAR(255),
CODIGO_POSTAL VARCHAR(10),
PERSONA_CONTACTO VARCHAR(255),
NOMBRE VARCHAR(255),
TELEFONO VARCHAR(25),
MOVIL VARCHAR(25),
FAX VARCHAR(25),
EMAIL VARCHAR(255),
NOTAS TIPO_NOTAS,
PORTE TIPO_IMPORTE,
FECHA_ALTA TIMESTAMP,
FECHA_MODIFICACION TIMESTAMP
);
CREATE TABLE EMPRESAS (
ID TIPO_ID NOT NULL,
NIF_CIF VARCHAR(15),
NOMBRE VARCHAR(255),
RAZON_SOCIAL VARCHAR(255),
CALLE VARCHAR(255),
POBLACION VARCHAR(255),
PROVINCIA VARCHAR(255),
CODIGO_POSTAL VARCHAR(10),
TELEFONO_1 VARCHAR(25),
TELEFONO_2 VARCHAR(25),
MOVIL_1 VARCHAR(25),
MOVIL_2 VARCHAR(25),
FAX VARCHAR(25),
EMAIL_1 VARCHAR(255),
EMAIL_2 VARCHAR(255),
PAGINA_WEB VARCHAR(255),
NOTAS TIPO_NOTAS,
FECHA_ALTA TIMESTAMP,
FECHA_MODIFICACION TIMESTAMP,
USUARIO TIPO_USUARIO,
LOGOTIPO TIPO_BINARIO,
REGISTRO_MERCANTIL VARCHAR(255),
PARAM_TIEMPO TIPO_IMPORTE,
PARAM_MARGEN TIPO_PORCENTAJE,
ID_TIPO_IVA SMALLINT,
ID_FORMA_PAGO SMALLINT,
ID_ALMACEN SMALLINT
);
CREATE TABLE EMPRESAS_CONTACTOS (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID NOT NULL,
ID_CONTACTO TIPO_ID NOT NULL
);
CREATE TABLE EMPRESAS_DATOS_BANCO (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID NOT NULL,
NOMBRE VARCHAR(255),
ENTIDAD VARCHAR(15),
SUCURSAL VARCHAR(15),
DC VARCHAR(15),
CUENTA VARCHAR(15),
SUFIJO_N19 VARCHAR(3),
SUFIJO_N58 VARCHAR(3),
IBAN VARCHAR(255) COLLATE ES_ES,
SWIFT VARCHAR(255) COLLATE ES_ES
);
CREATE TABLE EMPRESAS_USUARIOS (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID NOT NULL,
ID_USUARIO TIPO_ID NOT NULL
);
CREATE TABLE PACIENTES_DATOS (
ID_PACIENTE TIPO_ID NOT NULL,
FECHA_NACIMIENTO DATE,
NUMERO_SS VARCHAR(255),
FECHA_BAJA DATE,
CAUSA_BAJA VARCHAR(255)
);
CREATE TABLE PERMISOS (
ID TIPO_ID NOT NULL,
ID_USUARIO TIPO_ID,
MODULO VARCHAR(50),
NOMBRECOMP VARCHAR(50),
CHECKSUM VARCHAR(250)
);
CREATE TABLE PERMISOSEX (
ID TIPO_ID NOT NULL,
ID_USUARIO TIPO_ID,
MODULO VARCHAR(50),
NOMBRECOMP VARCHAR(50),
NOMBREFORM VARCHAR(50),
CHECKSUM VARCHAR(250)
);
CREATE TABLE POBLACIONES (
ID TIPO_ID NOT NULL,
ID_PROVINCIA TIPO_ID NOT NULL,
DESCRIPCION VARCHAR(255) NOT NULL
);
CREATE TABLE PROVINCIAS (
ID TIPO_ID NOT NULL,
DESCRIPCION VARCHAR(255) NOT NULL
);
CREATE TABLE REFERENCIAS (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID,
CODIGO VARCHAR(50) NOT NULL,
VALOR VARCHAR(255) NOT NULL,
DESCRIPCION VARCHAR(255)
);
CREATE TABLE UNIDADES_MEDIDA (
ID TIPO_ID NOT NULL,
DESCRIPCION VARCHAR(255)
);
CREATE TABLE USUARIOS (
ID TIPO_ID NOT NULL,
USERNAME VARCHAR(30),
LOGIN TIPO_USUARIO,
PASS VARCHAR(250),
PASSEXPIRED DATE,
BLOQUEADO TIPO_BOOLEANO,
EMAIL VARCHAR(150),
USERDAYSSUN INTEGER,
PRIVILEGED INTEGER,
TIPO CHAR(1),
ID_PERFIL TIPO_ID,
CHECKSUM VARCHAR(250)
);
CREATE TABLE USUARIOS_EVENTOS (
APLICACION VARCHAR(250),
ID_USUARIO TIPO_ID,
FECHA CHAR(10),
HORA CHAR(8),
FORM VARCHAR(250),
TITULO_FORM VARCHAR(100),
EVENTO VARCHAR(50),
NOTAS TIPO_NOTAS,
TNAME VARCHAR(20)
);
CREATE TABLE USUARIOS_LOGON (
LOGONID CHAR(38) NOT NULL,
ID_USUARIO TIPO_ID,
APLICACION VARCHAR(50),
EQUIPO VARCHAR(50),
DATA VARCHAR(14)
);
/******************************************************************************/
/**** Views ****/
/******************************************************************************/
/* View: V_CONTACTOS */
CREATE VIEW V_CONTACTOS(
ID,
ID_CATEGORIA,
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,
FECHA_ALTA,
FECHA_MODIFICACION,
USUARIO,
ID_EMPRESA,
REFERENCIA)
AS
SELECT CONTACTOS.ID,
CONTACTOS_CATEGORIAS.ID_CATEGORIA,
CONTACTOS.NIF_CIF,
CONTACTOS.NOMBRE,
CONTACTOS.PERSONA_CONTACTO,
CONTACTOS.CALLE,
CONTACTOS.POBLACION,
CONTACTOS.PROVINCIA,
CONTACTOS.CODIGO_POSTAL,
CONTACTOS.TELEFONO_1,
CONTACTOS.TELEFONO_2,
CONTACTOS.MOVIL_1,
CONTACTOS.MOVIL_2,
CONTACTOS.FAX,
CONTACTOS.EMAIL_1,
CONTACTOS.EMAIL_2,
CONTACTOS.PAGINA_WEB,
CONTACTOS.NOTAS,
CONTACTOS.FECHA_ALTA,
CONTACTOS.FECHA_MODIFICACION,
CONTACTOS.USUARIO,
EMPRESAS_CONTACTOS.ID_EMPRESA,
CONTACTOS.REFERENCIA
FROM CONTACTOS
INNER JOIN CONTACTOS_CATEGORIAS ON (CONTACTOS_CATEGORIAS.ID_CONTACTO =
CONTACTOS.ID)
INNER JOIN EMPRESAS_CONTACTOS ON (EMPRESAS_CONTACTOS.ID_CONTACTO =
CONTACTOS.ID)
;
/* View: V_PACIENTES */
CREATE VIEW V_PACIENTES(
ID,
ID_CATEGORIA,
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,
FECHA_ALTA,
FECHA_MODIFICACION,
USUARIO,
ID_EMPRESA,
REFERENCIA,
FECHA_NACIMIENTO,
NUMERO_SS,
FECHA_BAJA,
CAUSA_BAJA)
AS
SELECT V_CONTACTOS.ID,
V_CONTACTOS.ID_CATEGORIA,
V_CONTACTOS.NIF_CIF,
V_CONTACTOS.NOMBRE,
V_CONTACTOS.PERSONA_CONTACTO,
V_CONTACTOS.CALLE,
V_CONTACTOS.POBLACION,
V_CONTACTOS.PROVINCIA,
V_CONTACTOS.CODIGO_POSTAL,
V_CONTACTOS.TELEFONO_1,
V_CONTACTOS.TELEFONO_2,
V_CONTACTOS.MOVIL_1,
V_CONTACTOS.MOVIL_2,
V_CONTACTOS.FAX,
V_CONTACTOS.EMAIL_1,
V_CONTACTOS.EMAIL_2,
V_CONTACTOS.PAGINA_WEB,
V_CONTACTOS.NOTAS,
V_CONTACTOS.FECHA_ALTA,
V_CONTACTOS.FECHA_MODIFICACION,
V_CONTACTOS.USUARIO,
V_CONTACTOS.ID_EMPRESA,
V_CONTACTOS.REFERENCIA,
PACIENTES_DATOS.FECHA_NACIMIENTO,
PACIENTES_DATOS.NUMERO_SS,
PACIENTES_DATOS.FECHA_BAJA,
PACIENTES_DATOS.CAUSA_BAJA
FROM V_CONTACTOS
INNER JOIN PACIENTES_DATOS ON (PACIENTES_DATOS.ID_PACIENTE = V_CONTACTOS.ID)
WHERE V_CONTACTOS.ID_CATEGORIA = 4
;
/******************************************************************************/
/**** Primary Keys ****/
/******************************************************************************/
ALTER TABLE ARTICULOS ADD CONSTRAINT PK_ARTICULOS PRIMARY KEY (ID);
ALTER TABLE CATEGORIAS ADD CONSTRAINT PK_CATEGORIAS PRIMARY KEY (ID);
ALTER TABLE CONFIGURACION ADD CONSTRAINT PK_CONFIGURACION PRIMARY KEY (ID);
ALTER TABLE CONTACTOS ADD CONSTRAINT PK_CONTACTOS PRIMARY KEY (ID);
ALTER TABLE CONTACTOS_CATEGORIAS ADD CONSTRAINT PK_CONTACTOS_CATEGORIAS PRIMARY KEY (ID_CONTACTO, ID_CATEGORIA);
ALTER TABLE CONTACTOS_DATOS_BANCO ADD CONSTRAINT PK_CONTACTOS_DATOS_BANCO PRIMARY KEY (ID);
ALTER TABLE CONTACTOS_DATOS_PERSONAL ADD CONSTRAINT PK_CONTACTOS_DATOS_PER PRIMARY KEY (ID);
ALTER TABLE CONTACTOS_DIRECCIONES ADD CONSTRAINT PK_CONTACTOS_DIR PRIMARY KEY (ID);
ALTER TABLE EMPRESAS ADD CONSTRAINT PK_EMPRESAS PRIMARY KEY (ID);
ALTER TABLE EMPRESAS_CONTACTOS ADD CONSTRAINT PK_EMPRESAS_CONTACTOS PRIMARY KEY (ID);
ALTER TABLE EMPRESAS_DATOS_BANCO ADD CONSTRAINT PK_EMPRESAS_DATOS_BANCO PRIMARY KEY (ID);
ALTER TABLE EMPRESAS_USUARIOS ADD CONSTRAINT PK_EMPRESAS_USUARIOS PRIMARY KEY (ID);
ALTER TABLE PERMISOS ADD CONSTRAINT PK_PERMISOS PRIMARY KEY (ID);
ALTER TABLE PERMISOSEX ADD CONSTRAINT PK_PERMISOSEX PRIMARY KEY (ID);
ALTER TABLE POBLACIONES ADD CONSTRAINT PK_POBLACIONES PRIMARY KEY (ID);
ALTER TABLE PROVINCIAS ADD CONSTRAINT PK_PROVINCIAS PRIMARY KEY (ID);
ALTER TABLE REFERENCIAS ADD CONSTRAINT PK_REFERENCIAS PRIMARY KEY (ID);
ALTER TABLE UNIDADES_MEDIDA ADD PRIMARY KEY (ID);
ALTER TABLE USUARIOS ADD CONSTRAINT PK_USUARIOS PRIMARY KEY (ID);
ALTER TABLE USUARIOS_LOGON ADD CONSTRAINT PK_USUARIOS_LOGON PRIMARY KEY (LOGONID);
/******************************************************************************/
/**** Foreign Keys ****/
/******************************************************************************/
ALTER TABLE ARTICULOS ADD CONSTRAINT FK_ARTICULOS_EMPRESA FOREIGN KEY (ID_EMPRESA) REFERENCES EMPRESAS (ID) ON DELETE NO ACTION ON UPDATE NO ACTION;
ALTER TABLE EMPRESAS_CONTACTOS ADD CONSTRAINT FK_EMPRESAS_CONTACTOS FOREIGN KEY (ID_CONTACTO) REFERENCES CONTACTOS (ID) ON DELETE CASCADE ON UPDATE CASCADE;
ALTER TABLE EMPRESAS_DATOS_BANCO ADD CONSTRAINT FK_EMPRESAS_DATOS_BANCO FOREIGN KEY (ID_EMPRESA) REFERENCES EMPRESAS (ID) ON DELETE CASCADE ON UPDATE CASCADE;
/******************************************************************************/
/**** Indices ****/
/******************************************************************************/
CREATE INDEX IDX_CONFIGURACION ON CONFIGURACION (ID_EMPRESA);
CREATE INDEX IDX_CONTACTOS_CATEGORIAS ON CONTACTOS_CATEGORIAS (ID_CONTACTO);
CREATE INDEX IDX_CONTACTOS_CATEGORIAS1 ON CONTACTOS_CATEGORIAS (ID_CATEGORIA);
CREATE INDEX IDX_CONTACTOS_DATOS_BANCO ON CONTACTOS_DATOS_BANCO (ID_CONTACTO);
CREATE INDEX IDX_CONTACTOS_PER_ID_CONTACTO ON CONTACTOS_DATOS_PERSONAL (ID_CONTACTO);
CREATE INDEX IDX_CONTACTOS_DIR_ID_CONTACTO ON CONTACTOS_DIRECCIONES (ID_CONTACTO);
CREATE INDEX IDX_EMPRESAS_CONTACTOS ON EMPRESAS_CONTACTOS (ID_EMPRESA, ID_CONTACTO);
CREATE INDEX IDX_EMPRESAS_USUARIOS ON EMPRESAS_USUARIOS (ID_EMPRESA, ID_USUARIO);
CREATE INDEX POBLACIONES_IDX1 ON POBLACIONES (ID_PROVINCIA);
CREATE INDEX IDX_REFERENCIAS ON REFERENCIAS (ID_EMPRESA);
/******************************************************************************/
/**** Descriptions ****/
/******************************************************************************/
/******************************************************************************/
/**** Privileges ****/
/******************************************************************************/
/* Privileges of users */
GRANT SELECT ON RDB$ROLES TO PUBLIC;

View File

@ -0,0 +1,43 @@
/******************************************************************************/
/**** Generated by IBExpert 2007.05.03 14/11/2011 19:36:21 ****/
/******************************************************************************/
SET SQL DIALECT 3;
SET NAMES ISO8859_1;
INSERT INTO CATEGORIAS (ID, CATEGORIA) VALUES (4, 'PACIENTE');
COMMIT WORK;
INSERT INTO EMPRESAS (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, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL, PARAM_TIEMPO, PARAM_MARGEN, ID_TIPO_IVA, ID_FORMA_PAGO, ID_ALMACEN) VALUES (1, 'B81747396', 'TECSITEL S.L.', 'TECSITEL S.L.', 'C\ Buendía, 25', 'MADRID', 'MADRID', '28053', '91-507-56-92 / 63', NULL, '607 71 60 15', NULL, '91-785-96-35', 'tecsitel@tecsitel.com', NULL, 'www.tecsitel.com', '2008-01-14 11:53:52', NULL, 'Maribel', 'Insc. en el Reg. Merc. de Madrid, Tomo 12.291, Libro 0, Folio 131, Sección 8, Hoja M-194886 CIF: B81747396', 0.5, 30, 1, 9, NULL);
COMMIT WORK;
INSERT INTO PACIENTES_DATOS (ID_PACIENTE, FECHA_NACIMIENTO, NUMERO_SS, FECHA_BAJA, CAUSA_BAJA) VALUES (1198, '1911-01-01', 'U09D0980890809808080', NULL, NULL);
INSERT INTO PACIENTES_DATOS (ID_PACIENTE, FECHA_NACIMIENTO, NUMERO_SS, FECHA_BAJA, CAUSA_BAJA) VALUES (1199, '1911-01-01', 'U09D0980890809808080', NULL, NULL);
INSERT INTO PACIENTES_DATOS (ID_PACIENTE, FECHA_NACIMIENTO, NUMERO_SS, FECHA_BAJA, CAUSA_BAJA) VALUES (1200, '1911-01-01', 'U09D0980890809808080', NULL, NULL);
INSERT INTO PACIENTES_DATOS (ID_PACIENTE, FECHA_NACIMIENTO, NUMERO_SS, FECHA_BAJA, CAUSA_BAJA) VALUES (1201, '1911-01-01', 'U09D0980890809808080', NULL, NULL);
INSERT INTO PACIENTES_DATOS (ID_PACIENTE, FECHA_NACIMIENTO, NUMERO_SS, FECHA_BAJA, CAUSA_BAJA) VALUES (1202, NULL, NULL, NULL, NULL);
COMMIT WORK;
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (1, NULL, 'REF_PACIENTES', '1', 'Ref. pacientes');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (2, NULL, 'REF_ARTICULOS', '1', 'Ref. art¡culos');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (3, 1, 'REF_ALBARANES_CLIENTE', '1', 'Ref. albaranes de cliente');
COMMIT WORK;
INSERT INTO USUARIOS (ID, USERNAME, LOGIN, PASS, PASSEXPIRED, BLOQUEADO, EMAIL, USERDAYSSUN, PRIVILEGED, TIPO, ID_PERFIL, CHECKSUM) VALUES (1, 'Administrador', 'admin', 'c4ca4238a0b923820dcc509a6f75849b', '2008-03-08', 0, 'admin@correo.net', 30, -1, 'U', 0, '059776624a5cd87567f5cdf37dd59d1b');
COMMIT WORK;
/******************************************************************************/
/**** Privileges ****/
/******************************************************************************/
/* Privileges of users */
GRANT SELECT ON RDB$ROLES TO PUBLIC;

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -1,156 +0,0 @@
SET SQL DIALECT 3;
SET NAMES UTF8;
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (1, 'MENSUAL', 1, 'Ene');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (2, 'MENSUAL', 2, 'Feb');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (3, 'MENSUAL', 3, 'Mar');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (4, 'MENSUAL', 4, 'Abr');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (5, 'MENSUAL', 5, 'May');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (6, 'MENSUAL', 6, 'Jun');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (7, 'MENSUAL', 7, 'Jul');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (8, 'MENSUAL', 8, 'Ago');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (9, 'MENSUAL', 9, 'Sep');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (10, 'MENSUAL', 10, 'Oct');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (11, 'MENSUAL', 11, 'Nov');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (12, 'MENSUAL', 12, 'Dic');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (13, 'SEMESTRAL', 1, 'Primer semestre');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (14, 'SEMESTRAL', 2, 'Segundo semestre');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (15, 'TRIMESTRAL', 1, 'Primer trimestre');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (16, 'TRIMESTRAL', 2, 'Segundo trimestre');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (17, 'TRIMESTRAL', 3, 'Tercer trimestre');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (18, 'TRIMESTRAL', 4, 'Cuarto trimestre');
COMMIT WORK;
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 (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (1, 1, 'REF_FACTURAS_CLIENTE', 'FAC08/000001', 'Ref. facturas de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (2, 1, 'REF_PEDIDOS_PROVEEDOR', 'PED08/000001', 'Ref. pedidos de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (3, 1, 'REF_ALBARANES_CLIENTE', 'ALB08/000001', 'Ref. albaranes de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (4, 1, 'REF_ALBARANES_PROVEEDOR', 'ALP08/000001', 'Ref. albaranes de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (5, 1, 'REF_REMESAS_CLIENTE', 'REM08/000001', 'Ref. remesas de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (6, 1, 'REF_FACTURAS_PROVEEDOR', 'FAP08/000001', 'Ref. facturas de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (7, 1, 'REF_ALBARANES_DEV_CLIENTE', 'DEV08/000001', 'Ref. ordenes de devolucion de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (8, 1, 'REF_ALBARANES_DEV_PROVEEDOR', 'DEP08/000001', 'Ref. ordenes de devolucion de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (9, 1, 'REF_REMESAS_PROVEEDOR', 'REP08/000001', 'Ref. remesas de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (10, 1, 'REF_PRESUPUESTOS_CLIENTE', 'PRE08/000001', 'Ref. presupuestos de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (11, NULL, 'REF_CLIENTES', '0000000001', 'Ref. clientes');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (12, NULL, 'REF_PROVEEDORES', '0000000001', 'Ref. proveedores');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (13, NULL, 'REF_EMPLEADOS', '00001', 'Ref. empleados');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (14, NULL, 'REF_ARTICULOS', '1', 'Ref. artículos');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (15, 2, 'REF_FACTURAS_CLIENTE', 'FAC08/000001', 'Ref. facturas de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (16, 2, 'REF_PEDIDOS_PROVEEDOR', 'PED08/000001', 'Ref. pedidos de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (17, 2, 'REF_ALBARANES_CLIENTE', 'ALB08/000001', 'Ref. albaranes de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (18, 2, 'REF_ALBARANES_PROVEEDOR', 'ALP08/000001', 'Ref. albaranes de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (19, 2, 'REF_REMESAS_CLIENTE', 'REM08/000001', 'Ref. remesas de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (20, 2, 'REF_FACTURAS_PROVEEDOR', 'FAP08/000001', 'Ref. facturas de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (21, 2, 'REF_ALBARANES_DEV_CLIENTE', 'DEV08/000001', 'Ref. ordenes de devolucion de cliente');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (22, 2, 'REF_ALBARANES_DEV_PROVEEDOR', 'DEP08/000001', 'Ref. ordenes de devolucion de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (23, 2, 'REF_REMESAS_PROVEEDOR', 'REP08/000001', 'Ref. remesas de proveedor');
INSERT INTO REFERENCIAS (ID, ID_EMPRESA, CODIGO, VALOR, DESCRIPCION) VALUES (24, 2, 'REF_PRESUPUESTOS_CLIENTE', 'PRE08/000001', 'Ref. presupuestos de cliente');
SET GENERATOR GEN_REFERENCIAS_ID TO 25;
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', 'EXTRANGERO', 0, 0);
SET GENERATOR GEN_TIPOS_IVA_ID TO 5;
COMMIT WORK;
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (2, 'A LA VISTA', 'A LA VISTA', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (3, 'CONTADO', 'CONTADO', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (4, 'EFECTO 60 DIAS', 'EFECTO 60 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (5, 'EFECTO 90 DIAS', 'EFECTO 90 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (6, 'GIRO BANCARIO 30 DIAS', 'GIRO BANCARIO 30 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (7, 'GIRO BANCARIO 60 DIAS', 'GIRO BANCARIO 60 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (8, 'PAGARÉ 30 DIAS', 'PAGARÉ 30 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (9, 'PAGARÉ 60 DIAS', 'PAGARÉ 60 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (10, 'PAGARÉ 90 DIAS', 'PAGARÉ 90 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (11, 'PAGARÉ A 120 DIAS.', 'PAGARÉ A 120 DIAS.', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (12, 'RECIBO 30 DIAS', 'RECIBO 30 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (13, 'RECIBO 60 DIAS', 'RECIBO 60 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (14, 'RECIBO 90 DIAS', 'RECIBO 90 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (15, 'TALÓN 30 DIAS.', 'TALÓN 30 DIAS.', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (16, 'TALÓN 45 DIAS.', 'TALÓN 45 DIAS.', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (17, 'TALÓN 60 DIAS.', 'TALÓN 60 DIAS.', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (18, 'TALÓN 90 DIAS.', 'TALÓN 90 DIAS.', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (19, 'TRANSFERENCIA A 30 DIAS.', 'TRANSFERENCIA A 30 DIAS.', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (20, 'TRANSFERENCIA A 60 DIAS', 'TRANSFERENCIA A 60 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (21, 'TRANSFERENCIA A 90 DIAS', 'TRANSFERENCIA A 90 DIAS', NULL, NULL, NULL, NULL, NULL);
INSERT INTO FORMAS_PAGO (ID, REFERENCIA, DESCRIPCION, TITULAR, ENTIDAD, SUCURSAL, DC, CUENTA) VALUES (22, 'TRANSFERENCIA CONTADO', 'TRANSFERENCIA CONTADO', NULL, NULL, NULL, NULL, NULL);
SET GENERATOR GEN_FORMAS_PAGO_ID TO 23;
COMMIT WORK;
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (2, 2, NULL, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (3, 3, 0, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (4, 4, 60, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (5, 5, 90, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (6, 6, 30, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (7, 7, 60, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (8, 8, 30, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (9, 9, 60, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (10, 10, 90, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (11, 11, 120, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (12, 12, 30, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (13, 13, 60, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (14, 14, 90, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (16, 15, 30, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (17, 16, 45, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (18, 17, 60, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (19, 18, 90, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (20, 19, 30, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (21, 20, 60, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (22, 21, 90, 100);
INSERT INTO FORMAS_PAGO_PLAZOS (ID, ID_FORMA_PAGO, NUM_DIAS, PORCENTAJE) VALUES (23, 22, 0, 100);
SET GENERATOR GEN_FORMAS_PAGO_PLAZOS_ID TO 24;
COMMIT WORK;
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (1, '');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (2, 'ROLLOS');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (3, 'MTS.');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (4, 'UD.');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (5, 'PAQUETES');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (6, 'UDS.');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (7, 'CAJA');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (8, 'BOBINA');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (9, 'CAJAS');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (10, 'ROLLO');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (11, 'PAQUETE');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (12, 'BOBINAS');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (13, 'PIE');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (14, 'PIES');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (15, 'COCINA');
INSERT INTO UNIDADES_MEDIDA (ID, DESCRIPCION) VALUES (16, 'ARMARIOS');
SET GENERATOR GEN_UNIDADES_MEDIDA_ID TO 17;
COMMIT WORK;
INSERT INTO EMPRESAS (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, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL) VALUES (1, 'B81747396', 'TECSITEL S.L.', 'TECSITEL S.L.', 'C\ Buendía, 25', 'MADRID', 'MADRID', '28053', '91-507-56-92 / 63', NULL, NULL, NULL, '91-785-96-35', 'tecsitel@tecsitel.com', NULL, 'www.tecsitel.com', '2008-01-14 11:53:52', NULL, 'Administrador', 'Insc. en el Reg. Merc. de Madrid, Tomo 12.291, Libro 0, Folio 131, Sección 8, Hoja M-194886 CIF: B81747396');
INSERT INTO EMPRESAS (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, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL) VALUES (2, 'B83122168', 'TECSITEL MANTENIMIENTO S.L.', 'TECSITEL MANTENIMIENTO S.L.', 'C\ Buendía, 25', 'MADRID', 'MADRID', '28053', '91-507-56-92 / 63', NULL, NULL, NULL, '91-785-96-35', 'tecsitel@tecsitel.com', NULL, 'www.tecsitel.com', '2008-01-14 11:53:52', NULL, 'Administrador', 'Insc. en el Reg. Merc. de Madrid, Tomo 17.145, Libro 0, Folio 21, Sección 8, Hoja M-293700 CIF: B83122168');
SET GENERATOR GEN_EMPRESAS_ID TO 3;
COMMIT WORK;

Binary file not shown.

Before

Width:  |  Height:  |  Size: 24 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 33 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 38 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 36 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 86 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 6.3 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.5 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3.0 KiB

View File

Before

Width:  |  Height:  |  Size: 167 KiB

After

Width:  |  Height:  |  Size: 167 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 104 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 2.1 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 418 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 104 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 161 KiB

View File

@ -120,7 +120,7 @@
<!-- Only import the other targets here after the property definitions above have been defined -->
<Import Project="$(MSBuildProjectDirectory)\RodaxSoftware.FactuGES.Common.targets"/>
<Import Project="$(MSBuildProjectDirectory)\RodaxSoftware.Etiquetas.Common.targets"/>
<Import Project="C:\Archivos de programa\MSBuild\MSBuildCommunityTasks\MSBuild.Community.Tasks.Targets"/>
<!-- Add our CleanSolution task to the general Clean task -->
@ -138,7 +138,7 @@
<FBInstallerScriptFile Include="$(FBScriptFolder)\Installer.fbz6" />
<FBFTPUploadScriptFile Include="$(FBScriptFolder)\UploadFTP.fbz6" />
<SqlProjects Include="$(SqlFolder)\RodaxSoftware.FactuGES.Database.proj"/>
<SqlProjects Include="$(SqlFolder)\RodaxSoftware.Etiquetas.Database.proj"/>
<Developers Include="
developer1@sanlam.co.za;

View File

@ -55,10 +55,10 @@
<DelphiCompile Include="ApplicationBase.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\Base.dcp" />
<DCCReference Include="..\GUIBase.dcp" />
<DCCReference Include="..\JvJansD11R.dcp" />
<DCCReference Include="..\PluginSDK_D11R.dcp" />
<DCCReference Include="..\Cliente\Base.dcp" />
<DCCReference Include="..\Cliente\GUIBase.dcp" />
<DCCReference Include="..\Cliente\JvJansD11R.dcp" />
<DCCReference Include="..\Cliente\PluginSDK_D11R.dcp" />
<DCCReference Include="Empresas\Controller\uDatosBancariosEmpresaController.pas" />
<DCCReference Include="Empresas\Controller\uEmpresasController.pas" />
<DCCReference Include="Empresas\Controller\View\uIEditorDatosBancarioEmpresa.pas" />

View File

@ -34,7 +34,7 @@ implementation
uses
uDataModuleConexion, uDataTableUtils, Dialogs, uROTypes,
FactuGES_Intf, schEmpresasClient_Intf, cxControls;
Etiquetas_Intf, schEmpresasClient_Intf, cxControls;
procedure TDataModuleEmpresas.DAClientDataModuleCreate(Sender: TObject);
begin

View File

@ -14,7 +14,7 @@ uses
{RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
{Ancestor Implementation:} DataAbstractService_Impl,
{Used RODLs:} DataAbstract4_Intf,
{Generated:} FactuGES_Intf, uDAScriptingProvider, uDABusinessProcessor,
{Generated:} Etiquetas_Intf, uDAScriptingProvider, uDABusinessProcessor,
uDABin2DataStreamer, uDADataStreamer, uDAClasses, uDAInterfaces,
uDADataTable;
@ -42,7 +42,7 @@ implementation
{$R *.dfm}
uses
{Generated:} FactuGES_Invk, uDataModuleServer, uRORemoteDataModule,
{Generated:} Etiquetas_Invk, uDataModuleServer, uRORemoteDataModule,
uDatabaseUtils, Dialogs, Variants, uROStreamSerializer, uROBinaryHelpers,
uSesionesUtils, schEmpresasClient_Intf, uUsersManager,
uRestriccionesUsuarioUtils, uROClasses, uBizEmpresasServer;

View File

@ -1,7 +1,17 @@
object DataModuleProvinciasPoblaciones: TDataModuleProvinciasPoblaciones
Left = 0
Top = 0
ClientHeight = 116
ClientWidth = 207
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Height = 150
Width = 215
PixelsPerInch = 96
TextHeight = 13
object RORemoteService: TRORemoteService
Message = dmConexion.ROMessage
Channel = dmConexion.ROChannel

View File

@ -24,7 +24,7 @@ implementation
{$R *.dfm}
uses
FactuGES_Intf, uStringsUtils, uDataModuleConexion, uROTypes;
Etiquetas_Intf, uStringsUtils, uDataModuleConexion, uROTypes;
{ TDataModuleProvinciasPoblaciones }

View File

@ -16,7 +16,7 @@ uses
{RemObjects:} uROXMLIntf, uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
{Required:} uRORemoteDataModule,
{Used RODLs:} DataAbstract4_Intf,
{Generated:} FactuGES_Intf, uDADataStreamer, uDABin2DataStreamer, uDAClasses;
{Generated:} Etiquetas_Intf, uDADataStreamer, uDABin2DataStreamer, uDAClasses;
type
{ TsrvProvinciasPoblaciones }
@ -34,7 +34,7 @@ implementation
{$R *.dfm}
uses
{Generated:} FactuGES_Invk, Variants, uDAInterfaces,
{Generated:} Etiquetas_Invk, Variants, uDAInterfaces,
uDataModuleServer, uROClasses;

View File

@ -4,7 +4,7 @@ interface
uses
SysUtils, Classes, DB, DBClient, uDADataTable,
FactuGES_Intf, uIntegerListUtils, uBizEmpresas,
Etiquetas_Intf, uIntegerListUtils, uBizEmpresas,
UCBase, UCDataConnector, uUCROConn, uDARemoteDataAdapter,
uDARemoteCommand, uROClient, uRORemoteService, uDADataStreamer,
uDABin2DataStreamer, uDAScriptingProvider, uIDataModuleUsuarios, UCSettings,

View File

@ -58,7 +58,7 @@ type
implementation
uses
Forms, Dialogs, FactuGES_Intf, uROTypes, uDAClasses, uDADataTable,
Forms, Dialogs, Etiquetas_Intf, uROTypes, uDAClasses, uDADataTable,
uDACDSDataTable, uROEncryption;
{ TUCROConn }

View File

@ -17,7 +17,7 @@ uses
{Required:} uRORemoteDataModule,
{Ancestor Implementation:} DataAbstractService_Impl,
{Used RODLs:} DataAbstract4_Intf,
{Generated:} FactuGES_Intf, uDADataStreamer, uDABin2DataStreamer, uDAClasses;
{Generated:} Etiquetas_Intf, uDADataStreamer, uDABin2DataStreamer, uDAClasses;
type
{ TsrvUsuarios }
@ -38,7 +38,7 @@ implementation
{$R *.dfm}
uses
{Generated:} FactuGES_Invk, uDataModuleServer;
{Generated:} Etiquetas_Invk, uDataModuleServer;
procedure Create_srvUsuarios(out anInstance : IUnknown);
begin

View File

@ -150,7 +150,7 @@ var
AppFactuGES : IAppFactuGES = nil;
implementation
{$INCLUDE ..\FactuGES.inc}
{$INCLUDE ..\Etiquetas.inc}
uses
Windows, Dialogs, JSDialog, JSDialogs, uDialogUtils, cxControls, uUsuariosViewRegister,

View File

@ -22,7 +22,7 @@ package Base;
{$WRITEABLECONST OFF}
{$MINENUMSIZE 1}
{$IMAGEBASE $400000}
{$DESCRIPTION 'Libreria base de FactuGES'}
{$DESCRIPTION 'Libreria base'}
{$IMPLICITBUILD OFF}
{$DEFINE DEBUG}
@ -87,7 +87,6 @@ contains
uDataModuleConexion in 'Conexion\uDataModuleConexion.pas' {dmConexion: TDataModule},
uConfigurarConexion in 'Conexion\uConfigurarConexion.pas' {fConfigurarConexion: TForm},
uSistemaFunc in 'Utiles\uSistemaFunc.pas',
FactuGES_Intf in '..\Servicios\FactuGES_Intf.pas',
uGridStatusUtils in 'Utiles\uGridStatusUtils.pas',
uDateUtils in 'Utiles\uDateUtils.pas',
uDataModuleConfiguracion in 'Configuracion\uDataModuleConfiguracion.pas' {dmConfiguracion: TDataModule},
@ -114,6 +113,7 @@ contains
uReferenciasUtils in 'Utiles\uReferenciasUtils.pas',
uEMailUtils in 'Utiles\uEMailUtils.pas',
uSaveClipboard in 'Utiles\uSaveClipboard.pas',
MidasSpeedFix in 'Utiles\MidasSpeedFix.pas';
MidasSpeedFix in 'Utiles\MidasSpeedFix.pas',
Etiquetas_Intf in '..\Servicios\Etiquetas_Intf.pas';
end.

View File

@ -44,7 +44,9 @@
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Libreria base de FactuGES</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Libreria base</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
</Excluded_Packages><Source><Source Name="MainSource">Base.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
@ -54,58 +56,58 @@
<DelphiCompile Include="Base.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\adortl.dcp" />
<DCCReference Include="..\cxDataD11.dcp" />
<DCCReference Include="..\cxEditorsD11.dcp" />
<DCCReference Include="..\cxExportD11.dcp" />
<DCCReference Include="..\cxExtEditorsD11.dcp" />
<DCCReference Include="..\cxGridD11.dcp" />
<DCCReference Include="..\cxIntl6D11.dcp" />
<DCCReference Include="..\cxIntlPrintSys3D11.dcp" />
<DCCReference Include="..\cxLibraryD11.dcp" />
<DCCReference Include="..\cxPageControlD11.dcp" />
<DCCReference Include="..\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\dbrtl.dcp" />
<DCCReference Include="..\dclIndyCore.dcp" />
<DCCReference Include="..\designide.dcp" />
<DCCReference Include="..\dsnap.dcp" />
<DCCReference Include="..\dxGDIPlusD11.dcp" />
<DCCReference Include="..\dxPSCoreD11.dcp" />
<DCCReference Include="..\dxThemeD11.dcp" />
<DCCReference Include="..\GUISDK_D11R.dcp" />
<DCCReference Include="..\IndyCore.dcp" />
<DCCReference Include="..\IndyProtocols.dcp" />
<DCCReference Include="..\IndySystem.dcp" />
<DCCReference Include="..\Jcl.dcp" />
<DCCReference Include="..\JclVcl.dcp" />
<DCCReference Include="..\JSDialog100.dcp" />
<DCCReference Include="..\JvCmpD11R.dcp" />
<DCCReference Include="..\JvCoreD11R.dcp" />
<DCCReference Include="..\JvCtrlsD11R.dcp" />
<DCCReference Include="..\JvDlgsD11R.dcp" />
<DCCReference Include="..\JvMMD11R.dcp" />
<DCCReference Include="..\JvNetD11R.dcp" />
<DCCReference Include="..\JvPageCompsD11R.dcp" />
<DCCReference Include="..\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\JvSystemD11R.dcp" />
<DCCReference Include="..\pckMD5.dcp" />
<DCCReference Include="..\pckUCDataConnector.dcp" />
<DCCReference Include="..\pckUserControl_RT.dcp" />
<DCCReference Include="..\PngComponentsD10.dcp" />
<DCCReference Include="..\PNG_D10.dcp" />
<DCCReference Include="..\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\RemObjects_Indy_D11.dcp" />
<DCCReference Include="..\rtl.dcp" />
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
<DCCReference Include="..\TB2k_D10.dcp" />
<DCCReference Include="..\tbx_d10.dcp" />
<DCCReference Include="..\vcl.dcp" />
<DCCReference Include="..\vclactnband.dcp" />
<DCCReference Include="..\vcldb.dcp" />
<DCCReference Include="..\vcljpg.dcp" />
<DCCReference Include="..\VclSmp.dcp" />
<DCCReference Include="..\vclx.dcp" />
<DCCReference Include="..\xmlrtl.dcp" />
<DCCReference Include="..\Servicios\adortl.dcp" />
<DCCReference Include="..\Servicios\cxDataD11.dcp" />
<DCCReference Include="..\Servicios\cxEditorsD11.dcp" />
<DCCReference Include="..\Servicios\cxExportD11.dcp" />
<DCCReference Include="..\Servicios\cxExtEditorsD11.dcp" />
<DCCReference Include="..\Servicios\cxGridD11.dcp" />
<DCCReference Include="..\Servicios\cxIntl6D11.dcp" />
<DCCReference Include="..\Servicios\cxIntlPrintSys3D11.dcp" />
<DCCReference Include="..\Servicios\cxLibraryD11.dcp" />
<DCCReference Include="..\Servicios\cxPageControlD11.dcp" />
<DCCReference Include="..\Servicios\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\Servicios\dbrtl.dcp" />
<DCCReference Include="..\Servicios\dclIndyCore.dcp" />
<DCCReference Include="..\Servicios\designide.dcp" />
<DCCReference Include="..\Servicios\dsnap.dcp" />
<DCCReference Include="..\Servicios\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Servicios\dxPSCoreD11.dcp" />
<DCCReference Include="..\Servicios\dxThemeD11.dcp" />
<DCCReference Include="..\Servicios\Etiquetas_Intf.pas" />
<DCCReference Include="..\Servicios\GUISDK_D11R.dcp" />
<DCCReference Include="..\Servicios\IndyCore.dcp" />
<DCCReference Include="..\Servicios\IndyProtocols.dcp" />
<DCCReference Include="..\Servicios\IndySystem.dcp" />
<DCCReference Include="..\Servicios\Jcl.dcp" />
<DCCReference Include="..\Servicios\JclVcl.dcp" />
<DCCReference Include="..\Servicios\JSDialog100.dcp" />
<DCCReference Include="..\Servicios\JvCmpD11R.dcp" />
<DCCReference Include="..\Servicios\JvCoreD11R.dcp" />
<DCCReference Include="..\Servicios\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Servicios\JvDlgsD11R.dcp" />
<DCCReference Include="..\Servicios\JvMMD11R.dcp" />
<DCCReference Include="..\Servicios\JvNetD11R.dcp" />
<DCCReference Include="..\Servicios\JvPageCompsD11R.dcp" />
<DCCReference Include="..\Servicios\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\Servicios\JvSystemD11R.dcp" />
<DCCReference Include="..\Servicios\pckMD5.dcp" />
<DCCReference Include="..\Servicios\pckUCDataConnector.dcp" />
<DCCReference Include="..\Servicios\pckUserControl_RT.dcp" />
<DCCReference Include="..\Servicios\PngComponentsD10.dcp" />
<DCCReference Include="..\Servicios\PNG_D10.dcp" />
<DCCReference Include="..\Servicios\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\Servicios\RemObjects_Indy_D11.dcp" />
<DCCReference Include="..\Servicios\rtl.dcp" />
<DCCReference Include="..\Servicios\TB2k_D10.dcp" />
<DCCReference Include="..\Servicios\tbx_d10.dcp" />
<DCCReference Include="..\Servicios\vcl.dcp" />
<DCCReference Include="..\Servicios\vclactnband.dcp" />
<DCCReference Include="..\Servicios\vcldb.dcp" />
<DCCReference Include="..\Servicios\vcljpg.dcp" />
<DCCReference Include="..\Servicios\VclSmp.dcp" />
<DCCReference Include="..\Servicios\vclx.dcp" />
<DCCReference Include="..\Servicios\xmlrtl.dcp" />
<DCCReference Include="Conexion\uConfigurarConexion.pas">
<Form>fConfigurarConexion</Form>
<DesignClass>TForm</DesignClass>

Binary file not shown.

View File

@ -42,7 +42,7 @@ implementation
uses
uROEncryption, Windows, WinInet, cxControls, uConfigurarConexion, Dialogs, Controls,
uDMBase, FactuGES_Intf, uDialogUtils;
uDMBase, Etiquetas_Intf, uDialogUtils;
const
IE_OFFLINE_ERROR = 'Unexpected error in WinInet HTTP Channel (2)';

View File

@ -31,7 +31,7 @@ implementation
{$R *.dfm}
uses
Forms, FactuGES_Intf, Variants, uDataModuleConexion,
Forms, Etiquetas_Intf, Variants, uDataModuleConexion,
uSistemaFunc, SHFolder, uAppInfoUtils;
const

View File

@ -17,7 +17,7 @@ procedure CopiarGridAlPortapapelesTXT (AGrid : TcxGrid; const ASoloSeleccion : B
procedure CopiarGridAlPortapapelesExcel (AGrid : TcxGrid; const ASoloSeleccion : Boolean = false);
var
CF_FACTUGES : Cardinal;
CF_ETIQUETAS : Cardinal;
CF_RTF : Cardinal;
CF_HTML: Cardinal;
@ -35,9 +35,9 @@ type
procedure RegistrarFormatos;
begin
CF_FACTUGES := RegisterClipboardFormat ('FactuGES Format');
if CF_FACTUGES = 0 then
raise Exception.Create('Error al registrar formato CF_FACTUGES');
CF_ETIQUETAS := RegisterClipboardFormat ('Etiquetas Format');
if CF_ETIQUETAS = 0 then
raise Exception.Create('Error al registrar formato CF_ETIQUETAS');
CF_HTML := RegisterClipboardFormat ('HTML Format');
if CF_HTML = 0 then
@ -450,7 +450,7 @@ begin
AMemStream := TMemoryStream.Create;
try
SaveGridRowsToStream(TcxGridDBTableView(AGrid.ActiveView), AMemStream, AGrid.ActiveView.Name, True);
CopyStreamToClipboard(CF_FACTUGES, AMemStream);
CopyStreamToClipboard(CF_ETIQUETAS, AMemStream);
finally
FreeAndNil(AMemStream);
end;
@ -501,7 +501,7 @@ begin
RegistrarFormatos;
if not Clipboard.HasFormat(CF_FACTUGES) then
if not Clipboard.HasFormat(CF_ETIQUETAS) then
raise Exception.Create('No hay nada en el portapapeles');
AGridStatus := TcxGridStatus.Create(TcxGridDBTableView(AGrid.ActiveView));
@ -509,7 +509,7 @@ begin
try
AMemStream := TMemoryStream.Create;
try
CopyStreamFromClipboard(CF_FACTUGES, AMemStream);
CopyStreamFromClipboard(CF_ETIQUETAS, AMemStream);
LoadGridRowsFromStream(TcxGridDBTableView(AGrid.ActiveView), AMemStream, ACaption);
finally
FreeAndNil(AMemStream);
@ -619,7 +619,7 @@ begin
RegistrarFormatos;
if AFormat = 0 then
Result := Clipboard.HasFormat(CF_FACTUGES) or Clipboard.HasFormat(CF_TEXT)
Result := Clipboard.HasFormat(CF_ETIQUETAS) or Clipboard.HasFormat(CF_TEXT)
else
Result := Clipboard.HasFormat(AFormat);
end;
@ -628,7 +628,7 @@ end;
procedure PegarAlGridDesdePortapapeles (AGrid : TcxGrid);
begin
{ Aqui se determina qué hacer. Si en el portapapeles hay datos en formato...
1. CF_FACTUGES -> pegar conceptos
1. CF_ETIQUETAS -> pegar conceptos
2. CF_TEXT -> tratar y pegar texto plano
}
@ -636,7 +636,7 @@ begin
try
RegistrarFormatos;
if Clipboard.HasFormat(CF_FACTUGES) then
if Clipboard.HasFormat(CF_ETIQUETAS) then
begin
PegarSeleccionGridDesdePortapapeles(AGrid);
Exit;

View File

@ -3,7 +3,7 @@ unit uIntegerListUtils;
interface
uses
Classes, FactuGES_Intf;
Classes, Etiquetas_Intf;
type
TIntegerList = class(TList)

View File

@ -68,7 +68,7 @@ begin
FEscribirLog := TCriticalSection.Create;
ALogFileName := GetSpecialFolderPath(CSIDL_APPDATA); //[Current Users]\Application Data
ALogFileName := ALogFileName + PathDelim + 'Rodax Software' + PathDelim + 'FactuGES' + PathDelim;
ALogFileName := ALogFileName + PathDelim + 'Rodax Software' + PathDelim + 'Etiquetas' + PathDelim;
if SysUtils.ForceDirectories(ALogFileName) then
begin
JvLogFile.Active := False;

View File

@ -6,9 +6,9 @@
<ItemGroup>
<Projects Include="ApplicationBase\ApplicationBase.dproj" />
<Projects Include="Base\Base.dproj" />
<Projects Include="Cliente\FactuGES.dproj" />
<Projects Include="Cliente\Etiquetas.dproj" />
<Projects Include="GUIBase\GUIBase.dproj" />
<Projects Include="Servidor\FactuGES_Server.dproj" />
<Projects Include="Servidor\Etiquetas_Server.dproj" />
</ItemGroup>
<ProjectExtensions>
<Borland.Personality>Default.Personality</Borland.Personality>
@ -43,32 +43,32 @@
<Target Name="ApplicationBase:Make">
<MSBuild Projects="ApplicationBase\ApplicationBase.dproj" Targets="Make" />
</Target>
<Target Name="FactuGES">
<MSBuild Projects="Cliente\FactuGES.dproj" Targets="" />
<Target Name="Etiquetas">
<MSBuild Projects="Cliente\Etiquetas.dproj" Targets="" />
</Target>
<Target Name="FactuGES:Clean">
<MSBuild Projects="Cliente\FactuGES.dproj" Targets="Clean" />
<Target Name="Etiquetas:Clean">
<MSBuild Projects="Cliente\Etiquetas.dproj" Targets="Clean" />
</Target>
<Target Name="FactuGES:Make">
<MSBuild Projects="Cliente\FactuGES.dproj" Targets="Make" />
<Target Name="Etiquetas:Make">
<MSBuild Projects="Cliente\Etiquetas.dproj" Targets="Make" />
</Target>
<Target Name="FactuGES_Server">
<MSBuild Projects="Servidor\FactuGES_Server.dproj" Targets="" />
<Target Name="Etiquetas_Server">
<MSBuild Projects="Servidor\Etiquetas_Server.dproj" Targets="" />
</Target>
<Target Name="FactuGES_Server:Clean">
<MSBuild Projects="Servidor\FactuGES_Server.dproj" Targets="Clean" />
<Target Name="Etiquetas_Server:Clean">
<MSBuild Projects="Servidor\Etiquetas_Server.dproj" Targets="Clean" />
</Target>
<Target Name="FactuGES_Server:Make">
<MSBuild Projects="Servidor\FactuGES_Server.dproj" Targets="Make" />
<Target Name="Etiquetas_Server:Make">
<MSBuild Projects="Servidor\Etiquetas_Server.dproj" Targets="Make" />
</Target>
<Target Name="Build">
<CallTarget Targets="Base;GUIBase;ApplicationBase;FactuGES;FactuGES_Server" />
<CallTarget Targets="Base;GUIBase;ApplicationBase;Etiquetas;Etiquetas_Server" />
</Target>
<Target Name="Clean">
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;FactuGES:Clean;FactuGES_Server:Clean" />
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Etiquetas:Clean;Etiquetas_Server:Clean" />
</Target>
<Target Name="Make">
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;FactuGES:Make;FactuGES_Server:Make" />
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Etiquetas:Make;Etiquetas_Server:Make" />
</Target>
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
</Project>

View File

@ -1,4 +1,4 @@
program FactuGES;
program Etiquetas;
uses
Forms,

View File

@ -2,12 +2,12 @@
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{53016ac3-0937-40b6-917c-48fcd13f2260}</ProjectGuid>
<MainSource>FactuGES.dpr</MainSource>
<MainSource>Etiquetas.dpr</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_UsePackage>PluginSDK_D11R;GUISDK_D11R;Base;GUIBase;ApplicationBase;vclx;vcl;rtl;vclactnband;xmlrtl;JSDialog100</DCC_UsePackage>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Cliente\FactuGES.exe</DCC_DependencyCheckOutputName>
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Cliente\Etiquetas.exe</DCC_DependencyCheckOutputName>
<DCC_EnabledPackages>true</DCC_EnabledPackages>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
@ -53,11 +53,11 @@
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">Etiquetas</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">Etiquetas</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">Etiquetas.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
</ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<ItemGroup>
<DelphiCompile Include="FactuGES.dpr">
<DelphiCompile Include="Etiquetas.dpr">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="uAcercaDe.pas" />
@ -74,7 +74,7 @@
<DCCReference Include="Utiles\uMenuUtils.pas" />
<DCCReference Include="Utiles\uNavPaneUtils.pas" />
<DCCReference Include="VCLFixPack.pas" />
<None Include="..\FactuGES.inc" />
<None Include="..\Etiquetas.inc" />
</ItemGroup>
</Project>
<!-- EurekaLog First Line

View File

@ -1,4 +1,4 @@
MAINICON ICON "C:\Codigo farmacia\Resources\Iconos\Factuges.ico"
MAINICON ICON "C:\Codigo farmacia\Resources\Iconos\Etiquetas.ico"
1 VERSIONINFO
FILEVERSION 1,0,0,0
PRODUCTVERSION 1,0,0,0
@ -14,8 +14,8 @@ BEGIN
BEGIN
VALUE "CompanyName", "Rodax Software S.L.\0"
VALUE "FileVersion", "1.0.0.0\0"
VALUE "InternalName", "FactuGES\0"
VALUE "ProductName", "FactuGES\0"
VALUE "InternalName", "Etiquetas\0"
VALUE "ProductName", "Etiquetas\0"
VALUE "ProductVersion", "1.0.0.0\0"
END
END

Binary file not shown.

View File

@ -42,7 +42,7 @@ begin
try
with Obj do
begin
memModulos.Lines.Add(ProductName + ' - Versión ' + FileVersion);
memModulos.Lines.Add(ProductName + ' - Versi¢n ' + FileVersion);
memModulos.Lines.Add(CompanyName);
memModulos.Lines.Add('');
{ memModulos.Lines.Add('Se autoriza el uso de este programa a:');
@ -56,7 +56,7 @@ begin
begin
memModulos.Lines.Add('');
memModulos.Lines.Add('');
memModulos.Lines.Add('Módulos disponibles:');
memModulos.Lines.Add('M¢dulos disponibles:');
for i := 0 to (HostManager.ModulesCount - 1) do
memModulos.Lines.Add(' - ' + FHostManager.Modules[i].Module.ModuleName +
' - v. ' + FHostManager.Modules[i].Module.Version);

View File

@ -1,66 +0,0 @@
unit uAcercaDe;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, JvGIF, ExtCtrls, JvExControls, JvComponent, JvGradient, StdCtrls,
uHostManager;
type
TfAcercaDe = class(TForm)
JvGradient1: TJvGradient;
Panel1: TPanel;
Bevel1: TBevel;
bAceptar: TButton;
memModulos: TMemo;
Image1: TImage;
procedure FormShow(Sender: TObject);
private
FHostManager: THostManager;
public
property HostManager : THostManager read FHostManager write FHostManager;
end;
var
fAcercaDe: TfAcercaDe;
implementation
{$R *.dfm}
uses JclFileUtils;
procedure TfAcercaDe.FormShow(Sender: TObject);
var
i : integer;
Obj : TJclFileVersionInfo;
begin
memModulos.Lines.Clear;
Obj := TJclFileVersionInfo.Create(Application.ExeName);
try
with Obj do
begin
memModulos.Lines.Add(ProductName + ' - Versi¢n ' + FileVersion);
memModulos.Lines.Add(CompanyName);
memModulos.Lines.Add('');
{ memModulos.Lines.Add('Se autoriza el uso de este programa a:');
memModulos.Lines.Add('VARELA IMAGEN Y DISEÑO S.L.');}
end;
finally
FreeAndNil(Obj);
end;
if Assigned(FHostManager) then
begin
memModulos.Lines.Add('');
memModulos.Lines.Add('');
memModulos.Lines.Add('Módulos disponibles:');
for i := 0 to (HostManager.ModulesCount - 1) do
memModulos.Lines.Add(' - ' + FHostManager.Modules[i].Module.ModuleName +
' - v. ' + FHostManager.Modules[i].Module.Version);
end;
end;
end.

View File

@ -42,7 +42,7 @@ var
NavPaneController : TNavPaneController;
implementation
{$INCLUDE ..\FactuGES.inc}
{$INCLUDE ..\Etiquetas.inc}
uses
Dialogs, uModuleController, uAcercaDe, uNavPaneUtils,

View File

@ -141,7 +141,7 @@ var
fPantallaPrincipal: TfPantallaPrincipal;
implementation
{$INCLUDE ..\FactuGES.inc}
{$INCLUDE ..\Etiquetas.inc}
uses
uSplash, uAcercaDe, UxTheme, Themes, uMenuUtils, uBizEmpresas,

View File

@ -1 +0,0 @@
#{ $ DEFINE MULTIEMPRESA }

View File

@ -59,30 +59,30 @@
<DelphiCompile Include="GUIBase.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\Base.dcp" />
<DCCReference Include="..\cxLibraryD11.dcp" />
<DCCReference Include="..\cxTreeListD11.dcp" />
<DCCReference Include="..\dbrtl.dcp" />
<DCCReference Include="..\dxBarD11.dcp" />
<DCCReference Include="..\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\dxComnD11.dcp" />
<DCCReference Include="..\dxGDIPlusD11.dcp" />
<DCCReference Include="..\dxLayoutControlD11.dcp" />
<DCCReference Include="..\dxPSCoreD11.dcp" />
<DCCReference Include="..\dxPScxCommonD11.dcp" />
<DCCReference Include="..\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\dxThemeD11.dcp" />
<DCCReference Include="..\frx11.dcp" />
<DCCReference Include="..\frxe11.dcp" />
<DCCReference Include="..\fs11.dcp" />
<DCCReference Include="..\JvAppFrmD11R.dcp" />
<DCCReference Include="..\JvCtrlsD11R.dcp" />
<DCCReference Include="..\rtl.dcp" />
<DCCReference Include="..\vcl.dcp" />
<DCCReference Include="..\vcldb.dcp" />
<DCCReference Include="..\vcljpg.dcp" />
<DCCReference Include="..\vclx.dcp" />
<DCCReference Include="..\Cliente\Base.dcp" />
<DCCReference Include="..\Cliente\cxLibraryD11.dcp" />
<DCCReference Include="..\Cliente\cxTreeListD11.dcp" />
<DCCReference Include="..\Cliente\dbrtl.dcp" />
<DCCReference Include="..\Cliente\dxBarD11.dcp" />
<DCCReference Include="..\Cliente\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\Cliente\dxComnD11.dcp" />
<DCCReference Include="..\Cliente\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Cliente\dxLayoutControlD11.dcp" />
<DCCReference Include="..\Cliente\dxPSCoreD11.dcp" />
<DCCReference Include="..\Cliente\dxPScxCommonD11.dcp" />
<DCCReference Include="..\Cliente\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\Cliente\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\Cliente\dxThemeD11.dcp" />
<DCCReference Include="..\Cliente\frx11.dcp" />
<DCCReference Include="..\Cliente\frxe11.dcp" />
<DCCReference Include="..\Cliente\fs11.dcp" />
<DCCReference Include="..\Cliente\JvAppFrmD11R.dcp" />
<DCCReference Include="..\Cliente\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Cliente\rtl.dcp" />
<DCCReference Include="..\Cliente\vcl.dcp" />
<DCCReference Include="..\Cliente\vcldb.dcp" />
<DCCReference Include="..\Cliente\vcljpg.dcp" />
<DCCReference Include="..\Cliente\vclx.dcp" />
<DCCReference Include="uDialogBase.pas">
<Form>fDialogBase</Form>
</DCCReference>

Binary file not shown.

Binary file not shown.

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

Some files were not shown because too many files have changed in this diff Show More