unit schInventarioServer_Intf;

{$D-}
interface

uses
  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, schInventarioClient_Intf;

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 = '{DB1931D9-F42E-491B-998C-E8AC0081DFC2}';
  RID_Movimientos_Detalle_ColorDelta = '{00816D03-8F02-4E0A-9999-AF6FC7F4FB0B}';
  RID_DetalleReservasDelta = '{3E9E6CAB-DC33-43FF-9A3C-3BFEEB6FE7C4}';
  RID_Inventario_ColorDelta = '{D063845D-38A5-4EA5-A0BE-257ED7073F0C}';

type
  { IInventarioDelta }
  IInventarioDelta = interface(IInventario)
  ['{DB1931D9-F42E-491B-998C-E8AC0081DFC2}']
    { Property getters and setters }
    function GetOldID_ALMACENValue : Integer;
    function GetOldID_ARTICULOValue : Integer;
    function GetOldALMACENValue : String;
    function GetOldID_EMPRESAValue : Integer;
    function GetOldREFERENCIAValue : String;
    function GetOldFAMILIAValue : String;
    function GetOldDESCRIPCIONValue : String;
    function GetOldUNIDAD_MEDIDAValue : String;
    function GetOldCAMPOTECNICOValue : String;
    function GetOldCODIGOTECNICOValue : String;
    function GetOldDISENOTECNICOValue : String;
    function GetOldSTOCKValue : Float;
    function GetOldUNIDADES_ALMACENValue : Float;
    function GetOldRESERVAValue : Float;
    function GetOldPENDIENTE_RECEPCIONValue : Float;
    function GetOldTIPO_ALMACENValue : String;
    function GetOldIDValue : Integer;
    function GetOldCANTIDADValue : Float;
    function GetOldFECHA_MOVIMIENTOValue : DateTime;
    function GetOldCAUSAValue : String;
    function GetOldTIPOValue : String;
    function GetOldID_ALMACEN_RESERVAValue : Integer;

    { Properties }
    property OldID_ALMACEN : Integer read GetOldID_ALMACENValue;
    property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
    property OldALMACEN : String read GetOldALMACENValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property OldFAMILIA : String read GetOldFAMILIAValue;
    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
    property OldUNIDAD_MEDIDA : String read GetOldUNIDAD_MEDIDAValue;
    property OldCAMPOTECNICO : String read GetOldCAMPOTECNICOValue;
    property OldCODIGOTECNICO : String read GetOldCODIGOTECNICOValue;
    property OldDISENOTECNICO : String read GetOldDISENOTECNICOValue;
    property OldSTOCK : Float read GetOldSTOCKValue;
    property OldUNIDADES_ALMACEN : Float read GetOldUNIDADES_ALMACENValue;
    property OldRESERVA : Float read GetOldRESERVAValue;
    property OldPENDIENTE_RECEPCION : Float read GetOldPENDIENTE_RECEPCIONValue;
    property OldTIPO_ALMACEN : String read GetOldTIPO_ALMACENValue;
    property OldID : Integer read GetOldIDValue;
    property OldCANTIDAD : Float read GetOldCANTIDADValue;
    property OldFECHA_MOVIMIENTO : DateTime read GetOldFECHA_MOVIMIENTOValue;
    property OldCAUSA : String read GetOldCAUSAValue;
    property OldTIPO : String read GetOldTIPOValue;
    property OldID_ALMACEN_RESERVA : Integer read GetOldID_ALMACEN_RESERVAValue;
  end;

  { TInventarioBusinessProcessorRules }
  TInventarioBusinessProcessorRules = class(TDABusinessProcessorRules, IInventario, IInventarioDelta)
  private
  protected
    { Property getters and setters }
    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 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 GetALMACENValue: String; virtual;
    function GetALMACENIsNull: Boolean; virtual;
    function GetOldALMACENValue: String; virtual;
    function GetOldALMACENIsNull: Boolean; virtual;
    procedure SetALMACENValue(const aValue: String); virtual;
    procedure SetALMACENIsNull(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 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 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 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 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 GetCAMPOTECNICOValue: String; virtual;
    function GetCAMPOTECNICOIsNull: Boolean; virtual;
    function GetOldCAMPOTECNICOValue: String; virtual;
    function GetOldCAMPOTECNICOIsNull: Boolean; virtual;
    procedure SetCAMPOTECNICOValue(const aValue: String); virtual;
    procedure SetCAMPOTECNICOIsNull(const aValue: Boolean); virtual;
    function GetCODIGOTECNICOValue: String; virtual;
    function GetCODIGOTECNICOIsNull: Boolean; virtual;
    function GetOldCODIGOTECNICOValue: String; virtual;
    function GetOldCODIGOTECNICOIsNull: Boolean; virtual;
    procedure SetCODIGOTECNICOValue(const aValue: String); virtual;
    procedure SetCODIGOTECNICOIsNull(const aValue: Boolean); virtual;
    function GetDISENOTECNICOValue: String; virtual;
    function GetDISENOTECNICOIsNull: Boolean; virtual;
    function GetOldDISENOTECNICOValue: String; virtual;
    function GetOldDISENOTECNICOIsNull: Boolean; virtual;
    procedure SetDISENOTECNICOValue(const aValue: String); virtual;
    procedure SetDISENOTECNICOIsNull(const aValue: Boolean); virtual;
    function GetSTOCKValue: Float; virtual;
    function GetSTOCKIsNull: Boolean; virtual;
    function GetOldSTOCKValue: Float; virtual;
    function GetOldSTOCKIsNull: Boolean; virtual;
    procedure SetSTOCKValue(const aValue: Float); virtual;
    procedure SetSTOCKIsNull(const aValue: Boolean); virtual;
    function GetUNIDADES_ALMACENValue: Float; virtual;
    function GetUNIDADES_ALMACENIsNull: Boolean; virtual;
    function GetOldUNIDADES_ALMACENValue: Float; virtual;
    function GetOldUNIDADES_ALMACENIsNull: Boolean; virtual;
    procedure SetUNIDADES_ALMACENValue(const aValue: Float); virtual;
    procedure SetUNIDADES_ALMACENIsNull(const aValue: Boolean); virtual;
    function GetRESERVAValue: Float; virtual;
    function GetRESERVAIsNull: Boolean; virtual;
    function GetOldRESERVAValue: Float; virtual;
    function GetOldRESERVAIsNull: Boolean; virtual;
    procedure SetRESERVAValue(const aValue: Float); virtual;
    procedure SetRESERVAIsNull(const aValue: Boolean); virtual;
    function GetPENDIENTE_RECEPCIONValue: Float; virtual;
    function GetPENDIENTE_RECEPCIONIsNull: Boolean; virtual;
    function GetOldPENDIENTE_RECEPCIONValue: Float; virtual;
    function GetOldPENDIENTE_RECEPCIONIsNull: Boolean; virtual;
    procedure SetPENDIENTE_RECEPCIONValue(const aValue: Float); virtual;
    procedure SetPENDIENTE_RECEPCIONIsNull(const aValue: Boolean); virtual;
    function GetTIPO_ALMACENValue: String; virtual;
    function GetTIPO_ALMACENIsNull: Boolean; virtual;
    function GetOldTIPO_ALMACENValue: String; virtual;
    function GetOldTIPO_ALMACENIsNull: Boolean; virtual;
    procedure SetTIPO_ALMACENValue(const aValue: String); virtual;
    procedure SetTIPO_ALMACENIsNull(const aValue: Boolean); virtual;
    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 GetCANTIDADValue: Float; virtual;
    function GetCANTIDADIsNull: Boolean; virtual;
    function GetOldCANTIDADValue: Float; virtual;
    function GetOldCANTIDADIsNull: Boolean; virtual;
    procedure SetCANTIDADValue(const aValue: Float); virtual;
    procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MOVIMIENTOValue: DateTime; virtual;
    function GetFECHA_MOVIMIENTOIsNull: Boolean; virtual;
    function GetOldFECHA_MOVIMIENTOValue: DateTime; virtual;
    function GetOldFECHA_MOVIMIENTOIsNull: Boolean; virtual;
    procedure SetFECHA_MOVIMIENTOValue(const aValue: DateTime); virtual;
    procedure SetFECHA_MOVIMIENTOIsNull(const aValue: Boolean); virtual;
    function GetCAUSAValue: String; virtual;
    function GetCAUSAIsNull: Boolean; virtual;
    function GetOldCAUSAValue: String; virtual;
    function GetOldCAUSAIsNull: Boolean; virtual;
    procedure SetCAUSAValue(const aValue: String); virtual;
    procedure SetCAUSAIsNull(const aValue: Boolean); virtual;
    function GetTIPOValue: String; virtual;
    function GetTIPOIsNull: Boolean; virtual;
    function GetOldTIPOValue: String; virtual;
    function GetOldTIPOIsNull: Boolean; virtual;
    procedure SetTIPOValue(const aValue: String); virtual;
    procedure SetTIPOIsNull(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;

    { Properties }
    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 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 ALMACEN : String read GetALMACENValue write SetALMACENValue;
    property ALMACENIsNull : Boolean read GetALMACENIsNull write SetALMACENIsNull;
    property OldALMACEN : String read GetOldALMACENValue;
    property OldALMACENIsNull : Boolean read GetOldALMACENIsNull;
    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 REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
    property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull;
    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 DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
    property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
    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 CAMPOTECNICO : String read GetCAMPOTECNICOValue write SetCAMPOTECNICOValue;
    property CAMPOTECNICOIsNull : Boolean read GetCAMPOTECNICOIsNull write SetCAMPOTECNICOIsNull;
    property OldCAMPOTECNICO : String read GetOldCAMPOTECNICOValue;
    property OldCAMPOTECNICOIsNull : Boolean read GetOldCAMPOTECNICOIsNull;
    property CODIGOTECNICO : String read GetCODIGOTECNICOValue write SetCODIGOTECNICOValue;
    property CODIGOTECNICOIsNull : Boolean read GetCODIGOTECNICOIsNull write SetCODIGOTECNICOIsNull;
    property OldCODIGOTECNICO : String read GetOldCODIGOTECNICOValue;
    property OldCODIGOTECNICOIsNull : Boolean read GetOldCODIGOTECNICOIsNull;
    property DISENOTECNICO : String read GetDISENOTECNICOValue write SetDISENOTECNICOValue;
    property DISENOTECNICOIsNull : Boolean read GetDISENOTECNICOIsNull write SetDISENOTECNICOIsNull;
    property OldDISENOTECNICO : String read GetOldDISENOTECNICOValue;
    property OldDISENOTECNICOIsNull : Boolean read GetOldDISENOTECNICOIsNull;
    property STOCK : Float read GetSTOCKValue write SetSTOCKValue;
    property STOCKIsNull : Boolean read GetSTOCKIsNull write SetSTOCKIsNull;
    property OldSTOCK : Float read GetOldSTOCKValue;
    property OldSTOCKIsNull : Boolean read GetOldSTOCKIsNull;
    property UNIDADES_ALMACEN : Float read GetUNIDADES_ALMACENValue write SetUNIDADES_ALMACENValue;
    property UNIDADES_ALMACENIsNull : Boolean read GetUNIDADES_ALMACENIsNull write SetUNIDADES_ALMACENIsNull;
    property OldUNIDADES_ALMACEN : Float read GetOldUNIDADES_ALMACENValue;
    property OldUNIDADES_ALMACENIsNull : Boolean read GetOldUNIDADES_ALMACENIsNull;
    property RESERVA : Float read GetRESERVAValue write SetRESERVAValue;
    property RESERVAIsNull : Boolean read GetRESERVAIsNull write SetRESERVAIsNull;
    property OldRESERVA : Float read GetOldRESERVAValue;
    property OldRESERVAIsNull : Boolean read GetOldRESERVAIsNull;
    property PENDIENTE_RECEPCION : Float read GetPENDIENTE_RECEPCIONValue write SetPENDIENTE_RECEPCIONValue;
    property PENDIENTE_RECEPCIONIsNull : Boolean read GetPENDIENTE_RECEPCIONIsNull write SetPENDIENTE_RECEPCIONIsNull;
    property OldPENDIENTE_RECEPCION : Float read GetOldPENDIENTE_RECEPCIONValue;
    property OldPENDIENTE_RECEPCIONIsNull : Boolean read GetOldPENDIENTE_RECEPCIONIsNull;
    property TIPO_ALMACEN : String read GetTIPO_ALMACENValue write SetTIPO_ALMACENValue;
    property TIPO_ALMACENIsNull : Boolean read GetTIPO_ALMACENIsNull write SetTIPO_ALMACENIsNull;
    property OldTIPO_ALMACEN : String read GetOldTIPO_ALMACENValue;
    property OldTIPO_ALMACENIsNull : Boolean read GetOldTIPO_ALMACENIsNull;
    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 CANTIDAD : Float read GetCANTIDADValue write SetCANTIDADValue;
    property CANTIDADIsNull : Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
    property OldCANTIDAD : Float read GetOldCANTIDADValue;
    property OldCANTIDADIsNull : Boolean read GetOldCANTIDADIsNull;
    property FECHA_MOVIMIENTO : DateTime read GetFECHA_MOVIMIENTOValue write SetFECHA_MOVIMIENTOValue;
    property FECHA_MOVIMIENTOIsNull : Boolean read GetFECHA_MOVIMIENTOIsNull write SetFECHA_MOVIMIENTOIsNull;
    property OldFECHA_MOVIMIENTO : DateTime read GetOldFECHA_MOVIMIENTOValue;
    property OldFECHA_MOVIMIENTOIsNull : Boolean read GetOldFECHA_MOVIMIENTOIsNull;
    property CAUSA : String read GetCAUSAValue write SetCAUSAValue;
    property CAUSAIsNull : Boolean read GetCAUSAIsNull write SetCAUSAIsNull;
    property OldCAUSA : String read GetOldCAUSAValue;
    property OldCAUSAIsNull : Boolean read GetOldCAUSAIsNull;
    property TIPO : String read GetTIPOValue write SetTIPOValue;
    property TIPOIsNull : Boolean read GetTIPOIsNull write SetTIPOIsNull;
    property OldTIPO : String read GetOldTIPOValue;
    property OldTIPOIsNull : Boolean read GetOldTIPOIsNull;
    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;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IMovimientos_Detalle_ColorDelta }
  IMovimientos_Detalle_ColorDelta = interface(IMovimientos_Detalle_Color)
  ['{00816D03-8F02-4E0A-9999-AF6FC7F4FB0B}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_MOVIMIENTOValue : Integer;
    function GetOldCOLOR1Value : Integer;
    function GetOldCOLOR2Value : Integer;
    function GetOldCOLOR3Value : Integer;
    function GetOldCOLOR4Value : Integer;
    function GetOldCOLOR5Value : Integer;
    function GetOldCOLOR6Value : Integer;
    function GetOldCOLOR7Value : Integer;
    function GetOldCOLOR8Value : Integer;
    function GetOldCOLOR9Value : Integer;
    function GetOldCOLOR10Value : Integer;
    function GetOldCOLOR11Value : Integer;
    function GetOldCOLOR12Value : Integer;

    { Properties }
    property OldID : Integer read GetOldIDValue;
    property OldID_MOVIMIENTO : Integer read GetOldID_MOVIMIENTOValue;
    property OldCOLOR1 : Integer read GetOldCOLOR1Value;
    property OldCOLOR2 : Integer read GetOldCOLOR2Value;
    property OldCOLOR3 : Integer read GetOldCOLOR3Value;
    property OldCOLOR4 : Integer read GetOldCOLOR4Value;
    property OldCOLOR5 : Integer read GetOldCOLOR5Value;
    property OldCOLOR6 : Integer read GetOldCOLOR6Value;
    property OldCOLOR7 : Integer read GetOldCOLOR7Value;
    property OldCOLOR8 : Integer read GetOldCOLOR8Value;
    property OldCOLOR9 : Integer read GetOldCOLOR9Value;
    property OldCOLOR10 : Integer read GetOldCOLOR10Value;
    property OldCOLOR11 : Integer read GetOldCOLOR11Value;
    property OldCOLOR12 : Integer read GetOldCOLOR12Value;
  end;

  { TMovimientos_Detalle_ColorBusinessProcessorRules }
  TMovimientos_Detalle_ColorBusinessProcessorRules = class(TDABusinessProcessorRules, IMovimientos_Detalle_Color, IMovimientos_Detalle_ColorDelta)
  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_MOVIMIENTOValue: Integer; virtual;
    function GetID_MOVIMIENTOIsNull: Boolean; virtual;
    function GetOldID_MOVIMIENTOValue: Integer; virtual;
    function GetOldID_MOVIMIENTOIsNull: Boolean; virtual;
    procedure SetID_MOVIMIENTOValue(const aValue: Integer); virtual;
    procedure SetID_MOVIMIENTOIsNull(const aValue: Boolean); virtual;
    function GetCOLOR1Value: Integer; virtual;
    function GetCOLOR1IsNull: Boolean; virtual;
    function GetOldCOLOR1Value: Integer; virtual;
    function GetOldCOLOR1IsNull: Boolean; virtual;
    procedure SetCOLOR1Value(const aValue: Integer); virtual;
    procedure SetCOLOR1IsNull(const aValue: Boolean); virtual;
    function GetCOLOR2Value: Integer; virtual;
    function GetCOLOR2IsNull: Boolean; virtual;
    function GetOldCOLOR2Value: Integer; virtual;
    function GetOldCOLOR2IsNull: Boolean; virtual;
    procedure SetCOLOR2Value(const aValue: Integer); virtual;
    procedure SetCOLOR2IsNull(const aValue: Boolean); virtual;
    function GetCOLOR3Value: Integer; virtual;
    function GetCOLOR3IsNull: Boolean; virtual;
    function GetOldCOLOR3Value: Integer; virtual;
    function GetOldCOLOR3IsNull: Boolean; virtual;
    procedure SetCOLOR3Value(const aValue: Integer); virtual;
    procedure SetCOLOR3IsNull(const aValue: Boolean); virtual;
    function GetCOLOR4Value: Integer; virtual;
    function GetCOLOR4IsNull: Boolean; virtual;
    function GetOldCOLOR4Value: Integer; virtual;
    function GetOldCOLOR4IsNull: Boolean; virtual;
    procedure SetCOLOR4Value(const aValue: Integer); virtual;
    procedure SetCOLOR4IsNull(const aValue: Boolean); virtual;
    function GetCOLOR5Value: Integer; virtual;
    function GetCOLOR5IsNull: Boolean; virtual;
    function GetOldCOLOR5Value: Integer; virtual;
    function GetOldCOLOR5IsNull: Boolean; virtual;
    procedure SetCOLOR5Value(const aValue: Integer); virtual;
    procedure SetCOLOR5IsNull(const aValue: Boolean); virtual;
    function GetCOLOR6Value: Integer; virtual;
    function GetCOLOR6IsNull: Boolean; virtual;
    function GetOldCOLOR6Value: Integer; virtual;
    function GetOldCOLOR6IsNull: Boolean; virtual;
    procedure SetCOLOR6Value(const aValue: Integer); virtual;
    procedure SetCOLOR6IsNull(const aValue: Boolean); virtual;
    function GetCOLOR7Value: Integer; virtual;
    function GetCOLOR7IsNull: Boolean; virtual;
    function GetOldCOLOR7Value: Integer; virtual;
    function GetOldCOLOR7IsNull: Boolean; virtual;
    procedure SetCOLOR7Value(const aValue: Integer); virtual;
    procedure SetCOLOR7IsNull(const aValue: Boolean); virtual;
    function GetCOLOR8Value: Integer; virtual;
    function GetCOLOR8IsNull: Boolean; virtual;
    function GetOldCOLOR8Value: Integer; virtual;
    function GetOldCOLOR8IsNull: Boolean; virtual;
    procedure SetCOLOR8Value(const aValue: Integer); virtual;
    procedure SetCOLOR8IsNull(const aValue: Boolean); virtual;
    function GetCOLOR9Value: Integer; virtual;
    function GetCOLOR9IsNull: Boolean; virtual;
    function GetOldCOLOR9Value: Integer; virtual;
    function GetOldCOLOR9IsNull: Boolean; virtual;
    procedure SetCOLOR9Value(const aValue: Integer); virtual;
    procedure SetCOLOR9IsNull(const aValue: Boolean); virtual;
    function GetCOLOR10Value: Integer; virtual;
    function GetCOLOR10IsNull: Boolean; virtual;
    function GetOldCOLOR10Value: Integer; virtual;
    function GetOldCOLOR10IsNull: Boolean; virtual;
    procedure SetCOLOR10Value(const aValue: Integer); virtual;
    procedure SetCOLOR10IsNull(const aValue: Boolean); virtual;
    function GetCOLOR11Value: Integer; virtual;
    function GetCOLOR11IsNull: Boolean; virtual;
    function GetOldCOLOR11Value: Integer; virtual;
    function GetOldCOLOR11IsNull: Boolean; virtual;
    procedure SetCOLOR11Value(const aValue: Integer); virtual;
    procedure SetCOLOR11IsNull(const aValue: Boolean); virtual;
    function GetCOLOR12Value: Integer; virtual;
    function GetCOLOR12IsNull: Boolean; virtual;
    function GetOldCOLOR12Value: Integer; virtual;
    function GetOldCOLOR12IsNull: Boolean; virtual;
    procedure SetCOLOR12Value(const aValue: Integer); virtual;
    procedure SetCOLOR12IsNull(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_MOVIMIENTO : Integer read GetID_MOVIMIENTOValue write SetID_MOVIMIENTOValue;
    property ID_MOVIMIENTOIsNull : Boolean read GetID_MOVIMIENTOIsNull write SetID_MOVIMIENTOIsNull;
    property OldID_MOVIMIENTO : Integer read GetOldID_MOVIMIENTOValue;
    property OldID_MOVIMIENTOIsNull : Boolean read GetOldID_MOVIMIENTOIsNull;
    property COLOR1 : Integer read GetCOLOR1Value write SetCOLOR1Value;
    property COLOR1IsNull : Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
    property OldCOLOR1 : Integer read GetOldCOLOR1Value;
    property OldCOLOR1IsNull : Boolean read GetOldCOLOR1IsNull;
    property COLOR2 : Integer read GetCOLOR2Value write SetCOLOR2Value;
    property COLOR2IsNull : Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
    property OldCOLOR2 : Integer read GetOldCOLOR2Value;
    property OldCOLOR2IsNull : Boolean read GetOldCOLOR2IsNull;
    property COLOR3 : Integer read GetCOLOR3Value write SetCOLOR3Value;
    property COLOR3IsNull : Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
    property OldCOLOR3 : Integer read GetOldCOLOR3Value;
    property OldCOLOR3IsNull : Boolean read GetOldCOLOR3IsNull;
    property COLOR4 : Integer read GetCOLOR4Value write SetCOLOR4Value;
    property COLOR4IsNull : Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
    property OldCOLOR4 : Integer read GetOldCOLOR4Value;
    property OldCOLOR4IsNull : Boolean read GetOldCOLOR4IsNull;
    property COLOR5 : Integer read GetCOLOR5Value write SetCOLOR5Value;
    property COLOR5IsNull : Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
    property OldCOLOR5 : Integer read GetOldCOLOR5Value;
    property OldCOLOR5IsNull : Boolean read GetOldCOLOR5IsNull;
    property COLOR6 : Integer read GetCOLOR6Value write SetCOLOR6Value;
    property COLOR6IsNull : Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
    property OldCOLOR6 : Integer read GetOldCOLOR6Value;
    property OldCOLOR6IsNull : Boolean read GetOldCOLOR6IsNull;
    property COLOR7 : Integer read GetCOLOR7Value write SetCOLOR7Value;
    property COLOR7IsNull : Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
    property OldCOLOR7 : Integer read GetOldCOLOR7Value;
    property OldCOLOR7IsNull : Boolean read GetOldCOLOR7IsNull;
    property COLOR8 : Integer read GetCOLOR8Value write SetCOLOR8Value;
    property COLOR8IsNull : Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
    property OldCOLOR8 : Integer read GetOldCOLOR8Value;
    property OldCOLOR8IsNull : Boolean read GetOldCOLOR8IsNull;
    property COLOR9 : Integer read GetCOLOR9Value write SetCOLOR9Value;
    property COLOR9IsNull : Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
    property OldCOLOR9 : Integer read GetOldCOLOR9Value;
    property OldCOLOR9IsNull : Boolean read GetOldCOLOR9IsNull;
    property COLOR10 : Integer read GetCOLOR10Value write SetCOLOR10Value;
    property COLOR10IsNull : Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
    property OldCOLOR10 : Integer read GetOldCOLOR10Value;
    property OldCOLOR10IsNull : Boolean read GetOldCOLOR10IsNull;
    property COLOR11 : Integer read GetCOLOR11Value write SetCOLOR11Value;
    property COLOR11IsNull : Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
    property OldCOLOR11 : Integer read GetOldCOLOR11Value;
    property OldCOLOR11IsNull : Boolean read GetOldCOLOR11IsNull;
    property COLOR12 : Integer read GetCOLOR12Value write SetCOLOR12Value;
    property COLOR12IsNull : Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
    property OldCOLOR12 : Integer read GetOldCOLOR12Value;
    property OldCOLOR12IsNull : Boolean read GetOldCOLOR12IsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IDetalleReservasDelta }
  IDetalleReservasDelta = interface(IDetalleReservas)
  ['{3E9E6CAB-DC33-43FF-9A3C-3BFEEB6FE7C4}']
    { Property getters and setters }
    function GetOldIDValue : 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;

    { Properties }
    property OldID : Integer read GetOldIDValue;
    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;
  end;

  { TDetalleReservasBusinessProcessorRules }
  TDetalleReservasBusinessProcessorRules = class(TDABusinessProcessorRules, IDetalleReservas, IDetalleReservasDelta)
  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_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;

    { 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_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;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

  { IInventario_ColorDelta }
  IInventario_ColorDelta = interface(IInventario_Color)
  ['{D063845D-38A5-4EA5-A0BE-257ED7073F0C}']
    { Property getters and setters }
    function GetOldID_ALMACENValue : Integer;
    function GetOldID_ARTICULOValue : Integer;
    function GetOldCOLOR1Value : Int64;
    function GetOldCOLOR2Value : Int64;
    function GetOldCOLOR3Value : Int64;
    function GetOldCOLOR4Value : Int64;
    function GetOldCOLOR5Value : Int64;
    function GetOldCOLOR6Value : Int64;
    function GetOldCOLOR7Value : Int64;
    function GetOldCOLOR8Value : Int64;
    function GetOldCOLOR9Value : Int64;
    function GetOldCOLOR10Value : Int64;
    function GetOldCOLOR11Value : Int64;
    function GetOldCOLOR12Value : Int64;

    { Properties }
    property OldID_ALMACEN : Integer read GetOldID_ALMACENValue;
    property OldID_ARTICULO : Integer read GetOldID_ARTICULOValue;
    property OldCOLOR1 : Int64 read GetOldCOLOR1Value;
    property OldCOLOR2 : Int64 read GetOldCOLOR2Value;
    property OldCOLOR3 : Int64 read GetOldCOLOR3Value;
    property OldCOLOR4 : Int64 read GetOldCOLOR4Value;
    property OldCOLOR5 : Int64 read GetOldCOLOR5Value;
    property OldCOLOR6 : Int64 read GetOldCOLOR6Value;
    property OldCOLOR7 : Int64 read GetOldCOLOR7Value;
    property OldCOLOR8 : Int64 read GetOldCOLOR8Value;
    property OldCOLOR9 : Int64 read GetOldCOLOR9Value;
    property OldCOLOR10 : Int64 read GetOldCOLOR10Value;
    property OldCOLOR11 : Int64 read GetOldCOLOR11Value;
    property OldCOLOR12 : Int64 read GetOldCOLOR12Value;
  end;

  { TInventario_ColorBusinessProcessorRules }
  TInventario_ColorBusinessProcessorRules = class(TDABusinessProcessorRules, IInventario_Color, IInventario_ColorDelta)
  private
  protected
    { Property getters and setters }
    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 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 GetCOLOR1Value: Int64; virtual;
    function GetCOLOR1IsNull: Boolean; virtual;
    function GetOldCOLOR1Value: Int64; virtual;
    function GetOldCOLOR1IsNull: Boolean; virtual;
    procedure SetCOLOR1Value(const aValue: Int64); virtual;
    procedure SetCOLOR1IsNull(const aValue: Boolean); virtual;
    function GetCOLOR2Value: Int64; virtual;
    function GetCOLOR2IsNull: Boolean; virtual;
    function GetOldCOLOR2Value: Int64; virtual;
    function GetOldCOLOR2IsNull: Boolean; virtual;
    procedure SetCOLOR2Value(const aValue: Int64); virtual;
    procedure SetCOLOR2IsNull(const aValue: Boolean); virtual;
    function GetCOLOR3Value: Int64; virtual;
    function GetCOLOR3IsNull: Boolean; virtual;
    function GetOldCOLOR3Value: Int64; virtual;
    function GetOldCOLOR3IsNull: Boolean; virtual;
    procedure SetCOLOR3Value(const aValue: Int64); virtual;
    procedure SetCOLOR3IsNull(const aValue: Boolean); virtual;
    function GetCOLOR4Value: Int64; virtual;
    function GetCOLOR4IsNull: Boolean; virtual;
    function GetOldCOLOR4Value: Int64; virtual;
    function GetOldCOLOR4IsNull: Boolean; virtual;
    procedure SetCOLOR4Value(const aValue: Int64); virtual;
    procedure SetCOLOR4IsNull(const aValue: Boolean); virtual;
    function GetCOLOR5Value: Int64; virtual;
    function GetCOLOR5IsNull: Boolean; virtual;
    function GetOldCOLOR5Value: Int64; virtual;
    function GetOldCOLOR5IsNull: Boolean; virtual;
    procedure SetCOLOR5Value(const aValue: Int64); virtual;
    procedure SetCOLOR5IsNull(const aValue: Boolean); virtual;
    function GetCOLOR6Value: Int64; virtual;
    function GetCOLOR6IsNull: Boolean; virtual;
    function GetOldCOLOR6Value: Int64; virtual;
    function GetOldCOLOR6IsNull: Boolean; virtual;
    procedure SetCOLOR6Value(const aValue: Int64); virtual;
    procedure SetCOLOR6IsNull(const aValue: Boolean); virtual;
    function GetCOLOR7Value: Int64; virtual;
    function GetCOLOR7IsNull: Boolean; virtual;
    function GetOldCOLOR7Value: Int64; virtual;
    function GetOldCOLOR7IsNull: Boolean; virtual;
    procedure SetCOLOR7Value(const aValue: Int64); virtual;
    procedure SetCOLOR7IsNull(const aValue: Boolean); virtual;
    function GetCOLOR8Value: Int64; virtual;
    function GetCOLOR8IsNull: Boolean; virtual;
    function GetOldCOLOR8Value: Int64; virtual;
    function GetOldCOLOR8IsNull: Boolean; virtual;
    procedure SetCOLOR8Value(const aValue: Int64); virtual;
    procedure SetCOLOR8IsNull(const aValue: Boolean); virtual;
    function GetCOLOR9Value: Int64; virtual;
    function GetCOLOR9IsNull: Boolean; virtual;
    function GetOldCOLOR9Value: Int64; virtual;
    function GetOldCOLOR9IsNull: Boolean; virtual;
    procedure SetCOLOR9Value(const aValue: Int64); virtual;
    procedure SetCOLOR9IsNull(const aValue: Boolean); virtual;
    function GetCOLOR10Value: Int64; virtual;
    function GetCOLOR10IsNull: Boolean; virtual;
    function GetOldCOLOR10Value: Int64; virtual;
    function GetOldCOLOR10IsNull: Boolean; virtual;
    procedure SetCOLOR10Value(const aValue: Int64); virtual;
    procedure SetCOLOR10IsNull(const aValue: Boolean); virtual;
    function GetCOLOR11Value: Int64; virtual;
    function GetCOLOR11IsNull: Boolean; virtual;
    function GetOldCOLOR11Value: Int64; virtual;
    function GetOldCOLOR11IsNull: Boolean; virtual;
    procedure SetCOLOR11Value(const aValue: Int64); virtual;
    procedure SetCOLOR11IsNull(const aValue: Boolean); virtual;
    function GetCOLOR12Value: Int64; virtual;
    function GetCOLOR12IsNull: Boolean; virtual;
    function GetOldCOLOR12Value: Int64; virtual;
    function GetOldCOLOR12IsNull: Boolean; virtual;
    procedure SetCOLOR12Value(const aValue: Int64); virtual;
    procedure SetCOLOR12IsNull(const aValue: Boolean); virtual;

    { Properties }
    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 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 COLOR1 : Int64 read GetCOLOR1Value write SetCOLOR1Value;
    property COLOR1IsNull : Boolean read GetCOLOR1IsNull write SetCOLOR1IsNull;
    property OldCOLOR1 : Int64 read GetOldCOLOR1Value;
    property OldCOLOR1IsNull : Boolean read GetOldCOLOR1IsNull;
    property COLOR2 : Int64 read GetCOLOR2Value write SetCOLOR2Value;
    property COLOR2IsNull : Boolean read GetCOLOR2IsNull write SetCOLOR2IsNull;
    property OldCOLOR2 : Int64 read GetOldCOLOR2Value;
    property OldCOLOR2IsNull : Boolean read GetOldCOLOR2IsNull;
    property COLOR3 : Int64 read GetCOLOR3Value write SetCOLOR3Value;
    property COLOR3IsNull : Boolean read GetCOLOR3IsNull write SetCOLOR3IsNull;
    property OldCOLOR3 : Int64 read GetOldCOLOR3Value;
    property OldCOLOR3IsNull : Boolean read GetOldCOLOR3IsNull;
    property COLOR4 : Int64 read GetCOLOR4Value write SetCOLOR4Value;
    property COLOR4IsNull : Boolean read GetCOLOR4IsNull write SetCOLOR4IsNull;
    property OldCOLOR4 : Int64 read GetOldCOLOR4Value;
    property OldCOLOR4IsNull : Boolean read GetOldCOLOR4IsNull;
    property COLOR5 : Int64 read GetCOLOR5Value write SetCOLOR5Value;
    property COLOR5IsNull : Boolean read GetCOLOR5IsNull write SetCOLOR5IsNull;
    property OldCOLOR5 : Int64 read GetOldCOLOR5Value;
    property OldCOLOR5IsNull : Boolean read GetOldCOLOR5IsNull;
    property COLOR6 : Int64 read GetCOLOR6Value write SetCOLOR6Value;
    property COLOR6IsNull : Boolean read GetCOLOR6IsNull write SetCOLOR6IsNull;
    property OldCOLOR6 : Int64 read GetOldCOLOR6Value;
    property OldCOLOR6IsNull : Boolean read GetOldCOLOR6IsNull;
    property COLOR7 : Int64 read GetCOLOR7Value write SetCOLOR7Value;
    property COLOR7IsNull : Boolean read GetCOLOR7IsNull write SetCOLOR7IsNull;
    property OldCOLOR7 : Int64 read GetOldCOLOR7Value;
    property OldCOLOR7IsNull : Boolean read GetOldCOLOR7IsNull;
    property COLOR8 : Int64 read GetCOLOR8Value write SetCOLOR8Value;
    property COLOR8IsNull : Boolean read GetCOLOR8IsNull write SetCOLOR8IsNull;
    property OldCOLOR8 : Int64 read GetOldCOLOR8Value;
    property OldCOLOR8IsNull : Boolean read GetOldCOLOR8IsNull;
    property COLOR9 : Int64 read GetCOLOR9Value write SetCOLOR9Value;
    property COLOR9IsNull : Boolean read GetCOLOR9IsNull write SetCOLOR9IsNull;
    property OldCOLOR9 : Int64 read GetOldCOLOR9Value;
    property OldCOLOR9IsNull : Boolean read GetOldCOLOR9IsNull;
    property COLOR10 : Int64 read GetCOLOR10Value write SetCOLOR10Value;
    property COLOR10IsNull : Boolean read GetCOLOR10IsNull write SetCOLOR10IsNull;
    property OldCOLOR10 : Int64 read GetOldCOLOR10Value;
    property OldCOLOR10IsNull : Boolean read GetOldCOLOR10IsNull;
    property COLOR11 : Int64 read GetCOLOR11Value write SetCOLOR11Value;
    property COLOR11IsNull : Boolean read GetCOLOR11IsNull write SetCOLOR11IsNull;
    property OldCOLOR11 : Int64 read GetOldCOLOR11Value;
    property OldCOLOR11IsNull : Boolean read GetOldCOLOR11IsNull;
    property COLOR12 : Int64 read GetCOLOR12Value write SetCOLOR12Value;
    property COLOR12IsNull : Boolean read GetCOLOR12IsNull write SetCOLOR12IsNull;
    property OldCOLOR12 : Int64 read GetOldCOLOR12Value;
    property OldCOLOR12IsNull : Boolean read GetOldCOLOR12IsNull;

  public
    constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
    destructor Destroy; override;

  end;

implementation

uses
  Variants, uROBinaryHelpers, uDAInterfaces;

{ TInventarioBusinessProcessorRules }
constructor TInventarioBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TInventarioBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TInventarioBusinessProcessorRules.GetID_ALMACENValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN];
end;

function TInventarioBusinessProcessorRules.GetID_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldID_ALMACENValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_ALMACEN];
end;

function TInventarioBusinessProcessorRules.GetOldID_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetID_ALMACENValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetID_ALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN] := Null;
end;

