unit schRecibosProveedorServer_Intf;

interface

uses
  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, schRecibosProveedorClient_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_RecibosCompensadosProvDelta = '{BA2DCF11-7070-4929-857C-AB7731AF7924}';
  RID_RecibosProveedorDelta = '{4C7167E6-9FB3-46CC-9733-EDC6BB1778BA}';
  RID_RecibosProveedor_RefreshDelta = '{3C6253BF-134D-4B04-97C7-A02E2933935D}';
  RID_PagosProveedorDelta = '{1BDCAA45-F48F-47E8-947D-8D70E87FF7A3}';

type
  { IRecibosCompensadosProvDelta }
  IRecibosCompensadosProvDelta = interface(IRecibosCompensadosProv)
  ['{BA2DCF11-7070-4929-857C-AB7731AF7924}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_RECIBO_COMPENSADOValue : Integer;
    function GetOldREFERENCIAValue : String;
    function GetOldSITUACIONValue : String;
    function GetOldID_FACTURAValue : Integer;
    function GetOldFECHA_EMISIONValue : DateTime;
    function GetOldFECHA_VENCIMIENTOValue : DateTime;
    function GetOldIMPORTEValue : Float;
    function GetOldOTROS_GASTOSValue : Float;
    function GetOldIMPORTE_TOTALValue : Float;
    function GetOldFECHA_FACTURAValue : DateTime;
    function GetOldIMPORTE_FACTURAValue : Float;
    function GetOldID_PROVEEDORValue : Integer;
    function GetOldNOMBRE_PROVEEDORValue : String;
    function GetOldNIF_CIF_PROVEEDORValue : String;
    function GetOldID_EMPRESAValue : Integer;

    { Properties }
    property OldID : Integer read GetOldIDValue;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property OldIMPORTE : Float read GetOldIMPORTEValue;
    property OldOTROS_GASTOS : Float read GetOldOTROS_GASTOSValue;
    property OldIMPORTE_TOTAL : Float read GetOldIMPORTE_TOTALValue;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property OldIMPORTE_FACTURA : Float read GetOldIMPORTE_FACTURAValue;
    property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue;
    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
  end;

  { TRecibosCompensadosProvBusinessProcessorRules }
  TRecibosCompensadosProvBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosCompensadosProv, IRecibosCompensadosProvDelta)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    function GetOldIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual;
    procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
    function GetREFERENCIAValue: String; virtual;
    function GetOldREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetSITUACIONValue: String; virtual;
    function GetOldSITUACIONValue: String; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    function GetID_FACTURAValue: Integer; virtual;
    function GetOldID_FACTURAValue: Integer; virtual;
    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
    function GetFECHA_EMISIONValue: DateTime; virtual;
    function GetOldFECHA_EMISIONValue: DateTime; virtual;
    procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
    function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual;
    procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
    function GetIMPORTEValue: Float; virtual;
    function GetOldIMPORTEValue: Float; virtual;
    procedure SetIMPORTEValue(const aValue: Float); virtual;
    function GetOTROS_GASTOSValue: Float; virtual;
    function GetOldOTROS_GASTOSValue: Float; virtual;
    procedure SetOTROS_GASTOSValue(const aValue: Float); virtual;
    function GetIMPORTE_TOTALValue: Float; virtual;
    function GetOldIMPORTE_TOTALValue: Float; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Float); virtual;
    function GetFECHA_FACTURAValue: DateTime; virtual;
    function GetOldFECHA_FACTURAValue: DateTime; virtual;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
    function GetIMPORTE_FACTURAValue: Float; virtual;
    function GetOldIMPORTE_FACTURAValue: Float; virtual;
    procedure SetIMPORTE_FACTURAValue(const aValue: Float); virtual;
    function GetID_PROVEEDORValue: Integer; virtual;
    function GetOldID_PROVEEDORValue: Integer; virtual;
    procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
    function GetNOMBRE_PROVEEDORValue: String; virtual;
    function GetOldNOMBRE_PROVEEDORValue: String; virtual;
    procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
    function GetNIF_CIF_PROVEEDORValue: String; virtual;
    function GetOldNIF_CIF_PROVEEDORValue: String; virtual;
    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    function GetOldID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;

    { Properties }
    property ID : Integer read GetIDValue write SetIDValue;
    property OldID : Integer read GetOldIDValue;
    property ID_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property SITUACION : String read GetSITUACIONValue write SetSITUACIONValue;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property IMPORTE : Float read GetIMPORTEValue write SetIMPORTEValue;
    property OldIMPORTE : Float read GetOldIMPORTEValue;
    property OTROS_GASTOS : Float read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
    property OldOTROS_GASTOS : Float read GetOldOTROS_GASTOSValue;
    property IMPORTE_TOTAL : Float read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property OldIMPORTE_TOTAL : Float read GetOldIMPORTE_TOTALValue;
    property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property IMPORTE_FACTURA : Float read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
    property OldIMPORTE_FACTURA : Float read GetOldIMPORTE_FACTURAValue;
    property ID_PROVEEDOR : Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue;
    property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
    property NIF_CIF_PROVEEDOR : String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
    property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;

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

  end;

  { IRecibosProveedorDelta }
  IRecibosProveedorDelta = interface(IRecibosProveedor)
  ['{4C7167E6-9FB3-46CC-9733-EDC6BB1778BA}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_RECIBO_COMPENSADOValue : Integer;
    function GetOldREFERENCIA_REC_COMPENSADOValue : String;
    function GetOldREFERENCIAValue : String;
    function GetOldREFERENCIA_PROVEEDORValue : 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 GetOldREFERENCIA_FACTURA_PROVValue : String;
    function GetOldFORMA_PAGO_FACTURAValue : String;
    function GetOldIMPORTE_FACTURAValue : Currency;
    function GetOldID_PROVEEDORValue : Integer;
    function GetOldNOMBRE_PROVEEDORValue : String;
    function GetOldNIF_CIF_PROVEEDORValue : String;
    function GetOldENTIDAD_PROVEEDORValue : String;
    function GetOldSUCURSAL_PROVEEDORValue : String;
    function GetOldDC_PROVEEDORValue : String;
    function GetOldCUENTA_PROVEEDORValue : String;
    function GetOldID_EMPRESAValue : Integer;
    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 OldREFERENCIA_PROVEEDOR : String read GetOldREFERENCIA_PROVEEDORValue;
    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 OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue;
    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
    property OldENTIDAD_PROVEEDOR : String read GetOldENTIDAD_PROVEEDORValue;
    property OldSUCURSAL_PROVEEDOR : String read GetOldSUCURSAL_PROVEEDORValue;
    property OldDC_PROVEEDOR : String read GetOldDC_PROVEEDORValue;
    property OldCUENTA_PROVEEDOR : String read GetOldCUENTA_PROVEEDORValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;
  end;

  { TRecibosProveedorBusinessProcessorRules }
  TRecibosProveedorBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosProveedor, IRecibosProveedorDelta)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    function GetOldIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual;
    procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
    function GetREFERENCIA_REC_COMPENSADOValue: String; virtual;
    function GetOldREFERENCIA_REC_COMPENSADOValue: String; virtual;
    procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    function GetOldREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    function GetOldREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;
    function GetSITUACIONValue: String; virtual;
    function GetOldSITUACIONValue: String; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    function GetID_FACTURAValue: Integer; virtual;
    function GetOldID_FACTURAValue: Integer; virtual;
    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
    function GetID_REMESAValue: Integer; virtual;
    function GetOldID_REMESAValue: Integer; virtual;
    procedure SetID_REMESAValue(const aValue: Integer); virtual;
    function GetREFERENCIA_REMESAValue: String; virtual;
    function GetOldREFERENCIA_REMESAValue: String; virtual;
    procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual;
    function GetFECHA_EMISIONValue: DateTime; virtual;
    function GetOldFECHA_EMISIONValue: DateTime; virtual;
    procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
    function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual;
    procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    function GetOldDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetOBSERVACIONESValue: String; virtual;
    function GetOldOBSERVACIONESValue: String; virtual;
    procedure SetOBSERVACIONESValue(const aValue: String); virtual;
    function GetIMPORTEValue: Currency; virtual;
    function GetOldIMPORTEValue: Currency; virtual;
    procedure SetIMPORTEValue(const aValue: Currency); virtual;
    function GetOTROS_GASTOSValue: Currency; virtual;
    function GetOldOTROS_GASTOSValue: Currency; virtual;
    procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual;
    function GetIMPORTE_TOTALValue: Currency; virtual;
    function GetOldIMPORTE_TOTALValue: Currency; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
    function GetFECHA_FACTURAValue: DateTime; virtual;
    function GetOldFECHA_FACTURAValue: DateTime; virtual;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
    function GetREFERENCIA_FACTURA_PROVValue: String; virtual;
    function GetOldREFERENCIA_FACTURA_PROVValue: String; virtual;
    procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String); virtual;
    function GetFORMA_PAGO_FACTURAValue: String; virtual;
    function GetOldFORMA_PAGO_FACTURAValue: String; virtual;
    procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual;
    function GetIMPORTE_FACTURAValue: Currency; virtual;
    function GetOldIMPORTE_FACTURAValue: Currency; virtual;
    procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual;
    function GetID_PROVEEDORValue: Integer; virtual;
    function GetOldID_PROVEEDORValue: Integer; virtual;
    procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
    function GetNOMBRE_PROVEEDORValue: String; virtual;
    function GetOldNOMBRE_PROVEEDORValue: String; virtual;
    procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
    function GetNIF_CIF_PROVEEDORValue: String; virtual;
    function GetOldNIF_CIF_PROVEEDORValue: String; virtual;
    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
    function GetENTIDAD_PROVEEDORValue: String; virtual;
    function GetOldENTIDAD_PROVEEDORValue: String; virtual;
    procedure SetENTIDAD_PROVEEDORValue(const aValue: String); virtual;
    function GetSUCURSAL_PROVEEDORValue: String; virtual;
    function GetOldSUCURSAL_PROVEEDORValue: String; virtual;
    procedure SetSUCURSAL_PROVEEDORValue(const aValue: String); virtual;
    function GetDC_PROVEEDORValue: String; virtual;
    function GetOldDC_PROVEEDORValue: String; virtual;
    procedure SetDC_PROVEEDORValue(const aValue: String); virtual;
    function GetCUENTA_PROVEEDORValue: String; virtual;
    function GetOldCUENTA_PROVEEDORValue: String; virtual;
    procedure SetCUENTA_PROVEEDORValue(const aValue: String); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    function GetOldID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    function GetOldFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetOldFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetUSUARIOValue: String; virtual;
    function GetOldUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;

    { Properties }
    property ID : Integer read GetIDValue write SetIDValue;
    property OldID : Integer read GetOldIDValue;
    property ID_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property REFERENCIA_REC_COMPENSADO : String read GetREFERENCIA_REC_COMPENSADOValue write SetREFERENCIA_REC_COMPENSADOValue;
    property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue;
    property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property REFERENCIA_PROVEEDOR : String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
    property OldREFERENCIA_PROVEEDOR : String read GetOldREFERENCIA_PROVEEDORValue;
    property SITUACION : String read GetSITUACIONValue write SetSITUACIONValue;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property ID_REMESA : Integer read GetID_REMESAValue write SetID_REMESAValue;
    property OldID_REMESA : Integer read GetOldID_REMESAValue;
    property REFERENCIA_REMESA : String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
    property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue;
    property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
    property OBSERVACIONES : String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue;
    property IMPORTE : Currency read GetIMPORTEValue write SetIMPORTEValue;
    property OldIMPORTE : Currency read GetOldIMPORTEValue;
    property OTROS_GASTOS : Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
    property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue;
    property IMPORTE_TOTAL : Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue;
    property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property REFERENCIA_FACTURA_PROV : String read GetREFERENCIA_FACTURA_PROVValue write SetREFERENCIA_FACTURA_PROVValue;
    property OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue;
    property FORMA_PAGO_FACTURA : String read GetFORMA_PAGO_FACTURAValue write SetFORMA_PAGO_FACTURAValue;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property IMPORTE_FACTURA : Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property ID_PROVEEDOR : Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue;
    property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
    property NIF_CIF_PROVEEDOR : String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
    property ENTIDAD_PROVEEDOR : String read GetENTIDAD_PROVEEDORValue write SetENTIDAD_PROVEEDORValue;
    property OldENTIDAD_PROVEEDOR : String read GetOldENTIDAD_PROVEEDORValue;
    property SUCURSAL_PROVEEDOR : String read GetSUCURSAL_PROVEEDORValue write SetSUCURSAL_PROVEEDORValue;
    property OldSUCURSAL_PROVEEDOR : String read GetOldSUCURSAL_PROVEEDORValue;
    property DC_PROVEEDOR : String read GetDC_PROVEEDORValue write SetDC_PROVEEDORValue;
    property OldDC_PROVEEDOR : String read GetOldDC_PROVEEDORValue;
    property CUENTA_PROVEEDOR : String read GetCUENTA_PROVEEDORValue write SetCUENTA_PROVEEDORValue;
    property OldCUENTA_PROVEEDOR : String read GetOldCUENTA_PROVEEDORValue;
    property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;

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

  end;

  { IRecibosProveedor_RefreshDelta }
  IRecibosProveedor_RefreshDelta = interface(IRecibosProveedor_Refresh)
  ['{3C6253BF-134D-4B04-97C7-A02E2933935D}']
    { Property getters and setters }
    function GetOldIDValue : Integer;
    function GetOldID_RECIBO_COMPENSADOValue : Integer;
    function GetOldREFERENCIA_REC_COMPENSADOValue : String;
    function GetOldREFERENCIAValue : String;
    function GetOldREFERENCIA_PROVEEDORValue : 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 GetOldREFERENCIA_FACTURA_PROVValue : String;
    function GetOldFORMA_PAGO_FACTURAValue : String;
    function GetOldIMPORTE_FACTURAValue : Currency;
    function GetOldID_PROVEEDORValue : Integer;
    function GetOldNOMBRE_PROVEEDORValue : String;
    function GetOldNIF_CIF_PROVEEDORValue : String;
    function GetOldENTIDAD_PROVEEDORValue : String;
    function GetOldSUCURSAL_PROVEEDORValue : String;
    function GetOldDC_PROVEEDORValue : String;
    function GetOldCUENTA_PROVEEDORValue : String;
    function GetOldID_EMPRESAValue : Integer;
    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 OldREFERENCIA_PROVEEDOR : String read GetOldREFERENCIA_PROVEEDORValue;
    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 OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue;
    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
    property OldENTIDAD_PROVEEDOR : String read GetOldENTIDAD_PROVEEDORValue;
    property OldSUCURSAL_PROVEEDOR : String read GetOldSUCURSAL_PROVEEDORValue;
    property OldDC_PROVEEDOR : String read GetOldDC_PROVEEDORValue;
    property OldCUENTA_PROVEEDOR : String read GetOldCUENTA_PROVEEDORValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;
  end;

  { TRecibosProveedor_RefreshBusinessProcessorRules }
  TRecibosProveedor_RefreshBusinessProcessorRules = class(TDABusinessProcessorRules, IRecibosProveedor_Refresh, IRecibosProveedor_RefreshDelta)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    function GetOldIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_RECIBO_COMPENSADOValue: Integer; virtual;
    function GetOldID_RECIBO_COMPENSADOValue: Integer; virtual;
    procedure SetID_RECIBO_COMPENSADOValue(const aValue: Integer); virtual;
    function GetREFERENCIA_REC_COMPENSADOValue: String; virtual;
    function GetOldREFERENCIA_REC_COMPENSADOValue: String; virtual;
    procedure SetREFERENCIA_REC_COMPENSADOValue(const aValue: String); virtual;
    function GetREFERENCIAValue: String; virtual;
    function GetOldREFERENCIAValue: String; virtual;
    procedure SetREFERENCIAValue(const aValue: String); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    function GetOldREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;
    function GetSITUACIONValue: String; virtual;
    function GetOldSITUACIONValue: String; virtual;
    procedure SetSITUACIONValue(const aValue: String); virtual;
    function GetID_FACTURAValue: Integer; virtual;
    function GetOldID_FACTURAValue: Integer; virtual;
    procedure SetID_FACTURAValue(const aValue: Integer); virtual;
    function GetID_REMESAValue: Integer; virtual;
    function GetOldID_REMESAValue: Integer; virtual;
    procedure SetID_REMESAValue(const aValue: Integer); virtual;
    function GetREFERENCIA_REMESAValue: String; virtual;
    function GetOldREFERENCIA_REMESAValue: String; virtual;
    procedure SetREFERENCIA_REMESAValue(const aValue: String); virtual;
    function GetFECHA_EMISIONValue: DateTime; virtual;
    function GetOldFECHA_EMISIONValue: DateTime; virtual;
    procedure SetFECHA_EMISIONValue(const aValue: DateTime); virtual;
    function GetFECHA_VENCIMIENTOValue: DateTime; virtual;
    function GetOldFECHA_VENCIMIENTOValue: DateTime; virtual;
    procedure SetFECHA_VENCIMIENTOValue(const aValue: DateTime); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    function GetOldDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetOBSERVACIONESValue: String; virtual;
    function GetOldOBSERVACIONESValue: String; virtual;
    procedure SetOBSERVACIONESValue(const aValue: String); virtual;
    function GetIMPORTEValue: Currency; virtual;
    function GetOldIMPORTEValue: Currency; virtual;
    procedure SetIMPORTEValue(const aValue: Currency); virtual;
    function GetOTROS_GASTOSValue: Currency; virtual;
    function GetOldOTROS_GASTOSValue: Currency; virtual;
    procedure SetOTROS_GASTOSValue(const aValue: Currency); virtual;
    function GetIMPORTE_TOTALValue: Currency; virtual;
    function GetOldIMPORTE_TOTALValue: Currency; virtual;
    procedure SetIMPORTE_TOTALValue(const aValue: Currency); virtual;
    function GetFECHA_FACTURAValue: DateTime; virtual;
    function GetOldFECHA_FACTURAValue: DateTime; virtual;
    procedure SetFECHA_FACTURAValue(const aValue: DateTime); virtual;
    function GetREFERENCIA_FACTURA_PROVValue: String; virtual;
    function GetOldREFERENCIA_FACTURA_PROVValue: String; virtual;
    procedure SetREFERENCIA_FACTURA_PROVValue(const aValue: String); virtual;
    function GetFORMA_PAGO_FACTURAValue: String; virtual;
    function GetOldFORMA_PAGO_FACTURAValue: String; virtual;
    procedure SetFORMA_PAGO_FACTURAValue(const aValue: String); virtual;
    function GetIMPORTE_FACTURAValue: Currency; virtual;
    function GetOldIMPORTE_FACTURAValue: Currency; virtual;
    procedure SetIMPORTE_FACTURAValue(const aValue: Currency); virtual;
    function GetID_PROVEEDORValue: Integer; virtual;
    function GetOldID_PROVEEDORValue: Integer; virtual;
    procedure SetID_PROVEEDORValue(const aValue: Integer); virtual;
    function GetNOMBRE_PROVEEDORValue: String; virtual;
    function GetOldNOMBRE_PROVEEDORValue: String; virtual;
    procedure SetNOMBRE_PROVEEDORValue(const aValue: String); virtual;
    function GetNIF_CIF_PROVEEDORValue: String; virtual;
    function GetOldNIF_CIF_PROVEEDORValue: String; virtual;
    procedure SetNIF_CIF_PROVEEDORValue(const aValue: String); virtual;
    function GetENTIDAD_PROVEEDORValue: String; virtual;
    function GetOldENTIDAD_PROVEEDORValue: String; virtual;
    procedure SetENTIDAD_PROVEEDORValue(const aValue: String); virtual;
    function GetSUCURSAL_PROVEEDORValue: String; virtual;
    function GetOldSUCURSAL_PROVEEDORValue: String; virtual;
    procedure SetSUCURSAL_PROVEEDORValue(const aValue: String); virtual;
    function GetDC_PROVEEDORValue: String; virtual;
    function GetOldDC_PROVEEDORValue: String; virtual;
    procedure SetDC_PROVEEDORValue(const aValue: String); virtual;
    function GetCUENTA_PROVEEDORValue: String; virtual;
    function GetOldCUENTA_PROVEEDORValue: String; virtual;
    procedure SetCUENTA_PROVEEDORValue(const aValue: String); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    function GetOldID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    function GetOldFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetOldFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetUSUARIOValue: String; virtual;
    function GetOldUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;

    { Properties }
    property ID : Integer read GetIDValue write SetIDValue;
    property OldID : Integer read GetOldIDValue;
    property ID_RECIBO_COMPENSADO : Integer read GetID_RECIBO_COMPENSADOValue write SetID_RECIBO_COMPENSADOValue;
    property OldID_RECIBO_COMPENSADO : Integer read GetOldID_RECIBO_COMPENSADOValue;
    property REFERENCIA_REC_COMPENSADO : String read GetREFERENCIA_REC_COMPENSADOValue write SetREFERENCIA_REC_COMPENSADOValue;
    property OldREFERENCIA_REC_COMPENSADO : String read GetOldREFERENCIA_REC_COMPENSADOValue;
    property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
    property OldREFERENCIA : String read GetOldREFERENCIAValue;
    property REFERENCIA_PROVEEDOR : String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
    property OldREFERENCIA_PROVEEDOR : String read GetOldREFERENCIA_PROVEEDORValue;
    property SITUACION : String read GetSITUACIONValue write SetSITUACIONValue;
    property OldSITUACION : String read GetOldSITUACIONValue;
    property ID_FACTURA : Integer read GetID_FACTURAValue write SetID_FACTURAValue;
    property OldID_FACTURA : Integer read GetOldID_FACTURAValue;
    property ID_REMESA : Integer read GetID_REMESAValue write SetID_REMESAValue;
    property OldID_REMESA : Integer read GetOldID_REMESAValue;
    property REFERENCIA_REMESA : String read GetREFERENCIA_REMESAValue write SetREFERENCIA_REMESAValue;
    property OldREFERENCIA_REMESA : String read GetOldREFERENCIA_REMESAValue;
    property FECHA_EMISION : DateTime read GetFECHA_EMISIONValue write SetFECHA_EMISIONValue;
    property OldFECHA_EMISION : DateTime read GetOldFECHA_EMISIONValue;
    property FECHA_VENCIMIENTO : DateTime read GetFECHA_VENCIMIENTOValue write SetFECHA_VENCIMIENTOValue;
    property OldFECHA_VENCIMIENTO : DateTime read GetOldFECHA_VENCIMIENTOValue;
    property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
    property OBSERVACIONES : String read GetOBSERVACIONESValue write SetOBSERVACIONESValue;
    property OldOBSERVACIONES : String read GetOldOBSERVACIONESValue;
    property IMPORTE : Currency read GetIMPORTEValue write SetIMPORTEValue;
    property OldIMPORTE : Currency read GetOldIMPORTEValue;
    property OTROS_GASTOS : Currency read GetOTROS_GASTOSValue write SetOTROS_GASTOSValue;
    property OldOTROS_GASTOS : Currency read GetOldOTROS_GASTOSValue;
    property IMPORTE_TOTAL : Currency read GetIMPORTE_TOTALValue write SetIMPORTE_TOTALValue;
    property OldIMPORTE_TOTAL : Currency read GetOldIMPORTE_TOTALValue;
    property FECHA_FACTURA : DateTime read GetFECHA_FACTURAValue write SetFECHA_FACTURAValue;
    property OldFECHA_FACTURA : DateTime read GetOldFECHA_FACTURAValue;
    property REFERENCIA_FACTURA_PROV : String read GetREFERENCIA_FACTURA_PROVValue write SetREFERENCIA_FACTURA_PROVValue;
    property OldREFERENCIA_FACTURA_PROV : String read GetOldREFERENCIA_FACTURA_PROVValue;
    property FORMA_PAGO_FACTURA : String read GetFORMA_PAGO_FACTURAValue write SetFORMA_PAGO_FACTURAValue;
    property OldFORMA_PAGO_FACTURA : String read GetOldFORMA_PAGO_FACTURAValue;
    property IMPORTE_FACTURA : Currency read GetIMPORTE_FACTURAValue write SetIMPORTE_FACTURAValue;
    property OldIMPORTE_FACTURA : Currency read GetOldIMPORTE_FACTURAValue;
    property ID_PROVEEDOR : Integer read GetID_PROVEEDORValue write SetID_PROVEEDORValue;
    property OldID_PROVEEDOR : Integer read GetOldID_PROVEEDORValue;
    property NOMBRE_PROVEEDOR : String read GetNOMBRE_PROVEEDORValue write SetNOMBRE_PROVEEDORValue;
    property OldNOMBRE_PROVEEDOR : String read GetOldNOMBRE_PROVEEDORValue;
    property NIF_CIF_PROVEEDOR : String read GetNIF_CIF_PROVEEDORValue write SetNIF_CIF_PROVEEDORValue;
    property OldNIF_CIF_PROVEEDOR : String read GetOldNIF_CIF_PROVEEDORValue;
    property ENTIDAD_PROVEEDOR : String read GetENTIDAD_PROVEEDORValue write SetENTIDAD_PROVEEDORValue;
    property OldENTIDAD_PROVEEDOR : String read GetOldENTIDAD_PROVEEDORValue;
    property SUCURSAL_PROVEEDOR : String read GetSUCURSAL_PROVEEDORValue write SetSUCURSAL_PROVEEDORValue;
    property OldSUCURSAL_PROVEEDOR : String read GetOldSUCURSAL_PROVEEDORValue;
    property DC_PROVEEDOR : String read GetDC_PROVEEDORValue write SetDC_PROVEEDORValue;
    property OldDC_PROVEEDOR : String read GetOldDC_PROVEEDORValue;
    property CUENTA_PROVEEDOR : String read GetCUENTA_PROVEEDORValue write SetCUENTA_PROVEEDORValue;
    property OldCUENTA_PROVEEDOR : String read GetOldCUENTA_PROVEEDORValue;
    property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
    property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;

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

  end;

  { IPagosProveedorDelta }
  IPagosProveedorDelta = interface(IPagosProveedor)
  ['{1BDCAA45-F48F-47E8-947D-8D70E87FF7A3}']
    { 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;

  { TPagosProveedorBusinessProcessorRules }
  TPagosProveedorBusinessProcessorRules = class(TDABusinessProcessorRules, IPagosProveedor, IPagosProveedorDelta)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    function GetOldIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_RECIBOValue: Integer; virtual;
    function GetOldID_RECIBOValue: Integer; virtual;
    procedure SetID_RECIBOValue(const aValue: Integer); virtual;
    function GetTIPOValue: String; virtual;
    function GetOldTIPOValue: String; virtual;
    procedure SetTIPOValue(const aValue: String); virtual;
    function GetFECHA_PAGOValue: DateTime; virtual;
    function GetOldFECHA_PAGOValue: DateTime; virtual;
    procedure SetFECHA_PAGOValue(const aValue: DateTime); virtual;
    function GetTITULARValue: String; virtual;
    function GetOldTITULARValue: String; virtual;
    procedure SetTITULARValue(const aValue: String); virtual;
    function GetENTIDADValue: String; virtual;
    function GetOldENTIDADValue: String; virtual;
    procedure SetENTIDADValue(const aValue: String); virtual;
    function GetSUCURSALValue: String; virtual;
    function GetOldSUCURSALValue: String; virtual;
    procedure SetSUCURSALValue(const aValue: String); virtual;
    function GetDCValue: String; virtual;
    function GetOldDCValue: String; virtual;
    procedure SetDCValue(const aValue: String); virtual;
    function GetCUENTAValue: String; virtual;
    function GetOldCUENTAValue: String; virtual;
    procedure SetCUENTAValue(const aValue: String); virtual;
    function GetFECHA_ALTAValue: DateTime; virtual;
    function GetOldFECHA_ALTAValue: DateTime; virtual;
    procedure SetFECHA_ALTAValue(const aValue: DateTime); virtual;
    function GetFECHA_MODIFICACIONValue: DateTime; virtual;
    function GetOldFECHA_MODIFICACIONValue: DateTime; virtual;
    procedure SetFECHA_MODIFICACIONValue(const aValue: DateTime); virtual;
    function GetUSUARIOValue: String; virtual;
    function GetOldUSUARIOValue: String; virtual;
    procedure SetUSUARIOValue(const aValue: String); virtual;

    { Properties }
    property ID : Integer read GetIDValue write SetIDValue;
    property OldID : Integer read GetOldIDValue;
    property ID_RECIBO : Integer read GetID_RECIBOValue write SetID_RECIBOValue;
    property OldID_RECIBO : Integer read GetOldID_RECIBOValue;
    property TIPO : String read GetTIPOValue write SetTIPOValue;
    property OldTIPO : String read GetOldTIPOValue;
    property FECHA_PAGO : DateTime read GetFECHA_PAGOValue write SetFECHA_PAGOValue;
    property OldFECHA_PAGO : DateTime read GetOldFECHA_PAGOValue;
    property TITULAR : String read GetTITULARValue write SetTITULARValue;
    property OldTITULAR : String read GetOldTITULARValue;
    property ENTIDAD : String read GetENTIDADValue write SetENTIDADValue;
    property OldENTIDAD : String read GetOldENTIDADValue;
    property SUCURSAL : String read GetSUCURSALValue write SetSUCURSALValue;
    property OldSUCURSAL : String read GetOldSUCURSALValue;
    property DC : String read GetDCValue write SetDCValue;
    property OldDC : String read GetOldDCValue;
    property CUENTA : String read GetCUENTAValue write SetCUENTAValue;
    property OldCUENTA : String read GetOldCUENTAValue;
    property FECHA_ALTA : DateTime read GetFECHA_ALTAValue write SetFECHA_ALTAValue;
    property OldFECHA_ALTA : DateTime read GetOldFECHA_ALTAValue;
    property FECHA_MODIFICACION : DateTime read GetFECHA_MODIFICACIONValue write SetFECHA_MODIFICACIONValue;
    property OldFECHA_MODIFICACION : DateTime read GetOldFECHA_MODIFICACIONValue;
    property USUARIO : String read GetUSUARIOValue write SetUSUARIOValue;
    property OldUSUARIO : String read GetOldUSUARIOValue;

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

  end;

implementation

uses
  Variants, uROBinaryHelpers;

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

destructor TRecibosCompensadosProvBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_RECIBO_COMPENSADO];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_RECIBO_COMPENSADO];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvREFERENCIA];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvREFERENCIA];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvSITUACION];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvSITUACION];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_FACTURA];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_FACTURA];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_EMISION];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_EMISION];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_VENCIMIENTO];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTEValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTEValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTEValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOTROS_GASTOSValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOTROS_GASTOS];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldOTROS_GASTOSValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvOTROS_GASTOS];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetOTROS_GASTOSValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvOTROS_GASTOS] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTE_TOTALValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTE_TOTALValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_TOTAL] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvFECHA_FACTURA];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvFECHA_FACTURA];
end;

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

