Archivado/LuisLeon_FactuGES2
Archived
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Errores #539: Aparecen artículos reservados en los almacenes pero luego no se listan

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@124 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
roberto 2011-03-31 15:37:15 +00:00
parent 28c54a1a30
commit 7162c9c6a4
13 changed files with 1278 additions and 1422 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

99
Database/scripts/factuges.sql
View File

@ -2578,38 +2578,79 @@ AND (ARTICULOS.INVENTARIABLE = 1)
/* View: V_INV_DETALLE_RESERVAS */ /* View: V_INV_DETALLE_RESERVAS */
CREATE VIEW V_INV_DETALLE_RESERVAS( CREATE VIEW V_INV_DETALLE_RESERVAS(
ID, ID_ALB,
ID_EMPRESA, ID_EMPRESA,
ID_ALMACEN, REFERENCIA_ALB,
NOMBRE_ALMACEN, SITUACION_ALB,
FECHA_RESERVA, FECHA_PREVISTA_ENVIO_ALB,
CAUSA_RESERVA, ID_ALMACEN_ALB,
ID_ARTICULO, ALMACEN_ALB,
REFERENCIA, ID_CLIENTE_ALB,
DESCRIPCION, CLIENTE_ALB,
FAMILIA, ID_ART,
UNIDAD_MEDIDA, FAMILIA_ART,
FABRICANTE, REFERENCIA_ART,
REFERENCIA_FABR, REFERENCIA_PROV_ART,
CANTIDAD, DESCRIPCION_ART,
ID_ALMACEN_RESERVA, CANTIDAD_ART)
NOMBRE_ALMACEN_RESERVA,
ID_EMPRESA_ALMACEN_RESERVA)
AS AS
select movimientos.id, almacenes1.ID_EMPRESA, movimientos.ID_ALMACEN, almacenes1.nombre as nombre_almacen, SELECT
movimientos.fecha_movimiento as fecha_reserva, movimientos.causa, movimientos.id_articulo, ALBARANES_CLIENTE_DETALLES.ID_ALBARAN,
articulos.referencia, articulos.descripcion, articulos.familia, ALBARANES_CLIENTE.ID_EMPRESA,
articulos.unidad_medida, articulos.fabricante, articulos.referencia_fabr, ALBARANES_CLIENTE.REFERENCIA,
movimientos.cantidad, movimientos.id_almacen_reserva, V_ALB_CLI_SITUACION.SITUACION,
almacenes2.nombre as nombre_almacen_reserva, almacenes2.id_empresa ALBARANES_CLIENTE.FECHA_PREVISTA_ENVIO,
from movimientos ALBARANES_CLIENTE.ID_ALMACEN,
left join almacenes almacenes1 on (almacenes1.ID = movimientos.ID_ALMACEN) ALMACENES.NOMBRE AS ALMACEN,
left join almacenes almacenes2 on (almacenes2.ID = movimientos.ID_ALMACEN_RESERVA) ALBARANES_CLIENTE.ID_CLIENTE,
left join articulos on (articulos.id = movimientos.id_articulo) CONTACTOS.NOMBRE AS CLIENTE,
where tipo = 'R' ARTICULOS.ID,
; ARTICULOS.FAMILIA,
; ARTICULOS.REFERENCIA,
ARTICULOS.REFERENCIA_PROV,
ARTICULOS.DESCRIPCION,
SUM(COALESCE(ALBARANES_CLIENTE_DETALLES.CANTIDAD, 0))
FROM ALBARANES_CLIENTE_DETALLES
LEFT JOIN ALBARANES_CLIENTE
ON (ALBARANES_CLIENTE_DETALLES.ID_ALBARAN = ALBARANES_CLIENTE.ID)
LEFT JOIN CONTACTOS
ON (ALBARANES_CLIENTE.ID_CLIENTE = CONTACTOS.ID)
LEFT JOIN ALMACENES
ON (ALBARANES_CLIENTE.ID_ALMACEN = ALMACENES.ID)
LEFT JOIN ARTICULOS
ON (ALBARANES_CLIENTE_DETALLES.ID_ARTICULO = ARTICULOS.ID)
LEFT JOIN V_ALB_CLI_SITUACION
ON (ALBARANES_CLIENTE_DETALLES.ID_ALBARAN = V_ALB_CLI_SITUACION.ID)
/*Quitamos aquellos detalles que no tengan cabecera existente
aquellos que no se correspondan con un almacén es decir albaranes libres
que el albaran este pendiente (los articulos estan reservados en el almacen)
aquellos que no se correspondan con artículos existentes en el catalogo
y que no sean inventariables*/
WHERE (ALBARANES_CLIENTE.ID IS NOT NULL)
AND (ALBARANES_CLIENTE.ID_ALMACEN IS NOT NULL)
AND (V_ALB_CLI_SITUACION.SITUACION = 'PENDIENTE')
AND (ARTICULOS.ID is not null)
AND (ARTICULOS.ELIMINADO = 0)
AND (ARTICULOS.INVENTARIABLE = 1)
GROUP BY
ALBARANES_CLIENTE_DETALLES.ID_ALBARAN,
ALBARANES_CLIENTE.ID_EMPRESA,
ALBARANES_CLIENTE.REFERENCIA,
V_ALB_CLI_SITUACION.SITUACION,
ALBARANES_CLIENTE.FECHA_PREVISTA_ENVIO,
ALBARANES_CLIENTE.ID_ALMACEN,
ALMACENES.NOMBRE,
ALBARANES_CLIENTE.ID_CLIENTE,
CONTACTOS.NOMBRE,
ARTICULOS.ID,
ARTICULOS.FAMILIA,
ARTICULOS.REFERENCIA,
ARTICULOS.REFERENCIA_PROV,
ARTICULOS.DESCRIPCION;
;
/* View: V_INV_ENTRADAS_ALB */ /* View: V_INV_ENTRADAS_ALB */

8
Source/Modulos/Inventario/Controller/uInventarioController.pas
View File