function TInventarioBusinessProcessorRules.GetID_ARTICULOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ARTICULO];
end;

function TInventarioBusinessProcessorRules.GetID_ARTICULOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ARTICULO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldID_ARTICULOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_ARTICULO];
end;

function TInventarioBusinessProcessorRules.GetOldID_ARTICULOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_ARTICULO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ARTICULO] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetID_ARTICULOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ARTICULO] := Null;
end;

function TInventarioBusinessProcessorRules.GetALMACENValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioALMACEN];
end;

function TInventarioBusinessProcessorRules.GetALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldALMACENValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioALMACEN];
end;

function TInventarioBusinessProcessorRules.GetOldALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetALMACENValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioALMACEN] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioALMACEN] := Null;
end;

function TInventarioBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_EMPRESA];
end;

function TInventarioBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_EMPRESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_EMPRESA];
end;

function TInventarioBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_EMPRESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_EMPRESA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_EMPRESA] := Null;
end;

function TInventarioBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioREFERENCIA];
end;

function TInventarioBusinessProcessorRules.GetREFERENCIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioREFERENCIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioREFERENCIA];
end;

function TInventarioBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioREFERENCIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioREFERENCIA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioREFERENCIA] := Null;
end;

function TInventarioBusinessProcessorRules.GetFAMILIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFAMILIA];
end;