function TRecibosCompensadosProvBusinessProcessorRules.GetIMPORTE_FACTURAValue: Float;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Float;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetIMPORTE_FACTURAValue(const aValue: Float);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvIMPORTE_FACTURA] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetID_PROVEEDORValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_PROVEEDOR];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_PROVEEDORValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_PROVEEDOR];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_PROVEEDOR] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNOMBRE_PROVEEDOR] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetNIF_CIF_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNIF_CIF_PROVEEDOR];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvNIF_CIF_PROVEEDOR];
end;

procedure TRecibosCompensadosProvBusinessProcessorRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvNIF_CIF_PROVEEDOR] := aValue;
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosCompensadosProvID_EMPRESA];
end;

function TRecibosCompensadosProvBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosCompensadosProvID_EMPRESA];
end;

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


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

destructor TRecibosProveedorBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TRecibosProveedorBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_RECIBO_COMPENSADO];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_RECIBO_COMPENSADO];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REC_COMPENSADO];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_REC_COMPENSADO];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSITUACION];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSITUACION];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_FACTURA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_FACTURA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_REMESA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_REMESA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_REMESA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_REMESA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_EMISION];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_EMISION];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_VENCIMIENTO];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDESCRIPCION];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorDESCRIPCION];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOBSERVACIONES];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorOBSERVACIONES];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorOTROS_GASTOS];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorOTROS_GASTOS];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_TOTAL];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE_TOTAL];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_FACTURA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_FACTURA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetREFERENCIA_FACTURA_PROVValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldREFERENCIA_FACTURA_PROVValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetREFERENCIA_FACTURA_PROVValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorREFERENCIA_FACTURA_PROV] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFORMA_PAGO_FACTURA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFORMA_PAGO_FACTURA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorIMPORTE_FACTURA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorIMPORTE_FACTURA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetID_PROVEEDORValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldID_PROVEEDORValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNOMBRE_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetNIF_CIF_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNIF_CIF_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorNIF_CIF_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorNIF_CIF_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetENTIDAD_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldENTIDAD_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetENTIDAD_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorENTIDAD_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetSUCURSAL_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldSUCURSAL_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetSUCURSAL_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorSUCURSAL_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetDC_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDC_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldDC_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorDC_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetDC_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorDC_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetCUENTA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldCUENTA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR];
end;

