unit schRecibosClienteServer_Intf;

interface

uses
  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, schRecibosClienteClient_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_ListaAnosRecibosDelta = '{CCE93575-A8AD-40C7-8058-928601432A6D}';
  RID_RecibosClienteDelta = '{3D708DF9-89F4-4E1F-B828-27E14BECF119}';
  RID_PagosClienteDelta = '{94C70DF1-5535-4C04-B227-123B1B8E7FE5}';
  RID_RecibosCompensadosCliDelta = '{F5087755-FD90-439A-878B-5749589D42F5}';

type
  { IListaAnosRecibosDelta }
  IListaAnosRecibosDelta = interface(IListaAnosRecibos)
  ['{CCE93575-A8AD-40C7-8058-928601432A6D}']
    { Property getters and setters }
    function GetOldANOValue : String;

    { Properties }
    property OldANO : String read GetOldANOValue;
  end;

  { TListaAnosRecibosBusinessProcessorRules }
  TListaAnosRecibosBusinessProcessorRules = class(TDABusinessProcessorRules, IListaAnosRecibos, IListaAnosRecibosDelta)
  private
  protected
    { Property getters and setters }
    function GetANOValue: String; virtual;
    function GetANOIsNull: Boolean; virtual;
    function GetOldANOValue: String; virtual;
    function GetOldANOIsNull: Boolean; virtual;
    procedure SetANOValue(const aValue: String); virtual;
    procedure SetANOIsNull(const aValue: Boolean); virtual;

    { Properties }
    property ANO : String read GetANOValue write SetANOValue;
    property ANOIsNull : Boolean read GetANOIsNull write SetANOIsNull;
    property OldANO : String read GetOldANOValue;
    property OldANOIsNull : Boolean read GetOldANOIsNull;

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

  end;

  { IRecibosClienteDelta }
  IRecibosClienteDelta = interface(IRecibosCliente)
  ['{3D708DF9-89F4-4E1F-B828-27E14BECF119}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_RECIBO_COMPENSADOValue : Integer;
    function GetOldREFERENCIA_REC_COMPENSADOValue : String;
    function GetOldREFERENCIAValue : String;
    function GetOldSITUACIONValue : String;
    function GetOldID_FACTURAValue : Integer;
    function GetOldID_REMESAValue : Integer;
    function GetOldREFERENCIA_REMESAValue : String;
    function GetOldFECHA_EMISIONValue : DateTime;
    function GetOldFECHA_VENCIMIENTOValue : DateTime;
    function GetOldDESCRIPCIONValue : String;
    function GetOldOBSERVACIONESValue : String;
    function GetOldIMPORTEValue : Currency;
    function GetOldOTROS_GASTOSValue : Currency;
    function GetOldIMPORTE_TOTALValue : Currency;
    function GetOldFECHA_FACTURAValue : DateTime;
    function GetOldFORMA_PAGO_FACTURAValue : String;
    function GetOldIMPORTE_FACTURAValue : Currency;
    function GetOldID_EMPRESAValue : Integer;
    function GetOldDATOS_BANCARIOSValue : String;
    function GetOldID_CLIENTEValue : Integer;
    function GetOldNOMBRE_CLIENTEValue : String;
    function GetOldNIF_CIF_CLIENTEValue : String;
    function GetOldCALLE_CLIENTEValue : String;
    function GetOldPOBLACION_CLIENTEValue : String;
    function GetOldCODIGO_POSTAL_CLIENTEValue : String;
    function GetOldPROVINCIA_CLIENTEValue : String;
    function GetOldFECHA_ALTAValue : DateTime;
    function GetOldFECHA_MODIFICACIONValue : DateTime;
    function GetOldUSUARIOValue : String;
    function GetOldENTIDADValue : String;
    function GetOldSUCURSALValue : String;
    function GetOldDCValue : String;
    function GetOldCUENTAValue : String;

    { Properties }
    property OldID : Integer read GetOldIDValue;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property OldID_REMESA : Integer read GetOldID_REMESAValue;
    property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
    property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue;
    property OldIMPORTE : Currency read GetOldIMPORTEValue;
    property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue;
    property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property OldDATOS_BANCARIOS : String read GetOldDATOS_BANCARIOSValue;
    property OldID_CLIENTE : Integer read GetOldID_CLIENTEValue;
    property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
    property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
    property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
    property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
    property OldCODIGO_POSTAL_CLIENTE : String read GetOldCODIGO_POSTAL_CLIENTEValue;
    property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;
    property OldENTIDAD : String read GetOldENTIDADValue;
    property OldSUCURSAL : String read GetOldSUCURSALValue;
    property OldDC : String read GetOldDCValue;
    property OldCUENTA : String read GetOldCUENTAValue;
  end;

  { TRecibosClienteBusinessProcessorRules }
  TRecibosClienteBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosCliente, IRecibosClienteDelta)
  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_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetID_RECIBO_COMPENSADOIsNull: Boolean; virtual;
    function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetOldID_RECIBO_COMPENSADOIsNull: Boolean; virtual;
    procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
    procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIA_REC_COMPENSADOValue: String; virtual;
    function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual;
    function GetOldREFERENCIA_REC_COMPENSADOValue: String; virtual;
    function GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual;
    procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual;
    procedure SetREFERENCIA_REC_COMPENSADOIsNull(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 GetSITUACIONValue: String; virtual;
    function GetSITUACIONIsNull: Boolean; virtual;
    function GetOldSITUACIONValue: String; virtual;
    function GetOldSITUACIONIsNull: Boolean; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
    function GetID_FACTURAValue: Integer; virtual;
    function GetID_FACTURAIsNull: Boolean; virtual;
    function GetOldID_FACTURAValue: Integer; virtual;
    function GetOldID_FACTURAIsNull: Boolean; virtual;
    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
    procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
    function GetID_REMESAValue: Integer; virtual;
    function GetID_REMESAIsNull: Boolean; virtual;
    function GetOldID_REMESAValue: Integer; virtual;
    function GetOldID_REMESAIsNull: Boolean; virtual;
    procedure SetID_REMESAValue(const aValue: Integer); virtual;
    procedure SetID_REMESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIA_REMESAValue: String; virtual;
    function GetREFERENCIA_REMESAIsNull: Boolean; virtual;
    function GetOldREFERENCIA_REMESAValue: String; virtual;
    function GetOldREFERENCIA_REMESAIsNull: Boolean; virtual;
    procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual;
    procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_EMISIONValue: DateTime; virtual;
    function GetFECHA_EMISIONIsNull: Boolean; virtual;
    function GetOldFECHA_EMISIONValue: DateTime; virtual;
    function GetOldFECHA_EMISIONIsNull: Boolean; virtual;
    procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
    procedure SetFECHA_EMISIONIsNull(const aValue: Boolean); virtual;
    function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetFECHA_VENCIMIENTOIsNull: Boolean; virtual;
    function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetOldFECHA_VENCIMIENTOIsNull: Boolean; virtual;
    procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
    procedure SetFECHA_VENCIMIENTOIsNull(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 GetOBSERVACIONESValue: String; virtual;
    function GetOBSERVACIONESIsNull: Boolean; virtual;
    function GetOldOBSERVACIONESValue: String; virtual;
    function GetOldOBSERVACIONESIsNull: Boolean; virtual;
    procedure SetOBSERVACIONESValue(const aValue: String); virtual;
    procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual;
    function GetIMPORTEValue: Currency; virtual;
    function GetIMPORTEIsNull: Boolean; virtual;
    function GetOldIMPORTEValue: Currency; virtual;
    function GetOldIMPORTEIsNull: Boolean; virtual;
    procedure SetIMPORTEValue(const aValue: Currency); virtual;
    procedure SetIMPORTEIsNull(const aValue: Boolean); virtual;
    function GetOTROS_GASTOSValue: Currency; virtual;
    function GetOTROS_GASTOSIsNull: Boolean; virtual;
    function GetOldOTROS_GASTOSValue: Currency; virtual;
    function GetOldOTROS_GASTOSIsNull: Boolean; virtual;
    procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual;
    procedure SetOTROS_GASTOSIsNull(const aValue: Boolean); virtual;
    function GetIMPORTE_TOTALValue: Currency; virtual;
    function GetIMPORTE_TOTALIsNull: Boolean; virtual;
    function GetOldIMPORTE_TOTALValue: Currency; virtual;
    function GetOldIMPORTE_TOTALIsNull: Boolean; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
    procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual;
    function GetFECHA_FACTURAValue: DateTime; virtual;
    function GetFECHA_FACTURAIsNull: Boolean; virtual;
    function GetOldFECHA_FACTURAValue: DateTime; virtual;
    function GetOldFECHA_FACTURAIsNull: Boolean; virtual;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
    procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual;
    function GetFORMA_PAGO_FACTURAValue: String; virtual;
    function GetFORMA_PAGO_FACTURAIsNull: Boolean; virtual;
    function GetOldFORMA_PAGO_FACTURAValue: String; virtual;
    function GetOldFORMA_PAGO_FACTURAIsNull: Boolean; virtual;
    procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual;
    procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); virtual;
    function GetIMPORTE_FACTURAValue: Currency; virtual;
    function GetIMPORTE_FACTURAIsNull: Boolean; virtual;
    function GetOldIMPORTE_FACTURAValue: Currency; virtual;
    function GetOldIMPORTE_FACTURAIsNull: Boolean; virtual;
    procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual;
    procedure SetIMPORTE_FACTURAIsNull(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 GetDATOS_BANCARIOSValue: String; virtual;
    function GetDATOS_BANCARIOSIsNull: Boolean; virtual;
    function GetOldDATOS_BANCARIOSValue: String; virtual;
    function GetOldDATOS_BANCARIOSIsNull: Boolean; virtual;
    procedure SetDATOS_BANCARIOSValue(const aValue: String); virtual;
    procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean); virtual;
    function GetID_CLIENTEValue: Integer; virtual;
    function GetID_CLIENTEIsNull: Boolean; virtual;
    function GetOldID_CLIENTEValue: Integer; virtual;
    function GetOldID_CLIENTEIsNull: Boolean; virtual;
    procedure SetID_CLIENTEValue(const aValue: Integer); virtual;
    procedure SetID_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetNOMBRE_CLIENTEValue: String; virtual;
    function GetNOMBRE_CLIENTEIsNull: Boolean; virtual;
    function GetOldNOMBRE_CLIENTEValue: String; virtual;
    function GetOldNOMBRE_CLIENTEIsNull: Boolean; virtual;
    procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIF_CLIENTEValue: String; virtual;
    function GetNIF_CIF_CLIENTEIsNull: Boolean; virtual;
    function GetOldNIF_CIF_CLIENTEValue: String; virtual;
    function GetOldNIF_CIF_CLIENTEIsNull: Boolean; virtual;
    procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetCALLE_CLIENTEValue: String; virtual;
    function GetCALLE_CLIENTEIsNull: Boolean; virtual;
    function GetOldCALLE_CLIENTEValue: String; virtual;
    function GetOldCALLE_CLIENTEIsNull: Boolean; virtual;
    procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACION_CLIENTEValue: String; virtual;
    function GetPOBLACION_CLIENTEIsNull: Boolean; virtual;
    function GetOldPOBLACION_CLIENTEValue: String; virtual;
    function GetOldPOBLACION_CLIENTEIsNull: Boolean; virtual;
    procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTAL_CLIENTEValue: String; virtual;
    function GetCODIGO_POSTAL_CLIENTEIsNull: Boolean; virtual;
    function GetOldCODIGO_POSTAL_CLIENTEValue: String; virtual;
    function GetOldCODIGO_POSTAL_CLIENTEIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTAL_CLIENTEValue(const aValue: String); virtual;
    procedure SetCODIGO_POSTAL_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIA_CLIENTEValue: String; virtual;
    function GetPROVINCIA_CLIENTEIsNull: Boolean; virtual;
    function GetOldPROVINCIA_CLIENTEValue: String; virtual;
    function GetOldPROVINCIA_CLIENTEIsNull: Boolean; virtual;
    procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    function GetOldFECHA_ALTAValue: DateTime; virtual;
    function GetOldFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    function GetOldFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetOldFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    function GetOldUSUARIOValue: String; virtual;
    function GetOldUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    procedure SetUSUARIOIsNull(const aValue: Boolean); virtual;
    function GetENTIDADValue: String; virtual;
    function GetENTIDADIsNull: Boolean; virtual;
    function GetOldENTIDADValue: String; virtual;
    function GetOldENTIDADIsNull: Boolean; virtual;
    procedure SetENTIDADValue(const aValue: String); virtual;
    procedure SetENTIDADIsNull(const aValue: Boolean); virtual;
    function GetSUCURSALValue: String; virtual;
    function GetSUCURSALIsNull: Boolean; virtual;
    function GetOldSUCURSALValue: String; virtual;
    function GetOldSUCURSALIsNull: Boolean; virtual;
    procedure SetSUCURSALValue(const aValue: String); virtual;
    procedure SetSUCURSALIsNull(const aValue: Boolean); virtual;
    function GetDCValue: String; virtual;
    function GetDCIsNull: Boolean; virtual;
    function GetOldDCValue: String; virtual;
    function GetOldDCIsNull: Boolean; virtual;
    procedure SetDCValue(const aValue: String); virtual;
    procedure SetDCIsNull(const aValue: Boolean); virtual;
    function GetCUENTAValue: String; virtual;
    function GetCUENTAIsNull: Boolean; virtual;
    function GetOldCUENTAValue: String; virtual;
    function GetOldCUENTAIsNull: Boolean; virtual;
    procedure SetCUENTAValue(const aValue: String); virtual;
    procedure SetCUENTAIsNull(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_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue;
    property ID_RECIBO_COMPENSADOIsNull : Boolean read GetID_RECIBO_COMPENSADOIsNull write SetID_RECIBO_COMPENSADOIsNull;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property OldID_RECIBO_COMPENSADOIsNull : Boolean read GetOldID_RECIBO_COMPENSADOIsNull;
    property REFERENCIA_REC_COMPENSADO : String read GetREFERENCIA_REC_COMPENSADOValue write SetREFERENCIA_REC_COMPENSADOValue;
    property REFERENCIA_REC_COMPENSADOIsNull : Boolean read GetREFERENCIA_REC_COMPENSADOIsNull write SetREFERENCIA_REC_COMPENSADOIsNull;
    property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue;
    property OldREFERENCIA_REC_COMPENSADOIsNull : Boolean read GetOldREFERENCIA_REC_COMPENSADOIsNull;
    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 SITUACION : String read GetSITUACIONValue write SetSITUACIONValue;
    property SITUACIONIsNull : Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property OldSITUACIONIsNull : Boolean read GetOldSITUACIONIsNull;
    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull;
    property ID_REMESA : Integer read GetID_REMESAValue write SetID_REMESAValue;
    property ID_REMESAIsNull : Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull;
    property OldID_REMESA : Integer read GetOldID_REMESAValue;
    property OldID_REMESAIsNull : Boolean read GetOldID_REMESAIsNull;
    property REFERENCIA_REMESA : String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
    property REFERENCIA_REMESAIsNull : Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull;
    property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue;
    property OldREFERENCIA_REMESAIsNull : Boolean read GetOldREFERENCIA_REMESAIsNull;
    property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
    property FECHA_EMISIONIsNull : Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property OldFECHA_EMISIONIsNull : Boolean read GetOldFECHA_EMISIONIsNull;
    property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
    property FECHA_VENCIMIENTOIsNull : Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property OldFECHA_VENCIMIENTOIsNull : Boolean read GetOldFECHA_VENCIMIENTOIsNull;
    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 OBSERVACIONES : String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property OBSERVACIONESIsNull : Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
    property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue;
    property OldOBSERVACIONESIsNull : Boolean read GetOldOBSERVACIONESIsNull;
    property IMPORTE : Currency read GetIMPORTEValue write SetIMPORTEValue;
    property IMPORTEIsNull : Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull;
    property OldIMPORTE : Currency read GetOldIMPORTEValue;
    property OldIMPORTEIsNull : Boolean read GetOldIMPORTEIsNull;
    property OTROS_GASTOS : Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
    property OTROS_GASTOSIsNull : Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull;
    property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue;
    property OldOTROS_GASTOSIsNull : Boolean read GetOldOTROS_GASTOSIsNull;
    property IMPORTE_TOTAL : Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property IMPORTE_TOTALIsNull : Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
    property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue;
    property OldIMPORTE_TOTALIsNull : Boolean read GetOldIMPORTE_TOTALIsNull;
    property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property FECHA_FACTURAIsNull : Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property OldFECHA_FACTURAIsNull : Boolean read GetOldFECHA_FACTURAIsNull;
    property FORMA_PAGO_FACTURA : String read GetFORMA_PAGO_FACTURAValue write SetFORMA_PAGO_FACTURAValue;
    property FORMA_PAGO_FACTURAIsNull : Boolean read GetFORMA_PAGO_FACTURAIsNull write SetFORMA_PAGO_FACTURAIsNull;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property OldFORMA_PAGO_FACTURAIsNull : Boolean read GetOldFORMA_PAGO_FACTURAIsNull;
    property IMPORTE_FACTURA : Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
    property IMPORTE_FACTURAIsNull : Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property OldIMPORTE_FACTURAIsNull : Boolean read GetOldIMPORTE_FACTURAIsNull;
    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 DATOS_BANCARIOS : String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
    property DATOS_BANCARIOSIsNull : Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
    property OldDATOS_BANCARIOS : String read GetOldDATOS_BANCARIOSValue;
    property OldDATOS_BANCARIOSIsNull : Boolean read GetOldDATOS_BANCARIOSIsNull;
    property ID_CLIENTE : Integer read GetID_CLIENTEValue write SetID_CLIENTEValue;
    property ID_CLIENTEIsNull : Boolean read GetID_CLIENTEIsNull write SetID_CLIENTEIsNull;
    property OldID_CLIENTE : Integer read GetOldID_CLIENTEValue;
    property OldID_CLIENTEIsNull : Boolean read GetOldID_CLIENTEIsNull;
    property NOMBRE_CLIENTE : String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
    property NOMBRE_CLIENTEIsNull : Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
    property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
    property OldNOMBRE_CLIENTEIsNull : Boolean read GetOldNOMBRE_CLIENTEIsNull;
    property NIF_CIF_CLIENTE : String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
    property NIF_CIF_CLIENTEIsNull : Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
    property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
    property OldNIF_CIF_CLIENTEIsNull : Boolean read GetOldNIF_CIF_CLIENTEIsNull;
    property CALLE_CLIENTE : String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
    property CALLE_CLIENTEIsNull : Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
    property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
    property OldCALLE_CLIENTEIsNull : Boolean read GetOldCALLE_CLIENTEIsNull;
    property POBLACION_CLIENTE : String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
    property POBLACION_CLIENTEIsNull : Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
    property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
    property OldPOBLACION_CLIENTEIsNull : Boolean read GetOldPOBLACION_CLIENTEIsNull;
    property CODIGO_POSTAL_CLIENTE : String read GetCODIGO_POSTAL_CLIENTEValue write SetCODIGO_POSTAL_CLIENTEValue;
    property CODIGO_POSTAL_CLIENTEIsNull : Boolean read GetCODIGO_POSTAL_CLIENTEIsNull write SetCODIGO_POSTAL_CLIENTEIsNull;
    property OldCODIGO_POSTAL_CLIENTE : String read GetOldCODIGO_POSTAL_CLIENTEValue;
    property OldCODIGO_POSTAL_CLIENTEIsNull : Boolean read GetOldCODIGO_POSTAL_CLIENTEIsNull;
    property PROVINCIA_CLIENTE : String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
    property PROVINCIA_CLIENTEIsNull : Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
    property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
    property OldPROVINCIA_CLIENTEIsNull : Boolean read GetOldPROVINCIA_CLIENTEIsNull;
    property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull : Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_ALTAIsNull : Boolean read GetOldFECHA_ALTAIsNull;
    property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull : Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldFECHA_MODIFICACIONIsNull : Boolean read GetOldFECHA_MODIFICACIONIsNull;
    property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull : Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property OldUSUARIO : String read GetOldUSUARIOValue;
    property OldUSUARIOIsNull : Boolean read GetOldUSUARIOIsNull;
    property ENTIDAD : String read GetENTIDADValue write SetENTIDADValue;
    property ENTIDADIsNull : Boolean read GetENTIDADIsNull write SetENTIDADIsNull;
    property OldENTIDAD : String read GetOldENTIDADValue;
    property OldENTIDADIsNull : Boolean read GetOldENTIDADIsNull;
    property SUCURSAL : String read GetSUCURSALValue write SetSUCURSALValue;
    property SUCURSALIsNull : Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull;
    property OldSUCURSAL : String read GetOldSUCURSALValue;
    property OldSUCURSALIsNull : Boolean read GetOldSUCURSALIsNull;
    property DC : String read GetDCValue write SetDCValue;
    property DCIsNull : Boolean read GetDCIsNull write SetDCIsNull;
    property OldDC : String read GetOldDCValue;
    property OldDCIsNull : Boolean read GetOldDCIsNull;
    property CUENTA : String read GetCUENTAValue write SetCUENTAValue;
    property CUENTAIsNull : Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
    property OldCUENTA : String read GetOldCUENTAValue;
    property OldCUENTAIsNull : Boolean read GetOldCUENTAIsNull;

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

  end;

  { IPagosClienteDelta }
  IPagosClienteDelta = interface(IPagosCliente)
  ['{94C70DF1-5535-4C04-B227-123B1B8E7FE5}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_RECIBOValue : Integer;
    function GetOldTIPOValue : String;
    function GetOldFECHA_PAGOValue : DateTime;
    function GetOldTITULARValue : String;
    function GetOldENTIDADValue : String;
    function GetOldSUCURSALValue : String;
    function GetOldDCValue : String;
    function GetOldCUENTAValue : String;
    function GetOldFECHA_ALTAValue : DateTime;
    function GetOldFECHA_MODIFICACIONValue : DateTime;
    function GetOldUSUARIOValue : String;

    { Properties }
    property OldID : Integer read GetOldIDValue;
    property OldID_RECIBO : Integer read GetOldID_RECIBOValue;
    property OldTIPO : String read GetOldTIPOValue;
    property OldFECHA_PAGO : DateTime read GetOldFECHA_PAGOValue;
    property OldTITULAR : String read GetOldTITULARValue;
    property OldENTIDAD : String read GetOldENTIDADValue;
    property OldSUCURSAL : String read GetOldSUCURSALValue;
    property OldDC : String read GetOldDCValue;
    property OldCUENTA : String read GetOldCUENTAValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;
  end;

  { TPagosClienteBusinessProcessorRules }
  TPagosClienteBusinessProcessorRules = class(TDABusinessProcessorRules, IPagosCliente, IPagosClienteDelta)
  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_RECIBOValue: Integer; virtual;
    function GetID_RECIBOIsNull: Boolean; virtual;
    function GetOldID_RECIBOValue: Integer; virtual;
    function GetOldID_RECIBOIsNull: Boolean; virtual;
    procedure SetID_RECIBOValue(const aValue: Integer); virtual;
    procedure SetID_RECIBOIsNull(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 GetFECHA_PAGOValue: DateTime; virtual;
    function GetFECHA_PAGOIsNull: Boolean; virtual;
    function GetOldFECHA_PAGOValue: DateTime; virtual;
    function GetOldFECHA_PAGOIsNull: Boolean; virtual;
    procedure SetFECHA_PAGOValue(const aValue: DateTime); virtual;
    procedure SetFECHA_PAGOIsNull(const aValue: Boolean); virtual;
    function GetTITULARValue: String; virtual;
    function GetTITULARIsNull: Boolean; virtual;
    function GetOldTITULARValue: String; virtual;
    function GetOldTITULARIsNull: Boolean; virtual;
    procedure SetTITULARValue(const aValue: String); virtual;
    procedure SetTITULARIsNull(const aValue: Boolean); virtual;
    function GetENTIDADValue: String; virtual;
    function GetENTIDADIsNull: Boolean; virtual;
    function GetOldENTIDADValue: String; virtual;
    function GetOldENTIDADIsNull: Boolean; virtual;
    procedure SetENTIDADValue(const aValue: String); virtual;
    procedure SetENTIDADIsNull(const aValue: Boolean); virtual;
    function GetSUCURSALValue: String; virtual;
    function GetSUCURSALIsNull: Boolean; virtual;
    function GetOldSUCURSALValue: String; virtual;
    function GetOldSUCURSALIsNull: Boolean; virtual;
    procedure SetSUCURSALValue(const aValue: String); virtual;
    procedure SetSUCURSALIsNull(const aValue: Boolean); virtual;
    function GetDCValue: String; virtual;
    function GetDCIsNull: Boolean; virtual;
    function GetOldDCValue: String; virtual;
    function GetOldDCIsNull: Boolean; virtual;
    procedure SetDCValue(const aValue: String); virtual;
    procedure SetDCIsNull(const aValue: Boolean); virtual;
    function GetCUENTAValue: String; virtual;
    function GetCUENTAIsNull: Boolean; virtual;
    function GetOldCUENTAValue: String; virtual;
    function GetOldCUENTAIsNull: Boolean; virtual;
    procedure SetCUENTAValue(const aValue: String); virtual;
    procedure SetCUENTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    function GetOldFECHA_ALTAValue: DateTime; virtual;
    function GetOldFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    function GetOldFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetOldFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    function GetOldUSUARIOValue: String; virtual;
    function GetOldUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    procedure SetUSUARIOIsNull(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_RECIBO : Integer read GetID_RECIBOValue write SetID_RECIBOValue;
    property ID_RECIBOIsNull : Boolean read GetID_RECIBOIsNull write SetID_RECIBOIsNull;
    property OldID_RECIBO : Integer read GetOldID_RECIBOValue;
    property OldID_RECIBOIsNull : Boolean read GetOldID_RECIBOIsNull;
    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 FECHA_PAGO : DateTime read GetFECHA_PAGOValue write SetFECHA_PAGOValue;
    property FECHA_PAGOIsNull : Boolean read GetFECHA_PAGOIsNull write SetFECHA_PAGOIsNull;
    property OldFECHA_PAGO : DateTime read GetOldFECHA_PAGOValue;
    property OldFECHA_PAGOIsNull : Boolean read GetOldFECHA_PAGOIsNull;
    property TITULAR : String read GetTITULARValue write SetTITULARValue;
    property TITULARIsNull : Boolean read GetTITULARIsNull write SetTITULARIsNull;
    property OldTITULAR : String read GetOldTITULARValue;
    property OldTITULARIsNull : Boolean read GetOldTITULARIsNull;
    property ENTIDAD : String read GetENTIDADValue write SetENTIDADValue;
    property ENTIDADIsNull : Boolean read GetENTIDADIsNull write SetENTIDADIsNull;
    property OldENTIDAD : String read GetOldENTIDADValue;
    property OldENTIDADIsNull : Boolean read GetOldENTIDADIsNull;
    property SUCURSAL : String read GetSUCURSALValue write SetSUCURSALValue;
    property SUCURSALIsNull : Boolean read GetSUCURSALIsNull write SetSUCURSALIsNull;
    property OldSUCURSAL : String read GetOldSUCURSALValue;
    property OldSUCURSALIsNull : Boolean read GetOldSUCURSALIsNull;
    property DC : String read GetDCValue write SetDCValue;
    property DCIsNull : Boolean read GetDCIsNull write SetDCIsNull;
    property OldDC : String read GetOldDCValue;
    property OldDCIsNull : Boolean read GetOldDCIsNull;
    property CUENTA : String read GetCUENTAValue write SetCUENTAValue;
    property CUENTAIsNull : Boolean read GetCUENTAIsNull write SetCUENTAIsNull;
    property OldCUENTA : String read GetOldCUENTAValue;
    property OldCUENTAIsNull : Boolean read GetOldCUENTAIsNull;
    property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull : Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_ALTAIsNull : Boolean read GetOldFECHA_ALTAIsNull;
    property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull : Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldFECHA_MODIFICACIONIsNull : Boolean read GetOldFECHA_MODIFICACIONIsNull;
    property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull : Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property OldUSUARIO : String read GetOldUSUARIOValue;
    property OldUSUARIOIsNull : Boolean read GetOldUSUARIOIsNull;

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

  end;

  { IRecibosCompensadosCliDelta }
  IRecibosCompensadosCliDelta = interface(IRecibosCompensadosCli)
  ['{F5087755-FD90-439A-878B-5749589D42F5}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_RECIBO_COMPENSADOValue : Integer;
    function GetOldREFERENCIA_REC_COMPENSADOValue : String;
    function GetOldREFERENCIAValue : String;
    function GetOldSITUACIONValue : String;
    function GetOldID_FACTURAValue : Integer;
    function GetOldID_REMESAValue : Integer;
    function GetOldREFERENCIA_REMESAValue : String;
    function GetOldFECHA_EMISIONValue : DateTime;
    function GetOldFECHA_VENCIMIENTOValue : DateTime;
    function GetOldDESCRIPCIONValue : String;
    function GetOldOBSERVACIONESValue : String;
    function GetOldIMPORTEValue : Currency;
    function GetOldOTROS_GASTOSValue : Currency;
    function GetOldIMPORTE_TOTALValue : Currency;
    function GetOldFECHA_FACTURAValue : DateTime;
    function GetOldFORMA_PAGO_FACTURAValue : String;
    function GetOldIMPORTE_FACTURAValue : Currency;
    function GetOldID_EMPRESAValue : Integer;
    function GetOldDATOS_BANCARIOSValue : String;
    function GetOldID_CLIENTEValue : Integer;
    function GetOldNOMBRE_CLIENTEValue : String;
    function GetOldNIF_CIF_CLIENTEValue : String;
    function GetOldCALLE_CLIENTEValue : String;
    function GetOldPOBLACION_CLIENTEValue : String;
    function GetOldCODIGO_POSTAL_CLIENTEValue : String;
    function GetOldPROVINCIA_CLIENTEValue : String;
    function GetOldFECHA_ALTAValue : DateTime;
    function GetOldFECHA_MODIFICACIONValue : DateTime;
    function GetOldUSUARIOValue : String;

    { Properties }
    property OldID : Integer read GetOldIDValue;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property OldID_REMESA : Integer read GetOldID_REMESAValue;
    property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
    property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue;
    property OldIMPORTE : Currency read GetOldIMPORTEValue;
    property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue;
    property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property OldDATOS_BANCARIOS : String read GetOldDATOS_BANCARIOSValue;
    property OldID_CLIENTE : Integer read GetOldID_CLIENTEValue;
    property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
    property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
    property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
    property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
    property OldCODIGO_POSTAL_CLIENTE : String read GetOldCODIGO_POSTAL_CLIENTEValue;
    property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;
  end;

  { TRecibosCompensadosCliBusinessProcessorRules }
  TRecibosCompensadosCliBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosCompensadosCli, IRecibosCompensadosCliDelta)
  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_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetID_RECIBO_COMPENSADOIsNull: Boolean; virtual;
    function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetOldID_RECIBO_COMPENSADOIsNull: Boolean; virtual;
    procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
    procedure SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIA_REC_COMPENSADOValue: String; virtual;
    function GetREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual;
    function GetOldREFERENCIA_REC_COMPENSADOValue: String; virtual;
    function GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean; virtual;
    procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual;
    procedure SetREFERENCIA_REC_COMPENSADOIsNull(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 GetSITUACIONValue: String; virtual;
    function GetSITUACIONIsNull: Boolean; virtual;
    function GetOldSITUACIONValue: String; virtual;
    function GetOldSITUACIONIsNull: Boolean; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
    function GetID_FACTURAValue: Integer; virtual;
    function GetID_FACTURAIsNull: Boolean; virtual;
    function GetOldID_FACTURAValue: Integer; virtual;
    function GetOldID_FACTURAIsNull: Boolean; virtual;
    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
    procedure SetID_FACTURAIsNull(const aValue: Boolean); virtual;
    function GetID_REMESAValue: Integer; virtual;
    function GetID_REMESAIsNull: Boolean; virtual;
    function GetOldID_REMESAValue: Integer; virtual;
    function GetOldID_REMESAIsNull: Boolean; virtual;
    procedure SetID_REMESAValue(const aValue: Integer); virtual;
    procedure SetID_REMESAIsNull(const aValue: Boolean); virtual;
    function GetREFERENCIA_REMESAValue: String; virtual;
    function GetREFERENCIA_REMESAIsNull: Boolean; virtual;
    function GetOldREFERENCIA_REMESAValue: String; virtual;
    function GetOldREFERENCIA_REMESAIsNull: Boolean; virtual;
    procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual;
    procedure SetREFERENCIA_REMESAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_EMISIONValue: DateTime; virtual;
    function GetFECHA_EMISIONIsNull: Boolean; virtual;
    function GetOldFECHA_EMISIONValue: DateTime; virtual;
    function GetOldFECHA_EMISIONIsNull: Boolean; virtual;
    procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
    procedure SetFECHA_EMISIONIsNull(const aValue: Boolean); virtual;
    function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetFECHA_VENCIMIENTOIsNull: Boolean; virtual;
    function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetOldFECHA_VENCIMIENTOIsNull: Boolean; virtual;
    procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
    procedure SetFECHA_VENCIMIENTOIsNull(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 GetOBSERVACIONESValue: String; virtual;
    function GetOBSERVACIONESIsNull: Boolean; virtual;
    function GetOldOBSERVACIONESValue: String; virtual;
    function GetOldOBSERVACIONESIsNull: Boolean; virtual;
    procedure SetOBSERVACIONESValue(const aValue: String); virtual;
    procedure SetOBSERVACIONESIsNull(const aValue: Boolean); virtual;
    function GetIMPORTEValue: Currency; virtual;
    function GetIMPORTEIsNull: Boolean; virtual;
    function GetOldIMPORTEValue: Currency; virtual;
    function GetOldIMPORTEIsNull: Boolean; virtual;
    procedure SetIMPORTEValue(const aValue: Currency); virtual;
    procedure SetIMPORTEIsNull(const aValue: Boolean); virtual;
    function GetOTROS_GASTOSValue: Currency; virtual;
    function GetOTROS_GASTOSIsNull: Boolean; virtual;
    function GetOldOTROS_GASTOSValue: Currency; virtual;
    function GetOldOTROS_GASTOSIsNull: Boolean; virtual;
    procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual;
    procedure SetOTROS_GASTOSIsNull(const aValue: Boolean); virtual;
    function GetIMPORTE_TOTALValue: Currency; virtual;
    function GetIMPORTE_TOTALIsNull: Boolean; virtual;
    function GetOldIMPORTE_TOTALValue: Currency; virtual;
    function GetOldIMPORTE_TOTALIsNull: Boolean; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
    procedure SetIMPORTE_TOTALIsNull(const aValue: Boolean); virtual;
    function GetFECHA_FACTURAValue: DateTime; virtual;
    function GetFECHA_FACTURAIsNull: Boolean; virtual;
    function GetOldFECHA_FACTURAValue: DateTime; virtual;
    function GetOldFECHA_FACTURAIsNull: Boolean; virtual;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
    procedure SetFECHA_FACTURAIsNull(const aValue: Boolean); virtual;
    function GetFORMA_PAGO_FACTURAValue: String; virtual;
    function GetFORMA_PAGO_FACTURAIsNull: Boolean; virtual;
    function GetOldFORMA_PAGO_FACTURAValue: String; virtual;
    function GetOldFORMA_PAGO_FACTURAIsNull: Boolean; virtual;
    procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual;
    procedure SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean); virtual;
    function GetIMPORTE_FACTURAValue: Currency; virtual;
    function GetIMPORTE_FACTURAIsNull: Boolean; virtual;
    function GetOldIMPORTE_FACTURAValue: Currency; virtual;
    function GetOldIMPORTE_FACTURAIsNull: Boolean; virtual;
    procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual;
    procedure SetIMPORTE_FACTURAIsNull(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 GetDATOS_BANCARIOSValue: String; virtual;
    function GetDATOS_BANCARIOSIsNull: Boolean; virtual;
    function GetOldDATOS_BANCARIOSValue: String; virtual;
    function GetOldDATOS_BANCARIOSIsNull: Boolean; virtual;
    procedure SetDATOS_BANCARIOSValue(const aValue: String); virtual;
    procedure SetDATOS_BANCARIOSIsNull(const aValue: Boolean); virtual;
    function GetID_CLIENTEValue: Integer; virtual;
    function GetID_CLIENTEIsNull: Boolean; virtual;
    function GetOldID_CLIENTEValue: Integer; virtual;
    function GetOldID_CLIENTEIsNull: Boolean; virtual;
    procedure SetID_CLIENTEValue(const aValue: Integer); virtual;
    procedure SetID_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetNOMBRE_CLIENTEValue: String; virtual;
    function GetNOMBRE_CLIENTEIsNull: Boolean; virtual;
    function GetOldNOMBRE_CLIENTEValue: String; virtual;
    function GetOldNOMBRE_CLIENTEIsNull: Boolean; virtual;
    procedure SetNOMBRE_CLIENTEValue(const aValue: String); virtual;
    procedure SetNOMBRE_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetNIF_CIF_CLIENTEValue: String; virtual;
    function GetNIF_CIF_CLIENTEIsNull: Boolean; virtual;
    function GetOldNIF_CIF_CLIENTEValue: String; virtual;
    function GetOldNIF_CIF_CLIENTEIsNull: Boolean; virtual;
    procedure SetNIF_CIF_CLIENTEValue(const aValue: String); virtual;
    procedure SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetCALLE_CLIENTEValue: String; virtual;
    function GetCALLE_CLIENTEIsNull: Boolean; virtual;
    function GetOldCALLE_CLIENTEValue: String; virtual;
    function GetOldCALLE_CLIENTEIsNull: Boolean; virtual;
    procedure SetCALLE_CLIENTEValue(const aValue: String); virtual;
    procedure SetCALLE_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetPOBLACION_CLIENTEValue: String; virtual;
    function GetPOBLACION_CLIENTEIsNull: Boolean; virtual;
    function GetOldPOBLACION_CLIENTEValue: String; virtual;
    function GetOldPOBLACION_CLIENTEIsNull: Boolean; virtual;
    procedure SetPOBLACION_CLIENTEValue(const aValue: String); virtual;
    procedure SetPOBLACION_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetCODIGO_POSTAL_CLIENTEValue: String; virtual;
    function GetCODIGO_POSTAL_CLIENTEIsNull: Boolean; virtual;
    function GetOldCODIGO_POSTAL_CLIENTEValue: String; virtual;
    function GetOldCODIGO_POSTAL_CLIENTEIsNull: Boolean; virtual;
    procedure SetCODIGO_POSTAL_CLIENTEValue(const aValue: String); virtual;
    procedure SetCODIGO_POSTAL_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetPROVINCIA_CLIENTEValue: String; virtual;
    function GetPROVINCIA_CLIENTEIsNull: Boolean; virtual;
    function GetOldPROVINCIA_CLIENTEValue: String; virtual;
    function GetOldPROVINCIA_CLIENTEIsNull: Boolean; virtual;
    procedure SetPROVINCIA_CLIENTEValue(const aValue: String); virtual;
    procedure SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    function GetFECHA_ALTAIsNull: Boolean; virtual;
    function GetOldFECHA_ALTAValue: DateTime; virtual;
    function GetOldFECHA_ALTAIsNull: Boolean; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    procedure SetFECHA_ALTAIsNull(const aValue: Boolean); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetFECHA_MODIFICACIONIsNull: Boolean; virtual;
    function GetOldFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetOldFECHA_MODIFICACIONIsNull: Boolean; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    procedure SetFECHA_MODIFICACIONIsNull(const aValue: Boolean); virtual;
    function GetUSUARIOValue: String; virtual;
    function GetUSUARIOIsNull: Boolean; virtual;
    function GetOldUSUARIOValue: String; virtual;
    function GetOldUSUARIOIsNull: Boolean; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;
    procedure SetUSUARIOIsNull(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_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue;
    property ID_RECIBO_COMPENSADOIsNull : Boolean read GetID_RECIBO_COMPENSADOIsNull write SetID_RECIBO_COMPENSADOIsNull;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property OldID_RECIBO_COMPENSADOIsNull : Boolean read GetOldID_RECIBO_COMPENSADOIsNull;
    property REFERENCIA_REC_COMPENSADO : String read GetREFERENCIA_REC_COMPENSADOValue write SetREFERENCIA_REC_COMPENSADOValue;
    property REFERENCIA_REC_COMPENSADOIsNull : Boolean read GetREFERENCIA_REC_COMPENSADOIsNull write SetREFERENCIA_REC_COMPENSADOIsNull;
    property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue;
    property OldREFERENCIA_REC_COMPENSADOIsNull : Boolean read GetOldREFERENCIA_REC_COMPENSADOIsNull;
    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 SITUACION : String read GetSITUACIONValue write SetSITUACIONValue;
    property SITUACIONIsNull : Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property OldSITUACIONIsNull : Boolean read GetOldSITUACIONIsNull;
    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property ID_FACTURAIsNull : Boolean read GetID_FACTURAIsNull write SetID_FACTURAIsNull;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property OldID_FACTURAIsNull : Boolean read GetOldID_FACTURAIsNull;
    property ID_REMESA : Integer read GetID_REMESAValue write SetID_REMESAValue;
    property ID_REMESAIsNull : Boolean read GetID_REMESAIsNull write SetID_REMESAIsNull;
    property OldID_REMESA : Integer read GetOldID_REMESAValue;
    property OldID_REMESAIsNull : Boolean read GetOldID_REMESAIsNull;
    property REFERENCIA_REMESA : String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
    property REFERENCIA_REMESAIsNull : Boolean read GetREFERENCIA_REMESAIsNull write SetREFERENCIA_REMESAIsNull;
    property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue;
    property OldREFERENCIA_REMESAIsNull : Boolean read GetOldREFERENCIA_REMESAIsNull;
    property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
    property FECHA_EMISIONIsNull : Boolean read GetFECHA_EMISIONIsNull write SetFECHA_EMISIONIsNull;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property OldFECHA_EMISIONIsNull : Boolean read GetOldFECHA_EMISIONIsNull;
    property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
    property FECHA_VENCIMIENTOIsNull : Boolean read GetFECHA_VENCIMIENTOIsNull write SetFECHA_VENCIMIENTOIsNull;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property OldFECHA_VENCIMIENTOIsNull : Boolean read GetOldFECHA_VENCIMIENTOIsNull;
    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 OBSERVACIONES : String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property OBSERVACIONESIsNull : Boolean read GetOBSERVACIONESIsNull write SetOBSERVACIONESIsNull;
    property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue;
    property OldOBSERVACIONESIsNull : Boolean read GetOldOBSERVACIONESIsNull;
    property IMPORTE : Currency read GetIMPORTEValue write SetIMPORTEValue;
    property IMPORTEIsNull : Boolean read GetIMPORTEIsNull write SetIMPORTEIsNull;
    property OldIMPORTE : Currency read GetOldIMPORTEValue;
    property OldIMPORTEIsNull : Boolean read GetOldIMPORTEIsNull;
    property OTROS_GASTOS : Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
    property OTROS_GASTOSIsNull : Boolean read GetOTROS_GASTOSIsNull write SetOTROS_GASTOSIsNull;
    property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue;
    property OldOTROS_GASTOSIsNull : Boolean read GetOldOTROS_GASTOSIsNull;
    property IMPORTE_TOTAL : Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property IMPORTE_TOTALIsNull : Boolean read GetIMPORTE_TOTALIsNull write SetIMPORTE_TOTALIsNull;
    property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue;
    property OldIMPORTE_TOTALIsNull : Boolean read GetOldIMPORTE_TOTALIsNull;
    property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property FECHA_FACTURAIsNull : Boolean read GetFECHA_FACTURAIsNull write SetFECHA_FACTURAIsNull;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property OldFECHA_FACTURAIsNull : Boolean read GetOldFECHA_FACTURAIsNull;
    property FORMA_PAGO_FACTURA : String read GetFORMA_PAGO_FACTURAValue write SetFORMA_PAGO_FACTURAValue;
    property FORMA_PAGO_FACTURAIsNull : Boolean read GetFORMA_PAGO_FACTURAIsNull write SetFORMA_PAGO_FACTURAIsNull;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property OldFORMA_PAGO_FACTURAIsNull : Boolean read GetOldFORMA_PAGO_FACTURAIsNull;
    property IMPORTE_FACTURA : Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
    property IMPORTE_FACTURAIsNull : Boolean read GetIMPORTE_FACTURAIsNull write SetIMPORTE_FACTURAIsNull;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property OldIMPORTE_FACTURAIsNull : Boolean read GetOldIMPORTE_FACTURAIsNull;
    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 DATOS_BANCARIOS : String read GetDATOS_BANCARIOSValue write SetDATOS_BANCARIOSValue;
    property DATOS_BANCARIOSIsNull : Boolean read GetDATOS_BANCARIOSIsNull write SetDATOS_BANCARIOSIsNull;
    property OldDATOS_BANCARIOS : String read GetOldDATOS_BANCARIOSValue;
    property OldDATOS_BANCARIOSIsNull : Boolean read GetOldDATOS_BANCARIOSIsNull;
    property ID_CLIENTE : Integer read GetID_CLIENTEValue write SetID_CLIENTEValue;
    property ID_CLIENTEIsNull : Boolean read GetID_CLIENTEIsNull write SetID_CLIENTEIsNull;
    property OldID_CLIENTE : Integer read GetOldID_CLIENTEValue;
    property OldID_CLIENTEIsNull : Boolean read GetOldID_CLIENTEIsNull;
    property NOMBRE_CLIENTE : String read GetNOMBRE_CLIENTEValue write SetNOMBRE_CLIENTEValue;
    property NOMBRE_CLIENTEIsNull : Boolean read GetNOMBRE_CLIENTEIsNull write SetNOMBRE_CLIENTEIsNull;
    property OldNOMBRE_CLIENTE : String read GetOldNOMBRE_CLIENTEValue;
    property OldNOMBRE_CLIENTEIsNull : Boolean read GetOldNOMBRE_CLIENTEIsNull;
    property NIF_CIF_CLIENTE : String read GetNIF_CIF_CLIENTEValue write SetNIF_CIF_CLIENTEValue;
    property NIF_CIF_CLIENTEIsNull : Boolean read GetNIF_CIF_CLIENTEIsNull write SetNIF_CIF_CLIENTEIsNull;
    property OldNIF_CIF_CLIENTE : String read GetOldNIF_CIF_CLIENTEValue;
    property OldNIF_CIF_CLIENTEIsNull : Boolean read GetOldNIF_CIF_CLIENTEIsNull;
    property CALLE_CLIENTE : String read GetCALLE_CLIENTEValue write SetCALLE_CLIENTEValue;
    property CALLE_CLIENTEIsNull : Boolean read GetCALLE_CLIENTEIsNull write SetCALLE_CLIENTEIsNull;
    property OldCALLE_CLIENTE : String read GetOldCALLE_CLIENTEValue;
    property OldCALLE_CLIENTEIsNull : Boolean read GetOldCALLE_CLIENTEIsNull;
    property POBLACION_CLIENTE : String read GetPOBLACION_CLIENTEValue write SetPOBLACION_CLIENTEValue;
    property POBLACION_CLIENTEIsNull : Boolean read GetPOBLACION_CLIENTEIsNull write SetPOBLACION_CLIENTEIsNull;
    property OldPOBLACION_CLIENTE : String read GetOldPOBLACION_CLIENTEValue;
    property OldPOBLACION_CLIENTEIsNull : Boolean read GetOldPOBLACION_CLIENTEIsNull;
    property CODIGO_POSTAL_CLIENTE : String read GetCODIGO_POSTAL_CLIENTEValue write SetCODIGO_POSTAL_CLIENTEValue;
    property CODIGO_POSTAL_CLIENTEIsNull : Boolean read GetCODIGO_POSTAL_CLIENTEIsNull write SetCODIGO_POSTAL_CLIENTEIsNull;
    property OldCODIGO_POSTAL_CLIENTE : String read GetOldCODIGO_POSTAL_CLIENTEValue;
    property OldCODIGO_POSTAL_CLIENTEIsNull : Boolean read GetOldCODIGO_POSTAL_CLIENTEIsNull;
    property PROVINCIA_CLIENTE : String read GetPROVINCIA_CLIENTEValue write SetPROVINCIA_CLIENTEValue;
    property PROVINCIA_CLIENTEIsNull : Boolean read GetPROVINCIA_CLIENTEIsNull write SetPROVINCIA_CLIENTEIsNull;
    property OldPROVINCIA_CLIENTE : String read GetOldPROVINCIA_CLIENTEValue;
    property OldPROVINCIA_CLIENTEIsNull : Boolean read GetOldPROVINCIA_CLIENTEIsNull;
    property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property FECHA_ALTAIsNull : Boolean read GetFECHA_ALTAIsNull write SetFECHA_ALTAIsNull;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_ALTAIsNull : Boolean read GetOldFECHA_ALTAIsNull;
    property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property FECHA_MODIFICACIONIsNull : Boolean read GetFECHA_MODIFICACIONIsNull write SetFECHA_MODIFICACIONIsNull;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldFECHA_MODIFICACIONIsNull : Boolean read GetOldFECHA_MODIFICACIONIsNull;
    property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue;
    property USUARIOIsNull : Boolean read GetUSUARIOIsNull write SetUSUARIOIsNull;
    property OldUSUARIO : String read GetOldUSUARIOValue;
    property OldUSUARIOIsNull : Boolean read GetOldUSUARIOIsNull;

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

  end;

implementation

uses
  Variants, uROBinaryHelpers, uDAInterfaces;

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

destructor TListaAnosRecibosBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TListaAnosRecibosBusinessProcessorRules.GetANOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO];
end;

function TListaAnosRecibosBusinessProcessorRules.GetANOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TListaAnosRecibosBusinessProcessorRules.GetOldANOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_ListaAnosRecibosANO];
end;

function TListaAnosRecibosBusinessProcessorRules.GetOldANOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_ListaAnosRecibosANO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TListaAnosRecibosBusinessProcessorRules.SetANOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO] := aValue;
end;

procedure TListaAnosRecibosBusinessProcessorRules.SetANOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_ListaAnosRecibosANO] := Null;
end;


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

destructor TRecibosClienteBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TRecibosClienteBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID];
end;

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

function TRecibosClienteBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID];
end;

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

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

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

function TRecibosClienteBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_RECIBO_COMPENSADO];
end;

function TRecibosClienteBusinessProcessorRules.GetID_RECIBO_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_RECIBO_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_RECIBO_COMPENSADO];
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_RECIBO_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_RECIBO_COMPENSADOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_RECIBO_COMPENSADO] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_RECIBO_COMPENSADO] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REC_COMPENSADO];
end;

function TRecibosClienteBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REC_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteREFERENCIA_REC_COMPENSADO];
end;

function TRecibosClienteBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteREFERENCIA_REC_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REC_COMPENSADO] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REC_COMPENSADO] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA];
end;

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

function TRecibosClienteBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteREFERENCIA];
end;

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

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

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

function TRecibosClienteBusinessProcessorRules.GetSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSITUACION];
end;

function TRecibosClienteBusinessProcessorRules.GetSITUACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSITUACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteSITUACION];
end;

function TRecibosClienteBusinessProcessorRules.GetOldSITUACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteSITUACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetSITUACIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSITUACION] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetSITUACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSITUACION] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetID_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_FACTURA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_FACTURA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_REMESA];
end;

function TRecibosClienteBusinessProcessorRules.GetID_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_REMESA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_REMESAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_REMESA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_REMESAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_REMESA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REMESA];
end;

function TRecibosClienteBusinessProcessorRules.GetREFERENCIA_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteREFERENCIA_REMESA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldREFERENCIA_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteREFERENCIA_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetREFERENCIA_REMESAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REMESA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetREFERENCIA_REMESAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteREFERENCIA_REMESA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_EMISION];
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_EMISIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_EMISION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_EMISION];
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_EMISIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_EMISION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_EMISIONValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_EMISION] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_EMISIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_EMISION] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_VENCIMIENTO];
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_VENCIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_VENCIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_VENCIMIENTO];
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_VENCIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_VENCIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_VENCIMIENTOValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_VENCIMIENTO] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_VENCIMIENTO] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDESCRIPCION];
end;

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

function TRecibosClienteBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteDESCRIPCION];
end;

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

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

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

function TRecibosClienteBusinessProcessorRules.GetOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOBSERVACIONES];
end;

function TRecibosClienteBusinessProcessorRules.GetOBSERVACIONESIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOBSERVACIONES];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteOBSERVACIONES];
end;

function TRecibosClienteBusinessProcessorRules.GetOldOBSERVACIONESIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteOBSERVACIONES];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetOBSERVACIONESValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOBSERVACIONES] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetOBSERVACIONESIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOBSERVACIONES] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE];
end;

function TRecibosClienteBusinessProcessorRules.GetIMPORTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteIMPORTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldIMPORTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteIMPORTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetIMPORTEValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetIMPORTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOTROS_GASTOS];
end;

function TRecibosClienteBusinessProcessorRules.GetOTROS_GASTOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOTROS_GASTOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteOTROS_GASTOS];
end;

function TRecibosClienteBusinessProcessorRules.GetOldOTROS_GASTOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteOTROS_GASTOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetOTROS_GASTOSValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOTROS_GASTOS] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetOTROS_GASTOSIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteOTROS_GASTOS] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_TOTAL];
end;

function TRecibosClienteBusinessProcessorRules.GetIMPORTE_TOTALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_TOTAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteIMPORTE_TOTAL];
end;