@ -209,7 +209,7 @@ function TInventarioController.BuscarDetalleReservas: IBizDetalleReservas;
begin begin
Result := FDataModule.GetDetalleReservas; Result := FDataModule.GetDetalleReservas;
//Se filtra para que solo salgan las reservas a obras o almacenes de la empresa activa //Se filtra para que solo salgan las reservas a obras o almacenes de la empresa activa
FiltrarEmpresa(Result); // FiltrarEmpresa(Result);
end; end;
function TInventarioController.BuscarTodos: IBizInventario; function TInventarioController.BuscarTodos: IBizInventario;
@ -467,7 +467,9 @@ begin
with ADetalleReservas.DataTable.DynamicWhere do with ADetalleReservas.DataTable.DynamicWhere do
begin begin
// (ID_EMPRESA >= ID) // (ID_EMPRESA >= ID)
Condicion := NewBinaryExpression(NewField('', fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA), NewConstant(AppFactuGES.EmpresaActiva.ID, datInteger), dboEqual); //TECSITEL
// Condicion := NewBinaryExpression(NewField('', fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA), NewConstant(AppFactuGES.EmpresaActiva.ID, datInteger), dboEqual);
Condicion := NewBinaryExpression(NewField('', fld_DetalleReservasID_EMPRESA), NewConstant(AppFactuGES.EmpresaActiva.ID, datInteger), dboEqual);
if IsEmpty then if IsEmpty then
Expression := Condicion Expression := Condicion
@ -929,6 +931,7 @@ procedure TInventarioController.TrasladarReservas(AReservas: IBizDetalleReservas
var var
AArticulo: IBizInventario; AArticulo: IBizInventario;
begin begin
{TECSITEL
ShowHourglassCursor; ShowHourglassCursor;
try try
with AReservas.DataTable do with AReservas.DataTable do
@ -963,6 +966,7 @@ begin
finally finally
HideHourglassCursor; HideHourglassCursor;
end; end;
}
end; end;
{ {

57
Source/Modulos/Inventario/Data/uDataModuleInventario.dfm
View File

@ -27,7 +27,7 @@ inherited DataModuleInventario: TDataModuleInventario
RemoteUpdatesOptions = [] RemoteUpdatesOptions = []
Fields = < Fields = <
item item
Name = 'ID' Name = 'ID_ALB'
DataType = datInteger DataType = datInteger
end end
item item
@ -35,73 +35,64 @@ inherited DataModuleInventario: TDataModuleInventario
DataType = datInteger DataType = datInteger
end end
item item
Name = 'ID_ALMACEN' Name = 'REFERENCIA_ALB'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'FECHA_RESERVA' Name = 'SITUACION_ALB'
DataType = datString
Size = 9
end
item
Name = 'FECHA_PREVISTA_ENVIO_ALB'
DataType = datDateTime DataType = datDateTime
end end
item item
Name = 'CAUSA_RESERVA' Name = 'ID_ALMACEN_ALB'
DataType = datString
Size = 2000
end
item
Name = 'ID_ARTICULO'
DataType = datInteger DataType = datInteger
end end
item item
Name = 'REFERENCIA' Name = 'ALMACEN_ALB'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'DESCRIPCION' Name = 'ID_CLIENTE_ALB'
DataType = datInteger
end
item
Name = 'CLIENTE_ALB'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'FAMILIA' Name = 'ID_ART'
DataType = datInteger
end
item
Name = 'FAMILIA_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'UNIDAD_MEDIDA' Name = 'REFERENCIA_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'FABRICANTE' Name = 'REFERENCIA_PROV_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'REFERENCIA_FABR' Name = 'DESCRIPCION_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'CANTIDAD' Name = 'CANTIDAD_ART'
DataType = datCurrency DataType = datCurrency
end
item
Name = 'ID_ALMACEN_RESERVA'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN_RESERVA'
DataType = datString
Size = 255
end
item
Name = 'ID_EMPRESA_ALMACEN_RESERVA'
DataType = datInteger
end> end>
Params = <> Params = <>
StreamingOptions = [soDisableEventsWhileStreaming] StreamingOptions = [soDisableEventsWhileStreaming]

2
Source/Modulos/Inventario/Data/uDataModuleInventario.pas
View File

@ -68,7 +68,7 @@ begin
AddOperator(opAND); AddOperator(opAND);
OpenBraket; OpenBraket;
AddText(fld_DetalleReservasID + ' = ' + IntToStr(ID_NULO)); AddText(fld_DetalleReservasID_ALB + ' = ' + IntToStr(ID_NULO));
CloseBraket; CloseBraket;
end; end;
finally finally

700
Source/Modulos/Inventario/Model/schInventarioClient_Intf.pas
View File

@ -3,14 +3,14 @@ unit schInventarioClient_Intf;
interface interface
uses uses
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf; Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
const const
{ Data table rules ids { Data table rules ids
Feel free to change them to something more human readable Feel free to change them to something more human readable
but make sure they are unique in the context of your application } but make sure they are unique in the context of your application }
RID_Inventario = '{D04FC2C5-D75A-471F-A38D-F2609EE8EDB5}'; RID_Inventario = '{C3A0BEC9-DB5D-4AE7-818E-B1590D3259A2}';
RID_DetalleReservas = '{BFC29192-74A7-46CC-BB5D-75D9B57EB4DA}'; RID_DetalleReservas = '{CEF5FA1F-C51A-4735-A74D-C1716B339D0A}';
{ Data table names } { Data table names }
nme_Inventario = 'Inventario'; nme_Inventario = 'Inventario';
@ -65,47 +65,43 @@ const
idx_InventarioID_ALMACEN_RESERVA = 21; idx_InventarioID_ALMACEN_RESERVA = 21;
{ DetalleReservas fields } { DetalleReservas fields }
fld_DetalleReservasID = 'ID'; fld_DetalleReservasID_ALB = 'ID_ALB';
fld_DetalleReservasID_EMPRESA = 'ID_EMPRESA'; fld_DetalleReservasID_EMPRESA = 'ID_EMPRESA';
fld_DetalleReservasID_ALMACEN = 'ID_ALMACEN'; fld_DetalleReservasREFERENCIA_ALB = 'REFERENCIA_ALB';
fld_DetalleReservasNOMBRE_ALMACEN = 'NOMBRE_ALMACEN'; fld_DetalleReservasSITUACION_ALB = 'SITUACION_ALB';
fld_DetalleReservasFECHA_RESERVA = 'FECHA_RESERVA'; fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB = 'FECHA_PREVISTA_ENVIO_ALB';
fld_DetalleReservasCAUSA_RESERVA = 'CAUSA_RESERVA'; fld_DetalleReservasID_ALMACEN_ALB = 'ID_ALMACEN_ALB';
fld_DetalleReservasID_ARTICULO = 'ID_ARTICULO'; fld_DetalleReservasALMACEN_ALB = 'ALMACEN_ALB';
fld_DetalleReservasREFERENCIA = 'REFERENCIA'; fld_DetalleReservasID_CLIENTE_ALB = 'ID_CLIENTE_ALB';
fld_DetalleReservasDESCRIPCION = 'DESCRIPCION'; fld_DetalleReservasCLIENTE_ALB = 'CLIENTE_ALB';
fld_DetalleReservasFAMILIA = 'FAMILIA'; fld_DetalleReservasID_ART = 'ID_ART';
fld_DetalleReservasUNIDAD_MEDIDA = 'UNIDAD_MEDIDA'; fld_DetalleReservasFAMILIA_ART = 'FAMILIA_ART';
fld_DetalleReservasFABRICANTE = 'FABRICANTE'; fld_DetalleReservasREFERENCIA_ART = 'REFERENCIA_ART';
fld_DetalleReservasREFERENCIA_FABR = 'REFERENCIA_FABR'; fld_DetalleReservasREFERENCIA_PROV_ART = 'REFERENCIA_PROV_ART';
fld_DetalleReservasCANTIDAD = 'CANTIDAD'; fld_DetalleReservasDESCRIPCION_ART = 'DESCRIPCION_ART';
fld_DetalleReservasID_ALMACEN_RESERVA = 'ID_ALMACEN_RESERVA'; fld_DetalleReservasCANTIDAD_ART = 'CANTIDAD_ART';
fld_DetalleReservasNOMBRE_ALMACEN_RESERVA = 'NOMBRE_ALMACEN_RESERVA';
fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA = 'ID_EMPRESA_ALMACEN_RESERVA';
{ DetalleReservas field indexes } { DetalleReservas field indexes }
idx_DetalleReservasID = 0; idx_DetalleReservasID_ALB = 0;
idx_DetalleReservasID_EMPRESA = 1; idx_DetalleReservasID_EMPRESA = 1;
idx_DetalleReservasID_ALMACEN = 2; idx_DetalleReservasREFERENCIA_ALB = 2;
idx_DetalleReservasNOMBRE_ALMACEN = 3; idx_DetalleReservasSITUACION_ALB = 3;
idx_DetalleReservasFECHA_RESERVA = 4; idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB = 4;
idx_DetalleReservasCAUSA_RESERVA = 5; idx_DetalleReservasID_ALMACEN_ALB = 5;
idx_DetalleReservasID_ARTICULO = 6; idx_DetalleReservasALMACEN_ALB = 6;
idx_DetalleReservasREFERENCIA = 7; idx_DetalleReservasID_CLIENTE_ALB = 7;
idx_DetalleReservasDESCRIPCION = 8; idx_DetalleReservasCLIENTE_ALB = 8;
idx_DetalleReservasFAMILIA = 9; idx_DetalleReservasID_ART = 9;
idx_DetalleReservasUNIDAD_MEDIDA = 10; idx_DetalleReservasFAMILIA_ART = 10;
idx_DetalleReservasFABRICANTE = 11; idx_DetalleReservasREFERENCIA_ART = 11;
idx_DetalleReservasREFERENCIA_FABR = 12; idx_DetalleReservasREFERENCIA_PROV_ART = 12;
idx_DetalleReservasCANTIDAD = 13; idx_DetalleReservasDESCRIPCION_ART = 13;
idx_DetalleReservasID_ALMACEN_RESERVA = 14; idx_DetalleReservasCANTIDAD_ART = 14;
idx_DetalleReservasNOMBRE_ALMACEN_RESERVA = 15;
idx_DetalleReservasID_EMPRESA_ALMACEN_RESERVA = 16;
type type
{ IInventario } { IInventario }
IInventario = interface(IDAStronglyTypedDataTable) IInventario = interface(IDAStronglyTypedDataTable)
['{5FE325FA-C485-4522-8F90-B6B037D1764A}'] ['{F619175B-A463-4BA3-B136-60122A903D0A}']
{ Property getters and setters } { Property getters and setters }
function GetID_ALMACENValue: Integer; function GetID_ALMACENValue: Integer;
procedure SetID_ALMACENValue(const aValue: Integer); procedure SetID_ALMACENValue(const aValue: Integer);
@ -245,7 +241,7 @@ type
end; end;
{ TInventarioDataTableRules } { TInventarioDataTableRules }
TInventarioDataTableRules = class(TIntfObjectDADataTableRules, IInventario) TInventarioDataTableRules = class(TDADataTableRules, IInventario)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -392,224 +388,200 @@ type
{ IDetalleReservas } { IDetalleReservas }
IDetalleReservas = interface(IDAStronglyTypedDataTable) IDetalleReservas = interface(IDAStronglyTypedDataTable)
['{7FE92649-C32F-47EB-9D9F-0CD43FECC0A1}'] ['{1DEB195E-09C4-4AEF-B988-B8B5263C31B2}']
{ Property getters and setters } { Property getters and setters }
function GetIDValue: Integer; function GetID_ALBValue: Integer;
procedure SetIDValue(const aValue: Integer); procedure SetID_ALBValue(const aValue: Integer);
function GetIDIsNull: Boolean; function GetID_ALBIsNull: Boolean;
procedure SetIDIsNull(const aValue: Boolean); procedure SetID_ALBIsNull(const aValue: Boolean);
function GetID_EMPRESAValue: Integer; function GetID_EMPRESAValue: Integer;
procedure SetID_EMPRESAValue(const aValue: Integer); procedure SetID_EMPRESAValue(const aValue: Integer);
function GetID_EMPRESAIsNull: Boolean; function GetID_EMPRESAIsNull: Boolean;
procedure SetID_EMPRESAIsNull(const aValue: Boolean); procedure SetID_EMPRESAIsNull(const aValue: Boolean);
function GetID_ALMACENValue: Integer; function GetREFERENCIA_ALBValue: String;
procedure SetID_ALMACENValue(const aValue: Integer); procedure SetREFERENCIA_ALBValue(const aValue: String);
function GetID_ALMACENIsNull: Boolean; function GetREFERENCIA_ALBIsNull: Boolean;
procedure SetID_ALMACENIsNull(const aValue: Boolean); procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean);
function GetNOMBRE_ALMACENValue: String; function GetSITUACION_ALBValue: String;
procedure SetNOMBRE_ALMACENValue(const aValue: String); procedure SetSITUACION_ALBValue(const aValue: String);
function GetNOMBRE_ALMACENIsNull: Boolean; function GetSITUACION_ALBIsNull: Boolean;
procedure SetNOMBRE_ALMACENIsNull(const aValue: Boolean); procedure SetSITUACION_ALBIsNull(const aValue: Boolean);
function GetFECHA_RESERVAValue: DateTime; function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime;
procedure SetFECHA_RESERVAValue(const aValue: DateTime); procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime);
function GetFECHA_RESERVAIsNull: Boolean; function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean;
procedure SetFECHA_RESERVAIsNull(const aValue: Boolean); procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean);
function GetCAUSA_RESERVAValue: String; function GetID_ALMACEN_ALBValue: Integer;
procedure SetCAUSA_RESERVAValue(const aValue: String); procedure SetID_ALMACEN_ALBValue(const aValue: Integer);
function GetCAUSA_RESERVAIsNull: Boolean; function GetID_ALMACEN_ALBIsNull: Boolean;
procedure SetCAUSA_RESERVAIsNull(const aValue: Boolean); procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean);
function GetID_ARTICULOValue: Integer; function GetALMACEN_ALBValue: String;
procedure SetID_ARTICULOValue(const aValue: Integer); procedure SetALMACEN_ALBValue(const aValue: String);
function GetID_ARTICULOIsNull: Boolean; function GetALMACEN_ALBIsNull: Boolean;
procedure SetID_ARTICULOIsNull(const aValue: Boolean); procedure SetALMACEN_ALBIsNull(const aValue: Boolean);
function GetREFERENCIAValue: String; function GetID_CLIENTE_ALBValue: Integer;
procedure SetREFERENCIAValue(const aValue: String); procedure SetID_CLIENTE_ALBValue(const aValue: Integer);
function GetREFERENCIAIsNull: Boolean; function GetID_CLIENTE_ALBIsNull: Boolean;
procedure SetREFERENCIAIsNull(const aValue: Boolean); procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean);
function GetDESCRIPCIONValue: String; function GetCLIENTE_ALBValue: String;
procedure SetDESCRIPCIONValue(const aValue: String); procedure SetCLIENTE_ALBValue(const aValue: String);
function GetDESCRIPCIONIsNull: Boolean; function GetCLIENTE_ALBIsNull: Boolean;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); procedure SetCLIENTE_ALBIsNull(const aValue: Boolean);
function GetFAMILIAValue: String; function GetID_ARTValue: Integer;
procedure SetFAMILIAValue(const aValue: String); procedure SetID_ARTValue(const aValue: Integer);
function GetFAMILIAIsNull: Boolean; function GetID_ARTIsNull: Boolean;
procedure SetFAMILIAIsNull(const aValue: Boolean); procedure SetID_ARTIsNull(const aValue: Boolean);
function GetUNIDAD_MEDIDAValue: String; function GetFAMILIA_ARTValue: String;
procedure SetUNIDAD_MEDIDAValue(const aValue: String); procedure SetFAMILIA_ARTValue(const aValue: String);
function GetUNIDAD_MEDIDAIsNull: Boolean; function GetFAMILIA_ARTIsNull: Boolean;
procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); procedure SetFAMILIA_ARTIsNull(const aValue: Boolean);
function GetFABRICANTEValue: String; function GetREFERENCIA_ARTValue: String;
procedure SetFABRICANTEValue(const aValue: String); procedure SetREFERENCIA_ARTValue(const aValue: String);
function GetFABRICANTEIsNull: Boolean; function GetREFERENCIA_ARTIsNull: Boolean;
procedure SetFABRICANTEIsNull(const aValue: Boolean); procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean);
function GetREFERENCIA_FABRValue: String; function GetREFERENCIA_PROV_ARTValue: String;
procedure SetREFERENCIA_FABRValue(const aValue: String); procedure SetREFERENCIA_PROV_ARTValue(const aValue: String);
function GetREFERENCIA_FABRIsNull: Boolean; function GetREFERENCIA_PROV_ARTIsNull: Boolean;
procedure SetREFERENCIA_FABRIsNull(const aValue: Boolean); procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean);
function GetCANTIDADValue: Currency; function GetDESCRIPCION_ARTValue: String;
procedure SetCANTIDADValue(const aValue: Currency); procedure SetDESCRIPCION_ARTValue(const aValue: String);
function GetCANTIDADIsNull: Boolean; function GetDESCRIPCION_ARTIsNull: Boolean;
procedure SetCANTIDADIsNull(const aValue: Boolean); procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean);
function GetID_ALMACEN_RESERVAValue: Integer; function GetCANTIDAD_ARTValue: Currency;
procedure SetID_ALMACEN_RESERVAValue(const aValue: Integer); procedure SetCANTIDAD_ARTValue(const aValue: Currency);
function GetID_ALMACEN_RESERVAIsNull: Boolean; function GetCANTIDAD_ARTIsNull: Boolean;
procedure SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean); procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean);
function GetNOMBRE_ALMACEN_RESERVAValue: String;
procedure SetNOMBRE_ALMACEN_RESERVAValue(const aValue: String);
function GetNOMBRE_ALMACEN_RESERVAIsNull: Boolean;
procedure SetNOMBRE_ALMACEN_RESERVAIsNull(const aValue: Boolean);
function GetID_EMPRESA_ALMACEN_RESERVAValue: Integer;
procedure SetID_EMPRESA_ALMACEN_RESERVAValue(const aValue: Integer);
function GetID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean;
procedure SetID_EMPRESA_ALMACEN_RESERVAIsNull(const aValue: Boolean);
{ Properties } { Properties }
property ID: Integer read GetIDValue write SetIDValue; property ID_ALB: Integer read GetID_ALBValue write SetID_ALBValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull; property ID_ALBIsNull: Boolean read GetID_ALBIsNull write SetID_ALBIsNull;
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue; property REFERENCIA_ALB: String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue;
property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull; property REFERENCIA_ALBIsNull: Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull;
property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue; property SITUACION_ALB: String read GetSITUACION_ALBValue write SetSITUACION_ALBValue;
property NOMBRE_ALMACENIsNull: Boolean read GetNOMBRE_ALMACENIsNull write SetNOMBRE_ALMACENIsNull; property SITUACION_ALBIsNull: Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull;
property FECHA_RESERVA: DateTime read GetFECHA_RESERVAValue write SetFECHA_RESERVAValue; property FECHA_PREVISTA_ENVIO_ALB: DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue;
property FECHA_RESERVAIsNull: Boolean read GetFECHA_RESERVAIsNull write SetFECHA_RESERVAIsNull; property FECHA_PREVISTA_ENVIO_ALBIsNull: Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull;
property CAUSA_RESERVA: String read GetCAUSA_RESERVAValue write SetCAUSA_RESERVAValue; property ID_ALMACEN_ALB: Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue;
property CAUSA_RESERVAIsNull: Boolean read GetCAUSA_RESERVAIsNull write SetCAUSA_RESERVAIsNull; property ID_ALMACEN_ALBIsNull: Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull;
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; property ALMACEN_ALB: String read GetALMACEN_ALBValue write SetALMACEN_ALBValue;
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull; property ALMACEN_ALBIsNull: Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull;
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property ID_CLIENTE_ALB: Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue;
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; property ID_CLIENTE_ALBIsNull: Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property CLIENTE_ALB: String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property CLIENTE_ALBIsNull: Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull;
property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; property ID_ART: Integer read GetID_ARTValue write SetID_ARTValue;
property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull; property ID_ARTIsNull: Boolean read GetID_ARTIsNull write SetID_ARTIsNull;
property UNIDAD_MEDIDA: String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue; property FAMILIA_ART: String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue;
property UNIDAD_MEDIDAIsNull: Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull; property FAMILIA_ARTIsNull: Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull;
property FABRICANTE: String read GetFABRICANTEValue write SetFABRICANTEValue; property REFERENCIA_ART: String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue;
property FABRICANTEIsNull: Boolean read GetFABRICANTEIsNull write SetFABRICANTEIsNull; property REFERENCIA_ARTIsNull: Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull;
property REFERENCIA_FABR: String read GetREFERENCIA_FABRValue write SetREFERENCIA_FABRValue; property REFERENCIA_PROV_ART: String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue;
property REFERENCIA_FABRIsNull: Boolean read GetREFERENCIA_FABRIsNull write SetREFERENCIA_FABRIsNull; property REFERENCIA_PROV_ARTIsNull: Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull;
property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue; property DESCRIPCION_ART: String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue;
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; property DESCRIPCION_ARTIsNull: Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull;
property ID_ALMACEN_RESERVA: Integer read GetID_ALMACEN_RESERVAValue write SetID_ALMACEN_RESERVAValue; property CANTIDAD_ART: Currency read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue;
property ID_ALMACEN_RESERVAIsNull: Boolean read GetID_ALMACEN_RESERVAIsNull write SetID_ALMACEN_RESERVAIsNull; property CANTIDAD_ARTIsNull: Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull;
property NOMBRE_ALMACEN_RESERVA: String read GetNOMBRE_ALMACEN_RESERVAValue write SetNOMBRE_ALMACEN_RESERVAValue;
property NOMBRE_ALMACEN_RESERVAIsNull: Boolean read GetNOMBRE_ALMACEN_RESERVAIsNull write SetNOMBRE_ALMACEN_RESERVAIsNull;
property ID_EMPRESA_ALMACEN_RESERVA: Integer read GetID_EMPRESA_ALMACEN_RESERVAValue write SetID_EMPRESA_ALMACEN_RESERVAValue;
property ID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean read GetID_EMPRESA_ALMACEN_RESERVAIsNull write SetID_EMPRESA_ALMACEN_RESERVAIsNull;
end; end;
{ TDetalleReservasDataTableRules } { TDetalleReservasDataTableRules }
TDetalleReservasDataTableRules = class(TIntfObjectDADataTableRules, IDetalleReservas) TDetalleReservasDataTableRules = class(TDADataTableRules, IDetalleReservas)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
function GetIDValue: Integer; virtual; function GetID_ALBValue: Integer; virtual;
procedure SetIDValue(const aValue: Integer); virtual; procedure SetID_ALBValue(const aValue: Integer); virtual;
function GetIDIsNull: Boolean; virtual; function GetID_ALBIsNull: Boolean; virtual;
procedure SetIDIsNull(const aValue: Boolean); virtual; procedure SetID_ALBIsNull(const aValue: Boolean); virtual;
function GetID_EMPRESAValue: Integer; virtual; function GetID_EMPRESAValue: Integer; virtual;
procedure SetID_EMPRESAValue(const aValue: Integer); virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
function GetID_EMPRESAIsNull: Boolean; virtual; function GetID_EMPRESAIsNull: Boolean; virtual;
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual; procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
function GetID_ALMACENValue: Integer; virtual; function GetREFERENCIA_ALBValue: String; virtual;
procedure SetID_ALMACENValue(const aValue: Integer); virtual; procedure SetREFERENCIA_ALBValue(const aValue: String); virtual;
function GetID_ALMACENIsNull: Boolean; virtual; function GetREFERENCIA_ALBIsNull: Boolean; virtual;
procedure SetID_ALMACENIsNull(const aValue: Boolean); virtual; procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean); virtual;
function GetNOMBRE_ALMACENValue: String; virtual; function GetSITUACION_ALBValue: String; virtual;
procedure SetNOMBRE_ALMACENValue(const aValue: String); virtual; procedure SetSITUACION_ALBValue(const aValue: String); virtual;
function GetNOMBRE_ALMACENIsNull: Boolean; virtual; function GetSITUACION_ALBIsNull: Boolean; virtual;
procedure SetNOMBRE_ALMACENIsNull(const aValue: Boolean); virtual; procedure SetSITUACION_ALBIsNull(const aValue: Boolean); virtual;
function GetFECHA_RESERVAValue: DateTime; virtual; function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; virtual;
procedure SetFECHA_RESERVAValue(const aValue: DateTime); virtual; procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); virtual;
function GetFECHA_RESERVAIsNull: Boolean; virtual; function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; virtual;
procedure SetFECHA_RESERVAIsNull(const aValue: Boolean); virtual; procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); virtual;
function GetCAUSA_RESERVAValue: String; virtual; function GetID_ALMACEN_ALBValue: Integer; virtual;
procedure SetCAUSA_RESERVAValue(const aValue: String); virtual; procedure SetID_ALMACEN_ALBValue(const aValue: Integer); virtual;
function GetCAUSA_RESERVAIsNull: Boolean; virtual; function GetID_ALMACEN_ALBIsNull: Boolean; virtual;
procedure SetCAUSA_RESERVAIsNull(const aValue: Boolean); virtual; procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean); virtual;
function GetID_ARTICULOValue: Integer; virtual; function GetALMACEN_ALBValue: String; virtual;
procedure SetID_ARTICULOValue(const aValue: Integer); virtual; procedure SetALMACEN_ALBValue(const aValue: String); virtual;
function GetID_ARTICULOIsNull: Boolean; virtual; function GetALMACEN_ALBIsNull: Boolean; virtual;
procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual; procedure SetALMACEN_ALBIsNull(const aValue: Boolean); virtual;
function GetREFERENCIAValue: String; virtual; function GetID_CLIENTE_ALBValue: Integer; virtual;
procedure SetREFERENCIAValue(const aValue: String); virtual; procedure SetID_CLIENTE_ALBValue(const aValue: Integer); virtual;
function GetREFERENCIAIsNull: Boolean; virtual; function GetID_CLIENTE_ALBIsNull: Boolean; virtual;
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual; procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean); virtual;
function GetDESCRIPCIONValue: String; virtual; function GetCLIENTE_ALBValue: String; virtual;
procedure SetDESCRIPCIONValue(const aValue: String); virtual; procedure SetCLIENTE_ALBValue(const aValue: String); virtual;
function GetDESCRIPCIONIsNull: Boolean; virtual; function GetCLIENTE_ALBIsNull: Boolean; virtual;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; procedure SetCLIENTE_ALBIsNull(const aValue: Boolean); virtual;
function GetFAMILIAValue: String; virtual; function GetID_ARTValue: Integer; virtual;
procedure SetFAMILIAValue(const aValue: String); virtual; procedure SetID_ARTValue(const aValue: Integer); virtual;
function GetFAMILIAIsNull: Boolean; virtual; function GetID_ARTIsNull: Boolean; virtual;
procedure SetFAMILIAIsNull(const aValue: Boolean); virtual; procedure SetID_ARTIsNull(const aValue: Boolean); virtual;
function GetUNIDAD_MEDIDAValue: String; virtual; function GetFAMILIA_ARTValue: String; virtual;
procedure SetUNIDAD_MEDIDAValue(const aValue: String); virtual; procedure SetFAMILIA_ARTValue(const aValue: String); virtual;
function GetUNIDAD_MEDIDAIsNull: Boolean; virtual; function GetFAMILIA_ARTIsNull: Boolean; virtual;
procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); virtual; procedure SetFAMILIA_ARTIsNull(const aValue: Boolean); virtual;
function GetFABRICANTEValue: String; virtual; function GetREFERENCIA_ARTValue: String; virtual;
procedure SetFABRICANTEValue(const aValue: String); virtual; procedure SetREFERENCIA_ARTValue(const aValue: String); virtual;
function GetFABRICANTEIsNull: Boolean; virtual; function GetREFERENCIA_ARTIsNull: Boolean; virtual;
procedure SetFABRICANTEIsNull(const aValue: Boolean); virtual; procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean); virtual;
function GetREFERENCIA_FABRValue: String; virtual; function GetREFERENCIA_PROV_ARTValue: String; virtual;
procedure SetREFERENCIA_FABRValue(const aValue: String); virtual; procedure SetREFERENCIA_PROV_ARTValue(const aValue: String); virtual;
function GetREFERENCIA_FABRIsNull: Boolean; virtual; function GetREFERENCIA_PROV_ARTIsNull: Boolean; virtual;
procedure SetREFERENCIA_FABRIsNull(const aValue: Boolean); virtual; procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); virtual;
function GetCANTIDADValue: Currency; virtual; function GetDESCRIPCION_ARTValue: String; virtual;
procedure SetCANTIDADValue(const aValue: Currency); virtual; procedure SetDESCRIPCION_ARTValue(const aValue: String); virtual;
function GetCANTIDADIsNull: Boolean; virtual; function GetDESCRIPCION_ARTIsNull: Boolean; virtual;
procedure SetCANTIDADIsNull(const aValue: Boolean); virtual; procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean); virtual;
function GetID_ALMACEN_RESERVAValue: Integer; virtual; function GetCANTIDAD_ARTValue: Currency; virtual;
procedure SetID_ALMACEN_RESERVAValue(const aValue: Integer); virtual; procedure SetCANTIDAD_ARTValue(const aValue: Currency); virtual;
function GetID_ALMACEN_RESERVAIsNull: Boolean; virtual; function GetCANTIDAD_ARTIsNull: Boolean; virtual;
procedure SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean); virtual; procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean); virtual;
function GetNOMBRE_ALMACEN_RESERVAValue: String; virtual;
procedure SetNOMBRE_ALMACEN_RESERVAValue(const aValue: String); virtual;
function GetNOMBRE_ALMACEN_RESERVAIsNull: Boolean; virtual;
procedure SetNOMBRE_ALMACEN_RESERVAIsNull(const aValue: Boolean); virtual;
function GetID_EMPRESA_ALMACEN_RESERVAValue: Integer; virtual;
procedure SetID_EMPRESA_ALMACEN_RESERVAValue(const aValue: Integer); virtual;
function GetID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean; virtual;
procedure SetID_EMPRESA_ALMACEN_RESERVAIsNull(const aValue: Boolean); virtual;
{ Properties } { Properties }
property ID: Integer read GetIDValue write SetIDValue; property ID_ALB: Integer read GetID_ALBValue write SetID_ALBValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull; property ID_ALBIsNull: Boolean read GetID_ALBIsNull write SetID_ALBIsNull;
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue; property REFERENCIA_ALB: String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue;
property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull; property REFERENCIA_ALBIsNull: Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull;
property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue; property SITUACION_ALB: String read GetSITUACION_ALBValue write SetSITUACION_ALBValue;
property NOMBRE_ALMACENIsNull: Boolean read GetNOMBRE_ALMACENIsNull write SetNOMBRE_ALMACENIsNull; property SITUACION_ALBIsNull: Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull;
property FECHA_RESERVA: DateTime read GetFECHA_RESERVAValue write SetFECHA_RESERVAValue; property FECHA_PREVISTA_ENVIO_ALB: DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue;
property FECHA_RESERVAIsNull: Boolean read GetFECHA_RESERVAIsNull write SetFECHA_RESERVAIsNull; property FECHA_PREVISTA_ENVIO_ALBIsNull: Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull;
property CAUSA_RESERVA: String read GetCAUSA_RESERVAValue write SetCAUSA_RESERVAValue; property ID_ALMACEN_ALB: Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue;
property CAUSA_RESERVAIsNull: Boolean read GetCAUSA_RESERVAIsNull write SetCAUSA_RESERVAIsNull; property ID_ALMACEN_ALBIsNull: Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull;
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; property ALMACEN_ALB: String read GetALMACEN_ALBValue write SetALMACEN_ALBValue;
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull; property ALMACEN_ALBIsNull: Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull;
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; property ID_CLIENTE_ALB: Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue;
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; property ID_CLIENTE_ALBIsNull: Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; property CLIENTE_ALB: String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; property CLIENTE_ALBIsNull: Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull;
property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; property ID_ART: Integer read GetID_ARTValue write SetID_ARTValue;
property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull; property ID_ARTIsNull: Boolean read GetID_ARTIsNull write SetID_ARTIsNull;
property UNIDAD_MEDIDA: String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue; property FAMILIA_ART: String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue;
property UNIDAD_MEDIDAIsNull: Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull; property FAMILIA_ARTIsNull: Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull;
property FABRICANTE: String read GetFABRICANTEValue write SetFABRICANTEValue; property REFERENCIA_ART: String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue;
property FABRICANTEIsNull: Boolean read GetFABRICANTEIsNull write SetFABRICANTEIsNull; property REFERENCIA_ARTIsNull: Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull;
property REFERENCIA_FABR: String read GetREFERENCIA_FABRValue write SetREFERENCIA_FABRValue; property REFERENCIA_PROV_ART: String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue;
property REFERENCIA_FABRIsNull: Boolean read GetREFERENCIA_FABRIsNull write SetREFERENCIA_FABRIsNull; property REFERENCIA_PROV_ARTIsNull: Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull;
property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue; property DESCRIPCION_ART: String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue;
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; property DESCRIPCION_ARTIsNull: Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull;
property ID_ALMACEN_RESERVA: Integer read GetID_ALMACEN_RESERVAValue write SetID_ALMACEN_RESERVAValue; property CANTIDAD_ART: Currency read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue;
property ID_ALMACEN_RESERVAIsNull: Boolean read GetID_ALMACEN_RESERVAIsNull write SetID_ALMACEN_RESERVAIsNull; property CANTIDAD_ARTIsNull: Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull;
property NOMBRE_ALMACEN_RESERVA: String read GetNOMBRE_ALMACEN_RESERVAValue write SetNOMBRE_ALMACEN_RESERVAValue;
property NOMBRE_ALMACEN_RESERVAIsNull: Boolean read GetNOMBRE_ALMACEN_RESERVAIsNull write SetNOMBRE_ALMACEN_RESERVAIsNull;
property ID_EMPRESA_ALMACEN_RESERVA: Integer read GetID_EMPRESA_ALMACEN_RESERVAValue write SetID_EMPRESA_ALMACEN_RESERVAValue;
property ID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean read GetID_EMPRESA_ALMACEN_RESERVAIsNull write SetID_EMPRESA_ALMACEN_RESERVAIsNull;
public public
constructor Create(aDataTable: TDADataTable); override; constructor Create(aDataTable: TDADataTable); override;
@ -1106,25 +1078,25 @@ begin
inherited; inherited;
end; end;
function TDetalleReservasDataTableRules.GetIDValue: Integer; function TDetalleReservasDataTableRules.GetID_ALBValue: Integer;
begin begin
result := DataTable.Fields[idx_DetalleReservasID].AsInteger; result := DataTable.Fields[idx_DetalleReservasID_ALB].AsInteger;
end; end;
procedure TDetalleReservasDataTableRules.SetIDValue(const aValue: Integer); procedure TDetalleReservasDataTableRules.SetID_ALBValue(const aValue: Integer);
begin begin
DataTable.Fields[idx_DetalleReservasID].AsInteger := aValue; DataTable.Fields[idx_DetalleReservasID_ALB].AsInteger := aValue;
end; end;
function TDetalleReservasDataTableRules.GetIDIsNull: boolean; function TDetalleReservasDataTableRules.GetID_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasID].IsNull; result := DataTable.Fields[idx_DetalleReservasID_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetIDIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetID_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasID].AsVariant := Null; DataTable.Fields[idx_DetalleReservasID_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetID_EMPRESAValue: Integer; function TDetalleReservasDataTableRules.GetID_EMPRESAValue: Integer;
@ -1148,319 +1120,277 @@ begin
DataTable.Fields[idx_DetalleReservasID_EMPRESA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasID_EMPRESA].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetID_ALMACENValue: Integer; function TDetalleReservasDataTableRules.GetREFERENCIA_ALBValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasID_ALMACEN].AsInteger; result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetID_ALMACENValue(const aValue: Integer); procedure TDetalleReservasDataTableRules.SetREFERENCIA_ALBValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasID_ALMACEN].AsInteger := aValue; DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetID_ALMACENIsNull: boolean; function TDetalleReservasDataTableRules.GetREFERENCIA_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasID_ALMACEN].IsNull; result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetID_ALMACENIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetREFERENCIA_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasID_ALMACEN].AsVariant := Null; DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetNOMBRE_ALMACENValue: String; function TDetalleReservasDataTableRules.GetSITUACION_ALBValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].AsString; result := DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetNOMBRE_ALMACENValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetSITUACION_ALBValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].AsString := aValue; DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetNOMBRE_ALMACENIsNull: boolean; function TDetalleReservasDataTableRules.GetSITUACION_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].IsNull; result := DataTable.Fields[idx_DetalleReservasSITUACION_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetNOMBRE_ALMACENIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetSITUACION_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].AsVariant := Null; DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetFECHA_RESERVAValue: DateTime; function TDetalleReservasDataTableRules.GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime;
begin begin
result := DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].AsDateTime; result := DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsDateTime;
end; end;
procedure TDetalleReservasDataTableRules.SetFECHA_RESERVAValue(const aValue: DateTime); procedure TDetalleReservasDataTableRules.SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime);
begin begin
DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].AsDateTime := aValue; DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsDateTime := aValue;
end; end;
function TDetalleReservasDataTableRules.GetFECHA_RESERVAIsNull: boolean; function TDetalleReservasDataTableRules.GetFECHA_PREVISTA_ENVIO_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].IsNull; result := DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetFECHA_RESERVAIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetCAUSA_RESERVAValue: String; function TDetalleReservasDataTableRules.GetID_ALMACEN_ALBValue: Integer;
begin begin
result := DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].AsString; result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsInteger;
end; end;
procedure TDetalleReservasDataTableRules.SetCAUSA_RESERVAValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetID_ALMACEN_ALBValue(const aValue: Integer);
begin begin
DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].AsString := aValue; DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsInteger := aValue;
end; end;
function TDetalleReservasDataTableRules.GetCAUSA_RESERVAIsNull: boolean; function TDetalleReservasDataTableRules.GetID_ALMACEN_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].IsNull; result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetCAUSA_RESERVAIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetID_ALMACEN_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetID_ARTICULOValue: Integer; function TDetalleReservasDataTableRules.GetALMACEN_ALBValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasID_ARTICULO].AsInteger; result := DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetID_ARTICULOValue(const aValue: Integer); procedure TDetalleReservasDataTableRules.SetALMACEN_ALBValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasID_ARTICULO].AsInteger := aValue; DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetID_ARTICULOIsNull: boolean; function TDetalleReservasDataTableRules.GetALMACEN_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasID_ARTICULO].IsNull; result := DataTable.Fields[idx_DetalleReservasALMACEN_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetALMACEN_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasID_ARTICULO].AsVariant := Null; DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetREFERENCIAValue: String; function TDetalleReservasDataTableRules.GetID_CLIENTE_ALBValue: Integer;
begin begin
result := DataTable.Fields[idx_DetalleReservasREFERENCIA].AsString; result := DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsInteger;
end; end;
procedure TDetalleReservasDataTableRules.SetREFERENCIAValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetID_CLIENTE_ALBValue(const aValue: Integer);
begin begin
DataTable.Fields[idx_DetalleReservasREFERENCIA].AsString := aValue; DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsInteger := aValue;
end; end;
function TDetalleReservasDataTableRules.GetREFERENCIAIsNull: boolean; function TDetalleReservasDataTableRules.GetID_CLIENTE_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasREFERENCIA].IsNull; result := DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetID_CLIENTE_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasREFERENCIA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetDESCRIPCIONValue: String; function TDetalleReservasDataTableRules.GetCLIENTE_ALBValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasDESCRIPCION].AsString; result := DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetDESCRIPCIONValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetCLIENTE_ALBValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasDESCRIPCION].AsString := aValue; DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetDESCRIPCIONIsNull: boolean; function TDetalleReservasDataTableRules.GetCLIENTE_ALBIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasDESCRIPCION].IsNull; result := DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetCLIENTE_ALBIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasDESCRIPCION].AsVariant := Null; DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetFAMILIAValue: String; function TDetalleReservasDataTableRules.GetID_ARTValue: Integer;
begin begin
result := DataTable.Fields[idx_DetalleReservasFAMILIA].AsString; result := DataTable.Fields[idx_DetalleReservasID_ART].AsInteger;
end; end;
procedure TDetalleReservasDataTableRules.SetFAMILIAValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetID_ARTValue(const aValue: Integer);
begin begin
DataTable.Fields[idx_DetalleReservasFAMILIA].AsString := aValue; DataTable.Fields[idx_DetalleReservasID_ART].AsInteger := aValue;
end; end;
function TDetalleReservasDataTableRules.GetFAMILIAIsNull: boolean; function TDetalleReservasDataTableRules.GetID_ARTIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasFAMILIA].IsNull; result := DataTable.Fields[idx_DetalleReservasID_ART].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetFAMILIAIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetID_ARTIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasFAMILIA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasID_ART].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetUNIDAD_MEDIDAValue: String; function TDetalleReservasDataTableRules.GetFAMILIA_ARTValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].AsString; result := DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetUNIDAD_MEDIDAValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetFAMILIA_ARTValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].AsString := aValue; DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetUNIDAD_MEDIDAIsNull: boolean; function TDetalleReservasDataTableRules.GetFAMILIA_ARTIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].IsNull; result := DataTable.Fields[idx_DetalleReservasFAMILIA_ART].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetFAMILIA_ARTIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetFABRICANTEValue: String; function TDetalleReservasDataTableRules.GetREFERENCIA_ARTValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasFABRICANTE].AsString; result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetFABRICANTEValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetREFERENCIA_ARTValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasFABRICANTE].AsString := aValue; DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetFABRICANTEIsNull: boolean; function TDetalleReservasDataTableRules.GetREFERENCIA_ARTIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasFABRICANTE].IsNull; result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetFABRICANTEIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetREFERENCIA_ARTIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasFABRICANTE].AsVariant := Null; DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetREFERENCIA_FABRValue: String; function TDetalleReservasDataTableRules.GetREFERENCIA_PROV_ARTValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].AsString; result := DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetREFERENCIA_FABRValue(const aValue: String); procedure TDetalleReservasDataTableRules.SetREFERENCIA_PROV_ARTValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].AsString := aValue; DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetREFERENCIA_FABRIsNull: boolean; function TDetalleReservasDataTableRules.GetREFERENCIA_PROV_ARTIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].IsNull; result := DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetREFERENCIA_FABRIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].AsVariant := Null; DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetCANTIDADValue: Currency; function TDetalleReservasDataTableRules.GetDESCRIPCION_ARTValue: String;
begin begin
result := DataTable.Fields[idx_DetalleReservasCANTIDAD].AsCurrency; result := DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsString;
end; end;
procedure TDetalleReservasDataTableRules.SetCANTIDADValue(const aValue: Currency); procedure TDetalleReservasDataTableRules.SetDESCRIPCION_ARTValue(const aValue: String);
begin begin
DataTable.Fields[idx_DetalleReservasCANTIDAD].AsCurrency := aValue; DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsString := aValue;
end; end;
function TDetalleReservasDataTableRules.GetCANTIDADIsNull: boolean; function TDetalleReservasDataTableRules.GetDESCRIPCION_ARTIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasCANTIDAD].IsNull; result := DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetCANTIDADIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetDESCRIPCION_ARTIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasCANTIDAD].AsVariant := Null; DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsVariant := Null;
end; end;
function TDetalleReservasDataTableRules.GetID_ALMACEN_RESERVAValue: Integer; function TDetalleReservasDataTableRules.GetCANTIDAD_ARTValue: Currency;
begin begin
result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].AsInteger; result := DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsCurrency;
end; end;
procedure TDetalleReservasDataTableRules.SetID_ALMACEN_RESERVAValue(const aValue: Integer); procedure TDetalleReservasDataTableRules.SetCANTIDAD_ARTValue(const aValue: Currency);
begin begin
DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].AsInteger := aValue; DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsCurrency := aValue;
end; end;
function TDetalleReservasDataTableRules.GetID_ALMACEN_RESERVAIsNull: boolean; function TDetalleReservasDataTableRules.GetCANTIDAD_ARTIsNull: boolean;
begin begin
result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].IsNull; result := DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].IsNull;
end; end;
procedure TDetalleReservasDataTableRules.SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean); procedure TDetalleReservasDataTableRules.SetCANTIDAD_ARTIsNull(const aValue: Boolean);
begin begin
if aValue then if aValue then
DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].AsVariant := Null; DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsVariant := Null;
end;
function TDetalleReservasDataTableRules.GetNOMBRE_ALMACEN_RESERVAValue: String;
begin
result := DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN_RESERVA].AsString;
end;
procedure TDetalleReservasDataTableRules.SetNOMBRE_ALMACEN_RESERVAValue(const aValue: String);
begin
DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN_RESERVA].AsString := aValue;
end;
function TDetalleReservasDataTableRules.GetNOMBRE_ALMACEN_RESERVAIsNull: boolean;
begin
result := DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN_RESERVA].IsNull;
end;
procedure TDetalleReservasDataTableRules.SetNOMBRE_ALMACEN_RESERVAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN_RESERVA].AsVariant := Null;
end;
function TDetalleReservasDataTableRules.GetID_EMPRESA_ALMACEN_RESERVAValue: Integer;
begin
result := DataTable.Fields[idx_DetalleReservasID_EMPRESA_ALMACEN_RESERVA].AsInteger;
end;
procedure TDetalleReservasDataTableRules.SetID_EMPRESA_ALMACEN_RESERVAValue(const aValue: Integer);
begin
DataTable.Fields[idx_DetalleReservasID_EMPRESA_ALMACEN_RESERVA].AsInteger := aValue;
end;
function TDetalleReservasDataTableRules.GetID_EMPRESA_ALMACEN_RESERVAIsNull: boolean;
begin
result := DataTable.Fields[idx_DetalleReservasID_EMPRESA_ALMACEN_RESERVA].IsNull;
end;
procedure TDetalleReservasDataTableRules.SetID_EMPRESA_ALMACEN_RESERVAIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_DetalleReservasID_EMPRESA_ALMACEN_RESERVA].AsVariant := Null;
end; end;