procedure TRecibosProveedorBusinessProcessorRules.SetCUENTA_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorCUENTA_PROVEEDOR] := aValue;
end;

function TRecibosProveedorBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorID_EMPRESA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorID_EMPRESA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_ALTA];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_ALTA];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorFECHA_MODIFICACION];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorFECHA_MODIFICACION];
end;

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

function TRecibosProveedorBusinessProcessorRules.GetUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedorUSUARIO];
end;

function TRecibosProveedorBusinessProcessorRules.GetOldUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedorUSUARIO];
end;

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


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

destructor TRecibosProveedor_RefreshBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshID];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID_RECIBO_COMPENSADO];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldID_RECIBO_COMPENSADOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshID_RECIBO_COMPENSADO];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA_REC_COMPENSADO];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldREFERENCIA_REC_COMPENSADOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshREFERENCIA_REC_COMPENSADO];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldREFERENCIAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshREFERENCIA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldREFERENCIA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshREFERENCIA_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshSITUACION];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldSITUACIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshSITUACION];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID_FACTURA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldID_FACTURAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshID_FACTURA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID_REMESA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldID_REMESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshID_REMESA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA_REMESA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldREFERENCIA_REMESAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshREFERENCIA_REMESA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshFECHA_EMISION];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldFECHA_EMISIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshFECHA_EMISION];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshFECHA_VENCIMIENTO];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldFECHA_VENCIMIENTOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshFECHA_VENCIMIENTO];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshDESCRIPCION];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshDESCRIPCION];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshOBSERVACIONES];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldOBSERVACIONESValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshOBSERVACIONES];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshIMPORTE];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldIMPORTEValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshIMPORTE];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshOTROS_GASTOS];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldOTROS_GASTOSValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshOTROS_GASTOS];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshIMPORTE_TOTAL];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldIMPORTE_TOTALValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshIMPORTE_TOTAL];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshFECHA_FACTURA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldFECHA_FACTURAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshFECHA_FACTURA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetREFERENCIA_FACTURA_PROVValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA_FACTURA_PROV];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldREFERENCIA_FACTURA_PROVValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshREFERENCIA_FACTURA_PROV];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetREFERENCIA_FACTURA_PROVValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshREFERENCIA_FACTURA_PROV] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshFORMA_PAGO_FACTURA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldFORMA_PAGO_FACTURAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshFORMA_PAGO_FACTURA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshIMPORTE_FACTURA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldIMPORTE_FACTURAValue: Currency;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshIMPORTE_FACTURA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetID_PROVEEDORValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldID_PROVEEDORValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshID_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetID_PROVEEDORValue(const aValue: Integer);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetNOMBRE_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshNOMBRE_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldNOMBRE_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshNOMBRE_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetNOMBRE_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshNOMBRE_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetNIF_CIF_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshNIF_CIF_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldNIF_CIF_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshNIF_CIF_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetNIF_CIF_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshNIF_CIF_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetENTIDAD_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshENTIDAD_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldENTIDAD_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshENTIDAD_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetENTIDAD_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshENTIDAD_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetSUCURSAL_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshSUCURSAL_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldSUCURSAL_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshSUCURSAL_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetSUCURSAL_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshSUCURSAL_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetDC_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshDC_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldDC_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshDC_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetDC_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshDC_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetCUENTA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshCUENTA_PROVEEDOR];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldCUENTA_PROVEEDORValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshCUENTA_PROVEEDOR];
end;