function TRecibosClienteBusinessProcessorRules.GetOldIMPORTE_TOTALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteIMPORTE_TOTAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetIMPORTE_TOTALValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_TOTAL] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_TOTAL] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_FACTURAValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_FACTURA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_FACTURA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFORMA_PAGO_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetFORMA_PAGO_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFORMA_PAGO_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFORMA_PAGO_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFORMA_PAGO_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetFORMA_PAGO_FACTURAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFORMA_PAGO_FACTURA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFORMA_PAGO_FACTURA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetIMPORTE_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteIMPORTE_FACTURA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldIMPORTE_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteIMPORTE_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetIMPORTE_FACTURAValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_FACTURA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetIMPORTE_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteIMPORTE_FACTURA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_EMPRESA];
end;

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

function TRecibosClienteBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_EMPRESA];
end;

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

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

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

function TRecibosClienteBusinessProcessorRules.GetDATOS_BANCARIOSValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDATOS_BANCARIOS];
end;

function TRecibosClienteBusinessProcessorRules.GetDATOS_BANCARIOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDATOS_BANCARIOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldDATOS_BANCARIOSValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteDATOS_BANCARIOS];
end;

function TRecibosClienteBusinessProcessorRules.GetOldDATOS_BANCARIOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteDATOS_BANCARIOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetDATOS_BANCARIOSValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDATOS_BANCARIOS] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDATOS_BANCARIOS] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetID_CLIENTEValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetID_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_CLIENTEValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldID_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteID_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_CLIENTEValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetID_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteID_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetNOMBRE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNOMBRE_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetNOMBRE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNOMBRE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldNOMBRE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteNOMBRE_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldNOMBRE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteNOMBRE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetNOMBRE_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNOMBRE_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNOMBRE_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetNIF_CIF_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNIF_CIF_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetNIF_CIF_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNIF_CIF_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldNIF_CIF_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteNIF_CIF_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldNIF_CIF_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteNIF_CIF_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNIF_CIF_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteNIF_CIF_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetCALLE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCALLE_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetCALLE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCALLE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldCALLE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteCALLE_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldCALLE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteCALLE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetCALLE_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCALLE_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetCALLE_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCALLE_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetPOBLACION_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePOBLACION_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetPOBLACION_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePOBLACION_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldPOBLACION_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClientePOBLACION_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldPOBLACION_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClientePOBLACION_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetPOBLACION_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePOBLACION_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePOBLACION_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetCODIGO_POSTAL_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCODIGO_POSTAL_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetCODIGO_POSTAL_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCODIGO_POSTAL_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldCODIGO_POSTAL_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteCODIGO_POSTAL_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldCODIGO_POSTAL_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteCODIGO_POSTAL_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetCODIGO_POSTAL_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCODIGO_POSTAL_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetCODIGO_POSTAL_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCODIGO_POSTAL_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetPROVINCIA_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePROVINCIA_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetPROVINCIA_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePROVINCIA_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldPROVINCIA_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClientePROVINCIA_CLIENTE];
end;