766
Source/Modulos/Inventario/Model/schInventarioServer_Intf.pas
View File

File diff suppressed because it is too large Load Diff

121
Source/Modulos/Inventario/Servidor/srvInventario_Impl.dfm
View File

@ -255,78 +255,70 @@ object srvInventario: TsrvInventario
StatementType = stAutoSQL StatementType = stAutoSQL
ColumnMappings = < ColumnMappings = <
item item
DatasetField = 'ID' DatasetField = 'ID_ALB'
TableField = 'ID' TableField = 'ID_ALB'
end end
item item
DatasetField = 'ID_EMPRESA' DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA' TableField = 'ID_EMPRESA'
end end
item item
DatasetField = 'ID_ALMACEN' DatasetField = 'REFERENCIA_ALB'
TableField = 'ID_ALMACEN' TableField = 'REFERENCIA_ALB'
end end
item item
DatasetField = 'NOMBRE_ALMACEN' DatasetField = 'SITUACION_ALB'
TableField = 'NOMBRE_ALMACEN' TableField = 'SITUACION_ALB'
end end
item item
DatasetField = 'FECHA_RESERVA' DatasetField = 'FECHA_PREVISTA_ENVIO_ALB'
TableField = 'FECHA_RESERVA' TableField = 'FECHA_PREVISTA_ENVIO_ALB'
end end
item item
DatasetField = 'CAUSA_RESERVA' DatasetField = 'ID_ALMACEN_ALB'
TableField = 'CAUSA_RESERVA' TableField = 'ID_ALMACEN_ALB'
end end
item item
DatasetField = 'ID_ARTICULO' DatasetField = 'ALMACEN_ALB'
TableField = 'ID_ARTICULO' TableField = 'ALMACEN_ALB'
end end
item item
DatasetField = 'REFERENCIA' DatasetField = 'ID_CLIENTE_ALB'
TableField = 'REFERENCIA' TableField = 'ID_CLIENTE_ALB'
end end
item item
DatasetField = 'DESCRIPCION' DatasetField = 'CLIENTE_ALB'
TableField = 'DESCRIPCION' TableField = 'CLIENTE_ALB'
end end
item item
DatasetField = 'FAMILIA' DatasetField = 'ID_ART'
TableField = 'FAMILIA' TableField = 'ID_ART'
end end
item item
DatasetField = 'UNIDAD_MEDIDA' DatasetField = 'FAMILIA_ART'
TableField = 'UNIDAD_MEDIDA' TableField = 'FAMILIA_ART'
end end
item item
DatasetField = 'FABRICANTE' DatasetField = 'REFERENCIA_ART'
TableField = 'FABRICANTE' TableField = 'REFERENCIA_ART'
end end
item item
DatasetField = 'REFERENCIA_FABR' DatasetField = 'REFERENCIA_PROV_ART'
TableField = 'REFERENCIA_FABR' TableField = 'REFERENCIA_PROV_ART'
end end
item item
DatasetField = 'CANTIDAD' DatasetField = 'DESCRIPCION_ART'
TableField = 'CANTIDAD' TableField = 'DESCRIPCION_ART'
end end
item item
DatasetField = 'ID_ALMACEN_RESERVA' DatasetField = 'CANTIDAD_ART'
TableField = 'ID_ALMACEN_RESERVA' TableField = 'CANTIDAD_ART'
end
item
DatasetField = 'NOMBRE_ALMACEN_RESERVA'
TableField = 'NOMBRE_ALMACEN_RESERVA'
end
item
DatasetField = 'ID_EMPRESA_ALMACEN_RESERVA'
TableField = 'ID_EMPRESA_ALMACEN_RESERVA'
end> end>
end> end>
Name = 'DetalleReservas' Name = 'DetalleReservas'
Fields = < Fields = <
item item
Name = 'ID' Name = 'ID_ALB'
DataType = datInteger DataType = datInteger
end end
item item
@ -334,73 +326,64 @@ object srvInventario: TsrvInventario
DataType = datInteger DataType = datInteger
end end
item item
Name = 'ID_ALMACEN' Name = 'REFERENCIA_ALB'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'FECHA_RESERVA' Name = 'SITUACION_ALB'
DataType = datString
Size = 9
end
item
Name = 'FECHA_PREVISTA_ENVIO_ALB'
DataType = datDateTime DataType = datDateTime
end end
item item
Name = 'CAUSA_RESERVA' Name = 'ID_ALMACEN_ALB'
DataType = datString
Size = 2000
end
item
Name = 'ID_ARTICULO'
DataType = datInteger DataType = datInteger
end end
item item
Name = 'REFERENCIA' Name = 'ALMACEN_ALB'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'DESCRIPCION' Name = 'ID_CLIENTE_ALB'
DataType = datInteger
end
item
Name = 'CLIENTE_ALB'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'FAMILIA' Name = 'ID_ART'
DataType = datInteger
end
item
Name = 'FAMILIA_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'UNIDAD_MEDIDA' Name = 'REFERENCIA_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'FABRICANTE' Name = 'REFERENCIA_PROV_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'REFERENCIA_FABR' Name = 'DESCRIPCION_ART'
DataType = datString DataType = datString
Size = 255 Size = 255
end end
item item
Name = 'CANTIDAD' Name = 'CANTIDAD_ART'
DataType = datCurrency DataType = datCurrency
end
item
Name = 'ID_ALMACEN_RESERVA'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN_RESERVA'
DataType = datString
Size = 255
end
item
Name = 'ID_EMPRESA_ALMACEN_RESERVA'
DataType = datInteger
end> end>
end> end>
JoinDataTables = <> JoinDataTables = <>