procedure TRecibosProveedor_RefreshBusinessProcessorRules.SetCUENTA_PROVEEDORValue(const aValue: String);
begin
  BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshCUENTA_PROVEEDOR] := aValue;
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshID_EMPRESA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshID_EMPRESA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshFECHA_ALTA];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshFECHA_ALTA];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshFECHA_MODIFICACION];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshFECHA_MODIFICACION];
end;

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

function TRecibosProveedor_RefreshBusinessProcessorRules.GetUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_RecibosProveedor_RefreshUSUARIO];
end;

function TRecibosProveedor_RefreshBusinessProcessorRules.GetOldUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_RecibosProveedor_RefreshUSUARIO];
end;

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


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

destructor TPagosProveedorBusinessProcessorRules.Destroy;
begin
  inherited;
end;

function TPagosProveedorBusinessProcessorRules.GetIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID];
end;

function TPagosProveedorBusinessProcessorRules.GetOldIDValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID];
end;

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

function TPagosProveedorBusinessProcessorRules.GetID_RECIBOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorID_RECIBO];
end;

function TPagosProveedorBusinessProcessorRules.GetOldID_RECIBOValue: Integer;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorID_RECIBO];
end;

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

function TPagosProveedorBusinessProcessorRules.GetTIPOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTIPO];
end;