function TRecibosClienteBusinessProcessorRules.GetOldPROVINCIA_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClientePROVINCIA_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePROVINCIA_CLIENTE] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClientePROVINCIA_CLIENTE] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_ALTA];
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_ALTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_ALTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_ALTA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_ALTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_ALTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_ALTA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_ALTA] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_MODIFICACION];
end;

function TRecibosClienteBusinessProcessorRules.GetFECHA_MODIFICACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_MODIFICACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_MODIFICACION];
end;

function TRecibosClienteBusinessProcessorRules.GetOldFECHA_MODIFICACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteFECHA_MODIFICACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_MODIFICACION] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteFECHA_MODIFICACION] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteUSUARIO];
end;

function TRecibosClienteBusinessProcessorRules.GetUSUARIOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteUSUARIO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteUSUARIO];
end;

function TRecibosClienteBusinessProcessorRules.GetOldUSUARIOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteUSUARIO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetUSUARIOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteUSUARIO] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteUSUARIO] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetENTIDADValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteENTIDAD];
end;

function TRecibosClienteBusinessProcessorRules.GetENTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteENTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldENTIDADValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteENTIDAD];
end;

function TRecibosClienteBusinessProcessorRules.GetOldENTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteENTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetENTIDADValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteENTIDAD] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetENTIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteENTIDAD] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetSUCURSALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSUCURSAL];
end;