function TInventarioBusinessProcessorRules.GetFAMILIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFAMILIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldFAMILIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioFAMILIA];
end;

function TInventarioBusinessProcessorRules.GetOldFAMILIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioFAMILIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetFAMILIAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFAMILIA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetFAMILIAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFAMILIA] := Null;
end;

function TInventarioBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDESCRIPCION];
end;

function TInventarioBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDESCRIPCION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioDESCRIPCION];
end;

function TInventarioBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioDESCRIPCION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDESCRIPCION] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDESCRIPCION] := Null;
end;

function TInventarioBusinessProcessorRules.GetUNIDAD_MEDIDAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDAD_MEDIDA];
end;

function TInventarioBusinessProcessorRules.GetUNIDAD_MEDIDAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDAD_MEDIDA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldUNIDAD_MEDIDAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioUNIDAD_MEDIDA];
end;

function TInventarioBusinessProcessorRules.GetOldUNIDAD_MEDIDAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioUNIDAD_MEDIDA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetUNIDAD_MEDIDAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDAD_MEDIDA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetUNIDAD_MEDIDAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDAD_MEDIDA] := Null;
end;

function TInventarioBusinessProcessorRules.GetCAMPOTECNICOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAMPOTECNICO];
end;

function TInventarioBusinessProcessorRules.GetCAMPOTECNICOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAMPOTECNICO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldCAMPOTECNICOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCAMPOTECNICO];
end;

