diff --git a/Database/scripts/factuges.sql b/Database/scripts/factuges.sql index 9b24bd8a..8001cfb5 100644 --- a/Database/scripts/factuges.sql +++ b/Database/scripts/factuges.sql @@ -4,11 +4,10 @@ SET SQL DIALECT 3; -SET NAMES ISO8859_1; +SET NAMES UTF8; CREATE DATABASE 'FACTUGES.FDB' PAGE_SIZE 4096 -DEFAULT CHARACTER SET ISO8859_1; - +DEFAULT CHARACTER SET UTF8; /******************************************************************************/ /**** User Defined Functions ****/ @@ -28,16 +27,16 @@ DECLARE EXTERNAL FUNCTION "MOD" DECLARE EXTERNAL FUNCTION STRLEN - CSTRING(32767) + CSTRING(254) RETURNS INTEGER BY VALUE ENTRY_POINT 'IB_UDF_strlen' MODULE_NAME 'ib_udf'; DECLARE EXTERNAL FUNCTION SUBSTR - CSTRING(255), + CSTRING(254), SMALLINT, SMALLINT - RETURNS CSTRING(255) FREE_IT + RETURNS CSTRING(254) FREE_IT ENTRY_POINT 'IB_UDF_substr' MODULE_NAME 'ib_udf'; @@ -253,7 +252,7 @@ CREATE TABLE ALBARANES_CLIENTE ( ID_ALMACEN TIPO_ID, ID_PEDIDO TIPO_ID, ID_FACTURA TIPO_ID, - TIPO VARCHAR(1), + TIPO VARCHAR(1), REFERENCIA VARCHAR(255), CALLE VARCHAR(255), CODIGO_POSTAL VARCHAR(10), @@ -279,7 +278,7 @@ CREATE TABLE ALBARANES_CLIENTE ( FECHA_ENVIO DATE, FECHA_RECEPCION DATE, FECHA_PREVISTA_ENVIO DATE, - REFERENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES + REFERENCIA_CLIENTE VARCHAR(255) ); @@ -308,7 +307,7 @@ CREATE TABLE ALBARANES_PROVEEDOR ( FECHA_ALBARAN DATE, ID_PEDIDO TIPO_ID, ID_FACTURA TIPO_ID, - TIPO VARCHAR(1), + TIPO VARCHAR(1), REFERENCIA VARCHAR(255), CALLE VARCHAR(255), CODIGO_POSTAL VARCHAR(10), @@ -389,7 +388,7 @@ CREATE TABLE ARTICULOS ( DESCUENTO TIPO_PORCENTAJE, PRECIO_NETO TIPO_IMPORTE, PRECIO_PORTE TIPO_IMPORTE, - FABRICANTE VARCHAR(255), + FABRICANTE VARCHAR(255), FECHA_ALTA TIMESTAMP, FECHA_MODIFICACION TIMESTAMP, USUARIO TIPO_USUARIO, @@ -431,7 +430,7 @@ CREATE TABLE CLIENTES_DTOS_PROVEEDORES ( CREATE TABLE CLIENTES_GRUPOS ( - ID TIPO_ID NOT NULL, + ID TIPO_ID NOT NULL, DESCRIPCION VARCHAR(255) ); @@ -451,7 +450,7 @@ CREATE TABLE COMISIONES_LIQUIDADAS ( CREATE TABLE CONFIGURACION ( - ID TIPO_ID NOT NULL, + ID TIPO_ID NOT NULL, CODIGO VARCHAR(50) NOT NULL, VALOR VARCHAR(255) NOT NULL, ID_EMPRESA TIPO_ID @@ -531,14 +530,14 @@ CREATE TABLE EMPLEADOS_DATOS ( FORMACION_COMPLE TIPO_NOTAS, FORMACION_RECIBIDA TIPO_NOTAS, EXPERIENCIA TIPO_NOTAS, - CONTRATO VARCHAR(255), - DURACION VARCHAR(255) + CONTRATO VARCHAR(255), + DURACION VARCHAR(255) ); CREATE TABLE EMPLEADOS_GRUPOS ( ID TIPO_ID NOT NULL, - DESCRIPCION VARCHAR(255) + DESCRIPCION VARCHAR(255) ); @@ -570,9 +569,9 @@ CREATE TABLE EMPRESAS ( CREATE TABLE EMPRESAS_CONTACTOS ( - ID TIPO_ID NOT NULL, - ID_EMPRESA TIPO_ID NOT NULL, - ID_CONTACTO TIPO_ID NOT NULL + ID TIPO_ID NOT NULL, + ID_EMPRESA TIPO_ID NOT NULL, + ID_CONTACTO TIPO_ID NOT NULL ); @@ -590,7 +589,7 @@ CREATE TABLE EMPRESAS_DATOS_BANCO ( CREATE TABLE EMPRESAS_USUARIOS ( - ID TIPO_ID NOT NULL, + ID TIPO_ID NOT NULL, ID_EMPRESA TIPO_ID NOT NULL, ID_USUARIO TIPO_ID NOT NULL ); @@ -835,7 +834,7 @@ CREATE TABLE PEDIDOS_CLIENTE ( ID_FORMA_PAGO TIPO_ID, REF_TIENDA_WEB INTEGER, FECHA_PREVISTA_ENVIO DATE, - REFERENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES + REFERENCIA_CLIENTE VARCHAR(255) ); @@ -911,7 +910,7 @@ CREATE TABLE PEDIDOS_PROVEEDOR_DETALLES ( CREATE TABLE PERMISOS ( - ID TIPO_ID NOT NULL, + ID TIPO_ID NOT NULL, ID_USUARIO TIPO_ID, MODULO VARCHAR(50), NOMBRECOMP VARCHAR(50), @@ -920,7 +919,7 @@ CREATE TABLE PERMISOS ( CREATE TABLE PERMISOSEX ( - ID TIPO_ID NOT NULL, + ID TIPO_ID NOT NULL, ID_USUARIO TIPO_ID, MODULO VARCHAR(50), NOMBRECOMP VARCHAR(50), @@ -934,7 +933,7 @@ CREATE TABLE PRESUPUESTOS_CLIENTE ( ID_EMPRESA TIPO_ID, ID_CLIENTE TIPO_ID, REFERENCIA VARCHAR(255), - REFERENCIA_AUX VARCHAR(255), + REFERENCIA_AUX VARCHAR(255), FECHA_PRESUPUESTO DATE, FECHA_DECISION DATE, SITUACION VARCHAR(255), @@ -955,8 +954,8 @@ CREATE TABLE PRESUPUESTOS_CLIENTE ( IMPORTE_IVA TIPO_IMPORTE, IMPORTE_TOTAL TIPO_IMPORTE, ID_FORMA_PAGO TIPO_ID, - REFERENCIA_CLIENTE VARCHAR(255) COLLATE ES_ES, - CLIENTE_FINAL VARCHAR(255) COLLATE ES_ES + REFERENCIA_CLIENTE VARCHAR(255), + CLIENTE_FINAL VARCHAR(255) ); @@ -995,7 +994,7 @@ CREATE TABLE PROVEEDORES_DATOS ( CREATE TABLE PROVEEDORES_GRUPOS ( ID TIPO_ID NOT NULL, - DESCRIPCION VARCHAR(255) + DESCRIPCION VARCHAR(255) ); @@ -1041,7 +1040,7 @@ CREATE TABLE REFERENCIAS ( ID_EMPRESA TIPO_ID, CODIGO VARCHAR(50) NOT NULL, VALOR VARCHAR(255) NOT NULL, - DESCRIPCION VARCHAR(255) COLLATE ES_ES + DESCRIPCION VARCHAR(255) ); @@ -1404,7 +1403,7 @@ CREATE VIEW V_ARTICULOS( AS SELECT ARTICULOS.ID, ARTICULOS.ID_EMPRESA, ARTICULOS.REFERENCIA, ARTICULOS.DESCRIPCION, ARTICULOS.UNIDAD_MEDIDA, ARTICULOS.FAMILIA, ARTICULOS.IMAGEN, - ARTICULOS.COMISIONABLE, ARTICULOS.FECHA_ALTA, + ARTICULOS.COMISIONABLE, ARTICULOS.FECHA_ALTA, ARTICULOS.FECHA_MODIFICACION, ARTICULOS.USUARIO, ARTICULOS.REFERENCIA_PROV, ARTICULOS.PRECIO_COSTE, @@ -1517,7 +1516,7 @@ CREATE VIEW V_CLIENTES( ID_FORMA_PAGO, TIENDA_WEB, CODIGO_ASIGNADO, - DESCUENTO) + DESCUENTO) AS SELECT V_CONTACTOS.ID, @@ -1596,8 +1595,8 @@ CREATE VIEW V_EMPLEADOS( FORMACION_COMPLE, FORMACION_RECIBIDA, EXPERIENCIA, - CONTRATO, - DURACION) + CONTRATO, + DURACION) AS SELECT V_CONTACTOS.ID, V_CONTACTOS.ID_CATEGORIA, @@ -2220,7 +2219,7 @@ CREATE VIEW V_PRESUPUESTOS_CLIENTE( FECHA_PRESUPUESTO, FECHA_DECISION, REFERENCIA, - REFERENCIA_AUX, + REFERENCIA_AUX, SITUACION, ID_CLIENTE, NIF_CIF, @@ -2802,7 +2801,7 @@ declare variable num_filas integer; declare variable contador integer; declare variable existe numeric(11,2); declare variable total_acumulado numeric(11,2); -declare variable concepto_capitulo varchar(2000) character set iso8859_1; +declare variable concepto_capitulo varchar(2000); begin existe = 0; total_acumulado = 0.0; diff --git a/Database/scripts/factuges_sysdata.sql b/Database/scripts/factuges_sysdata.sql index c2361ab5..fd9bd44d 100644 --- a/Database/scripts/factuges_sysdata.sql +++ b/Database/scripts/factuges_sysdata.sql @@ -1,6 +1,6 @@ SET SQL DIALECT 3; -SET NAMES ISO8859_1; +SET NAMES UTF8; INSERT INTO CATEGORIAS (ID, CATEGORIA) VALUES (1, 'CLIENTE'); INSERT INTO CATEGORIAS (ID, CATEGORIA) VALUES (2, 'PROVEEDOR'); diff --git a/Source/Servidor/uDataModuleServer.dfm b/Source/Servidor/uDataModuleServer.dfm index 8179d795..606f8a6f 100644 --- a/Source/Servidor/uDataModuleServer.dfm +++ b/Source/Servidor/uDataModuleServer.dfm @@ -42,7 +42,7 @@ object dmServer: TdmServer ConnectionString = 'IBX?Server=localhost;Database=C:\Codigo Tecsitel\Output\Debug\Da' + 'tabase\FACTUGES.FDB;UserID=sysdba;Password=masterkey;Dialect=3;C' + - 'harset=ISO8859_1;' + 'harset=UTF8;' ConnectionType = 'Interbase' Default = True end> diff --git a/Source/Servidor/uDataModuleServer.pas b/Source/Servidor/uDataModuleServer.pas index a68d2bb6..9567b702 100644 --- a/Source/Servidor/uDataModuleServer.pas +++ b/Source/Servidor/uDataModuleServer.pas @@ -184,13 +184,13 @@ begin + ';Database=' + FDBPath + ';UserID=' + FDBUser + ';Password=' + Decrypt(FDBPass) - + ';Dialect=3;Charset=ISO8859_1;'; + + ';Dialect=3;Charset=UTF8;'; { Result := 'FIB?Server=' + FDBServer + '/' + FDBPort + ';Database=' + FDBPath + ';UserID=' + FDBUser + ';Password=' + Decrypt(FDBPass) - + ';Dialect=3;Charset=ISO8859_1;';} + + ';Dialect=3;Charset=UTF8;';} end; procedure TdmServer.LeerConfiguracion;