7
Source/Modulos/Inventario/Views/uEditorDetalleReservas.dfm
View File

@ -42,7 +42,7 @@ inherited fEditorDetalleReservas: TfEditorDetalleReservas
Width = 669 Width = 669
ExplicitWidth = 669 ExplicitWidth = 669
inherited tbxMain: TTBXToolbar inherited tbxMain: TTBXToolbar
ExplicitWidth = 501 ExplicitWidth = 358
object TBXSeparatorItem84: TTBXSeparatorItem [6] object TBXSeparatorItem84: TTBXSeparatorItem [6]
end end
object TBXItem54: TTBXItem [7] object TBXItem54: TTBXItem [7]
@ -88,7 +88,6 @@ inherited fEditorDetalleReservas: TfEditorDetalleReservas
DockPos = 264 DockPos = 264
Visible = True Visible = True
ExplicitLeft = 269 ExplicitLeft = 269
ExplicitWidth = 209
object TBXItem39: TTBXItem object TBXItem39: TTBXItem
Action = actTrasladarReservados Action = actTrasladarReservados
end end
@ -277,11 +276,15 @@ inherited fEditorDetalleReservas: TfEditorDetalleReservas
object actCancelarReserva: TAction object actCancelarReserva: TAction
Category = 'Reservas' Category = 'Reservas'
Caption = 'Cancelar reserva' Caption = 'Cancelar reserva'
Enabled = False
Visible = False
OnExecute = actCancelarReservaExecute OnExecute = actCancelarReservaExecute
end end
object actTrasladarReservados: TAction object actTrasladarReservados: TAction
Category = 'Reservas' Category = 'Reservas'
Caption = 'Trasladar al destino' Caption = 'Trasladar al destino'
Enabled = False
Visible = False
OnExecute = actTrasladarReservadosExecute OnExecute = actTrasladarReservadosExecute
end end
end end