function TInventarioBusinessProcessorRules.GetOldCAMPOTECNICOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCAMPOTECNICO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetCAMPOTECNICOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAMPOTECNICO] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetCAMPOTECNICOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAMPOTECNICO] := Null;
end;

function TInventarioBusinessProcessorRules.GetCODIGOTECNICOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCODIGOTECNICO];
end;

function TInventarioBusinessProcessorRules.GetCODIGOTECNICOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCODIGOTECNICO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldCODIGOTECNICOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCODIGOTECNICO];
end;

function TInventarioBusinessProcessorRules.GetOldCODIGOTECNICOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCODIGOTECNICO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetCODIGOTECNICOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCODIGOTECNICO] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetCODIGOTECNICOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCODIGOTECNICO] := Null;
end;

function TInventarioBusinessProcessorRules.GetDISENOTECNICOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDISENOTECNICO];
end;

function TInventarioBusinessProcessorRules.GetDISENOTECNICOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDISENOTECNICO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldDISENOTECNICOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioDISENOTECNICO];
end;

function TInventarioBusinessProcessorRules.GetOldDISENOTECNICOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioDISENOTECNICO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetDISENOTECNICOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDISENOTECNICO] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetDISENOTECNICOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioDISENOTECNICO] := Null;
end;

