- 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
BIN
Build/Build.fbl6
@ -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>
|
||||
|
||||
BIN
Build/Build.fbz6
@ -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;
|
||||
@ -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>
|
||||
|
||||
624
Database/scripts/etiquetas.sql
Normal 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;
|
||||
43
Database/scripts/etiquetas_sysdata.sql
Normal 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;
|
||||
@ -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, 'M²');
|
||||
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;
|
||||
|
||||
|
Before Width: | Height: | Size: 24 KiB |
|
Before Width: | Height: | Size: 33 KiB |
|
Before Width: | Height: | Size: 38 KiB |
|
Before Width: | Height: | Size: 36 KiB |
|
Before Width: | Height: | Size: 86 KiB |
|
Before Width: | Height: | Size: 6.3 KiB |
|
Before Width: | Height: | Size: 4.5 KiB |
|
Before Width: | Height: | Size: 3.0 KiB |
|
Before Width: | Height: | Size: 167 KiB After Width: | Height: | Size: 167 KiB |
|
Before Width: | Height: | Size: 104 KiB |
|
Before Width: | Height: | Size: 2.1 KiB |
|
Before Width: | Height: | Size: 418 KiB |
|
Before Width: | Height: | Size: 104 KiB |
|
Before Width: | Height: | Size: 161 KiB |
@ -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;
|
||||
@ -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" />
|
||||
|
||||
@ -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
|
||||
|
||||
@ -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;
|
||||
|
||||
@ -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
|
||||
|
||||
@ -24,7 +24,7 @@ implementation
|
||||
{$R *.dfm}
|
||||
|
||||
uses
|
||||
FactuGES_Intf, uStringsUtils, uDataModuleConexion, uROTypes;
|
||||
Etiquetas_Intf, uStringsUtils, uDataModuleConexion, uROTypes;
|
||||
|
||||
{ TDataModuleProvinciasPoblaciones }
|
||||
|
||||
|
||||
@ -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;
|
||||
|
||||
|
||||
|
||||
@ -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,
|
||||
|
||||
@ -58,7 +58,7 @@ type
|
||||
implementation
|
||||
|
||||
uses
|
||||
Forms, Dialogs, FactuGES_Intf, uROTypes, uDAClasses, uDADataTable,
|
||||
Forms, Dialogs, Etiquetas_Intf, uROTypes, uDAClasses, uDADataTable,
|
||||
uDACDSDataTable, uROEncryption;
|
||||
|
||||
{ TUCROConn }
|
||||
|
||||
@ -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
|
||||
|
||||
@ -150,7 +150,7 @@ var
|
||||
AppFactuGES : IAppFactuGES = nil;
|
||||
|
||||
implementation
|
||||
{$INCLUDE ..\FactuGES.inc}
|
||||
{$INCLUDE ..\Etiquetas.inc}
|
||||
|
||||
uses
|
||||
Windows, Dialogs, JSDialog, JSDialogs, uDialogUtils, cxControls, uUsuariosViewRegister,
|
||||
|
||||
@ -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.
|
||||
|
||||
@ -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>
|
||||
|
||||
@ -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)';
|
||||
|
||||
@ -31,7 +31,7 @@ implementation
|
||||
{$R *.dfm}
|
||||
|
||||
uses
|
||||
Forms, FactuGES_Intf, Variants, uDataModuleConexion,
|
||||
Forms, Etiquetas_Intf, Variants, uDataModuleConexion,
|
||||
uSistemaFunc, SHFolder, uAppInfoUtils;
|
||||
|
||||
const
|
||||
|
||||
@ -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;
|
||||
|
||||
@ -3,7 +3,7 @@ unit uIntegerListUtils;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, FactuGES_Intf;
|
||||
Classes, Etiquetas_Intf;
|
||||
|
||||
type
|
||||
TIntegerList = class(TList)
|
||||
|
||||
@ -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;
|
||||
|
||||
@ -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>
|
||||
@ -1,4 +1,4 @@
|
||||
program FactuGES;
|
||||
program Etiquetas;
|
||||
|
||||
uses
|
||||
Forms,
|
||||
@ -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
|
||||
@ -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
|
||||
@ -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);
|
||||
|
||||
@ -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.
|
||||
@ -42,7 +42,7 @@ var
|
||||
NavPaneController : TNavPaneController;
|
||||
|
||||
implementation
|
||||
{$INCLUDE ..\FactuGES.inc}
|
||||
{$INCLUDE ..\Etiquetas.inc}
|
||||
|
||||
uses
|
||||
Dialogs, uModuleController, uAcercaDe, uNavPaneUtils,
|
||||
|
||||
@ -141,7 +141,7 @@ var
|
||||
fPantallaPrincipal: TfPantallaPrincipal;
|
||||
|
||||
implementation
|
||||
{$INCLUDE ..\FactuGES.inc}
|
||||
{$INCLUDE ..\Etiquetas.inc}
|
||||
|
||||
uses
|
||||
uSplash, uAcercaDe, UxTheme, Themes, uMenuUtils, uBizEmpresas,
|
||||
|
||||
@ -1 +0,0 @@
|
||||
#{ $ DEFINE MULTIEMPRESA }
|
||||
@ -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>
|
||||
|
||||