2007-11-16 20:58:56 +00:00
|
|
|
unit schInventarioClient_Intf;
|
|
|
|
|
|
|
|
|
|
interface
|
|
|
|
|
|
|
|
|
|
uses
|
2007-11-21 16:03:51 +00:00
|
|
|
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
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 }
|
2008-07-22 11:21:06 +00:00
|
|
|
RID_Inventario = '{0C73DA8F-2528-4826-B262-E5B7F28AE644}';
|
|
|
|
|
RID_DetalleReservas = '{EC76928D-0721-4595-BB59-A63FA3CD75DF}';
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
{ Data table names }
|
2007-11-21 16:03:51 +00:00
|
|
|
nme_Inventario = 'Inventario';
|
|
|
|
|
nme_DetalleReservas = 'DetalleReservas';
|
|
|
|
|
|
|
|
|
|
{ Inventario fields }
|
|
|
|
|
fld_InventarioID_ALMACEN = 'ID_ALMACEN';
|
|
|
|
|
fld_InventarioID_ARTICULO = 'ID_ARTICULO';
|
|
|
|
|
fld_InventarioALMACEN = 'ALMACEN';
|
|
|
|
|
fld_InventarioID_EMPRESA = 'ID_EMPRESA';
|
|
|
|
|
fld_InventarioREFERENCIA = 'REFERENCIA';
|
|
|
|
|
fld_InventarioFAMILIA = 'FAMILIA';
|
|
|
|
|
fld_InventarioDESCRIPCION = 'DESCRIPCION';
|
|
|
|
|
fld_InventarioSTOCK = 'STOCK';
|
|
|
|
|
fld_InventarioUNIDADES_ALMACEN = 'UNIDADES_ALMACEN';
|
|
|
|
|
fld_InventarioRESERVA = 'RESERVA';
|
|
|
|
|
fld_InventarioPENDIENTE_RECEPCION = 'PENDIENTE_RECEPCION';
|
|
|
|
|
fld_InventarioID = 'ID';
|
|
|
|
|
fld_InventarioCANTIDAD = 'CANTIDAD';
|
|
|
|
|
fld_InventarioFECHA_MOVIMIENTO = 'FECHA_MOVIMIENTO';
|
|
|
|
|
fld_InventarioCAUSA = 'CAUSA';
|
|
|
|
|
fld_InventarioTIPO = 'TIPO';
|
|
|
|
|
|
|
|
|
|
{ Inventario field indexes }
|
|
|
|
|
idx_InventarioID_ALMACEN = 0;
|
|
|
|
|
idx_InventarioID_ARTICULO = 1;
|
|
|
|
|
idx_InventarioALMACEN = 2;
|
|
|
|
|
idx_InventarioID_EMPRESA = 3;
|
|
|
|
|
idx_InventarioREFERENCIA = 4;
|
|
|
|
|
idx_InventarioFAMILIA = 5;
|
|
|
|
|
idx_InventarioDESCRIPCION = 6;
|
2008-07-22 11:21:06 +00:00
|
|
|
idx_InventarioSTOCK = 7;
|
|
|
|
|
idx_InventarioUNIDADES_ALMACEN = 8;
|
|
|
|
|
idx_InventarioRESERVA = 9;
|
|
|
|
|
idx_InventarioPENDIENTE_RECEPCION = 10;
|
|
|
|
|
idx_InventarioID = 11;
|
|
|
|
|
idx_InventarioCANTIDAD = 12;
|
|
|
|
|
idx_InventarioFECHA_MOVIMIENTO = 13;
|
|
|
|
|
idx_InventarioCAUSA = 14;
|
|
|
|
|
idx_InventarioTIPO = 15;
|
2007-11-21 16:03:51 +00:00
|
|
|
|
|
|
|
|
{ DetalleReservas fields }
|
|
|
|
|
fld_DetalleReservasID_ALB = 'ID_ALB';
|
|
|
|
|
fld_DetalleReservasID_EMPRESA = 'ID_EMPRESA';
|
|
|
|
|
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_ALB = 0;
|
|
|
|
|
idx_DetalleReservasID_EMPRESA = 1;
|
|
|
|
|
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;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
type
|
2007-11-21 16:03:51 +00:00
|
|
|
{ IInventario }
|
|
|
|
|
IInventario = interface(IDAStronglyTypedDataTable)
|
2008-07-22 11:21:06 +00:00
|
|
|
['{01E8B549-9E00-473C-8C13-6230053472A1}']
|
2007-11-16 20:58:56 +00:00
|
|
|
{ Property getters and setters }
|
|
|
|
|
function GetID_ALMACENValue: Integer;
|
|
|
|
|
procedure SetID_ALMACENValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ALMACENIsNull: Boolean;
|
|
|
|
|
procedure SetID_ALMACENIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_ARTICULOValue: Integer;
|
|
|
|
|
procedure SetID_ARTICULOValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ARTICULOIsNull: Boolean;
|
|
|
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetALMACENValue: String;
|
|
|
|
|
procedure SetALMACENValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetALMACENIsNull: Boolean;
|
|
|
|
|
procedure SetALMACENIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_EMPRESAValue: Integer;
|
|
|
|
|
procedure SetID_EMPRESAValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_EMPRESAIsNull: Boolean;
|
|
|
|
|
procedure SetID_EMPRESAIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIAValue: String;
|
|
|
|
|
procedure SetREFERENCIAValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIAIsNull: Boolean;
|
|
|
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFAMILIAValue: String;
|
|
|
|
|
procedure SetFAMILIAValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFAMILIAIsNull: Boolean;
|
|
|
|
|
procedure SetFAMILIAIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetDESCRIPCIONValue: String;
|
|
|
|
|
procedure SetDESCRIPCIONValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetDESCRIPCIONIsNull: Boolean;
|
|
|
|
|
procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
|
|
|
|
|
function GetSTOCKValue: Int64;
|
|
|
|
|
procedure SetSTOCKValue(const aValue: Int64);
|
|
|
|
|
function GetSTOCKIsNull: Boolean;
|
|
|
|
|
procedure SetSTOCKIsNull(const aValue: Boolean);
|
|
|
|
|
function GetUNIDADES_ALMACENValue: Int64;
|
|
|
|
|
procedure SetUNIDADES_ALMACENValue(const aValue: Int64);
|
|
|
|
|
function GetUNIDADES_ALMACENIsNull: Boolean;
|
|
|
|
|
procedure SetUNIDADES_ALMACENIsNull(const aValue: Boolean);
|
|
|
|
|
function GetRESERVAValue: Int64;
|
|
|
|
|
procedure SetRESERVAValue(const aValue: Int64);
|
|
|
|
|
function GetRESERVAIsNull: Boolean;
|
|
|
|
|
procedure SetRESERVAIsNull(const aValue: Boolean);
|
|
|
|
|
function GetPENDIENTE_RECEPCIONValue: Int64;
|
|
|
|
|
procedure SetPENDIENTE_RECEPCIONValue(const aValue: Int64);
|
|
|
|
|
function GetPENDIENTE_RECEPCIONIsNull: Boolean;
|
|
|
|
|
procedure SetPENDIENTE_RECEPCIONIsNull(const aValue: Boolean);
|
|
|
|
|
function GetIDValue: Integer;
|
|
|
|
|
procedure SetIDValue(const aValue: Integer);
|
|
|
|
|
function GetIDIsNull: Boolean;
|
|
|
|
|
procedure SetIDIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetCANTIDADValue: Integer;
|
|
|
|
|
procedure SetCANTIDADValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetCANTIDADIsNull: Boolean;
|
|
|
|
|
procedure SetCANTIDADIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFECHA_MOVIMIENTOValue: DateTime;
|
|
|
|
|
procedure SetFECHA_MOVIMIENTOValue(const aValue: DateTime);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFECHA_MOVIMIENTOIsNull: Boolean;
|
|
|
|
|
procedure SetFECHA_MOVIMIENTOIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetCAUSAValue: String;
|
|
|
|
|
procedure SetCAUSAValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetCAUSAIsNull: Boolean;
|
|
|
|
|
procedure SetCAUSAIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetTIPOValue: String;
|
|
|
|
|
procedure SetTIPOValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetTIPOIsNull: Boolean;
|
|
|
|
|
procedure SetTIPOIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
{ Properties }
|
|
|
|
|
property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ALMACEN: String read GetALMACENValue write SetALMACENValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ALMACENIsNull: Boolean read GetALMACENIsNull write SetALMACENIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
|
|
|
|
|
property STOCK: Int64 read GetSTOCKValue write SetSTOCKValue;
|
|
|
|
|
property STOCKIsNull: Boolean read GetSTOCKIsNull write SetSTOCKIsNull;
|
|
|
|
|
property UNIDADES_ALMACEN: Int64 read GetUNIDADES_ALMACENValue write SetUNIDADES_ALMACENValue;
|
|
|
|
|
property UNIDADES_ALMACENIsNull: Boolean read GetUNIDADES_ALMACENIsNull write SetUNIDADES_ALMACENIsNull;
|
|
|
|
|
property RESERVA: Int64 read GetRESERVAValue write SetRESERVAValue;
|
|
|
|
|
property RESERVAIsNull: Boolean read GetRESERVAIsNull write SetRESERVAIsNull;
|
|
|
|
|
property PENDIENTE_RECEPCION: Int64 read GetPENDIENTE_RECEPCIONValue write SetPENDIENTE_RECEPCIONValue;
|
|
|
|
|
property PENDIENTE_RECEPCIONIsNull: Boolean read GetPENDIENTE_RECEPCIONIsNull write SetPENDIENTE_RECEPCIONIsNull;
|
|
|
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
|
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FECHA_MOVIMIENTO: DateTime read GetFECHA_MOVIMIENTOValue write SetFECHA_MOVIMIENTOValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FECHA_MOVIMIENTOIsNull: Boolean read GetFECHA_MOVIMIENTOIsNull write SetFECHA_MOVIMIENTOIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property CAUSA: String read GetCAUSAValue write SetCAUSAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property CAUSAIsNull: Boolean read GetCAUSAIsNull write SetCAUSAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property TIPO: String read GetTIPOValue write SetTIPOValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property TIPOIsNull: Boolean read GetTIPOIsNull write SetTIPOIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
{ TInventarioDataTableRules }
|
|
|
|
|
TInventarioDataTableRules = class(TIntfObjectDADataTableRules, IInventario)
|
2007-11-16 20:58:56 +00:00
|
|
|
private
|
|
|
|
|
protected
|
|
|
|
|
{ Property getters and setters }
|
|
|
|
|
function GetID_ALMACENValue: Integer; virtual;
|
|
|
|
|
procedure SetID_ALMACENValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ALMACENIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_ALMACENIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_ARTICULOValue: Integer; virtual;
|
|
|
|
|
procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ARTICULOIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_ARTICULOIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetALMACENValue: String; virtual;
|
|
|
|
|
procedure SetALMACENValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetALMACENIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetALMACENIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_EMPRESAValue: Integer; virtual;
|
|
|
|
|
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_EMPRESAIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIAValue: String; virtual;
|
|
|
|
|
procedure SetREFERENCIAValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIAIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFAMILIAValue: String; virtual;
|
|
|
|
|
procedure SetFAMILIAValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFAMILIAIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetFAMILIAIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetDESCRIPCIONValue: String; virtual;
|
|
|
|
|
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetDESCRIPCIONIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
|
|
|
|
|
function GetSTOCKValue: Int64; virtual;
|
|
|
|
|
procedure SetSTOCKValue(const aValue: Int64); virtual;
|
|
|
|
|
function GetSTOCKIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetSTOCKIsNull(const aValue: Boolean); virtual;
|
|
|
|
|
function GetUNIDADES_ALMACENValue: Int64; virtual;
|
|
|
|
|
procedure SetUNIDADES_ALMACENValue(const aValue: Int64); virtual;
|
|
|
|
|
function GetUNIDADES_ALMACENIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetUNIDADES_ALMACENIsNull(const aValue: Boolean); virtual;
|
|
|
|
|
function GetRESERVAValue: Int64; virtual;
|
|
|
|
|
procedure SetRESERVAValue(const aValue: Int64); virtual;
|
|
|
|
|
function GetRESERVAIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetRESERVAIsNull(const aValue: Boolean); virtual;
|
|
|
|
|
function GetPENDIENTE_RECEPCIONValue: Int64; virtual;
|
|
|
|
|
procedure SetPENDIENTE_RECEPCIONValue(const aValue: Int64); virtual;
|
|
|
|
|
function GetPENDIENTE_RECEPCIONIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetPENDIENTE_RECEPCIONIsNull(const aValue: Boolean); virtual;
|
|
|
|
|
function GetIDValue: Integer; virtual;
|
|
|
|
|
procedure SetIDValue(const aValue: Integer); virtual;
|
|
|
|
|
function GetIDIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetIDIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetCANTIDADValue: Integer; virtual;
|
|
|
|
|
procedure SetCANTIDADValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetCANTIDADIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFECHA_MOVIMIENTOValue: DateTime; virtual;
|
|
|
|
|
procedure SetFECHA_MOVIMIENTOValue(const aValue: DateTime); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFECHA_MOVIMIENTOIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetFECHA_MOVIMIENTOIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetCAUSAValue: String; virtual;
|
|
|
|
|
procedure SetCAUSAValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetCAUSAIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetCAUSAIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetTIPOValue: String; virtual;
|
|
|
|
|
procedure SetTIPOValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetTIPOIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetTIPOIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
{ Properties }
|
|
|
|
|
property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ARTICULOIsNull: Boolean read GetID_ARTICULOIsNull write SetID_ARTICULOIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ALMACEN: String read GetALMACENValue write SetALMACENValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ALMACENIsNull: Boolean read GetALMACENIsNull write SetALMACENIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FAMILIAIsNull: Boolean read GetFAMILIAIsNull write SetFAMILIAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
|
|
|
|
|
property STOCK: Int64 read GetSTOCKValue write SetSTOCKValue;
|
|
|
|
|
property STOCKIsNull: Boolean read GetSTOCKIsNull write SetSTOCKIsNull;
|
|
|
|
|
property UNIDADES_ALMACEN: Int64 read GetUNIDADES_ALMACENValue write SetUNIDADES_ALMACENValue;
|
|
|
|
|
property UNIDADES_ALMACENIsNull: Boolean read GetUNIDADES_ALMACENIsNull write SetUNIDADES_ALMACENIsNull;
|
|
|
|
|
property RESERVA: Int64 read GetRESERVAValue write SetRESERVAValue;
|
|
|
|
|
property RESERVAIsNull: Boolean read GetRESERVAIsNull write SetRESERVAIsNull;
|
|
|
|
|
property PENDIENTE_RECEPCION: Int64 read GetPENDIENTE_RECEPCIONValue write SetPENDIENTE_RECEPCIONValue;
|
|
|
|
|
property PENDIENTE_RECEPCIONIsNull: Boolean read GetPENDIENTE_RECEPCIONIsNull write SetPENDIENTE_RECEPCIONIsNull;
|
|
|
|
|
property ID: Integer read GetIDValue write SetIDValue;
|
|
|
|
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FECHA_MOVIMIENTO: DateTime read GetFECHA_MOVIMIENTOValue write SetFECHA_MOVIMIENTOValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FECHA_MOVIMIENTOIsNull: Boolean read GetFECHA_MOVIMIENTOIsNull write SetFECHA_MOVIMIENTOIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property CAUSA: String read GetCAUSAValue write SetCAUSAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property CAUSAIsNull: Boolean read GetCAUSAIsNull write SetCAUSAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property TIPO: String read GetTIPOValue write SetTIPOValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property TIPOIsNull: Boolean read GetTIPOIsNull write SetTIPOIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
public
|
|
|
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
|
|
|
destructor Destroy; override;
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
{ IDetalleReservas }
|
|
|
|
|
IDetalleReservas = interface(IDAStronglyTypedDataTable)
|
2008-07-22 11:21:06 +00:00
|
|
|
['{FF881AE1-5043-485D-9E10-52B956FB4276}']
|
2007-11-16 20:58:56 +00:00
|
|
|
{ Property getters and setters }
|
|
|
|
|
function GetID_ALBValue: Integer;
|
|
|
|
|
procedure SetID_ALBValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetID_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_EMPRESAValue: Integer;
|
|
|
|
|
procedure SetID_EMPRESAValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_EMPRESAIsNull: Boolean;
|
|
|
|
|
procedure SetID_EMPRESAIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIA_ALBValue: String;
|
|
|
|
|
procedure SetREFERENCIA_ALBValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIA_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetSITUACION_ALBValue: String;
|
|
|
|
|
procedure SetSITUACION_ALBValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetSITUACION_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetSITUACION_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime;
|
|
|
|
|
procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_ALMACEN_ALBValue: Integer;
|
|
|
|
|
procedure SetID_ALMACEN_ALBValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ALMACEN_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetALMACEN_ALBValue: String;
|
|
|
|
|
procedure SetALMACEN_ALBValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetALMACEN_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetALMACEN_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_CLIENTE_ALBValue: Integer;
|
|
|
|
|
procedure SetID_CLIENTE_ALBValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_CLIENTE_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetCLIENTE_ALBValue: String;
|
|
|
|
|
procedure SetCLIENTE_ALBValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetCLIENTE_ALBIsNull: Boolean;
|
|
|
|
|
procedure SetCLIENTE_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_ARTValue: Integer;
|
|
|
|
|
procedure SetID_ARTValue(const aValue: Integer);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ARTIsNull: Boolean;
|
|
|
|
|
procedure SetID_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFAMILIA_ARTValue: String;
|
|
|
|
|
procedure SetFAMILIA_ARTValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFAMILIA_ARTIsNull: Boolean;
|
|
|
|
|
procedure SetFAMILIA_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIA_ARTValue: String;
|
|
|
|
|
procedure SetREFERENCIA_ARTValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIA_ARTIsNull: Boolean;
|
|
|
|
|
procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIA_PROV_ARTValue: String;
|
|
|
|
|
procedure SetREFERENCIA_PROV_ARTValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIA_PROV_ARTIsNull: Boolean;
|
|
|
|
|
procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetDESCRIPCION_ARTValue: String;
|
|
|
|
|
procedure SetDESCRIPCION_ARTValue(const aValue: String);
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetDESCRIPCION_ARTIsNull: Boolean;
|
|
|
|
|
procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean);
|
|
|
|
|
function GetCANTIDAD_ARTValue: Int64;
|
|
|
|
|
procedure SetCANTIDAD_ARTValue(const aValue: Int64);
|
|
|
|
|
function GetCANTIDAD_ARTIsNull: Boolean;
|
|
|
|
|
procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
{ Properties }
|
|
|
|
|
property ID_ALB: Integer read GetID_ALBValue write SetID_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ALBIsNull: Boolean read GetID_ALBIsNull write SetID_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA_ALB: String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIA_ALBIsNull: Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property SITUACION_ALB: String read GetSITUACION_ALBValue write SetSITUACION_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property SITUACION_ALBIsNull: Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FECHA_PREVISTA_ENVIO_ALB: DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FECHA_PREVISTA_ENVIO_ALBIsNull: Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_ALMACEN_ALB: Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ALMACEN_ALBIsNull: Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ALMACEN_ALB: String read GetALMACEN_ALBValue write SetALMACEN_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ALMACEN_ALBIsNull: Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_CLIENTE_ALB: Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_CLIENTE_ALBIsNull: Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property CLIENTE_ALB: String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property CLIENTE_ALBIsNull: Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_ART: Integer read GetID_ARTValue write SetID_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ARTIsNull: Boolean read GetID_ARTIsNull write SetID_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FAMILIA_ART: String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FAMILIA_ARTIsNull: Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA_ART: String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIA_ARTIsNull: Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA_PROV_ART: String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIA_PROV_ARTIsNull: Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property DESCRIPCION_ART: String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property DESCRIPCION_ARTIsNull: Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull;
|
|
|
|
|
property CANTIDAD_ART: Int64 read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue;
|
|
|
|
|
property CANTIDAD_ARTIsNull: Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
{ TDetalleReservasDataTableRules }
|
|
|
|
|
TDetalleReservasDataTableRules = class(TIntfObjectDADataTableRules, IDetalleReservas)
|
2007-11-16 20:58:56 +00:00
|
|
|
private
|
|
|
|
|
protected
|
|
|
|
|
{ Property getters and setters }
|
|
|
|
|
function GetID_ALBValue: Integer; virtual;
|
|
|
|
|
procedure SetID_ALBValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_EMPRESAValue: Integer; virtual;
|
|
|
|
|
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_EMPRESAIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIA_ALBValue: String; virtual;
|
|
|
|
|
procedure SetREFERENCIA_ALBValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIA_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetREFERENCIA_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetSITUACION_ALBValue: String; virtual;
|
|
|
|
|
procedure SetSITUACION_ALBValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetSITUACION_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetSITUACION_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime; virtual;
|
|
|
|
|
procedure SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFECHA_PREVISTA_ENVIO_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_ALMACEN_ALBValue: Integer; virtual;
|
|
|
|
|
procedure SetID_ALMACEN_ALBValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ALMACEN_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_ALMACEN_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetALMACEN_ALBValue: String; virtual;
|
|
|
|
|
procedure SetALMACEN_ALBValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetALMACEN_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetALMACEN_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_CLIENTE_ALBValue: Integer; virtual;
|
|
|
|
|
procedure SetID_CLIENTE_ALBValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_CLIENTE_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_CLIENTE_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetCLIENTE_ALBValue: String; virtual;
|
|
|
|
|
procedure SetCLIENTE_ALBValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetCLIENTE_ALBIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetCLIENTE_ALBIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetID_ARTValue: Integer; virtual;
|
|
|
|
|
procedure SetID_ARTValue(const aValue: Integer); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetID_ARTIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetID_ARTIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetFAMILIA_ARTValue: String; virtual;
|
|
|
|
|
procedure SetFAMILIA_ARTValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetFAMILIA_ARTIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetFAMILIA_ARTIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIA_ARTValue: String; virtual;
|
|
|
|
|
procedure SetREFERENCIA_ARTValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIA_ARTIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetREFERENCIA_ARTIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetREFERENCIA_PROV_ARTValue: String; virtual;
|
|
|
|
|
procedure SetREFERENCIA_PROV_ARTValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetREFERENCIA_PROV_ARTIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
function GetDESCRIPCION_ARTValue: String; virtual;
|
|
|
|
|
procedure SetDESCRIPCION_ARTValue(const aValue: String); virtual;
|
2007-11-21 16:03:51 +00:00
|
|
|
function GetDESCRIPCION_ARTIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetDESCRIPCION_ARTIsNull(const aValue: Boolean); virtual;
|
|
|
|
|
function GetCANTIDAD_ARTValue: Int64; virtual;
|
|
|
|
|
procedure SetCANTIDAD_ARTValue(const aValue: Int64); virtual;
|
|
|
|
|
function GetCANTIDAD_ARTIsNull: Boolean; virtual;
|
|
|
|
|
procedure SetCANTIDAD_ARTIsNull(const aValue: Boolean); virtual;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
{ Properties }
|
|
|
|
|
property ID_ALB: Integer read GetID_ALBValue write SetID_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ALBIsNull: Boolean read GetID_ALBIsNull write SetID_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA_ALB: String read GetREFERENCIA_ALBValue write SetREFERENCIA_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIA_ALBIsNull: Boolean read GetREFERENCIA_ALBIsNull write SetREFERENCIA_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property SITUACION_ALB: String read GetSITUACION_ALBValue write SetSITUACION_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property SITUACION_ALBIsNull: Boolean read GetSITUACION_ALBIsNull write SetSITUACION_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FECHA_PREVISTA_ENVIO_ALB: DateTime read GetFECHA_PREVISTA_ENVIO_ALBValue write SetFECHA_PREVISTA_ENVIO_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FECHA_PREVISTA_ENVIO_ALBIsNull: Boolean read GetFECHA_PREVISTA_ENVIO_ALBIsNull write SetFECHA_PREVISTA_ENVIO_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_ALMACEN_ALB: Integer read GetID_ALMACEN_ALBValue write SetID_ALMACEN_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ALMACEN_ALBIsNull: Boolean read GetID_ALMACEN_ALBIsNull write SetID_ALMACEN_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ALMACEN_ALB: String read GetALMACEN_ALBValue write SetALMACEN_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ALMACEN_ALBIsNull: Boolean read GetALMACEN_ALBIsNull write SetALMACEN_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_CLIENTE_ALB: Integer read GetID_CLIENTE_ALBValue write SetID_CLIENTE_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_CLIENTE_ALBIsNull: Boolean read GetID_CLIENTE_ALBIsNull write SetID_CLIENTE_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property CLIENTE_ALB: String read GetCLIENTE_ALBValue write SetCLIENTE_ALBValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property CLIENTE_ALBIsNull: Boolean read GetCLIENTE_ALBIsNull write SetCLIENTE_ALBIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property ID_ART: Integer read GetID_ARTValue write SetID_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property ID_ARTIsNull: Boolean read GetID_ARTIsNull write SetID_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property FAMILIA_ART: String read GetFAMILIA_ARTValue write SetFAMILIA_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property FAMILIA_ARTIsNull: Boolean read GetFAMILIA_ARTIsNull write SetFAMILIA_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA_ART: String read GetREFERENCIA_ARTValue write SetREFERENCIA_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIA_ARTIsNull: Boolean read GetREFERENCIA_ARTIsNull write SetREFERENCIA_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property REFERENCIA_PROV_ART: String read GetREFERENCIA_PROV_ARTValue write SetREFERENCIA_PROV_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property REFERENCIA_PROV_ARTIsNull: Boolean read GetREFERENCIA_PROV_ARTIsNull write SetREFERENCIA_PROV_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
property DESCRIPCION_ART: String read GetDESCRIPCION_ARTValue write SetDESCRIPCION_ARTValue;
|
2007-11-21 16:03:51 +00:00
|
|
|
property DESCRIPCION_ARTIsNull: Boolean read GetDESCRIPCION_ARTIsNull write SetDESCRIPCION_ARTIsNull;
|
|
|
|
|
property CANTIDAD_ART: Int64 read GetCANTIDAD_ARTValue write SetCANTIDAD_ARTValue;
|
|
|
|
|
property CANTIDAD_ARTIsNull: Boolean read GetCANTIDAD_ARTIsNull write SetCANTIDAD_ARTIsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
public
|
|
|
|
|
constructor Create(aDataTable: TDADataTable); override;
|
|
|
|
|
destructor Destroy; override;
|
|
|
|
|
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
implementation
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
uses Variants, uROBinaryHelpers;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
{ TInventarioDataTableRules }
|
|
|
|
|
constructor TInventarioDataTableRules.Create(aDataTable: TDADataTable);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
|
|
|
|
inherited;
|
|
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
destructor TInventarioDataTableRules.Destroy;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
|
|
|
|
inherited;
|
|
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetID_ALMACENValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioID_ALMACEN].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetID_ALMACENValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioID_ALMACEN].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetID_ALMACENIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioID_ALMACEN].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetID_ALMACENIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioID_ALMACEN].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetID_ARTICULOValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioID_ARTICULO].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioID_ARTICULO].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetID_ARTICULOIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioID_ARTICULO].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetID_ARTICULOIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioID_ARTICULO].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetALMACENValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioALMACEN].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetALMACENValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioALMACEN].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetALMACENIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioALMACEN].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetALMACENIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioALMACEN].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetID_EMPRESAValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioID_EMPRESA].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioID_EMPRESA].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetID_EMPRESAIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioID_EMPRESA].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioID_EMPRESA].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetREFERENCIAValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioREFERENCIA].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetREFERENCIAValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioREFERENCIA].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetREFERENCIAIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioREFERENCIA].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioREFERENCIA].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetFAMILIAValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioFAMILIA].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetFAMILIAValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioFAMILIA].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetFAMILIAIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioFAMILIA].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetFAMILIAIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioFAMILIA].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetDESCRIPCIONValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioDESCRIPCION].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetDESCRIPCIONValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioDESCRIPCION].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetDESCRIPCIONIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioDESCRIPCION].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioDESCRIPCION].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetSTOCKValue: Int64;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioSTOCK].AsLargeInt;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetSTOCKValue(const aValue: Int64);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioSTOCK].AsLargeInt := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetSTOCKIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioSTOCK].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetSTOCKIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioSTOCK].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetUNIDADES_ALMACENValue: Int64;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioUNIDADES_ALMACEN].AsLargeInt;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetUNIDADES_ALMACENValue(const aValue: Int64);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioUNIDADES_ALMACEN].AsLargeInt := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetUNIDADES_ALMACENIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioUNIDADES_ALMACEN].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetUNIDADES_ALMACENIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioUNIDADES_ALMACEN].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetRESERVAValue: Int64;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioRESERVA].AsLargeInt;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetRESERVAValue(const aValue: Int64);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioRESERVA].AsLargeInt := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetRESERVAIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioRESERVA].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetRESERVAIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioRESERVA].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetPENDIENTE_RECEPCIONValue: Int64;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioPENDIENTE_RECEPCION].AsLargeInt;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetPENDIENTE_RECEPCIONValue(const aValue: Int64);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioPENDIENTE_RECEPCION].AsLargeInt := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetPENDIENTE_RECEPCIONIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioPENDIENTE_RECEPCION].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetPENDIENTE_RECEPCIONIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioPENDIENTE_RECEPCION].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetIDValue: Integer;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioID].AsInteger;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetIDValue(const aValue: Integer);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioID].AsInteger := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetIDIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioID].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetIDIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioID].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetCANTIDADValue: Integer;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioCANTIDAD].AsInteger;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetCANTIDADValue(const aValue: Integer);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioCANTIDAD].AsInteger := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetCANTIDADIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioCANTIDAD].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetCANTIDADIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioCANTIDAD].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetFECHA_MOVIMIENTOValue: DateTime;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioFECHA_MOVIMIENTO].AsDateTime;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetFECHA_MOVIMIENTOValue(const aValue: DateTime);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_InventarioFECHA_MOVIMIENTO].AsDateTime := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetFECHA_MOVIMIENTOIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_InventarioFECHA_MOVIMIENTO].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetFECHA_MOVIMIENTOIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioFECHA_MOVIMIENTO].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TInventarioDataTableRules.GetCAUSAValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioCAUSA].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetCAUSAValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioCAUSA].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetCAUSAIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioCAUSA].IsNull;
|
|
|
|
|
end;
|
2007-11-16 20:58:56 +00:00
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TInventarioDataTableRules.SetCAUSAIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioCAUSA].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetTIPOValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioTIPO].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetTIPOValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_InventarioTIPO].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TInventarioDataTableRules.GetTIPOIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_InventarioTIPO].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TInventarioDataTableRules.SetTIPOIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_InventarioTIPO].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
{ TDetalleReservasDataTableRules }
|
|
|
|
|
constructor TDetalleReservasDataTableRules.Create(aDataTable: TDADataTable);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
|
|
|
|
inherited;
|
|
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
destructor TDetalleReservasDataTableRules.Destroy;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
|
|
|
|
inherited;
|
|
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetID_ALBValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_ALB].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_ALBValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_ALB].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_ALBIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_ALB].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_ALBIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_ALB].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_EMPRESAValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_EMPRESA].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_EMPRESA].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_EMPRESAIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_EMPRESA].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_EMPRESA].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetREFERENCIA_ALBValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetREFERENCIA_ALBValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetREFERENCIA_ALBIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetREFERENCIA_ALBIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasREFERENCIA_ALB].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetSITUACION_ALBValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetSITUACION_ALBValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetSITUACION_ALBIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasSITUACION_ALB].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetSITUACION_ALBIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasSITUACION_ALB].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetFECHA_PREVISTA_ENVIO_ALBValue: DateTime;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsDateTime;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetFECHA_PREVISTA_ENVIO_ALBValue(const aValue: DateTime);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsDateTime := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetFECHA_PREVISTA_ENVIO_ALBIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetFECHA_PREVISTA_ENVIO_ALBIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasFECHA_PREVISTA_ENVIO_ALB].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_ALMACEN_ALBValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_ALMACEN_ALBValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_ALMACEN_ALBIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_ALMACEN_ALBIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_ALMACEN_ALB].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetALMACEN_ALBValue: String;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsString;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetALMACEN_ALBValue(const aValue: String);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsString := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetALMACEN_ALBIsNull: boolean;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasALMACEN_ALB].IsNull;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetALMACEN_ALBIsNull(const aValue: Boolean);
|
|
|
|
|
begin
|
|
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasALMACEN_ALB].AsVariant := Null;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_CLIENTE_ALBValue: Integer;
|
|
|
|
|
begin
|
|
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsInteger;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure TDetalleReservasDataTableRules.SetID_CLIENTE_ALBValue(const aValue: Integer);
|
|
|
|
|
begin
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsInteger := aValue;
|
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
function TDetalleReservasDataTableRules.GetID_CLIENTE_ALBIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetID_CLIENTE_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_CLIENTE_ALB].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetCLIENTE_ALBValue: String;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsString;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetCLIENTE_ALBValue(const aValue: String);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsString := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetCLIENTE_ALBIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetCLIENTE_ALBIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasCLIENTE_ALB].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetID_ARTValue: Integer;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_ART].AsInteger;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetID_ARTValue(const aValue: Integer);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasID_ART].AsInteger := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetID_ARTIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasID_ART].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetID_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasID_ART].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetFAMILIA_ARTValue: String;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsString;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetFAMILIA_ARTValue(const aValue: String);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsString := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetFAMILIA_ARTIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasFAMILIA_ART].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetFAMILIA_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasFAMILIA_ART].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetREFERENCIA_ARTValue: String;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsString;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetREFERENCIA_ARTValue(const aValue: String);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsString := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetREFERENCIA_ARTIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetREFERENCIA_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasREFERENCIA_ART].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetREFERENCIA_PROV_ARTValue: String;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsString;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetREFERENCIA_PROV_ARTValue(const aValue: String);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsString := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetREFERENCIA_PROV_ARTIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetREFERENCIA_PROV_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasREFERENCIA_PROV_ART].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetDESCRIPCION_ARTValue: String;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsString;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetDESCRIPCION_ARTValue(const aValue: String);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsString := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetDESCRIPCION_ARTIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetDESCRIPCION_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasDESCRIPCION_ART].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetCANTIDAD_ARTValue: Int64;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsLargeInt;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetCANTIDAD_ARTValue(const aValue: Int64);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsLargeInt := aValue;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
function TDetalleReservasDataTableRules.GetCANTIDAD_ARTIsNull: boolean;
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
result := DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].IsNull;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
2007-11-21 16:03:51 +00:00
|
|
|
procedure TDetalleReservasDataTableRules.SetCANTIDAD_ARTIsNull(const aValue: Boolean);
|
2007-11-16 20:58:56 +00:00
|
|
|
begin
|
2007-11-21 16:03:51 +00:00
|
|
|
if aValue then
|
|
|
|
|
DataTable.Fields[idx_DetalleReservasCANTIDAD_ART].AsVariant := Null;
|
2007-11-16 20:58:56 +00:00
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
initialization
|
2007-11-21 16:03:51 +00:00
|
|
|
RegisterDataTableRules(RID_Inventario, TInventarioDataTableRules);
|
|
|
|
|
RegisterDataTableRules(RID_DetalleReservas, TDetalleReservasDataTableRules);
|
2007-11-16 20:58:56 +00:00
|
|
|
|
|
|
|
|
end.
|