function TInventarioBusinessProcessorRules.GetSTOCKValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioSTOCK];
end;

function TInventarioBusinessProcessorRules.GetSTOCKIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioSTOCK];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldSTOCKValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioSTOCK];
end;

function TInventarioBusinessProcessorRules.GetOldSTOCKIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioSTOCK];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetSTOCKValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioSTOCK] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetSTOCKIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioSTOCK] := Null;
end;

function TInventarioBusinessProcessorRules.GetUNIDADES_ALMACENValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDADES_ALMACEN];
end;

function TInventarioBusinessProcessorRules.GetUNIDADES_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDADES_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldUNIDADES_ALMACENValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioUNIDADES_ALMACEN];
end;

function TInventarioBusinessProcessorRules.GetOldUNIDADES_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioUNIDADES_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetUNIDADES_ALMACENValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDADES_ALMACEN] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetUNIDADES_ALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioUNIDADES_ALMACEN] := Null;
end;

function TInventarioBusinessProcessorRules.GetRESERVAValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioRESERVA];
end;

function TInventarioBusinessProcessorRules.GetRESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioRESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldRESERVAValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioRESERVA];
end;

function TInventarioBusinessProcessorRules.GetOldRESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioRESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetRESERVAValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioRESERVA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetRESERVAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioRESERVA] := Null;
end;