4
Source/Modulos/Inventario/Views/uEditorInventario.dfm
View File

@ -83,7 +83,7 @@ inherited fEditorInventario: TfEditorInventario
Width = 669 Width = 669
ExplicitWidth = 669 ExplicitWidth = 669
inherited tbxMain: TTBXToolbar inherited tbxMain: TTBXToolbar
ExplicitWidth = 669 ExplicitWidth = 668
object TBXSeparatorItem84: TTBXSeparatorItem [6] object TBXSeparatorItem84: TTBXSeparatorItem [6]
end end
object TBXItem54: TTBXItem [7] object TBXItem54: TTBXItem [7]
@ -340,7 +340,9 @@ inherited fEditorInventario: TfEditorInventario
object actReservar: TAction object actReservar: TAction
Category = 'Logistica' Category = 'Logistica'
Caption = 'Reservar' Caption = 'Reservar'
Enabled = False
ImageIndex = 25 ImageIndex = 25
Visible = False
OnExecute = actReservarExecute OnExecute = actReservarExecute
OnUpdate = actReservarUpdate OnUpdate = actReservarUpdate
end end

95
Source/Modulos/Inventario/Views/uViewDetalleReservas.dfm
View File

@ -45,7 +45,7 @@ inherited frViewDetalleReservas: TfrViewDetalleReservas
item item
Format = '0 Reservados' Format = '0 Reservados'
Kind = skSum Kind = skSum
Column = cxGridViewCANTIDAD Column = cxGridViewCANTIDAD_ART
end> end>
OptionsCustomize.ColumnHidingOnGrouping = False OptionsCustomize.ColumnHidingOnGrouping = False
OptionsCustomize.GroupBySorting = True OptionsCustomize.GroupBySorting = True
@ -54,72 +54,58 @@ inherited frViewDetalleReservas: TfrViewDetalleReservas
Visible = False Visible = False
VisibleForCustomization = False VisibleForCustomization = False
end end
object cxGridViewFECHA_RESERVA: TcxGridDBColumn object cxGridViewREFERENCIA_ALB: TcxGridDBColumn
Caption = 'Fecha de reserva' Caption = 'Ref. Albar'#225'n'
DataBinding.FieldName = 'FECHA_RESERVA' DataBinding.FieldName = 'REFERENCIA_ALB'
end
object cxGridViewCAUSA_RESERVA: TcxGridDBColumn
Caption = 'Causa'
DataBinding.FieldName = 'CAUSA_RESERVA'
end
object cxGridViewID_ALMACEN: TcxGridDBColumn
DataBinding.FieldName = 'ID_ALMACEN'
Visible = False
VisibleForCustomization = False
end
object cxGridViewALMACEN: TcxGridDBColumn
Caption = 'Almac'#233'n'
DataBinding.FieldName = 'NOMBRE_ALMACEN'
end
object cxGridViewID_ARTICULO: TcxGridDBColumn
DataBinding.FieldName = 'ID_ARTICULO'
Visible = False
VisibleForCustomization = False
end
object cxGridViewREFERENCIA: TcxGridDBColumn
Caption = 'Referencia'
DataBinding.FieldName = 'REFERENCIA'
SortIndex = 0 SortIndex = 0
SortOrder = soAscending SortOrder = soAscending
end end
object cxGridViewDESCRIPCION: TcxGridDBColumn object cxGridViewSITUACION_ALB: TcxGridDBColumn
Caption = 'Descripci'#243'n' Caption = 'Situaci'#243'n'
DataBinding.FieldName = 'DESCRIPCION' DataBinding.FieldName = 'SITUACION_ALB'
end end
object cxGridViewFAMILIA: TcxGridDBColumn object cxGridViewFECHA_PREVISTA_ENVIO_ALB: TcxGridDBColumn
Caption = 'Familia' Caption = 'Fecha prevista de env'#237'o'
DataBinding.FieldName = 'FAMILIA' DataBinding.FieldName = 'FECHA_PREVISTA_ENVIO_ALB'
end end
object cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn object cxGridViewID_ALMACEN_ALB: TcxGridDBColumn
Caption = 'Unidad de medida' DataBinding.FieldName = 'ID_ALMACEN_ALB'
DataBinding.FieldName = 'UNIDAD_MEDIDA'
Visible = False Visible = False
VisibleForCustomization = False VisibleForCustomization = False
end end
object cxGridViewFABRICANTE: TcxGridDBColumn object cxGridViewALMACEN_ALB: TcxGridDBColumn
Caption = 'Fabricante' Caption = 'Almac'#233'n'
DataBinding.FieldName = 'FABRICANTE' DataBinding.FieldName = 'ALMACEN_ALB'
end end
object cxGridViewREFERENCIA_FABR: TcxGridDBColumn object cxGridViewCLIENTE_ALB: TcxGridDBColumn
Caption = 'Ref. fabricante' Caption = 'Cliente'
DataBinding.FieldName = 'REFERENCIA_FABR' DataBinding.FieldName = 'CLIENTE_ALB'
Visible = False
VisibleForCustomization = False
end end
object cxGridViewCANTIDAD: TcxGridDBColumn object cxGridViewFAMILIA_ART: TcxGridDBColumn
Caption = 'Familia'
DataBinding.FieldName = 'FAMILIA_ART'
end
object cxGridViewREFERENCIA_ART: TcxGridDBColumn
Caption = 'Referencia'
DataBinding.FieldName = 'REFERENCIA_ART'
end
object cxGridViewREFERENCIA_PROV_ART: TcxGridDBColumn
Caption = 'Ref. proveedor'
DataBinding.FieldName = 'REFERENCIA_PROV_ART'
end
object cxGridViewDESCRIPCION_ART: TcxGridDBColumn
Caption = 'Descripci'#243'n'
DataBinding.FieldName = 'DESCRIPCION_ART'
end
object cxGridViewCANTIDAD_ART: TcxGridDBColumn
Caption = 'Reservado' Caption = 'Reservado'
DataBinding.FieldName = 'CANTIDAD' DataBinding.FieldName = 'CANTIDAD_ART'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxSpinEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
end end
object cxGridViewID_ALMACEN_RESERVA: TcxGridDBColumn
DataBinding.FieldName = 'ID_ALMACEN_RESERVA'
Visible = False
VisibleForCustomization = False
end
object cxGridViewALMACEN_RESERVA: TcxGridDBColumn
Caption = 'Resevado para'
DataBinding.FieldName = 'NOMBRE_ALMACEN_RESERVA'
end
end end
object cxGridDBTableView1: TcxGridDBTableView [1] object cxGridDBTableView1: TcxGridDBTableView [1]
NavigatorButtons.ConfirmDelete = False NavigatorButtons.ConfirmDelete = False
@ -168,10 +154,15 @@ inherited frViewDetalleReservas: TfrViewDetalleReservas
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 383 ExplicitLeft = 383
ExplicitWidth = 215
Width = 215
end end
end end
end end
end end
inherited pnlAgrupaciones: TTBXDockablePanel
ExplicitWidth = 607
end
object pnlAlmacenes: TPanel [3] object pnlAlmacenes: TPanel [3]
Left = 0 Left = 0
Top = 102 Top = 102