function TRecibosClienteBusinessProcessorRules.GetSUCURSALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSUCURSAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldSUCURSALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteSUCURSAL];
end;

function TRecibosClienteBusinessProcessorRules.GetOldSUCURSALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteSUCURSAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetSUCURSALValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSUCURSAL] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetSUCURSALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteSUCURSAL] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetDCValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDC];
end;

function TRecibosClienteBusinessProcessorRules.GetDCIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDC];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldDCValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteDC];
end;

function TRecibosClienteBusinessProcessorRules.GetOldDCIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteDC];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetDCValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDC] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetDCIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteDC] := Null;
end;

function TRecibosClienteBusinessProcessorRules.GetCUENTAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCUENTA];
end;

function TRecibosClienteBusinessProcessorRules.GetCUENTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCUENTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosClienteBusinessProcessorRules.GetOldCUENTAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteCUENTA];
end;

function TRecibosClienteBusinessProcessorRules.GetOldCUENTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosClienteCUENTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosClienteBusinessProcessorRules.SetCUENTAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCUENTA] := aValue;
end;

procedure TRecibosClienteBusinessProcessorRules.SetCUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosClienteCUENTA] := Null;
end;


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

destructor TPagosClienteBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TPagosClienteBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteID];
end;

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

function TPagosClienteBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteID];
end;

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

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

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

function TPagosClienteBusinessProcessorRules.GetID_RECIBOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteID_RECIBO];
end;

function TPagosClienteBusinessProcessorRules.GetID_RECIBOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteID_RECIBO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldID_RECIBOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteID_RECIBO];
end;

function TPagosClienteBusinessProcessorRules.GetOldID_RECIBOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteID_RECIBO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetID_RECIBOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteID_RECIBO] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetID_RECIBOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteID_RECIBO] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetTIPOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteTIPO];
end;

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

function TPagosClienteBusinessProcessorRules.GetOldTIPOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteTIPO];
end;

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

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

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

function TPagosClienteBusinessProcessorRules.GetFECHA_PAGOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_PAGO];
end;

function TPagosClienteBusinessProcessorRules.GetFECHA_PAGOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_PAGO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldFECHA_PAGOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteFECHA_PAGO];
end;

function TPagosClienteBusinessProcessorRules.GetOldFECHA_PAGOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteFECHA_PAGO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetFECHA_PAGOValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_PAGO] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetFECHA_PAGOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_PAGO] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetTITULARValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteTITULAR];
end;

function TPagosClienteBusinessProcessorRules.GetTITULARIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteTITULAR];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldTITULARValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteTITULAR];
end;

function TPagosClienteBusinessProcessorRules.GetOldTITULARIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteTITULAR];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetTITULARValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteTITULAR] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetTITULARIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteTITULAR] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetENTIDADValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteENTIDAD];
end;

function TPagosClienteBusinessProcessorRules.GetENTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteENTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldENTIDADValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteENTIDAD];
end;

function TPagosClienteBusinessProcessorRules.GetOldENTIDADIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteENTIDAD];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetENTIDADValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteENTIDAD] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetENTIDADIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteENTIDAD] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetSUCURSALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteSUCURSAL];
end;

function TPagosClienteBusinessProcessorRules.GetSUCURSALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteSUCURSAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldSUCURSALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteSUCURSAL];
end;

function TPagosClienteBusinessProcessorRules.GetOldSUCURSALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteSUCURSAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetSUCURSALValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteSUCURSAL] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetSUCURSALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteSUCURSAL] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetDCValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteDC];
end;

function TPagosClienteBusinessProcessorRules.GetDCIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteDC];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldDCValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteDC];
end;

function TPagosClienteBusinessProcessorRules.GetOldDCIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteDC];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetDCValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteDC] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetDCIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteDC] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetCUENTAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteCUENTA];
end;

function TPagosClienteBusinessProcessorRules.GetCUENTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteCUENTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldCUENTAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteCUENTA];
end;

function TPagosClienteBusinessProcessorRules.GetOldCUENTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteCUENTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetCUENTAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteCUENTA] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetCUENTAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteCUENTA] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_ALTA];
end;