function TInventarioBusinessProcessorRules.GetPENDIENTE_RECEPCIONValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioPENDIENTE_RECEPCION];
end;

function TInventarioBusinessProcessorRules.GetPENDIENTE_RECEPCIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioPENDIENTE_RECEPCION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldPENDIENTE_RECEPCIONValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioPENDIENTE_RECEPCION];
end;

function TInventarioBusinessProcessorRules.GetOldPENDIENTE_RECEPCIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioPENDIENTE_RECEPCION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetPENDIENTE_RECEPCIONValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioPENDIENTE_RECEPCION] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetPENDIENTE_RECEPCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioPENDIENTE_RECEPCION] := Null;
end;

function TInventarioBusinessProcessorRules.GetTIPO_ALMACENValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO_ALMACEN];
end;

function TInventarioBusinessProcessorRules.GetTIPO_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldTIPO_ALMACENValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioTIPO_ALMACEN];
end;

function TInventarioBusinessProcessorRules.GetOldTIPO_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioTIPO_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetTIPO_ALMACENValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO_ALMACEN] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetTIPO_ALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO_ALMACEN] := Null;
end;

function TInventarioBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID];
end;

function TInventarioBusinessProcessorRules.GetIDIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID];
end;