33
Source/Modulos/Inventario/Views/uViewDetalleReservas.pas
View File

@ -15,7 +15,7 @@ uses
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid, cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX, uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,
TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, cxCurrencyEdit, uAlmacenesController, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, cxCurrencyEdit, uAlmacenesController,
uDAInterfaces, cxContainer, cxMaskEdit, cxDropDownEdit; uDAInterfaces, cxContainer, cxMaskEdit, cxDropDownEdit, uCustomView, uViewBase;
type type
IViewDetalleReservas = interface(IViewGrid) IViewDetalleReservas = interface(IViewGrid)
@ -41,20 +41,17 @@ type
PngImageList: TPngImageList; PngImageList: TPngImageList;
cxStyleArticuloSinStock: TcxStyle; cxStyleArticuloSinStock: TcxStyle;
cxGridViewRecID: TcxGridDBColumn; cxGridViewRecID: TcxGridDBColumn;
cxGridViewFECHA_RESERVA: TcxGridDBColumn; cxGridViewFECHA_PREVISTA_ENVIO_ALB: TcxGridDBColumn;
cxGridViewCAUSA_RESERVA: TcxGridDBColumn; cxGridViewSITUACION_ALB: TcxGridDBColumn;
cxGridViewID_ALMACEN: TcxGridDBColumn; cxGridViewID_ALMACEN_ALB: TcxGridDBColumn;
cxGridViewALMACEN: TcxGridDBColumn; cxGridViewALMACEN_ALB: TcxGridDBColumn;
cxGridViewID_ARTICULO: TcxGridDBColumn; cxGridViewFAMILIA_ART: TcxGridDBColumn;
cxGridViewFAMILIA: TcxGridDBColumn; cxGridViewREFERENCIA_ALB: TcxGridDBColumn;
cxGridViewREFERENCIA: TcxGridDBColumn; cxGridViewDESCRIPCION_ART: TcxGridDBColumn;
cxGridViewDESCRIPCION: TcxGridDBColumn; cxGridViewCANTIDAD_ART: TcxGridDBColumn;
cxGridViewCANTIDAD: TcxGridDBColumn; cxGridViewCLIENTE_ALB: TcxGridDBColumn;
cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn; cxGridViewREFERENCIA_PROV_ART: TcxGridDBColumn;
cxGridViewFABRICANTE: TcxGridDBColumn; cxGridViewREFERENCIA_ART: TcxGridDBColumn;
cxGridViewREFERENCIA_FABR: TcxGridDBColumn;
cxGridViewID_ALMACEN_RESERVA: TcxGridDBColumn;
cxGridViewALMACEN_RESERVA: TcxGridDBColumn;
pnlAlmacenes: TPanel; pnlAlmacenes: TPanel;
eAlmacen: TLabel; eAlmacen: TLabel;
cxListaAlmacenesObras: TcxComboBox; cxListaAlmacenesObras: TcxComboBox;
@ -119,11 +116,11 @@ begin
if not VarIsNull(CodigoAlmacen) then if not VarIsNull(CodigoAlmacen) then
begin begin
FFiltro.AddItem(cxGridViewID_ALMACEN, foEqual, CodigoAlmacen, CodigoAlmacen); FFiltro.AddItem(cxGridViewID_ALMACEN_ALB, foEqual, CodigoAlmacen, CodigoAlmacen);
cxGridViewALMACEN.Visible := False; cxGridViewALMACEN_ALB.Visible := False;
end end
else else
cxGridViewALMACEN.Visible := True; cxGridViewALMACEN_ALB.Visible := True;
end; end;
procedure TfrViewDetalleReservas.AnadirOtrosFiltros; procedure TfrViewDetalleReservas.AnadirOtrosFiltros;

