diff --git a/Database/scripts/factuges.sql b/Database/scripts/factuges.sql index bb7d2f8..d569e16 100644 --- a/Database/scripts/factuges.sql +++ b/Database/scripts/factuges.sql @@ -2578,38 +2578,79 @@ AND (ARTICULOS.INVENTARIABLE = 1) /* View: V_INV_DETALLE_RESERVAS */ CREATE VIEW V_INV_DETALLE_RESERVAS( - ID, + ID_ALB, ID_EMPRESA, - ID_ALMACEN, - NOMBRE_ALMACEN, - FECHA_RESERVA, - CAUSA_RESERVA, - ID_ARTICULO, - REFERENCIA, - DESCRIPCION, - FAMILIA, - UNIDAD_MEDIDA, - FABRICANTE, - REFERENCIA_FABR, - CANTIDAD, - ID_ALMACEN_RESERVA, - NOMBRE_ALMACEN_RESERVA, - ID_EMPRESA_ALMACEN_RESERVA) + REFERENCIA_ALB, + SITUACION_ALB, + FECHA_PREVISTA_ENVIO_ALB, + ID_ALMACEN_ALB, + ALMACEN_ALB, + ID_CLIENTE_ALB, + CLIENTE_ALB, + ID_ART, + FAMILIA_ART, + REFERENCIA_ART, + REFERENCIA_PROV_ART, + DESCRIPCION_ART, + CANTIDAD_ART) AS -select movimientos.id, almacenes1.ID_EMPRESA, movimientos.ID_ALMACEN, almacenes1.nombre as nombre_almacen, -movimientos.fecha_movimiento as fecha_reserva, movimientos.causa, movimientos.id_articulo, -articulos.referencia, articulos.descripcion, articulos.familia, -articulos.unidad_medida, articulos.fabricante, articulos.referencia_fabr, -movimientos.cantidad, movimientos.id_almacen_reserva, -almacenes2.nombre as nombre_almacen_reserva, almacenes2.id_empresa -from movimientos -left join almacenes almacenes1 on (almacenes1.ID = movimientos.ID_ALMACEN) -left join almacenes almacenes2 on (almacenes2.ID = movimientos.ID_ALMACEN_RESERVA) -left join articulos on (articulos.id = movimientos.id_articulo) -where tipo = 'R' -; -; +SELECT + 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 AS ALMACEN, + ALBARANES_CLIENTE.ID_CLIENTE, + CONTACTOS.NOMBRE AS CLIENTE, + 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 */ diff --git a/Source/Modulos/Inventario/Controller/uInventarioController.pas b/Source/Modulos/Inventario/Controller/uInventarioController.pas index faf5f2e..ef28d12 100644 --- a/Source/Modulos/Inventario/Controller/uInventarioController.pas +++ b/Source/Modulos/Inventario/Controller/uInventarioController.pas @@ -209,7 +209,7 @@ function TInventarioController.BuscarDetalleReservas: IBizDetalleReservas; begin Result := FDataModule.GetDetalleReservas; //Se filtra para que solo salgan las reservas a obras o almacenes de la empresa activa - FiltrarEmpresa(Result); +// FiltrarEmpresa(Result); end; function TInventarioController.BuscarTodos: IBizInventario; @@ -467,7 +467,9 @@ begin with ADetalleReservas.DataTable.DynamicWhere do begin // (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 Expression := Condicion @@ -929,6 +931,7 @@ procedure TInventarioController.TrasladarReservas(AReservas: IBizDetalleReservas var AArticulo: IBizInventario; begin +{TECSITEL ShowHourglassCursor; try with AReservas.DataTable do @@ -963,6 +966,7 @@ begin finally HideHourglassCursor; end; +} end; { diff --git a/Source/Modulos/Inventario/Data/uDataModuleInventario.dfm b/Source/Modulos/Inventario/Data/uDataModuleInventario.dfm index 656f2d4..3ff633a 100644 --- a/Source/Modulos/Inventario/Data/uDataModuleInventario.dfm +++ b/Source/Modulos/Inventario/Data/uDataModuleInventario.dfm @@ -27,7 +27,7 @@ inherited DataModuleInventario: TDataModuleInventario RemoteUpdatesOptions = [] Fields = < item - Name = 'ID' + Name = 'ID_ALB' DataType = datInteger end item @@ -35,73 +35,64 @@ inherited DataModuleInventario: TDataModuleInventario DataType = datInteger end item - Name = 'ID_ALMACEN' - DataType = datInteger - end - item - Name = 'NOMBRE_ALMACEN' + Name = 'REFERENCIA_ALB' DataType = datString Size = 255 end item - Name = 'FECHA_RESERVA' + Name = 'SITUACION_ALB' + DataType = datString + Size = 9 + end + item + Name = 'FECHA_PREVISTA_ENVIO_ALB' DataType = datDateTime end item - Name = 'CAUSA_RESERVA' - DataType = datString - Size = 2000 - end - item - Name = 'ID_ARTICULO' + Name = 'ID_ALMACEN_ALB' DataType = datInteger end item - Name = 'REFERENCIA' + Name = 'ALMACEN_ALB' DataType = datString Size = 255 end item - Name = 'DESCRIPCION' + Name = 'ID_CLIENTE_ALB' + DataType = datInteger + end + item + Name = 'CLIENTE_ALB' DataType = datString Size = 255 end item - Name = 'FAMILIA' + Name = 'ID_ART' + DataType = datInteger + end + item + Name = 'FAMILIA_ART' DataType = datString Size = 255 end item - Name = 'UNIDAD_MEDIDA' + Name = 'REFERENCIA_ART' DataType = datString Size = 255 end item - Name = 'FABRICANTE' + Name = 'REFERENCIA_PROV_ART' DataType = datString Size = 255 end item - Name = 'REFERENCIA_FABR' + Name = 'DESCRIPCION_ART' DataType = datString Size = 255 end item - Name = 'CANTIDAD' + Name = 'CANTIDAD_ART' 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> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] diff --git a/Source/Modulos/Inventario/Data/uDataModuleInventario.pas b/Source/Modulos/Inventario/Data/uDataModuleInventario.pas index ee72bc0..386b33a 100644 --- a/Source/Modulos/Inventario/Data/uDataModuleInventario.pas +++ b/Source/Modulos/Inventario/Data/uDataModuleInventario.pas @@ -68,7 +68,7 @@ begin AddOperator(opAND); OpenBraket; - AddText(fld_DetalleReservasID + ' = ' + IntToStr(ID_NULO)); + AddText(fld_DetalleReservasID_ALB + ' = ' + IntToStr(ID_NULO)); CloseBraket; end; finally diff --git a/Source/Modulos/Inventario/Model/schInventarioClient_Intf.pas b/Source/Modulos/Inventario/Model/schInventarioClient_Intf.pas index d460eb7..02ac305 100644 --- a/Source/Modulos/Inventario/Model/schInventarioClient_Intf.pas +++ b/Source/Modulos/Inventario/Model/schInventarioClient_Intf.pas @@ -3,14 +3,14 @@ unit schInventarioClient_Intf; interface uses - Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf; + Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf; const { Data table rules ids Feel free to change them to something more human readable but make sure they are unique in the context of your application } - RID_Inventario = '{D04FC2C5-D75A-471F-A38D-F2609EE8EDB5}'; - RID_DetalleReservas = '{BFC29192-74A7-46CC-BB5D-75D9B57EB4DA}'; + RID_Inventario = '{C3A0BEC9-DB5D-4AE7-818E-B1590D3259A2}'; + RID_DetalleReservas = '{CEF5FA1F-C51A-4735-A74D-C1716B339D0A}'; { Data table names } nme_Inventario = 'Inventario'; @@ -65,47 +65,43 @@ const idx_InventarioID_ALMACEN_RESERVA = 21; { DetalleReservas fields } - fld_DetalleReservasID = 'ID'; + fld_DetalleReservasID_ALB = 'ID_ALB'; fld_DetalleReservasID_EMPRESA = 'ID_EMPRESA'; - fld_DetalleReservasID_ALMACEN = 'ID_ALMACEN'; - fld_DetalleReservasNOMBRE_ALMACEN = 'NOMBRE_ALMACEN'; - fld_DetalleReservasFECHA_RESERVA = 'FECHA_RESERVA'; - fld_DetalleReservasCAUSA_RESERVA = 'CAUSA_RESERVA'; - fld_DetalleReservasID_ARTICULO = 'ID_ARTICULO'; - fld_DetalleReservasREFERENCIA = 'REFERENCIA'; - fld_DetalleReservasDESCRIPCION = 'DESCRIPCION'; - fld_DetalleReservasFAMILIA = 'FAMILIA'; - fld_DetalleReservasUNIDAD_MEDIDA = 'UNIDAD_MEDIDA'; - fld_DetalleReservasFABRICANTE = 'FABRICANTE'; - fld_DetalleReservasREFERENCIA_FABR = 'REFERENCIA_FABR'; - fld_DetalleReservasCANTIDAD = 'CANTIDAD'; - fld_DetalleReservasID_ALMACEN_RESERVA = 'ID_ALMACEN_RESERVA'; - fld_DetalleReservasNOMBRE_ALMACEN_RESERVA = 'NOMBRE_ALMACEN_RESERVA'; - fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA = 'ID_EMPRESA_ALMACEN_RESERVA'; + fld_DetalleReservasREFERENCIA_ALB = 'REFERENCIA_ALB'; + fld_DetalleReservasSITUACION_ALB = 'SITUACION_ALB'; + fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB = 'FECHA_PREVISTA_ENVIO_ALB'; + fld_DetalleReservasID_ALMACEN_ALB = 'ID_ALMACEN_ALB'; + fld_DetalleReservasALMACEN_ALB = 'ALMACEN_ALB'; + fld_DetalleReservasID_CLIENTE_ALB = 'ID_CLIENTE_ALB'; + fld_DetalleReservasCLIENTE_ALB = 'CLIENTE_ALB'; + fld_DetalleReservasID_ART = 'ID_ART'; + fld_DetalleReservasFAMILIA_ART = 'FAMILIA_ART'; + fld_DetalleReservasREFERENCIA_ART = 'REFERENCIA_ART'; + fld_DetalleReservasREFERENCIA_PROV_ART = 'REFERENCIA_PROV_ART'; + fld_DetalleReservasDESCRIPCION_ART = 'DESCRIPCION_ART'; + fld_DetalleReservasCANTIDAD_ART = 'CANTIDAD_ART'; { DetalleReservas field indexes } - idx_DetalleReservasID = 0; + idx_DetalleReservasID_ALB = 0; idx_DetalleReservasID_EMPRESA = 1; - idx_DetalleReservasID_ALMACEN = 2; - idx_DetalleReservasNOMBRE_ALMACEN = 3; - idx_DetalleReservasFECHA_RESERVA = 4; - idx_DetalleReservasCAUSA_RESERVA = 5; - idx_DetalleReservasID_ARTICULO = 6; - idx_DetalleReservasREFERENCIA = 7; - idx_DetalleReservasDESCRIPCION = 8; - idx_DetalleReservasFAMILIA = 9; - idx_DetalleReservasUNIDAD_MEDIDA = 10; - idx_DetalleReservasFABRICANTE = 11; - idx_DetalleReservasREFERENCIA_FABR = 12; - idx_DetalleReservasCANTIDAD = 13; - idx_DetalleReservasID_ALMACEN_RESERVA = 14; - idx_DetalleReservasNOMBRE_ALMACEN_RESERVA = 15; - idx_DetalleReservasID_EMPRESA_ALMACEN_RESERVA = 16; + idx_DetalleReservasREFERENCIA_ALB = 2; + idx_DetalleReservasSITUACION_ALB = 3; + idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB = 4; + idx_DetalleReservasID_ALMACEN_ALB = 5; + idx_DetalleReservasALMACEN_ALB = 6; + idx_DetalleReservasID_CLIENTE_ALB = 7; + idx_DetalleReservasCLIENTE_ALB = 8; + idx_DetalleReservasID_ART = 9; + idx_DetalleReservasFAMILIA_ART = 10; + idx_DetalleReservasREFERENCIA_ART = 11; + idx_DetalleReservasREFERENCIA_PROV_ART = 12; + idx_DetalleReservasDESCRIPCION_ART = 13; + idx_DetalleReservasCANTIDAD_ART = 14; type { IInventario } IInventario = interface(IDAStronglyTypedDataTable) - ['{5FE325FA-C485-4522-8F90-B6B037D1764A}'] + ['{F619175B-A463-4BA3-B136-60122A903D0A}'] { Property getters and setters } function GetID_ALMACENValue: Integer; procedure SetID_ALMACENValue(const aValue: Integer); @@ -245,7 +241,7 @@ type end; { TInventarioDataTableRules } - TInventarioDataTableRules = class(TIntfObjectDADataTableRules, IInventario) + TInventarioDataTableRules = class(TDADataTableRules, IInventario) private protected { Property getters and setters } @@ -392,224 +388,200 @@ type { IDetalleReservas } IDetalleReservas = interface(IDAStronglyTypedDataTable) - ['{7FE92649-C32F-47EB-9D9F-0CD43FECC0A1}'] + ['{1DEB195E-09C4-4AEF-B988-B8B5263C31B2}'] { Property getters and setters } - function GetIDValue: Integer; - procedure SetIDValue(const aValue: Integer); - function GetIDIsNull: Boolean; - procedure SetIDIsNull(const aValue: Boolean); + function GetID_ALBValue: Integer; + procedure SetID_ALBValue(const aValue: Integer); + function GetID_ALBIsNull: Boolean; + procedure SetID_ALBIsNull(const aValue: Boolean); function GetID_EMPRESAValue: Integer; procedure SetID_EMPRESAValue(const aValue: Integer); function GetID_EMPRESAIsNull: Boolean; procedure SetID_EMPRESAIsNull(const aValue: Boolean); - function GetID_ALMACENValue: Integer; - procedure SetID_ALMACENValue(const aValue: Integer); - function GetID_ALMACENIsNull: Boolean; - procedure SetID_ALMACENIsNull(const aValue: Boolean); - function GetNOMBRE_ALMACENValue: String; - procedure SetNOMBRE_ALMACENValue(const aValue: String); - function GetNOMBRE_ALMACENIsNull: Boolean; - procedure SetNOMBRE_ALMACENIsNull(const aValue: Boolean); - function GetFECHA_RESERVAValue: DateTime; - procedure SetFECHA_RESERVAValue(const aValue: DateTime); - function GetFECHA_RESERVAIsNull: Boolean; - procedure SetFECHA_RESERVAIsNull(const aValue: Boolean); - function GetCAUSA_RESERVAValue: String; - procedure SetCAUSA_RESERVAValue(const aValue: String); - function GetCAUSA_RESERVAIsNull: Boolean; - procedure SetCAUSA_RESERVAIsNull(const aValue: Boolean); - function GetID_ARTICULOValue: Integer; - procedure SetID_ARTICULOValue(const aValue: Integer); - function GetID_ARTICULOIsNull: Boolean; - procedure SetID_ARTICULOIsNull(const aValue: Boolean); - function GetREFERENCIAValue: String; - procedure SetREFERENCIAValue(const aValue: String); - function GetREFERENCIAIsNull: Boolean; - procedure SetREFERENCIAIsNull(const aValue: Boolean); - function GetDESCRIPCIONValue: String; - procedure SetDESCRIPCIONValue(const aValue: String); - function GetDESCRIPCIONIsNull: Boolean; - procedure SetDESCRIPCIONIsNull(const aValue: Boolean); - function GetFAMILIAValue: String; - procedure SetFAMILIAValue(const aValue: String); - function GetFAMILIAIsNull: Boolean; - procedure SetFAMILIAIsNull(const aValue: Boolean); - function GetUNIDAD_MEDIDAValue: String; - procedure SetUNIDAD_MEDIDAValue(const aValue: String); - function GetUNIDAD_MEDIDAIsNull: Boolean; - procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); - function GetFABRICANTEValue: String; - procedure SetFABRICANTEValue(const aValue: String); - function GetFABRICANTEIsNull: Boolean; - procedure SetFABRICANTEIsNull(const aValue: Boolean); - function GetREFERENCIA_FABRValue: String; - procedure SetREFERENCIA_FABRValue(const aValue: String); - function GetREFERENCIA_FABRIsNull: Boolean; - procedure SetREFERENCIA_FABRIsNull(const aValue: Boolean); - function GetCANTIDADValue: Currency; - procedure SetCANTIDADValue(const aValue: Currency); - function GetCANTIDADIsNull: Boolean; - procedure SetCANTIDADIsNull(const aValue: Boolean); - function GetID_ALMACEN_RESERVAValue: Integer; - procedure SetID_ALMACEN_RESERVAValue(const aValue: Integer); - function GetID_ALMACEN_RESERVAIsNull: Boolean; - procedure SetID_ALMACEN_RESERVAIsNull(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); + function GetREFERENCIA_ALBValue: String; + procedure SetREFERENCIA_ALBValue(const aValue: String); + function GetREFERENCIA_ALBIsNull: Boolean; + procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean); + function GetSITUACION_ALBValue: String; + procedure SetSITUACION_ALBValue(const aValue: String); + function GetSITUACION_ALBIsNull: Boolean; + procedure SetSITUACION_ALBIsNull(const aValue: Boolean); + function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; + procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); + function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; + procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); + function GetID_ALMACEN_ALBValue: Integer; + procedure SetID_ALMACEN_ALBValue(const aValue: Integer); + function GetID_ALMACEN_ALBIsNull: Boolean; + procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean); + function GetALMACEN_ALBValue: String; + procedure SetALMACEN_ALBValue(const aValue: String); + function GetALMACEN_ALBIsNull: Boolean; + procedure SetALMACEN_ALBIsNull(const aValue: Boolean); + function GetID_CLIENTE_ALBValue: Integer; + procedure SetID_CLIENTE_ALBValue(const aValue: Integer); + function GetID_CLIENTE_ALBIsNull: Boolean; + procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean); + function GetCLIENTE_ALBValue: String; + procedure SetCLIENTE_ALBValue(const aValue: String); + function GetCLIENTE_ALBIsNull: Boolean; + procedure SetCLIENTE_ALBIsNull(const aValue: Boolean); + function GetID_ARTValue: Integer; + procedure SetID_ARTValue(const aValue: Integer); + function GetID_ARTIsNull: Boolean; + procedure SetID_ARTIsNull(const aValue: Boolean); + function GetFAMILIA_ARTValue: String; + procedure SetFAMILIA_ARTValue(const aValue: String); + function GetFAMILIA_ARTIsNull: Boolean; + procedure SetFAMILIA_ARTIsNull(const aValue: Boolean); + function GetREFERENCIA_ARTValue: String; + procedure SetREFERENCIA_ARTValue(const aValue: String); + function GetREFERENCIA_ARTIsNull: Boolean; + procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean); + function GetREFERENCIA_PROV_ARTValue: String; + procedure SetREFERENCIA_PROV_ARTValue(const aValue: String); + function GetREFERENCIA_PROV_ARTIsNull: Boolean; + procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); + function GetDESCRIPCION_ARTValue: String; + procedure SetDESCRIPCION_ARTValue(const aValue: String); + function GetDESCRIPCION_ARTIsNull: Boolean; + procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean); + function GetCANTIDAD_ARTValue: Currency; + procedure SetCANTIDAD_ARTValue(const aValue: Currency); + function GetCANTIDAD_ARTIsNull: Boolean; + procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean); { Properties } - property ID: Integer read GetIDValue write SetIDValue; - property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull; + property ID_ALB: Integer read GetID_ALBValue write SetID_ALBValue; + property ID_ALBIsNull: Boolean read GetID_ALBIsNull write SetID_ALBIsNull; property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; - property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue; - property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull; - property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue; - property NOMBRE_ALMACENIsNull: Boolean read GetNOMBRE_ALMACENIsNull write SetNOMBRE_ALMACENIsNull; - property FECHA_RESERVA: DateTime read GetFECHA_RESERVAValue write SetFECHA_RESERVAValue; - property FECHA_RESERVAIsNull: Boolean read GetFECHA_RESERVAIsNull write SetFECHA_RESERVAIsNull; - property CAUSA_RESERVA: String read GetCAUSA_RESERVAValue write SetCAUSA_RESERVAValue; - property CAUSA_RESERVAIsNull: Boolean read GetCAUSA_RESERVAIsNull write SetCAUSA_RESERVAIsNull; - property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; - property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull; - property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; - property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; - property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; - property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; - property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; - property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull; - property UNIDAD_MEDIDA: String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue; - property UNIDAD_MEDIDAIsNull: Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull; - property FABRICANTE: String read GetFABRICANTEValue write SetFABRICANTEValue; - property FABRICANTEIsNull: Boolean read GetFABRICANTEIsNull write SetFABRICANTEIsNull; - property REFERENCIA_FABR: String read GetREFERENCIA_FABRValue write SetREFERENCIA_FABRValue; - property REFERENCIA_FABRIsNull: Boolean read GetREFERENCIA_FABRIsNull write SetREFERENCIA_FABRIsNull; - property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue; - property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; - property ID_ALMACEN_RESERVA: Integer read GetID_ALMACEN_RESERVAValue write SetID_ALMACEN_RESERVAValue; - property ID_ALMACEN_RESERVAIsNull: Boolean read GetID_ALMACEN_RESERVAIsNull write SetID_ALMACEN_RESERVAIsNull; - 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; + property REFERENCIA_ALB: String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue; + property REFERENCIA_ALBIsNull: Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull; + property SITUACION_ALB: String read GetSITUACION_ALBValue write SetSITUACION_ALBValue; + property SITUACION_ALBIsNull: Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull; + property FECHA_PREVISTA_ENVIO_ALB: DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue; + property FECHA_PREVISTA_ENVIO_ALBIsNull: Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull; + property ID_ALMACEN_ALB: Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue; + property ID_ALMACEN_ALBIsNull: Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull; + property ALMACEN_ALB: String read GetALMACEN_ALBValue write SetALMACEN_ALBValue; + property ALMACEN_ALBIsNull: Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull; + property ID_CLIENTE_ALB: Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue; + property ID_CLIENTE_ALBIsNull: Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull; + property CLIENTE_ALB: String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue; + property CLIENTE_ALBIsNull: Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull; + property ID_ART: Integer read GetID_ARTValue write SetID_ARTValue; + property ID_ARTIsNull: Boolean read GetID_ARTIsNull write SetID_ARTIsNull; + property FAMILIA_ART: String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue; + property FAMILIA_ARTIsNull: Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull; + property REFERENCIA_ART: String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue; + property REFERENCIA_ARTIsNull: Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull; + property REFERENCIA_PROV_ART: String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue; + property REFERENCIA_PROV_ARTIsNull: Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull; + property DESCRIPCION_ART: String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue; + property DESCRIPCION_ARTIsNull: Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull; + property CANTIDAD_ART: Currency read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue; + property CANTIDAD_ARTIsNull: Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull; end; { TDetalleReservasDataTableRules } - TDetalleReservasDataTableRules = class(TIntfObjectDADataTableRules, IDetalleReservas) + TDetalleReservasDataTableRules = class(TDADataTableRules, IDetalleReservas) private protected { Property getters and setters } - function GetIDValue: Integer; virtual; - procedure SetIDValue(const aValue: Integer); virtual; - function GetIDIsNull: Boolean; virtual; - procedure SetIDIsNull(const aValue: Boolean); virtual; + function GetID_ALBValue: Integer; virtual; + procedure SetID_ALBValue(const aValue: Integer); virtual; + function GetID_ALBIsNull: Boolean; virtual; + procedure SetID_ALBIsNull(const aValue: Boolean); virtual; function GetID_EMPRESAValue: Integer; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; function GetID_EMPRESAIsNull: Boolean; virtual; procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual; - function GetID_ALMACENValue: Integer; virtual; - procedure SetID_ALMACENValue(const aValue: Integer); virtual; - function GetID_ALMACENIsNull: Boolean; virtual; - procedure SetID_ALMACENIsNull(const aValue: Boolean); virtual; - function GetNOMBRE_ALMACENValue: String; virtual; - procedure SetNOMBRE_ALMACENValue(const aValue: String); virtual; - function GetNOMBRE_ALMACENIsNull: Boolean; virtual; - procedure SetNOMBRE_ALMACENIsNull(const aValue: Boolean); virtual; - function GetFECHA_RESERVAValue: DateTime; virtual; - procedure SetFECHA_RESERVAValue(const aValue: DateTime); virtual; - function GetFECHA_RESERVAIsNull: Boolean; virtual; - procedure SetFECHA_RESERVAIsNull(const aValue: Boolean); virtual; - function GetCAUSA_RESERVAValue: String; virtual; - procedure SetCAUSA_RESERVAValue(const aValue: String); virtual; - function GetCAUSA_RESERVAIsNull: Boolean; virtual; - procedure SetCAUSA_RESERVAIsNull(const aValue: Boolean); virtual; - function GetID_ARTICULOValue: Integer; virtual; - procedure SetID_ARTICULOValue(const aValue: Integer); virtual; - function GetID_ARTICULOIsNull: Boolean; virtual; - procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual; - function GetREFERENCIAValue: String; virtual; - procedure SetREFERENCIAValue(const aValue: String); virtual; - function GetREFERENCIAIsNull: Boolean; virtual; - procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual; - function GetDESCRIPCIONValue: String; virtual; - procedure SetDESCRIPCIONValue(const aValue: String); virtual; - function GetDESCRIPCIONIsNull: Boolean; virtual; - procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; - function GetFAMILIAValue: String; virtual; - procedure SetFAMILIAValue(const aValue: String); virtual; - function GetFAMILIAIsNull: Boolean; virtual; - procedure SetFAMILIAIsNull(const aValue: Boolean); virtual; - function GetUNIDAD_MEDIDAValue: String; virtual; - procedure SetUNIDAD_MEDIDAValue(const aValue: String); virtual; - function GetUNIDAD_MEDIDAIsNull: Boolean; virtual; - procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); virtual; - function GetFABRICANTEValue: String; virtual; - procedure SetFABRICANTEValue(const aValue: String); virtual; - function GetFABRICANTEIsNull: Boolean; virtual; - procedure SetFABRICANTEIsNull(const aValue: Boolean); virtual; - function GetREFERENCIA_FABRValue: String; virtual; - procedure SetREFERENCIA_FABRValue(const aValue: String); virtual; - function GetREFERENCIA_FABRIsNull: Boolean; virtual; - procedure SetREFERENCIA_FABRIsNull(const aValue: Boolean); virtual; - function GetCANTIDADValue: Currency; virtual; - procedure SetCANTIDADValue(const aValue: Currency); virtual; - function GetCANTIDADIsNull: Boolean; virtual; - procedure SetCANTIDADIsNull(const aValue: Boolean); virtual; - function GetID_ALMACEN_RESERVAValue: Integer; virtual; - procedure SetID_ALMACEN_RESERVAValue(const aValue: Integer); virtual; - function GetID_ALMACEN_RESERVAIsNull: Boolean; virtual; - procedure SetID_ALMACEN_RESERVAIsNull(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; + function GetREFERENCIA_ALBValue: String; virtual; + procedure SetREFERENCIA_ALBValue(const aValue: String); virtual; + function GetREFERENCIA_ALBIsNull: Boolean; virtual; + procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean); virtual; + function GetSITUACION_ALBValue: String; virtual; + procedure SetSITUACION_ALBValue(const aValue: String); virtual; + function GetSITUACION_ALBIsNull: Boolean; virtual; + procedure SetSITUACION_ALBIsNull(const aValue: Boolean); virtual; + function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; virtual; + procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); virtual; + function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; virtual; + procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); virtual; + function GetID_ALMACEN_ALBValue: Integer; virtual; + procedure SetID_ALMACEN_ALBValue(const aValue: Integer); virtual; + function GetID_ALMACEN_ALBIsNull: Boolean; virtual; + procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean); virtual; + function GetALMACEN_ALBValue: String; virtual; + procedure SetALMACEN_ALBValue(const aValue: String); virtual; + function GetALMACEN_ALBIsNull: Boolean; virtual; + procedure SetALMACEN_ALBIsNull(const aValue: Boolean); virtual; + function GetID_CLIENTE_ALBValue: Integer; virtual; + procedure SetID_CLIENTE_ALBValue(const aValue: Integer); virtual; + function GetID_CLIENTE_ALBIsNull: Boolean; virtual; + procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean); virtual; + function GetCLIENTE_ALBValue: String; virtual; + procedure SetCLIENTE_ALBValue(const aValue: String); virtual; + function GetCLIENTE_ALBIsNull: Boolean; virtual; + procedure SetCLIENTE_ALBIsNull(const aValue: Boolean); virtual; + function GetID_ARTValue: Integer; virtual; + procedure SetID_ARTValue(const aValue: Integer); virtual; + function GetID_ARTIsNull: Boolean; virtual; + procedure SetID_ARTIsNull(const aValue: Boolean); virtual; + function GetFAMILIA_ARTValue: String; virtual; + procedure SetFAMILIA_ARTValue(const aValue: String); virtual; + function GetFAMILIA_ARTIsNull: Boolean; virtual; + procedure SetFAMILIA_ARTIsNull(const aValue: Boolean); virtual; + function GetREFERENCIA_ARTValue: String; virtual; + procedure SetREFERENCIA_ARTValue(const aValue: String); virtual; + function GetREFERENCIA_ARTIsNull: Boolean; virtual; + procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean); virtual; + function GetREFERENCIA_PROV_ARTValue: String; virtual; + procedure SetREFERENCIA_PROV_ARTValue(const aValue: String); virtual; + function GetREFERENCIA_PROV_ARTIsNull: Boolean; virtual; + procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); virtual; + function GetDESCRIPCION_ARTValue: String; virtual; + procedure SetDESCRIPCION_ARTValue(const aValue: String); virtual; + function GetDESCRIPCION_ARTIsNull: Boolean; virtual; + procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean); virtual; + function GetCANTIDAD_ARTValue: Currency; virtual; + procedure SetCANTIDAD_ARTValue(const aValue: Currency); virtual; + function GetCANTIDAD_ARTIsNull: Boolean; virtual; + procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean); virtual; { Properties } - property ID: Integer read GetIDValue write SetIDValue; - property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull; + property ID_ALB: Integer read GetID_ALBValue write SetID_ALBValue; + property ID_ALBIsNull: Boolean read GetID_ALBIsNull write SetID_ALBIsNull; property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; - property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue; - property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull; - property NOMBRE_ALMACEN: String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue; - property NOMBRE_ALMACENIsNull: Boolean read GetNOMBRE_ALMACENIsNull write SetNOMBRE_ALMACENIsNull; - property FECHA_RESERVA: DateTime read GetFECHA_RESERVAValue write SetFECHA_RESERVAValue; - property FECHA_RESERVAIsNull: Boolean read GetFECHA_RESERVAIsNull write SetFECHA_RESERVAIsNull; - property CAUSA_RESERVA: String read GetCAUSA_RESERVAValue write SetCAUSA_RESERVAValue; - property CAUSA_RESERVAIsNull: Boolean read GetCAUSA_RESERVAIsNull write SetCAUSA_RESERVAIsNull; - property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; - property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull; - property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue; - property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; - property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; - property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; - property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue; - property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull; - property UNIDAD_MEDIDA: String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue; - property UNIDAD_MEDIDAIsNull: Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull; - property FABRICANTE: String read GetFABRICANTEValue write SetFABRICANTEValue; - property FABRICANTEIsNull: Boolean read GetFABRICANTEIsNull write SetFABRICANTEIsNull; - property REFERENCIA_FABR: String read GetREFERENCIA_FABRValue write SetREFERENCIA_FABRValue; - property REFERENCIA_FABRIsNull: Boolean read GetREFERENCIA_FABRIsNull write SetREFERENCIA_FABRIsNull; - property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue; - property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; - property ID_ALMACEN_RESERVA: Integer read GetID_ALMACEN_RESERVAValue write SetID_ALMACEN_RESERVAValue; - property ID_ALMACEN_RESERVAIsNull: Boolean read GetID_ALMACEN_RESERVAIsNull write SetID_ALMACEN_RESERVAIsNull; - 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; + property REFERENCIA_ALB: String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue; + property REFERENCIA_ALBIsNull: Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull; + property SITUACION_ALB: String read GetSITUACION_ALBValue write SetSITUACION_ALBValue; + property SITUACION_ALBIsNull: Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull; + property FECHA_PREVISTA_ENVIO_ALB: DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue; + property FECHA_PREVISTA_ENVIO_ALBIsNull: Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull; + property ID_ALMACEN_ALB: Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue; + property ID_ALMACEN_ALBIsNull: Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull; + property ALMACEN_ALB: String read GetALMACEN_ALBValue write SetALMACEN_ALBValue; + property ALMACEN_ALBIsNull: Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull; + property ID_CLIENTE_ALB: Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue; + property ID_CLIENTE_ALBIsNull: Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull; + property CLIENTE_ALB: String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue; + property CLIENTE_ALBIsNull: Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull; + property ID_ART: Integer read GetID_ARTValue write SetID_ARTValue; + property ID_ARTIsNull: Boolean read GetID_ARTIsNull write SetID_ARTIsNull; + property FAMILIA_ART: String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue; + property FAMILIA_ARTIsNull: Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull; + property REFERENCIA_ART: String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue; + property REFERENCIA_ARTIsNull: Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull; + property REFERENCIA_PROV_ART: String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue; + property REFERENCIA_PROV_ARTIsNull: Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull; + property DESCRIPCION_ART: String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue; + property DESCRIPCION_ARTIsNull: Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull; + property CANTIDAD_ART: Currency read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue; + property CANTIDAD_ARTIsNull: Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull; public constructor Create(aDataTable: TDADataTable); override; @@ -1106,25 +1078,25 @@ begin inherited; end; -function TDetalleReservasDataTableRules.GetIDValue: Integer; +function TDetalleReservasDataTableRules.GetID_ALBValue: Integer; begin - result := DataTable.Fields[idx_DetalleReservasID].AsInteger; + result := DataTable.Fields[idx_DetalleReservasID_ALB].AsInteger; end; -procedure TDetalleReservasDataTableRules.SetIDValue(const aValue: Integer); +procedure TDetalleReservasDataTableRules.SetID_ALBValue(const aValue: Integer); begin - DataTable.Fields[idx_DetalleReservasID].AsInteger := aValue; + DataTable.Fields[idx_DetalleReservasID_ALB].AsInteger := aValue; end; -function TDetalleReservasDataTableRules.GetIDIsNull: boolean; +function TDetalleReservasDataTableRules.GetID_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasID].IsNull; + result := DataTable.Fields[idx_DetalleReservasID_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetIDIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetID_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasID].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasID_ALB].AsVariant := Null; end; function TDetalleReservasDataTableRules.GetID_EMPRESAValue: Integer; @@ -1148,319 +1120,277 @@ begin DataTable.Fields[idx_DetalleReservasID_EMPRESA].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetID_ALMACENValue: Integer; +function TDetalleReservasDataTableRules.GetREFERENCIA_ALBValue: String; begin - result := DataTable.Fields[idx_DetalleReservasID_ALMACEN].AsInteger; + result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsString; end; -procedure TDetalleReservasDataTableRules.SetID_ALMACENValue(const aValue: Integer); +procedure TDetalleReservasDataTableRules.SetREFERENCIA_ALBValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasID_ALMACEN].AsInteger := aValue; + DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetID_ALMACENIsNull: boolean; +function TDetalleReservasDataTableRules.GetREFERENCIA_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasID_ALMACEN].IsNull; + result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetID_ALMACENIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetREFERENCIA_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasID_ALMACEN].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetNOMBRE_ALMACENValue: String; +function TDetalleReservasDataTableRules.GetSITUACION_ALBValue: String; begin - result := DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].AsString; + result := DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsString; end; -procedure TDetalleReservasDataTableRules.SetNOMBRE_ALMACENValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetSITUACION_ALBValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].AsString := aValue; + DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetNOMBRE_ALMACENIsNull: boolean; +function TDetalleReservasDataTableRules.GetSITUACION_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].IsNull; + result := DataTable.Fields[idx_DetalleReservasSITUACION_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetNOMBRE_ALMACENIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetSITUACION_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasNOMBRE_ALMACEN].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetFECHA_RESERVAValue: DateTime; +function TDetalleReservasDataTableRules.GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; begin - result := DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].AsDateTime; + result := DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsDateTime; end; -procedure TDetalleReservasDataTableRules.SetFECHA_RESERVAValue(const aValue: DateTime); +procedure TDetalleReservasDataTableRules.SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); begin - DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].AsDateTime := aValue; + DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsDateTime := aValue; end; -function TDetalleReservasDataTableRules.GetFECHA_RESERVAIsNull: boolean; +function TDetalleReservasDataTableRules.GetFECHA_PREVISTA_ENVIO_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].IsNull; + result := DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetFECHA_RESERVAIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasFECHA_RESERVA].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetCAUSA_RESERVAValue: String; +function TDetalleReservasDataTableRules.GetID_ALMACEN_ALBValue: Integer; begin - result := DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].AsString; + result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsInteger; end; -procedure TDetalleReservasDataTableRules.SetCAUSA_RESERVAValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetID_ALMACEN_ALBValue(const aValue: Integer); begin - DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].AsString := aValue; + DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsInteger := aValue; end; -function TDetalleReservasDataTableRules.GetCAUSA_RESERVAIsNull: boolean; +function TDetalleReservasDataTableRules.GetID_ALMACEN_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].IsNull; + result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetCAUSA_RESERVAIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetID_ALMACEN_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasCAUSA_RESERVA].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetID_ARTICULOValue: Integer; +function TDetalleReservasDataTableRules.GetALMACEN_ALBValue: String; begin - result := DataTable.Fields[idx_DetalleReservasID_ARTICULO].AsInteger; + result := DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsString; end; -procedure TDetalleReservasDataTableRules.SetID_ARTICULOValue(const aValue: Integer); +procedure TDetalleReservasDataTableRules.SetALMACEN_ALBValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasID_ARTICULO].AsInteger := aValue; + DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetID_ARTICULOIsNull: boolean; +function TDetalleReservasDataTableRules.GetALMACEN_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasID_ARTICULO].IsNull; + result := DataTable.Fields[idx_DetalleReservasALMACEN_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetALMACEN_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasID_ARTICULO].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetREFERENCIAValue: String; +function TDetalleReservasDataTableRules.GetID_CLIENTE_ALBValue: Integer; begin - result := DataTable.Fields[idx_DetalleReservasREFERENCIA].AsString; + result := DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsInteger; end; -procedure TDetalleReservasDataTableRules.SetREFERENCIAValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetID_CLIENTE_ALBValue(const aValue: Integer); begin - DataTable.Fields[idx_DetalleReservasREFERENCIA].AsString := aValue; + DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsInteger := aValue; end; -function TDetalleReservasDataTableRules.GetREFERENCIAIsNull: boolean; +function TDetalleReservasDataTableRules.GetID_CLIENTE_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasREFERENCIA].IsNull; + result := DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetID_CLIENTE_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasREFERENCIA].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetDESCRIPCIONValue: String; +function TDetalleReservasDataTableRules.GetCLIENTE_ALBValue: String; begin - result := DataTable.Fields[idx_DetalleReservasDESCRIPCION].AsString; + result := DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsString; end; -procedure TDetalleReservasDataTableRules.SetDESCRIPCIONValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetCLIENTE_ALBValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasDESCRIPCION].AsString := aValue; + DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetDESCRIPCIONIsNull: boolean; +function TDetalleReservasDataTableRules.GetCLIENTE_ALBIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasDESCRIPCION].IsNull; + result := DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].IsNull; end; -procedure TDetalleReservasDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetCLIENTE_ALBIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasDESCRIPCION].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetFAMILIAValue: String; +function TDetalleReservasDataTableRules.GetID_ARTValue: Integer; begin - result := DataTable.Fields[idx_DetalleReservasFAMILIA].AsString; + result := DataTable.Fields[idx_DetalleReservasID_ART].AsInteger; end; -procedure TDetalleReservasDataTableRules.SetFAMILIAValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetID_ARTValue(const aValue: Integer); begin - DataTable.Fields[idx_DetalleReservasFAMILIA].AsString := aValue; + DataTable.Fields[idx_DetalleReservasID_ART].AsInteger := aValue; end; -function TDetalleReservasDataTableRules.GetFAMILIAIsNull: boolean; +function TDetalleReservasDataTableRules.GetID_ARTIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasFAMILIA].IsNull; + result := DataTable.Fields[idx_DetalleReservasID_ART].IsNull; end; -procedure TDetalleReservasDataTableRules.SetFAMILIAIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetID_ARTIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasFAMILIA].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasID_ART].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetUNIDAD_MEDIDAValue: String; +function TDetalleReservasDataTableRules.GetFAMILIA_ARTValue: String; begin - result := DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].AsString; + result := DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsString; end; -procedure TDetalleReservasDataTableRules.SetUNIDAD_MEDIDAValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetFAMILIA_ARTValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].AsString := aValue; + DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetUNIDAD_MEDIDAIsNull: boolean; +function TDetalleReservasDataTableRules.GetFAMILIA_ARTIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].IsNull; + result := DataTable.Fields[idx_DetalleReservasFAMILIA_ART].IsNull; end; -procedure TDetalleReservasDataTableRules.SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetFAMILIA_ARTIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasUNIDAD_MEDIDA].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetFABRICANTEValue: String; +function TDetalleReservasDataTableRules.GetREFERENCIA_ARTValue: String; begin - result := DataTable.Fields[idx_DetalleReservasFABRICANTE].AsString; + result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsString; end; -procedure TDetalleReservasDataTableRules.SetFABRICANTEValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetREFERENCIA_ARTValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasFABRICANTE].AsString := aValue; + DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetFABRICANTEIsNull: boolean; +function TDetalleReservasDataTableRules.GetREFERENCIA_ARTIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasFABRICANTE].IsNull; + result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].IsNull; end; -procedure TDetalleReservasDataTableRules.SetFABRICANTEIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetREFERENCIA_ARTIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasFABRICANTE].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetREFERENCIA_FABRValue: String; +function TDetalleReservasDataTableRules.GetREFERENCIA_PROV_ARTValue: String; begin - result := DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].AsString; + result := DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsString; end; -procedure TDetalleReservasDataTableRules.SetREFERENCIA_FABRValue(const aValue: String); +procedure TDetalleReservasDataTableRules.SetREFERENCIA_PROV_ARTValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].AsString := aValue; + DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetREFERENCIA_FABRIsNull: boolean; +function TDetalleReservasDataTableRules.GetREFERENCIA_PROV_ARTIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].IsNull; + result := DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].IsNull; end; -procedure TDetalleReservasDataTableRules.SetREFERENCIA_FABRIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasREFERENCIA_FABR].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetCANTIDADValue: Currency; +function TDetalleReservasDataTableRules.GetDESCRIPCION_ARTValue: String; begin - result := DataTable.Fields[idx_DetalleReservasCANTIDAD].AsCurrency; + result := DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsString; end; -procedure TDetalleReservasDataTableRules.SetCANTIDADValue(const aValue: Currency); +procedure TDetalleReservasDataTableRules.SetDESCRIPCION_ARTValue(const aValue: String); begin - DataTable.Fields[idx_DetalleReservasCANTIDAD].AsCurrency := aValue; + DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsString := aValue; end; -function TDetalleReservasDataTableRules.GetCANTIDADIsNull: boolean; +function TDetalleReservasDataTableRules.GetDESCRIPCION_ARTIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasCANTIDAD].IsNull; + result := DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].IsNull; end; -procedure TDetalleReservasDataTableRules.SetCANTIDADIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetDESCRIPCION_ARTIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasCANTIDAD].AsVariant := Null; + DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsVariant := Null; end; -function TDetalleReservasDataTableRules.GetID_ALMACEN_RESERVAValue: Integer; +function TDetalleReservasDataTableRules.GetCANTIDAD_ARTValue: Currency; begin - result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].AsInteger; + result := DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsCurrency; end; -procedure TDetalleReservasDataTableRules.SetID_ALMACEN_RESERVAValue(const aValue: Integer); +procedure TDetalleReservasDataTableRules.SetCANTIDAD_ARTValue(const aValue: Currency); begin - DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].AsInteger := aValue; + DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsCurrency := aValue; end; -function TDetalleReservasDataTableRules.GetID_ALMACEN_RESERVAIsNull: boolean; +function TDetalleReservasDataTableRules.GetCANTIDAD_ARTIsNull: boolean; begin - result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].IsNull; + result := DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].IsNull; end; -procedure TDetalleReservasDataTableRules.SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean); +procedure TDetalleReservasDataTableRules.SetCANTIDAD_ARTIsNull(const aValue: Boolean); begin if aValue then - DataTable.Fields[idx_DetalleReservasID_ALMACEN_RESERVA].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; + DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsVariant := Null; end; diff --git a/Source/Modulos/Inventario/Model/schInventarioServer_Intf.pas b/Source/Modulos/Inventario/Model/schInventarioServer_Intf.pas index d48279a..c2d6633 100644 --- a/Source/Modulos/Inventario/Model/schInventarioServer_Intf.pas +++ b/Source/Modulos/Inventario/Model/schInventarioServer_Intf.pas @@ -9,13 +9,13 @@ const { Delta rules ids Feel free to change them to something more human readable but make sure they are unique in the context of your application } - RID_InventarioDelta = '{96541F59-4DFF-438C-A049-462AB7552CF7}'; - RID_DetalleReservasDelta = '{1693AAD2-69C6-48CE-AB23-D215F4164451}'; + RID_InventarioDelta = '{3C1A1972-F302-43C2-83A2-086C51123399}'; + RID_DetalleReservasDelta = '{C4972043-0343-4E3C-9E6D-078DAD31AC18}'; type { IInventarioDelta } IInventarioDelta = interface(IInventario) - ['{96541F59-4DFF-438C-A049-462AB7552CF7}'] + ['{3C1A1972-F302-43C2-83A2-086C51123399}'] { Property getters and setters } function GetOldID_ALMACENValue : Integer; function GetOldID_ARTICULOValue : Integer; @@ -301,44 +301,40 @@ type { IDetalleReservasDelta } IDetalleReservasDelta = interface(IDetalleReservas) - ['{1693AAD2-69C6-48CE-AB23-D215F4164451}'] + ['{C4972043-0343-4E3C-9E6D-078DAD31AC18}'] { Property getters and setters } - function GetOldIDValue : Integer; + function GetOldID_ALBValue : Integer; function GetOldID_EMPRESAValue : Integer; - function GetOldID_ALMACENValue : Integer; - function GetOldNOMBRE_ALMACENValue : String; - function GetOldFECHA_RESERVAValue : DateTime; - function GetOldCAUSA_RESERVAValue : String; - function GetOldID_ARTICULOValue : Integer; - function GetOldREFERENCIAValue : String; - function GetOldDESCRIPCIONValue : String; - function GetOldFAMILIAValue : String; - function GetOldUNIDAD_MEDIDAValue : String; - function GetOldFABRICANTEValue : String; - function GetOldREFERENCIA_FABRValue : String; - function GetOldCANTIDADValue : Currency; - function GetOldID_ALMACEN_RESERVAValue : Integer; - function GetOldNOMBRE_ALMACEN_RESERVAValue : String; - function GetOldID_EMPRESA_ALMACEN_RESERVAValue : Integer; + function GetOldREFERENCIA_ALBValue : String; + function GetOldSITUACION_ALBValue : String; + function GetOldFECHA_PREVISTA_ENVIO_ALBValue : DateTime; + function GetOldID_ALMACEN_ALBValue : Integer; + function GetOldALMACEN_ALBValue : String; + function GetOldID_CLIENTE_ALBValue : Integer; + function GetOldCLIENTE_ALBValue : String; + function GetOldID_ARTValue : Integer; + function GetOldFAMILIA_ARTValue : String; + function GetOldREFERENCIA_ARTValue : String; + function GetOldREFERENCIA_PROV_ARTValue : String; + function GetOldDESCRIPCION_ARTValue : String; + function GetOldCANTIDAD_ARTValue : Currency; { Properties } - property OldID : Integer read GetOldIDValue; + property OldID_ALB : Integer read GetOldID_ALBValue; property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue; - property OldID_ALMACEN : Integer read GetOldID_ALMACENValue; - property OldNOMBRE_ALMACEN : String read GetOldNOMBRE_ALMACENValue; - property OldFECHA_RESERVA : DateTime read GetOldFECHA_RESERVAValue; - property OldCAUSA_RESERVA : String read GetOldCAUSA_RESERVAValue; - property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue; - property OldREFERENCIA : String read GetOldREFERENCIAValue; - property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; - property OldFAMILIA : String read GetOldFAMILIAValue; - property OldUNIDAD_MEDIDA : String read GetOldUNIDAD_MEDIDAValue; - property OldFABRICANTE : String read GetOldFABRICANTEValue; - property OldREFERENCIA_FABR : String read GetOldREFERENCIA_FABRValue; - property OldCANTIDAD : Currency read GetOldCANTIDADValue; - property OldID_ALMACEN_RESERVA : Integer read GetOldID_ALMACEN_RESERVAValue; - property OldNOMBRE_ALMACEN_RESERVA : String read GetOldNOMBRE_ALMACEN_RESERVAValue; - property OldID_EMPRESA_ALMACEN_RESERVA : Integer read GetOldID_EMPRESA_ALMACEN_RESERVAValue; + property OldREFERENCIA_ALB : String read GetOldREFERENCIA_ALBValue; + property OldSITUACION_ALB : String read GetOldSITUACION_ALBValue; + property OldFECHA_PREVISTA_ENVIO_ALB : DateTime read GetOldFECHA_PREVISTA_ENVIO_ALBValue; + property OldID_ALMACEN_ALB : Integer read GetOldID_ALMACEN_ALBValue; + property OldALMACEN_ALB : String read GetOldALMACEN_ALBValue; + property OldID_CLIENTE_ALB : Integer read GetOldID_CLIENTE_ALBValue; + property OldCLIENTE_ALB : String read GetOldCLIENTE_ALBValue; + property OldID_ART : Integer read GetOldID_ARTValue; + property OldFAMILIA_ART : String read GetOldFAMILIA_ARTValue; + property OldREFERENCIA_ART : String read GetOldREFERENCIA_ARTValue; + property OldREFERENCIA_PROV_ART : String read GetOldREFERENCIA_PROV_ARTValue; + property OldDESCRIPCION_ART : String read GetOldDESCRIPCION_ARTValue; + property OldCANTIDAD_ART : Currency read GetOldCANTIDAD_ARTValue; end; { TDetalleReservasBusinessProcessorRules } @@ -346,178 +342,158 @@ type private protected { Property getters and setters } - function GetIDValue: Integer; virtual; - function GetIDIsNull: Boolean; virtual; - function GetOldIDValue: Integer; virtual; - function GetOldIDIsNull: Boolean; virtual; - procedure SetIDValue(const aValue: Integer); virtual; - procedure SetIDIsNull(const aValue: Boolean); virtual; + function GetID_ALBValue: Integer; virtual; + function GetID_ALBIsNull: Boolean; virtual; + function GetOldID_ALBValue: Integer; virtual; + function GetOldID_ALBIsNull: Boolean; virtual; + procedure SetID_ALBValue(const aValue: Integer); virtual; + procedure SetID_ALBIsNull(const aValue: Boolean); virtual; function GetID_EMPRESAValue: Integer; virtual; function GetID_EMPRESAIsNull: Boolean; virtual; function GetOldID_EMPRESAValue: Integer; virtual; function GetOldID_EMPRESAIsNull: Boolean; virtual; procedure SetID_EMPRESAValue(const aValue: Integer); virtual; procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual; - function GetID_ALMACENValue: Integer; virtual; - function GetID_ALMACENIsNull: Boolean; virtual; - function GetOldID_ALMACENValue: Integer; virtual; - function GetOldID_ALMACENIsNull: Boolean; virtual; - procedure SetID_ALMACENValue(const aValue: Integer); virtual; - procedure SetID_ALMACENIsNull(const aValue: Boolean); virtual; - function GetNOMBRE_ALMACENValue: String; virtual; - function GetNOMBRE_ALMACENIsNull: Boolean; virtual; - function GetOldNOMBRE_ALMACENValue: String; virtual; - function GetOldNOMBRE_ALMACENIsNull: Boolean; virtual; - procedure SetNOMBRE_ALMACENValue(const aValue: String); virtual; - procedure SetNOMBRE_ALMACENIsNull(const aValue: Boolean); virtual; - function GetFECHA_RESERVAValue: DateTime; virtual; - function GetFECHA_RESERVAIsNull: Boolean; virtual; - function GetOldFECHA_RESERVAValue: DateTime; virtual; - function GetOldFECHA_RESERVAIsNull: Boolean; virtual; - procedure SetFECHA_RESERVAValue(const aValue: DateTime); virtual; - procedure SetFECHA_RESERVAIsNull(const aValue: Boolean); virtual; - function GetCAUSA_RESERVAValue: String; virtual; - function GetCAUSA_RESERVAIsNull: Boolean; virtual; - function GetOldCAUSA_RESERVAValue: String; virtual; - function GetOldCAUSA_RESERVAIsNull: Boolean; virtual; - procedure SetCAUSA_RESERVAValue(const aValue: String); virtual; - procedure SetCAUSA_RESERVAIsNull(const aValue: Boolean); virtual; - function GetID_ARTICULOValue: Integer; virtual; - function GetID_ARTICULOIsNull: Boolean; virtual; - function GetOldID_ARTICULOValue: Integer; virtual; - function GetOldID_ARTICULOIsNull: Boolean; virtual; - procedure SetID_ARTICULOValue(const aValue: Integer); virtual; - procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual; - function GetREFERENCIAValue: String; virtual; - function GetREFERENCIAIsNull: Boolean; virtual; - function GetOldREFERENCIAValue: String; virtual; - function GetOldREFERENCIAIsNull: Boolean; virtual; - procedure SetREFERENCIAValue(const aValue: String); virtual; - procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual; - function GetDESCRIPCIONValue: String; virtual; - function GetDESCRIPCIONIsNull: Boolean; virtual; - function GetOldDESCRIPCIONValue: String; virtual; - function GetOldDESCRIPCIONIsNull: Boolean; virtual; - procedure SetDESCRIPCIONValue(const aValue: String); virtual; - procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual; - function GetFAMILIAValue: String; virtual; - function GetFAMILIAIsNull: Boolean; virtual; - function GetOldFAMILIAValue: String; virtual; - function GetOldFAMILIAIsNull: Boolean; virtual; - procedure SetFAMILIAValue(const aValue: String); virtual; - procedure SetFAMILIAIsNull(const aValue: Boolean); virtual; - function GetUNIDAD_MEDIDAValue: String; virtual; - function GetUNIDAD_MEDIDAIsNull: Boolean; virtual; - function GetOldUNIDAD_MEDIDAValue: String; virtual; - function GetOldUNIDAD_MEDIDAIsNull: Boolean; virtual; - procedure SetUNIDAD_MEDIDAValue(const aValue: String); virtual; - procedure SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); virtual; - function GetFABRICANTEValue: String; virtual; - function GetFABRICANTEIsNull: Boolean; virtual; - function GetOldFABRICANTEValue: String; virtual; - function GetOldFABRICANTEIsNull: Boolean; virtual; - procedure SetFABRICANTEValue(const aValue: String); virtual; - procedure SetFABRICANTEIsNull(const aValue: Boolean); virtual; - function GetREFERENCIA_FABRValue: String; virtual; - function GetREFERENCIA_FABRIsNull: Boolean; virtual; - function GetOldREFERENCIA_FABRValue: String; virtual; - function GetOldREFERENCIA_FABRIsNull: Boolean; virtual; - procedure SetREFERENCIA_FABRValue(const aValue: String); virtual; - procedure SetREFERENCIA_FABRIsNull(const aValue: Boolean); virtual; - function GetCANTIDADValue: Currency; virtual; - function GetCANTIDADIsNull: Boolean; virtual; - function GetOldCANTIDADValue: Currency; virtual; - function GetOldCANTIDADIsNull: Boolean; virtual; - procedure SetCANTIDADValue(const aValue: Currency); virtual; - procedure SetCANTIDADIsNull(const aValue: Boolean); virtual; - function GetID_ALMACEN_RESERVAValue: Integer; virtual; - function GetID_ALMACEN_RESERVAIsNull: Boolean; virtual; - function GetOldID_ALMACEN_RESERVAValue: Integer; virtual; - function GetOldID_ALMACEN_RESERVAIsNull: Boolean; virtual; - procedure SetID_ALMACEN_RESERVAValue(const aValue: Integer); virtual; - procedure SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean); virtual; - function GetNOMBRE_ALMACEN_RESERVAValue: String; virtual; - function GetNOMBRE_ALMACEN_RESERVAIsNull: Boolean; virtual; - function GetOldNOMBRE_ALMACEN_RESERVAValue: String; virtual; - function GetOldNOMBRE_ALMACEN_RESERVAIsNull: Boolean; virtual; - procedure SetNOMBRE_ALMACEN_RESERVAValue(const aValue: String); virtual; - procedure SetNOMBRE_ALMACEN_RESERVAIsNull(const aValue: Boolean); virtual; - function GetID_EMPRESA_ALMACEN_RESERVAValue: Integer; virtual; - function GetID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean; virtual; - function GetOldID_EMPRESA_ALMACEN_RESERVAValue: Integer; virtual; - function GetOldID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean; virtual; - procedure SetID_EMPRESA_ALMACEN_RESERVAValue(const aValue: Integer); virtual; - procedure SetID_EMPRESA_ALMACEN_RESERVAIsNull(const aValue: Boolean); virtual; + function GetREFERENCIA_ALBValue: String; virtual; + function GetREFERENCIA_ALBIsNull: Boolean; virtual; + function GetOldREFERENCIA_ALBValue: String; virtual; + function GetOldREFERENCIA_ALBIsNull: Boolean; virtual; + procedure SetREFERENCIA_ALBValue(const aValue: String); virtual; + procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean); virtual; + function GetSITUACION_ALBValue: String; virtual; + function GetSITUACION_ALBIsNull: Boolean; virtual; + function GetOldSITUACION_ALBValue: String; virtual; + function GetOldSITUACION_ALBIsNull: Boolean; virtual; + procedure SetSITUACION_ALBValue(const aValue: String); virtual; + procedure SetSITUACION_ALBIsNull(const aValue: Boolean); virtual; + function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; virtual; + function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; virtual; + function GetOldFECHA_PREVISTA_ENVIO_ALBValue: DateTime; virtual; + function GetOldFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; virtual; + procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); virtual; + procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); virtual; + function GetID_ALMACEN_ALBValue: Integer; virtual; + function GetID_ALMACEN_ALBIsNull: Boolean; virtual; + function GetOldID_ALMACEN_ALBValue: Integer; virtual; + function GetOldID_ALMACEN_ALBIsNull: Boolean; virtual; + procedure SetID_ALMACEN_ALBValue(const aValue: Integer); virtual; + procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean); virtual; + function GetALMACEN_ALBValue: String; virtual; + function GetALMACEN_ALBIsNull: Boolean; virtual; + function GetOldALMACEN_ALBValue: String; virtual; + function GetOldALMACEN_ALBIsNull: Boolean; virtual; + procedure SetALMACEN_ALBValue(const aValue: String); virtual; + procedure SetALMACEN_ALBIsNull(const aValue: Boolean); virtual; + function GetID_CLIENTE_ALBValue: Integer; virtual; + function GetID_CLIENTE_ALBIsNull: Boolean; virtual; + function GetOldID_CLIENTE_ALBValue: Integer; virtual; + function GetOldID_CLIENTE_ALBIsNull: Boolean; virtual; + procedure SetID_CLIENTE_ALBValue(const aValue: Integer); virtual; + procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean); virtual; + function GetCLIENTE_ALBValue: String; virtual; + function GetCLIENTE_ALBIsNull: Boolean; virtual; + function GetOldCLIENTE_ALBValue: String; virtual; + function GetOldCLIENTE_ALBIsNull: Boolean; virtual; + procedure SetCLIENTE_ALBValue(const aValue: String); virtual; + procedure SetCLIENTE_ALBIsNull(const aValue: Boolean); virtual; + function GetID_ARTValue: Integer; virtual; + function GetID_ARTIsNull: Boolean; virtual; + function GetOldID_ARTValue: Integer; virtual; + function GetOldID_ARTIsNull: Boolean; virtual; + procedure SetID_ARTValue(const aValue: Integer); virtual; + procedure SetID_ARTIsNull(const aValue: Boolean); virtual; + function GetFAMILIA_ARTValue: String; virtual; + function GetFAMILIA_ARTIsNull: Boolean; virtual; + function GetOldFAMILIA_ARTValue: String; virtual; + function GetOldFAMILIA_ARTIsNull: Boolean; virtual; + procedure SetFAMILIA_ARTValue(const aValue: String); virtual; + procedure SetFAMILIA_ARTIsNull(const aValue: Boolean); virtual; + function GetREFERENCIA_ARTValue: String; virtual; + function GetREFERENCIA_ARTIsNull: Boolean; virtual; + function GetOldREFERENCIA_ARTValue: String; virtual; + function GetOldREFERENCIA_ARTIsNull: Boolean; virtual; + procedure SetREFERENCIA_ARTValue(const aValue: String); virtual; + procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean); virtual; + function GetREFERENCIA_PROV_ARTValue: String; virtual; + function GetREFERENCIA_PROV_ARTIsNull: Boolean; virtual; + function GetOldREFERENCIA_PROV_ARTValue: String; virtual; + function GetOldREFERENCIA_PROV_ARTIsNull: Boolean; virtual; + procedure SetREFERENCIA_PROV_ARTValue(const aValue: String); virtual; + procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); virtual; + function GetDESCRIPCION_ARTValue: String; virtual; + function GetDESCRIPCION_ARTIsNull: Boolean; virtual; + function GetOldDESCRIPCION_ARTValue: String; virtual; + function GetOldDESCRIPCION_ARTIsNull: Boolean; virtual; + procedure SetDESCRIPCION_ARTValue(const aValue: String); virtual; + procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean); virtual; + function GetCANTIDAD_ARTValue: Currency; virtual; + function GetCANTIDAD_ARTIsNull: Boolean; virtual; + function GetOldCANTIDAD_ARTValue: Currency; virtual; + function GetOldCANTIDAD_ARTIsNull: Boolean; virtual; + procedure SetCANTIDAD_ARTValue(const aValue: Currency); virtual; + procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean); virtual; { Properties } - property ID : Integer read GetIDValue write SetIDValue; - property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull; - property OldID : Integer read GetOldIDValue; - property OldIDIsNull : Boolean read GetOldIDIsNull; + property ID_ALB : Integer read GetID_ALBValue write SetID_ALBValue; + property ID_ALBIsNull : Boolean read GetID_ALBIsNull write SetID_ALBIsNull; + property OldID_ALB : Integer read GetOldID_ALBValue; + property OldID_ALBIsNull : Boolean read GetOldID_ALBIsNull; property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue; property ID_EMPRESAIsNull : Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull; property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue; property OldID_EMPRESAIsNull : Boolean read GetOldID_EMPRESAIsNull; - property ID_ALMACEN : Integer read GetID_ALMACENValue write SetID_ALMACENValue; - property ID_ALMACENIsNull : Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull; - property OldID_ALMACEN : Integer read GetOldID_ALMACENValue; - property OldID_ALMACENIsNull : Boolean read GetOldID_ALMACENIsNull; - property NOMBRE_ALMACEN : String read GetNOMBRE_ALMACENValue write SetNOMBRE_ALMACENValue; - property NOMBRE_ALMACENIsNull : Boolean read GetNOMBRE_ALMACENIsNull write SetNOMBRE_ALMACENIsNull; - property OldNOMBRE_ALMACEN : String read GetOldNOMBRE_ALMACENValue; - property OldNOMBRE_ALMACENIsNull : Boolean read GetOldNOMBRE_ALMACENIsNull; - property FECHA_RESERVA : DateTime read GetFECHA_RESERVAValue write SetFECHA_RESERVAValue; - property FECHA_RESERVAIsNull : Boolean read GetFECHA_RESERVAIsNull write SetFECHA_RESERVAIsNull; - property OldFECHA_RESERVA : DateTime read GetOldFECHA_RESERVAValue; - property OldFECHA_RESERVAIsNull : Boolean read GetOldFECHA_RESERVAIsNull; - property CAUSA_RESERVA : String read GetCAUSA_RESERVAValue write SetCAUSA_RESERVAValue; - property CAUSA_RESERVAIsNull : Boolean read GetCAUSA_RESERVAIsNull write SetCAUSA_RESERVAIsNull; - property OldCAUSA_RESERVA : String read GetOldCAUSA_RESERVAValue; - property OldCAUSA_RESERVAIsNull : Boolean read GetOldCAUSA_RESERVAIsNull; - property ID_ARTICULO : Integer read GetID_ARTICULOValue write SetID_ARTICULOValue; - property ID_ARTICULOIsNull : Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull; - property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue; - property OldID_ARTICULOIsNull : Boolean read GetOldID_ARTICULOIsNull; - property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue; - property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull; - property OldREFERENCIA : String read GetOldREFERENCIAValue; - property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull; - property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue; - property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull; - property OldDESCRIPCION : String read GetOldDESCRIPCIONValue; - property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull; - property FAMILIA : String read GetFAMILIAValue write SetFAMILIAValue; - property FAMILIAIsNull : Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull; - property OldFAMILIA : String read GetOldFAMILIAValue; - property OldFAMILIAIsNull : Boolean read GetOldFAMILIAIsNull; - property UNIDAD_MEDIDA : String read GetUNIDAD_MEDIDAValue write SetUNIDAD_MEDIDAValue; - property UNIDAD_MEDIDAIsNull : Boolean read GetUNIDAD_MEDIDAIsNull write SetUNIDAD_MEDIDAIsNull; - property OldUNIDAD_MEDIDA : String read GetOldUNIDAD_MEDIDAValue; - property OldUNIDAD_MEDIDAIsNull : Boolean read GetOldUNIDAD_MEDIDAIsNull; - property FABRICANTE : String read GetFABRICANTEValue write SetFABRICANTEValue; - property FABRICANTEIsNull : Boolean read GetFABRICANTEIsNull write SetFABRICANTEIsNull; - property OldFABRICANTE : String read GetOldFABRICANTEValue; - property OldFABRICANTEIsNull : Boolean read GetOldFABRICANTEIsNull; - property REFERENCIA_FABR : String read GetREFERENCIA_FABRValue write SetREFERENCIA_FABRValue; - property REFERENCIA_FABRIsNull : Boolean read GetREFERENCIA_FABRIsNull write SetREFERENCIA_FABRIsNull; - property OldREFERENCIA_FABR : String read GetOldREFERENCIA_FABRValue; - property OldREFERENCIA_FABRIsNull : Boolean read GetOldREFERENCIA_FABRIsNull; - property CANTIDAD : Currency read GetCANTIDADValue write SetCANTIDADValue; - property CANTIDADIsNull : Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; - property OldCANTIDAD : Currency read GetOldCANTIDADValue; - property OldCANTIDADIsNull : Boolean read GetOldCANTIDADIsNull; - property ID_ALMACEN_RESERVA : Integer read GetID_ALMACEN_RESERVAValue write SetID_ALMACEN_RESERVAValue; - property ID_ALMACEN_RESERVAIsNull : Boolean read GetID_ALMACEN_RESERVAIsNull write SetID_ALMACEN_RESERVAIsNull; - property OldID_ALMACEN_RESERVA : Integer read GetOldID_ALMACEN_RESERVAValue; - property OldID_ALMACEN_RESERVAIsNull : Boolean read GetOldID_ALMACEN_RESERVAIsNull; - 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 OldNOMBRE_ALMACEN_RESERVA : String read GetOldNOMBRE_ALMACEN_RESERVAValue; - property OldNOMBRE_ALMACEN_RESERVAIsNull : Boolean read GetOldNOMBRE_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; - property OldID_EMPRESA_ALMACEN_RESERVA : Integer read GetOldID_EMPRESA_ALMACEN_RESERVAValue; - property OldID_EMPRESA_ALMACEN_RESERVAIsNull : Boolean read GetOldID_EMPRESA_ALMACEN_RESERVAIsNull; + property REFERENCIA_ALB : String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue; + property REFERENCIA_ALBIsNull : Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull; + property OldREFERENCIA_ALB : String read GetOldREFERENCIA_ALBValue; + property OldREFERENCIA_ALBIsNull : Boolean read GetOldREFERENCIA_ALBIsNull; + property SITUACION_ALB : String read GetSITUACION_ALBValue write SetSITUACION_ALBValue; + property SITUACION_ALBIsNull : Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull; + property OldSITUACION_ALB : String read GetOldSITUACION_ALBValue; + property OldSITUACION_ALBIsNull : Boolean read GetOldSITUACION_ALBIsNull; + property FECHA_PREVISTA_ENVIO_ALB : DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue; + property FECHA_PREVISTA_ENVIO_ALBIsNull : Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull; + property OldFECHA_PREVISTA_ENVIO_ALB : DateTime read GetOldFECHA_PREVISTA_ENVIO_ALBValue; + property OldFECHA_PREVISTA_ENVIO_ALBIsNull : Boolean read GetOldFECHA_PREVISTA_ENVIO_ALBIsNull; + property ID_ALMACEN_ALB : Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue; + property ID_ALMACEN_ALBIsNull : Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull; + property OldID_ALMACEN_ALB : Integer read GetOldID_ALMACEN_ALBValue; + property OldID_ALMACEN_ALBIsNull : Boolean read GetOldID_ALMACEN_ALBIsNull; + property ALMACEN_ALB : String read GetALMACEN_ALBValue write SetALMACEN_ALBValue; + property ALMACEN_ALBIsNull : Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull; + property OldALMACEN_ALB : String read GetOldALMACEN_ALBValue; + property OldALMACEN_ALBIsNull : Boolean read GetOldALMACEN_ALBIsNull; + property ID_CLIENTE_ALB : Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue; + property ID_CLIENTE_ALBIsNull : Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull; + property OldID_CLIENTE_ALB : Integer read GetOldID_CLIENTE_ALBValue; + property OldID_CLIENTE_ALBIsNull : Boolean read GetOldID_CLIENTE_ALBIsNull; + property CLIENTE_ALB : String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue; + property CLIENTE_ALBIsNull : Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull; + property OldCLIENTE_ALB : String read GetOldCLIENTE_ALBValue; + property OldCLIENTE_ALBIsNull : Boolean read GetOldCLIENTE_ALBIsNull; + property ID_ART : Integer read GetID_ARTValue write SetID_ARTValue; + property ID_ARTIsNull : Boolean read GetID_ARTIsNull write SetID_ARTIsNull; + property OldID_ART : Integer read GetOldID_ARTValue; + property OldID_ARTIsNull : Boolean read GetOldID_ARTIsNull; + property FAMILIA_ART : String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue; + property FAMILIA_ARTIsNull : Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull; + property OldFAMILIA_ART : String read GetOldFAMILIA_ARTValue; + property OldFAMILIA_ARTIsNull : Boolean read GetOldFAMILIA_ARTIsNull; + property REFERENCIA_ART : String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue; + property REFERENCIA_ARTIsNull : Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull; + property OldREFERENCIA_ART : String read GetOldREFERENCIA_ARTValue; + property OldREFERENCIA_ARTIsNull : Boolean read GetOldREFERENCIA_ARTIsNull; + property REFERENCIA_PROV_ART : String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue; + property REFERENCIA_PROV_ARTIsNull : Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull; + property OldREFERENCIA_PROV_ART : String read GetOldREFERENCIA_PROV_ARTValue; + property OldREFERENCIA_PROV_ARTIsNull : Boolean read GetOldREFERENCIA_PROV_ARTIsNull; + property DESCRIPCION_ART : String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue; + property DESCRIPCION_ARTIsNull : Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull; + property OldDESCRIPCION_ART : String read GetOldDESCRIPCION_ARTValue; + property OldDESCRIPCION_ARTIsNull : Boolean read GetOldDESCRIPCION_ARTIsNull; + property CANTIDAD_ART : Currency read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue; + property CANTIDAD_ARTIsNull : Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull; + property OldCANTIDAD_ART : Currency read GetOldCANTIDAD_ARTValue; + property OldCANTIDAD_ARTIsNull : Boolean read GetOldCANTIDAD_ARTIsNull; public constructor Create(aBusinessProcessor: TDABusinessProcessor); override; @@ -1235,35 +1211,35 @@ begin inherited; end; -function TDetalleReservasBusinessProcessorRules.GetIDValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetID_ALBValue: Integer; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetIDIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetID_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldIDValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetOldID_ALBValue: Integer; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldIDIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldID_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetIDValue(const aValue: Integer); +procedure TDetalleReservasBusinessProcessorRules.SetID_ALBValue(const aValue: Integer); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetIDIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetID_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALB] := Null; end; function TDetalleReservasBusinessProcessorRules.GetID_EMPRESAValue: Integer; @@ -1297,469 +1273,407 @@ begin BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetID_ALMACENValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetID_ALMACENIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACENValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACENIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACENValue(const aValue: Integer); +procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_ALBValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACENIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetNOMBRE_ALMACENValue: String; +function TDetalleReservasBusinessProcessorRules.GetSITUACION_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasSITUACION_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetNOMBRE_ALMACENIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetSITUACION_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasSITUACION_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACENValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldSITUACION_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasSITUACION_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACENIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldSITUACION_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasSITUACION_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetNOMBRE_ALMACENValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetSITUACION_ALBValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasSITUACION_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetNOMBRE_ALMACENIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetSITUACION_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasSITUACION_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetFECHA_RESERVAValue: DateTime; +function TDetalleReservasBusinessProcessorRules.GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetFECHA_RESERVAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldFECHA_RESERVAValue: DateTime; +function TDetalleReservasBusinessProcessorRules.GetOldFECHA_PREVISTA_ENVIO_ALBValue: DateTime; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFECHA_RESERVA]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldFECHA_RESERVAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFECHA_RESERVA]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetFECHA_RESERVAValue(const aValue: DateTime); +procedure TDetalleReservasBusinessProcessorRules.SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetFECHA_RESERVAIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_PREVISTA_ENVIO_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetCAUSA_RESERVAValue: String; +function TDetalleReservasBusinessProcessorRules.GetID_ALMACEN_ALBValue: Integer; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetCAUSA_RESERVAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetID_ALMACEN_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldCAUSA_RESERVAValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACEN_ALBValue: Integer; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCAUSA_RESERVA]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldCAUSA_RESERVAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACEN_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCAUSA_RESERVA]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetCAUSA_RESERVAValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACEN_ALBValue(const aValue: Integer); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetCAUSA_RESERVAIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACEN_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetID_ARTICULOValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetALMACEN_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasALMACEN_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetID_ARTICULOIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetALMACEN_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasALMACEN_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldID_ARTICULOValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetOldALMACEN_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ARTICULO]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasALMACEN_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldID_ARTICULOIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldALMACEN_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ARTICULO]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasALMACEN_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer); +procedure TDetalleReservasBusinessProcessorRules.SetALMACEN_ALBValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasALMACEN_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetID_ARTICULOIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetALMACEN_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasALMACEN_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetREFERENCIAValue: String; +function TDetalleReservasBusinessProcessorRules.GetID_CLIENTE_ALBValue: Integer; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_CLIENTE_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetREFERENCIAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetID_CLIENTE_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_CLIENTE_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIAValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldID_CLIENTE_ALBValue: Integer; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_CLIENTE_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldID_CLIENTE_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_CLIENTE_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIAValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetID_CLIENTE_ALBValue(const aValue: Integer); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_CLIENTE_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetID_CLIENTE_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_CLIENTE_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetDESCRIPCIONValue: String; +function TDetalleReservasBusinessProcessorRules.GetCLIENTE_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCLIENTE_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetCLIENTE_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCLIENTE_ALB]); end; -function TDetalleReservasBusinessProcessorRules.GetOldDESCRIPCIONValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldCLIENTE_ALBValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasDESCRIPCION]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCLIENTE_ALB]; end; -function TDetalleReservasBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldCLIENTE_ALBIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasDESCRIPCION]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCLIENTE_ALB]); end; -procedure TDetalleReservasBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetCLIENTE_ALBValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCLIENTE_ALB] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetCLIENTE_ALBIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCLIENTE_ALB] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetFAMILIAValue: String; +function TDetalleReservasBusinessProcessorRules.GetID_ARTValue: Integer; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetFAMILIAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetID_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ART]); end; -function TDetalleReservasBusinessProcessorRules.GetOldFAMILIAValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldID_ARTValue: Integer; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFAMILIA]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetOldFAMILIAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldID_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFAMILIA]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ART]); end; -procedure TDetalleReservasBusinessProcessorRules.SetFAMILIAValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetID_ARTValue(const aValue: Integer); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ART] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetFAMILIAIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetID_ARTIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ART] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetUNIDAD_MEDIDAValue: String; +function TDetalleReservasBusinessProcessorRules.GetFAMILIA_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetUNIDAD_MEDIDAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetFAMILIA_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA_ART]); end; -function TDetalleReservasBusinessProcessorRules.GetOldUNIDAD_MEDIDAValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldFAMILIA_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasUNIDAD_MEDIDA]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFAMILIA_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetOldUNIDAD_MEDIDAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldFAMILIA_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasUNIDAD_MEDIDA]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFAMILIA_ART]); end; -procedure TDetalleReservasBusinessProcessorRules.SetUNIDAD_MEDIDAValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetFAMILIA_ARTValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA_ART] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetUNIDAD_MEDIDAIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetFAMILIA_ARTIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA_ART] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetFABRICANTEValue: String; +function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetFABRICANTEIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ART]); end; -function TDetalleReservasBusinessProcessorRules.GetOldFABRICANTEValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFABRICANTE]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetOldFABRICANTEIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFABRICANTE]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_ART]); end; -procedure TDetalleReservasBusinessProcessorRules.SetFABRICANTEValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_ARTValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ART] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetFABRICANTEIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_ARTIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_ART] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_FABRValue: String; +function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_PROV_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_PROV_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_FABRIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_PROV_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_PROV_ART]); end; -function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_FABRValue: String; +function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_PROV_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_FABR]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_PROV_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_FABRIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_PROV_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_FABR]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_PROV_ART]); end; -procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_FABRValue(const aValue: String); +procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_PROV_ARTValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_PROV_ART] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_FABRIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_PROV_ART] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetCANTIDADValue: Currency; +function TDetalleReservasBusinessProcessorRules.GetDESCRIPCION_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetCANTIDADIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetDESCRIPCION_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION_ART]); end; -function TDetalleReservasBusinessProcessorRules.GetOldCANTIDADValue: Currency; +function TDetalleReservasBusinessProcessorRules.GetOldDESCRIPCION_ARTValue: String; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCANTIDAD]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasDESCRIPCION_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetOldCANTIDADIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldDESCRIPCION_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCANTIDAD]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasDESCRIPCION_ART]); end; -procedure TDetalleReservasBusinessProcessorRules.SetCANTIDADValue(const aValue: Currency); +procedure TDetalleReservasBusinessProcessorRules.SetDESCRIPCION_ARTValue(const aValue: String); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION_ART] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetCANTIDADIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetDESCRIPCION_ARTIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION_ART] := Null; end; -function TDetalleReservasBusinessProcessorRules.GetID_ALMACEN_RESERVAValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetCANTIDAD_ARTValue: Currency; begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA]; + result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetID_ALMACEN_RESERVAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetCANTIDAD_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA]); + result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD_ART]); end; -function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACEN_RESERVAValue: Integer; +function TDetalleReservasBusinessProcessorRules.GetOldCANTIDAD_ARTValue: Currency; begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN_RESERVA]; + result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCANTIDAD_ART]; end; -function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACEN_RESERVAIsNull: Boolean; +function TDetalleReservasBusinessProcessorRules.GetOldCANTIDAD_ARTIsNull: Boolean; begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN_RESERVA]); + result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCANTIDAD_ART]); end; -procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACEN_RESERVAValue(const aValue: Integer); +procedure TDetalleReservasBusinessProcessorRules.SetCANTIDAD_ARTValue(const aValue: Currency); begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA] := aValue; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD_ART] := aValue; end; -procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean); +procedure TDetalleReservasBusinessProcessorRules.SetCANTIDAD_ARTIsNull(const aValue: Boolean); begin if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA] := Null; -end; - -function TDetalleReservasBusinessProcessorRules.GetNOMBRE_ALMACEN_RESERVAValue: String; -begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA]; -end; - -function TDetalleReservasBusinessProcessorRules.GetNOMBRE_ALMACEN_RESERVAIsNull: Boolean; -begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA]); -end; - -function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACEN_RESERVAValue: String; -begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA]; -end; - -function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACEN_RESERVAIsNull: Boolean; -begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA]); -end; - -procedure TDetalleReservasBusinessProcessorRules.SetNOMBRE_ALMACEN_RESERVAValue(const aValue: String); -begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA] := aValue; -end; - -procedure TDetalleReservasBusinessProcessorRules.SetNOMBRE_ALMACEN_RESERVAIsNull(const aValue: Boolean); -begin - if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA] := Null; -end; - -function TDetalleReservasBusinessProcessorRules.GetID_EMPRESA_ALMACEN_RESERVAValue: Integer; -begin - result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA]; -end; - -function TDetalleReservasBusinessProcessorRules.GetID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean; -begin - result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA]); -end; - -function TDetalleReservasBusinessProcessorRules.GetOldID_EMPRESA_ALMACEN_RESERVAValue: Integer; -begin - result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA]; -end; - -function TDetalleReservasBusinessProcessorRules.GetOldID_EMPRESA_ALMACEN_RESERVAIsNull: Boolean; -begin - result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA]); -end; - -procedure TDetalleReservasBusinessProcessorRules.SetID_EMPRESA_ALMACEN_RESERVAValue(const aValue: Integer); -begin - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA] := aValue; -end; - -procedure TDetalleReservasBusinessProcessorRules.SetID_EMPRESA_ALMACEN_RESERVAIsNull(const aValue: Boolean); -begin - if aValue then - BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA] := Null; + BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD_ART] := Null; end; diff --git a/Source/Modulos/Inventario/Servidor/srvInventario_Impl.dfm b/Source/Modulos/Inventario/Servidor/srvInventario_Impl.dfm index f8c4b28..1993e63 100644 --- a/Source/Modulos/Inventario/Servidor/srvInventario_Impl.dfm +++ b/Source/Modulos/Inventario/Servidor/srvInventario_Impl.dfm @@ -255,78 +255,70 @@ object srvInventario: TsrvInventario StatementType = stAutoSQL ColumnMappings = < item - DatasetField = 'ID' - TableField = 'ID' + DatasetField = 'ID_ALB' + TableField = 'ID_ALB' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item - DatasetField = 'ID_ALMACEN' - TableField = 'ID_ALMACEN' + DatasetField = 'REFERENCIA_ALB' + TableField = 'REFERENCIA_ALB' end item - DatasetField = 'NOMBRE_ALMACEN' - TableField = 'NOMBRE_ALMACEN' + DatasetField = 'SITUACION_ALB' + TableField = 'SITUACION_ALB' end item - DatasetField = 'FECHA_RESERVA' - TableField = 'FECHA_RESERVA' + DatasetField = 'FECHA_PREVISTA_ENVIO_ALB' + TableField = 'FECHA_PREVISTA_ENVIO_ALB' end item - DatasetField = 'CAUSA_RESERVA' - TableField = 'CAUSA_RESERVA' + DatasetField = 'ID_ALMACEN_ALB' + TableField = 'ID_ALMACEN_ALB' end item - DatasetField = 'ID_ARTICULO' - TableField = 'ID_ARTICULO' + DatasetField = 'ALMACEN_ALB' + TableField = 'ALMACEN_ALB' end item - DatasetField = 'REFERENCIA' - TableField = 'REFERENCIA' + DatasetField = 'ID_CLIENTE_ALB' + TableField = 'ID_CLIENTE_ALB' end item - DatasetField = 'DESCRIPCION' - TableField = 'DESCRIPCION' + DatasetField = 'CLIENTE_ALB' + TableField = 'CLIENTE_ALB' end item - DatasetField = 'FAMILIA' - TableField = 'FAMILIA' + DatasetField = 'ID_ART' + TableField = 'ID_ART' end item - DatasetField = 'UNIDAD_MEDIDA' - TableField = 'UNIDAD_MEDIDA' + DatasetField = 'FAMILIA_ART' + TableField = 'FAMILIA_ART' end item - DatasetField = 'FABRICANTE' - TableField = 'FABRICANTE' + DatasetField = 'REFERENCIA_ART' + TableField = 'REFERENCIA_ART' end item - DatasetField = 'REFERENCIA_FABR' - TableField = 'REFERENCIA_FABR' + DatasetField = 'REFERENCIA_PROV_ART' + TableField = 'REFERENCIA_PROV_ART' end item - DatasetField = 'CANTIDAD' - TableField = 'CANTIDAD' + DatasetField = 'DESCRIPCION_ART' + TableField = 'DESCRIPCION_ART' end item - DatasetField = 'ID_ALMACEN_RESERVA' - TableField = 'ID_ALMACEN_RESERVA' - end - item - DatasetField = 'NOMBRE_ALMACEN_RESERVA' - TableField = 'NOMBRE_ALMACEN_RESERVA' - end - item - DatasetField = 'ID_EMPRESA_ALMACEN_RESERVA' - TableField = 'ID_EMPRESA_ALMACEN_RESERVA' + DatasetField = 'CANTIDAD_ART' + TableField = 'CANTIDAD_ART' end> end> Name = 'DetalleReservas' Fields = < item - Name = 'ID' + Name = 'ID_ALB' DataType = datInteger end item @@ -334,73 +326,64 @@ object srvInventario: TsrvInventario DataType = datInteger end item - Name = 'ID_ALMACEN' - DataType = datInteger - end - item - Name = 'NOMBRE_ALMACEN' + Name = 'REFERENCIA_ALB' DataType = datString Size = 255 end item - Name = 'FECHA_RESERVA' + Name = 'SITUACION_ALB' + DataType = datString + Size = 9 + end + item + Name = 'FECHA_PREVISTA_ENVIO_ALB' DataType = datDateTime end item - Name = 'CAUSA_RESERVA' - DataType = datString - Size = 2000 - end - item - Name = 'ID_ARTICULO' + Name = 'ID_ALMACEN_ALB' DataType = datInteger end item - Name = 'REFERENCIA' + Name = 'ALMACEN_ALB' DataType = datString Size = 255 end item - Name = 'DESCRIPCION' + Name = 'ID_CLIENTE_ALB' + DataType = datInteger + end + item + Name = 'CLIENTE_ALB' DataType = datString Size = 255 end item - Name = 'FAMILIA' + Name = 'ID_ART' + DataType = datInteger + end + item + Name = 'FAMILIA_ART' DataType = datString Size = 255 end item - Name = 'UNIDAD_MEDIDA' + Name = 'REFERENCIA_ART' DataType = datString Size = 255 end item - Name = 'FABRICANTE' + Name = 'REFERENCIA_PROV_ART' DataType = datString Size = 255 end item - Name = 'REFERENCIA_FABR' + Name = 'DESCRIPCION_ART' DataType = datString Size = 255 end item - Name = 'CANTIDAD' + Name = 'CANTIDAD_ART' 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> JoinDataTables = <> diff --git a/Source/Modulos/Inventario/Views/uEditorDetalleReservas.dfm b/Source/Modulos/Inventario/Views/uEditorDetalleReservas.dfm index ddc0069..30b3e8c 100644 --- a/Source/Modulos/Inventario/Views/uEditorDetalleReservas.dfm +++ b/Source/Modulos/Inventario/Views/uEditorDetalleReservas.dfm @@ -42,7 +42,7 @@ inherited fEditorDetalleReservas: TfEditorDetalleReservas Width = 669 ExplicitWidth = 669 inherited tbxMain: TTBXToolbar - ExplicitWidth = 501 + ExplicitWidth = 358 object TBXSeparatorItem84: TTBXSeparatorItem [6] end object TBXItem54: TTBXItem [7] @@ -88,7 +88,6 @@ inherited fEditorDetalleReservas: TfEditorDetalleReservas DockPos = 264 Visible = True ExplicitLeft = 269 - ExplicitWidth = 209 object TBXItem39: TTBXItem Action = actTrasladarReservados end @@ -277,11 +276,15 @@ inherited fEditorDetalleReservas: TfEditorDetalleReservas object actCancelarReserva: TAction Category = 'Reservas' Caption = 'Cancelar reserva' + Enabled = False + Visible = False OnExecute = actCancelarReservaExecute end object actTrasladarReservados: TAction Category = 'Reservas' Caption = 'Trasladar al destino' + Enabled = False + Visible = False OnExecute = actTrasladarReservadosExecute end end diff --git a/Source/Modulos/Inventario/Views/uEditorInventario.dfm b/Source/Modulos/Inventario/Views/uEditorInventario.dfm index 02edd72..3fcd51a 100644 --- a/Source/Modulos/Inventario/Views/uEditorInventario.dfm +++ b/Source/Modulos/Inventario/Views/uEditorInventario.dfm @@ -83,7 +83,7 @@ inherited fEditorInventario: TfEditorInventario Width = 669 ExplicitWidth = 669 inherited tbxMain: TTBXToolbar - ExplicitWidth = 669 + ExplicitWidth = 668 object TBXSeparatorItem84: TTBXSeparatorItem [6] end object TBXItem54: TTBXItem [7] @@ -340,7 +340,9 @@ inherited fEditorInventario: TfEditorInventario object actReservar: TAction Category = 'Logistica' Caption = 'Reservar' + Enabled = False ImageIndex = 25 + Visible = False OnExecute = actReservarExecute OnUpdate = actReservarUpdate end diff --git a/Source/Modulos/Inventario/Views/uViewDetalleReservas.dfm b/Source/Modulos/Inventario/Views/uViewDetalleReservas.dfm index c5a4506..1665ea2 100644 --- a/Source/Modulos/Inventario/Views/uViewDetalleReservas.dfm +++ b/Source/Modulos/Inventario/Views/uViewDetalleReservas.dfm @@ -45,7 +45,7 @@ inherited frViewDetalleReservas: TfrViewDetalleReservas item Format = '0 Reservados' Kind = skSum - Column = cxGridViewCANTIDAD + Column = cxGridViewCANTIDAD_ART end> OptionsCustomize.ColumnHidingOnGrouping = False OptionsCustomize.GroupBySorting = True @@ -54,72 +54,58 @@ inherited frViewDetalleReservas: TfrViewDetalleReservas Visible = False VisibleForCustomization = False end - object cxGridViewFECHA_RESERVA: TcxGridDBColumn - Caption = 'Fecha de reserva' - DataBinding.FieldName = 'FECHA_RESERVA' - 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' + object cxGridViewREFERENCIA_ALB: TcxGridDBColumn + Caption = 'Ref. Albar'#225'n' + DataBinding.FieldName = 'REFERENCIA_ALB' SortIndex = 0 SortOrder = soAscending end - object cxGridViewDESCRIPCION: TcxGridDBColumn - Caption = 'Descripci'#243'n' - DataBinding.FieldName = 'DESCRIPCION' + object cxGridViewSITUACION_ALB: TcxGridDBColumn + Caption = 'Situaci'#243'n' + DataBinding.FieldName = 'SITUACION_ALB' end - object cxGridViewFAMILIA: TcxGridDBColumn - Caption = 'Familia' - DataBinding.FieldName = 'FAMILIA' + object cxGridViewFECHA_PREVISTA_ENVIO_ALB: TcxGridDBColumn + Caption = 'Fecha prevista de env'#237'o' + DataBinding.FieldName = 'FECHA_PREVISTA_ENVIO_ALB' end - object cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn - Caption = 'Unidad de medida' - DataBinding.FieldName = 'UNIDAD_MEDIDA' + object cxGridViewID_ALMACEN_ALB: TcxGridDBColumn + DataBinding.FieldName = 'ID_ALMACEN_ALB' Visible = False VisibleForCustomization = False end - object cxGridViewFABRICANTE: TcxGridDBColumn - Caption = 'Fabricante' - DataBinding.FieldName = 'FABRICANTE' + object cxGridViewALMACEN_ALB: TcxGridDBColumn + Caption = 'Almac'#233'n' + DataBinding.FieldName = 'ALMACEN_ALB' end - object cxGridViewREFERENCIA_FABR: TcxGridDBColumn - Caption = 'Ref. fabricante' - DataBinding.FieldName = 'REFERENCIA_FABR' + object cxGridViewCLIENTE_ALB: TcxGridDBColumn + Caption = 'Cliente' + DataBinding.FieldName = 'CLIENTE_ALB' + Visible = False + VisibleForCustomization = False 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' - DataBinding.FieldName = 'CANTIDAD' + DataBinding.FieldName = 'CANTIDAD_ART' PropertiesClassName = 'TcxSpinEditProperties' Properties.Alignment.Horz = taRightJustify FooterAlignmentHorz = taRightJustify 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 object cxGridDBTableView1: TcxGridDBTableView [1] NavigatorButtons.ConfirmDelete = False @@ -168,10 +154,15 @@ inherited frViewDetalleReservas: TfrViewDetalleReservas StyleFocused.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 383 + ExplicitWidth = 215 + Width = 215 end end end end + inherited pnlAgrupaciones: TTBXDockablePanel + ExplicitWidth = 607 + end object pnlAlmacenes: TPanel [3] Left = 0 Top = 102 diff --git a/Source/Modulos/Inventario/Views/uViewDetalleReservas.pas b/Source/Modulos/Inventario/Views/uViewDetalleReservas.pas index 9a32a36..d69d15e 100644 --- a/Source/Modulos/Inventario/Views/uViewDetalleReservas.pas +++ b/Source/Modulos/Inventario/Views/uViewDetalleReservas.pas @@ -15,7 +15,7 @@ uses cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid, uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, cxCurrencyEdit, uAlmacenesController, - uDAInterfaces, cxContainer, cxMaskEdit, cxDropDownEdit; + uDAInterfaces, cxContainer, cxMaskEdit, cxDropDownEdit, uCustomView, uViewBase; type IViewDetalleReservas = interface(IViewGrid) @@ -41,20 +41,17 @@ type PngImageList: TPngImageList; cxStyleArticuloSinStock: TcxStyle; cxGridViewRecID: TcxGridDBColumn; - cxGridViewFECHA_RESERVA: TcxGridDBColumn; - cxGridViewCAUSA_RESERVA: TcxGridDBColumn; - cxGridViewID_ALMACEN: TcxGridDBColumn; - cxGridViewALMACEN: TcxGridDBColumn; - cxGridViewID_ARTICULO: TcxGridDBColumn; - cxGridViewFAMILIA: TcxGridDBColumn; - cxGridViewREFERENCIA: TcxGridDBColumn; - cxGridViewDESCRIPCION: TcxGridDBColumn; - cxGridViewCANTIDAD: TcxGridDBColumn; - cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn; - cxGridViewFABRICANTE: TcxGridDBColumn; - cxGridViewREFERENCIA_FABR: TcxGridDBColumn; - cxGridViewID_ALMACEN_RESERVA: TcxGridDBColumn; - cxGridViewALMACEN_RESERVA: TcxGridDBColumn; + cxGridViewFECHA_PREVISTA_ENVIO_ALB: TcxGridDBColumn; + cxGridViewSITUACION_ALB: TcxGridDBColumn; + cxGridViewID_ALMACEN_ALB: TcxGridDBColumn; + cxGridViewALMACEN_ALB: TcxGridDBColumn; + cxGridViewFAMILIA_ART: TcxGridDBColumn; + cxGridViewREFERENCIA_ALB: TcxGridDBColumn; + cxGridViewDESCRIPCION_ART: TcxGridDBColumn; + cxGridViewCANTIDAD_ART: TcxGridDBColumn; + cxGridViewCLIENTE_ALB: TcxGridDBColumn; + cxGridViewREFERENCIA_PROV_ART: TcxGridDBColumn; + cxGridViewREFERENCIA_ART: TcxGridDBColumn; pnlAlmacenes: TPanel; eAlmacen: TLabel; cxListaAlmacenesObras: TcxComboBox; @@ -119,11 +116,11 @@ begin if not VarIsNull(CodigoAlmacen) then begin - FFiltro.AddItem(cxGridViewID_ALMACEN, foEqual, CodigoAlmacen, CodigoAlmacen); - cxGridViewALMACEN.Visible := False; + FFiltro.AddItem(cxGridViewID_ALMACEN_ALB, foEqual, CodigoAlmacen, CodigoAlmacen); + cxGridViewALMACEN_ALB.Visible := False; end else - cxGridViewALMACEN.Visible := True; + cxGridViewALMACEN_ALB.Visible := True; end; procedure TfrViewDetalleReservas.AnadirOtrosFiltros; diff --git a/Source/Servidor/FactuGES_Server.dpr b/Source/Servidor/FactuGES_Server.dpr index 412b733..042c2dd 100644 --- a/Source/Servidor/FactuGES_Server.dpr +++ b/Source/Servidor/FactuGES_Server.dpr @@ -131,8 +131,6 @@ uses uRptRemesasProveedor_Server in '..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas' {RptRemesasProveedor: TDataModule}, schPedidosProveedorClient_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_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', schFacturasClienteServer_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas', 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', schInformesServer_Intf in '..\Modulos\Informes base\Model\schInformesServer_Intf.pas', 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 ..\Servicios\RODLFile.res} diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj index 99eb21b..3c8508b 100644 --- a/Source/Servidor/FactuGES_Server.dproj +++ b/Source/Servidor/FactuGES_Server.dproj @@ -1,405 +1,405 @@ - + - - {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} - FactuGES_Server.dpr - Debug - AnyCPU - DCC32 - ..\..\Output\Debug\Servidor\FactuGES_Server.exe - 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 - - - 7.0 - False - False - 0 - 3 - ..\..\Output\Release\Servidor - RELEASE - - - 7.0 - 3 - ..\..\Output\Debug\Servidor - DEBUG; - True - True - True - C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - - - Delphi.Personality - - - FalseTrueFalse/standaloneTrueFalse4140FalseFalseFalseFalseFalse308212524.1.4.04.1.4.0martes, 01 de marzo de 2011 18:10 - ExpressPrinting System by Developer Express Inc. - FactuGES_Server.dprFalse - - - - - MainSource - - - - - -
srvEmpresas
- TDARemoteService - - -
srvProvinciasPoblaciones_Impl
- TDataModule - - - - -
srvUsuarios
- TDataAbstractService - - - - - - - - -
RptAlbaranesCliente
- TDataModule - - -
RptWordAlbaranCliente
- TDataModule - - -
srvAlbaranesCliente
- TDataAbstractService - - - - - -
RptAlbaranesProveedor
- TDataModule - - -
RptWordAlbaranProveedor
- TDataModule - - -
srvAlbaranesProveedor
- TDataAbstractService - - - - -
srvAlmacenes
- TDARemoteService - - - - - -
srvArticulos
- TDARemoteService - - - - - -
RptComisiones
- TDataModule - - -
srvComisiones
- TDataAbstractService - - - - - - - - - -
RptEtiquetasContacto
- TDataModule - - -
RptFichasEmpleado
- TDataModule - - -
srvContactos
- TDARemoteService - - - - -
srvFabricantes
- TDataAbstractService - - - - - -
RptFacturasCliente
- TDataModule - - -
RptWordFacturaCliente
- TDataModule - - -
srvFacturasCliente
- TDataAbstractService - - - - - -
RptFacturasProveedor
- TDataModule - - -
srvFacturasProveedor
- TDataAbstractService - - - - -
srvFamilias
- TDataAbstractService - - - - -
srvFormasPago
- TDataAbstractService - - -
srvGestorDocumentos
- TDataAbstractService - - -
srvGestorInformes
- TDataAbstractService - - - - -
srvHistoricoMovimientos
- TDataAbstractService - - - - -
srvImpresiones
- TDARemoteService - - -
srvInfMargenArticulo
- TDARemoteService - - -
srvInfVentasArticulo
- TDataAbstractService - - - - -
srvInformes
- TDataAbstractService - - - - -
srvInventario
- TDataAbstractService - - - - - -
srvObras
- TDataAbstractService - - - - - -
RptPedidosProveedor
- TDataModule - - -
RptWordPedidoProveedor
- TDataModule - - -
srvPedidosProveedor
- TDataAbstractService - - - - - -
RptPedidosCliente
- TDataModule - - -
srvPedidosCliente
- TDataAbstractService - - - - - -
RptPresupuestosCliente
- TDataModule - - -
RptWordCertificadoTrabajo
- TDataModule - - -
RptWordPresupuestoCliente
- TDataModule - - -
srvPresupuestosCliente
- TDataAbstractService - - - - -
RptRecibosCliente
- TDataModule - - -
srvRecibosCliente
- TDataAbstractService - - - - -
RptRecibosProveedor
- TDataModule - - -
srvRecibosProveedor
- TDataAbstractService - - - - -
srvReferencias
- TDataAbstractService - - -
srvRegistroCorreos
- TDataAbstractService - - - - - -
RptRemesasCliente
- TDataModule - - -
srvRemesasCliente
- TDataAbstractService - - - - - -
RptRemesasProveedor
- TDataModule - - -
srvRemesasProveedor
- TDataAbstractService - - - - - - - - - - -
srvTiendaWeb
- TDataAbstractService - - - - -
srvTiposIVA
- TDataAbstractService - - - - -
srvUnidadesMedida
- TDataAbstractService - - - - -
srvConfiguracion
- TDataAbstractService - - -
frConexionBD
- TFrame - - -
frConexionOSC
- TFrame - - -
frConfGeneral
- TFrame - - -
fConfiguracion
- TForm - - -
FrameConfiguracion
- TFrame - - -
srvLogin
- TDARemoteService - - -
fAcercaDe
- - -
dmServer
- TDataModule - - -
fServerForm
- - - - - - - - - - - - + + {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} + FactuGES_Server.dpr + Debug + AnyCPU + DCC32 + ..\..\Output\Debug\Servidor\FactuGES_Server.exe + 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 + + + 7.0 + False + False + 0 + 3 + ..\..\Output\Release\Servidor + RELEASE + + + 7.0 + 3 + ..\..\Output\Debug\Servidor + DEBUG; + True + True + True + C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + + + Delphi.Personality + + +FalseTrueFalse/standaloneTrueFalse4140FalseFalseFalseFalseFalse308212524.1.4.04.1.4.0martes, 01 de marzo de 2011 18:10 + ExpressPrinting System by Developer Express Inc. + FactuGES_Server.dprFalse + + + + + MainSource + + + + + +
srvEmpresas
+ TDARemoteService + + +
srvProvinciasPoblaciones_Impl
+ TDataModule + + + + +
srvUsuarios
+ TDataAbstractService + + + + + + + + +
RptAlbaranesCliente
+ TDataModule + + +
RptWordAlbaranCliente
+ TDataModule + + +
srvAlbaranesCliente
+ TDataAbstractService + + + + + +
RptAlbaranesProveedor
+ TDataModule + + +
RptWordAlbaranProveedor
+ TDataModule + + +
srvAlbaranesProveedor
+ TDataAbstractService + + + + +
srvAlmacenes
+ TDARemoteService + + + + + +
srvArticulos
+ TDARemoteService + + + + + +
RptComisiones
+ TDataModule + + +
srvComisiones
+ TDataAbstractService + + + + + + + + + +
RptEtiquetasContacto
+ TDataModule + + +
RptFichasEmpleado
+ TDataModule + + +
srvContactos
+ TDARemoteService + + + + +
srvFabricantes
+ TDataAbstractService + + + + + +
RptFacturasCliente
+ TDataModule + + +
RptWordFacturaCliente
+ TDataModule + + +
srvFacturasCliente
+ TDataAbstractService + + + + + +
RptFacturasProveedor
+ TDataModule + + +
srvFacturasProveedor
+ TDataAbstractService + + + + +
srvFamilias
+ TDataAbstractService + + + + +
srvFormasPago
+ TDataAbstractService + + +
srvGestorDocumentos
+ TDataAbstractService + + +
srvGestorInformes
+ TDataAbstractService + + + + +
srvHistoricoMovimientos
+ TDataAbstractService + + + + +
srvImpresiones
+ TDARemoteService + + +
srvInfMargenArticulo
+ TDARemoteService + + +
srvInfVentasArticulo
+ TDataAbstractService + + + + +
srvInformes
+ TDataAbstractService + + + + +
srvInventario
+ TDataAbstractService + + + + + +
srvObras
+ TDataAbstractService + + + + + +
RptPedidosProveedor
+ TDataModule + + +
RptWordPedidoProveedor
+ TDataModule + + +
srvPedidosProveedor
+ TDataAbstractService + + + + + +
RptPedidosCliente
+ TDataModule + + +
srvPedidosCliente
+ TDataAbstractService + + + + + +
RptPresupuestosCliente
+ TDataModule + + +
RptWordCertificadoTrabajo
+ TDataModule + + +
RptWordPresupuestoCliente
+ TDataModule + + +
srvPresupuestosCliente
+ TDataAbstractService + + + + +
RptRecibosCliente
+ TDataModule + + +
srvRecibosCliente
+ TDataAbstractService + + + + +
RptRecibosProveedor
+ TDataModule + + +
srvRecibosProveedor
+ TDataAbstractService + + + + +
srvReferencias
+ TDataAbstractService + + +
srvRegistroCorreos
+ TDataAbstractService + + + + + +
RptRemesasCliente
+ TDataModule + + +
srvRemesasCliente
+ TDataAbstractService + + + + + +
RptRemesasProveedor
+ TDataModule + + +
srvRemesasProveedor
+ TDataAbstractService + + + + + + + + + + +
srvTiendaWeb
+ TDataAbstractService + + + + +
srvTiposIVA
+ TDataAbstractService + + + + +
srvUnidadesMedida
+ TDataAbstractService + + + + +
srvConfiguracion
+ TDataAbstractService + + +
frConexionBD
+ TFrame + + +
frConexionOSC
+ TFrame + + +
frConfGeneral
+ TFrame + + +
fConfiguracion
+ TForm + + +
FrameConfiguracion
+ TFrame + + +
srvLogin
+ TDARemoteService + + +
fAcercaDe
+ + +
dmServer
+ TDataModule + + +
fServerForm
+ + + + + + + + + + + +