function TInventarioBusinessProcessorRules.GetOldIDIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetIDValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID] := Null;
end;

function TInventarioBusinessProcessorRules.GetCANTIDADValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCANTIDAD];
end;

function TInventarioBusinessProcessorRules.GetCANTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCANTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldCANTIDADValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCANTIDAD];
end;

function TInventarioBusinessProcessorRules.GetOldCANTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCANTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetCANTIDADValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCANTIDAD] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetCANTIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCANTIDAD] := Null;
end;

function TInventarioBusinessProcessorRules.GetFECHA_MOVIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFECHA_MOVIMIENTO];
end;

function TInventarioBusinessProcessorRules.GetFECHA_MOVIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFECHA_MOVIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldFECHA_MOVIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioFECHA_MOVIMIENTO];
end;

function TInventarioBusinessProcessorRules.GetOldFECHA_MOVIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioFECHA_MOVIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetFECHA_MOVIMIENTOValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFECHA_MOVIMIENTO] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetFECHA_MOVIMIENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioFECHA_MOVIMIENTO] := Null;
end;

function TInventarioBusinessProcessorRules.GetCAUSAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAUSA];
end;

function TInventarioBusinessProcessorRules.GetCAUSAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAUSA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldCAUSAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCAUSA];
end;

function TInventarioBusinessProcessorRules.GetOldCAUSAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioCAUSA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetCAUSAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAUSA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetCAUSAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioCAUSA] := Null;
end;

function TInventarioBusinessProcessorRules.GetTIPOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO];
end;

function TInventarioBusinessProcessorRules.GetTIPOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldTIPOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioTIPO];
end;

function TInventarioBusinessProcessorRules.GetOldTIPOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioTIPO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetTIPOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetTIPOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioTIPO] := Null;
end;

function TInventarioBusinessProcessorRules.GetID_ALMACEN_RESERVAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN_RESERVA];
end;

function TInventarioBusinessProcessorRules.GetID_ALMACEN_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventarioBusinessProcessorRules.GetOldID_ALMACEN_RESERVAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_ALMACEN_RESERVA];
end;

function TInventarioBusinessProcessorRules.GetOldID_ALMACEN_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_InventarioID_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventarioBusinessProcessorRules.SetID_ALMACEN_RESERVAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN_RESERVA] := aValue;
end;

procedure TInventarioBusinessProcessorRules.SetID_ALMACEN_RESERVAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_InventarioID_ALMACEN_RESERVA] := Null;
end;


{ TMovimientos_Detalle_ColorBusinessProcessorRules }
constructor TMovimientos_Detalle_ColorBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TMovimientos_Detalle_ColorBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetIDIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorID];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldIDIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorID];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetIDValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetID_MOVIMIENTOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID_MOVIMIENTO];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetID_MOVIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID_MOVIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldID_MOVIMIENTOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorID_MOVIMIENTO];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldID_MOVIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorID_MOVIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetID_MOVIMIENTOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID_MOVIMIENTO] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetID_MOVIMIENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorID_MOVIMIENTO] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR1Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR1];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR1IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR1];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR1Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR1];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR1IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR1];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR1Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR1] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR1IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR1] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR2Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR2];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR2IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR2];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR2Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR2];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR2IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR2];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR2Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR2] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR2IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR2] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR3Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR3];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR3IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR3];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR3Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR3];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR3IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR3];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR3Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR3] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR3IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR3] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR4Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR4];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR4IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR4];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR4Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR4];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR4IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR4];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR4Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR4] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR4IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR4] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR5Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR5];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR5IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR5];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR5Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR5];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR5IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR5];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR5Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR5] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR5IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR5] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR6Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR6];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR6IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR6];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR6Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR6];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR6IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR6];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR6Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR6] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR6IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR6] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR7Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR7];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR7IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR7];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR7Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR7];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR7IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR7];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR7Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR7] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR7IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR7] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR8Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR8];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR8IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR8];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR8Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR8];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR8IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR8];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR8Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR8] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR8IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR8] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR9Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR9];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR9IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR9];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR9Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR9];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR9IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR9];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR9Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR9] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR9IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR9] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR10Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR10];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR10IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR10];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR10Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR10];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR10IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR10];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR10Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR10] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR10IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR10] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR11Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR11];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR11IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR11];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR11Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR11];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR11IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR11];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR11Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR11] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR11IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR11] := Null;
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR12Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR12];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetCOLOR12IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR12];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR12Value: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR12];
end;

function TMovimientos_Detalle_ColorBusinessProcessorRules.GetOldCOLOR12IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Movimientos_Detalle_ColorCOLOR12];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR12Value(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR12] := aValue;
end;

procedure TMovimientos_Detalle_ColorBusinessProcessorRules.SetCOLOR12IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Movimientos_Detalle_ColorCOLOR12] := Null;
end;