6
Source/Servidor/FactuGES_Server.dpr
View File

@ -131,8 +131,6 @@ uses
uRptRemesasProveedor_Server in '..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas' {RptRemesasProveedor: TDataModule}, uRptRemesasProveedor_Server in '..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas' {RptRemesasProveedor: TDataModule},
schPedidosProveedorClient_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas', schPedidosProveedorClient_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas',
schPedidosProveedorServer_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas', schPedidosProveedorServer_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas',
schInventarioClient_Intf in '..\Modulos\Inventario\Model\schInventarioClient_Intf.pas',
schInventarioServer_Intf in '..\Modulos\Inventario\Model\schInventarioServer_Intf.pas',
schFacturasClienteClient_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas', schFacturasClienteClient_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas',
schFacturasClienteServer_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas', schFacturasClienteServer_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas',
srvImpresiones_Impl in '..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas' {srvImpresiones: TDARemoteService}, srvImpresiones_Impl in '..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas' {srvImpresiones: TDARemoteService},
@ -167,7 +165,9 @@ uses
schInformesClient_Intf in '..\Modulos\Informes base\Model\schInformesClient_Intf.pas', schInformesClient_Intf in '..\Modulos\Informes base\Model\schInformesClient_Intf.pas',
schInformesServer_Intf in '..\Modulos\Informes base\Model\schInformesServer_Intf.pas', schInformesServer_Intf in '..\Modulos\Informes base\Model\schInformesServer_Intf.pas',
srvInfVentasArticulo_Impl in '..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas' {srvInfVentasArticulo: TDataAbstractService}, srvInfVentasArticulo_Impl in '..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas' {srvInfVentasArticulo: TDataAbstractService},
srvInfMargenArticulo_Impl in '..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas' {srvInfMargenArticulo: TDARemoteService}; srvInfMargenArticulo_Impl in '..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas' {srvInfMargenArticulo: TDARemoteService},
schInventarioClient_Intf in '..\Modulos\Inventario\Model\schInventarioClient_Intf.pas',
schInventarioServer_Intf in '..\Modulos\Inventario\Model\schInventarioServer_Intf.pas';
{$R *.res} {$R *.res}
{$R ..\Servicios\RODLFile.res} {$R ..\Servicios\RODLFile.res}

802
Source/Servidor/FactuGES_Server.dproj
View File