function TPagosClienteBusinessProcessorRules.GetFECHA_ALTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_ALTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteFECHA_ALTA];
end;

function TPagosClienteBusinessProcessorRules.GetOldFECHA_ALTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteFECHA_ALTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_ALTA] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_ALTA] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_MODIFICACION];
end;

function TPagosClienteBusinessProcessorRules.GetFECHA_MODIFICACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_MODIFICACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteFECHA_MODIFICACION];
end;

function TPagosClienteBusinessProcessorRules.GetOldFECHA_MODIFICACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteFECHA_MODIFICACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_MODIFICACION] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteFECHA_MODIFICACION] := Null;
end;

function TPagosClienteBusinessProcessorRules.GetUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteUSUARIO];
end;

function TPagosClienteBusinessProcessorRules.GetUSUARIOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteUSUARIO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TPagosClienteBusinessProcessorRules.GetOldUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteUSUARIO];
end;

function TPagosClienteBusinessProcessorRules.GetOldUSUARIOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosClienteUSUARIO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TPagosClienteBusinessProcessorRules.SetUSUARIOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteUSUARIO] := aValue;
end;

procedure TPagosClienteBusinessProcessorRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_PagosClienteUSUARIO] := Null;
end;


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

destructor TRecibosCompensadosCliBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID];
end;

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

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID];
end;

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

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

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

function TRecibosCompensadosCliBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_RECIBO_COMPENSADO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_RECIBO_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_RECIBO_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_RECIBO_COMPENSADO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_RECIBO_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_RECIBO_COMPENSADOValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_RECIBO_COMPENSADO] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_RECIBO_COMPENSADOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_RECIBO_COMPENSADO] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REC_COMPENSADO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REC_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliREFERENCIA_REC_COMPENSADO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliREFERENCIA_REC_COMPENSADO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REC_COMPENSADO] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetREFERENCIA_REC_COMPENSADOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REC_COMPENSADO] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA];
end;

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

function TRecibosCompensadosCliBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliREFERENCIA];
end;

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

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

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

function TRecibosCompensadosCliBusinessProcessorRules.GetSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliSITUACION];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetSITUACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliSITUACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliSITUACION];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldSITUACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliSITUACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetSITUACIONValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliSITUACION] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetSITUACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliSITUACION] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_FACTURAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_FACTURA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_FACTURA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_REMESA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_REMESA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_REMESAValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_REMESA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_REMESAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_REMESA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REMESA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetREFERENCIA_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliREFERENCIA_REMESA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldREFERENCIA_REMESAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliREFERENCIA_REMESA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetREFERENCIA_REMESAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REMESA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetREFERENCIA_REMESAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliREFERENCIA_REMESA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_EMISION];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_EMISIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_EMISION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_EMISION];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_EMISIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_EMISION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_EMISIONValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_EMISION] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_EMISIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_EMISION] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_VENCIMIENTO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_VENCIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_VENCIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_VENCIMIENTO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_VENCIMIENTOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_VENCIMIENTO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_VENCIMIENTOValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_VENCIMIENTO] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_VENCIMIENTOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_VENCIMIENTO] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliDESCRIPCION];
end;

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

function TRecibosCompensadosCliBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliDESCRIPCION];
end;

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

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

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

function TRecibosCompensadosCliBusinessProcessorRules.GetOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOBSERVACIONES];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOBSERVACIONESIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOBSERVACIONES];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliOBSERVACIONES];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldOBSERVACIONESIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliOBSERVACIONES];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetOBSERVACIONESValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOBSERVACIONES] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetOBSERVACIONESIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOBSERVACIONES] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIMPORTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliIMPORTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIMPORTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliIMPORTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetIMPORTEValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetIMPORTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOTROS_GASTOS];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOTROS_GASTOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOTROS_GASTOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliOTROS_GASTOS];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldOTROS_GASTOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliOTROS_GASTOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetOTROS_GASTOSValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOTROS_GASTOS] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetOTROS_GASTOSIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliOTROS_GASTOS] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_TOTAL];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIMPORTE_TOTALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_TOTAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliIMPORTE_TOTAL];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIMPORTE_TOTALIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliIMPORTE_TOTAL];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetIMPORTE_TOTALValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_TOTAL] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetIMPORTE_TOTALIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_TOTAL] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_FACTURAValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_FACTURA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_FACTURA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFORMA_PAGO_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFORMA_PAGO_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFORMA_PAGO_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFORMA_PAGO_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFORMA_PAGO_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFORMA_PAGO_FACTURAValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFORMA_PAGO_FACTURA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFORMA_PAGO_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFORMA_PAGO_FACTURA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetIMPORTE_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliIMPORTE_FACTURA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldIMPORTE_FACTURAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliIMPORTE_FACTURA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetIMPORTE_FACTURAValue(const aValue: Currency);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_FACTURA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetIMPORTE_FACTURAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliIMPORTE_FACTURA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_EMPRESA];
end;

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

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_EMPRESA];
end;

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

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

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

function TRecibosCompensadosCliBusinessProcessorRules.GetDATOS_BANCARIOSValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliDATOS_BANCARIOS];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetDATOS_BANCARIOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliDATOS_BANCARIOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldDATOS_BANCARIOSValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliDATOS_BANCARIOS];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldDATOS_BANCARIOSIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliDATOS_BANCARIOS];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetDATOS_BANCARIOSValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliDATOS_BANCARIOS] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetDATOS_BANCARIOSIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliDATOS_BANCARIOS] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_CLIENTEValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetID_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_CLIENTEValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldID_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliID_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_CLIENTEValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetID_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliID_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetNOMBRE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNOMBRE_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetNOMBRE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNOMBRE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldNOMBRE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliNOMBRE_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldNOMBRE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliNOMBRE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetNOMBRE_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNOMBRE_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetNOMBRE_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNOMBRE_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetNIF_CIF_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNIF_CIF_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetNIF_CIF_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNIF_CIF_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldNIF_CIF_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliNIF_CIF_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldNIF_CIF_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliNIF_CIF_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetNIF_CIF_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNIF_CIF_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetNIF_CIF_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliNIF_CIF_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetCALLE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCALLE_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetCALLE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCALLE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldCALLE_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliCALLE_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldCALLE_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliCALLE_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetCALLE_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCALLE_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetCALLE_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCALLE_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetPOBLACION_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPOBLACION_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetPOBLACION_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPOBLACION_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldPOBLACION_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliPOBLACION_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldPOBLACION_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliPOBLACION_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetPOBLACION_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPOBLACION_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetPOBLACION_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPOBLACION_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetCODIGO_POSTAL_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCODIGO_POSTAL_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetCODIGO_POSTAL_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCODIGO_POSTAL_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldCODIGO_POSTAL_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliCODIGO_POSTAL_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldCODIGO_POSTAL_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliCODIGO_POSTAL_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetCODIGO_POSTAL_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCODIGO_POSTAL_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetCODIGO_POSTAL_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliCODIGO_POSTAL_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetPROVINCIA_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPROVINCIA_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetPROVINCIA_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPROVINCIA_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldPROVINCIA_CLIENTEValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliPROVINCIA_CLIENTE];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldPROVINCIA_CLIENTEIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliPROVINCIA_CLIENTE];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetPROVINCIA_CLIENTEValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPROVINCIA_CLIENTE] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetPROVINCIA_CLIENTEIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliPROVINCIA_CLIENTE] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_ALTA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_ALTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_ALTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_ALTA];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_ALTAIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_ALTA];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_ALTAValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_ALTA] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_ALTAIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_ALTA] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_MODIFICACION];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetFECHA_MODIFICACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_MODIFICACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_MODIFICACION];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldFECHA_MODIFICACIONIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliFECHA_MODIFICACION];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_MODIFICACIONValue(const aValue: DateTime);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_MODIFICACION] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetFECHA_MODIFICACIONIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliFECHA_MODIFICACION] := Null;
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliUSUARIO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetUSUARIOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliUSUARIO];
  result := VarIsNull(v) or VarIsClear(v);
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliUSUARIO];
end;

function TRecibosCompensadosCliBusinessProcessorRules.GetOldUSUARIOIsNull: Boolean;
var v: variant;
begin
  v := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosCliUSUARIO];
  result := VarIsNull(v) or VarIsClear(v);
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetUSUARIOValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliUSUARIO] := aValue;
end;

procedure TRecibosCompensadosCliBusinessProcessorRules.SetUSUARIOIsNull(const aValue: Boolean);
begin
  if aValue then
    BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosCliUSUARIO] := Null;
end;


initialization
  RegisterBusinessProcessorRules(RID_ListaAnosRecibosDelta, TListaAnosRecibosBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_RecibosClienteDelta, TRecibosClienteBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_PagosClienteDelta, TPagosClienteBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_RecibosCompensadosCliDelta, TRecibosCompensadosCliBusinessProcessorRules);

end.