{ TDetalleReservasBusinessProcessorRules }
constructor TDetalleReservasBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TDetalleReservasBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TDetalleReservasBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID];
end;

function TDetalleReservasBusinessProcessorRules.GetIDIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID];
end;

function TDetalleReservasBusinessProcessorRules.GetOldIDIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetIDValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA];
end;

function TDetalleReservasBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_EMPRESA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_EMPRESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetID_ALMACENValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN];
end;

function TDetalleReservasBusinessProcessorRules.GetID_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACENValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN];
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACENValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetNOMBRE_ALMACENValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN];
end;

function TDetalleReservasBusinessProcessorRules.GetNOMBRE_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACENValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN];
end;

function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetNOMBRE_ALMACENValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetNOMBRE_ALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetFECHA_RESERVAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetFECHA_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldFECHA_RESERVAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFECHA_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldFECHA_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFECHA_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetFECHA_RESERVAValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetFECHA_RESERVAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFECHA_RESERVA] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetCAUSA_RESERVAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetCAUSA_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldCAUSA_RESERVAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCAUSA_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldCAUSA_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCAUSA_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetCAUSA_RESERVAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetCAUSA_RESERVAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCAUSA_RESERVA] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetID_ARTICULOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO];
end;

function TDetalleReservasBusinessProcessorRules.GetID_ARTICULOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_ARTICULOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ARTICULO];
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_ARTICULOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ARTICULO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_ARTICULOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ARTICULO] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA];
end;

function TDetalleReservasBusinessProcessorRules.GetREFERENCIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION];
end;

function TDetalleReservasBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasDESCRIPCION];
end;

function TDetalleReservasBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasDESCRIPCION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasDESCRIPCION] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetFAMILIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA];
end;

function TDetalleReservasBusinessProcessorRules.GetFAMILIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldFAMILIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFAMILIA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldFAMILIAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFAMILIA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetFAMILIAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetFAMILIAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFAMILIA] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetUNIDAD_MEDIDAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA];
end;

function TDetalleReservasBusinessProcessorRules.GetUNIDAD_MEDIDAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldUNIDAD_MEDIDAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasUNIDAD_MEDIDA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldUNIDAD_MEDIDAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasUNIDAD_MEDIDA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetUNIDAD_MEDIDAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetUNIDAD_MEDIDAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasUNIDAD_MEDIDA] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetFABRICANTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE];
end;

function TDetalleReservasBusinessProcessorRules.GetFABRICANTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldFABRICANTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFABRICANTE];
end;

function TDetalleReservasBusinessProcessorRules.GetOldFABRICANTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasFABRICANTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetFABRICANTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetFABRICANTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasFABRICANTE] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_FABRValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR];
end;

function TDetalleReservasBusinessProcessorRules.GetREFERENCIA_FABRIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_FABRValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_FABR];
end;

function TDetalleReservasBusinessProcessorRules.GetOldREFERENCIA_FABRIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasREFERENCIA_FABR];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_FABRValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetREFERENCIA_FABRIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasREFERENCIA_FABR] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetCANTIDADValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD];
end;

function TDetalleReservasBusinessProcessorRules.GetCANTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldCANTIDADValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCANTIDAD];
end;

function TDetalleReservasBusinessProcessorRules.GetOldCANTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasCANTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetCANTIDADValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetCANTIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasCANTIDAD] := Null;
end;

function TDetalleReservasBusinessProcessorRules.GetID_ALMACEN_RESERVAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetID_ALMACEN_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACEN_RESERVAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldID_ALMACEN_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACEN_RESERVAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_ALMACEN_RESERVA] := aValue;
end;

procedure TDetalleReservasBusinessProcessorRules.SetID_ALMACEN_RESERVAIsNull(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;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACEN_RESERVAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA];
end;

function TDetalleReservasBusinessProcessorRules.GetOldNOMBRE_ALMACEN_RESERVAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasNOMBRE_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
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;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
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;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_DetalleReservasID_EMPRESA_ALMACEN_RESERVA];
  result := VarIsNull(v) or VarIsClear(v);
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;
end;


{ TInventario_ColorBusinessProcessorRules }
constructor TInventario_ColorBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
  inherited;
end;

destructor TInventario_ColorBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TInventario_ColorBusinessProcessorRules.GetID_ALMACENValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ALMACEN];
end;

function TInventario_ColorBusinessProcessorRules.GetID_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldID_ALMACENValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorID_ALMACEN];
end;

function TInventario_ColorBusinessProcessorRules.GetOldID_ALMACENIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorID_ALMACEN];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetID_ALMACENValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ALMACEN] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetID_ALMACENIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ALMACEN] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetID_ARTICULOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ARTICULO];
end;

function TInventario_ColorBusinessProcessorRules.GetID_ARTICULOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ARTICULO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldID_ARTICULOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorID_ARTICULO];
end;

function TInventario_ColorBusinessProcessorRules.GetOldID_ARTICULOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorID_ARTICULO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetID_ARTICULOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ARTICULO] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetID_ARTICULOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorID_ARTICULO] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR1Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR1];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR1IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR1];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR1Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR1];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR1IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR1];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR1Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR1] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR1IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR1] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR2Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR2];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR2IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR2];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR2Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR2];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR2IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR2];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR2Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR2] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR2IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR2] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR3Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR3];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR3IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR3];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR3Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR3];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR3IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR3];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR3Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR3] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR3IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR3] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR4Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR4];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR4IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR4];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR4Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR4];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR4IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR4];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR4Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR4] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR4IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR4] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR5Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR5];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR5IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR5];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR5Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR5];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR5IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR5];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR5Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR5] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR5IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR5] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR6Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR6];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR6IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR6];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR6Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR6];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR6IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR6];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR6Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR6] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR6IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR6] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR7Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR7];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR7IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR7];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR7Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR7];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR7IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR7];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR7Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR7] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR7IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR7] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR8Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR8];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR8IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR8];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR8Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR8];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR8IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR8];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR8Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR8] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR8IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR8] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR9Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR9];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR9IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR9];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR9Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR9];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR9IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR9];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR9Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR9] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR9IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR9] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR10Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR10];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR10IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR10];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR10Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR10];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR10IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR10];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR10Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR10] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR10IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR10] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR11Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR11];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR11IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR11];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR11Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR11];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR11IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR11];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR11Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR11] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR11IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR11] := Null;
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR12Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR12];
end;

function TInventario_ColorBusinessProcessorRules.GetCOLOR12IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR12];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR12Value: Int64;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR12];
end;

function TInventario_ColorBusinessProcessorRules.GetOldCOLOR12IsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_Inventario_ColorCOLOR12];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR12Value(const aValue: Int64);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR12] := aValue;
end;

procedure TInventario_ColorBusinessProcessorRules.SetCOLOR12IsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_Inventario_ColorCOLOR12] := Null;
end;


initialization
  RegisterBusinessProcessorRules(RID_InventarioDelta, TInventarioBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_Movimientos_Detalle_ColorDelta, TMovimientos_Detalle_ColorBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_DetalleReservasDelta, TDetalleReservasBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_Inventario_ColorDelta, TInventario_ColorBusinessProcessorRules);

end.