@ -1,405 +1,405 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup> <PropertyGroup>
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid> <ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
<MainSource>FactuGES_Server.dpr</MainSource> <MainSource>FactuGES_Server.dpr</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform> <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler> <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName> <DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
<DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage> <DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<Version>7.0</Version> <Version>7.0</Version>
<DCC_DebugInformation>False</DCC_DebugInformation> <DCC_DebugInformation>False</DCC_DebugInformation>
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols> <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_MapFile>3</DCC_MapFile> <DCC_MapFile>3</DCC_MapFile>
<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput> <DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
<DCC_Define>RELEASE</DCC_Define> <DCC_Define>RELEASE</DCC_Define>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<Version>7.0</Version> <Version>7.0</Version>
<DCC_MapFile>3</DCC_MapFile> <DCC_MapFile>3</DCC_MapFile>
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput> <DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
<DCC_Define>DEBUG;</DCC_Define> <DCC_Define>DEBUG;</DCC_Define>
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames> <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe> <DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
<DCC_DebugVN>True</DCC_DebugVN> <DCC_DebugVN>True</DCC_DebugVN>
<DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath> <DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath>
<DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath> <DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath>
<DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath> <DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath>
<DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath> <DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
</PropertyGroup> </PropertyGroup>
<ProjectExtensions> <ProjectExtensions>
<Borland.Personality>Delphi.Personality</Borland.Personality> <Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType/> <Borland.ProjectType />
<BorlandProject> <BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">4</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">4.1.4.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">4.1.4.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 01 de marzo de 2011 18:10</VersionInfoKeys></VersionInfoKeys><Excluded_Packages> <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">4</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">4.1.4.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">4.1.4.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 01 de marzo de 2011 18:10</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages> <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject> </Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
</ProjectExtensions> </ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/> <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<ItemGroup> <ItemGroup>
<DelphiCompile Include="FactuGES_Server.dpr"> <DelphiCompile Include="FactuGES_Server.dpr">
<MainSource>MainSource</MainSource> <MainSource>MainSource</MainSource>
</DelphiCompile> </DelphiCompile>
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/> <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/> <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas"/> <DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas" />
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas"> <DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
<Form>srvEmpresas</Form> <Form>srvEmpresas</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas"> <DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
<Form>srvProvinciasPoblaciones_Impl</Form> <Form>srvProvinciasPoblaciones_Impl</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/> <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/> <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas"> <DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
<Form>srvUsuarios</Form> <Form>srvUsuarios</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Base\schBase_Intf.pas"/> <DCCReference Include="..\Base\schBase_Intf.pas" />
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/> <DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" />
<DCCReference Include="..\Base\Utiles\uStringsUtils.pas"/> <DCCReference Include="..\Base\Utiles\uStringsUtils.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
<Form>RptAlbaranesCliente</Form> <Form>RptAlbaranesCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
<Form>RptWordAlbaranCliente</Form> <Form>RptWordAlbaranCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
<Form>srvAlbaranesCliente</Form> <Form>srvAlbaranesCliente</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" />
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
<Form>RptAlbaranesProveedor</Form> <Form>RptAlbaranesProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
<Form>RptWordAlbaranProveedor</Form> <Form>RptWordAlbaranProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
<Form>srvAlbaranesProveedor</Form> <Form>srvAlbaranesProveedor</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/> <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas"> <DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
<Form>srvAlmacenes</Form> <Form>srvAlmacenes</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/> <DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/> <DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas"/> <DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas" />
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas"> <DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
<Form>srvArticulos</Form> <Form>srvArticulos</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas"/> <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas" />
<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas"/> <DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas" />
<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas"> <DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
<Form>RptComisiones</Form> <Form>RptComisiones</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas"> <DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
<Form>srvComisiones</Form> <Form>srvComisiones</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas"> <DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
<Form>RptEtiquetasContacto</Form> <Form>RptEtiquetasContacto</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas"> <DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
<Form>RptFichasEmpleado</Form> <Form>RptFichasEmpleado</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas"> <DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
<Form>srvContactos</Form> <Form>srvContactos</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas"/> <DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas" />
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas"> <DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
<Form>srvFabricantes</Form> <Form>srvFabricantes</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/> <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/> <DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" />
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
<Form>RptFacturasCliente</Form> <Form>RptFacturasCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
<Form>RptWordFacturaCliente</Form> <Form>RptWordFacturaCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
<Form>srvFacturasCliente</Form> <Form>srvFacturasCliente</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" />
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas"> <DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
<Form>RptFacturasProveedor</Form> <Form>RptFacturasProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
<Form>srvFacturasProveedor</Form> <Form>srvFacturasProveedor</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/> <DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/> <DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas"> <DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
<Form>srvFamilias</Form> <Form>srvFamilias</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/> <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" />
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/> <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" />
<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas"> <DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas">
<Form>srvFormasPago</Form> <Form>srvFormasPago</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas"> <DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
<Form>srvGestorDocumentos</Form> <Form>srvGestorDocumentos</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas"> <DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
<Form>srvGestorInformes</Form> <Form>srvGestorInformes</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/> <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" />
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/> <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" />
<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas"> <DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
<Form>srvHistoricoMovimientos</Form> <Form>srvHistoricoMovimientos</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas"/> <DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas" />
<DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas"> <DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas">
<Form>srvImpresiones</Form> <Form>srvImpresiones</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas"> <DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas">
<Form>srvInfMargenArticulo</Form> <Form>srvInfMargenArticulo</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas"> <DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
<Form>srvInfVentasArticulo</Form> <Form>srvInfVentasArticulo</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas"/> <DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas" />
<DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas"> <DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas">
<Form>srvInformes</Form> <Form>srvInformes</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/> <DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/> <DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas"> <DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
<Form>srvInventario</Form> <Form>srvInventario</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas"/> <DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas" />
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas"/> <DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas" />
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas"/> <DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas" />
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas"> <DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
<Form>srvObras</Form> <Form>srvObras</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
<Form>RptPedidosProveedor</Form> <Form>RptPedidosProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
<Form>RptWordPedidoProveedor</Form> <Form>RptWordPedidoProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
<Form>srvPedidosProveedor</Form> <Form>srvPedidosProveedor</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas"/> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\uBizPedidosClienteServer.pas"/> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\uBizPedidosClienteServer.pas" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas"> <DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas">
<Form>RptPedidosCliente</Form> <Form>RptPedidosCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas"> <DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas">
<Form>srvPedidosCliente</Form> <Form>srvPedidosCliente</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" />
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
<Form>RptPresupuestosCliente</Form> <Form>RptPresupuestosCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
<Form>RptWordCertificadoTrabajo</Form> <Form>RptWordCertificadoTrabajo</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
<Form>RptWordPresupuestoCliente</Form> <Form>RptWordPresupuestoCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
<Form>srvPresupuestosCliente</Form> <Form>srvPresupuestosCliente</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/> <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas"> <DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
<Form>RptRecibosCliente</Form> <Form>RptRecibosCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas"> <DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
<Form>srvRecibosCliente</Form> <Form>srvRecibosCliente</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/> <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas"> <DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
<Form>RptRecibosProveedor</Form> <Form>RptRecibosProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
<Form>srvRecibosProveedor</Form> <Form>srvRecibosProveedor</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/> <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" />
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/> <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" />
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas"> <DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
<Form>srvReferencias</Form> <Form>srvReferencias</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas"> <DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas">
<Form>srvRegistroCorreos</Form> <Form>srvRegistroCorreos</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/> <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/> <DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" />
<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas"> <DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
<Form>RptRemesasCliente</Form> <Form>RptRemesasCliente</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas"> <DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
<Form>srvRemesasCliente</Form> <Form>srvRemesasCliente</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" />
<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas"> <DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
<Form>RptRemesasProveedor</Form> <Form>RptRemesasProveedor</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
<Form>srvRemesasProveedor</Form> <Form>srvRemesasProveedor</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscAddressBookServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscAddressBookServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscCustomerServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscCustomerServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas"> <DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas">
<Form>srvTiendaWeb</Form> <Form>srvTiendaWeb</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/> <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" />
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/> <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" />
<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas"> <DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas">
<Form>srvTiposIVA</Form> <Form>srvTiposIVA</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/> <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" />
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/> <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" />
<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas"> <DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
<Form>srvUnidadesMedida</Form> <Form>srvUnidadesMedida</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/> <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/> <DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas"> <DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
<Form>srvConfiguracion</Form> <Form>srvConfiguracion</Form>
<DesignClass>TDataAbstractService</DesignClass> <DesignClass>TDataAbstractService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConexionBD.pas"> <DCCReference Include="Configuracion\uConexionBD.pas">
<Form>frConexionBD</Form> <Form>frConexionBD</Form>
<DesignClass>TFrame</DesignClass> <DesignClass>TFrame</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConexionOSC.pas"> <DCCReference Include="Configuracion\uConexionOSC.pas">
<Form>frConexionOSC</Form> <Form>frConexionOSC</Form>
<DesignClass>TFrame</DesignClass> <DesignClass>TFrame</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConfGeneral.pas"> <DCCReference Include="Configuracion\uConfGeneral.pas">
<Form>frConfGeneral</Form> <Form>frConfGeneral</Form>
<DesignClass>TFrame</DesignClass> <DesignClass>TFrame</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConfiguracion.pas"> <DCCReference Include="Configuracion\uConfiguracion.pas">
<Form>fConfiguracion</Form> <Form>fConfiguracion</Form>
<DesignClass>TForm</DesignClass> <DesignClass>TForm</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uFrameConfiguracion.pas"> <DCCReference Include="Configuracion\uFrameConfiguracion.pas">
<Form>FrameConfiguracion</Form> <Form>FrameConfiguracion</Form>
<DesignClass>TFrame</DesignClass> <DesignClass>TFrame</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="srvLogin_Impl.pas"> <DCCReference Include="srvLogin_Impl.pas">
<Form>srvLogin</Form> <Form>srvLogin</Form>
<DesignClass>TDARemoteService</DesignClass> <DesignClass>TDARemoteService</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="uAcercaDe.pas"> <DCCReference Include="uAcercaDe.pas">
<Form>fAcercaDe</Form> <Form>fAcercaDe</Form>
</DCCReference> </DCCReference>
<DCCReference Include="uDataModuleServer.pas"> <DCCReference Include="uDataModuleServer.pas">
<Form>dmServer</Form> <Form>dmServer</Form>
<DesignClass>TDataModule</DesignClass> <DesignClass>TDataModule</DesignClass>
</DCCReference> </DCCReference>
<DCCReference Include="uServerMainForm.pas"> <DCCReference Include="uServerMainForm.pas">
<Form>fServerForm</Form> <Form>fServerForm</Form>
</DCCReference> </DCCReference>
<DCCReference Include="Utiles\AHWord97.pas"/> <DCCReference Include="Utiles\AHWord97.pas" />
<DCCReference Include="Utiles\MidasSpeedFix.pas"/> <DCCReference Include="Utiles\MidasSpeedFix.pas" />
<DCCReference Include="Utiles\uBusinessUtils.pas"/> <DCCReference Include="Utiles\uBusinessUtils.pas" />
<DCCReference Include="Utiles\uDatabaseUtils.pas"/> <DCCReference Include="Utiles\uDatabaseUtils.pas" />
<DCCReference Include="Utiles\uReferenciasUtils.pas"/> <DCCReference Include="Utiles\uReferenciasUtils.pas" />
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/> <DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/> <DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
<DCCReference Include="Utiles\uServerAppUtils.pas"/> <DCCReference Include="Utiles\uServerAppUtils.pas" />
<DCCReference Include="Utiles\uSesionesUtils.pas"/> <DCCReference Include="Utiles\uSesionesUtils.pas" />
<DCCReference Include="Utiles\uTiendaWebUtils.pas"/> <DCCReference Include="Utiles\uTiendaWebUtils.pas" />
</ItemGroup> </ItemGroup>
</Project> </Project>
<!-- EurekaLog First Line <!-- EurekaLog First Line
[Exception Log] [Exception Log]