function TPagosProveedorBusinessProcessorRules.GetOldTIPOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorTIPO];
end;

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

function TPagosProveedorBusinessProcessorRules.GetFECHA_PAGOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_PAGO];
end;

function TPagosProveedorBusinessProcessorRules.GetOldFECHA_PAGOValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_PAGO];
end;

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

function TPagosProveedorBusinessProcessorRules.GetTITULARValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorTITULAR];
end;

function TPagosProveedorBusinessProcessorRules.GetOldTITULARValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorTITULAR];
end;

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

function TPagosProveedorBusinessProcessorRules.GetENTIDADValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorENTIDAD];
end;

function TPagosProveedorBusinessProcessorRules.GetOldENTIDADValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorENTIDAD];
end;

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

function TPagosProveedorBusinessProcessorRules.GetSUCURSALValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorSUCURSAL];
end;

function TPagosProveedorBusinessProcessorRules.GetOldSUCURSALValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorSUCURSAL];
end;

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

function TPagosProveedorBusinessProcessorRules.GetDCValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorDC];
end;

function TPagosProveedorBusinessProcessorRules.GetOldDCValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorDC];
end;

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

function TPagosProveedorBusinessProcessorRules.GetCUENTAValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorCUENTA];
end;

function TPagosProveedorBusinessProcessorRules.GetOldCUENTAValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorCUENTA];
end;

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

function TPagosProveedorBusinessProcessorRules.GetFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_ALTA];
end;

function TPagosProveedorBusinessProcessorRules.GetOldFECHA_ALTAValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_ALTA];
end;

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

function TPagosProveedorBusinessProcessorRules.GetFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorFECHA_MODIFICACION];
end;

function TPagosProveedorBusinessProcessorRules.GetOldFECHA_MODIFICACIONValue: DateTime;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorFECHA_MODIFICACION];
end;

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

function TPagosProveedorBusinessProcessorRules.GetUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.NewValueByName[fld_PagosProveedorUSUARIO];
end;

function TPagosProveedorBusinessProcessorRules.GetOldUSUARIOValue: String;
begin
  result := BusinessProcessor.CurrentChange.OldValueByName[fld_PagosProveedorUSUARIO];
end;

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


initialization
  RegisterBusinessProcessorRules(RID_RecibosCompensadosProvDelta, TRecibosCompensadosProvBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_RecibosProveedorDelta, TRecibosProveedorBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_RecibosProveedor_RefreshDelta, TRecibosProveedor_RefreshBusinessProcessorRules);
  RegisterBusinessProcessorRules(RID_PagosProveedorDelta, TPagosProveedorBusinessProcessorRules);

end.
